7c4176d868
winapi_cleanup tool written by Patrik Stridvall for the wine project. svn path=/trunk/; revision=6117
557 lines
14 KiB
C
557 lines
14 KiB
C
/* packet-isis-clv.c
|
|
* Common CLV decode routines.
|
|
*
|
|
* $Id: packet-isis-clv.c,v 1.23 2002/08/28 21:00:18 jmayer Exp $
|
|
* Stuart Stanley <stuarts@mxmail.net>
|
|
*
|
|
* Ethereal - Network traffic analyzer
|
|
* By Gerald Combs <gerald@ethereal.com>
|
|
* Copyright 1998 Gerald Combs
|
|
*
|
|
* 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.
|
|
*
|
|
* 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.
|
|
*
|
|
* 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>
|
|
#include <glib.h>
|
|
|
|
#ifdef NEED_SNPRINTF_H
|
|
# include "snprintf.h"
|
|
#endif
|
|
|
|
#include <epan/packet.h>
|
|
#include "packet-osi.h"
|
|
#include "packet-isis.h"
|
|
#include "packet-isis-clv.h"
|
|
#include "nlpid.h"
|
|
|
|
static void
|
|
free_g_string(void *arg)
|
|
{
|
|
g_string_free(arg, TRUE);
|
|
}
|
|
|
|
/*
|
|
* Name: isis_dissect_area_address_clv()
|
|
*
|
|
* Description:
|
|
* Take an area address CLV and display it pieces. An area address
|
|
* CLV is n, x byte hex strings.
|
|
*
|
|
* Input:
|
|
* tvbuff_t * : tvbuffer for packet data
|
|
* proto_tree * : protocol display tree to fill out. May be NULL
|
|
* int : offset into packet data where we are.
|
|
* int : length of clv we are decoding
|
|
*
|
|
* Output:
|
|
* void, but we will add to proto tree if !NULL.
|
|
*/
|
|
void
|
|
isis_dissect_area_address_clv(tvbuff_t *tvb, proto_tree *tree, int offset,
|
|
int length)
|
|
{
|
|
int arealen,area_idx;
|
|
GString *gstr;
|
|
|
|
while ( length > 0 ) {
|
|
arealen = tvb_get_guint8(tvb, offset);
|
|
length--;
|
|
if (length<=0) {
|
|
isis_dissect_unknown(tvb, tree, offset,
|
|
"short address (no length for payload)");
|
|
return;
|
|
}
|
|
if ( arealen > length) {
|
|
isis_dissect_unknown(tvb, tree, offset,
|
|
"short address, packet says %d, we have %d left",
|
|
arealen, length );
|
|
return;
|
|
}
|
|
|
|
if ( tree ) {
|
|
/*
|
|
* Lets turn the area address into "standard"
|
|
* xx.xxxx.xxxx.xxxx.xxxx.xxxx.xxxx format string.
|
|
* this is a private routine as the print_nsap_net in
|
|
* epan/osi_utils.c is incomplete and we need only
|
|
* a subset - actually some nice placing of dots ....
|
|
*
|
|
* We pick an initial size of 32 bytes.
|
|
*/
|
|
gstr = g_string_sized_new(32);
|
|
|
|
/*
|
|
* Free the GString if we throw an exception.
|
|
*/
|
|
CLEANUP_PUSH(free_g_string, gstr);
|
|
|
|
for (area_idx = 0; area_idx < arealen; area_idx++) {
|
|
g_string_sprintfa(gstr, "%02x",
|
|
tvb_get_guint8(tvb, offset+area_idx+1));
|
|
if (((area_idx & 1) == 0) &&
|
|
(area_idx + 1 < arealen)) {
|
|
g_string_sprintfa(gstr, ".");
|
|
}
|
|
}
|
|
|
|
/* and spit it out */
|
|
proto_tree_add_text ( tree, tvb, offset, arealen + 1,
|
|
"Area address (%d): %s", arealen, gstr->str );
|
|
|
|
/*
|
|
* We're done with the GString, so delete it and
|
|
* get rid of the cleanup handler.
|
|
*/
|
|
CLEANUP_CALL_AND_POP;
|
|
}
|
|
offset += arealen + 1;
|
|
length -= arealen; /* length already adjusted for len fld*/
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* Name: isis_dissect_authentication_clv()
|
|
*
|
|
* Description:
|
|
* Take apart the CLV that hold authentication information. This
|
|
* is currently 1 octet auth type (which must be 1) and then
|
|
* the clear text password.
|
|
*
|
|
* An ISIS password has different meaning depending where it
|
|
* is found. Thus we support a passed in prefix string to
|
|
* use to name this.
|
|
*
|
|
* Input:
|
|
* tvbuff_t * : tvbuffer for packet data
|
|
* proto_tree * : protocol display tree to fill out. May be NULL
|
|
* int : offset into packet data where we are.
|
|
* int : length of clv we are decoding
|
|
* char * : Password meaning
|
|
*
|
|
* Output:
|
|
* void, but we will add to proto tree if !NULL.
|
|
*/
|
|
void
|
|
isis_dissect_authentication_clv(tvbuff_t *tvb, proto_tree *tree, int offset,
|
|
int length, char *meaning)
|
|
{
|
|
guchar pw_type;
|
|
char sbuf[300]; /* 255 + header info area */
|
|
char *s = sbuf;
|
|
int auth_unsupported;
|
|
|
|
if ( length <= 0 ) {
|
|
return;
|
|
}
|
|
|
|
pw_type = tvb_get_guint8(tvb, offset);
|
|
offset += 1;
|
|
length--;
|
|
auth_unsupported = FALSE;
|
|
|
|
switch (pw_type) {
|
|
case 1:
|
|
s += sprintf ( s, "clear text (1), password (length %d) = ", length );
|
|
|
|
if ( length > 0 ) {
|
|
strncpy(s, tvb_get_ptr(tvb, offset, length), length);
|
|
s[length] = 0;
|
|
} else {
|
|
strcat(s, "no clear-text password found!!!" );
|
|
}
|
|
break;
|
|
case 54:
|
|
s += sprintf ( s, "hmac-md5 (54), password (length %d) = ", length );
|
|
|
|
if ( length == 16 ) {
|
|
s += sprintf ( s, "0x%02x", tvb_get_guint8(tvb, offset) );
|
|
offset += 1;
|
|
length--;
|
|
while (length > 0) {
|
|
s += sprintf ( s, "%02x", tvb_get_guint8(tvb, offset) );
|
|
offset += 1;
|
|
length--;
|
|
}
|
|
s = 0;
|
|
} else {
|
|
strcat(s, "illegal hmac-md5 digest format (must be 16 bytes)" );
|
|
}
|
|
break;
|
|
default:
|
|
s += sprintf ( s, "type 0x%02x (0x%02x): ", pw_type, length );
|
|
auth_unsupported=TRUE;
|
|
break;
|
|
}
|
|
|
|
proto_tree_add_text ( tree, tvb, offset - 1, length + 1,
|
|
"%s %s", meaning, sbuf );
|
|
|
|
if ( auth_unsupported ) {
|
|
isis_dissect_unknown(tvb, tree, offset,
|
|
"Unknown authentication type" );
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Name: isis_dissect_hostname_clv()
|
|
*
|
|
* Description:
|
|
* dump the hostname information found in TLV 137
|
|
* pls note that the hostname is not null terminated
|
|
*
|
|
* Input:
|
|
* tvbuff_t * : tvbuffer for packet data
|
|
* proto_tree * : protocol display tree to fill out. May be NULL
|
|
* int : offset into packet data where we are.
|
|
* int : length of clv we are decoding
|
|
*
|
|
* Output:
|
|
* void, but we will add to proto tree if !NULL.
|
|
*/
|
|
|
|
|
|
void
|
|
isis_dissect_hostname_clv(tvbuff_t *tvb, proto_tree *tree, int offset,
|
|
int length)
|
|
{
|
|
if ( !tree ) return; /* nothing to do! */
|
|
|
|
if ( length == 0 ) {
|
|
proto_tree_add_text ( tree, tvb, offset, length,
|
|
"Hostname: --none--" );
|
|
} else {
|
|
proto_tree_add_text ( tree, tvb, offset, length,
|
|
"Hostname: %.*s", length,
|
|
tvb_get_ptr(tvb, offset, length) );
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
void
|
|
isis_dissect_mt_clv(tvbuff_t *tvb, proto_tree *tree, int offset, int length,
|
|
int tree_id)
|
|
{
|
|
guint16 mt_block;
|
|
char mt_desc[60];
|
|
|
|
while (length>0) {
|
|
/* length can only be a multiple of 2, otherwise there is
|
|
something broken -> so decode down until length is 1 */
|
|
if (length!=1) {
|
|
/* fetch two bytes */
|
|
mt_block=tvb_get_ntohs(tvb, offset);
|
|
|
|
/* mask out the lower 12 bits */
|
|
switch(mt_block&0x0fff) {
|
|
case 0:
|
|
strcpy(mt_desc,"IPv4 unicast");
|
|
break;
|
|
case 1:
|
|
strcpy(mt_desc,"In-Band Management");
|
|
break;
|
|
case 2:
|
|
strcpy(mt_desc,"IPv6 unicast");
|
|
break;
|
|
case 3:
|
|
strcpy(mt_desc,"Multicast");
|
|
break;
|
|
case 4095:
|
|
strcpy(mt_desc,"Development, Experimental or Proprietary");
|
|
break;
|
|
default:
|
|
strcpy(mt_desc,"Reserved for IETF Consensus");
|
|
break;
|
|
}
|
|
proto_tree_add_uint_format ( tree, tree_id, tvb, offset, 2,
|
|
mt_block,
|
|
"%s Topology (0x%03x)%s%s",
|
|
mt_desc,
|
|
mt_block&0xfff,
|
|
(mt_block&0x8000) ? "" : ", no sub-TLVs present",
|
|
(mt_block&0x4000) ? ", ATT bit set" : "" );
|
|
} else {
|
|
proto_tree_add_text ( tree, tvb, offset, 1,
|
|
"malformed MT-ID");
|
|
break;
|
|
}
|
|
length=length-2;
|
|
offset=offset+2;
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* Name: isis_dissect_ip_int_clv()
|
|
*
|
|
* Description:
|
|
* Take apart the CLV that lists all the IP interfaces. The
|
|
* meaning of which is slightly different for the different base packet
|
|
* types, but the display is not different. What we have is n ip
|
|
* addresses, plain and simple.
|
|
*
|
|
* Input:
|
|
* tvbuff_t * : tvbuffer for packet data
|
|
* proto_tree * : protocol display tree to fill out. May be NULL
|
|
* int : offset into packet data where we are.
|
|
* int : length of clv we are decoding
|
|
* int : tree id to use for proto tree.
|
|
*
|
|
* Output:
|
|
* void, but we will add to proto tree if !NULL.
|
|
*/
|
|
void
|
|
isis_dissect_ip_int_clv(tvbuff_t *tvb, proto_tree *tree, int offset,
|
|
int length, int tree_id)
|
|
{
|
|
if ( length <= 0 ) {
|
|
return;
|
|
}
|
|
|
|
while ( length > 0 ) {
|
|
if ( length < 4 ) {
|
|
isis_dissect_unknown(tvb, tree, offset,
|
|
"Short IP interface address (%d vs 4)",length );
|
|
return;
|
|
}
|
|
|
|
if ( tree ) {
|
|
proto_tree_add_item(tree, tree_id, tvb, offset, 4, FALSE);
|
|
}
|
|
offset += 4;
|
|
length -= 4;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Name: isis_dissect_ipv6_int_clv()
|
|
*
|
|
* Description:
|
|
* Take apart the CLV that lists all the IPv6 interfaces. The
|
|
* meaning of which is slightly different for the different base packet
|
|
* types, but the display is not different. What we have is n ip
|
|
* addresses, plain and simple.
|
|
*
|
|
* Input:
|
|
* tvbuff_t * : tvbuffer for packet data
|
|
* proto_tree * : protocol display tree to fill out. May be NULL
|
|
* int : offset into packet data where we are.
|
|
* int : length of clv we are decoding
|
|
* int : tree id to use for proto tree.
|
|
*
|
|
* Output:
|
|
* void, but we will add to proto tree if !NULL.
|
|
*/
|
|
void
|
|
isis_dissect_ipv6_int_clv(tvbuff_t *tvb, proto_tree *tree, int offset,
|
|
int length, int tree_id)
|
|
{
|
|
guint8 addr [16];
|
|
|
|
if ( length <= 0 ) {
|
|
return;
|
|
}
|
|
|
|
while ( length > 0 ) {
|
|
if ( length < 16 ) {
|
|
isis_dissect_unknown(tvb, tree, offset,
|
|
"Short IPv6 interface address (%d vs 16)",length );
|
|
return;
|
|
}
|
|
tvb_memcpy(tvb, addr, offset, sizeof(addr));
|
|
if ( tree ) {
|
|
proto_tree_add_ipv6(tree, tree_id, tvb, offset, 16, addr);
|
|
}
|
|
offset += 16;
|
|
length -= 16;
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* Name: isis_dissect_te_router_id_clv()
|
|
*
|
|
* Description:
|
|
* Display the Traffic Engineering Router ID TLV #134.
|
|
* This TLV is like the IP Interface TLV, except that
|
|
* only _one_ IP address is present
|
|
*
|
|
* Input:
|
|
* tvbuff_t * : tvbuffer for packet data
|
|
* proto_tree * : protocol display tree to fill out. May be NULL
|
|
* int : offset into packet data where we are.
|
|
* int : length of clv we are decoding
|
|
* int : tree id to use for proto tree.
|
|
*
|
|
* Output:
|
|
* void, but we will add to proto tree if !NULL.
|
|
*/
|
|
void
|
|
isis_dissect_te_router_id_clv(tvbuff_t *tvb, proto_tree *tree, int offset,
|
|
int length, int tree_id)
|
|
{
|
|
if ( length <= 0 ) {
|
|
return;
|
|
}
|
|
|
|
if ( length != 4 ) {
|
|
isis_dissect_unknown(tvb, tree, offset,
|
|
"malformed Traffic Engineering Router ID (%d vs 4)",length );
|
|
return;
|
|
}
|
|
if ( tree ) {
|
|
proto_tree_add_item(tree, tree_id, tvb, offset, 4, FALSE);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Name: isis_dissect_nlpid_clv()
|
|
*
|
|
* Description:
|
|
* Take apart a NLPID packet and display it. The NLPID (for intergrated
|
|
* ISIS, contains n network layer protocol IDs that the box supports.
|
|
* Our display buffer we use is upto 255 entries, 6 bytes per (0x00, )
|
|
* plus 1 for zero termination. We just just 256*6 for simplicity.
|
|
*
|
|
* Input:
|
|
* tvbuff_t * : tvbuffer for packet data
|
|
* proto_tree * : protocol display tree to fill out. May be NULL
|
|
* int : offset into packet data where we are.
|
|
* int : length of clv we are decoding
|
|
*
|
|
* Output:
|
|
* void, but we will add to proto tree if !NULL.
|
|
*/
|
|
void
|
|
isis_dissect_nlpid_clv(tvbuff_t *tvb, proto_tree *tree, int offset, int length)
|
|
{
|
|
char sbuf[256*6];
|
|
char *s = sbuf;
|
|
int hlen = length;
|
|
int old_offset = offset;
|
|
|
|
if ( !tree ) return; /* nothing to do! */
|
|
|
|
while ( length-- > 0 ) {
|
|
if (s != sbuf ) {
|
|
s += sprintf ( s, ", " );
|
|
}
|
|
s += sprintf ( s, "%s (0x%02x)",
|
|
val_to_str(tvb_get_guint8(tvb, offset), nlpid_vals,
|
|
"Unknown"), tvb_get_guint8(tvb, offset));
|
|
offset++;
|
|
}
|
|
|
|
if ( hlen == 0 ) {
|
|
sprintf ( sbuf, "--none--" );
|
|
}
|
|
|
|
proto_tree_add_text ( tree, tvb, old_offset, hlen,
|
|
"NLPID(s): %s", sbuf );
|
|
}
|
|
|
|
/*
|
|
* Name: isis_dissect_clvs()
|
|
*
|
|
* Description:
|
|
* Dispatch routine to shred all the CLVs in a packet. We just
|
|
* walk through the clv entries in the packet. For each one, we
|
|
* search the passed in valid clv's for this protocol (opts) for
|
|
* a matching code. If found, we add to the display tree and
|
|
* then call the dissector. If it is not, we just post an
|
|
* "unknown" clv entry using the passed in unknown clv tree id.
|
|
*
|
|
* Input:
|
|
* tvbuff_t * : tvbuffer for packet data
|
|
* proto_tree * : protocol display tree to fill out. May be NULL
|
|
* int : offset into packet data where we are.
|
|
* isis_clv_handle_t * : NULL dissector terminated array of codes
|
|
* and handlers (along with tree text and tree id's).
|
|
* int : length of CLV area.
|
|
* int : length of IDs in packet.
|
|
* int : unknown clv tree id
|
|
*
|
|
* Output:
|
|
* void, but we will add to proto tree if !NULL.
|
|
*/
|
|
void
|
|
isis_dissect_clvs(tvbuff_t *tvb, proto_tree *tree, int offset,
|
|
const isis_clv_handle_t *opts, int len, int id_length,
|
|
int unknown_tree_id)
|
|
{
|
|
guint8 code;
|
|
guint8 length;
|
|
int q;
|
|
proto_item *ti;
|
|
proto_tree *clv_tree;
|
|
char sbuf[255];
|
|
int adj;
|
|
|
|
while ( len > 0 ) {
|
|
code = tvb_get_guint8(tvb, offset);
|
|
offset += 1;
|
|
|
|
length = tvb_get_guint8(tvb, offset);
|
|
offset += 1;
|
|
|
|
adj = (sizeof(code) + sizeof(length) + length);
|
|
len -= adj;
|
|
if ( len < 0 ) {
|
|
isis_dissect_unknown(tvb, tree, offset,
|
|
"Short CLV header (%d vs %d)",
|
|
adj, len + adj );
|
|
return;
|
|
}
|
|
q = 0;
|
|
while ((opts[q].dissect != NULL )&&( opts[q].optcode != code )){
|
|
q++;
|
|
}
|
|
if ( opts[q].dissect ) {
|
|
if (tree) {
|
|
/* adjust by 2 for code/len octets */
|
|
snprintf ( sbuf, sizeof(sbuf), "%s (%d)",
|
|
opts[q].tree_text, length );
|
|
ti = proto_tree_add_text(tree, tvb, offset - 2,
|
|
length + 2, sbuf);
|
|
clv_tree = proto_item_add_subtree(ti,
|
|
*opts[q].tree_id );
|
|
} else {
|
|
clv_tree = NULL;
|
|
}
|
|
opts[q].dissect(tvb, clv_tree, offset,
|
|
id_length, length);
|
|
} else {
|
|
if (tree) {
|
|
snprintf ( sbuf, sizeof(sbuf),
|
|
"Unknown code (%d:%d)", code, length );
|
|
ti = proto_tree_add_text(tree, tvb, offset - 2,
|
|
length + 2, sbuf);
|
|
clv_tree = proto_item_add_subtree(ti,
|
|
unknown_tree_id );
|
|
} else {
|
|
clv_tree = NULL;
|
|
}
|
|
}
|
|
offset += length;
|
|
}
|
|
}
|