contrib/libpcap/sf-pcap.c

   1 /*
   2  * Copyright (c) 1993, 1994, 1995, 1996, 1997
   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: (1) source code distributions
   7  * retain the above copyright notice and this paragraph in its entirety, (2)
   8  * distributions including binary code include the above copyright notice and
   9  * this paragraph in its entirety in the documentation or other materials
  10  * provided with the distribution, and (3) all advertising materials mentioning
  11  * features or use of this software display the following acknowledgement:
  12  * ``This product includes software developed by the University of California,
  13  * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
  14  * the University nor the names of its contributors may be used to endorse
  15  * or promote products derived from this software without specific prior
  16  * written permission.
  17  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
  18  * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
  19  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  20  *
  21  * sf-pcap.c - libpcap-file-format-specific code from savefile.c
  22  *      Extraction/creation by Jeffrey Mogul, DECWRL
  23  *      Modified by Steve McCanne, LBL.
  24  *
  25  * Used to save the received packet headers, after filtering, to
  26  * a file, and then read them later.
  27  * The first record in the file contains saved values for the machine
  28  * dependent values so we can print the dump file on any architecture.
  29  */
  30
  31 #ifndef lint
  32 static const char rcsid[] _U_ =
  33     "@(#) $Header$ (LBL)";
  34 #endif
  35
  36 #ifdef HAVE_CONFIG_H
  37 #include "config.h"
  38 #endif
  39
  40 #ifdef WIN32
  41 #include <pcap-stdinc.h>
  42 #else /* WIN32 */
  43 #if HAVE_INTTYPES_H
  44 #include <inttypes.h>
  45 #elif HAVE_STDINT_H
  46 #include <stdint.h>
  47 #endif
  48 #ifdef HAVE_SYS_BITYPES_H
  49 #include <sys/bitypes.h>
  50 #endif
  51 #include <sys/types.h>
  52 #endif /* WIN32 */
  53
  54 #include <errno.h>
  55 #include <memory.h>
  56 #include <stdio.h>
  57 #include <stdlib.h>
  58 #include <string.h>
  59
  60 #include "pcap-int.h"
  61
  62 #include "pcap-common.h"
  63
  64 #ifdef HAVE_OS_PROTO_H
  65 #include "os-proto.h"
  66 #endif
  67
  68 #include "sf-pcap.h"
  69
  70 /*
  71  * Setting O_BINARY on DOS/Windows is a bit tricky
  72  */
  73 #if defined(WIN32)
  74   #define SET_BINMODE(f)  _setmode(_fileno(f), _O_BINARY)
  75 #elif defined(MSDOS)
  76   #if defined(__HIGHC__)
  77   #define SET_BINMODE(f)  setmode(f, O_BINARY)
  78   #else
  79   #define SET_BINMODE(f)  setmode(fileno(f), O_BINARY)
  80   #endif
  81 #endif
  82
  83 /*
  84  * Standard libpcap format.
  85  */
  86 #define TCPDUMP_MAGIC           0xa1b2c3d4
  87
  88 /*
  89  * Alexey Kuznetzov's modified libpcap format.
  90  */
  91 #define KUZNETZOV_TCPDUMP_MAGIC 0xa1b2cd34
  92
  93 /*
  94  * Reserved for Francisco Mesquita <francisco.mesquita@radiomovel.pt>
  95  * for another modified format.
  96  */
  97 #define FMESQUITA_TCPDUMP_MAGIC 0xa1b234cd
  98
  99 /*
 100  * Navtel Communcations' format, with nanosecond timestamps,
 101  * as per a request from Dumas Hwang <dumas.hwang@navtelcom.com>.
 102  */
 103 #define NAVTEL_TCPDUMP_MAGIC    0xa12b3c4d
 104
 105 /*
 106  * Normal libpcap format, except for seconds/nanoseconds timestamps,
 107  * as per a request by Ulf Lamping <ulf.lamping@web.de>
 108  */
 109 #define NSEC_TCPDUMP_MAGIC      0xa1b23c4d
 110
 111 /*
 112  * Mechanism for storing information about a capture in the upper
 113  * 6 bits of a linktype value in a capture file.
 114  *
 115  * LT_LINKTYPE_EXT(x) extracts the additional information.
 116  *
 117  * The rest of the bits are for a value describing the link-layer
 118  * value.  LT_LINKTYPE(x) extracts that value.
 119  */
 120 #define LT_LINKTYPE(x)          ((x) & 0x03FFFFFF)
 121 #define LT_LINKTYPE_EXT(x)      ((x) & 0xFC000000)
 122
 123 static int pcap_next_packet(pcap_t *p, struct pcap_pkthdr *hdr, u_char **datap);
 124
 125 /*
 126  * Private data for reading pcap savefiles.
 127  */
 128 typedef enum {
 129         NOT_SWAPPED,
 130         SWAPPED,
 131         MAYBE_SWAPPED
 132 } swapped_type_t;
 133
 134 typedef enum {
 135         PASS_THROUGH,
 136         SCALE_UP,
 137         SCALE_DOWN
 138 } tstamp_scale_type_t;
 139
 140 struct pcap_sf {
 141         size_t hdrsize;
 142         swapped_type_t lengths_swapped;
 143         tstamp_scale_type_t scale_type;
 144 };
 145
 146 /*
 147  * Check whether this is a pcap savefile and, if it is, extract the
 148  * relevant information from the header.
 149  */
 150 pcap_t *
 151 pcap_check_header(bpf_u_int32 magic, FILE *fp, u_int precision, char *errbuf,
 152     int *err)
 153 {
 154         struct pcap_file_header hdr;
 155         size_t amt_read;
 156         pcap_t *p;
 157         int swapped = 0;
 158         struct pcap_sf *ps;
 159
 160         /*
 161          * Assume no read errors.
 162          */
 163         *err = 0;
 164
 165         /*
 166          * Check whether the first 4 bytes of the file are the magic
 167          * number for a pcap savefile, or for a byte-swapped pcap
 168          * savefile.
 169          */
 170         if (magic != TCPDUMP_MAGIC && magic != KUZNETZOV_TCPDUMP_MAGIC &&
 171             magic != NSEC_TCPDUMP_MAGIC) {
 172                 magic = SWAPLONG(magic);
 173                 if (magic != TCPDUMP_MAGIC && magic != KUZNETZOV_TCPDUMP_MAGIC &&
 174                     magic != NSEC_TCPDUMP_MAGIC)
 175                         return (NULL);  /* nope */
 176                 swapped = 1;
 177         }
 178
 179         /*
 180          * They are.  Put the magic number in the header, and read
 181          * the rest of the header.
 182          */
 183         hdr.magic = magic;
 184         amt_read = fread(((char *)&hdr) + sizeof hdr.magic, 1,
 185             sizeof(hdr) - sizeof(hdr.magic), fp);
 186         if (amt_read != sizeof(hdr) - sizeof(hdr.magic)) {
 187                 if (ferror(fp)) {
 188                         snprintf(errbuf, PCAP_ERRBUF_SIZE,
 189                             "error reading dump file: %s",
 190                             pcap_strerror(errno));
 191                 } else {
 192                         snprintf(errbuf, PCAP_ERRBUF_SIZE,
 193                             "truncated dump file; tried to read %lu file header bytes, only got %lu",
 194                             (unsigned long)sizeof(hdr),
 195                             (unsigned long)amt_read);
 196                 }
 197                 *err = 1;
 198                 return (NULL);
 199         }
 200
 201         /*
 202          * If it's a byte-swapped capture file, byte-swap the header.
 203          */
 204         if (swapped) {
 205                 hdr.version_major = SWAPSHORT(hdr.version_major);
 206                 hdr.version_minor = SWAPSHORT(hdr.version_minor);
 207                 hdr.thiszone = SWAPLONG(hdr.thiszone);
 208                 hdr.sigfigs = SWAPLONG(hdr.sigfigs);
 209                 hdr.snaplen = SWAPLONG(hdr.snaplen);
 210                 hdr.linktype = SWAPLONG(hdr.linktype);
 211         }
 212
 213         if (hdr.version_major < PCAP_VERSION_MAJOR) {
 214                 snprintf(errbuf, PCAP_ERRBUF_SIZE,
 215                     "archaic pcap savefile format");
 216                 *err = 1;
 217                 return (NULL);
 218         }
 219
 220         /*
 221          * OK, this is a good pcap file.
 222          * Allocate a pcap_t for it.
 223          */
 224         p = pcap_open_offline_common(errbuf, sizeof (struct pcap_sf));
 225         if (p == NULL) {
 226                 /* Allocation failed. */
 227                 *err = 1;
 228                 return (NULL);
 229         }
 230         p->swapped = swapped;
 231         p->version_major = hdr.version_major;
 232         p->version_minor = hdr.version_minor;
 233         p->tzoff = hdr.thiszone;
 234         p->snapshot = hdr.snaplen;
 235         p->linktype = linktype_to_dlt(LT_LINKTYPE(hdr.linktype));
 236         p->linktype_ext = LT_LINKTYPE_EXT(hdr.linktype);
 237
 238         p->next_packet_op = pcap_next_packet;
 239
 240         ps = p->priv;
 241
 242         p->opt.tstamp_precision = precision;
 243
 244         /*
 245          * Will we need to scale the timestamps to match what the
 246          * user wants?
 247          */
 248         switch (precision) {
 249
 250         case PCAP_TSTAMP_PRECISION_MICRO:
 251                 if (magic == NSEC_TCPDUMP_MAGIC) {
 252                         /*
 253                          * The file has nanoseconds, the user
 254                          * wants microseconds; scale the
 255                          * precision down.
 256                          */
 257                         ps->scale_type = SCALE_DOWN;
 258                 } else {
 259                         /*
 260                          * The file has microseconds, the
 261                          * user wants microseconds; nothing to do.
 262                          */
 263                         ps->scale_type = PASS_THROUGH;
 264                 }
 265                 break;
 266
 267         case PCAP_TSTAMP_PRECISION_NANO:
 268                 if (magic == NSEC_TCPDUMP_MAGIC) {
 269                         /*
 270                          * The file has nanoseconds, the
 271                          * user wants nanoseconds; nothing to do.
 272                          */
 273                         ps->scale_type = PASS_THROUGH;
 274                 } else {
 275                         /*
 276                          * The file has microoseconds, the user
 277                          * wants nanoseconds; scale the
 278                          * precision up.
 279                          */
 280                         ps->scale_type = SCALE_UP;
 281                 }
 282                 break;
 283
 284         default:
 285                 snprintf(errbuf, PCAP_ERRBUF_SIZE,
 286                     "unknown time stamp resolution %u", precision);
 287                 free(p);
 288                 *err = 1;
 289                 return (NULL);
 290         }
 291
 292         /*
 293          * We interchanged the caplen and len fields at version 2.3,
 294          * in order to match the bpf header layout.  But unfortunately
 295          * some files were written with version 2.3 in their headers
 296          * but without the interchanged fields.
 297          *
 298          * In addition, DG/UX tcpdump writes out files with a version
 299          * number of 543.0, and with the caplen and len fields in the
 300          * pre-2.3 order.
 301          */
 302         switch (hdr.version_major) {
 303
 304         case 2:
 305                 if (hdr.version_minor < 3)
 306                         ps->lengths_swapped = SWAPPED;
 307                 else if (hdr.version_minor == 3)
 308                         ps->lengths_swapped = MAYBE_SWAPPED;
 309                 else
 310                         ps->lengths_swapped = NOT_SWAPPED;
 311                 break;
 312
 313         case 543:
 314                 ps->lengths_swapped = SWAPPED;
 315                 break;
 316
 317         default:
 318                 ps->lengths_swapped = NOT_SWAPPED;
 319                 break;
 320         }
 321
 322         if (magic == KUZNETZOV_TCPDUMP_MAGIC) {
 323                 /*
 324                  * XXX - the patch that's in some versions of libpcap
 325                  * changes the packet header but not the magic number,
 326                  * and some other versions with this magic number have
 327                  * some extra debugging information in the packet header;
 328                  * we'd have to use some hacks^H^H^H^H^Hheuristics to
 329                  * detect those variants.
 330                  *
 331                  * Ethereal does that, but it does so by trying to read
 332                  * the first two packets of the file with each of the
 333                  * record header formats.  That currently means it seeks
 334                  * backwards and retries the reads, which doesn't work
 335                  * on pipes.  We want to be able to read from a pipe, so
 336                  * that strategy won't work; we'd have to buffer some
 337                  * data ourselves and read from that buffer in order to
 338                  * make that work.
 339                  */
 340                 ps->hdrsize = sizeof(struct pcap_sf_patched_pkthdr);
 341
 342                 if (p->linktype == DLT_EN10MB) {
 343                         /*
 344                          * This capture might have been done in raw mode
 345                          * or cooked mode.
 346                          *
 347                          * If it was done in cooked mode, p->snapshot was
 348                          * passed to recvfrom() as the buffer size, meaning
 349                          * that the most packet data that would be copied
 350                          * would be p->snapshot.  However, a faked Ethernet
 351                          * header would then have been added to it, so the
 352                          * most data that would be in a packet in the file
 353                          * would be p->snapshot + 14.
 354                          *
 355                          * We can't easily tell whether the capture was done
 356                          * in raw mode or cooked mode, so we'll assume it was
 357                          * cooked mode, and add 14 to the snapshot length.
 358                          * That means that, for a raw capture, the snapshot
 359                          * length will be misleading if you use it to figure
 360                          * out why a capture doesn't have all the packet data,
 361                          * but there's not much we can do to avoid that.
 362                          */
 363                         p->snapshot += 14;
 364                 }
 365         } else
 366                 ps->hdrsize = sizeof(struct pcap_sf_pkthdr);
 367
 368         /*
 369          * Allocate a buffer for the packet data.
 370          */
 371         p->bufsize = p->snapshot;
 372         if (p->bufsize <= 0) {
 373                 /*
 374                  * Bogus snapshot length; use the maximum as a fallback.
 375                  */
 376                 p->bufsize = MAXIMUM_SNAPLEN;
 377         }
 378         p->buffer = malloc(p->bufsize);
 379         if (p->buffer == NULL) {
 380                 snprintf(errbuf, PCAP_ERRBUF_SIZE, "out of memory");
 381                 free(p);
 382                 *err = 1;
 383                 return (NULL);
 384         }
 385
 386         p->cleanup_op = sf_cleanup;
 387
 388         return (p);
 389 }
 390
 391 /*
 392  * Read and return the next packet from the savefile.  Return the header
 393  * in hdr and a pointer to the contents in data.  Return 0 on success, 1
 394  * if there were no more packets, and -1 on an error.
 395  */
 396 static int
 397 pcap_next_packet(pcap_t *p, struct pcap_pkthdr *hdr, u_char **data)
 398 {
 399         struct pcap_sf *ps = p->priv;
 400         struct pcap_sf_patched_pkthdr sf_hdr;
 401         FILE *fp = p->rfile;
 402         size_t amt_read;
 403         bpf_u_int32 t;
 404
 405         /*
 406          * Read the packet header; the structure we use as a buffer
 407          * is the longer structure for files generated by the patched
 408          * libpcap, but if the file has the magic number for an
 409          * unpatched libpcap we only read as many bytes as the regular
 410          * header has.
 411          */
 412         amt_read = fread(&sf_hdr, 1, ps->hdrsize, fp);
 413         if (amt_read != ps->hdrsize) {
 414                 if (ferror(fp)) {
 415                         snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 416                             "error reading dump file: %s",
 417                             pcap_strerror(errno));
 418                         return (-1);
 419                 } else {
 420                         if (amt_read != 0) {
 421                                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 422                                     "truncated dump file; tried to read %lu header bytes, only got %lu",
 423                                     (unsigned long)ps->hdrsize,
 424                                     (unsigned long)amt_read);
 425                                 return (-1);
 426                         }
 427                         /* EOF */
 428                         return (1);
 429                 }
 430         }
 431
 432         if (p->swapped) {
 433                 /* these were written in opposite byte order */
 434                 hdr->caplen = SWAPLONG(sf_hdr.caplen);
 435                 hdr->len = SWAPLONG(sf_hdr.len);
 436                 hdr->ts.tv_sec = SWAPLONG(sf_hdr.ts.tv_sec);
 437                 hdr->ts.tv_usec = SWAPLONG(sf_hdr.ts.tv_usec);
 438         } else {
 439                 hdr->caplen = sf_hdr.caplen;
 440                 hdr->len = sf_hdr.len;
 441                 hdr->ts.tv_sec = sf_hdr.ts.tv_sec;
 442                 hdr->ts.tv_usec = sf_hdr.ts.tv_usec;
 443         }
 444
 445         switch (ps->scale_type) {
 446
 447         case PASS_THROUGH:
 448                 /*
 449                  * Just pass the time stamp through.
 450                  */
 451                 break;
 452
 453         case SCALE_UP:
 454                 /*
 455                  * File has microseconds, user wants nanoseconds; convert
 456                  * it.
 457                  */
 458                 hdr->ts.tv_usec = hdr->ts.tv_usec * 1000;
 459                 break;
 460
 461         case SCALE_DOWN:
 462                 /*
 463                  * File has nanoseconds, user wants microseconds; convert
 464                  * it.
 465                  */
 466                 hdr->ts.tv_usec = hdr->ts.tv_usec / 1000;
 467                 break;
 468         }
 469
 470         /* Swap the caplen and len fields, if necessary. */
 471         switch (ps->lengths_swapped) {
 472
 473         case NOT_SWAPPED:
 474                 break;
 475
 476         case MAYBE_SWAPPED:
 477                 if (hdr->caplen <= hdr->len) {
 478                         /*
 479                          * The captured length is <= the actual length,
 480                          * so presumably they weren't swapped.
 481                          */
 482                         break;
 483                 }
 484                 /* FALLTHROUGH */
 485
 486         case SWAPPED:
 487                 t = hdr->caplen;
 488                 hdr->caplen = hdr->len;
 489                 hdr->len = t;
 490                 break;
 491         }
 492
 493         if (hdr->caplen > p->bufsize) {
 494                 /*
 495                  * This can happen due to Solaris 2.3 systems tripping
 496                  * over the BUFMOD problem and not setting the snapshot
 497                  * correctly in the savefile header.  If the caplen isn't
 498                  * grossly wrong, try to salvage.
 499                  */
 500                 static u_char *tp = NULL;
 501                 static size_t tsize = 0;
 502
 503                 if (hdr->caplen > MAXIMUM_SNAPLEN) {
 504                         snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 505                             "bogus savefile header");
 506                         return (-1);
 507                 }
 508
 509                 if (tsize < hdr->caplen) {
 510                         tsize = ((hdr->caplen + 1023) / 1024) * 1024;
 511                         if (tp != NULL)
 512                                 free((u_char *)tp);
 513                         tp = (u_char *)malloc(tsize);
 514                         if (tp == NULL) {
 515                                 tsize = 0;
 516                                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 517                                     "BUFMOD hack malloc");
 518                                 return (-1);
 519                         }
 520                 }
 521                 amt_read = fread((char *)tp, 1, hdr->caplen, fp);
 522                 if (amt_read != hdr->caplen) {
 523                         if (ferror(fp)) {
 524                                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 525                                     "error reading dump file: %s",
 526                                     pcap_strerror(errno));
 527                         } else {
 528                                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 529                                     "truncated dump file; tried to read %u captured bytes, only got %lu",
 530                                     hdr->caplen, (unsigned long)amt_read);
 531                         }
 532                         return (-1);
 533                 }
 534                 /*
 535                  * We can only keep up to p->bufsize bytes.  Since
 536                  * caplen > p->bufsize is exactly how we got here,
 537                  * we know we can only keep the first p->bufsize bytes
 538                  * and must drop the remainder.  Adjust caplen accordingly,
 539                  * so we don't get confused later as to how many bytes we
 540                  * have to play with.
 541                  */
 542                 hdr->caplen = p->bufsize;
 543                 memcpy(p->buffer, (char *)tp, p->bufsize);
 544         } else {
 545                 /* read the packet itself */
 546                 amt_read = fread(p->buffer, 1, hdr->caplen, fp);
 547                 if (amt_read != hdr->caplen) {
 548                         if (ferror(fp)) {
 549                                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 550                                     "error reading dump file: %s",
 551                                     pcap_strerror(errno));
 552                         } else {
 553                                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 554                                     "truncated dump file; tried to read %u captured bytes, only got %lu",
 555                                     hdr->caplen, (unsigned long)amt_read);
 556                         }
 557                         return (-1);
 558                 }
 559         }
 560         *data = p->buffer;
 561
 562         if (p->swapped)
 563                 swap_pseudo_headers(p->linktype, hdr, *data);
 564
 565         return (0);
 566 }
 567
 568 static int
 569 sf_write_header(pcap_t *p, FILE *fp, int linktype, int thiszone, int snaplen)
 570 {
 571         struct pcap_file_header hdr;
 572
 573         hdr.magic = p->opt.tstamp_precision == PCAP_TSTAMP_PRECISION_NANO ? NSEC_TCPDUMP_MAGIC : TCPDUMP_MAGIC;
 574         hdr.version_major = PCAP_VERSION_MAJOR;
 575         hdr.version_minor = PCAP_VERSION_MINOR;
 576
 577         hdr.thiszone = thiszone;
 578         hdr.snaplen = snaplen;
 579         hdr.sigfigs = 0;
 580         hdr.linktype = linktype;
 581
 582         if (fwrite((char *)&hdr, sizeof(hdr), 1, fp) != 1)
 583                 return (-1);
 584
 585         return (0);
 586 }
 587
 588 /*
 589  * Output a packet to the initialized dump file.
 590  */
 591 void
 592 pcap_dump(u_char *user, const struct pcap_pkthdr *h, const u_char *sp)
 593 {
 594         register FILE *f;
 595         struct pcap_sf_pkthdr sf_hdr;
 596
 597         f = (FILE *)user;
 598         sf_hdr.ts.tv_sec  = h->ts.tv_sec;
 599         sf_hdr.ts.tv_usec = h->ts.tv_usec;
 600         sf_hdr.caplen     = h->caplen;
 601         sf_hdr.len        = h->len;
 602         /* XXX we should check the return status */
 603         (void)fwrite(&sf_hdr, sizeof(sf_hdr), 1, f);
 604         (void)fwrite(sp, h->caplen, 1, f);
 605 }
 606
 607 static pcap_dumper_t *
 608 pcap_setup_dump(pcap_t *p, int linktype, FILE *f, const char *fname)
 609 {
 610
 611 #if defined(WIN32) || defined(MSDOS)
 612         /*
 613          * If we're writing to the standard output, put it in binary
 614          * mode, as savefiles are binary files.
 615          *
 616          * Otherwise, we turn off buffering.
 617          * XXX - why?  And why not on the standard output?
 618          */
 619         if (f == stdout)
 620                 SET_BINMODE(f);
 621         else
 622                 setbuf(f, NULL);
 623 #endif
 624         if (sf_write_header(p, f, linktype, p->tzoff, p->snapshot) == -1) {
 625                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE, "Can't write to %s: %s",
 626                     fname, pcap_strerror(errno));
 627                 if (f != stdout)
 628                         (void)fclose(f);
 629                 return (NULL);
 630         }
 631         return ((pcap_dumper_t *)f);
 632 }
 633
 634 /*
 635  * Initialize so that sf_write() will output to the file named 'fname'.
 636  */
 637 pcap_dumper_t *
 638 pcap_dump_open(pcap_t *p, const char *fname)
 639 {
 640         FILE *f;
 641         int linktype;
 642
 643         /*
 644          * If this pcap_t hasn't been activated, it doesn't have a
 645          * link-layer type, so we can't use it.
 646          */
 647         if (!p->activated) {
 648                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 649                     "%s: not-yet-activated pcap_t passed to pcap_dump_open",
 650                     fname);
 651                 return (NULL);
 652         }
 653         linktype = dlt_to_linktype(p->linktype);
 654         if (linktype == -1) {
 655                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 656                     "%s: link-layer type %d isn't supported in savefiles",
 657                     fname, p->linktype);
 658                 return (NULL);
 659         }
 660         linktype |= p->linktype_ext;
 661
 662         if (fname[0] == '-' && fname[1] == '\0') {
 663                 f = stdout;
 664                 fname = "standard output";
 665         } else {
 666 #if !defined(WIN32) && !defined(MSDOS)
 667                 f = fopen(fname, "w");
 668 #else
 669                 f = fopen(fname, "wb");
 670 #endif
 671                 if (f == NULL) {
 672                         snprintf(p->errbuf, PCAP_ERRBUF_SIZE, "%s: %s",
 673                             fname, pcap_strerror(errno));
 674                         return (NULL);
 675                 }
 676         }
 677         return (pcap_setup_dump(p, linktype, f, fname));
 678 }
 679
 680 /*
 681  * Initialize so that sf_write() will output to the given stream.
 682  */
 683 pcap_dumper_t *
 684 pcap_dump_fopen(pcap_t *p, FILE *f)
 685 {
 686         int linktype;
 687
 688         linktype = dlt_to_linktype(p->linktype);
 689         if (linktype == -1) {
 690                 snprintf(p->errbuf, PCAP_ERRBUF_SIZE,
 691                     "stream: link-layer type %d isn't supported in savefiles",
 692                     p->linktype);
 693                 return (NULL);
 694         }
 695         linktype |= p->linktype_ext;
 696
 697         return (pcap_setup_dump(p, linktype, f, "stream"));
 698 }
 699
 700 FILE *
 701 pcap_dump_file(pcap_dumper_t *p)
 702 {
 703         return ((FILE *)p);
 704 }
 705
 706 long
 707 pcap_dump_ftell(pcap_dumper_t *p)
 708 {
 709         return (ftell((FILE *)p));
 710 }
 711
 712 int
 713 pcap_dump_flush(pcap_dumper_t *p)
 714 {
 715
 716         if (fflush((FILE *)p) == EOF)
 717                 return (-1);
 718         else
 719                 return (0);
 720 }
 721
 722 void
 723 pcap_dump_close(pcap_dumper_t *p)
 724 {
 725
 726 #ifdef notyet
 727         if (ferror((FILE *)p))
 728                 return-an-error;
 729         /* XXX should check return from fclose() too */
 730 #endif
 731         (void)fclose((FILE *)p);
 732 }