Include files from the "epan" directory and subdirectories thereof with
[obnox/wireshark/wip.git] / packet-tpkt.c
1 /* packet-tpkt.c
2  *
3  * Routine to check for RFC 1006 TPKT header and to dissect TPKT header
4  * Copyright 2000, Philips Electronics N.V.
5  * Andreas Sikkema <andreas.sikkema@philips.com>
6  *
7  * Routine to dissect RFC 1006 TPKT packet containing OSI TP PDU
8  * Copyright 2001, Martin Thomas <Martin_A_Thomas@yahoo.com>
9  *
10  * $Id: packet-tpkt.c,v 1.10 2002/01/21 07:36:44 guy Exp $
11  *
12  * Ethereal - Network traffic analyzer
13  * By Gerald Combs <gerald@ethereal.com>
14  * Copyright 1998 Gerald Combs
15  * 
16  * This program is free software; you can redistribute it and/or
17  * modify it under the terms of the GNU General Public License
18  * as published by the Free Software Foundation; either version 2
19  * of the License, or (at your option) any later version.
20  * 
21  * This program is distributed in the hope that it will be useful,
22  * but WITHOUT ANY WARRANTY; without even the implied warranty of
23  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
24  * GNU General Public License for more details.
25  * 
26  * You should have received a copy of the GNU General Public License
27  * along with this program; if not, write to the Free Software
28  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
29  */
30
31 #ifdef HAVE_CONFIG_H
32 # include "config.h"
33 #endif
34
35 #include <glib.h>
36 #include <epan/packet.h>
37
38 #ifdef HAVE_SYS_TYPES_H
39 #  include <sys/types.h>
40 #endif
41
42 #ifdef HAVE_NETINET_IN_H
43 #  include <netinet/in.h>
44 #endif
45
46 #include <stdio.h>
47 #include <string.h>
48
49 #include "packet-tpkt.h"
50
51 /* TPKT header fields             */
52 static int proto_tpkt          = -1;
53 static int hf_tpkt_version     = -1;
54 static int hf_tpkt_reserved    = -1;
55 static int hf_tpkt_length      = -1;
56
57 /* TPKT fields defining a sub tree */
58 static gint ett_tpkt           = -1;
59
60 #define TCP_PORT_TPKT   102
61
62 /* find the dissector for OSI TP (aka COTP) */
63 static dissector_handle_t osi_tp_handle; 
64
65 /*
66  * Check whether this could be a TPKT-encapsulated PDU.
67  */
68 gboolean
69 is_tpkt( tvbuff_t *tvb, unsigned int* offset )
70 {
71         /* There should at least be 4 bytes left in the frame */
72         if ( (*offset) + 4 > tvb_length( tvb ) )
73                 return FALSE;   /* there isn't */
74         /* 
75          * The first octet should be 3 and the second one should be 0 
76          * The H.323 implementers guide suggests that this migh not 
77          * always be the case....
78          */
79         if ( ! ( ( tvb_get_guint8( tvb, ( *offset ) ) == 3 ) && 
80                  ( tvb_get_guint8( tvb, ( *offset ) + 1 ) == 0 ) ) )
81                 return FALSE;   /* They're not */
82
83         return TRUE;
84 }
85
86 /*
87  * Dissect the TPKT header; called from the TPKT dissector, as well as
88  * from dissectors such as the dissector for Q.931-over-TCP.
89  *
90  * Returns -1 if TPKT isn't enabled, otherwise returns the PDU length
91  * from the TPKT header.
92  *
93  * Sets "*offset" to the offset following the TPKT header.
94  */
95 int
96 dissect_tpkt_header( tvbuff_t *tvb, unsigned int* offset, packet_info *pinfo, proto_tree *tree )
97 {
98         proto_item *ti            = NULL;
99         proto_tree *tpkt_tree     = NULL;
100         guint16 data_len;
101
102         /*
103          * If TPKT is disabled, don't dissect it, just return -1, meaning
104          * "this isn't TPKT".
105          */
106         if (!proto_is_protocol_enabled(proto_tpkt))
107                 return -1;
108
109         pinfo->current_proto = "TPKT";
110
111         if ( check_col( pinfo->cinfo, COL_PROTOCOL ) ) {
112                 col_set_str( pinfo->cinfo, COL_PROTOCOL, "TPKT" );
113         }
114         
115         data_len = tvb_get_ntohs( tvb, (*offset) + 2 );
116
117         if ( check_col( pinfo->cinfo, COL_INFO) ) {
118                 col_add_fstr( pinfo->cinfo, COL_INFO, "TPKT Data length = %u",
119                     data_len );
120         }
121
122         if ( tree ) {
123                 ti = proto_tree_add_item( tree, proto_tpkt, tvb, (*offset), 4,
124                     FALSE );
125                 tpkt_tree = proto_item_add_subtree( ti, ett_tpkt );
126                 /* Version 1st octet */
127                 proto_tree_add_item( tpkt_tree, hf_tpkt_version, tvb,
128                     (*offset), 1, FALSE );
129                 (*offset)++;
130                 /* Reserved octet*/
131                 proto_tree_add_item( tpkt_tree, hf_tpkt_reserved, tvb,
132                     (*offset), 1, FALSE );
133                 (*offset)++;
134         }
135         else {
136                 (*offset) += 2;
137         }
138
139         if ( tree )
140                 proto_tree_add_uint( tpkt_tree, hf_tpkt_length, tvb,
141                     (*offset), 2, data_len );
142
143         (*offset) += 2;
144         return data_len;
145 }
146
147 /*
148  * Dissect RFC 1006 TPKT, which wraps a TPKT header around an OSI TP
149  * PDU.
150  */
151 static void
152 dissect_tpkt( tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree )
153 {
154         int tpkt_len;
155         int offset = 0;
156         int length, reported_length;
157         tvbuff_t *next_tvb;
158
159         /* Dissect the TPKT header. */
160         tpkt_len = dissect_tpkt_header(tvb, &offset, pinfo, tree);
161
162         /*
163          * Now hand the minimum of (what's in this frame, what the TPKT
164          * header says is in the PDU) on to the OSI TP dissector.
165          */
166         length = tvb_length_remaining(tvb, offset);
167         reported_length = tvb_reported_length_remaining(tvb, offset);
168         if (length > tpkt_len)
169                 length = tpkt_len;
170         if (reported_length > tpkt_len)
171                 reported_length = tpkt_len;
172         next_tvb = tvb_new_subset(tvb, offset, length, reported_length);
173
174         call_dissector(osi_tp_handle, next_tvb, pinfo, tree);
175 }
176
177 void
178 proto_register_tpkt(void)
179 {
180         static hf_register_info hf[] = 
181         {
182                 { 
183                         &hf_tpkt_version,
184                         { 
185                                 "Version", 
186                                 "tpkt.version", 
187                                 FT_UINT8, 
188                                 BASE_DEC, 
189                                 NULL, 
190                                 0x0,
191                                 "", HFILL 
192                         }
193                 },
194                 { 
195                         &hf_tpkt_reserved,
196                         { 
197                                 "Reserved", 
198                                 "tpkt.reserved", 
199                                 FT_UINT8, 
200                                 BASE_DEC, 
201                                 NULL, 
202                                 0x0,
203                                 "", HFILL 
204                         }
205                 },
206                 { 
207                         &hf_tpkt_length,
208                         { 
209                                 "Length", 
210                                 "tpkt.length", 
211                                 FT_UINT16, 
212                                 BASE_DEC, 
213                                 NULL, 
214                                 0x0,
215                                 "", HFILL 
216                         }
217                 },
218         };
219         
220         static gint *ett[] = 
221         {
222                 &ett_tpkt,
223         };
224
225
226         proto_tpkt = proto_register_protocol("TPKT", "TPKT", "tpkt");
227         proto_register_field_array(proto_tpkt, hf, array_length(hf));
228         proto_register_subtree_array(ett, array_length(ett));
229 }
230
231 void
232 proto_reg_handoff_tpkt(void)
233 {
234         dissector_handle_t tpkt_handle;
235
236         osi_tp_handle = find_dissector("ositp");
237         tpkt_handle = create_dissector_handle(dissect_tpkt, proto_tpkt);
238         dissector_add("tcp.port", TCP_PORT_TPKT, tpkt_handle);
239 }