epan/stream.c

   1 /* stream.c
   2  *
   3  * Definititions for handling circuit-switched protocols
   4  * which are handled as streams, and don't have lengths
   5  * and IDs such as are required for reassemble.h
   6  *
   7  * $Id$
   8  *
   9  * Wireshark - Network traffic analyzer
  10  * By Gerald Combs <gerald@wireshark.org>
  11  * Copyright 1998 Gerald Combs
  12  *
  13  * This program is free software; you can redistribute it and/or
  14  * modify it under the terms of the GNU General Public License
  15  * as published by the Free Software Foundation; either version 2
  16  * of the License, or (at your option) any later version.
  17  *
  18  * This program is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU General Public License for more details.
  22  *
  23  * You should have received a copy of the GNU General Public License
  24  * along with this program; if not, write to the Free Software
  25  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  26  */
  27
  28 #ifdef HAVE_CONFIG_H
  29 # include "config.h"
  30 #endif
  31
  32 #include <glib.h>
  33 #include <epan/packet.h>
  34 #include <epan/reassemble.h>
  35 #include <epan/stream.h>
  36 #include <epan/tvbuff.h>
  37
  38
  39 typedef struct {
  40     fragment_data *fd_head;          /* the reassembled data, NULL
  41                                       * until we add the last fragment */
  42     guint32 pdu_number;              /* Number of this PDU within the stream */
  43
  44     /* id of this pdu (globally unique) */
  45     guint32 id;
  46 } stream_pdu_t;
  47
  48
  49 struct stream_pdu_fragment
  50 {
  51     guint32 len;                     /* the length of this fragment */
  52     stream_pdu_t *pdu;
  53     gboolean final_fragment;
  54 };
  55
  56 struct stream {
  57     /* the key used to add this stream to stream_hash */
  58     struct stream_key *key;
  59
  60     /* pdu to add the next fragment to, or NULL if we need to start
  61      * a new PDU.
  62      */
  63     stream_pdu_t *current_pdu;
  64
  65     /* number of PDUs added to this stream so far */
  66     guint32 pdu_counter;
  67
  68     /* the framenumber and offset of the last fragment added;
  69        used for sanity-checking */
  70     guint32 lastfrag_framenum;
  71     guint32 lastfrag_offset;
  72 };
  73
  74
  75 /*****************************************************************************
  76  *
  77  * Stream hash
  78  */
  79
  80 /* key */
  81 typedef struct stream_key {
  82     /* streams can be attached to circuits or conversations, and we note
  83        that here */
  84     gboolean is_circuit;
  85     union {
  86         const struct circuit *circuit;
  87         const struct conversation *conv;
  88     } circ;
  89     int p2p_dir;
  90 } stream_key_t;
  91
  92
  93 /* hash func */
  94 static guint stream_hash_func(gconstpointer k)
  95 {
  96     const stream_key_t *key = (const stream_key_t *)k;
  97
  98     /* is_circuit is redundant to the circuit/conversation pointer */
  99     return ((guint)(unsigned long)key->circ.circuit) ^ key->p2p_dir;
 100 }
 101
 102 /* compare func */
 103 static gboolean stream_compare_func(gconstpointer a,
 104                              gconstpointer b)
 105 {
 106     const stream_key_t *key1 = (const stream_key_t *)a;
 107     const stream_key_t *key2 = (const stream_key_t *)b;
 108     if( key1 -> p2p_dir != key2 -> p2p_dir ||
 109         key1-> is_circuit != key2 -> is_circuit )
 110         return FALSE;
 111
 112     if( key1 -> is_circuit )
 113         return (key1 -> circ.circuit == key2 -> circ.circuit );
 114     else
 115         return (key1 -> circ.conv == key2 -> circ.conv );
 116 }
 117
 118 /* the hash table */
 119 static GHashTable *stream_hash;
 120
 121
 122 /* cleanup reset function, call from stream_cleanup() */
 123 static void cleanup_stream_hash( void ) {
 124     if( stream_hash != NULL ) {
 125         g_hash_table_destroy( stream_hash );
 126         stream_hash = NULL;
 127     }
 128 }
 129
 130 /* init function, call from stream_init() */
 131 static void init_stream_hash( void ) {
 132     stream_hash = g_hash_table_new(stream_hash_func,
 133                                    stream_compare_func);
 134 }
 135
 136 /* lookup function, returns null if not found */
 137 static stream_t *stream_hash_lookup_circ( const struct circuit *circuit, int p2p_dir )
 138 {
 139     stream_key_t key;
 140     key.is_circuit=TRUE;
 141     key.circ.circuit=circuit;
 142     key.p2p_dir=p2p_dir;
 143     return (stream_t *)g_hash_table_lookup(stream_hash, &key);
 144 }
 145
 146 static stream_t *stream_hash_lookup_conv( const struct conversation *conv, int p2p_dir )
 147 {
 148     stream_key_t key;
 149     key.is_circuit=FALSE;
 150     key.circ.conv = conv;
 151     key.p2p_dir=p2p_dir;
 152     return (stream_t *)g_hash_table_lookup(stream_hash, &key);
 153 }
 154
 155
 156 static stream_t *new_stream( stream_key_t *key )
 157 {
 158     stream_t *val;
 159
 160     val = se_alloc(sizeof(stream_t));
 161     val -> key = key;
 162     val -> pdu_counter = 0;
 163     val -> current_pdu = NULL;
 164     val -> lastfrag_framenum = 0;
 165     val -> lastfrag_offset = 0;
 166     g_hash_table_insert(stream_hash, key, val);
 167
 168     return val;
 169 }
 170
 171
 172 /* insert function */
 173 static stream_t *stream_hash_insert_circ( const struct circuit *circuit, int p2p_dir )
 174 {
 175     stream_key_t *key;
 176
 177     key = se_alloc(sizeof(stream_key_t));
 178     key->is_circuit = TRUE;
 179     key->circ.circuit = circuit;
 180     key->p2p_dir = p2p_dir;
 181
 182     return new_stream(key);
 183 }
 184
 185 static stream_t *stream_hash_insert_conv( const struct conversation *conv, int p2p_dir )
 186 {
 187     stream_key_t *key;
 188
 189     key = se_alloc(sizeof(stream_key_t));
 190     key->is_circuit = FALSE;
 191     key->circ.conv = conv;
 192     key->p2p_dir = p2p_dir;
 193
 194     return new_stream(key);
 195 }
 196
 197
 198 /******************************************************************************
 199  *
 200  * PDU data
 201  */
 202
 203 /* pdu counter, for generating unique pdu ids */
 204 static guint32 pdu_counter;
 205
 206 static void stream_cleanup_pdu_data(void)
 207 {
 208 }
 209
 210 static void stream_init_pdu_data(void)
 211 {
 212     pdu_counter = 0;
 213 }
 214
 215
 216 /* new pdu in this stream */
 217 static stream_pdu_t *stream_new_pdu(stream_t *stream)
 218 {
 219     stream_pdu_t *pdu;
 220     pdu = se_alloc(sizeof(stream_pdu_t));
 221     pdu -> fd_head = NULL;
 222     pdu -> pdu_number = stream -> pdu_counter++;
 223     pdu -> id = pdu_counter++;
 224     return pdu;
 225 }
 226
 227 /*****************************************************************************
 228  *
 229  * fragment hash
 230  */
 231
 232 /* key */
 233 typedef struct fragment_key {
 234     const stream_t *stream;
 235     guint32 framenum;
 236     guint32 offset;
 237 } fragment_key_t;
 238
 239
 240 /* hash func */
 241 static guint fragment_hash_func(gconstpointer k)
 242 {
 243     const fragment_key_t *key = (const fragment_key_t *)k;
 244     return ((guint)(unsigned long)key->stream) + ((guint)key -> framenum) + ((guint)key->offset);
 245 }
 246
 247 /* compare func */
 248 static gboolean fragment_compare_func(gconstpointer a,
 249                                gconstpointer b)
 250 {
 251     const fragment_key_t *key1 = (const fragment_key_t *)a;
 252     const fragment_key_t *key2 = (const fragment_key_t *)b;
 253     return (key1 -> stream == key2 -> stream &&
 254             key1 -> framenum == key2 -> framenum &&
 255             key1 -> offset == key2 -> offset );
 256 }
 257
 258 /* the hash table */
 259 static GHashTable *fragment_hash;
 260
 261
 262 /* cleanup function, call from stream_cleanup() */
 263 static void cleanup_fragment_hash( void ) {
 264     if( fragment_hash != NULL ) {
 265         g_hash_table_destroy( fragment_hash );
 266         fragment_hash = NULL;
 267     }
 268 }
 269
 270 /* init function, call from stream_init() */
 271 static void init_fragment_hash( void ) {
 272     fragment_hash = g_hash_table_new(fragment_hash_func,
 273                                      fragment_compare_func);
 274 }
 275
 276
 277 /* lookup function, returns null if not found */
 278 static stream_pdu_fragment_t *fragment_hash_lookup( const stream_t *stream, guint32 framenum, guint32 offset )
 279 {
 280     fragment_key_t key;
 281     stream_pdu_fragment_t *val;
 282
 283     key.stream = stream;
 284     key.framenum = framenum;
 285     key.offset = offset;
 286     val = g_hash_table_lookup(fragment_hash, &key);
 287
 288     return val;
 289 }
 290
 291
 292 /* insert function */
 293 static stream_pdu_fragment_t *fragment_hash_insert( const stream_t *stream, guint32 framenum, guint32 offset,
 294                                                     guint32 length)
 295 {
 296     fragment_key_t *key;
 297     stream_pdu_fragment_t *val;
 298
 299     key = se_alloc(sizeof(fragment_key_t));
 300     key->stream = stream;
 301     key->framenum = framenum;
 302     key->offset = offset;
 303
 304     val = se_alloc(sizeof(stream_pdu_fragment_t));
 305     val->len = length;
 306     val->pdu = NULL;
 307     val->final_fragment = FALSE;
 308
 309     g_hash_table_insert(fragment_hash, key, val);
 310     return val;
 311 }
 312
 313 /*****************************************************************************/
 314
 315 /* fragmentation hash tables */
 316 static GHashTable *stream_fragment_table = NULL;
 317 static GHashTable *stream_reassembled_table = NULL;
 318
 319 /* Initialise a new stream. Call this when you first identify a distinct
 320  * stream. */
 321 stream_t *stream_new_circ ( const struct circuit *circuit, int p2p_dir )
 322 {
 323     stream_t * stream;
 324
 325     /* we don't want to replace the previous data if we get called twice on the
 326        same circuit, so do a lookup first */
 327     stream = stream_hash_lookup_circ(circuit, p2p_dir);
 328     DISSECTOR_ASSERT( stream == NULL );
 329
 330     stream = stream_hash_insert_circ(circuit, p2p_dir);
 331
 332     return stream;
 333 }
 334
 335 stream_t *stream_new_conv ( const struct conversation *conv, int p2p_dir )
 336 {
 337     stream_t * stream;
 338
 339     /* we don't want to replace the previous data if we get called twice on the
 340        same conversation, so do a lookup first */
 341     stream = stream_hash_lookup_conv(conv, p2p_dir);
 342     DISSECTOR_ASSERT( stream == NULL );
 343
 344     stream = stream_hash_insert_conv(conv, p2p_dir);
 345     return stream;
 346 }
 347
 348
 349 /* retrieve a previously-created stream.
 350  *
 351  * Returns null if no matching stream was found.
 352  */
 353 stream_t *find_stream_circ ( const struct circuit *circuit, int p2p_dir )
 354 {
 355     return stream_hash_lookup_circ(circuit,p2p_dir);
 356 }
 357 stream_t *find_stream_conv ( const struct conversation *conv, int p2p_dir )
 358 {
 359     return stream_hash_lookup_conv(conv,p2p_dir);
 360 }
 361
 362 /* cleanup the stream routines */
 363 /* Note: stream_cleanup must only be called when seasonal memory
 364  *       is also freed since the hash tables countain pointers to
 365  *       se_alloc'd memory.
 366  */
 367 void stream_cleanup( void )
 368 {
 369     cleanup_stream_hash();
 370     cleanup_fragment_hash();
 371     stream_cleanup_pdu_data();
 372 }
 373
 374 /* initialise the stream routines */
 375 void stream_init( void )
 376 {
 377     init_stream_hash();
 378     init_fragment_hash();
 379     stream_init_pdu_data();
 380
 381     fragment_table_init(&stream_fragment_table);
 382     reassembled_table_init(&stream_reassembled_table);
 383 }
 384
 385 /*****************************************************************************/
 386
 387 stream_pdu_fragment_t *stream_find_frag( stream_t *stream, guint32 framenum, guint32 offset )
 388 {
 389     return fragment_hash_lookup( stream, framenum, offset );
 390 }
 391
 392 stream_pdu_fragment_t *stream_add_frag( stream_t *stream, guint32 framenum, guint32 offset,
 393                                         tvbuff_t *tvb, packet_info *pinfo, gboolean more_frags )
 394 {
 395     fragment_data *fd_head;
 396     stream_pdu_t *pdu;
 397     stream_pdu_fragment_t *frag_data;
 398
 399     DISSECTOR_ASSERT(stream);
 400
 401     /* check that this fragment is at the end of the stream */
 402     DISSECTOR_ASSERT( framenum > stream->lastfrag_framenum ||
 403                       (framenum == stream->lastfrag_framenum && offset > stream->lastfrag_offset));
 404
 405
 406     pdu = stream->current_pdu;
 407     if( pdu == NULL ) {
 408         /* start a new pdu */
 409         pdu = stream->current_pdu = stream_new_pdu(stream);
 410     }
 411
 412     /* add it to the reassembly tables */
 413     fd_head = fragment_add_seq_next(tvb, 0, pinfo, pdu->id,
 414                                     stream_fragment_table, stream_reassembled_table,
 415                                     tvb_reported_length(tvb), more_frags);
 416     /* add it to our hash */
 417     frag_data = fragment_hash_insert( stream, framenum, offset, tvb_reported_length(tvb));
 418     frag_data -> pdu = pdu;
 419
 420     if( fd_head != NULL ) {
 421         /* if this was the last fragment, update the pdu data.
 422          */
 423         pdu -> fd_head = fd_head;
 424
 425         /* start a new pdu next time */
 426         stream->current_pdu = NULL;
 427
 428         frag_data -> final_fragment = TRUE;
 429     }
 430
 431     /* stashing the framenum and offset permit future sanity checks */
 432     stream -> lastfrag_framenum = framenum;
 433     stream -> lastfrag_offset = offset;
 434
 435     return frag_data;
 436 }
 437
 438
 439 tvbuff_t *stream_process_reassembled(
 440     tvbuff_t *tvb, int offset, packet_info *pinfo,
 441     const char *name, const stream_pdu_fragment_t *frag,
 442     const struct _fragment_items *fit,
 443     gboolean *update_col_infop, proto_tree *tree)
 444 {
 445     stream_pdu_t *pdu;
 446     DISSECTOR_ASSERT(frag);
 447     pdu = frag->pdu;
 448
 449     /* we handle non-terminal fragments ourselves, because
 450        reassemble.c messes them up */
 451     if(!frag->final_fragment) {
 452         if (pdu->fd_head != NULL && fit->hf_reassembled_in != NULL) {
 453             proto_tree_add_uint(tree,
 454                                 *(fit->hf_reassembled_in), tvb,
 455                                 0, 0, pdu->fd_head->reassembled_in);
 456         }
 457         return NULL;
 458     }
 459
 460     return process_reassembled_data(tvb, offset, pinfo, name, pdu->fd_head,
 461                                     fit, update_col_infop, tree);
 462 }
 463
 464 guint32 stream_get_frag_length( const stream_pdu_fragment_t *frag)
 465 {
 466     DISSECTOR_ASSERT( frag );
 467     return frag->len;
 468 }
 469
 470 fragment_data *stream_get_frag_data( const stream_pdu_fragment_t *frag)
 471 {
 472     DISSECTOR_ASSERT( frag );
 473     return frag->pdu->fd_head;
 474 }
 475
 476 guint32 stream_get_pdu_no( const stream_pdu_fragment_t *frag)
 477 {
 478     DISSECTOR_ASSERT( frag );
 479     return frag->pdu->pdu_number;
 480 }