1/*	$FreeBSD$	*/
2
3/*
4 * (C)opyright 1992-1998 Darren Reed. (from tcplog)
5 *
6 * See the IPFILTER.LICENCE file for details on licencing.
7 *
8 */
9
10#include <stdio.h>
11#include <netdb.h>
12#include <ctype.h>
13#include <fcntl.h>
14#include <signal.h>
15#include <errno.h>
16#include <sys/types.h>
17#include <sys/time.h>
18#include <sys/timeb.h>
19#include <sys/socket.h>
20#include <sys/file.h>
21#include <sys/ioctl.h>
22#include <sys/stropts.h>
23
24#ifdef sun
25# include <sys/pfmod.h>
26# include <sys/bufmod.h>
27#endif
28#ifdef __osf__
29# include <sys/dlpihdr.h>
30# include "radix_ipf_local.h"
31#else
32# include <sys/dlpi.h>
33#endif
34#ifdef __hpux
35# include <sys/dlpi_ext.h>
36#endif
37
38#include <net/if.h>
39#include <netinet/in.h>
40#include <netinet/in_systm.h>
41#include <netinet/ip.h>
42#include <netinet/if_ether.h>
43#include <netinet/ip_var.h>
44#include <netinet/udp.h>
45#include <netinet/udp_var.h>
46#include <netinet/tcp.h>
47
48#include "ipsend.h"
49
50#if !defined(lint)
51static const char sccsid[] = "@(#)sdlpi.c	1.3 10/30/95 (C)1995 Darren Reed";
52static const char rcsid[] = "@(#)$Id: sdlpi.c,v 2.8.2.2 2007/02/17 12:41:51 darrenr Exp $";
53#endif
54
55#define	CHUNKSIZE	8192
56#define BUFSPACE	(4*CHUNKSIZE)
57
58
59/*
60 * Be careful to only include those defined in the flags option for the
61 * interface are included in the header size.
62 */
63int	initdevice(device, tout)
64char	*device;
65int	tout;
66{
67	char	devname[16], *s, buf[256];
68	int	i, fd;
69
70	(void) strcpy(devname, "/dev/");
71	(void) strncat(devname, device, sizeof(devname) - strlen(devname));
72
73	s = devname + 5;
74	while (*s && !ISDIGIT(*s))
75		s++;
76	if (!*s)
77	    {
78		fprintf(stderr, "bad device name %s\n", devname);
79		exit(-1);
80	    }
81	i = atoi(s);
82	*s = '\0';
83	/*
84	 * For writing
85	 */
86	if ((fd = open(devname, O_RDWR)) < 0)
87	    {
88		fprintf(stderr, "O_RDWR(1) ");
89		perror(devname);
90		exit(-1);
91	    }
92
93	if (dlattachreq(fd, i) == -1)
94	    {
95		fprintf(stderr, "dlattachreq: DLPI error\n");
96		exit(-1);
97	    }
98	else if (dlokack(fd, buf) == -1)
99	    {
100		fprintf(stderr, "dlokack(attach): DLPI error\n");
101		exit(-1);
102	    }
103#ifdef DL_HP_RAWDLS
104	if (dlpromisconreq(fd, DL_PROMISC_SAP) < 0)
105	    {
106		fprintf(stderr, "dlpromisconreq: DL_PROMISC_PHYS error\n");
107		exit(-1);
108	    }
109	else if (dlokack(fd, buf) < 0)
110	    {
111		fprintf(stderr, "dlokack(promisc): DLPI error\n");
112		exit(-1);
113	    }
114	/* 22 is INSAP as per the HP-UX DLPI Programmer's Guide */
115
116	dlbindreq(fd, 22, 1, DL_HP_RAWDLS, 0, 0);
117#else
118	dlbindreq(fd, ETHERTYPE_IP, 0, DL_CLDLS, 0, 0);
119#endif
120	dlbindack(fd, buf);
121	/*
122	 * write full headers
123	 */
124#ifdef DLIOCRAW /* we require RAW DLPI mode, which is a Sun extension */
125	if (strioctl(fd, DLIOCRAW, -1, 0, NULL) == -1)
126	    {
127		fprintf(stderr, "DLIOCRAW error\n");
128		exit(-1);
129	    }
130#endif
131	return fd;
132}
133
134
135/*
136 * output an IP packet onto a fd opened for /dev/nit
137 */
138int	sendip(fd, pkt, len)
139int	fd, len;
140char	*pkt;
141{
142	struct strbuf dbuf, *dp = &dbuf, *cp = NULL;
143	int pri = 0;
144#ifdef DL_HP_RAWDLS
145	struct strbuf cbuf;
146	dl_hp_rawdata_req_t raw;
147
148	cp = &cbuf;
149	raw.dl_primitive = DL_HP_RAWDATA_REQ;
150	cp->len = sizeof(raw);
151	cp->buf = (char *)&raw;
152	cp->maxlen = cp->len;
153	pri = MSG_HIPRI;
154#endif
155	/*
156	 * construct NIT STREAMS messages, first control then data.
157	 */
158	dp->buf = pkt;
159	dp->len = len;
160	dp->maxlen = dp->len;
161
162	if (putmsg(fd, cp, dp, pri) == -1)
163	    {
164		perror("putmsg");
165		return -1;
166	    }
167	if (ioctl(fd, I_FLUSH, FLUSHW) == -1)
168	    {
169		perror("I_FLUSHW");
170		return -1;
171	    }
172	return len;
173}
174
175