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