Initial import from FreeBSD RELENG_4:
[dragonfly.git] / sys / netproto / natm / natm_pcb.c
CommitLineData
984263bc
MD
1/* $FreeBSD: src/sys/netnatm/natm_pcb.c,v 1.6.6.1 2000/08/03 18:56:28 peter Exp $ */
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);
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
84void npcb_free(npcb, op)
85
86struct natmpcb *npcb;
87int op;
88
89{
90 int s = splimp();
91
92 if ((npcb->npcb_flags & NPCB_FREE) == 0) {
93 LIST_REMOVE(npcb, pcblist);
94 npcb->npcb_flags = NPCB_FREE;
95 }
96 if (op == NPCB_DESTROY) {
97 if (npcb->npcb_inq) {
98 npcb->npcb_flags = NPCB_DRAIN; /* flag for distruction */
99 } else {
100 FREE(npcb, M_PCB); /* kill it! */
101 }
102 }
103
104 splx(s);
105}
106
107
108/*
109 * npcb_add: add or remove npcb from main list
110 * returns npcb if ok
111 */
112
113struct natmpcb *npcb_add(npcb, ifp, vci, vpi)
114
115struct natmpcb *npcb;
116struct ifnet *ifp;
117u_int16_t vci;
118u_int8_t vpi;
119
120{
121 struct natmpcb *cpcb = NULL; /* current pcb */
122 int s = splimp();
123
124
125 /*
126 * lookup required
127 */
128
129 for (cpcb = natm_pcbs.lh_first ; cpcb != NULL ;
130 cpcb = cpcb->pcblist.le_next) {
131 if (ifp == cpcb->npcb_ifp && vci == cpcb->npcb_vci && vpi == cpcb->npcb_vpi)
132 break;
133 }
134
135 /*
136 * add & something already there?
137 */
138
139 if (cpcb) {
140 cpcb = NULL;
141 goto done; /* fail */
142 }
143
144 /*
145 * need to allocate a pcb?
146 */
147
148 if (npcb == NULL) {
149 cpcb = npcb_alloc(M_NOWAIT); /* could be called from lower half */
150 if (cpcb == NULL)
151 goto done; /* fail */
152 } else {
153 cpcb = npcb;
154 }
155
156 cpcb->npcb_ifp = ifp;
157 cpcb->ipaddr.s_addr = 0;
158 cpcb->npcb_vci = vci;
159 cpcb->npcb_vpi = vpi;
160 cpcb->npcb_flags = NPCB_CONNECTED;
161
162 LIST_INSERT_HEAD(&natm_pcbs, cpcb, pcblist);
163
164done:
165 splx(s);
166 return(cpcb);
167}
168
169
170
171#ifdef DDB
172
173int npcb_dump __P((void));
174
175int npcb_dump()
176
177{
178 struct natmpcb *cpcb;
179
180 printf("npcb dump:\n");
181 for (cpcb = natm_pcbs.lh_first ; cpcb != NULL ;
182 cpcb = cpcb->pcblist.le_next) {
183 printf("if=%s, vci=%d, vpi=%d, IP=0x%x, sock=%p, flags=0x%x, inq=%d\n",
184 cpcb->npcb_ifp->if_xname, cpcb->npcb_vci, cpcb->npcb_vpi,
185 cpcb->ipaddr.s_addr, cpcb->npcb_socket,
186 cpcb->npcb_flags, cpcb->npcb_inq);
187 }
188 printf("done\n");
189 return(0);
190}
191
192#endif