Add support for SIGINFO on systems that have it.
[obnox/wireshark/wip.git] / tethereal.c
1 /* tethereal.c
2  *
3  * $Id: tethereal.c,v 1.169 2002/11/09 00:08:42 guy Exp $
4  *
5  * Ethereal - Network traffic analyzer
6  * By Gerald Combs <gerald@ethereal.com>
7  * Copyright 1998 Gerald Combs
8  *
9  * Text-mode variant, by Gilbert Ramirez <gram@alumni.rice.edu>
10  * and Guy Harris <guy@alum.mit.edu>.
11  *
12  * This program is free software; you can redistribute it and/or
13  * modify it under the terms of the GNU General Public License
14  * as published by the Free Software Foundation; either version 2
15  * of the License, or (at your option) any later version.
16  *
17  * This program is distributed in the hope that it will be useful,
18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20  * GNU General Public License for more details.
21  *
22  * You should have received a copy of the GNU General Public License
23  * along with this program; if not, write to the Free Software
24  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
25  */
26
27 #ifdef HAVE_CONFIG_H
28 # include "config.h"
29 #endif
30
31 #include <stdlib.h>
32 #include <stdio.h>
33 #include <string.h>
34 #include <ctype.h>
35 #include <locale.h>
36 #include <limits.h>
37
38 #ifdef HAVE_UNISTD_H
39 #include <unistd.h>
40 #endif
41
42 #include <errno.h>
43
44 #ifdef HAVE_FCNTL_H
45 #include <fcntl.h>
46 #endif
47
48 #include <signal.h>
49
50 #ifdef HAVE_LIBPCAP
51 #include <pcap.h>
52 #include <setjmp.h>
53 #endif
54
55 #ifdef HAVE_LIBZ
56 #include <zlib.h>       /* to get the libz version number */
57 #endif
58
59 #ifdef NEED_SNPRINTF_H
60 # include "snprintf.h"
61 #endif
62
63 #ifdef HAVE_SOME_SNMP
64
65 #ifdef HAVE_NET_SNMP
66 #include <net-snmp/version.h>
67 #endif /* HAVE_NET_SNMP */
68
69 #ifdef HAVE_UCD_SNMP
70 #include <ucd-snmp/version.h>
71 #endif /* HAVE_UCD_SNMP */
72
73 #endif /* HAVE_SOME_SNMP */
74
75 #ifdef NEED_STRERROR_H
76 #include "strerror.h"
77 #endif
78
79 #ifdef NEED_GETOPT_H
80 #include "getopt.h"
81 #endif
82
83 #include <glib.h>
84 #include <epan/epan.h>
85 #include <epan/filesystem.h>
86
87 #include "globals.h"
88 #include <epan/timestamp.h>
89 #include <epan/packet.h>
90 #include "file.h"
91 #include "prefs.h"
92 #include "column.h"
93 #include "print.h"
94 #include <epan/resolv.h>
95 #include "util.h"
96 #ifdef HAVE_LIBPCAP
97 #include "pcap-util.h"
98 #endif
99 #include <epan/conversation.h>
100 #include <epan/plugins.h>
101 #include "register.h"
102 #include "conditions.h"
103 #include "capture_stop_conditions.h"
104 #include "ringbuffer.h"
105 #include <epan/epan_dissect.h>
106 #include "tap.h"
107
108 #ifdef HAVE_LIBPCAP
109 #include <wiretap/wtap-capture.h>
110 #endif
111
112 #ifdef WIN32
113 #include "capture-wpcap.h"
114 #endif
115
116 static guint32 firstsec, firstusec;
117 static guint32 prevsec, prevusec;
118 static GString *comp_info_str;
119 static gboolean quiet;
120 static gboolean decode;
121 static gboolean verbose;
122 static gboolean print_hex;
123 static gboolean line_buffered;
124
125 #ifdef HAVE_LIBPCAP
126 typedef struct _loop_data {
127   gboolean       go;           /* TRUE as long as we're supposed to keep capturing */
128   gint           linktype;
129   pcap_t        *pch;
130   wtap_dumper   *pdh;
131   jmp_buf        stopenv;
132   gboolean       output_to_pipe;
133   int            packet_count;
134 } loop_data;
135
136 static loop_data ld;
137
138 static int capture(int);
139 static void capture_pcap_cb(guchar *, const struct pcap_pkthdr *,
140   const guchar *);
141 static void report_counts(void);
142 #ifdef _WIN32
143 static BOOL WINAPI capture_cleanup(DWORD);
144 #else /* _WIN32 */
145 static void capture_cleanup(int);
146 #ifdef SIGINFO
147 static void report_counts_siginfo(int);
148 #endif /* SIGINFO */
149 #endif /* _WIN32 */
150 #endif /* HAVE_LIBPCAP */
151
152 typedef struct {
153   capture_file *cf;
154   wtap_dumper *pdh;
155 } cb_args_t;
156
157 static int load_cap_file(capture_file *, int);
158 static void wtap_dispatch_cb_write(guchar *, const struct wtap_pkthdr *, long,
159     union wtap_pseudo_header *, const guchar *);
160 static void show_capture_file_io_error(const char *, int, gboolean);
161 static void wtap_dispatch_cb_print(guchar *, const struct wtap_pkthdr *, long,
162     union wtap_pseudo_header *, const guchar *);
163
164 capture_file cfile;
165 ts_type timestamp_type = RELATIVE;
166 #ifdef HAVE_LIBPCAP
167 typedef struct {
168         int snaplen;                    /* Maximum captured packet length */
169         int promisc_mode;               /* Capture in promiscuous mode */
170         int autostop_count;             /* Maximum packet count */
171         gboolean has_autostop_duration; /* TRUE if maximum capture duration
172                                            is specified */
173         gint32 autostop_duration;       /* Maximum capture duration */
174         gboolean has_autostop_filesize; /* TRUE if maximum capture file size
175                                            is specified */
176         gint32 autostop_filesize;       /* Maximum capture file size */
177         gboolean ringbuffer_on;         /* TRUE if ring buffer in use */
178         guint32 ringbuffer_num_files;   /* Number of ring buffer files */
179 } capture_options;
180
181 static capture_options capture_opts = {
182         WTAP_MAX_PACKET_SIZE,           /* snapshot length - default is
183                                            infinite, in effect */
184         TRUE,                           /* promiscuous mode is the default */
185         0,                              /* max packet count - default is 0,
186                                            meaning infinite */
187         FALSE,                          /* maximum capture duration not
188                                            specified by default */
189         0,                              /* maximum capture duration */
190         FALSE,                          /* maximum capture file size not
191                                            specified by default */
192         0,                              /* maximum capture file size */
193         FALSE,                          /* ring buffer off by default */
194         RINGBUFFER_MIN_NUM_FILES        /* default number of ring buffer
195                                            files */
196 };
197
198 #ifdef SIGINFO
199 static gboolean infodelay;      /* if TRUE, don't print capture info in SIGINFO handler */
200 static gboolean infoprint;      /* if TRUE, print capture info after clearing infodelay */
201 #endif /* SIGINFO */
202 #endif /* HAVE_LIBPCAP */
203
204 static void
205 print_usage(gboolean print_ver)
206 {
207   int i;
208
209   if (print_ver) {
210     fprintf(stderr, "This is GNU t%s %s, compiled %s\n", PACKAGE, VERSION,
211         comp_info_str->str);
212   }
213 #ifdef HAVE_LIBPCAP
214   fprintf(stderr, "\nt%s [ -DvVhqSlp ] [ -a <capture autostop condition> ] ...\n",
215           PACKAGE);
216   fprintf(stderr, "\t[ -b <number of ring buffer files> ] [ -c <count> ]\n");
217   fprintf(stderr, "\t[ -f <capture filter> ] [ -F <output file type> ]\n");
218   fprintf(stderr, "\t[ -i <interface> ] [ -n ] [ -N <resolving> ]\n");
219   fprintf(stderr, "\t[ -o <preference setting> ] ... [ -r <infile> ] [ -R <read filter> ]\n");
220   fprintf(stderr, "\t[ -s <snaplen> ] [ -t <time stamp format> ] [ -w <savefile> ] [ -x ]\n");
221 #else
222   fprintf(stderr, "\nt%s [ -vVhl ] [ -F <output file type> ] [ -n ] [ -N <resolving> ]\n", PACKAGE);
223   fprintf(stderr, "\t[ -o <preference setting> ] ... [ -r <infile> ] [ -R <read filter> ]\n");
224   fprintf(stderr, "\t[ -t <time stamp format> ] [ -w <savefile> ] [ -x ]\n");
225 #endif
226   fprintf(stderr, "\t[ -Z <statistics string> ]\n");
227   fprintf(stderr, "Valid file type arguments to the \"-F\" flag:\n");
228   for (i = 0; i < WTAP_NUM_FILE_TYPES; i++) {
229     if (wtap_dump_can_open(i))
230       fprintf(stderr, "\t%s - %s\n",
231         wtap_file_type_short_string(i), wtap_file_type_string(i));
232   }
233   fprintf(stderr, "\tdefault is libpcap\n");
234 }
235
236 #ifdef HAVE_LIBPCAP
237 static int
238 get_positive_int(const char *string, const char *name)
239 {
240   long number;
241   char *p;
242
243   number = strtol(string, &p, 10);
244   if (p == string || *p != '\0') {
245     fprintf(stderr, "tethereal: The specified %s \"%s\" is not a decimal number\n",
246             name, string);
247     exit(1);
248   }
249   if (number < 0) {
250     fprintf(stderr, "tethereal: The specified %s is a negative number\n",
251             name);
252     exit(1);
253   }
254   if (number == 0) {
255     fprintf(stderr, "tethereal: The specified %s is zero\n",
256             name);
257     exit(1);
258   }
259   if (number > INT_MAX) {
260     fprintf(stderr, "tethereal: The specified %s is too large (greater than %d)\n",
261             name, INT_MAX);
262     exit(1);
263   }
264   return number;
265 }
266
267 /*
268  * Given a string of the form "<autostop criterion>:<value>", as might appear
269  * as an argument to a "-a" option, parse it and set the criterion in
270  * question.  Return an indication of whether it succeeded or failed
271  * in some fashion.
272  */
273 static gboolean
274 set_autostop_criterion(const char *autostoparg)
275 {
276   guchar *p, *colonp;
277
278   colonp = strchr(autostoparg, ':');
279   if (colonp == NULL)
280     return FALSE;
281
282   p = colonp;
283   *p++ = '\0';
284
285   /*
286    * Skip over any white space (there probably won't be any, but
287    * as we allow it in the preferences file, we might as well
288    * allow it here).
289    */
290   while (isspace(*p))
291     p++;
292   if (*p == '\0') {
293     /*
294      * Put the colon back, so if our caller uses, in an
295      * error message, the string they passed us, the message
296      * looks correct.
297      */
298     *colonp = ':';
299     return FALSE;
300   }
301   if (strcmp(autostoparg,"duration") == 0) {
302     capture_opts.has_autostop_duration = TRUE;
303     capture_opts.autostop_duration = get_positive_int(p,"autostop duration");
304   } else if (strcmp(autostoparg,"filesize") == 0) {
305     capture_opts.has_autostop_filesize = TRUE;
306     capture_opts.autostop_filesize = get_positive_int(p,"autostop filesize");
307   } else {
308     return FALSE;
309   }
310   *colonp = ':';        /* put the colon back */
311   return TRUE;
312 }
313 #endif
314
315 /* structure to keep track of what tap listeners have been registered.
316  */
317 typedef struct _ethereal_tap_list {
318         struct _ethereal_tap_list *next;
319         char *cmd;
320         void (*func)(char *arg);
321 } ethereal_tap_list;
322 static ethereal_tap_list *tap_list=NULL;
323
324 void
325 register_ethereal_tap(char *cmd, void (*func)(char *arg), char *dummy _U_, void (*dummy2)(void) _U_)
326 {
327         ethereal_tap_list *newtl;
328
329         newtl=malloc(sizeof(ethereal_tap_list));
330         newtl->next=tap_list;
331         tap_list=newtl;
332         newtl->cmd=cmd;
333         newtl->func=func;
334
335 }
336
337 int
338 main(int argc, char *argv[])
339 {
340   int                  opt, i;
341   extern char         *optarg;
342   gboolean             arg_error = FALSE;
343 #ifdef HAVE_LIBPCAP
344 #ifdef HAVE_PCAP_VERSION
345   extern char          pcap_version[];
346 #endif /* HAVE_PCAP_VERSION */
347 #endif /* HAVE_LIBPCAP */
348
349 #ifdef WIN32
350   WSADATA               wsaData;
351
352 # ifdef HAVE_SOME_SNMP
353   char                *mib_path;
354 # define MIB_PATH_APPEND "\\snmp\\mibs"
355 # endif /* HAVE_UCD_SNMP */
356 #endif  /* WIN32 */
357
358   char                *gpf_path;
359   char                *pf_path;
360   int                  gpf_open_errno, pf_open_errno;
361   int                  err;
362 #ifdef HAVE_LIBPCAP
363   gboolean             capture_filter_specified = FALSE;
364   GList               *if_list, *if_entry;
365   gchar                err_str[PCAP_ERRBUF_SIZE];
366 #else
367   gboolean             capture_option_specified = FALSE;
368 #endif
369   int                  out_file_type = WTAP_FILE_PCAP;
370   gchar               *cf_name = NULL, *rfilter = NULL;
371 #ifdef HAVE_LIBPCAP
372   gchar               *if_text;
373 #endif
374   dfilter_t           *rfcode = NULL;
375   e_prefs             *prefs;
376   char                 badopt;
377   ethereal_tap_list *tli;
378
379   /* Register all dissectors; we must do this before checking for the
380      "-G" flag, as the "-G" flag dumps information registered by the
381      dissectors, and we must do it before we read the preferences, in
382      case any dissectors register preferences. */
383   epan_init(PLUGIN_DIR,register_all_protocols,register_all_protocol_handoffs);
384   register_all_tap_listeners();
385
386   /* Now register the preferences for any non-dissector modules.
387      We must do that before we read the preferences as well. */
388   prefs_register_modules();
389
390   /* If invoked with the "-G" flag, we dump out information based on
391      the argument to the "-G" flag; if no argument is specified,
392      for backwards compatibility we dump out a glossary of display
393      filter symbols.
394
395      We do this here to mirror what happens in the GTK+ version, although
396      it's not necessary here. */
397   if (argc >= 2 && strcmp(argv[1], "-G") == 0) {
398     if (argc == 2)
399       proto_registrar_dump_fields();
400     else {
401       if (strcmp(argv[2], "fields") == 0)
402         proto_registrar_dump_fields();
403       else if (strcmp(argv[2], "protocols") == 0)
404         proto_registrar_dump_protocols();
405       else {
406         fprintf(stderr, "tethereal: Invalid \"%s\" option for -G flag\n",
407                 argv[2]);
408         exit(1);
409       }
410     }
411     exit(0);
412   }
413
414   /* Set the C-language locale to the native environment. */
415   setlocale(LC_ALL, "");
416
417   prefs = read_prefs(&gpf_open_errno, &gpf_path, &pf_open_errno, &pf_path);
418   if (gpf_path != NULL) {
419     fprintf(stderr, "Can't open global preferences file \"%s\": %s.\n", pf_path,
420         strerror(gpf_open_errno));
421   }
422   if (pf_path != NULL) {
423     fprintf(stderr, "Can't open your preferences file \"%s\": %s.\n", pf_path,
424         strerror(pf_open_errno));
425     g_free(pf_path);
426     pf_path = NULL;
427   }
428
429   /* Set the name resolution code's flags from the preferences. */
430   g_resolv_flags = prefs->name_resolve;
431
432 #ifdef WIN32
433   /* Load Wpcap, if possible */
434   load_wpcap();
435 #endif
436
437   init_cap_file(&cfile);
438
439   /* Assemble the compile-time options */
440   comp_info_str = g_string_new("");
441
442   g_string_append(comp_info_str, "with ");
443   g_string_sprintfa(comp_info_str,
444 #ifdef GLIB_MAJOR_VERSION
445     "GLib %d.%d.%d", GLIB_MAJOR_VERSION, GLIB_MINOR_VERSION,
446     GLIB_MICRO_VERSION);
447 #else
448     "GLib (version unknown)");
449 #endif
450
451 #ifdef HAVE_LIBPCAP
452   g_string_append(comp_info_str, ", with libpcap ");
453 #ifdef HAVE_PCAP_VERSION
454   g_string_append(comp_info_str, pcap_version);
455 #else /* HAVE_PCAP_VERSION */
456   g_string_append(comp_info_str, "(version unknown)");
457 #endif /* HAVE_PCAP_VERSION */
458 #else /* HAVE_LIBPCAP */
459   g_string_append(comp_info_str, ", without libpcap");
460 #endif /* HAVE_LIBPCAP */
461
462 #ifdef HAVE_LIBZ
463   g_string_append(comp_info_str, ", with libz ");
464 #ifdef ZLIB_VERSION
465   g_string_append(comp_info_str, ZLIB_VERSION);
466 #else /* ZLIB_VERSION */
467   g_string_append(comp_info_str, "(version unknown)");
468 #endif /* ZLIB_VERSION */
469 #else /* HAVE_LIBZ */
470   g_string_append(comp_info_str, ", without libz");
471 #endif /* HAVE_LIBZ */
472
473 /* Oh, this is pretty. */
474 /* Oh, ha.  you think that was pretty.  Try this:! --Wes */
475 #ifdef HAVE_SOME_SNMP
476
477 #ifdef HAVE_UCD_SNMP
478   g_string_append(comp_info_str, ", with UCD-SNMP ");
479   g_string_append(comp_info_str, VersionInfo);
480 #endif /* HAVE_UCD_SNMP */
481
482 #ifdef HAVE_NET_SNMP
483   g_string_append(comp_info_str, ", with Net-SNMP ");
484   g_string_append(comp_info_str, netsnmp_get_version());
485 #endif /* HAVE_NET_SNMP */
486
487 #else /* no SNMP library */
488   g_string_append(comp_info_str, ", without UCD-SNMP or Net-SNMP");
489 #endif /* HAVE_SOME_SNMP */
490
491   /* Now get our args */
492   while ((opt = getopt(argc, argv, "a:b:c:Df:F:hi:lnN:o:pqr:R:s:St:vw:Vxz:")) != -1) {
493     switch (opt) {
494       case 'a':        /* autostop criteria */
495 #ifdef HAVE_LIBPCAP
496         if (set_autostop_criterion(optarg) == FALSE) {
497           fprintf(stderr, "ethereal: Invalid or unknown -a flag \"%s\"\n", optarg);
498           exit(1);
499         }
500 #else
501         capture_option_specified = TRUE;
502         arg_error = TRUE;
503 #endif
504         break;
505       case 'b':        /* Ringbuffer option */
506 #ifdef HAVE_LIBPCAP
507         capture_opts.ringbuffer_on = TRUE;
508         capture_opts.ringbuffer_num_files =
509             get_positive_int(optarg, "number of ring buffer files");
510 #else
511         capture_option_specified = TRUE;
512         arg_error = TRUE;
513 #endif
514         break;
515       case 'c':        /* Capture xxx packets */
516 #ifdef HAVE_LIBPCAP
517         capture_opts.autostop_count =
518             get_positive_int(optarg, "packet count");
519 #else
520         capture_option_specified = TRUE;
521         arg_error = TRUE;
522 #endif
523         break;
524       case 'D':        /* Print a list of capture devices */
525 #ifdef HAVE_LIBPCAP
526         if_list = get_interface_list(&err, err_str);
527         if (if_list == NULL) {
528             switch (err) {
529
530             case CANT_GET_INTERFACE_LIST:
531                 fprintf(stderr, "tethereal: Can't get list of interfaces: %s\n",
532                         err_str);
533                 break;
534
535             case NO_INTERFACES_FOUND:
536                 fprintf(stderr, "tethereal: There are no interfaces on which a capture can be done\n");
537                 break;
538             }
539             exit(2);
540         }
541         for (if_entry = g_list_first(if_list); if_entry != NULL;
542                 if_entry = g_list_next(if_entry))
543           printf("%s\n", (char *)if_entry->data);
544         free_interface_list(if_list);
545         exit(0);
546 #else
547         capture_option_specified = TRUE;
548         arg_error = TRUE;
549 #endif
550         break;
551       case 'f':
552 #ifdef HAVE_LIBPCAP
553         capture_filter_specified = TRUE;
554         if (cfile.cfilter)
555                 g_free(cfile.cfilter);
556         cfile.cfilter = g_strdup(optarg);
557 #else
558         capture_option_specified = TRUE;
559         arg_error = TRUE;
560 #endif
561         break;
562       case 'F':
563         out_file_type = wtap_short_string_to_file_type(optarg);
564         if (out_file_type < 0) {
565           fprintf(stderr, "tethereal: \"%s\" is not a valid capture file type\n",
566                         optarg);
567           exit(1);
568         }
569         break;
570       case 'h':        /* Print help and exit */
571         print_usage(TRUE);
572         exit(0);
573         break;
574       case 'i':        /* Use interface xxx */
575 #ifdef HAVE_LIBPCAP
576         cfile.iface = g_strdup(optarg);
577 #else
578         capture_option_specified = TRUE;
579         arg_error = TRUE;
580 #endif
581         break;
582       case 'l':        /* "Line-buffer" standard output */
583         /* This isn't line-buffering, strictly speaking, it's just
584            flushing the standard output after the information for
585            each packet is printed; however, that should be good
586            enough for all the purposes to which "-l" is put.
587
588            See the comment in "wtap_dispatch_cb_print()" for an
589            explanation of why we do that, and why we don't just
590            use "setvbuf()" to make the standard output line-buffered
591            (short version: in Windows, "line-buffered" is the same
592            as "fully-buffered", and the output buffer is only flushed
593            when it fills up). */
594         line_buffered = TRUE;
595         break;
596       case 'n':        /* No name resolution */
597         g_resolv_flags = RESOLV_NONE;
598         break;
599       case 'N':        /* Select what types of addresses/port #s to resolve */
600         if (g_resolv_flags == RESOLV_ALL)
601           g_resolv_flags = RESOLV_NONE;
602         badopt = string_to_name_resolve(optarg, &g_resolv_flags);
603         if (badopt != '\0') {
604           fprintf(stderr, "tethereal: -N specifies unknown resolving option '%c'; valid options are 'm', 'n', and 't'\n",
605                         badopt);
606           exit(1);
607         }
608         break;
609       case 'o':        /* Override preference from command line */
610         switch (prefs_set_pref(optarg)) {
611
612         case PREFS_SET_SYNTAX_ERR:
613           fprintf(stderr, "tethereal: Invalid -o flag \"%s\"\n", optarg);
614           exit(1);
615           break;
616
617         case PREFS_SET_NO_SUCH_PREF:
618         case PREFS_SET_OBSOLETE:
619           fprintf(stderr, "tethereal: -o flag \"%s\" specifies unknown preference\n",
620                         optarg);
621           exit(1);
622           break;
623         }
624         break;
625       case 'p':        /* Don't capture in promiscuous mode */
626 #ifdef HAVE_LIBPCAP
627         capture_opts.promisc_mode = FALSE;
628 #else
629         capture_option_specified = TRUE;
630         arg_error = TRUE;
631 #endif
632         break;
633       case 'q':        /* Quiet */
634         quiet = TRUE;
635         break;
636       case 'r':        /* Read capture file xxx */
637         cf_name = g_strdup(optarg);
638         break;
639       case 'R':        /* Read file filter */
640         rfilter = optarg;
641         break;
642       case 's':        /* Set the snapshot (capture) length */
643 #ifdef HAVE_LIBPCAP
644         capture_opts.snaplen = get_positive_int(optarg, "snapshot length");
645 #else
646         capture_option_specified = TRUE;
647         arg_error = TRUE;
648 #endif
649         break;
650       case 'S':        /* show packets in real time */
651         decode = TRUE;
652         break;
653       case 't':        /* Time stamp type */
654         if (strcmp(optarg, "r") == 0)
655           timestamp_type = RELATIVE;
656         else if (strcmp(optarg, "a") == 0)
657           timestamp_type = ABSOLUTE;
658         else if (strcmp(optarg, "ad") == 0)
659           timestamp_type = ABSOLUTE_WITH_DATE;
660         else if (strcmp(optarg, "d") == 0)
661           timestamp_type = DELTA;
662         else {
663           fprintf(stderr, "tethereal: Invalid time stamp type \"%s\"\n",
664             optarg);
665           fprintf(stderr, "It must be \"r\" for relative, \"a\" for absolute,\n");
666           fprintf(stderr, "\"ad\" for absolute with date, or \"d\" for delta.\n");
667           exit(1);
668         }
669         break;
670       case 'v':        /* Show version and exit */
671         printf("t%s %s, %s\n", PACKAGE, VERSION, comp_info_str->str);
672         exit(0);
673         break;
674       case 'w':        /* Write to capture file xxx */
675         cfile.save_file = g_strdup(optarg);
676         break;
677       case 'V':        /* Verbose */
678         verbose = TRUE;
679         break;
680       case 'x':        /* Print packet data in hex (and ASCII) */
681         print_hex = TRUE;
682         break;
683       case 'z':
684         for(tli=tap_list;tli;tli=tli->next){
685           if(!strncmp(tli->cmd,optarg,strlen(tli->cmd))){
686             (*tli->func)(optarg);
687             break;
688           }
689         }
690         if(!tli){
691           fprintf(stderr,"tethereal: invalid -z argument.\n");
692           fprintf(stderr,"  -z argument must be one of :\n");
693           for(tli=tap_list;tli;tli=tli->next){
694             fprintf(stderr,"     %s\n",tli->cmd);
695           }
696           exit(1);
697         }
698         break;
699       default:
700       case '?':        /* Bad flag - print usage message */
701         arg_error = TRUE;
702         break;
703     }
704   }
705
706   /* If no capture filter or read filter has been specified, and there are
707      still command-line arguments, treat them as the tokens of a capture
708      filter (if no "-r" flag was specified) or a read filter (if a "-r"
709      flag was specified. */
710   if (optind < argc) {
711     if (cf_name != NULL) {
712       if (rfilter != NULL) {
713         fprintf(stderr,
714 "tethereal: Read filters were specified both with \"-R\" and with additional command-line arguments\n");
715         exit(2);
716       }
717       rfilter = get_args_as_string(argc, argv, optind);
718     } else {
719 #ifdef HAVE_LIBPCAP
720       if (capture_filter_specified) {
721         fprintf(stderr,
722 "tethereal: Capture filters were specified both with \"-f\" and with additional command-line arguments\n");
723         exit(2);
724       }
725       cfile.cfilter = get_args_as_string(argc, argv, optind);
726 #else
727       capture_option_specified = TRUE;
728 #endif
729     }
730   }
731
732   /* See if we're writing a capture file and the file is a pipe */
733 #ifdef HAVE_LIBPCAP
734   ld.output_to_pipe = FALSE;
735 #endif
736   if (cfile.save_file != NULL) {
737     if (!strcmp(cfile.save_file, "-")) {
738       /* stdout */
739       g_free(cfile.save_file);
740       cfile.save_file = g_strdup("");
741 #ifdef HAVE_LIBPCAP
742       ld.output_to_pipe = TRUE;
743 #endif
744     }
745 #ifdef HAVE_LIBPCAP
746     else {
747       err = test_for_fifo(cfile.save_file);
748       switch (err) {
749
750       case ENOENT:      /* it doesn't exist, so we'll be creating it,
751                            and it won't be a FIFO */
752       case 0:           /* found it, but it's not a FIFO */
753         break;
754
755       case ESPIPE:      /* it is a FIFO */
756         ld.output_to_pipe = TRUE;
757         break;
758
759       default:          /* couldn't stat it */
760         fprintf(stderr,
761                 "tethereal: Error testing whether capture file is a pipe: %s\n",
762                 strerror(errno));
763         exit(2);
764       }
765     }
766 #endif
767   }
768
769 #ifdef HAVE_LIBPCAP
770   /* If they didn't specify a "-w" flag, but specified a maximum capture
771      file size, tell them that this doesn't work, and exit. */
772   if (capture_opts.has_autostop_filesize && cfile.save_file == NULL) {
773     fprintf(stderr, "tethereal: Maximum capture file size specified, but "
774       "capture isn't being saved to a file.\n");
775     exit(2);
776   }
777
778   if (capture_opts.ringbuffer_on) {
779     /* Ring buffer works only under certain conditions:
780        a) ring buffer does not work if you're not saving the capture to
781           a file;
782        b) ring buffer only works if you're saving in libpcap format;
783        c) it makes no sense to enable the ring buffer if the maximum
784           file size is set to "infinite";
785        d) file must not be a pipe. */
786     if (cfile.save_file == NULL) {
787       fprintf(stderr, "tethereal: Ring buffer requested, but "
788         "capture isn't being saved to a file.\n");
789       exit(2);
790     }
791     if (out_file_type != WTAP_FILE_PCAP) {
792       fprintf(stderr, "tethereal: Ring buffer requested, but "
793         "capture isn't being saved in libpcap format.\n");
794       exit(2);
795     }
796     if (!capture_opts.has_autostop_filesize) {
797       fprintf(stderr, "tethereal: Ring buffer requested, but "
798         "no maximum capture file size was specified.\n");
799       exit(2);
800     }
801     if (ld.output_to_pipe) {
802       fprintf(stderr, "tethereal: Ring buffer requested, but "
803         "capture file is a pipe.\n");
804       exit(2);
805     }
806   }
807 #endif
808
809 #ifdef WIN32
810   /* Start windows sockets */
811   WSAStartup( MAKEWORD( 1, 1 ), &wsaData );
812
813 # ifdef HAVE_SOME_SNMP
814   /* Set MIBDIRS so that the SNMP library can find its mibs. */
815   /* XXX - Should we set MIBS or MIBFILES as well? */
816
817   mib_path = g_malloc (strlen(get_datafile_dir()) + strlen(MIB_PATH_APPEND) + 20);
818   sprintf (mib_path, "MIBDIRS=%s\\%s", get_datafile_dir(), MIB_PATH_APPEND);
819   /* Amazingly enough, Windows does not provide setenv(). */
820   if (getenv("MIBDIRS") == NULL)
821     _putenv(mib_path);
822   g_free(mib_path);
823
824 # endif /* HAVE_UCD_SNMP */
825 #endif  /* WIN32 */
826
827   /* Notify all registered modules that have had any of their preferences
828      changed either from one of the preferences file or from the command
829      line that their preferences have changed. */
830   prefs_apply_all();
831
832 #ifndef HAVE_LIBPCAP
833   if (capture_option_specified)
834     fprintf(stderr, "This version of Tethereal was not built with support for capturing packets.\n");
835 #endif
836   if (arg_error) {
837     print_usage(FALSE);
838     exit(1);
839   }
840
841   /* Build the column format array */
842   col_init(&cfile.cinfo, prefs->num_cols);
843   for (i = 0; i < cfile.cinfo.num_cols; i++) {
844     cfile.cinfo.col_fmt[i] = get_column_format(i);
845     cfile.cinfo.col_title[i] = g_strdup(get_column_title(i));
846     cfile.cinfo.fmt_matx[i] = (gboolean *) g_malloc0(sizeof(gboolean) *
847       NUM_COL_FMTS);
848     get_column_format_matches(cfile.cinfo.fmt_matx[i], cfile.cinfo.col_fmt[i]);
849     cfile.cinfo.col_data[i] = NULL;
850     if (cfile.cinfo.col_fmt[i] == COL_INFO)
851       cfile.cinfo.col_buf[i] = (gchar *) g_malloc(sizeof(gchar) * COL_MAX_INFO_LEN);
852     else
853       cfile.cinfo.col_buf[i] = (gchar *) g_malloc(sizeof(gchar) * COL_MAX_LEN);
854
855     cfile.cinfo.col_expr[i] = (gchar *) g_malloc(sizeof(gchar) * COL_MAX_LEN);
856     cfile.cinfo.col_expr_val[i] = (gchar *) g_malloc(sizeof(gchar) * COL_MAX_LEN);
857   }
858
859 #ifdef HAVE_LIBPCAP
860   if (capture_opts.snaplen < 1)
861     capture_opts.snaplen = WTAP_MAX_PACKET_SIZE;
862   else if (capture_opts.snaplen < MIN_PACKET_SIZE)
863     capture_opts.snaplen = MIN_PACKET_SIZE;
864
865   /* Check the value range of the ringbuffer_num_files parameter */
866   if (capture_opts.ringbuffer_num_files < RINGBUFFER_MIN_NUM_FILES)
867     capture_opts.ringbuffer_num_files = RINGBUFFER_MIN_NUM_FILES;
868   else if (capture_opts.ringbuffer_num_files > RINGBUFFER_MAX_NUM_FILES)
869     capture_opts.ringbuffer_num_files = RINGBUFFER_MAX_NUM_FILES;
870 #endif
871
872   if (rfilter != NULL) {
873     if (!dfilter_compile(rfilter, &rfcode)) {
874       fprintf(stderr, "tethereal: %s\n", dfilter_error_msg);
875       epan_cleanup();
876       exit(2);
877     }
878   }
879   cfile.rfcode = rfcode;
880   if (cf_name) {
881     err = open_cap_file(cf_name, FALSE, &cfile);
882     if (err != 0) {
883       epan_cleanup();
884       exit(2);
885     }
886     err = load_cap_file(&cfile, out_file_type);
887     if (err != 0) {
888       epan_cleanup();
889       exit(2);
890     }
891     cf_name[0] = '\0';
892   } else {
893     /* No capture file specified, so we're supposed to do a live capture;
894        do we have support for live captures? */
895 #ifdef HAVE_LIBPCAP
896
897 #ifdef _WIN32
898     if (!has_wpcap) {
899         fprintf(stderr, "tethereal: Could not load wpcap.dll.\n");
900         exit(2);
901     }
902 #endif
903
904     /* Yes; did the user specify an interface to use? */
905     if (cfile.iface == NULL) {
906         /* No - is a default specified in the preferences file? */
907         if (prefs->capture_device != NULL) {
908             /* Yes - use it. */
909             if_text = strrchr(prefs->capture_device, ' ');
910             if (if_text == NULL) {
911                 cfile.iface = g_strdup(prefs->capture_device);
912             } else {
913                 cfile.iface = g_strdup(if_text + 1); /* Skip over space */
914             }
915         } else {
916             /* No - pick the first one from the list of interfaces. */
917             if_list = get_interface_list(&err, err_str);
918             if (if_list == NULL) {
919                 switch (err) {
920
921                 case CANT_GET_INTERFACE_LIST:
922                     fprintf(stderr, "tethereal: Can't get list of interfaces: %s\n",
923                             err_str);
924                     break;
925
926                 case NO_INTERFACES_FOUND:
927                     fprintf(stderr, "tethereal: There are no interfaces on which a capture can be done\n");
928                     break;
929                 }
930                 exit(2);
931             }
932             if_text = strrchr(if_list->data, ' ');      /* first interface */
933             if (if_text == NULL) {
934                 cfile.iface = g_strdup(if_list->data);
935             } else {
936                 cfile.iface = g_strdup(if_text + 1); /* Skip over space */
937             }
938             free_interface_list(if_list);
939         }
940     }
941     capture(out_file_type);
942
943     if (capture_opts.ringbuffer_on) {
944       ringbuf_free();
945     }
946 #else
947     /* No - complain. */
948     fprintf(stderr, "This version of Tethereal was not built with support for capturing packets.\n");
949     exit(2);
950 #endif
951   }
952
953   draw_tap_listeners(TRUE);
954   epan_cleanup();
955
956   return 0;
957 }
958
959 #ifdef HAVE_LIBPCAP
960 /* Do the low-level work of a capture.
961    Returns TRUE if it succeeds, FALSE otherwise. */
962 static int
963 capture(int out_file_type)
964 {
965   gchar       open_err_str[PCAP_ERRBUF_SIZE];
966   gchar       lookup_net_err_str[PCAP_ERRBUF_SIZE];
967   bpf_u_int32 netnum, netmask;
968   struct bpf_program fcode;
969   void        (*oldhandler)(int);
970   int         err = 0;
971   int         volatile volatile_err = 0;
972   int         volatile inpkts = 0;
973   int         pcap_cnt;
974   char        errmsg[1024+1];
975   condition  *volatile cnd_stop_capturesize = NULL;
976   condition  *volatile cnd_stop_timeout = NULL;
977 #ifndef _WIN32
978   static const char ppamsg[] = "can't find PPA for ";
979   char       *libpcap_warn;
980 #endif
981   struct pcap_stat stats;
982   gboolean    write_err;
983   gboolean    dump_ok;
984
985   /* Initialize all data structures used for dissection. */
986   init_dissection();
987
988   ld.linktype       = WTAP_ENCAP_UNKNOWN;
989   ld.pdh            = NULL;
990
991   /* Open the network interface to capture from it.
992      Some versions of libpcap may put warnings into the error buffer
993      if they succeed; to tell if that's happened, we have to clear
994      the error buffer, and check if it's still a null string.  */
995   open_err_str[0] = '\0';
996   ld.pch = pcap_open_live(cfile.iface, capture_opts.snaplen,
997                           capture_opts.promisc_mode, 1000, open_err_str);
998
999   if (ld.pch == NULL) {
1000     /* Well, we couldn't start the capture. */
1001 #ifdef _WIN32
1002     /* On Win32 OSes, the capture devices are probably available to all
1003        users; don't warn about permissions problems.
1004
1005        Do, however, warn that Token Ring and PPP devices aren't supported. */
1006     snprintf(errmsg, sizeof errmsg,
1007         "The capture session could not be initiated (%s).\n"
1008         "Please check that you have the proper interface specified.\n"
1009         "\n"
1010         "Note that the driver Tethereal uses for packet capture on Windows\n"
1011         "doesn't support capturing on Token Ring interfaces, and doesn't\n"
1012         "support capturing on PPP/WAN interfaces in Windows NT/2000.\n",
1013         open_err_str);
1014 #else
1015       /* If we got a "can't find PPA for XXX" message, warn the user (who
1016          is running Ethereal on HP-UX) that they don't have a version
1017          of libpcap that properly handles HP-UX (libpcap 0.6.x and later
1018          versions, which properly handle HP-UX, say "can't find /dev/dlpi
1019          PPA for XXX" rather than "can't find PPA for XXX"). */
1020       if (strncmp(open_err_str, ppamsg, sizeof ppamsg - 1) == 0)
1021         libpcap_warn =
1022           "\n\n"
1023           "You are running Tethereal with a version of the libpcap library\n"
1024           "that doesn't handle HP-UX network devices well; this means that\n"
1025           "Tethereal may not be able to capture packets.\n"
1026           "\n"
1027           "To fix this, you should install libpcap 0.6.2, or a later version\n"
1028           "of libpcap, rather than libpcap 0.4 or 0.5.x.  It is available in\n"
1029           "packaged binary form from the Software Porting And Archive Centre\n"
1030           "for HP-UX; the Centre is at http://hpux.connect.org.uk/ - the page\n"
1031           "at the URL lists a number of mirror sites.";
1032       else
1033         libpcap_warn = "";
1034     snprintf(errmsg, sizeof errmsg,
1035       "The capture session could not be initiated (%s).\n"
1036       "Please check to make sure you have sufficient permissions, and that\n"
1037       "you have the proper interface specified.%s", open_err_str, libpcap_warn);
1038 #endif
1039     goto error;
1040   }
1041
1042   if (cfile.cfilter) {
1043     /* A capture filter was specified; set it up. */
1044     if (pcap_lookupnet(cfile.iface, &netnum, &netmask, lookup_net_err_str) < 0) {
1045       /*
1046        * Well, we can't get the netmask for this interface; it's used
1047        * only for filters that check for broadcast IP addresses, so
1048        * we just warn the user, and punt and use 0.
1049        */
1050       fprintf(stderr,
1051         "Warning:  Couldn't obtain netmask info (%s).\n", lookup_net_err_str);
1052       netmask = 0;
1053     }
1054     if (pcap_compile(ld.pch, &fcode, cfile.cfilter, 1, netmask) < 0) {
1055       snprintf(errmsg, sizeof errmsg, "Unable to parse filter string (%s).",
1056         pcap_geterr(ld.pch));
1057       goto error;
1058     }
1059     if (pcap_setfilter(ld.pch, &fcode) < 0) {
1060       snprintf(errmsg, sizeof errmsg, "Can't install filter (%s).",
1061         pcap_geterr(ld.pch));
1062       goto error;
1063     }
1064   }
1065
1066   ld.linktype = wtap_pcap_encap_to_wtap_encap(get_pcap_linktype(ld.pch,
1067         cfile.iface));
1068   if (cfile.save_file != NULL) {
1069     /* Set up to write to the capture file. */
1070     if (ld.linktype == WTAP_ENCAP_UNKNOWN) {
1071       strcpy(errmsg, "The network you're capturing from is of a type"
1072                " that Tethereal doesn't support.");
1073       goto error;
1074     }
1075     if (capture_opts.ringbuffer_on) {
1076       cfile.save_file_fd = ringbuf_init(cfile.save_file,
1077         capture_opts.ringbuffer_num_files);
1078       if (cfile.save_file_fd != -1) {
1079         ld.pdh = ringbuf_init_wtap_dump_fdopen(out_file_type, ld.linktype,
1080           pcap_snapshot(ld.pch), &err);
1081       } else {
1082         err = errno;    /* "ringbuf_init()" failed */
1083         ld.pdh = NULL;
1084       }
1085     } else {
1086       ld.pdh = wtap_dump_open(cfile.save_file, out_file_type,
1087                  ld.linktype, pcap_snapshot(ld.pch), &err);
1088     }
1089
1090     if (ld.pdh == NULL) {
1091       snprintf(errmsg, sizeof errmsg,
1092                file_open_error_message(err, TRUE, out_file_type),
1093                *cfile.save_file == '\0' ? "stdout" : cfile.save_file);
1094       goto error;
1095     }
1096   }
1097
1098   /* Does "open_err_str" contain a non-empty string?  If so, "pcap_open_live()"
1099      returned a warning; print it, but keep capturing. */
1100   if (open_err_str[0] != '\0')
1101     fprintf(stderr, "tethereal: WARNING: %s.\n", open_err_str);
1102
1103 #ifdef _WIN32
1104   /* Catch a CTRL+C event and, if we get it, clean up and exit. */
1105   SetConsoleCtrlHandler(capture_cleanup, TRUE);
1106 #else /* _WIN32 */
1107   /* Catch SIGINT and SIGTERM and, if we get either of them, clean up
1108      and exit.
1109      XXX - deal with signal semantics on various UNIX platforms.  Or just
1110      use "sigaction()" and be done with it? */
1111   signal(SIGTERM, capture_cleanup);
1112   signal(SIGINT, capture_cleanup);
1113   if ((oldhandler = signal(SIGHUP, capture_cleanup)) != SIG_DFL)
1114     signal(SIGHUP, oldhandler);
1115
1116 #ifdef SIGINFO
1117   /* Catch SIGINFO and, if we get it and we're capturing to a file in
1118      quiet mode, report the number of packets we've captured. */
1119   signal(SIGINFO, report_counts_siginfo);
1120 #endif /* SIGINFO */
1121 #endif /* _WIN32 */
1122
1123   /* Let the user know what interface was chosen. */
1124   fprintf(stderr, "Capturing on %s\n", cfile.iface);
1125
1126   /* initialize capture stop conditions */
1127   init_capture_stop_conditions();
1128   /* create stop conditions */
1129   if (capture_opts.has_autostop_filesize)
1130     cnd_stop_capturesize = cnd_new((char*)CND_CLASS_CAPTURESIZE,
1131                                    (long)capture_opts.autostop_filesize * 1000);
1132   if (capture_opts.has_autostop_duration)
1133     cnd_stop_timeout = cnd_new((char*)CND_CLASS_TIMEOUT,
1134                                (gint32)capture_opts.autostop_duration);
1135
1136   if (!setjmp(ld.stopenv)) {
1137     ld.go = TRUE;
1138     ld.packet_count = 0;
1139   } else
1140     ld.go = FALSE;
1141   while (ld.go) {
1142     /* We need to be careful with automatic variables defined in the
1143        outer scope which are changed inside the loop.  Most compilers
1144        don't try to roll them back to their original values after the
1145        longjmp which causes the loop to finish, but all that the
1146        standards say is that their values are indeterminate.  If we
1147        don't want them to be rolled back, we should define them with the
1148        volatile attribute (paraphrasing W. Richard Stevens, Advanced
1149        Programming in the UNIX Environment, p. 178).
1150
1151        The "err" variable causes a particular problem.  If we give it
1152        the volatile attribute, then when we pass a reference to it (as
1153        in "&err") to a function, GCC warns: "passing arg <n> of
1154        <function> discards qualifiers from pointer target type".
1155        Therefore within the loop and just beyond we don't use "err".
1156        Within the loop we define "loop_err", and assign its value to
1157        "volatile_err", which is in the outer scope and is checked when
1158        the loop finishes.
1159
1160        We also define "packet_count_prev" here to keep things tidy,
1161        since it's used only inside the loop.  If it were defined in the
1162        outer scope, GCC would give a warning (unnecessary in this case)
1163        that it might be clobbered, and we'd need to give it the volatile
1164        attribute to suppress the warning. */
1165
1166     int loop_err = 0;
1167     int packet_count_prev = 0;
1168
1169     if (cnd_stop_capturesize == NULL && cnd_stop_timeout == NULL) {
1170       /* We're not stopping at a particular capture file size, and we're
1171          not stopping after some particular amount of time has expired,
1172          so either we have no stop condition or the only stop condition
1173          is a maximum packet count.
1174
1175          If there's no maximum packet count, pass it -1, meaning "until
1176          you run out of packets in the bufferful you read".  Otherwise,
1177          pass it the number of packets we have left to capture.
1178
1179          We don't call "pcap_loop()" as, if we're saving to a file that's
1180          a FIFO, we want to flush the FIFO after we're done processing
1181          this libpcap bufferful of packets, so that the program
1182          reading the FIFO sees the packets immediately and doesn't get
1183          any partial packet, forcing it to block in the middle of reading
1184          that packet. */
1185       if (capture_opts.autostop_count == 0)
1186         pcap_cnt = -1;
1187       else {
1188         if (ld.packet_count >= capture_opts.autostop_count) {
1189           /* XXX do we need this test here? */
1190           /* It appears there's nothing more to capture. */
1191           break;
1192         }
1193         pcap_cnt = capture_opts.autostop_count - ld.packet_count;
1194       }
1195     } else {
1196       /* We need to check the capture file size or the timeout after
1197          each packet. */
1198       pcap_cnt = 1;
1199     }
1200     inpkts = pcap_dispatch(ld.pch, pcap_cnt, capture_pcap_cb, (guchar *) &ld);
1201     if (inpkts < 0) {
1202       /* Error from "pcap_dispatch()". */
1203       ld.go = FALSE;
1204     } else if (cnd_stop_timeout != NULL && cnd_eval(cnd_stop_timeout)) {
1205       /* The specified capture time has elapsed; stop the capture. */
1206       ld.go = FALSE;
1207     } else if (inpkts > 0) {
1208       if (capture_opts.autostop_count != 0 &&
1209                  ld.packet_count >= capture_opts.autostop_count) {
1210         /* The specified number of packets have been captured and have
1211            passed both any capture filter in effect and any read filter
1212            in effect. */
1213         ld.go = FALSE;
1214       } else if (cnd_stop_capturesize != NULL &&
1215                     cnd_eval(cnd_stop_capturesize,
1216                               (guint32)wtap_get_bytes_dumped(ld.pdh))) {
1217         /* We're saving the capture to a file, and the capture file reached
1218            its maximum size. */
1219         if (capture_opts.ringbuffer_on) {
1220           /* Switch to the next ringbuffer file */
1221           if (ringbuf_switch_file(&cfile, &ld.pdh, &loop_err)) {
1222             /* File switch succeeded: reset the condition */
1223             cnd_reset(cnd_stop_capturesize);
1224           } else {
1225             /* File switch failed: stop here */
1226             volatile_err = loop_err;
1227             ld.go = FALSE;
1228           }
1229         } else {
1230           /* No ringbuffer - just stop. */
1231           ld.go = FALSE;
1232         }
1233       }
1234       if (ld.output_to_pipe) {
1235         if (ld.packet_count > packet_count_prev) {
1236           if (fflush(wtap_dump_file(ld.pdh))) {
1237             volatile_err = errno;
1238             ld.go = FALSE;
1239           }
1240           packet_count_prev = ld.packet_count;
1241         }
1242       }
1243     } /* inpkts > 0 */
1244   } /* while (ld.go) */
1245
1246   /* delete stop conditions */
1247   if (cnd_stop_capturesize != NULL)
1248     cnd_delete(cnd_stop_capturesize);
1249   if (cnd_stop_timeout != NULL)
1250     cnd_delete(cnd_stop_timeout);
1251
1252   if ((cfile.save_file != NULL) && !quiet) {
1253     /* We're saving to a file, which means we're printing packet counts
1254        to stderr if we are not running silent and deep.
1255        Send a newline so that we move to the line after the packet count. */
1256     fprintf(stderr, "\n");
1257   }
1258
1259   /* If we got an error while capturing, report it. */
1260   if (inpkts < 0) {
1261     fprintf(stderr, "tethereal: Error while capturing packets: %s\n",
1262         pcap_geterr(ld.pch));
1263   }
1264
1265   if (volatile_err == 0)
1266     write_err = FALSE;
1267   else {
1268     show_capture_file_io_error(cfile.save_file, volatile_err, FALSE);
1269     write_err = TRUE;
1270   }
1271
1272   if (cfile.save_file != NULL) {
1273     /* We're saving to a file or files; close all files. */
1274     if (capture_opts.ringbuffer_on) {
1275       dump_ok = ringbuf_wtap_dump_close(&cfile, &err);
1276     } else {
1277       dump_ok = wtap_dump_close(ld.pdh, &err);
1278     }
1279     /* If we've displayed a message about a write error, there's no point
1280        in displaying another message about an error on close. */
1281     if (!dump_ok && !write_err)
1282       show_capture_file_io_error(cfile.save_file, err, TRUE);
1283   }
1284
1285   /* Get the capture statistics, and, if any packets were dropped, report
1286      that. */
1287   if (pcap_stats(ld.pch, &stats) >= 0) {
1288     if (stats.ps_drop != 0) {
1289       fprintf(stderr, "%u packets dropped\n", stats.ps_drop);
1290     }
1291   } else {
1292     fprintf(stderr, "tethereal: Can't get packet-drop statistics: %s\n",
1293         pcap_geterr(ld.pch));
1294   }
1295   /* Report the number of captured packets if not reported during capture
1296      and we are saving to a file. */
1297   report_counts();
1298
1299   pcap_close(ld.pch);
1300
1301   return TRUE;
1302
1303 error:
1304   if (capture_opts.ringbuffer_on) {
1305     ringbuf_error_cleanup();
1306   }
1307   g_free(cfile.save_file);
1308   cfile.save_file = NULL;
1309   fprintf(stderr, "tethereal: %s\n", errmsg);
1310   if (ld.pch != NULL)
1311     pcap_close(ld.pch);
1312
1313   return FALSE;
1314 }
1315
1316 static void
1317 capture_pcap_cb(guchar *user, const struct pcap_pkthdr *phdr,
1318   const guchar *pd)
1319 {
1320   struct wtap_pkthdr whdr;
1321   union wtap_pseudo_header pseudo_header;
1322   loop_data *ld = (loop_data *) user;
1323   cb_args_t args;
1324   int err;
1325
1326   /* Convert from libpcap to Wiretap format.
1327      If that fails, ignore the packet (wtap_process_pcap_packet has
1328      written an error message). */
1329   pd = wtap_process_pcap_packet(ld->linktype, phdr, pd, &pseudo_header,
1330                                 &whdr, &err);
1331   if (pd == NULL) {
1332     return;
1333   }
1334
1335   args.cf = &cfile;
1336   args.pdh = ld->pdh;
1337   if (ld->pdh) {
1338     wtap_dispatch_cb_write((guchar *)&args, &whdr, 0, &pseudo_header, pd);
1339     /* Report packet capture count if not quiet */
1340     if (!quiet) {
1341       if (!decode) {
1342          if (ld->packet_count != 0) {
1343            fprintf(stderr, "\r%u ", ld->packet_count);
1344            /* stderr could be line buffered */
1345            fflush(stderr);
1346          }
1347       } else {
1348            wtap_dispatch_cb_print((guchar *)&args, &whdr, 0,
1349                                   &pseudo_header, pd);
1350       }
1351     }
1352   } else {
1353     wtap_dispatch_cb_print((guchar *)&args, &whdr, 0, &pseudo_header, pd);
1354   }
1355 }
1356
1357 #ifdef _WIN32
1358 static BOOL WINAPI
1359 capture_cleanup(DWORD ctrltype _U_)
1360 {
1361   /* CTRL_C_EVENT is sort of like SIGINT, CTRL_BREAK_EVENT is unique to
1362      Windows, CTRL_CLOSE_EVENT is sort of like SIGHUP, CTRL_LOGOFF_EVENT
1363      is also sort of like SIGHUP, and CTRL_SHUTDOWN_EVENT is sort of
1364      like SIGTERM at least when the machine's shutting down.
1365
1366      For now, we handle them all as indications that we should clean up
1367      and quit, just as we handle SIGINT, SIGHUP, and SIGTERM in that
1368      way on UNIX.
1369
1370      However, as handlers run in a new thread, we can't just longjmp
1371      out; we have to set "ld.go" to FALSE, and must return TRUE so that
1372      no other handler - such as one that would terminate the process -
1373      gets called.
1374
1375      XXX - for some reason, typing ^C to Tethereal, if you run this in
1376      a Cygwin console window in at least some versions of Cygwin,
1377      causes Tethereal to terminate immediately; this routine gets
1378      called, but the main loop doesn't get a chance to run and
1379      exit cleanly, at least if this is compiled with Microsoft Visual
1380      C++ (i.e., it's a property of the Cygwin console window or Bash;
1381      it happens if Tethereal is not built with Cygwin - for all I know,
1382      building it with Cygwin may make the problem go away). */
1383   ld.go = FALSE;
1384   return TRUE;
1385 }
1386 #else
1387 static void
1388 capture_cleanup(int signum _U_)
1389 {
1390   /* Longjmp back to the starting point; "pcap_dispatch()", on many
1391      UNIX platforms, just keeps looping if it gets EINTR, so if we set
1392      "ld.go" to FALSE and return, we won't break out of it and quit
1393      capturing. */
1394   longjmp(ld.stopenv, 1);
1395 }
1396 #endif /* _WIN32 */
1397
1398 static void
1399 report_counts(void)
1400 {
1401 #ifdef SIGINFO
1402   /* XXX - if we use sigaction, this doesn't have to be done.
1403      (Yes, this isn't necessary on BSD, but just in case a system
1404      where "signal()" has AT&T semantics adopts SIGINFO....) */
1405   signal(SIGINFO, report_counts_siginfo);
1406 #endif /* SIGINFO */
1407
1408   if (cfile.save_file != NULL && quiet) {
1409     /* Report the count only if we're capturing to a file (rather
1410        than printing captured packet information out) and aren't
1411        updating a count as packets arrive. */
1412     fprintf(stderr, "%u packets captured\n", ld.packet_count);
1413   }
1414 #ifdef SIGINFO
1415   infoprint = FALSE;    /* we just reported it */
1416 #endif /* SIGINFO */
1417 }
1418
1419 #ifdef SIGINFO
1420 static void
1421 report_counts_siginfo(int signum _U_)
1422 {
1423   /* If we've been told to delay printing, just set a flag asking
1424      that we print counts (if we're supposed to), otherwise print
1425      the count of packets captured (if we're supposed to). */
1426   if (infodelay)
1427     infoprint = TRUE;
1428   else
1429     report_counts();
1430 }
1431 #endif /* SIGINFO */
1432 #endif /* HAVE_LIBPCAP */
1433
1434 static int
1435 load_cap_file(capture_file *cf, int out_file_type)
1436 {
1437   gint         linktype;
1438   int          snapshot_length;
1439   wtap_dumper *pdh;
1440   int          err;
1441   int          success;
1442   cb_args_t    args;
1443
1444   linktype = wtap_file_encap(cf->wth);
1445   if (cf->save_file != NULL) {
1446     /* Set up to write to the capture file. */
1447     snapshot_length = wtap_snapshot_length(cf->wth);
1448     if (snapshot_length == 0) {
1449       /* Snapshot length of input file not known. */
1450       snapshot_length = WTAP_MAX_PACKET_SIZE;
1451     }
1452     pdh = wtap_dump_open(cf->save_file, out_file_type,
1453                 linktype, snapshot_length, &err);
1454
1455     if (pdh == NULL) {
1456       /* We couldn't set up to write to the capture file. */
1457       switch (err) {
1458
1459       case WTAP_ERR_UNSUPPORTED_FILE_TYPE:
1460         fprintf(stderr,
1461                 "tethereal: Capture files can't be written in that format.\n");
1462         break;
1463
1464       case WTAP_ERR_UNSUPPORTED_ENCAP:
1465       case WTAP_ERR_ENCAP_PER_PACKET_UNSUPPORTED:
1466         fprintf(stderr,
1467           "tethereal: The capture file being read cannot be written in "
1468           "that format.\n");
1469         break;
1470
1471       case WTAP_ERR_CANT_OPEN:
1472         fprintf(stderr,
1473           "tethereal: The file \"%s\" couldn't be created for some "
1474           "unknown reason.\n",
1475             *cf->save_file == '\0' ? "stdout" : cf->save_file);
1476         break;
1477
1478       case WTAP_ERR_SHORT_WRITE:
1479         fprintf(stderr,
1480           "tethereal: A full header couldn't be written to the file \"%s\".\n",
1481                 *cf->save_file == '\0' ? "stdout" : cf->save_file);
1482         break;
1483
1484       default:
1485         fprintf(stderr,
1486           "tethereal: The file \"%s\" could not be created: %s\n.",
1487                 *cf->save_file == '\0' ? "stdout" : cf->save_file,
1488                 wtap_strerror(err));
1489         break;
1490       }
1491       goto out;
1492     }
1493     args.cf = cf;
1494     args.pdh = pdh;
1495     success = wtap_loop(cf->wth, 0, wtap_dispatch_cb_write, (guchar *) &args,
1496                         &err);
1497
1498     /* Now close the capture file. */
1499     if (!wtap_dump_close(pdh, &err))
1500       show_capture_file_io_error(cfile.save_file, err, TRUE);
1501   } else {
1502     args.cf = cf;
1503     args.pdh = NULL;
1504     success = wtap_loop(cf->wth, 0, wtap_dispatch_cb_print, (guchar *) &args,
1505                         &err);
1506   }
1507   if (!success) {
1508     /* Print up a message box noting that the read failed somewhere along
1509        the line. */
1510     switch (err) {
1511
1512     case WTAP_ERR_UNSUPPORTED_ENCAP:
1513       fprintf(stderr,
1514 "tethereal: \"%s\" is a capture file is for a network type that Tethereal doesn't support.\n",
1515         cf->filename);
1516       break;
1517
1518     case WTAP_ERR_CANT_READ:
1519       fprintf(stderr,
1520 "tethereal: An attempt to read from \"%s\" failed for some unknown reason.\n",
1521         cf->filename);
1522       break;
1523
1524     case WTAP_ERR_SHORT_READ:
1525       fprintf(stderr,
1526 "tethereal: \"%s\" appears to have been cut short in the middle of a packet.\n",
1527         cf->filename);
1528       break;
1529
1530     case WTAP_ERR_BAD_RECORD:
1531       fprintf(stderr,
1532 "tethereal: \"%s\" appears to be damaged or corrupt.\n",
1533         cf->filename);
1534       break;
1535
1536     default:
1537       fprintf(stderr,
1538 "tethereal: An error occurred while reading \"%s\": %s.\n",
1539         cf->filename, wtap_strerror(err));
1540       break;
1541     }
1542   }
1543
1544 out:
1545   wtap_close(cf->wth);
1546   cf->wth = NULL;
1547
1548   return err;
1549 }
1550
1551 static void
1552 fill_in_fdata(frame_data *fdata, capture_file *cf,
1553         const struct wtap_pkthdr *phdr, long offset)
1554 {
1555   fdata->next = NULL;
1556   fdata->prev = NULL;
1557   fdata->pfd = NULL;
1558   fdata->num = cf->count;
1559   fdata->pkt_len = phdr->len;
1560   fdata->cap_len = phdr->caplen;
1561   fdata->file_off = offset;
1562   fdata->lnk_t = phdr->pkt_encap;
1563   fdata->abs_secs  = phdr->ts.tv_sec;
1564   fdata->abs_usecs = phdr->ts.tv_usec;
1565   fdata->flags.passed_dfilter = 0;
1566   fdata->flags.encoding = CHAR_ASCII;
1567   fdata->flags.visited = 0;
1568   fdata->flags.marked = 0;
1569
1570   /* If we don't have the time stamp of the first packet in the
1571      capture, it's because this is the first packet.  Save the time
1572      stamp of this packet as the time stamp of the first packet. */
1573   if (!firstsec && !firstusec) {
1574     firstsec  = fdata->abs_secs;
1575     firstusec = fdata->abs_usecs;
1576   }
1577
1578   /* If we don't have the time stamp of the previous displayed packet,
1579      it's because this is the first displayed packet.  Save the time
1580      stamp of this packet as the time stamp of the previous displayed
1581      packet. */
1582   if (!prevsec && !prevusec) {
1583     prevsec  = fdata->abs_secs;
1584     prevusec = fdata->abs_usecs;
1585   }
1586
1587   /* Get the time elapsed between the first packet and this packet. */
1588   compute_timestamp_diff(&fdata->rel_secs, &fdata->rel_usecs,
1589                 fdata->abs_secs, fdata->abs_usecs, firstsec, firstusec);
1590
1591   /* If it's greater than the current elapsed time, set the elapsed time
1592      to it (we check for "greater than" so as not to be confused by
1593      time moving backwards). */
1594   if ((gint32)cf->esec < fdata->rel_secs
1595         || ((gint32)cf->esec == fdata->rel_secs && (gint32)cf->eusec < fdata->rel_usecs)) {
1596     cf->esec = fdata->rel_secs;
1597     cf->eusec = fdata->rel_usecs;
1598   }
1599
1600   /* Get the time elapsed between the previous displayed packet and
1601      this packet. */
1602   compute_timestamp_diff(&fdata->del_secs, &fdata->del_usecs,
1603                 fdata->abs_secs, fdata->abs_usecs, prevsec, prevusec);
1604   prevsec = fdata->abs_secs;
1605   prevusec = fdata->abs_usecs;
1606 }
1607
1608 /* Free up all data attached to a "frame_data" structure. */
1609 static void
1610 clear_fdata(frame_data *fdata)
1611 {
1612   if (fdata->pfd)
1613     g_slist_free(fdata->pfd);
1614 }
1615
1616 static void
1617 wtap_dispatch_cb_write(guchar *user, const struct wtap_pkthdr *phdr,
1618   long offset, union wtap_pseudo_header *pseudo_header, const guchar *buf)
1619 {
1620   cb_args_t    *args = (cb_args_t *) user;
1621   capture_file *cf = args->cf;
1622   wtap_dumper  *pdh = args->pdh;
1623   frame_data    fdata;
1624   int           err;
1625   gboolean      passed;
1626   epan_dissect_t *edt;
1627
1628 #ifdef SIGINFO
1629   /*
1630    * Prevent a SIGINFO handler from writing to stdout while we're
1631    * doing so; instead, have it just set a flag telling us to print
1632    * that information when we're done.
1633    */
1634   infodelay = TRUE;
1635 #endif /* SIGINFO */
1636
1637   cf->count++;
1638   if (cf->rfcode) {
1639     fill_in_fdata(&fdata, cf, phdr, offset);
1640     edt = epan_dissect_new(TRUE, FALSE);
1641     epan_dissect_prime_dfilter(edt, cf->rfcode);
1642     epan_dissect_run(edt, pseudo_header, buf, &fdata, NULL);
1643     passed = dfilter_apply_edt(cf->rfcode, edt);
1644   } else {
1645     passed = TRUE;
1646     edt = NULL;
1647   }
1648   if (passed) {
1649     /* The packet passed the read filter. */
1650 #ifdef HAVE_LIBPCAP
1651     ld.packet_count++;
1652 #endif
1653     if (!wtap_dump(pdh, phdr, pseudo_header, buf, &err)) {
1654 #ifdef HAVE_LIBPCAP
1655       if (ld.pch != NULL && !quiet) {
1656         /* We're capturing packets, so (if -q not specified) we're printing
1657            a count of packets captured; move to the line after the count. */
1658         fprintf(stderr, "\n");
1659       }
1660 #endif
1661       show_capture_file_io_error(cf->save_file, err, FALSE);
1662 #ifdef HAVE_LIBPCAP
1663       if (ld.pch != NULL)
1664         pcap_close(ld.pch);
1665 #endif
1666       wtap_dump_close(pdh, &err);
1667       exit(2);
1668     }
1669   }
1670   if (edt != NULL)
1671     epan_dissect_free(edt);
1672   if (cf->rfcode)
1673     clear_fdata(&fdata);
1674
1675 #ifdef SIGINFO
1676   /*
1677    * Allow SIGINFO handlers to write.
1678    */
1679   infodelay = FALSE;
1680
1681   /*
1682    * If a SIGINFO handler asked us to write out capture counts, do so.
1683    */
1684   if (infoprint)
1685     report_counts();
1686 #endif /* SIGINFO */
1687 }
1688
1689 static void
1690 show_capture_file_io_error(const char *fname, int err, gboolean is_close)
1691 {
1692   if (*fname == '\0')
1693     fname = "stdout";
1694
1695   switch (err) {
1696
1697   case ENOSPC:
1698     fprintf(stderr,
1699 "tethereal: Not all the packets could be written to \"%s\" because there is "
1700 "no space left on the file system.\n",
1701         fname);
1702     break;
1703
1704 #ifdef EDQUOT
1705   case EDQUOT:
1706     fprintf(stderr,
1707 "tethereal: Not all the packets could be written to \"%s\" because you are "
1708 "too close to, or over your disk quota.\n",
1709         fname);
1710   break;
1711 #endif
1712
1713   case WTAP_ERR_CANT_CLOSE:
1714     fprintf(stderr,
1715 "tethereal: \"%s\" couldn't be closed for some unknown reason.\n",
1716         fname);
1717     break;
1718
1719   case WTAP_ERR_SHORT_WRITE:
1720     fprintf(stderr,
1721 "tethereal: Not all the packets could be written to \"%s\".\n",
1722         fname);
1723     break;
1724
1725   default:
1726     if (is_close) {
1727       fprintf(stderr,
1728 "tethereal: \"%s\" could not be closed: %s.\n",
1729         fname, wtap_strerror(err));
1730     } else {
1731       fprintf(stderr,
1732 "tethereal: An error occurred while writing to \"%s\": %s.\n",
1733         fname, wtap_strerror(err));
1734     }
1735     break;
1736   }
1737 }
1738
1739 static void
1740 wtap_dispatch_cb_print(guchar *user, const struct wtap_pkthdr *phdr,
1741   long offset, union wtap_pseudo_header *pseudo_header, const guchar *buf)
1742 {
1743   cb_args_t    *args = (cb_args_t *) user;
1744   capture_file *cf = args->cf;
1745   frame_data    fdata;
1746   gboolean      passed;
1747   print_args_t  print_args;
1748   epan_dissect_t *edt;
1749   gboolean      create_proto_tree;
1750   int           i;
1751
1752   cf->count++;
1753
1754   fill_in_fdata(&fdata, cf, phdr, offset);
1755
1756   passed = TRUE;
1757   if (cf->rfcode || verbose || num_tap_filters!=0)
1758     create_proto_tree = TRUE;
1759   else
1760     create_proto_tree = FALSE;
1761   /* The protocol tree will be "visible", i.e., printed, only if we're
1762      not printing a summary.
1763
1764      We only need the columns if we're *not* verbose; in verbose mode,
1765      we print the protocol tree, not the protocol summary. */
1766
1767   edt = epan_dissect_new(create_proto_tree, verbose);
1768   if (cf->rfcode) {
1769     epan_dissect_prime_dfilter(edt, cf->rfcode);
1770   }
1771
1772   tap_queue_init(edt);
1773   epan_dissect_run(edt, pseudo_header, buf, &fdata, verbose ? NULL : &cf->cinfo);
1774   tap_push_tapped_queue(edt);
1775
1776   if (cf->rfcode) {
1777     passed = dfilter_apply_edt(cf->rfcode, edt);
1778   }
1779   if (passed) {
1780     /* The packet passed the read filter. */
1781 #ifdef HAVE_LIBPCAP
1782     ld.packet_count++;
1783 #endif
1784     if (verbose) {
1785       /* Print the information in the protocol tree. */
1786       print_args.to_file = TRUE;
1787       print_args.format = PR_FMT_TEXT;
1788       print_args.print_summary = FALSE;
1789       print_args.print_hex = print_hex;
1790       print_args.expand_all = TRUE;
1791       print_args.suppress_unmarked = FALSE;
1792       proto_tree_print(&print_args, edt, stdout);
1793       if (!print_hex) {
1794         /* "print_hex_data()" will put out a leading blank line, as well
1795            as a trailing one; print one here, to separate the packets,
1796            only if "print_hex_data()" won't be called. */
1797         printf("\n");
1798       }
1799     } else {
1800       /* Just fill in the columns. */
1801       epan_dissect_fill_in_columns(edt);
1802
1803       /* Now print them. */
1804       for (i = 0; i < cf->cinfo.num_cols; i++) {
1805         switch (cf->cinfo.col_fmt[i]) {
1806         case COL_NUMBER:
1807           /*
1808            * Don't print this if we're doing a live capture from a network
1809            * interface - if we're doing a live capture, you won't be
1810            * able to look at the capture in the future (it's not being
1811            * saved anywhere), so the frame numbers are unlikely to be
1812            * useful.
1813            *
1814            * (XXX - it might be nice to be able to save and print at
1815            * the same time, sort of like an "Update list of packets
1816            * in real time" capture in Ethereal.)
1817            */
1818           if (cf->iface != NULL)
1819             continue;
1820           printf("%3s", cf->cinfo.col_data[i]);
1821           break;
1822
1823         case COL_CLS_TIME:
1824         case COL_REL_TIME:
1825         case COL_ABS_TIME:
1826         case COL_ABS_DATE_TIME: /* XXX - wider */
1827           printf("%10s", cf->cinfo.col_data[i]);
1828           break;
1829
1830         case COL_DEF_SRC:
1831         case COL_RES_SRC:
1832         case COL_UNRES_SRC:
1833         case COL_DEF_DL_SRC:
1834         case COL_RES_DL_SRC:
1835         case COL_UNRES_DL_SRC:
1836         case COL_DEF_NET_SRC:
1837         case COL_RES_NET_SRC:
1838         case COL_UNRES_NET_SRC:
1839           printf("%12s", cf->cinfo.col_data[i]);
1840           break;
1841
1842         case COL_DEF_DST:
1843         case COL_RES_DST:
1844         case COL_UNRES_DST:
1845         case COL_DEF_DL_DST:
1846         case COL_RES_DL_DST:
1847         case COL_UNRES_DL_DST:
1848         case COL_DEF_NET_DST:
1849         case COL_RES_NET_DST:
1850         case COL_UNRES_NET_DST:
1851           printf("%-12s", cf->cinfo.col_data[i]);
1852           break;
1853
1854         default:
1855           printf("%s", cf->cinfo.col_data[i]);
1856           break;
1857         }
1858         if (i != cf->cinfo.num_cols - 1) {
1859           /*
1860            * This isn't the last column, so we need to print a
1861            * separator between this column and the next.
1862            *
1863            * If we printed a network source and are printing a
1864            * network destination of the same type next, separate
1865            * them with "->"; if we printed a network destination
1866            * and are printing a network source of the same type
1867            * next, separate them with "<-"; otherwise separate them
1868            * with a space.
1869            */
1870           switch (cf->cinfo.col_fmt[i]) {
1871
1872           case COL_DEF_SRC:
1873           case COL_RES_SRC:
1874           case COL_UNRES_SRC:
1875             switch (cf->cinfo.col_fmt[i + 1]) {
1876
1877             case COL_DEF_DST:
1878             case COL_RES_DST:
1879             case COL_UNRES_DST:
1880               printf(" -> ");
1881               break;
1882
1883             default:
1884               putchar(' ');
1885               break;
1886             }
1887             break;
1888
1889           case COL_DEF_DL_SRC:
1890           case COL_RES_DL_SRC:
1891           case COL_UNRES_DL_SRC:
1892             switch (cf->cinfo.col_fmt[i + 1]) {
1893
1894             case COL_DEF_DL_DST:
1895             case COL_RES_DL_DST:
1896             case COL_UNRES_DL_DST:
1897               printf(" -> ");
1898               break;
1899
1900             default:
1901               putchar(' ');
1902               break;
1903             }
1904             break;
1905
1906           case COL_DEF_NET_SRC:
1907           case COL_RES_NET_SRC:
1908           case COL_UNRES_NET_SRC:
1909             switch (cf->cinfo.col_fmt[i + 1]) {
1910
1911             case COL_DEF_NET_DST:
1912             case COL_RES_NET_DST:
1913             case COL_UNRES_NET_DST:
1914               printf(" -> ");
1915               break;
1916
1917             default:
1918               putchar(' ');
1919               break;
1920             }
1921             break;
1922
1923           case COL_DEF_DST:
1924           case COL_RES_DST:
1925           case COL_UNRES_DST:
1926             switch (cf->cinfo.col_fmt[i + 1]) {
1927
1928             case COL_DEF_SRC:
1929             case COL_RES_SRC:
1930             case COL_UNRES_SRC:
1931               printf(" <- ");
1932               break;
1933
1934             default:
1935               putchar(' ');
1936               break;
1937             }
1938             break;
1939
1940           case COL_DEF_DL_DST:
1941           case COL_RES_DL_DST:
1942           case COL_UNRES_DL_DST:
1943             switch (cf->cinfo.col_fmt[i + 1]) {
1944
1945             case COL_DEF_DL_SRC:
1946             case COL_RES_DL_SRC:
1947             case COL_UNRES_DL_SRC:
1948               printf(" <- ");
1949               break;
1950
1951             default:
1952               putchar(' ');
1953               break;
1954             }
1955             break;
1956
1957           case COL_DEF_NET_DST:
1958           case COL_RES_NET_DST:
1959           case COL_UNRES_NET_DST:
1960             switch (cf->cinfo.col_fmt[i + 1]) {
1961
1962             case COL_DEF_NET_SRC:
1963             case COL_RES_NET_SRC:
1964             case COL_UNRES_NET_SRC:
1965               printf(" <- ");
1966               break;
1967
1968             default:
1969               putchar(' ');
1970               break;
1971             }
1972             break;
1973
1974           default:
1975             putchar(' ');
1976             break;
1977           }
1978         }
1979       }
1980       putchar('\n');
1981     }
1982     if (print_hex) {
1983       print_hex_data(stdout, print_args.format, edt);
1984       putchar('\n');
1985     }
1986   }
1987
1988   /* The ANSI C standard does not appear to *require* that a line-buffered
1989      stream be flushed to the host environment whenever a newline is
1990      written, it just says that, on such a stream, characters "are
1991      intended to be transmitted to or from the host environment as a
1992      block when a new-line character is encountered".
1993
1994      The Visual C++ 6.0 C implementation doesn't do what is intended;
1995      even if you set a stream to be line-buffered, it still doesn't
1996      flush the buffer at the end of every line.
1997
1998      So, if the "-l" flag was specified, we flush the standard output
1999      at the end of a packet.  This will do the right thing if we're
2000      printing packet summary lines, and, as we print the entire protocol
2001      tree for a single packet without waiting for anything to happen,
2002      it should be as good as line-buffered mode if we're printing
2003      protocol trees.  (The whole reason for the "-l" flag in either
2004      tcpdump or Tethereal is to allow the output of a live capture to
2005      be piped to a program or script and to have that script see the
2006      information for the packet as soon as it's printed, rather than
2007      having to wait until a standard I/O buffer fills up. */
2008   if (line_buffered)
2009     fflush(stdout);
2010
2011   epan_dissect_free(edt);
2012
2013   clear_fdata(&fdata);
2014 }
2015
2016 char *
2017 file_open_error_message(int err, gboolean for_writing, int file_type)
2018 {
2019   char *errmsg;
2020   static char errmsg_errno[1024+1];
2021
2022   switch (err) {
2023
2024   case WTAP_ERR_NOT_REGULAR_FILE:
2025     errmsg = "The file \"%s\" is a \"special file\" or socket or other non-regular file.";
2026     break;
2027
2028   case WTAP_ERR_FILE_UNKNOWN_FORMAT:
2029   case WTAP_ERR_UNSUPPORTED:
2030     /* Seen only when opening a capture file for reading. */
2031     errmsg = "The file \"%s\" is not a capture file in a format Tethereal understands.";
2032     break;
2033
2034   case WTAP_ERR_CANT_WRITE_TO_PIPE:
2035     /* Seen only when opening a capture file for writing. */
2036     snprintf(errmsg_errno, sizeof(errmsg_errno),
2037              "The file \"%%s\" is a pipe, and %s capture files cannot be "
2038              "written to a pipe.", wtap_file_type_string(file_type));
2039     errmsg = errmsg_errno;
2040     break;
2041
2042   case WTAP_ERR_UNSUPPORTED_FILE_TYPE:
2043     /* Seen only when opening a capture file for writing. */
2044     errmsg = "Tethereal does not support writing capture files in that format.";
2045     break;
2046
2047   case WTAP_ERR_UNSUPPORTED_ENCAP:
2048   case WTAP_ERR_ENCAP_PER_PACKET_UNSUPPORTED:
2049     if (for_writing)
2050       errmsg = "Tethereal cannot save this capture in that format.";
2051     else
2052       errmsg = "The file \"%s\" is a capture for a network type that Tethereal doesn't support.";
2053     break;
2054
2055   case WTAP_ERR_BAD_RECORD:
2056     errmsg = "The file \"%s\" appears to be damaged or corrupt.";
2057     break;
2058
2059   case WTAP_ERR_CANT_OPEN:
2060     if (for_writing)
2061       errmsg = "The file \"%s\" could not be created for some unknown reason.";
2062     else
2063       errmsg = "The file \"%s\" could not be opened for some unknown reason.";
2064     break;
2065
2066   case WTAP_ERR_SHORT_READ:
2067     errmsg = "The file \"%s\" appears to have been cut short"
2068              " in the middle of a packet or other data.";
2069     break;
2070
2071   case WTAP_ERR_SHORT_WRITE:
2072     errmsg = "A full header couldn't be written to the file \"%s\".";
2073     break;
2074
2075   case ENOENT:
2076     if (for_writing)
2077       errmsg = "The path to the file \"%s\" does not exist.";
2078     else
2079       errmsg = "The file \"%s\" does not exist.";
2080     break;
2081
2082   case EACCES:
2083     if (for_writing)
2084       errmsg = "You do not have permission to create or write to the file \"%s\".";
2085     else
2086       errmsg = "You do not have permission to read the file \"%s\".";
2087     break;
2088
2089   case EISDIR:
2090     errmsg = "\"%s\" is a directory (folder), not a file.";
2091     break;
2092
2093   default:
2094     snprintf(errmsg_errno, sizeof(errmsg_errno),
2095              "The file \"%%s\" could not be %s: %s.",
2096              for_writing ? "created" : "opened",
2097              wtap_strerror(err));
2098     errmsg = errmsg_errno;
2099     break;
2100   }
2101   return errmsg;
2102 }
2103
2104 int
2105 open_cap_file(char *fname, gboolean is_tempfile, capture_file *cf)
2106 {
2107   wtap       *wth;
2108   int         err;
2109   char        err_msg[2048+1];
2110
2111   wth = wtap_open_offline(fname, &err, FALSE);
2112   if (wth == NULL)
2113     goto fail;
2114
2115   /* The open succeeded.  Fill in the information for this file. */
2116
2117   /* Initialize all data structures used for dissection. */
2118   init_dissection();
2119
2120   cf->wth = wth;
2121   cf->filed = -1;       /* not used, but set it anyway */
2122   cf->f_len = 0;        /* not used, but set it anyway */
2123
2124   /* Set the file name because we need it to set the follow stream filter.
2125      XXX - is that still true?  We need it for other reasons, though,
2126      in any case. */
2127   cf->filename = g_strdup(fname);
2128
2129   /* Indicate whether it's a permanent or temporary file. */
2130   cf->is_tempfile = is_tempfile;
2131
2132   /* If it's a temporary capture buffer file, mark it as not saved. */
2133   cf->user_saved = !is_tempfile;
2134
2135   cf->cd_t      = wtap_file_type(cf->wth);
2136   cf->count     = 0;
2137   cf->drops_known = FALSE;
2138   cf->drops     = 0;
2139   cf->esec      = 0;
2140   cf->eusec     = 0;
2141   cf->snap      = wtap_snapshot_length(cf->wth);
2142   if (cf->snap == 0) {
2143     /* Snapshot length not known. */
2144     cf->has_snap = FALSE;
2145     cf->snap = WTAP_MAX_PACKET_SIZE;
2146   } else
2147     cf->has_snap = TRUE;
2148   cf->progbar_quantum = 0;
2149   cf->progbar_nextstep = 0;
2150   firstsec = 0, firstusec = 0;
2151   prevsec = 0, prevusec = 0;
2152
2153   return (0);
2154
2155 fail:
2156   snprintf(err_msg, sizeof err_msg, file_open_error_message(err, FALSE, 0),
2157            fname);
2158   fprintf(stderr, "tethereal: %s\n", err_msg);
2159   return (err);
2160 }