Support for time stamping packets in text2pcap, from Gordon McKinney.
[obnox/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: text2pcap.c,v 1.7 2001/11/24 08:14:10 guy Exp $
10  * 
11  * Ethereal - Network traffic analyzer
12  * By Gerald Combs <gerald@ethereal.com>
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., 59 Temple Place - Suite 330, Boston, MA  02111-1307, 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 signalled 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 headers to the packets in order to allow
69  * 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 64K. Packet
77  * snaplength is automatically set to 64K.
78  */
79
80 #ifdef HAVE_CONFIG_H
81 # include "config.h"
82 #endif
83
84 #include <ctype.h>
85 #include <stdio.h>
86 #include <stdlib.h>
87 #include <string.h>
88 #include <time.h>
89 #include <sys/types.h>
90 #ifdef HAVE_UNISTD_H
91 # include <unistd.h>
92 #endif
93 #ifdef HAVE_NETINET_IN_H
94 # include <netinet/in.h>
95 #endif
96 #ifdef HAVE_WINSOCK_H
97 # include <winsock.h>
98 #endif
99 #include <errno.h>
100 #include <assert.h>
101
102 #ifdef NEED_GETOPT_H
103 # include "getopt.h"
104 #endif
105
106 #ifdef NEED_STRPTIME_H
107 # include "strptime.h"
108 #endif
109
110 #ifndef TRUE
111 #define TRUE 1
112 #endif
113
114 #ifndef FALSE
115 #define FALSE 0
116 #endif
117
118 #include "text2pcap.h"
119
120 /*--- Options --------------------------------------------------------------------*/
121
122 /* Debug level */
123 int debug = 0; 
124 /* Be quiet */
125 int quiet = FALSE;
126
127 /* Dummy Ethernet header */
128 int hdr_ethernet = FALSE;
129 unsigned long hdr_ethernet_proto = 0;
130
131 /* Dummy IP header */
132 int hdr_ip = FALSE;
133 unsigned long hdr_ip_proto = 0;
134
135 /* Dummy UDP header */
136 int hdr_udp = FALSE;
137 unsigned long hdr_udp_dest = 0;
138 unsigned long hdr_udp_src = 0;
139
140 /*--- Local date -----------------------------------------------------------------*/
141
142 /* This is where we store the packet currently being built */
143 #define MAX_PACKET 64000
144 unsigned char packet_buf[MAX_PACKET];
145 unsigned long curr_offset = 0;
146
147 /* This buffer contains strings present before the packet offset 0 */
148 #define PACKET_PREAMBLE_MAX_LEN 2048
149 static unsigned char packet_preamble[PACKET_PREAMBLE_MAX_LEN+1];
150 static int packet_preamble_len = 0;
151
152 /* Number of packets read and written */
153 unsigned long num_packets_read = 0;
154 unsigned long num_packets_written = 0;
155
156 /* Time code of packet, derived from packet_preamble */
157 static unsigned long ts_sec  = 0;
158 static unsigned long ts_usec = 0;
159 static char *ts_fmt = NULL;
160
161 /* Input file */
162 char *input_filename;
163 FILE *input_file = NULL;
164 /* Output file */
165 char *output_filename;
166 FILE *output_file = NULL;
167
168 /* Offset base to parse */
169 unsigned long offset_base = 16;
170
171 FILE *yyin;
172
173 /* ----- State machine -----------------------------------------------------------*/
174
175 /* Current state of parser */
176 typedef enum {
177     INIT,             /* Waiting for start of new packet */
178     START_OF_LINE,    /* Starting from beginning of line */
179     READ_OFFSET,      /* Just read the offset */
180     READ_BYTE,        /* Just read a byte */
181     READ_TEXT,        /* Just read text - ignore until EOL */
182 } parser_state_t;
183 parser_state_t state = INIT;
184
185 const char *state_str[] = {"Init", 
186                            "Start-of-line", 
187                            "Offset",
188                            "Byte",
189                            "Text"
190 };
191
192 const char *token_str[] = {"",
193                            "Byte", 
194                            "Offset",
195                            "Directive",
196                            "Text",
197                            "End-of-line"
198 };
199
200 /* ----- Skeleton Packet Headers --------------------------------------------------*/
201
202 typedef struct {
203     unsigned char   src_addr[6];
204     unsigned char   dest_addr[6];
205     unsigned short l3pid;
206 } hdr_ethernet_t;
207
208 hdr_ethernet_t HDR_ETHERNET = {
209     {0x01, 0x01, 0x01, 0x01, 0x01, 0x01}, 
210     {0x02, 0x02, 0x02, 0x02, 0x02, 0x02},
211     0};
212
213 typedef struct {
214     unsigned char   ver_hdrlen;
215     unsigned char   dscp;
216     unsigned short packet_length;
217     unsigned short identification;
218     unsigned char   flags;
219     unsigned char   fragment;
220     unsigned char   ttl;
221     unsigned char   protocol;
222     unsigned short hdr_checksum;
223     unsigned long src_addr;
224     unsigned long dest_addr;
225 } hdr_ip_t;
226
227 hdr_ip_t HDR_IP = {0x45, 0, 0, 0x3412, 0, 0, 0xff, 0, 0, 0x01010101, 0x02020202};
228
229 typedef struct {
230     unsigned short source_port;
231     unsigned short dest_port;
232     unsigned short length;
233     unsigned short checksum;
234 } hdr_udp_t;
235
236 hdr_udp_t HDR_UDP = {0, 0, 0, 0};
237
238 char tempbuf[64];
239
240 /*----------------------------------------------------------------------
241  * Stuff for writing a PCap file
242  */
243 #define PCAP_MAGIC                      0xa1b2c3d4
244
245 /* "libpcap" file header (minus magic number). */
246 struct pcap_hdr {
247     unsigned long    magic;          /* magic */
248     unsigned short      version_major;  /* major version number */
249     unsigned short      version_minor;  /* minor version number */
250     unsigned long       thiszone;       /* GMT to local correction */
251     unsigned long       sigfigs;        /* accuracy of timestamps */
252     unsigned long       snaplen;        /* max length of captured packets, in octets */
253     unsigned long       network;        /* data link type */
254 };
255
256 /* "libpcap" record header. */
257 struct pcaprec_hdr {
258     unsigned long       ts_sec;         /* timestamp seconds */
259     unsigned long       ts_usec;        /* timestamp microseconds */
260     unsigned long       incl_len;       /* number of octets of packet saved in file */
261     unsigned long       orig_len;       /* actual length of packet */
262 };
263
264 /* Link-layer type; see net/bpf.h for details */
265 unsigned long pcap_link_type = 1;   /* Default is DLT-EN10MB */
266
267 /*----------------------------------------------------------------------
268  * Parse a single hex number
269  * Will abort the program if it can't parse the number
270  * Pass in TRUE if this is an offset, FALSE if not
271  */
272 static unsigned long
273 parse_num (char *str, int offset)
274 {
275     unsigned long num;
276     char *c;
277
278     num = strtoul(str, &c, offset ? offset_base : 16);
279     if (c==str) {
280         fprintf(stderr, "FATAL ERROR: Bad hex number? [%s]\n", str);
281         exit(-1);
282     }
283     return num;
284 }
285
286 /*----------------------------------------------------------------------
287  * Write this byte into current packet
288  */
289 static void
290 write_byte (char *str)
291 {
292     unsigned long num;
293
294     num = parse_num(str, FALSE);
295     packet_buf[curr_offset] = num;
296     curr_offset ++;
297 }
298
299 /*----------------------------------------------------------------------
300  * Remove bytes from the current packet
301  */
302 static void
303 unwrite_bytes (unsigned long nbytes)
304 {
305     curr_offset -= nbytes;
306 }
307
308 /*----------------------------------------------------------------------
309  * Compute one's complement checksum (from RFC1071)
310  */
311 static unsigned short
312 in_checksum (void *buf, unsigned long count)
313 {
314     unsigned long sum = 0;
315     unsigned short *addr = buf;
316
317     while( count > 1 )  {
318         /*  This is the inner loop */
319         sum += ntohs(* (unsigned short *) addr++);
320         count -= 2;
321     }
322
323     /*  Add left-over byte, if any */
324     if( count > 0 ) 
325         sum += * (unsigned char *) addr;
326
327     /*  Fold 32-bit sum to 16 bits */
328     while (sum>>16)
329         sum = (sum & 0xffff) + (sum >> 16);
330
331     return htons(~sum);
332 }
333
334 /*----------------------------------------------------------------------
335  * Write current packet out 
336  */
337 static void
338 write_current_packet (void)
339 {
340     int length = 0;
341     int udp_length = 0;
342     int ip_length = 0;
343     int eth_trailer_length = 0;
344     struct pcaprec_hdr ph;
345
346     if (curr_offset > 0) {
347         /* Write the packet */
348
349         /* Compute packet length */
350         length = curr_offset;
351         if (hdr_udp) { length += sizeof(HDR_UDP); udp_length = length; }
352         if (hdr_ip) { length += sizeof(HDR_IP); ip_length = length; }
353         if (hdr_ethernet) {
354             length += sizeof(HDR_ETHERNET);
355             /* Pad trailer */
356             if (length < 60) {
357                 eth_trailer_length = 60 - length;
358                 length = 60;
359             }
360         }
361
362         /* Write PCap header */
363         ph.ts_sec = ts_sec;
364         ph.ts_usec = ts_usec;
365         ph.incl_len = length;
366         ph.orig_len = length;
367         fwrite(&ph, sizeof(ph), 1, output_file);
368         
369         /* Write Ethernet header */
370         if (hdr_ethernet) {
371             HDR_ETHERNET.l3pid = htons(hdr_ethernet_proto);
372             fwrite(&HDR_ETHERNET, sizeof(HDR_ETHERNET), 1, output_file);
373         }
374
375         /* Write IP header */
376         if (hdr_ip) {
377             HDR_IP.packet_length = htons(ip_length);
378             HDR_IP.protocol = hdr_ip_proto;
379             HDR_IP.hdr_checksum = 0;
380             HDR_IP.hdr_checksum = in_checksum(&HDR_IP, sizeof(HDR_IP));
381             fwrite(&HDR_IP, sizeof(HDR_IP), 1, output_file);
382         }
383
384         /* Write UDP header */
385         if (hdr_udp) {
386             HDR_UDP.source_port = htons(hdr_udp_src);
387             HDR_UDP.dest_port = htons(hdr_udp_dest);
388             HDR_UDP.length = htons(udp_length);
389             
390             fwrite(&HDR_UDP, sizeof(HDR_UDP), 1, output_file);
391         }
392
393         /* Write packet */
394         fwrite(packet_buf, curr_offset, 1, output_file);
395
396         /* Write Ethernet trailer */
397         if (hdr_ethernet && eth_trailer_length > 0) {
398             memset(tempbuf, 0, eth_trailer_length);
399             fwrite(tempbuf, eth_trailer_length, 1, output_file);
400         }
401
402         if (!quiet)
403             fprintf(stderr, "Wrote packet of %lu bytes\n", curr_offset);
404         num_packets_written ++;
405     }
406     curr_offset = 0;
407 }
408
409 /*----------------------------------------------------------------------
410  * Write the PCap file header 
411  */
412 static void
413 write_file_header (void)
414 {
415     struct pcap_hdr fh;
416
417     fh.magic = PCAP_MAGIC;
418     fh.version_major = 2;
419     fh.version_minor = 4;
420     fh.thiszone = 0;
421     fh.sigfigs = 0;
422     fh.snaplen = 102400;
423     fh.network = pcap_link_type;
424
425     fwrite(&fh, sizeof(fh), 1, output_file);
426 }
427
428 /*----------------------------------------------------------------------
429  * Append a token to the packet preamble.
430  */
431 static void
432 append_to_preamble(char *str)
433 {
434     size_t toklen;
435
436     if (packet_preamble_len != 0) {
437         if (packet_preamble_len == PACKET_PREAMBLE_MAX_LEN)
438             return;     /* no room to add more preamble */
439         /* Add a blank separator between the previous token and this token. */
440         packet_preamble[packet_preamble_len++] = ' ';
441     }
442     toklen = strlen(str);
443     if (toklen != 0) {
444         if (packet_preamble_len + toklen > PACKET_PREAMBLE_MAX_LEN)
445             return;     /* no room to add the token to the preamble */
446         strcpy(&packet_preamble[packet_preamble_len], str);
447         packet_preamble_len += toklen;
448     }
449 }
450
451 /*----------------------------------------------------------------------
452  * Parse the preamble to get the timecode.
453  */
454 static void
455 parse_preamble (void)
456 {
457         struct tm timecode;
458         char *subsecs;
459         char *p;
460         int  subseclen;
461         int  i;
462
463         /*
464          * If no "-t" flag was specified, don't attempt to parse a packet
465          * preamble to extract a time stamp.
466          */
467         if (ts_fmt == NULL)
468             return;
469
470         ts_sec  = 0;
471         ts_usec = 0;
472
473         /*
474          * Null-terminate the preamble.
475          */
476         packet_preamble[packet_preamble_len] = '\0';
477
478         /* Ensure preamble has more than two chars before atempting to parse.
479          * This should cover line breaks etc that get counted.
480          */
481         if ( strlen(packet_preamble) > 2 ) {
482                 memset(&timecode, '\0', sizeof timecode);
483
484                 /* Get Time leaving subseconds */
485                 subsecs = strptime( packet_preamble, ts_fmt, &timecode );
486                 if (subsecs != NULL) {
487                         /* Get the long time from the tm structure */
488                         ts_sec  = (unsigned long)mktime( &timecode );
489                 } else
490                         ts_sec = -1;    /* we failed to parse it */
491
492                 /* This will ensure incorrectly parsed dates get set to zero */
493                 if ( -1L == (long)ts_sec ) 
494                 {
495                         ts_sec  = 0;
496                         ts_usec = 0;
497                 }
498                 else
499                 {
500                         /* Parse subseconds */
501                         ts_usec = strtol(subsecs, &p, 10);
502                         if (subsecs == p) {
503                                 /* Error */
504                                 ts_usec = 0;
505                         } else {
506                                 /*
507                                  * Convert that number to a number
508                                  * of microseconds; if it's N digits
509                                  * long, it's in units of 10^(-N) seconds,
510                                  * so, to convert it to units of
511                                  * 10^-6 seconds, we multiply by
512                                  * 10^(6-N).
513                                  */
514                                 subseclen = p - subsecs;
515                                 if (subseclen > 6) {
516                                         /*
517                                          * *More* than 6 digits; 6-N is
518                                          * negative, so we divide by
519                                          * 10^(N-6).
520                                          */
521                                         for (i = subseclen - 6; i != 0; i--)
522                                                 ts_usec /= 10;
523                                 } else if (subseclen < 6) {
524                                         for (i = 6 - subseclen; i != 0; i--)
525                                                 ts_usec *= 10;
526                                 }
527                         }
528                 }
529         }
530
531
532         /*printf("Format(%s), time(%u), subsecs(%u)\n\n", ts_fmt, ts_sec, ts_usec);*/
533         
534         /* Clear Preamble */
535         packet_preamble_len = 0;
536 }
537
538 /*----------------------------------------------------------------------
539  * Start a new packet 
540  */
541 static void
542 start_new_packet (void)
543 {
544     if (debug>=1) 
545         fprintf(stderr, "Start new packet\n");
546
547     /* Write out the current packet, if required */
548     write_current_packet();
549     curr_offset = 0;
550     num_packets_read ++;
551
552     /* Ensure we parse the packet preamble as it may contain the time */
553     parse_preamble();
554 }
555
556 /*----------------------------------------------------------------------
557  * Process a directive
558  */
559 static void
560 process_directive (char *str)
561 {
562     fprintf(stderr, "\n--- Directive [%s] currently unsupported ---\n", str+10);
563
564 }
565
566 /*----------------------------------------------------------------------
567  * Parse a single token (called from the scanner)
568  */
569 void 
570 parse_token (token_t token, char *str)
571 {
572     unsigned long num;
573
574     /* 
575      * This is implemented as a simple state machine of five states. 
576      * State transitions are caused by tokens being received from the 
577      * scanner. The code should be self_documenting.
578      */
579
580     if (debug>=2) {
581         /* Sanitize - remove all '\r' */
582         char *c;
583         if (str!=NULL) { while ((c = strchr(str, '\r')) != NULL) *c=' '; }
584         
585         fprintf(stderr, "(%s, %s \"%s\") -> (", 
586                 state_str[state], token_str[token], str ? str : "");
587     }
588
589     switch(state) {
590
591     /* ----- Waiting for new packet -------------------------------------------*/
592     case INIT:
593         switch(token) {
594         case T_TEXT:
595             append_to_preamble(str);
596             break;
597         case T_DIRECTIVE:
598             process_directive(str);
599             break;
600         case T_OFFSET:
601             num = parse_num(str, TRUE);
602             if (num==0) {
603                 /* New packet starts here */
604                 start_new_packet();
605                 state = READ_OFFSET;
606             }
607             break;
608         default:
609             break;
610         }
611         break;
612
613     /* ----- Processing packet, start of new line -----------------------------*/
614     case START_OF_LINE:
615         switch(token) {
616         case T_TEXT:
617             append_to_preamble(str);
618             break;
619         case T_DIRECTIVE:
620             process_directive(str);
621             break;
622         case T_OFFSET:
623             num = parse_num(str, TRUE);
624             if (num==0) {
625                 /* New packet starts here */
626                 start_new_packet();
627                 state = READ_OFFSET;
628             } else if (num != curr_offset) {
629                 /*
630                  * The offset we read isn't the one we expected.
631                  * This may only mean that we mistakenly interpreted
632                  * some text as byte values (e.g., if the text dump
633                  * of packet data included a number with spaces around
634                  * it).  If the offset is less than what we expected,
635                  * assume that's the problem, and throw away the putative
636                  * extra byte values.
637                  */
638                 if (num < curr_offset) {
639                     unwrite_bytes(curr_offset - num);
640                     state = READ_OFFSET;
641                 } else {
642                     /* Bad offset; switch to INIT state */
643                     if (debug>=1)
644                         fprintf(stderr, "Inconsistent offset. Expecting %0lX, got %0lX. Ignoring rest of packet\n", 
645                                 curr_offset, num);
646                     write_current_packet();
647                     state = INIT;
648                 }
649             } else 
650                 state = READ_OFFSET;
651             break;
652         default:
653             break;
654         }
655         break;
656
657     /* ----- Processing packet, read offset -----------------------------------*/
658     case READ_OFFSET:
659         switch(token) {
660         case T_BYTE:
661             /* Record the byte */
662             state = READ_BYTE;
663             write_byte(str);
664             break;
665         case T_TEXT:
666         case T_DIRECTIVE:
667         case T_OFFSET:
668             state = READ_TEXT;
669             break;
670         case T_EOL:
671             state = START_OF_LINE;
672             break;
673         default:
674             break;
675         }
676         break;
677
678     /* ----- Processing packet, read byte -------------------------------------*/
679     case READ_BYTE:
680         switch(token) {
681         case T_BYTE:
682             /* Record the byte */
683             write_byte(str);
684             break;
685         case T_TEXT:
686         case T_DIRECTIVE:
687         case T_OFFSET:
688             state = READ_TEXT;
689             break;
690         case T_EOL:
691             state = START_OF_LINE;
692             break;
693         default:
694             break;
695         }
696         break;
697
698     /* ----- Processing packet, read text -------------------------------------*/
699     case READ_TEXT:
700         switch(token) {
701         case T_EOL:
702             state = START_OF_LINE;
703             break;
704         default:
705             break;
706         }
707         break;
708
709     default:
710         fprintf(stderr, "FATAL ERROR: Bad state (%d)", state);
711         exit(-1);
712     }
713
714     if (debug>=2) 
715         fprintf(stderr, ", %s)\n", state_str[state]);
716
717 }
718
719 /*----------------------------------------------------------------------
720  * Print helpstring and exit
721  */
722 static void
723 help (char *progname)
724 {
725     fprintf(stderr, 
726             "\n"
727             "Usage: %s [-d] [-q] [-o h|o] [-l typenum] [-e l3pid] [-i proto] \n"
728             "          [-u srcp destp] [-t timefmt] <input-filename> <output-filename>\n"
729             "\n"
730             "where <input-filename> specifies input filename (use - for standard input)\n"
731             "      <output-filename> specifies output filename (use - for standard output)\n"
732             "\n"
733             "[options] are one or more of the following \n"
734             "\n"
735             " -w filename  : Write capfile to <filename>. Default is standard output\n"
736             " -h           : Display this help message \n"
737             " -d           : Generate detailed debug of parser states \n"
738             " -o hex|oct   : Parse offsets as (h)ex or (o)ctal. Default is hex\n"
739             " -l typenum   : Specify link-layer type number. Default is 1 (Ethernet). \n"
740             "                See net/bpf.h for list of numbers.\n"
741             " -q           : Generate no output at all (automatically turns off -d)\n"
742             " -e l3pid     : Prepend dummy Ethernet II header with specified L3PID (in HEX)\n"
743             "                Example: -e 0x800\n"
744             " -i proto     : Prepend dummy IP header with specified IP protocol (in DECIMAL). \n"
745             "                Automatically prepends Ethernet header as well. Example: -i 46\n"
746             " -u srcp destp: Prepend dummy UDP header with specified dest and source ports (in DECIMAL).\n"
747             "                Automatically prepends Ethernet and IP headers as well\n"
748             "                Example: -u 30 40\n"
749             " -t timefmt   : Treats the text before the packet as a time code parsed by strptime format patterns.\n"
750             "                Example: The time \"10:15:14.5476\" has the format code \"%%H:%%M:%%S.\"\n"
751             "                NOTE:    The subsecond component delimiter must be specified (.) but no\n"
752             "                         pattern is required; the remaining number is assumed to be subseconds."
753             "\n", 
754             progname);
755
756     exit(-1);
757 }
758
759 /*----------------------------------------------------------------------
760  * Parse CLI options 
761  */
762 static void
763 parse_options (int argc, char *argv[])
764 {
765     int c;
766     char *p;
767
768     /* Scan CLI parameters */
769     while ((c = getopt(argc, argv, "dqr:w:e:i:l:o:u:t:")) != -1) {
770         switch(c) {
771         case '?': help(argv[0]); break;
772         case 'h': help(argv[0]); break;
773         case 'd': if (!quiet) debug++; break;
774         case 'q': quiet = TRUE; debug = FALSE; break;
775         case 'l': pcap_link_type = atoi(optarg); break;
776         case 'o': 
777             if (optarg[0]!='h' && optarg[0] != 'o') {
778                 fprintf(stderr, "Bad argument for '-e': %s\n", optarg);
779                 help(argv[0]);
780             }
781             offset_base = (optarg[0]=='o') ? 8 : 16;
782             break;
783         case 'e':
784             hdr_ethernet = TRUE;
785             if (sscanf(optarg, "%lx", &hdr_ethernet_proto) < 1) {
786                 fprintf(stderr, "Bad argument for '-e': %s\n", optarg);
787                 help(argv[0]);
788             }
789             break;
790             
791         case 'i':
792             hdr_ip = TRUE;
793             if (sscanf(optarg, "%ld", &hdr_ip_proto) < 1) {
794                 fprintf(stderr, "Bad argument for '-i': %s\n", optarg);
795                 help(argv[0]);
796             }
797             hdr_ethernet = TRUE;
798             hdr_ethernet_proto = 0x800;
799             break;
800
801         case 't':
802             ts_fmt = optarg;
803             break;
804             
805         case 'u':
806             hdr_udp = TRUE;
807             hdr_udp_src = strtol(optarg, &p, 10);
808             if (p == optarg || (*p != ',' && *p != '\0')) {
809                 fprintf(stderr, "Bad src port for '-u'\n");
810                 help(argv[0]);
811             }
812             if (*p == '\0') {
813                 fprintf(stderr, "No dest port specified for '-u'\n");
814                 help(argv[0]);
815             }
816             p++;
817             optarg = p;
818             hdr_udp_dest = strtol(optarg, &p, 10);
819             if (p == optarg || *p != '\0') {
820                 fprintf(stderr, "Bad dest port for '-u'\n");
821                 help(argv[0]);
822             }
823             hdr_ip = TRUE;
824             hdr_ip_proto = 17;
825             hdr_ethernet = TRUE;
826             hdr_ethernet_proto = 0x800;
827             break;
828             
829         default:
830             help(argv[0]);
831         }
832     }
833
834     if (optind >= argc || argc-optind < 2) {
835         fprintf(stderr, "Must specify input and output filename\n");
836         help(argv[0]);
837     }
838
839     if (strcmp(argv[optind], "-")) {
840         input_filename = strdup(argv[optind]);
841         input_file = fopen(input_filename, "rb");
842         if (!input_file) {
843             fprintf(stderr, "Cannot open file [%s] for reading: %s\n", 
844                     input_filename, strerror(errno));
845             exit(-1);
846         }
847     } else {
848         input_filename = "Standard input";
849         input_file = stdin;
850     }
851
852     if (strcmp(argv[optind+1], "-")) {
853         output_filename = strdup(argv[optind+1]);
854         output_file = fopen(output_filename, "wb");
855         if (!output_file) {
856             fprintf(stderr, "Cannot open file [%s] for writing: %s\n", 
857                     output_filename, strerror(errno));
858             exit(-1);
859         }
860     } else {
861         output_filename = "Standard output";
862         output_file = stdout;
863     }
864
865     /* Some validation */
866     if (pcap_link_type != 1 && hdr_ethernet) {
867         fprintf(stderr, "Dummy headers (-e, -i, -u) cannot be specified with link type override (-l)\n");
868         exit(-1);
869     }
870
871     /* Set up our variables */
872     if (!input_file) {
873         input_file = stdin;
874         input_filename = "Standard input";
875     }
876     if (!output_file) {
877         output_file = stdout;
878         output_filename = "Standard output";
879     }
880     
881     /* Display summary of our state */
882     if (!quiet) {
883         fprintf(stderr, "Input from: %s\n", input_filename);
884         fprintf(stderr, "Output to: %s\n", output_filename);
885
886         if (hdr_ethernet) fprintf(stderr, "Generate dummy Ethernet header: Protocol: 0x%0lX\n", 
887                                  hdr_ethernet_proto); 
888         if (hdr_ip) fprintf(stderr, "Generate dummy IP header: Protocol: %ld\n", 
889                            hdr_ip_proto); 
890         if (hdr_udp) fprintf(stderr, "Generate dummy UDP header: Source port: %ld. Dest port: %ld\n", 
891                             hdr_udp_src, hdr_udp_dest); 
892     }
893 }
894
895 int main(int argc, char *argv[])
896 {
897     parse_options(argc, argv);
898
899     assert(input_file != NULL);
900     assert(output_file != NULL);
901
902     write_file_header();
903
904     yyin = input_file;
905     yylex();
906     write_current_packet();
907     if (debug)
908         fprintf(stderr, "\n-------------------------\n");
909     if (!quiet) {
910     fprintf(stderr, "Read %ld potential packets, wrote %ld packets\n", 
911             num_packets_read, num_packets_written);
912     }
913     return 0;
914 }