From Ivan Sy (with minor modifications):
[obnox/wireshark/wip.git] / wiretap / i4btrace.c
index 7ddd847f78b9e850c04488a8eb5c516223c73191..1b2bc080954189df02ec62c239006aa31c9e5644 100644 (file)
@@ -1,6 +1,6 @@
 /* i4btrace.c
  *
- * $Id: i4btrace.c,v 1.3 2000/01/13 07:09:16 guy Exp $
+ * $Id$
  *
  * Wiretap Library
  * Copyright (c) 1999 by Bert Driehuis <driehuis@playbeing.org>
  * 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 <stdlib.h>
 #include <errno.h>
-#include <time.h>
-#include "wtap.h"
+#include <string.h>
+#include "wtap-int.h"
 #include "file_wrappers.h"
 #include "buffer.h"
 #include "i4b_trace.h"
+#include "i4btrace.h"
 
-static int i4btrace_read(wtap *wth, int *err);
+static gboolean i4btrace_read(wtap *wth, int *err, gchar **err_info,
+    gint64 *data_offset);
+static gboolean i4btrace_seek_read(wtap *wth, gint64 seek_off,
+    union wtap_pseudo_header *pseudo_header, guchar *pd, int length,
+    int *err, gchar **err_info);
+static int i4b_read_rec_header(FILE_T fh, i4b_trace_hdr_t *hdr, int *err);
+static void i4b_byte_swap_header(wtap *wth, i4b_trace_hdr_t *hdr);
+static gboolean i4b_read_rec_data(FILE_T fh, guchar *pd, int length, int *err);
+static void i4b_set_pseudo_header(i4b_trace_hdr_t *hdr,
+    union wtap_pseudo_header *pseudo_header);
+static void i4btrace_close(wtap *wth);
 
 /*
  * Test some fields in the header to see if they make sense.
  */
 #define        I4B_HDR_IS_OK(hdr) \
-       (!((unsigned)hdr.length < 3 || (unsigned)hdr.unit > 4 || \
-           (unsigned)hdr.type > 4 || (unsigned)hdr.dir > 2 || \
-           (unsigned)hdr.trunc > 2048))
+       (!((unsigned)hdr.length < 3 || (unsigned)hdr.length > 16384 || \
+           (unsigned)hdr.unit > 4 || (unsigned)hdr.type > 4 || \
+           (unsigned)hdr.dir > 2 || (unsigned)hdr.trunc > 2048))
 
-int i4btrace_open(wtap *wth, int *err)
+int i4btrace_open(wtap *wth, int *err, gchar **err_info _U_)
 {
        int bytes_read;
        i4b_trace_hdr_t hdr;
        gboolean byte_swapped = FALSE;
 
        /* I4B trace files have no magic in the header... Sigh */
-       file_seek(wth->fh, 0, SEEK_SET);
        errno = WTAP_ERR_CANT_READ;
        bytes_read = file_read(&hdr, 1, sizeof(hdr), wth->fh);
        if (bytes_read != sizeof(hdr)) {
@@ -83,7 +93,8 @@ int i4btrace_open(wtap *wth, int *err)
                byte_swapped = TRUE;
        }
 
-       file_seek(wth->fh, 0, SEEK_SET);
+       if (file_seek(wth->fh, 0, SEEK_SET, err) == -1)
+               return -1;
        wth->data_offset = 0;
 
        /* Get capture start time */
@@ -91,34 +102,125 @@ int i4btrace_open(wtap *wth, int *err)
        wth->file_type = WTAP_FILE_I4BTRACE;
        wth->capture.i4btrace = g_malloc(sizeof(i4btrace_t));
        wth->subtype_read = i4btrace_read;
-       wth->snapshot_length = 2048;    /* actual length set per packet */
+       wth->subtype_seek_read = i4btrace_seek_read;
+       wth->subtype_close = i4btrace_close;
+       wth->snapshot_length = 0;       /* not known */
 
-       wth->capture.i4btrace->start = hdr.time.tv_sec;
-       wth->capture.i4btrace->bchannel_prot[0] = -1;
-       wth->capture.i4btrace->bchannel_prot[1] = -1;
        wth->capture.i4btrace->byte_swapped = byte_swapped;
 
-       wth->file_encap = WTAP_ENCAP_PER_PACKET;
+       wth->file_encap = WTAP_ENCAP_ISDN;
+       wth->tsprecision = WTAP_FILE_TSPREC_USEC;
 
        return 1;
 }
 
-#define V120SABME      "\010\001\177"
-
 /* Read the next packet */
-static int i4btrace_read(wtap *wth, int *err)
+static gboolean i4btrace_read(wtap *wth, int *err, gchar **err_info,
+    gint64 *data_offset)
 {
-       int     bytes_read;
+       int     ret;
        i4b_trace_hdr_t hdr;
-       guint16 length;
-       int     data_offset;
+       guint32 length;
        void *bufp;
 
        /* Read record header. */
+       *data_offset = wth->data_offset;
+       ret = i4b_read_rec_header(wth->fh, &hdr, err);
+       if (ret <= 0) {
+               /* Read error or EOF */
+               return FALSE;
+       }
+       wth->data_offset += sizeof hdr;
+       i4b_byte_swap_header(wth, &hdr);
+       if (hdr.length < sizeof(hdr)) {
+               *err = WTAP_ERR_BAD_RECORD;     /* record length < header! */
+               *err_info = g_strdup_printf("i4btrace: record length %u < header length %lu",
+                   hdr.length, (unsigned long)sizeof(hdr));
+               return FALSE;
+       }
+       length = hdr.length - (guint32)sizeof(hdr);
+
+       wth->phdr.len = length;
+       wth->phdr.caplen = length;
+
+       wth->phdr.ts.secs = hdr.ts_sec;
+       wth->phdr.ts.nsecs = hdr.ts_usec * 1000;
+
+       /*
+        * Read the packet data.
+        */
+       buffer_assure_space(wth->frame_buffer, length);
+       bufp = buffer_start_ptr(wth->frame_buffer);
+       if (!i4b_read_rec_data(wth->fh, bufp, length, err))
+               return FALSE;   /* Read error */
+       wth->data_offset += length;
+
+       switch (hdr.type) {
+
+       case TRC_CH_I:
+               /*
+                * XXX - what is it?  It's probably not WTAP_ENCAP_NULL,
+                * as that means it has a 4-byte AF_ type as the
+                * encapsulation header.
+                */
+               wth->phdr.pkt_encap = WTAP_ENCAP_NULL;
+               break;
+
+       case TRC_CH_D:
+       case TRC_CH_B1:
+       case TRC_CH_B2:
+               /*
+                * D or B channel.
+                */
+               wth->phdr.pkt_encap = WTAP_ENCAP_ISDN;
+               break;
+       }
+
+       i4b_set_pseudo_header(&hdr, &wth->pseudo_header);
+
+       return TRUE;
+}
+
+static gboolean
+i4btrace_seek_read(wtap *wth, gint64 seek_off,
+    union wtap_pseudo_header *pseudo_header, guchar *pd, int length,
+    int *err, gchar **err_info _U_)
+{
+       int     ret;
+       i4b_trace_hdr_t hdr;
+
+       if (file_seek(wth->random_fh, seek_off, SEEK_SET, err) == -1)
+               return FALSE;
+
+       /* Read record header. */
+       ret = i4b_read_rec_header(wth->random_fh, &hdr, err);
+       if (ret <= 0) {
+               /* Read error or EOF */
+               if (ret == 0) {
+                       /* EOF means "short read" in random-access mode */
+                       *err = WTAP_ERR_SHORT_READ;
+               }
+               return FALSE;
+       }
+       i4b_byte_swap_header(wth, &hdr);
+
+       i4b_set_pseudo_header(&hdr, pseudo_header);
+
+       /*
+        * Read the packet data.
+        */
+       return i4b_read_rec_data(wth->random_fh, pd, length, err);
+}
+
+static int
+i4b_read_rec_header(FILE_T fh, i4b_trace_hdr_t *hdr, int *err)
+{
+       int     bytes_read;
+
        errno = WTAP_ERR_CANT_READ;
-       bytes_read = file_read(&hdr, 1, sizeof hdr, wth->fh);
-       if (bytes_read != sizeof hdr) {
-               *err = file_error(wth->fh);
+       bytes_read = file_read(hdr, 1, sizeof *hdr, fh);
+       if (bytes_read != sizeof *hdr) {
+               *err = file_error(fh);
                if (*err != 0)
                        return -1;
                if (bytes_read != 0) {
@@ -127,79 +229,76 @@ static int i4btrace_read(wtap *wth, int *err)
                }
                return 0;
        }
-       wth->data_offset += sizeof hdr;
+       return 1;
+}
+
+static void
+i4b_byte_swap_header(wtap *wth, i4b_trace_hdr_t *hdr)
+{
        if (wth->capture.i4btrace->byte_swapped) {
                /*
                 * Byte-swap the header.
                 */
-               hdr.length = BSWAP32(hdr.length);
-               hdr.unit = BSWAP32(hdr.unit);
-               hdr.type = BSWAP32(hdr.type);
-               hdr.dir = BSWAP32(hdr.dir);
-               hdr.trunc = BSWAP32(hdr.trunc);
-               hdr.count = BSWAP32(hdr.count);
-               hdr.time.tv_sec = BSWAP32(hdr.time.tv_sec);
-               hdr.time.tv_usec = BSWAP32(hdr.time.tv_usec);
+               hdr->length = BSWAP32(hdr->length);
+               hdr->unit = BSWAP32(hdr->unit);
+               hdr->type = BSWAP32(hdr->type);
+               hdr->dir = BSWAP32(hdr->dir);
+               hdr->trunc = BSWAP32(hdr->trunc);
+               hdr->count = BSWAP32(hdr->count);
+               hdr->ts_sec = BSWAP32(hdr->ts_sec);
+               hdr->ts_usec = BSWAP32(hdr->ts_usec);
        }
-       length = hdr.length - sizeof(hdr);
-       if (length == 0)
-               return 0;
-
-       wth->phdr.len = length;
-       wth->phdr.caplen = length;
-
-       wth->phdr.ts.tv_sec = hdr.time.tv_sec;
-       wth->phdr.ts.tv_usec = hdr.time.tv_usec;
+}
 
-       wth->phdr.pseudo_header.x25.flags = (hdr.dir == FROM_TE) ? 0x00 : 0x80;
+static gboolean
+i4b_read_rec_data(FILE_T fh, guchar *pd, int length, int *err)
+{
+       int     bytes_read;
 
-       /*
-        * Read the packet data.
-        */
-       buffer_assure_space(wth->frame_buffer, length);
-       data_offset = wth->data_offset;
        errno = WTAP_ERR_CANT_READ;
-       bufp = buffer_start_ptr(wth->frame_buffer);
-       bytes_read = file_read(bufp, 1, length, wth->fh);
+       bytes_read = file_read(pd, 1, length, fh);
 
        if (bytes_read != length) {
-               *err = file_error(wth->fh);
+               *err = file_error(fh);
                if (*err == 0)
                        *err = WTAP_ERR_SHORT_READ;
-               return -1;
+               return FALSE;
        }
-       wth->data_offset += length;
+       return TRUE;
+}
 
-       /*
-        * This heuristic tries to figure out whether the datastream is
-        * V.120 or not. We cannot glean this from the Q.931 SETUP message,
-        * because no commercial V.120 implementation I've seen actually
-        * sets the V.120 protocol discriminator (that, or I'm misreading
-        * the spec badly).
-        * TODO: reset the flag to -1 (unknown) after a close on the B
-        * channel is detected.
-        */
-       if (hdr.type == TRC_CH_B1 || hdr.type == TRC_CH_B2) {
-               int channel = hdr.type - TRC_CH_B1;
-               if (wth->capture.i4btrace->bchannel_prot[channel] == -1) {
-                       if (memcmp(bufp, V120SABME, 3) == 0)
-                           wth->capture.i4btrace->bchannel_prot[channel] = 1;
-                       else
-                           wth->capture.i4btrace->bchannel_prot[channel] = 0;
-               }
-       }
+static void
+i4b_set_pseudo_header(i4b_trace_hdr_t *hdr,
+    union wtap_pseudo_header *pseudo_header)
+{
+       pseudo_header->isdn.uton = (hdr->dir == FROM_TE);
+       switch (hdr->type) {
 
-       if (hdr.type == TRC_CH_I) {
-               wth->phdr.pkt_encap = WTAP_ENCAP_NULL;
-       } else if (hdr.type == TRC_CH_D) {
-               wth->phdr.pkt_encap = WTAP_ENCAP_LAPD;
-       } else {
-               int channel = hdr.type - TRC_CH_B1;
-               if (wth->capture.i4btrace->bchannel_prot[channel] == 1)
-                       wth->phdr.pkt_encap = WTAP_ENCAP_V120;
-               else
-                       wth->phdr.pkt_encap = WTAP_ENCAP_NULL;
+       case TRC_CH_D:
+               /*
+                * D channel, so it's LAPD; set "p2p.sent".
+                */
+               pseudo_header->isdn.channel = 0;
+               break;
+
+       case TRC_CH_B1:
+               /*
+                * B channel 1.
+                */
+               pseudo_header->isdn.channel = 1;
+               break;
+
+       case TRC_CH_B2:
+               /*
+                * B channel 2.
+                */
+               pseudo_header->isdn.channel = 2;
+               break;
        }
+}
 
-       return data_offset;
+static void
+i4btrace_close(wtap *wth)
+{
+       g_free(wth->capture.i4btrace);
 }