FreeBSD/Linux Kernel Cross Reference
sys/net/if_atmsubr.c
1 /* $NetBSD: if_atmsubr.c,v 1.10 1997/03/11 23:19:51 chuck Exp $ */
2
3 /*
4 *
5 * Copyright (c) 1996 Charles D. Cranor and Washington University.
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by Charles D. Cranor and
19 * Washington University.
20 * 4. The name of the author may not be used to endorse or promote products
21 * derived from this software without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
24 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
25 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
26 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
27 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
28 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
29 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
30 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
31 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
32 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
33 *
34 * if_atmsubr.c
35 */
36
37 #include <sys/cdefs.h>
38 __FBSDID("$FreeBSD: releng/5.3/sys/net/if_atmsubr.c 136588 2004-10-16 08:43:07Z cvs2svn $");
39
40 #include "opt_inet.h"
41 #include "opt_inet6.h"
42 #include "opt_mac.h"
43 #include "opt_natm.h"
44
45 #include <sys/param.h>
46 #include <sys/systm.h>
47 #include <sys/kernel.h>
48 #include <sys/module.h>
49 #include <sys/mac.h>
50 #include <sys/mbuf.h>
51 #include <sys/socket.h>
52 #include <sys/sockio.h>
53 #include <sys/errno.h>
54 #include <sys/sysctl.h>
55 #include <sys/malloc.h>
56
57 #include <net/if.h>
58 #include <net/netisr.h>
59 #include <net/route.h>
60 #include <net/if_dl.h>
61 #include <net/if_types.h>
62 #include <net/if_atm.h>
63
64 #include <netinet/in.h>
65 #include <netinet/if_atm.h>
66 #include <netinet/if_ether.h> /* XXX: for ETHERTYPE_* */
67 #if defined(INET) || defined(INET6)
68 #include <netinet/in_var.h>
69 #endif
70 #ifdef NATM
71 #include <netnatm/natm.h>
72 #endif
73
74 /*
75 * Netgraph interface functions.
76 * These need not be protected by a lock, because ng_atm nodes are persitent.
77 * The ng_atm module can be unloaded only if all ATM interfaces have been
78 * unloaded, so nobody should be in the code paths accessing these function
79 * pointers.
80 */
81 void (*ng_atm_attach_p)(struct ifnet *);
82 void (*ng_atm_detach_p)(struct ifnet *);
83 int (*ng_atm_output_p)(struct ifnet *, struct mbuf **);
84 void (*ng_atm_input_p)(struct ifnet *, struct mbuf **,
85 struct atm_pseudohdr *, void *);
86 void (*ng_atm_input_orphan_p)(struct ifnet *, struct mbuf *,
87 struct atm_pseudohdr *, void *);
88 void (*ng_atm_event_p)(struct ifnet *, uint32_t, void *);
89
90 /*
91 * Harp pseudo interface hooks
92 */
93 void (*atm_harp_input_p)(struct ifnet *ifp, struct mbuf **m,
94 struct atm_pseudohdr *ah, void *rxhand);
95 void (*atm_harp_attach_p)(struct ifnet *);
96 void (*atm_harp_detach_p)(struct ifnet *);
97 void (*atm_harp_event_p)(struct ifnet *, uint32_t, void *);
98
99 SYSCTL_NODE(_hw, OID_AUTO, atm, CTLFLAG_RW, 0, "ATM hardware");
100
101 #ifndef ETHERTYPE_IPV6
102 #define ETHERTYPE_IPV6 0x86dd
103 #endif
104
105 #define senderr(e) do { error = (e); goto bad; } while (0)
106
107 /*
108 * atm_output: ATM output routine
109 * inputs:
110 * "ifp" = ATM interface to output to
111 * "m0" = the packet to output
112 * "dst" = the sockaddr to send to (either IP addr, or raw VPI/VCI)
113 * "rt0" = the route to use
114 * returns: error code [0 == ok]
115 *
116 * note: special semantic: if (dst == NULL) then we assume "m" already
117 * has an atm_pseudohdr on it and just send it directly.
118 * [for native mode ATM output] if dst is null, then
119 * rt0 must also be NULL.
120 */
121 int
122 atm_output(struct ifnet *ifp, struct mbuf *m0, struct sockaddr *dst,
123 struct rtentry *rt0)
124 {
125 u_int16_t etype = 0; /* if using LLC/SNAP */
126 int error = 0, sz;
127 struct atm_pseudohdr atmdst, *ad;
128 struct mbuf *m = m0;
129 struct atmllc *atmllc;
130 struct atmllc *llc_hdr = NULL;
131 u_int32_t atm_flags;
132
133 #ifdef MAC
134 error = mac_check_ifnet_transmit(ifp, m);
135 if (error)
136 senderr(error);
137 #endif
138
139 if ((ifp->if_flags & (IFF_UP | IFF_RUNNING)) != (IFF_UP | IFF_RUNNING))
140 senderr(ENETDOWN);
141
142 /*
143 * check for non-native ATM traffic (dst != NULL)
144 */
145 if (dst) {
146 switch (dst->sa_family) {
147
148 #if defined(INET) || defined(INET6)
149 case AF_INET:
150 case AF_INET6:
151 {
152 struct rtentry *rt;
153 /*
154 * check route
155 */
156 error = rt_check(&rt, &rt0, dst);
157 if (error)
158 goto bad;
159
160 if (dst->sa_family == AF_INET6)
161 etype = ETHERTYPE_IPV6;
162 else
163 etype = ETHERTYPE_IP;
164 if (!atmresolve(rt, m, dst, &atmdst)) {
165 m = NULL;
166 /* XXX: atmresolve already free'd it */
167 senderr(EHOSTUNREACH);
168 /* XXX: put ATMARP stuff here */
169 /* XXX: watch who frees m on failure */
170 }
171 }
172 break;
173 #endif /* INET || INET6 */
174
175 case AF_UNSPEC:
176 /*
177 * XXX: bpfwrite. assuming dst contains 12 bytes
178 * (atm pseudo header (4) + LLC/SNAP (8))
179 */
180 bcopy(dst->sa_data, &atmdst, sizeof(atmdst));
181 llc_hdr = (struct atmllc *)(dst->sa_data +
182 sizeof(atmdst));
183 break;
184
185 default:
186 #if (defined(__FreeBSD__) && __FreeBSD_version >= 501113) || \
187 defined(__NetBSD__) || defined(__OpenBSD__)
188 printf("%s: can't handle af%d\n", ifp->if_xname,
189 dst->sa_family);
190 #elif defined(__FreeBSD__) || defined(__bsdi__)
191 printf("%s%d: can't handle af%d\n", ifp->if_name,
192 ifp->if_unit, dst->sa_family);
193 #endif
194 senderr(EAFNOSUPPORT);
195 }
196
197 /*
198 * must add atm_pseudohdr to data
199 */
200 sz = sizeof(atmdst);
201 atm_flags = ATM_PH_FLAGS(&atmdst);
202 if (atm_flags & ATM_PH_LLCSNAP)
203 sz += 8; /* sizeof snap == 8 */
204 M_PREPEND(m, sz, M_DONTWAIT);
205 if (m == 0)
206 senderr(ENOBUFS);
207 ad = mtod(m, struct atm_pseudohdr *);
208 *ad = atmdst;
209 if (atm_flags & ATM_PH_LLCSNAP) {
210 atmllc = (struct atmllc *)(ad + 1);
211 if (llc_hdr == NULL) {
212 bcopy(ATMLLC_HDR, atmllc->llchdr,
213 sizeof(atmllc->llchdr));
214 /* note: in host order */
215 ATM_LLC_SETTYPE(atmllc, etype);
216 }
217 else
218 bcopy(llc_hdr, atmllc, sizeof(struct atmllc));
219 }
220 }
221
222 if (ng_atm_output_p != NULL) {
223 if ((error = (*ng_atm_output_p)(ifp, &m)) != 0) {
224 if (m != NULL)
225 m_freem(m);
226 return (error);
227 }
228 if (m == NULL)
229 return (0);
230 }
231
232 /*
233 * Queue message on interface, and start output if interface
234 * not yet active.
235 */
236 if (!IF_HANDOFF_ADJ(&ifp->if_snd, m, ifp,
237 -(int)sizeof(struct atm_pseudohdr)))
238 return (ENOBUFS);
239 return (error);
240
241 bad:
242 if (m)
243 m_freem(m);
244 return (error);
245 }
246
247 /*
248 * Process a received ATM packet;
249 * the packet is in the mbuf chain m.
250 */
251 void
252 atm_input(struct ifnet *ifp, struct atm_pseudohdr *ah, struct mbuf *m,
253 void *rxhand)
254 {
255 int isr;
256 u_int16_t etype = ETHERTYPE_IP; /* default */
257 #ifdef NATM
258 int s;
259 #endif
260
261 if ((ifp->if_flags & IFF_UP) == 0) {
262 m_freem(m);
263 return;
264 }
265 #ifdef MAC
266 mac_create_mbuf_from_ifnet(ifp, m);
267 #endif
268 ifp->if_ibytes += m->m_pkthdr.len;
269
270 if (ng_atm_input_p != NULL) {
271 (*ng_atm_input_p)(ifp, &m, ah, rxhand);
272 if (m == NULL)
273 return;
274 }
275
276 /* not eaten by ng_atm. Maybe it's a pseudo-harp PDU? */
277 if (atm_harp_input_p != NULL) {
278 (*atm_harp_input_p)(ifp, &m, ah, rxhand);
279 if (m == NULL)
280 return;
281 }
282
283 if (rxhand) {
284 #ifdef NATM
285 struct natmpcb *npcb = rxhand;
286
287 s = splimp(); /* in case 2 atm cards @ diff lvls */
288 npcb->npcb_inq++; /* count # in queue */
289 splx(s);
290 isr = NETISR_NATM;
291 m->m_pkthdr.rcvif = rxhand; /* XXX: overload */
292 #else
293 printf("atm_input: NATM detected but not "
294 "configured in kernel\n");
295 goto dropit;
296 #endif
297 } else {
298 /*
299 * handle LLC/SNAP header, if present
300 */
301 if (ATM_PH_FLAGS(ah) & ATM_PH_LLCSNAP) {
302 struct atmllc *alc;
303
304 if (m->m_len < sizeof(*alc) &&
305 (m = m_pullup(m, sizeof(*alc))) == 0)
306 return; /* failed */
307 alc = mtod(m, struct atmllc *);
308 if (bcmp(alc, ATMLLC_HDR, 6)) {
309 #if (defined(__FreeBSD__) && __FreeBSD_version >= 501113) || \
310 defined(__NetBSD__) || defined(__OpenBSD__)
311 printf("%s: recv'd invalid LLC/SNAP frame "
312 "[vp=%d,vc=%d]\n", ifp->if_xname,
313 ATM_PH_VPI(ah), ATM_PH_VCI(ah));
314 #elif defined(__FreeBSD__) || defined(__bsdi__)
315 printf("%s%d: recv'd invalid LLC/SNAP frame "
316 "[vp=%d,vc=%d]\n", ifp->if_name,
317 ifp->if_unit, ATM_PH_VPI(ah),
318 ATM_PH_VCI(ah));
319 #endif
320 m_freem(m);
321 return;
322 }
323 etype = ATM_LLC_TYPE(alc);
324 m_adj(m, sizeof(*alc));
325 }
326
327 switch (etype) {
328
329 #ifdef INET
330 case ETHERTYPE_IP:
331 isr = NETISR_IP;
332 break;
333 #endif
334
335 #ifdef INET6
336 case ETHERTYPE_IPV6:
337 isr = NETISR_IPV6;
338 break;
339 #endif
340 default:
341 #ifndef NATM
342 dropit:
343 #endif
344 if (ng_atm_input_orphan_p != NULL)
345 (*ng_atm_input_orphan_p)(ifp, m, ah, rxhand);
346 else
347 m_freem(m);
348 return;
349 }
350 }
351 netisr_dispatch(isr, m);
352 }
353
354 /*
355 * Perform common duties while attaching to interface list.
356 */
357 void
358 atm_ifattach(struct ifnet *ifp)
359 {
360 struct ifaddr *ifa;
361 struct sockaddr_dl *sdl;
362 struct ifatm *ifatm = ifp->if_softc;
363
364 ifp->if_type = IFT_ATM;
365 ifp->if_addrlen = 0;
366 ifp->if_hdrlen = 0;
367 if_attach(ifp);
368 ifp->if_mtu = ATMMTU;
369 ifp->if_output = atm_output;
370 #if 0
371 ifp->if_input = atm_input;
372 #endif
373 ifp->if_snd.ifq_maxlen = 50; /* dummy */
374
375 #if defined(__NetBSD__) || defined(__OpenBSD__)
376 TAILQ_FOREACH(ifa, &ifp->if_addrlist, ifa_list)
377 #elif defined(__FreeBSD__) && (__FreeBSD__ > 2)
378 for (ifa = TAILQ_FIRST(&ifp->if_addrhead); ifa;
379 ifa = TAILQ_NEXT(ifa, ifa_link))
380 #elif defined(__FreeBSD__) || defined(__bsdi__)
381 for (ifa = ifp->if_addrlist; ifa; ifa = ifa->ifa_next)
382 #endif
383 if ((sdl = (struct sockaddr_dl *)ifa->ifa_addr) &&
384 sdl->sdl_family == AF_LINK) {
385 sdl->sdl_type = IFT_ATM;
386 sdl->sdl_alen = ifp->if_addrlen;
387 #ifdef notyet /* if using ATMARP, store hardware address using the next line */
388 bcopy(ifp->hw_addr, LLADDR(sdl), ifp->if_addrlen);
389 #endif
390 break;
391 }
392
393 ifp->if_linkmib = &ifatm->mib;
394 ifp->if_linkmiblen = sizeof(ifatm->mib);
395
396 if(ng_atm_attach_p)
397 (*ng_atm_attach_p)(ifp);
398 if (atm_harp_attach_p)
399 (*atm_harp_attach_p)(ifp);
400 }
401
402 /*
403 * Common stuff for detaching an ATM interface
404 */
405 void
406 atm_ifdetach(struct ifnet *ifp)
407 {
408 if (atm_harp_detach_p)
409 (*atm_harp_detach_p)(ifp);
410 if(ng_atm_detach_p)
411 (*ng_atm_detach_p)(ifp);
412 if_detach(ifp);
413 }
414
415 /*
416 * Support routine for the SIOCATMGVCCS ioctl().
417 *
418 * This routine assumes, that the private VCC structures used by the driver
419 * begin with a struct atmio_vcc.
420 *
421 * Return a table of VCCs in a freshly allocated memory area.
422 * Here we have a problem: we first count, how many vccs we need
423 * to return. The we allocate the memory and finally fill it in.
424 * Because we cannot lock while calling malloc, the number of active
425 * vccs may change while we're in malloc. So we allocate a couple of
426 * vccs more and if space anyway is not enough re-iterate.
427 *
428 * We could use an sx lock for the vcc tables.
429 */
430 struct atmio_vcctable *
431 atm_getvccs(struct atmio_vcc **table, u_int size, u_int start,
432 struct mtx *lock, int waitok)
433 {
434 u_int cid, alloc;
435 size_t len;
436 struct atmio_vcctable *vccs;
437 struct atmio_vcc *v;
438
439 alloc = start + 10;
440 vccs = NULL;
441
442 for (;;) {
443 len = sizeof(*vccs) + alloc * sizeof(vccs->vccs[0]);
444 vccs = reallocf(vccs, len, M_TEMP,
445 waitok ? M_WAITOK : M_NOWAIT);
446 if (vccs == NULL)
447 return (NULL);
448 bzero(vccs, len);
449
450 vccs->count = 0;
451 v = vccs->vccs;
452
453 mtx_lock(lock);
454 for (cid = 0; cid < size; cid++)
455 if (table[cid] != NULL) {
456 if (++vccs->count == alloc)
457 /* too many - try again */
458 break;
459 *v++ = *table[cid];
460 }
461 mtx_unlock(lock);
462
463 if (cid == size)
464 break;
465
466 alloc *= 2;
467 }
468 return (vccs);
469 }
470
471 /*
472 * Driver or channel state has changed. Inform whoever is interested
473 * in these events.
474 */
475 void
476 atm_event(struct ifnet *ifp, u_int event, void *arg)
477 {
478 if (ng_atm_event_p != NULL)
479 (*ng_atm_event_p)(ifp, event, arg);
480 if (atm_harp_event_p != NULL)
481 (*atm_harp_event_p)(ifp, event, arg);
482 }
483
484 static moduledata_t atm_mod = {
485 "atm",
486 NULL,
487 0
488 };
489
490 DECLARE_MODULE(atm, atm_mod, SI_SUB_PSEUDO, SI_ORDER_ANY);
491 MODULE_VERSION(atm, 1);
Cache object: 5b07a136a5bc3e9aa3274df947b60c0e
|