/* * Copyright (c) 1998-2007 The TCPDUMP project * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that: (1) source code * distributions retain the above copyright notice and this paragraph * in its entirety, and (2) distributions including binary code include * the above copyright notice and this paragraph in its entirety in * the documentation or other materials provided with the distribution. * THIS SOFTWARE IS PROVIDED ``AS IS'' AND * WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT * LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS * FOR A PARTICULAR PURPOSE. * * Optimized Link State Protocl (OLSR) as per rfc3626 * * Original code by Hannes Gredler <hannes@juniper.net> */#ifdef HAVE_CONFIG_H#include "config.h"#endif#include <tcpdump-stdinc.h>#include <stdio.h>#include <string.h>#include "interface.h"#include "addrtoname.h"#include "extract.h"		#include "ip.h"/* * RFC 3626 common header * *  0                   1                   2                   3 *  0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ * |         Packet Length         |    Packet Sequence Number     | * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ * |  Message Type |     Vtime     |         Message Size          | * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ * |                      Originator Address                       | * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ * |  Time To Live |   Hop Count   |    Message Sequence Number    | * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ * |                                                               | * :                            MESSAGE                            : * |                                                               | * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ * |  Message Type |     Vtime     |         Message Size          | * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ * |                      Originator Address                       | * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ * |  Time To Live |   Hop Count   |    Message Sequence Number    | * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ * |                                                               | * :                            MESSAGE                            : * |                                                               | * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ * :                                                               : */struct olsr_common {    u_int8_t packet_len[2];    u_int8_t packet_seq[2];};#define OLSR_HELLO_MSG         1 /* rfc3626 */#define OLSR_TC_MSG            2 /* rfc3626 */#define OLSR_MID_MSG           3 /* rfc3626 */#define OLSR_HNA_MSG           4 /* rfc3626 */#define OLSR_POWERINFO_MSG   128#define OLSR_NAMESERVICE_MSG 130#define OLSR_HELLO_LQ_MSG    201 /* LQ extensions olsr.org */#define OLSR_TC_LQ_MSG       202 /* LQ extensions olsr.org */static struct tok olsr_msg_values[] = {    { OLSR_HELLO_MSG, "Hello" },    { OLSR_TC_MSG, "TC" },    { OLSR_MID_MSG, "MID" },    { OLSR_HNA_MSG, "HNA" },    { OLSR_POWERINFO_MSG, "Powerinfo" },    { OLSR_NAMESERVICE_MSG, "Nameservice" },    { OLSR_HELLO_LQ_MSG, "Hello-LQ" },    { OLSR_TC_LQ_MSG, "TC-LQ" },    { 0, NULL}};struct olsr_msg {    u_int8_t msg_type;    u_int8_t vtime;    u_int8_t msg_len[2];    u_int8_t originator[4];    u_int8_t ttl;    u_int8_t hopcount;    u_int8_t msg_seq[2];};struct olsr_hello {    u_int8_t res[2];    u_int8_t htime;    u_int8_t will;};struct olsr_hello_link {    u_int8_t link_code;    u_int8_t res;    u_int8_t len[2];};struct olsr_tc {    u_int8_t ans_seq[2];    u_int8_t res[2];};struct olsr_hna {    u_int8_t network[4];    u_int8_t mask[4];};#define OLSR_EXTRACT_LINK_TYPE(link_code) (link_code & 0x3)#define OLSR_EXTRACT_NEIGHBOR_TYPE(link_code) (link_code >> 2)static struct tok olsr_link_type_values[] = {    { 0, "Unspecified" },    { 1, "Asymmetric" },    { 2, "Symmetric" },    { 3, "Lost" },    { 0, NULL}};static struct tok olsr_neighbor_type_values[] = {    { 0, "Not-Neighbor" },    { 1, "Symmetric" },    { 2, "Symmetric-MPR" },    { 0, NULL}};struct olsr_lq_neighbor {    u_int8_t neighbor[4];    u_int8_t link_quality;    u_int8_t neighbor_link_quality;    u_int8_t res[2];};/* * macro to convert the 8-bit mantissa/exponent to a double float * taken from olsr.org. */#define VTIME_SCALE_FACTOR    0.0625#define ME_TO_DOUBLE(me) \  (double)(VTIME_SCALE_FACTOR*(1+(double)(me>>4)/16)*(double)(1<<(me&0x0F)))/* * print a neighbor list with LQ extensions. */static voidolsr_print_lq_neighbor (const u_char *msg_data, u_int hello_len){    struct olsr_lq_neighbor *lq_neighbor;    while (hello_len >= sizeof(struct olsr_lq_neighbor)) {        lq_neighbor = (struct olsr_lq_neighbor *)msg_data;        printf("\n\t      neighbor %s, link-quality %.2lf%%"               ", neighbor-link-quality %.2lf%%",               ipaddr_string(lq_neighbor->neighbor),               ((double)lq_neighbor->link_quality/2.55),               ((double)lq_neighbor->neighbor_link_quality/2.55));        msg_data += sizeof(struct olsr_lq_neighbor);        hello_len -= sizeof(struct olsr_lq_neighbor);    }}/* * print a neighbor list. */static voidolsr_print_neighbor (const u_char *msg_data, u_int hello_len){    int neighbor;    printf("\n\t      neighbor\n\t\t");    neighbor = 1;    while (hello_len >= sizeof(struct in_addr)) {        /* print 4 neighbors per line */        printf("%s%s", ipaddr_string(msg_data),               neighbor % 4 == 0 ? "\n\t\t" : " ");        msg_data += sizeof(struct in_addr);        hello_len -= sizeof(struct in_addr);    }}voidolsr_print (const u_char *pptr, u_int length){    union {        const struct olsr_common *common;        const struct olsr_msg *msg;        const struct olsr_hello *hello;        const struct olsr_hello_link *hello_link;        const struct olsr_lq_neighbor *lq_neighbor;        const struct olsr_tc *tc;        const struct olsr_hna *hna;    } ptr;    u_int msg_type, msg_len, msg_tlen, hello_len, prefix;    u_int8_t link_type, neighbor_type;    const u_char *tptr, *msg_data;    tptr = pptr;     if (length < sizeof(struct olsr_common)) {        goto trunc;    }    if (!TTEST2(*tptr, sizeof(struct olsr_common))) {	goto trunc;    }    ptr.common = (struct olsr_common *)tptr;    length = MIN(length, EXTRACT_16BITS(ptr.common->packet_len));    printf("OLSR, seq 0x%04x, length %u",           EXTRACT_16BITS(ptr.common->packet_seq),           length);    tptr += sizeof(struct olsr_common);    /*     * In non-verbose mode, just print version.     */    if (vflag < 1) {	return;    }    while (tptr < (pptr+length)) {        if (!TTEST2(*tptr, sizeof(struct olsr_msg)))	            goto trunc;        ptr.msg = (struct olsr_msg *)tptr;        msg_type = ptr.msg->msg_type;        msg_len = EXTRACT_16BITS(ptr.msg->msg_len);        /* infinite loop check */        if (msg_type == 0 || msg_len == 0) {            return;        }        printf("\n\t%s Message (%u), originator %s, ttl %u, hop %u"               "\n\t  vtime %.3lfs, msg-seq 0x%04x, length %u",               tok2str(olsr_msg_values, "Unknown", msg_type),               msg_type, ipaddr_string(ptr.msg->originator),               ptr.msg->ttl,               ptr.msg->hopcount,               ME_TO_DOUBLE(ptr.msg->vtime),               EXTRACT_16BITS(ptr.msg->msg_seq),               msg_len);        msg_tlen = msg_len - sizeof(struct olsr_msg);        msg_data = tptr + sizeof(struct olsr_msg);        switch (msg_type) {        case OLSR_HELLO_MSG:        case OLSR_HELLO_LQ_MSG:            if (!TTEST2(*msg_data, sizeof(struct olsr_hello)))	                goto trunc;            ptr.hello = (struct olsr_hello *)msg_data;            printf("\n\t  hello-time %.3lfs, MPR willingness %u",                   ME_TO_DOUBLE(ptr.hello->htime), ptr.hello->will);            msg_data += sizeof(struct olsr_hello);            msg_tlen -= sizeof(struct olsr_hello);            while (msg_tlen >= sizeof(struct olsr_hello_link)) {                /*                 * link-type.                 */                if (!TTEST2(*msg_data, sizeof(struct olsr_hello_link)))	                    goto trunc;                ptr.hello_link = (struct olsr_hello_link *)msg_data;                hello_len = EXTRACT_16BITS(ptr.hello_link->len);                link_type = OLSR_EXTRACT_LINK_TYPE(ptr.hello_link->link_code);                neighbor_type = OLSR_EXTRACT_NEIGHBOR_TYPE(ptr.hello_link->link_code);                printf("\n\t    link-type %s, neighbor-type %s, len %u",                       tok2str(olsr_link_type_values, "Unknown", link_type),                       tok2str(olsr_neighbor_type_values, "Unknown", neighbor_type),                       hello_len);                msg_data += sizeof(struct olsr_hello_link);                msg_tlen -= sizeof(struct olsr_hello_link);                hello_len -= sizeof(struct olsr_hello_link);                if (msg_type == OLSR_HELLO_MSG) {                    olsr_print_neighbor(msg_data, hello_len);                } else {                    olsr_print_lq_neighbor(msg_data, hello_len);                }                msg_data += hello_len;                msg_tlen -= hello_len;            }            break;        case OLSR_TC_MSG:        case OLSR_TC_LQ_MSG:            if (!TTEST2(*msg_data, sizeof(struct olsr_tc)))	                goto trunc;            ptr.tc = (struct olsr_tc *)msg_data;            printf("\n\t    advertised neighbor seq 0x%04x",                   EXTRACT_16BITS(ptr.tc->ans_seq));            msg_data += sizeof(struct olsr_tc);            msg_tlen -= sizeof(struct olsr_tc);            if (msg_type == OLSR_TC_MSG) {                olsr_print_neighbor(msg_data, msg_tlen);            } else {                olsr_print_lq_neighbor(msg_data, msg_tlen);            }            break;        case OLSR_MID_MSG:            if (!TTEST2(*msg_data, sizeof(struct in_addr)))	                goto trunc;            while (msg_tlen >= sizeof(struct in_addr)) {                printf("\n\t  interface address %s", ipaddr_string(msg_data));                msg_data += sizeof(struct in_addr);                msg_tlen -= sizeof(struct in_addr);            }            break;        case OLSR_HNA_MSG:            prefix = 1;            printf("\n\t  advertised networks\n\t    ");            while (msg_tlen >= sizeof(struct olsr_hna)) {                if (!TTEST2(*msg_data, sizeof(struct olsr_hna)))	                    goto trunc;                ptr.hna = (struct olsr_hna *)msg_data;                /* print 4 prefixes per line */                printf("%s/%u%s",                       ipaddr_string(ptr.hna->network),                       mask2plen(EXTRACT_32BITS(ptr.hna->mask)),                                              prefix % 4 == 0 ? "\n\t    " : " ");                msg_data += sizeof(struct olsr_hna);                msg_tlen -= sizeof(struct olsr_hna);                prefix ++;            }            break;            /*             * FIXME those are the defined messages that lack a decoder             * you are welcome to contribute code ;-)             */        case OLSR_POWERINFO_MSG:        case OLSR_NAMESERVICE_MSG:        default:	    print_unknown_data(msg_data, "\n\t    ", msg_tlen);            break;        }	        tptr += msg_len;    }    return; trunc:    printf("[|olsr]");}/* * Local Variables: * c-style: whitesmith * c-basic-offset: 4 * End: */