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