text2pcap.c

   1 /**-*-C-*-**********************************************************************
   2  *
   3  * text2pcap.c
   4  *
   5  * Utility to convert an ASCII hexdump into a libpcap-format capture file
   6  *
   7  * (c) Copyright 2001 Ashok Narayanan <ashokn@cisco.com>
   8  *
   9  * $Id$
  10  *
  11  * Wireshark - Network traffic analyzer
  12  * By Gerald Combs <gerald@wireshark.org>
  13  * Copyright 1998 Gerald Combs
  14  *
  15  * This program is free software; you can redistribute it and/or
  16  * modify it under the terms of the GNU General Public License
  17  * as published by the Free Software Foundation; either version 2
  18  * of the License, or (at your option) any later version.
  19  *
  20  * This program is distributed in the hope that it will be useful,
  21  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  22  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  23  * GNU General Public License for more details.
  24  *
  25  * You should have received a copy of the GNU General Public License
  26  * along with this program; if not, write to the Free Software
  27  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  28  *
  29  *******************************************************************************/
  30
  31 /*******************************************************************************
  32  *
  33  * This utility reads in an ASCII hexdump of this common format:
  34  *
  35  * 00000000  00 E0 1E A7 05 6F 00 10 5A A0 B9 12 08 00 46 00 .....o..Z.....F.
  36  * 00000010  03 68 00 00 00 00 0A 2E EE 33 0F 19 08 7F 0F 19 .h.......3...\7f..
  37  * 00000020  03 80 94 04 00 00 10 01 16 A2 0A 00 03 50 00 0C .............P..
  38  * 00000030  01 01 0F 19 03 80 11 01 1E 61 00 0C 03 01 0F 19 .........a......
  39  *
  40  * Each bytestring line consists of an offset, one or more bytes, and
  41  * text at the end. An offset is defined as a hex string of more than
  42  * two characters. A byte is defined as a hex string of exactly two
  43  * characters. The text at the end is ignored, as is any text before
  44  * the offset. Bytes read from a bytestring line are added to the
  45  * current packet only if all the following conditions are satisfied:
  46  *
  47  * - No text appears between the offset and the bytes (any bytes appearing after
  48  *   such text would be ignored)
  49  *
  50  * - The offset must be arithmetically correct, i.e. if the offset is 00000020, then
  51  *   exactly 32 bytes must have been read into this packet before this. If the offset
  52  *   is wrong, the packet is immediately terminated
  53  *
  54  * A packet start is signaled by a zero offset.
  55  *
  56  * Lines starting with #TEXT2PCAP are directives. These allow the user
  57  * to embed instructions into the capture file which allows text2pcap
  58  * to take some actions (e.g. specifying the encapsulation
  59  * etc.). Currently no directives are implemented.
  60  *
  61  * Lines beginning with # which are not directives are ignored as
  62  * comments. Currently all non-hexdump text is ignored by text2pcap;
  63  * in the future, text processing may be added, but lines prefixed
  64  * with '#' will still be ignored.
  65  *
  66  * The output is a libpcap packet containing Ethernet frames by
  67  * default. This program takes options which allow the user to add
  68  * dummy Ethernet, IP and UDP or TCP headers to the packets in order
  69  * to allow dumps of L3 or higher protocols to be decoded.
  70  *
  71  * Considerable flexibility is built into this code to read hexdumps
  72  * of slightly different formats. For example, any text prefixing the
  73  * hexdump line is dropped (including mail forwarding '>'). The offset
  74  * can be any hex number of four digits or greater.
  75  *
  76  * This converter cannot read a single packet greater than 64KiB-1. Packet
  77  * snaplength is automatically set to 64KiB-1.
  78  */
  79
  80 #include "config.h"
  81
  82 /*
  83  * Just make sure we include the prototype for strptime as well
  84  * (needed for glibc 2.2) but make sure we do this only if not
  85  * yet defined.
  86  */
  87 #ifndef __USE_XOPEN
  88 #  define __USE_XOPEN
  89 #endif
  90 #ifndef _XOPEN_SOURCE
  91 #  ifndef __sun
  92 #    define _XOPEN_SOURCE 600
  93 #  endif
  94 #endif
  95
  96 /*
  97  * Defining _XOPEN_SOURCE is needed on some platforms, e.g. platforms
  98  * using glibc, to expand the set of things system header files define.
  99  *
 100  * Unfortunately, on other platforms, such as some versions of Solaris
 101  * (including Solaris 10), it *reduces* that set as well, causing
 102  * strptime() not to be declared, presumably because the version of the
 103  * X/Open spec that _XOPEN_SOURCE implies doesn't include strptime() and
 104  * blah blah blah namespace pollution blah blah blah.
 105  *
 106  * So we define __EXTENSIONS__ so that "strptime()" is declared.
 107  */
 108 #ifndef __EXTENSIONS__
 109 #  define __EXTENSIONS__
 110 #endif
 111
 112 #include <ctype.h>
 113 #include <stdio.h>
 114 #include <stdlib.h>
 115 #include <string.h>
 116 #include <wsutil/file_util.h>
 117
 118 #include <time.h>
 119 #include <glib.h>
 120
 121 #ifdef HAVE_UNISTD_H
 122 # include <unistd.h>
 123 #endif
 124
 125 #include <errno.h>
 126 #include <assert.h>
 127
 128 #ifndef HAVE_GETOPT
 129 #include "wsutil/wsgetopt.h"
 130 #endif
 131
 132 #ifdef NEED_STRPTIME_H
 133 # include "wsutil/strptime.h"
 134 #endif
 135
 136 #include "pcapio.h"
 137 #include "text2pcap.h"
 138 #include "version.h"
 139
 140 #ifdef _WIN32
 141 #include <wsutil/unicode-utils.h>
 142 #endif /* _WIN32 */
 143
 144 #ifdef HAVE_ARPA_INET_H
 145 #include <arpa/inet.h>
 146 #endif
 147
 148 #ifdef HAVE_WINSOCK2_H
 149 #include <winsock2.h>       /* needed to define AF_ values on Windows */
 150 #endif
 151
 152 #ifndef HAVE_INET_ATON_H
 153 # include "wsutil/inet_aton.h"
 154 #endif
 155
 156 #ifdef HAVE_SYS_SOCKET_H
 157 #include <sys/socket.h>
 158 #endif
 159
 160 #ifdef NEED_INET_V6DEFS_H
 161 # include "wsutil/inet_v6defs.h"
 162 #endif
 163
 164 /*--- Options --------------------------------------------------------------------*/
 165
 166 /* File format */
 167 static gboolean use_pcapng = FALSE;
 168
 169 /* Debug level */
 170 static int debug = 0;
 171 /* Be quiet */
 172 static int quiet = FALSE;
 173
 174 /* Dummy Ethernet header */
 175 static int hdr_ethernet = FALSE;
 176 static guint32 hdr_ethernet_proto = 0;
 177
 178 /* Dummy IP header */
 179 static int hdr_ip = FALSE;
 180 static int hdr_ipv6 = FALSE;
 181 static long hdr_ip_proto = 0;
 182
 183 /* Destination and source addresses for IP header */
 184 static guint32 hdr_ip_dest_addr = 0;
 185 static guint32 hdr_ip_src_addr = 0;
 186 static guint8 hdr_ipv6_dest_addr[16] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
 187 static guint8 hdr_ipv6_src_addr[16]  = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
 188 static guint8 NO_IPv6_ADDRESS[16]    = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
 189
 190 /* Dummy UDP header */
 191 static int     hdr_udp       = FALSE;
 192 static guint32 hdr_dest_port = 0;
 193 static guint32 hdr_src_port  = 0;
 194
 195 /* Dummy TCP header */
 196 static int hdr_tcp = FALSE;
 197
 198 /* Dummy SCTP header */
 199 static int hdr_sctp = FALSE;
 200 static guint32 hdr_sctp_src  = 0;
 201 static guint32 hdr_sctp_dest = 0;
 202 static guint32 hdr_sctp_tag  = 0;
 203
 204 /* Dummy DATA chunk header */
 205 static int hdr_data_chunk = FALSE;
 206 static guint8  hdr_data_chunk_type = 0;
 207 static guint8  hdr_data_chunk_bits = 0;
 208 static guint32 hdr_data_chunk_tsn  = 0;
 209 static guint16 hdr_data_chunk_sid  = 0;
 210 static guint16 hdr_data_chunk_ssn  = 0;
 211 static guint32 hdr_data_chunk_ppid = 0;
 212
 213 /* ASCII text dump identification */
 214 static int identify_ascii = FALSE;
 215
 216 static gboolean has_direction = FALSE;
 217 static guint32 direction = 0;
 218
 219 /*--- Local date -----------------------------------------------------------------*/
 220
 221 /* This is where we store the packet currently being built */
 222 #define MAX_PACKET 65535
 223 static guint8  packet_buf[MAX_PACKET];
 224 static guint32 header_length;
 225 static guint32 ip_offset;
 226 static guint32 curr_offset;
 227 static guint32 max_offset = MAX_PACKET;
 228 static guint32 packet_start = 0;
 229
 230 static void start_new_packet(gboolean);
 231
 232 /* This buffer contains strings present before the packet offset 0 */
 233 #define PACKET_PREAMBLE_MAX_LEN     2048
 234 static guint8 packet_preamble[PACKET_PREAMBLE_MAX_LEN+1];
 235 static int    packet_preamble_len = 0;
 236
 237 /* Number of packets read and written */
 238 static guint32 num_packets_read    = 0;
 239 static guint32 num_packets_written = 0;
 240 static guint64 bytes_written       = 0;
 241
 242 /* Time code of packet, derived from packet_preamble */
 243 static time_t   ts_sec  = 0;
 244 static guint32  ts_usec = 0;
 245 static char    *ts_fmt  = NULL;
 246 static struct tm timecode_default;
 247
 248 static guint8* pkt_lnstart;
 249
 250 /* Input file */
 251 static const char *input_filename;
 252 static FILE       *input_file  = NULL;
 253 /* Output file */
 254 static const char *output_filename;
 255 static FILE       *output_file = NULL;
 256
 257 /* Offset base to parse */
 258 static guint32 offset_base = 16;
 259
 260 extern FILE *yyin;
 261
 262 /* ----- State machine -----------------------------------------------------------*/
 263
 264 /* Current state of parser */
 265 typedef enum {
 266     INIT,             /* Waiting for start of new packet */
 267     START_OF_LINE,    /* Starting from beginning of line */
 268     READ_OFFSET,      /* Just read the offset */
 269     READ_BYTE,        /* Just read a byte */
 270     READ_TEXT         /* Just read text - ignore until EOL */
 271 } parser_state_t;
 272 static parser_state_t state = INIT;
 273
 274 static const char *state_str[] = {"Init",
 275                            "Start-of-line",
 276                            "Offset",
 277                            "Byte",
 278                            "Text"
 279 };
 280
 281 static const char *token_str[] = {"",
 282                            "Byte",
 283                            "Offset",
 284                            "Directive",
 285                            "Text",
 286                            "End-of-line"
 287 };
 288
 289 /* ----- Skeleton Packet Headers --------------------------------------------------*/
 290
 291 typedef struct {
 292     guint8  dest_addr[6];
 293     guint8  src_addr[6];
 294     guint16 l3pid;
 295 } hdr_ethernet_t;
 296
 297 static hdr_ethernet_t HDR_ETHERNET = {
 298     {0x0a, 0x02, 0x02, 0x02, 0x02, 0x02},
 299     {0x0a, 0x01, 0x01, 0x01, 0x01, 0x01},
 300     0};
 301
 302 typedef struct {
 303     guint8  ver_hdrlen;
 304     guint8  dscp;
 305     guint16 packet_length;
 306     guint16 identification;
 307     guint8  flags;
 308     guint8  fragment;
 309     guint8  ttl;
 310     guint8  protocol;
 311     guint16 hdr_checksum;
 312     guint32 src_addr;
 313     guint32 dest_addr;
 314 } hdr_ip_t;
 315
 316 static hdr_ip_t HDR_IP = {0x45, 0, 0, 0x3412, 0, 0, 0xff, 0, 0,
 317 #ifdef WORDS_BIGENDIAN
 318 0x0a010101, 0x0a020202
 319 #else
 320 0x0101010a, 0x0202020a
 321 #endif
 322 };
 323
 324 static struct {         /* pseudo header for checksum calculation */
 325     guint32 src_addr;
 326     guint32 dest_addr;
 327     guint8  zero;
 328     guint8  protocol;
 329     guint16 length;
 330 } pseudoh;
 331
 332
 333 /* headers taken from glibc */
 334
 335 /* IPv6 address */
 336 struct hdr_in6_addr
 337 {
 338     union
 339     {
 340        guint8  __u6_addr8[16];
 341        guint16 __u6_addr16[8];
 342        guint32 __u6_addr32[4];
 343     } __in6_u;
 344 };
 345
 346 typedef struct {
 347     union  {
 348         struct ip6_hdrctl {
 349             guint32 ip6_un1_flow;   /* 24 bits of flow-ID */
 350             guint16 ip6_un1_plen;   /* payload length */
 351             guint8  ip6_un1_nxt;    /* next header */
 352             guint8  ip6_un1_hlim;   /* hop limit */
 353         } ip6_un1;
 354         guint8 ip6_un2_vfc;       /* 4 bits version, 4 bits priority */
 355     } ip6_ctlun;
 356     struct hdr_in6_addr ip6_src;      /* source address */
 357     struct hdr_in6_addr ip6_dst;      /* destination address */
 358 } hdr_ipv6_t;
 359
 360 static hdr_ipv6_t HDR_IPv6;
 361
 362 static struct {                 /* pseudo header ipv6 for checksum calculation */
 363     struct  hdr_in6_addr src_addr6;
 364     struct  hdr_in6_addr dst_addr6;
 365     guint32 protocol;
 366     guint32 zero;
 367 } pseudoh6;
 368
 369
 370 typedef struct {
 371     guint16 source_port;
 372     guint16 dest_port;
 373     guint16 length;
 374     guint16 checksum;
 375 } hdr_udp_t;
 376
 377 static hdr_udp_t HDR_UDP = {0, 0, 0, 0};
 378
 379 typedef struct {
 380     guint16 source_port;
 381     guint16 dest_port;
 382     guint32 seq_num;
 383     guint32 ack_num;
 384     guint8  hdr_length;
 385     guint8  flags;
 386     guint16 window;
 387     guint16 checksum;
 388     guint16 urg;
 389 } hdr_tcp_t;
 390
 391 static hdr_tcp_t HDR_TCP = {0, 0, 0, 0, 0x50, 0, 0, 0, 0};
 392
 393 typedef struct {
 394     guint16 src_port;
 395     guint16 dest_port;
 396     guint32 tag;
 397     guint32 checksum;
 398 } hdr_sctp_t;
 399
 400 static hdr_sctp_t HDR_SCTP = {0, 0, 0, 0};
 401
 402 typedef struct {
 403     guint8  type;
 404     guint8  bits;
 405     guint16 length;
 406     guint32 tsn;
 407     guint16 sid;
 408     guint16 ssn;
 409     guint32 ppid;
 410 } hdr_data_chunk_t;
 411
 412 static hdr_data_chunk_t HDR_DATA_CHUNK = {0, 0, 0, 0, 0, 0, 0};
 413
 414 static char tempbuf[64];
 415
 416 /*----------------------------------------------------------------------
 417  * Stuff for writing a PCap file
 418  */
 419 #define PCAP_MAGIC          0xa1b2c3d4
 420 #define PCAP_SNAPLEN        0xffff
 421
 422 /* "libpcap" file header (minus magic number). */
 423 struct pcap_hdr {
 424     guint32 magic;          /* magic */
 425     guint16 version_major;  /* major version number */
 426     guint16 version_minor;  /* minor version number */
 427     guint32 thiszone;       /* GMT to local correction */
 428     guint32 sigfigs;        /* accuracy of timestamps */
 429     guint32 snaplen;        /* max length of captured packets, in octets */
 430     guint32 network;        /* data link type */
 431 };
 432
 433 /* "libpcap" record header. */
 434 struct pcaprec_hdr {
 435     guint32 ts_sec;         /* timestamp seconds */
 436     guint32 ts_usec;        /* timestamp microseconds */
 437     guint32 incl_len;       /* number of octets of packet saved in file */
 438     guint32 orig_len;       /* actual length of packet */
 439 };
 440
 441 /* Link-layer type; see http://www.tcpdump.org/linktypes.html for details */
 442 static guint32 pcap_link_type = 1;   /* Default is LINKTYPE_ETHERNET */
 443
 444 /*----------------------------------------------------------------------
 445  * Parse a single hex number
 446  * Will abort the program if it can't parse the number
 447  * Pass in TRUE if this is an offset, FALSE if not
 448  */
 449 static guint32
 450 parse_num (const char *str, int offset)
 451 {
 452     guint32  num;
 453     char    *c;
 454
 455     num = (guint32)strtoul(str, &c, offset ? offset_base : 16);
 456     if (c == str) {
 457         fprintf(stderr, "FATAL ERROR: Bad hex number? [%s]\n", str);
 458         exit(1);
 459     }
 460     return num;
 461 }
 462
 463 /*----------------------------------------------------------------------
 464  * Write this byte into current packet
 465  */
 466 static void
 467 write_byte (const char *str)
 468 {
 469     guint32 num;
 470
 471     num = parse_num(str, FALSE);
 472     packet_buf[curr_offset] = (guint8) num;
 473     curr_offset++;
 474     if (curr_offset - header_length >= max_offset) /* packet full */
 475         start_new_packet(TRUE);
 476 }
 477
 478 /*----------------------------------------------------------------------
 479  * Write a number of bytes into current packet
 480  */
 481
 482 static void
 483 write_bytes (const char bytes[], guint32 nbytes)
 484 {
 485     guint32 i;
 486
 487     if (curr_offset + nbytes < MAX_PACKET) {
 488         for (i = 0; i < nbytes; i++) {
 489             packet_buf[curr_offset] = bytes[i];
 490             curr_offset++;
 491         }
 492     }
 493 }
 494
 495 /*----------------------------------------------------------------------
 496  * Remove bytes from the current packet
 497  */
 498 static void
 499 unwrite_bytes (guint32 nbytes)
 500 {
 501     curr_offset -= nbytes;
 502 }
 503
 504 /*----------------------------------------------------------------------
 505  * Compute one's complement checksum (from RFC1071)
 506  */
 507 static guint16
 508 in_checksum (void *buf, guint32 count)
 509 {
 510     guint32 sum = 0;
 511     guint16 *addr = (guint16 *)buf;
 512
 513     while (count > 1) {
 514         /*  This is the inner loop */
 515         sum += g_ntohs(* (guint16 *) addr);
 516         addr++;
 517         count -= 2;
 518     }
 519
 520     /*  Add left-over byte, if any */
 521     if (count > 0)
 522         sum += g_ntohs(* (guint8 *) addr);
 523
 524     /*  Fold 32-bit sum to 16 bits */
 525     while (sum>>16)
 526         sum = (sum & 0xffff) + (sum >> 16);
 527
 528     sum = ~sum;
 529     return g_htons(sum);
 530 }
 531
 532 /* The CRC32C code is taken from draft-ietf-tsvwg-sctpcsum-01.txt.
 533  * That code is copyrighted by D. Otis and has been modified.
 534  */
 535
 536 #define CRC32C(c,d) (c=(c>>8)^crc_c[(c^(d))&0xFF])
 537 static guint32 crc_c[256] =
 538 {
 539 0x00000000U, 0xF26B8303U, 0xE13B70F7U, 0x1350F3F4U,
 540 0xC79A971FU, 0x35F1141CU, 0x26A1E7E8U, 0xD4CA64EBU,
 541 0x8AD958CFU, 0x78B2DBCCU, 0x6BE22838U, 0x9989AB3BU,
 542 0x4D43CFD0U, 0xBF284CD3U, 0xAC78BF27U, 0x5E133C24U,
 543 0x105EC76FU, 0xE235446CU, 0xF165B798U, 0x030E349BU,
 544 0xD7C45070U, 0x25AFD373U, 0x36FF2087U, 0xC494A384U,
 545 0x9A879FA0U, 0x68EC1CA3U, 0x7BBCEF57U, 0x89D76C54U,
 546 0x5D1D08BFU, 0xAF768BBCU, 0xBC267848U, 0x4E4DFB4BU,
 547 0x20BD8EDEU, 0xD2D60DDDU, 0xC186FE29U, 0x33ED7D2AU,
 548 0xE72719C1U, 0x154C9AC2U, 0x061C6936U, 0xF477EA35U,
 549 0xAA64D611U, 0x580F5512U, 0x4B5FA6E6U, 0xB93425E5U,
 550 0x6DFE410EU, 0x9F95C20DU, 0x8CC531F9U, 0x7EAEB2FAU,
 551 0x30E349B1U, 0xC288CAB2U, 0xD1D83946U, 0x23B3BA45U,
 552 0xF779DEAEU, 0x05125DADU, 0x1642AE59U, 0xE4292D5AU,
 553 0xBA3A117EU, 0x4851927DU, 0x5B016189U, 0xA96AE28AU,
 554 0x7DA08661U, 0x8FCB0562U, 0x9C9BF696U, 0x6EF07595U,
 555 0x417B1DBCU, 0xB3109EBFU, 0xA0406D4BU, 0x522BEE48U,
 556 0x86E18AA3U, 0x748A09A0U, 0x67DAFA54U, 0x95B17957U,
 557 0xCBA24573U, 0x39C9C670U, 0x2A993584U, 0xD8F2B687U,
 558 0x0C38D26CU, 0xFE53516FU, 0xED03A29BU, 0x1F682198U,
 559 0x5125DAD3U, 0xA34E59D0U, 0xB01EAA24U, 0x42752927U,
 560 0x96BF4DCCU, 0x64D4CECFU, 0x77843D3BU, 0x85EFBE38U,
 561 0xDBFC821CU, 0x2997011FU, 0x3AC7F2EBU, 0xC8AC71E8U,
 562 0x1C661503U, 0xEE0D9600U, 0xFD5D65F4U, 0x0F36E6F7U,
 563 0x61C69362U, 0x93AD1061U, 0x80FDE395U, 0x72966096U,
 564 0xA65C047DU, 0x5437877EU, 0x4767748AU, 0xB50CF789U,
 565 0xEB1FCBADU, 0x197448AEU, 0x0A24BB5AU, 0xF84F3859U,
 566 0x2C855CB2U, 0xDEEEDFB1U, 0xCDBE2C45U, 0x3FD5AF46U,
 567 0x7198540DU, 0x83F3D70EU, 0x90A324FAU, 0x62C8A7F9U,
 568 0xB602C312U, 0x44694011U, 0x5739B3E5U, 0xA55230E6U,
 569 0xFB410CC2U, 0x092A8FC1U, 0x1A7A7C35U, 0xE811FF36U,
 570 0x3CDB9BDDU, 0xCEB018DEU, 0xDDE0EB2AU, 0x2F8B6829U,
 571 0x82F63B78U, 0x709DB87BU, 0x63CD4B8FU, 0x91A6C88CU,
 572 0x456CAC67U, 0xB7072F64U, 0xA457DC90U, 0x563C5F93U,
 573 0x082F63B7U, 0xFA44E0B4U, 0xE9141340U, 0x1B7F9043U,
 574 0xCFB5F4A8U, 0x3DDE77ABU, 0x2E8E845FU, 0xDCE5075CU,
 575 0x92A8FC17U, 0x60C37F14U, 0x73938CE0U, 0x81F80FE3U,
 576 0x55326B08U, 0xA759E80BU, 0xB4091BFFU, 0x466298FCU,
 577 0x1871A4D8U, 0xEA1A27DBU, 0xF94AD42FU, 0x0B21572CU,
 578 0xDFEB33C7U, 0x2D80B0C4U, 0x3ED04330U, 0xCCBBC033U,
 579 0xA24BB5A6U, 0x502036A5U, 0x4370C551U, 0xB11B4652U,
 580 0x65D122B9U, 0x97BAA1BAU, 0x84EA524EU, 0x7681D14DU,
 581 0x2892ED69U, 0xDAF96E6AU, 0xC9A99D9EU, 0x3BC21E9DU,
 582 0xEF087A76U, 0x1D63F975U, 0x0E330A81U, 0xFC588982U,
 583 0xB21572C9U, 0x407EF1CAU, 0x532E023EU, 0xA145813DU,
 584 0x758FE5D6U, 0x87E466D5U, 0x94B49521U, 0x66DF1622U,
 585 0x38CC2A06U, 0xCAA7A905U, 0xD9F75AF1U, 0x2B9CD9F2U,
 586 0xFF56BD19U, 0x0D3D3E1AU, 0x1E6DCDEEU, 0xEC064EEDU,
 587 0xC38D26C4U, 0x31E6A5C7U, 0x22B65633U, 0xD0DDD530U,
 588 0x0417B1DBU, 0xF67C32D8U, 0xE52CC12CU, 0x1747422FU,
 589 0x49547E0BU, 0xBB3FFD08U, 0xA86F0EFCU, 0x5A048DFFU,
 590 0x8ECEE914U, 0x7CA56A17U, 0x6FF599E3U, 0x9D9E1AE0U,
 591 0xD3D3E1ABU, 0x21B862A8U, 0x32E8915CU, 0xC083125FU,
 592 0x144976B4U, 0xE622F5B7U, 0xF5720643U, 0x07198540U,
 593 0x590AB964U, 0xAB613A67U, 0xB831C993U, 0x4A5A4A90U,
 594 0x9E902E7BU, 0x6CFBAD78U, 0x7FAB5E8CU, 0x8DC0DD8FU,
 595 0xE330A81AU, 0x115B2B19U, 0x020BD8EDU, 0xF0605BEEU,
 596 0x24AA3F05U, 0xD6C1BC06U, 0xC5914FF2U, 0x37FACCF1U,
 597 0x69E9F0D5U, 0x9B8273D6U, 0x88D28022U, 0x7AB90321U,
 598 0xAE7367CAU, 0x5C18E4C9U, 0x4F48173DU, 0xBD23943EU,
 599 0xF36E6F75U, 0x0105EC76U, 0x12551F82U, 0xE03E9C81U,
 600 0x34F4F86AU, 0xC69F7B69U, 0xD5CF889DU, 0x27A40B9EU,
 601 0x79B737BAU, 0x8BDCB4B9U, 0x988C474DU, 0x6AE7C44EU,
 602 0xBE2DA0A5U, 0x4C4623A6U, 0x5F16D052U, 0xAD7D5351U,
 603 };
 604
 605 static guint32
 606 crc32c (const guint8* buf, unsigned int len, guint32 crc32_init)
 607 {
 608     unsigned int i;
 609     guint32 crc32;
 610
 611     crc32 = crc32_init;
 612     for (i = 0; i < len; i++)
 613         CRC32C(crc32, buf[i]);
 614
 615     return crc32;
 616 }
 617
 618 static guint32
 619 finalize_crc32c (guint32 crc32)
 620 {
 621     guint32 result;
 622     guint8 byte0,byte1,byte2,byte3;
 623
 624     result = ~crc32;
 625     byte0 = result & 0xff;
 626     byte1 = (result>>8) & 0xff;
 627     byte2 = (result>>16) & 0xff;
 628     byte3 = (result>>24) & 0xff;
 629     result = ((byte0 << 24) | (byte1 << 16) | (byte2 << 8) | byte3);
 630     return result;
 631 }
 632
 633 static guint16
 634 number_of_padding_bytes (guint32 length)
 635 {
 636     guint16 remainder;
 637
 638     remainder = length % 4;
 639
 640     if (remainder == 0)
 641         return 0;
 642     else
 643         return 4 - remainder;
 644 }
 645
 646 /*----------------------------------------------------------------------
 647  * Write current packet out
 648  */
 649 static void
 650 write_current_packet (gboolean cont)
 651 {
 652     guint32  length         = 0;
 653     guint16  padding_length = 0;
 654     int      err;
 655     guint16  ihatemacros;
 656     gboolean success;
 657
 658     if (curr_offset > header_length) {
 659         /* Write the packet */
 660
 661         /* if defined IPv6 we should rewrite hdr_ethernet_proto anyways */
 662         if (hdr_ipv6) {
 663             hdr_ethernet_proto = 0x86DD;
 664             hdr_ip = FALSE;
 665         }
 666
 667         /* Compute packet length */
 668         length = curr_offset;
 669         if (hdr_sctp) {
 670             padding_length = number_of_padding_bytes(length - header_length );
 671         } else {
 672             padding_length = 0;
 673         }
 674         /* Reset curr_offset, since we now write the headers */
 675         curr_offset = 0;
 676
 677         /* Write Ethernet header */
 678         if (hdr_ethernet) {
 679             HDR_ETHERNET.l3pid = g_htons(hdr_ethernet_proto);
 680             write_bytes((const char *)&HDR_ETHERNET, sizeof(HDR_ETHERNET));
 681         }
 682
 683         /* Write IP header */
 684         if (hdr_ip) {
 685             if (hdr_ip_src_addr) HDR_IP.src_addr = hdr_ip_src_addr;
 686             if (hdr_ip_dest_addr) HDR_IP.dest_addr = hdr_ip_dest_addr;
 687
 688             HDR_IP.packet_length = g_htons(length - ip_offset + padding_length);
 689             HDR_IP.protocol = (guint8) hdr_ip_proto;
 690             HDR_IP.hdr_checksum = 0;
 691             HDR_IP.hdr_checksum = in_checksum(&HDR_IP, sizeof(HDR_IP));
 692             write_bytes((const char *)&HDR_IP, sizeof(HDR_IP));
 693         } else if (hdr_ipv6) {
 694             if (memcmp(hdr_ipv6_src_addr, NO_IPv6_ADDRESS, sizeof(struct hdr_in6_addr)))
 695                 memcpy(&HDR_IPv6.ip6_src, &hdr_ipv6_src_addr, sizeof(struct hdr_in6_addr));
 696             if (memcmp(hdr_ipv6_dest_addr, NO_IPv6_ADDRESS, sizeof(struct hdr_in6_addr)))
 697                 memcpy(&HDR_IPv6.ip6_dst, &hdr_ipv6_dest_addr, sizeof(struct hdr_in6_addr));
 698
 699             HDR_IPv6.ip6_ctlun.ip6_un2_vfc &= 0x0F;
 700             HDR_IPv6.ip6_ctlun.ip6_un2_vfc |= (6<< 4);
 701             HDR_IPv6.ip6_ctlun.ip6_un1.ip6_un1_plen = g_htons(length - ip_offset + padding_length);
 702             HDR_IPv6.ip6_ctlun.ip6_un1.ip6_un1_nxt  = (guint8) hdr_ip_proto;
 703             HDR_IPv6.ip6_ctlun.ip6_un1.ip6_un1_hlim = 32;
 704             write_bytes((const char *)&HDR_IPv6, sizeof(HDR_IPv6));
 705
 706             /* initialize pseudo ipv6 header for checksum calculation */
 707             pseudoh6.src_addr6  = HDR_IPv6.ip6_src;
 708             pseudoh6.dst_addr6  = HDR_IPv6.ip6_dst;
 709             pseudoh6.zero       = 0;
 710             pseudoh6.protocol   = (guint8) hdr_ip_proto;
 711             ihatemacros         = g_ntohs(HDR_IPv6.ip6_ctlun.ip6_un1.ip6_un1_plen);
 712             pseudoh.length      = g_htons(length - ihatemacros + sizeof(HDR_UDP));
 713         }
 714
 715         if (!hdr_ipv6) {
 716             /* initialize pseudo header for checksum calculation */
 717             pseudoh.src_addr    = HDR_IP.src_addr;
 718             pseudoh.dest_addr   = HDR_IP.dest_addr;
 719             pseudoh.zero        = 0;
 720             pseudoh.protocol    = (guint8) hdr_ip_proto;
 721             pseudoh.length      = g_htons(length - header_length + sizeof(HDR_UDP));
 722         }
 723
 724         /* Write UDP header */
 725         if (hdr_udp) {
 726             guint16 x16;
 727             guint32 u;
 728
 729             /* initialize the UDP header */
 730             HDR_UDP.source_port = g_htons(hdr_src_port);
 731             HDR_UDP.dest_port = g_htons(hdr_dest_port);
 732             HDR_UDP.length      = pseudoh.length;
 733             HDR_UDP.checksum = 0;
 734             /* Note: g_ntohs()/g_htons() macro arg may be eval'd twice so calc value before invoking macro */
 735             x16  = hdr_ipv6 ? in_checksum(&pseudoh6, sizeof(pseudoh6)) : in_checksum(&pseudoh, sizeof(pseudoh));
 736             u    = g_ntohs(x16);
 737             x16  = in_checksum(&HDR_UDP, sizeof(HDR_UDP));
 738             u   += g_ntohs(x16);
 739             x16  = in_checksum(packet_buf + header_length, length - header_length);
 740             u   += g_ntohs(x16);
 741             x16  = (u & 0xffff) + (u>>16);
 742             HDR_UDP.checksum = g_htons(x16);
 743             if (HDR_UDP.checksum == 0) /* differentiate between 'none' and 0 */
 744                 HDR_UDP.checksum = g_htons(1);
 745             write_bytes((const char *)&HDR_UDP, sizeof(HDR_UDP));
 746         }
 747
 748         /* Write TCP header */
 749         if (hdr_tcp) {
 750             guint16 x16;
 751             guint32 u;
 752
 753              /* initialize pseudo header for checksum calculation */
 754             pseudoh.src_addr    = HDR_IP.src_addr;
 755             pseudoh.dest_addr   = HDR_IP.dest_addr;
 756             pseudoh.zero        = 0;
 757             pseudoh.protocol    = (guint8) hdr_ip_proto;
 758             pseudoh.length      = g_htons(length - header_length + sizeof(HDR_TCP));
 759             /* initialize the TCP header */
 760             HDR_TCP.source_port = g_htons(hdr_src_port);
 761             HDR_TCP.dest_port = g_htons(hdr_dest_port);
 762             /* HDR_TCP.seq_num already correct */
 763             HDR_TCP.window = g_htons(0x2000);
 764             HDR_TCP.checksum = 0;
 765             /* Note: g_ntohs()/g_htons() macro arg may be eval'd twice so calc value before invoking macro */
 766             x16  = in_checksum(&pseudoh, sizeof(pseudoh));
 767             u    = g_ntohs(x16);
 768             x16  = in_checksum(&HDR_TCP, sizeof(HDR_TCP));
 769             u   += g_ntohs(x16);
 770             x16  = in_checksum(packet_buf + header_length, length - header_length);
 771             u   += g_ntohs(x16);
 772             x16  = (u & 0xffff) + (u>>16);
 773             HDR_TCP.checksum = g_htons(x16);
 774             if (HDR_TCP.checksum == 0) /* differentiate between 'none' and 0 */
 775                 HDR_TCP.checksum = g_htons(1);
 776             write_bytes((const char *)&HDR_TCP, sizeof(HDR_TCP));
 777             HDR_TCP.seq_num = g_ntohl(HDR_TCP.seq_num) + length - header_length;
 778             HDR_TCP.seq_num = g_htonl(HDR_TCP.seq_num);
 779         }
 780
 781         /* Compute DATA chunk header */
 782         if (hdr_data_chunk) {
 783             hdr_data_chunk_bits = 0;
 784             if (packet_start == 0) {
 785                 hdr_data_chunk_bits |= 0x02;
 786             }
 787             if (!cont) {
 788                 hdr_data_chunk_bits |= 0x01;
 789             }
 790             HDR_DATA_CHUNK.type   = hdr_data_chunk_type;
 791             HDR_DATA_CHUNK.bits   = hdr_data_chunk_bits;
 792             HDR_DATA_CHUNK.length = g_htons(length - header_length + sizeof(HDR_DATA_CHUNK));
 793             HDR_DATA_CHUNK.tsn    = g_htonl(hdr_data_chunk_tsn);
 794             HDR_DATA_CHUNK.sid    = g_htons(hdr_data_chunk_sid);
 795             HDR_DATA_CHUNK.ssn    = g_htons(hdr_data_chunk_ssn);
 796             HDR_DATA_CHUNK.ppid   = g_htonl(hdr_data_chunk_ppid);
 797             hdr_data_chunk_tsn++;
 798             if (!cont) {
 799                 hdr_data_chunk_ssn++;
 800             }
 801         }
 802
 803         /* Write SCTP common header */
 804         if (hdr_sctp) {
 805             guint32 zero = 0;
 806
 807             HDR_SCTP.src_port  = g_htons(hdr_sctp_src);
 808             HDR_SCTP.dest_port = g_htons(hdr_sctp_dest);
 809             HDR_SCTP.tag       = g_htonl(hdr_sctp_tag);
 810             HDR_SCTP.checksum  = g_htonl(0);
 811             HDR_SCTP.checksum  = crc32c((guint8 *)&HDR_SCTP, sizeof(HDR_SCTP), ~0);
 812             if (hdr_data_chunk) {
 813                 HDR_SCTP.checksum  = crc32c((guint8 *)&HDR_DATA_CHUNK, sizeof(HDR_DATA_CHUNK), HDR_SCTP.checksum);
 814                 HDR_SCTP.checksum  = crc32c((guint8 *)packet_buf + header_length, length - header_length, HDR_SCTP.checksum);
 815                 HDR_SCTP.checksum  = crc32c((guint8 *)&zero, padding_length, HDR_SCTP.checksum);
 816             } else {
 817                 HDR_SCTP.checksum  = crc32c((guint8 *)packet_buf + header_length, length - header_length, HDR_SCTP.checksum);
 818             }
 819             HDR_SCTP.checksum = finalize_crc32c(HDR_SCTP.checksum);
 820             HDR_SCTP.checksum  = g_htonl(HDR_SCTP.checksum);
 821             write_bytes((const char *)&HDR_SCTP, sizeof(HDR_SCTP));
 822         }
 823
 824         /* Write DATA chunk header */
 825         if (hdr_data_chunk) {
 826             write_bytes((const char *)&HDR_DATA_CHUNK, sizeof(HDR_DATA_CHUNK));
 827         }
 828
 829         /* Reset curr_offset, since we now write the trailers */
 830         curr_offset = length;
 831
 832         /* Write DATA chunk padding */
 833         if (hdr_data_chunk && (padding_length > 0)) {
 834             memset(tempbuf, 0, padding_length);
 835             write_bytes((const char *)&tempbuf, padding_length);
 836             length += padding_length;
 837         }
 838
 839         /* Write Ethernet trailer */
 840         if (hdr_ethernet && (length < 60)) {
 841             memset(tempbuf, 0, 60 - length);
 842             write_bytes((const char *)&tempbuf, 60 - length);
 843             length = 60;
 844         }
 845         if (use_pcapng) {
 846             success = pcapng_write_enhanced_packet_block(output_file,
 847                                                          NULL,
 848                                                          ts_sec, ts_usec,
 849                                                          length, length,
 850                                                          0,
 851                                                          1000000,
 852                                                          packet_buf, direction,
 853                                                          &bytes_written, &err);
 854         } else {
 855             success = libpcap_write_packet(output_file,
 856                                            ts_sec, ts_usec,
 857                                            length, length,
 858                                            packet_buf,
 859                                            &bytes_written, &err);
 860         }
 861         if (!success) {
 862             fprintf(stderr, "File write error [%s] : %s\n",
 863                     output_filename, g_strerror(err));
 864             exit(1);
 865         }
 866         if (ts_fmt == NULL) {
 867             /* fake packet counter */
 868             ts_usec++;
 869         }
 870         if (!quiet) {
 871             fprintf(stderr, "Wrote packet of %u bytes.\n", length);
 872         }
 873         num_packets_written++;
 874     }
 875
 876     packet_start += curr_offset - header_length;
 877     curr_offset = header_length;
 878     return;
 879 }
 880
 881 /*----------------------------------------------------------------------
 882  * Write file header and trailer
 883  */
 884 static void
 885 write_file_header (void)
 886 {
 887     int      err;
 888     gboolean success;
 889
 890     if (use_pcapng) {
 891 #ifdef GITVERSION
 892         const char *appname = "text2pcap (" GITVERSION " from " GITBRANCH ")";
 893 #else
 894         const char *appname = "text2pcap";
 895 #endif
 896         char comment[100];
 897
 898         g_snprintf(comment, sizeof(comment), "Generated from input file %s.", input_filename);
 899         success = pcapng_write_session_header_block(output_file,
 900                                                     comment,
 901                                                     NULL,
 902                                                     NULL,
 903                                                     appname,
 904                                                     -1,
 905                                                     &bytes_written,
 906                                                     &err);
 907         if (success) {
 908             success = pcapng_write_interface_description_block(output_file,
 909                                                                NULL,
 910                                                                NULL,
 911                                                                NULL,
 912                                                                "",
 913                                                                NULL,
 914                                                                pcap_link_type,
 915                                                                PCAP_SNAPLEN,
 916                                                                &bytes_written,
 917                                                                0,
 918                                                                6,
 919                                                                &err);
 920         }
 921     } else {
 922         success = libpcap_write_file_header(output_file, pcap_link_type, PCAP_SNAPLEN,
 923                                             FALSE, &bytes_written, &err);
 924     }
 925     if (!success) {
 926         fprintf(stderr, "File write error [%s] : %s\n",
 927                 output_filename, g_strerror(err));
 928         exit(1);
 929     }
 930 }
 931
 932 static void
 933 write_file_trailer (void)
 934 {
 935     int      err;
 936     gboolean success;
 937
 938     if (use_pcapng) {
 939         success = pcapng_write_interface_statistics_block(output_file,
 940                                                           0,
 941                                                           &bytes_written,
 942                                                           "Counters provided by text2pcap",
 943                                                           0,
 944                                                           0,
 945                                                           num_packets_written,
 946                                                           num_packets_written - num_packets_written,
 947                                                           &err);
 948
 949     } else {
 950         success = TRUE;
 951     }
 952     if (!success) {
 953         fprintf(stderr, "File write error [%s] : %s\n",
 954                 output_filename, g_strerror(err));
 955         exit(1);
 956     }
 957    return;
 958 }
 959
 960 /*----------------------------------------------------------------------
 961  * Append a token to the packet preamble.
 962  */
 963 static void
 964 append_to_preamble (char *str)
 965 {
 966     size_t toklen;
 967
 968     if (packet_preamble_len != 0) {
 969         if (packet_preamble_len == PACKET_PREAMBLE_MAX_LEN)
 970             return; /* no room to add more preamble */
 971         /* Add a blank separator between the previous token and this token. */
 972         packet_preamble[packet_preamble_len++] = ' ';
 973     }
 974     toklen = strlen(str);
 975     if (toklen != 0) {
 976         if (packet_preamble_len + toklen > PACKET_PREAMBLE_MAX_LEN)
 977             return; /* no room to add the token to the preamble */
 978         g_strlcpy(&packet_preamble[packet_preamble_len], str, PACKET_PREAMBLE_MAX_LEN);
 979         packet_preamble_len += (int) toklen;
 980         if (debug >= 2) {
 981             char *c;
 982             char xs[PACKET_PREAMBLE_MAX_LEN];
 983             g_strlcpy(xs, packet_preamble, PACKET_PREAMBLE_MAX_LEN);
 984             while ((c = strchr(xs, '\r')) != NULL) *c=' ';
 985             fprintf (stderr, "[[append_to_preamble: \"%s\"]]", xs);
 986         }
 987     }
 988 }
 989
 990 /*----------------------------------------------------------------------
 991  * Parse the preamble to get the timecode.
 992  */
 993
 994 static void
 995 parse_preamble (void)
 996 {
 997     struct tm  timecode;
 998     char      *subsecs;
 999     char      *p;
1000     int        subseclen;
1001     int        i;
1002
1003      /*
1004      * Null-terminate the preamble.
1005      */
1006     packet_preamble[packet_preamble_len] = '\0';
1007     if (debug > 0)
1008         fprintf(stderr, "[[parse_preamble: \"%s\"]]\n", packet_preamble);
1009
1010     if (has_direction) {
1011         switch (packet_preamble[0]) {
1012         case 'i':
1013         case 'I':
1014             direction = 0x00000001;
1015             packet_preamble[0] = ' ';
1016             break;
1017         case 'o':
1018         case 'O':
1019             direction = 0x00000002;
1020             packet_preamble[0] = ' ';
1021             break;
1022         default:
1023             direction = 0x00000000;
1024             break;
1025         }
1026         i = 0;
1027         while (packet_preamble[i] == ' ' ||
1028                packet_preamble[i] == '\r' ||
1029                packet_preamble[i] == '\t') {
1030             i++;
1031         }
1032         packet_preamble_len -= i;
1033         /* Also move the trailing '\0'. */
1034         memmove(packet_preamble, packet_preamble + i, packet_preamble_len + 1);
1035     }
1036
1037
1038     /*
1039      * If no "-t" flag was specified, don't attempt to parse the packet
1040      * preamble to extract a time stamp.
1041      */
1042     if (ts_fmt == NULL) {
1043         /* Clear Preamble */
1044         packet_preamble_len = 0;
1045         return;
1046     }
1047
1048     /*
1049      * Initialize to today localtime, just in case not all fields
1050      * of the date and time are specified.
1051      */
1052
1053     timecode = timecode_default;
1054     ts_usec = 0;
1055
1056     /* Ensure preamble has more than two chars before attempting to parse.
1057      * This should cover line breaks etc that get counted.
1058      */
1059     if (strlen(packet_preamble) > 2) {
1060         /* Get Time leaving subseconds */
1061         subsecs = strptime( packet_preamble, ts_fmt, &timecode );
1062         if (subsecs != NULL) {
1063             /* Get the long time from the tm structure */
1064             /*  (will return -1 if failure)            */
1065             ts_sec  = mktime( &timecode );
1066         } else
1067             ts_sec = -1;    /* we failed to parse it */
1068
1069         /* This will ensure incorrectly parsed dates get set to zero */
1070         if (-1 == ts_sec) {
1071             /* Sanitize - remove all '\r' */
1072             char *c;
1073             while ((c = strchr(packet_preamble, '\r')) != NULL) *c=' ';
1074             fprintf (stderr, "Failure processing time \"%s\" using time format \"%s\"\n   (defaulting to Jan 1,1970 00:00:00 GMT)\n",
1075                  packet_preamble, ts_fmt);
1076             if (debug >= 2) {
1077                 fprintf(stderr, "timecode: %02d/%02d/%d %02d:%02d:%02d %d\n",
1078                     timecode.tm_mday, timecode.tm_mon, timecode.tm_year,
1079                     timecode.tm_hour, timecode.tm_min, timecode.tm_sec, timecode.tm_isdst);
1080             }
1081             ts_sec  = 0;  /* Jan 1,1970: 00:00 GMT; tshark/wireshark will display date/time as adjusted by timezone */
1082             ts_usec = 0;
1083         } else {
1084             /* Parse subseconds */
1085             ts_usec = (guint32)strtol(subsecs, &p, 10);
1086             if (subsecs == p) {
1087                 /* Error */
1088                 ts_usec = 0;
1089             } else {
1090                 /*
1091                  * Convert that number to a number
1092                  * of microseconds; if it's N digits
1093                  * long, it's in units of 10^(-N) seconds,
1094                  * so, to convert it to units of
1095                  * 10^-6 seconds, we multiply by
1096                  * 10^(6-N).
1097                  */
1098                 subseclen = (int) (p - subsecs);
1099                 if (subseclen > 6) {
1100                     /*
1101                      * *More* than 6 digits; 6-N is
1102                      * negative, so we divide by
1103                      * 10^(N-6).
1104                      */
1105                     for (i = subseclen - 6; i != 0; i--)
1106                         ts_usec /= 10;
1107                 } else if (subseclen < 6) {
1108                     for (i = 6 - subseclen; i != 0; i--)
1109                         ts_usec *= 10;
1110                 }
1111             }
1112         }
1113     }
1114     if (debug >= 2) {
1115         char *c;
1116         while ((c = strchr(packet_preamble, '\r')) != NULL) *c=' ';
1117         fprintf(stderr, "[[parse_preamble: \"%s\"]]\n", packet_preamble);
1118         fprintf(stderr, "Format(%s), time(%u), subsecs(%u)\n", ts_fmt, (guint32)ts_sec, ts_usec);
1119     }
1120
1121
1122     /* Clear Preamble */
1123     packet_preamble_len = 0;
1124 }
1125
1126 /*----------------------------------------------------------------------
1127  * Start a new packet
1128  */
1129 static void
1130 start_new_packet (gboolean cont)
1131 {
1132     if (debug >= 1)
1133         fprintf(stderr, "Start new packet (cont = %s).\n", cont ? "TRUE" : "FALSE");
1134
1135     /* Write out the current packet, if required */
1136     write_current_packet(cont);
1137     num_packets_read++;
1138
1139     /* Ensure we parse the packet preamble as it may contain the time */
1140     parse_preamble();
1141 }
1142
1143 /*----------------------------------------------------------------------
1144  * Process a directive
1145  */
1146 static void
1147 process_directive (char *str)
1148 {
1149     fprintf(stderr, "\n--- Directive [%s] currently unsupported ---\n", str + 10);
1150 }
1151
1152 /*----------------------------------------------------------------------
1153  * Parse a single token (called from the scanner)
1154  */
1155 void
1156 parse_token (token_t token, char *str)
1157 {
1158     guint32  num;
1159     int      by_eol;
1160     int      rollback = 0;
1161     int      line_size;
1162     int      i;
1163     char    *s2;
1164     char     tmp_str[3];
1165
1166     /*
1167      * This is implemented as a simple state machine of five states.
1168      * State transitions are caused by tokens being received from the
1169      * scanner. The code should be self-documenting.
1170      */
1171
1172     if (debug >= 2) {
1173         /* Sanitize - remove all '\r' */
1174         char *c;
1175         if (str!=NULL) { while ((c = strchr(str, '\r')) != NULL) *c=' '; }
1176
1177         fprintf(stderr, "(%s, %s \"%s\") -> (",
1178                 state_str[state], token_str[token], str ? str : "");
1179     }
1180
1181     switch (state) {
1182
1183     /* ----- Waiting for new packet -------------------------------------------*/
1184     case INIT:
1185         if (!str && token != T_EOL) goto fail_null_str;
1186         switch (token) {
1187         case T_TEXT:
1188             append_to_preamble(str);
1189             break;
1190         case T_DIRECTIVE:
1191             process_directive(str);
1192             break;
1193         case T_OFFSET:
1194             num = parse_num(str, TRUE);
1195             if (num == 0) {
1196                 /* New packet starts here */
1197                 start_new_packet(FALSE);
1198                 state = READ_OFFSET;
1199                 pkt_lnstart = packet_buf + num;
1200             }
1201             break;
1202         case T_EOL:
1203             /* Some describing text may be parsed as offset, but the invalid
1204                offset will be checked in the state of START_OF_LINE, so
1205                we add this transition to gain flexibility */
1206             state = START_OF_LINE;
1207             break;
1208         default:
1209             break;
1210         }
1211         break;
1212
1213     /* ----- Processing packet, start of new line -----------------------------*/
1214     case START_OF_LINE:
1215         if (!str && token != T_EOL) goto fail_null_str;
1216         switch (token) {
1217         case T_TEXT:
1218             append_to_preamble(str);
1219             break;
1220         case T_DIRECTIVE:
1221             process_directive(str);
1222             break;
1223         case T_OFFSET:
1224             num = parse_num(str, TRUE);
1225             if (num == 0) {
1226                 /* New packet starts here */
1227                 start_new_packet(FALSE);
1228                 packet_start = 0;
1229                 state = READ_OFFSET;
1230             } else if ((num - packet_start) != curr_offset - header_length) {
1231                 /*
1232                  * The offset we read isn't the one we expected.
1233                  * This may only mean that we mistakenly interpreted
1234                  * some text as byte values (e.g., if the text dump
1235                  * of packet data included a number with spaces around
1236                  * it).  If the offset is less than what we expected,
1237                  * assume that's the problem, and throw away the putative
1238                  * extra byte values.
1239                  */
1240                 if (num < curr_offset) {
1241                     unwrite_bytes(curr_offset - num);
1242                     state = READ_OFFSET;
1243                 } else {
1244                     /* Bad offset; switch to INIT state */
1245                     if (debug >= 1)
1246                         fprintf(stderr, "Inconsistent offset. Expecting %0X, got %0X. Ignoring rest of packet\n",
1247                                 curr_offset, num);
1248                     write_current_packet(FALSE);
1249                     state = INIT;
1250                 }
1251             } else
1252                 state = READ_OFFSET;
1253                 pkt_lnstart = packet_buf + num;
1254             break;
1255         case T_EOL:
1256             state = START_OF_LINE;
1257             break;
1258         default:
1259             break;
1260         }
1261         break;
1262
1263     /* ----- Processing packet, read offset -----------------------------------*/
1264     case READ_OFFSET:
1265         switch (token) {
1266         case T_BYTE:
1267             /* Record the byte */
1268             state = READ_BYTE;
1269             if (!str) goto fail_null_str;
1270             write_byte(str);
1271             break;
1272         case T_TEXT:
1273         case T_DIRECTIVE:
1274         case T_OFFSET:
1275             state = READ_TEXT;
1276             break;
1277         case T_EOL:
1278             state = START_OF_LINE;
1279             break;
1280         default:
1281             break;
1282         }
1283         break;
1284
1285     /* ----- Processing packet, read byte -------------------------------------*/
1286     case READ_BYTE:
1287         switch (token) {
1288         case T_BYTE:
1289             /* Record the byte */
1290             write_byte(str);
1291             break;
1292         case T_TEXT:
1293         case T_DIRECTIVE:
1294         case T_OFFSET:
1295         case T_EOL:
1296             by_eol = 0;
1297             state = READ_TEXT;
1298             if (token == T_EOL) {
1299                 by_eol = 1;
1300                 state = START_OF_LINE;
1301             }
1302             if (identify_ascii) {
1303                 /* Here a line of pkt bytes reading is finished
1304                    compare the ascii and hex to avoid such situation:
1305                    "61 62 20 ab ", when ab is ascii dump then it should
1306                    not be treat as byte */
1307                 rollback = 0;
1308                 /* s2 is the ASCII string, s1 is the HEX string, e.g, when
1309                    s2 = "ab ", s1 = "616220"
1310                    we should find out the largest tail of s1 matches the head
1311                    of s2, it means the matched part in tail is the ASCII dump
1312                    of the head byte. These matched should be rollback */
1313                 line_size = curr_offset-(int)(pkt_lnstart-packet_buf);
1314                 s2 = (char*)g_malloc((line_size+1)/4+1);
1315                 /* gather the possible pattern */
1316                 for (i = 0; i < (line_size+1)/4; i++) {
1317                     tmp_str[0] = pkt_lnstart[i*3];
1318                     tmp_str[1] = pkt_lnstart[i*3+1];
1319                     tmp_str[2] = '\0';
1320                     /* it is a valid convertable string */
1321                     if (!isxdigit(tmp_str[0]) || !isxdigit(tmp_str[0])) {
1322                         break;
1323                     }
1324                     s2[i] = (char)strtoul(tmp_str, (char **)NULL, 16);
1325                     rollback++;
1326                     /* the 3rd entry is not a delimiter, so the possible byte pattern will not shown */
1327                     if (!(pkt_lnstart[i*3+2] == ' ')) {
1328                         if (by_eol != 1)
1329                             rollback--;
1330                         break;
1331                     }
1332                 }
1333                 /* If packet line start contains possible byte pattern, the line end
1334                    should contain the matched pattern if the user open the -a flag.
1335                    The packet will be possible invalid if the byte pattern cannot find
1336                    a matched one in the line of packet buffer.*/
1337                 if (rollback > 0) {
1338                     if (strncmp(pkt_lnstart+line_size-rollback, s2, rollback) == 0) {
1339                         unwrite_bytes(rollback);
1340                     }
1341                     /* Not matched. This line contains invalid packet bytes, so
1342                        discard the whole line */
1343                     else {
1344                         unwrite_bytes(line_size);
1345                     }
1346                 }
1347                 g_free(s2);
1348             }
1349             break;
1350         default:
1351             break;
1352         }
1353         break;
1354
1355     /* ----- Processing packet, read text -------------------------------------*/
1356     case READ_TEXT:
1357         switch (token) {
1358         case T_EOL:
1359             state = START_OF_LINE;
1360             break;
1361         default:
1362             break;
1363         }
1364         break;
1365
1366     default:
1367         fprintf(stderr, "FATAL ERROR: Bad state (%d)", state);
1368         exit(1);
1369     }
1370
1371     if (debug >= 2)
1372         fprintf(stderr, ", %s)\n", state_str[state]);
1373
1374     return;
1375
1376 fail_null_str:
1377     fprintf(stderr, "FATAL ERROR: got NULL str pointer in state (%d)", state);
1378     exit(1);
1379
1380 }
1381
1382 /*----------------------------------------------------------------------
1383  * Print usage string and exit
1384  */
1385 static void
1386 usage (gboolean is_error)
1387 {
1388     FILE *output;
1389
1390     if (!is_error) {
1391         output = stdout;
1392     }
1393     else {
1394         output = stderr;
1395     }
1396
1397     fprintf(output,
1398             "Text2pcap %s"
1399 #ifdef GITVERSION
1400             " (" GITVERSION " from " GITBRANCH ")"
1401 #endif
1402             "\n"
1403             "Generate a capture file from an ASCII hexdump of packets.\n"
1404             "See http://www.wireshark.org for more information.\n"
1405             "\n"
1406             "Usage: text2pcap [options] <infile> <outfile>\n"
1407             "\n"
1408             "where  <infile> specifies input  filename (use - for standard input)\n"
1409             "      <outfile> specifies output filename (use - for standard output)\n"
1410             "\n"
1411             "Input:\n"
1412             "  -o hex|oct|dec         parse offsets as (h)ex, (o)ctal or (d)ecimal;\n"
1413             "                         default is hex.\n"
1414             "  -t <timefmt>           treat the text before the packet as a date/time code;\n"
1415             "                         the specified argument is a format string of the sort\n"
1416             "                         supported by strptime.\n"
1417             "                         Example: The time \"10:15:14.5476\" has the format code\n"
1418             "                         \"%%H:%%M:%%S.\"\n"
1419             "                         NOTE: The subsecond component delimiter, '.', must be\n"
1420             "                         given, but no pattern is required; the remaining\n"
1421             "                         number is assumed to be fractions of a second.\n"
1422             "                         NOTE: Date/time fields from the current date/time are\n"
1423             "                         used as the default for unspecified fields.\n"
1424             "  -D                     the text before the packet starts with an I or an O,\n"
1425             "                         indicating that the packet is inbound or outbound.\n"
1426             "                         This is only stored if the output format is PCAP-NG.\n"
1427             "  -a                     enable ASCII text dump identification.\n"
1428             "                         The start of the ASCII text dump can be identified\n"
1429             "                         and excluded from the packet data, even if it looks\n"
1430             "                         like a HEX dump.\n"
1431             "                         NOTE: Do not enable it if the input file does not\n"
1432             "                         contain the ASCII text dump.\n"
1433             "\n"
1434             "Output:\n"
1435             "  -l <typenum>           link-layer type number; default is 1 (Ethernet).  See\n"
1436             "                         http://www.tcpdump.org/linktypes.html for a list of\n"
1437             "                         numbers.  Use this option if your dump is a complete\n"
1438             "                         hex dump of an encapsulated packet and you wish to\n"
1439             "                         specify the exact type of encapsulation.\n"
1440             "                         Example: -l 7 for ARCNet packets.\n"
1441             "  -m <max-packet>        max packet length in output; default is %d\n"
1442             "\n"
1443             "Prepend dummy header:\n"
1444             "  -e <l3pid>             prepend dummy Ethernet II header with specified L3PID\n"
1445             "                         (in HEX).\n"
1446             "                         Example: -e 0x806 to specify an ARP packet.\n"
1447             "  -i <proto>             prepend dummy IP header with specified IP protocol\n"
1448             "                         (in DECIMAL).\n"
1449             "                         Automatically prepends Ethernet header as well.\n"
1450             "                         Example: -i 46\n"
1451             "  -4 <srcip>,<destip>    prepend dummy IPv4 header with specified\n"
1452             "                         dest and source address.\n"
1453             "                         Example: -4 10.0.0.1,10.0.0.2\n"
1454             "  -6 <srcip>,<destip>    replace IPv6 header with specified\n"
1455             "                         dest and source address.\n"
1456             "                         Example: -6 fe80:0:0:0:202:b3ff:fe1e:8329, 2001:0db8:85a3:0000:0000:8a2e:0370:7334\n"
1457             "  -u <srcp>,<destp>      prepend dummy UDP header with specified\n"
1458             "                         source and destination ports (in DECIMAL).\n"
1459             "                         Automatically prepends Ethernet & IP headers as well.\n"
1460             "                         Example: -u 1000,69 to make the packets look like\n"
1461             "                         TFTP/UDP packets.\n"
1462             "  -T <srcp>,<destp>      prepend dummy TCP header with specified\n"
1463             "                         source and destination ports (in DECIMAL).\n"
1464             "                         Automatically prepends Ethernet & IP headers as well.\n"
1465             "                         Example: -T 50,60\n"
1466             "  -s <srcp>,<dstp>,<tag> prepend dummy SCTP header with specified\n"
1467             "                         source/dest ports and verification tag (in DECIMAL).\n"
1468             "                         Automatically prepends Ethernet & IP headers as well.\n"
1469             "                         Example: -s 30,40,34\n"
1470             "  -S <srcp>,<dstp>,<ppi> prepend dummy SCTP header with specified\n"
1471             "                         source/dest ports and verification tag 0.\n"
1472             "                         Automatically prepends a dummy SCTP DATA\n"
1473             "                         chunk header with payload protocol identifier ppi.\n"
1474             "                         Example: -S 30,40,34\n"
1475             "\n"
1476             "Miscellaneous:\n"
1477             "  -h                     display this help and exit.\n"
1478             "  -d                     show detailed debug of parser states.\n"
1479             "  -q                     generate no output at all (automatically disables -d).\n"
1480             "  -n                     use PCAP-NG instead of PCAP as output format.\n"
1481             "",
1482             VERSION, MAX_PACKET);
1483
1484     exit(is_error ? 1 : 0);
1485 }
1486
1487 /*----------------------------------------------------------------------
1488  * Parse CLI options
1489  */
1490 static void
1491 parse_options (int argc, char *argv[])
1492 {
1493     int   c;
1494     char *p;
1495
1496 #ifdef _WIN32
1497     arg_list_utf_16to8(argc, argv);
1498     create_app_running_mutex();
1499 #endif /* _WIN32 */
1500
1501     /* Scan CLI parameters */
1502     while ((c = getopt(argc, argv, "aDdhqe:i:l:m:no:u:s:S:t:T:4:6:")) != -1) {
1503         switch (c) {
1504         case '?': usage(TRUE); break;
1505         case 'h': usage(FALSE); break;
1506         case 'd': if (!quiet) debug++; break;
1507         case 'D': has_direction = TRUE; break;
1508         case 'q': quiet = TRUE; debug = FALSE; break;
1509         case 'l': pcap_link_type = (guint32)strtol(optarg, NULL, 0); break;
1510         case 'm': max_offset = (guint32)strtol(optarg, NULL, 0); break;
1511         case 'n': use_pcapng = TRUE; break;
1512         case 'o':
1513             if (optarg[0] != 'h' && optarg[0] != 'o' && optarg[0] != 'd') {
1514                 fprintf(stderr, "Bad argument for '-o': %s\n", optarg);
1515                 usage(TRUE);
1516             }
1517             switch (optarg[0]) {
1518             case 'o': offset_base =  8; break;
1519             case 'h': offset_base = 16; break;
1520             case 'd': offset_base = 10; break;
1521             }
1522             break;
1523         case 'e':
1524             hdr_ethernet = TRUE;
1525             if (sscanf(optarg, "%x", &hdr_ethernet_proto) < 1) {
1526                 fprintf(stderr, "Bad argument for '-e': %s\n", optarg);
1527                 usage(TRUE);
1528             }
1529             break;
1530
1531         case 'i':
1532             hdr_ip = TRUE;
1533             hdr_ip_proto = strtol(optarg, &p, 10);
1534             if (p == optarg || *p != '\0' || hdr_ip_proto < 0 ||
1535                   hdr_ip_proto > 255) {
1536                 fprintf(stderr, "Bad argument for '-i': %s\n", optarg);
1537                 usage(TRUE);
1538             }
1539             hdr_ethernet = TRUE;
1540             hdr_ethernet_proto = 0x800;
1541             break;
1542
1543         case 's':
1544             hdr_sctp = TRUE;
1545             hdr_data_chunk = FALSE;
1546             hdr_tcp = FALSE;
1547             hdr_udp = FALSE;
1548             hdr_sctp_src   = (guint32)strtol(optarg, &p, 10);
1549             if (p == optarg || (*p != ',' && *p != '\0')) {
1550                 fprintf(stderr, "Bad src port for '-%c'\n", c);
1551                 usage(TRUE);
1552             }
1553             if (*p == '\0') {
1554                 fprintf(stderr, "No dest port specified for '-%c'\n", c);
1555                 usage(TRUE);
1556             }
1557             p++;
1558             optarg = p;
1559             hdr_sctp_dest = (guint32)strtol(optarg, &p, 10);
1560             if (p == optarg || (*p != ',' && *p != '\0')) {
1561                 fprintf(stderr, "Bad dest port for '-s'\n");
1562                 usage(TRUE);
1563             }
1564             if (*p == '\0') {
1565                 fprintf(stderr, "No tag specified for '-%c'\n", c);
1566                 usage(TRUE);
1567             }
1568             p++;
1569             optarg = p;
1570             hdr_sctp_tag = (guint32)strtol(optarg, &p, 10);
1571             if (p == optarg || *p != '\0') {
1572                 fprintf(stderr, "Bad tag for '-%c'\n", c);
1573                 usage(TRUE);
1574             }
1575
1576             hdr_ip = TRUE;
1577             hdr_ip_proto = 132;
1578             hdr_ethernet = TRUE;
1579             hdr_ethernet_proto = 0x800;
1580             break;
1581         case 'S':
1582             hdr_sctp = TRUE;
1583             hdr_data_chunk = TRUE;
1584             hdr_tcp = FALSE;
1585             hdr_udp = FALSE;
1586             hdr_sctp_src   = (guint32)strtol(optarg, &p, 10);
1587             if (p == optarg || (*p != ',' && *p != '\0')) {
1588                 fprintf(stderr, "Bad src port for '-%c'\n", c);
1589                 usage(TRUE);
1590             }
1591             if (*p == '\0') {
1592                 fprintf(stderr, "No dest port specified for '-%c'\n", c);
1593                 usage(TRUE);
1594             }
1595             p++;
1596             optarg = p;
1597             hdr_sctp_dest = (guint32)strtol(optarg, &p, 10);
1598             if (p == optarg || (*p != ',' && *p != '\0')) {
1599                 fprintf(stderr, "Bad dest port for '-s'\n");
1600                 usage(TRUE);
1601             }
1602             if (*p == '\0') {
1603                 fprintf(stderr, "No ppi specified for '-%c'\n", c);
1604                 usage(TRUE);
1605             }
1606             p++;
1607             optarg = p;
1608             hdr_data_chunk_ppid = (guint32)strtoul(optarg, &p, 10);
1609             if (p == optarg || *p != '\0') {
1610                 fprintf(stderr, "Bad ppi for '-%c'\n", c);
1611                 usage(TRUE);
1612             }
1613
1614             hdr_ip = TRUE;
1615             hdr_ip_proto = 132;
1616             hdr_ethernet = TRUE;
1617             hdr_ethernet_proto = 0x800;
1618             break;
1619
1620         case 't':
1621             ts_fmt = optarg;
1622             break;
1623
1624         case 'u':
1625             hdr_udp = TRUE;
1626             hdr_tcp = FALSE;
1627             hdr_sctp = FALSE;
1628             hdr_data_chunk = FALSE;
1629             hdr_src_port = (guint32)strtol(optarg, &p, 10);
1630             if (p == optarg || (*p != ',' && *p != '\0')) {
1631                 fprintf(stderr, "Bad src port for '-u'\n");
1632                 usage(TRUE);
1633             }
1634             if (*p == '\0') {
1635                 fprintf(stderr, "No dest port specified for '-u'\n");
1636                 usage(TRUE);
1637             }
1638             p++;
1639             optarg = p;
1640             hdr_dest_port = (guint32)strtol(optarg, &p, 10);
1641             if (p == optarg || *p != '\0') {
1642                 fprintf(stderr, "Bad dest port for '-u'\n");
1643                 usage(TRUE);
1644             }
1645             hdr_ip = TRUE;
1646             hdr_ip_proto = 17;
1647             hdr_ethernet = TRUE;
1648             hdr_ethernet_proto = 0x800;
1649             break;
1650
1651         case 'T':
1652             hdr_tcp = TRUE;
1653             hdr_udp = FALSE;
1654             hdr_sctp = FALSE;
1655             hdr_data_chunk = FALSE;
1656             hdr_src_port = (guint32)strtol(optarg, &p, 10);
1657             if (p == optarg || (*p != ',' && *p != '\0')) {
1658                 fprintf(stderr, "Bad src port for '-T'\n");
1659                 usage(TRUE);
1660             }
1661             if (*p == '\0') {
1662                 fprintf(stderr, "No dest port specified for '-u'\n");
1663                 usage(TRUE);
1664             }
1665             p++;
1666             optarg = p;
1667             hdr_dest_port = (guint32)strtol(optarg, &p, 10);
1668             if (p == optarg || *p != '\0') {
1669                 fprintf(stderr, "Bad dest port for '-T'\n");
1670                 usage(TRUE);
1671             }
1672             hdr_ip = TRUE;
1673             hdr_ip_proto = 6;
1674             hdr_ethernet = TRUE;
1675             hdr_ethernet_proto = 0x800;
1676             break;
1677
1678         case 'a':
1679             identify_ascii = TRUE;
1680             break;
1681
1682         case '4':
1683         case '6':
1684             p = strchr(optarg, ',');
1685
1686             if (!p) {
1687                 fprintf(stderr, "Bad source param addr for '-%c'\n", c);
1688                 usage(TRUE);
1689             }
1690
1691             *p = '\0';
1692             if (c == '6')
1693             {
1694                 hdr_ipv6 = TRUE;
1695                 hdr_ethernet_proto = 0x86DD;
1696             }
1697             else
1698             {
1699                 hdr_ip = TRUE;
1700                 hdr_ethernet_proto = 0x800;
1701             }
1702             hdr_ethernet = TRUE;
1703
1704             if (hdr_ipv6 == TRUE) {
1705                 if (inet_pton( AF_INET6, optarg, hdr_ipv6_src_addr) <= 0) {
1706                         fprintf(stderr, "Bad src addr -%c '%s'\n", c, p);
1707                         usage(TRUE);
1708                 }
1709             } else {
1710                 if (inet_pton( AF_INET, optarg, &hdr_ip_src_addr) <= 0) {
1711                         fprintf(stderr, "Bad src addr -%c '%s'\n", c, p);
1712                         usage(TRUE);
1713                 }
1714             }
1715
1716             p++;
1717             if (*p == '\0') {
1718                 fprintf(stderr, "No dest addr specified for '-%c'\n", c);
1719                 usage(TRUE);
1720             }
1721
1722             if (hdr_ipv6 == TRUE) {
1723                 if (inet_pton( AF_INET6, p, hdr_ipv6_dest_addr) <= 0) {
1724                         fprintf(stderr, "Bad dest addr for -%c '%s'\n", c, p);
1725                         usage(TRUE);
1726                 }
1727             } else {
1728                 if (inet_pton( AF_INET, p, &hdr_ip_dest_addr) <= 0) {
1729                         fprintf(stderr, "Bad dest addr for -%c '%s'\n", c, p);
1730                         usage(TRUE);
1731                 }
1732             }
1733             break;
1734
1735
1736         default:
1737             usage(TRUE);
1738         }
1739     }
1740
1741     if (optind >= argc || argc-optind < 2) {
1742         fprintf(stderr, "Must specify input and output filename\n");
1743         usage(TRUE);
1744     }
1745
1746     if (strcmp(argv[optind], "-")) {
1747         input_filename = g_strdup(argv[optind]);
1748         input_file = ws_fopen(input_filename, "rb");
1749         if (!input_file) {
1750             fprintf(stderr, "Cannot open file [%s] for reading: %s\n",
1751                     input_filename, g_strerror(errno));
1752             exit(1);
1753         }
1754     } else {
1755         input_filename = "Standard input";
1756         input_file = stdin;
1757     }
1758
1759     if (strcmp(argv[optind+1], "-")) {
1760         output_filename = g_strdup(argv[optind+1]);
1761         output_file = ws_fopen(output_filename, "wb");
1762         if (!output_file) {
1763             fprintf(stderr, "Cannot open file [%s] for writing: %s\n",
1764                     output_filename, g_strerror(errno));
1765             exit(1);
1766         }
1767     } else {
1768         output_filename = "Standard output";
1769         output_file = stdout;
1770     }
1771
1772     /* Some validation */
1773     if (pcap_link_type != 1 && hdr_ethernet) {
1774         fprintf(stderr, "Dummy headers (-e, -i, -u, -s, -S -T) cannot be specified with link type override (-l)\n");
1775         exit(1);
1776     }
1777
1778     /* Set up our variables */
1779     if (!input_file) {
1780         input_file = stdin;
1781         input_filename = "Standard input";
1782     }
1783     if (!output_file) {
1784         output_file = stdout;
1785         output_filename = "Standard output";
1786     }
1787
1788     ts_sec = time(0);               /* initialize to current time */
1789     timecode_default = *localtime(&ts_sec);
1790     timecode_default.tm_isdst = -1; /* Unknown for now, depends on time given to the strptime() function */
1791
1792     /* Display summary of our state */
1793     if (!quiet) {
1794         fprintf(stderr, "Input from: %s\n", input_filename);
1795         fprintf(stderr, "Output to: %s\n",  output_filename);
1796         fprintf(stderr, "Output format: %s\n", use_pcapng ? "PCAP-NG" : "PCAP");
1797
1798         if (hdr_ethernet) fprintf(stderr, "Generate dummy Ethernet header: Protocol: 0x%0X\n",
1799                                   hdr_ethernet_proto);
1800         if (hdr_ip) fprintf(stderr, "Generate dummy IP header: Protocol: %ld\n",
1801                             hdr_ip_proto);
1802         if (hdr_udp) fprintf(stderr, "Generate dummy UDP header: Source port: %u. Dest port: %u\n",
1803                              hdr_src_port, hdr_dest_port);
1804         if (hdr_tcp) fprintf(stderr, "Generate dummy TCP header: Source port: %u. Dest port: %u\n",
1805                              hdr_src_port, hdr_dest_port);
1806         if (hdr_sctp) fprintf(stderr, "Generate dummy SCTP header: Source port: %u. Dest port: %u. Tag: %u\n",
1807                               hdr_sctp_src, hdr_sctp_dest, hdr_sctp_tag);
1808         if (hdr_data_chunk) fprintf(stderr, "Generate dummy DATA chunk header: TSN: %u. SID: %d. SSN: %d. PPID: %u\n",
1809                                     hdr_data_chunk_tsn, hdr_data_chunk_sid, hdr_data_chunk_ssn, hdr_data_chunk_ppid);
1810     }
1811 }
1812
1813 int
1814 main(int argc, char *argv[])
1815 {
1816     parse_options(argc, argv);
1817
1818     assert(input_file  != NULL);
1819     assert(output_file != NULL);
1820
1821     write_file_header();
1822
1823     header_length = 0;
1824     if (hdr_ethernet) {
1825         header_length += (int)sizeof(HDR_ETHERNET);
1826     }
1827     if (hdr_ip) {
1828         ip_offset = header_length;
1829         header_length += (int)sizeof(HDR_IP);
1830     } else if (hdr_ipv6) {
1831         ip_offset = header_length;
1832         header_length += (int)sizeof(HDR_IPv6);
1833     }
1834     if (hdr_sctp) {
1835         header_length += (int)sizeof(HDR_SCTP);
1836     }
1837     if (hdr_data_chunk) {
1838         header_length += (int)sizeof(HDR_DATA_CHUNK);
1839     }
1840     if (hdr_tcp) {
1841         header_length += (int)sizeof(HDR_TCP);
1842     }
1843     if (hdr_udp) {
1844         header_length += (int)sizeof(HDR_UDP);
1845     }
1846     curr_offset = header_length;
1847
1848     yyin = input_file;
1849     yylex();
1850
1851     write_current_packet(FALSE);
1852     write_file_trailer();
1853     fclose(input_file);
1854     fclose(output_file);
1855     if (debug)
1856         fprintf(stderr, "\n-------------------------\n");
1857     if (!quiet) {
1858         fprintf(stderr, "Read %u potential packet%s, wrote %u packet%s (%" G_GINT64_MODIFIER "u byte%s).\n",
1859                 num_packets_read, (num_packets_read == 1) ? "" : "s",
1860                 num_packets_written, (num_packets_written == 1) ? "" : "s",
1861                 bytes_written, (bytes_written == 1) ? "" : "s");
1862     }
1863     return 0;
1864 }
1865
1866 /*
1867  * Editor modelines  -  http://www.wireshark.org/tools/modelines.html
1868  *
1869  * Local variables:
1870  * c-basic-offset: 4
1871  * tab-width: 8
1872  * indent-tabs-mode: nil
1873  * End:
1874  *
1875  * vi: set shiftwidth=4 tabstop=8 expandtab:
1876  * :indentSize=4:tabSize=8:noTabs=true:
1877  */
1878