Indicate tshark can read (-r) from stdin and named pipes now.
[metze/wireshark/wip.git] / tshark.c
1 /* tshark.c
2  *
3  * Text-mode variant of Wireshark, along the lines of tcpdump and snoop,
4  * by Gilbert Ramirez <gram@alumni.rice.edu> and Guy Harris <guy@alum.mit.edu>.
5  *
6  * Wireshark - Network traffic analyzer
7  * By Gerald Combs <gerald@wireshark.org>
8  * Copyright 1998 Gerald Combs
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public License
12  * as published by the Free Software Foundation; either version 2
13  * of the License, or (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
23  */
24
25 #include "config.h"
26
27 #include <stdlib.h>
28 #include <stdio.h>
29 #include <string.h>
30 #include <ctype.h>
31 #include <locale.h>
32 #include <limits.h>
33
34 #ifdef HAVE_UNISTD_H
35 #include <unistd.h>
36 #endif
37
38 #ifdef HAVE_GETOPT_H
39 #include <getopt.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 HAVE_LIBZ
55 #include <zlib.h>       /* to get the libz version number */
56 #endif
57
58 #ifndef HAVE_GETOPT
59 #include "wsutil/wsgetopt.h"
60 #endif
61
62 #include <glib.h>
63
64 #include <epan/exceptions.h>
65 #include <epan/epan-int.h>
66 #include <epan/epan.h>
67 #include <wsutil/crash_info.h>
68 #include <wsutil/privileges.h>
69 #include <wsutil/file_util.h>
70 #include <wsutil/filesystem.h>
71 #include <wsutil/report_err.h>
72 #include <wsutil/copyright_info.h>
73 #include <wsutil/os_version_info.h>
74 #include <wsutil/ws_version_info.h>
75
76 #include "globals.h"
77 #include <epan/timestamp.h>
78 #include <epan/packet.h>
79 #ifdef HAVE_LUA
80 #include <epan/wslua/init_wslua.h>
81 #endif
82 #include "file.h"
83 #include "frame_tvbuff.h"
84 #include <epan/disabled_protos.h>
85 #include <epan/prefs.h>
86 #include <epan/column.h>
87 #include <epan/print.h>
88 #include <epan/addr_resolv.h>
89 #include "ui/util.h"
90 #include "ui/ui_util.h"
91 #include "clopts_common.h"
92 #include "cmdarg_err.h"
93 #include "version_info.h"
94 #include "register.h"
95 #include <epan/epan_dissect.h>
96 #include <epan/tap.h>
97 #include <epan/stat_cmd_args.h>
98 #include <epan/timestamp.h>
99 #include <epan/ex-opt.h>
100
101 #include "capture_opts.h"
102
103 #ifdef HAVE_LIBPCAP
104 #include "capture_ui_utils.h"
105 #include <capchild/capture_ifinfo.h>
106 #include "capture-pcap-util.h"
107 #ifdef _WIN32
108 #include "capture-wpcap.h"
109 #include <wsutil/unicode-utils.h>
110 #endif /* _WIN32 */
111 #include "capture_session.h"
112 #include <capchild/capture_sync.h>
113 #include "capture_opts.h"
114 #endif /* HAVE_LIBPCAP */
115 #include "log.h"
116 #include <epan/funnel.h>
117
118 #ifdef HAVE_PLUGINS
119 #include <wsutil/plugins.h>
120 #endif
121
122 /*
123  * This is the template for the decode as option; it is shared between the
124  * various functions that output the usage for this parameter.
125  */
126 static const gchar decode_as_arg_template[] = "<layer_type>==<selector>,<decode_as_protocol>";
127
128 static guint32 cum_bytes;
129 static const frame_data *ref;
130 static frame_data ref_frame;
131 static frame_data *prev_dis;
132 static frame_data prev_dis_frame;
133 static frame_data *prev_cap;
134 static frame_data prev_cap_frame;
135
136 static const char* prev_display_dissector_name = NULL;
137
138 static gboolean perform_two_pass_analysis;
139
140 /*
141  * The way the packet decode is to be written.
142  */
143 typedef enum {
144   WRITE_TEXT,   /* summary or detail text */
145   WRITE_XML,    /* PDML or PSML */
146   WRITE_FIELDS  /* User defined list of fields */
147   /* Add CSV and the like here */
148 } output_action_e;
149
150 static output_action_e output_action;
151 static gboolean do_dissection;     /* TRUE if we have to dissect each packet */
152 static gboolean print_packet_info; /* TRUE if we're to print packet information */
153 static gint print_summary = -1;    /* TRUE if we're to print packet summary information */
154 static gboolean print_details;     /* TRUE if we're to print packet details information */
155 static gboolean print_hex;         /* TRUE if we're to print hex/ascci information */
156 static gboolean line_buffered;
157 static gboolean really_quiet = FALSE;
158
159 static print_format_e print_format = PR_FMT_TEXT;
160 static print_stream_t *print_stream;
161
162 static output_fields_t* output_fields  = NULL;
163
164 /* The line separator used between packets, changeable via the -S option */
165 static const char *separator = "";
166
167 #ifdef HAVE_LIBPCAP
168 /*
169  * TRUE if we're to print packet counts to keep track of captured packets.
170  */
171 static gboolean print_packet_counts;
172
173 static capture_options global_capture_opts;
174 static capture_session global_capture_session;
175
176 #ifdef SIGINFO
177 static gboolean infodelay;      /* if TRUE, don't print capture info in SIGINFO handler */
178 static gboolean infoprint;      /* if TRUE, print capture info after clearing infodelay */
179 #endif /* SIGINFO */
180
181 static gboolean capture(void);
182 static void report_counts(void);
183 #ifdef _WIN32
184 static BOOL WINAPI capture_cleanup(DWORD);
185 #else /* _WIN32 */
186 static void capture_cleanup(int);
187 #ifdef SIGINFO
188 static void report_counts_siginfo(int);
189 #endif /* SIGINFO */
190 #endif /* _WIN32 */
191
192 #else /* HAVE_LIBPCAP */
193
194 static char *output_file_name;
195
196 #endif /* HAVE_LIBPCAP */
197
198 static int load_cap_file(capture_file *, char *, int, gboolean, int, gint64);
199 static gboolean process_packet(capture_file *cf, epan_dissect_t *edt, gint64 offset,
200     struct wtap_pkthdr *whdr, const guchar *pd,
201     guint tap_flags);
202 static void show_capture_file_io_error(const char *, int, gboolean);
203 static void show_print_file_io_error(int err);
204 static gboolean write_preamble(capture_file *cf);
205 static gboolean print_packet(capture_file *cf, epan_dissect_t *edt);
206 static gboolean write_finale(void);
207 static const char *cf_open_error_message(int err, gchar *err_info,
208     gboolean for_writing, int file_type);
209
210 static void open_failure_message(const char *filename, int err,
211     gboolean for_writing);
212 static void failure_message(const char *msg_format, va_list ap);
213 static void read_failure_message(const char *filename, int err);
214 static void write_failure_message(const char *filename, int err);
215
216 capture_file cfile;
217
218 struct string_elem {
219   const char *sstr;   /* The short string */
220   const char *lstr;   /* The long string */
221 };
222
223 static gint
224 string_compare(gconstpointer a, gconstpointer b)
225 {
226   return strcmp(((const struct string_elem *)a)->sstr,
227                 ((const struct string_elem *)b)->sstr);
228 }
229
230 static void
231 string_elem_print(gpointer data, gpointer not_used _U_)
232 {
233   fprintf(stderr, "    %s - %s\n",
234           ((struct string_elem *)data)->sstr,
235           ((struct string_elem *)data)->lstr);
236 }
237
238 static void
239 list_capture_types(void) {
240   int                 i;
241   struct string_elem *captypes;
242   GSList             *list = NULL;
243
244   captypes = g_new(struct string_elem, WTAP_NUM_FILE_TYPES_SUBTYPES);
245
246   fprintf(stderr, "tshark: The available capture file types for the \"-F\" flag are:\n");
247   for (i = 0; i < WTAP_NUM_FILE_TYPES_SUBTYPES; i++) {
248     if (wtap_dump_can_open(i)) {
249       captypes[i].sstr = wtap_file_type_subtype_short_string(i);
250       captypes[i].lstr = wtap_file_type_subtype_string(i);
251       list = g_slist_insert_sorted(list, &captypes[i], string_compare);
252     }
253   }
254   g_slist_foreach(list, string_elem_print, NULL);
255   g_slist_free(list);
256   g_free(captypes);
257 }
258
259 static void
260 list_read_capture_types(void) {
261   int                 i;
262   struct string_elem *captypes;
263   GSList             *list = NULL;
264   const char *magic = "Magic-value-based";
265   const char *heuristic = "Heuristics-based";
266
267   /* this is a hack, but WTAP_NUM_FILE_TYPES_SUBTYPES is always >= number of open routines so we're safe */
268   captypes = g_new(struct string_elem, WTAP_NUM_FILE_TYPES_SUBTYPES);
269
270   fprintf(stderr, "tshark: The available read file types for the \"-X read_format:\" option are:\n");
271   for (i = 0; open_routines[i].name != NULL; i++) {
272     captypes[i].sstr = open_routines[i].name;
273     captypes[i].lstr = (open_routines[i].type == OPEN_INFO_MAGIC) ? magic : heuristic;
274     list = g_slist_insert_sorted(list, &captypes[i], string_compare);
275   }
276   g_slist_foreach(list, string_elem_print, NULL);
277   g_slist_free(list);
278   g_free(captypes);
279 }
280
281 static void
282 print_usage(gboolean print_ver)
283 {
284   FILE *output;
285
286   if (print_ver) {
287     output = stdout;
288     fprintf(output,
289         "TShark %s\n"
290         "Dump and analyze network traffic.\n"
291         "See http://www.wireshark.org for more information.\n"
292         "\n"
293         "%s",
294         get_ws_vcs_version_info(), get_copyright_info());
295   } else {
296     output = stderr;
297   }
298   fprintf(output, "\n");
299   fprintf(output, "Usage: tshark [options] ...\n");
300   fprintf(output, "\n");
301
302 #ifdef HAVE_LIBPCAP
303   fprintf(output, "Capture interface:\n");
304   fprintf(output, "  -i <interface>           name or idx of interface (def: first non-loopback)\n");
305   fprintf(output, "  -f <capture filter>      packet filter in libpcap filter syntax\n");
306   fprintf(output, "  -s <snaplen>             packet snapshot length (def: 65535)\n");
307   fprintf(output, "  -p                       don't capture in promiscuous mode\n");
308 #ifdef HAVE_PCAP_CREATE
309   fprintf(output, "  -I                       capture in monitor mode, if available\n");
310 #endif
311 #if defined(_WIN32) || defined(HAVE_PCAP_CREATE)
312   fprintf(output, "  -B <buffer size>         size of kernel buffer (def: %dMB)\n", DEFAULT_CAPTURE_BUFFER_SIZE);
313 #endif
314   fprintf(output, "  -y <link type>           link layer type (def: first appropriate)\n");
315   fprintf(output, "  -D                       print list of interfaces and exit\n");
316   fprintf(output, "  -L                       print list of link-layer types of iface and exit\n");
317   fprintf(output, "\n");
318   fprintf(output, "Capture stop conditions:\n");
319   fprintf(output, "  -c <packet count>        stop after n packets (def: infinite)\n");
320   fprintf(output, "  -a <autostop cond.> ...  duration:NUM - stop after NUM seconds\n");
321   fprintf(output, "                           filesize:NUM - stop this file after NUM KB\n");
322   fprintf(output, "                              files:NUM - stop after NUM files\n");
323   /*fprintf(output, "\n");*/
324   fprintf(output, "Capture output:\n");
325   fprintf(output, "  -b <ringbuffer opt.> ... duration:NUM - switch to next file after NUM secs\n");
326   fprintf(output, "                           filesize:NUM - switch to next file after NUM KB\n");
327   fprintf(output, "                              files:NUM - ringbuffer: replace after NUM files\n");
328 #endif  /* HAVE_LIBPCAP */
329 #ifdef HAVE_PCAP_REMOTE
330   fprintf(output, "RPCAP options:\n");
331   fprintf(output, "  -A <user>:<password>     use RPCAP password authentication\n");
332 #endif
333   /*fprintf(output, "\n");*/
334   fprintf(output, "Input file:\n");
335   fprintf(output, "  -r <infile>              set the filename to read from (- to read from stdin)\n");
336
337   fprintf(output, "\n");
338   fprintf(output, "Processing:\n");
339   fprintf(output, "  -2                       perform a two-pass analysis\n");
340   fprintf(output, "  -R <read filter>         packet Read filter in Wireshark display filter syntax\n");
341   fprintf(output, "  -Y <display filter>      packet displaY filter in Wireshark display filter\n");
342   fprintf(output, "                           syntax\n");
343   fprintf(output, "  -n                       disable all name resolutions (def: all enabled)\n");
344   fprintf(output, "  -N <name resolve flags>  enable specific name resolution(s): \"mntC\"\n");
345   fprintf(output, "  -d %s ...\n", decode_as_arg_template);
346   fprintf(output, "                           \"Decode As\", see the man page for details\n");
347   fprintf(output, "                           Example: tcp.port==8888,http\n");
348   fprintf(output, "  -H <hosts file>          read a list of entries from a hosts file, which will\n");
349   fprintf(output, "                           then be written to a capture file. (Implies -W n)\n");
350
351   /*fprintf(output, "\n");*/
352   fprintf(output, "Output:\n");
353   fprintf(output, "  -w <outfile|->           write packets to a pcap-format file named \"outfile\"\n");
354   fprintf(output, "                           (or to the standard output for \"-\")\n");
355   fprintf(output, "  -C <config profile>      start with specified configuration profile\n");
356   fprintf(output, "  -F <output file type>    set the output file type, default is pcapng\n");
357   fprintf(output, "                           an empty \"-F\" option will list the file types\n");
358   fprintf(output, "  -V                       add output of packet tree        (Packet Details)\n");
359   fprintf(output, "  -O <protocols>           Only show packet details of these protocols, comma\n");
360   fprintf(output, "                           separated\n");
361   fprintf(output, "  -P                       print packet summary even when writing to a file\n");
362   fprintf(output, "  -S <separator>           the line separator to print between packets\n");
363   fprintf(output, "  -x                       add output of hex and ASCII dump (Packet Bytes)\n");
364   fprintf(output, "  -T pdml|ps|psml|text|fields\n");
365   fprintf(output, "                           format of text output (def: text)\n");
366   fprintf(output, "  -e <field>               field to print if -Tfields selected (e.g. tcp.port,\n");
367   fprintf(output, "                           _ws.col.Info)\n");
368   fprintf(output, "                           this option can be repeated to print multiple fields\n");
369   fprintf(output, "  -E<fieldsoption>=<value> set options for output when -Tfields selected:\n");
370   fprintf(output, "     header=y|n            switch headers on and off\n");
371   fprintf(output, "     separator=/t|/s|<char> select tab, space, printable character as separator\n");
372   fprintf(output, "     occurrence=f|l|a      print first, last or all occurrences of each field\n");
373   fprintf(output, "     aggregator=,|/s|<char> select comma, space, printable character as\n");
374   fprintf(output, "                           aggregator\n");
375   fprintf(output, "     quote=d|s|n           select double, single, no quotes for values\n");
376   fprintf(output, "  -t a|ad|d|dd|e|r|u|ud    output format of time stamps (def: r: rel. to first)\n");
377   fprintf(output, "  -u s|hms                 output format of seconds (def: s: seconds)\n");
378   fprintf(output, "  -l                       flush standard output after each packet\n");
379   fprintf(output, "  -q                       be more quiet on stdout (e.g. when using statistics)\n");
380   fprintf(output, "  -Q                       only log true errors to stderr (quieter than -q)\n");
381   fprintf(output, "  -g                       enable group read access on the output file(s)\n");
382   fprintf(output, "  -W n                     Save extra information in the file, if supported.\n");
383   fprintf(output, "                           n = write network address resolution information\n");
384   fprintf(output, "  -X <key>:<value>         eXtension options, see the man page for details\n");
385   fprintf(output, "  -z <statistics>          various statistics, see the man page for details\n");
386   fprintf(output, "  --capture-comment <comment>\n");
387   fprintf(output, "                           add a capture comment to the newly created\n");
388   fprintf(output, "                           output file (only for pcapng)\n");
389
390   fprintf(output, "\n");
391   fprintf(output, "Miscellaneous:\n");
392   fprintf(output, "  -h                       display this help and exit\n");
393   fprintf(output, "  -v                       display version info and exit\n");
394   fprintf(output, "  -o <name>:<value> ...    override preference setting\n");
395   fprintf(output, "  -K <keytab>              keytab file to use for kerberos decryption\n");
396   fprintf(output, "  -G [report]              dump one of several available reports and exit\n");
397   fprintf(output, "                           default report=\"fields\"\n");
398   fprintf(output, "                           use \"-G ?\" for more help\n");
399 #ifdef __linux__
400     fprintf(output, "\n");
401     fprintf(output, "WARNING: dumpcap will enable kernel BPF JIT compiler if available.\n");
402     fprintf(output, "You might want to reset it\n");
403     fprintf(output, "By doing \"echo 0 > /proc/sys/net/core/bpf_jit_enable\"\n");
404     fprintf(output, "\n");
405 #endif
406
407 }
408
409 static void
410 glossary_option_help(void)
411 {
412   FILE *output;
413
414   output = stdout;
415
416   fprintf(output, "TShark %s\n", get_ws_vcs_version_info());
417
418   fprintf(output, "\n");
419   fprintf(output, "Usage: tshark -G [report]\n");
420   fprintf(output, "\n");
421   fprintf(output, "Glossary table reports:\n");
422   fprintf(output, "  -G column-formats        dump column format codes and exit\n");
423   fprintf(output, "  -G decodes               dump \"layer type\"/\"decode as\" associations and exit\n");
424   fprintf(output, "  -G fields                dump fields glossary and exit\n");
425   fprintf(output, "  -G ftypes                dump field type basic and descriptive names\n");
426   fprintf(output, "  -G heuristic-decodes     dump heuristic dissector tables\n");
427   fprintf(output, "  -G plugins               dump installed plugins and exit\n");
428   fprintf(output, "  -G protocols             dump protocols in registration database and exit\n");
429   fprintf(output, "  -G values                dump value, range, true/false strings and exit\n");
430   fprintf(output, "\n");
431   fprintf(output, "Preference reports:\n");
432   fprintf(output, "  -G currentprefs          dump current preferences and exit\n");
433   fprintf(output, "  -G defaultprefs          dump default preferences and exit\n");
434   fprintf(output, "\n");
435 }
436
437 /*
438  * For a dissector table, print on the stream described by output,
439  * its short name (which is what's used in the "-d" option) and its
440  * descriptive name.
441  */
442 static void
443 display_dissector_table_names(const char *table_name, const char *ui_name,
444                               gpointer output)
445 {
446   if ((prev_display_dissector_name == NULL) ||
447       (strcmp(prev_display_dissector_name, table_name) != 0)) {
448      fprintf((FILE *)output, "\t%s (%s)\n", table_name, ui_name);
449      prev_display_dissector_name = table_name;
450   }
451 }
452
453 /*
454  * For a dissector handle, print on the stream described by output,
455  * the filter name (which is what's used in the "-d" option) and the full
456  * name for the protocol that corresponds to this handle.
457  */
458 static void
459 display_dissector_names(const gchar *table _U_, gpointer handle, gpointer output)
460 {
461   int          proto_id;
462   const gchar *proto_filter_name;
463   const gchar *proto_ui_name;
464
465   proto_id = dissector_handle_get_protocol_index((dissector_handle_t)handle);
466
467   if (proto_id != -1) {
468     proto_filter_name = proto_get_protocol_filter_name(proto_id);
469     proto_ui_name =  proto_get_protocol_name(proto_id);
470     g_assert(proto_filter_name != NULL);
471     g_assert(proto_ui_name != NULL);
472
473     if ((prev_display_dissector_name == NULL) ||
474         (strcmp(prev_display_dissector_name, proto_filter_name) != 0)) {
475       fprintf((FILE *)output, "\t%s (%s)\n",
476               proto_filter_name,
477               proto_ui_name);
478        prev_display_dissector_name = proto_filter_name;
479     }
480   }
481 }
482
483 /*
484  * The protocol_name_search structure is used by find_protocol_name_func()
485  * to pass parameters and store results
486  */
487 struct protocol_name_search{
488   gchar              *searched_name;  /* Protocol filter name we are looking for */
489   dissector_handle_t  matched_handle; /* Handle for a dissector whose protocol has the specified filter name */
490   guint               nb_match;       /* How many dissectors matched searched_name */
491 };
492 typedef struct protocol_name_search *protocol_name_search_t;
493
494 /*
495  * This function parses all dissectors associated with a table to find the
496  * one whose protocol has the specified filter name.  It is called
497  * as a reference function in a call to dissector_table_foreach_handle.
498  * The name we are looking for, as well as the results, are stored in the
499  * protocol_name_search struct pointed to by user_data.
500  * If called using dissector_table_foreach_handle, we actually parse the
501  * whole list of dissectors.
502  */
503 static void
504 find_protocol_name_func(const gchar *table _U_, gpointer handle, gpointer user_data)
505
506 {
507   int                     proto_id;
508   const gchar            *protocol_filter_name;
509   protocol_name_search_t  search_info;
510
511   g_assert(handle);
512
513   search_info = (protocol_name_search_t)user_data;
514
515   proto_id = dissector_handle_get_protocol_index((dissector_handle_t)handle);
516   if (proto_id != -1) {
517     protocol_filter_name = proto_get_protocol_filter_name(proto_id);
518     g_assert(protocol_filter_name != NULL);
519     if (strcmp(protocol_filter_name, search_info->searched_name) == 0) {
520       /* Found a match */
521       if (search_info->nb_match == 0) {
522         /* Record this handle only if this is the first match */
523         search_info->matched_handle = (dissector_handle_t)handle; /* Record the handle for this matching dissector */
524       }
525       search_info->nb_match++;
526     }
527   }
528 }
529
530 /*
531  * Allow dissector key names to be sorted alphabetically
532  */
533
534 static gint
535 compare_dissector_key_name(gconstpointer dissector_a, gconstpointer dissector_b)
536 {
537   return strcmp((const char*)dissector_a, (const char*)dissector_b);
538 }
539
540 /*
541  * Print all layer type names supported.
542  * We send the output to the stream described by the handle output.
543  */
544
545 static void
546 fprint_all_layer_types(FILE *output)
547
548 {
549   prev_display_dissector_name = NULL;
550   dissector_all_tables_foreach_table(display_dissector_table_names, (gpointer)output, (GCompareFunc)compare_dissector_key_name);
551 }
552
553 /*
554  * Print all protocol names supported for a specific layer type.
555  * table_name contains the layer type name in which the search is performed.
556  * We send the output to the stream described by the handle output.
557  */
558
559 static void
560 fprint_all_protocols_for_layer_types(FILE *output, gchar *table_name)
561
562 {
563   prev_display_dissector_name = NULL;
564   dissector_table_foreach_handle(table_name,
565                                  display_dissector_names,
566                                  (gpointer)output);
567 }
568
569 /*
570  * The function below parses the command-line parameters for the decode as
571  * feature (a string pointer by cl_param).
572  * It checks the format of the command-line, searches for a matching table
573  * and dissector.  If a table/dissector match is not found, we display a
574  * summary of the available tables/dissectors (on stderr) and return FALSE.
575  * If everything is fine, we get the "Decode as" preference activated,
576  * then we return TRUE.
577  */
578 static gboolean
579 add_decode_as(const gchar *cl_param)
580 {
581   gchar                        *table_name;
582   guint32                       selector, selector2;
583   gchar                        *decoded_param;
584   gchar                        *remaining_param;
585   gchar                        *selector_str;
586   gchar                        *dissector_str;
587   dissector_handle_t            dissector_matching;
588   dissector_table_t             table_matching;
589   ftenum_t                      dissector_table_selector_type;
590   struct protocol_name_search   user_protocol_name;
591   guint64                       i;
592   char                          op;
593
594   /* The following code will allocate and copy the command-line options in a string pointed by decoded_param */
595
596   g_assert(cl_param);
597   decoded_param = g_strdup(cl_param);
598   g_assert(decoded_param);
599
600
601   /* The lines below will parse this string (modifying it) to extract all
602     necessary information.  Note that decoded_param is still needed since
603     strings are not copied - we just save pointers. */
604
605   /* This section extracts a layer type (table_name) from decoded_param */
606   table_name = decoded_param; /* Layer type string starts from beginning */
607
608   remaining_param = strchr(table_name, '=');
609   if (remaining_param == NULL) {
610     cmdarg_err("Parameter \"%s\" doesn't follow the template \"%s\"", cl_param, decode_as_arg_template);
611     /* If the argument does not follow the template, carry on anyway to check
612        if the table name is at least correct.  If remaining_param is NULL,
613        we'll exit anyway further down */
614   }
615   else {
616     *remaining_param = '\0'; /* Terminate the layer type string (table_name) where '=' was detected */
617   }
618
619   /* Remove leading and trailing spaces from the table name */
620   while ( table_name[0] == ' ' )
621     table_name++;
622   while ( table_name[strlen(table_name) - 1] == ' ' )
623     table_name[strlen(table_name) - 1] = '\0'; /* Note: if empty string, while loop will eventually exit */
624
625 /* The following part searches a table matching with the layer type specified */
626   table_matching = NULL;
627
628 /* Look for the requested table */
629   if ( !(*(table_name)) ) { /* Is the table name empty, if so, don't even search for anything, display a message */
630     cmdarg_err("No layer type specified"); /* Note, we don't exit here, but table_matching will remain NULL, so we exit below */
631   }
632   else {
633     table_matching = find_dissector_table(table_name);
634     if (!table_matching) {
635       cmdarg_err("Unknown layer type -- %s", table_name); /* Note, we don't exit here, but table_matching will remain NULL, so we exit below */
636     }
637   }
638
639   if (!table_matching) {
640     /* Display a list of supported layer types to help the user, if the
641        specified layer type was not found */
642     cmdarg_err("Valid layer types are:");
643     fprint_all_layer_types(stderr);
644   }
645   if (remaining_param == NULL || !table_matching) {
646     /* Exit if the layer type was not found, or if no '=' separator was found
647        (see above) */
648     g_free(decoded_param);
649     return FALSE;
650   }
651
652   if (*(remaining_param + 1) != '=') { /* Check for "==" and not only '=' */
653     cmdarg_err("WARNING: -d requires \"==\" instead of \"=\". Option will be treated as \"%s==%s\"", table_name, remaining_param + 1);
654   }
655   else {
656     remaining_param++; /* Move to the second '=' */
657     *remaining_param = '\0'; /* Remove the second '=' */
658   }
659   remaining_param++; /* Position after the layer type string */
660
661   /* This section extracts a selector value (selector_str) from decoded_param */
662
663   selector_str = remaining_param; /* Next part starts with the selector number */
664
665   remaining_param = strchr(selector_str, ',');
666   if (remaining_param == NULL) {
667     cmdarg_err("Parameter \"%s\" doesn't follow the template \"%s\"", cl_param, decode_as_arg_template);
668     /* If the argument does not follow the template, carry on anyway to check
669        if the selector value is at least correct.  If remaining_param is NULL,
670        we'll exit anyway further down */
671   }
672   else {
673     *remaining_param = '\0'; /* Terminate the selector number string (selector_str) where ',' was detected */
674   }
675
676   dissector_table_selector_type = get_dissector_table_selector_type(table_name);
677
678   switch (dissector_table_selector_type) {
679
680   case FT_UINT8:
681   case FT_UINT16:
682   case FT_UINT24:
683   case FT_UINT32:
684     /* The selector for this table is an unsigned number.  Parse it as such.
685        There's no need to remove leading and trailing spaces from the
686        selector number string, because sscanf will do that for us. */
687     switch (sscanf(selector_str, "%u%c%u", &selector, &op, &selector2)) {
688       case 1:
689         op = '\0';
690         break;
691       case 3:
692         if (op != ':' && op != '-') {
693             cmdarg_err("Invalid selector numeric range \"%s\"", selector_str);
694             g_free(decoded_param);
695             return FALSE;
696         }
697         if (op == ':') {
698             if ((selector2 == 0) || ((guint64)selector + selector2 - 1) > G_MAXUINT32) {
699                 cmdarg_err("Invalid selector numeric range \"%s\"", selector_str);
700                 g_free(decoded_param);
701                 return FALSE;
702             }
703         }
704         else if (selector2 < selector) {
705             /* We could swap them for the user, but maybe it's better to call
706              * this out as an error in case it's not what was intended? */
707             cmdarg_err("Invalid selector numeric range \"%s\"", selector_str);
708             g_free(decoded_param);
709             return FALSE;
710         }
711         break;
712       default:
713         cmdarg_err("Invalid selector number \"%s\"", selector_str);
714         g_free(decoded_param);
715         return FALSE;
716     }
717     break;
718
719   case FT_STRING:
720   case FT_STRINGZ:
721   case FT_UINT_STRING:
722   case FT_STRINGZPAD:
723     /* The selector for this table is a string. */
724     break;
725
726   default:
727     /* There are currently no dissector tables with any types other
728        than the ones listed above. */
729     g_assert_not_reached();
730   }
731
732   if (remaining_param == NULL) {
733     /* Exit if no ',' separator was found (see above) */
734     cmdarg_err("Valid protocols for layer type \"%s\" are:", table_name);
735     fprint_all_protocols_for_layer_types(stderr, table_name);
736     g_free(decoded_param);
737     return FALSE;
738   }
739
740   remaining_param++; /* Position after the selector number string */
741
742   /* This section extracts a protocol filter name (dissector_str) from decoded_param */
743
744   dissector_str = remaining_param; /* All the rest of the string is the dissector (decode as protocol) name */
745
746   /* Remove leading and trailing spaces from the dissector name */
747   while ( dissector_str[0] == ' ' )
748     dissector_str++;
749   while ( dissector_str[strlen(dissector_str) - 1] == ' ' )
750     dissector_str[strlen(dissector_str) - 1] = '\0'; /* Note: if empty string, while loop will eventually exit */
751
752   dissector_matching = NULL;
753
754   /* We now have a pointer to the handle for the requested table inside the variable table_matching */
755   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 */
756     cmdarg_err("No protocol name specified"); /* Note, we don't exit here, but dissector_matching will remain NULL, so we exit below */
757   }
758   else {
759     user_protocol_name.nb_match = 0;
760     user_protocol_name.searched_name = dissector_str;
761     user_protocol_name.matched_handle = NULL;
762
763     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 */
764
765     if (user_protocol_name.nb_match != 0) {
766       dissector_matching = user_protocol_name.matched_handle;
767       if (user_protocol_name.nb_match > 1) {
768         cmdarg_err("WARNING: Protocol \"%s\" matched %u dissectors, first one will be used", dissector_str, user_protocol_name.nb_match);
769       }
770     }
771     else {
772       /* OK, check whether the problem is that there isn't any such
773          protocol, or that there is but it's not specified as a protocol
774          that's valid for that dissector table.
775          Note, we don't exit here, but dissector_matching will remain NULL,
776          so we exit below */
777       if (proto_get_id_by_filter_name(dissector_str) == -1) {
778         /* No such protocol */
779         cmdarg_err("Unknown protocol -- \"%s\"", dissector_str);
780       } else {
781         cmdarg_err("Protocol \"%s\" isn't valid for layer type \"%s\"",
782                    dissector_str, table_name);
783       }
784     }
785   }
786
787   if (!dissector_matching) {
788     cmdarg_err("Valid protocols for layer type \"%s\" are:", table_name);
789     fprint_all_protocols_for_layer_types(stderr, table_name);
790     g_free(decoded_param);
791     return FALSE;
792   }
793
794 /* This is the end of the code that parses the command-line options.
795    All information is now stored in the variables:
796    table_name
797    selector
798    dissector_matching
799    The above variables that are strings are still pointing to areas within
800    decoded_parm.  decoded_parm thus still needs to be kept allocated in
801    until we stop needing these variables
802    decoded_param will be deallocated at each exit point of this function */
803
804
805   /* We now have a pointer to the handle for the requested dissector
806      (requested protocol) inside the variable dissector_matching */
807   switch (dissector_table_selector_type) {
808
809   case FT_UINT8:
810   case FT_UINT16:
811   case FT_UINT24:
812   case FT_UINT32:
813     /* The selector for this table is an unsigned number. */
814     if (op == '\0') {
815       dissector_change_uint(table_name, selector, dissector_matching);
816     } else if (op == ':') {
817       for (i = selector; i < (guint64)selector + selector2; i++) {
818         dissector_change_uint(table_name, (guint32)i, dissector_matching);
819       }
820     } else { /* op == '-' */
821       for (i = selector; i <= selector2; i++) {
822         dissector_change_uint(table_name, (guint32)i, dissector_matching);
823       }
824     }
825     break;
826
827   case FT_STRING:
828   case FT_STRINGZ:
829   case FT_UINT_STRING:
830   case FT_STRINGZPAD:
831     /* The selector for this table is a string. */
832     dissector_change_string(table_name, selector_str, dissector_matching);
833     break;
834
835   default:
836     /* There are currently no dissector tables with any types other
837        than the ones listed above. */
838     g_assert_not_reached();
839   }
840   g_free(decoded_param); /* "Decode As" rule has been successfully added */
841   return TRUE;
842 }
843
844 static void
845 tshark_log_handler (const gchar *log_domain, GLogLevelFlags log_level,
846     const gchar *message, gpointer user_data)
847 {
848   /* ignore log message, if log_level isn't interesting based
849      upon the console log preferences.
850      If the preferences haven't been loaded loaded yet, display the
851      message anyway.
852
853      The default console_log_level preference value is such that only
854        ERROR, CRITICAL and WARNING level messages are processed;
855        MESSAGE, INFO and DEBUG level messages are ignored.
856
857      XXX: Aug 07, 2009: Prior tshark g_log code was hardwired to process only
858            ERROR and CRITICAL level messages so the current code is a behavioral
859            change.  The current behavior is the same as in Wireshark.
860   */
861   if ((log_level & G_LOG_LEVEL_MASK & prefs.console_log_level) == 0 &&
862      prefs.console_log_level != 0) {
863     return;
864   }
865
866   g_log_default_handler(log_domain, log_level, message, user_data);
867
868 }
869
870 static char *
871 output_file_description(const char *fname)
872 {
873   char *save_file_string;
874
875   /* Get a string that describes what we're writing to */
876   if (strcmp(fname, "-") == 0) {
877     /* We're writing to the standard output */
878     save_file_string = g_strdup("standard output");
879   } else {
880     /* We're writing to a file with the name in save_file */
881     save_file_string = g_strdup_printf("file \"%s\"", fname);
882   }
883   return save_file_string;
884 }
885
886 static void
887 print_current_user(void) {
888   gchar *cur_user, *cur_group;
889
890   if (started_with_special_privs()) {
891     cur_user = get_cur_username();
892     cur_group = get_cur_groupname();
893     fprintf(stderr, "Running as user \"%s\" and group \"%s\".",
894       cur_user, cur_group);
895     g_free(cur_user);
896     g_free(cur_group);
897     if (running_with_special_privs()) {
898       fprintf(stderr, " This could be dangerous.");
899     }
900     fprintf(stderr, "\n");
901   }
902 }
903
904 static void
905 show_version(GString *comp_info_str, GString *runtime_info_str)
906 {
907   printf("TShark %s\n"
908          "\n"
909          "%s"
910          "\n"
911          "%s"
912          "\n"
913          "%s",
914          get_ws_vcs_version_info(), get_copyright_info(), comp_info_str->str,
915          runtime_info_str->str);
916 }
917
918 static void
919 get_tshark_runtime_info(GString *str)
920 {
921 #ifdef HAVE_LIBPCAP
922     /* Libpcap */
923     g_string_append(str, ", ");
924     get_runtime_pcap_version(str);
925 #endif
926
927     /* zlib */
928 #if defined(HAVE_LIBZ) && !defined(_WIN32)
929     g_string_append_printf(str, ", with libz %s", zlibVersion());
930 #endif
931
932     /* stuff used by libwireshark */
933     epan_get_runtime_version_info(str);
934 }
935
936 int
937 main(int argc, char *argv[])
938 {
939   GString             *comp_info_str;
940   GString             *runtime_info_str;
941   char                *init_progfile_dir_error;
942   int                  opt;
943   static const struct option long_options[] = {
944     {(char *)"help", no_argument, NULL, 'h'},
945     {(char *)"version", no_argument, NULL, 'v'},
946     LONGOPT_CAPTURE_COMMON
947     {0, 0, 0, 0 }
948   };
949   gboolean             arg_error = FALSE;
950
951 #ifdef _WIN32
952   WSADATA              wsaData;
953 #endif  /* _WIN32 */
954
955   char                *gpf_path, *pf_path;
956   char                *gdp_path, *dp_path;
957   int                  gpf_open_errno, gpf_read_errno;
958   int                  pf_open_errno, pf_read_errno;
959   int                  gdp_open_errno, gdp_read_errno;
960   int                  dp_open_errno, dp_read_errno;
961   int                  err;
962   volatile int         exit_status = 0;
963 #ifdef HAVE_LIBPCAP
964   gboolean             list_link_layer_types = FALSE;
965   gboolean             start_capture = FALSE;
966   int                  status;
967   GList               *if_list;
968   gchar               *err_str;
969 #else
970   gboolean             capture_option_specified = FALSE;
971 #endif
972   gboolean             quiet = FALSE;
973 #ifdef PCAP_NG_DEFAULT
974   volatile int         out_file_type = WTAP_FILE_TYPE_SUBTYPE_PCAPNG;
975 #else
976   volatile int         out_file_type = WTAP_FILE_TYPE_SUBTYPE_PCAP;
977 #endif
978   volatile gboolean    out_file_name_res = FALSE;
979   volatile int         in_file_type = WTAP_TYPE_AUTO;
980   gchar               *volatile cf_name = NULL;
981   gchar               *rfilter = NULL;
982   gchar               *dfilter = NULL;
983 #ifdef HAVE_PCAP_OPEN_DEAD
984   struct bpf_program   fcode;
985 #endif
986   dfilter_t           *rfcode = NULL;
987   dfilter_t           *dfcode = NULL;
988   e_prefs             *prefs_p;
989   char                 badopt;
990   int                  log_flags;
991   int                  optind_initial;
992   gchar               *output_only = NULL;
993
994 /* the leading - ensures that getopt() does not permute the argv[] entries
995    we have to make sure that the first getopt() preserves the content of argv[]
996    for the subsequent getopt_long() call */
997 #define OPTSTRING "-2" OPTSTRING_CAPTURE_COMMON "C:d:e:E:F:gG:hH:" "K:lnN:o:O:PqQr:R:S:t:T:u:vVw:W:xX:Y:z:"
998
999   static const char    optstring[] = OPTSTRING;
1000
1001 #ifdef _WIN32
1002   /* Load wpcap if possible. Do this before collecting the run-time version information */
1003   load_wpcap();
1004
1005   /* Warn the user if npf.sys isn't loaded. */
1006   if (!npf_sys_is_running() && get_windows_major_version() >= 6) {
1007     fprintf(stderr, "The NPF driver isn't running.  You may have trouble "
1008       "capturing or\nlisting interfaces.\n");
1009   }
1010 #endif
1011
1012   /* Assemble the compile-time version information string */
1013   comp_info_str = g_string_new("Compiled ");
1014   get_compiled_version_info(comp_info_str, NULL, epan_get_compiled_version_info);
1015
1016   /* Assemble the run-time version information string */
1017   runtime_info_str = g_string_new("Running ");
1018   get_runtime_version_info(runtime_info_str, get_tshark_runtime_info);
1019
1020   /* Add it to the information to be reported on a crash. */
1021   ws_add_crash_info("TShark %s\n"
1022          "\n"
1023          "%s"
1024          "\n"
1025          "%s",
1026       get_ws_vcs_version_info(), comp_info_str->str, runtime_info_str->str);
1027
1028 #ifdef _WIN32
1029   arg_list_utf_16to8(argc, argv);
1030   create_app_running_mutex();
1031 #if !GLIB_CHECK_VERSION(2,31,0)
1032   g_thread_init(NULL);
1033 #endif
1034 #endif /* _WIN32 */
1035
1036   /*
1037    * Get credential information for later use.
1038    */
1039   init_process_policies();
1040
1041   /*
1042    * Attempt to get the pathname of the executable file.
1043    */
1044   init_progfile_dir_error = init_progfile_dir(argv[0], main);
1045   if (init_progfile_dir_error != NULL) {
1046     fprintf(stderr, "tshark: Can't get pathname of tshark program: %s.\n",
1047             init_progfile_dir_error);
1048   }
1049
1050   /*
1051    * In order to have the -X opts assigned before the wslua machine starts
1052    * we need to call getopts before epan_init() gets called.
1053    */
1054   opterr = 0;
1055   optind_initial = optind;
1056
1057   while ((opt = getopt(argc, argv, optstring)) != -1) {
1058     switch (opt) {
1059     case 'C':        /* Configuration Profile */
1060       if (profile_exists (optarg, FALSE)) {
1061         set_profile_name (optarg);
1062       } else {
1063         cmdarg_err("Configuration Profile \"%s\" does not exist", optarg);
1064         return 1;
1065       }
1066       break;
1067     case 'P':        /* Print packet summary info even when writing to a file */
1068       print_packet_info = TRUE;
1069       print_summary = TRUE;
1070       break;
1071     case 'O':        /* Only output these protocols */
1072       output_only = g_strdup(optarg);
1073       /* FALLTHROUGH */
1074     case 'V':        /* Verbose */
1075       print_details = TRUE;
1076       print_packet_info = TRUE;
1077       break;
1078     case 'x':        /* Print packet data in hex (and ASCII) */
1079       print_hex = TRUE;
1080       /*  The user asked for hex output, so let's ensure they get it,
1081        *  even if they're writing to a file.
1082        */
1083       print_packet_info = TRUE;
1084       break;
1085     case 'X':
1086       ex_opt_add(optarg);
1087       break;
1088     default:
1089       break;
1090     }
1091   }
1092
1093   /*
1094    * Print packet summary information is the default, unless either -V or -x
1095    * were specified and -P was not.  Note that this is new behavior, which
1096    * allows for the possibility of printing only hex/ascii output without
1097    * necessarily requiring that either the summary or details be printed too.
1098    */
1099   if (print_summary == -1)
1100     print_summary = (print_details || print_hex) ? FALSE : TRUE;
1101
1102   optind = optind_initial;
1103   opterr = 1;
1104
1105
1106
1107 /** Send All g_log messages to our own handler **/
1108
1109   log_flags =
1110                     G_LOG_LEVEL_ERROR|
1111                     G_LOG_LEVEL_CRITICAL|
1112                     G_LOG_LEVEL_WARNING|
1113                     G_LOG_LEVEL_MESSAGE|
1114                     G_LOG_LEVEL_INFO|
1115                     G_LOG_LEVEL_DEBUG|
1116                     G_LOG_FLAG_FATAL|G_LOG_FLAG_RECURSION;
1117
1118   g_log_set_handler(NULL,
1119                     (GLogLevelFlags)log_flags,
1120                     tshark_log_handler, NULL /* user_data */);
1121   g_log_set_handler(LOG_DOMAIN_MAIN,
1122                     (GLogLevelFlags)log_flags,
1123                     tshark_log_handler, NULL /* user_data */);
1124
1125 #ifdef HAVE_LIBPCAP
1126   g_log_set_handler(LOG_DOMAIN_CAPTURE,
1127                     (GLogLevelFlags)log_flags,
1128                     tshark_log_handler, NULL /* user_data */);
1129   g_log_set_handler(LOG_DOMAIN_CAPTURE_CHILD,
1130                     (GLogLevelFlags)log_flags,
1131                     tshark_log_handler, NULL /* user_data */);
1132 #endif
1133
1134   initialize_funnel_ops();
1135
1136   init_report_err(failure_message, open_failure_message, read_failure_message,
1137                   write_failure_message);
1138
1139 #ifdef HAVE_LIBPCAP
1140   capture_opts_init(&global_capture_opts);
1141   capture_session_init(&global_capture_session, (void *)&cfile);
1142 #endif
1143
1144   timestamp_set_type(TS_RELATIVE);
1145   timestamp_set_precision(TS_PREC_AUTO);
1146   timestamp_set_seconds_type(TS_SECONDS_DEFAULT);
1147
1148   init_open_routines();
1149
1150 #ifdef HAVE_PLUGINS
1151   /* Register all the plugin types we have. */
1152   epan_register_plugin_types(); /* Types known to libwireshark */
1153   wtap_register_plugin_types(); /* Types known to libwiretap */
1154
1155   /* Scan for plugins.  This does *not* call their registration routines;
1156      that's done later. */
1157   scan_plugins();
1158
1159   /* Register all libwiretap plugin modules. */
1160   register_all_wiretap_modules();
1161 #endif
1162
1163   /* Register all dissectors; we must do this before checking for the
1164      "-G" flag, as the "-G" flag dumps information registered by the
1165      dissectors, and we must do it before we read the preferences, in
1166      case any dissectors register preferences. */
1167   epan_init(register_all_protocols, register_all_protocol_handoffs, NULL, NULL);
1168
1169   /* Register all tap listeners; we do this before we parse the arguments,
1170      as the "-z" argument can specify a registered tap. */
1171
1172   /* we register the plugin taps before the other taps because
1173      stats_tree taps plugins will be registered as tap listeners
1174      by stats_tree_stat.c and need to registered before that */
1175 #ifdef HAVE_PLUGINS
1176   register_all_plugin_tap_listeners();
1177 #endif
1178   register_all_tap_listeners();
1179
1180   /* If invoked with the "-G" flag, we dump out information based on
1181      the argument to the "-G" flag; if no argument is specified,
1182      for backwards compatibility we dump out a glossary of display
1183      filter symbols.
1184
1185      XXX - we do this here, for now, to support "-G" with no arguments.
1186      If none of our build or other processes uses "-G" with no arguments,
1187      we can just process it with the other arguments. */
1188   if (argc >= 2 && strcmp(argv[1], "-G") == 0) {
1189     proto_initialize_all_prefixes();
1190
1191     if (argc == 2)
1192       proto_registrar_dump_fields();
1193     else {
1194       if (strcmp(argv[2], "column-formats") == 0)
1195         column_dump_column_formats();
1196       else if (strcmp(argv[2], "currentprefs") == 0) {
1197         read_prefs(&gpf_open_errno, &gpf_read_errno, &gpf_path,
1198             &pf_open_errno, &pf_read_errno, &pf_path);
1199         write_prefs(NULL);
1200       }
1201       else if (strcmp(argv[2], "decodes") == 0)
1202         dissector_dump_decodes();
1203       else if (strcmp(argv[2], "defaultprefs") == 0)
1204         write_prefs(NULL);
1205       else if (strcmp(argv[2], "fields") == 0)
1206         proto_registrar_dump_fields();
1207       else if (strcmp(argv[2], "ftypes") == 0)
1208         proto_registrar_dump_ftypes();
1209       else if (strcmp(argv[2], "heuristic-decodes") == 0)
1210         dissector_dump_heur_decodes();
1211       else if (strcmp(argv[2], "plugins") == 0) {
1212 #ifdef HAVE_PLUGINS
1213         plugins_dump_all();
1214 #endif
1215 #ifdef HAVE_LUA
1216         wslua_plugins_dump_all();
1217 #endif
1218       }
1219       else if (strcmp(argv[2], "protocols") == 0)
1220         proto_registrar_dump_protocols();
1221       else if (strcmp(argv[2], "values") == 0)
1222         proto_registrar_dump_values();
1223       else if (strcmp(argv[2], "?") == 0)
1224         glossary_option_help();
1225       else if (strcmp(argv[2], "-?") == 0)
1226         glossary_option_help();
1227       else {
1228         cmdarg_err("Invalid \"%s\" option for -G flag, enter -G ? for more help.", argv[2]);
1229         return 1;
1230       }
1231     }
1232     return 0;
1233   }
1234
1235   /* Set the C-language locale to the native environment. */
1236   setlocale(LC_ALL, "");
1237
1238   prefs_p = read_prefs(&gpf_open_errno, &gpf_read_errno, &gpf_path,
1239                      &pf_open_errno, &pf_read_errno, &pf_path);
1240   if (gpf_path != NULL) {
1241     if (gpf_open_errno != 0) {
1242       cmdarg_err("Can't open global preferences file \"%s\": %s.",
1243               pf_path, g_strerror(gpf_open_errno));
1244     }
1245     if (gpf_read_errno != 0) {
1246       cmdarg_err("I/O error reading global preferences file \"%s\": %s.",
1247               pf_path, g_strerror(gpf_read_errno));
1248     }
1249   }
1250   if (pf_path != NULL) {
1251     if (pf_open_errno != 0) {
1252       cmdarg_err("Can't open your preferences file \"%s\": %s.", pf_path,
1253               g_strerror(pf_open_errno));
1254     }
1255     if (pf_read_errno != 0) {
1256       cmdarg_err("I/O error reading your preferences file \"%s\": %s.",
1257               pf_path, g_strerror(pf_read_errno));
1258     }
1259     g_free(pf_path);
1260     pf_path = NULL;
1261   }
1262
1263   /* Read the disabled protocols file. */
1264   read_disabled_protos_list(&gdp_path, &gdp_open_errno, &gdp_read_errno,
1265                             &dp_path, &dp_open_errno, &dp_read_errno);
1266   if (gdp_path != NULL) {
1267     if (gdp_open_errno != 0) {
1268       cmdarg_err("Could not open global disabled protocols file\n\"%s\": %s.",
1269                  gdp_path, g_strerror(gdp_open_errno));
1270     }
1271     if (gdp_read_errno != 0) {
1272       cmdarg_err("I/O error reading global disabled protocols file\n\"%s\": %s.",
1273                  gdp_path, g_strerror(gdp_read_errno));
1274     }
1275     g_free(gdp_path);
1276   }
1277   if (dp_path != NULL) {
1278     if (dp_open_errno != 0) {
1279       cmdarg_err(
1280         "Could not open your disabled protocols file\n\"%s\": %s.", dp_path,
1281         g_strerror(dp_open_errno));
1282     }
1283     if (dp_read_errno != 0) {
1284       cmdarg_err(
1285         "I/O error reading your disabled protocols file\n\"%s\": %s.", dp_path,
1286         g_strerror(dp_read_errno));
1287     }
1288     g_free(dp_path);
1289   }
1290
1291   cap_file_init(&cfile);
1292
1293   /* Print format defaults to this. */
1294   print_format = PR_FMT_TEXT;
1295
1296   output_fields = output_fields_new();
1297
1298   /* Now get our args */
1299   while ((opt = getopt_long(argc, argv, optstring, long_options, NULL)) != -1) {
1300     switch (opt) {
1301     case '2':        /* Perform two pass analysis */
1302       perform_two_pass_analysis = TRUE;
1303       break;
1304     case 'a':        /* autostop criteria */
1305     case 'b':        /* Ringbuffer option */
1306     case 'c':        /* Capture x packets */
1307     case 'f':        /* capture filter */
1308     case 'g':        /* enable group read access on file(s) */
1309     case 'i':        /* Use interface x */
1310     case 'p':        /* Don't capture in promiscuous mode */
1311 #ifdef HAVE_PCAP_REMOTE
1312     case 'A':        /* Authentication */
1313 #endif
1314 #ifdef HAVE_PCAP_CREATE
1315     case 'I':        /* Capture in monitor mode, if available */
1316 #endif
1317     case 's':        /* Set the snapshot (capture) length */
1318     case 'w':        /* Write to capture file x */
1319     case 'y':        /* Set the pcap data link type */
1320     case  LONGOPT_NUM_CAP_COMMENT: /* add a capture comment */
1321 #if defined(_WIN32) || defined(HAVE_PCAP_CREATE)
1322     case 'B':        /* Buffer size */
1323 #endif /* _WIN32 or HAVE_PCAP_CREATE */
1324 #ifdef HAVE_LIBPCAP
1325       status = capture_opts_add_opt(&global_capture_opts, opt, optarg, &start_capture);
1326       if (status != 0) {
1327         return status;
1328       }
1329 #else
1330       if (opt == 'w') {
1331         /*
1332          * Output file name, if we're reading a file and writing to another
1333          * file.
1334          */
1335         output_file_name = optarg;
1336       } else {
1337         capture_option_specified = TRUE;
1338         arg_error = TRUE;
1339       }
1340 #endif
1341       break;
1342     case 'C':
1343       /* Configuration profile settings were already processed just ignore them this time*/
1344       break;
1345     case 'd':        /* Decode as rule */
1346       if (!add_decode_as(optarg))
1347         return 1;
1348       break;
1349 #if defined(HAVE_HEIMDAL_KERBEROS) || defined(HAVE_MIT_KERBEROS)
1350     case 'K':        /* Kerberos keytab file */
1351       read_keytab_file(optarg);
1352       break;
1353 #endif
1354     case 'D':        /* Print a list of capture devices and exit */
1355 #ifdef HAVE_LIBPCAP
1356       if_list = capture_interface_list(&err, &err_str,NULL);
1357       if (if_list == NULL) {
1358         switch (err) {
1359         case CANT_GET_INTERFACE_LIST:
1360         case DONT_HAVE_PCAP:
1361           cmdarg_err("%s", err_str);
1362           g_free(err_str);
1363           break;
1364
1365         case NO_INTERFACES_FOUND:
1366           cmdarg_err("There are no interfaces on which a capture can be done");
1367           break;
1368         }
1369         return 2;
1370       }
1371       capture_opts_print_interfaces(if_list);
1372       free_interface_list(if_list);
1373       return 0;
1374 #else
1375       capture_option_specified = TRUE;
1376       arg_error = TRUE;
1377 #endif
1378       break;
1379     case 'e':
1380       /* Field entry */
1381       output_fields_add(output_fields, optarg);
1382       break;
1383     case 'E':
1384       /* Field option */
1385       if (!output_fields_set_option(output_fields, optarg)) {
1386         cmdarg_err("\"%s\" is not a valid field output option=value pair.", optarg);
1387         output_fields_list_options(stderr);
1388         return 1;
1389       }
1390       break;
1391     case 'F':
1392       out_file_type = wtap_short_string_to_file_type_subtype(optarg);
1393       if (out_file_type < 0) {
1394         cmdarg_err("\"%s\" isn't a valid capture file type", optarg);
1395         list_capture_types();
1396         return 1;
1397       }
1398       break;
1399     case 'W':        /* Select extra information to save in our capture file */
1400       /* This is patterned after the -N flag which may not be the best idea. */
1401       if (strchr(optarg, 'n')) {
1402         out_file_name_res = TRUE;
1403       } else {
1404         cmdarg_err("Invalid -W argument \"%s\"; it must be one of:", optarg);
1405         cmdarg_err_cont("\t'n' write network address resolution information (pcapng only)");
1406         return 1;
1407       }
1408       break;
1409     case 'H':        /* Read address to name mappings from a hosts file */
1410       if (! add_hosts_file(optarg))
1411       {
1412         cmdarg_err("Can't read host entries from \"%s\"", optarg);
1413         return 1;
1414       }
1415       out_file_name_res = TRUE;
1416       break;
1417
1418     case 'h':        /* Print help and exit */
1419       print_usage(TRUE);
1420       return 0;
1421       break;
1422     case 'l':        /* "Line-buffer" standard output */
1423       /* This isn't line-buffering, strictly speaking, it's just
1424          flushing the standard output after the information for
1425          each packet is printed; however, that should be good
1426          enough for all the purposes to which "-l" is put (and
1427          is probably actually better for "-V", as it does fewer
1428          writes).
1429
1430          See the comment in "process_packet()" for an explanation of
1431          why we do that, and why we don't just use "setvbuf()" to
1432          make the standard output line-buffered (short version: in
1433          Windows, "line-buffered" is the same as "fully-buffered",
1434          and the output buffer is only flushed when it fills up). */
1435       line_buffered = TRUE;
1436       break;
1437     case 'L':        /* Print list of link-layer types and exit */
1438 #ifdef HAVE_LIBPCAP
1439       list_link_layer_types = TRUE;
1440 #else
1441       capture_option_specified = TRUE;
1442       arg_error = TRUE;
1443 #endif
1444       break;
1445     case 'n':        /* No name resolution */
1446       gbl_resolv_flags.mac_name = FALSE;
1447       gbl_resolv_flags.network_name = FALSE;
1448       gbl_resolv_flags.transport_name = FALSE;
1449       gbl_resolv_flags.concurrent_dns = FALSE;
1450       break;
1451     case 'N':        /* Select what types of addresses/port #s to resolve */
1452       badopt = string_to_name_resolve(optarg, &gbl_resolv_flags);
1453       if (badopt != '\0') {
1454         cmdarg_err("-N specifies unknown resolving option '%c'; valid options are:",
1455                    badopt);
1456         cmdarg_err_cont("\t'C' to enable concurrent (asynchronous) DNS lookups\n"
1457                         "\t'm' to enable MAC address resolution\n"
1458                         "\t'n' to enable network address resolution\n"
1459                         "\t'N' to enable using external resolvers (e.g., DNS)\n"
1460                         "\t    for network address resolution\n"
1461                         "\t't' to enable transport-layer port number resolution");
1462         return 1;
1463       }
1464       break;
1465     case 'o':        /* Override preference from command line */
1466       switch (prefs_set_pref(optarg)) {
1467
1468       case PREFS_SET_OK:
1469         break;
1470
1471       case PREFS_SET_SYNTAX_ERR:
1472         cmdarg_err("Invalid -o flag \"%s\"", optarg);
1473         return 1;
1474         break;
1475
1476       case PREFS_SET_NO_SUCH_PREF:
1477       case PREFS_SET_OBSOLETE:
1478         cmdarg_err("-o flag \"%s\" specifies unknown preference", optarg);
1479         return 1;
1480         break;
1481       }
1482       break;
1483     case 'q':        /* Quiet */
1484       quiet = TRUE;
1485       break;
1486     case 'Q':        /* Really quiet */
1487       quiet = TRUE;
1488       really_quiet = TRUE;
1489       break;
1490     case 'r':        /* Read capture file x */
1491       cf_name = g_strdup(optarg);
1492       break;
1493     case 'R':        /* Read file filter */
1494       rfilter = optarg;
1495       break;
1496     case 'P':
1497         /* already processed; just ignore it now */
1498         break;
1499     case 'S':        /* Set the line Separator to be printed between packets */
1500       separator = optarg;
1501       break;
1502     case 't':        /* Time stamp type */
1503       if (strcmp(optarg, "r") == 0)
1504         timestamp_set_type(TS_RELATIVE);
1505       else if (strcmp(optarg, "a") == 0)
1506         timestamp_set_type(TS_ABSOLUTE);
1507       else if (strcmp(optarg, "ad") == 0)
1508         timestamp_set_type(TS_ABSOLUTE_WITH_YMD);
1509       else if (strcmp(optarg, "adoy") == 0)
1510         timestamp_set_type(TS_ABSOLUTE_WITH_YDOY);
1511       else if (strcmp(optarg, "d") == 0)
1512         timestamp_set_type(TS_DELTA);
1513       else if (strcmp(optarg, "dd") == 0)
1514         timestamp_set_type(TS_DELTA_DIS);
1515       else if (strcmp(optarg, "e") == 0)
1516         timestamp_set_type(TS_EPOCH);
1517       else if (strcmp(optarg, "u") == 0)
1518         timestamp_set_type(TS_UTC);
1519       else if (strcmp(optarg, "ud") == 0)
1520         timestamp_set_type(TS_UTC_WITH_YMD);
1521       else if (strcmp(optarg, "udoy") == 0)
1522         timestamp_set_type(TS_UTC_WITH_YDOY);
1523       else {
1524         cmdarg_err("Invalid time stamp type \"%s\"; it must be one of:", optarg);
1525         cmdarg_err_cont("\t\"a\"    for absolute\n"
1526                         "\t\"ad\"   for absolute with YYYY-MM-DD date\n"
1527                         "\t\"adoy\" for absolute with YYYY/DOY date\n"
1528                         "\t\"d\"    for delta\n"
1529                         "\t\"dd\"   for delta displayed\n"
1530                         "\t\"e\"    for epoch\n"
1531                         "\t\"r\"    for relative\n"
1532                         "\t\"u\"    for absolute UTC\n"
1533                         "\t\"ud\"   for absolute UTC with YYYY-MM-DD date\n"
1534                         "\t\"udoy\" for absolute UTC with YYYY/DOY date");
1535         return 1;
1536       }
1537       break;
1538     case 'T':        /* printing Type */
1539       print_packet_info = TRUE;
1540       if (strcmp(optarg, "text") == 0) {
1541         output_action = WRITE_TEXT;
1542         print_format = PR_FMT_TEXT;
1543       } else if (strcmp(optarg, "ps") == 0) {
1544         output_action = WRITE_TEXT;
1545         print_format = PR_FMT_PS;
1546       } else if (strcmp(optarg, "pdml") == 0) {
1547         output_action = WRITE_XML;
1548         print_details = TRUE;   /* Need details */
1549         print_summary = FALSE;  /* Don't allow summary */
1550       } else if (strcmp(optarg, "psml") == 0) {
1551         output_action = WRITE_XML;
1552         print_details = FALSE;  /* Don't allow details */
1553         print_summary = TRUE;   /* Need summary */
1554       } else if (strcmp(optarg, "fields") == 0) {
1555         output_action = WRITE_FIELDS;
1556         print_details = TRUE;   /* Need full tree info */
1557         print_summary = FALSE;  /* Don't allow summary */
1558       } else {
1559         cmdarg_err("Invalid -T parameter \"%s\"; it must be one of:", optarg);                   /* x */
1560         cmdarg_err_cont("\t\"fields\" The values of fields specified with the -e option, in a form\n"
1561                         "\t         specified by the -E option.\n"
1562                         "\t\"pdml\"   Packet Details Markup Language, an XML-based format for the\n"
1563                         "\t         details of a decoded packet. This information is equivalent to\n"
1564                         "\t         the packet details printed with the -V flag.\n"
1565                         "\t\"ps\"     PostScript for a human-readable one-line summary of each of\n"
1566                         "\t         the packets, or a multi-line view of the details of each of\n"
1567                         "\t         the packets, depending on whether the -V flag was specified.\n"
1568                         "\t\"psml\"   Packet Summary Markup Language, an XML-based format for the\n"
1569                         "\t         summary information of a decoded packet. This information is\n"
1570                         "\t         equivalent to the information shown in the one-line summary\n"
1571                         "\t         printed by default.\n"
1572                         "\t\"text\"   Text of a human-readable one-line summary of each of the\n"
1573                         "\t         packets, or a multi-line view of the details of each of the\n"
1574                         "\t         packets, depending on whether the -V flag was specified.\n"
1575                         "\t         This is the default.");
1576         return 1;
1577       }
1578       break;
1579     case 'u':        /* Seconds type */
1580       if (strcmp(optarg, "s") == 0)
1581         timestamp_set_seconds_type(TS_SECONDS_DEFAULT);
1582       else if (strcmp(optarg, "hms") == 0)
1583         timestamp_set_seconds_type(TS_SECONDS_HOUR_MIN_SEC);
1584       else {
1585         cmdarg_err("Invalid seconds type \"%s\"; it must be one of:", optarg);
1586         cmdarg_err_cont("\t\"s\"   for seconds\n"
1587                         "\t\"hms\" for hours, minutes and seconds");
1588         return 1;
1589       }
1590       break;
1591     case 'v':         /* Show version and exit */
1592     {
1593       show_version(comp_info_str, runtime_info_str);
1594       g_string_free(comp_info_str, TRUE);
1595       g_string_free(runtime_info_str, TRUE);
1596       /* We don't really have to cleanup here, but it's a convenient way to test
1597        * start-up and shut-down of the epan library without any UI-specific
1598        * cruft getting in the way. Makes the results of running
1599        * $ ./tools/valgrind-wireshark -n
1600        * much more useful. */
1601       epan_cleanup();
1602       return 0;
1603     }
1604     case 'O':        /* Only output these protocols */
1605       /* already processed; just ignore it now */
1606       break;
1607     case 'V':        /* Verbose */
1608       /* already processed; just ignore it now */
1609       break;
1610     case 'x':        /* Print packet data in hex (and ASCII) */
1611       /* already processed; just ignore it now */
1612       break;
1613     case 'X':
1614       break;
1615     case 'Y':
1616       dfilter = optarg;
1617       break;
1618     case 'z':
1619       /* We won't call the init function for the stat this soon
1620          as it would disallow MATE's fields (which are registered
1621          by the preferences set callback) from being used as
1622          part of a tap filter.  Instead, we just add the argument
1623          to a list of stat arguments. */
1624       if (!process_stat_cmd_arg(optarg)) {
1625         if (strcmp("help", optarg)==0) {
1626           fprintf(stderr, "tshark: The available statistics for the \"-z\" option are:\n");
1627           list_stat_cmd_args();
1628           return 0;
1629         }
1630         cmdarg_err("Invalid -z argument \"%s\"; it must be one of:", optarg);
1631         list_stat_cmd_args();
1632         return 1;
1633       }
1634       break;
1635     default:
1636     case '?':        /* Bad flag - print usage message */
1637       switch(optopt) {
1638       case 'F':
1639         list_capture_types();
1640         break;
1641       default:
1642         print_usage(TRUE);
1643       }
1644       return 1;
1645       break;
1646     }
1647   }
1648
1649   /* If we specified output fields, but not the output field type... */
1650   if (WRITE_FIELDS != output_action && 0 != output_fields_num_fields(output_fields)) {
1651         cmdarg_err("Output fields were specified with \"-e\", "
1652             "but \"-Tfields\" was not specified.");
1653         return 1;
1654   } else if (WRITE_FIELDS == output_action && 0 == output_fields_num_fields(output_fields)) {
1655         cmdarg_err("\"-Tfields\" was specified, but no fields were "
1656                     "specified with \"-e\".");
1657
1658         return 1;
1659   }
1660
1661   /* If no capture filter or display filter has been specified, and there are
1662      still command-line arguments, treat them as the tokens of a capture
1663      filter (if no "-r" flag was specified) or a display filter (if a "-r"
1664      flag was specified. */
1665   if (optind < argc) {
1666     if (cf_name != NULL) {
1667       if (dfilter != NULL) {
1668         cmdarg_err("Display filters were specified both with \"-d\" "
1669             "and with additional command-line arguments.");
1670         return 1;
1671       }
1672       dfilter = get_args_as_string(argc, argv, optind);
1673     } else {
1674 #ifdef HAVE_LIBPCAP
1675       guint i;
1676
1677       if (global_capture_opts.default_options.cfilter) {
1678         cmdarg_err("A default capture filter was specified both with \"-f\""
1679             " and with additional command-line arguments.");
1680         return 1;
1681       }
1682       for (i = 0; i < global_capture_opts.ifaces->len; i++) {
1683         interface_options interface_opts;
1684         interface_opts = g_array_index(global_capture_opts.ifaces, interface_options, i);
1685         if (interface_opts.cfilter == NULL) {
1686           interface_opts.cfilter = get_args_as_string(argc, argv, optind);
1687           global_capture_opts.ifaces = g_array_remove_index(global_capture_opts.ifaces, i);
1688           g_array_insert_val(global_capture_opts.ifaces, i, interface_opts);
1689         } else {
1690           cmdarg_err("A capture filter was specified both with \"-f\""
1691               " and with additional command-line arguments.");
1692           return 1;
1693         }
1694       }
1695       global_capture_opts.default_options.cfilter = get_args_as_string(argc, argv, optind);
1696 #else
1697       capture_option_specified = TRUE;
1698 #endif
1699     }
1700   }
1701
1702 #ifdef HAVE_LIBPCAP
1703   if (!global_capture_opts.saving_to_file) {
1704     /* We're not saving the capture to a file; if "-q" wasn't specified,
1705        we should print packet information */
1706     if (!quiet)
1707       print_packet_info = TRUE;
1708   } else {
1709     /* We're saving to a file; if we're writing to the standard output.
1710        and we'll also be writing dissected packets to the standard
1711        output, reject the request.  At best, we could redirect that
1712        to the standard error; we *can't* write both to the standard
1713        output and have either of them be useful. */
1714     if (strcmp(global_capture_opts.save_file, "-") == 0 && print_packet_info) {
1715       cmdarg_err("You can't write both raw packet data and dissected packets"
1716           " to the standard output.");
1717       return 1;
1718     }
1719   }
1720 #else
1721   /* We're not saving the capture to a file; if "-q" wasn't specified,
1722      we should print packet information */
1723   if (!quiet)
1724     print_packet_info = TRUE;
1725 #endif
1726
1727 #ifndef HAVE_LIBPCAP
1728   if (capture_option_specified)
1729     cmdarg_err("This version of TShark was not built with support for capturing packets.");
1730 #endif
1731   if (arg_error) {
1732     print_usage(FALSE);
1733     return 1;
1734   }
1735
1736   if (print_hex) {
1737     if (output_action != WRITE_TEXT) {
1738       cmdarg_err("Raw packet hex data can only be printed as text or PostScript");
1739       return 1;
1740     }
1741   }
1742
1743   if (output_only != NULL) {
1744     char *ps;
1745
1746     if (!print_details) {
1747       cmdarg_err("-O requires -V");
1748       return 1;
1749     }
1750
1751     output_only_tables = g_hash_table_new (g_str_hash, g_str_equal);
1752     for (ps = strtok (output_only, ","); ps; ps = strtok (NULL, ",")) {
1753       g_hash_table_insert(output_only_tables, (gpointer)ps, (gpointer)ps);
1754     }
1755   }
1756
1757   if (rfilter != NULL && !perform_two_pass_analysis) {
1758     cmdarg_err("-R without -2 is deprecated. For single-pass filtering use -Y.");
1759     return 1;
1760   }
1761
1762 #ifdef HAVE_LIBPCAP
1763   if (list_link_layer_types) {
1764     /* We're supposed to list the link-layer types for an interface;
1765        did the user also specify a capture file to be read? */
1766     if (cf_name) {
1767       /* Yes - that's bogus. */
1768       cmdarg_err("You can't specify -L and a capture file to be read.");
1769       return 1;
1770     }
1771     /* No - did they specify a ring buffer option? */
1772     if (global_capture_opts.multi_files_on) {
1773       cmdarg_err("Ring buffer requested, but a capture isn't being done.");
1774       return 1;
1775     }
1776   } else {
1777     if (cf_name) {
1778       /*
1779        * "-r" was specified, so we're reading a capture file.
1780        * Capture options don't apply here.
1781        */
1782
1783       /* We don't support capture filters when reading from a capture file
1784          (the BPF compiler doesn't support all link-layer types that we
1785          support in capture files we read). */
1786       if (global_capture_opts.default_options.cfilter) {
1787         cmdarg_err("Only read filters, not capture filters, "
1788           "can be specified when reading a capture file.");
1789         return 1;
1790       }
1791       if (global_capture_opts.multi_files_on) {
1792         cmdarg_err("Multiple capture files requested, but "
1793                    "a capture isn't being done.");
1794         return 1;
1795       }
1796       if (global_capture_opts.has_file_duration) {
1797         cmdarg_err("Switching capture files after a time interval was specified, but "
1798                    "a capture isn't being done.");
1799         return 1;
1800       }
1801       if (global_capture_opts.has_ring_num_files) {
1802         cmdarg_err("A ring buffer of capture files was specified, but "
1803           "a capture isn't being done.");
1804         return 1;
1805       }
1806       if (global_capture_opts.has_autostop_files) {
1807         cmdarg_err("A maximum number of capture files was specified, but "
1808           "a capture isn't being done.");
1809         return 1;
1810       }
1811       if (global_capture_opts.capture_comment) {
1812         cmdarg_err("A capture comment was specified, but "
1813           "a capture isn't being done.\nThere's no support for adding "
1814           "a capture comment to an existing capture file.");
1815         return 1;
1816       }
1817
1818       /* Note: TShark now allows the restriction of a _read_ file by packet count
1819        * and byte count as well as a write file. Other autostop options remain valid
1820        * only for a write file.
1821        */
1822       if (global_capture_opts.has_autostop_duration) {
1823         cmdarg_err("A maximum capture time was specified, but "
1824           "a capture isn't being done.");
1825         return 1;
1826       }
1827     } else {
1828       /*
1829        * "-r" wasn't specified, so we're doing a live capture.
1830        */
1831       if (perform_two_pass_analysis) {
1832         /* Two-pass analysis doesn't work with live capture since it requires us
1833          * to buffer packets until we've read all of them, but a live capture
1834          * has no useful/meaningful definition of "all" */
1835         cmdarg_err("Live captures do not support two-pass analysis.");
1836         return 1;
1837       }
1838
1839       if (global_capture_opts.saving_to_file) {
1840         /* They specified a "-w" flag, so we'll be saving to a capture file. */
1841
1842         /* When capturing, we only support writing pcap or pcap-ng format. */
1843         if (out_file_type != WTAP_FILE_TYPE_SUBTYPE_PCAP &&
1844             out_file_type != WTAP_FILE_TYPE_SUBTYPE_PCAPNG) {
1845           cmdarg_err("Live captures can only be saved in pcap or pcapng format.");
1846           return 1;
1847         }
1848         if (global_capture_opts.capture_comment &&
1849             out_file_type != WTAP_FILE_TYPE_SUBTYPE_PCAPNG) {
1850           cmdarg_err("A capture comment can only be written to a pcapng file.");
1851           return 1;
1852         }
1853         if (global_capture_opts.multi_files_on) {
1854           /* Multiple-file mode doesn't work under certain conditions:
1855              a) it doesn't work if you're writing to the standard output;
1856              b) it doesn't work if you're writing to a pipe;
1857           */
1858           if (strcmp(global_capture_opts.save_file, "-") == 0) {
1859             cmdarg_err("Multiple capture files requested, but "
1860               "the capture is being written to the standard output.");
1861             return 1;
1862           }
1863           if (global_capture_opts.output_to_pipe) {
1864             cmdarg_err("Multiple capture files requested, but "
1865               "the capture file is a pipe.");
1866             return 1;
1867           }
1868           if (!global_capture_opts.has_autostop_filesize &&
1869               !global_capture_opts.has_file_duration) {
1870             cmdarg_err("Multiple capture files requested, but "
1871               "no maximum capture file size or duration was specified.");
1872             return 1;
1873           }
1874         }
1875         /* Currently, we don't support read or display filters when capturing
1876            and saving the packets. */
1877         if (rfilter != NULL) {
1878           cmdarg_err("Read filters aren't supported when capturing and saving the captured packets.");
1879           return 1;
1880         }
1881         if (dfilter != NULL) {
1882           cmdarg_err("Display filters aren't supported when capturing and saving the captured packets.");
1883           return 1;
1884         }
1885         global_capture_opts.use_pcapng = (out_file_type == WTAP_FILE_TYPE_SUBTYPE_PCAPNG) ? TRUE : FALSE;
1886       } else {
1887         /* They didn't specify a "-w" flag, so we won't be saving to a
1888            capture file.  Check for options that only make sense if
1889            we're saving to a file. */
1890         if (global_capture_opts.has_autostop_filesize) {
1891           cmdarg_err("Maximum capture file size specified, but "
1892            "capture isn't being saved to a file.");
1893           return 1;
1894         }
1895         if (global_capture_opts.multi_files_on) {
1896           cmdarg_err("Multiple capture files requested, but "
1897             "the capture isn't being saved to a file.");
1898           return 1;
1899         }
1900         if (global_capture_opts.capture_comment) {
1901           cmdarg_err("A capture comment was specified, but "
1902             "the capture isn't being saved to a file.");
1903           return 1;
1904         }
1905       }
1906     }
1907   }
1908 #endif
1909
1910 #ifdef _WIN32
1911   /* Start windows sockets */
1912   WSAStartup( MAKEWORD( 1, 1 ), &wsaData );
1913 #endif /* _WIN32 */
1914
1915   /* Notify all registered modules that have had any of their preferences
1916      changed either from one of the preferences file or from the command
1917      line that their preferences have changed. */
1918   prefs_apply_all();
1919
1920   /* At this point MATE will have registered its field array so we can
1921      have a tap filter with one of MATE's late-registered fields as part
1922      of the filter.  We can now process all the "-z" arguments. */
1923   start_requested_stats();
1924
1925 #ifdef HAVE_LIBPCAP
1926   /* We currently don't support taps, or printing dissected packets,
1927      if we're writing to a pipe. */
1928   if (global_capture_opts.saving_to_file &&
1929       global_capture_opts.output_to_pipe) {
1930     if (tap_listeners_require_dissection()) {
1931       cmdarg_err("Taps aren't supported when saving to a pipe.");
1932       return 1;
1933     }
1934     if (print_packet_info) {
1935       cmdarg_err("Printing dissected packets isn't supported when saving to a pipe.");
1936       return 1;
1937     }
1938   }
1939 #endif
1940
1941   if (ex_opt_count("read_format") > 0) {
1942     const gchar* name = ex_opt_get_next("read_format");
1943     in_file_type = open_info_name_to_type(name);
1944     if (in_file_type == WTAP_TYPE_AUTO) {
1945       cmdarg_err("\"%s\" isn't a valid read file format type", name? name : "");
1946       list_read_capture_types();
1947       return 1;
1948     }
1949   }
1950
1951   /* disabled protocols as per configuration file */
1952   if (gdp_path == NULL && dp_path == NULL) {
1953     set_disabled_protos_list();
1954   }
1955
1956   /* Build the column format array */
1957   build_column_format_array(&cfile.cinfo, prefs_p->num_cols, TRUE);
1958
1959 #ifdef HAVE_LIBPCAP
1960   capture_opts_trim_snaplen(&global_capture_opts, MIN_PACKET_SIZE);
1961   capture_opts_trim_ring_num_files(&global_capture_opts);
1962 #endif
1963
1964   if (rfilter != NULL) {
1965     if (!dfilter_compile(rfilter, &rfcode)) {
1966       cmdarg_err("%s", dfilter_error_msg);
1967       epan_cleanup();
1968 #ifdef HAVE_PCAP_OPEN_DEAD
1969       {
1970         pcap_t *pc;
1971
1972         pc = pcap_open_dead(DLT_EN10MB, MIN_PACKET_SIZE);
1973         if (pc != NULL) {
1974           if (pcap_compile(pc, &fcode, rfilter, 0, 0) != -1) {
1975             cmdarg_err_cont(
1976               "  Note: That read filter code looks like a valid capture filter;\n"
1977               "        maybe you mixed them up?");
1978           }
1979           pcap_close(pc);
1980         }
1981       }
1982 #endif
1983       return 2;
1984     }
1985   }
1986   cfile.rfcode = rfcode;
1987
1988   if (dfilter != NULL) {
1989     if (!dfilter_compile(dfilter, &dfcode)) {
1990       cmdarg_err("%s", dfilter_error_msg);
1991       epan_cleanup();
1992 #ifdef HAVE_PCAP_OPEN_DEAD
1993       {
1994         pcap_t *pc;
1995
1996         pc = pcap_open_dead(DLT_EN10MB, MIN_PACKET_SIZE);
1997         if (pc != NULL) {
1998           if (pcap_compile(pc, &fcode, dfilter, 0, 0) != -1) {
1999             cmdarg_err_cont(
2000               "  Note: That display filter code looks like a valid capture filter;\n"
2001               "        maybe you mixed them up?");
2002           }
2003           pcap_close(pc);
2004         }
2005       }
2006 #endif
2007       return 2;
2008     }
2009   }
2010   cfile.dfcode = dfcode;
2011
2012   if (print_packet_info) {
2013     /* If we're printing as text or PostScript, we have
2014        to create a print stream. */
2015     if (output_action == WRITE_TEXT) {
2016       switch (print_format) {
2017
2018       case PR_FMT_TEXT:
2019         print_stream = print_stream_text_stdio_new(stdout);
2020         break;
2021
2022       case PR_FMT_PS:
2023         print_stream = print_stream_ps_stdio_new(stdout);
2024         break;
2025
2026       default:
2027         g_assert_not_reached();
2028       }
2029     }
2030   }
2031
2032   /* We have to dissect each packet if:
2033
2034         we're printing information about each packet;
2035
2036         we're using a read filter on the packets;
2037
2038         we're using a display filter on the packets;
2039
2040         we're using any taps that need dissection. */
2041   do_dissection = print_packet_info || rfcode || dfcode || tap_listeners_require_dissection();
2042
2043   if (cf_name) {
2044     /*
2045      * We're reading a capture file.
2046      */
2047
2048     /*
2049      * Immediately relinquish any special privileges we have; we must not
2050      * be allowed to read any capture files the user running TShark
2051      * can't open.
2052      */
2053     relinquish_special_privs_perm();
2054     print_current_user();
2055
2056     if (cf_open(&cfile, cf_name, in_file_type, FALSE, &err) != CF_OK) {
2057       epan_cleanup();
2058       return 2;
2059     }
2060
2061     /* Set timestamp precision; there should arguably be a command-line
2062        option to let the user set this. */
2063     switch(wtap_file_tsprecision(cfile.wth)) {
2064     case(WTAP_FILE_TSPREC_SEC):
2065       timestamp_set_precision(TS_PREC_AUTO_SEC);
2066       break;
2067     case(WTAP_FILE_TSPREC_DSEC):
2068       timestamp_set_precision(TS_PREC_AUTO_DSEC);
2069       break;
2070     case(WTAP_FILE_TSPREC_CSEC):
2071       timestamp_set_precision(TS_PREC_AUTO_CSEC);
2072       break;
2073     case(WTAP_FILE_TSPREC_MSEC):
2074       timestamp_set_precision(TS_PREC_AUTO_MSEC);
2075       break;
2076     case(WTAP_FILE_TSPREC_USEC):
2077       timestamp_set_precision(TS_PREC_AUTO_USEC);
2078       break;
2079     case(WTAP_FILE_TSPREC_NSEC):
2080       timestamp_set_precision(TS_PREC_AUTO_NSEC);
2081       break;
2082     default:
2083       g_assert_not_reached();
2084     }
2085
2086     /* Process the packets in the file */
2087     TRY {
2088 #ifdef HAVE_LIBPCAP
2089       err = load_cap_file(&cfile, global_capture_opts.save_file, out_file_type, out_file_name_res,
2090           global_capture_opts.has_autostop_packets ? global_capture_opts.autostop_packets : 0,
2091           global_capture_opts.has_autostop_filesize ? global_capture_opts.autostop_filesize : 0);
2092 #else
2093       err = load_cap_file(&cfile, output_file_name, out_file_type, out_file_name_res, 0, 0);
2094 #endif
2095     }
2096     CATCH(OutOfMemoryError) {
2097       fprintf(stderr,
2098               "Out Of Memory!\n"
2099               "\n"
2100               "Sorry, but TShark has to terminate now!\n"
2101               "\n"
2102               "Some infos / workarounds can be found at:\n"
2103               "http://wiki.wireshark.org/KnownBugs/OutOfMemory\n");
2104       err = ENOMEM;
2105     }
2106     ENDTRY;
2107     if (err != 0) {
2108       /* We still dump out the results of taps, etc., as we might have
2109          read some packets; however, we exit with an error status. */
2110       exit_status = 2;
2111     }
2112   } else {
2113     /* No capture file specified, so we're supposed to do a live capture
2114        or get a list of link-layer types for a live capture device;
2115        do we have support for live captures? */
2116 #ifdef HAVE_LIBPCAP
2117     /* if no interface was specified, pick a default */
2118     exit_status = capture_opts_default_iface_if_necessary(&global_capture_opts,
2119         ((prefs_p->capture_device) && (*prefs_p->capture_device != '\0')) ? get_if_name(prefs_p->capture_device) : NULL);
2120     if (exit_status != 0)
2121         return exit_status;
2122
2123     /* if requested, list the link layer types and exit */
2124     if (list_link_layer_types) {
2125         guint i;
2126
2127         /* Get the list of link-layer types for the capture devices. */
2128         for (i = 0; i < global_capture_opts.ifaces->len; i++) {
2129           interface_options  interface_opts;
2130           if_capabilities_t *caps;
2131
2132           interface_opts = g_array_index(global_capture_opts.ifaces, interface_options, i);
2133           caps = capture_get_if_capabilities(interface_opts.name, interface_opts.monitor_mode, &err_str, NULL);
2134           if (caps == NULL) {
2135             cmdarg_err("%s", err_str);
2136             g_free(err_str);
2137             return 2;
2138           }
2139           if (caps->data_link_types == NULL) {
2140             cmdarg_err("The capture device \"%s\" has no data link types.", interface_opts.name);
2141             return 2;
2142           }
2143           capture_opts_print_if_capabilities(caps, interface_opts.name, interface_opts.monitor_mode);
2144           free_if_capabilities(caps);
2145         }
2146         return 0;
2147     }
2148
2149     /*
2150      * If the standard error isn't a terminal, don't print packet counts,
2151      * as they won't show up on the user's terminal and they'll get in
2152      * the way of error messages in the file (to which we assume the
2153      * standard error was redirected; if it's redirected to the null
2154      * device, there's no point in printing packet counts anyway).
2155      *
2156      * Otherwise, if we're printing packet information and the standard
2157      * output is a terminal (which we assume means the standard output and
2158      * error are going to the same terminal), don't print packet counts,
2159      * as they'll get in the way of the packet information.
2160      *
2161      * Otherwise, if the user specified -q, don't print packet counts.
2162      *
2163      * Otherwise, print packet counts.
2164      *
2165      * XXX - what if the user wants to do a live capture, doesn't want
2166      * to save it to a file, doesn't want information printed for each
2167      * packet, does want some "-z" statistic, and wants packet counts
2168      * so they know whether they're seeing any packets?  -q will
2169      * suppress the information printed for each packet, but it'll
2170      * also suppress the packet counts.
2171      */
2172     if (!isatty(fileno(stderr)))
2173       print_packet_counts = FALSE;
2174     else if (print_packet_info && isatty(fileno(stdout)))
2175       print_packet_counts = FALSE;
2176     else if (quiet)
2177       print_packet_counts = FALSE;
2178     else
2179       print_packet_counts = TRUE;
2180
2181     if (print_packet_info) {
2182       if (!write_preamble(NULL)) {
2183         show_print_file_io_error(errno);
2184         return 2;
2185       }
2186     }
2187
2188     /* For now, assume libpcap gives microsecond precision. */
2189     timestamp_set_precision(TS_PREC_AUTO_USEC);
2190
2191     /*
2192      * XXX - this returns FALSE if an error occurred, but it also
2193      * returns FALSE if the capture stops because a time limit
2194      * was reached (and possibly other limits), so we can't assume
2195      * it means an error.
2196      *
2197      * The capture code is a bit twisty, so it doesn't appear to
2198      * be an easy fix.  We just ignore the return value for now.
2199      * Instead, pass on the exit status from the capture child.
2200      */
2201     capture();
2202     exit_status = global_capture_session.fork_child_status;
2203
2204     if (print_packet_info) {
2205       if (!write_finale()) {
2206         err = errno;
2207         show_print_file_io_error(err);
2208       }
2209     }
2210 #else
2211     /* No - complain. */
2212     cmdarg_err("This version of TShark was not built with support for capturing packets.");
2213     return 2;
2214 #endif
2215   }
2216
2217   g_free(cf_name);
2218
2219   if (cfile.frames != NULL) {
2220     free_frame_data_sequence(cfile.frames);
2221     cfile.frames = NULL;
2222   }
2223
2224   draw_tap_listeners(TRUE);
2225   funnel_dump_all_text_windows();
2226   epan_free(cfile.epan);
2227   epan_cleanup();
2228
2229   output_fields_free(output_fields);
2230   output_fields = NULL;
2231
2232   return exit_status;
2233 }
2234
2235 /*#define USE_BROKEN_G_MAIN_LOOP*/
2236
2237 #ifdef USE_BROKEN_G_MAIN_LOOP
2238   GMainLoop *loop;
2239 #else
2240   gboolean loop_running = FALSE;
2241 #endif
2242   guint32 packet_count = 0;
2243
2244
2245 typedef struct pipe_input_tag {
2246   gint             source;
2247   gpointer         user_data;
2248   int             *child_process;
2249   pipe_input_cb_t  input_cb;
2250   guint            pipe_input_id;
2251 #ifdef _WIN32
2252   GMutex          *callback_running;
2253 #endif
2254 } pipe_input_t;
2255
2256 static pipe_input_t pipe_input;
2257
2258 #ifdef _WIN32
2259 /* The timer has expired, see if there's stuff to read from the pipe,
2260    if so, do the callback */
2261 static gint
2262 pipe_timer_cb(gpointer data)
2263 {
2264   HANDLE        handle;
2265   DWORD         avail        = 0;
2266   gboolean      result;
2267   DWORD         childstatus;
2268   pipe_input_t *pipe_input_p = data;
2269   gint          iterations   = 0;
2270
2271   g_mutex_lock (pipe_input_p->callback_running);
2272
2273   /* try to read data from the pipe only 5 times, to avoid blocking */
2274   while(iterations < 5) {
2275     /*g_log(NULL, G_LOG_LEVEL_DEBUG, "pipe_timer_cb: new iteration");*/
2276
2277     /* Oddly enough although Named pipes don't work on win9x,
2278        PeekNamedPipe does !!! */
2279     handle = (HANDLE) _get_osfhandle (pipe_input_p->source);
2280     result = PeekNamedPipe(handle, NULL, 0, NULL, &avail, NULL);
2281
2282     /* Get the child process exit status */
2283     GetExitCodeProcess((HANDLE)*(pipe_input_p->child_process),
2284                        &childstatus);
2285
2286     /* If the Peek returned an error, or there are bytes to be read
2287        or the childwatcher thread has terminated then call the normal
2288        callback */
2289     if (!result || avail > 0 || childstatus != STILL_ACTIVE) {
2290
2291       /*g_log(NULL, G_LOG_LEVEL_DEBUG, "pipe_timer_cb: data avail");*/
2292
2293       /* And call the real handler */
2294       if (!pipe_input_p->input_cb(pipe_input_p->source, pipe_input_p->user_data)) {
2295         g_log(NULL, G_LOG_LEVEL_DEBUG, "pipe_timer_cb: input pipe closed, iterations: %u", iterations);
2296         /* pipe closed, return false so that the timer is stopped */
2297         g_mutex_unlock (pipe_input_p->callback_running);
2298         return FALSE;
2299       }
2300     }
2301     else {
2302       /*g_log(NULL, G_LOG_LEVEL_DEBUG, "pipe_timer_cb: no data avail");*/
2303       /* No data, stop now */
2304       break;
2305     }
2306
2307     iterations++;
2308   }
2309
2310   /*g_log(NULL, G_LOG_LEVEL_DEBUG, "pipe_timer_cb: finished with iterations: %u, new timer", iterations);*/
2311
2312   g_mutex_unlock (pipe_input_p->callback_running);
2313
2314   /* we didn't stopped the timer, so let it run */
2315   return TRUE;
2316 }
2317 #endif
2318
2319
2320 void
2321 pipe_input_set_handler(gint source, gpointer user_data, int *child_process, pipe_input_cb_t input_cb)
2322 {
2323
2324   pipe_input.source         = source;
2325   pipe_input.child_process  = child_process;
2326   pipe_input.user_data      = user_data;
2327   pipe_input.input_cb       = input_cb;
2328
2329 #ifdef _WIN32
2330 #if GLIB_CHECK_VERSION(2,31,0)
2331   pipe_input.callback_running = g_malloc(sizeof(GMutex));
2332   g_mutex_init(pipe_input.callback_running);
2333 #else
2334   pipe_input.callback_running = g_mutex_new();
2335 #endif
2336   /* Tricky to use pipes in win9x, as no concept of wait.  NT can
2337      do this but that doesn't cover all win32 platforms.  GTK can do
2338      this but doesn't seem to work over processes.  Attempt to do
2339      something similar here, start a timer and check for data on every
2340      timeout. */
2341   /*g_log(NULL, G_LOG_LEVEL_DEBUG, "pipe_input_set_handler: new");*/
2342   pipe_input.pipe_input_id = g_timeout_add(200, pipe_timer_cb, &pipe_input);
2343 #endif
2344 }
2345
2346 static const nstime_t *
2347 tshark_get_frame_ts(void *data, guint32 frame_num)
2348 {
2349   capture_file *cf = (capture_file *) data;
2350
2351   if (ref && ref->num == frame_num)
2352     return &ref->abs_ts;
2353
2354   if (prev_dis && prev_dis->num == frame_num)
2355     return &prev_dis->abs_ts;
2356
2357   if (prev_cap && prev_cap->num == frame_num)
2358     return &prev_cap->abs_ts;
2359
2360   if (cf->frames) {
2361      frame_data *fd = frame_data_sequence_find(cf->frames, frame_num);
2362
2363      return (fd) ? &fd->abs_ts : NULL;
2364   }
2365
2366   return NULL;
2367 }
2368
2369 static epan_t *
2370 tshark_epan_new(capture_file *cf)
2371 {
2372   epan_t *epan = epan_new();
2373
2374   epan->data = cf;
2375   epan->get_frame_ts = tshark_get_frame_ts;
2376   epan->get_interface_name = cap_file_get_interface_name;
2377   epan->get_user_comment = NULL;
2378
2379   return epan;
2380 }
2381
2382 #ifdef HAVE_LIBPCAP
2383 static gboolean
2384 capture(void)
2385 {
2386   gboolean          ret;
2387   guint             i;
2388   GString          *str = g_string_new("");
2389 #ifdef USE_TSHARK_SELECT
2390   fd_set            readfds;
2391 #endif
2392 #ifndef _WIN32
2393   struct sigaction  action, oldaction;
2394 #endif
2395
2396   /*
2397    * XXX - dropping privileges is still required, until code cleanup is done
2398    *
2399    * remove all dependencies to pcap specific code and using only dumpcap is almost done.
2400    * when it's done, we don't need special privileges to run tshark at all,
2401    * therefore we don't need to drop these privileges
2402    * The only thing we might want to keep is a warning if tshark is run as root,
2403    * as it's no longer necessary and potentially dangerous.
2404    *
2405    * THE FOLLOWING IS THE FORMER COMMENT WHICH IS NO LONGER REALLY VALID:
2406    * We've opened the capture device, so we shouldn't need any special
2407    * privileges any more; relinquish those privileges.
2408    *
2409    * XXX - if we have saved set-user-ID support, we should give up those
2410    * privileges immediately, and then reclaim them long enough to get
2411    * a list of network interfaces and to open one, and then give them
2412    * up again, so that stuff we do while processing the argument list,
2413    * reading the user's preferences, loading and starting plugins
2414    * (especially *user* plugins), etc. is done with the user's privileges,
2415    * not special privileges.
2416    */
2417   relinquish_special_privs_perm();
2418   print_current_user();
2419
2420   /* Create new dissection section. */
2421   epan_free(cfile.epan);
2422   cfile.epan = tshark_epan_new(&cfile);
2423
2424 #ifdef _WIN32
2425   /* Catch a CTRL+C event and, if we get it, clean up and exit. */
2426   SetConsoleCtrlHandler(capture_cleanup, TRUE);
2427 #else /* _WIN32 */
2428   /* Catch SIGINT and SIGTERM and, if we get either of them,
2429      clean up and exit.  If SIGHUP isn't being ignored, catch
2430      it too and, if we get it, clean up and exit.
2431
2432      We restart any read that was in progress, so that it doesn't
2433      disrupt reading from the sync pipe.  The signal handler tells
2434      the capture child to finish; it will report that it finished,
2435      or will exit abnormally, so  we'll stop reading from the sync
2436      pipe, pick up the exit status, and quit. */
2437   memset(&action, 0, sizeof(action));
2438   action.sa_handler = capture_cleanup;
2439   action.sa_flags = SA_RESTART;
2440   sigemptyset(&action.sa_mask);
2441   sigaction(SIGTERM, &action, NULL);
2442   sigaction(SIGINT, &action, NULL);
2443   sigaction(SIGHUP, NULL, &oldaction);
2444   if (oldaction.sa_handler == SIG_DFL)
2445     sigaction(SIGHUP, &action, NULL);
2446
2447 #ifdef SIGINFO
2448   /* Catch SIGINFO and, if we get it and we're capturing to a file in
2449      quiet mode, report the number of packets we've captured.
2450
2451      Again, restart any read that was in progress, so that it doesn't
2452      disrupt reading from the sync pipe. */
2453   action.sa_handler = report_counts_siginfo;
2454   action.sa_flags = SA_RESTART;
2455   sigemptyset(&action.sa_mask);
2456   sigaction(SIGINFO, &action, NULL);
2457 #endif /* SIGINFO */
2458 #endif /* _WIN32 */
2459
2460   global_capture_session.state = CAPTURE_PREPARING;
2461
2462   /* Let the user know which interfaces were chosen. */
2463   for (i = 0; i < global_capture_opts.ifaces->len; i++) {
2464     interface_options interface_opts;
2465
2466     interface_opts = g_array_index(global_capture_opts.ifaces, interface_options, i);
2467     interface_opts.descr = get_interface_descriptive_name(interface_opts.name);
2468     global_capture_opts.ifaces = g_array_remove_index(global_capture_opts.ifaces, i);
2469     g_array_insert_val(global_capture_opts.ifaces, i, interface_opts);
2470   }
2471 #ifdef _WIN32
2472   if (global_capture_opts.ifaces->len < 2)
2473 #else
2474   if (global_capture_opts.ifaces->len < 4)
2475 #endif
2476   {
2477     for (i = 0; i < global_capture_opts.ifaces->len; i++) {
2478       interface_options interface_opts;
2479
2480       interface_opts = g_array_index(global_capture_opts.ifaces, interface_options, i);
2481       if (i > 0) {
2482           if (global_capture_opts.ifaces->len > 2) {
2483               g_string_append_printf(str, ",");
2484           }
2485           g_string_append_printf(str, " ");
2486           if (i == global_capture_opts.ifaces->len - 1) {
2487               g_string_append_printf(str, "and ");
2488           }
2489       }
2490       g_string_append_printf(str, "'%s'", interface_opts.descr);
2491     }
2492   } else {
2493     g_string_append_printf(str, "%u interfaces", global_capture_opts.ifaces->len);
2494   }
2495   if (really_quiet == FALSE)
2496     fprintf(stderr, "Capturing on %s\n", str->str);
2497   fflush(stderr);
2498   g_string_free(str, TRUE);
2499
2500   ret = sync_pipe_start(&global_capture_opts, &global_capture_session, NULL);
2501
2502   if (!ret)
2503     return FALSE;
2504
2505   /* the actual capture loop
2506    *
2507    * XXX - glib doesn't seem to provide any event based loop handling.
2508    *
2509    * XXX - for whatever reason,
2510    * calling g_main_loop_new() ends up in 100% cpu load.
2511    *
2512    * But that doesn't matter: in UNIX we can use select() to find an input
2513    * source with something to do.
2514    *
2515    * But that doesn't matter because we're in a CLI (that doesn't need to
2516    * update a GUI or something at the same time) so it's OK if we block
2517    * trying to read from the pipe.
2518    *
2519    * So all the stuff in USE_TSHARK_SELECT could be removed unless I'm
2520    * wrong (but I leave it there in case I am...).
2521    */
2522
2523 #ifdef USE_TSHARK_SELECT
2524   FD_ZERO(&readfds);
2525   FD_SET(pipe_input.source, &readfds);
2526 #endif
2527
2528   loop_running = TRUE;
2529
2530   TRY
2531   {
2532     while (loop_running)
2533     {
2534 #ifdef USE_TSHARK_SELECT
2535       ret = select(pipe_input.source+1, &readfds, NULL, NULL, NULL);
2536
2537       if (ret == -1)
2538       {
2539         fprintf(stderr, "%s: %s\n", "select()", g_strerror(errno));
2540         return TRUE;
2541       } else if (ret == 1) {
2542 #endif
2543         /* Call the real handler */
2544         if (!pipe_input.input_cb(pipe_input.source, pipe_input.user_data)) {
2545           g_log(NULL, G_LOG_LEVEL_DEBUG, "input pipe closed");
2546           return FALSE;
2547         }
2548 #ifdef USE_TSHARK_SELECT
2549       }
2550 #endif
2551     }
2552   }
2553   CATCH(OutOfMemoryError) {
2554     fprintf(stderr,
2555             "Out Of Memory!\n"
2556             "\n"
2557             "Sorry, but TShark has to terminate now!\n"
2558             "\n"
2559             "Some infos / workarounds can be found at:\n"
2560             "http://wiki.wireshark.org/KnownBugs/OutOfMemory\n");
2561     exit(1);
2562   }
2563   ENDTRY;
2564   return TRUE;
2565 }
2566
2567 /* capture child detected an error */
2568 void
2569 capture_input_error_message(capture_session *cap_session _U_, char *error_msg, char *secondary_error_msg)
2570 {
2571   cmdarg_err("%s", error_msg);
2572   cmdarg_err_cont("%s", secondary_error_msg);
2573 }
2574
2575
2576 /* capture child detected an capture filter related error */
2577 void
2578 capture_input_cfilter_error_message(capture_session *cap_session, guint i, char *error_message)
2579 {
2580   capture_options *capture_opts = cap_session->capture_opts;
2581   dfilter_t         *rfcode = NULL;
2582   interface_options  interface_opts;
2583
2584   g_assert(i < capture_opts->ifaces->len);
2585   interface_opts = g_array_index(capture_opts->ifaces, interface_options, i);
2586
2587   if (dfilter_compile(interface_opts.cfilter, &rfcode) && rfcode != NULL) {
2588     cmdarg_err(
2589       "Invalid capture filter \"%s\" for interface '%s'!\n"
2590       "\n"
2591       "That string looks like a valid display filter; however, it isn't a valid\n"
2592       "capture filter (%s).\n"
2593       "\n"
2594       "Note that display filters and capture filters don't have the same syntax,\n"
2595       "so you can't use most display filter expressions as capture filters.\n"
2596       "\n"
2597       "See the User's Guide for a description of the capture filter syntax.",
2598       interface_opts.cfilter, interface_opts.descr, error_message);
2599     dfilter_free(rfcode);
2600   } else {
2601     cmdarg_err(
2602       "Invalid capture filter \"%s\" for interface '%s'!\n"
2603       "\n"
2604       "That string isn't a valid capture filter (%s).\n"
2605       "See the User's Guide for a description of the capture filter syntax.",
2606       interface_opts.cfilter, interface_opts.descr, error_message);
2607   }
2608 }
2609
2610
2611 /* capture child tells us we have a new (or the first) capture file */
2612 gboolean
2613 capture_input_new_file(capture_session *cap_session, gchar *new_file)
2614 {
2615   capture_options *capture_opts = cap_session->capture_opts;
2616   gboolean is_tempfile;
2617   int      err;
2618
2619   if (cap_session->state == CAPTURE_PREPARING) {
2620     g_log(LOG_DOMAIN_CAPTURE, G_LOG_LEVEL_MESSAGE, "Capture started!");
2621   }
2622   g_log(LOG_DOMAIN_CAPTURE, G_LOG_LEVEL_MESSAGE, "File: \"%s\"", new_file);
2623
2624   g_assert(cap_session->state == CAPTURE_PREPARING || cap_session->state == CAPTURE_RUNNING);
2625
2626   /* free the old filename */
2627   if (capture_opts->save_file != NULL) {
2628
2629     /* we start a new capture file, close the old one (if we had one before) */
2630     if ( ((capture_file *) cap_session->cf)->state != FILE_CLOSED) {
2631       if ( ((capture_file *) cap_session->cf)->wth != NULL) {
2632         wtap_close(((capture_file *) cap_session->cf)->wth);
2633         ((capture_file *) cap_session->cf)->wth = NULL;
2634       }
2635       ((capture_file *) cap_session->cf)->state = FILE_CLOSED;
2636     }
2637
2638     g_free(capture_opts->save_file);
2639     is_tempfile = FALSE;
2640   } else {
2641     /* we didn't had a save_file before, must be a tempfile */
2642     is_tempfile = TRUE;
2643   }
2644
2645   /* save the new filename */
2646   capture_opts->save_file = g_strdup(new_file);
2647
2648   /* if we are in real-time mode, open the new file now */
2649   if (do_dissection) {
2650     /* this is probably unecessary, but better safe than sorry */
2651     ((capture_file *)cap_session->cf)->open_type = WTAP_TYPE_AUTO;
2652     /* Attempt to open the capture file and set up to read from it. */
2653     switch(cf_open((capture_file *)cap_session->cf, capture_opts->save_file, WTAP_TYPE_AUTO, is_tempfile, &err)) {
2654     case CF_OK:
2655       break;
2656     case CF_ERROR:
2657       /* Don't unlink (delete) the save file - leave it around,
2658          for debugging purposes. */
2659       g_free(capture_opts->save_file);
2660       capture_opts->save_file = NULL;
2661       return FALSE;
2662     }
2663   }
2664
2665   cap_session->state = CAPTURE_RUNNING;
2666
2667   return TRUE;
2668 }
2669
2670
2671 /* capture child tells us we have new packets to read */
2672 void
2673 capture_input_new_packets(capture_session *cap_session, int to_read)
2674 {
2675   gboolean      ret;
2676   int           err;
2677   gchar        *err_info;
2678   gint64        data_offset;
2679   capture_file *cf = (capture_file *)cap_session->cf;
2680   gboolean      filtering_tap_listeners;
2681   guint         tap_flags;
2682
2683 #ifdef SIGINFO
2684   /*
2685    * Prevent a SIGINFO handler from writing to the standard error while
2686    * we're doing so or writing to the standard output; instead, have it
2687    * just set a flag telling us to print that information when we're done.
2688    */
2689   infodelay = TRUE;
2690 #endif /* SIGINFO */
2691
2692   /* Do we have any tap listeners with filters? */
2693   filtering_tap_listeners = have_filtering_tap_listeners();
2694
2695   /* Get the union of the flags for all tap listeners. */
2696   tap_flags = union_of_tap_listener_flags();
2697
2698   if (do_dissection) {
2699     gboolean create_proto_tree;
2700     epan_dissect_t *edt;
2701
2702     if (cf->rfcode || cf->dfcode || print_details || filtering_tap_listeners ||
2703         (tap_flags & TL_REQUIRES_PROTO_TREE) || have_custom_cols(&cf->cinfo))
2704       create_proto_tree = TRUE;
2705     else
2706       create_proto_tree = FALSE;
2707
2708     /* The protocol tree will be "visible", i.e., printed, only if we're
2709        printing packet details, which is true if we're printing stuff
2710        ("print_packet_info" is true) and we're in verbose mode
2711        ("packet_details" is true). */
2712     edt = epan_dissect_new(cf->epan, create_proto_tree, print_packet_info && print_details);
2713
2714     while (to_read-- && cf->wth) {
2715       wtap_cleareof(cf->wth);
2716       ret = wtap_read(cf->wth, &err, &err_info, &data_offset);
2717       if (ret == FALSE) {
2718         /* read from file failed, tell the capture child to stop */
2719         sync_pipe_stop(cap_session);
2720         wtap_close(cf->wth);
2721         cf->wth = NULL;
2722       } else {
2723         ret = process_packet(cf, edt, data_offset, wtap_phdr(cf->wth),
2724                              wtap_buf_ptr(cf->wth),
2725                              tap_flags);
2726       }
2727       if (ret != FALSE) {
2728         /* packet successfully read and gone through the "Read Filter" */
2729         packet_count++;
2730       }
2731     }
2732
2733     epan_dissect_free(edt);
2734
2735   } else {
2736     /*
2737      * Dumpcap's doing all the work; we're not doing any dissection.
2738      * Count all the packets it wrote.
2739      */
2740     packet_count += to_read;
2741   }
2742
2743   if (print_packet_counts) {
2744       /* We're printing packet counts. */
2745       if (packet_count != 0) {
2746         fprintf(stderr, "\r%u ", packet_count);
2747         /* stderr could be line buffered */
2748         fflush(stderr);
2749       }
2750   }
2751
2752 #ifdef SIGINFO
2753   /*
2754    * Allow SIGINFO handlers to write.
2755    */
2756   infodelay = FALSE;
2757
2758   /*
2759    * If a SIGINFO handler asked us to write out capture counts, do so.
2760    */
2761   if (infoprint)
2762     report_counts();
2763 #endif /* SIGINFO */
2764 }
2765
2766 static void
2767 report_counts(void)
2768 {
2769   if ((print_packet_counts == FALSE) && (really_quiet == FALSE)) {
2770     /* Report the count only if we aren't printing a packet count
2771        as packets arrive. */
2772       fprintf(stderr, "%u packet%s captured\n", packet_count,
2773             plurality(packet_count, "", "s"));
2774   }
2775 #ifdef SIGINFO
2776   infoprint = FALSE; /* we just reported it */
2777 #endif /* SIGINFO */
2778 }
2779
2780 #ifdef SIGINFO
2781 static void
2782 report_counts_siginfo(int signum _U_)
2783 {
2784   int sav_errno = errno;
2785   /* If we've been told to delay printing, just set a flag asking
2786      that we print counts (if we're supposed to), otherwise print
2787      the count of packets captured (if we're supposed to). */
2788   if (infodelay)
2789     infoprint = TRUE;
2790   else
2791     report_counts();
2792   errno = sav_errno;
2793 }
2794 #endif /* SIGINFO */
2795
2796
2797 /* capture child detected any packet drops? */
2798 void
2799 capture_input_drops(capture_session *cap_session _U_, guint32 dropped)
2800 {
2801   if (print_packet_counts) {
2802     /* We're printing packet counts to stderr.
2803        Send a newline so that we move to the line after the packet count. */
2804     fprintf(stderr, "\n");
2805   }
2806
2807   if (dropped != 0) {
2808     /* We're printing packet counts to stderr.
2809        Send a newline so that we move to the line after the packet count. */
2810     fprintf(stderr, "%u packet%s dropped\n", dropped, plurality(dropped, "", "s"));
2811   }
2812 }
2813
2814
2815 /*
2816  * Capture child closed its side of the pipe, report any error and
2817  * do the required cleanup.
2818  */
2819 void
2820 capture_input_closed(capture_session *cap_session, gchar *msg)
2821 {
2822   capture_file *cf = (capture_file *) cap_session->cf;
2823
2824   if (msg != NULL)
2825     fprintf(stderr, "tshark: %s\n", msg);
2826
2827   report_counts();
2828
2829   if (cf != NULL && cf->wth != NULL) {
2830     wtap_close(cf->wth);
2831     if (cf->is_tempfile) {
2832       ws_unlink(cf->filename);
2833     }
2834   }
2835 #ifdef USE_BROKEN_G_MAIN_LOOP
2836   /*g_main_loop_quit(loop);*/
2837   g_main_loop_quit(loop);
2838 #else
2839   loop_running = FALSE;
2840 #endif
2841 }
2842
2843
2844
2845
2846 #ifdef _WIN32
2847 static BOOL WINAPI
2848 capture_cleanup(DWORD ctrltype _U_)
2849 {
2850   /* CTRL_C_EVENT is sort of like SIGINT, CTRL_BREAK_EVENT is unique to
2851      Windows, CTRL_CLOSE_EVENT is sort of like SIGHUP, CTRL_LOGOFF_EVENT
2852      is also sort of like SIGHUP, and CTRL_SHUTDOWN_EVENT is sort of
2853      like SIGTERM at least when the machine's shutting down.
2854
2855      For now, we handle them all as indications that we should clean up
2856      and quit, just as we handle SIGINT, SIGHUP, and SIGTERM in that
2857      way on UNIX.
2858
2859      We must return TRUE so that no other handler - such as one that would
2860      terminate the process - gets called.
2861
2862      XXX - for some reason, typing ^C to TShark, if you run this in
2863      a Cygwin console window in at least some versions of Cygwin,
2864      causes TShark to terminate immediately; this routine gets
2865      called, but the main loop doesn't get a chance to run and
2866      exit cleanly, at least if this is compiled with Microsoft Visual
2867      C++ (i.e., it's a property of the Cygwin console window or Bash;
2868      it happens if TShark is not built with Cygwin - for all I know,
2869      building it with Cygwin may make the problem go away). */
2870
2871   /* tell the capture child to stop */
2872   sync_pipe_stop(&global_capture_session);
2873
2874   /* don't stop our own loop already here, otherwise status messages and
2875    * cleanup wouldn't be done properly. The child will indicate the stop of
2876    * everything by calling capture_input_closed() later */
2877
2878   return TRUE;
2879 }
2880 #else
2881 static void
2882 capture_cleanup(int signum _U_)
2883 {
2884   /* tell the capture child to stop */
2885   sync_pipe_stop(&global_capture_session);
2886
2887   /* don't stop our own loop already here, otherwise status messages and
2888    * cleanup wouldn't be done properly. The child will indicate the stop of
2889    * everything by calling capture_input_closed() later */
2890 }
2891 #endif /* _WIN32 */
2892 #endif /* HAVE_LIBPCAP */
2893
2894 static gboolean
2895 process_packet_first_pass(capture_file *cf, epan_dissect_t *edt,
2896                gint64 offset, struct wtap_pkthdr *whdr,
2897                const guchar *pd)
2898 {
2899   frame_data     fdlocal;
2900   guint32        framenum;
2901   gboolean       passed;
2902
2903   /* The frame number of this packet is one more than the count of
2904      frames in this packet. */
2905   framenum = cf->count + 1;
2906
2907   /* If we're not running a display filter and we're not printing any
2908      packet information, we don't need to do a dissection. This means
2909      that all packets can be marked as 'passed'. */
2910   passed = TRUE;
2911
2912   frame_data_init(&fdlocal, framenum, whdr, offset, cum_bytes);
2913
2914   /* If we're going to print packet information, or we're going to
2915      run a read filter, or display filter, or we're going to process taps, set up to
2916      do a dissection and do so. */
2917   if (edt) {
2918     if (gbl_resolv_flags.mac_name || gbl_resolv_flags.network_name ||
2919         gbl_resolv_flags.transport_name || gbl_resolv_flags.concurrent_dns)
2920       /* Grab any resolved addresses */
2921       host_name_lookup_process();
2922
2923     /* If we're running a read filter, prime the epan_dissect_t with that
2924        filter. */
2925     if (cf->rfcode)
2926       epan_dissect_prime_dfilter(edt, cf->rfcode);
2927
2928     if (cf->dfcode)
2929       epan_dissect_prime_dfilter(edt, cf->dfcode);
2930
2931     frame_data_set_before_dissect(&fdlocal, &cf->elapsed_time,
2932                                   &ref, prev_dis);
2933     if (ref == &fdlocal) {
2934       ref_frame = fdlocal;
2935       ref = &ref_frame;
2936     }
2937
2938     epan_dissect_run(edt, cf->cd_t, whdr, frame_tvbuff_new(&fdlocal, pd), &fdlocal, NULL);
2939
2940     /* Run the read filter if we have one. */
2941     if (cf->rfcode)
2942       passed = dfilter_apply_edt(cf->rfcode, edt);
2943   }
2944
2945   if (passed) {
2946     frame_data_set_after_dissect(&fdlocal, &cum_bytes);
2947     prev_cap = prev_dis = frame_data_sequence_add(cf->frames, &fdlocal);
2948
2949     /* If we're not doing dissection then there won't be any dependent frames.
2950      * More importantly, edt.pi.dependent_frames won't be initialized because
2951      * epan hasn't been initialized.
2952      * if we *are* doing dissection, then mark the dependent frames, but only
2953      * if a display filter was given and it matches this packet.
2954      */
2955     if (edt && cf->dfcode) {
2956       if (dfilter_apply_edt(cf->dfcode, edt)) {
2957         g_slist_foreach(edt->pi.dependent_frames, find_and_mark_frame_depended_upon, cf->frames);
2958       }
2959     }
2960
2961     cf->count++;
2962   } else {
2963     /* if we don't add it to the frame_data_sequence, clean it up right now
2964      * to avoid leaks */
2965     frame_data_destroy(&fdlocal);
2966   }
2967
2968   if (edt)
2969     epan_dissect_reset(edt);
2970
2971   return passed;
2972 }
2973
2974 static gboolean
2975 process_packet_second_pass(capture_file *cf, epan_dissect_t *edt, frame_data *fdata,
2976                struct wtap_pkthdr *phdr, Buffer *buf,
2977                guint tap_flags)
2978 {
2979   column_info    *cinfo;
2980   gboolean        passed;
2981
2982   /* If we're not running a display filter and we're not printing any
2983      packet information, we don't need to do a dissection. This means
2984      that all packets can be marked as 'passed'. */
2985   passed = TRUE;
2986
2987   /* If we're going to print packet information, or we're going to
2988      run a read filter, or we're going to process taps, set up to
2989      do a dissection and do so. */
2990   if (edt) {
2991     if (gbl_resolv_flags.mac_name || gbl_resolv_flags.network_name ||
2992         gbl_resolv_flags.transport_name || gbl_resolv_flags.concurrent_dns)
2993       /* Grab any resolved addresses */
2994       host_name_lookup_process();
2995
2996     /* If we're running a display filter, prime the epan_dissect_t with that
2997        filter. */
2998     if (cf->dfcode)
2999       epan_dissect_prime_dfilter(edt, cf->dfcode);
3000
3001     col_custom_prime_edt(edt, &cf->cinfo);
3002
3003     /* We only need the columns if either
3004          1) some tap needs the columns
3005        or
3006          2) we're printing packet info but we're *not* verbose; in verbose
3007             mode, we print the protocol tree, not the protocol summary.
3008      */
3009     if ((tap_flags & TL_REQUIRES_COLUMNS) || (print_packet_info && print_summary))
3010       cinfo = &cf->cinfo;
3011     else
3012       cinfo = NULL;
3013
3014     frame_data_set_before_dissect(fdata, &cf->elapsed_time,
3015                                   &ref, prev_dis);
3016     if (ref == fdata) {
3017       ref_frame = *fdata;
3018       ref = &ref_frame;
3019     }
3020
3021     epan_dissect_run_with_taps(edt, cf->cd_t, phdr, frame_tvbuff_new_buffer(fdata, buf), fdata, cinfo);
3022
3023     /* Run the read/display filter if we have one. */
3024     if (cf->dfcode)
3025       passed = dfilter_apply_edt(cf->dfcode, edt);
3026   }
3027
3028   if (passed) {
3029     frame_data_set_after_dissect(fdata, &cum_bytes);
3030     /* Process this packet. */
3031     if (print_packet_info) {
3032       /* We're printing packet information; print the information for
3033          this packet. */
3034       print_packet(cf, edt);
3035
3036       /* The ANSI C standard does not appear to *require* that a line-buffered
3037          stream be flushed to the host environment whenever a newline is
3038          written, it just says that, on such a stream, characters "are
3039          intended to be transmitted to or from the host environment as a
3040          block when a new-line character is encountered".
3041
3042          The Visual C++ 6.0 C implementation doesn't do what is intended;
3043          even if you set a stream to be line-buffered, it still doesn't
3044          flush the buffer at the end of every line.
3045
3046          So, if the "-l" flag was specified, we flush the standard output
3047          at the end of a packet.  This will do the right thing if we're
3048          printing packet summary lines, and, as we print the entire protocol
3049          tree for a single packet without waiting for anything to happen,
3050          it should be as good as line-buffered mode if we're printing
3051          protocol trees.  (The whole reason for the "-l" flag in either
3052          tcpdump or TShark is to allow the output of a live capture to
3053          be piped to a program or script and to have that script see the
3054          information for the packet as soon as it's printed, rather than
3055          having to wait until a standard I/O buffer fills up. */
3056       if (line_buffered)
3057         fflush(stdout);
3058
3059       if (ferror(stdout)) {
3060         show_print_file_io_error(errno);
3061         exit(2);
3062       }
3063     }
3064     prev_dis = fdata;
3065   }
3066   prev_cap = fdata;
3067
3068   if (edt) {
3069     epan_dissect_reset(edt);
3070   }
3071   return passed || fdata->flags.dependent_of_displayed;
3072 }
3073
3074 static int
3075 load_cap_file(capture_file *cf, char *save_file, int out_file_type,
3076     gboolean out_file_name_res, int max_packet_count, gint64 max_byte_count)
3077 {
3078   gint         linktype;
3079   int          snapshot_length;
3080   wtap_dumper *pdh;
3081   guint32      framenum;
3082   int          err;
3083   gchar       *err_info = NULL;
3084   gint64       data_offset;
3085   char        *save_file_string = NULL;
3086   gboolean     filtering_tap_listeners;
3087   guint        tap_flags;
3088   wtapng_section_t            *shb_hdr;
3089   wtapng_iface_descriptions_t *idb_inf;
3090   char         appname[100];
3091   struct wtap_pkthdr phdr;
3092   Buffer       buf;
3093   epan_dissect_t *edt = NULL;
3094
3095   memset(&phdr, 0, sizeof(struct wtap_pkthdr));
3096
3097   shb_hdr = wtap_file_get_shb_info(cf->wth);
3098   idb_inf = wtap_file_get_idb_info(cf->wth);
3099 #ifdef PCAP_NG_DEFAULT
3100   if (idb_inf->interface_data->len > 1) {
3101     linktype = WTAP_ENCAP_PER_PACKET;
3102   } else {
3103     linktype = wtap_file_encap(cf->wth);
3104   }
3105 #else
3106   linktype = wtap_file_encap(cf->wth);
3107 #endif
3108   if (save_file != NULL) {
3109     /* Get a string that describes what we're writing to */
3110     save_file_string = output_file_description(save_file);
3111
3112     /* Set up to write to the capture file. */
3113     snapshot_length = wtap_snapshot_length(cf->wth);
3114     if (snapshot_length == 0) {
3115       /* Snapshot length of input file not known. */
3116       snapshot_length = WTAP_MAX_PACKET_SIZE;
3117     }
3118     /* If we don't have an application name add Tshark */
3119     if (shb_hdr->shb_user_appl == NULL) {
3120         g_snprintf(appname, sizeof(appname), "TShark %s", get_ws_vcs_version_info());
3121         shb_hdr->shb_user_appl = appname;
3122     }
3123
3124     if (linktype != WTAP_ENCAP_PER_PACKET &&
3125         out_file_type == WTAP_FILE_TYPE_SUBTYPE_PCAP)
3126         pdh = wtap_dump_open(save_file, out_file_type, linktype,
3127             snapshot_length, FALSE /* compressed */, &err);
3128     else
3129         pdh = wtap_dump_open_ng(save_file, out_file_type, linktype,
3130             snapshot_length, FALSE /* compressed */, shb_hdr, idb_inf, &err);
3131
3132     g_free(idb_inf);
3133     idb_inf = NULL;
3134
3135     if (pdh == NULL) {
3136       /* We couldn't set up to write to the capture file. */
3137       switch (err) {
3138
3139       case WTAP_ERR_UNSUPPORTED_FILE_TYPE:
3140         cmdarg_err("Capture files can't be written in that format.");
3141         break;
3142
3143       case WTAP_ERR_UNSUPPORTED_ENCAP:
3144       case WTAP_ERR_ENCAP_PER_PACKET_UNSUPPORTED:
3145         cmdarg_err("The capture file being read can't be written as a "
3146           "\"%s\" file.", wtap_file_type_subtype_short_string(out_file_type));
3147         break;
3148
3149       case WTAP_ERR_CANT_OPEN:
3150         cmdarg_err("The %s couldn't be created for some "
3151           "unknown reason.", save_file_string);
3152         break;
3153
3154       case WTAP_ERR_SHORT_WRITE:
3155         cmdarg_err("A full header couldn't be written to the %s.",
3156                    save_file_string);
3157         break;
3158
3159       default:
3160         cmdarg_err("The %s could not be created: %s.", save_file_string,
3161                    wtap_strerror(err));
3162         break;
3163       }
3164       goto out;
3165     }
3166   } else {
3167     if (print_packet_info) {
3168       if (!write_preamble(cf)) {
3169         err = errno;
3170         show_print_file_io_error(err);
3171         goto out;
3172       }
3173     }
3174     g_free(idb_inf);
3175     idb_inf = NULL;
3176     pdh = NULL;
3177   }
3178
3179   if (pdh && out_file_name_res) {
3180     if (!wtap_dump_set_addrinfo_list(pdh, get_addrinfo_list())) {
3181       cmdarg_err("The file format \"%s\" doesn't support name resolution information.",
3182                  wtap_file_type_subtype_short_string(out_file_type));
3183     }
3184   }
3185
3186   /* Do we have any tap listeners with filters? */
3187   filtering_tap_listeners = have_filtering_tap_listeners();
3188
3189   /* Get the union of the flags for all tap listeners. */
3190   tap_flags = union_of_tap_listener_flags();
3191
3192   if (perform_two_pass_analysis) {
3193     frame_data *fdata;
3194
3195     /* Allocate a frame_data_sequence for all the frames. */
3196     cf->frames = new_frame_data_sequence();
3197
3198     if (do_dissection) {
3199        gboolean create_proto_tree = FALSE;
3200
3201       /* If we're going to be applying a filter, we'll need to
3202          create a protocol tree against which to apply the filter. */
3203       if (cf->rfcode || cf->dfcode)
3204         create_proto_tree = TRUE;
3205
3206       /* We're not going to display the protocol tree on this pass,
3207          so it's not going to be "visible". */
3208       edt = epan_dissect_new(cf->epan, create_proto_tree, FALSE);
3209     }
3210
3211     while (wtap_read(cf->wth, &err, &err_info, &data_offset)) {
3212       if (process_packet_first_pass(cf, edt, data_offset, wtap_phdr(cf->wth),
3213                          wtap_buf_ptr(cf->wth))) {
3214         /* Stop reading if we have the maximum number of packets;
3215          * When the -c option has not been used, max_packet_count
3216          * starts at 0, which practically means, never stop reading.
3217          * (unless we roll over max_packet_count ?)
3218          */
3219         if ( (--max_packet_count == 0) || (max_byte_count != 0 && data_offset >= max_byte_count)) {
3220           err = 0; /* This is not an error */
3221           break;
3222         }
3223       }
3224     }
3225
3226     if (edt) {
3227       epan_dissect_free(edt);
3228       edt = NULL;
3229     }
3230
3231     /* Close the sequential I/O side, to free up memory it requires. */
3232     wtap_sequential_close(cf->wth);
3233
3234     /* Allow the protocol dissectors to free up memory that they
3235      * don't need after the sequential run-through of the packets. */
3236     postseq_cleanup_all_protocols();
3237
3238     prev_dis = NULL;
3239     prev_cap = NULL;
3240     buffer_init(&buf, 1500);
3241
3242     if (do_dissection) {
3243       gboolean create_proto_tree;
3244
3245       if (cf->dfcode || print_details || filtering_tap_listeners ||
3246          (tap_flags & TL_REQUIRES_PROTO_TREE) || have_custom_cols(&cf->cinfo))
3247            create_proto_tree = TRUE;
3248       else
3249            create_proto_tree = FALSE;
3250
3251       /* The protocol tree will be "visible", i.e., printed, only if we're
3252          printing packet details, which is true if we're printing stuff
3253          ("print_packet_info" is true) and we're in verbose mode
3254          ("packet_details" is true). */
3255       edt = epan_dissect_new(cf->epan, create_proto_tree, print_packet_info && print_details);
3256     }
3257
3258     for (framenum = 1; err == 0 && framenum <= cf->count; framenum++) {
3259       fdata = frame_data_sequence_find(cf->frames, framenum);
3260       if (wtap_seek_read(cf->wth, fdata->file_off, &phdr, &buf, &err,
3261                          &err_info)) {
3262         if (process_packet_second_pass(cf, edt, fdata, &phdr, &buf,
3263                                        tap_flags)) {
3264           /* Either there's no read filtering or this packet passed the
3265              filter, so, if we're writing to a capture file, write
3266              this packet out. */
3267           if (pdh != NULL) {
3268             if (!wtap_dump(pdh, &phdr, buffer_start_ptr(&buf), &err)) {
3269               /* Error writing to a capture file */
3270               switch (err) {
3271
3272               case WTAP_ERR_UNSUPPORTED_ENCAP:
3273                 /*
3274                  * This is a problem with the particular frame we're writing
3275                  * and the file type and subtype we're writing; note that,
3276                  * and report the frame number and file type/subtype.
3277                  *
3278                  * XXX - framenum is not necessarily the frame number in
3279                  * the input file if there was a read filter.
3280                  */
3281                 fprintf(stderr,
3282                         "Frame %u of \"%s\" has a network type that can't be saved in a \"%s\" file.\n",
3283                         framenum, cf->filename,
3284                         wtap_file_type_subtype_short_string(out_file_type));
3285                 break;
3286
3287               case WTAP_ERR_PACKET_TOO_LARGE:
3288                 /*
3289                  * This is a problem with the particular frame we're writing
3290                  * and the file type and subtype we're writing; note that,
3291                  * and report the frame number and file type/subtype.
3292                  *
3293                  * XXX - framenum is not necessarily the frame number in
3294                  * the input file if there was a read filter.
3295                  */
3296                 fprintf(stderr,
3297                         "Frame %u of \"%s\" is too large for a \"%s\" file.\n",
3298                         framenum, cf->filename,
3299                         wtap_file_type_subtype_short_string(out_file_type));
3300                 break;
3301
3302               default:
3303                 show_capture_file_io_error(save_file, err, FALSE);
3304                 break;
3305               }
3306               wtap_dump_close(pdh, &err);
3307               g_free(shb_hdr);
3308               exit(2);
3309             }
3310           }
3311         }
3312       }
3313     }
3314
3315     if (edt) {
3316       epan_dissect_free(edt);
3317       edt = NULL;
3318     }
3319
3320     buffer_free(&buf);
3321   }
3322   else {
3323     framenum = 0;
3324
3325     if (do_dissection) {
3326       gboolean create_proto_tree;
3327
3328       if (cf->rfcode || cf->dfcode || print_details || filtering_tap_listeners ||
3329           (tap_flags & TL_REQUIRES_PROTO_TREE) || have_custom_cols(&cf->cinfo))
3330         create_proto_tree = TRUE;
3331       else
3332         create_proto_tree = FALSE;
3333
3334       /* The protocol tree will be "visible", i.e., printed, only if we're
3335          printing packet details, which is true if we're printing stuff
3336          ("print_packet_info" is true) and we're in verbose mode
3337          ("packet_details" is true). */
3338       edt = epan_dissect_new(cf->epan, create_proto_tree, print_packet_info && print_details);
3339     }
3340
3341     while (wtap_read(cf->wth, &err, &err_info, &data_offset)) {
3342       framenum++;
3343
3344       if (process_packet(cf, edt, data_offset, wtap_phdr(cf->wth),
3345                          wtap_buf_ptr(cf->wth),
3346                          tap_flags)) {
3347         /* Either there's no read filtering or this packet passed the
3348            filter, so, if we're writing to a capture file, write
3349            this packet out. */
3350         if (pdh != NULL) {
3351           if (!wtap_dump(pdh, wtap_phdr(cf->wth), wtap_buf_ptr(cf->wth), &err)) {
3352             /* Error writing to a capture file */
3353             switch (err) {
3354
3355             case WTAP_ERR_UNSUPPORTED_ENCAP:
3356               /*
3357                * This is a problem with the particular frame we're writing
3358                * and the file type and subtype we're writing; note that,
3359                * and report the frame number and file type/subtype.
3360                */
3361               fprintf(stderr,
3362                       "Frame %u of \"%s\" has a network type that can't be saved in a \"%s\" file.\n",
3363                       framenum, cf->filename,
3364                       wtap_file_type_subtype_short_string(out_file_type));
3365               break;
3366
3367             case WTAP_ERR_PACKET_TOO_LARGE:
3368               /*
3369                * This is a problem with the particular frame we're writing
3370                * and the file type and subtype we're writing; note that,
3371                * and report the frame number and file type/subtype.
3372                */
3373               fprintf(stderr,
3374                       "Frame %u of \"%s\" is too large for a \"%s\" file.\n",
3375                       framenum, cf->filename,
3376                       wtap_file_type_subtype_short_string(out_file_type));
3377               break;
3378
3379             default:
3380               show_capture_file_io_error(save_file, err, FALSE);
3381               break;
3382             }
3383             wtap_dump_close(pdh, &err);
3384             g_free(shb_hdr);
3385             exit(2);
3386           }
3387         }
3388       }
3389       /* Stop reading if we have the maximum number of packets;
3390        * When the -c option has not been used, max_packet_count
3391        * starts at 0, which practically means, never stop reading.
3392        * (unless we roll over max_packet_count ?)
3393        */
3394       if ( (--max_packet_count == 0) || (max_byte_count != 0 && data_offset >= max_byte_count)) {
3395         err = 0; /* This is not an error */
3396         break;
3397       }
3398     }
3399
3400     if (edt) {
3401       epan_dissect_free(edt);
3402       edt = NULL;
3403     }
3404   }
3405
3406   if (err != 0) {
3407     /*
3408      * Print a message noting that the read failed somewhere along the line.
3409      *
3410      * If we're printing packet data, and the standard output and error are
3411      * going to the same place, flush the standard output, so everything
3412      * buffered up is written, and then print a newline to the standard error
3413      * before printing the error message, to separate it from the packet
3414      * data.  (Alas, that only works on UN*X; st_dev is meaningless, and
3415      * the _fstat() documentation at Microsoft doesn't indicate whether
3416      * st_ino is even supported.)
3417      */
3418 #ifndef _WIN32
3419     if (print_packet_info) {
3420       struct stat stat_stdout, stat_stderr;
3421
3422       if (fstat(1, &stat_stdout) == 0 && fstat(2, &stat_stderr) == 0) {
3423         if (stat_stdout.st_dev == stat_stderr.st_dev &&
3424             stat_stdout.st_ino == stat_stderr.st_ino) {
3425           fflush(stdout);
3426           fprintf(stderr, "\n");
3427         }
3428       }
3429     }
3430 #endif
3431     switch (err) {
3432
3433     case WTAP_ERR_UNSUPPORTED:
3434       cmdarg_err("The file \"%s\" contains record data that TShark doesn't support.\n(%s)",
3435                  cf->filename, err_info);
3436       g_free(err_info);
3437       break;
3438
3439     case WTAP_ERR_UNSUPPORTED_ENCAP:
3440       cmdarg_err("The file \"%s\" has a packet with a network type that TShark doesn't support.\n(%s)",
3441                  cf->filename, err_info);
3442       g_free(err_info);
3443       break;
3444
3445     case WTAP_ERR_CANT_READ:
3446       cmdarg_err("An attempt to read from the file \"%s\" failed for some unknown reason.",
3447                  cf->filename);
3448       break;
3449
3450     case WTAP_ERR_SHORT_READ:
3451       cmdarg_err("The file \"%s\" appears to have been cut short in the middle of a packet.",
3452                  cf->filename);
3453       break;
3454
3455     case WTAP_ERR_BAD_FILE:
3456       cmdarg_err("The file \"%s\" appears to be damaged or corrupt.\n(%s)",
3457                  cf->filename, err_info);
3458       g_free(err_info);
3459       break;
3460
3461     case WTAP_ERR_DECOMPRESS:
3462       cmdarg_err("The compressed file \"%s\" appears to be damaged or corrupt.\n"
3463                  "(%s)", cf->filename, err_info);
3464       break;
3465
3466     default:
3467       cmdarg_err("An error occurred while reading the file \"%s\": %s.",
3468                  cf->filename, wtap_strerror(err));
3469       break;
3470     }
3471     if (save_file != NULL) {
3472       /* Now close the capture file. */
3473       if (!wtap_dump_close(pdh, &err))
3474         show_capture_file_io_error(save_file, err, TRUE);
3475     }
3476   } else {
3477     if (save_file != NULL) {
3478       /* Now close the capture file. */
3479       if (!wtap_dump_close(pdh, &err))
3480         show_capture_file_io_error(save_file, err, TRUE);
3481     } else {
3482       if (print_packet_info) {
3483         if (!write_finale()) {
3484           err = errno;
3485           show_print_file_io_error(err);
3486         }
3487       }
3488     }
3489   }
3490
3491 out:
3492   wtap_close(cf->wth);
3493   cf->wth = NULL;
3494
3495   g_free(save_file_string);
3496   g_free(shb_hdr);
3497
3498   return err;
3499 }
3500
3501 static gboolean
3502 process_packet(capture_file *cf, epan_dissect_t *edt, gint64 offset, struct wtap_pkthdr *whdr,
3503                const guchar *pd, guint tap_flags)
3504 {
3505   frame_data      fdata;
3506   column_info    *cinfo;
3507   gboolean        passed;
3508
3509   /* Count this packet. */
3510   cf->count++;
3511
3512   /* If we're not running a display filter and we're not printing any
3513      packet information, we don't need to do a dissection. This means
3514      that all packets can be marked as 'passed'. */
3515   passed = TRUE;
3516
3517   frame_data_init(&fdata, cf->count, whdr, offset, cum_bytes);
3518
3519   /* If we're going to print packet information, or we're going to
3520      run a read filter, or we're going to process taps, set up to
3521      do a dissection and do so. */
3522   if (edt) {
3523     if (print_packet_info && (gbl_resolv_flags.mac_name || gbl_resolv_flags.network_name ||
3524         gbl_resolv_flags.transport_name || gbl_resolv_flags.concurrent_dns))
3525       /* Grab any resolved addresses */
3526       host_name_lookup_process();
3527
3528     /* If we're running a filter, prime the epan_dissect_t with that
3529        filter. */
3530     if (cf->dfcode)
3531       epan_dissect_prime_dfilter(edt, cf->dfcode);
3532
3533     col_custom_prime_edt(edt, &cf->cinfo);
3534
3535     /* We only need the columns if either
3536          1) some tap needs the columns
3537        or
3538          2) we're printing packet info but we're *not* verbose; in verbose
3539             mode, we print the protocol tree, not the protocol summary.
3540        or
3541          3) there is a column mapped as an individual field */
3542     if ((tap_flags & TL_REQUIRES_COLUMNS) || (print_packet_info && print_summary) || output_fields_has_cols(output_fields))
3543       cinfo = &cf->cinfo;
3544     else
3545       cinfo = NULL;
3546
3547     frame_data_set_before_dissect(&fdata, &cf->elapsed_time,
3548                                   &ref, prev_dis);
3549     if (ref == &fdata) {
3550       ref_frame = fdata;
3551       ref = &ref_frame;
3552     }
3553
3554     epan_dissect_run_with_taps(edt, cf->cd_t, whdr, frame_tvbuff_new(&fdata, pd), &fdata, cinfo);
3555
3556     /* Run the filter if we have it. */
3557     if (cf->dfcode)
3558       passed = dfilter_apply_edt(cf->dfcode, edt);
3559   }
3560
3561   if (passed) {
3562     frame_data_set_after_dissect(&fdata, &cum_bytes);
3563
3564     /* Process this packet. */
3565     if (print_packet_info) {
3566       /* We're printing packet information; print the information for
3567          this packet. */
3568       print_packet(cf, edt);
3569
3570       /* The ANSI C standard does not appear to *require* that a line-buffered
3571          stream be flushed to the host environment whenever a newline is
3572          written, it just says that, on such a stream, characters "are
3573          intended to be transmitted to or from the host environment as a
3574          block when a new-line character is encountered".
3575
3576          The Visual C++ 6.0 C implementation doesn't do what is intended;
3577          even if you set a stream to be line-buffered, it still doesn't
3578          flush the buffer at the end of every line.
3579
3580          So, if the "-l" flag was specified, we flush the standard output
3581          at the end of a packet.  This will do the right thing if we're
3582          printing packet summary lines, and, as we print the entire protocol
3583          tree for a single packet without waiting for anything to happen,
3584          it should be as good as line-buffered mode if we're printing
3585          protocol trees.  (The whole reason for the "-l" flag in either
3586          tcpdump or TShark is to allow the output of a live capture to
3587          be piped to a program or script and to have that script see the
3588          information for the packet as soon as it's printed, rather than
3589          having to wait until a standard I/O buffer fills up. */
3590       if (line_buffered)
3591         fflush(stdout);
3592
3593       if (ferror(stdout)) {
3594         show_print_file_io_error(errno);
3595         exit(2);
3596       }
3597     }
3598
3599     /* this must be set after print_packet() [bug #8160] */
3600     prev_dis_frame = fdata;
3601     prev_dis = &prev_dis_frame;
3602   }
3603
3604   prev_cap_frame = fdata;
3605   prev_cap = &prev_cap_frame;
3606
3607   if (edt) {
3608     epan_dissect_reset(edt);
3609     frame_data_destroy(&fdata);
3610   }
3611   return passed;
3612 }
3613
3614 static gboolean
3615 write_preamble(capture_file *cf)
3616 {
3617   switch (output_action) {
3618
3619   case WRITE_TEXT:
3620     return print_preamble(print_stream, cf ? cf->filename : NULL, get_ws_vcs_version_info());
3621
3622   case WRITE_XML:
3623     if (print_details)
3624       write_pdml_preamble(stdout, cf ? cf->filename : NULL);
3625     else
3626       write_psml_preamble(stdout);
3627     return !ferror(stdout);
3628
3629   case WRITE_FIELDS:
3630     write_fields_preamble(output_fields, stdout);
3631     return !ferror(stdout);
3632
3633   default:
3634     g_assert_not_reached();
3635     return FALSE;
3636   }
3637 }
3638
3639 static char *
3640 get_line_buf(size_t len)
3641 {
3642   static char   *line_bufp    = NULL;
3643   static size_t  line_buf_len = 256;
3644   size_t         new_line_buf_len;
3645
3646   for (new_line_buf_len = line_buf_len; len > new_line_buf_len;
3647        new_line_buf_len *= 2)
3648     ;
3649   if (line_bufp == NULL) {
3650     line_buf_len = new_line_buf_len;
3651     line_bufp = (char *)g_malloc(line_buf_len + 1);
3652   } else {
3653     if (new_line_buf_len > line_buf_len) {
3654       line_buf_len = new_line_buf_len;
3655       line_bufp = (char *)g_realloc(line_bufp, line_buf_len + 1);
3656     }
3657   }
3658   return line_bufp;
3659 }
3660
3661 static inline void
3662 put_string(char *dest, const char *str, size_t str_len)
3663 {
3664   memcpy(dest, str, str_len);
3665   dest[str_len] = '\0';
3666 }
3667
3668 static inline void
3669 put_spaces_string(char *dest, const char *str, size_t str_len, size_t str_with_spaces)
3670 {
3671   size_t i;
3672
3673   for (i = str_len; i < str_with_spaces; i++)
3674     *dest++ = ' ';
3675
3676   put_string(dest, str, str_len);
3677 }
3678
3679 static inline void
3680 put_string_spaces(char *dest, const char *str, size_t str_len, size_t str_with_spaces)
3681 {
3682   size_t i;
3683
3684   memcpy(dest, str, str_len);
3685   for (i = str_len; i < str_with_spaces; i++)
3686     dest[i] = ' ';
3687
3688   dest[str_with_spaces] = '\0';
3689 }
3690
3691 static gboolean
3692 print_columns(capture_file *cf)
3693 {
3694   char   *line_bufp;
3695   int     i;
3696   size_t  buf_offset;
3697   size_t  column_len;
3698   size_t  col_len;
3699
3700   line_bufp = get_line_buf(256);
3701   buf_offset = 0;
3702   *line_bufp = '\0';
3703   for (i = 0; i < cf->cinfo.num_cols; i++) {
3704     /* Skip columns not marked as visible. */
3705     if (!get_column_visible(i))
3706       continue;
3707     switch (cf->cinfo.col_fmt[i]) {
3708     case COL_NUMBER:
3709       column_len = col_len = strlen(cf->cinfo.col_data[i]);
3710       if (column_len < 3)
3711         column_len = 3;
3712       line_bufp = get_line_buf(buf_offset + column_len);
3713       put_spaces_string(line_bufp + buf_offset, cf->cinfo.col_data[i], col_len, column_len);
3714       break;
3715
3716     case COL_CLS_TIME:
3717     case COL_REL_TIME:
3718     case COL_ABS_TIME:
3719     case COL_ABS_YMD_TIME:  /* XXX - wider */
3720     case COL_ABS_YDOY_TIME: /* XXX - wider */
3721     case COL_UTC_TIME:
3722     case COL_UTC_YMD_TIME:  /* XXX - wider */
3723     case COL_UTC_YDOY_TIME: /* XXX - wider */
3724       column_len = col_len = strlen(cf->cinfo.col_data[i]);
3725       if (column_len < 10)
3726         column_len = 10;
3727       line_bufp = get_line_buf(buf_offset + column_len);
3728       put_spaces_string(line_bufp + buf_offset, cf->cinfo.col_data[i], col_len, column_len);
3729       break;
3730
3731     case COL_DEF_SRC:
3732     case COL_RES_SRC:
3733     case COL_UNRES_SRC:
3734     case COL_DEF_DL_SRC:
3735     case COL_RES_DL_SRC:
3736     case COL_UNRES_DL_SRC:
3737     case COL_DEF_NET_SRC:
3738     case COL_RES_NET_SRC:
3739     case COL_UNRES_NET_SRC:
3740       column_len = col_len = strlen(cf->cinfo.col_data[i]);
3741       if (column_len < 12)
3742         column_len = 12;
3743       line_bufp = get_line_buf(buf_offset + column_len);
3744       put_spaces_string(line_bufp + buf_offset, cf->cinfo.col_data[i], col_len, column_len);
3745       break;
3746
3747     case COL_DEF_DST:
3748     case COL_RES_DST:
3749     case COL_UNRES_DST:
3750     case COL_DEF_DL_DST:
3751     case COL_RES_DL_DST:
3752     case COL_UNRES_DL_DST:
3753     case COL_DEF_NET_DST:
3754     case COL_RES_NET_DST:
3755     case COL_UNRES_NET_DST:
3756       column_len = col_len = strlen(cf->cinfo.col_data[i]);
3757       if (column_len < 12)
3758         column_len = 12;
3759       line_bufp = get_line_buf(buf_offset + column_len);
3760       put_string_spaces(line_bufp + buf_offset, cf->cinfo.col_data[i], col_len, column_len);
3761       break;
3762
3763     default:
3764       column_len = strlen(cf->cinfo.col_data[i]);
3765       line_bufp = get_line_buf(buf_offset + column_len);
3766       put_string(line_bufp + buf_offset, cf->cinfo.col_data[i], column_len);
3767       break;
3768     }
3769     buf_offset += column_len;
3770     if (i != cf->cinfo.num_cols - 1) {
3771       /*
3772        * This isn't the last column, so we need to print a
3773        * separator between this column and the next.
3774        *
3775        * If we printed a network source and are printing a
3776        * network destination of the same type next, separate
3777        * them with " -> "; if we printed a network destination
3778        * and are printing a network source of the same type
3779        * next, separate them with " <- "; otherwise separate them
3780        * with a space.
3781        *
3782        * We add enough space to the buffer for " <- " or " -> ",
3783        * even if we're only adding " ".
3784        */
3785       line_bufp = get_line_buf(buf_offset + 4);
3786       switch (cf->cinfo.col_fmt[i]) {
3787
3788       case COL_DEF_SRC:
3789       case COL_RES_SRC:
3790       case COL_UNRES_SRC:
3791         switch (cf->cinfo.col_fmt[i + 1]) {
3792
3793         case COL_DEF_DST:
3794         case COL_RES_DST:
3795         case COL_UNRES_DST:
3796           put_string(line_bufp + buf_offset, " -> ", 4);
3797           buf_offset += 4;
3798           break;
3799
3800         default:
3801           put_string(line_bufp + buf_offset, " ", 1);
3802           buf_offset += 1;
3803           break;
3804         }
3805         break;
3806
3807       case COL_DEF_DL_SRC:
3808       case COL_RES_DL_SRC:
3809       case COL_UNRES_DL_SRC:
3810         switch (cf->cinfo.col_fmt[i + 1]) {
3811
3812         case COL_DEF_DL_DST:
3813         case COL_RES_DL_DST:
3814         case COL_UNRES_DL_DST:
3815           put_string(line_bufp + buf_offset, " -> ", 4);
3816           buf_offset += 4;
3817           break;
3818
3819         default:
3820           put_string(line_bufp + buf_offset, " ", 1);
3821           buf_offset += 1;
3822           break;
3823         }
3824         break;
3825
3826       case COL_DEF_NET_SRC:
3827       case COL_RES_NET_SRC:
3828       case COL_UNRES_NET_SRC:
3829         switch (cf->cinfo.col_fmt[i + 1]) {
3830
3831         case COL_DEF_NET_DST:
3832         case COL_RES_NET_DST:
3833         case COL_UNRES_NET_DST:
3834           put_string(line_bufp + buf_offset, " -> ", 4);
3835           buf_offset += 4;
3836           break;
3837
3838         default:
3839           put_string(line_bufp + buf_offset, " ", 1);
3840           buf_offset += 1;
3841           break;
3842         }
3843         break;
3844
3845       case COL_DEF_DST:
3846       case COL_RES_DST:
3847       case COL_UNRES_DST:
3848         switch (cf->cinfo.col_fmt[i + 1]) {
3849
3850         case COL_DEF_SRC:
3851         case COL_RES_SRC:
3852         case COL_UNRES_SRC:
3853           put_string(line_bufp + buf_offset, " <- ", 4);
3854           buf_offset += 4;
3855           break;
3856
3857         default:
3858           put_string(line_bufp + buf_offset, " ", 1);
3859           buf_offset += 1;
3860           break;
3861         }
3862         break;
3863
3864       case COL_DEF_DL_DST:
3865       case COL_RES_DL_DST:
3866       case COL_UNRES_DL_DST:
3867         switch (cf->cinfo.col_fmt[i + 1]) {
3868
3869         case COL_DEF_DL_SRC:
3870         case COL_RES_DL_SRC:
3871         case COL_UNRES_DL_SRC:
3872           put_string(line_bufp + buf_offset, " <- ", 4);
3873           buf_offset += 4;
3874           break;
3875
3876         default:
3877           put_string(line_bufp + buf_offset, " ", 1);
3878           buf_offset += 1;
3879           break;
3880         }
3881         break;
3882
3883       case COL_DEF_NET_DST:
3884       case COL_RES_NET_DST:
3885       case COL_UNRES_NET_DST:
3886         switch (cf->cinfo.col_fmt[i + 1]) {
3887
3888         case COL_DEF_NET_SRC:
3889         case COL_RES_NET_SRC:
3890         case COL_UNRES_NET_SRC:
3891           put_string(line_bufp + buf_offset, " <- ", 4);
3892           buf_offset += 4;
3893           break;
3894
3895         default:
3896           put_string(line_bufp + buf_offset, " ", 1);
3897           buf_offset += 1;
3898           break;
3899         }
3900         break;
3901
3902       default:
3903         put_string(line_bufp + buf_offset, " ", 1);
3904         buf_offset += 1;
3905         break;
3906       }
3907     }
3908   }
3909   return print_line(print_stream, 0, line_bufp);
3910 }
3911
3912 static gboolean
3913 print_packet(capture_file *cf, epan_dissect_t *edt)
3914 {
3915   print_args_t print_args;
3916
3917   if (print_summary || output_fields_has_cols(output_fields)) {
3918     /* Just fill in the columns. */
3919     epan_dissect_fill_in_columns(edt, FALSE, TRUE);
3920
3921     if (print_summary) {
3922       /* Now print them. */
3923       switch (output_action) {
3924
3925       case WRITE_TEXT:
3926         if (!print_columns(cf))
3927           return FALSE;
3928         break;
3929
3930       case WRITE_XML:
3931         proto_tree_write_psml(edt, stdout);
3932         return !ferror(stdout);
3933       case WRITE_FIELDS: /*No non-verbose "fields" format */
3934         g_assert_not_reached();
3935         break;
3936       }
3937     }
3938   }
3939   if (print_details) {
3940     /* Print the information in the protocol tree. */
3941     switch (output_action) {
3942
3943     case WRITE_TEXT:
3944       /* Only initialize the fields that are actually used in proto_tree_print.
3945        * This is particularly important for .range, as that's heap memory which
3946        * we would otherwise have to g_free().
3947       print_args.to_file = TRUE;
3948       print_args.format = print_format;
3949       print_args.print_summary = print_summary;
3950       print_args.print_formfeed = FALSE;
3951       packet_range_init(&print_args.range, &cfile);
3952       */
3953       print_args.print_hex = print_hex;
3954       print_args.print_dissections = print_details ? print_dissections_expanded : print_dissections_none;
3955
3956       if (!proto_tree_print(&print_args, edt, print_stream))
3957         return FALSE;
3958       if (!print_hex) {
3959         if (!print_line(print_stream, 0, separator))
3960           return FALSE;
3961       }
3962       break;
3963
3964     case WRITE_XML:
3965       proto_tree_write_pdml(edt, stdout);
3966       printf("\n");
3967       return !ferror(stdout);
3968     case WRITE_FIELDS:
3969       proto_tree_write_fields(output_fields, edt, &cf->cinfo, stdout);
3970       printf("\n");
3971       return !ferror(stdout);
3972     }
3973   }
3974   if (print_hex) {
3975     if (print_summary || print_details) {
3976       if (!print_line(print_stream, 0, ""))
3977         return FALSE;
3978     }
3979     if (!print_hex_data(print_stream, edt))
3980       return FALSE;
3981     if (!print_line(print_stream, 0, separator))
3982       return FALSE;
3983   }
3984   return TRUE;
3985 }
3986
3987 static gboolean
3988 write_finale(void)
3989 {
3990   switch (output_action) {
3991
3992   case WRITE_TEXT:
3993     return print_finale(print_stream);
3994
3995   case WRITE_XML:
3996     if (print_details)
3997       write_pdml_finale(stdout);
3998     else
3999       write_psml_finale(stdout);
4000     return !ferror(stdout);
4001
4002   case WRITE_FIELDS:
4003     write_fields_finale(output_fields, stdout);
4004     return !ferror(stdout);
4005
4006   default:
4007     g_assert_not_reached();
4008     return FALSE;
4009   }
4010 }
4011
4012 cf_status_t
4013 cf_open(capture_file *cf, const char *fname, unsigned int type, gboolean is_tempfile, int *err)
4014 {
4015   wtap  *wth;
4016   gchar *err_info;
4017   char   err_msg[2048+1];
4018
4019   wth = wtap_open_offline(fname, type, err, &err_info, perform_two_pass_analysis);
4020   if (wth == NULL)
4021     goto fail;
4022
4023   /* The open succeeded.  Fill in the information for this file. */
4024
4025   /* Create new epan session for dissection. */
4026   epan_free(cf->epan);
4027   cf->epan = tshark_epan_new(cf);
4028
4029   cf->wth = wth;
4030   cf->f_datalen = 0; /* not used, but set it anyway */
4031
4032   /* Set the file name because we need it to set the follow stream filter.
4033      XXX - is that still true?  We need it for other reasons, though,
4034      in any case. */
4035   cf->filename = g_strdup(fname);
4036
4037   /* Indicate whether it's a permanent or temporary file. */
4038   cf->is_tempfile = is_tempfile;
4039
4040   /* No user changes yet. */
4041   cf->unsaved_changes = FALSE;
4042
4043   cf->cd_t      = wtap_file_type_subtype(cf->wth);
4044   cf->open_type = type;
4045   cf->count     = 0;
4046   cf->drops_known = FALSE;
4047   cf->drops     = 0;
4048   cf->snap      = wtap_snapshot_length(cf->wth);
4049   if (cf->snap == 0) {
4050     /* Snapshot length not known. */
4051     cf->has_snap = FALSE;
4052     cf->snap = WTAP_MAX_PACKET_SIZE;
4053   } else
4054     cf->has_snap = TRUE;
4055   nstime_set_zero(&cf->elapsed_time);
4056   ref = NULL;
4057   prev_dis = NULL;
4058   prev_cap = NULL;
4059
4060   cf->state = FILE_READ_IN_PROGRESS;
4061
4062   wtap_set_cb_new_ipv4(cf->wth, add_ipv4_name);
4063   wtap_set_cb_new_ipv6(cf->wth, (wtap_new_ipv6_callback_t) add_ipv6_name);
4064
4065   return CF_OK;
4066
4067 fail:
4068   g_snprintf(err_msg, sizeof err_msg,
4069              cf_open_error_message(*err, err_info, FALSE, cf->cd_t), fname);
4070   cmdarg_err("%s", err_msg);
4071   return CF_ERROR;
4072 }
4073
4074 static void
4075 show_capture_file_io_error(const char *fname, int err, gboolean is_close)
4076 {
4077   char *save_file_string;
4078
4079   save_file_string = output_file_description(fname);
4080
4081   switch (err) {
4082
4083   case ENOSPC:
4084     cmdarg_err("Not all the packets could be written to the %s because there is "
4085                "no space left on the file system.",
4086                save_file_string);
4087     break;
4088
4089 #ifdef EDQUOT
4090   case EDQUOT:
4091     cmdarg_err("Not all the packets could be written to the %s because you are "
4092                "too close to, or over your disk quota.",
4093                save_file_string);
4094   break;
4095 #endif
4096
4097   case WTAP_ERR_CANT_CLOSE:
4098     cmdarg_err("The %s couldn't be closed for some unknown reason.",
4099                save_file_string);
4100     break;
4101
4102   case WTAP_ERR_SHORT_WRITE:
4103     cmdarg_err("Not all the packets could be written to the %s.",
4104                save_file_string);
4105     break;
4106
4107   default:
4108     if (is_close) {
4109       cmdarg_err("The %s could not be closed: %s.", save_file_string,
4110                  wtap_strerror(err));
4111     } else {
4112       cmdarg_err("An error occurred while writing to the %s: %s.",
4113                  save_file_string, wtap_strerror(err));
4114     }
4115     break;
4116   }
4117   g_free(save_file_string);
4118 }
4119
4120 static void
4121 show_print_file_io_error(int err)
4122 {
4123   switch (err) {
4124
4125   case ENOSPC:
4126     cmdarg_err("Not all the packets could be printed because there is "
4127 "no space left on the file system.");
4128     break;
4129
4130 #ifdef EDQUOT
4131   case EDQUOT:
4132     cmdarg_err("Not all the packets could be printed because you are "
4133 "too close to, or over your disk quota.");
4134   break;
4135 #endif
4136
4137   default:
4138     cmdarg_err("An error occurred while printing packets: %s.",
4139       g_strerror(err));
4140     break;
4141   }
4142 }
4143
4144 static const char *
4145 cf_open_error_message(int err, gchar *err_info, gboolean for_writing,
4146                       int file_type)
4147 {
4148   const char *errmsg;
4149   static char errmsg_errno[1024+1];
4150
4151   if (err < 0) {
4152     /* Wiretap error. */
4153     switch (err) {
4154
4155     case WTAP_ERR_NOT_REGULAR_FILE:
4156       errmsg = "The file \"%s\" is a \"special file\" or socket or other non-regular file.";
4157       break;
4158
4159     case WTAP_ERR_RANDOM_OPEN_PIPE:
4160       /* Seen only when opening a capture file for reading. */
4161       errmsg = "The file \"%s\" is a pipe or FIFO; TShark can't read pipe or FIFO files in two-pass mode.";
4162       break;
4163
4164     case WTAP_ERR_FILE_UNKNOWN_FORMAT:
4165       /* Seen only when opening a capture file for reading. */
4166       errmsg = "The file \"%s\" isn't a capture file in a format TShark understands.";
4167       break;
4168
4169     case WTAP_ERR_UNSUPPORTED:
4170       /* Seen only when opening a capture file for reading. */
4171       g_snprintf(errmsg_errno, sizeof(errmsg_errno),
4172                "The file \"%%s\" isn't a capture file in a format TShark understands.\n"
4173                "(%s)", err_info);
4174       g_free(err_info);
4175       errmsg = errmsg_errno;
4176       break;
4177
4178     case WTAP_ERR_CANT_WRITE_TO_PIPE:
4179       /* Seen only when opening a capture file for writing. */
4180       g_snprintf(errmsg_errno, sizeof(errmsg_errno),
4181                  "The file \"%%s\" is a pipe, and \"%s\" capture files can't be "
4182                  "written to a pipe.", wtap_file_type_subtype_short_string(file_type));
4183       errmsg = errmsg_errno;
4184       break;
4185
4186     case WTAP_ERR_UNSUPPORTED_FILE_TYPE:
4187       /* Seen only when opening a capture file for writing. */
4188       errmsg = "TShark doesn't support writing capture files in that format.";
4189       break;
4190
4191     case WTAP_ERR_UNSUPPORTED_ENCAP:
4192       if (for_writing) {
4193         g_snprintf(errmsg_errno, sizeof(errmsg_errno),
4194                    "TShark can't save this capture as a \"%s\" file.",
4195                    wtap_file_type_subtype_short_string(file_type));
4196       } else {
4197         g_snprintf(errmsg_errno, sizeof(errmsg_errno),
4198                  "The file \"%%s\" is a capture for a network type that TShark doesn't support.\n"
4199                  "(%s)", err_info);
4200         g_free(err_info);
4201       }
4202       errmsg = errmsg_errno;
4203       break;
4204
4205     case WTAP_ERR_ENCAP_PER_PACKET_UNSUPPORTED:
4206       if (for_writing) {
4207         g_snprintf(errmsg_errno, sizeof(errmsg_errno),
4208                    "TShark can't save this capture as a \"%s\" file.",
4209                    wtap_file_type_subtype_short_string(file_type));
4210         errmsg = errmsg_errno;
4211       } else
4212         errmsg = "The file \"%s\" is a capture for a network type that TShark doesn't support.";
4213       break;
4214
4215     case WTAP_ERR_BAD_FILE:
4216       /* Seen only when opening a capture file for reading. */
4217       g_snprintf(errmsg_errno, sizeof(errmsg_errno),
4218                "The file \"%%s\" appears to be damaged or corrupt.\n"
4219                "(%s)", err_info);
4220       g_free(err_info);
4221       errmsg = errmsg_errno;
4222       break;
4223
4224     case WTAP_ERR_CANT_OPEN:
4225       if (for_writing)
4226         errmsg = "The file \"%s\" could not be created for some unknown reason.";
4227       else
4228         errmsg = "The file \"%s\" could not be opened for some unknown reason.";
4229       break;
4230
4231     case WTAP_ERR_SHORT_READ:
4232       errmsg = "The file \"%s\" appears to have been cut short"
4233                " in the middle of a packet or other data.";
4234       break;
4235
4236     case WTAP_ERR_SHORT_WRITE:
4237       errmsg = "A full header couldn't be written to the file \"%s\".";
4238       break;
4239
4240     case WTAP_ERR_COMPRESSION_NOT_SUPPORTED:
4241       errmsg = "This file type cannot be written as a compressed file.";
4242       break;
4243
4244     case WTAP_ERR_DECOMPRESS:
4245       /* Seen only when opening a capture file for reading. */
4246       g_snprintf(errmsg_errno, sizeof(errmsg_errno),
4247                  "The compressed file \"%%s\" appears to be damaged or corrupt.\n"
4248                  "(%s)", err_info);
4249       g_free(err_info);
4250       errmsg = errmsg_errno;
4251       break;
4252
4253     default:
4254       g_snprintf(errmsg_errno, sizeof(errmsg_errno),
4255                  "The file \"%%s\" could not be %s: %s.",
4256                  for_writing ? "created" : "opened",
4257                  wtap_strerror(err));
4258       errmsg = errmsg_errno;
4259       break;
4260     }
4261   } else
4262     errmsg = file_open_error_message(err, for_writing);
4263   return errmsg;
4264 }
4265
4266 /*
4267  * Open/create errors are reported with an console message in TShark.
4268  */
4269 static void
4270 open_failure_message(const char *filename, int err, gboolean for_writing)
4271 {
4272   fprintf(stderr, "tshark: ");
4273   fprintf(stderr, file_open_error_message(err, for_writing), filename);
4274   fprintf(stderr, "\n");
4275 }
4276
4277
4278 /*
4279  * General errors are reported with an console message in TShark.
4280  */
4281 static void
4282 failure_message(const char *msg_format, va_list ap)
4283 {
4284   fprintf(stderr, "tshark: ");
4285   vfprintf(stderr, msg_format, ap);
4286   fprintf(stderr, "\n");
4287 }
4288
4289 /*
4290  * Read errors are reported with an console message in TShark.
4291  */
4292 static void
4293 read_failure_message(const char *filename, int err)
4294 {
4295   cmdarg_err("An error occurred while reading from the file \"%s\": %s.",
4296           filename, g_strerror(err));
4297 }
4298
4299 /*
4300  * Write errors are reported with an console message in TShark.
4301  */
4302 static void
4303 write_failure_message(const char *filename, int err)
4304 {
4305   cmdarg_err("An error occurred while writing to the file \"%s\": %s.",
4306           filename, g_strerror(err));
4307 }
4308
4309 /*
4310  * Report an error in command-line arguments.
4311  */
4312 void
4313 cmdarg_err(const char *fmt, ...)
4314 {
4315   va_list ap;
4316
4317   va_start(ap, fmt);
4318   failure_message(fmt, ap);
4319   va_end(ap);
4320 }
4321
4322 /*
4323  * Report additional information for an error in command-line arguments.
4324  */
4325 void
4326 cmdarg_err_cont(const char *fmt, ...)
4327 {
4328   va_list ap;
4329
4330   va_start(ap, fmt);
4331   vfprintf(stderr, fmt, ap);
4332   fprintf(stderr, "\n");
4333   va_end(ap);
4334 }
4335
4336
4337 /*
4338  * Editor modelines  -  http://www.wireshark.org/tools/modelines.html
4339  *
4340  * Local variables:
4341  * c-basic-offset: 2
4342  * tab-width: 8
4343  * indent-tabs-mode: nil
4344  * End:
4345  *
4346  * vi: set shiftwidth=2 tabstop=8 expandtab:
4347  * :indentSize=2:tabSize=8:noTabs=true:
4348  */