contrib/libpcap/pcap.c

   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 2005/02/08 20:03:15 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*)malloc(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 IP-over-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_IEEE802_11_RADIO_AVS, "802.11 plus AVS radio information header"),
 358         DLT_CHOICE(DLT_SYMANTEC_FIREWALL, "Symantec Firewall"),
 359         DLT_CHOICE(DLT_JUNIPER_ATM1, "Juniper ATM1 PIC"),
 360         DLT_CHOICE(DLT_JUNIPER_ATM2, "Juniper ATM2 PIC"),
 361         DLT_CHOICE(DLT_JUNIPER_MLPPP, "Juniper Multi-Link PPP"),
 362         DLT_CHOICE(DLT_PPP_PPPD, "PPP for pppd, with direction flag"),
 363         DLT_CHOICE(DLT_JUNIPER_PPPOE, "Juniper PPPoE"),
 364         DLT_CHOICE(DLT_JUNIPER_PPPOE_ATM, "Juniper PPPoE/ATM"),
 365         DLT_CHOICE(DLT_GPRS_LLC, "GPRS LLC"),
 366         DLT_CHOICE(DLT_GPF_T, "GPF-T"),
 367         DLT_CHOICE(DLT_GPF_F, "GPF-F"),
 368         DLT_CHOICE(DLT_JUNIPER_PIC_PEER, "Juniper PIC Peer"),
 369         DLT_CHOICE(DLT_JUNIPER_MLFR, "Juniper Multi-Link Frame Relay"),
 370         DLT_CHOICE(DLT_ERF_ETH, "Ethernet with Endace ERF header"),
 371         DLT_CHOICE(DLT_ERF_POS, "Packet-over-SONET with Endace ERF header"),
 372         DLT_CHOICE_SENTINEL
 373 };
 374
 375 /*
 376  * This array is designed for mapping upper and lower case letter
 377  * together for a case independent comparison.  The mappings are
 378  * based upon ascii character sequences.
 379  */
 380 static const u_char charmap[] = {
 381         (u_char)'\000', (u_char)'\001', (u_char)'\002', (u_char)'\003',
 382         (u_char)'\004', (u_char)'\005', (u_char)'\006', (u_char)'\007',
 383         (u_char)'\010', (u_char)'\011', (u_char)'\012', (u_char)'\013',
 384         (u_char)'\014', (u_char)'\015', (u_char)'\016', (u_char)'\017',
 385         (u_char)'\020', (u_char)'\021', (u_char)'\022', (u_char)'\023',
 386         (u_char)'\024', (u_char)'\025', (u_char)'\026', (u_char)'\027',
 387         (u_char)'\030', (u_char)'\031', (u_char)'\032', (u_char)'\033',
 388         (u_char)'\034', (u_char)'\035', (u_char)'\036', (u_char)'\037',
 389         (u_char)'\040', (u_char)'\041', (u_char)'\042', (u_char)'\043',
 390         (u_char)'\044', (u_char)'\045', (u_char)'\046', (u_char)'\047',
 391         (u_char)'\050', (u_char)'\051', (u_char)'\052', (u_char)'\053',
 392         (u_char)'\054', (u_char)'\055', (u_char)'\056', (u_char)'\057',
 393         (u_char)'\060', (u_char)'\061', (u_char)'\062', (u_char)'\063',
 394         (u_char)'\064', (u_char)'\065', (u_char)'\066', (u_char)'\067',
 395         (u_char)'\070', (u_char)'\071', (u_char)'\072', (u_char)'\073',
 396         (u_char)'\074', (u_char)'\075', (u_char)'\076', (u_char)'\077',
 397         (u_char)'\100', (u_char)'\141', (u_char)'\142', (u_char)'\143',
 398         (u_char)'\144', (u_char)'\145', (u_char)'\146', (u_char)'\147',
 399         (u_char)'\150', (u_char)'\151', (u_char)'\152', (u_char)'\153',
 400         (u_char)'\154', (u_char)'\155', (u_char)'\156', (u_char)'\157',
 401         (u_char)'\160', (u_char)'\161', (u_char)'\162', (u_char)'\163',
 402         (u_char)'\164', (u_char)'\165', (u_char)'\166', (u_char)'\167',
 403         (u_char)'\170', (u_char)'\171', (u_char)'\172', (u_char)'\133',
 404         (u_char)'\134', (u_char)'\135', (u_char)'\136', (u_char)'\137',
 405         (u_char)'\140', (u_char)'\141', (u_char)'\142', (u_char)'\143',
 406         (u_char)'\144', (u_char)'\145', (u_char)'\146', (u_char)'\147',
 407         (u_char)'\150', (u_char)'\151', (u_char)'\152', (u_char)'\153',
 408         (u_char)'\154', (u_char)'\155', (u_char)'\156', (u_char)'\157',
 409         (u_char)'\160', (u_char)'\161', (u_char)'\162', (u_char)'\163',
 410         (u_char)'\164', (u_char)'\165', (u_char)'\166', (u_char)'\167',
 411         (u_char)'\170', (u_char)'\171', (u_char)'\172', (u_char)'\173',
 412         (u_char)'\174', (u_char)'\175', (u_char)'\176', (u_char)'\177',
 413         (u_char)'\200', (u_char)'\201', (u_char)'\202', (u_char)'\203',
 414         (u_char)'\204', (u_char)'\205', (u_char)'\206', (u_char)'\207',
 415         (u_char)'\210', (u_char)'\211', (u_char)'\212', (u_char)'\213',
 416         (u_char)'\214', (u_char)'\215', (u_char)'\216', (u_char)'\217',
 417         (u_char)'\220', (u_char)'\221', (u_char)'\222', (u_char)'\223',
 418         (u_char)'\224', (u_char)'\225', (u_char)'\226', (u_char)'\227',
 419         (u_char)'\230', (u_char)'\231', (u_char)'\232', (u_char)'\233',
 420         (u_char)'\234', (u_char)'\235', (u_char)'\236', (u_char)'\237',
 421         (u_char)'\240', (u_char)'\241', (u_char)'\242', (u_char)'\243',
 422         (u_char)'\244', (u_char)'\245', (u_char)'\246', (u_char)'\247',
 423         (u_char)'\250', (u_char)'\251', (u_char)'\252', (u_char)'\253',
 424         (u_char)'\254', (u_char)'\255', (u_char)'\256', (u_char)'\257',
 425         (u_char)'\260', (u_char)'\261', (u_char)'\262', (u_char)'\263',
 426         (u_char)'\264', (u_char)'\265', (u_char)'\266', (u_char)'\267',
 427         (u_char)'\270', (u_char)'\271', (u_char)'\272', (u_char)'\273',
 428         (u_char)'\274', (u_char)'\275', (u_char)'\276', (u_char)'\277',
 429         (u_char)'\300', (u_char)'\341', (u_char)'\342', (u_char)'\343',
 430         (u_char)'\344', (u_char)'\345', (u_char)'\346', (u_char)'\347',
 431         (u_char)'\350', (u_char)'\351', (u_char)'\352', (u_char)'\353',
 432         (u_char)'\354', (u_char)'\355', (u_char)'\356', (u_char)'\357',
 433         (u_char)'\360', (u_char)'\361', (u_char)'\362', (u_char)'\363',
 434         (u_char)'\364', (u_char)'\365', (u_char)'\366', (u_char)'\367',
 435         (u_char)'\370', (u_char)'\371', (u_char)'\372', (u_char)'\333',
 436         (u_char)'\334', (u_char)'\335', (u_char)'\336', (u_char)'\337',
 437         (u_char)'\340', (u_char)'\341', (u_char)'\342', (u_char)'\343',
 438         (u_char)'\344', (u_char)'\345', (u_char)'\346', (u_char)'\347',
 439         (u_char)'\350', (u_char)'\351', (u_char)'\352', (u_char)'\353',
 440         (u_char)'\354', (u_char)'\355', (u_char)'\356', (u_char)'\357',
 441         (u_char)'\360', (u_char)'\361', (u_char)'\362', (u_char)'\363',
 442         (u_char)'\364', (u_char)'\365', (u_char)'\366', (u_char)'\367',
 443         (u_char)'\370', (u_char)'\371', (u_char)'\372', (u_char)'\373',
 444         (u_char)'\374', (u_char)'\375', (u_char)'\376', (u_char)'\377',
 445 };
 446
 447 int
 448 pcap_strcasecmp(const char *s1, const char *s2)
 449 {
 450         register const u_char   *cm = charmap,
 451                                 *us1 = (u_char *)s1,
 452                                 *us2 = (u_char *)s2;
 453
 454         while (cm[*us1] == cm[*us2++])
 455                 if (*us1++ == '\0')
 456                         return(0);
 457         return (cm[*us1] - cm[*--us2]);
 458 }
 459
 460 int
 461 pcap_datalink_name_to_val(const char *name)
 462 {
 463         int i;
 464
 465         for (i = 0; dlt_choices[i].name != NULL; i++) {
 466                 if (pcap_strcasecmp(dlt_choices[i].name + sizeof("DLT_") - 1,
 467                     name) == 0)
 468                         return (dlt_choices[i].dlt);
 469         }
 470         return (-1);
 471 }
 472
 473 const char *
 474 pcap_datalink_val_to_name(int dlt)
 475 {
 476         int i;
 477
 478         for (i = 0; dlt_choices[i].name != NULL; i++) {
 479                 if (dlt_choices[i].dlt == dlt)
 480                         return (dlt_choices[i].name + sizeof("DLT_") - 1);
 481         }
 482         return (NULL);
 483 }
 484
 485 const char *
 486 pcap_datalink_val_to_description(int dlt)
 487 {
 488         int i;
 489
 490         for (i = 0; dlt_choices[i].name != NULL; i++) {
 491                 if (dlt_choices[i].dlt == dlt)
 492                         return (dlt_choices[i].description);
 493         }
 494         return (NULL);
 495 }
 496
 497 int
 498 pcap_snapshot(pcap_t *p)
 499 {
 500         return (p->snapshot);
 501 }
 502
 503 int
 504 pcap_is_swapped(pcap_t *p)
 505 {
 506         return (p->sf.swapped);
 507 }
 508
 509 int
 510 pcap_major_version(pcap_t *p)
 511 {
 512         return (p->sf.version_major);
 513 }
 514
 515 int
 516 pcap_minor_version(pcap_t *p)
 517 {
 518         return (p->sf.version_minor);
 519 }
 520
 521 FILE *
 522 pcap_file(pcap_t *p)
 523 {
 524         return (p->sf.rfile);
 525 }
 526
 527 int
 528 pcap_fileno(pcap_t *p)
 529 {
 530 #ifndef WIN32
 531         return (p->fd);
 532 #else
 533         if (p->adapter != NULL)
 534                 return ((int)(DWORD)p->adapter->hFile);
 535         else
 536                 return (-1);
 537 #endif
 538 }
 539
 540 #if !defined(WIN32) && !defined(MSDOS)
 541 int
 542 pcap_get_selectable_fd(pcap_t *p)
 543 {
 544         return (p->selectable_fd);
 545 }
 546 #endif
 547
 548 void
 549 pcap_perror(pcap_t *p, char *prefix)
 550 {
 551         fprintf(stderr, "%s: %s\n", prefix, p->errbuf);
 552 }
 553
 554 char *
 555 pcap_geterr(pcap_t *p)
 556 {
 557         return (p->errbuf);
 558 }
 559
 560 int
 561 pcap_getnonblock(pcap_t *p, char *errbuf)
 562 {
 563         return p->getnonblock_op(p, errbuf);
 564 }
 565
 566 /*
 567  * Get the current non-blocking mode setting, under the assumption that
 568  * it's just the standard POSIX non-blocking flag.
 569  *
 570  * We don't look at "p->nonblock", in case somebody tweaked the FD
 571  * directly.
 572  */
 573 #if !defined(WIN32) && !defined(MSDOS)
 574 int
 575 pcap_getnonblock_fd(pcap_t *p, char *errbuf)
 576 {
 577         int fdflags;
 578
 579         fdflags = fcntl(p->fd, F_GETFL, 0);
 580         if (fdflags == -1) {
 581                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE, "F_GETFL: %s",
 582                     pcap_strerror(errno));
 583                 return (-1);
 584         }
 585         if (fdflags & O_NONBLOCK)
 586                 return (1);
 587         else
 588                 return (0);
 589 }
 590 #endif
 591
 592 int
 593 pcap_setnonblock(pcap_t *p, int nonblock, char *errbuf)
 594 {
 595         return p->setnonblock_op(p, nonblock, errbuf);
 596 }
 597
 598 #if !defined(WIN32) && !defined(MSDOS)
 599 /*
 600  * Set non-blocking mode, under the assumption that it's just the
 601  * standard POSIX non-blocking flag.  (This can be called by the
 602  * per-platform non-blocking-mode routine if that routine also
 603  * needs to do some additional work.)
 604  */
 605 int
 606 pcap_setnonblock_fd(pcap_t *p, int nonblock, char *errbuf)
 607 {
 608         int fdflags;
 609
 610         fdflags = fcntl(p->fd, F_GETFL, 0);
 611         if (fdflags == -1) {
 612                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE, "F_GETFL: %s",
 613                     pcap_strerror(errno));
 614                 return (-1);
 615         }
 616         if (nonblock)
 617                 fdflags |= O_NONBLOCK;
 618         else
 619                 fdflags &= ~O_NONBLOCK;
 620         if (fcntl(p->fd, F_SETFL, fdflags) == -1) {
 621                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE, "F_SETFL: %s",
 622                     pcap_strerror(errno));
 623                 return (-1);
 624         }
 625         return (0);
 626 }
 627 #endif
 628
 629 #ifdef WIN32
 630 /*
 631  * Generate a string for the last Win32-specific error (i.e. an error generated when
 632  * calling a Win32 API).
 633  * For errors occurred during standard C calls, we still use pcap_strerror()
 634  */
 635 char *
 636 pcap_win32strerror(void)
 637 {
 638         DWORD error;
 639         static char errbuf[PCAP_ERRBUF_SIZE+1];
 640         int errlen;
 641         char *p;
 642
 643         error = GetLastError();
 644         FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, NULL, error, 0, errbuf,
 645             PCAP_ERRBUF_SIZE, NULL);
 646
 647         /*
 648          * "FormatMessage()" "helpfully" sticks CR/LF at the end of the
 649          * message.  Get rid of it.
 650          */
 651         errlen = strlen(errbuf);
 652         if (errlen >= 2) {
 653                 errbuf[errlen - 1] = '\0';
 654                 errbuf[errlen - 2] = '\0';
 655         }
 656         p = strchr(errbuf, '\0');
 657         snprintf (p, sizeof(errbuf)-(p-errbuf), " (%lu)", error);
 658         return (errbuf);
 659 }
 660 #endif
 661
 662 /*
 663  * Not all systems have strerror().
 664  */
 665 char *
 666 pcap_strerror(int errnum)
 667 {
 668 #ifdef HAVE_STRERROR
 669         return (strerror(errnum));
 670 #else
 671         extern int sys_nerr;
 672         extern const char *const sys_errlist[];
 673         static char ebuf[20];
 674
 675         if ((unsigned int)errnum < sys_nerr)
 676                 return ((char *)sys_errlist[errnum]);
 677         (void)snprintf(ebuf, sizeof ebuf, "Unknown error: %d", errnum);
 678         return(ebuf);
 679 #endif
 680 }
 681
 682 int
 683 pcap_setfilter(pcap_t *p, struct bpf_program *fp)
 684 {
 685         return p->setfilter_op(p, fp);
 686 }
 687
 688 int
 689 pcap_stats(pcap_t *p, struct pcap_stat *ps)
 690 {
 691         return p->stats_op(p, ps);
 692 }
 693
 694 static int
 695 pcap_stats_dead(pcap_t *p, struct pcap_stat *ps _U_)
 696 {
 697         snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 698             "Statistics aren't available from a pcap_open_dead pcap_t");
 699         return (-1);
 700 }
 701
 702 void
 703 pcap_close_common(pcap_t *p)
 704 {
 705         if (p->buffer != NULL)
 706                 free(p->buffer);
 707 #if !defined(WIN32) && !defined(MSDOS)
 708         if (p->fd >= 0)
 709                 close(p->fd);
 710 #endif
 711 }
 712
 713 static void
 714 pcap_close_dead(pcap_t *p _U_)
 715 {
 716         /* Nothing to do. */
 717 }
 718
 719 pcap_t *
 720 pcap_open_dead(int linktype, int snaplen)
 721 {
 722         pcap_t *p;
 723
 724         p = malloc(sizeof(*p));
 725         if (p == NULL)
 726                 return NULL;
 727         memset (p, 0, sizeof(*p));
 728         p->snapshot = snaplen;
 729         p->linktype = linktype;
 730         p->stats_op = pcap_stats_dead;
 731         p->close_op = pcap_close_dead;
 732         return p;
 733 }
 734
 735 /*
 736  * API compatible with WinPcap's "send a packet" routine - returns -1
 737  * on error, 0 otherwise.
 738  *
 739  * XXX - what if we get a short write?
 740  */
 741 int
 742 pcap_sendpacket(pcap_t *p, const u_char *buf, int size)
 743 {
 744         if (p->inject_op(p, buf, size) == -1)
 745                 return (-1);
 746         return (0);
 747 }
 748
 749 /*
 750  * API compatible with OpenBSD's "send a packet" routine - returns -1 on
 751  * error, number of bytes written otherwise.
 752  */
 753 int
 754 pcap_inject(pcap_t *p, const void *buf, size_t size)
 755 {
 756         return (p->inject_op(p, buf, size));
 757 }
 758
 759 void
 760 pcap_close(pcap_t *p)
 761 {
 762         p->close_op(p);
 763         if (p->dlt_list != NULL)
 764                 free(p->dlt_list);
 765         pcap_freecode(&p->fcode);
 766         free(p);
 767 }
 768
 769 /*
 770  * We make the version string static, and return a pointer to it, rather
 771  * than exporting the version string directly.  On at least some UNIXes,
 772  * if you import data from a shared library into an program, the data is
 773  * bound into the program binary, so if the string in the version of the
 774  * library with which the program was linked isn't the same as the
 775  * string in the version of the library with which the program is being
 776  * run, various undesirable things may happen (warnings, the string
 777  * being the one from the version of the library with which the program
 778  * was linked, or even weirder things, such as the string being the one
 779  * from the library but being truncated).
 780  */
 781 #ifdef HAVE_VERSION_H
 782 #include "version.h"
 783 #else
 784 static const char pcap_version_string[] = "libpcap version 0.9[.x]";
 785 #endif
 786
 787 #ifdef WIN32
 788 /*
 789  * XXX - it'd be nice if we could somehow generate the WinPcap and libpcap
 790  * version numbers when building WinPcap.  (It'd be nice to do so for
 791  * the packet.dll version number as well.)
 792  */
 793 static const char wpcap_version_string[] = "3.1";
 794 static const char pcap_version_string_fmt[] =
 795     "WinPcap version %s, based on %s";
 796 static const char pcap_version_string_packet_dll_fmt[] =
 797     "WinPcap version %s (packet.dll version %s), based on %s";
 798 static char *full_pcap_version_string;
 799
 800 const char *
 801 pcap_lib_version(void)
 802 {
 803         char *packet_version_string;
 804         size_t full_pcap_version_string_len;
 805
 806         if (full_pcap_version_string == NULL) {
 807                 /*
 808                  * Generate the version string.
 809                  */
 810                 packet_version_string = PacketGetVersion();
 811                 if (strcmp(wpcap_version_string, packet_version_string) == 0) {
 812                         /*
 813                          * WinPcap version string and packet.dll version
 814                          * string are the same; just report the WinPcap
 815                          * version.
 816                          */
 817                         full_pcap_version_string_len =
 818                             (sizeof pcap_version_string_fmt - 4) +
 819                             strlen(wpcap_version_string) +
 820                             strlen(pcap_version_string);
 821                         full_pcap_version_string =
 822                             malloc(full_pcap_version_string_len);
 823                         sprintf(full_pcap_version_string,
 824                             pcap_version_string_fmt, wpcap_version_string,
 825                             pcap_version_string);
 826                 } else {
 827                         /*
 828                          * WinPcap version string and packet.dll version
 829                          * string are different; that shouldn't be the
 830                          * case (the two libraries should come from the
 831                          * same version of WinPcap), so we report both
 832                          * versions.
 833                          */
 834                         full_pcap_version_string_len =
 835                             (sizeof pcap_version_string_packet_dll_fmt - 6) +
 836                             strlen(wpcap_version_string) +
 837                             strlen(packet_version_string) +
 838                             strlen(pcap_version_string);
 839                         full_pcap_version_string = malloc(full_pcap_version_string_len);
 840
 841                         sprintf(full_pcap_version_string,
 842                             pcap_version_string_packet_dll_fmt,
 843                             wpcap_version_string, packet_version_string,
 844                             pcap_version_string);
 845                 }
 846         }
 847         return (full_pcap_version_string);
 848 }
 849
 850 #elif defined(MSDOS)
 851
 852 static char *full_pcap_version_string;
 853
 854 const char *
 855 pcap_lib_version (void)
 856 {
 857         char *packet_version_string;
 858         size_t full_pcap_version_string_len;
 859         static char dospfx[] = "DOS-";
 860
 861         if (full_pcap_version_string == NULL) {
 862                 /*
 863                  * Generate the version string.
 864                  */
 865                 full_pcap_version_string_len =
 866                     sizeof dospfx + strlen(pcap_version_string);
 867                 full_pcap_version_string =
 868                     malloc(full_pcap_version_string_len);
 869                 strcpy(full_pcap_version_string, dospfx);
 870                 strcat(full_pcap_version_string, pcap_version_string);
 871         }
 872         return (full_pcap_version_string);
 873 }
 874
 875 #else /* UN*X */
 876
 877 const char *
 878 pcap_lib_version(void)
 879 {
 880         return (pcap_version_string);
 881 }
 882 #endif