proto_ipv6_mobility_hdr.c

   1 /*
   2  * netsniff-ng - the packet sniffing beast
   3  * Copyright 2012 Markus Amend <markus@netsniff-ng.org>, Deutsche Flugsicherung GmbH
   4  * Subject to the GPL, version 2.
   5  *
   6  * IPv6 Mobility Header described in RFC6275
   7  */
   8
   9 #include <stdio.h>
  10 #include <stdint.h>
  11 #include <netinet/in.h>    /* for ntohs() */
  12 #include <arpa/inet.h>
  13
  14 #include "proto.h"
  15 #include "protos.h"
  16 #include "dissector_eth.h"
  17 #include "built_in.h"
  18 #include "pkt_buff.h"
  19
  20 #define BINDING_REFRESH_REQUEST_MESSAGE 0x00
  21 #define HOME_TEST_INIT_MESSAGE          0x01
  22 #define CARE_OF_TEST_INIT_MESSAGE       0x02
  23 #define HOME_TEST_MESSAGE               0x03
  24 #define CARE_OF_TEST_MESSAGE            0x04
  25 #define BINDING_UPDATE_MESSAGE          0x05
  26 #define BINDING_ACKNOWLEDGEMENT_MESSAGE 0x06
  27 #define BINDING_ERROR_MESSAGE           0x07
  28
  29 struct mobilityhdr {
  30         uint8_t         payload_proto;
  31         uint8_t         hdr_len;
  32         uint8_t         MH_type;
  33         uint8_t         reserved;
  34         uint16_t        chksum;
  35         uint8_t         msgdata[0];
  36 } __packed;
  37
  38 struct bin_refr_req_msg {
  39         uint16_t        reserved;
  40         uint8_t         mobility_opt[0];
  41 } __packed;
  42
  43 /* for 0x01 and 0x02 */
  44 struct tst_init_msg {
  45         uint16_t        reserved;
  46         uint64_t        init_cookie;
  47         uint8_t         mobility_opt[0];
  48 } __packed;
  49
  50 /* for 0x03 and 0x04 */
  51 struct tst_msg {
  52         uint16_t        nonce_index;
  53         uint64_t        init_cookie;
  54         uint64_t        keygen_token;
  55         uint8_t         mobility_opt[0];
  56 } __packed;
  57
  58 struct bind_upd_msg {
  59         uint16_t        sequence;
  60         uint16_t        ahlk_res;
  61         uint16_t        lifetime;
  62         uint8_t         mobility_opt[0];
  63 } __packed;
  64
  65 struct bind_ack_msg {
  66         uint8_t         status;
  67         uint8_t         k_res;
  68         uint16_t        sequence;
  69         uint16_t        lifetime;
  70         uint8_t         mobility_opt[0];
  71 } __packed;
  72
  73 struct bind_err_msg {
  74         uint8_t         status;
  75         uint8_t         res;
  76         uint64_t        home_addr;
  77         uint8_t         mobility_opt[0];
  78 } __packed;
  79
  80
  81 static void dissect_mobility_options(struct pkt_buff *pkt,
  82                                      ssize_t *message_data_len)
  83 {
  84         /* Have to been upgraded.
  85          * http://tools.ietf.org/html/rfc6275#section-6.2.1
  86          */
  87         if (*message_data_len)
  88                 tprintf("MH Option(s) recognized ");
  89
  90         /* If adding dissector reduce message_data_len for each using of
  91          * pkt_pull to the same size.
  92          */
  93 }
  94
  95 static void dissect_mobilityhdr_type_0(struct pkt_buff *pkt,
  96                                        ssize_t *message_data_len)
  97 {
  98         struct bin_refr_req_msg *type_0;
  99
 100         type_0 = (struct bin_refr_req_msg *) pkt_pull(pkt, sizeof(*type_0));
 101         *message_data_len -= sizeof(*type_0);
 102         if (type_0 == NULL || *message_data_len > pkt_len(pkt) ||
 103             *message_data_len < 0)
 104                 return;
 105
 106         dissect_mobility_options(pkt, message_data_len);
 107 }
 108
 109 static void dissect_mobilityhdr_type_1_2(struct pkt_buff *pkt,
 110                                          ssize_t *message_data_len)
 111 {
 112         struct tst_init_msg *type_1_2;
 113
 114         type_1_2 = (struct tst_init_msg *) pkt_pull(pkt, sizeof(*type_1_2));
 115         *message_data_len -= sizeof(*type_1_2);
 116         if (type_1_2 == NULL || *message_data_len > pkt_len(pkt) ||
 117             *message_data_len < 0)
 118                 return;
 119
 120         tprintf("Init Cookie (0x%lx)", ntohll(type_1_2->init_cookie));
 121
 122         dissect_mobility_options(pkt, message_data_len);
 123 }
 124
 125 static void dissect_mobilityhdr_type_3_4(struct pkt_buff *pkt,
 126                                          ssize_t *message_data_len)
 127 {
 128         struct tst_msg *type_3_4;
 129
 130         type_3_4 = (struct tst_msg *) pkt_pull(pkt, sizeof(*type_3_4));
 131         *message_data_len -= sizeof(*type_3_4);
 132         if (type_3_4 == NULL || *message_data_len > pkt_len(pkt) ||
 133             *message_data_len < 0)
 134                 return;
 135
 136         tprintf("HN Index (%u) ", ntohs(type_3_4->nonce_index));
 137         tprintf("Init Cookie (0x%lx) ", ntohll(type_3_4->init_cookie));
 138         tprintf("Keygen Token (0x%lx)", ntohll(type_3_4->keygen_token));
 139
 140         dissect_mobility_options(pkt, message_data_len);
 141 }
 142
 143 static void dissect_mobilityhdr_type_5(struct pkt_buff *pkt,
 144                                        ssize_t *message_data_len)
 145 {
 146         struct bind_upd_msg *type_5;
 147
 148         type_5 = (struct bind_upd_msg *) pkt_pull(pkt, sizeof(*type_5));
 149         *message_data_len -= sizeof(*type_5);
 150         if (type_5 == NULL || *message_data_len > pkt_len(pkt) ||
 151             *message_data_len < 0)
 152                 return;
 153
 154         tprintf("Sequence (0x%x) ", ntohs(type_5->sequence));
 155         tprintf("A|H|L|K (0x%x) ", ntohs(type_5->ahlk_res) >> 12);
 156         tprintf("Lifetime (%us)", ntohs(type_5->lifetime) * 4);
 157
 158         dissect_mobility_options(pkt, message_data_len);
 159 }
 160
 161 static void dissect_mobilityhdr_type_6(struct pkt_buff *pkt,
 162                                        ssize_t *message_data_len)
 163 {
 164         struct bind_ack_msg *type_6;
 165
 166         type_6 = (struct bind_ack_msg *) pkt_pull(pkt, sizeof(*type_6));
 167         *message_data_len -= sizeof(*type_6);
 168         if (type_6 == NULL || *message_data_len > pkt_len(pkt) ||
 169             *message_data_len < 0)
 170                 return;
 171
 172         tprintf("Status (0x%x) ", type_6->status);
 173         tprintf("K (%u) ", type_6->k_res >> 7);
 174         tprintf("Sequence (0x%x)", ntohs(type_6->sequence));
 175         tprintf("Lifetime (%us)", ntohs(type_6->lifetime) * 4);
 176
 177         dissect_mobility_options(pkt, message_data_len);
 178 }
 179
 180 static void dissect_mobilityhdr_type_7(struct pkt_buff *pkt,
 181                                        ssize_t *message_data_len)
 182 {
 183         char address[INET6_ADDRSTRLEN];
 184         uint64_t addr;
 185         struct bind_err_msg *type_7;
 186
 187         type_7 = (struct bind_err_msg *) pkt_pull(pkt, sizeof(*type_7));
 188         *message_data_len -= sizeof(*type_7);
 189         addr = ntohll(type_7->home_addr);
 190         if (type_7 == NULL || *message_data_len > pkt_len(pkt) ||
 191             *message_data_len < 0)
 192                 return;
 193
 194         tprintf("Status (0x%x) ", type_7->status);
 195         tprintf("Home Addr (%s)",
 196                 inet_ntop(AF_INET6, &addr, address,
 197                 sizeof(address)));
 198
 199         dissect_mobility_options(pkt, message_data_len);
 200 }
 201
 202 static void get_mh_type(struct pkt_buff *pkt, ssize_t *message_data_len,
 203                         uint8_t *mh_type)
 204 {
 205         switch (*mh_type) {
 206         case BINDING_REFRESH_REQUEST_MESSAGE:
 207                 tprintf("Binding Refresh Request Message ");
 208                 dissect_mobilityhdr_type_0(pkt, message_data_len);
 209                 break;
 210         case HOME_TEST_INIT_MESSAGE:
 211                 tprintf("Home Test Init Message ");
 212                 dissect_mobilityhdr_type_1_2(pkt, message_data_len);
 213                 break;
 214         case CARE_OF_TEST_INIT_MESSAGE:
 215                 tprintf("Care-of Test Init Message ");
 216                 dissect_mobilityhdr_type_1_2(pkt, message_data_len);
 217                 break;
 218         case HOME_TEST_MESSAGE:
 219                 tprintf("Binding Refresh Request Message ");
 220                 dissect_mobilityhdr_type_3_4(pkt, message_data_len);
 221                 break;
 222         case CARE_OF_TEST_MESSAGE:
 223                 tprintf("Binding Refresh Request Message ");
 224                 dissect_mobilityhdr_type_3_4(pkt, message_data_len);
 225                 break;
 226         case BINDING_UPDATE_MESSAGE:
 227                 tprintf("Binding Refresh Request Message ");
 228                 dissect_mobilityhdr_type_5(pkt, message_data_len);
 229                 break;
 230         case BINDING_ACKNOWLEDGEMENT_MESSAGE:
 231                 tprintf("Binding Refresh Request Message ");
 232                 dissect_mobilityhdr_type_6(pkt, message_data_len);
 233                 break;
 234         case BINDING_ERROR_MESSAGE:
 235                 tprintf("Binding Refresh Request Message ");
 236                 dissect_mobilityhdr_type_7(pkt, message_data_len);
 237                 break;
 238         default:
 239                 tprintf("Type %u is unknown. Error", *mh_type);
 240         }
 241 }
 242
 243 static void mobility(struct pkt_buff *pkt)
 244 {
 245         uint16_t hdr_ext_len;
 246         ssize_t message_data_len;
 247         struct mobilityhdr *mobility;
 248
 249         mobility = (struct mobilityhdr *) pkt_pull(pkt, sizeof(*mobility));
 250         if (mobility == NULL)
 251                 return;
 252
 253         /* Total Header Length in Bytes */
 254         hdr_ext_len = (mobility->hdr_len + 1) * 8;
 255         /* Total Message Data length in Bytes*/
 256         message_data_len = (hdr_ext_len - sizeof(*mobility));
 257
 258         tprintf("\t [ Mobility ");
 259         tprintf("NextHdr (%u), ", mobility->payload_proto);
 260         if (message_data_len > pkt_len(pkt) || message_data_len < 0){
 261                 tprintf("HdrExtLen (%u, %u Bytes %s), ", mobility->hdr_len,
 262                                 hdr_ext_len, colorize_start_full(black, red)
 263                                 "invalid" colorize_end());
 264                 return;
 265         }
 266         tprintf("HdrExtLen (%u, %u Bytes), ", mobility->hdr_len,
 267                 hdr_ext_len);
 268         tprintf("MH Type (%u), ", mobility->MH_type);
 269         tprintf("Res (0x%x), ", mobility->reserved);
 270         tprintf("Chks (0x%x), ", ntohs(mobility->chksum));
 271         tprintf("MH Data ");
 272
 273         get_mh_type(pkt, &message_data_len, &mobility->MH_type);
 274
 275         tprintf(" ]\n");
 276
 277         if (message_data_len > pkt_len(pkt) || message_data_len < 0)
 278                 return;
 279
 280         pkt_pull(pkt, message_data_len);
 281         pkt_set_proto(pkt, &eth_lay3, mobility->payload_proto);
 282 }
 283
 284 static void mobility_less(struct pkt_buff *pkt)
 285 {
 286         uint16_t hdr_ext_len;
 287         ssize_t message_data_len;
 288         struct mobilityhdr *mobility;
 289
 290         mobility = (struct mobilityhdr *) pkt_pull(pkt, sizeof(*mobility));
 291         if (mobility == NULL)
 292                 return;
 293
 294         /* Total Header Length in Bytes */
 295         hdr_ext_len = (mobility->hdr_len + 1) * 8;
 296         /* Total Message Data length in Bytes*/
 297         message_data_len = (hdr_ext_len - sizeof(*mobility));
 298         if (message_data_len > pkt_len(pkt) || message_data_len < 0)
 299                 return;
 300
 301         tprintf(" Mobility Type (%u), ", mobility->MH_type);
 302
 303         pkt_pull(pkt, message_data_len);
 304         pkt_set_proto(pkt, &eth_lay3, mobility->payload_proto);
 305 }
 306
 307 struct protocol ipv6_mobility_ops = {
 308         .key = 0x87,
 309         .print_full = mobility,
 310         .print_less = mobility_less,
 311 };