开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 嵌入式/单片机编程 > VxWorks > 查看源码
if.c
资源名称：vxwork_src.rar　[点击查看]
上传用户：nvosite88
上传日期：2007-01-17
资源大小：4983k
文件大小：32k
源码类别：

VxWorks

开发平台：

C/C++

if.c：源码内容
  1. /* if.c - network interface utility routines */
  3. /* Copyright 1984 - 2002 Wind River Systems, Inc. */
  4. #include "copyright_wrs.h"
  6. /* $NetBSD: if.c,v 1.18 1994/10/30 21:48:46 cgd Exp $ */
  8. /*
  9.  * Copyright (c) 1980, 1986, 1993
  10.  * The Regents of the University of California.  All rights reserved.
  11.  *
  12.  * Redistribution and use in source and binary forms, with or without
  13.  * modification, are permitted provided that the following conditions
  14.  * are met:
  15.  * 1. Redistributions of source code must retain the above copyright
  16.  *    notice, this list of conditions and the following disclaimer.
  17.  * 2. Redistributions in binary form must reproduce the above copyright
  18.  *    notice, this list of conditions and the following disclaimer in the
  19.  *    documentation and/or other materials provided with the distribution.
  20.  * 3. All advertising materials mentioning features or use of this software
  21.  *    must display the following acknowledgement:
  22.  * This product includes software developed by the University of
  23.  * California, Berkeley and its contributors.
  24.  * 4. Neither the name of the University nor the names of its contributors
  25.  *    may be used to endorse or promote products derived from this software
  26.  *    without specific prior written permission.
  27.  *
  28.  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  29.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  30.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  31.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  32.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  33.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  34.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  35.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  36.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  37.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  38.  * SUCH DAMAGE.
  39.  *
  40.  * @(#)if.c 8.3 (Berkeley) 1/4/94
  41.  */
  43. /*
  44. modification history
  45. --------------------
  46. 01u,25apr02,vvv  removed unused ifAttachChange (SPR #74391)
  47. 01t,06mar02,vvv  clean up multicast memberships when interface is detached
  48.  (SPR #72486)
  49. 01s,29oct01,wap  ifconf() fails with unit numbers greater than 9 (SPR #31752)
  50. 01r,26oct01,vvv  fixed memory leak in if_dettach (SPR #71081) 
  51. 01q,12oct01,rae  merge from truestack ver 01w base 01m
  52.                  SPR #69112, Windview events, etc.
  53. 01p,30mar01,rae  allow m2 stuff to be excluded (SPR# 65428)
  54. 01o,24oct00,niq  Merging in RFC2233 changes from tor2_0.open_stack-f1 branch.
  55. 01n,17oct00,spm  merged from version 01j of tor2_0_x branch (base version 01h):
  56.                  updated if_attach to report memory allocation failures
  57. 01m,29apr99,pul  Upgraded NPT phase3 code to tor2.0.0
  58. 01l,25mar99,sj   removed logMsg within SIOCSIFASYNCFLAGS ioctl 
  59. 01k,24mar99,ead  Added a call to m2SetIfLastChange() in ifioctl() when the
  60.                  interfaces operational status changes. (SPR #23290)
  61. 01j,19mar99,sj   SIOCSIFASYNCFLAGS ioctl recvd only when we didn't change flags
  62. 01i,18mar99,sj   added SIOCSIFASYNCFLAGS for async flag change report from END
  63. 01h,16jul98,n_s  fixed ifioctl to pass correct flags to driver Ioctl. SPR 21124 
  64. 01g,16dec97,vin  fixed if_dettach SPR 9970.
  65. 01f,10dec97,vin  added spl protection to ifreset, if_dettach, if_attach,
  66.  ifIndexToIfp SPR 9987.
  67. 01e,05oct97,vin  fixed if_dettach, for changes in multicast code.
  68. 01d,12aug97,rjc  made if_index global to support non ip interfaces (SPR 9060).
  69. 01c,02jul97,vin  fixed warnings. added _rtIfaceMsgHook for scaling out routing
  70.  sockets.
  71. 01b,05dec96,vin  moved ifafree() from route.c(), added ifIndexToIfp(),
  72.  deleted ifnet_addrs in ifattach(), made if_index static.
  73.  made ifqmaxlen static, replaced calloc with MALLOC, replaced
  74.  free(..) with FREE(..)
  75. 01a,03mar96,vin  created from BSD4.4 stuff,integrated with 02t of if.c.
  76.  rewrote if_dettach(), added in_ifaddr_remove in if_dettach
  77. */
  79. /*
  80. DESCRIPTION
  81. */
  83. #include "vxWorks.h"
  84. #include "sys/socket.h"
  85. #include "net/socketvar.h"
  86. #include "net/protosw.h"
  87. /* #include "net/route.h" */
  88. #include "routeEnhLib.h"
  89. #include "net/if_dl.h"
  90. #include "net/if_subr.h"
  91. #include "sys/ioctl.h"
  92. #include "errno.h"
  94. #include "ifIndexLib.h"
  96. #include "net/if.h"
  98. #include "wdLib.h"
  100. #include "net/systm.h"
  101. #include "net/mbuf.h"
  102. #ifdef INET
  103. #include "netinet/in_var.h"
  104. #endif /* INET */
  106. #include "m2Lib.h"
  109. #ifdef WV_INSTRUMENTATION
  110. #ifdef INCLUDE_WVNET
  111. #include "wvNetLib.h"
  112. #endif /* INCLUDE_WVNET */
  113. #endif
  115. #ifdef VIRTUAL_STACK
  116. #include "netinet/vsLib.h"
  117. #endif
  119. #include "logLib.h"
  121. IMPORT STATUS netJobAdd (FUNCPTR, int, int, int, int, int);
  122. extern void pfctlinput(int cmd, struct sockaddr * sa);
  123. extern int sysClkRateGet();
  124. extern void in_ifaddr_remove ();
  125. extern int arpioctl (int cmd, caddr_t data); 
  126. extern int splnet2 (int timeout);
  128. /* XXX temporary fix should be removed after updating all drivers */
  130. extern void ether_ifattach(struct ifnet * ifp);
  131. extern int ether_output (); 
  133. #ifndef VIRTUAL_STACK
  134. IMPORT struct inpcbhead         udb;
  135. #endif
  137. #ifndef VIRTUAL_STACK
  138. struct ifnet *ifnet; /* head of linked list of interfaces */
  140. LOCAL WDOG_ID ifslowtimoWd; /* watchdog timer for slowtimo routine */
  142. #endif /* VIRTUAL_STACK */
  144. /* locals */
  145. static int ifqmaxlen = IFQ_MAXLEN;
  146. static char * sprint_d(unsigned int, char *, int);
  148. #ifdef WV_INSTRUMENTATION
  149. #ifdef INCLUDE_WVNET
  150.     /* Set common fields of event identifiers for this module. */
  152. LOCAL UCHAR wvNetModuleId = WV_NET_IF_MODULE;  /* Value for if.c */
  153. LOCAL UCHAR wvNetLocalFilter = WV_NET_NONE;  /* Available event filter */
  155. LOCAL ULONG wvNetEventId;  /* Event identifier: see wvNetLib.h */
  156. #endif  /* INCLUDE_WVNET */
  157. #endif
  159. /* forward declarations */
  160. LOCAL void ifMultiDelete (struct ifnet *);
  162. /* globals */
  164. FUNCPTR _m2SetIfLastChange;
  165. FUNCPTR _m2IfTableUpdate;
  167. /*
  168.  * Network interface utility routines.
  169.  *
  170.  * Routines with ifa_ifwith* names take sockaddr *'s as
  171.  * parameters.
  172.  */
  174. void ifinit()
  175.     {
  176.     register struct ifnet *ifp;
  178. #ifdef WV_INSTRUMENTATION
  179. #ifdef INCLUDE_WVNET    /* WV_NET_VERBOSE event */
  180.     WV_NET_MARKER_0 (NET_AUX_EVENT, WV_NET_VERBOSE, 0, 8,
  181.                      WV_NETEVENT_IFINIT_START)
  182. #endif  /* INCLUDE_WVNET */
  183. #endif
  185. #ifdef VIRTUAL_STACK
  186.     if (_ifnet != NULL)
  187. #else
  188.     if (ifnet != NULL)
  189. #endif
  190.         {
  191. #ifdef VIRTUAL_STACK
  192.         for (ifp = _ifnet; ifp; ifp = ifp->if_next)
  193. #else
  194.         for (ifp = ifnet; ifp; ifp = ifp->if_next)
  195. #endif
  196.             if (ifp->if_snd.ifq_maxlen == 0)
  197.                 ifp->if_snd.ifq_maxlen = ifqmaxlen;
  198.         }
  200.     /* XXX using watchdogs good idea? -gae */
  201.     ifslowtimoWd = wdCreate ();
  203. #ifdef VIRTUAL_STACK
  204.     if_slowtimo (myStackNum);
  205. #else
  206.     if_slowtimo ();
  207. #endif
  208.     }
  210. /*
  211.  * Actuall interface reset invocation.
  212.  */
  213. void ifreset2 ()
  215.     {
  216.     register struct ifnet *ifp;
  217.     register struct ifnet *ifpnext;
  219. #ifdef VIRTUAL_STACK
  220.     ifp = _ifnet;
  221. #else
  222.     ifp = ifnet;
  223. #endif
  225.     while (ifp)
  226.         {
  227.         ifpnext = ifp->if_next;
  228.         if (ifp->if_reset)
  229.             (*ifp->if_reset)(ifp->if_unit);
  230.         ifp = ifpnext;
  231.         }
  232.     }
  234. /*
  235.  * Call each interface on a reset.
  236.  */
  237. void ifreset ()
  239.     {
  241.     int  s;
  243. #ifdef WV_INSTRUMENTATION
  244. #ifdef INCLUDE_WVNET    /* WV_NET_VERBOSE event */
  245.     WV_NET_MARKER_0 (NET_AUX_EVENT, WV_NET_VERBOSE, 1, 9,
  246.                          WV_NETEVENT_IFRESET_START)
  247. #endif  /* INCLUDE_WVNET */
  248. #endif
  250.     s = splnet ();
  251.     ifreset2();
  252.     splx (s);
  253.     }
  255. /*
  256.  * For rebootHook use only - Immediate i/f reset
  257.  *
  258.  * WARNING:  Calling this routine that does not wait spl semaphore
  259.  * is a violation of mutual exclusion and will cause problems in a
  260.  * running system.
  261.  * This routine should only be used if the system is being rebooted
  262.  * (i.e. when called from a reboot hook) or if the application has
  263.  * very specific knowledge of the state of all ENDs in the system.
  264.  */
  265. void ifresetImmediate ()
  267.     {
  268.     int  s;
  270. #ifdef WV_INSTRUMENTATION
  271. #ifdef INCLUDE_WVNET    /* WV_NET_VERBOSE event */
  272.     WV_NET_MARKER_0 (NET_AUX_EVENT, WV_NET_VERBOSE, 1, 9,
  273.                          WV_NETEVENT_IFRESET_START)
  274. #endif  /* INCLUDE_WVNET */
  275. #endif
  277.     s = splnet2 (0); /* don't wait spl semaphore */
  278.     ifreset2();
  279.     splx(s);
  280.     }
  282. /*
  283.  * Attach an interface to the list of "active" interfaces.
  284.  */
  286. STATUS if_attach(ifp)
  287.     struct ifnet *ifp;
  288.     {
  289.     unsigned socksize, ifasize;
  290.     int namelen, unitlen, masklen;
  291.     char workbuf[12], *unitname;
  292. #ifdef VIRTUAL_STACK
  293.     register struct ifnet **p = &_ifnet;
  294. #else
  295.     register struct ifnet **p = &ifnet;
  296. #endif
  297.     register struct sockaddr_dl *sdl;
  298.     register struct ifaddr *ifa;
  299.     extern void link_rtrequest();
  300.     int  s;
  302. #ifdef WV_INSTRUMENTATION
  303. #ifdef INCLUDE_WVNET    /* WV_NET_VERBOSE event */
  304.     WV_NET_MARKER_1 (NET_AUX_EVENT, WV_NET_VERBOSE, 2, 10,
  305.                      WV_NETEVENT_IFATTACH_START, ifp)
  306. #endif  /* INCLUDE_WVNET */
  307. #endif
  309.     /* make interface not use trailer protocol by default */
  311.     ifp->if_flags |= IFF_NOTRAILERS;
  313.     /* make send queue maxlen be default if none specified;
  314.      * this relaxes the requirement that all interfaces be attached
  315.      * before calling ifinit */
  317.     if (ifp->if_snd.ifq_maxlen == 0)
  318. ifp->if_snd.ifq_maxlen = ifqmaxlen;
  320.     /*
  321.      * create a Link Level name for this device
  322.      */
  323.     unitname = sprint_d((u_int)ifp->if_unit, workbuf, sizeof(workbuf));
  324.     namelen = strlen(ifp->if_name);
  325.     unitlen = strlen(unitname);
  326. #define _offsetof(t, m) ((int)((caddr_t)&((t *)0)->m))
  327.     masklen = _offsetof(struct sockaddr_dl, sdl_data[0]) +
  328.     unitlen + namelen;
  329.     socksize = masklen + ifp->if_addrlen;
  330. #define ROUNDUP(a) (1 + (((a) - 1) | (sizeof(long) - 1)))
  331.     socksize = ROUNDUP(socksize);
  332.     if (socksize < sizeof(*sdl))
  333. socksize = sizeof(*sdl);
  334.     ifasize = sizeof(*ifa) + 2 * socksize;
  335.     MALLOC (ifa, struct ifaddr *, ifasize, MT_IFADDR, M_WAIT); 
  336.     if (ifa == 0)
  337. return (ERROR);
  339.     /* Make interface globally visible after all memory is allocated. */
  341.     s = splnet ();
  342.     while (*p)
  343.         p = &((*p)->if_next);
  344.     splx (s);
  346.     *p = ifp;
  348.     ifp->if_index = ifIndexAlloc();
  350.     bzero((caddr_t)ifa, ifasize);
  351.     sdl = (struct sockaddr_dl *)(ifa + 1);
  352.     sdl->sdl_len = socksize;
  353.     sdl->sdl_family = AF_LINK;
  354.     bcopy(ifp->if_name, sdl->sdl_data, namelen);
  355.     bcopy(unitname, namelen + (caddr_t)sdl->sdl_data, unitlen);
  356.     sdl->sdl_nlen = (namelen += unitlen);
  357.     sdl->sdl_index = ifp->if_index;
  358.     sdl->sdl_type = ifp->if_type;
  359.     ifa->ifa_ifp = ifp;
  360.     ifa->ifa_next = ifp->if_addrlist;
  361.     ifa->ifa_rtrequest = link_rtrequest;
  362.     ifp->if_addrlist = ifa;
  363.     ifa->ifa_addr = (struct sockaddr *)sdl;
  364.     sdl = (struct sockaddr_dl *)(socksize + (caddr_t)sdl);
  365.     ifa->ifa_netmask = (struct sockaddr *)sdl;
  366.     sdl->sdl_len = masklen;
  367.     while (namelen != 0)
  368. sdl->sdl_data[--namelen] = 0xff;
  369.     if (_m2IfTableUpdate)
  370.         _m2IfTableUpdate(ifp, M2_IF_TABLE_INSERT, 0, 0);
  372.     /* XXX Temporary fix before changing ethernet drivers */
  374.     s = splnet ();
  375.     if (ifp->if_output == ether_output)
  376. ether_ifattach (ifp);
  377.     splx (s);
  379.     return (OK);
  380.     }
  382. /***************************************************************************
  383. *
  384. * if_dettach - dettaches an interface from the linked list of interfaces
  385. *
  386. * if_dettach is used to dettach an interface from the linked list of
  387. * all available interfaces.  This function needs to be used with
  388. * if_down () when shutting down a network interface.
  389. */
  391. void if_dettach (ifp)
  392.     struct ifnet *ifp; /* inteface pointer */
  394.     {
  395.     FAST struct ifnet ** pPtrIfp;
  396.     FAST struct ifaddr *  pIfAddr;
  397.     FAST struct ifaddr ** pPtrIfAddr;
  398.     int  s;
  400. #ifdef WV_INSTRUMENTATION
  401. #ifdef INCLUDE_WVNET    /* WV_NET_VERBOSE event */
  402.     WV_NET_MARKER_1 (NET_AUX_EVENT, WV_NET_VERBOSE, 3, 11,
  403.                      WV_NETEVENT_IFDETACH_START, ifp)
  404. #endif  /* INCLUDE_WVNET */
  405. #endif
  407. #ifdef VIRTUAL_STACK
  408.     pPtrIfp = &_ifnet;
  409. #else
  410.     pPtrIfp = &ifnet;
  411. #endif
  413.     s = splnet ();
  414.     while (*pPtrIfp != NULL)
  415. {
  416. if (*pPtrIfp == ifp)
  417.     {
  418.     pPtrIfAddr = &(*pPtrIfp)->if_addrlist; 
  419.     while (*pPtrIfAddr != NULL)
  420. {
  421. pIfAddr = *pPtrIfAddr; 
  423. *pPtrIfAddr = (*pPtrIfAddr)->ifa_next; 
  425. #ifdef INET
  426. if (pIfAddr->ifa_addr->sa_family == AF_INET)
  427.     in_ifaddr_remove (pIfAddr);
  428.         else
  429. #endif
  430.     IFAFREE (pIfAddr);
  431. }
  432. #ifdef INET
  433.             if ((*pPtrIfp)->pInmMblk != NULL)
  434.                 in_delmulti ((*pPtrIfp)->pInmMblk, NULL);
  436.     if (ifp->if_flags & IFF_MULTICAST)
  437.                 ifMultiDelete (ifp);
  438. #endif /* INET */
  439.     *pPtrIfp = (*pPtrIfp)->if_next; 
  441.             /* Notify MIB-II of change */
  443.             if (_m2IfTableUpdate)
  444.                 _m2IfTableUpdate(ifp, M2_IF_TABLE_REMOVE, 0, 0);
  446.     break; 
  447.     }
  448. pPtrIfp = &(*pPtrIfp)->if_next; 
  449. }
  450.     splx (s);
  451.     }
  453. /*******************************************************************************
  454. *
  455. * ifIndexToIfp - obtain the ifnet pointer from the index
  456. *
  457. * This function obtains the ifnet pointer from the if_index.
  458. * The interface index is unique for every new interface added.
  459. * 
  460. * NOMANUAL
  461. *
  462. * RETURNS ifnet/NULL
  463. */
  465. struct ifnet * ifIndexToIfp
  466.     (
  467.     int ifIndex /* index of the interface to find */
  468.     )
  469.     {
  470.     register struct ifnet *  pIfp;
  471.     int  s;
  473.     s = splnet ();
  474.     /* traverse the list of ifnet structures in the system */
  476. #ifdef VIRTUAL_STACK
  477.     for (pIfp = _ifnet; pIfp != NULL; pIfp = pIfp->if_next)
  478. #else
  479.     for (pIfp = ifnet; pIfp != NULL; pIfp = pIfp->if_next)
  480. #endif
  481. {
  482. if (pIfp->if_index == ifIndex)
  483.     break;
  484. }
  485.     splx (s);
  487.     return (pIfp); 
  488.     }
  490. /*
  491.  * Locate an interface based on a complete address.
  492.  */
  493. /*ARGSUSED*/
  494. struct ifaddr *
  495. ifa_ifwithaddr(addr)
  496. register struct sockaddr *addr;
  497. {
  498. register struct ifnet *ifp;
  499. register struct ifaddr *ifa;
  501. #define equal(a1, a2) 
  502.   (bcmp((caddr_t)(a1), (caddr_t)(a2), ((struct sockaddr *)(a1))->sa_len) == 0)
  503. #ifdef VIRTUAL_STACK
  504. for (ifp = _ifnet; ifp; ifp = ifp->if_next)
  505. #else
  506. for (ifp = ifnet; ifp; ifp = ifp->if_next)
  507. #endif
  508.     for (ifa = ifp->if_addrlist; ifa; ifa = ifa->ifa_next) {
  509. if (ifa->ifa_addr->sa_family != addr->sa_family)
  510. continue;
  511. if (equal(addr, ifa->ifa_addr))
  512. return (ifa);
  513. if ((ifp->if_flags & IFF_BROADCAST) && ifa->ifa_broadaddr &&
  514.     equal(ifa->ifa_broadaddr, addr))
  515. return (ifa);
  516. }
  517. return ((struct ifaddr *)0);
  518. }
  519. /*
  520.  * Locate the point to point interface with a given destination address.
  521.  */
  522. /*ARGSUSED*/
  523. struct ifaddr *
  524. ifa_ifwithdstaddr(addr)
  525. register struct sockaddr *addr;
  526. {
  527. register struct ifnet *ifp;
  528. register struct ifaddr *ifa;
  530. #ifdef VIRTUAL_STACK
  531. for (ifp = _ifnet; ifp; ifp = ifp->if_next) 
  532. #else
  533. for (ifp = ifnet; ifp; ifp = ifp->if_next) 
  534. #endif
  535.     if (ifp->if_flags & IFF_POINTOPOINT)
  536. for (ifa = ifp->if_addrlist; ifa; ifa = ifa->ifa_next) {
  537. if (ifa->ifa_addr->sa_family != addr->sa_family)
  538. continue;
  539. if (equal(addr, ifa->ifa_dstaddr))
  540. return (ifa);
  541. }
  542. return ((struct ifaddr *)0);
  543. }
  545. /*
  546.  * Find an interface on a specific network.  If many, choice
  547.  * is most specific found.
  548.  */
  549. struct ifaddr *
  550. ifa_ifwithnet(addr)
  551. struct sockaddr *addr;
  552. {
  553. register struct ifnet *ifp;
  554. register struct ifaddr *ifa;
  555. struct ifaddr *ifa_maybe = (struct ifaddr *) 0;
  556. u_int af = addr->sa_family;
  557. char *addr_data = addr->sa_data, *cplim;
  559. if (af == AF_LINK) {
  560.     register struct sockaddr_dl *sdl = (struct sockaddr_dl *)addr;
  561.     /* eliminated need for ifnet_addrs array*/     
  562.     if (ifIndexTest(sdl->sdl_index))
  563. {
  564. ifp = ifIndexToIfp (sdl->sdl_index); 
  565.                 if (ifp == NULL)
  566.                     {
  567.                     logMsg("ifa_ifwithnet: NULL ifp for index:%dn",
  568.                            (int)sdl->sdl_index, 0, 0, 0, 0, 0);
  569.                     return(NULL);
  570.                     }
  571. for (ifa = ifp->if_addrlist; ifa != NULL; ifa = ifa->ifa_next)
  572.     if (ifa->ifa_addr->sa_family == af)
  573. break; 
  574. return (ifa); 
  575. }
  576. }
  577. #ifdef VIRTUAL_STACK
  578. for (ifp = _ifnet; ifp; ifp = ifp->if_next)
  579. #else
  580. for (ifp = ifnet; ifp; ifp = ifp->if_next)
  581. #endif
  582.     for (ifa = ifp->if_addrlist; ifa; ifa = ifa->ifa_next) {
  583. register char *cp, *cp2, *cp3;
  585. if (ifa->ifa_addr->sa_family != af || ifa->ifa_netmask == 0)
  586. next: continue;
  587. cp = addr_data;
  588. cp2 = ifa->ifa_addr->sa_data;
  589. cp3 = ifa->ifa_netmask->sa_data;
  590. cplim = ifa->ifa_netmask->sa_len + (char *)ifa->ifa_netmask;
  591. while (cp3 < cplim)
  592. if ((*cp++ ^ *cp2++) & *cp3++)
  593. goto next;
  594. if (ifa_maybe == 0 ||
  595.     rn_refines((caddr_t)ifa->ifa_netmask,
  596.     (caddr_t)ifa_maybe->ifa_netmask))
  597. ifa_maybe = ifa;
  598.     }
  599. return (ifa_maybe);
  600. }
  602. /*
  603.  * Find an interface using a specific address family
  604.  */
  605. struct ifaddr *
  606. ifa_ifwithaf(af)
  607. register int af;
  608. {
  609. register struct ifnet *ifp;
  610. register struct ifaddr *ifa;
  612. #ifdef VIRTUAL_STACK
  613. for (ifp = _ifnet; ifp; ifp = ifp->if_next)
  614. #else
  615. for (ifp = ifnet; ifp; ifp = ifp->if_next)
  616. #endif
  617.     for (ifa = ifp->if_addrlist; ifa; ifa = ifa->ifa_next)
  618. if (ifa->ifa_addr->sa_family == af)
  619. return (ifa);
  620. return ((struct ifaddr *)0);
  621. }
  623. /*
  624.  * Find an interface address specific to an interface best matching
  625.  * a given address.
  626.  */
  627. struct ifaddr *
  628. ifaof_ifpforaddr(addr, ifp)
  629. struct sockaddr *addr;
  630. register struct ifnet *ifp;
  631. {
  632. register struct ifaddr *ifa;
  633. register char *cp, *cp2, *cp3;
  634. register char *cplim;
  635. struct ifaddr *ifa_maybe = 0;
  636. u_int af = addr->sa_family;
  638. if (af >= AF_MAX)
  639. return (0);
  640. for (ifa = ifp->if_addrlist; ifa; ifa = ifa->ifa_next) {
  641. if (ifa->ifa_addr->sa_family != af)
  642. continue;
  643. ifa_maybe = ifa;
  644. if (ifa->ifa_netmask == 0) {
  645. if (equal(addr, ifa->ifa_addr) ||
  646.     (ifa->ifa_dstaddr && equal(addr, ifa->ifa_dstaddr)))
  647. return (ifa);
  648. continue;
  649. }
  650. cp = addr->sa_data;
  651. cp2 = ifa->ifa_addr->sa_data;
  652. cp3 = ifa->ifa_netmask->sa_data;
  653. cplim = ifa->ifa_netmask->sa_len + (char *)ifa->ifa_netmask;
  654. for (; cp3 < cplim; cp3++)
  655. if ((*cp++ ^ *cp2++) & *cp3)
  656. break;
  657. if (cp3 == cplim)
  658. return (ifa);
  659. }
  660. return (ifa_maybe);
  661. }
  663. /* 
  664.  * Find an interface address for a specified destination or gateway
  665.  */
  666. struct ifaddr *
  667. ifa_ifwithroute(flags, dst, gateway)
  668. int flags;
  669. struct sockaddr *dst, *gateway;
  670. {
  671. register struct ifaddr *ifa;
  672. if ((flags & RTF_GATEWAY) == 0) {
  673. /*
  674.  * If we are adding a route to an interface,
  675.  * and the interface is a pt to pt link
  676.  * we should search for the destination
  677.  * as our clue to the interface.  Otherwise
  678.  * we can use the local address.
  679.  */
  680. ifa = 0;
  681. if (flags & RTF_HOST) 
  682. ifa = ifa_ifwithdstaddr(dst);
  683. if (ifa == 0)
  684. ifa = ifa_ifwithaddr(gateway);
  685. } else {
  686. /*
  687.  * If we are adding a route to a remote net
  688.  * or host, the gateway may still be on the
  689.  * other end of a pt to pt link.
  690.  */
  691. ifa = ifa_ifwithdstaddr(gateway);
  692. }
  693. if (ifa == 0)
  694. ifa = ifa_ifwithnet(gateway);
  695. if (ifa == 0) {
  696. struct rtentry *rt = rtalloc1(dst, 0);
  697. if (rt == 0)
  698. return (0);
  699. rt->rt_refcnt--;
  700. if ((ifa = rt->rt_ifa) == 0)
  701. return (0);
  702. }
  703. if (ifa->ifa_addr->sa_family != dst->sa_family) {
  704. struct ifaddr *oifa = ifa;
  705. ifa = ifaof_ifpforaddr(dst, ifa->ifa_ifp);
  706. if (ifa == 0)
  707. ifa = oifa;
  708. }
  709. return (ifa);
  710. }
  712. /* free the interface address */
  714. void
  715. ifafree(ifa)
  716. register struct ifaddr *ifa;
  717. {
  718. if (ifa == NULL)
  719.                 {   
  720. #ifdef WV_INSTRUMENTATION
  721. #ifdef INCLUDE_WVNET  /* WV_NET_EMERGENCY event */
  722.     WV_NET_MARKER_0 (NET_AUX_EVENT, WV_NET_EMERGENCY, 0, 1,
  723.                      WV_NETEVENT_IFAFREE_PANIC)
  724. #endif  /* INCLUDE_WVNET */
  725. #endif
  726. panic("ifafree");
  727.                 }
  728. if (ifa->ifa_refcnt == 0)
  729. {
  730. FREE(ifa, MT_IFADDR);  
  731. }
  732. else
  733. ifa->ifa_refcnt--;
  734. }
  736. /*
  737.  * Default action when installing a route with a Link Level gateway.
  738.  * Lookup an appropriate real ifa to point to.
  739.  * This should be moved to /sys/net/link.c eventually.
  740.  */
  741. void
  742. link_rtrequest(cmd, rt, sa)
  743. int cmd;
  744. register struct rtentry *rt;
  745. struct sockaddr *sa;
  746. {
  747. register struct ifaddr *ifa;
  748. struct sockaddr *dst;
  749. struct ifnet *ifp;
  751. if (cmd != RTM_ADD || ((ifa = rt->rt_ifa) == 0) ||
  752.     ((ifp = ifa->ifa_ifp) == 0) || ((dst = rt_key(rt)) == 0))
  753.          {
  754. /* XXX - This event does not occur because this routine is never called
  755.  *       by the existing network stack. It is always replaced with the
  756.  *       arp_rtrequest routine for all Ethernet devices. 
  758. #ifdef WV_INSTRUMENTATION
  759. #ifdef INCLUDE_WVNET    /@ WV_NET_WARNING event @/
  760.     WV_NET_MARKER_0 (NET_AUX_EVENT, WV_NET_WARNING, 0, 5,
  761.                      WV_NETEVENT_LINKRTREQ_FAIL)
  762. #endif  /@ INCLUDE_WVNET @/
  763. #endif
  765.   * XXX - end of unused event
  766.   */
  767. return;
  768.         }
  770. if ((ifa = ifaof_ifpforaddr(dst, ifp))) {
  771. IFAFREE(rt->rt_ifa);
  772. rt->rt_ifa = ifa;
  773. ifa->ifa_refcnt++;
  774. if (ifa->ifa_rtrequest && ifa->ifa_rtrequest != link_rtrequest)
  775. ifa->ifa_rtrequest(cmd, rt, sa);
  776. }
  777. }
  779. /*
  780.  * Mark an interface down and notify protocols of
  781.  * the transition.
  782.  * NOTE: must be called at splnet or eqivalent.
  783.  */
  784. void
  785. if_down(ifp)
  786. register struct ifnet *ifp;
  787. {
  788. register struct ifaddr *ifa;
  790. #ifdef WV_INSTRUMENTATION
  791. #ifdef INCLUDE_WVNET    /* WV_NET_VERBOSE event */
  792.     WV_NET_MARKER_1 (NET_AUX_EVENT, WV_NET_VERBOSE, 4, 12,
  793.                      WV_NETEVENT_IFDOWN_START, ifp)
  795. #endif  /* INCLUDE_WVNET */
  796. #endif
  798. ifp->if_flags &= ~IFF_UP;
  799. for (ifa = ifp->if_addrlist; ifa; ifa = ifa->ifa_next)
  800. pfctlinput(PRC_IFDOWN, ifa->ifa_addr);
  801. if_qflush(&ifp->if_snd);
  803.         if (rtIfaceMsgHook) 
  804.             (*rtIfaceMsgHook) (ifp);
  805. }
  807. /*
  808.  * Mark an interface up and notify protocols of
  809.  * the transition.
  810.  * NOTE: must be called at splnet or equivalent.
  811.  */
  812. void
  813. if_up(ifp)
  814. register struct ifnet *ifp;
  815. {
  817. #ifdef WV_INSTRUMENTATION
  818. #ifdef INCLUDE_WVNET    /* WV_NET_VERBOSE event */
  819.     WV_NET_MARKER_1 (NET_AUX_EVENT, WV_NET_VERBOSE, 5, 13,
  820.                      WV_NETEVENT_IFUP_START, ifp)
  821. #endif  /* INCLUDE_WVNET */
  822. #endif
  823. ifp->if_flags |= IFF_UP;
  824. #ifdef notyet
  825.         {
  826. register struct ifaddr *ifa;
  827. /* this has no effect on IP, and will kill all ISO connections XXX */
  828. for (ifa = ifp->if_addrlist; ifa; ifa = ifa->ifa_next)
  829. pfctlinput(PRC_IFUP, ifa->ifa_addr);
  830.         }
  831. #endif
  832.         if (rtIfaceMsgHook) 
  833.             (*rtIfaceMsgHook) (ifp);
  834. }
  836. /*
  837.  * Flush an interface queue.
  838.  */
  839. void
  840. if_qflush(ifq)
  841. register struct ifqueue *ifq;
  842. {
  843. register struct mbuf *m, *n;
  845. n = ifq->ifq_head;
  846. while ((m = n)) {
  847. n = m->m_act;
  848. m_freem(m);
  849. }
  850. ifq->ifq_head = 0;
  851. ifq->ifq_tail = 0;
  852. ifq->ifq_len = 0;
  853. }
  855. void if_slowtimoRestart
  856.     (
  857.     int stackNum
  858.     )
  859.     {
  860.     netJobAdd ((FUNCPTR)if_slowtimo, stackNum, 0, 0, 0, 0);
  861.     }
  863. /*
  864.  * Handle interface watchdog timer routines.  Called
  865.  * from softclock, we decrement timers (if set) and
  866.  * call the appropriate interface routine on expiration.
  867.  */
  868. void if_slowtimo
  869.     (
  870. #ifdef VIRTUAL_STACK
  871.     int stackNum
  872. #endif /* VIRTUAL_STACK */    
  873.     )
  874.     {
  875.     register struct ifnet *ifp;
  876.     int s;
  878. #ifdef VIRTUAL_STACK
  879.     virtualStackNumTaskIdSet(stackNum);
  880. #endif
  882.     s = splnet();
  884. #ifdef VIRTUAL_STACK
  885.     if (_ifnet != NULL)
  886. #else
  887.     if (ifnet != NULL)
  888. #endif
  889.         {
  890. #ifdef VIRTUAL_STACK
  891.         for (ifp = _ifnet; ifp; ifp = ifp->if_next)
  892. #else
  893.         for (ifp = ifnet; ifp; ifp = ifp->if_next)
  894. #endif
  895.             {
  896.             if (ifp->if_timer == 0 || --ifp->if_timer)
  897.                 continue;
  898.             if (ifp->if_watchdog)
  899.                 {
  900. #ifdef WV_INSTRUMENTATION
  901. #ifdef INCLUDE_WVNET    /* WV_NET_INFO event */
  902.     WV_NET_MARKER_1 (NET_AUX_EVENT, WV_NET_INFO, 0, 6,
  903.                      WV_NETEVENT_IFWATCHDOG, ifp)
  904. #endif  /* INCLUDE_WVNET */
  905. #endif
  906.                 (*ifp->if_watchdog)(ifp->if_unit);
  907.                 }
  908.             }
  909.         }
  911.     splx (s);
  913.     /* XXX using watchdogs good idea? calculate clock rate once only -gae */
  914.     wdStart (ifslowtimoWd, sysClkRateGet()/IFNET_SLOWHZ,
  915. #ifdef VIRTUAL_STACK
  916.     (FUNCPTR) if_slowtimoRestart, (int) stackNum);
  917. #else
  918.     (FUNCPTR) netJobAdd, (int) if_slowtimo);
  919. #endif
  920.     }
  922. /* ifunit () has been moved to ifLib.c */
  924. /*
  925.  * Interface ioctls.
  926.  */
  927. int
  928. ifioctl(so, cmd, data)
  929. struct socket *so;
  930. u_long cmd;
  931. caddr_t data;
  932. {
  933. register struct ifnet *ifp;
  934. register struct ifreq *ifr;
  936. #ifdef WV_INSTRUMENTATION
  937. #ifdef INCLUDE_WVNET    /* WV_NET_INFO event */
  938.     WV_NET_MARKER_2 (NET_AUX_EVENT, WV_NET_INFO, 1, 7,
  939.                      WV_NETEVENT_IFIOCTL_START, so->so_fd, cmd)
  940. #endif  /* INCLUDE_WVNET */
  941. #endif
  943. switch (cmd) {
  945. case SIOCGIFCONF:
  946. case OSIOCGIFCONF:
  947. return (ifconf(cmd, data));
  948. #ifdef INET
  949. case SIOCSARP:
  950. case SIOCDARP:
  951. /* FALL THROUGH */
  952. case SIOCGARP:
  953. return (arpioctl(cmd, data));
  954. #endif /* INET */
  955. }
  956. ifr = (struct ifreq *)data;
  957. ifp = ifunit(ifr->ifr_name);
  958. if (ifp == 0)
  959.         {
  960. #ifdef WV_INSTRUMENTATION
  961. #ifdef INCLUDE_WVNET    /* WV_NET_ERROR event */
  962.         WV_NET_MARKER_2 (NET_AUX_EVENT, WV_NET_ERROR, 0, 3,
  963.                          WV_NETEVENT_IFIOCTL_BADIFNAME, so->so_fd, cmd)
  964. #endif  /* INCLUDE_WVNET */
  965. #endif
  967. return (ENXIO);
  968.         }
  969. switch (cmd) {
  971. case SIOCGIFFLAGS:
  972. ifr->ifr_flags = ifp->if_flags;
  973. break;
  975. case SIOCGIFMETRIC:
  976. ifr->ifr_metric = ifp->if_metric;
  977. break;
  979. case SIOCSIFASYNCFLAGS:
  980. /*
  981.  * we got a asynchronous flag change report from the interface;
  982.  */
  983. /* FALL THROUGH */
  985. case SIOCSIFFLAGS:
  986. if (ifp->if_flags & IFF_UP && (ifr->ifr_flags & IFF_UP) == 0) {
  987. int s = splimp();
  988. if_down(ifp);
  989. splx(s);
  990.                         if (_m2SetIfLastChange)
  991.                             _m2SetIfLastChange(ifp->if_index);
  992. }
  993. if (ifr->ifr_flags & IFF_UP && (ifp->if_flags & IFF_UP) == 0) {
  994. int s = splimp();
  995. if_up(ifp);
  996. splx(s);
  997.                         if (_m2SetIfLastChange)
  998.                             _m2SetIfLastChange(ifp->if_index);
  999. }
  1000. ifp->if_flags = (ifp->if_flags & IFF_CANTCHANGE) |
  1001. (ifr->ifr_flags &~ IFF_CANTCHANGE);
  1002. ifr->ifr_flags = ifp->if_flags;
  1004. /* command the interface only if we are initiating the change */
  1006. if ((cmd == SIOCSIFFLAGS) &&  ifp->if_ioctl)
  1007. (void) (*ifp->if_ioctl)(ifp, cmd, data);
  1008. break;
  1010. case SIOCSIFMETRIC:
  1011. ifp->if_metric = ifr->ifr_metric;
  1012. break;
  1014. case SIOCADDMULTI:
  1015. case SIOCDELMULTI:
  1016. if (ifp->if_ioctl == 0)
  1017. return (EOPNOTSUPP);
  1018. return ((*ifp->if_ioctl)(ifp, cmd, data));
  1020. default:
  1021. if (so->so_proto == 0)
  1022.                 {
  1023. #ifdef WV_INSTRUMENTATION
  1024. #ifdef INCLUDE_WVNET    /* WV_NET_ERROR event */
  1025.         WV_NET_MARKER_2 (NET_AUX_EVENT, WV_NET_ERROR, 1, 4,
  1026.                          WV_NETEVENT_IFIOCTL_NOPROTO, so->so_fd, cmd)
  1027. #endif  /* INCLUDE_WVNET */
  1028. #endif
  1030. return (EOPNOTSUPP);
  1031.                 }
  1033. #ifndef COMPAT_43
  1034. return ((*so->so_proto->pr_usrreq)(so, PRU_CONTROL,
  1035. cmd, data, ifp));
  1036. #else
  1037.     {
  1038.                 int error = 0;
  1039. int ocmd = cmd;
  1041. switch (cmd) {
  1043. case SIOCSIFDSTADDR:
  1044. case SIOCSIFADDR:
  1045. case SIOCSIFBRDADDR:
  1046. case SIOCSIFNETMASK:
  1047. #if _BYTE_ORDER != _BIG_ENDIAN
  1048. if (ifr->ifr_addr.sa_family == 0 &&
  1049.     ifr->ifr_addr.sa_len < 16) {
  1050. ifr->ifr_addr.sa_family = ifr->ifr_addr.sa_len;
  1051. ifr->ifr_addr.sa_len = 16;
  1052. }
  1053. #else
  1054. if (ifr->ifr_addr.sa_len == 0)
  1055. ifr->ifr_addr.sa_len = 16;
  1056. #endif
  1057. break;
  1059. case OSIOCGIFADDR:
  1060. cmd = SIOCGIFADDR;
  1061. break;
  1063. case OSIOCGIFDSTADDR:
  1064. cmd = SIOCGIFDSTADDR;
  1065. break;
  1067. case OSIOCGIFBRDADDR:
  1068. cmd = SIOCGIFBRDADDR;
  1069. break;
  1071. case OSIOCGIFNETMASK:
  1072. cmd = SIOCGIFNETMASK;
  1073. }
  1074. error =  ((*so->so_proto->pr_usrreq)(so, PRU_CONTROL,
  1075.     cmd, data, ifp));
  1076. switch (ocmd) {
  1078. case OSIOCGIFADDR:
  1079. case OSIOCGIFDSTADDR:
  1080. case OSIOCGIFBRDADDR:
  1081. case OSIOCGIFNETMASK:
  1082. *(u_short *)&ifr->ifr_addr = ifr->ifr_addr.sa_family;
  1083. }
  1084. return (error);
  1086.     }
  1087. #endif
  1088. }
  1089. return (0);
  1090. }
  1092. /*
  1093.  * Return interface configuration
  1094.  * of system.  List may be used
  1095.  * in later ioctl's (above) to get
  1096.  * other information.
  1097.  */
  1098. /*ARGSUSED*/
  1099. int
  1100. ifconf(cmd, data)
  1101. int cmd;
  1102. caddr_t data;
  1103. {
  1104. register struct ifconf *ifc = (struct ifconf *)data;
  1105. #ifdef VIRTUAL_STACK
  1106. register struct ifnet *ifp = _ifnet;
  1107. #else
  1108. register struct ifnet *ifp = ifnet;
  1109. #endif
  1110. register struct ifaddr *ifa;
  1111. register char *cp, *ep;
  1112. struct ifreq ifr, *ifrp;
  1113. int space = ifc->ifc_len, error = 0;
  1114. char workbuf[12], *unitname;
  1116. ifrp = ifc->ifc_req;
  1117. ep = ifr.ifr_name + sizeof (ifr.ifr_name) - 2;
  1118. for (; space > sizeof (ifr) && ifp; ifp = ifp->if_next) {
  1119. strncpy(ifr.ifr_name, ifp->if_name, sizeof(ifr.ifr_name) - 2);
  1120. for (cp = ifr.ifr_name; cp < ep && *cp; cp++)
  1121. continue;
  1122. unitname = sprint_d ((u_int)ifp->if_unit, workbuf,
  1123.      sizeof(workbuf));
  1124. for (; cp <= ep && *unitname != ''; *cp++ = *unitname++);
  1125. if (*unitname != '') {
  1126. error = ENAMETOOLONG;
  1127. break;
  1128. }
  1129. *cp = '';
  1130. if ((ifa = ifp->if_addrlist) == 0) {
  1131. bzero((caddr_t)&ifr.ifr_addr, sizeof(ifr.ifr_addr));
  1132. error = copyout((caddr_t)&ifr, (caddr_t)ifrp,
  1133.     sizeof(ifr));
  1134. if (error)
  1135. break;
  1136. space -= sizeof (ifr), ifrp++;
  1137. } else 
  1138.     for ( ; space > sizeof (ifr) && ifa; ifa = ifa->ifa_next) {
  1139. register struct sockaddr *sa = ifa->ifa_addr;
  1140. #ifdef COMPAT_43
  1141. if (cmd == OSIOCGIFCONF) {
  1142. struct osockaddr *osa =
  1143.  (struct osockaddr *)&ifr.ifr_addr;
  1144. ifr.ifr_addr = *sa;
  1145. osa->sa_family = sa->sa_family;
  1146. error = copyout((caddr_t)&ifr, (caddr_t)ifrp,
  1147. sizeof (ifr));
  1148. ifrp++;
  1149. } else
  1150. #endif
  1151. if (sa->sa_len <= sizeof(*sa)) {
  1152. ifr.ifr_addr = *sa;
  1153. error = copyout((caddr_t)&ifr, (caddr_t)ifrp,
  1154. sizeof (ifr));
  1155. ifrp++;
  1156. } else {
  1157. space -= sa->sa_len - sizeof(*sa);
  1158. if (space < sizeof (ifr))
  1159. break;
  1160. error = copyout((caddr_t)&ifr, (caddr_t)ifrp,
  1161. sizeof (ifr.ifr_name));
  1162. if (error == 0)
  1163.     error = copyout((caddr_t)sa,
  1164.       (caddr_t)&ifrp->ifr_addr, sa->sa_len);
  1165. ifrp = (struct ifreq *)
  1166. (sa->sa_len + (caddr_t)&ifrp->ifr_addr);
  1167. }
  1168. if (error)
  1169. break;
  1170. space -= sizeof (ifr);
  1171. }
  1172. }
  1173. ifc->ifc_len -= space;
  1174. return (error);
  1175. }
  1177. /*
  1178.  * Set/clear promiscuous mode on interface ifp based on the truth value
  1179.  * of pswitch.  The calls are reference counted so that only the first
  1180.  * "on" request actually has an effect, as does the final "off" request.
  1181.  * Results are undefined if the "off" and "on" requests are not matched.
  1182.  */
  1183. int
  1184. ifpromisc(ifp, pswitch)
  1185. struct ifnet *ifp;
  1186. int pswitch;
  1187. {
  1188. struct ifreq ifr;
  1190. #ifdef WV_INSTRUMENTATION
  1191. #ifdef INCLUDE_WVNET    /* WV_NET_VERBOSE event */
  1192.     WV_NET_MARKER_2 (NET_AUX_EVENT, WV_NET_VERBOSE, 6, 14,
  1193.                      WV_NETEVENT_IFPROMISC_START, ifp, pswitch)
  1194. #endif  /* INCLUDE_WVNET */
  1195. #endif
  1197. /*
  1198.  * If the device is not configured up, we cannot put it in
  1199.  * promiscuous mode.
  1200.  */
  1201. if ((ifp->if_flags & IFF_UP) == 0)
  1202.         {
  1203. #ifdef WV_INSTRUMENTATION
  1204. #ifdef INCLUDE_WVNET    /* WV_NET_CRITICAL event */
  1205.     WV_NET_MARKER_2 (NET_AUX_EVENT, WV_NET_CRITICAL, 0, 2,
  1206.                      WV_NETEVENT_IFPROMISC_FAIL, ifp, pswitch)
  1207. #endif  /* INCLUDE_WVNET */
  1208. #endif
  1210. return (ENETDOWN);
  1211.         }
  1213. if (pswitch) {
  1214. if (ifp->if_pcount++ != 0)
  1215. return (0);
  1216. ifp->if_flags |= IFF_PROMISC;
  1217. } else {
  1218. if (--ifp->if_pcount > 0)
  1219. return (0);
  1220. ifp->if_flags &= ~IFF_PROMISC;
  1221. }
  1222. ifr.ifr_flags = ifp->if_flags;
  1223. return ((*ifp->if_ioctl)(ifp, SIOCSIFFLAGS, (caddr_t)&ifr));
  1224. }
  1226. static char *
  1227. sprint_d(n, buf, buflen)
  1228. u_int n;
  1229. char *buf;
  1230. int buflen;
  1231. {
  1232. register char *cp = buf + buflen - 1;
  1234. *cp = 0;
  1235. do {
  1236. cp--;
  1237. *cp = "0123456789"[n % 10];
  1238. n /= 10;
  1239. } while (n != 0);
  1240. return (cp);
  1241. }
  1244. /******************************************************************************
  1245. *
  1246. * ifMultiDelete - deletes multicast membership based on interface
  1247. *
  1248. * This routine takes an interface and deletes multicast group membership on
  1249. * all sockets for the groups using the specified interface.
  1250. *
  1251. * RETURNS: N/A
  1252. *
  1253. * NOMANUAL
  1254. *
  1255. */
  1257. void ifMultiDelete
  1258.     (
  1259.     struct ifnet *pIf
  1260.     )
  1261.     {
  1262.     struct inpcb       *pInpcb;
  1263.     struct mBlk        **ppMblk;
  1264.     struct mBlk        *pInm;
  1265.     struct in_multi    *inm;
  1266.     struct ip_moptions *pImo;
  1268.     /* Search all open UDP sockets */
  1270.     for (pInpcb = udb.lh_first; pInpcb != NULL; 
  1271.  pInpcb = pInpcb->inp_list.le_next)
  1272.         {
  1273. pImo = pInpcb->inp_moptions;
  1275.         /* No multicast memberships on this socket. */
  1277. if ((pImo == NULL) || (pImo->imo_num_memberships == 0))
  1278.     continue;
  1280. ppMblk = &pImo->pInmMblk;
  1282.         /* Search list of multicast memberships on this socket */
  1284. while (*ppMblk)
  1285.     {
  1286.     inm = mtod (*ppMblk, struct in_multi *);
  1287.     if (inm->inm_ifp == pIf)
  1288. {
  1289. pInm = *ppMblk;
  1291. *ppMblk = (*ppMblk)->mBlkHdr.mNext;  /* delete from list */
  1292.         in_delmulti (pInm, pInpcb);
  1293. pImo->imo_num_memberships--;
  1295. continue;
  1296. }
  1297.     ppMblk = &(*ppMblk)->mBlkHdr.mNext;
  1298.     }
  1300. /* If all options have default values, no need to keep ip_moptions. */
  1302.         if (pImo->imo_num_memberships == 0 &&
  1303.     pImo->imo_multicast_ifp == NULL &&
  1304.     pImo->imo_multicast_ttl == IP_DEFAULT_MULTICAST_TTL &&
  1305.     pImo->imo_multicast_loop == IP_DEFAULT_MULTICAST_LOOP)
  1306.     {
  1307.     FREE (pImo, MT_IPMOPTS);
  1308.     pInpcb->inp_moptions = NULL;
  1309.     }
  1310. }
  1312.     return;
  1313.     }