1998-09-16 02:39:15 +00:00
|
|
|
/* print.c
|
|
|
|
* Routines for printing packet analysis trees.
|
|
|
|
*
|
2004-07-08 10:36:29 +00:00
|
|
|
* $Id: print.c,v 1.84 2004/07/08 10:36:27 guy Exp $
|
1998-09-16 03:22:19 +00:00
|
|
|
*
|
2001-11-13 23:55:44 +00:00
|
|
|
* Gilbert Ramirez <gram@alumni.rice.edu>
|
1998-09-16 02:39:15 +00:00
|
|
|
*
|
|
|
|
* Ethereal - Network traffic analyzer
|
2001-06-08 08:50:51 +00:00
|
|
|
* By Gerald Combs <gerald@ethereal.com>
|
1998-09-16 02:39:15 +00:00
|
|
|
* Copyright 1998 Gerald Combs
|
2002-08-28 21:04:11 +00:00
|
|
|
*
|
1998-09-16 02:39:15 +00:00
|
|
|
* This program is free software; you can redistribute it and/or
|
|
|
|
* modify it under the terms of the GNU General Public License
|
|
|
|
* as published by the Free Software Foundation; either version 2
|
|
|
|
* of the License, or (at your option) any later version.
|
2002-08-28 21:04:11 +00:00
|
|
|
*
|
1998-09-16 02:39:15 +00:00
|
|
|
* This program is distributed in the hope that it will be useful,
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
* GNU General Public License for more details.
|
2002-08-28 21:04:11 +00:00
|
|
|
*
|
1998-09-16 02:39:15 +00:00
|
|
|
* You should have received a copy of the GNU General Public License
|
|
|
|
* along with this program; if not, write to the Free Software
|
|
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
|
|
# include "config.h"
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <string.h>
|
|
|
|
|
2002-06-04 07:03:57 +00:00
|
|
|
#include <epan/epan.h>
|
|
|
|
#include <epan/epan_dissect.h>
|
|
|
|
#include <epan/tvbuff.h>
|
2002-01-21 07:37:49 +00:00
|
|
|
#include <epan/packet.h>
|
2002-06-04 07:03:57 +00:00
|
|
|
|
2004-01-09 18:49:31 +00:00
|
|
|
#include "range.h"
|
1998-09-16 02:39:15 +00:00
|
|
|
#include "print.h"
|
1998-09-27 22:12:47 +00:00
|
|
|
#include "ps.h"
|
1999-11-22 08:03:31 +00:00
|
|
|
#include "util.h"
|
2002-05-10 23:20:38 +00:00
|
|
|
#include "packet-data.h"
|
2003-12-06 06:09:13 +00:00
|
|
|
#include "packet-frame.h"
|
|
|
|
|
|
|
|
#define PDML_VERSION "0"
|
2004-04-17 11:50:14 +00:00
|
|
|
#define PSML_VERSION "0"
|
1998-09-16 02:39:15 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
typedef struct {
|
|
|
|
int level;
|
|
|
|
FILE *fh;
|
|
|
|
GSList *src_list;
|
|
|
|
print_dissections_e print_dissections;
|
|
|
|
gboolean print_hex_for_data;
|
|
|
|
char_enc encoding;
|
|
|
|
gint format;
|
|
|
|
epan_dissect_t *edt;
|
|
|
|
} print_data;
|
|
|
|
|
|
|
|
typedef struct {
|
|
|
|
int level;
|
|
|
|
FILE *fh;
|
|
|
|
GSList *src_list;
|
|
|
|
epan_dissect_t *edt;
|
|
|
|
} write_pdml_data;
|
|
|
|
|
2003-12-04 10:59:34 +00:00
|
|
|
static void proto_tree_print_node(proto_node *node, gpointer data);
|
2004-07-08 10:36:29 +00:00
|
|
|
static void proto_tree_write_node_pdml(proto_node *node, gpointer data);
|
|
|
|
static const guint8 *get_field_data(GSList *src_list, field_info *fi);
|
|
|
|
static void write_pdml_field_hex_value(write_pdml_data *pdata, field_info *fi);
|
2002-08-02 23:36:07 +00:00
|
|
|
static void print_hex_data_buffer(FILE *fh, register const guchar *cp,
|
2004-04-24 23:13:46 +00:00
|
|
|
register guint length, char_enc encoding, print_format_e format);
|
1998-09-16 02:39:15 +00:00
|
|
|
static void ps_clean_string(unsigned char *out, const unsigned char *in,
|
|
|
|
int outbuf_size);
|
2004-04-17 11:50:14 +00:00
|
|
|
static void print_escaped_xml(FILE *fh, char *unescaped_string);
|
1998-09-16 02:39:15 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
static void print_pdml_geninfo(proto_tree *tree, FILE *fh);
|
2003-12-06 06:09:13 +00:00
|
|
|
|
1999-07-23 08:29:24 +00:00
|
|
|
FILE *open_print_dest(int to_file, const char *dest)
|
1998-09-16 02:39:15 +00:00
|
|
|
{
|
|
|
|
FILE *fh;
|
|
|
|
|
|
|
|
/* Open the file or command for output */
|
1999-07-23 08:29:24 +00:00
|
|
|
if (to_file)
|
|
|
|
fh = fopen(dest, "w");
|
|
|
|
else
|
1999-07-23 08:30:57 +00:00
|
|
|
fh = popen(dest, "w");
|
1998-09-16 02:39:15 +00:00
|
|
|
|
1999-07-23 08:29:24 +00:00
|
|
|
return fh;
|
|
|
|
}
|
|
|
|
|
2004-01-24 10:53:25 +00:00
|
|
|
gboolean close_print_dest(int to_file, FILE *fh)
|
1999-07-23 08:29:24 +00:00
|
|
|
{
|
|
|
|
/* Close the file or command */
|
|
|
|
if (to_file)
|
2004-01-24 10:53:25 +00:00
|
|
|
return (fclose(fh) == 0);
|
1999-07-23 08:29:24 +00:00
|
|
|
else
|
2004-01-24 10:53:25 +00:00
|
|
|
return (pclose(fh) == 0);
|
1999-07-23 08:29:24 +00:00
|
|
|
}
|
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
#define MAX_PS_LINE_LENGTH 256
|
|
|
|
|
|
|
|
/* Some formats need stuff at the beginning of the output */
|
|
|
|
void
|
|
|
|
print_preamble(FILE *fh, print_format_e format, gchar *filename)
|
|
|
|
{
|
|
|
|
char psbuffer[MAX_PS_LINE_LENGTH]; /* static sized buffer! */
|
|
|
|
|
|
|
|
|
|
|
|
switch (format) {
|
|
|
|
|
|
|
|
case(PR_FMT_TEXT):
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
|
|
|
|
|
|
|
case(PR_FMT_PS):
|
|
|
|
print_ps_preamble(fh);
|
|
|
|
|
|
|
|
fputs("%% Set the font to 10 point\n", fh);
|
|
|
|
fputs("/Courier findfont 10 scalefont setfont\n", fh);
|
|
|
|
fputs("\n", fh);
|
|
|
|
fputs("%% the page title\n", fh);
|
|
|
|
ps_clean_string(psbuffer, filename, MAX_PS_LINE_LENGTH);
|
|
|
|
fprintf(fh, "/eth_pagetitle (%s - Ethereal) def\n", psbuffer);
|
|
|
|
fputs("\n", fh);
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
g_assert_not_reached();
|
|
|
|
}
|
|
|
|
}
|
2003-12-06 06:09:13 +00:00
|
|
|
|
|
|
|
void
|
|
|
|
proto_tree_print(print_args_t *print_args, epan_dissect_t *edt,
|
2002-06-04 07:03:57 +00:00
|
|
|
FILE *fh)
|
1999-07-23 08:29:24 +00:00
|
|
|
{
|
|
|
|
print_data data;
|
1998-09-16 02:39:15 +00:00
|
|
|
|
|
|
|
/* Create the output */
|
When printing a packet, do it from the protocol tree, not from the GTK+
tree constructed from the protocol tree:
1) The value of "level" field of GTK+ tree items appears to
depend on various random things - see a change I made to
"packet-dns.c" a while ago, to change the order in which
items were put in the tree, so that DNS trees printed with
correct indentation - and, right now, we appear to be doing
*something* wrong, as some packets I printed from one file
here had randomly bogus indentation; I could probably track
the problem down and fix it, but that might just hold us
until we accidentally do something *else* wrong by GTK+'s
lights.
The new code provides its own tree level as it goes.
2) The new code is independent of GTK+, so it could be used with
other toolkits, or with non-GUI variants of Ethereal.
3) This may make it easier to add a "Print..." menu item to let
the user print packets other than the currently selected
packet.
Make the internal routines used to print the packet static.
For the "Print Packet" menu item, put up a message box if they haven't
yet selected a packet.
svn path=/trunk/; revision=362
1999-07-13 04:38:15 +00:00
|
|
|
data.level = 0;
|
|
|
|
data.fh = fh;
|
2002-06-04 07:03:57 +00:00
|
|
|
data.src_list = edt->pi.data_src;
|
|
|
|
data.encoding = edt->pi.fd->flags.encoding;
|
2003-12-09 22:27:28 +00:00
|
|
|
data.print_dissections = print_args->print_dissections;
|
2004-07-08 10:36:29 +00:00
|
|
|
/* If we're printing the entire packet in hex, don't
|
|
|
|
print uninterpreted data fields in hex as well. */
|
1999-09-29 22:19:24 +00:00
|
|
|
data.print_hex_for_data = !print_args->print_hex;
|
2002-06-22 01:43:57 +00:00
|
|
|
data.format = print_args->format;
|
2003-12-06 06:09:13 +00:00
|
|
|
data.edt = edt;
|
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
proto_tree_children_foreach(edt->tree, proto_tree_print_node, &data);
|
2001-06-08 08:50:51 +00:00
|
|
|
}
|
|
|
|
|
2002-03-14 05:41:59 +00:00
|
|
|
#define MAX_INDENT 160
|
|
|
|
|
2002-06-22 01:43:57 +00:00
|
|
|
/* Print a tree's data, and any child nodes. */
|
When printing a packet, do it from the protocol tree, not from the GTK+
tree constructed from the protocol tree:
1) The value of "level" field of GTK+ tree items appears to
depend on various random things - see a change I made to
"packet-dns.c" a while ago, to change the order in which
items were put in the tree, so that DNS trees printed with
correct indentation - and, right now, we appear to be doing
*something* wrong, as some packets I printed from one file
here had randomly bogus indentation; I could probably track
the problem down and fix it, but that might just hold us
until we accidentally do something *else* wrong by GTK+'s
lights.
The new code provides its own tree level as it goes.
2) The new code is independent of GTK+, so it could be used with
other toolkits, or with non-GUI variants of Ethereal.
3) This may make it easier to add a "Print..." menu item to let
the user print packets other than the currently selected
packet.
Make the internal routines used to print the packet static.
For the "Print Packet" menu item, put up a message box if they haven't
yet selected a packet.
svn path=/trunk/; revision=362
1999-07-13 04:38:15 +00:00
|
|
|
static
|
2003-12-04 10:59:34 +00:00
|
|
|
void proto_tree_print_node(proto_node *node, gpointer data)
|
1998-09-16 02:39:15 +00:00
|
|
|
{
|
2001-12-18 21:31:02 +00:00
|
|
|
field_info *fi = PITEM_FINFO(node);
|
When printing a packet, do it from the protocol tree, not from the GTK+
tree constructed from the protocol tree:
1) The value of "level" field of GTK+ tree items appears to
depend on various random things - see a change I made to
"packet-dns.c" a while ago, to change the order in which
items were put in the tree, so that DNS trees printed with
correct indentation - and, right now, we appear to be doing
*something* wrong, as some packets I printed from one file
here had randomly bogus indentation; I could probably track
the problem down and fix it, but that might just hold us
until we accidentally do something *else* wrong by GTK+'s
lights.
The new code provides its own tree level as it goes.
2) The new code is independent of GTK+, so it could be used with
other toolkits, or with non-GUI variants of Ethereal.
3) This may make it easier to add a "Print..." menu item to let
the user print packets other than the currently selected
packet.
Make the internal routines used to print the packet static.
For the "Print Packet" menu item, put up a message box if they haven't
yet selected a packet.
svn path=/trunk/; revision=362
1999-07-13 04:38:15 +00:00
|
|
|
print_data *pdata = (print_data*) data;
|
2001-06-08 08:50:51 +00:00
|
|
|
const guint8 *pd;
|
When printing a packet, do it from the protocol tree, not from the GTK+
tree constructed from the protocol tree:
1) The value of "level" field of GTK+ tree items appears to
depend on various random things - see a change I made to
"packet-dns.c" a while ago, to change the order in which
items were put in the tree, so that DNS trees printed with
correct indentation - and, right now, we appear to be doing
*something* wrong, as some packets I printed from one file
here had randomly bogus indentation; I could probably track
the problem down and fix it, but that might just hold us
until we accidentally do something *else* wrong by GTK+'s
lights.
The new code provides its own tree level as it goes.
2) The new code is independent of GTK+, so it could be used with
other toolkits, or with non-GUI variants of Ethereal.
3) This may make it easier to add a "Print..." menu item to let
the user print packets other than the currently selected
packet.
Make the internal routines used to print the packet static.
For the "Print Packet" menu item, put up a message box if they haven't
yet selected a packet.
svn path=/trunk/; revision=362
1999-07-13 04:38:15 +00:00
|
|
|
gchar label_str[ITEM_LABEL_LENGTH];
|
|
|
|
gchar *label_ptr;
|
|
|
|
|
1999-09-12 20:23:43 +00:00
|
|
|
/* Don't print invisible entries. */
|
2004-05-01 15:15:08 +00:00
|
|
|
if (PROTO_ITEM_IS_HIDDEN(node))
|
When printing a packet, do it from the protocol tree, not from the GTK+
tree constructed from the protocol tree:
1) The value of "level" field of GTK+ tree items appears to
depend on various random things - see a change I made to
"packet-dns.c" a while ago, to change the order in which
items were put in the tree, so that DNS trees printed with
correct indentation - and, right now, we appear to be doing
*something* wrong, as some packets I printed from one file
here had randomly bogus indentation; I could probably track
the problem down and fix it, but that might just hold us
until we accidentally do something *else* wrong by GTK+'s
lights.
The new code provides its own tree level as it goes.
2) The new code is independent of GTK+, so it could be used with
other toolkits, or with non-GUI variants of Ethereal.
3) This may make it easier to add a "Print..." menu item to let
the user print packets other than the currently selected
packet.
Make the internal routines used to print the packet static.
For the "Print Packet" menu item, put up a message box if they haven't
yet selected a packet.
svn path=/trunk/; revision=362
1999-07-13 04:38:15 +00:00
|
|
|
return;
|
1998-09-16 02:39:15 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
/* was a free format label produced? */
|
2003-11-27 22:29:52 +00:00
|
|
|
if (fi->rep) {
|
2003-11-25 14:07:45 +00:00
|
|
|
label_ptr = fi->rep->representation;
|
When printing a packet, do it from the protocol tree, not from the GTK+
tree constructed from the protocol tree:
1) The value of "level" field of GTK+ tree items appears to
depend on various random things - see a change I made to
"packet-dns.c" a while ago, to change the order in which
items were put in the tree, so that DNS trees printed with
correct indentation - and, right now, we appear to be doing
*something* wrong, as some packets I printed from one file
here had randomly bogus indentation; I could probably track
the problem down and fix it, but that might just hold us
until we accidentally do something *else* wrong by GTK+'s
lights.
The new code provides its own tree level as it goes.
2) The new code is independent of GTK+, so it could be used with
other toolkits, or with non-GUI variants of Ethereal.
3) This may make it easier to add a "Print..." menu item to let
the user print packets other than the currently selected
packet.
Make the internal routines used to print the packet static.
For the "Print Packet" menu item, put up a message box if they haven't
yet selected a packet.
svn path=/trunk/; revision=362
1999-07-13 04:38:15 +00:00
|
|
|
}
|
|
|
|
else { /* no, make a generic label */
|
|
|
|
label_ptr = label_str;
|
|
|
|
proto_item_fill_label(fi, label_str);
|
|
|
|
}
|
2002-08-28 21:04:11 +00:00
|
|
|
|
2004-04-16 18:17:48 +00:00
|
|
|
print_line(pdata->fh, pdata->level, pdata->format, label_ptr);
|
1998-09-16 02:39:15 +00:00
|
|
|
|
1999-09-29 22:19:24 +00:00
|
|
|
/* If it's uninterpreted data, dump it (unless our caller will
|
|
|
|
be printing the entire packet in hex). */
|
2003-12-03 09:28:26 +00:00
|
|
|
if (fi->hfinfo->id == proto_data && pdata->print_hex_for_data) {
|
2001-06-08 08:50:51 +00:00
|
|
|
/*
|
2001-06-08 10:07:55 +00:00
|
|
|
* Find the data for this field.
|
2001-06-08 08:50:51 +00:00
|
|
|
*/
|
2001-06-08 10:07:55 +00:00
|
|
|
pd = get_field_data(pdata->src_list, fi);
|
2004-04-26 15:58:33 +00:00
|
|
|
if (pd) {
|
|
|
|
print_hex_data_buffer(pdata->fh, pd, fi->length,
|
|
|
|
pdata->encoding, pdata->format);
|
|
|
|
}
|
2003-12-30 23:13:32 +00:00
|
|
|
}
|
1998-09-16 02:39:15 +00:00
|
|
|
|
2002-04-02 05:07:36 +00:00
|
|
|
/* If we're printing all levels, or if this node is one with a
|
|
|
|
subtree and its subtree is expanded, recurse into the subtree,
|
|
|
|
if it exists. */
|
|
|
|
g_assert(fi->tree_type >= -1 && fi->tree_type < num_tree_types);
|
2003-12-09 22:27:28 +00:00
|
|
|
if (pdata->print_dissections == print_dissections_expanded ||
|
|
|
|
(pdata->print_dissections == print_dissections_as_displayed &&
|
2004-07-08 10:36:29 +00:00
|
|
|
fi->tree_type >= 0 && tree_is_expanded[fi->tree_type])) {
|
2003-12-04 10:59:34 +00:00
|
|
|
if (node->first_child != NULL) {
|
1999-09-12 20:23:43 +00:00
|
|
|
pdata->level++;
|
2003-12-04 10:59:34 +00:00
|
|
|
proto_tree_children_foreach(node,
|
2002-06-22 01:43:57 +00:00
|
|
|
proto_tree_print_node, pdata);
|
1999-09-12 20:23:43 +00:00
|
|
|
pdata->level--;
|
|
|
|
}
|
1998-09-16 02:39:15 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
/* Some formats need stuff at the end of the output */
|
|
|
|
void
|
|
|
|
print_finale(FILE *fh, print_format_e format)
|
2003-12-06 06:09:13 +00:00
|
|
|
{
|
2004-07-08 10:36:29 +00:00
|
|
|
switch (format) {
|
2003-12-06 06:09:13 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
case(PR_FMT_TEXT):
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
|
|
|
|
|
|
|
case(PR_FMT_PS):
|
|
|
|
print_ps_finale(fh);
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
g_assert_not_reached();
|
2003-12-06 06:09:13 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
void
|
|
|
|
write_pdml_preamble(FILE *fh)
|
2003-12-06 06:09:13 +00:00
|
|
|
{
|
2004-07-08 10:36:29 +00:00
|
|
|
fputs("<?xml version=\"1.0\"?>\n", fh);
|
|
|
|
fputs("<pdml version=\"" PDML_VERSION "\" ", fh);
|
|
|
|
fprintf(fh, "creator=\"%s/%s\">\n", PACKAGE, VERSION);
|
|
|
|
}
|
2003-12-06 06:09:13 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
void
|
|
|
|
proto_tree_write_pdml(epan_dissect_t *edt, FILE *fh)
|
|
|
|
{
|
|
|
|
write_pdml_data data;
|
2004-07-05 16:42:19 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
/* Create the output */
|
|
|
|
data.level = 0;
|
|
|
|
data.fh = fh;
|
|
|
|
data.src_list = edt->pi.data_src;
|
|
|
|
data.edt = edt;
|
2004-07-05 16:42:19 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
fprintf(fh, "<packet>\n");
|
2003-12-06 06:09:13 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
/* Print a "geninfo" protocol as required by PDML */
|
|
|
|
print_pdml_geninfo(edt->tree, fh);
|
2003-12-06 06:09:13 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
proto_tree_children_foreach(edt->tree, proto_tree_write_node_pdml,
|
|
|
|
&data);
|
2003-12-06 06:09:13 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
fprintf(fh, "</packet>\n\n");
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Write out a tree's data, and any child nodes, as PDML */
|
2003-12-06 06:09:13 +00:00
|
|
|
static void
|
2004-07-08 10:36:29 +00:00
|
|
|
proto_tree_write_node_pdml(proto_node *node, gpointer data)
|
2003-12-06 06:09:13 +00:00
|
|
|
{
|
|
|
|
field_info *fi = PITEM_FINFO(node);
|
2004-07-08 10:36:29 +00:00
|
|
|
write_pdml_data *pdata = (write_pdml_data*) data;
|
2003-12-06 06:09:13 +00:00
|
|
|
gchar *label_ptr;
|
|
|
|
gchar label_str[ITEM_LABEL_LENGTH];
|
|
|
|
char *dfilter_string;
|
|
|
|
int chop_len;
|
|
|
|
int i;
|
|
|
|
|
|
|
|
for (i = -1; i < pdata->level; i++) {
|
|
|
|
fputs(" ", pdata->fh);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Text label. It's printed as a field with no name. */
|
|
|
|
if (fi->hfinfo->id == hf_text_only) {
|
|
|
|
/* Get the text */
|
|
|
|
if (fi->rep) {
|
|
|
|
label_ptr = fi->rep->representation;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
label_ptr = "";
|
|
|
|
}
|
|
|
|
|
|
|
|
fputs("<field show=\"", pdata->fh);
|
|
|
|
print_escaped_xml(pdata->fh, label_ptr);
|
|
|
|
|
|
|
|
fprintf(pdata->fh, "\" size=\"%d", fi->length);
|
|
|
|
fprintf(pdata->fh, "\" pos=\"%d", fi->start);
|
|
|
|
|
|
|
|
fputs("\" value=\"", pdata->fh);
|
2004-07-08 10:36:29 +00:00
|
|
|
write_pdml_field_hex_value(pdata, fi);
|
2003-12-06 06:09:13 +00:00
|
|
|
|
|
|
|
if (node->first_child != NULL) {
|
|
|
|
fputs("\">\n", pdata->fh);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
fputs("\"/>\n", pdata->fh);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
/* Uninterpreted data, i.e., the "Data" protocol, is
|
|
|
|
* printed as a field instead of a protocol. */
|
|
|
|
else if (fi->hfinfo->id == proto_data) {
|
|
|
|
|
|
|
|
fputs("<field name=\"data\" value=\"", pdata->fh);
|
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
write_pdml_field_hex_value(pdata, fi);
|
2003-12-06 06:09:13 +00:00
|
|
|
|
|
|
|
fputs("\"/>\n", pdata->fh);
|
|
|
|
|
|
|
|
}
|
|
|
|
/* Normal protocols and fields */
|
|
|
|
else {
|
|
|
|
if (fi->hfinfo->type == FT_PROTOCOL) {
|
|
|
|
fputs("<proto name=\"", pdata->fh);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
fputs("<field name=\"", pdata->fh);
|
|
|
|
}
|
|
|
|
print_escaped_xml(pdata->fh, fi->hfinfo->abbrev);
|
|
|
|
|
2004-04-17 09:02:32 +00:00
|
|
|
#if 0
|
2004-07-08 10:36:29 +00:00
|
|
|
/* PDML spec, see:
|
|
|
|
* http://analyzer.polito.it/30alpha/docs/dissectors/PDMLSpec.htm
|
|
|
|
*
|
|
|
|
* the show fields contains things in 'human readable' format
|
|
|
|
* showname: contains only the name of the field
|
|
|
|
* show: contains only the data of the field
|
|
|
|
* showdtl: contains additional details of the field data
|
|
|
|
* showmap: contains mappings of the field data (e.g. the hostname to an IP address)
|
|
|
|
*
|
|
|
|
* XXX - the showname shouldn't contain the field data itself
|
|
|
|
* (like it's contained in the fi->rep->representation).
|
|
|
|
* Unfortunately, we don't have the field data representation for
|
|
|
|
* all fields, so this isn't currently possible */
|
2004-04-17 09:02:32 +00:00
|
|
|
fputs("\" showname=\"", pdata->fh);
|
|
|
|
print_escaped_xml(pdata->fh, fi->hfinfo->name);
|
|
|
|
#endif
|
|
|
|
|
2003-12-06 06:09:13 +00:00
|
|
|
if (fi->rep) {
|
|
|
|
fputs("\" showname=\"", pdata->fh);
|
|
|
|
print_escaped_xml(pdata->fh, fi->rep->representation);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
label_ptr = label_str;
|
|
|
|
proto_item_fill_label(fi, label_str);
|
|
|
|
fputs("\" showname=\"", pdata->fh);
|
|
|
|
print_escaped_xml(pdata->fh, label_ptr);
|
|
|
|
}
|
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
if (PROTO_ITEM_IS_HIDDEN(node))
|
|
|
|
fprintf(pdata->fh, "\" hide=\"yes");
|
2004-04-16 18:17:48 +00:00
|
|
|
|
2003-12-06 06:09:13 +00:00
|
|
|
fprintf(pdata->fh, "\" size=\"%d", fi->length);
|
|
|
|
fprintf(pdata->fh, "\" pos=\"%d", fi->start);
|
|
|
|
/* fprintf(pdata->fh, "\" id=\"%d", fi->hfinfo->id);*/
|
|
|
|
|
|
|
|
if (fi->hfinfo->type != FT_PROTOCOL) {
|
|
|
|
/* Field */
|
|
|
|
|
2004-04-17 09:02:32 +00:00
|
|
|
/* XXX - this is a hack until we can just call
|
2003-12-06 06:09:13 +00:00
|
|
|
* fvalue_to_string_repr() for *all* FT_* types. */
|
|
|
|
dfilter_string = proto_construct_dfilter_string(fi,
|
|
|
|
pdata->edt);
|
2003-12-08 21:57:25 +00:00
|
|
|
if (dfilter_string != NULL) {
|
|
|
|
chop_len = strlen(fi->hfinfo->abbrev) + 4; /* for " == " */
|
|
|
|
|
|
|
|
/* XXX - Remove double-quotes. Again, once we
|
|
|
|
* can call fvalue_to_string_repr(), we can
|
|
|
|
* ask it not to produce the version for
|
|
|
|
* display-filters, and thus, no
|
|
|
|
* double-quotes. */
|
|
|
|
if (dfilter_string[strlen(dfilter_string)-1] == '"') {
|
|
|
|
dfilter_string[strlen(dfilter_string)-1] = '\0';
|
|
|
|
chop_len++;
|
|
|
|
}
|
|
|
|
|
|
|
|
fputs("\" show=\"", pdata->fh);
|
|
|
|
print_escaped_xml(pdata->fh, &dfilter_string[chop_len]);
|
|
|
|
}
|
|
|
|
if (fi->length > 0) {
|
|
|
|
fputs("\" value=\"", pdata->fh);
|
2004-07-08 10:36:29 +00:00
|
|
|
write_pdml_field_hex_value(pdata, fi);
|
2003-12-06 06:09:13 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (node->first_child != NULL) {
|
|
|
|
fputs("\">\n", pdata->fh);
|
|
|
|
}
|
|
|
|
else if (fi->hfinfo->id == proto_data) {
|
|
|
|
fputs("\">\n", pdata->fh);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
fputs("\"/>\n", pdata->fh);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2004-04-17 09:02:32 +00:00
|
|
|
/* We always print all levels for PDML. Recurse here. */
|
2003-12-06 06:09:13 +00:00
|
|
|
if (node->first_child != NULL) {
|
|
|
|
pdata->level++;
|
|
|
|
proto_tree_children_foreach(node,
|
2004-07-08 10:36:29 +00:00
|
|
|
proto_tree_write_node_pdml, pdata);
|
2003-12-06 06:09:13 +00:00
|
|
|
pdata->level--;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (node->first_child != NULL) {
|
|
|
|
for (i = -1; i < pdata->level; i++) {
|
|
|
|
fputs(" ", pdata->fh);
|
|
|
|
}
|
|
|
|
if (fi->hfinfo->type == FT_PROTOCOL) {
|
|
|
|
fputs("</proto>\n", pdata->fh);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
fputs("</field>\n", pdata->fh);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Print info for a 'geninfo' pseudo-protocol. This is required by
|
|
|
|
* the PDML spec. The information is contained in Ethereal's 'frame' protocol,
|
|
|
|
* but we produce a 'geninfo' protocol in the PDML to conform to spec.
|
|
|
|
* The 'frame' protocol follows the 'geninfo' protocol in the PDML. */
|
|
|
|
static void
|
2004-07-08 10:36:29 +00:00
|
|
|
print_pdml_geninfo(proto_tree *tree, FILE *fh)
|
2003-12-06 06:09:13 +00:00
|
|
|
{
|
|
|
|
guint32 num, len, caplen;
|
|
|
|
nstime_t *timestamp;
|
|
|
|
GPtrArray *finfo_array;
|
|
|
|
field_info *frame_finfo;
|
|
|
|
|
|
|
|
/* Get frame protocol's finfo. */
|
|
|
|
finfo_array = proto_find_finfo(tree, proto_frame);
|
|
|
|
if (g_ptr_array_len(finfo_array) < 1) {
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
frame_finfo = finfo_array->pdata[0];
|
|
|
|
g_ptr_array_free(finfo_array, FALSE);
|
|
|
|
|
|
|
|
/* frame.number --> geninfo.num */
|
|
|
|
finfo_array = proto_find_finfo(tree, hf_frame_number);
|
|
|
|
if (g_ptr_array_len(finfo_array) < 1) {
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
num = fvalue_get_integer(&((field_info*)finfo_array->pdata[0])->value);
|
|
|
|
g_ptr_array_free(finfo_array, FALSE);
|
|
|
|
|
|
|
|
/* frame.pkt_len --> geninfo.len */
|
|
|
|
finfo_array = proto_find_finfo(tree, hf_frame_packet_len);
|
|
|
|
if (g_ptr_array_len(finfo_array) < 1) {
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
len = fvalue_get_integer(&((field_info*)finfo_array->pdata[0])->value);
|
|
|
|
g_ptr_array_free(finfo_array, FALSE);
|
|
|
|
|
|
|
|
/* frame.cap_len --> geninfo.caplen */
|
|
|
|
finfo_array = proto_find_finfo(tree, hf_frame_capture_len);
|
|
|
|
if (g_ptr_array_len(finfo_array) < 1) {
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
caplen = fvalue_get_integer(&((field_info*)finfo_array->pdata[0])->value);
|
|
|
|
g_ptr_array_free(finfo_array, FALSE);
|
|
|
|
|
|
|
|
/* frame.time --> geninfo.timestamp */
|
|
|
|
finfo_array = proto_find_finfo(tree, hf_frame_arrival_time);
|
|
|
|
if (g_ptr_array_len(finfo_array) < 1) {
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
timestamp = fvalue_get(&((field_info*)finfo_array->pdata[0])->value);
|
|
|
|
g_ptr_array_free(finfo_array, FALSE);
|
|
|
|
|
|
|
|
/* Print geninfo start */
|
2004-07-08 10:36:29 +00:00
|
|
|
fprintf(fh,
|
2003-12-10 22:52:08 +00:00
|
|
|
" <proto name=\"geninfo\" pos=\"0\" showname=\"General information\" size=\"%u\">\n",
|
2003-12-06 06:09:13 +00:00
|
|
|
frame_finfo->length);
|
|
|
|
|
|
|
|
/* Print geninfo.num */
|
2004-07-08 10:36:29 +00:00
|
|
|
fprintf(fh,
|
2003-12-10 22:52:08 +00:00
|
|
|
" <field name=\"num\" pos=\"0\" show=\"%u\" showname=\"Number\" value=\"%x\" size=\"%u\"/>\n",
|
2003-12-06 06:09:13 +00:00
|
|
|
num, num, frame_finfo->length);
|
|
|
|
|
|
|
|
/* Print geninfo.len */
|
2004-07-08 10:36:29 +00:00
|
|
|
fprintf(fh,
|
2003-12-10 22:52:08 +00:00
|
|
|
" <field name=\"len\" pos=\"0\" show=\"%u\" showname=\"Packet Length\" value=\"%x\" size=\"%u\"/>\n",
|
2003-12-06 06:09:13 +00:00
|
|
|
len, len, frame_finfo->length);
|
|
|
|
|
|
|
|
/* Print geninfo.caplen */
|
2004-07-08 10:36:29 +00:00
|
|
|
fprintf(fh,
|
2003-12-10 22:52:08 +00:00
|
|
|
" <field name=\"caplen\" pos=\"0\" show=\"%u\" showname=\"Captured Length\" value=\"%x\" size=\"%u\"/>\n",
|
2003-12-06 06:09:13 +00:00
|
|
|
caplen, caplen, frame_finfo->length);
|
|
|
|
|
|
|
|
/* Print geninfo.timestamp */
|
2004-07-08 10:36:29 +00:00
|
|
|
fprintf(fh,
|
2003-12-10 22:52:08 +00:00
|
|
|
" <field name=\"timestamp\" pos=\"0\" show=\"%s\" showname=\"Captured Time\" value=\"%d.%09d\" size=\"%u\"/>\n",
|
2003-12-06 06:09:13 +00:00
|
|
|
abs_time_to_str(timestamp), (int) timestamp->secs, timestamp->nsecs, frame_finfo->length);
|
|
|
|
|
|
|
|
/* Print geninfo end */
|
2004-07-08 10:36:29 +00:00
|
|
|
fprintf(fh,
|
2003-12-06 06:09:13 +00:00
|
|
|
" </proto>\n");
|
|
|
|
}
|
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
void
|
|
|
|
write_pdml_finale(FILE *fh)
|
|
|
|
{
|
|
|
|
fputs("</pdml>\n", fh);
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
write_psml_preamble(FILE *fh)
|
|
|
|
{
|
|
|
|
fputs("<?xml version=\"1.0\"?>\n", fh);
|
|
|
|
fputs("<psml version=\"" PSML_VERSION "\" ", fh);
|
|
|
|
fprintf(fh, "creator=\"%s/%s\">\n", PACKAGE, VERSION);
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
proto_tree_write_psml(epan_dissect_t *edt, FILE *fh)
|
|
|
|
{
|
|
|
|
gint i;
|
|
|
|
|
|
|
|
/* if this is the first packet, we have to create the PSML structure output */
|
|
|
|
if(edt->pi.fd->num == 1) {
|
|
|
|
fprintf(fh, "<structure>\n");
|
|
|
|
|
|
|
|
for(i=0; i < edt->pi.cinfo->num_cols; i++) {
|
|
|
|
fprintf(fh, "<section>");
|
|
|
|
print_escaped_xml(fh, edt->pi.cinfo->col_title[i]);
|
|
|
|
fprintf(fh, "</section>\n");
|
|
|
|
}
|
|
|
|
|
|
|
|
fprintf(fh, "</structure>\n\n");
|
|
|
|
}
|
|
|
|
|
|
|
|
fprintf(fh, "<packet>\n");
|
|
|
|
|
|
|
|
for(i=0; i < edt->pi.cinfo->num_cols; i++) {
|
|
|
|
fprintf(fh, "<section>");
|
|
|
|
print_escaped_xml(fh, edt->pi.cinfo->col_data[i]);
|
|
|
|
fprintf(fh, "</section>\n");
|
|
|
|
}
|
|
|
|
|
|
|
|
fprintf(fh, "</packet>\n\n");
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
write_psml_finale(FILE *fh)
|
|
|
|
{
|
|
|
|
fputs("</psml>\n", fh);
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Find the data source for a specified field, and return a pointer
|
|
|
|
* to the data in it. Returns NULL if the data is out of bounds.
|
|
|
|
*/
|
|
|
|
static const guint8 *
|
|
|
|
get_field_data(GSList *src_list, field_info *fi)
|
|
|
|
{
|
|
|
|
GSList *src_le;
|
|
|
|
data_source *src;
|
|
|
|
tvbuff_t *src_tvb;
|
|
|
|
gint length, tvbuff_length;
|
|
|
|
|
|
|
|
for (src_le = src_list; src_le != NULL; src_le = src_le->next) {
|
|
|
|
src = src_le->data;
|
|
|
|
src_tvb = src->tvb;
|
|
|
|
if (fi->ds_tvb == src_tvb) {
|
|
|
|
/*
|
|
|
|
* Found it.
|
|
|
|
*
|
|
|
|
* XXX - a field can have a length that runs past
|
|
|
|
* the end of the tvbuff. Ideally, that should
|
|
|
|
* be fixed when adding an item to the protocol
|
|
|
|
* tree, but checking the length when doing
|
|
|
|
* that could be expensive. Until we fix that,
|
|
|
|
* we'll do the check here.
|
|
|
|
*/
|
|
|
|
tvbuff_length = tvb_length_remaining(src_tvb,
|
|
|
|
fi->start);
|
|
|
|
if (tvbuff_length < 0) {
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
length = fi->length;
|
|
|
|
if (length > tvbuff_length)
|
|
|
|
length = tvbuff_length;
|
|
|
|
return tvb_get_ptr(src_tvb, fi->start, length);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
g_assert_not_reached();
|
|
|
|
return NULL; /* not found */
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Print a string, escaping out certain characters that need to
|
|
|
|
* escaped out for XML. */
|
|
|
|
static void
|
|
|
|
print_escaped_xml(FILE *fh, char *unescaped_string)
|
|
|
|
{
|
|
|
|
unsigned char *p;
|
|
|
|
|
|
|
|
for (p = unescaped_string; *p != '\0'; p++) {
|
|
|
|
switch (*p) {
|
|
|
|
case '&':
|
|
|
|
fputs("&", fh);
|
|
|
|
break;
|
|
|
|
case '<':
|
|
|
|
fputs("<", fh);
|
|
|
|
break;
|
|
|
|
case '>':
|
|
|
|
fputs(">", fh);
|
|
|
|
break;
|
|
|
|
case '"':
|
|
|
|
fputs(""", fh);
|
|
|
|
break;
|
|
|
|
case '\'':
|
|
|
|
fputs("'", fh);
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
fputc(*p, fh);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
|
|
|
write_pdml_field_hex_value(write_pdml_data *pdata, field_info *fi)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
const guint8 *pd;
|
|
|
|
|
|
|
|
if (fi->length > tvb_length_remaining(fi->ds_tvb, fi->start)) {
|
|
|
|
fprintf(pdata->fh, "field length invalid!");
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Find the data for this field. */
|
|
|
|
pd = get_field_data(pdata->src_list, fi);
|
|
|
|
|
|
|
|
if (pd) {
|
|
|
|
/* Print a simple hex dump */
|
|
|
|
for (i = 0 ; i < fi->length; i++) {
|
|
|
|
fprintf(pdata->fh, "%02x", pd[i]);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2003-12-06 06:09:13 +00:00
|
|
|
|
2004-04-24 23:13:46 +00:00
|
|
|
void print_hex_data(FILE *fh, print_format_e format, epan_dissect_t *edt)
|
2000-01-06 07:33:35 +00:00
|
|
|
{
|
2001-03-23 18:44:20 +00:00
|
|
|
gboolean multiple_sources;
|
2002-02-18 01:08:44 +00:00
|
|
|
GSList *src_le;
|
|
|
|
data_source *src;
|
2001-03-23 18:44:20 +00:00
|
|
|
tvbuff_t *tvb;
|
|
|
|
char *name;
|
|
|
|
char *line;
|
2002-08-02 23:36:07 +00:00
|
|
|
const guchar *cp;
|
2001-03-23 18:44:20 +00:00
|
|
|
guint length;
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Set "multiple_sources" iff this frame has more than one
|
|
|
|
* data source; if it does, we need to print the name of
|
|
|
|
* the data source before printing the data from the
|
|
|
|
* data source.
|
|
|
|
*/
|
2002-06-04 07:03:57 +00:00
|
|
|
multiple_sources = (edt->pi.data_src->next != NULL);
|
2001-03-23 18:44:20 +00:00
|
|
|
|
2002-06-04 07:03:57 +00:00
|
|
|
for (src_le = edt->pi.data_src; src_le != NULL;
|
|
|
|
src_le = src_le->next) {
|
2002-02-18 01:08:44 +00:00
|
|
|
src = src_le->data;
|
|
|
|
tvb = src->tvb;
|
2001-03-23 18:44:20 +00:00
|
|
|
if (multiple_sources) {
|
2002-02-18 01:08:44 +00:00
|
|
|
name = src->name;
|
2002-06-29 09:45:06 +00:00
|
|
|
print_line(fh, 0, format, "");
|
2002-06-22 01:24:23 +00:00
|
|
|
line = g_malloc(strlen(name) + 2); /* <name>:\0 */
|
2001-03-23 18:44:20 +00:00
|
|
|
strcpy(line, name);
|
2002-06-22 01:24:23 +00:00
|
|
|
strcat(line, ":");
|
2002-06-29 09:45:06 +00:00
|
|
|
print_line(fh, 0, format, line);
|
2001-03-23 18:44:20 +00:00
|
|
|
g_free(line);
|
|
|
|
}
|
|
|
|
length = tvb_length(tvb);
|
|
|
|
cp = tvb_get_ptr(tvb, 0, length);
|
2002-06-22 01:24:23 +00:00
|
|
|
print_hex_data_buffer(fh, cp, length,
|
|
|
|
edt->pi.fd->flags.encoding, format);
|
2001-03-23 18:44:20 +00:00
|
|
|
}
|
2000-01-06 07:33:35 +00:00
|
|
|
}
|
|
|
|
|
2002-06-21 23:52:47 +00:00
|
|
|
/*
|
|
|
|
* This routine is based on a routine created by Dan Lasley
|
|
|
|
* <DLASLEY@PROMUS.com>.
|
|
|
|
*
|
|
|
|
* It was modified for Ethereal by Gilbert Ramirez and others.
|
|
|
|
*/
|
2002-06-22 22:31:29 +00:00
|
|
|
|
|
|
|
#define MAX_OFFSET_LEN 8 /* max length of hex offset of bytes */
|
|
|
|
#define BYTES_PER_LINE 16 /* max byte values printed on a line */
|
|
|
|
#define HEX_DUMP_LEN (BYTES_PER_LINE*3)
|
|
|
|
/* max number of characters hex dump takes -
|
|
|
|
2 digits plus trailing blank */
|
|
|
|
#define DATA_DUMP_LEN (HEX_DUMP_LEN + 2 + BYTES_PER_LINE)
|
|
|
|
/* number of characters those bytes take;
|
|
|
|
3 characters per byte of hex dump,
|
|
|
|
2 blanks separating hex from ASCII,
|
|
|
|
1 character per byte of ASCII dump */
|
|
|
|
#define MAX_LINE_LEN (MAX_OFFSET_LEN + 2 + DATA_DUMP_LEN)
|
|
|
|
/* number of characters per line;
|
|
|
|
offset, 2 blanks separating offset
|
|
|
|
from data dump, data dump */
|
|
|
|
|
2002-06-22 01:24:23 +00:00
|
|
|
static void
|
2002-08-02 23:36:07 +00:00
|
|
|
print_hex_data_buffer(FILE *fh, register const guchar *cp,
|
2004-04-24 23:13:46 +00:00
|
|
|
register guint length, char_enc encoding, print_format_e format)
|
1998-09-16 02:39:15 +00:00
|
|
|
{
|
2002-06-22 22:31:29 +00:00
|
|
|
register unsigned int ad, i, j, k, l;
|
2002-08-02 23:36:07 +00:00
|
|
|
guchar c;
|
|
|
|
guchar line[MAX_LINE_LEN + 1];
|
2002-06-22 22:31:29 +00:00
|
|
|
unsigned int use_digits;
|
2002-08-02 23:36:07 +00:00
|
|
|
static guchar binhex[16] = {
|
2000-01-07 00:36:25 +00:00
|
|
|
'0', '1', '2', '3', '4', '5', '6', '7',
|
|
|
|
'8', '9', 'a', 'b', 'c', 'd', 'e', 'f'};
|
1998-09-16 02:39:15 +00:00
|
|
|
|
2002-06-29 09:45:06 +00:00
|
|
|
print_line(fh, 0, format, "");
|
2002-06-22 22:31:29 +00:00
|
|
|
|
|
|
|
/*
|
2002-06-23 23:43:32 +00:00
|
|
|
* How many of the leading digits of the offset will we supply?
|
|
|
|
* We always supply at least 4 digits, but if the maximum offset
|
|
|
|
* won't fit in 4 digits, we use as many digits as will be needed.
|
2002-06-22 22:31:29 +00:00
|
|
|
*/
|
|
|
|
if (((length - 1) & 0xF0000000) != 0)
|
|
|
|
use_digits = 8; /* need all 8 digits */
|
|
|
|
else if (((length - 1) & 0x0F000000) != 0)
|
|
|
|
use_digits = 7; /* need 7 digits */
|
|
|
|
else if (((length - 1) & 0x00F00000) != 0)
|
|
|
|
use_digits = 6; /* need 6 digits */
|
|
|
|
else if (((length - 1) & 0x000F0000) != 0)
|
|
|
|
use_digits = 5; /* need 5 digits */
|
|
|
|
else
|
|
|
|
use_digits = 4; /* we'll supply 4 digits */
|
|
|
|
|
2002-06-21 23:52:47 +00:00
|
|
|
ad = 0;
|
2002-06-22 01:24:23 +00:00
|
|
|
i = 0;
|
2002-06-21 23:52:47 +00:00
|
|
|
j = 0;
|
|
|
|
k = 0;
|
2002-06-22 01:24:23 +00:00
|
|
|
while (i < length) {
|
|
|
|
if ((i & 15) == 0) {
|
|
|
|
/*
|
|
|
|
* Start of a new line.
|
|
|
|
*/
|
|
|
|
j = 0;
|
|
|
|
k = 0;
|
2002-06-22 22:31:29 +00:00
|
|
|
l = use_digits;
|
|
|
|
do {
|
|
|
|
l--;
|
|
|
|
c = (ad >> (l*4)) & 0xF;
|
|
|
|
line[j++] = binhex[c];
|
|
|
|
} while (l != 0);
|
|
|
|
line[j++] = ' ';
|
|
|
|
line[j++] = ' ';
|
|
|
|
memset(line+j, ' ', DATA_DUMP_LEN);
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Offset in line of ASCII dump.
|
|
|
|
*/
|
|
|
|
k = j + HEX_DUMP_LEN + 2;
|
2002-06-22 01:24:23 +00:00
|
|
|
}
|
2002-06-21 23:52:47 +00:00
|
|
|
c = *cp++;
|
2002-06-22 22:31:29 +00:00
|
|
|
line[j++] = binhex[c>>4];
|
|
|
|
line[j++] = binhex[c&0xf];
|
2002-06-21 23:52:47 +00:00
|
|
|
j++;
|
1999-11-22 06:24:56 +00:00
|
|
|
if (encoding == CHAR_EBCDIC) {
|
|
|
|
c = EBCDIC_to_ASCII1(c);
|
|
|
|
}
|
2002-06-22 22:31:29 +00:00
|
|
|
line[k++] = c >= ' ' && c < 0x7f ? c : '.';
|
2002-06-22 01:24:23 +00:00
|
|
|
i++;
|
|
|
|
if ((i & 15) == 0 || i == length) {
|
|
|
|
/*
|
|
|
|
* We'll be starting a new line, or
|
|
|
|
* we're finished printing this buffer;
|
|
|
|
* dump out the line we've constructed,
|
|
|
|
* and advance the offset.
|
|
|
|
*/
|
2002-06-22 22:31:29 +00:00
|
|
|
line[k] = '\0';
|
2002-06-29 09:45:06 +00:00
|
|
|
print_line(fh, 0, format, line);
|
2002-06-21 23:52:47 +00:00
|
|
|
ad += 16;
|
|
|
|
}
|
|
|
|
}
|
1998-09-16 02:39:15 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static
|
|
|
|
void ps_clean_string(unsigned char *out, const unsigned char *in,
|
|
|
|
int outbuf_size)
|
|
|
|
{
|
|
|
|
int rd, wr;
|
|
|
|
char c;
|
|
|
|
|
|
|
|
for (rd = 0, wr = 0 ; wr < outbuf_size; rd++, wr++ ) {
|
|
|
|
c = in[rd];
|
|
|
|
switch (c) {
|
|
|
|
case '(':
|
|
|
|
case ')':
|
|
|
|
case '\\':
|
|
|
|
out[wr] = '\\';
|
|
|
|
out[++wr] = c;
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
out[wr] = c;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (c == 0) {
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
When printing a packet, do it from the protocol tree, not from the GTK+
tree constructed from the protocol tree:
1) The value of "level" field of GTK+ tree items appears to
depend on various random things - see a change I made to
"packet-dns.c" a while ago, to change the order in which
items were put in the tree, so that DNS trees printed with
correct indentation - and, right now, we appear to be doing
*something* wrong, as some packets I printed from one file
here had randomly bogus indentation; I could probably track
the problem down and fix it, but that might just hold us
until we accidentally do something *else* wrong by GTK+'s
lights.
The new code provides its own tree level as it goes.
2) The new code is independent of GTK+, so it could be used with
other toolkits, or with non-GUI variants of Ethereal.
3) This may make it easier to add a "Print..." menu item to let
the user print packets other than the currently selected
packet.
Make the internal routines used to print the packet static.
For the "Print Packet" menu item, put up a message box if they haven't
yet selected a packet.
svn path=/trunk/; revision=362
1999-07-13 04:38:15 +00:00
|
|
|
|
2004-01-25 00:58:13 +00:00
|
|
|
void
|
2004-07-08 10:36:29 +00:00
|
|
|
print_packet_header(FILE *fh, print_format_e format, guint32 number, gchar *summary) {
|
2004-04-20 22:34:08 +00:00
|
|
|
char psbuffer[MAX_PS_LINE_LENGTH]; /* static sized buffer! */
|
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
switch (format) {
|
2004-04-22 17:03:21 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
case(PR_FMT_TEXT):
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
2002-06-29 09:45:06 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
case(PR_FMT_PS):
|
2004-04-22 17:03:21 +00:00
|
|
|
ps_clean_string(psbuffer, summary, MAX_PS_LINE_LENGTH);
|
2004-07-08 10:36:29 +00:00
|
|
|
fprintf(fh, "[/Dest /__frame%u__ /Title (%s) /OUT pdfmark\n", number, psbuffer);
|
|
|
|
fputs("[/View [/XYZ -4 currentpoint matrix currentmatrix matrix defaultmatrix\n", fh);
|
|
|
|
fputs("matrix invertmatrix matrix concatmatrix transform exch pop 20 add null]\n", fh);
|
|
|
|
fprintf(fh, "/Dest /__frame%u__ /DEST pdfmark\n", number);
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
2004-04-22 17:03:21 +00:00
|
|
|
g_assert_not_reached();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
2004-07-08 10:36:29 +00:00
|
|
|
print_formfeed(FILE *fh, print_format_e format)
|
|
|
|
{
|
|
|
|
switch (format) {
|
|
|
|
|
|
|
|
case(PR_FMT_TEXT):
|
2004-04-22 17:03:21 +00:00
|
|
|
fputs("\f", fh);
|
2004-07-08 10:36:29 +00:00
|
|
|
break;
|
|
|
|
|
|
|
|
case(PR_FMT_PS):
|
2004-04-22 17:03:21 +00:00
|
|
|
fputs("formfeed\n", fh);
|
2004-07-08 10:36:29 +00:00
|
|
|
break;
|
2004-04-22 17:03:21 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
default:
|
2004-04-16 18:17:48 +00:00
|
|
|
g_assert_not_reached();
|
2004-01-25 00:58:13 +00:00
|
|
|
}
|
2002-06-29 09:45:06 +00:00
|
|
|
}
|
|
|
|
|
2003-12-06 06:09:13 +00:00
|
|
|
void
|
2004-04-24 23:13:46 +00:00
|
|
|
print_line(FILE *fh, int indent, print_format_e format, char *line)
|
2000-01-06 07:33:35 +00:00
|
|
|
{
|
2002-06-29 09:45:06 +00:00
|
|
|
char space[MAX_INDENT+1];
|
|
|
|
int i;
|
|
|
|
int num_spaces;
|
2002-06-22 01:43:57 +00:00
|
|
|
char psbuffer[MAX_PS_LINE_LENGTH]; /* static sized buffer! */
|
2000-01-06 07:33:35 +00:00
|
|
|
|
2004-07-08 10:36:29 +00:00
|
|
|
switch (format) {
|
|
|
|
|
|
|
|
case(PR_FMT_TEXT):
|
2002-06-29 09:45:06 +00:00
|
|
|
/* Prepare the tabs for printing, depending on tree level */
|
|
|
|
num_spaces = indent * 4;
|
|
|
|
if (num_spaces > MAX_INDENT) {
|
|
|
|
num_spaces = MAX_INDENT;
|
|
|
|
}
|
|
|
|
for (i = 0; i < num_spaces; i++) {
|
|
|
|
space[i] = ' ';
|
|
|
|
}
|
|
|
|
/* The string is NUL-terminated */
|
|
|
|
space[num_spaces] = '\0';
|
|
|
|
|
|
|
|
fputs(space, fh);
|
2000-01-06 07:33:35 +00:00
|
|
|
fputs(line, fh);
|
2002-06-22 01:24:23 +00:00
|
|
|
putc('\n', fh);
|
2004-07-08 10:36:29 +00:00
|
|
|
break;
|
|
|
|
|
|
|
|
case(PR_FMT_PS):
|
2004-04-15 19:07:13 +00:00
|
|
|
ps_clean_string(psbuffer, line, MAX_PS_LINE_LENGTH);
|
|
|
|
fprintf(fh, "%d (%s) putline\n", indent, psbuffer);
|
2004-07-08 10:36:29 +00:00
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
2003-12-06 06:09:13 +00:00
|
|
|
g_assert_not_reached();
|
2004-04-15 19:07:13 +00:00
|
|
|
}
|
2000-01-06 07:33:35 +00:00
|
|
|
}
|