xref: /freebsd/contrib/libpcap/pcap.c (revision 4fd2d3b6927878771635a3628ae1623daf810d39)
1 /*
2  * Copyright (c) 1993, 1994, 1995, 1996, 1997, 1998
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *	This product includes software developed by the Computer Systems
16  *	Engineering Group at Lawrence Berkeley Laboratory.
17  * 4. Neither the name of the University nor of the Laboratory may be used
18  *    to endorse or promote products derived from this software without
19  *    specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33 
34 #ifndef lint
35 static const char rcsid[] _U_ =
36     "@(#) $Header: /tcpdump/master/libpcap/pcap.c,v 1.88.2.19 2007/09/19 02:50:52 guy Exp $ (LBL)";
37 #endif
38 
39 #ifdef HAVE_CONFIG_H
40 #include "config.h"
41 #endif
42 
43 #ifdef WIN32
44 #include <pcap-stdinc.h>
45 #else /* WIN32 */
46 #include <sys/types.h>
47 #endif /* WIN32 */
48 
49 #include <stdio.h>
50 #include <stdlib.h>
51 #include <string.h>
52 #if !defined(_MSC_VER) && !defined(__BORLANDC__)
53 #include <unistd.h>
54 #endif
55 #include <fcntl.h>
56 #include <errno.h>
57 
58 #ifdef HAVE_OS_PROTO_H
59 #include "os-proto.h"
60 #endif
61 
62 #ifdef MSDOS
63 #include "pcap-dos.h"
64 #endif
65 
66 #include "pcap-int.h"
67 
68 #ifdef HAVE_DAG_API
69 #include <dagnew.h>
70 #include <dagapi.h>
71 #endif
72 
73 int
74 pcap_dispatch(pcap_t *p, int cnt, pcap_handler callback, u_char *user)
75 {
76 
77 	return p->read_op(p, cnt, callback, user);
78 }
79 
80 /*
81  * XXX - is this necessary?
82  */
83 int
84 pcap_read(pcap_t *p, int cnt, pcap_handler callback, u_char *user)
85 {
86 
87 	return p->read_op(p, cnt, callback, user);
88 }
89 
90 int
91 pcap_loop(pcap_t *p, int cnt, pcap_handler callback, u_char *user)
92 {
93 	register int n;
94 
95 	for (;;) {
96 		if (p->sf.rfile != NULL) {
97 			/*
98 			 * 0 means EOF, so don't loop if we get 0.
99 			 */
100 			n = pcap_offline_read(p, cnt, callback, user);
101 		} else {
102 			/*
103 			 * XXX keep reading until we get something
104 			 * (or an error occurs)
105 			 */
106 			do {
107 				n = p->read_op(p, cnt, callback, user);
108 			} while (n == 0);
109 		}
110 		if (n <= 0)
111 			return (n);
112 		if (cnt > 0) {
113 			cnt -= n;
114 			if (cnt <= 0)
115 				return (0);
116 		}
117 	}
118 }
119 
120 struct singleton {
121 	struct pcap_pkthdr *hdr;
122 	const u_char *pkt;
123 };
124 
125 
126 static void
127 pcap_oneshot(u_char *userData, const struct pcap_pkthdr *h, const u_char *pkt)
128 {
129 	struct singleton *sp = (struct singleton *)userData;
130 	*sp->hdr = *h;
131 	sp->pkt = pkt;
132 }
133 
134 const u_char *
135 pcap_next(pcap_t *p, struct pcap_pkthdr *h)
136 {
137 	struct singleton s;
138 
139 	s.hdr = h;
140 	if (pcap_dispatch(p, 1, pcap_oneshot, (u_char*)&s) <= 0)
141 		return (0);
142 	return (s.pkt);
143 }
144 
145 struct pkt_for_fakecallback {
146 	struct pcap_pkthdr *hdr;
147 	const u_char **pkt;
148 };
149 
150 static void
151 pcap_fakecallback(u_char *userData, const struct pcap_pkthdr *h,
152     const u_char *pkt)
153 {
154 	struct pkt_for_fakecallback *sp = (struct pkt_for_fakecallback *)userData;
155 
156 	*sp->hdr = *h;
157 	*sp->pkt = pkt;
158 }
159 
160 int
161 pcap_next_ex(pcap_t *p, struct pcap_pkthdr **pkt_header,
162     const u_char **pkt_data)
163 {
164 	struct pkt_for_fakecallback s;
165 
166 	s.hdr = &p->pcap_header;
167 	s.pkt = pkt_data;
168 
169 	/* Saves a pointer to the packet headers */
170 	*pkt_header= &p->pcap_header;
171 
172 	if (p->sf.rfile != NULL) {
173 		int status;
174 
175 		/* We are on an offline capture */
176 		status = pcap_offline_read(p, 1, pcap_fakecallback,
177 		    (u_char *)&s);
178 
179 		/*
180 		 * Return codes for pcap_offline_read() are:
181 		 *   -  0: EOF
182 		 *   - -1: error
183 		 *   - >1: OK
184 		 * The first one ('0') conflicts with the return code of
185 		 * 0 from pcap_read() meaning "no packets arrived before
186 		 * the timeout expired", so we map it to -2 so you can
187 		 * distinguish between an EOF from a savefile and a
188 		 * "no packets arrived before the timeout expired, try
189 		 * again" from a live capture.
190 		 */
191 		if (status == 0)
192 			return (-2);
193 		else
194 			return (status);
195 	}
196 
197 	/*
198 	 * Return codes for pcap_read() are:
199 	 *   -  0: timeout
200 	 *   - -1: error
201 	 *   - -2: loop was broken out of with pcap_breakloop()
202 	 *   - >1: OK
203 	 * The first one ('0') conflicts with the return code of 0 from
204 	 * pcap_offline_read() meaning "end of file".
205 	*/
206 	return (p->read_op(p, 1, pcap_fakecallback, (u_char *)&s));
207 }
208 
209 /*
210  * Force the loop in "pcap_read()" or "pcap_read_offline()" to terminate.
211  */
212 void
213 pcap_breakloop(pcap_t *p)
214 {
215 	p->break_loop = 1;
216 }
217 
218 int
219 pcap_datalink(pcap_t *p)
220 {
221 	return (p->linktype);
222 }
223 
224 int
225 pcap_list_datalinks(pcap_t *p, int **dlt_buffer)
226 {
227 	if (p->dlt_count == 0) {
228 		/*
229 		 * We couldn't fetch the list of DLTs, which means
230 		 * this platform doesn't support changing the
231 		 * DLT for an interface.  Return a list of DLTs
232 		 * containing only the DLT this device supports.
233 		 */
234 		*dlt_buffer = (int*)malloc(sizeof(**dlt_buffer));
235 		if (*dlt_buffer == NULL) {
236 			(void)snprintf(p->errbuf, sizeof(p->errbuf),
237 			    "malloc: %s", pcap_strerror(errno));
238 			return (-1);
239 		}
240 		**dlt_buffer = p->linktype;
241 		return (1);
242 	} else {
243 		*dlt_buffer = (int*)calloc(sizeof(**dlt_buffer), p->dlt_count);
244 		if (*dlt_buffer == NULL) {
245 			(void)snprintf(p->errbuf, sizeof(p->errbuf),
246 			    "malloc: %s", pcap_strerror(errno));
247 			return (-1);
248 		}
249 		(void)memcpy(*dlt_buffer, p->dlt_list,
250 		    sizeof(**dlt_buffer) * p->dlt_count);
251 		return (p->dlt_count);
252 	}
253 }
254 
255 int
256 pcap_set_datalink(pcap_t *p, int dlt)
257 {
258 	int i;
259 	const char *dlt_name;
260 
261 	if (p->dlt_count == 0 || p->set_datalink_op == NULL) {
262 		/*
263 		 * We couldn't fetch the list of DLTs, or we don't
264 		 * have a "set datalink" operation, which means
265 		 * this platform doesn't support changing the
266 		 * DLT for an interface.  Check whether the new
267 		 * DLT is the one this interface supports.
268 		 */
269 		if (p->linktype != dlt)
270 			goto unsupported;
271 
272 		/*
273 		 * It is, so there's nothing we need to do here.
274 		 */
275 		return (0);
276 	}
277 	for (i = 0; i < p->dlt_count; i++)
278 		if (p->dlt_list[i] == dlt)
279 			break;
280 	if (i >= p->dlt_count)
281 		goto unsupported;
282 	if (p->dlt_count == 2 && p->dlt_list[0] == DLT_EN10MB &&
283 	    dlt == DLT_DOCSIS) {
284 		/*
285 		 * This is presumably an Ethernet device, as the first
286 		 * link-layer type it offers is DLT_EN10MB, and the only
287 		 * other type it offers is DLT_DOCSIS.  That means that
288 		 * we can't tell the driver to supply DOCSIS link-layer
289 		 * headers - we're just pretending that's what we're
290 		 * getting, as, presumably, we're capturing on a dedicated
291 		 * link to a Cisco Cable Modem Termination System, and
292 		 * it's putting raw DOCSIS frames on the wire inside low-level
293 		 * Ethernet framing.
294 		 */
295 		p->linktype = dlt;
296 		return (0);
297 	}
298 	if (p->set_datalink_op(p, dlt) == -1)
299 		return (-1);
300 	p->linktype = dlt;
301 	return (0);
302 
303 unsupported:
304 	dlt_name = pcap_datalink_val_to_name(dlt);
305 	if (dlt_name != NULL) {
306 		(void) snprintf(p->errbuf, sizeof(p->errbuf),
307 		    "%s is not one of the DLTs supported by this device",
308 		    dlt_name);
309 	} else {
310 		(void) snprintf(p->errbuf, sizeof(p->errbuf),
311 		    "DLT %d is not one of the DLTs supported by this device",
312 		    dlt);
313 	}
314 	return (-1);
315 }
316 
317 struct dlt_choice {
318 	const char *name;
319 	const char *description;
320 	int	dlt;
321 };
322 
323 #define DLT_CHOICE(code, description) { #code, description, code }
324 #define DLT_CHOICE_SENTINEL { NULL, NULL, 0 }
325 
326 static struct dlt_choice dlt_choices[] = {
327 	DLT_CHOICE(DLT_NULL, "BSD loopback"),
328 	DLT_CHOICE(DLT_EN10MB, "Ethernet"),
329 	DLT_CHOICE(DLT_IEEE802, "Token ring"),
330 	DLT_CHOICE(DLT_ARCNET, "ARCNET"),
331 	DLT_CHOICE(DLT_SLIP, "SLIP"),
332 	DLT_CHOICE(DLT_PPP, "PPP"),
333 	DLT_CHOICE(DLT_FDDI, "FDDI"),
334 	DLT_CHOICE(DLT_ATM_RFC1483, "RFC 1483 LLC-encapsulated ATM"),
335 	DLT_CHOICE(DLT_RAW, "Raw IP"),
336 	DLT_CHOICE(DLT_SLIP_BSDOS, "BSD/OS SLIP"),
337 	DLT_CHOICE(DLT_PPP_BSDOS, "BSD/OS PPP"),
338 	DLT_CHOICE(DLT_ATM_CLIP, "Linux Classical IP-over-ATM"),
339 	DLT_CHOICE(DLT_PPP_SERIAL, "PPP over serial"),
340 	DLT_CHOICE(DLT_PPP_ETHER, "PPPoE"),
341 	DLT_CHOICE(DLT_C_HDLC, "Cisco HDLC"),
342 	DLT_CHOICE(DLT_IEEE802_11, "802.11"),
343 	DLT_CHOICE(DLT_FRELAY, "Frame Relay"),
344 	DLT_CHOICE(DLT_LOOP, "OpenBSD loopback"),
345 	DLT_CHOICE(DLT_ENC, "OpenBSD encapsulated IP"),
346 	DLT_CHOICE(DLT_LINUX_SLL, "Linux cooked"),
347 	DLT_CHOICE(DLT_LTALK, "Localtalk"),
348 	DLT_CHOICE(DLT_PFLOG, "OpenBSD pflog file"),
349 	DLT_CHOICE(DLT_PRISM_HEADER, "802.11 plus Prism header"),
350 	DLT_CHOICE(DLT_IP_OVER_FC, "RFC 2625 IP-over-Fibre Channel"),
351 	DLT_CHOICE(DLT_SUNATM, "Sun raw ATM"),
352 	DLT_CHOICE(DLT_IEEE802_11_RADIO, "802.11 plus BSD radio information header"),
353 	DLT_CHOICE(DLT_APPLE_IP_OVER_IEEE1394, "Apple IP-over-IEEE 1394"),
354 	DLT_CHOICE(DLT_ARCNET_LINUX, "Linux ARCNET"),
355 	DLT_CHOICE(DLT_DOCSIS, "DOCSIS"),
356 	DLT_CHOICE(DLT_LINUX_IRDA, "Linux IrDA"),
357 	DLT_CHOICE(DLT_LINUX_LAPD, "Linux vISDN LAPD"),
358 	DLT_CHOICE(DLT_IEEE802_11_RADIO_AVS, "802.11 plus AVS radio information header"),
359         DLT_CHOICE(DLT_SYMANTEC_FIREWALL, "Symantec Firewall"),
360         DLT_CHOICE(DLT_JUNIPER_ATM1, "Juniper ATM1 PIC"),
361         DLT_CHOICE(DLT_JUNIPER_ATM2, "Juniper ATM2 PIC"),
362         DLT_CHOICE(DLT_JUNIPER_MLPPP, "Juniper Multi-Link PPP"),
363 	DLT_CHOICE(DLT_PPP_PPPD, "PPP for pppd, with direction flag"),
364 	DLT_CHOICE(DLT_JUNIPER_PPPOE, "Juniper PPPoE"),
365 	DLT_CHOICE(DLT_JUNIPER_PPPOE_ATM, "Juniper PPPoE/ATM"),
366 	DLT_CHOICE(DLT_GPRS_LLC, "GPRS LLC"),
367 	DLT_CHOICE(DLT_GPF_T, "GPF-T"),
368 	DLT_CHOICE(DLT_GPF_F, "GPF-F"),
369 	DLT_CHOICE(DLT_JUNIPER_PIC_PEER, "Juniper PIC Peer"),
370 	DLT_CHOICE(DLT_JUNIPER_MLFR, "Juniper Multi-Link Frame Relay"),
371 	DLT_CHOICE(DLT_ERF_ETH,	"Ethernet with Endace ERF header"),
372 	DLT_CHOICE(DLT_ERF_POS, "Packet-over-SONET with Endace ERF header"),
373         DLT_CHOICE(DLT_JUNIPER_GGSN, "Juniper GGSN PIC"),
374         DLT_CHOICE(DLT_JUNIPER_ES, "Juniper Encryption Services PIC"),
375         DLT_CHOICE(DLT_JUNIPER_MONITOR, "Juniper Passive Monitor PIC"),
376         DLT_CHOICE(DLT_JUNIPER_SERVICES, "Juniper Advanced Services PIC"),
377 	DLT_CHOICE(DLT_JUNIPER_MFR, "Juniper FRF.16 Frame Relay"),
378 	DLT_CHOICE(DLT_JUNIPER_ETHER, "Juniper Ethernet"),
379 	DLT_CHOICE(DLT_JUNIPER_PPP, "Juniper PPP"),
380 	DLT_CHOICE(DLT_JUNIPER_FRELAY, "Juniper Frame Relay"),
381 	DLT_CHOICE(DLT_JUNIPER_CHDLC, "Juniper C-HDLC"),
382 	DLT_CHOICE(DLT_MFR, "FRF.16 Frame Relay"),
383 	DLT_CHOICE(DLT_JUNIPER_VP, "Juniper Voice PIC"),
384 	DLT_CHOICE(DLT_MTP2, "SS7 MTP2"),
385 	DLT_CHOICE(DLT_A429, "Arinc 429"),
386 	DLT_CHOICE(DLT_A653_ICM, "Arinc 653 Interpartition Communication"),
387 	DLT_CHOICE(DLT_USB, "USB"),
388 	DLT_CHOICE(DLT_BLUETOOTH_HCI_H4, "Bluetooth HCI UART transport layer"),
389 	DLT_CHOICE(DLT_CAN20B, "Controller Area Network (CAN) v. 2.0B"),
390 	DLT_CHOICE(DLT_MTP2_WITH_PHDR, "SS7 MTP2 with Pseudo-header"),
391 	DLT_CHOICE_SENTINEL
392 };
393 
394 /*
395  * This array is designed for mapping upper and lower case letter
396  * together for a case independent comparison.  The mappings are
397  * based upon ascii character sequences.
398  */
399 static const u_char charmap[] = {
400 	(u_char)'\000', (u_char)'\001', (u_char)'\002', (u_char)'\003',
401 	(u_char)'\004', (u_char)'\005', (u_char)'\006', (u_char)'\007',
402 	(u_char)'\010', (u_char)'\011', (u_char)'\012', (u_char)'\013',
403 	(u_char)'\014', (u_char)'\015', (u_char)'\016', (u_char)'\017',
404 	(u_char)'\020', (u_char)'\021', (u_char)'\022', (u_char)'\023',
405 	(u_char)'\024', (u_char)'\025', (u_char)'\026', (u_char)'\027',
406 	(u_char)'\030', (u_char)'\031', (u_char)'\032', (u_char)'\033',
407 	(u_char)'\034', (u_char)'\035', (u_char)'\036', (u_char)'\037',
408 	(u_char)'\040', (u_char)'\041', (u_char)'\042', (u_char)'\043',
409 	(u_char)'\044', (u_char)'\045', (u_char)'\046', (u_char)'\047',
410 	(u_char)'\050', (u_char)'\051', (u_char)'\052', (u_char)'\053',
411 	(u_char)'\054', (u_char)'\055', (u_char)'\056', (u_char)'\057',
412 	(u_char)'\060', (u_char)'\061', (u_char)'\062', (u_char)'\063',
413 	(u_char)'\064', (u_char)'\065', (u_char)'\066', (u_char)'\067',
414 	(u_char)'\070', (u_char)'\071', (u_char)'\072', (u_char)'\073',
415 	(u_char)'\074', (u_char)'\075', (u_char)'\076', (u_char)'\077',
416 	(u_char)'\100', (u_char)'\141', (u_char)'\142', (u_char)'\143',
417 	(u_char)'\144', (u_char)'\145', (u_char)'\146', (u_char)'\147',
418 	(u_char)'\150', (u_char)'\151', (u_char)'\152', (u_char)'\153',
419 	(u_char)'\154', (u_char)'\155', (u_char)'\156', (u_char)'\157',
420 	(u_char)'\160', (u_char)'\161', (u_char)'\162', (u_char)'\163',
421 	(u_char)'\164', (u_char)'\165', (u_char)'\166', (u_char)'\167',
422 	(u_char)'\170', (u_char)'\171', (u_char)'\172', (u_char)'\133',
423 	(u_char)'\134', (u_char)'\135', (u_char)'\136', (u_char)'\137',
424 	(u_char)'\140', (u_char)'\141', (u_char)'\142', (u_char)'\143',
425 	(u_char)'\144', (u_char)'\145', (u_char)'\146', (u_char)'\147',
426 	(u_char)'\150', (u_char)'\151', (u_char)'\152', (u_char)'\153',
427 	(u_char)'\154', (u_char)'\155', (u_char)'\156', (u_char)'\157',
428 	(u_char)'\160', (u_char)'\161', (u_char)'\162', (u_char)'\163',
429 	(u_char)'\164', (u_char)'\165', (u_char)'\166', (u_char)'\167',
430 	(u_char)'\170', (u_char)'\171', (u_char)'\172', (u_char)'\173',
431 	(u_char)'\174', (u_char)'\175', (u_char)'\176', (u_char)'\177',
432 	(u_char)'\200', (u_char)'\201', (u_char)'\202', (u_char)'\203',
433 	(u_char)'\204', (u_char)'\205', (u_char)'\206', (u_char)'\207',
434 	(u_char)'\210', (u_char)'\211', (u_char)'\212', (u_char)'\213',
435 	(u_char)'\214', (u_char)'\215', (u_char)'\216', (u_char)'\217',
436 	(u_char)'\220', (u_char)'\221', (u_char)'\222', (u_char)'\223',
437 	(u_char)'\224', (u_char)'\225', (u_char)'\226', (u_char)'\227',
438 	(u_char)'\230', (u_char)'\231', (u_char)'\232', (u_char)'\233',
439 	(u_char)'\234', (u_char)'\235', (u_char)'\236', (u_char)'\237',
440 	(u_char)'\240', (u_char)'\241', (u_char)'\242', (u_char)'\243',
441 	(u_char)'\244', (u_char)'\245', (u_char)'\246', (u_char)'\247',
442 	(u_char)'\250', (u_char)'\251', (u_char)'\252', (u_char)'\253',
443 	(u_char)'\254', (u_char)'\255', (u_char)'\256', (u_char)'\257',
444 	(u_char)'\260', (u_char)'\261', (u_char)'\262', (u_char)'\263',
445 	(u_char)'\264', (u_char)'\265', (u_char)'\266', (u_char)'\267',
446 	(u_char)'\270', (u_char)'\271', (u_char)'\272', (u_char)'\273',
447 	(u_char)'\274', (u_char)'\275', (u_char)'\276', (u_char)'\277',
448 	(u_char)'\300', (u_char)'\341', (u_char)'\342', (u_char)'\343',
449 	(u_char)'\344', (u_char)'\345', (u_char)'\346', (u_char)'\347',
450 	(u_char)'\350', (u_char)'\351', (u_char)'\352', (u_char)'\353',
451 	(u_char)'\354', (u_char)'\355', (u_char)'\356', (u_char)'\357',
452 	(u_char)'\360', (u_char)'\361', (u_char)'\362', (u_char)'\363',
453 	(u_char)'\364', (u_char)'\365', (u_char)'\366', (u_char)'\367',
454 	(u_char)'\370', (u_char)'\371', (u_char)'\372', (u_char)'\333',
455 	(u_char)'\334', (u_char)'\335', (u_char)'\336', (u_char)'\337',
456 	(u_char)'\340', (u_char)'\341', (u_char)'\342', (u_char)'\343',
457 	(u_char)'\344', (u_char)'\345', (u_char)'\346', (u_char)'\347',
458 	(u_char)'\350', (u_char)'\351', (u_char)'\352', (u_char)'\353',
459 	(u_char)'\354', (u_char)'\355', (u_char)'\356', (u_char)'\357',
460 	(u_char)'\360', (u_char)'\361', (u_char)'\362', (u_char)'\363',
461 	(u_char)'\364', (u_char)'\365', (u_char)'\366', (u_char)'\367',
462 	(u_char)'\370', (u_char)'\371', (u_char)'\372', (u_char)'\373',
463 	(u_char)'\374', (u_char)'\375', (u_char)'\376', (u_char)'\377',
464 };
465 
466 int
467 pcap_strcasecmp(const char *s1, const char *s2)
468 {
469 	register const u_char	*cm = charmap,
470 				*us1 = (const u_char *)s1,
471 				*us2 = (const u_char *)s2;
472 
473 	while (cm[*us1] == cm[*us2++])
474 		if (*us1++ == '\0')
475 			return(0);
476 	return (cm[*us1] - cm[*--us2]);
477 }
478 
479 int
480 pcap_datalink_name_to_val(const char *name)
481 {
482 	int i;
483 
484 	for (i = 0; dlt_choices[i].name != NULL; i++) {
485 		if (pcap_strcasecmp(dlt_choices[i].name + sizeof("DLT_") - 1,
486 		    name) == 0)
487 			return (dlt_choices[i].dlt);
488 	}
489 	return (-1);
490 }
491 
492 const char *
493 pcap_datalink_val_to_name(int dlt)
494 {
495 	int i;
496 
497 	for (i = 0; dlt_choices[i].name != NULL; i++) {
498 		if (dlt_choices[i].dlt == dlt)
499 			return (dlt_choices[i].name + sizeof("DLT_") - 1);
500 	}
501 	return (NULL);
502 }
503 
504 const char *
505 pcap_datalink_val_to_description(int dlt)
506 {
507 	int i;
508 
509 	for (i = 0; dlt_choices[i].name != NULL; i++) {
510 		if (dlt_choices[i].dlt == dlt)
511 			return (dlt_choices[i].description);
512 	}
513 	return (NULL);
514 }
515 
516 int
517 pcap_snapshot(pcap_t *p)
518 {
519 	return (p->snapshot);
520 }
521 
522 int
523 pcap_is_swapped(pcap_t *p)
524 {
525 	return (p->sf.swapped);
526 }
527 
528 int
529 pcap_major_version(pcap_t *p)
530 {
531 	return (p->sf.version_major);
532 }
533 
534 int
535 pcap_minor_version(pcap_t *p)
536 {
537 	return (p->sf.version_minor);
538 }
539 
540 FILE *
541 pcap_file(pcap_t *p)
542 {
543 	return (p->sf.rfile);
544 }
545 
546 int
547 pcap_fileno(pcap_t *p)
548 {
549 #ifndef WIN32
550 	return (p->fd);
551 #else
552 	if (p->adapter != NULL)
553 		return ((int)(DWORD)p->adapter->hFile);
554 	else
555 		return (-1);
556 #endif
557 }
558 
559 #if !defined(WIN32) && !defined(MSDOS)
560 int
561 pcap_get_selectable_fd(pcap_t *p)
562 {
563 	return (p->selectable_fd);
564 }
565 #endif
566 
567 void
568 pcap_perror(pcap_t *p, char *prefix)
569 {
570 	fprintf(stderr, "%s: %s\n", prefix, p->errbuf);
571 }
572 
573 char *
574 pcap_geterr(pcap_t *p)
575 {
576 	return (p->errbuf);
577 }
578 
579 int
580 pcap_getnonblock(pcap_t *p, char *errbuf)
581 {
582 	return p->getnonblock_op(p, errbuf);
583 }
584 
585 /*
586  * Get the current non-blocking mode setting, under the assumption that
587  * it's just the standard POSIX non-blocking flag.
588  *
589  * We don't look at "p->nonblock", in case somebody tweaked the FD
590  * directly.
591  */
592 #if !defined(WIN32) && !defined(MSDOS)
593 int
594 pcap_getnonblock_fd(pcap_t *p, char *errbuf)
595 {
596 	int fdflags;
597 
598 	fdflags = fcntl(p->fd, F_GETFL, 0);
599 	if (fdflags == -1) {
600 		snprintf(p->errbuf, PCAP_ERRBUF_SIZE, "F_GETFL: %s",
601 		    pcap_strerror(errno));
602 		return (-1);
603 	}
604 	if (fdflags & O_NONBLOCK)
605 		return (1);
606 	else
607 		return (0);
608 }
609 #endif
610 
611 int
612 pcap_setnonblock(pcap_t *p, int nonblock, char *errbuf)
613 {
614 	return p->setnonblock_op(p, nonblock, errbuf);
615 }
616 
617 #if !defined(WIN32) && !defined(MSDOS)
618 /*
619  * Set non-blocking mode, under the assumption that it's just the
620  * standard POSIX non-blocking flag.  (This can be called by the
621  * per-platform non-blocking-mode routine if that routine also
622  * needs to do some additional work.)
623  */
624 int
625 pcap_setnonblock_fd(pcap_t *p, int nonblock, char *errbuf)
626 {
627 	int fdflags;
628 
629 	fdflags = fcntl(p->fd, F_GETFL, 0);
630 	if (fdflags == -1) {
631 		snprintf(p->errbuf, PCAP_ERRBUF_SIZE, "F_GETFL: %s",
632 		    pcap_strerror(errno));
633 		return (-1);
634 	}
635 	if (nonblock)
636 		fdflags |= O_NONBLOCK;
637 	else
638 		fdflags &= ~O_NONBLOCK;
639 	if (fcntl(p->fd, F_SETFL, fdflags) == -1) {
640 		snprintf(p->errbuf, PCAP_ERRBUF_SIZE, "F_SETFL: %s",
641 		    pcap_strerror(errno));
642 		return (-1);
643 	}
644 	return (0);
645 }
646 #endif
647 
648 #ifdef WIN32
649 /*
650  * Generate a string for the last Win32-specific error (i.e. an error generated when
651  * calling a Win32 API).
652  * For errors occurred during standard C calls, we still use pcap_strerror()
653  */
654 char *
655 pcap_win32strerror(void)
656 {
657 	DWORD error;
658 	static char errbuf[PCAP_ERRBUF_SIZE+1];
659 	int errlen;
660 	char *p;
661 
662 	error = GetLastError();
663 	FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, NULL, error, 0, errbuf,
664 	    PCAP_ERRBUF_SIZE, NULL);
665 
666 	/*
667 	 * "FormatMessage()" "helpfully" sticks CR/LF at the end of the
668 	 * message.  Get rid of it.
669 	 */
670 	errlen = strlen(errbuf);
671 	if (errlen >= 2) {
672 		errbuf[errlen - 1] = '\0';
673 		errbuf[errlen - 2] = '\0';
674 	}
675 	p = strchr(errbuf, '\0');
676 	snprintf (p, sizeof(errbuf)-(p-errbuf), " (%lu)", error);
677 	return (errbuf);
678 }
679 #endif
680 
681 /*
682  * Not all systems have strerror().
683  */
684 const char *
685 pcap_strerror(int errnum)
686 {
687 #ifdef HAVE_STRERROR
688 	return (strerror(errnum));
689 #else
690 	extern int sys_nerr;
691 	extern const char *const sys_errlist[];
692 	static char ebuf[20];
693 
694 	if ((unsigned int)errnum < sys_nerr)
695 		return ((char *)sys_errlist[errnum]);
696 	(void)snprintf(ebuf, sizeof ebuf, "Unknown error: %d", errnum);
697 	return(ebuf);
698 #endif
699 }
700 
701 int
702 pcap_setfilter(pcap_t *p, struct bpf_program *fp)
703 {
704 	return p->setfilter_op(p, fp);
705 }
706 
707 /*
708  * Set direction flag, which controls whether we accept only incoming
709  * packets, only outgoing packets, or both.
710  * Note that, depending on the platform, some or all direction arguments
711  * might not be supported.
712  */
713 int
714 pcap_setdirection(pcap_t *p, pcap_direction_t d)
715 {
716 	if (p->setdirection_op == NULL) {
717 		snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
718 		    "Setting direction is not implemented on this platform");
719 		return -1;
720 	} else
721 		return p->setdirection_op(p, d);
722 }
723 
724 int
725 pcap_stats(pcap_t *p, struct pcap_stat *ps)
726 {
727 	return p->stats_op(p, ps);
728 }
729 
730 static int
731 pcap_stats_dead(pcap_t *p, struct pcap_stat *ps _U_)
732 {
733 	snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
734 	    "Statistics aren't available from a pcap_open_dead pcap_t");
735 	return (-1);
736 }
737 
738 void
739 pcap_close_common(pcap_t *p)
740 {
741 	if (p->buffer != NULL)
742 		free(p->buffer);
743 #if !defined(WIN32) && !defined(MSDOS)
744 	if (p->fd >= 0)
745 		close(p->fd);
746 #endif
747 }
748 
749 static void
750 pcap_close_dead(pcap_t *p _U_)
751 {
752 	/* Nothing to do. */
753 }
754 
755 pcap_t *
756 pcap_open_dead(int linktype, int snaplen)
757 {
758 	pcap_t *p;
759 
760 	p = malloc(sizeof(*p));
761 	if (p == NULL)
762 		return NULL;
763 	memset (p, 0, sizeof(*p));
764 	p->snapshot = snaplen;
765 	p->linktype = linktype;
766 	p->stats_op = pcap_stats_dead;
767 	p->close_op = pcap_close_dead;
768 	return p;
769 }
770 
771 /*
772  * API compatible with WinPcap's "send a packet" routine - returns -1
773  * on error, 0 otherwise.
774  *
775  * XXX - what if we get a short write?
776  */
777 int
778 pcap_sendpacket(pcap_t *p, const u_char *buf, int size)
779 {
780 	if (p->inject_op(p, buf, size) == -1)
781 		return (-1);
782 	return (0);
783 }
784 
785 /*
786  * API compatible with OpenBSD's "send a packet" routine - returns -1 on
787  * error, number of bytes written otherwise.
788  */
789 int
790 pcap_inject(pcap_t *p, const void *buf, size_t size)
791 {
792 	return (p->inject_op(p, buf, size));
793 }
794 
795 void
796 pcap_close(pcap_t *p)
797 {
798 	p->close_op(p);
799 	if (p->dlt_list != NULL)
800 		free(p->dlt_list);
801 	pcap_freecode(&p->fcode);
802 	free(p);
803 }
804 
805 /*
806  * We make the version string static, and return a pointer to it, rather
807  * than exporting the version string directly.  On at least some UNIXes,
808  * if you import data from a shared library into an program, the data is
809  * bound into the program binary, so if the string in the version of the
810  * library with which the program was linked isn't the same as the
811  * string in the version of the library with which the program is being
812  * run, various undesirable things may happen (warnings, the string
813  * being the one from the version of the library with which the program
814  * was linked, or even weirder things, such as the string being the one
815  * from the library but being truncated).
816  */
817 #ifdef HAVE_VERSION_H
818 #include "version.h"
819 #else
820 static const char pcap_version_string[] = "libpcap version 0.9.8";
821 #endif
822 
823 #ifdef WIN32
824 /*
825  * XXX - it'd be nice if we could somehow generate the WinPcap and libpcap
826  * version numbers when building WinPcap.  (It'd be nice to do so for
827  * the packet.dll version number as well.)
828  */
829 static const char wpcap_version_string[] = "4.0";
830 static const char pcap_version_string_fmt[] =
831     "WinPcap version %s, based on %s";
832 static const char pcap_version_string_packet_dll_fmt[] =
833     "WinPcap version %s (packet.dll version %s), based on %s";
834 static char *full_pcap_version_string;
835 
836 const char *
837 pcap_lib_version(void)
838 {
839 	char *packet_version_string;
840 	size_t full_pcap_version_string_len;
841 
842 	if (full_pcap_version_string == NULL) {
843 		/*
844 		 * Generate the version string.
845 		 */
846 		packet_version_string = PacketGetVersion();
847 		if (strcmp(wpcap_version_string, packet_version_string) == 0) {
848 			/*
849 			 * WinPcap version string and packet.dll version
850 			 * string are the same; just report the WinPcap
851 			 * version.
852 			 */
853 			full_pcap_version_string_len =
854 			    (sizeof pcap_version_string_fmt - 4) +
855 			    strlen(wpcap_version_string) +
856 			    strlen(pcap_version_string);
857 			full_pcap_version_string =
858 			    malloc(full_pcap_version_string_len);
859 			sprintf(full_pcap_version_string,
860 			    pcap_version_string_fmt, wpcap_version_string,
861 			    pcap_version_string);
862 		} else {
863 			/*
864 			 * WinPcap version string and packet.dll version
865 			 * string are different; that shouldn't be the
866 			 * case (the two libraries should come from the
867 			 * same version of WinPcap), so we report both
868 			 * versions.
869 			 */
870 			full_pcap_version_string_len =
871 			    (sizeof pcap_version_string_packet_dll_fmt - 6) +
872 			    strlen(wpcap_version_string) +
873 			    strlen(packet_version_string) +
874 			    strlen(pcap_version_string);
875 			full_pcap_version_string = malloc(full_pcap_version_string_len);
876 
877 			sprintf(full_pcap_version_string,
878 			    pcap_version_string_packet_dll_fmt,
879 			    wpcap_version_string, packet_version_string,
880 			    pcap_version_string);
881 		}
882 	}
883 	return (full_pcap_version_string);
884 }
885 
886 #elif defined(MSDOS)
887 
888 static char *full_pcap_version_string;
889 
890 const char *
891 pcap_lib_version (void)
892 {
893 	char *packet_version_string;
894 	size_t full_pcap_version_string_len;
895 	static char dospfx[] = "DOS-";
896 
897 	if (full_pcap_version_string == NULL) {
898 		/*
899 		 * Generate the version string.
900 		 */
901 		full_pcap_version_string_len =
902 		    sizeof dospfx + strlen(pcap_version_string);
903 		full_pcap_version_string =
904 		    malloc(full_pcap_version_string_len);
905 		strcpy(full_pcap_version_string, dospfx);
906 		strcat(full_pcap_version_string, pcap_version_string);
907 	}
908 	return (full_pcap_version_string);
909 }
910 
911 #else /* UN*X */
912 
913 const char *
914 pcap_lib_version(void)
915 {
916 	return (pcap_version_string);
917 }
918 #endif
919