[apple/xnu.git] / bsd / net / if_loop.c

/*
 * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
 *
 * @APPLE_LICENSE_OSREFERENCE_HEADER_START@
 * 
 * This file contains Original Code and/or Modifications of Original Code 
 * as defined in and that are subject to the Apple Public Source License 
 * Version 2.0 (the 'License'). You may not use this file except in 
 * compliance with the License.  The rights granted to you under the 
 * License may not be used to create, or enable the creation or 
 * redistribution of, unlawful or unlicensed copies of an Apple operating 
 * system, or to circumvent, violate, or enable the circumvention or 
 * violation of, any terms of an Apple operating system software license 
 * agreement.
 *
 * Please obtain a copy of the License at 
 * http://www.opensource.apple.com/apsl/ and read it before using this 
 * file.
 *
 * The Original Code and all software distributed under the License are 
 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER 
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES, 
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, 
 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT. 
 * Please see the License for the specific language governing rights and 
 * limitations under the License.
 *
 * @APPLE_LICENSE_OSREFERENCE_HEADER_END@
 */
/*
 * Copyright (c) 1982, 1986, 1993
 *	The Regents of the University of California.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *	This product includes software developed by the University of
 *	California, Berkeley and its contributors.
 * 4. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 *	@(#)if_loop.c	8.1 (Berkeley) 6/10/93
 * $FreeBSD: src/sys/net/if_loop.c,v 1.47.2.5 2001/07/03 11:01:41 ume Exp $
 */

/*
 * Loopback interface driver for protocol testing and timing.
 */
#include "loop.h"
#if NLOOP > 0

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/mbuf.h>
#include <sys/socket.h>
#include <sys/sockio.h>

#include <net/if.h>
#include <net/if_types.h>
#include <net/route.h>
#include <net/bpf.h>
#include <sys/malloc.h>

#if	INET
#include <netinet/in.h>
#include <netinet/in_var.h>
#endif

#if IPX
#include <netipx/ipx.h>
#include <netipx/ipx_if.h>
#endif

#if INET6
#ifndef INET
#include <netinet/in.h>
#endif
#include <netinet6/in6_var.h>
#include <netinet/ip6.h>
#endif

#include <net/dlil.h>
#include <net/kpi_protocol.h>

#if NETAT
extern struct ifqueue atalkintrq;
#endif

#include "bpfilter.h"
#if NBPFILTER > 0
#include <net/bpfdesc.h>
#endif

#define NLOOP_ATTACHMENTS (NLOOP * 12)

struct lo_statics_str {
	int				bpf_mode;
	bpf_packet_func	bpf_callback;
};

void loopattach(void *dummy);

static struct lo_statics_str lo_statics[NLOOP];
int loopattach_done = 0; /* used to sync ip6_init2 loopback configuration */

#ifdef TINY_LOMTU
#define	LOMTU	(1024+512)
#else
#define LOMTU	16384
#endif

struct	ifnet loif[NLOOP];
struct ifnet *lo_ifp = &loif[0];

struct	loopback_header {
	u_long		protocol;
};

void lo_reg_if_mods(void);

/* Local forward declerations */

static errno_t
lo_demux(
    __unused ifnet_t	ifp,
    __unused mbuf_t		m,
    char				*frame_header,
    protocol_family_t	*protocol_family)
{
	struct loopback_header *header = (struct loopback_header *)frame_header;
	
	*protocol_family = header->protocol;
	
	return 0;
}


static errno_t
lo_framer(
    __unused ifnet_t				ifp,
    mbuf_t							*m,
    __unused const struct sockaddr	*dest,
    __unused const char            	*dest_linkaddr,
    const char						*frame_type)
{
	struct loopback_header  *header;

	M_PREPEND(*m, sizeof(struct loopback_header), M_WAITOK);
	header = mtod(*m, struct loopback_header*);
	header->protocol = *(const u_long*)frame_type;
	return 0;
}

static errno_t
lo_add_proto(
	__unused struct ifnet			*ifp,
	__unused u_long					protocol_family,
	__unused struct ddesc_head_str	*demux_desc_head)
{
    return 0;
}


static errno_t
lo_del_proto(
	__unused ifnet_t			ifp,
	__unused protocol_family_t	protocol)
{
	return 0;
}

static int
lo_output(
	struct ifnet *ifp,
	struct mbuf *m)
{

	if ((m->m_flags & M_PKTHDR) == 0)
		panic("lo_output: no HDR");

	/*
	 * Don't overwrite the rcvif field if it is in use.
	 *  This is used to match multicast packets, sent looping
	 *  back, with the appropriate group record on input.
	 */
	if (m->m_pkthdr.rcvif == NULL)
		m->m_pkthdr.rcvif = ifp;

	ifp->if_ibytes += m->m_pkthdr.len;
	ifp->if_obytes += m->m_pkthdr.len;

	ifp->if_opackets++;
	ifp->if_ipackets++;

	m->m_pkthdr.header = mtod(m, char *);
	m->m_pkthdr.csum_data = 0xffff; /* loopback checksums are always OK */
	m->m_pkthdr.csum_flags = CSUM_DATA_VALID | CSUM_PSEUDO_HDR | 
							 CSUM_IP_CHECKED | CSUM_IP_VALID;
	m_adj(m, sizeof(struct loopback_header));

#if NBPFILTER > 0
	if (lo_statics[ifp->if_unit].bpf_mode != BPF_TAP_DISABLE) {
		struct mbuf m0, *n;

		n = m;
		if (ifp->if_bpf->bif_dlt == DLT_NULL) {
			struct loopback_header  *header;
			/*
			 * We need to prepend the address family as
			 * a four byte field.  Cons up a dummy header
			 * to pacify bpf.  This is safe because bpf
			 * will only read from the mbuf (i.e., it won't
			 * try to free it or keep a pointer a to it).
			 */
			header = (struct loopback_header*)m->m_pkthdr.header;
			m0.m_next = m;
			m0.m_len = 4;
			m0.m_data = (char *)&header->protocol;
			n = &m0;
		}

		lo_statics[ifp->if_unit].bpf_callback(ifp, n);
	}
#endif

	return dlil_input(ifp, m, m);
}


/*
 * This is a common pre-output route used by INET and INET6. This could
 * (should?) be split into separate pre-output routines for each protocol.
 */

static int
lo_pre_output(
	__unused struct ifnet	*ifp,
	u_long			protocol_family,
	struct mbuf		**m,
	__unused const struct sockaddr	*dst,
	caddr_t			route,
	char			*frame_type,
	__unused char	*dst_addr)

{
	register struct rtentry *rt = (struct rtentry *) route;

	if (((*m)->m_flags & M_PKTHDR) == 0)
		panic("looutput no HDR");

	if (rt && rt->rt_flags & (RTF_REJECT|RTF_BLACKHOLE)) {
		if (rt->rt_flags & RTF_BLACKHOLE) {
			m_freem(*m);
			return EJUSTRETURN;
		}
		else
			return ((rt->rt_flags & RTF_HOST) ? EHOSTUNREACH : ENETUNREACH);
	}
	
	*(u_long *)frame_type = protocol_family;

	return 0;
}

/*
 *  lo_input - This should work for all attached protocols that use the
 *             ifq/schednetisr input mechanism.
 */
static int
lo_input(
	struct mbuf				*m,
	__unused char			*fh,
	__unused struct ifnet	*ifp,
	__unused u_long			protocol_family,
	__unused int			sync_ok)
{
	if (proto_input(protocol_family, m) != 0)
		m_freem(m);
	return (0);
}


/* ARGSUSED */
static void
lortrequest(
	__unused int cmd,
	struct rtentry *rt,
	__unused struct sockaddr *sa)
{
	if (rt) {
		rt->rt_rmx.rmx_mtu = rt->rt_ifp->if_mtu; /* for ISO */
		/*
		 * For optimal performance, the send and receive buffers
		 * should be at least twice the MTU plus a little more for
		 * overhead.
		 */
		rt->rt_rmx.rmx_recvpipe = 
			rt->rt_rmx.rmx_sendpipe = 3 * LOMTU;
	}
}

/*
 * Process an ioctl request.
 */
static errno_t
loioctl(
	ifnet_t		ifp,
	u_int32_t	cmd,
	void*		data)
{
	register struct ifaddr *ifa;
	register struct ifreq *ifr = (struct ifreq *)data;
	register int error = 0;

	switch (cmd) {

	case SIOCSIFADDR:
		ifnet_set_flags(ifp, IFF_UP | IFF_RUNNING, IFF_UP | IFF_RUNNING);
		ifa = (struct ifaddr *)data;
		ifa->ifa_rtrequest = lortrequest;
		/*
		 * Everything else is done at a higher level.
		 */
		break;

	case SIOCADDMULTI:
	case SIOCDELMULTI:
		if (ifr == 0) {
			error = EAFNOSUPPORT;		/* XXX */
			break;
		}
		switch (ifr->ifr_addr.sa_family) {

#if INET
		case AF_INET:
			break;
#endif
#if INET6
		case AF_INET6:
			break;
#endif

		default:
			error = EAFNOSUPPORT;
			break;
		}
		break;

	case SIOCSIFMTU:
		ifp->if_mtu = ifr->ifr_mtu;
		break;

	case SIOCSIFFLAGS:
		break;

	default:
		error = EOPNOTSUPP;
		break;
	}
	return (error);
}
#endif /* NLOOP > 0 */


static int  lo_attach_proto(struct ifnet *ifp, u_long protocol_family)
{
	struct dlil_proto_reg_str   reg;
	int   stat =0 ;
	
	bzero(&reg, sizeof(reg));
	TAILQ_INIT(&reg.demux_desc_head);
	reg.interface_family = ifp->if_family;
	reg.unit_number      = ifp->if_unit;
	reg.input			 = lo_input;
	reg.pre_output       = lo_pre_output;
	reg.protocol_family  = protocol_family;
	
	stat = dlil_attach_protocol(&reg);

	if (stat && stat != EEXIST) {
		printf("lo_attach_proto: dlil_attach_protocol for %d returned=%d\n",
			   protocol_family, stat);
	}
	
	return stat;
}

void lo_reg_if_mods()
{
     int error;

	/* Register protocol registration functions */
	if ((error = dlil_reg_proto_module(PF_INET, APPLE_IF_FAM_LOOPBACK, lo_attach_proto, NULL)) != 0)
		printf("dlil_reg_proto_module failed for AF_INET error=%d\n", error);

	if ((error = dlil_reg_proto_module(PF_INET6, APPLE_IF_FAM_LOOPBACK, lo_attach_proto, NULL)) != 0)
		printf("dlil_reg_proto_module failed for AF_INET6 error=%d\n", error);
}

static errno_t
lo_set_bpf_tap(
	ifnet_t			ifp,
	bpf_tap_mode	mode,
	bpf_packet_func	bpf_callback)
{

  /*
   * NEED MUTEX HERE XXX
   */
	if (mode == BPF_TAP_DISABLE) {
		lo_statics[ifp->if_unit].bpf_mode = mode;
		lo_statics[ifp->if_unit].bpf_callback = bpf_callback;
	}
	else {
		lo_statics[ifp->if_unit].bpf_callback = bpf_callback;
		lo_statics[ifp->if_unit].bpf_mode = mode;		
	}

	return 0;
}


/* ARGSUSED */
void
loopattach(
	__unused void *dummy)
{
	struct ifnet *ifp;
	int i = 0;

	lo_reg_if_mods();

	for (ifp = loif; i < NLOOP; ifp++) {
		lo_statics[i].bpf_callback = 0;
		lo_statics[i].bpf_mode      = BPF_TAP_DISABLE;
		bzero(ifp, sizeof(struct ifnet));
		ifp->if_name = "lo";
		ifp->if_family = APPLE_IF_FAM_LOOPBACK;
		ifp->if_unit = i++;
		ifp->if_mtu = LOMTU;
		ifp->if_flags = IFF_LOOPBACK | IFF_MULTICAST;
		ifp->if_ioctl = loioctl;
		ifp->if_demux = lo_demux;
		ifp->if_framer = lo_framer;
		ifp->if_add_proto = lo_add_proto;
		ifp->if_del_proto = lo_del_proto;
		ifp->if_set_bpf_tap = lo_set_bpf_tap;
		ifp->if_output = lo_output;
		ifp->if_type = IFT_LOOP;
		ifp->if_hwassist = IF_HWASSIST_CSUM_IP | IF_HWASSIST_CSUM_TCP | IF_HWASSIST_CSUM_UDP;
		ifp->if_hdrlen = sizeof(struct loopback_header);
		lo_ifp = ifp;
		dlil_if_attach(ifp);
#if NBPFILTER > 0
		bpfattach(ifp, DLT_NULL, sizeof(u_int));
#endif
	}
	loopattach_done = 1;
}
Commit	Line	Data
1c79356b	1	/*
5d5c5d0d A	2	* Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
5d5c5d0d A	3	*
8ad349bb	4	* @APPLE_LICENSE_OSREFERENCE_HEADER_START@
1c79356b	5	*
8ad349bb A	6	* This file contains Original Code and/or Modifications of Original Code
	7	* as defined in and that are subject to the Apple Public Source License
	8	* Version 2.0 (the 'License'). You may not use this file except in
	9	* compliance with the License. The rights granted to you under the
	10	* License may not be used to create, or enable the creation or
	11	* redistribution of, unlawful or unlicensed copies of an Apple operating
	12	* system, or to circumvent, violate, or enable the circumvention or
	13	* violation of, any terms of an Apple operating system software license
	14	* agreement.
	15	*
	16	* Please obtain a copy of the License at
	17	* http://www.opensource.apple.com/apsl/ and read it before using this
	18	* file.
	19	*
	20	* The Original Code and all software distributed under the License are
	21	* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
	22	* EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
	23	* INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
	24	* FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
	25	* Please see the License for the specific language governing rights and
	26	* limitations under the License.
	27	*
	28	* @APPLE_LICENSE_OSREFERENCE_HEADER_END@
1c79356b A	29	*/
	30	/*
	31	* Copyright (c) 1982, 1986, 1993
	32	* The Regents of the University of California. All rights reserved.
	33	*
	34	* Redistribution and use in source and binary forms, with or without
	35	* modification, are permitted provided that the following conditions
	36	* are met:
	37	* 1. Redistributions of source code must retain the above copyright
	38	* notice, this list of conditions and the following disclaimer.
	39	* 2. Redistributions in binary form must reproduce the above copyright
	40	* notice, this list of conditions and the following disclaimer in the
	41	* documentation and/or other materials provided with the distribution.
	42	* 3. All advertising materials mentioning features or use of this software
	43	* must display the following acknowledgement:
	44	* This product includes software developed by the University of
	45	* California, Berkeley and its contributors.
	46	* 4. Neither the name of the University nor the names of its contributors
	47	* may be used to endorse or promote products derived from this software
	48	* without specific prior written permission.
	49	*
	50	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
	51	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	52	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	53	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
	54	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	55	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	56	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	57	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	58	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	59	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	60	* SUCH DAMAGE.
	61	*
	62	* @(#)if_loop.c 8.1 (Berkeley) 6/10/93
9bccf70c	63	* $FreeBSD: src/sys/net/if_loop.c,v 1.47.2.5 2001/07/03 11:01:41 ume Exp $
1c79356b A	64	*/
	65
	66	/*
	67	* Loopback interface driver for protocol testing and timing.
	68	*/
	69	#include "loop.h"
	70	#if NLOOP > 0
	71
	72	#include <sys/param.h>
	73	#include <sys/systm.h>
	74	#include <sys/kernel.h>
	75	#include <sys/mbuf.h>
	76	#include <sys/socket.h>
	77	#include <sys/sockio.h>
	78
	79	#include <net/if.h>
	80	#include <net/if_types.h>
1c79356b A	81	#include <net/route.h>
	82	#include <net/bpf.h>
	83	#include <sys/malloc.h>
	84
	85	#if INET
	86	#include <netinet/in.h>
	87	#include <netinet/in_var.h>
	88	#endif
	89
	90	#if IPX
	91	#include <netipx/ipx.h>
	92	#include <netipx/ipx_if.h>
	93	#endif
	94
	95	#if INET6
	96	#ifndef INET
	97	#include <netinet/in.h>
	98	#endif
	99	#include <netinet6/in6_var.h>
	100	#include <netinet/ip6.h>
	101	#endif
	102
1c79356b	103	#include <net/dlil.h>
91447636	104	#include <net/kpi_protocol.h>
1c79356b A	105
	106	#if NETAT
	107	extern struct ifqueue atalkintrq;
	108	#endif
	109
	110	#include "bpfilter.h"
	111	#if NBPFILTER > 0
	112	#include <net/bpfdesc.h>
	113	#endif
	114
	115	#define NLOOP_ATTACHMENTS (NLOOP * 12)
	116
	117	struct lo_statics_str {
91447636 A	118	int bpf_mode;
91447636 A	119	bpf_packet_func bpf_callback;
1c79356b A	120	};
1c79356b A	121
91447636	122	void loopattach(void *dummy);
1c79356b	123
91447636 A	124	static struct lo_statics_str lo_statics[NLOOP];
91447636 A	125	int loopattach_done = 0; /* used to sync ip6_init2 loopback configuration */
1c79356b A	126
	127	#ifdef TINY_LOMTU
	128	#define LOMTU (1024+512)
	129	#else
	130	#define LOMTU 16384
	131	#endif
	132
	133	struct ifnet loif[NLOOP];
91447636	134	struct ifnet *lo_ifp = &loif[0];
1c79356b	135
91447636 A	136	struct loopback_header {
	137	u_long protocol;
	138	};
1c79356b	139
91447636	140	void lo_reg_if_mods(void);
1c79356b	141
91447636	142	/* Local forward declerations */
1c79356b	143
91447636 A	144	static errno_t
	145	lo_demux(
	146	__unused ifnet_t ifp,
	147	__unused mbuf_t m,
	148	char *frame_header,
	149	protocol_family_t *protocol_family)
1c79356b	150	{
91447636 A	151	struct loopback_header header = (struct loopback_header )frame_header;
	152
	153	*protocol_family = header->protocol;
	154
	155	return 0;
1c79356b A	156	}
	157
	158
91447636 A	159	static errno_t
	160	lo_framer(
	161	__unused ifnet_t ifp,
	162	mbuf_t *m,
	163	__unused const struct sockaddr *dest,
	164	__unused const char *dest_linkaddr,
	165	const char *frame_type)
1c79356b	166	{
91447636	167	struct loopback_header *header;
1c79356b	168
91447636 A	169	M_PREPEND(*m, sizeof(struct loopback_header), M_WAITOK);
	170	header = mtod(m, struct loopback_header);
	171	header->protocol = (const u_long)frame_type;
1c79356b A	172	return 0;
	173	}
	174
91447636 A	175	static errno_t
	176	lo_add_proto(
	177	__unused struct ifnet *ifp,
	178	__unused u_long protocol_family,
	179	__unused struct ddesc_head_str *demux_desc_head)
1c79356b A	180	{
	181	return 0;
	182	}
	183
	184
91447636 A	185	static errno_t
	186	lo_del_proto(
	187	__unused ifnet_t ifp,
	188	__unused protocol_family_t protocol)
1c79356b	189	{
91447636	190	return 0;
1c79356b A	191	}
	192
	193	static int
91447636 A	194	lo_output(
	195	struct ifnet *ifp,
	196	struct mbuf *m)
	197	{
1c79356b A	198
	199	if ((m->m_flags & M_PKTHDR) == 0)
	200	panic("lo_output: no HDR");
	201
	202	/*
	203	* Don't overwrite the rcvif field if it is in use.
	204	* This is used to match multicast packets, sent looping
	205	* back, with the appropriate group record on input.
	206	*/
	207	if (m->m_pkthdr.rcvif == NULL)
	208	m->m_pkthdr.rcvif = ifp;
1c79356b	209
91447636 A	210	ifp->if_ibytes += m->m_pkthdr.len;
	211	ifp->if_obytes += m->m_pkthdr.len;
	212
	213	ifp->if_opackets++;
	214	ifp->if_ipackets++;
	215
	216	m->m_pkthdr.header = mtod(m, char *);
	217	m->m_pkthdr.csum_data = 0xffff; /* loopback checksums are always OK */
	218	m->m_pkthdr.csum_flags = CSUM_DATA_VALID \| CSUM_PSEUDO_HDR \|
	219	CSUM_IP_CHECKED \| CSUM_IP_VALID;
	220	m_adj(m, sizeof(struct loopback_header));
1c79356b A	221
	222	#if NBPFILTER > 0
	223	if (lo_statics[ifp->if_unit].bpf_mode != BPF_TAP_DISABLE) {
	224	struct mbuf m0, *n;
	225
1c79356b A	226	n = m;
1c79356b A	227	if (ifp->if_bpf->bif_dlt == DLT_NULL) {
91447636	228	struct loopback_header *header;
1c79356b A	229	/*
	230	* We need to prepend the address family as
	231	* a four byte field. Cons up a dummy header
	232	* to pacify bpf. This is safe because bpf
	233	* will only read from the mbuf (i.e., it won't
	234	* try to free it or keep a pointer a to it).
	235	*/
91447636	236	header = (struct loopback_header*)m->m_pkthdr.header;
1c79356b A	237	m0.m_next = m;
1c79356b A	238	m0.m_len = 4;
91447636	239	m0.m_data = (char *)&header->protocol;
1c79356b A	240	n = &m0;
	241	}
	242
91447636	243	lo_statics[ifp->if_unit].bpf_callback(ifp, n);
1c79356b A	244	}
	245	#endif
	246
1c79356b A	247	return dlil_input(ifp, m, m);
	248	}
	249
	250
	251	/*
91447636	252	* This is a common pre-output route used by INET and INET6. This could
1c79356b A	253	* (should?) be split into separate pre-output routines for each protocol.
	254	*/
	255
	256	static int
91447636 A	257	lo_pre_output(
	258	__unused struct ifnet *ifp,
	259	u_long protocol_family,
	260	struct mbuf **m,
	261	__unused const struct sockaddr *dst,
	262	caddr_t route,
	263	char *frame_type,
	264	__unused char *dst_addr)
1c79356b A	265
1c79356b A	266	{
1c79356b A	267	register struct rtentry rt = (struct rtentry ) route;
1c79356b A	268
1c79356b A	269	if (((*m)->m_flags & M_PKTHDR) == 0)
	270	panic("looutput no HDR");
	271
	272	if (rt && rt->rt_flags & (RTF_REJECT\|RTF_BLACKHOLE)) {
91447636 A	273	if (rt->rt_flags & RTF_BLACKHOLE) {
	274	m_freem(*m);
	275	return EJUSTRETURN;
	276	}
	277	else
	278	return ((rt->rt_flags & RTF_HOST) ? EHOSTUNREACH : ENETUNREACH);
1c79356b	279	}
91447636 A	280
91447636 A	281	(u_long )frame_type = protocol_family;
1c79356b A	282
	283	return 0;
	284	}
	285
1c79356b A	286	/*
	287	* lo_input - This should work for all attached protocols that use the
	288	* ifq/schednetisr input mechanism.
	289	*/
91447636 A	290	static int
	291	lo_input(
	292	struct mbuf *m,
	293	__unused char *fh,
	294	__unused struct ifnet *ifp,
	295	__unused u_long protocol_family,
	296	__unused int sync_ok)
1c79356b	297	{
91447636	298	if (proto_input(protocol_family, m) != 0)
1c79356b	299	m_freem(m);
1c79356b A	300	return (0);
	301	}
	302
	303
	304
	305
	306	/* ARGSUSED */
	307	static void
91447636 A	308	lortrequest(
	309	__unused int cmd,
	310	struct rtentry *rt,
	311	__unused struct sockaddr *sa)
1c79356b A	312	{
	313	if (rt) {
	314	rt->rt_rmx.rmx_mtu = rt->rt_ifp->if_mtu; /* for ISO */
	315	/*
	316	* For optimal performance, the send and receive buffers
	317	* should be at least twice the MTU plus a little more for
	318	* overhead.
	319	*/
	320	rt->rt_rmx.rmx_recvpipe =
	321	rt->rt_rmx.rmx_sendpipe = 3 * LOMTU;
	322	}
	323	}
	324
	325	/*
	326	* Process an ioctl request.
	327	*/
91447636 A	328	static errno_t
	329	loioctl(
	330	ifnet_t ifp,
	331	u_int32_t cmd,
	332	void* data)
1c79356b A	333	{
	334	register struct ifaddr *ifa;
	335	register struct ifreq ifr = (struct ifreq )data;
	336	register int error = 0;
	337
	338	switch (cmd) {
	339
	340	case SIOCSIFADDR:
91447636	341	ifnet_set_flags(ifp, IFF_UP \| IFF_RUNNING, IFF_UP \| IFF_RUNNING);
1c79356b A	342	ifa = (struct ifaddr *)data;
	343	ifa->ifa_rtrequest = lortrequest;
	344	/*
	345	* Everything else is done at a higher level.
	346	*/
	347	break;
	348
	349	case SIOCADDMULTI:
	350	case SIOCDELMULTI:
	351	if (ifr == 0) {
	352	error = EAFNOSUPPORT; /* XXX */
	353	break;
	354	}
	355	switch (ifr->ifr_addr.sa_family) {
	356
	357	#if INET
	358	case AF_INET:
	359	break;
	360	#endif
	361	#if INET6
	362	case AF_INET6:
	363	break;
	364	#endif
	365
	366	default:
	367	error = EAFNOSUPPORT;
	368	break;
	369	}
	370	break;
	371
	372	case SIOCSIFMTU:
	373	ifp->if_mtu = ifr->ifr_mtu;
	374	break;
	375
	376	case SIOCSIFFLAGS:
	377	break;
	378
	379	default:
	380	error = EOPNOTSUPP;
4a249263	381	break;
1c79356b A	382	}
	383	return (error);
	384	}
	385	#endif /* NLOOP > 0 */
	386
	387
91447636	388	static int lo_attach_proto(struct ifnet *ifp, u_long protocol_family)
1c79356b	389	{
91447636 A	390	struct dlil_proto_reg_str reg;
	391	int stat =0 ;
	392
	393	bzero(&reg, sizeof(reg));
	394	TAILQ_INIT(&reg.demux_desc_head);
	395	reg.interface_family = ifp->if_family;
	396	reg.unit_number = ifp->if_unit;
	397	reg.input = lo_input;
	398	reg.pre_output = lo_pre_output;
	399	reg.protocol_family = protocol_family;
	400
	401	stat = dlil_attach_protocol(&reg);
1c79356b	402
91447636 A	403	if (stat && stat != EEXIST) {
	404	printf("lo_attach_proto: dlil_attach_protocol for %d returned=%d\n",
	405	protocol_family, stat);
9bccf70c	406	}
91447636 A	407
91447636 A	408	return stat;
9bccf70c A	409	}
9bccf70c A	410
55e303ae A	411	void lo_reg_if_mods()
55e303ae A	412	{
55e303ae A	413	int error;
55e303ae A	414
55e303ae	415	/* Register protocol registration functions */
91447636	416	if ((error = dlil_reg_proto_module(PF_INET, APPLE_IF_FAM_LOOPBACK, lo_attach_proto, NULL)) != 0)
55e303ae A	417	printf("dlil_reg_proto_module failed for AF_INET error=%d\n", error);
55e303ae A	418
91447636	419	if ((error = dlil_reg_proto_module(PF_INET6, APPLE_IF_FAM_LOOPBACK, lo_attach_proto, NULL)) != 0)
55e303ae	420	printf("dlil_reg_proto_module failed for AF_INET6 error=%d\n", error);
55e303ae	421	}
1c79356b	422
91447636 A	423	static errno_t
	424	lo_set_bpf_tap(
	425	ifnet_t ifp,
	426	bpf_tap_mode mode,
	427	bpf_packet_func bpf_callback)
1c79356b A	428	{
	429
	430	/*
	431	* NEED MUTEX HERE XXX
	432	*/
	433	if (mode == BPF_TAP_DISABLE) {
	434	lo_statics[ifp->if_unit].bpf_mode = mode;
	435	lo_statics[ifp->if_unit].bpf_callback = bpf_callback;
	436	}
	437	else {
	438	lo_statics[ifp->if_unit].bpf_callback = bpf_callback;
	439	lo_statics[ifp->if_unit].bpf_mode = mode;
	440	}
	441
	442	return 0;
	443	}
	444
	445
	446	/* ARGSUSED */
	447	void
91447636 A	448	loopattach(
91447636 A	449	__unused void *dummy)
1c79356b	450	{
91447636 A	451	struct ifnet *ifp;
91447636 A	452	int i = 0;
1c79356b	453
1c79356b A	454	lo_reg_if_mods();
	455
	456	for (ifp = loif; i < NLOOP; ifp++) {
	457	lo_statics[i].bpf_callback = 0;
	458	lo_statics[i].bpf_mode = BPF_TAP_DISABLE;
91447636	459	bzero(ifp, sizeof(struct ifnet));
1c79356b A	460	ifp->if_name = "lo";
	461	ifp->if_family = APPLE_IF_FAM_LOOPBACK;
	462	ifp->if_unit = i++;
	463	ifp->if_mtu = LOMTU;
	464	ifp->if_flags = IFF_LOOPBACK \| IFF_MULTICAST;
91447636 A	465	ifp->if_ioctl = loioctl;
	466	ifp->if_demux = lo_demux;
	467	ifp->if_framer = lo_framer;
	468	ifp->if_add_proto = lo_add_proto;
	469	ifp->if_del_proto = lo_del_proto;
1c79356b A	470	ifp->if_set_bpf_tap = lo_set_bpf_tap;
	471	ifp->if_output = lo_output;
	472	ifp->if_type = IFT_LOOP;
91447636 A	473	ifp->if_hwassist = IF_HWASSIST_CSUM_IP \| IF_HWASSIST_CSUM_TCP \| IF_HWASSIST_CSUM_UDP;
	474	ifp->if_hdrlen = sizeof(struct loopback_header);
	475	lo_ifp = ifp;
1c79356b A	476	dlil_if_attach(ifp);
	477	#if NBPFILTER > 0
	478	bpfattach(ifp, DLT_NULL, sizeof(u_int));
	479	#endif
	480	}
91447636	481	loopattach_done = 1;
1c79356b	482	}