snit.c revision 1.1.1.1 1 /* $NetBSD: snit.c,v 1.1.1.1 2012/03/23 21:20:06 christos Exp $ */
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 <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 <net/nit.h>
22 #include <sys/fcntlcom.h>
23 #include <sys/dir.h>
24 #include <net/nit_if.h>
25 #include <net/nit_pf.h>
26 #include <net/nit_buf.h>
27 #include <net/packetfilt.h>
28 #include <sys/stropts.h>
29
30 #include <net/if.h>
31 #include <netinet/in.h>
32 #include <netinet/in_systm.h>
33 #include <netinet/ip.h>
34 #include <netinet/if_ether.h>
35 #include <netinet/ip_var.h>
36 #include <netinet/udp.h>
37 #include <netinet/udp_var.h>
38 #include <netinet/tcp.h>
39 #include <netinet/tcpip.h>
40
41 #ifndef lint
42 static char snitid[] = "@(#)snit.c 1.2 12/3/95 (C)1995 Darren Reed";
43 #endif
44
45 #define BUFSPACE 32768
46
47 /*
48 * Be careful to only include those defined in the flags option for the
49 * interface are included in the header size.
50 */
51 #define BUFHDR_SIZE (sizeof(struct nit_bufhdr))
52 #define NIT_HDRSIZE (BUFHDR_SIZE)
53
54 static int timeout;
55
56
57 int ack_recv(ep)
58 char *ep;
59 {
60 struct tcpiphdr tip;
61 struct tcphdr *tcp;
62 struct ip *ip;
63
64 ip = (struct ip *)&tip;
65 tcp = (struct tcphdr *)(ip + 1);
66 bcopy(ep + 14, (char *)ip, sizeof(*ip));
67 bcopy(ep + 14 + (ip->ip_hl << 2), (char *)tcp, sizeof(*tcp));
68 if (ip->ip_off & 0x1fff != 0)
69 return 0;
70 if (0 == detect(ip, tcp))
71 return 1;
72 return 0;
73 }
74
75
76 int readloop(fd, dst)
77 int fd;
78 struct in_addr dst;
79 {
80 static u_char buf[BUFSPACE];
81 register u_char *bp, *cp, *bufend;
82 register struct nit_bufhdr *hp;
83 register int cc;
84 time_t now = time(NULL);
85 int done = 0;
86
87 while ((cc = read(fd, buf, BUFSPACE-1)) >= 0) {
88 if (!cc)
89 if ((time(NULL) - now) > timeout)
90 return done;
91 else
92 continue;
93 bp = buf;
94 bufend = buf + cc;
95 /*
96 * loop through each snapshot in the chunk
97 */
98 while (bp < bufend) {
99 cp = (u_char *)((char *)bp + NIT_HDRSIZE);
100 /*
101 * get past NIT buffer
102 */
103 hp = (struct nit_bufhdr *)bp;
104 /*
105 * next snapshot
106 */
107 bp += hp->nhb_totlen;
108 done += ack_recv(cp);
109 }
110 return done;
111 }
112 perror("read");
113 exit(-1);
114 }
115
116 int initdevice(device, tout)
117 char *device;
118 int tout;
119 {
120 struct strioctl si;
121 struct timeval to;
122 struct ifreq ifr;
123 struct packetfilt pfil;
124 u_long if_flags;
125 u_short *fwp = pfil.Pf_Filter;
126 int ret, offset, fd, snaplen= 76, chunksize = BUFSPACE;
127
128 if ((fd = open("/dev/nit", O_RDWR)) < 0)
129 {
130 perror("/dev/nit");
131 exit(-1);
132 }
133
134 /*
135 * Create some filter rules for our TCP watcher. We only want ethernet
136 * pacets which are IP protocol and only the TCP packets from IP.
137 */
138 offset = 6;
139 *fwp++ = ENF_PUSHWORD + offset;
140 *fwp++ = ENF_PUSHLIT | ENF_CAND;
141 *fwp++ = htons(ETHERTYPE_IP);
142 *fwp++ = ENF_PUSHWORD + sizeof(struct ether_header)/sizeof(short)+4;
143 *fwp++ = ENF_PUSHLIT | ENF_AND;
144 *fwp++ = htons(0x00ff);
145 *fwp++ = ENF_PUSHLIT | ENF_COR;
146 *fwp++ = htons(IPPROTO_TCP);
147 *fwp++ = ENF_PUSHWORD + sizeof(struct ether_header)/sizeof(short)+4;
148 *fwp++ = ENF_PUSHLIT | ENF_AND;
149 *fwp++ = htons(0x00ff);
150 *fwp++ = ENF_PUSHLIT | ENF_CAND;
151 *fwp++ = htons(IPPROTO_UDP);
152 pfil.Pf_FilterLen = fwp - &pfil.Pf_Filter[0];
153 /*
154 * put filter in place.
155 */
156 if (ioctl(fd, I_PUSH, "pf") == -1)
157 {
158 perror("ioctl: I_PUSH pf");
159 exit(1);
160 }
161 if (ioctl(fd, NIOCSETF, &pfil) == -1)
162 {
163 perror("ioctl: NIOCSETF");
164 exit(1);
165 }
166 /*
167 * arrange to get messages from the NIT STREAM and use NIT_BUF option
168 */
169 ioctl(fd, I_SRDOPT, (char*)RMSGD);
170 ioctl(fd, I_PUSH, "nbuf");
171 /*
172 * set the timeout
173 */
174 timeout = tout;
175 si.ic_timout = 1;
176 to.tv_sec = 1;
177 to.tv_usec = 0;
178 si.ic_cmd = NIOCSTIME;
179 si.ic_len = sizeof(to);
180 si.ic_dp = (char*)&to;
181 if (ioctl(fd, I_STR, (char*)&si) == -1)
182 {
183 perror("ioctl: NIT timeout");
184 exit(-1);
185 }
186 /*
187 * set the chunksize
188 */
189 si.ic_cmd = NIOCSCHUNK;
190 si.ic_len = sizeof(chunksize);
191 si.ic_dp = (char*)&chunksize;
192 if (ioctl(fd, I_STR, (char*)&si) == -1)
193 perror("ioctl: NIT chunksize");
194 if (ioctl(fd, NIOCGCHUNK, (char*)&chunksize) == -1)
195 {
196 perror("ioctl: NIT chunksize");
197 exit(-1);
198 }
199 printf("NIT buffer size: %d\n", chunksize);
200
201 /*
202 * request the interface
203 */
204 strncpy(ifr.ifr_name, device, sizeof(ifr.ifr_name));
205 ifr.ifr_name[sizeof(ifr.ifr_name) - 1] = ' ';
206 si.ic_cmd = NIOCBIND;
207 si.ic_len = sizeof(ifr);
208 si.ic_dp = (char*)𝔦
209 if (ioctl(fd, I_STR, (char*)&si) == -1)
210 {
211 perror(ifr.ifr_name);
212 exit(1);
213 }
214
215 /*
216 * set the snapshot length
217 */
218 si.ic_cmd = NIOCSSNAP;
219 si.ic_len = sizeof(snaplen);
220 si.ic_dp = (char*)&snaplen;
221 if (ioctl(fd, I_STR, (char*)&si) == -1)
222 {
223 perror("ioctl: NIT snaplen");
224 exit(1);
225 }
226 (void) ioctl(fd, I_FLUSH, (char*)FLUSHR);
227 return fd;
228 }
229