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 */
50 int
initdevice(char * device,int tout)51 initdevice(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 */
124 int
125 sendip(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