Home | History | Annotate | Line # | Download | only in netinet
in.c revision 1.147
      1  1.147       rtr /*	$NetBSD: in.c,v 1.147 2014/07/01 05:49:18 rtr Exp $	*/
      2   1.48    itojun 
      3   1.48    itojun /*
      4   1.48    itojun  * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
      5   1.48    itojun  * All rights reserved.
      6   1.77    itojun  *
      7   1.48    itojun  * Redistribution and use in source and binary forms, with or without
      8   1.48    itojun  * modification, are permitted provided that the following conditions
      9   1.48    itojun  * are met:
     10   1.48    itojun  * 1. Redistributions of source code must retain the above copyright
     11   1.48    itojun  *    notice, this list of conditions and the following disclaimer.
     12   1.48    itojun  * 2. Redistributions in binary form must reproduce the above copyright
     13   1.48    itojun  *    notice, this list of conditions and the following disclaimer in the
     14   1.48    itojun  *    documentation and/or other materials provided with the distribution.
     15   1.48    itojun  * 3. Neither the name of the project nor the names of its contributors
     16   1.48    itojun  *    may be used to endorse or promote products derived from this software
     17   1.48    itojun  *    without specific prior written permission.
     18   1.77    itojun  *
     19   1.48    itojun  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
     20   1.48    itojun  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21   1.48    itojun  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22   1.48    itojun  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
     23   1.48    itojun  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24   1.48    itojun  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25   1.48    itojun  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26   1.48    itojun  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27   1.48    itojun  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28   1.48    itojun  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29   1.48    itojun  * SUCH DAMAGE.
     30   1.48    itojun  */
     31   1.14       cgd 
     32   1.46   thorpej /*-
     33   1.46   thorpej  * Copyright (c) 1998 The NetBSD Foundation, Inc.
     34   1.46   thorpej  * All rights reserved.
     35   1.46   thorpej  *
     36   1.46   thorpej  * This code is derived from software contributed to The NetBSD Foundation
     37   1.46   thorpej  * by Public Access Networks Corporation ("Panix").  It was developed under
     38   1.46   thorpej  * contract to Panix by Eric Haszlakiewicz and Thor Lancelot Simon.
     39   1.46   thorpej  *
     40   1.46   thorpej  * Redistribution and use in source and binary forms, with or without
     41   1.46   thorpej  * modification, are permitted provided that the following conditions
     42   1.46   thorpej  * are met:
     43   1.46   thorpej  * 1. Redistributions of source code must retain the above copyright
     44   1.46   thorpej  *    notice, this list of conditions and the following disclaimer.
     45   1.46   thorpej  * 2. Redistributions in binary form must reproduce the above copyright
     46   1.46   thorpej  *    notice, this list of conditions and the following disclaimer in the
     47   1.46   thorpej  *    documentation and/or other materials provided with the distribution.
     48   1.46   thorpej  *
     49   1.46   thorpej  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     50   1.46   thorpej  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     51   1.46   thorpej  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     52   1.46   thorpej  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     53   1.46   thorpej  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     54   1.46   thorpej  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     55   1.46   thorpej  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     56   1.46   thorpej  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     57   1.46   thorpej  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     58   1.46   thorpej  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     59   1.46   thorpej  * POSSIBILITY OF SUCH DAMAGE.
     60   1.46   thorpej  */
     61   1.46   thorpej 
     62    1.1       cgd /*
     63   1.12   mycroft  * Copyright (c) 1982, 1986, 1991, 1993
     64   1.12   mycroft  *	The Regents of the University of California.  All rights reserved.
     65    1.1       cgd  *
     66    1.1       cgd  * Redistribution and use in source and binary forms, with or without
     67    1.1       cgd  * modification, are permitted provided that the following conditions
     68    1.1       cgd  * are met:
     69    1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     70    1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     71    1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     72    1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     73    1.1       cgd  *    documentation and/or other materials provided with the distribution.
     74   1.90       agc  * 3. Neither the name of the University nor the names of its contributors
     75    1.1       cgd  *    may be used to endorse or promote products derived from this software
     76    1.1       cgd  *    without specific prior written permission.
     77    1.1       cgd  *
     78    1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     79    1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     80    1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     81    1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     82    1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     83    1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     84    1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     85    1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     86    1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     87    1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     88    1.1       cgd  * SUCH DAMAGE.
     89    1.1       cgd  *
     90   1.36   thorpej  *	@(#)in.c	8.4 (Berkeley) 1/9/95
     91    1.1       cgd  */
     92   1.71     lukem 
     93   1.71     lukem #include <sys/cdefs.h>
     94  1.147       rtr __KERNEL_RCSID(0, "$NetBSD: in.c,v 1.147 2014/07/01 05:49:18 rtr Exp $");
     95   1.37    scottr 
     96   1.41  jonathan #include "opt_inet.h"
     97   1.47  sommerfe #include "opt_inet_conf.h"
     98   1.37    scottr #include "opt_mrouting.h"
     99    1.1       cgd 
    100    1.6   mycroft #include <sys/param.h>
    101    1.6   mycroft #include <sys/ioctl.h>
    102   1.12   mycroft #include <sys/errno.h>
    103   1.12   mycroft #include <sys/malloc.h>
    104    1.6   mycroft #include <sys/socket.h>
    105    1.6   mycroft #include <sys/socketvar.h>
    106  1.114    dyoung #include <sys/sysctl.h>
    107   1.26  christos #include <sys/systm.h>
    108   1.27   mycroft #include <sys/proc.h>
    109   1.72  christos #include <sys/syslog.h>
    110  1.108      elad #include <sys/kauth.h>
    111    1.6   mycroft 
    112  1.141       tls #include <sys/cprng.h>
    113  1.141       tls 
    114    1.6   mycroft #include <net/if.h>
    115    1.6   mycroft #include <net/route.h>
    116  1.144     rmind #include <net/pfil.h>
    117    1.6   mycroft 
    118   1.34        is #include <net/if_ether.h>
    119   1.34        is 
    120   1.12   mycroft #include <netinet/in_systm.h>
    121    1.6   mycroft #include <netinet/in.h>
    122    1.6   mycroft #include <netinet/in_var.h>
    123   1.84      matt #include <netinet/ip.h>
    124   1.84      matt #include <netinet/ip_var.h>
    125  1.114    dyoung #include <netinet/in_ifattach.h>
    126   1.84      matt #include <netinet/in_pcb.h>
    127   1.34        is #include <netinet/if_inarp.h>
    128   1.19   mycroft #include <netinet/ip_mroute.h>
    129   1.26  christos #include <netinet/igmp_var.h>
    130   1.13    chopps 
    131  1.114    dyoung #ifdef IPSELSRC
    132  1.114    dyoung #include <netinet/in_selsrc.h>
    133  1.114    dyoung #endif
    134  1.114    dyoung 
    135  1.145     rmind static u_int	in_mask2len(struct in_addr *);
    136  1.145     rmind static void	in_len2mask(struct in_addr *, u_int);
    137  1.145     rmind static int	in_lifaddr_ioctl(struct socket *, u_long, void *,
    138  1.147       rtr 	struct ifnet *);
    139   1.48    itojun 
    140  1.145     rmind static int	in_addprefix(struct in_ifaddr *, int);
    141  1.145     rmind static int	in_scrubprefix(struct in_ifaddr *);
    142  1.145     rmind static void	in_sysctl_init(struct sysctllog **);
    143   1.67    itojun 
    144    1.1       cgd #ifndef SUBNETSARELOCAL
    145    1.1       cgd #define	SUBNETSARELOCAL	1
    146    1.1       cgd #endif
    147   1.47  sommerfe 
    148   1.47  sommerfe #ifndef HOSTZEROBROADCAST
    149   1.47  sommerfe #define HOSTZEROBROADCAST 1
    150   1.47  sommerfe #endif
    151   1.47  sommerfe 
    152  1.146     rmind /* Note: 61, 127, 251, 509, 1021, 2039 are good. */
    153  1.146     rmind #ifndef IN_MULTI_HASH_SIZE
    154  1.146     rmind #define IN_MULTI_HASH_SIZE	509
    155  1.146     rmind #endif
    156  1.146     rmind 
    157  1.145     rmind static int			subnetsarelocal = SUBNETSARELOCAL;
    158  1.145     rmind static int			hostzeroisbroadcast = HOSTZEROBROADCAST;
    159   1.30       mrg 
    160    1.1       cgd /*
    161   1.65     enami  * This list is used to keep track of in_multi chains which belong to
    162   1.65     enami  * deleted interface addresses.  We use in_ifaddr so that a chain head
    163   1.65     enami  * won't be deallocated until all multicast address record are deleted.
    164   1.64    itojun  */
    165  1.146     rmind 
    166  1.146     rmind LIST_HEAD(in_multihashhead, in_multi);		/* Type of the hash head */
    167  1.145     rmind 
    168  1.145     rmind static struct pool		inmulti_pool;
    169  1.145     rmind static u_int			in_multientries;
    170  1.146     rmind static struct in_multihashhead *in_multihashtbl;
    171  1.146     rmind static u_long			in_multihash;
    172  1.146     rmind static krwlock_t		in_multilock;
    173  1.146     rmind 
    174  1.146     rmind #define IN_MULTI_HASH(x, ifp) \
    175  1.146     rmind     (in_multihashtbl[(u_long)((x) ^ (ifp->if_index)) % IN_MULTI_HASH_SIZE])
    176  1.145     rmind 
    177  1.145     rmind struct in_ifaddrhashhead *	in_ifaddrhashtbl;
    178  1.145     rmind u_long				in_ifaddrhash;
    179  1.145     rmind struct in_ifaddrhead		in_ifaddrhead;
    180  1.145     rmind 
    181  1.145     rmind void
    182  1.145     rmind in_init(void)
    183  1.145     rmind {
    184  1.145     rmind 	pool_init(&inmulti_pool, sizeof(struct in_multi), 0, 0, 0, "inmltpl",
    185  1.145     rmind 	    NULL, IPL_SOFTNET);
    186  1.145     rmind 	TAILQ_INIT(&in_ifaddrhead);
    187  1.145     rmind 
    188  1.145     rmind 	in_ifaddrhashtbl = hashinit(IN_IFADDR_HASH_SIZE, HASH_LIST, true,
    189  1.145     rmind 	    &in_ifaddrhash);
    190  1.145     rmind 	in_multihashtbl = hashinit(IN_IFADDR_HASH_SIZE, HASH_LIST, true,
    191  1.145     rmind 	    &in_multihash);
    192  1.146     rmind 	rw_init(&in_multilock);
    193  1.145     rmind 
    194  1.145     rmind 	in_sysctl_init(NULL);
    195  1.145     rmind }
    196   1.64    itojun 
    197   1.64    itojun /*
    198    1.1       cgd  * Return 1 if an internet address is for a ``local'' host
    199    1.1       cgd  * (one to which we have a connection).  If subnetsarelocal
    200    1.1       cgd  * is true, this includes other subnets of the local net.
    201    1.1       cgd  * Otherwise, it includes only the directly-connected (sub)nets.
    202    1.1       cgd  */
    203    1.8   mycroft int
    204  1.103     perry in_localaddr(struct in_addr in)
    205    1.1       cgd {
    206   1.59  augustss 	struct in_ifaddr *ia;
    207    1.1       cgd 
    208    1.1       cgd 	if (subnetsarelocal) {
    209   1.93  jonathan 		TAILQ_FOREACH(ia, &in_ifaddrhead, ia_list)
    210   1.20   mycroft 			if ((in.s_addr & ia->ia_netmask) == ia->ia_net)
    211    1.1       cgd 				return (1);
    212    1.1       cgd 	} else {
    213   1.93  jonathan 		TAILQ_FOREACH(ia, &in_ifaddrhead, ia_list)
    214   1.20   mycroft 			if ((in.s_addr & ia->ia_subnetmask) == ia->ia_subnet)
    215    1.1       cgd 				return (1);
    216    1.1       cgd 	}
    217    1.1       cgd 	return (0);
    218    1.1       cgd }
    219    1.1       cgd 
    220    1.1       cgd /*
    221    1.1       cgd  * Determine whether an IP address is in a reserved set of addresses
    222    1.1       cgd  * that may not be forwarded, or whether datagrams to that destination
    223    1.1       cgd  * may be forwarded.
    224    1.1       cgd  */
    225    1.8   mycroft int
    226  1.103     perry in_canforward(struct in_addr in)
    227    1.1       cgd {
    228   1.59  augustss 	u_int32_t net;
    229    1.1       cgd 
    230   1.20   mycroft 	if (IN_EXPERIMENTAL(in.s_addr) || IN_MULTICAST(in.s_addr))
    231    1.1       cgd 		return (0);
    232   1.20   mycroft 	if (IN_CLASSA(in.s_addr)) {
    233   1.20   mycroft 		net = in.s_addr & IN_CLASSA_NET;
    234   1.20   mycroft 		if (net == 0 || net == htonl(IN_LOOPBACKNET << IN_CLASSA_NSHIFT))
    235    1.1       cgd 			return (0);
    236    1.1       cgd 	}
    237    1.1       cgd 	return (1);
    238    1.1       cgd }
    239    1.1       cgd 
    240   1.12   mycroft /*
    241   1.12   mycroft  * Trim a mask in a sockaddr
    242   1.12   mycroft  */
    243   1.12   mycroft void
    244  1.103     perry in_socktrim(struct sockaddr_in *ap)
    245   1.12   mycroft {
    246   1.59  augustss 	char *cplim = (char *) &ap->sin_addr;
    247   1.59  augustss 	char *cp = (char *) (&ap->sin_addr + 1);
    248   1.12   mycroft 
    249   1.12   mycroft 	ap->sin_len = 0;
    250   1.15   mycroft 	while (--cp >= cplim)
    251   1.12   mycroft 		if (*cp) {
    252   1.12   mycroft 			(ap)->sin_len = cp - (char *) (ap) + 1;
    253   1.12   mycroft 			break;
    254   1.12   mycroft 		}
    255   1.40      matt }
    256   1.40      matt 
    257   1.40      matt /*
    258   1.40      matt  *  Routine to take an Internet address and convert into a
    259   1.40      matt  *  "dotted quad" representation for printing.
    260   1.40      matt  */
    261   1.40      matt const char *
    262  1.103     perry in_fmtaddr(struct in_addr addr)
    263   1.40      matt {
    264   1.40      matt 	static char buf[sizeof("123.456.789.123")];
    265   1.40      matt 
    266   1.40      matt 	addr.s_addr = ntohl(addr.s_addr);
    267   1.40      matt 
    268   1.94    itojun 	snprintf(buf, sizeof(buf), "%d.%d.%d.%d",
    269   1.40      matt 		(addr.s_addr >> 24) & 0xFF,
    270   1.40      matt 		(addr.s_addr >> 16) & 0xFF,
    271   1.40      matt 		(addr.s_addr >>  8) & 0xFF,
    272   1.40      matt 		(addr.s_addr >>  0) & 0xFF);
    273   1.40      matt 	return buf;
    274   1.12   mycroft }
    275   1.12   mycroft 
    276   1.35   thorpej /*
    277   1.35   thorpej  * Maintain the "in_maxmtu" variable, which is the largest
    278   1.35   thorpej  * mtu for non-local interfaces with AF_INET addresses assigned
    279   1.35   thorpej  * to them that are up.
    280   1.35   thorpej  */
    281   1.35   thorpej unsigned long in_maxmtu;
    282   1.35   thorpej 
    283   1.35   thorpej void
    284  1.103     perry in_setmaxmtu(void)
    285   1.35   thorpej {
    286   1.59  augustss 	struct in_ifaddr *ia;
    287   1.59  augustss 	struct ifnet *ifp;
    288   1.35   thorpej 	unsigned long maxmtu = 0;
    289   1.35   thorpej 
    290   1.93  jonathan 	TAILQ_FOREACH(ia, &in_ifaddrhead, ia_list) {
    291   1.35   thorpej 		if ((ifp = ia->ia_ifp) == 0)
    292   1.35   thorpej 			continue;
    293   1.35   thorpej 		if ((ifp->if_flags & (IFF_UP|IFF_LOOPBACK)) != IFF_UP)
    294   1.35   thorpej 			continue;
    295   1.35   thorpej 		if (ifp->if_mtu > maxmtu)
    296   1.38       tls 			maxmtu = ifp->if_mtu;
    297   1.35   thorpej 	}
    298   1.35   thorpej 	if (maxmtu)
    299   1.35   thorpej 		in_maxmtu = maxmtu;
    300   1.35   thorpej }
    301   1.35   thorpej 
    302   1.82   thorpej static u_int
    303  1.103     perry in_mask2len(struct in_addr *mask)
    304   1.48    itojun {
    305   1.82   thorpej 	u_int x, y;
    306   1.48    itojun 	u_char *p;
    307   1.48    itojun 
    308   1.48    itojun 	p = (u_char *)mask;
    309   1.48    itojun 	for (x = 0; x < sizeof(*mask); x++) {
    310   1.48    itojun 		if (p[x] != 0xff)
    311   1.48    itojun 			break;
    312   1.48    itojun 	}
    313   1.48    itojun 	y = 0;
    314   1.48    itojun 	if (x < sizeof(*mask)) {
    315  1.124    dyoung 		for (y = 0; y < NBBY; y++) {
    316   1.48    itojun 			if ((p[x] & (0x80 >> y)) == 0)
    317   1.48    itojun 				break;
    318   1.48    itojun 		}
    319   1.48    itojun 	}
    320  1.124    dyoung 	return x * NBBY + y;
    321   1.48    itojun }
    322   1.48    itojun 
    323   1.48    itojun static void
    324  1.103     perry in_len2mask(struct in_addr *mask, u_int len)
    325   1.48    itojun {
    326   1.82   thorpej 	u_int i;
    327   1.48    itojun 	u_char *p;
    328   1.48    itojun 
    329   1.48    itojun 	p = (u_char *)mask;
    330  1.132    cegger 	memset(mask, 0, sizeof(*mask));
    331  1.124    dyoung 	for (i = 0; i < len / NBBY; i++)
    332   1.48    itojun 		p[i] = 0xff;
    333  1.124    dyoung 	if (len % NBBY)
    334  1.124    dyoung 		p[i] = (0xff00 >> (len % NBBY)) & 0xff;
    335   1.48    itojun }
    336   1.48    itojun 
    337    1.1       cgd /*
    338    1.1       cgd  * Generic internet control operations (ioctl's).
    339    1.1       cgd  * Ifp is 0 if not an interface-specific ioctl.
    340    1.1       cgd  */
    341    1.1       cgd /* ARGSUSED */
    342    1.8   mycroft int
    343  1.147       rtr in_control(struct socket *so, u_long cmd, void *data, struct ifnet *ifp)
    344    1.1       cgd {
    345   1.59  augustss 	struct ifreq *ifr = (struct ifreq *)data;
    346  1.136    dyoung 	struct in_ifaddr *ia = NULL;
    347    1.1       cgd 	struct in_aliasreq *ifra = (struct in_aliasreq *)data;
    348    1.1       cgd 	struct sockaddr_in oldaddr;
    349    1.1       cgd 	int error, hostIsNew, maskIsNew;
    350  1.100      yamt 	int newifaddr = 0;
    351   1.48    itojun 
    352   1.48    itojun 	switch (cmd) {
    353   1.48    itojun 	case SIOCALIFADDR:
    354   1.48    itojun 	case SIOCDLIFADDR:
    355  1.135    dyoung 	case SIOCGLIFADDR:
    356  1.135    dyoung 		if (ifp == NULL)
    357  1.135    dyoung 			return EINVAL;
    358  1.147       rtr 		return in_lifaddr_ioctl(so, cmd, data, ifp);
    359  1.135    dyoung 	case SIOCGIFADDRPREF:
    360  1.114    dyoung 	case SIOCSIFADDRPREF:
    361  1.117    dyoung 		if (ifp == NULL)
    362   1.48    itojun 			return EINVAL;
    363  1.147       rtr 		return ifaddrpref_ioctl(so, cmd, data, ifp);
    364   1.48    itojun 	}
    365   1.48    itojun 
    366    1.1       cgd 	/*
    367    1.1       cgd 	 * Find address for this interface, if it exists.
    368    1.1       cgd 	 */
    369  1.117    dyoung 	if (ifp != NULL)
    370   1.38       tls 		IFP_TO_IA(ifp, ia);
    371    1.1       cgd 
    372    1.1       cgd 	switch (cmd) {
    373    1.1       cgd 	case SIOCAIFADDR:
    374    1.1       cgd 	case SIOCDIFADDR:
    375   1.43  christos 	case SIOCGIFALIAS:
    376    1.1       cgd 		if (ifra->ifra_addr.sin_family == AF_INET)
    377   1.70      matt 			LIST_FOREACH(ia,
    378   1.70      matt 			    &IN_IFADDR_HASH(ifra->ifra_addr.sin_addr.s_addr),
    379   1.70      matt 			    ia_hash) {
    380  1.117    dyoung 				if (ia->ia_ifp == ifp &&
    381   1.38       tls 				    in_hosteq(ia->ia_addr.sin_addr,
    382   1.38       tls 				    ifra->ifra_addr.sin_addr))
    383   1.28   mycroft 					break;
    384   1.28   mycroft 			}
    385  1.105     seanb 		if ((cmd == SIOCDIFADDR || cmd == SIOCGIFALIAS) && ia == NULL)
    386  1.105     seanb 			return (EADDRNOTAVAIL);
    387  1.105     seanb 
    388  1.105     seanb 		if (cmd == SIOCDIFADDR &&
    389  1.105     seanb 		    ifra->ifra_addr.sin_family == AF_UNSPEC) {
    390  1.105     seanb 			ifra->ifra_addr.sin_family = AF_INET;
    391  1.105     seanb 		}
    392    1.1       cgd 		/* FALLTHROUGH */
    393    1.1       cgd 	case SIOCSIFADDR:
    394   1.52    itojun 	case SIOCSIFDSTADDR:
    395   1.54    itojun 		if (ifra->ifra_addr.sin_family != AF_INET)
    396   1.54    itojun 			return (EAFNOSUPPORT);
    397   1.54    itojun 		/* FALLTHROUGH */
    398    1.1       cgd 	case SIOCSIFNETMASK:
    399  1.117    dyoung 		if (ifp == NULL)
    400   1.44  christos 			panic("in_control");
    401   1.44  christos 
    402   1.44  christos 		if (cmd == SIOCGIFALIAS)
    403   1.44  christos 			break;
    404   1.44  christos 
    405  1.100      yamt 		if (ia == NULL &&
    406  1.100      yamt 		    (cmd == SIOCSIFNETMASK || cmd == SIOCSIFDSTADDR))
    407  1.100      yamt 			return (EADDRNOTAVAIL);
    408  1.100      yamt 
    409  1.147       rtr 		if (kauth_authorize_network(curlwp->l_cred, KAUTH_NETWORK_INTERFACE,
    410  1.113      elad 		    KAUTH_REQ_NETWORK_INTERFACE_SETPRIV, ifp, (void *)cmd,
    411  1.113      elad 		    NULL) != 0)
    412    1.1       cgd 			return (EPERM);
    413    1.1       cgd 
    414  1.136    dyoung 		if (ia == NULL) {
    415  1.129    cegger 			ia = malloc(sizeof(*ia), M_IFADDR, M_WAITOK|M_ZERO);
    416  1.136    dyoung 			if (ia == NULL)
    417    1.1       cgd 				return (ENOBUFS);
    418   1.93  jonathan 			TAILQ_INSERT_TAIL(&in_ifaddrhead, ia, ia_list);
    419   1.50   thorpej 			IFAREF(&ia->ia_ifa);
    420  1.122    dyoung 			ifa_insert(ifp, &ia->ia_ifa);
    421   1.21   mycroft 			ia->ia_ifa.ifa_addr = sintosa(&ia->ia_addr);
    422   1.21   mycroft 			ia->ia_ifa.ifa_dstaddr = sintosa(&ia->ia_dstaddr);
    423   1.21   mycroft 			ia->ia_ifa.ifa_netmask = sintosa(&ia->ia_sockmask);
    424  1.114    dyoung #ifdef IPSELSRC
    425  1.114    dyoung 			ia->ia_ifa.ifa_getifa = in_getifa;
    426  1.114    dyoung #else /* IPSELSRC */
    427  1.114    dyoung 			ia->ia_ifa.ifa_getifa = NULL;
    428  1.114    dyoung #endif /* IPSELSRC */
    429    1.1       cgd 			ia->ia_sockmask.sin_len = 8;
    430    1.1       cgd 			if (ifp->if_flags & IFF_BROADCAST) {
    431    1.1       cgd 				ia->ia_broadaddr.sin_len = sizeof(ia->ia_addr);
    432    1.1       cgd 				ia->ia_broadaddr.sin_family = AF_INET;
    433    1.1       cgd 			}
    434    1.1       cgd 			ia->ia_ifp = ifp;
    435  1.141       tls 			ia->ia_idsalt = cprng_fast32() % 65535;
    436   1.24   mycroft 			LIST_INIT(&ia->ia_multiaddrs);
    437  1.100      yamt 			newifaddr = 1;
    438   1.81    simonb 		}
    439    1.1       cgd 		break;
    440    1.1       cgd 
    441    1.1       cgd 	case SIOCSIFBRDADDR:
    442  1.147       rtr 		if (kauth_authorize_network(curlwp->l_cred, KAUTH_NETWORK_INTERFACE,
    443  1.113      elad 		    KAUTH_REQ_NETWORK_INTERFACE_SETPRIV, ifp, (void *)cmd,
    444  1.113      elad 		    NULL) != 0)
    445    1.1       cgd 			return (EPERM);
    446    1.1       cgd 		/* FALLTHROUGH */
    447    1.1       cgd 
    448    1.1       cgd 	case SIOCGIFADDR:
    449    1.1       cgd 	case SIOCGIFNETMASK:
    450    1.1       cgd 	case SIOCGIFDSTADDR:
    451    1.1       cgd 	case SIOCGIFBRDADDR:
    452  1.136    dyoung 		if (ia == NULL)
    453    1.1       cgd 			return (EADDRNOTAVAIL);
    454    1.1       cgd 		break;
    455    1.1       cgd 	}
    456  1.100      yamt 	error = 0;
    457    1.1       cgd 	switch (cmd) {
    458    1.1       cgd 
    459    1.1       cgd 	case SIOCGIFADDR:
    460  1.118    dyoung 		ifreq_setaddr(cmd, ifr, sintocsa(&ia->ia_addr));
    461    1.1       cgd 		break;
    462    1.1       cgd 
    463    1.1       cgd 	case SIOCGIFBRDADDR:
    464    1.1       cgd 		if ((ifp->if_flags & IFF_BROADCAST) == 0)
    465    1.1       cgd 			return (EINVAL);
    466  1.118    dyoung 		ifreq_setdstaddr(cmd, ifr, sintocsa(&ia->ia_broadaddr));
    467    1.1       cgd 		break;
    468    1.1       cgd 
    469    1.1       cgd 	case SIOCGIFDSTADDR:
    470    1.1       cgd 		if ((ifp->if_flags & IFF_POINTOPOINT) == 0)
    471    1.1       cgd 			return (EINVAL);
    472  1.118    dyoung 		ifreq_setdstaddr(cmd, ifr, sintocsa(&ia->ia_dstaddr));
    473    1.1       cgd 		break;
    474    1.1       cgd 
    475    1.1       cgd 	case SIOCGIFNETMASK:
    476  1.118    dyoung 		ifreq_setaddr(cmd, ifr, sintocsa(&ia->ia_sockmask));
    477    1.1       cgd 		break;
    478    1.1       cgd 
    479    1.1       cgd 	case SIOCSIFDSTADDR:
    480    1.1       cgd 		if ((ifp->if_flags & IFF_POINTOPOINT) == 0)
    481    1.1       cgd 			return (EINVAL);
    482    1.1       cgd 		oldaddr = ia->ia_dstaddr;
    483  1.118    dyoung 		ia->ia_dstaddr = *satocsin(ifreq_getdstaddr(cmd, ifr));
    484  1.139    dyoung 		if ((error = if_addr_init(ifp, &ia->ia_ifa, false)) != 0) {
    485    1.1       cgd 			ia->ia_dstaddr = oldaddr;
    486  1.117    dyoung 			return error;
    487    1.1       cgd 		}
    488    1.1       cgd 		if (ia->ia_flags & IFA_ROUTE) {
    489   1.21   mycroft 			ia->ia_ifa.ifa_dstaddr = sintosa(&oldaddr);
    490  1.117    dyoung 			rtinit(&ia->ia_ifa, RTM_DELETE, RTF_HOST);
    491   1.21   mycroft 			ia->ia_ifa.ifa_dstaddr = sintosa(&ia->ia_dstaddr);
    492  1.117    dyoung 			rtinit(&ia->ia_ifa, RTM_ADD, RTF_HOST|RTF_UP);
    493    1.1       cgd 		}
    494    1.1       cgd 		break;
    495    1.1       cgd 
    496    1.1       cgd 	case SIOCSIFBRDADDR:
    497    1.1       cgd 		if ((ifp->if_flags & IFF_BROADCAST) == 0)
    498  1.117    dyoung 			return EINVAL;
    499  1.118    dyoung 		ia->ia_broadaddr = *satocsin(ifreq_getbroadaddr(cmd, ifr));
    500    1.1       cgd 		break;
    501    1.1       cgd 
    502    1.1       cgd 	case SIOCSIFADDR:
    503  1.118    dyoung 		error = in_ifinit(ifp, ia, satocsin(ifreq_getaddr(cmd, ifr)),
    504  1.118    dyoung 		    1);
    505  1.144     rmind 		if (error == 0) {
    506  1.144     rmind 			(void)pfil_run_hooks(if_pfil,
    507   1.96    itojun 			    (struct mbuf **)SIOCSIFADDR, ifp, PFIL_IFADDR);
    508  1.144     rmind 		}
    509  1.100      yamt 		break;
    510    1.1       cgd 
    511    1.1       cgd 	case SIOCSIFNETMASK:
    512   1.97   mycroft 		in_ifscrub(ifp, ia);
    513  1.118    dyoung 		ia->ia_sockmask = *satocsin(ifreq_getaddr(cmd, ifr));
    514   1.97   mycroft 		ia->ia_subnetmask = ia->ia_sockmask.sin_addr.s_addr;
    515   1.97   mycroft 		error = in_ifinit(ifp, ia, NULL, 0);
    516  1.100      yamt 		break;
    517    1.1       cgd 
    518    1.1       cgd 	case SIOCAIFADDR:
    519    1.1       cgd 		maskIsNew = 0;
    520    1.1       cgd 		hostIsNew = 1;
    521  1.117    dyoung 		if (ia->ia_addr.sin_family != AF_INET)
    522  1.117    dyoung 			;
    523  1.117    dyoung 		else if (ifra->ifra_addr.sin_len == 0) {
    524  1.117    dyoung 			ifra->ifra_addr = ia->ia_addr;
    525  1.117    dyoung 			hostIsNew = 0;
    526  1.117    dyoung 		} else if (in_hosteq(ia->ia_addr.sin_addr,
    527  1.117    dyoung 		           ifra->ifra_addr.sin_addr))
    528  1.117    dyoung 			hostIsNew = 0;
    529    1.1       cgd 		if (ifra->ifra_mask.sin_len) {
    530  1.142       roy 			/* Only scrub if we control the prefix route,
    531  1.142       roy 			 * otherwise userland gets a bogus message */
    532  1.142       roy 			if ((ia->ia_flags & IFA_ROUTE))
    533  1.142       roy 				in_ifscrub(ifp, ia);
    534    1.1       cgd 			ia->ia_sockmask = ifra->ifra_mask;
    535   1.20   mycroft 			ia->ia_subnetmask = ia->ia_sockmask.sin_addr.s_addr;
    536    1.1       cgd 			maskIsNew = 1;
    537    1.1       cgd 		}
    538    1.1       cgd 		if ((ifp->if_flags & IFF_POINTOPOINT) &&
    539    1.1       cgd 		    (ifra->ifra_dstaddr.sin_family == AF_INET)) {
    540  1.142       roy 			/* Only scrub if we control the prefix route,
    541  1.142       roy 			 * otherwise userland gets a bogus message */
    542  1.142       roy 			if ((ia->ia_flags & IFA_ROUTE))
    543  1.142       roy 				in_ifscrub(ifp, ia);
    544    1.1       cgd 			ia->ia_dstaddr = ifra->ifra_dstaddr;
    545    1.1       cgd 			maskIsNew  = 1; /* We lie; but the effect's the same */
    546    1.1       cgd 		}
    547    1.1       cgd 		if (ifra->ifra_addr.sin_family == AF_INET &&
    548   1.56    itojun 		    (hostIsNew || maskIsNew)) {
    549    1.1       cgd 			error = in_ifinit(ifp, ia, &ifra->ifra_addr, 0);
    550   1.56    itojun 		}
    551    1.1       cgd 		if ((ifp->if_flags & IFF_BROADCAST) &&
    552    1.1       cgd 		    (ifra->ifra_broadaddr.sin_family == AF_INET))
    553    1.1       cgd 			ia->ia_broadaddr = ifra->ifra_broadaddr;
    554  1.117    dyoung 		if (error == 0)
    555  1.144     rmind 			(void)pfil_run_hooks(if_pfil,
    556   1.99      yamt 			    (struct mbuf **)SIOCAIFADDR, ifp, PFIL_IFADDR);
    557  1.100      yamt 		break;
    558   1.43  christos 
    559   1.43  christos 	case SIOCGIFALIAS:
    560   1.43  christos 		ifra->ifra_mask = ia->ia_sockmask;
    561   1.43  christos 		if ((ifp->if_flags & IFF_POINTOPOINT) &&
    562   1.43  christos 		    (ia->ia_dstaddr.sin_family == AF_INET))
    563   1.43  christos 			ifra->ifra_dstaddr = ia->ia_dstaddr;
    564   1.43  christos 		else if ((ifp->if_flags & IFF_BROADCAST) &&
    565   1.43  christos 		    (ia->ia_broadaddr.sin_family == AF_INET))
    566   1.43  christos 			ifra->ifra_broadaddr = ia->ia_broadaddr;
    567   1.43  christos 		else
    568  1.117    dyoung 			memset(&ifra->ifra_broadaddr, 0,
    569   1.48    itojun 			      sizeof(ifra->ifra_broadaddr));
    570  1.100      yamt 		break;
    571    1.1       cgd 
    572    1.1       cgd 	case SIOCDIFADDR:
    573  1.121    dyoung 		in_purgeaddr(&ia->ia_ifa);
    574  1.144     rmind 		(void)pfil_run_hooks(if_pfil, (struct mbuf **)SIOCDIFADDR,
    575   1.96    itojun 		    ifp, PFIL_IFADDR);
    576    1.1       cgd 		break;
    577   1.19   mycroft 
    578   1.19   mycroft #ifdef MROUTING
    579   1.19   mycroft 	case SIOCGETVIFCNT:
    580   1.19   mycroft 	case SIOCGETSGCNT:
    581  1.100      yamt 		error = mrt_ioctl(so, cmd, data);
    582  1.100      yamt 		break;
    583   1.19   mycroft #endif /* MROUTING */
    584    1.1       cgd 
    585    1.1       cgd 	default:
    586  1.128    dyoung 		return ENOTTY;
    587  1.100      yamt 	}
    588  1.100      yamt 
    589  1.117    dyoung 	if (error != 0 && newifaddr) {
    590  1.100      yamt 		KASSERT(ia != NULL);
    591  1.121    dyoung 		in_purgeaddr(&ia->ia_ifa);
    592    1.1       cgd 	}
    593  1.100      yamt 
    594  1.100      yamt 	return error;
    595   1.50   thorpej }
    596   1.50   thorpej 
    597   1.50   thorpej void
    598  1.121    dyoung in_purgeaddr(struct ifaddr *ifa)
    599   1.50   thorpej {
    600  1.121    dyoung 	struct ifnet *ifp = ifa->ifa_ifp;
    601   1.50   thorpej 	struct in_ifaddr *ia = (void *) ifa;
    602   1.50   thorpej 
    603   1.50   thorpej 	in_ifscrub(ifp, ia);
    604   1.50   thorpej 	LIST_REMOVE(ia, ia_hash);
    605  1.122    dyoung 	ifa_remove(ifp, &ia->ia_ifa);
    606   1.93  jonathan 	TAILQ_REMOVE(&in_ifaddrhead, ia, ia_list);
    607   1.65     enami 	if (ia->ia_allhosts != NULL)
    608   1.65     enami 		in_delmulti(ia->ia_allhosts);
    609   1.50   thorpej 	IFAFREE(&ia->ia_ifa);
    610   1.50   thorpej 	in_setmaxmtu();
    611   1.51   thorpej }
    612   1.51   thorpej 
    613   1.51   thorpej void
    614  1.111       tls in_purgeif(struct ifnet *ifp)		/* MUST be called at splsoftnet() */
    615   1.51   thorpej {
    616  1.121    dyoung 	if_purgeaddrs(ifp, AF_INET, in_purgeaddr);
    617  1.111       tls 	igmp_purgeif(ifp);		/* manipulates pools */
    618   1.89    itojun #ifdef MROUTING
    619   1.89    itojun 	ip_mrouter_detach(ifp);
    620   1.89    itojun #endif
    621   1.48    itojun }
    622   1.48    itojun 
    623   1.48    itojun /*
    624   1.48    itojun  * SIOC[GAD]LIFADDR.
    625   1.48    itojun  *	SIOCGLIFADDR: get first address. (???)
    626   1.48    itojun  *	SIOCGLIFADDR with IFLR_PREFIX:
    627   1.48    itojun  *		get first address that matches the specified prefix.
    628   1.48    itojun  *	SIOCALIFADDR: add the specified address.
    629   1.48    itojun  *	SIOCALIFADDR with IFLR_PREFIX:
    630   1.48    itojun  *		EINVAL since we can't deduce hostid part of the address.
    631   1.48    itojun  *	SIOCDLIFADDR: delete the specified address.
    632   1.48    itojun  *	SIOCDLIFADDR with IFLR_PREFIX:
    633   1.48    itojun  *		delete the first address that matches the specified prefix.
    634   1.48    itojun  * return values:
    635   1.48    itojun  *	EINVAL on invalid parameters
    636   1.48    itojun  *	EADDRNOTAVAIL on prefix match failed/specified address not found
    637   1.48    itojun  *	other values may be returned from in_ioctl()
    638   1.48    itojun  */
    639   1.48    itojun static int
    640  1.116  christos in_lifaddr_ioctl(struct socket *so, u_long cmd, void *data,
    641  1.147       rtr     struct ifnet *ifp)
    642   1.48    itojun {
    643   1.48    itojun 	struct if_laddrreq *iflr = (struct if_laddrreq *)data;
    644   1.48    itojun 	struct ifaddr *ifa;
    645   1.49    itojun 	struct sockaddr *sa;
    646   1.48    itojun 
    647   1.48    itojun 	/* sanity checks */
    648  1.119    dyoung 	if (data == NULL || ifp == NULL) {
    649   1.48    itojun 		panic("invalid argument to in_lifaddr_ioctl");
    650   1.48    itojun 		/*NOTRECHED*/
    651   1.48    itojun 	}
    652   1.48    itojun 
    653   1.48    itojun 	switch (cmd) {
    654   1.48    itojun 	case SIOCGLIFADDR:
    655   1.48    itojun 		/* address must be specified on GET with IFLR_PREFIX */
    656   1.48    itojun 		if ((iflr->flags & IFLR_PREFIX) == 0)
    657   1.48    itojun 			break;
    658   1.48    itojun 		/*FALLTHROUGH*/
    659   1.48    itojun 	case SIOCALIFADDR:
    660   1.48    itojun 	case SIOCDLIFADDR:
    661   1.48    itojun 		/* address must be specified on ADD and DELETE */
    662   1.49    itojun 		sa = (struct sockaddr *)&iflr->addr;
    663   1.49    itojun 		if (sa->sa_family != AF_INET)
    664   1.48    itojun 			return EINVAL;
    665   1.49    itojun 		if (sa->sa_len != sizeof(struct sockaddr_in))
    666   1.48    itojun 			return EINVAL;
    667   1.48    itojun 		/* XXX need improvement */
    668   1.49    itojun 		sa = (struct sockaddr *)&iflr->dstaddr;
    669  1.126    dyoung 		if (sa->sa_family != AF_UNSPEC && sa->sa_family != AF_INET)
    670   1.48    itojun 			return EINVAL;
    671  1.126    dyoung 		if (sa->sa_len != 0 && sa->sa_len != sizeof(struct sockaddr_in))
    672   1.48    itojun 			return EINVAL;
    673   1.48    itojun 		break;
    674   1.48    itojun 	default: /*shouldn't happen*/
    675   1.48    itojun #if 0
    676   1.48    itojun 		panic("invalid cmd to in_lifaddr_ioctl");
    677   1.48    itojun 		/*NOTREACHED*/
    678   1.48    itojun #else
    679   1.48    itojun 		return EOPNOTSUPP;
    680   1.48    itojun #endif
    681   1.48    itojun 	}
    682  1.124    dyoung 	if (sizeof(struct in_addr) * NBBY < iflr->prefixlen)
    683   1.48    itojun 		return EINVAL;
    684   1.48    itojun 
    685   1.48    itojun 	switch (cmd) {
    686   1.48    itojun 	case SIOCALIFADDR:
    687   1.48    itojun 	    {
    688   1.48    itojun 		struct in_aliasreq ifra;
    689   1.48    itojun 
    690   1.48    itojun 		if (iflr->flags & IFLR_PREFIX)
    691   1.48    itojun 			return EINVAL;
    692   1.48    itojun 
    693  1.110      elad 		/* copy args to in_aliasreq, perform ioctl(SIOCAIFADDR). */
    694  1.132    cegger 		memset(&ifra, 0, sizeof(ifra));
    695  1.134   tsutsui 		memcpy(ifra.ifra_name, iflr->iflr_name,
    696   1.48    itojun 			sizeof(ifra.ifra_name));
    697   1.48    itojun 
    698  1.134   tsutsui 		memcpy(&ifra.ifra_addr, &iflr->addr,
    699   1.49    itojun 			((struct sockaddr *)&iflr->addr)->sa_len);
    700   1.48    itojun 
    701   1.49    itojun 		if (((struct sockaddr *)&iflr->dstaddr)->sa_family) {	/*XXX*/
    702  1.134   tsutsui 			memcpy(&ifra.ifra_dstaddr, &iflr->dstaddr,
    703   1.49    itojun 				((struct sockaddr *)&iflr->dstaddr)->sa_len);
    704   1.48    itojun 		}
    705   1.48    itojun 
    706   1.48    itojun 		ifra.ifra_mask.sin_family = AF_INET;
    707   1.48    itojun 		ifra.ifra_mask.sin_len = sizeof(struct sockaddr_in);
    708   1.48    itojun 		in_len2mask(&ifra.ifra_mask.sin_addr, iflr->prefixlen);
    709   1.48    itojun 
    710  1.147       rtr 		return in_control(so, SIOCAIFADDR, &ifra, ifp);
    711   1.48    itojun 	    }
    712   1.48    itojun 	case SIOCGLIFADDR:
    713   1.48    itojun 	case SIOCDLIFADDR:
    714   1.48    itojun 	    {
    715   1.48    itojun 		struct in_ifaddr *ia;
    716   1.48    itojun 		struct in_addr mask, candidate, match;
    717   1.48    itojun 		struct sockaddr_in *sin;
    718   1.48    itojun 		int cmp;
    719   1.48    itojun 
    720  1.132    cegger 		memset(&mask, 0, sizeof(mask));
    721  1.132    cegger 		memset(&match, 0, sizeof(match));	/* XXX gcc */
    722   1.48    itojun 		if (iflr->flags & IFLR_PREFIX) {
    723   1.48    itojun 			/* lookup a prefix rather than address. */
    724   1.48    itojun 			in_len2mask(&mask, iflr->prefixlen);
    725   1.48    itojun 
    726   1.48    itojun 			sin = (struct sockaddr_in *)&iflr->addr;
    727   1.48    itojun 			match.s_addr = sin->sin_addr.s_addr;
    728   1.48    itojun 			match.s_addr &= mask.s_addr;
    729   1.48    itojun 
    730   1.48    itojun 			/* if you set extra bits, that's wrong */
    731   1.48    itojun 			if (match.s_addr != sin->sin_addr.s_addr)
    732   1.48    itojun 				return EINVAL;
    733   1.48    itojun 
    734   1.48    itojun 			cmp = 1;
    735   1.48    itojun 		} else {
    736   1.48    itojun 			if (cmd == SIOCGLIFADDR) {
    737   1.48    itojun 				/* on getting an address, take the 1st match */
    738   1.48    itojun 				cmp = 0;	/*XXX*/
    739   1.48    itojun 			} else {
    740   1.48    itojun 				/* on deleting an address, do exact match */
    741   1.48    itojun 				in_len2mask(&mask, 32);
    742   1.48    itojun 				sin = (struct sockaddr_in *)&iflr->addr;
    743   1.48    itojun 				match.s_addr = sin->sin_addr.s_addr;
    744   1.48    itojun 
    745   1.48    itojun 				cmp = 1;
    746   1.48    itojun 			}
    747   1.48    itojun 		}
    748   1.48    itojun 
    749  1.101      matt 		IFADDR_FOREACH(ifa, ifp) {
    750   1.95    itojun 			if (ifa->ifa_addr->sa_family != AF_INET)
    751   1.48    itojun 				continue;
    752  1.119    dyoung 			if (cmp == 0)
    753   1.48    itojun 				break;
    754  1.143       gdt 			candidate.s_addr = ((struct sockaddr_in *)ifa->ifa_addr)->sin_addr.s_addr;
    755   1.48    itojun 			candidate.s_addr &= mask.s_addr;
    756   1.48    itojun 			if (candidate.s_addr == match.s_addr)
    757   1.48    itojun 				break;
    758   1.48    itojun 		}
    759  1.119    dyoung 		if (ifa == NULL)
    760   1.48    itojun 			return EADDRNOTAVAIL;
    761   1.48    itojun 		ia = (struct in_ifaddr *)ifa;
    762   1.48    itojun 
    763   1.48    itojun 		if (cmd == SIOCGLIFADDR) {
    764   1.48    itojun 			/* fill in the if_laddrreq structure */
    765  1.134   tsutsui 			memcpy(&iflr->addr, &ia->ia_addr, ia->ia_addr.sin_len);
    766   1.48    itojun 
    767   1.48    itojun 			if ((ifp->if_flags & IFF_POINTOPOINT) != 0) {
    768  1.134   tsutsui 				memcpy(&iflr->dstaddr, &ia->ia_dstaddr,
    769   1.48    itojun 					ia->ia_dstaddr.sin_len);
    770   1.48    itojun 			} else
    771  1.132    cegger 				memset(&iflr->dstaddr, 0, sizeof(iflr->dstaddr));
    772   1.48    itojun 
    773   1.48    itojun 			iflr->prefixlen =
    774   1.48    itojun 				in_mask2len(&ia->ia_sockmask.sin_addr);
    775   1.48    itojun 
    776   1.48    itojun 			iflr->flags = 0;	/*XXX*/
    777   1.48    itojun 
    778   1.48    itojun 			return 0;
    779   1.48    itojun 		} else {
    780   1.48    itojun 			struct in_aliasreq ifra;
    781   1.48    itojun 
    782  1.110      elad 			/* fill in_aliasreq and do ioctl(SIOCDIFADDR) */
    783  1.132    cegger 			memset(&ifra, 0, sizeof(ifra));
    784  1.134   tsutsui 			memcpy(ifra.ifra_name, iflr->iflr_name,
    785   1.48    itojun 				sizeof(ifra.ifra_name));
    786   1.48    itojun 
    787  1.134   tsutsui 			memcpy(&ifra.ifra_addr, &ia->ia_addr,
    788   1.48    itojun 				ia->ia_addr.sin_len);
    789   1.48    itojun 			if ((ifp->if_flags & IFF_POINTOPOINT) != 0) {
    790  1.134   tsutsui 				memcpy(&ifra.ifra_dstaddr, &ia->ia_dstaddr,
    791   1.48    itojun 					ia->ia_dstaddr.sin_len);
    792   1.48    itojun 			}
    793  1.134   tsutsui 			memcpy(&ifra.ifra_dstaddr, &ia->ia_sockmask,
    794   1.48    itojun 				ia->ia_sockmask.sin_len);
    795   1.48    itojun 
    796  1.147       rtr 			return in_control(so, SIOCDIFADDR, &ifra, ifp);
    797   1.48    itojun 		}
    798   1.48    itojun 	    }
    799   1.48    itojun 	}
    800   1.48    itojun 
    801   1.48    itojun 	return EOPNOTSUPP;	/*just for safety*/
    802    1.1       cgd }
    803    1.1       cgd 
    804    1.1       cgd /*
    805    1.1       cgd  * Delete any existing route for an interface.
    806    1.1       cgd  */
    807   1.12   mycroft void
    808  1.115  christos in_ifscrub(struct ifnet *ifp, struct in_ifaddr *ia)
    809    1.1       cgd {
    810    1.1       cgd 
    811   1.67    itojun 	in_scrubprefix(ia);
    812    1.1       cgd }
    813    1.1       cgd 
    814    1.1       cgd /*
    815    1.1       cgd  * Initialize an interface's internet address
    816    1.1       cgd  * and routing table entry.
    817    1.1       cgd  */
    818   1.12   mycroft int
    819  1.103     perry in_ifinit(struct ifnet *ifp, struct in_ifaddr *ia,
    820  1.118    dyoung     const struct sockaddr_in *sin, int scrub)
    821    1.1       cgd {
    822   1.97   mycroft 	u_int32_t i;
    823    1.1       cgd 	struct sockaddr_in oldaddr;
    824   1.66   thorpej 	int s = splnet(), flags = RTF_UP, error;
    825    1.1       cgd 
    826  1.118    dyoung 	if (sin == NULL)
    827   1.97   mycroft 		sin = &ia->ia_addr;
    828   1.97   mycroft 
    829   1.32   mycroft 	/*
    830   1.32   mycroft 	 * Set up new addresses.
    831   1.32   mycroft 	 */
    832    1.1       cgd 	oldaddr = ia->ia_addr;
    833   1.38       tls 	if (ia->ia_addr.sin_family == AF_INET)
    834   1.38       tls 		LIST_REMOVE(ia, ia_hash);
    835    1.1       cgd 	ia->ia_addr = *sin;
    836   1.38       tls 	LIST_INSERT_HEAD(&IN_IFADDR_HASH(ia->ia_addr.sin_addr.s_addr), ia, ia_hash);
    837   1.38       tls 
    838    1.1       cgd 	/*
    839    1.1       cgd 	 * Give the interface a chance to initialize
    840    1.1       cgd 	 * if this is its first address,
    841    1.1       cgd 	 * and to validate the address if necessary.
    842    1.1       cgd 	 */
    843  1.139    dyoung 	if ((error = if_addr_init(ifp, &ia->ia_ifa, true)) != 0)
    844   1.32   mycroft 		goto bad;
    845    1.1       cgd 	splx(s);
    846    1.1       cgd 	if (scrub) {
    847   1.21   mycroft 		ia->ia_ifa.ifa_addr = sintosa(&oldaddr);
    848    1.1       cgd 		in_ifscrub(ifp, ia);
    849   1.21   mycroft 		ia->ia_ifa.ifa_addr = sintosa(&ia->ia_addr);
    850    1.1       cgd 	}
    851   1.35   thorpej 
    852   1.97   mycroft 	i = ia->ia_addr.sin_addr.s_addr;
    853    1.1       cgd 	if (IN_CLASSA(i))
    854    1.1       cgd 		ia->ia_netmask = IN_CLASSA_NET;
    855    1.1       cgd 	else if (IN_CLASSB(i))
    856    1.1       cgd 		ia->ia_netmask = IN_CLASSB_NET;
    857    1.1       cgd 	else
    858    1.1       cgd 		ia->ia_netmask = IN_CLASSC_NET;
    859    1.1       cgd 	/*
    860   1.12   mycroft 	 * The subnet mask usually includes at least the standard network part,
    861   1.12   mycroft 	 * but may may be smaller in the case of supernetting.
    862   1.12   mycroft 	 * If it is set, we believe it.
    863    1.1       cgd 	 */
    864   1.12   mycroft 	if (ia->ia_subnetmask == 0) {
    865   1.12   mycroft 		ia->ia_subnetmask = ia->ia_netmask;
    866   1.20   mycroft 		ia->ia_sockmask.sin_addr.s_addr = ia->ia_subnetmask;
    867   1.12   mycroft 	} else
    868   1.12   mycroft 		ia->ia_netmask &= ia->ia_subnetmask;
    869   1.35   thorpej 
    870   1.12   mycroft 	ia->ia_net = i & ia->ia_netmask;
    871    1.1       cgd 	ia->ia_subnet = i & ia->ia_subnetmask;
    872   1.12   mycroft 	in_socktrim(&ia->ia_sockmask);
    873   1.35   thorpej 	/* re-calculate the "in_maxmtu" value */
    874   1.35   thorpej 	in_setmaxmtu();
    875    1.1       cgd 	/*
    876    1.1       cgd 	 * Add route for the network.
    877    1.1       cgd 	 */
    878   1.12   mycroft 	ia->ia_ifa.ifa_metric = ifp->if_metric;
    879    1.1       cgd 	if (ifp->if_flags & IFF_BROADCAST) {
    880   1.12   mycroft 		ia->ia_broadaddr.sin_addr.s_addr =
    881   1.20   mycroft 			ia->ia_subnet | ~ia->ia_subnetmask;
    882    1.1       cgd 		ia->ia_netbroadcast.s_addr =
    883   1.20   mycroft 			ia->ia_net | ~ia->ia_netmask;
    884    1.1       cgd 	} else if (ifp->if_flags & IFF_LOOPBACK) {
    885   1.83      onoe 		ia->ia_dstaddr = ia->ia_addr;
    886    1.1       cgd 		flags |= RTF_HOST;
    887    1.1       cgd 	} else if (ifp->if_flags & IFF_POINTOPOINT) {
    888    1.1       cgd 		if (ia->ia_dstaddr.sin_family != AF_INET)
    889    1.1       cgd 			return (0);
    890    1.1       cgd 		flags |= RTF_HOST;
    891    1.1       cgd 	}
    892   1.67    itojun 	error = in_addprefix(ia, flags);
    893    1.5   hpeyerl 	/*
    894    1.5   hpeyerl 	 * If the interface supports multicast, join the "all hosts"
    895    1.5   hpeyerl 	 * multicast group on that interface.
    896    1.5   hpeyerl 	 */
    897   1.65     enami 	if ((ifp->if_flags & IFF_MULTICAST) != 0 && ia->ia_allhosts == NULL) {
    898    1.5   hpeyerl 		struct in_addr addr;
    899    1.5   hpeyerl 
    900   1.20   mycroft 		addr.s_addr = INADDR_ALLHOSTS_GROUP;
    901   1.65     enami 		ia->ia_allhosts = in_addmulti(&addr, ifp);
    902    1.5   hpeyerl 	}
    903    1.1       cgd 	return (error);
    904   1.32   mycroft bad:
    905   1.32   mycroft 	splx(s);
    906   1.38       tls 	LIST_REMOVE(ia, ia_hash);
    907   1.32   mycroft 	ia->ia_addr = oldaddr;
    908   1.38       tls 	if (ia->ia_addr.sin_family == AF_INET)
    909   1.38       tls 		LIST_INSERT_HEAD(&IN_IFADDR_HASH(ia->ia_addr.sin_addr.s_addr),
    910   1.38       tls 		    ia, ia_hash);
    911   1.32   mycroft 	return (error);
    912    1.1       cgd }
    913   1.67    itojun 
    914   1.67    itojun #define rtinitflags(x) \
    915   1.68    itojun 	((((x)->ia_ifp->if_flags & (IFF_LOOPBACK | IFF_POINTOPOINT)) != 0) \
    916   1.68    itojun 	    ? RTF_HOST : 0)
    917   1.67    itojun 
    918   1.67    itojun /*
    919   1.67    itojun  * add a route to prefix ("connected route" in cisco terminology).
    920   1.67    itojun  * does nothing if there's some interface address with the same prefix already.
    921   1.67    itojun  */
    922   1.67    itojun static int
    923  1.103     perry in_addprefix(struct in_ifaddr *target, int flags)
    924   1.67    itojun {
    925   1.67    itojun 	struct in_ifaddr *ia;
    926   1.67    itojun 	struct in_addr prefix, mask, p;
    927   1.67    itojun 	int error;
    928   1.67    itojun 
    929   1.67    itojun 	if ((flags & RTF_HOST) != 0)
    930   1.67    itojun 		prefix = target->ia_dstaddr.sin_addr;
    931   1.85    itojun 	else {
    932   1.67    itojun 		prefix = target->ia_addr.sin_addr;
    933   1.85    itojun 		mask = target->ia_sockmask.sin_addr;
    934   1.85    itojun 		prefix.s_addr &= mask.s_addr;
    935   1.85    itojun 	}
    936   1.67    itojun 
    937   1.93  jonathan 	TAILQ_FOREACH(ia, &in_ifaddrhead, ia_list) {
    938   1.67    itojun 		if (rtinitflags(ia))
    939   1.67    itojun 			p = ia->ia_dstaddr.sin_addr;
    940   1.85    itojun 		else {
    941   1.67    itojun 			p = ia->ia_addr.sin_addr;
    942   1.85    itojun 			p.s_addr &= ia->ia_sockmask.sin_addr.s_addr;
    943   1.85    itojun 		}
    944   1.85    itojun 
    945   1.67    itojun 		if (prefix.s_addr != p.s_addr)
    946   1.67    itojun 			continue;
    947   1.67    itojun 
    948   1.67    itojun 		/*
    949   1.67    itojun 		 * if we got a matching prefix route inserted by other
    950   1.69    martin 		 * interface address, we don't need to bother
    951  1.114    dyoung 		 *
    952  1.114    dyoung 		 * XXX RADIX_MPATH implications here? -dyoung
    953  1.142       roy 		 *
    954  1.142       roy 		 * But we should still notify userland of the new address
    955   1.67    itojun 		 */
    956  1.142       roy 		if (ia->ia_flags & IFA_ROUTE) {
    957  1.142       roy 			rt_newaddrmsg(RTM_NEWADDR, &target->ia_ifa, 0, NULL);
    958   1.67    itojun 			return 0;
    959  1.142       roy 		}
    960   1.67    itojun 	}
    961   1.67    itojun 
    962   1.67    itojun 	/*
    963   1.67    itojun 	 * noone seem to have prefix route.  insert it.
    964   1.67    itojun 	 */
    965  1.119    dyoung 	error = rtinit(&target->ia_ifa, RTM_ADD, flags);
    966  1.119    dyoung 	if (error == 0)
    967   1.67    itojun 		target->ia_flags |= IFA_ROUTE;
    968  1.130       roy 	else if (error == EEXIST) {
    969  1.130       roy 		/*
    970  1.130       roy 		 * the fact the route already exists is not an error.
    971  1.130       roy 		 */
    972  1.130       roy 		error = 0;
    973  1.130       roy 	}
    974   1.67    itojun 	return error;
    975   1.67    itojun }
    976   1.67    itojun 
    977   1.67    itojun /*
    978   1.67    itojun  * remove a route to prefix ("connected route" in cisco terminology).
    979   1.67    itojun  * re-installs the route by using another interface address, if there's one
    980   1.67    itojun  * with the same prefix (otherwise we lose the route mistakenly).
    981   1.67    itojun  */
    982   1.67    itojun static int
    983  1.103     perry in_scrubprefix(struct in_ifaddr *target)
    984   1.67    itojun {
    985   1.67    itojun 	struct in_ifaddr *ia;
    986   1.67    itojun 	struct in_addr prefix, mask, p;
    987   1.67    itojun 	int error;
    988   1.67    itojun 
    989  1.142       roy 	/* If we don't have IFA_ROUTE we should still inform userland */
    990  1.142       roy 	if ((target->ia_flags & IFA_ROUTE) == 0) {
    991  1.142       roy 		rt_newaddrmsg(RTM_DELADDR, &target->ia_ifa, 0, NULL);
    992   1.67    itojun 		return 0;
    993  1.142       roy 	}
    994   1.67    itojun 
    995   1.67    itojun 	if (rtinitflags(target))
    996   1.67    itojun 		prefix = target->ia_dstaddr.sin_addr;
    997   1.85    itojun 	else {
    998   1.67    itojun 		prefix = target->ia_addr.sin_addr;
    999   1.85    itojun 		mask = target->ia_sockmask.sin_addr;
   1000   1.85    itojun 		prefix.s_addr &= mask.s_addr;
   1001   1.85    itojun 	}
   1002   1.67    itojun 
   1003   1.93  jonathan 	TAILQ_FOREACH(ia, &in_ifaddrhead, ia_list) {
   1004   1.67    itojun 		if (rtinitflags(ia))
   1005   1.67    itojun 			p = ia->ia_dstaddr.sin_addr;
   1006   1.85    itojun 		else {
   1007   1.67    itojun 			p = ia->ia_addr.sin_addr;
   1008   1.85    itojun 			p.s_addr &= ia->ia_sockmask.sin_addr.s_addr;
   1009   1.85    itojun 		}
   1010   1.85    itojun 
   1011   1.67    itojun 		if (prefix.s_addr != p.s_addr)
   1012   1.67    itojun 			continue;
   1013   1.67    itojun 
   1014   1.67    itojun 		/*
   1015   1.67    itojun 		 * if we got a matching prefix route, move IFA_ROUTE to him
   1016   1.67    itojun 		 */
   1017   1.67    itojun 		if ((ia->ia_flags & IFA_ROUTE) == 0) {
   1018  1.119    dyoung 			rtinit(&target->ia_ifa, RTM_DELETE,
   1019   1.67    itojun 			    rtinitflags(target));
   1020   1.67    itojun 			target->ia_flags &= ~IFA_ROUTE;
   1021   1.67    itojun 
   1022  1.119    dyoung 			error = rtinit(&ia->ia_ifa, RTM_ADD,
   1023   1.67    itojun 			    rtinitflags(ia) | RTF_UP);
   1024   1.67    itojun 			if (error == 0)
   1025   1.67    itojun 				ia->ia_flags |= IFA_ROUTE;
   1026   1.67    itojun 			return error;
   1027   1.67    itojun 		}
   1028   1.67    itojun 	}
   1029   1.67    itojun 
   1030   1.67    itojun 	/*
   1031   1.67    itojun 	 * noone seem to have prefix route.  remove it.
   1032   1.67    itojun 	 */
   1033  1.119    dyoung 	rtinit(&target->ia_ifa, RTM_DELETE, rtinitflags(target));
   1034   1.67    itojun 	target->ia_flags &= ~IFA_ROUTE;
   1035   1.67    itojun 	return 0;
   1036   1.67    itojun }
   1037   1.67    itojun 
   1038   1.67    itojun #undef rtinitflags
   1039    1.1       cgd 
   1040    1.1       cgd /*
   1041    1.1       cgd  * Return 1 if the address might be a local broadcast address.
   1042    1.1       cgd  */
   1043    1.8   mycroft int
   1044  1.103     perry in_broadcast(struct in_addr in, struct ifnet *ifp)
   1045    1.1       cgd {
   1046   1.59  augustss 	struct ifaddr *ifa;
   1047    1.1       cgd 
   1048   1.12   mycroft 	if (in.s_addr == INADDR_BROADCAST ||
   1049   1.32   mycroft 	    in_nullhost(in))
   1050   1.12   mycroft 		return 1;
   1051   1.12   mycroft 	if ((ifp->if_flags & IFF_BROADCAST) == 0)
   1052   1.12   mycroft 		return 0;
   1053    1.1       cgd 	/*
   1054    1.1       cgd 	 * Look through the list of addresses for a match
   1055    1.1       cgd 	 * with a broadcast address.
   1056    1.1       cgd 	 */
   1057   1.22   mycroft #define ia (ifatoia(ifa))
   1058  1.101      matt 	IFADDR_FOREACH(ifa, ifp)
   1059   1.12   mycroft 		if (ifa->ifa_addr->sa_family == AF_INET &&
   1060   1.75    itojun 		    !in_hosteq(in, ia->ia_addr.sin_addr) &&
   1061   1.32   mycroft 		    (in_hosteq(in, ia->ia_broadaddr.sin_addr) ||
   1062   1.32   mycroft 		     in_hosteq(in, ia->ia_netbroadcast) ||
   1063   1.77    itojun 		     (hostzeroisbroadcast &&
   1064   1.47  sommerfe 		      /*
   1065   1.47  sommerfe 		       * Check for old-style (host 0) broadcast.
   1066   1.47  sommerfe 		       */
   1067   1.47  sommerfe 		      (in.s_addr == ia->ia_subnet ||
   1068   1.47  sommerfe 		       in.s_addr == ia->ia_net))))
   1069   1.47  sommerfe 			return 1;
   1070    1.1       cgd 	return (0);
   1071   1.12   mycroft #undef ia
   1072   1.64    itojun }
   1073   1.64    itojun 
   1074   1.64    itojun /*
   1075  1.146     rmind  * in_lookup_multi: look up the in_multi record for a given IP
   1076  1.146     rmind  * multicast address on a given interface.  If no matching record is
   1077  1.146     rmind  * found, return NULL.
   1078  1.146     rmind  */
   1079  1.146     rmind struct in_multi *
   1080  1.146     rmind in_lookup_multi(struct in_addr addr, ifnet_t *ifp)
   1081  1.146     rmind {
   1082  1.146     rmind 	struct in_multi *inm;
   1083  1.146     rmind 
   1084  1.146     rmind 	KASSERT(rw_lock_held(&in_multilock));
   1085  1.146     rmind 
   1086  1.146     rmind 	LIST_FOREACH(inm, &IN_MULTI_HASH(addr.s_addr, ifp), inm_list) {
   1087  1.146     rmind 		if (in_hosteq(inm->inm_addr, addr) && inm->inm_ifp == ifp)
   1088  1.146     rmind 			break;
   1089  1.146     rmind 	}
   1090  1.146     rmind 	return inm;
   1091  1.146     rmind }
   1092  1.146     rmind 
   1093  1.146     rmind /*
   1094  1.146     rmind  * in_multi_group: check whether the address belongs to an IP multicast
   1095  1.146     rmind  * group we are joined on this interface.  Returns true or false.
   1096  1.146     rmind  */
   1097  1.146     rmind bool
   1098  1.146     rmind in_multi_group(struct in_addr addr, ifnet_t *ifp, int flags)
   1099  1.146     rmind {
   1100  1.146     rmind 	bool ingroup;
   1101  1.146     rmind 
   1102  1.146     rmind 	if (__predict_true(flags & IP_IGMP_MCAST) == 0) {
   1103  1.146     rmind 		rw_enter(&in_multilock, RW_READER);
   1104  1.146     rmind 		ingroup = in_lookup_multi(addr, ifp) != NULL;
   1105  1.146     rmind 		rw_exit(&in_multilock);
   1106  1.146     rmind 	} else {
   1107  1.146     rmind 		/* XXX Recursive call from ip_output(). */
   1108  1.146     rmind 		KASSERT(rw_lock_held(&in_multilock));
   1109  1.146     rmind 		ingroup = in_lookup_multi(addr, ifp) != NULL;
   1110  1.146     rmind 	}
   1111  1.146     rmind 	return ingroup;
   1112  1.146     rmind }
   1113  1.146     rmind 
   1114  1.146     rmind /*
   1115    1.5   hpeyerl  * Add an address to the list of IP multicast addresses for a given interface.
   1116    1.5   hpeyerl  */
   1117    1.5   hpeyerl struct in_multi *
   1118  1.146     rmind in_addmulti(struct in_addr *ap, ifnet_t *ifp)
   1119    1.5   hpeyerl {
   1120  1.118    dyoung 	struct sockaddr_in sin;
   1121   1.59  augustss 	struct in_multi *inm;
   1122    1.5   hpeyerl 
   1123    1.5   hpeyerl 	/*
   1124    1.5   hpeyerl 	 * See if address already in list.
   1125    1.5   hpeyerl 	 */
   1126  1.146     rmind 	rw_enter(&in_multilock, RW_WRITER);
   1127  1.146     rmind 	inm = in_lookup_multi(*ap, ifp);
   1128    1.5   hpeyerl 	if (inm != NULL) {
   1129    1.5   hpeyerl 		/*
   1130    1.5   hpeyerl 		 * Found it; just increment the reference count.
   1131    1.5   hpeyerl 		 */
   1132  1.146     rmind 		inm->inm_refcount++;
   1133  1.146     rmind 		rw_exit(&in_multilock);
   1134  1.146     rmind 		return inm;
   1135  1.146     rmind 	}
   1136  1.146     rmind 
   1137  1.146     rmind 	/*
   1138  1.146     rmind 	 * New address; allocate a new multicast record.
   1139  1.146     rmind 	 */
   1140  1.146     rmind 	inm = pool_get(&inmulti_pool, PR_NOWAIT);
   1141  1.146     rmind 	if (inm == NULL) {
   1142  1.146     rmind 		rw_exit(&in_multilock);
   1143  1.146     rmind 		return NULL;
   1144  1.146     rmind 	}
   1145  1.146     rmind 	inm->inm_addr = *ap;
   1146  1.146     rmind 	inm->inm_ifp = ifp;
   1147  1.146     rmind 	inm->inm_refcount = 1;
   1148  1.146     rmind 
   1149  1.146     rmind 	/*
   1150  1.146     rmind 	 * Ask the network driver to update its multicast reception
   1151  1.146     rmind 	 * filter appropriately for the new address.
   1152  1.146     rmind 	 */
   1153  1.146     rmind 	sockaddr_in_init(&sin, ap, 0);
   1154  1.146     rmind 	if (if_mcast_op(ifp, SIOCADDMULTI, sintosa(&sin)) != 0) {
   1155  1.146     rmind 		rw_exit(&in_multilock);
   1156  1.146     rmind 		pool_put(&inmulti_pool, inm);
   1157  1.146     rmind 		return NULL;
   1158  1.146     rmind 	}
   1159  1.146     rmind 
   1160  1.146     rmind 	/*
   1161  1.146     rmind 	 * Let IGMP know that we have joined a new IP multicast group.
   1162  1.146     rmind 	 */
   1163  1.146     rmind 	if (igmp_joingroup(inm) != 0) {
   1164  1.146     rmind 		rw_exit(&in_multilock);
   1165  1.146     rmind 		pool_put(&inmulti_pool, inm);
   1166  1.146     rmind 		return NULL;
   1167    1.5   hpeyerl 	}
   1168  1.146     rmind 	LIST_INSERT_HEAD(
   1169  1.146     rmind 	    &IN_MULTI_HASH(inm->inm_addr.s_addr, ifp),
   1170  1.146     rmind 	    inm, inm_list);
   1171  1.146     rmind 	in_multientries++;
   1172  1.146     rmind 	rw_exit(&in_multilock);
   1173  1.146     rmind 
   1174  1.146     rmind 	return inm;
   1175    1.5   hpeyerl }
   1176    1.5   hpeyerl 
   1177    1.5   hpeyerl /*
   1178    1.5   hpeyerl  * Delete a multicast address record.
   1179    1.5   hpeyerl  */
   1180   1.26  christos void
   1181  1.103     perry in_delmulti(struct in_multi *inm)
   1182    1.5   hpeyerl {
   1183  1.118    dyoung 	struct sockaddr_in sin;
   1184    1.5   hpeyerl 
   1185  1.146     rmind 	rw_enter(&in_multilock, RW_WRITER);
   1186  1.146     rmind 	if (--inm->inm_refcount > 0) {
   1187  1.146     rmind 		rw_exit(&in_multilock);
   1188  1.146     rmind 		return;
   1189  1.146     rmind 	}
   1190  1.146     rmind 
   1191  1.146     rmind 	/*
   1192  1.146     rmind 	 * No remaining claims to this record; let IGMP know that
   1193  1.146     rmind 	 * we are leaving the multicast group.
   1194  1.146     rmind 	 */
   1195  1.146     rmind 	igmp_leavegroup(inm);
   1196  1.146     rmind 
   1197  1.146     rmind 	/*
   1198  1.146     rmind 	 * Notify the network driver to update its multicast reception
   1199  1.146     rmind 	 * filter.
   1200  1.146     rmind 	 */
   1201  1.146     rmind 	sockaddr_in_init(&sin, &inm->inm_addr, 0);
   1202  1.146     rmind 	if_mcast_op(inm->inm_ifp, SIOCDELMULTI, sintosa(&sin));
   1203  1.146     rmind 
   1204  1.146     rmind 	/*
   1205  1.146     rmind 	 * Unlink from list.
   1206  1.146     rmind 	 */
   1207  1.146     rmind 	LIST_REMOVE(inm, inm_list);
   1208  1.146     rmind 	in_multientries--;
   1209  1.146     rmind 	rw_exit(&in_multilock);
   1210  1.146     rmind 
   1211  1.146     rmind 	pool_put(&inmulti_pool, inm);
   1212  1.146     rmind }
   1213  1.146     rmind 
   1214  1.146     rmind /*
   1215  1.146     rmind  * in_next_multi: step through all of the in_multi records, one at a time.
   1216  1.146     rmind  * The current position is remembered in "step", which the caller must
   1217  1.146     rmind  * provide.  in_first_multi(), below, must be called to initialize "step"
   1218  1.146     rmind  * and get the first record.  Both macros return a NULL "inm" when there
   1219  1.146     rmind  * are no remaining records.
   1220  1.146     rmind  */
   1221  1.146     rmind struct in_multi *
   1222  1.146     rmind in_next_multi(struct in_multistep *step)
   1223  1.146     rmind {
   1224  1.146     rmind 	struct in_multi *inm;
   1225  1.146     rmind 
   1226  1.146     rmind 	KASSERT(rw_lock_held(&in_multilock));
   1227  1.146     rmind 
   1228  1.146     rmind 	while (step->i_inm == NULL && step->i_n < IN_MULTI_HASH_SIZE) {
   1229  1.146     rmind 		step->i_inm = LIST_FIRST(&in_multihashtbl[++step->i_n]);
   1230  1.146     rmind 	}
   1231  1.146     rmind 	if ((inm = step->i_inm) != NULL) {
   1232  1.146     rmind 		step->i_inm = LIST_NEXT(inm, inm_list);
   1233    1.5   hpeyerl 	}
   1234  1.146     rmind 	return inm;
   1235  1.146     rmind }
   1236  1.146     rmind 
   1237  1.146     rmind struct in_multi *
   1238  1.146     rmind in_first_multi(struct in_multistep *step)
   1239  1.146     rmind {
   1240  1.146     rmind 	KASSERT(rw_lock_held(&in_multilock));
   1241  1.146     rmind 
   1242  1.146     rmind 	step->i_n = 0;
   1243  1.146     rmind 	step->i_inm = LIST_FIRST(&in_multihashtbl[0]);
   1244  1.146     rmind 	return in_next_multi(step);
   1245  1.146     rmind }
   1246  1.146     rmind 
   1247  1.146     rmind void
   1248  1.146     rmind in_multi_lock(int op)
   1249  1.146     rmind {
   1250  1.146     rmind 	rw_enter(&in_multilock, op);
   1251  1.146     rmind }
   1252  1.146     rmind 
   1253  1.146     rmind void
   1254  1.146     rmind in_multi_unlock(void)
   1255  1.146     rmind {
   1256  1.146     rmind 	rw_exit(&in_multilock);
   1257  1.146     rmind }
   1258  1.146     rmind 
   1259  1.146     rmind int
   1260  1.146     rmind in_multi_lock_held(void)
   1261  1.146     rmind {
   1262  1.146     rmind 	return rw_lock_held(&in_multilock);
   1263    1.5   hpeyerl }
   1264  1.145     rmind 
   1265  1.145     rmind struct sockaddr_in *
   1266  1.145     rmind in_selectsrc(struct sockaddr_in *sin, struct route *ro,
   1267  1.145     rmind     int soopts, struct ip_moptions *mopts, int *errorp)
   1268  1.145     rmind {
   1269  1.145     rmind 	struct rtentry *rt = NULL;
   1270  1.145     rmind 	struct in_ifaddr *ia = NULL;
   1271  1.145     rmind 
   1272  1.145     rmind 	/*
   1273  1.145     rmind          * If route is known or can be allocated now, take the
   1274  1.145     rmind          * source address from the interface.  Otherwise, punt.
   1275  1.145     rmind 	 */
   1276  1.145     rmind 	if ((soopts & SO_DONTROUTE) != 0)
   1277  1.145     rmind 		rtcache_free(ro);
   1278  1.145     rmind 	else {
   1279  1.145     rmind 		union {
   1280  1.145     rmind 			struct sockaddr		dst;
   1281  1.145     rmind 			struct sockaddr_in	dst4;
   1282  1.145     rmind 		} u;
   1283  1.145     rmind 
   1284  1.145     rmind 		sockaddr_in_init(&u.dst4, &sin->sin_addr, 0);
   1285  1.145     rmind 		rt = rtcache_lookup(ro, &u.dst);
   1286  1.145     rmind 	}
   1287  1.145     rmind 	/*
   1288  1.145     rmind 	 * If we found a route, use the address
   1289  1.145     rmind 	 * corresponding to the outgoing interface
   1290  1.145     rmind 	 * unless it is the loopback (in case a route
   1291  1.145     rmind 	 * to our address on another net goes to loopback).
   1292  1.145     rmind 	 *
   1293  1.145     rmind 	 * XXX Is this still true?  Do we care?
   1294  1.145     rmind 	 */
   1295  1.145     rmind 	if (rt != NULL && (rt->rt_ifp->if_flags & IFF_LOOPBACK) == 0)
   1296  1.145     rmind 		ia = ifatoia(rt->rt_ifa);
   1297  1.145     rmind 	if (ia == NULL) {
   1298  1.145     rmind 		u_int16_t fport = sin->sin_port;
   1299  1.145     rmind 
   1300  1.145     rmind 		sin->sin_port = 0;
   1301  1.145     rmind 		ia = ifatoia(ifa_ifwithladdr(sintosa(sin)));
   1302  1.145     rmind 		sin->sin_port = fport;
   1303  1.145     rmind 		if (ia == NULL) {
   1304  1.145     rmind 			/* Find 1st non-loopback AF_INET address */
   1305  1.145     rmind 			TAILQ_FOREACH(ia, &in_ifaddrhead, ia_list) {
   1306  1.145     rmind 				if (!(ia->ia_ifp->if_flags & IFF_LOOPBACK))
   1307  1.145     rmind 					break;
   1308  1.145     rmind 			}
   1309  1.145     rmind 		}
   1310  1.145     rmind 		if (ia == NULL) {
   1311  1.145     rmind 			*errorp = EADDRNOTAVAIL;
   1312  1.145     rmind 			return NULL;
   1313  1.145     rmind 		}
   1314  1.145     rmind 	}
   1315  1.145     rmind 	/*
   1316  1.145     rmind 	 * If the destination address is multicast and an outgoing
   1317  1.145     rmind 	 * interface has been set as a multicast option, use the
   1318  1.145     rmind 	 * address of that interface as our source address.
   1319  1.145     rmind 	 */
   1320  1.145     rmind 	if (IN_MULTICAST(sin->sin_addr.s_addr) && mopts != NULL) {
   1321  1.145     rmind 		struct ip_moptions *imo;
   1322  1.145     rmind 		struct ifnet *ifp;
   1323  1.145     rmind 
   1324  1.145     rmind 		imo = mopts;
   1325  1.145     rmind 		if (imo->imo_multicast_ifp != NULL) {
   1326  1.145     rmind 			ifp = imo->imo_multicast_ifp;
   1327  1.145     rmind 			IFP_TO_IA(ifp, ia);		/* XXX */
   1328  1.145     rmind 			if (ia == 0) {
   1329  1.145     rmind 				*errorp = EADDRNOTAVAIL;
   1330  1.145     rmind 				return NULL;
   1331  1.145     rmind 			}
   1332  1.145     rmind 		}
   1333  1.145     rmind 	}
   1334  1.145     rmind 	if (ia->ia_ifa.ifa_getifa != NULL) {
   1335  1.145     rmind 		ia = ifatoia((*ia->ia_ifa.ifa_getifa)(&ia->ia_ifa,
   1336  1.145     rmind 		                                      sintosa(sin)));
   1337  1.145     rmind 	}
   1338  1.145     rmind #ifdef GETIFA_DEBUG
   1339  1.145     rmind 	else
   1340  1.145     rmind 		printf("%s: missing ifa_getifa\n", __func__);
   1341  1.145     rmind #endif
   1342  1.145     rmind 	return satosin(&ia->ia_addr);
   1343  1.145     rmind }
   1344  1.145     rmind 
   1345  1.145     rmind static void
   1346  1.145     rmind in_sysctl_init(struct sysctllog **clog)
   1347  1.145     rmind {
   1348  1.145     rmind 	sysctl_createv(clog, 0, NULL, NULL,
   1349  1.145     rmind 		       CTLFLAG_PERMANENT,
   1350  1.145     rmind 		       CTLTYPE_NODE, "inet",
   1351  1.145     rmind 		       SYSCTL_DESCR("PF_INET related settings"),
   1352  1.145     rmind 		       NULL, 0, NULL, 0,
   1353  1.145     rmind 		       CTL_NET, PF_INET, CTL_EOL);
   1354  1.145     rmind 	sysctl_createv(clog, 0, NULL, NULL,
   1355  1.145     rmind 		       CTLFLAG_PERMANENT,
   1356  1.145     rmind 		       CTLTYPE_NODE, "ip",
   1357  1.145     rmind 		       SYSCTL_DESCR("IPv4 related settings"),
   1358  1.145     rmind 		       NULL, 0, NULL, 0,
   1359  1.145     rmind 		       CTL_NET, PF_INET, IPPROTO_IP, CTL_EOL);
   1360  1.145     rmind 
   1361  1.145     rmind 	sysctl_createv(clog, 0, NULL, NULL,
   1362  1.145     rmind 		       CTLFLAG_PERMANENT|CTLFLAG_READWRITE,
   1363  1.145     rmind 		       CTLTYPE_INT, "subnetsarelocal",
   1364  1.145     rmind 		       SYSCTL_DESCR("Whether logical subnets are considered "
   1365  1.145     rmind 				    "local"),
   1366  1.145     rmind 		       NULL, 0, &subnetsarelocal, 0,
   1367  1.145     rmind 		       CTL_NET, PF_INET, IPPROTO_IP,
   1368  1.145     rmind 		       IPCTL_SUBNETSARELOCAL, CTL_EOL);
   1369  1.145     rmind 	sysctl_createv(clog, 0, NULL, NULL,
   1370  1.145     rmind 		       CTLFLAG_PERMANENT|CTLFLAG_READWRITE,
   1371  1.145     rmind 		       CTLTYPE_INT, "hostzerobroadcast",
   1372  1.145     rmind 		       SYSCTL_DESCR("All zeroes address is broadcast address"),
   1373  1.145     rmind 		       NULL, 0, &hostzeroisbroadcast, 0,
   1374  1.145     rmind 		       CTL_NET, PF_INET, IPPROTO_IP,
   1375  1.145     rmind 		       IPCTL_HOSTZEROBROADCAST, CTL_EOL);
   1376  1.145     rmind }
   1377