Put the low-level sync routines into a common file so they can be shared
[metze/wireshark/wip.git] / tethereal.c
1 /* tethereal.c
2  *
3  * $Id$
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_SYS_STAT_H
51 # include <sys/stat.h>
52 #endif
53
54 #ifdef NEED_STRERROR_H
55 #include "strerror.h"
56 #endif
57
58 #ifdef NEED_GETOPT_H
59 #include "getopt.h"
60 #endif
61
62 #include <glib.h>
63 #include <epan/epan.h>
64 #include <epan/filesystem.h>
65 #include <epan/privileges.h>
66 #include <wiretap/file_util.h>
67
68 #include "globals.h"
69 #include <epan/timestamp.h>
70 #include <epan/packet.h>
71 #include "file.h"
72 #include "disabled_protos.h"
73 #include <epan/prefs.h>
74 #include <epan/column.h>
75 #include "print.h"
76 #include <epan/addr_resolv.h>
77 #include "util.h"
78 #include "clopts_common.h"
79 #include "cmdarg_err.h"
80 #include "version_info.h"
81 #include <epan/conversation.h>
82 #include <epan/plugins.h>
83 #include "register.h"
84 #include "conditions.h"
85 #include "capture_stop_conditions.h"
86 #include "ringbuffer.h"
87 #include "capture_ui_utils.h"
88 #include <epan/epan_dissect.h>
89 #include <epan/tap.h>
90 #include <epan/stat_cmd_args.h>
91 #include <epan/timestamp.h>
92 #include <epan/ex-opt.h>
93
94 #ifdef HAVE_LIBPCAP
95 #include <pcap.h>
96 #include <setjmp.h>
97 #include "capture-pcap-util.h"
98 #include "pcapio.h"
99 #include <wiretap/wtap-capture.h>
100 #ifdef _WIN32
101 #include "capture-wpcap.h"
102 #include "capture_errs.h"
103 #endif /* _WIN32 */
104 #include "capture.h"
105 #include "capture_loop.h"
106 #include "capture_sync.h"
107 #endif /* HAVE_LIBPCAP */
108 #include "epan/emem.h"
109 #include "log.h"
110 #include <epan/funnel.h>
111
112 /*
113  * This is the template for the decode as option; it is shared between the
114  * various functions that output the usage for this parameter.
115  */
116 static const gchar decode_as_arg_template[] = "<layer_type>==<selector>,<decode_as_protocol>";
117
118 static nstime_t first_ts;
119 static nstime_t prev_ts;
120 static GString *comp_info_str, *runtime_info_str;
121
122 static gboolean print_packet_info;      /* TRUE if we're to print packet information */
123 /*
124  * The way the packet decode is to be written.
125  */
126 typedef enum {
127         WRITE_TEXT,     /* summary or detail text */
128         WRITE_XML       /* PDML or PSML */
129         /* Add CSV and the like here */
130 } output_action_e;
131 static output_action_e output_action;
132 static gboolean do_dissection;  /* TRUE if we have to dissect each packet */
133 static gboolean verbose;
134 static gboolean print_hex;
135 static gboolean line_buffered;
136 static guint32 cum_bytes = 0;
137 static print_format_e print_format = PR_FMT_TEXT;
138 static print_stream_t *print_stream;
139
140 /*
141  * Standard secondary message for unexpected errors.
142  */
143 static const char please_report[] =
144     "Please report this to the Ethereal developers";
145
146 #ifdef HAVE_LIBPCAP
147 /*
148  * TRUE if we're to print packet counts to keep track of captured packets.
149  */
150 static gboolean print_packet_counts;
151
152
153 static loop_data ld;
154
155 #ifdef HAVE_LIBPCAP
156 static capture_options capture_opts;
157
158
159 #ifdef SIGINFO
160 static gboolean infodelay;      /* if TRUE, don't print capture info in SIGINFO handler */
161 static gboolean infoprint;      /* if TRUE, print capture info after clearing infodelay */
162 #endif /* SIGINFO */
163 #endif /* HAVE_LIBPCAP */
164
165
166 static int capture(void);
167 static void capture_pcap_cb(u_char *, const struct pcap_pkthdr *,
168   const u_char *);
169 static void report_counts(void);
170 #ifdef _WIN32
171 static BOOL WINAPI capture_cleanup(DWORD);
172 #else /* _WIN32 */
173 static void capture_cleanup(int);
174 #ifdef SIGINFO
175 static void report_counts_siginfo(int);
176 #endif /* SIGINFO */
177 #endif /* _WIN32 */
178 #endif /* HAVE_LIBPCAP */
179
180 static int load_cap_file(capture_file *, char *, int);
181 static gboolean process_packet(capture_file *cf, long offset,
182     const struct wtap_pkthdr *whdr, union wtap_pseudo_header *pseudo_header,
183     const guchar *pd);
184 static void show_capture_file_io_error(const char *, int, gboolean);
185 static void show_print_file_io_error(int err);
186 static gboolean write_preamble(capture_file *cf);
187 static gboolean print_packet(capture_file *cf, epan_dissect_t *edt);
188 static gboolean write_finale(void);
189 static const char *cf_open_error_message(int err, gchar *err_info,
190     gboolean for_writing, int file_type);
191
192 static void open_failure_message(const char *filename, int err,
193     gboolean for_writing);
194 static void failure_message(const char *msg_format, va_list ap);
195 static void read_failure_message(const char *filename, int err);
196
197 capture_file cfile;
198
199
200 static void list_capture_types(void) {
201     int i;
202
203     fprintf(stderr, "editcap: The available capture file types for \"F\":\n");
204     for (i = 0; i < WTAP_NUM_FILE_TYPES; i++) {
205       if (wtap_dump_can_open(i))
206         fprintf(stderr, "    %s - %s\n",
207           wtap_file_type_short_string(i), wtap_file_type_string(i));
208     }
209 }
210
211 static void
212 print_usage(gboolean print_ver)
213 {
214   FILE *output;
215
216   if (print_ver) {
217     output = stdout;
218     fprintf(output, 
219         "Tethereal " VERSION "%s\n"
220         "Dump and analyze network traffic.\n"
221         "See http://www.ethereal.com for more information.\n"
222         "\n"
223         "%s",
224         svnversion, get_copyright_info());
225   } else {
226     output = stderr;
227   }
228   fprintf(output, "\n");
229   fprintf(output, "Usage: tethereal [options] ...\n");
230   fprintf(output, "\n");
231
232 #ifdef HAVE_LIBPCAP
233   fprintf(output, "Capture interface:\n");
234   fprintf(output, "  -i <interface>           name or idx of interface (def: first none loopback)\n");
235   fprintf(output, "  -f <capture filter>      packet filter in libpcap filter syntax\n");
236   fprintf(output, "  -s <snaplen>             packet snapshot length (def: 65535)\n");
237   fprintf(output, "  -p                       don't capture in promiscuous mode\n");
238 #ifdef _WIN32
239   fprintf(output, "  -B <buffer size>         size of kernel buffer (def: 1MB)\n");
240 #endif
241   fprintf(output, "  -y <link type>           link layer type (def: first appropriate)\n");
242   fprintf(output, "  -D                       print list of interfaces and exit\n");
243   fprintf(output, "  -L                       print list of link-layer types of iface and exit\n");
244   fprintf(output, "\n");
245   fprintf(output, "Capture stop conditions:\n");
246   fprintf(output, "  -c <packet count>        stop after n packets (def: infinite)\n");
247   fprintf(output, "  -a <autostop cond.> ...  duration:NUM - stop after NUM seconds\n");
248   fprintf(output, "                           filesize:NUM - stop this file after NUM KB\n");
249   fprintf(output, "                              files:NUM - stop after NUM files\n");
250   /*fprintf(output, "\n");*/
251   fprintf(output, "Capture output:\n");
252   fprintf(output, "  -b <ringbuffer opt.> ... duration:NUM - switch to next file after NUM secs\n");
253   fprintf(output, "                           filesize:NUM - switch to next file after NUM KB\n");
254   fprintf(output, "                              files:NUM - ringbuffer: replace after NUM files\n");
255 #endif  /* HAVE_LIBPCAP */
256
257   /*fprintf(output, "\n");*/
258   fprintf(output, "Input file:\n");
259   fprintf(output, "  -r <infile>              set the filename to read from (no pipes or stdin!)\n");
260
261   fprintf(output, "\n");
262   fprintf(output, "Processing:\n");
263   fprintf(output, "  -R <read filter>         packet filter in Ethereal display filter syntax\n");
264   fprintf(output, "  -n                       disable all name resolutions (def: all enabled)\n");
265   fprintf(output, "  -N <name resolve flags>  enable specific name resolution(s): \"mntC\"\n");
266   fprintf(output, "  -d %s ...\n", decode_as_arg_template);
267   fprintf(output, "                           \"Decode As\", see the man page for details\n");
268   fprintf(output, "                           Example: tcp.port==8888,http\n");
269
270   /*fprintf(output, "\n");*/
271   fprintf(output, "Output:\n");
272   fprintf(stderr, "  -w <outfile|->           set the output filename (or '-' for stdout)\n");
273   fprintf(stderr, "  -F <output file type>    set the output file type, default is libpcap\n");
274   fprintf(stderr, "                           an empty \"-F\" option will list the file types\n");
275   fprintf(output, "  -V                       add output of packet tree        (Packet Details)\n");
276   fprintf(output, "  -x                       add output of hex and ASCII dump (Packet Bytes)\n");
277   fprintf(output, "  -T pdml|ps|psml|text     output format of text output (def: text)\n");
278   fprintf(output, "  -t ad|a|r|d              output format of time stamps (def: r: rel. to first)\n");
279   fprintf(output, "  -l                       flush output after each packet\n");
280   fprintf(output, "  -q                       be more quiet on stdout (e.g. when using statistics)\n");
281   fprintf(output, "  -X <key>:<value>         eXtension options, see the man page for details\n");
282   fprintf(output, "  -z <statistics>          various statistics, see the man page for details\n");
283
284   fprintf(output, "\n");
285   fprintf(stderr, "Miscellaneous:\n");
286   fprintf(stderr, "  -h                       display this help and exit\n");
287   fprintf(stderr, "  -v                       display version info and exit\n");
288   fprintf(output, "  -o <name>:<value> ...   override preference setting\n");
289 }
290
291 /*
292  * For a dissector table, print on the stream described by output,
293  * its short name (which is what's used in the "-d" option) and its
294  * descriptive name.
295  */
296 static void
297 display_dissector_table_names(char *table_name, const char *ui_name,
298                               gpointer output)
299 {
300   fprintf((FILE *)output, "\t%s (%s)\n", table_name, ui_name);
301 }
302
303 /*
304  * For a dissector handle, print on the stream described by output,
305  * the filter name (which is what's used in the "-d" option) and the full
306  * name for the protocol that corresponds to this handle.
307  */
308 static void
309 display_dissector_names(const gchar *table _U_, gpointer handle, gpointer output)
310 {
311   int                proto_id;
312   const gchar*       proto_filter_name;
313   const gchar*       proto_ui_name;
314
315   proto_id = dissector_handle_get_protocol_index((dissector_handle_t)handle);
316
317   if (proto_id != -1) {
318     proto_filter_name = proto_get_protocol_filter_name(proto_id);
319     proto_ui_name =  proto_get_protocol_name(proto_id);
320     g_assert(proto_filter_name != NULL);
321     g_assert(proto_ui_name != NULL);
322
323     fprintf((FILE *)output, "\t%s (%s)\n",
324             proto_filter_name,
325             proto_ui_name);
326   }
327 }
328
329 /*
330  * The protocol_name_search structure is used by find_protocol_name_func()
331  * to pass parameters and store results
332  */
333 struct protocol_name_search{
334   gchar              *searched_name;  /* Protocol filter name we are looking for */
335   dissector_handle_t  matched_handle; /* Handle for a dissector whose protocol has the specified filter name */
336   guint               nb_match;       /* How many dissectors matched searched_name */
337 };
338 typedef struct protocol_name_search *protocol_name_search_t;
339
340 /*
341  * This function parses all dissectors associated with a table to find the
342  * one whose protocol has the specified filter name.  It is called
343  * as a reference function in a call to dissector_table_foreach_handle.
344  * The name we are looking for, as well as the results, are stored in the
345  * protocol_name_search struct pointed to by user_data.
346  * If called using dissector_table_foreach_handle, we actually parse the
347  * whole list of dissectors.
348  */
349 static void
350 find_protocol_name_func(const gchar *table _U_, gpointer handle, gpointer user_data)
351
352 {
353   int                         proto_id;
354   const gchar                *protocol_filter_name;
355   protocol_name_search_t      search_info;
356
357   g_assert(handle);
358
359   search_info = (protocol_name_search_t)user_data;
360
361   proto_id = dissector_handle_get_protocol_index((dissector_handle_t)handle);
362   if (proto_id != -1) {
363     protocol_filter_name = proto_get_protocol_filter_name(proto_id);
364     g_assert(protocol_filter_name != NULL);
365     if (strcmp(protocol_filter_name, search_info->searched_name) == 0) {
366       /* Found a match */
367       if (search_info->nb_match == 0) {
368         /* Record this handle only if this is the first match */
369         search_info->matched_handle = (dissector_handle_t)handle; /* Record the handle for this matching dissector */
370       }
371       search_info->nb_match++;
372     }
373   }
374 }
375
376 /*
377  * Print all layer type names supported.
378  * We send the output to the stream described by the handle output.
379  */
380
381 static void
382 fprint_all_layer_types(FILE *output)
383
384 {
385   dissector_all_tables_foreach_table(display_dissector_table_names, (gpointer)output);
386 }
387
388 /*
389  * Print all protocol names supported for a specific layer type.
390  * table_name contains the layer type name in which the search is performed.
391  * We send the output to the stream described by the handle output.
392  */
393
394 static void
395 fprint_all_protocols_for_layer_types(FILE *output, gchar *table_name)
396
397 {
398   dissector_table_foreach_handle(table_name,
399                                  display_dissector_names,
400                                  (gpointer)output);
401 }
402
403 /*
404  * The function below parses the command-line parameters for the decode as
405  * feature (a string pointer by cl_param).
406  * It checks the format of the command-line, searches for a matching table
407  * and dissector.  If a table/dissector match is not found, we display a
408  * summary of the available tables/dissectors (on stderr) and return FALSE.
409  * If everything is fine, we get the "Decode as" preference activated,
410  * then we return TRUE.
411  */
412 static gboolean
413 add_decode_as(const gchar *cl_param)
414 {
415   gchar                        *table_name;
416   guint32                       selector;
417   gchar                        *decoded_param;
418   gchar                        *remaining_param;
419   gchar                        *selector_str;
420   gchar                        *dissector_str;
421   dissector_handle_t            dissector_matching;
422   dissector_table_t             table_matching;
423   ftenum_t                      dissector_table_selector_type;
424   struct protocol_name_search   user_protocol_name;
425
426 /* The following code will allocate and copy the command-line options in a string pointed by decoded_param */
427
428   g_assert(cl_param);
429   decoded_param = g_malloc( sizeof(gchar) * (strlen(cl_param) + 1) ); /* Allocate enough space to have a working copy of the command-line parameter */
430   g_assert(decoded_param);
431   strcpy(decoded_param, cl_param);
432
433
434   /* The lines below will parse this string (modifying it) to extract all
435     necessary information.  Note that decoded_param is still needed since
436     strings are not copied - we just save pointers. */
437
438   /* This section extracts a layer type (table_name) from decoded_param */
439   table_name = decoded_param; /* Layer type string starts from beginning */
440
441   remaining_param = strchr(table_name, '=');
442   if (remaining_param == NULL) {
443     cmdarg_err("Parameter \"%s\" doesn't follow the template \"%s\"", cl_param, decode_as_arg_template);
444     /* If the argument does not follow the template, carry on anyway to check
445        if the table name is at least correct.  If remaining_param is NULL,
446        we'll exit anyway further down */
447   }
448   else {
449     *remaining_param = '\0'; /* Terminate the layer type string (table_name) where '=' was detected */
450   }
451
452   /* Remove leading and trailing spaces from the table name */
453   while ( table_name[0] == ' ' )
454     table_name++; 
455   while ( table_name[strlen(table_name) - 1] == ' ' )
456     table_name[strlen(table_name) - 1] = '\0'; /* Note: if empty string, while loop will eventually exit */
457
458 /* The following part searches a table matching with the layer type specified */
459   table_matching = NULL;
460
461 /* Look for the requested table */
462   if ( !(*(table_name)) ) { /* Is the table name empty, if so, don't even search for anything, display a message */
463     cmdarg_err("No layer type specified"); /* Note, we don't exit here, but table_matching will remain NULL, so we exit below */
464   }
465   else {
466     table_matching = find_dissector_table(table_name);
467     if (!table_matching) {
468       cmdarg_err("Unknown layer type -- %s", table_name); /* Note, we don't exit here, but table_matching will remain NULL, so we exit below */
469     }
470   }
471
472   if (!table_matching) {
473     /* Display a list of supported layer types to help the user, if the 
474        specified layer type was not found */
475     cmdarg_err("Valid layer types are:");
476     fprint_all_layer_types(stderr);
477   }
478   if (remaining_param == NULL || !table_matching) {
479     /* Exit if the layer type was not found, or if no '=' separator was found
480        (see above) */
481     g_free(decoded_param); 
482     return FALSE;
483   }
484   
485   if (*(remaining_param + 1) != '=') { /* Check for "==" and not only '=' */
486     cmdarg_err("WARNING: -d requires \"==\" instead of \"=\". Option will be treated as \"%s==%s\"", table_name, remaining_param + 1);
487   }
488   else {
489     remaining_param++; /* Move to the second '=' */
490     *remaining_param = '\0'; /* Remove the second '=' */
491   }
492   remaining_param++; /* Position after the layer type string */
493
494   /* This section extracts a selector value (selector_str) from decoded_param */
495
496   selector_str = remaining_param; /* Next part starts with the selector number */
497
498   remaining_param = strchr(selector_str, ',');
499   if (remaining_param == NULL) {
500     cmdarg_err("Parameter \"%s\" doesn't follow the template \"%s\"", cl_param, decode_as_arg_template);
501     /* If the argument does not follow the template, carry on anyway to check
502        if the selector value is at least correct.  If remaining_param is NULL,
503        we'll exit anyway further down */
504   }
505   else {
506     *remaining_param = '\0'; /* Terminate the selector number string (selector_str) where ',' was detected */
507   }
508
509   dissector_table_selector_type = get_dissector_table_selector_type(table_name);
510
511   switch (dissector_table_selector_type) {
512
513   case FT_UINT8:
514   case FT_UINT16:
515   case FT_UINT24:
516   case FT_UINT32:
517     /* The selector for this table is an unsigned number.  Parse it as such.
518        There's no need to remove leading and trailing spaces from the
519        selector number string, because sscanf will do that for us. */
520     if ( sscanf(selector_str, "%u", &selector) != 1 ) {
521       cmdarg_err("Invalid selector number \"%s\"", selector_str);
522       g_free(decoded_param);
523       return FALSE;
524     }
525     break;
526
527   case FT_STRING:
528   case FT_STRINGZ:
529     /* The selector for this table is a string. */
530     break;
531
532   default:
533     /* There are currently no dissector tables with any types other
534        than the ones listed above. */
535     g_assert_not_reached();
536   }
537
538   if (remaining_param == NULL) {
539     /* Exit if no ',' separator was found (see above) */
540     cmdarg_err("Valid protocols for layer type \"%s\" are:", table_name);
541     fprint_all_protocols_for_layer_types(stderr, table_name);
542     g_free(decoded_param); 
543     return FALSE;
544   }
545
546   remaining_param++; /* Position after the selector number string */
547
548   /* This section extracts a protocol filter name (dissector_str) from decoded_param */
549
550   dissector_str = remaining_param; /* All the rest of the string is the dissector (decode as protocol) name */
551   
552   /* Remove leading and trailing spaces from the dissector name */
553   while ( dissector_str[0] == ' ' )
554     dissector_str++; 
555   while ( dissector_str[strlen(dissector_str) - 1] == ' ' )
556     dissector_str[strlen(dissector_str) - 1] = '\0'; /* Note: if empty string, while loop will eventually exit */
557
558   dissector_matching = NULL;
559   
560   /* We now have a pointer to the handle for the requested table inside the variable table_matching */
561   if ( ! (*dissector_str) ) { /* Is the dissector name empty, if so, don't even search for a matching dissector and display all dissectors found for the selected table */
562     cmdarg_err("No protocol name specified"); /* Note, we don't exit here, but dissector_matching will remain NULL, so we exit below */
563   }
564   else {
565     user_protocol_name.nb_match = 0;
566     user_protocol_name.searched_name = dissector_str;
567     user_protocol_name.matched_handle = NULL;
568     
569     dissector_table_foreach_handle(table_name, find_protocol_name_func, &user_protocol_name); /* Go and perform the search for this dissector in the this table's dissectors' names and shortnames */
570     
571     if (user_protocol_name.nb_match != 0) {
572       dissector_matching = user_protocol_name.matched_handle;
573       if (user_protocol_name.nb_match > 1) {
574         cmdarg_err("WARNING: Protocol \"%s\" matched %u dissectors, first one will be used", dissector_str, user_protocol_name.nb_match);
575       }
576     }
577     else {
578       /* OK, check whether the problem is that there isn't any such
579          protocol, or that there is but it's not specified as a protocol
580          that's valid for that dissector table.
581          Note, we don't exit here, but dissector_matching will remain NULL,
582          so we exit below */
583       if (proto_get_id_by_filter_name(dissector_str) == -1) {
584         /* No such protocol */
585         cmdarg_err("Unknown protocol -- \"%s\"", dissector_str);
586       } else {
587         cmdarg_err("Protocol \"%s\" isn't valid for layer type \"%s\"",
588                 dissector_str, table_name);
589       }
590     }
591   }
592
593   if (!dissector_matching) {
594     cmdarg_err("Valid protocols for layer type \"%s\" are:", table_name);
595     fprint_all_protocols_for_layer_types(stderr, table_name);
596     g_free(decoded_param); 
597     return FALSE;
598   }
599
600 /* This is the end of the code that parses the command-line options.
601    All information is now stored in the variables:
602    table_name
603    selector
604    dissector_matching
605    The above variables that are strings are still pointing to areas within
606    decoded_parm.  decoded_parm thus still needs to be kept allocated in 
607    until we stop needing these variables
608    decoded_param will be deallocated at each exit point of this function */
609
610
611   /* We now have a pointer to the handle for the requested dissector
612      (requested protocol) inside the variable dissector_matching */
613   switch (dissector_table_selector_type) {
614
615   case FT_UINT8:
616   case FT_UINT16:
617   case FT_UINT24:
618   case FT_UINT32:
619     /* The selector for this table is an unsigned number. */
620     dissector_change(table_name, selector, dissector_matching);
621     break;
622
623   case FT_STRING:
624   case FT_STRINGZ:
625     /* The selector for this table is a string. */
626     dissector_change_string(table_name, selector_str, dissector_matching);
627     break;
628
629   default:
630     /* There are currently no dissector tables with any types other
631        than the ones listed above. */
632     g_assert_not_reached();
633   }
634   g_free(decoded_param); /* "Decode As" rule has been succesfully added */
635   return TRUE;
636 }
637
638 static void
639 log_func_ignore (const gchar *log_domain _U_, GLogLevelFlags log_level _U_,
640     const gchar *message _U_, gpointer user_data _U_)
641 {
642 }
643
644 static char *
645 output_file_description(const char *fname)
646 {
647   char *save_file_string;
648
649   /* Get a string that describes what we're writing to */
650   if (strcmp(fname, "-") == 0) {
651     /* We're writing to the standard output */
652     save_file_string = g_strdup("standard output");
653   } else {
654     /* We're writing to a file with the name in save_file */
655     save_file_string = g_strdup_printf("file \"%s\"", fname);
656   }
657   return save_file_string;
658 }
659
660 int
661 main(int argc, char *argv[])
662 {
663   int                  opt, i;
664   extern char         *optarg;
665   gboolean             arg_error = FALSE;
666
667 #ifdef _WIN32
668   WSADATA               wsaData;
669 #endif  /* _WIN32 */
670
671   char                *gpf_path, *pf_path;
672   char                *gdp_path, *dp_path;
673   int                  gpf_open_errno, gpf_read_errno;
674   int                  pf_open_errno, pf_read_errno;
675   int                  gdp_open_errno, gdp_read_errno;
676   int                  dp_open_errno, dp_read_errno;
677   int                  err;
678 #ifdef HAVE_LIBPCAP
679   gboolean             capture_filter_specified = FALSE;
680   gboolean             list_link_layer_types = FALSE;
681   gboolean             start_capture = FALSE;
682 #else
683   gboolean             capture_option_specified = FALSE;
684 #endif
685   gboolean             quiet = FALSE;
686   int                  out_file_type = WTAP_FILE_PCAP;
687   gchar               *cf_name = NULL, *rfilter = NULL;
688 #ifdef HAVE_PCAP_OPEN_DEAD
689   struct bpf_program   fcode;
690 #endif
691   dfilter_t           *rfcode = NULL;
692   e_prefs             *prefs;
693   char                 badopt;
694   GLogLevelFlags       log_flags;
695   int                  status;
696
697 #define OPTSTRING_INIT "a:b:c:d:Df:F:hi:lLnN:o:pqr:R:s:St:T:vVw:xX:y:z:"
698 #ifdef HAVE_LIBPCAP
699 #ifdef _WIN32
700 #define OPTSTRING_WIN32 "B:"
701 #else
702 #define OPTSTRING_WIN32 ""
703 #endif  /* _WIN32 */
704 #else
705 #define OPTSTRING_WIN32 ""
706 #endif  /* HAVE_LIBPCAP */
707
708   static const char    optstring[] = OPTSTRING_INIT OPTSTRING_WIN32;
709
710   /*
711    * Get credential information for later use.
712    */
713   get_credential_info();
714
715   /* nothing more than the standard GLib handler, but without a warning */
716   log_flags = 
717                     G_LOG_LEVEL_ERROR|
718                     G_LOG_LEVEL_CRITICAL|
719                     G_LOG_LEVEL_WARNING|
720                     G_LOG_LEVEL_MESSAGE|
721                     G_LOG_LEVEL_INFO|
722                     G_LOG_LEVEL_DEBUG|
723                     G_LOG_FLAG_FATAL|G_LOG_FLAG_RECURSION;
724
725   g_log_set_handler(NULL,
726                     log_flags,
727                     log_func_ignore, NULL /* user_data */);
728   g_log_set_handler(LOG_DOMAIN_CAPTURE_CHILD,
729                     log_flags,
730                     log_func_ignore, NULL /* user_data */);
731
732   /* initialize memory allocation subsystem */
733   ep_init_chunk();
734   se_init_chunk();
735   
736   initialize_funnel_ops();
737   
738 #ifdef HAVE_LIBPCAP
739   capture_opts_init(&capture_opts, NULL /* cfile */);
740 #endif
741
742   timestamp_set_type(TS_RELATIVE);
743   timestamp_set_precision(TS_PREC_AUTO);
744
745   /* Register all dissectors; we must do this before checking for the
746      "-G" flag, as the "-G" flag dumps information registered by the
747      dissectors, and we must do it before we read the preferences, in
748      case any dissectors register preferences. */
749   epan_init(PLUGIN_DIR,register_all_protocols,register_all_protocol_handoffs,
750             failure_message,open_failure_message,read_failure_message);
751
752   /* Register all tap listeners; we do this before we parse the arguments,
753      as the "-z" argument can specify a registered tap. */
754   
755   /* we register the plugin taps before the other taps because
756      stats_tree taps plugins will be registered as tap listeners
757      by stats_tree_stat.c and need to registered before that */
758 #ifdef HAVE_PLUGINS
759   register_all_plugin_tap_listeners();
760 #endif
761   register_all_tap_listeners();
762
763   /* Now register the preferences for any non-dissector modules.
764      We must do that before we read the preferences as well. */
765   prefs_register_modules();
766
767   /* If invoked with the "-G" flag, we dump out information based on
768      the argument to the "-G" flag; if no argument is specified,
769      for backwards compatibility we dump out a glossary of display
770      filter symbols.
771
772      XXX - we do this here, for now, to support "-G" with no arguments.
773      If none of our build or other processes uses "-G" with no arguments,
774      we can just process it with the other arguments. */
775   if (argc >= 2 && strcmp(argv[1], "-G") == 0) {
776     if (argc == 2)
777       proto_registrar_dump_fields(1);
778     else {
779       if (strcmp(argv[2], "fields") == 0)
780         proto_registrar_dump_fields(1);
781       else if (strcmp(argv[2], "fields2") == 0)
782         proto_registrar_dump_fields(2);
783       else if (strcmp(argv[2], "fields3") == 0)
784         proto_registrar_dump_fields(3);
785       else if (strcmp(argv[2], "protocols") == 0)
786         proto_registrar_dump_protocols();
787       else if (strcmp(argv[2], "values") == 0)
788         proto_registrar_dump_values();
789       else if (strcmp(argv[2], "decodes") == 0)
790         dissector_dump_decodes();
791       else if (strcmp(argv[2], "defaultprefs") == 0)
792         write_prefs(NULL);
793       else if (strcmp(argv[2], "currentprefs") == 0) {
794         read_prefs(&gpf_open_errno, &gpf_read_errno, &gpf_path,
795             &pf_open_errno, &pf_read_errno, &pf_path);
796         write_prefs(NULL);
797       } else {
798         cmdarg_err("Invalid \"%s\" option for -G flag", argv[2]);
799         exit(1);
800       }
801     }
802     exit(0);
803   }
804
805   /* Set the C-language locale to the native environment. */
806   setlocale(LC_ALL, "");
807
808   prefs = read_prefs(&gpf_open_errno, &gpf_read_errno, &gpf_path,
809                      &pf_open_errno, &pf_read_errno, &pf_path);
810   if (gpf_path != NULL) {
811     if (gpf_open_errno != 0) {
812       cmdarg_err("Can't open global preferences file \"%s\": %s.",
813               pf_path, strerror(gpf_open_errno));
814     }
815     if (gpf_read_errno != 0) {
816       cmdarg_err("I/O error reading global preferences file \"%s\": %s.",
817               pf_path, strerror(gpf_read_errno));
818     }
819   }
820   if (pf_path != NULL) {
821     if (pf_open_errno != 0) {
822       cmdarg_err("Can't open your preferences file \"%s\": %s.", pf_path,
823               strerror(pf_open_errno));
824     }
825     if (pf_read_errno != 0) {
826       cmdarg_err("I/O error reading your preferences file \"%s\": %s.",
827               pf_path, strerror(pf_read_errno));
828     }
829     g_free(pf_path);
830     pf_path = NULL;
831   }
832
833   /* Set the name resolution code's flags from the preferences. */
834   g_resolv_flags = prefs->name_resolve;
835
836   /* Read the disabled protocols file. */
837   read_disabled_protos_list(&gdp_path, &gdp_open_errno, &gdp_read_errno,
838                             &dp_path, &dp_open_errno, &dp_read_errno);
839   if (gdp_path != NULL) {
840     if (gdp_open_errno != 0) {
841       cmdarg_err("Could not open global disabled protocols file\n\"%s\": %s.",
842                  gdp_path, strerror(gdp_open_errno));
843     }
844     if (gdp_read_errno != 0) {
845       cmdarg_err("I/O error reading global disabled protocols file\n\"%s\": %s.",
846                  gdp_path, strerror(gdp_read_errno));
847     }
848     g_free(gdp_path);
849   }
850   if (dp_path != NULL) {
851     if (dp_open_errno != 0) {
852       cmdarg_err(
853         "Could not open your disabled protocols file\n\"%s\": %s.", dp_path,
854         strerror(dp_open_errno));
855     }
856     if (dp_read_errno != 0) {
857       cmdarg_err(
858         "I/O error reading your disabled protocols file\n\"%s\": %s.", dp_path,
859         strerror(dp_read_errno));
860     }
861     g_free(dp_path);
862   }
863
864 #ifdef _WIN32
865   /* Load Wpcap, if possible */
866   load_wpcap();
867 #endif
868
869   init_cap_file(&cfile);
870
871   /* Assemble the compile-time version information string */
872   comp_info_str = g_string_new("Compiled ");
873   get_compiled_version_info(comp_info_str);
874
875   /* Assemble the run-time version information string */
876   runtime_info_str = g_string_new("Running ");
877   get_runtime_version_info(runtime_info_str);
878
879   /* Print format defaults to this. */
880   print_format = PR_FMT_TEXT;
881
882   /* Now get our args */
883   while ((opt = getopt(argc, argv, optstring)) != -1) {
884     switch (opt) {
885       case 'a':        /* autostop criteria */
886       case 'b':        /* Ringbuffer option */
887       case 'c':        /* Capture xxx packets */
888       case 'f':        /* capture filter */
889       case 'i':        /* Use interface xxx */
890       case 'p':        /* Don't capture in promiscuous mode */
891       case 's':        /* Set the snapshot (capture) length */
892       case 'w':        /* Write to capture file xxx */
893       case 'y':        /* Set the pcap data link type */
894 #ifdef _WIN32
895       case 'B':        /* Buffer size */
896 #endif /* _WIN32 */
897 #ifdef HAVE_LIBPCAP
898         status = capture_opts_add_opt(&capture_opts, opt, optarg, &start_capture);
899         if(status != 0) {
900             exit(status);
901         }
902 #else
903         capture_option_specified = TRUE;
904         arg_error = TRUE;
905 #endif
906         break;
907       case 'd':        /* Decode as rule */
908         if (!add_decode_as(optarg))
909           exit(1);
910         break;
911       case 'D':        /* Print a list of capture devices and exit */
912 #ifdef HAVE_LIBPCAP
913         status = capture_opts_list_interfaces();
914         exit(status);
915 #else
916         capture_option_specified = TRUE;
917         arg_error = TRUE;
918 #endif
919         break;
920       case 'F':
921         out_file_type = wtap_short_string_to_file_type(optarg);
922         if (out_file_type < 0) {
923           cmdarg_err("\"%s\" isn't a valid capture file type", optarg);
924           list_capture_types();
925           exit(1);
926         }
927         break;
928       case 'h':        /* Print help and exit */
929         print_usage(TRUE);
930         exit(0);
931         break;
932       case 'l':        /* "Line-buffer" standard output */
933         /* This isn't line-buffering, strictly speaking, it's just
934            flushing the standard output after the information for
935            each packet is printed; however, that should be good
936            enough for all the purposes to which "-l" is put (and
937            is probably actually better for "-V", as it does fewer
938            writes).
939
940            See the comment in "process_packet()" for an explanation of
941            why we do that, and why we don't just use "setvbuf()" to
942            make the standard output line-buffered (short version: in
943            Windows, "line-buffered" is the same as "fully-buffered",
944            and the output buffer is only flushed when it fills up). */
945         line_buffered = TRUE;
946         break;
947       case 'L':        /* Print list of link-layer types and exit */
948 #ifdef HAVE_LIBPCAP
949         list_link_layer_types = TRUE;
950         break;
951 #else
952         capture_option_specified = TRUE;
953         arg_error = TRUE;
954 #endif
955         break;
956       case 'n':        /* No name resolution */
957         g_resolv_flags = RESOLV_NONE;
958         break;
959       case 'N':        /* Select what types of addresses/port #s to resolve */
960         if (g_resolv_flags == RESOLV_ALL)
961           g_resolv_flags = RESOLV_NONE;
962         badopt = string_to_name_resolve(optarg, &g_resolv_flags);
963         if (badopt != '\0') {
964           cmdarg_err("-N specifies unknown resolving option '%c'; valid options are 'm', 'n', and 't'",
965                      badopt);
966           exit(1);
967         }
968         break;
969       case 'o':        /* Override preference from command line */
970         switch (prefs_set_pref(optarg)) {
971
972         case PREFS_SET_SYNTAX_ERR:
973           cmdarg_err("Invalid -o flag \"%s\"", optarg);
974           exit(1);
975           break;
976
977         case PREFS_SET_NO_SUCH_PREF:
978         case PREFS_SET_OBSOLETE:
979           cmdarg_err("-o flag \"%s\" specifies unknown preference", optarg);
980           exit(1);
981           break;
982         }
983         break;
984       case 'q':        /* Quiet */
985         quiet = TRUE;
986         break;
987       case 'r':        /* Read capture file xxx */
988         cf_name = g_strdup(optarg);
989         break;
990       case 'R':        /* Read file filter */
991         rfilter = optarg;
992         break;
993       case 'S':        /* show packets in real time */
994         print_packet_info = TRUE;
995         break;
996       case 't':        /* Time stamp type */
997         if (strcmp(optarg, "r") == 0)
998           timestamp_set_type(TS_RELATIVE);
999         else if (strcmp(optarg, "a") == 0)
1000           timestamp_set_type(TS_ABSOLUTE);
1001         else if (strcmp(optarg, "ad") == 0)
1002           timestamp_set_type(TS_ABSOLUTE_WITH_DATE);
1003         else if (strcmp(optarg, "d") == 0)
1004           timestamp_set_type(TS_DELTA);
1005         else {
1006           cmdarg_err("Invalid time stamp type \"%s\"",
1007             optarg);
1008           cmdarg_err_cont("It must be \"r\" for relative, \"a\" for absolute,");
1009           cmdarg_err_cont("\"ad\" for absolute with date, or \"d\" for delta.");
1010           exit(1);
1011         }
1012         break;
1013       case 'T':        /* printing Type */
1014         if (strcmp(optarg, "text") == 0) {
1015           output_action = WRITE_TEXT;
1016           print_format = PR_FMT_TEXT;
1017         } else if (strcmp(optarg, "ps") == 0) {
1018           output_action = WRITE_TEXT;
1019           print_format = PR_FMT_PS;
1020         } else if (strcmp(optarg, "pdml") == 0) {
1021           output_action = WRITE_XML;
1022           verbose = TRUE;
1023         } else if (strcmp(optarg, "psml") == 0) {
1024           output_action = WRITE_XML;
1025           verbose = FALSE;
1026         } else {
1027           cmdarg_err("Invalid -T parameter.");
1028           cmdarg_err_cont("It must be \"ps\", \"text\", \"pdml\", or \"psml\".");
1029           exit(1);
1030         }
1031         break;
1032       case 'v':        /* Show version and exit */
1033         printf("Tethereal " VERSION "%s\n"
1034                "\n"
1035                "%s"
1036                "\n"
1037                "%s"
1038                "\n"
1039                "%s",
1040                svnversion, get_copyright_info(), comp_info_str->str,
1041                runtime_info_str->str);
1042         exit(0);
1043         break;
1044       case 'V':        /* Verbose */
1045         verbose = TRUE;
1046         break;
1047       case 'x':        /* Print packet data in hex (and ASCII) */
1048           print_hex = TRUE;
1049           break;
1050       case 'X':
1051           ex_opt_add(optarg);
1052           break;
1053       case 'z':
1054         /* We won't call the init function for the stat this soon
1055            as it would disallow MATE's fields (which are registered
1056            by the preferences set callback) from being used as
1057            part of a tap filter.  Instead, we just add the argument
1058            to a list of stat arguments. */
1059         if (!process_stat_cmd_arg(optarg)) {
1060           cmdarg_err("invalid -z argument.");
1061           cmdarg_err_cont("  -z argument must be one of :");
1062           list_stat_cmd_args();
1063           exit(1);
1064         }
1065         break;
1066       default:
1067       case '?':        /* Bad flag - print usage message */
1068         switch(optopt) {
1069         case'F':
1070           list_capture_types();
1071           break;
1072         default:
1073           print_usage(TRUE);
1074         }
1075         exit(1);
1076         break;
1077     }
1078   }
1079
1080   /* If no capture filter or read filter has been specified, and there are
1081      still command-line arguments, treat them as the tokens of a capture
1082      filter (if no "-r" flag was specified) or a read filter (if a "-r"
1083      flag was specified. */
1084   if (optind < argc) {
1085     if (cf_name != NULL) {
1086       if (rfilter != NULL) {
1087         cmdarg_err("Read filters were specified both with \"-R\" "
1088             "and with additional command-line arguments");
1089         exit(1);
1090       }
1091       rfilter = get_args_as_string(argc, argv, optind);
1092     } else {
1093 #ifdef HAVE_LIBPCAP
1094       if (capture_filter_specified) {
1095         cmdarg_err("Capture filters were specified both with \"-f\""
1096             " and with additional command-line arguments");
1097         exit(1);
1098       }
1099       capture_opts.cfilter = get_args_as_string(argc, argv, optind);
1100 #else
1101       capture_option_specified = TRUE;
1102 #endif
1103     }
1104   }
1105
1106   if (!capture_opts.saving_to_file) {
1107     /* We're not saving the capture to a file; if "-q" wasn't specified,
1108        we should print packet information */
1109     if (!quiet)
1110       print_packet_info = TRUE;
1111   } else {
1112     /* We're saving to a file; if we're writing to the standard output.
1113        and we'll also be writing dissected packets to the standard
1114        output, reject the request.  At best, we could redirect that
1115        to the standard error; we *can't* write both to the standard
1116        output and have either of them be useful. */
1117     if (strcmp(capture_opts.save_file, "-") == 0 && print_packet_info) {
1118       cmdarg_err("You can't write both raw packet data and dissected packets"
1119           " to the standard output.");
1120       exit(1);
1121     }
1122   }
1123
1124 #ifndef HAVE_LIBPCAP
1125   if (capture_option_specified)
1126     cmdarg_err("This version of Tethereal was not built with support for capturing packets.");
1127 #endif
1128   if (arg_error) {
1129     print_usage(FALSE);
1130     exit(1);
1131   }
1132
1133   /* We don't support capture filters when reading from a capture file
1134      (the BPF compiler doesn't support all link-layer types that we
1135      support in capture files we read). */
1136 #ifdef HAVE_LIBPCAP
1137   if (cf_name != NULL) {
1138     if (capture_filter_specified) {
1139       cmdarg_err("Only read filters, not capture filters, "
1140           "can be specified when reading a capture file.");
1141       exit(1);
1142     }
1143   }
1144 #endif
1145
1146   if (print_hex) {
1147     if (output_action != WRITE_TEXT) {
1148       cmdarg_err("Raw packet hex data can only be printed as text or PostScript");
1149       exit(1);
1150     }
1151   }
1152
1153 #ifdef HAVE_LIBPCAP
1154   if (list_link_layer_types) {
1155     /* We're supposed to list the link-layer types for an interface;
1156        did the user also specify a capture file to be read? */
1157     if (cf_name) {
1158       /* Yes - that's bogus. */
1159       cmdarg_err("You can't specify -L and a capture file to be read.");
1160       exit(1);
1161     }
1162     /* No - did they specify a ring buffer option? */
1163     if (capture_opts.multi_files_on) {
1164       cmdarg_err("Ring buffer requested, but a capture isn't being done.");
1165       exit(1);
1166     }
1167   } else {
1168     /* If they didn't specify a "-w" flag, but specified a maximum capture
1169        file size, tell them that this doesn't work, and exit. */
1170     if (capture_opts.has_autostop_filesize && capture_opts.save_file == NULL) {
1171       cmdarg_err("Maximum capture file size specified, but "
1172         "capture isn't being saved to a file.");
1173       exit(1);
1174     }
1175
1176     if (cf_name) {
1177       /*
1178        * "-r" was specified, so we're reading a capture file.
1179        * Capture options don't apply here.
1180        */
1181       if (capture_opts.multi_files_on) {
1182         cmdarg_err("Multiple capture files requested, but "
1183                    "a capture isn't being done.");
1184         exit(1);
1185       }
1186       if (capture_opts.has_file_duration) {
1187         cmdarg_err("Switching capture files after a time interval was specified, but "
1188                    "a capture isn't being done.");
1189         exit(1);
1190       }
1191       if (capture_opts.has_ring_num_files) {
1192         cmdarg_err("A ring buffer of capture files was specified, but "
1193           "a capture isn't being done.");
1194         exit(1);
1195       }
1196       if (capture_opts.has_autostop_files) {
1197         cmdarg_err("A maximum number of capture files was specified, but "
1198           "a capture isn't being done.");
1199         exit(1);
1200       }
1201       if (capture_opts.has_autostop_packets) {
1202         cmdarg_err("A maximum number of captured packets was specified, but "
1203           "a capture isn't being done.");
1204         exit(1);
1205       }
1206       if (capture_opts.has_autostop_filesize) {
1207         cmdarg_err("A maximum capture file size was specified, but "
1208           "a capture isn't being done.");
1209         exit(1);
1210       }
1211       if (capture_opts.has_autostop_duration) {
1212         cmdarg_err("A maximum capture time was specified, but "
1213           "a capture isn't being done.");
1214         exit(1);
1215       }
1216     } else {
1217       /*
1218        * "-r" wasn't specified, so we're doing a live capture.
1219        */
1220       if (capture_opts.saving_to_file) {
1221         /* They specified a "-w" flag, so we'll be saving to a capture file. */
1222   
1223         /* When capturing, we only support writing libpcap format. */
1224         if (out_file_type != WTAP_FILE_PCAP) {
1225           cmdarg_err("Live captures can only be saved in libpcap format.");
1226           exit(1);
1227         }
1228         if (capture_opts.multi_files_on) {
1229           /* Multiple-file mode works only under certain conditions:
1230              a) it doesn't work if you're writing to the standard output;
1231              b) it doesn't work if you're writing to a pipe;
1232              c) it makes no sense if the maximum file size is set to "infinite"
1233                 (XXX - shouldn't that be "if there is no stop criterion",
1234                 as you might want to switch files based on a packet count
1235                 or a time). */
1236           if (strcmp(capture_opts.save_file, "-") == 0) {
1237             cmdarg_err("Multiple capture files requested, but "
1238               "the capture is being written to the standard output.");
1239             exit(1);
1240           }
1241           if (capture_opts.output_to_pipe) {
1242             cmdarg_err("Multiple capture files requested, but "
1243               "the capture file is a pipe.");
1244             exit(1);
1245           }
1246           if (!capture_opts.has_autostop_filesize) {
1247             cmdarg_err("Multiple capture files requested, but "
1248               "no maximum capture file size was specified.");
1249             exit(1);
1250           }
1251         }
1252       } else {
1253         /* They didn't specify a "-w" flag, so we won't be saving to a
1254            capture file.  Check for options that only make sense if
1255            we're saving to a file. */
1256         if (capture_opts.has_autostop_filesize) {
1257           cmdarg_err("Maximum capture file size specified, but "
1258            "capture isn't being saved to a file.");
1259           exit(1);
1260         }
1261         if (capture_opts.multi_files_on) {
1262           cmdarg_err("Multiple capture files requested, but "
1263             "the capture isn't being saved to a file.");
1264           exit(1);
1265         }
1266       }
1267     }
1268   }
1269 #endif
1270
1271 #ifdef _WIN32
1272   /* Start windows sockets */
1273   WSAStartup( MAKEWORD( 1, 1 ), &wsaData );
1274 #endif /* _WIN32 */
1275
1276   /* Notify all registered modules that have had any of their preferences
1277      changed either from one of the preferences file or from the command
1278      line that their preferences have changed. */
1279   prefs_apply_all();
1280
1281   /* At this point MATE will have registered its field array so we can
1282      have a tap filter with one of MATE's late-registered fields as part
1283      of the filter.  We can now process all the "-z" arguments. */
1284   start_requested_stats();
1285   
1286   /* disabled protocols as per configuration file */
1287   if (gdp_path == NULL && dp_path == NULL) {
1288     set_disabled_protos_list();
1289   }
1290
1291   /* Build the column format array */
1292   col_setup(&cfile.cinfo, prefs->num_cols);
1293   for (i = 0; i < cfile.cinfo.num_cols; i++) {
1294     cfile.cinfo.col_fmt[i] = get_column_format(i);
1295     cfile.cinfo.col_title[i] = g_strdup(get_column_title(i));
1296     cfile.cinfo.fmt_matx[i] = (gboolean *) g_malloc0(sizeof(gboolean) *
1297       NUM_COL_FMTS);
1298     get_column_format_matches(cfile.cinfo.fmt_matx[i], cfile.cinfo.col_fmt[i]);
1299     cfile.cinfo.col_data[i] = NULL;
1300     if (cfile.cinfo.col_fmt[i] == COL_INFO)
1301       cfile.cinfo.col_buf[i] = (gchar *) g_malloc(sizeof(gchar) * COL_MAX_INFO_LEN);
1302     else
1303       cfile.cinfo.col_buf[i] = (gchar *) g_malloc(sizeof(gchar) * COL_MAX_LEN);
1304     cfile.cinfo.col_fence[i] = 0;
1305     cfile.cinfo.col_expr[i] = (gchar *) g_malloc(sizeof(gchar) * COL_MAX_LEN);
1306     cfile.cinfo.col_expr_val[i] = (gchar *) g_malloc(sizeof(gchar) * COL_MAX_LEN);
1307   }
1308
1309   for (i = 0; i < cfile.cinfo.num_cols; i++) {
1310       int j;
1311
1312       for (j = 0; j < NUM_COL_FMTS; j++) {
1313          if (!cfile.cinfo.fmt_matx[i][j])
1314              continue;
1315          
1316          if (cfile.cinfo.col_first[j] == -1)
1317              cfile.cinfo.col_first[j] = i;
1318          cfile.cinfo.col_last[j] = i;
1319       }
1320   }
1321
1322 #ifdef HAVE_LIBPCAP
1323   capture_opts_trim_snaplen(&capture_opts, MIN_PACKET_SIZE);
1324   capture_opts_trim_ring_num_files(&capture_opts);
1325 #endif
1326
1327   if (rfilter != NULL) {
1328     if (!dfilter_compile(rfilter, &rfcode)) {
1329       cmdarg_err("%s", dfilter_error_msg);
1330       epan_cleanup();
1331 #ifdef HAVE_PCAP_OPEN_DEAD
1332       {
1333         pcap_t *pc;
1334
1335         pc = pcap_open_dead(DLT_EN10MB, MIN_PACKET_SIZE);
1336         if (pc != NULL) {
1337           if (pcap_compile(pc, &fcode, rfilter, 0, 0) != -1) {
1338             cmdarg_err_cont(
1339               "  Note: That display filter code looks like a valid capture filter;");
1340             cmdarg_err_cont(
1341               "        maybe you mixed them up?");
1342           }
1343           pcap_close(pc);
1344         }
1345       }
1346 #endif
1347       exit(2);
1348     }
1349   }
1350   cfile.rfcode = rfcode;
1351
1352   if (print_packet_info) {
1353     /* If we're printing as text or PostScript, we have
1354        to create a print stream. */
1355     if (output_action == WRITE_TEXT) {
1356       switch (print_format) {
1357
1358       case PR_FMT_TEXT:
1359         print_stream = print_stream_text_stdio_new(stdout);
1360         break;
1361
1362       case PR_FMT_PS:
1363         print_stream = print_stream_ps_stdio_new(stdout);
1364         break;
1365
1366       default:
1367         g_assert_not_reached();
1368       }
1369     }
1370   }
1371
1372   /* We have to dissect each packet if:
1373
1374         we're printing information about each packet;
1375
1376         we're using a read filter on the packets;
1377
1378         we're using any taps. */
1379   do_dissection = print_packet_info || rfcode || have_tap_listeners();
1380
1381   if (cf_name) {
1382     /*
1383      * We're reading a capture file.
1384      */
1385
1386     /*
1387      * Immediately relinquish any special privileges we have; we must not
1388      * be allowed to read any capture files the user running Tethereal
1389      * can't open.
1390      */
1391     relinquish_special_privs_perm();
1392
1393     if (cf_open(&cfile, cf_name, FALSE, &err) != CF_OK) {
1394       epan_cleanup();
1395       exit(2);
1396     }
1397
1398     /* Set timestamp precision; there should arguably be a command-line
1399        option to let the user set this. */
1400     switch(wtap_file_tsprecision(cfile.wth)) {
1401     case(WTAP_FILE_TSPREC_SEC):
1402       timestamp_set_precision(TS_PREC_AUTO_SEC);
1403       break;
1404     case(WTAP_FILE_TSPREC_DSEC):
1405       timestamp_set_precision(TS_PREC_AUTO_DSEC);
1406       break;
1407     case(WTAP_FILE_TSPREC_CSEC):
1408       timestamp_set_precision(TS_PREC_AUTO_CSEC);
1409       break;
1410     case(WTAP_FILE_TSPREC_MSEC):
1411       timestamp_set_precision(TS_PREC_AUTO_MSEC);
1412       break;
1413     case(WTAP_FILE_TSPREC_USEC):
1414       timestamp_set_precision(TS_PREC_AUTO_USEC);
1415       break;
1416     case(WTAP_FILE_TSPREC_NSEC):
1417       timestamp_set_precision(TS_PREC_AUTO_NSEC);
1418       break;
1419     default:
1420       g_assert_not_reached();
1421     }
1422
1423     /* Process the packets in the file */
1424     err = load_cap_file(&cfile, capture_opts.save_file, out_file_type);
1425     if (err != 0) {
1426       epan_cleanup();
1427       exit(2);
1428     }
1429     cf_name[0] = '\0';
1430   } else {
1431     /* No capture file specified, so we're supposed to do a live capture
1432        (or get a list of link-layer types for a live capture device);
1433        do we have support for live captures? */
1434 #ifdef HAVE_LIBPCAP
1435
1436 #ifdef _WIN32
1437     if (!has_wpcap) {
1438       char *detailed_err;
1439
1440       cmdarg_err("WinPcap couldn't be found.");
1441       detailed_err = cant_load_winpcap_err("Tethereal");
1442       cmdarg_err_cont("%s", detailed_err);
1443       g_free(detailed_err);
1444       exit(2);
1445     }
1446 #endif
1447
1448     /* trim the interface name and exit if that failed */
1449     if (!capture_opts_trim_iface(&capture_opts, 
1450         (prefs->capture_device) ? get_if_name(prefs->capture_device) : NULL)) {
1451         exit(2);
1452     }
1453
1454     /* if requested, list the link layer types and exit */
1455     if (list_link_layer_types) {
1456         status = capture_opts_list_link_layer_types(&capture_opts);
1457         exit(status);
1458     }
1459
1460     if (!print_packet_info && !quiet) {
1461       /*
1462        * We're not printing information for each packet, and the user
1463        * didn't ask us not to print a count of packets as they arrive,
1464        * so print that count so the user knows that packets are arriving.
1465        *
1466        * XXX - what if the user wants to do a live capture, doesn't want
1467        * to save it to a file, doesn't want information printed for each
1468        * packet, does want some "-z" statistic, and wants packet counts
1469        * so they know whether they're seeing any packets?
1470        */
1471       print_packet_counts = TRUE;
1472     }
1473
1474     /* For now, assume libpcap gives microsecond precision. */
1475     timestamp_set_precision(TS_PREC_AUTO_USEC);
1476
1477     capture();
1478
1479     if (capture_opts.multi_files_on) {
1480       ringbuf_free();
1481     }
1482 #else
1483     /* No - complain. */
1484     cmdarg_err("This version of Tethereal was not built with support for capturing packets.");
1485     exit(2);
1486 #endif
1487   }
1488
1489   draw_tap_listeners(TRUE);
1490   funnel_dump_all_text_windows();
1491   epan_cleanup();
1492
1493   return 0;
1494 }
1495
1496 #ifdef HAVE_LIBPCAP
1497 /* Do the low-level work of a capture.
1498    Returns TRUE if it succeeds, FALSE otherwise. */
1499
1500 static condition  *volatile cnd_file_duration = NULL; /* this must be visible in process_packet */
1501
1502 static int
1503 capture(void)
1504 {
1505   int         err = 0;
1506   int         volatile volatile_err = 0;
1507   int         volatile inpkts = 0;
1508   int         pcap_cnt;
1509   condition  *volatile cnd_autostop_size = NULL;
1510   condition  *volatile cnd_autostop_duration = NULL;
1511   char       *descr;
1512 #ifndef _WIN32
1513   void        (*oldhandler)(int);
1514   guchar pcap_data[WTAP_MAX_PACKET_SIZE];
1515 #endif
1516   struct pcap_stat stats;
1517   gboolean    write_ok;
1518   gboolean    close_ok;
1519   gboolean    cfilter_error = FALSE;
1520   char        errmsg[1024+1];
1521   char        secondary_errmsg[4096+1];
1522   int         save_file_fd;
1523
1524   /* Initialize all data structures used for dissection. */
1525   init_dissection();
1526
1527   ld.wtap_linktype  = WTAP_ENCAP_UNKNOWN;
1528   ld.pdh            = NULL;
1529   ld.packet_cb      = capture_pcap_cb;
1530
1531
1532   /* open the "input file" from network interface or capture pipe */
1533   if (!capture_loop_open_input(&capture_opts, &ld, errmsg, sizeof(errmsg),
1534                                secondary_errmsg, sizeof(secondary_errmsg))) {
1535     goto error;
1536   }
1537
1538   /*
1539    * We've opened the capture device, so we shouldn't need any special
1540    * privileges any more; relinquish those privileges.
1541    *
1542    * XXX - if we have saved set-user-ID support, we should give up those
1543    * privileges immediately, and then reclaim them long enough to get
1544    * a list of network interfaces and to open one, and then give them
1545    * up again, so that stuff we do while processing the argument list,
1546    * reading the user's preferences, loading and starting plugins
1547    * (especially *user* plugins), etc. is done with the user's privileges,
1548    * not special privileges.
1549    */
1550   relinquish_special_privs_perm();
1551
1552   /* init the input filter from the network interface (capture pipe will do nothing) */
1553   switch (capture_loop_init_filter(ld.pcap_h, ld.from_cap_pipe, capture_opts.iface, capture_opts.cfilter)) {
1554
1555   case INITFILTER_NO_ERROR:
1556     break;
1557
1558   case INITFILTER_BAD_FILTER:
1559     cfilter_error = TRUE;
1560     g_snprintf(errmsg, sizeof(errmsg), "%s", pcap_geterr(ld.pcap_h));
1561     *secondary_errmsg = '\0';
1562     goto error;
1563
1564   case INITFILTER_OTHER_ERROR:
1565     g_snprintf(errmsg, sizeof(errmsg), "Can't install filter (%s).",
1566                pcap_geterr(ld.pcap_h));
1567     g_snprintf(secondary_errmsg, sizeof(secondary_errmsg), "%s", please_report);
1568     goto error;
1569   }
1570
1571   if (capture_opts.saving_to_file) {
1572     /* open the output file (temporary/specified name/ringbuffer/named pipe/stdout) */
1573     if (!capture_loop_open_output(&capture_opts, &save_file_fd, errmsg, sizeof(errmsg))) {
1574       *secondary_errmsg = '\0';
1575       goto error;    
1576     }
1577
1578     /* set up to write to the already-opened capture output file/files */
1579     if(!capture_loop_init_output(&capture_opts, save_file_fd, &ld, errmsg, sizeof errmsg)) {
1580       *secondary_errmsg = '\0';
1581       goto error;
1582     }
1583
1584     /* Save the capture file name. */
1585     ld.save_file = capture_opts.save_file;
1586   }
1587
1588   ld.wtap_linktype = wtap_pcap_encap_to_wtap_encap(ld.linktype);
1589
1590 #ifdef _WIN32
1591   /* Catch a CTRL+C event and, if we get it, clean up and exit. */
1592   SetConsoleCtrlHandler(capture_cleanup, TRUE);
1593 #else /* _WIN32 */
1594   /* Catch SIGINT and SIGTERM and, if we get either of them, clean up
1595      and exit.
1596      XXX - deal with signal semantics on various UNIX platforms.  Or just
1597      use "sigaction()" and be done with it? */
1598   signal(SIGTERM, capture_cleanup);
1599   signal(SIGINT, capture_cleanup);
1600   if ((oldhandler = signal(SIGHUP, capture_cleanup)) != SIG_DFL)
1601     signal(SIGHUP, oldhandler);
1602
1603 #ifdef SIGINFO
1604   /* Catch SIGINFO and, if we get it and we're capturing to a file in
1605      quiet mode, report the number of packets we've captured. */
1606   signal(SIGINFO, report_counts_siginfo);
1607 #endif /* SIGINFO */
1608 #endif /* _WIN32 */
1609
1610   /* Let the user know what interface was chosen. */
1611   descr = get_interface_descriptive_name(capture_opts.iface);
1612   fprintf(stderr, "Capturing on %s\n", descr);
1613   g_free(descr);
1614
1615   /* initialize capture stop conditions */
1616   init_capture_stop_conditions();
1617   /* create stop conditions */
1618   if (capture_opts.has_autostop_filesize)
1619     cnd_autostop_size = cnd_new((const char*)CND_CLASS_CAPTURESIZE,
1620                                    (long)capture_opts.autostop_filesize * 1024);
1621   if (capture_opts.has_autostop_duration)
1622     cnd_autostop_duration = cnd_new((const char*)CND_CLASS_TIMEOUT,
1623                                (gint32)capture_opts.autostop_duration);
1624
1625   if (capture_opts.multi_files_on && capture_opts.has_file_duration)
1626     cnd_file_duration = cnd_new(CND_CLASS_TIMEOUT, capture_opts.file_duration);
1627
1628   if (!setjmp(ld.stopenv)) {
1629     ld.go = TRUE;
1630     ld.packet_count = 0;
1631   } else
1632     ld.go = FALSE;
1633
1634   while (ld.go) {
1635     /* We need to be careful with automatic variables defined in the
1636        outer scope which are changed inside the loop.  Most compilers
1637        don't try to roll them back to their original values after the
1638        longjmp which causes the loop to finish, but all that the
1639        standards say is that their values are indeterminate.  If we
1640        don't want them to be rolled back, we should define them with the
1641        volatile attribute (paraphrasing W. Richard Stevens, Advanced
1642        Programming in the UNIX Environment, p. 178).
1643
1644        The "err" variable causes a particular problem.  If we give it
1645        the volatile attribute, then when we pass a reference to it (as
1646        in "&err") to a function, GCC warns: "passing arg <n> of
1647        <function> discards qualifiers from pointer target type".
1648        Therefore within the loop and just beyond we don't use "err".
1649        Within the loop we define "loop_err", and assign its value to
1650        "volatile_err", which is in the outer scope and is checked when
1651        the loop finishes.
1652
1653        We also define "packet_count_prev" here to keep things tidy,
1654        since it's used only inside the loop.  If it were defined in the
1655        outer scope, GCC would give a warning (unnecessary in this case)
1656        that it might be clobbered, and we'd need to give it the volatile
1657        attribute to suppress the warning. */
1658
1659     int loop_err = 0;
1660     int packet_count_prev = 0;
1661
1662     if (cnd_autostop_size == NULL && cnd_autostop_duration == NULL) {
1663       /* We're not stopping at a particular capture file size, and we're
1664          not stopping after some particular amount of time has expired,
1665          so either we have no stop condition or the only stop condition
1666          is a maximum packet count.
1667
1668          If there's no maximum packet count, pass it -1, meaning "until
1669          you run out of packets in the bufferful you read".  Otherwise,
1670          pass it the number of packets we have left to capture.
1671
1672          We don't call "pcap_loop()" as, if we're saving to a file that's
1673          a FIFO, we want to flush the FIFO after we're done processing
1674          this libpcap bufferful of packets, so that the program
1675          reading the FIFO sees the packets immediately and doesn't get
1676          any partial packet, forcing it to block in the middle of reading
1677          that packet. */
1678       if (capture_opts.autostop_packets == 0)
1679         pcap_cnt = -1;
1680       else {
1681         if (ld.packet_count >= capture_opts.autostop_packets) {
1682           /* XXX do we need this test here? */
1683           /* It appears there's nothing more to capture. */
1684           break;
1685         }
1686         pcap_cnt = capture_opts.autostop_packets - ld.packet_count;
1687       }
1688     } else {
1689       /* We need to check the capture file size or the timeout after
1690          each packet. */
1691       pcap_cnt = 1;
1692     }
1693 #ifndef _WIN32
1694     if (ld.from_cap_pipe) {
1695       inpkts = cap_pipe_dispatch(&ld, pcap_data, errmsg, sizeof errmsg);
1696     } else
1697 #endif
1698       inpkts = pcap_dispatch(ld.pcap_h, pcap_cnt, ld.packet_cb, (u_char *) &ld);
1699     if (inpkts < 0) {
1700       /* Error from "pcap_dispatch()", or error or "no more packets" from
1701          "cap_pipe_dispatch(). */
1702       ld.go = FALSE;
1703     } else if (cnd_autostop_duration != NULL && cnd_eval(cnd_autostop_duration)) {
1704       /* The specified capture time has elapsed; stop the capture. */
1705       ld.go = FALSE;
1706     } else if (inpkts > 0) {
1707       if (capture_opts.autostop_packets != 0 &&
1708                  ld.packet_count >= capture_opts.autostop_packets) {
1709         /* The specified number of packets have been captured and have
1710            passed both any capture filter in effect and any read filter
1711            in effect. */
1712         ld.go = FALSE;
1713       } else if (cnd_autostop_size != NULL &&
1714                     cnd_eval(cnd_autostop_size, (guint32)ld.bytes_written)) {
1715         /* We're saving the capture to a file, and the capture file reached
1716            its maximum size. */
1717         if (capture_opts.multi_files_on) {
1718           /* Switch to the next ringbuffer file */
1719           if (ringbuf_switch_file(&ld.pdh, &capture_opts.save_file, &save_file_fd, &loop_err)) {
1720             /* File switch succeeded: reset the condition */
1721             cnd_reset(cnd_autostop_size);
1722             if (cnd_file_duration) {
1723               cnd_reset(cnd_file_duration);
1724             }
1725           } else {
1726             /* File switch failed: stop here */
1727             volatile_err = loop_err;
1728             ld.go = FALSE;
1729           }
1730         } else {
1731           /* No ringbuffer - just stop. */
1732           ld.go = FALSE;
1733         }
1734       }
1735       if (capture_opts.output_to_pipe) {
1736         if (ld.packet_count > packet_count_prev) {
1737           libpcap_dump_flush(ld.pdh, NULL);
1738           packet_count_prev = ld.packet_count;
1739         }
1740       }
1741     } /* inpkts > 0 */
1742   } /* while (ld.go) */
1743
1744   /* delete stop conditions */
1745   if (cnd_autostop_size != NULL)
1746     cnd_delete(cnd_autostop_size);
1747   if (cnd_autostop_duration != NULL)
1748     cnd_delete(cnd_autostop_duration);
1749   if (cnd_file_duration != NULL)
1750     cnd_delete(cnd_file_duration);
1751
1752   if (print_packet_counts) {
1753     /* We're printing packet counts to stderr.
1754        Send a newline so that we move to the line after the packet count. */
1755     fprintf(stderr, "\n");
1756   }
1757
1758   /* If we got an error while capturing, report it. */
1759   if (inpkts < 0) {
1760 #ifndef _WIN32
1761     if (ld.from_cap_pipe) {
1762       if (ld.cap_pipe_err == PIPERR) {
1763         cmdarg_err("Error while capturing packets: %s", errmsg);
1764       }
1765     } else
1766 #endif
1767     {
1768       cmdarg_err("Error while capturing packets: %s", pcap_geterr(ld.pcap_h));
1769     }
1770   }
1771
1772   if (volatile_err == 0)
1773     write_ok = TRUE;
1774   else {
1775     show_capture_file_io_error(capture_opts.save_file, volatile_err, FALSE);
1776     write_ok = FALSE;
1777   }
1778
1779   if (capture_opts.save_file != NULL) {
1780     /* We're saving to a file or files; close all files. */
1781     close_ok = capture_loop_close_output(&capture_opts, &ld, &err);
1782
1783     /* If we've displayed a message about a write error, there's no point
1784        in displaying another message about an error on close. */
1785     if (!close_ok && write_ok)
1786       show_capture_file_io_error(capture_opts.save_file, err, TRUE);
1787   }
1788
1789 #ifndef _WIN32
1790   if (ld.from_cap_pipe && ld.cap_pipe_fd >= 0)
1791     eth_close(ld.cap_pipe_fd);
1792   else
1793 #endif
1794   {
1795     /* Get the capture statistics, and, if any packets were dropped, report
1796        that. */
1797     if (pcap_stats(ld.pcap_h, &stats) >= 0) {
1798       if (stats.ps_drop != 0) {
1799         fprintf(stderr, "%u packets dropped\n", stats.ps_drop);
1800       }
1801     } else {
1802       cmdarg_err("Can't get packet-drop statistics: %s", pcap_geterr(ld.pcap_h));
1803     }
1804     pcap_close(ld.pcap_h);
1805   }
1806
1807   /* Report the number of captured packets if not reported during capture
1808      and we are saving to a file. */
1809   report_counts();
1810
1811   return TRUE;
1812
1813 error:
1814   if (capture_opts.multi_files_on) {
1815     ringbuf_error_cleanup();
1816   }
1817   g_free(capture_opts.save_file);
1818   capture_opts.save_file = NULL;
1819   if (cfilter_error) {
1820     dfilter_t   *rfcode = NULL;
1821     if (dfilter_compile(capture_opts.cfilter, &rfcode) && rfcode != NULL) {
1822       cmdarg_err(
1823         "Invalid capture filter: \"%s\"!\n"
1824         "\n"
1825         "That string looks like a valid display filter; however, it isn't a valid\n"
1826         "capture filter (%s).\n"
1827         "\n"
1828         "Note that display filters and capture filters don't have the same syntax,\n"
1829         "so you can't use most display filter expressions as capture filters.\n"
1830         "\n"
1831         "See the User's Guide for a description of the capture filter syntax.",
1832         capture_opts.cfilter, errmsg);
1833       dfilter_free(rfcode);
1834     } else {
1835       cmdarg_err(
1836         "Invalid capture filter: \"%s\"!\n"
1837         "\n"
1838         "That string isn't a valid capture filter (%s).\n"
1839         "See the User's Guide for a description of the capture filter syntax.",
1840         capture_opts.cfilter, errmsg);
1841     }
1842   } else {
1843     cmdarg_err("%s", errmsg);
1844     if (*secondary_errmsg != '\0') {
1845       fprintf(stderr, "\n");
1846       cmdarg_err_cont("%s", secondary_errmsg);
1847     }
1848   }
1849 #ifndef _WIN32
1850   if (ld.from_cap_pipe) {
1851     if (ld.cap_pipe_fd >= 0)
1852       eth_close(ld.cap_pipe_fd);
1853   } else
1854 #endif
1855   {
1856   if (ld.pcap_h != NULL)
1857     pcap_close(ld.pcap_h);
1858   }
1859
1860   return FALSE;
1861 }
1862
1863 static void
1864 capture_pcap_cb(u_char *user, const struct pcap_pkthdr *phdr,
1865   const u_char *pd)
1866 {
1867   struct wtap_pkthdr whdr;
1868   union wtap_pseudo_header pseudo_header;
1869   const guchar *wtap_pd;
1870   loop_data *ld = (loop_data *) user;
1871   int loop_err;
1872   int err;
1873   int save_file_fd;
1874   gboolean packet_accepted;
1875
1876 #ifdef SIGINFO
1877   /*
1878    * Prevent a SIGINFO handler from writing to stdout while we're
1879    * doing so; instead, have it just set a flag telling us to print
1880    * that information when we're done.
1881    */
1882   infodelay = TRUE;
1883 #endif /* SIGINFO */
1884
1885   /* The current packet may have arrived after a very long silence,
1886    * way past the time to switch files.  In order not to have
1887    * the first packet of a new series of events as the last
1888    * [or only] packet in the file, switch before writing!
1889    */
1890   if (cnd_file_duration != NULL && cnd_eval(cnd_file_duration)) {
1891     /* time elapsed for this ring file, switch to the next */
1892     if (ringbuf_switch_file(&ld->pdh, &ld->save_file, &save_file_fd, &loop_err)) {
1893       /* File switch succeeded: reset the condition */
1894       cnd_reset(cnd_file_duration);
1895     } else {
1896       /* File switch failed: stop here */
1897       /* XXX - we should do something with "loop_err" */
1898       ld->go = FALSE;
1899     }
1900   }
1901
1902   if (do_dissection) {
1903     /* We're goint to print packet information, run a read filter, or
1904        process taps.  Use process_packet() to handle that; in order
1905        to do that, we need to convert from libpcap to Wiretap format.
1906        If that fails, ignore the packet (wtap_process_pcap_packet has
1907        written an error message). */
1908     wtap_pd = wtap_process_pcap_packet(ld->wtap_linktype, phdr, pd,
1909                                        &pseudo_header, &whdr, &err);
1910     if (wtap_pd == NULL)
1911       return;
1912
1913     packet_accepted = process_packet(&cfile, 0, &whdr, &pseudo_header, wtap_pd);
1914   } else {
1915     /* We're just writing out packets. */
1916     packet_accepted = TRUE;
1917   }
1918
1919   if (packet_accepted) {
1920     /* Count this packet. */
1921 #ifdef HAVE_LIBPCAP
1922     ld->packet_count++;
1923 #endif
1924
1925     if (ld->pdh != NULL) {
1926       if (!libpcap_write_packet(ld->pdh, phdr, pd, &ld->bytes_written, &err)) {
1927         /* Error writing to a capture file */
1928         if (print_packet_counts) {
1929           /* We're printing counts of packets captured; move to the line after
1930              the count. */
1931           fprintf(stderr, "\n");
1932         }
1933         show_capture_file_io_error(ld->save_file, err, FALSE);
1934         pcap_close(ld->pcap_h);
1935         libpcap_dump_close(ld->pdh, &err);
1936         exit(2);
1937       }
1938     }
1939     if (print_packet_counts) {
1940       /* We're printing packet counts. */
1941       if (ld->packet_count != 0) {
1942         fprintf(stderr, "\r%u ", ld->packet_count);
1943         /* stderr could be line buffered */
1944         fflush(stderr);
1945       }
1946     }
1947   }
1948
1949 #ifdef SIGINFO
1950   /*
1951    * Allow SIGINFO handlers to write.
1952    */
1953   infodelay = FALSE;
1954
1955   /*
1956    * If a SIGINFO handler asked us to write out capture counts, do so.
1957    */
1958   if (infoprint)
1959     report_counts();
1960 #endif /* SIGINFO */
1961 }
1962
1963 #ifdef _WIN32
1964 static BOOL WINAPI
1965 capture_cleanup(DWORD ctrltype _U_)
1966 {
1967   /* CTRL_C_EVENT is sort of like SIGINT, CTRL_BREAK_EVENT is unique to
1968      Windows, CTRL_CLOSE_EVENT is sort of like SIGHUP, CTRL_LOGOFF_EVENT
1969      is also sort of like SIGHUP, and CTRL_SHUTDOWN_EVENT is sort of
1970      like SIGTERM at least when the machine's shutting down.
1971
1972      For now, we handle them all as indications that we should clean up
1973      and quit, just as we handle SIGINT, SIGHUP, and SIGTERM in that
1974      way on UNIX.
1975
1976      However, as handlers run in a new thread, we can't just longjmp
1977      out; we have to set "ld.go" to FALSE, and must return TRUE so that
1978      no other handler - such as one that would terminate the process -
1979      gets called.
1980
1981      XXX - for some reason, typing ^C to Tethereal, if you run this in
1982      a Cygwin console window in at least some versions of Cygwin,
1983      causes Tethereal to terminate immediately; this routine gets
1984      called, but the main loop doesn't get a chance to run and
1985      exit cleanly, at least if this is compiled with Microsoft Visual
1986      C++ (i.e., it's a property of the Cygwin console window or Bash;
1987      it happens if Tethereal is not built with Cygwin - for all I know,
1988      building it with Cygwin may make the problem go away). */
1989   ld.go = FALSE;
1990   return TRUE;
1991 }
1992 #else
1993 static void
1994 capture_cleanup(int signum _U_)
1995 {
1996   /* Longjmp back to the starting point; "pcap_dispatch()", on many
1997      UNIX platforms, just keeps looping if it gets EINTR, so if we set
1998      "ld.go" to FALSE and return, we won't break out of it and quit
1999      capturing. */
2000   longjmp(ld.stopenv, 1);
2001 }
2002 #endif /* _WIN32 */
2003
2004 static void
2005 report_counts(void)
2006 {
2007 #ifdef SIGINFO
2008   /* XXX - if we use sigaction, this doesn't have to be done.
2009      (Yes, this isn't necessary on BSD, but just in case a system
2010      where "signal()" has AT&T semantics adopts SIGINFO....) */
2011   signal(SIGINFO, report_counts_siginfo);
2012 #endif /* SIGINFO */
2013
2014   if (!print_packet_counts) {
2015     /* Report the count only if we aren't printing a packet count
2016        as packets arrive. */
2017     fprintf(stderr, "%u packets captured\n", ld.packet_count);
2018   }
2019 #ifdef SIGINFO
2020   infoprint = FALSE; /* we just reported it */
2021 #endif /* SIGINFO */
2022 }
2023
2024 #ifdef SIGINFO
2025 static void
2026 report_counts_siginfo(int signum _U_)
2027 {
2028   int sav_errno = errno;
2029   /* If we've been told to delay printing, just set a flag asking
2030      that we print counts (if we're supposed to), otherwise print
2031      the count of packets captured (if we're supposed to). */
2032   if (infodelay)
2033     infoprint = TRUE;
2034   else
2035     report_counts();
2036   errno = sav_errno;
2037 }
2038 #endif /* SIGINFO */
2039 #endif /* HAVE_LIBPCAP */
2040
2041 static int
2042 load_cap_file(capture_file *cf, char *save_file, int out_file_type)
2043 {
2044   gint         linktype;
2045   int          snapshot_length;
2046   wtap_dumper *pdh;
2047   int          err;
2048   gchar        *err_info;
2049   long         data_offset;
2050   char         *save_file_string = NULL;
2051
2052   linktype = wtap_file_encap(cf->wth);
2053   if (save_file != NULL) {
2054     /* Get a string that describes what we're writing to */
2055     save_file_string = output_file_description(save_file);
2056
2057     /* Set up to write to the capture file. */
2058     snapshot_length = wtap_snapshot_length(cf->wth);
2059     if (snapshot_length == 0) {
2060       /* Snapshot length of input file not known. */
2061       snapshot_length = WTAP_MAX_PACKET_SIZE;
2062     }
2063     pdh = wtap_dump_open(save_file, out_file_type, linktype, snapshot_length,
2064                          FALSE /* compressed */, &err);
2065
2066     if (pdh == NULL) {
2067       /* We couldn't set up to write to the capture file. */
2068       switch (err) {
2069
2070       case WTAP_ERR_UNSUPPORTED_FILE_TYPE:
2071         cmdarg_err("Capture files can't be written in that format.");
2072         break;
2073
2074       case WTAP_ERR_UNSUPPORTED_ENCAP:
2075       case WTAP_ERR_ENCAP_PER_PACKET_UNSUPPORTED:
2076         cmdarg_err("The capture file being read can't be written in "
2077           "that format.");
2078         break;
2079
2080       case WTAP_ERR_CANT_OPEN:
2081         cmdarg_err("The %s couldn't be created for some "
2082           "unknown reason.", save_file_string);
2083         break;
2084
2085       case WTAP_ERR_SHORT_WRITE:
2086         cmdarg_err("A full header couldn't be written to the %s.",
2087                    save_file_string);
2088         break;
2089
2090       default:
2091         cmdarg_err("The %s could not be created: %s.", save_file_string,
2092                    wtap_strerror(err));
2093         break;
2094       }
2095       goto out;
2096     }
2097   } else {
2098     if (print_packet_info) {
2099       if (!write_preamble(cf)) {
2100         err = errno;
2101         show_print_file_io_error(err);
2102         goto out;
2103       }
2104     }
2105     pdh = NULL;
2106   }
2107   while (wtap_read(cf->wth, &err, &err_info, &data_offset)) {
2108     if (process_packet(cf, data_offset, wtap_phdr(cf->wth),
2109                        wtap_pseudoheader(cf->wth), wtap_buf_ptr(cf->wth))) {
2110       /* Either there's no read filtering or this packet passed the
2111          filter, so, if we're writing to a capture file, write
2112          this packet out. */
2113       if (pdh != NULL) {
2114         if (!wtap_dump(pdh, wtap_phdr(cf->wth),
2115                        wtap_pseudoheader(cf->wth), wtap_buf_ptr(cf->wth),
2116                        &err)) {
2117           /* Error writing to a capture file */
2118           show_capture_file_io_error(save_file, err, FALSE);
2119           wtap_dump_close(pdh, &err);
2120           exit(2);
2121         }
2122       }
2123     }
2124   }
2125   if (err != 0) {
2126     /* Print a message noting that the read failed somewhere along the line. */
2127     switch (err) {
2128
2129     case WTAP_ERR_UNSUPPORTED_ENCAP:
2130       cmdarg_err("\"%s\" has a packet with a network type that Tethereal doesn't support.\n(%s)",
2131                  cf->filename, err_info);
2132       break;
2133
2134     case WTAP_ERR_CANT_READ:
2135       cmdarg_err("An attempt to read from \"%s\" failed for some unknown reason.",
2136                  cf->filename);
2137       break;
2138
2139     case WTAP_ERR_SHORT_READ:
2140       cmdarg_err("\"%s\" appears to have been cut short in the middle of a packet.",
2141                  cf->filename);
2142       break;
2143
2144     case WTAP_ERR_BAD_RECORD:
2145       cmdarg_err("\"%s\" appears to be damaged or corrupt.\n(%s)",
2146                  cf->filename, err_info);
2147       break;
2148
2149     default:
2150       cmdarg_err("An error occurred while reading \"%s\": %s.",
2151                  cf->filename, wtap_strerror(err));
2152       break;
2153     }
2154     if (save_file != NULL) {
2155       /* Now close the capture file. */
2156       if (!wtap_dump_close(pdh, &err))
2157         show_capture_file_io_error(save_file, err, TRUE);
2158     }
2159   } else {
2160     if (save_file != NULL) {
2161       /* Now close the capture file. */
2162       if (!wtap_dump_close(pdh, &err))
2163         show_capture_file_io_error(save_file, err, TRUE);
2164     } else {
2165       if (print_packet_info) {
2166         if (!write_finale()) {
2167           err = errno;
2168           show_print_file_io_error(err);
2169         }
2170       }
2171     }
2172   }
2173
2174 out:
2175   wtap_close(cf->wth);
2176   cf->wth = NULL;
2177
2178   if (save_file_string != NULL)
2179     g_free(save_file_string);
2180
2181   return err;
2182 }
2183
2184 static void
2185 fill_in_fdata(frame_data *fdata, capture_file *cf,
2186               const struct wtap_pkthdr *phdr, long offset)
2187 {
2188   fdata->next = NULL;
2189   fdata->prev = NULL;
2190   fdata->pfd = NULL;
2191   fdata->num = cf->count;
2192   fdata->pkt_len = phdr->len;
2193   cum_bytes += phdr->len;
2194   fdata->cum_bytes  = cum_bytes;
2195   fdata->cap_len = phdr->caplen;
2196   fdata->file_off = offset;
2197   fdata->lnk_t = phdr->pkt_encap;
2198   fdata->abs_ts = *((nstime_t *) &phdr->ts);
2199   fdata->flags.passed_dfilter = 0;
2200   fdata->flags.encoding = CHAR_ASCII;
2201   fdata->flags.visited = 0;
2202   fdata->flags.marked = 0;
2203   fdata->flags.ref_time = 0;
2204   fdata->color_filter = NULL;
2205
2206   /* If we don't have the time stamp of the first packet in the
2207      capture, it's because this is the first packet.  Save the time
2208      stamp of this packet as the time stamp of the first packet. */
2209   if (nstime_is_zero(&first_ts)) {
2210     first_ts = fdata->abs_ts;
2211   }
2212
2213   /* If we don't have the time stamp of the previous displayed packet,
2214      it's because this is the first displayed packet.  Save the time
2215      stamp of this packet as the time stamp of the previous displayed
2216      packet. */
2217   if (nstime_is_zero(&prev_ts)) {
2218     prev_ts = fdata->abs_ts;
2219   }
2220
2221   /* Get the time elapsed between the first packet and this packet. */
2222   nstime_delta(&fdata->rel_ts, &fdata->abs_ts, &first_ts);
2223
2224   /* If it's greater than the current elapsed time, set the elapsed time
2225      to it (we check for "greater than" so as not to be confused by
2226      time moving backwards). */
2227   if ((gint32)cf->elapsed_time.secs < fdata->rel_ts.secs
2228         || ((gint32)cf->elapsed_time.secs == fdata->rel_ts.secs && (gint32)cf->elapsed_time.nsecs < fdata->rel_ts.nsecs)) {
2229     cf->elapsed_time = fdata->rel_ts;
2230   }
2231
2232   /* Get the time elapsed between the previous displayed packet and
2233      this packet. */
2234   nstime_delta(&fdata->del_ts, &fdata->abs_ts, &prev_ts);
2235   prev_ts = fdata->abs_ts;
2236 }
2237
2238 /* Free up all data attached to a "frame_data" structure. */
2239 static void
2240 clear_fdata(frame_data *fdata)
2241 {
2242   if (fdata->pfd)
2243     g_slist_free(fdata->pfd);
2244 }
2245
2246 static gboolean
2247 process_packet(capture_file *cf, long offset, const struct wtap_pkthdr *whdr,
2248                union wtap_pseudo_header *pseudo_header, const guchar *pd)
2249 {
2250   frame_data fdata;
2251   gboolean create_proto_tree;
2252   epan_dissect_t *edt;
2253   gboolean passed;
2254
2255   /* Count this packet. */
2256   cf->count++;
2257
2258   /* If we're going to print packet information, or we're going to
2259      run a read filter, or we're going to process taps, set up to
2260      do a dissection and do so. */
2261   if (do_dissection) {
2262     fill_in_fdata(&fdata, cf, whdr, offset);
2263
2264     if (print_packet_info) {
2265       /* Grab any resolved addresses */
2266     
2267       if (g_resolv_flags) {
2268         host_name_lookup_process(NULL);
2269       }
2270     }
2271
2272     passed = TRUE;
2273     if (cf->rfcode || verbose || num_tap_filters!=0)
2274       create_proto_tree = TRUE;
2275     else
2276       create_proto_tree = FALSE;
2277     /* The protocol tree will be "visible", i.e., printed, only if we're
2278        printing packet details, which is true if we're printing stuff
2279        ("print_packet_info" is true) and we're in verbose mode ("verbose"
2280        is true). */
2281     edt = epan_dissect_new(create_proto_tree, print_packet_info && verbose);
2282
2283     /* If we're running a read filter, prime the epan_dissect_t with that
2284        filter. */
2285     if (cf->rfcode)
2286       epan_dissect_prime_dfilter(edt, cf->rfcode);
2287
2288     tap_queue_init(edt);
2289
2290     /* We only need the columns if we're printing packet info but we're
2291        *not* verbose; in verbose mode, we print the protocol tree, not
2292        the protocol summary. */
2293     epan_dissect_run(edt, pseudo_header, pd, &fdata,
2294                      (print_packet_info && !verbose) ? &cf->cinfo : NULL);
2295
2296     tap_push_tapped_queue(edt);
2297
2298     /* Run the read filter if we have one. */
2299     if (cf->rfcode)
2300       passed = dfilter_apply_edt(cf->rfcode, edt);
2301     else
2302       passed = TRUE;
2303   } else {
2304     /* We're not running a display filter and we're not printing any
2305        packet information, so we don't need to do a dissection, and all
2306        packets are processed. */
2307     edt = NULL;
2308     passed = TRUE;
2309   }
2310
2311   if (passed) {
2312     /* Process this packet. */
2313     if (print_packet_info) {
2314       /* We're printing packet information; print the information for
2315          this packet. */
2316       print_packet(cf, edt);
2317
2318       /* The ANSI C standard does not appear to *require* that a line-buffered
2319          stream be flushed to the host environment whenever a newline is
2320          written, it just says that, on such a stream, characters "are
2321          intended to be transmitted to or from the host environment as a
2322          block when a new-line character is encountered".
2323
2324          The Visual C++ 6.0 C implementation doesn't do what is intended;
2325          even if you set a stream to be line-buffered, it still doesn't
2326          flush the buffer at the end of every line.
2327
2328          So, if the "-l" flag was specified, we flush the standard output
2329          at the end of a packet.  This will do the right thing if we're
2330          printing packet summary lines, and, as we print the entire protocol
2331          tree for a single packet without waiting for anything to happen,
2332          it should be as good as line-buffered mode if we're printing
2333          protocol trees.  (The whole reason for the "-l" flag in either
2334          tcpdump or Tethereal is to allow the output of a live capture to
2335          be piped to a program or script and to have that script see the
2336          information for the packet as soon as it's printed, rather than
2337          having to wait until a standard I/O buffer fills up. */
2338       if (line_buffered)
2339         fflush(stdout);
2340
2341       if (ferror(stdout)) {
2342         show_print_file_io_error(errno);
2343         exit(2);
2344       }
2345     }
2346   }
2347
2348   if (do_dissection) {
2349     epan_dissect_free(edt);
2350     clear_fdata(&fdata);
2351   }
2352   return passed;
2353 }
2354
2355 static void
2356 show_capture_file_io_error(const char *fname, int err, gboolean is_close)
2357 {
2358   char *save_file_string;
2359
2360   save_file_string = output_file_description(fname);
2361
2362   switch (err) {
2363
2364   case ENOSPC:
2365     cmdarg_err("Not all the packets could be written to the %s because there is "
2366                "no space left on the file system.",
2367                save_file_string);
2368     break;
2369
2370 #ifdef EDQUOT
2371   case EDQUOT:
2372     cmdarg_err("Not all the packets could be written to the %s because you are "
2373                "too close to, or over your disk quota.",
2374                save_file_string);
2375   break;
2376 #endif
2377
2378   case WTAP_ERR_CANT_CLOSE:
2379     cmdarg_err("The %s couldn't be closed for some unknown reason.",
2380                save_file_string);
2381     break;
2382
2383   case WTAP_ERR_SHORT_WRITE:
2384     cmdarg_err("Not all the packets could be written to the %s.",
2385                save_file_string);
2386     break;
2387
2388   default:
2389     if (is_close) {
2390       cmdarg_err("The %s could not be closed: %s.", save_file_string,
2391                  wtap_strerror(err));
2392     } else {
2393       cmdarg_err("An error occurred while writing to the %s: %s.",
2394                  save_file_string, wtap_strerror(err));
2395     }
2396     break;
2397   }
2398   g_free(save_file_string);
2399 }
2400
2401 static gboolean
2402 write_preamble(capture_file *cf)
2403 {
2404   switch (output_action) {
2405
2406   case WRITE_TEXT:
2407     return print_preamble(print_stream, cf->filename);
2408     break;
2409
2410   case WRITE_XML:
2411     if (verbose)
2412       write_pdml_preamble(stdout);
2413     else
2414       write_psml_preamble(stdout);
2415     return !ferror(stdout);
2416
2417   default:
2418     g_assert_not_reached();
2419     return FALSE;
2420   }
2421 }
2422
2423 static char *
2424 get_line_buf(size_t len)
2425 {
2426   static char *line_bufp = NULL;
2427   static size_t line_buf_len = 256;
2428   size_t new_line_buf_len;
2429
2430   for (new_line_buf_len = line_buf_len; len > new_line_buf_len;
2431        new_line_buf_len *= 2)
2432     ;
2433   if (line_bufp == NULL) {
2434     line_buf_len = new_line_buf_len;
2435     line_bufp = g_malloc(line_buf_len + 1);
2436   } else {
2437     if (new_line_buf_len > line_buf_len) {
2438       line_buf_len = new_line_buf_len;
2439       line_bufp = g_realloc(line_bufp, line_buf_len + 1);
2440     }
2441   }
2442   return line_bufp;
2443 }
2444
2445 static gboolean
2446 print_columns(capture_file *cf)
2447 {
2448   char *line_bufp;
2449   int i;
2450   size_t buf_offset;
2451   size_t column_len;
2452
2453   line_bufp = get_line_buf(256);
2454   buf_offset = 0;
2455   *line_bufp = '\0';
2456   for (i = 0; i < cf->cinfo.num_cols; i++) {
2457     switch (cf->cinfo.col_fmt[i]) {
2458     case COL_NUMBER:
2459 #ifdef HAVE_LIBPCAP
2460       /*
2461        * Don't print this if we're doing a live capture from a network
2462        * interface - if we're doing a live capture, you won't be
2463        * able to look at the capture in the future (it's not being
2464        * saved anywhere), so the frame numbers are unlikely to be
2465        * useful.
2466        *
2467        * (XXX - it might be nice to be able to save and print at
2468        * the same time, sort of like an "Update list of packets
2469        * in real time" capture in Ethereal.)
2470        */
2471       if (capture_opts.iface != NULL)
2472         continue;
2473 #endif
2474       column_len = strlen(cf->cinfo.col_data[i]);
2475       if (column_len < 3)
2476         column_len = 3;
2477       line_bufp = get_line_buf(buf_offset + column_len);
2478       sprintf(line_bufp + buf_offset, "%3s", cf->cinfo.col_data[i]);
2479       break;
2480
2481     case COL_CLS_TIME:
2482     case COL_REL_TIME:
2483     case COL_ABS_TIME:
2484     case COL_ABS_DATE_TIME: /* XXX - wider */
2485       column_len = strlen(cf->cinfo.col_data[i]);
2486       if (column_len < 10)
2487         column_len = 10;
2488       line_bufp = get_line_buf(buf_offset + column_len);
2489       sprintf(line_bufp + buf_offset, "%10s", cf->cinfo.col_data[i]);
2490       break;
2491
2492     case COL_DEF_SRC:
2493     case COL_RES_SRC:
2494     case COL_UNRES_SRC:
2495     case COL_DEF_DL_SRC:
2496     case COL_RES_DL_SRC:
2497     case COL_UNRES_DL_SRC:
2498     case COL_DEF_NET_SRC:
2499     case COL_RES_NET_SRC:
2500     case COL_UNRES_NET_SRC:
2501       column_len = strlen(cf->cinfo.col_data[i]);
2502       if (column_len < 12)
2503         column_len = 12;
2504       line_bufp = get_line_buf(buf_offset + column_len);
2505       sprintf(line_bufp + buf_offset, "%12s", cf->cinfo.col_data[i]);
2506       break;
2507
2508     case COL_DEF_DST:
2509     case COL_RES_DST:
2510     case COL_UNRES_DST:
2511     case COL_DEF_DL_DST:
2512     case COL_RES_DL_DST:
2513     case COL_UNRES_DL_DST:
2514     case COL_DEF_NET_DST:
2515     case COL_RES_NET_DST:
2516     case COL_UNRES_NET_DST:
2517       column_len = strlen(cf->cinfo.col_data[i]);
2518       if (column_len < 12)
2519         column_len = 12;
2520       line_bufp = get_line_buf(buf_offset + column_len);
2521       sprintf(line_bufp + buf_offset, "%-12s", cf->cinfo.col_data[i]);
2522       break;
2523
2524     default:
2525       column_len = strlen(cf->cinfo.col_data[i]);
2526       line_bufp = get_line_buf(buf_offset + column_len);
2527       strcat(line_bufp + buf_offset, cf->cinfo.col_data[i]);
2528       break;
2529     }
2530     buf_offset += column_len;
2531     if (i != cf->cinfo.num_cols - 1) {
2532       /*
2533        * This isn't the last column, so we need to print a
2534        * separator between this column and the next.
2535        *
2536        * If we printed a network source and are printing a
2537        * network destination of the same type next, separate
2538        * them with "->"; if we printed a network destination
2539        * and are printing a network source of the same type
2540        * next, separate them with "<-"; otherwise separate them
2541        * with a space.
2542        *
2543        * We add enough space to the buffer for " <- " or " -> ",
2544        * even if we're only adding " ".
2545        */
2546       line_bufp = get_line_buf(buf_offset + 4);
2547       switch (cf->cinfo.col_fmt[i]) {
2548
2549       case COL_DEF_SRC:
2550       case COL_RES_SRC:
2551       case COL_UNRES_SRC:
2552         switch (cf->cinfo.col_fmt[i + 1]) {
2553
2554         case COL_DEF_DST:
2555         case COL_RES_DST:
2556         case COL_UNRES_DST:
2557           strcat(line_bufp + buf_offset, " -> ");
2558           buf_offset += 4;
2559           break;
2560
2561         default:
2562           strcat(line_bufp + buf_offset, " ");
2563           buf_offset += 1;
2564           break;
2565         }
2566         break;
2567
2568       case COL_DEF_DL_SRC:
2569       case COL_RES_DL_SRC:
2570       case COL_UNRES_DL_SRC:
2571         switch (cf->cinfo.col_fmt[i + 1]) {
2572
2573         case COL_DEF_DL_DST:
2574         case COL_RES_DL_DST:
2575         case COL_UNRES_DL_DST:
2576           strcat(line_bufp + buf_offset, " -> ");
2577           buf_offset += 4;
2578           break;
2579
2580         default:
2581           strcat(line_bufp + buf_offset, " ");
2582           buf_offset += 1;
2583           break;
2584         }
2585         break;
2586
2587       case COL_DEF_NET_SRC:
2588       case COL_RES_NET_SRC:
2589       case COL_UNRES_NET_SRC:
2590         switch (cf->cinfo.col_fmt[i + 1]) {
2591
2592         case COL_DEF_NET_DST:
2593         case COL_RES_NET_DST:
2594         case COL_UNRES_NET_DST:
2595           strcat(line_bufp + buf_offset, " -> ");
2596           buf_offset += 4;
2597           break;
2598
2599         default:
2600           strcat(line_bufp + buf_offset, " ");
2601           buf_offset += 1;
2602           break;
2603         }
2604         break;
2605
2606       case COL_DEF_DST:
2607       case COL_RES_DST:
2608       case COL_UNRES_DST:
2609         switch (cf->cinfo.col_fmt[i + 1]) {
2610
2611         case COL_DEF_SRC:
2612         case COL_RES_SRC:
2613         case COL_UNRES_SRC:
2614           strcat(line_bufp + buf_offset, " <- ");
2615           buf_offset += 4;
2616           break;
2617
2618         default:
2619           strcat(line_bufp + buf_offset, " ");
2620           buf_offset += 1;
2621           break;
2622         }
2623         break;
2624
2625       case COL_DEF_DL_DST:
2626       case COL_RES_DL_DST:
2627       case COL_UNRES_DL_DST:
2628         switch (cf->cinfo.col_fmt[i + 1]) {
2629
2630         case COL_DEF_DL_SRC:
2631         case COL_RES_DL_SRC:
2632         case COL_UNRES_DL_SRC:
2633           strcat(line_bufp + buf_offset, " <- ");
2634           buf_offset += 4;
2635           break;
2636
2637         default:
2638           strcat(line_bufp + buf_offset, " ");
2639           buf_offset += 1;
2640           break;
2641         }
2642         break;
2643
2644       case COL_DEF_NET_DST:
2645       case COL_RES_NET_DST:
2646       case COL_UNRES_NET_DST:
2647         switch (cf->cinfo.col_fmt[i + 1]) {
2648
2649         case COL_DEF_NET_SRC:
2650         case COL_RES_NET_SRC:
2651         case COL_UNRES_NET_SRC:
2652           strcat(line_bufp + buf_offset, " <- ");
2653           buf_offset += 4;
2654           break;
2655
2656         default:
2657           strcat(line_bufp + buf_offset, " ");
2658           buf_offset += 1;
2659           break;
2660         }
2661         break;
2662
2663       default:
2664         strcat(line_bufp + buf_offset, " ");
2665         buf_offset += 1;
2666         break;
2667       }
2668     }
2669   }
2670   return print_line(print_stream, 0, line_bufp);
2671 }
2672
2673 static gboolean
2674 print_packet(capture_file *cf, epan_dissect_t *edt)
2675 {
2676   print_args_t  print_args;
2677
2678   if (verbose) {
2679     /* Print the information in the protocol tree. */
2680     switch (output_action) {
2681
2682     case WRITE_TEXT:
2683       print_args.to_file = TRUE;
2684       print_args.format = print_format;
2685       print_args.print_summary = !verbose;
2686       print_args.print_hex = verbose && print_hex;
2687       print_args.print_formfeed = FALSE;
2688       print_args.print_dissections = verbose ? print_dissections_expanded : print_dissections_none;
2689
2690       /* init the packet range */
2691       packet_range_init(&print_args.range);
2692
2693       if (!proto_tree_print(&print_args, edt, print_stream))
2694         return FALSE;
2695       if (!print_hex) {
2696         /* "print_hex_data()" will put out a leading blank line, as well
2697          as a trailing one; print one here, to separate the packets,
2698          only if "print_hex_data()" won't be called. */
2699         if (!print_line(print_stream, 0, ""))
2700           return FALSE;
2701       }
2702       break;
2703
2704     case WRITE_XML:
2705       proto_tree_write_pdml(edt, stdout);
2706       printf("\n");
2707       return !ferror(stdout);
2708     }
2709   } else {
2710     /* Just fill in the columns. */
2711     epan_dissect_fill_in_columns(edt);
2712
2713     /* Now print them. */
2714     switch (output_action) {
2715
2716     case WRITE_TEXT:
2717         if (!print_columns(cf))
2718           return FALSE;
2719         break;
2720
2721     case WRITE_XML:
2722         proto_tree_write_psml(edt, stdout);
2723         return !ferror(stdout);
2724     }
2725   }
2726   if (print_hex) {
2727     if (!print_hex_data(print_stream, edt))
2728       return FALSE;
2729     if (!print_line(print_stream, 0, ""))
2730       return FALSE;
2731   }
2732   return TRUE;
2733 }
2734
2735 static gboolean
2736 write_finale(void)
2737 {
2738   switch (output_action) {
2739
2740   case WRITE_TEXT:
2741     return print_finale(print_stream);
2742     break;
2743
2744   case WRITE_XML:
2745     if (verbose)
2746       write_pdml_finale(stdout);
2747     else
2748       write_psml_finale(stdout);
2749     return !ferror(stdout);
2750
2751   default:
2752     g_assert_not_reached();
2753     return FALSE;
2754   }
2755 }
2756
2757 static void
2758 show_print_file_io_error(int err)
2759 {
2760   switch (err) {
2761
2762   case ENOSPC:
2763     cmdarg_err("Not all the packets could be printed because there is "
2764 "no space left on the file system.");
2765     break;
2766
2767 #ifdef EDQUOT
2768   case EDQUOT:
2769     cmdarg_err("Not all the packets could be printed because you are "
2770 "too close to, or over your disk quota.");
2771   break;
2772 #endif
2773
2774   default:
2775     cmdarg_err("An error occurred while printing packets: %s.",
2776       strerror(err));
2777     break;
2778   }
2779 }
2780
2781 static const char *
2782 cf_open_error_message(int err, gchar *err_info, gboolean for_writing,
2783                       int file_type)
2784 {
2785   const char *errmsg;
2786   static char errmsg_errno[1024+1];
2787
2788   if (err < 0) {
2789     /* Wiretap error. */
2790     switch (err) {
2791
2792     case WTAP_ERR_NOT_REGULAR_FILE:
2793       errmsg = "The file \"%s\" is a \"special file\" or socket or other non-regular file.";
2794       break;
2795
2796     case WTAP_ERR_FILE_UNKNOWN_FORMAT:
2797       /* Seen only when opening a capture file for reading. */
2798       errmsg = "The file \"%s\" isn't a capture file in a format Tethereal understands.";
2799       break;
2800
2801     case WTAP_ERR_UNSUPPORTED:
2802       /* Seen only when opening a capture file for reading. */
2803       g_snprintf(errmsg_errno, sizeof(errmsg_errno),
2804                "The file \"%%s\" isn't a capture file in a format Tethereal understands.\n"
2805                "(%s)", err_info);
2806       g_free(err_info);
2807       errmsg = errmsg_errno;
2808       break;
2809
2810     case WTAP_ERR_CANT_WRITE_TO_PIPE:
2811       /* Seen only when opening a capture file for writing. */
2812       g_snprintf(errmsg_errno, sizeof(errmsg_errno),
2813                  "The file \"%%s\" is a pipe, and %s capture files can't be "
2814                  "written to a pipe.", wtap_file_type_string(file_type));
2815       errmsg = errmsg_errno;
2816       break;
2817
2818     case WTAP_ERR_UNSUPPORTED_FILE_TYPE:
2819       /* Seen only when opening a capture file for writing. */
2820       errmsg = "Tethereal doesn't support writing capture files in that format.";
2821       break;
2822
2823     case WTAP_ERR_UNSUPPORTED_ENCAP:
2824       if (for_writing)
2825         errmsg = "Tethereal can't save this capture in that format.";
2826       else {
2827         g_snprintf(errmsg_errno, sizeof(errmsg_errno),
2828                  "The file \"%%s\" is a capture for a network type that Tethereal doesn't support.\n"
2829                  "(%s)", err_info);
2830         g_free(err_info);
2831         errmsg = errmsg_errno;
2832       }
2833       break;
2834
2835     case WTAP_ERR_ENCAP_PER_PACKET_UNSUPPORTED:
2836       if (for_writing)
2837         errmsg = "Tethereal can't save this capture in that format.";
2838       else
2839         errmsg = "The file \"%s\" is a capture for a network type that Tethereal doesn't support.";
2840       break;
2841
2842     case WTAP_ERR_BAD_RECORD:
2843       /* Seen only when opening a capture file for reading. */
2844       g_snprintf(errmsg_errno, sizeof(errmsg_errno),
2845                "The file \"%%s\" appears to be damaged or corrupt.\n"
2846                "(%s)", err_info);
2847       g_free(err_info);
2848       errmsg = errmsg_errno;
2849       break;
2850
2851     case WTAP_ERR_CANT_OPEN:
2852       if (for_writing)
2853         errmsg = "The file \"%s\" could not be created for some unknown reason.";
2854       else
2855         errmsg = "The file \"%s\" could not be opened for some unknown reason.";
2856       break;
2857
2858     case WTAP_ERR_SHORT_READ:
2859       errmsg = "The file \"%s\" appears to have been cut short"
2860                " in the middle of a packet or other data.";
2861       break;
2862
2863     case WTAP_ERR_SHORT_WRITE:
2864       errmsg = "A full header couldn't be written to the file \"%s\".";
2865       break;
2866
2867     default:
2868       g_snprintf(errmsg_errno, sizeof(errmsg_errno),
2869                  "The file \"%%s\" could not be %s: %s.",
2870                  for_writing ? "created" : "opened",
2871                  wtap_strerror(err));
2872       errmsg = errmsg_errno;
2873       break;
2874     }
2875   } else
2876     errmsg = file_open_error_message(err, for_writing);
2877   return errmsg;
2878 }
2879
2880 /*
2881  * Open/create errors are reported with an console message in Tethereal.
2882  */
2883 static void
2884 open_failure_message(const char *filename, int err, gboolean for_writing)
2885 {
2886   fprintf(stderr, "tethereal: ");
2887   fprintf(stderr, file_open_error_message(err, for_writing), filename);
2888   fprintf(stderr, "\n");
2889 }
2890
2891 cf_status_t
2892 cf_open(capture_file *cf, const char *fname, gboolean is_tempfile, int *err)
2893 {
2894   wtap       *wth;
2895   gchar       *err_info;
2896   char        err_msg[2048+1];
2897
2898   wth = wtap_open_offline(fname, err, &err_info, FALSE);
2899   if (wth == NULL)
2900     goto fail;
2901
2902   /* The open succeeded.  Fill in the information for this file. */
2903
2904   /* Initialize all data structures used for dissection. */
2905   init_dissection();
2906
2907   cf->wth = wth;
2908   cf->f_datalen = 0; /* not used, but set it anyway */
2909
2910   /* Set the file name because we need it to set the follow stream filter.
2911      XXX - is that still true?  We need it for other reasons, though,
2912      in any case. */
2913   cf->filename = g_strdup(fname);
2914
2915   /* Indicate whether it's a permanent or temporary file. */
2916   cf->is_tempfile = is_tempfile;
2917
2918   /* If it's a temporary capture buffer file, mark it as not saved. */
2919   cf->user_saved = !is_tempfile;
2920
2921   cf->cd_t      = wtap_file_type(cf->wth);
2922   cf->count     = 0;
2923   cf->drops_known = FALSE;
2924   cf->drops     = 0;
2925   cf->snap      = wtap_snapshot_length(cf->wth);
2926   if (cf->snap == 0) {
2927     /* Snapshot length not known. */
2928     cf->has_snap = FALSE;
2929     cf->snap = WTAP_MAX_PACKET_SIZE;
2930   } else
2931     cf->has_snap = TRUE;
2932   nstime_set_zero(&cf->elapsed_time);
2933   nstime_set_zero(&first_ts);
2934   nstime_set_zero(&prev_ts);
2935
2936   return CF_OK;
2937
2938 fail:
2939   g_snprintf(err_msg, sizeof err_msg,
2940              cf_open_error_message(*err, err_info, FALSE, cf->cd_t), fname);
2941   cmdarg_err("%s", err_msg);
2942   return CF_ERROR;
2943 }
2944
2945
2946 /*
2947  * General errors are reported with an console message in Tethereal.
2948  */
2949 static void
2950 failure_message(const char *msg_format, va_list ap)
2951 {
2952   fprintf(stderr, "tethereal: ");
2953   vfprintf(stderr, msg_format, ap);
2954   fprintf(stderr, "\n");
2955 }
2956
2957 /*
2958  * Read errors are reported with an console message in Tethereal.
2959  */
2960 static void
2961 read_failure_message(const char *filename, int err)
2962 {
2963   cmdarg_err("An error occurred while reading from the file \"%s\": %s.",
2964           filename, strerror(err));
2965 }
2966
2967 /*
2968  * Report an error in command-line arguments.
2969  */
2970 void
2971 cmdarg_err(const char *fmt, ...)
2972 {
2973   va_list ap;
2974
2975   va_start(ap, fmt);
2976   fprintf(stderr, "tethereal: ");
2977   vfprintf(stderr, fmt, ap);
2978   fprintf(stderr, "\n");
2979   va_end(ap);
2980 }
2981
2982 /*
2983  * Report additional information for an error in command-line arguments.
2984  */
2985 void
2986 cmdarg_err_cont(const char *fmt, ...)
2987 {
2988   va_list ap;
2989
2990   va_start(ap, fmt);
2991   vfprintf(stderr, fmt, ap);
2992   fprintf(stderr, "\n");
2993   va_end(ap);
2994 }
2995
2996
2997 /****************************************************************************************************************/
2998 /* indication report "dummies", needed for capture_loop.c */
2999
3000 #ifdef HAVE_LIBPCAP
3001
3002 /** Report a new capture file having been opened. */
3003 void
3004 report_new_capture_file(const char *filename)
3005 {
3006     /* shouldn't happen */
3007     g_assert_not_reached();
3008 }
3009
3010 /** Report a number of new packets captured. */
3011 void
3012 report_packet_count(int packet_count)
3013 {
3014     /* shouldn't happen */
3015     g_assert_not_reached();
3016 }
3017
3018 /** Report the packet drops once the capture finishes. */
3019 void
3020 report_packet_drops(int drops)
3021 {
3022     /* shouldn't happen */
3023     g_assert_not_reached();
3024 }
3025
3026 /** Report an error in the capture. */
3027 void 
3028 report_capture_error(const char *errmsg, const char *secondary_error_msg)
3029 {
3030     cmdarg_err(errmsg);
3031     cmdarg_err_cont(secondary_error_msg);
3032 }
3033
3034 /** Report an error with a capture filter. */
3035 void
3036 report_cfilter_error(const char *cfilter, const char *errmsg)
3037 {
3038
3039     cmdarg_err(
3040       "Invalid capture filter: \"%s\"!\n"
3041       "\n"
3042       "That string isn't a valid capture filter (%s).\n"
3043       "See the User's Guide for a description of the capture filter syntax.",
3044       cfilter, errmsg);
3045 }
3046
3047 #endif /* HAVE_LIBPCAP */
3048
3049
3050 /****************************************************************************************************************/
3051 /* signal pipe "dummies", needed for capture_loop.c */
3052
3053 #ifdef HAVE_LIBPCAP
3054
3055 #ifdef _WIN32
3056 gboolean
3057 signal_pipe_check_running(void)
3058 {
3059     /* currently, no check required */
3060     return TRUE;
3061 }
3062 #endif  /* _WIN32 */
3063
3064 #endif /* HAVE_LIBPCAP */