QUIC: Update IETF draft URL (draft-08)
[metze/wireshark/wip.git] / epan / osi-utils.c
index 5632efacfb3080b9e507e28a544268ffbded50aa..245d3e14ee468381f06f6ccd677944f87964e242 100644 (file)
 
 #include "tvbuff.h"
 #include "osi-utils.h"
+#include "address.h"
+#include "address_types.h"
+
+static void print_nsap_net_buf( const guint8 *, int, gchar *, int);
+static void print_area_buf ( const guint8 *, int, gchar *, int);
+static void print_address_prefix_buf ( const guint8 *, int, gchar *, int);
 
 /*
  * XXX - shouldn't there be a centralized routine for dissecting NSAPs?
  * "dissect_nsap()" in epan/dissectors/packet-isup.c.
  */
 gchar *
-print_nsap_net( const guint8 *ad, int length )
+print_nsap_net( tvbuff_t *tvb, const gint offset, int length )
 {
   gchar *cur;
 
   cur = (gchar *)wmem_alloc(wmem_packet_scope(), MAX_NSAP_LEN * 3 + 50);
-  print_nsap_net_buf( ad, length, cur, MAX_NSAP_LEN * 3 + 50);
+  print_nsap_net_buf( tvb_get_ptr(tvb, offset, length), length, cur, MAX_NSAP_LEN * 3 + 50);
   return( cur );
 }
 
-/* XXX - Should these be converted to string buffers? */
-void
+static void
 print_nsap_net_buf( const guint8 *ad, int length, gchar *buf, int buf_len)
 {
   gchar *cur;
@@ -57,7 +62,7 @@ print_nsap_net_buf( const guint8 *ad, int length, gchar *buf, int buf_len)
   /* to do : NSAP / NET decoding */
 
   if ( (length <= 0 ) || ( length > MAX_NSAP_LEN ) ) {
-    g_snprintf(buf, buf_len, "<Invalid length of NSAP>");
+    g_strlcpy(buf, "<Invalid length of NSAP>", buf_len);
     return;
   }
   cur = buf;
@@ -100,7 +105,7 @@ print_system_id_buf( const guint8 *ad, int length, gchar *buf, int buf_len)
   int           tmp;
 
   if ( ( length <= 0 ) || ( length > MAX_SYSTEMID_LEN ) ) {
-    g_snprintf(buf, buf_len, "<Invalid length of SYSTEM ID>");
+    g_strlcpy(buf, "<Invalid length of SYSTEM ID>", buf_len);
     return;
   }
 
@@ -139,41 +144,65 @@ print_system_id_buf( const guint8 *ad, int length, gchar *buf, int buf_len)
 }
 
 gchar *
-print_area(const guint8 *ad, int length)
+print_area(tvbuff_t *tvb, const gint offset, int length)
 {
   gchar *cur;
 
   cur = (gchar *)wmem_alloc(wmem_packet_scope(), MAX_AREA_LEN * 3 + 20);
-  print_area_buf(ad, length, cur, MAX_AREA_LEN * 3 + 20);
+  print_area_buf(tvb_get_ptr(tvb, offset, length), length, cur, MAX_AREA_LEN * 3 + 20);
   return cur;
 }
 
-void
+/*
+ * Note: length is in units of half-octets.
+ */
+gchar *
+print_address_prefix(tvbuff_t *tvb, const gint offset, int length)
+{
+  gchar *cur;
+
+  cur = (gchar *)wmem_alloc(wmem_packet_scope(), MAX_AREA_LEN * 3 + 20);
+  print_address_prefix_buf(tvb_get_ptr(tvb, offset, (length+1)/2), length, cur, MAX_AREA_LEN * 3 + 20);
+  return cur;
+}
+
+/*
+ * Note: length is in units of octets.
+ */
+static void
 print_area_buf(const guint8 *ad, int length, gchar *buf, int buf_len)
+{
+  print_address_prefix_buf(ad, length*2, buf, buf_len);
+}
+
+/*
+ * Note: length is in units of half-octets.
+ */
+static void
+print_address_prefix_buf(const guint8 *ad, int length, gchar *buf, int buf_len)
 {
   gchar *cur;
   int  tmp  = 0;
 
   /* to do : all real area decoding now: NET is assumed if id len is 1 more byte
-   * and take away all these stupid resource consuming local statics
    */
-  if (length <= 0 || length > MAX_AREA_LEN) {
-    g_snprintf(buf, buf_len, "<Invalid length of AREA>");
+  if (length <= 0 || length > MAX_AREA_LEN*2) {
+    g_strlcpy(buf, "<Invalid length of AREA>", buf_len);
     return;
   }
 
   cur = buf;
-  if ( (  ( NSAP_IDI_ISODCC          == *ad )
-       || ( NSAP_IDI_GOSIP2          == *ad )
+  if ( (  ( NSAP_IDI_ISO_DCC_BIN      == *ad )
+       || ( NSAP_IDI_ISO_6523_ICD_BIN == *ad )
        )
        &&
-       (  ( RFC1237_FULLAREA_LEN     ==  length )
-       || ( RFC1237_FULLAREA_LEN + 1 ==  length )
+       (  ( RFC1237_FULLAREA_LEN*2       ==  length )
+       || ( (RFC1237_FULLAREA_LEN + 1)*2 ==  length )
        )
      ) {    /* AFI is good and length is long enough  */
 
     /* there used to be a check for (length > RFC1237_FULLAREA_LEN + 1) here,
-     * in order to report an invalied length of AREA for DCC / GOSIP AFI,
+     * in order to report an invalied length of AREA for DCC / ISO 6523 AFI,
      * but that can *never* be the case because the if() test above explicitly
      * tests for (length == RFC1237_FULLAREA_LEN) or (length == RFC1237_FULLAREA_LEN + 1)
      */
@@ -183,35 +212,70 @@ print_area_buf(const guint8 *ad, int length, gchar *buf, int buf_len)
                     ad[5], ad[6], ad[7], ad[8] );
     cur += g_snprintf(cur, (gulong) (buf_len-(cur-buf)), "[%02x:%02x|%02x:%02x]",
                     ad[9], ad[10],  ad[11], ad[12] );
-    if ( RFC1237_FULLAREA_LEN + 1 == length )
+    if ( (RFC1237_FULLAREA_LEN + 1)*2 == length )
       g_snprintf(cur, (gulong) (buf_len-(cur-buf)), "-[%02x]", ad[20] );
   }
   else { /* print standard format */
-    if ( length == RFC1237_AREA_LEN ) {
+    if ( length == RFC1237_AREA_LEN*2 ) {
       g_snprintf(buf, buf_len, "%02x.%02x%02x", ad[0], ad[1], ad[2] );
       return;
     }
-    if ( length == 4 ) {
+    if ( length == 4*2 ) {
       g_snprintf(buf, buf_len, "%02x%02x%02x%02x", ad[0], ad[1], ad[2], ad[3] );
       return;
     }
-    while ( tmp < length / 4 ) {      /* 16/4==4 > four Octets left to print */
+    while ( tmp < length / 8 ) {      /* 32/8==4 > four Octets left to print */
       cur += g_snprintf(cur, (gulong) (buf_len-(cur-buf)), "%02x", ad[tmp++] );
       cur += g_snprintf(cur, (gulong) (buf_len-(cur-buf)), "%02x", ad[tmp++] );
       cur += g_snprintf(cur, (gulong) (buf_len-(cur-buf)), "%02x", ad[tmp++] );
       cur += g_snprintf(cur, (gulong) (buf_len-(cur-buf)), "%02x.", ad[tmp++] );
     }
-    if ( 1 == tmp ) {                     /* Special case for Designated IS */
+    if ( 2 == tmp ) {                     /* Special case for Designated IS */
       cur--;
       g_snprintf(cur, (gulong) (buf_len-(cur-buf)), "-%02x", ad[tmp] );
     }
     else {
-      for ( ; tmp < length; ) {  /* print the rest without dot or dash */
+      for ( ; tmp < length / 2; ) {  /* print the rest without dot or dash */
         cur += g_snprintf(cur, (gulong) (buf_len-(cur-buf)), "%02x", ad[tmp++] );
       }
+      /* Odd half-octet? */
+      if (length & 1) {
+        /* Yes - print it (it's the upper half-octet) */
+        g_snprintf(cur, (gulong) (buf_len-(cur-buf)), "%x", (ad[tmp] & 0xF0)>>4 );
+      }
     }
   }
-} /* print_area_buf */
+} /* print_address_prefix_buf */
+
+/******************************************************************************
+ * OSI Address Type
+ ******************************************************************************/
+static int osi_address_type = -1;
+
+static int osi_address_to_str(const address* addr, gchar *buf, int buf_len)
+{
+    print_nsap_net_buf((const guint8 *)addr->data, addr->len, buf, buf_len);
+    return (int)strlen(buf)+1;
+}
+
+static int osi_address_str_len(const address* addr _U_)
+{
+    return MAX_NSAP_LEN * 3 + 50;
+}
+
+int get_osi_address_type(void)
+{
+    return osi_address_type;
+}
+
+void register_osi_address_type(void)
+{
+    if (osi_address_type != -1)
+        return;
+
+    osi_address_type = address_type_dissector_register("AT_OSI", "OSI Address", osi_address_to_str, osi_address_str_len, NULL, NULL, NULL, NULL, NULL);
+}
+
 
 /*
  * Editor modelines