natm_pcb.c revision 71999 
1/* $FreeBSD: head/sys/netnatm/natm_pcb.c 71999 2001-02-04 13:13:25Z phk $ */
2/*	$NetBSD: natm_pcb.c,v 1.4 1996/11/09 03:26:27 chuck Exp $	*/
3
4/*
5 *
6 * Copyright (c) 1996 Charles D. Cranor and Washington University.
7 * All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 *    notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 *    notice, this list of conditions and the following disclaimer in the
16 *    documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 *    must display the following acknowledgement:
19 *      This product includes software developed by Charles D. Cranor and
20 *      Washington University.
21 * 4. The name of the author may not be used to endorse or promote products
22 *    derived from this software without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
25 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
26 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
27 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
28 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
29 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
33 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 */
35
36/*
37 * atm_pcb.c: manage atm protocol control blocks and keep IP and NATM
38 * from trying to use each other's VCs.
39 */
40
41#include <sys/param.h>
42#include <sys/systm.h>
43#include <sys/malloc.h>
44#include <sys/socket.h>
45#include <sys/socketvar.h>
46
47#include <net/if.h>
48
49#include <netinet/in.h>
50
51#include <netnatm/natm.h>
52
53struct npcblist natm_pcbs;
54
55/*
56 * npcb_alloc: allocate a npcb [in the free state]
57 */
58
59struct natmpcb *npcb_alloc(wait)
60
61int wait;
62
63{
64  struct natmpcb *npcb;
65
66  MALLOC(npcb, struct natmpcb *, sizeof(*npcb), M_PCB, wait | M_ZERO);
67
68#ifdef DIAGNOSTIC
69  if (wait == M_WAITOK && npcb == NULL) panic("npcb_alloc: malloc didn't wait");
70#endif
71
72  if (npcb)
73    npcb->npcb_flags = NPCB_FREE;
74
75  return(npcb);
76}
77
78
79/*
80 * npcb_free: free a npcb
81 */
82
83void npcb_free(npcb, op)
84
85struct natmpcb *npcb;
86int op;
87
88{
89  int s = splimp();
90
91  if ((npcb->npcb_flags & NPCB_FREE) == 0) {
92    LIST_REMOVE(npcb, pcblist);
93    npcb->npcb_flags = NPCB_FREE;
94  }
95  if (op == NPCB_DESTROY) {
96    if (npcb->npcb_inq) {
97      npcb->npcb_flags = NPCB_DRAIN;	/* flag for distruction */
98    } else {
99      FREE(npcb, M_PCB);		/* kill it! */
100    }
101  }
102
103  splx(s);
104}
105
106
107/*
108 * npcb_add: add or remove npcb from main list
109 *   returns npcb if ok
110 */
111
112struct natmpcb *npcb_add(npcb, ifp, vci, vpi)
113
114struct natmpcb *npcb;
115struct ifnet *ifp;
116u_int16_t vci;
117u_int8_t vpi;
118
119{
120  struct natmpcb *cpcb = NULL;		/* current pcb */
121  int s = splimp();
122
123
124  /*
125   * lookup required
126   */
127
128  for (cpcb = LIST_FIRST(&natm_pcbs) ; cpcb != NULL ;
129					cpcb = LIST_NEXT(cpcb, pcblist)) {
130    if (ifp == cpcb->npcb_ifp && vci == cpcb->npcb_vci && vpi == cpcb->npcb_vpi)
131      break;
132  }
133
134  /*
135   * add & something already there?
136   */
137
138  if (cpcb) {
139    cpcb = NULL;
140    goto done;					/* fail */
141  }
142
143  /*
144   * need to allocate a pcb?
145   */
146
147  if (npcb == NULL) {
148    cpcb = npcb_alloc(M_NOWAIT);	/* could be called from lower half */
149    if (cpcb == NULL)
150      goto done;			/* fail */
151  } else {
152    cpcb = npcb;
153  }
154
155  cpcb->npcb_ifp = ifp;
156  cpcb->ipaddr.s_addr = 0;
157  cpcb->npcb_vci = vci;
158  cpcb->npcb_vpi = vpi;
159  cpcb->npcb_flags = NPCB_CONNECTED;
160
161  LIST_INSERT_HEAD(&natm_pcbs, cpcb, pcblist);
162
163done:
164  splx(s);
165  return(cpcb);
166}
167
168
169
170#ifdef DDB
171
172int npcb_dump __P((void));
173
174int npcb_dump()
175
176{
177  struct natmpcb *cpcb;
178
179  printf("npcb dump:\n");
180  for (cpcb = LIST_FIRST(&natm_pcbs) ; cpcb != NULL ;
181					cpcb = LIST_NEXT(cpcb, pcblist)) {
182    printf("if=%s, vci=%d, vpi=%d, IP=0x%x, sock=%p, flags=0x%x, inq=%d\n",
183	cpcb->npcb_ifp->if_xname, cpcb->npcb_vci, cpcb->npcb_vpi,
184	cpcb->ipaddr.s_addr, cpcb->npcb_socket,
185	cpcb->npcb_flags, cpcb->npcb_inq);
186  }
187  printf("done\n");
188  return(0);
189}
190
191#endif
192