Replace "svn" with "git" all over the place.
[metze/wireshark/wip.git] / 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         switch (token) {
1186         case T_TEXT:
1187             append_to_preamble(str);
1188             break;
1189         case T_DIRECTIVE:
1190             process_directive(str);
1191             break;
1192         case T_OFFSET:
1193             num = parse_num(str, TRUE);
1194             if (num == 0) {
1195                 /* New packet starts here */
1196                 start_new_packet(FALSE);
1197                 state = READ_OFFSET;
1198                 pkt_lnstart = packet_buf + num;
1199             }
1200             break;
1201         case T_EOL:
1202             /* Some describing text may be parsed as offset, but the invalid
1203                offset will be checked in the state of START_OF_LINE, so
1204                we add this transition to gain flexibility */
1205             state = START_OF_LINE;
1206             break;
1207         default:
1208             break;
1209         }
1210         break;
1211
1212     /* ----- Processing packet, start of new line -----------------------------*/
1213     case START_OF_LINE:
1214         switch (token) {
1215         case T_TEXT:
1216             append_to_preamble(str);
1217             break;
1218         case T_DIRECTIVE:
1219             process_directive(str);
1220             break;
1221         case T_OFFSET:
1222             num = parse_num(str, TRUE);
1223             if (num == 0) {
1224                 /* New packet starts here */
1225                 start_new_packet(FALSE);
1226                 packet_start = 0;
1227                 state = READ_OFFSET;
1228             } else if ((num - packet_start) != curr_offset - header_length) {
1229                 /*
1230                  * The offset we read isn't the one we expected.
1231                  * This may only mean that we mistakenly interpreted
1232                  * some text as byte values (e.g., if the text dump
1233                  * of packet data included a number with spaces around
1234                  * it).  If the offset is less than what we expected,
1235                  * assume that's the problem, and throw away the putative
1236                  * extra byte values.
1237                  */
1238                 if (num < curr_offset) {
1239                     unwrite_bytes(curr_offset - num);
1240                     state = READ_OFFSET;
1241                 } else {
1242                     /* Bad offset; switch to INIT state */
1243                     if (debug >= 1)
1244                         fprintf(stderr, "Inconsistent offset. Expecting %0X, got %0X. Ignoring rest of packet\n",
1245                                 curr_offset, num);
1246                     write_current_packet(FALSE);
1247                     state = INIT;
1248                 }
1249             } else
1250                 state = READ_OFFSET;
1251                 pkt_lnstart = packet_buf + num;
1252             break;
1253         case T_EOL:
1254             state = START_OF_LINE;
1255             break;
1256         default:
1257             break;
1258         }
1259         break;
1260
1261     /* ----- Processing packet, read offset -----------------------------------*/
1262     case READ_OFFSET:
1263         switch (token) {
1264         case T_BYTE:
1265             /* Record the byte */
1266             state = READ_BYTE;
1267             write_byte(str);
1268             break;
1269         case T_TEXT:
1270         case T_DIRECTIVE:
1271         case T_OFFSET:
1272             state = READ_TEXT;
1273             break;
1274         case T_EOL:
1275             state = START_OF_LINE;
1276             break;
1277         default:
1278             break;
1279         }
1280         break;
1281
1282     /* ----- Processing packet, read byte -------------------------------------*/
1283     case READ_BYTE:
1284         switch (token) {
1285         case T_BYTE:
1286             /* Record the byte */
1287             write_byte(str);
1288             break;
1289         case T_TEXT:
1290         case T_DIRECTIVE:
1291         case T_OFFSET:
1292         case T_EOL:
1293             by_eol = 0;
1294             state = READ_TEXT;
1295             if (token == T_EOL) {
1296                 by_eol = 1;
1297                 state = START_OF_LINE;
1298             }
1299             if (identify_ascii) {
1300                 /* Here a line of pkt bytes reading is finished
1301                    compare the ascii and hex to avoid such situation:
1302                    "61 62 20 ab ", when ab is ascii dump then it should
1303                    not be treat as byte */
1304                 rollback = 0;
1305                 /* s2 is the ASCII string, s1 is the HEX string, e.g, when
1306                    s2 = "ab ", s1 = "616220"
1307                    we should find out the largest tail of s1 matches the head
1308                    of s2, it means the matched part in tail is the ASCII dump
1309                    of the head byte. These matched should be rollback */
1310                 line_size = curr_offset-(int)(pkt_lnstart-packet_buf);
1311                 s2 = (char*)g_malloc((line_size+1)/4+1);
1312                 /* gather the possible pattern */
1313                 for (i = 0; i < (line_size+1)/4; i++) {
1314                     tmp_str[0] = pkt_lnstart[i*3];
1315                     tmp_str[1] = pkt_lnstart[i*3+1];
1316                     tmp_str[2] = '\0';
1317                     /* it is a valid convertable string */
1318                     if (!isxdigit(tmp_str[0]) || !isxdigit(tmp_str[0])) {
1319                         break;
1320                     }
1321                     s2[i] = (char)strtoul(tmp_str, (char **)NULL, 16);
1322                     rollback++;
1323                     /* the 3rd entry is not a delimiter, so the possible byte pattern will not shown */
1324                     if (!(pkt_lnstart[i*3+2] == ' ')) {
1325                         if (by_eol != 1)
1326                             rollback--;
1327                         break;
1328                     }
1329                 }
1330                 /* If packet line start contains possible byte pattern, the line end
1331                    should contain the matched pattern if the user open the -a flag.
1332                    The packet will be possible invalid if the byte pattern cannot find
1333                    a matched one in the line of packet buffer.*/
1334                 if (rollback > 0) {
1335                     if (strncmp(pkt_lnstart+line_size-rollback, s2, rollback) == 0) {
1336                         unwrite_bytes(rollback);
1337                     }
1338                     /* Not matched. This line contains invalid packet bytes, so
1339                        discard the whole line */
1340                     else {
1341                         unwrite_bytes(line_size);
1342                     }
1343                 }
1344                 g_free(s2);
1345             }
1346             break;
1347         default:
1348             break;
1349         }
1350         break;
1351
1352     /* ----- Processing packet, read text -------------------------------------*/
1353     case READ_TEXT:
1354         switch (token) {
1355         case T_EOL:
1356             state = START_OF_LINE;
1357             break;
1358         default:
1359             break;
1360         }
1361         break;
1362
1363     default:
1364         fprintf(stderr, "FATAL ERROR: Bad state (%d)", state);
1365         exit(1);
1366     }
1367
1368     if (debug >= 2)
1369         fprintf(stderr, ", %s)\n", state_str[state]);
1370
1371 }
1372
1373 /*----------------------------------------------------------------------
1374  * Print usage string and exit
1375  */
1376 static void
1377 usage (gboolean is_error)
1378 {
1379     FILE *output;
1380
1381     if (!is_error) {
1382         output = stdout;
1383     }
1384     else {
1385         output = stderr;
1386     }
1387
1388     fprintf(output,
1389             "Text2pcap %s"
1390 #ifdef GITVERSION
1391             " (" GITVERSION " from " GITBRANCH ")"
1392 #endif
1393             "\n"
1394             "Generate a capture file from an ASCII hexdump of packets.\n"
1395             "See http://www.wireshark.org for more information.\n"
1396             "\n"
1397             "Usage: text2pcap [options] <infile> <outfile>\n"
1398             "\n"
1399             "where  <infile> specifies input  filename (use - for standard input)\n"
1400             "      <outfile> specifies output filename (use - for standard output)\n"
1401             "\n"
1402             "Input:\n"
1403             "  -o hex|oct|dec         parse offsets as (h)ex, (o)ctal or (d)ecimal;\n"
1404             "                         default is hex.\n"
1405             "  -t <timefmt>           treat the text before the packet as a date/time code;\n"
1406             "                         the specified argument is a format string of the sort\n"
1407             "                         supported by strptime.\n"
1408             "                         Example: The time \"10:15:14.5476\" has the format code\n"
1409             "                         \"%%H:%%M:%%S.\"\n"
1410             "                         NOTE: The subsecond component delimiter, '.', must be\n"
1411             "                         given, but no pattern is required; the remaining\n"
1412             "                         number is assumed to be fractions of a second.\n"
1413             "                         NOTE: Date/time fields from the current date/time are\n"
1414             "                         used as the default for unspecified fields.\n"
1415             "  -D                     the text before the packet starts with an I or an O,\n"
1416             "                         indicating that the packet is inbound or outbound.\n"
1417             "                         This is only stored if the output format is PCAP-NG.\n"
1418             "  -a                     enable ASCII text dump identification.\n"
1419             "                         The start of the ASCII text dump can be identified\n"
1420             "                         and excluded from the packet data, even if it looks\n"
1421             "                         like a HEX dump.\n"
1422             "                         NOTE: Do not enable it if the input file does not\n"
1423             "                         contain the ASCII text dump.\n"
1424             "\n"
1425             "Output:\n"
1426             "  -l <typenum>           link-layer type number; default is 1 (Ethernet).  See\n"
1427             "                         http://www.tcpdump.org/linktypes.html for a list of\n"
1428             "                         numbers.  Use this option if your dump is a complete\n"
1429             "                         hex dump of an encapsulated packet and you wish to\n"
1430             "                         specify the exact type of encapsulation.\n"
1431             "                         Example: -l 7 for ARCNet packets.\n"
1432             "  -m <max-packet>        max packet length in output; default is %d\n"
1433             "\n"
1434             "Prepend dummy header:\n"
1435             "  -e <l3pid>             prepend dummy Ethernet II header with specified L3PID\n"
1436             "                         (in HEX).\n"
1437             "                         Example: -e 0x806 to specify an ARP packet.\n"
1438             "  -i <proto>             prepend dummy IP header with specified IP protocol\n"
1439             "                         (in DECIMAL).\n"
1440             "                         Automatically prepends Ethernet header as well.\n"
1441             "                         Example: -i 46\n"
1442             "  -4 <srcip>,<destip>    prepend dummy IPv4 header with specified\n"
1443             "                         dest and source address.\n"
1444             "                         Example: -4 10.0.0.1,10.0.0.2\n"
1445             "  -6 <srcip>,<destip>    replace IPv6 header with specified\n"
1446             "                         dest and source address.\n"
1447             "                         Example: -6 fe80:0:0:0:202:b3ff:fe1e:8329, 2001:0db8:85a3:0000:0000:8a2e:0370:7334\n"
1448             "  -u <srcp>,<destp>      prepend dummy UDP header with specified\n"
1449             "                         source and destination ports (in DECIMAL).\n"
1450             "                         Automatically prepends Ethernet & IP headers as well.\n"
1451             "                         Example: -u 1000,69 to make the packets look like\n"
1452             "                         TFTP/UDP packets.\n"
1453             "  -T <srcp>,<destp>      prepend dummy TCP header with specified\n"
1454             "                         source and destination ports (in DECIMAL).\n"
1455             "                         Automatically prepends Ethernet & IP headers as well.\n"
1456             "                         Example: -T 50,60\n"
1457             "  -s <srcp>,<dstp>,<tag> prepend dummy SCTP header with specified\n"
1458             "                         source/dest ports and verification tag (in DECIMAL).\n"
1459             "                         Automatically prepends Ethernet & IP headers as well.\n"
1460             "                         Example: -s 30,40,34\n"
1461             "  -S <srcp>,<dstp>,<ppi> prepend dummy SCTP header with specified\n"
1462             "                         source/dest ports and verification tag 0.\n"
1463             "                         Automatically prepends a dummy SCTP DATA\n"
1464             "                         chunk header with payload protocol identifier ppi.\n"
1465             "                         Example: -S 30,40,34\n"
1466             "\n"
1467             "Miscellaneous:\n"
1468             "  -h                     display this help and exit.\n"
1469             "  -d                     show detailed debug of parser states.\n"
1470             "  -q                     generate no output at all (automatically disables -d).\n"
1471             "  -n                     use PCAP-NG instead of PCAP as output format.\n"
1472             "",
1473             VERSION, MAX_PACKET);
1474
1475     exit(is_error ? 1 : 0);
1476 }
1477
1478 /*----------------------------------------------------------------------
1479  * Parse CLI options
1480  */
1481 static void
1482 parse_options (int argc, char *argv[])
1483 {
1484     int   c;
1485     char *p;
1486
1487 #ifdef _WIN32
1488     arg_list_utf_16to8(argc, argv);
1489     create_app_running_mutex();
1490 #endif /* _WIN32 */
1491
1492     /* Scan CLI parameters */
1493     while ((c = getopt(argc, argv, "aDdhqe:i:l:m:no:u:s:S:t:T:4:6:")) != -1) {
1494         switch (c) {
1495         case '?': usage(TRUE); break;
1496         case 'h': usage(FALSE); break;
1497         case 'd': if (!quiet) debug++; break;
1498         case 'D': has_direction = TRUE; break;
1499         case 'q': quiet = TRUE; debug = FALSE; break;
1500         case 'l': pcap_link_type = (guint32)strtol(optarg, NULL, 0); break;
1501         case 'm': max_offset = (guint32)strtol(optarg, NULL, 0); break;
1502         case 'n': use_pcapng = TRUE; break;
1503         case 'o':
1504             if (optarg[0] != 'h' && optarg[0] != 'o' && optarg[0] != 'd') {
1505                 fprintf(stderr, "Bad argument for '-o': %s\n", optarg);
1506                 usage(TRUE);
1507             }
1508             switch (optarg[0]) {
1509             case 'o': offset_base =  8; break;
1510             case 'h': offset_base = 16; break;
1511             case 'd': offset_base = 10; break;
1512             }
1513             break;
1514         case 'e':
1515             hdr_ethernet = TRUE;
1516             if (sscanf(optarg, "%x", &hdr_ethernet_proto) < 1) {
1517                 fprintf(stderr, "Bad argument for '-e': %s\n", optarg);
1518                 usage(TRUE);
1519             }
1520             break;
1521
1522         case 'i':
1523             hdr_ip = TRUE;
1524             hdr_ip_proto = strtol(optarg, &p, 10);
1525             if (p == optarg || *p != '\0' || hdr_ip_proto < 0 ||
1526                   hdr_ip_proto > 255) {
1527                 fprintf(stderr, "Bad argument for '-i': %s\n", optarg);
1528                 usage(TRUE);
1529             }
1530             hdr_ethernet = TRUE;
1531             hdr_ethernet_proto = 0x800;
1532             break;
1533
1534         case 's':
1535             hdr_sctp = TRUE;
1536             hdr_data_chunk = FALSE;
1537             hdr_tcp = FALSE;
1538             hdr_udp = FALSE;
1539             hdr_sctp_src   = (guint32)strtol(optarg, &p, 10);
1540             if (p == optarg || (*p != ',' && *p != '\0')) {
1541                 fprintf(stderr, "Bad src port for '-%c'\n", c);
1542                 usage(TRUE);
1543             }
1544             if (*p == '\0') {
1545                 fprintf(stderr, "No dest port specified for '-%c'\n", c);
1546                 usage(TRUE);
1547             }
1548             p++;
1549             optarg = p;
1550             hdr_sctp_dest = (guint32)strtol(optarg, &p, 10);
1551             if (p == optarg || (*p != ',' && *p != '\0')) {
1552                 fprintf(stderr, "Bad dest port for '-s'\n");
1553                 usage(TRUE);
1554             }
1555             if (*p == '\0') {
1556                 fprintf(stderr, "No tag specified for '-%c'\n", c);
1557                 usage(TRUE);
1558             }
1559             p++;
1560             optarg = p;
1561             hdr_sctp_tag = (guint32)strtol(optarg, &p, 10);
1562             if (p == optarg || *p != '\0') {
1563                 fprintf(stderr, "Bad tag for '-%c'\n", c);
1564                 usage(TRUE);
1565             }
1566
1567             hdr_ip = TRUE;
1568             hdr_ip_proto = 132;
1569             hdr_ethernet = TRUE;
1570             hdr_ethernet_proto = 0x800;
1571             break;
1572         case 'S':
1573             hdr_sctp = TRUE;
1574             hdr_data_chunk = TRUE;
1575             hdr_tcp = FALSE;
1576             hdr_udp = FALSE;
1577             hdr_sctp_src   = (guint32)strtol(optarg, &p, 10);
1578             if (p == optarg || (*p != ',' && *p != '\0')) {
1579                 fprintf(stderr, "Bad src port for '-%c'\n", c);
1580                 usage(TRUE);
1581             }
1582             if (*p == '\0') {
1583                 fprintf(stderr, "No dest port specified for '-%c'\n", c);
1584                 usage(TRUE);
1585             }
1586             p++;
1587             optarg = p;
1588             hdr_sctp_dest = (guint32)strtol(optarg, &p, 10);
1589             if (p == optarg || (*p != ',' && *p != '\0')) {
1590                 fprintf(stderr, "Bad dest port for '-s'\n");
1591                 usage(TRUE);
1592             }
1593             if (*p == '\0') {
1594                 fprintf(stderr, "No ppi specified for '-%c'\n", c);
1595                 usage(TRUE);
1596             }
1597             p++;
1598             optarg = p;
1599             hdr_data_chunk_ppid = (guint32)strtoul(optarg, &p, 10);
1600             if (p == optarg || *p != '\0') {
1601                 fprintf(stderr, "Bad ppi for '-%c'\n", c);
1602                 usage(TRUE);
1603             }
1604
1605             hdr_ip = TRUE;
1606             hdr_ip_proto = 132;
1607             hdr_ethernet = TRUE;
1608             hdr_ethernet_proto = 0x800;
1609             break;
1610
1611         case 't':
1612             ts_fmt = optarg;
1613             break;
1614
1615         case 'u':
1616             hdr_udp = TRUE;
1617             hdr_tcp = FALSE;
1618             hdr_sctp = FALSE;
1619             hdr_data_chunk = FALSE;
1620             hdr_src_port = (guint32)strtol(optarg, &p, 10);
1621             if (p == optarg || (*p != ',' && *p != '\0')) {
1622                 fprintf(stderr, "Bad src port for '-u'\n");
1623                 usage(TRUE);
1624             }
1625             if (*p == '\0') {
1626                 fprintf(stderr, "No dest port specified for '-u'\n");
1627                 usage(TRUE);
1628             }
1629             p++;
1630             optarg = p;
1631             hdr_dest_port = (guint32)strtol(optarg, &p, 10);
1632             if (p == optarg || *p != '\0') {
1633                 fprintf(stderr, "Bad dest port for '-u'\n");
1634                 usage(TRUE);
1635             }
1636             hdr_ip = TRUE;
1637             hdr_ip_proto = 17;
1638             hdr_ethernet = TRUE;
1639             hdr_ethernet_proto = 0x800;
1640             break;
1641
1642         case 'T':
1643             hdr_tcp = TRUE;
1644             hdr_udp = FALSE;
1645             hdr_sctp = FALSE;
1646             hdr_data_chunk = FALSE;
1647             hdr_src_port = (guint32)strtol(optarg, &p, 10);
1648             if (p == optarg || (*p != ',' && *p != '\0')) {
1649                 fprintf(stderr, "Bad src port for '-T'\n");
1650                 usage(TRUE);
1651             }
1652             if (*p == '\0') {
1653                 fprintf(stderr, "No dest port specified for '-u'\n");
1654                 usage(TRUE);
1655             }
1656             p++;
1657             optarg = p;
1658             hdr_dest_port = (guint32)strtol(optarg, &p, 10);
1659             if (p == optarg || *p != '\0') {
1660                 fprintf(stderr, "Bad dest port for '-T'\n");
1661                 usage(TRUE);
1662             }
1663             hdr_ip = TRUE;
1664             hdr_ip_proto = 6;
1665             hdr_ethernet = TRUE;
1666             hdr_ethernet_proto = 0x800;
1667             break;
1668
1669         case 'a':
1670             identify_ascii = TRUE;
1671             break;
1672
1673         case '4':
1674         case '6':
1675             p = strchr(optarg, ',');
1676
1677             if (!p) {
1678                 fprintf(stderr, "Bad source param addr for '-%c'\n", c);
1679                 usage(TRUE);
1680             }
1681
1682             *p = '\0';
1683             if (c == '6')
1684             {
1685                 hdr_ipv6 = TRUE;
1686                 hdr_ethernet_proto = 0x86DD;
1687             }
1688             else
1689             {
1690                 hdr_ip = TRUE;
1691                 hdr_ethernet_proto = 0x800;
1692             }
1693             hdr_ethernet = TRUE;
1694
1695             if (hdr_ipv6 == TRUE) {
1696                 if (inet_pton( AF_INET6, optarg, hdr_ipv6_src_addr) <= 0) {
1697                         fprintf(stderr, "Bad src addr -%c '%s'\n", c, p);
1698                         usage(TRUE);
1699                 }
1700             } else {
1701                 if (inet_pton( AF_INET, optarg, &hdr_ip_src_addr) <= 0) {
1702                         fprintf(stderr, "Bad src addr -%c '%s'\n", c, p);
1703                         usage(TRUE);
1704                 }
1705             }
1706
1707             p++;
1708             if (*p == '\0') {
1709                 fprintf(stderr, "No dest addr specified for '-%c'\n", c);
1710                 usage(TRUE);
1711             }
1712
1713             if (hdr_ipv6 == TRUE) {
1714                 if (inet_pton( AF_INET6, p, hdr_ipv6_dest_addr) <= 0) {
1715                         fprintf(stderr, "Bad dest addr for -%c '%s'\n", c, p);
1716                         usage(TRUE);
1717                 }
1718             } else {
1719                 if (inet_pton( AF_INET, p, &hdr_ip_dest_addr) <= 0) {
1720                         fprintf(stderr, "Bad dest addr for -%c '%s'\n", c, p);
1721                         usage(TRUE);
1722                 }
1723             }
1724             break;
1725
1726
1727         default:
1728             usage(TRUE);
1729         }
1730     }
1731
1732     if (optind >= argc || argc-optind < 2) {
1733         fprintf(stderr, "Must specify input and output filename\n");
1734         usage(TRUE);
1735     }
1736
1737     if (strcmp(argv[optind], "-")) {
1738         input_filename = g_strdup(argv[optind]);
1739         input_file = ws_fopen(input_filename, "rb");
1740         if (!input_file) {
1741             fprintf(stderr, "Cannot open file [%s] for reading: %s\n",
1742                     input_filename, g_strerror(errno));
1743             exit(1);
1744         }
1745     } else {
1746         input_filename = "Standard input";
1747         input_file = stdin;
1748     }
1749
1750     if (strcmp(argv[optind+1], "-")) {
1751         output_filename = g_strdup(argv[optind+1]);
1752         output_file = ws_fopen(output_filename, "wb");
1753         if (!output_file) {
1754             fprintf(stderr, "Cannot open file [%s] for writing: %s\n",
1755                     output_filename, g_strerror(errno));
1756             exit(1);
1757         }
1758     } else {
1759         output_filename = "Standard output";
1760         output_file = stdout;
1761     }
1762
1763     /* Some validation */
1764     if (pcap_link_type != 1 && hdr_ethernet) {
1765         fprintf(stderr, "Dummy headers (-e, -i, -u, -s, -S -T) cannot be specified with link type override (-l)\n");
1766         exit(1);
1767     }
1768
1769     /* Set up our variables */
1770     if (!input_file) {
1771         input_file = stdin;
1772         input_filename = "Standard input";
1773     }
1774     if (!output_file) {
1775         output_file = stdout;
1776         output_filename = "Standard output";
1777     }
1778
1779     ts_sec = time(0);               /* initialize to current time */
1780     timecode_default = *localtime(&ts_sec);
1781     timecode_default.tm_isdst = -1; /* Unknown for now, depends on time given to the strptime() function */
1782
1783     /* Display summary of our state */
1784     if (!quiet) {
1785         fprintf(stderr, "Input from: %s\n", input_filename);
1786         fprintf(stderr, "Output to: %s\n",  output_filename);
1787         fprintf(stderr, "Output format: %s\n", use_pcapng ? "PCAP-NG" : "PCAP");
1788
1789         if (hdr_ethernet) fprintf(stderr, "Generate dummy Ethernet header: Protocol: 0x%0X\n",
1790                                   hdr_ethernet_proto);
1791         if (hdr_ip) fprintf(stderr, "Generate dummy IP header: Protocol: %ld\n",
1792                             hdr_ip_proto);
1793         if (hdr_udp) fprintf(stderr, "Generate dummy UDP header: Source port: %u. Dest port: %u\n",
1794                              hdr_src_port, hdr_dest_port);
1795         if (hdr_tcp) fprintf(stderr, "Generate dummy TCP header: Source port: %u. Dest port: %u\n",
1796                              hdr_src_port, hdr_dest_port);
1797         if (hdr_sctp) fprintf(stderr, "Generate dummy SCTP header: Source port: %u. Dest port: %u. Tag: %u\n",
1798                               hdr_sctp_src, hdr_sctp_dest, hdr_sctp_tag);
1799         if (hdr_data_chunk) fprintf(stderr, "Generate dummy DATA chunk header: TSN: %u. SID: %d. SSN: %d. PPID: %u\n",
1800                                     hdr_data_chunk_tsn, hdr_data_chunk_sid, hdr_data_chunk_ssn, hdr_data_chunk_ppid);
1801     }
1802 }
1803
1804 int
1805 main(int argc, char *argv[])
1806 {
1807     parse_options(argc, argv);
1808
1809     assert(input_file  != NULL);
1810     assert(output_file != NULL);
1811
1812     write_file_header();
1813
1814     header_length = 0;
1815     if (hdr_ethernet) {
1816         header_length += (int)sizeof(HDR_ETHERNET);
1817     }
1818     if (hdr_ip) {
1819         ip_offset = header_length;
1820         header_length += (int)sizeof(HDR_IP);
1821     } else if (hdr_ipv6) {
1822         ip_offset = header_length;
1823         header_length += (int)sizeof(HDR_IPv6);
1824     }
1825     if (hdr_sctp) {
1826         header_length += (int)sizeof(HDR_SCTP);
1827     }
1828     if (hdr_data_chunk) {
1829         header_length += (int)sizeof(HDR_DATA_CHUNK);
1830     }
1831     if (hdr_tcp) {
1832         header_length += (int)sizeof(HDR_TCP);
1833     }
1834     if (hdr_udp) {
1835         header_length += (int)sizeof(HDR_UDP);
1836     }
1837     curr_offset = header_length;
1838
1839     yyin = input_file;
1840     yylex();
1841
1842     write_current_packet(FALSE);
1843     write_file_trailer();
1844     fclose(input_file);
1845     fclose(output_file);
1846     if (debug)
1847         fprintf(stderr, "\n-------------------------\n");
1848     if (!quiet) {
1849         fprintf(stderr, "Read %u potential packet%s, wrote %u packet%s (%" G_GINT64_MODIFIER "u byte%s).\n",
1850                 num_packets_read, (num_packets_read == 1) ? "" : "s",
1851                 num_packets_written, (num_packets_written == 1) ? "" : "s",
1852                 bytes_written, (bytes_written == 1) ? "" : "s");
1853     }
1854     return 0;
1855 }
1856
1857 /*
1858  * Editor modelines  -  http://www.wireshark.org/tools/modelines.html
1859  *
1860  * Local variables:
1861  * c-basic-offset: 4
1862  * tab-width: 8
1863  * indent-tabs-mode: nil
1864  * End:
1865  *
1866  * vi: set shiftwidth=4 tabstop=8 expandtab:
1867  * :indentSize=4:tabSize=8:noTabs=true:
1868  */
1869