packet-radius.c

   1 /* packet-radius.c
   2  * Routines for RADIUS packet disassembly
   3  *
   4  * $Id: packet-radius.c,v 1.4 1999/10/12 06:20:15 gram Exp $
   5  *
   6  * Ethereal - Network traffic analyzer
   7  * By Johan Feyaerts
   8  * Copyright 1999 Johan Feyaerts
   9  * This program is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU General Public License
  11  * as published by the Free Software Foundation; either version 2
  12  * of the License, or (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  22  */
  23 int proto_radius = -1;
  24 int hf_radius_length = -1;
  25 int hf_radius_code = -1;
  26 int hf_radius_id =-1;
  27
  28 #ifdef HAVE_CONFIG_H
  29 #include "config.h"
  30 #endif
  31
  32 #ifdef HAVE_SYS_TYPES_H
  33 # include <sys/types.h>
  34 #endif
  35
  36 #ifdef HAVE_NETINET_IN_H
  37 #include <netinet/in.h>
  38 #endif
  39
  40 #include <stdio.h>
  41 #include <stdlib.h>
  42 #include <ctype.h>
  43 #include <glib.h>
  44 #include "packet.h"
  45 #include "resolv.h"
  46
  47 typedef struct _e_radiushdr {
  48         guint8 rh_code;
  49         guint8 rh_ident;
  50         guint16 rh_pktlength;
  51 } e_radiushdr;
  52
  53 typedef struct _e_avphdr {
  54         guint8 avp_type;
  55         guint8 avp_length;
  56 } e_avphdr;
  57
  58 typedef struct _value_value_pair {
  59         guint16 val1;
  60         guint16 val2;
  61 } value_value_pair;
  62
  63 #define RADIUS_ACCESS_REQUEST 1
  64 #define RADIUS_ACCESS_ACCEPT  2
  65 #define RADIUS_ACCESS_REJECT  3
  66 #define RADIUS_ACCOUNTING_REQUEST 4
  67 #define RADIUS_ACCOUNTING_RESPONSE 5
  68 #define RADIUS_ACCESS_CHALLENGE 11
  69 #define RADIUS_STATUS_SERVER 12
  70 #define RADIUS_STATUS_CLIENT 13
  71 #define RADIUS_RESERVED 255
  72
  73 #define RD_TP_USER_NAME 1
  74 #define RD_TP_USER_PASSWORD 2
  75 #define RD_TP_CHAP_PASSWORD 3
  76 #define RD_TP_NAS_IP_ADDRESS 4
  77 #define RD_TP_NAS_PORT 5
  78 #define RD_TP_SERVICE_TYPE 6
  79 #define RD_TP_FRAMED_PROTOCOL 7
  80 #define RD_TP_FRAMED_IP_ADDRESS 8
  81 #define RD_TP_FRAMED_IP_NETMASK 9
  82 #define RD_TP_FRAMED_ROUTING 10
  83 #define RD_TP_FILTER_ID 11
  84 #define RD_TP_FRAMED_MTU 12
  85 #define RD_TP_FRAMED_COMPRESSION 13
  86 #define RD_TP_LOGIN_IP_HOST 14
  87 #define RD_TP_LOGIN_SERVICE 15
  88 #define RD_TP_LOGIN_TCP_PORT 16
  89 #define RD_TP_UNASSIGNED 17
  90 #define RD_TP_REPLY_MESSAGE 18
  91 #define RD_TP_CALLBACK_NUMBER 19
  92 #define RD_TP_CALLBACK_ID 20
  93 #define RD_TP_UNASSIGNED2 21
  94 #define RD_TP_FRAMED_ROUTE 22
  95 #define RD_TP_FRAMED_IPX_NETWORK 23
  96 #define RD_TP_STATE 24
  97 #define RD_TP_CLASS 25
  98 #define RD_TP_VENDOR_SPECIFIC 26
  99 #define RD_TP_SESSION_TIMEOUT 27
 100 #define RD_TP_IDLE_TIMEOUT 28
 101 #define RD_TP_TERMINATING_ACTION 29
 102 #define RD_TP_CALLED_STATION_ID 30
 103 #define RD_TP_CALLING_STATION_ID 31
 104 #define RD_TP_NAS_IDENTIFIER 32
 105 #define RD_TP_PROXY_STATE 33
 106 #define RD_TP_LOGIN_LAT_SERVICE 34
 107 #define RD_TP_LOGIN_LAT_NODE 35
 108 #define RD_TP_LOGIN_LAT_GROUP 36
 109 #define RD_TP_FRAMED_APPLETALK_LINK 37
 110 #define RD_TP_FRAMED_APPLETALK_NETWORK 38
 111 #define RD_TP_FRAMED_APPLETALK_ZONE 39
 112 #define RD_TP_ACCT_STATUS_TYPE 40
 113 #define RD_TP_ACCT_DELAY_TIME 41
 114 #define RD_TP_ACCT_INPUT_OCTETS 42
 115 #define RD_TP_ACCT_OUTPUT_OCTETS 43
 116 #define RD_TP_ACCT_SESSION_ID 44
 117 #define RD_TP_ACCT_AUTHENTIC 45
 118 #define RD_TP_ACCT_SESSION_TIME 46
 119 #define RD_TP_ACCT_INPUT_PACKETS 47
 120 #define RD_TP_ACCT_OUTPUT_PACKETS 48
 121 #define RD_TP_ACCT_TERMINATE_CAUSE 49
 122 #define RD_TP_ACCT_MULTI_SESSION_ID 50
 123 #define RD_TP_ACCT_LINK_COUNT 51
 124 #define RD_TP_CHAP_CHALLENGE 60
 125 #define RD_TP_NAS_PORT_TYPE 61
 126 #define RD_TP_PORT_LIMIT 62
 127 #define RD_TP_LOGIN_LAT_PORT 63
 128
 129
 130 #define AUTHENTICATOR_LENGTH 16
 131 #define RD_HDR_LENGTH 4
 132
 133
 134 #define RADIUS_STRING 1
 135 #define RADIUS_BINSTRING 2
 136 #define RADIUS_INTEGER4 3
 137 #define RADIUS_IP_ADDRESS 4
 138 #define RADIUS_SERVICE_TYPE 5
 139 #define RADIUS_FRAMED_PROTOCOL 6
 140 #define RADIUS_FRAMED_ROUTING 7
 141 #define RADIUS_FRAMED_COMPRESSION 8
 142 #define RADIUS_LOGIN_SERVICE 9
 143 #define RADIUS_UNKNOWN 10
 144 #define RADIUS_IPX_ADDRESS 11
 145 #define RADIUS_TERMINATING_ACTION 12
 146 #define RADIUS_ACCOUNTING_STATUS_TYPE 13
 147 #define RADIUS_ACCT_AUTHENTIC 14
 148 #define RADIUS_ACCT_TERMINATE_CAUSE 15
 149 #define RADIUS_NAS_PORT_TYPE 16
 150
 151 static value_string radius_vals[] = {
 152  {RADIUS_ACCESS_REQUEST, "Access Request"},
 153  {RADIUS_ACCESS_ACCEPT, "Access Accept"},
 154  {RADIUS_ACCESS_REJECT, "Access Reject"},
 155  {RADIUS_ACCOUNTING_REQUEST, "Accounting Request"},
 156  {RADIUS_ACCOUNTING_RESPONSE, "Accounting Response"},
 157  {RADIUS_ACCESS_CHALLENGE, "Accounting challenge"},
 158  {RADIUS_STATUS_SERVER, "StatusServer"},
 159  {RADIUS_STATUS_CLIENT, "StatusClient"},
 160  {RADIUS_RESERVED, "Reserved"},
 161 {0, NULL}};
 162
 163 static value_string radius_service_type_vals[]=
 164 {{1, "Login"},
 165 {2, "Framed"},
 166 {3, "Callback Login"},
 167 {4, "Callback Framed"},
 168 {5, "Outbound"},
 169 {6, "Administrative"},
 170 {7, "NAS Prompt"},
 171 {8, "Authenticate Only"},
 172 {9, "Callback NAS Prompt"},
 173 {10, "Call Check"},
 174 {0,NULL}};
 175
 176 static value_string radius_framed_protocol_vals[]=
 177 {{1, "PPP"},
 178 {2, "SLIP"},
 179 {3, "Appletalk Remote Access Protocol (ARAP)"},
 180 {4, "Gandalf proprietary Singlelink/Multilink Protocol"},
 181 {5, "Xylogics proprietary IPX/SLIP"},
 182 {6, "X.75 Synchronous"},
 183 {0,NULL}};
 184
 185 static value_string radius_framed_routing_vals[]=
 186 {{1, "Send Routing Packets"},
 187 {2, "Listen for routing packets"},
 188 {3, "Send and Listen"},
 189 {0,"None"},
 190 {0,NULL}};
 191
 192 static value_string radius_framed_compression_vals[]=
 193 {{1, "VJ TCP/IP Header Compression"},
 194 {2, "IPX Header Compression"},
 195 {3, "Stac-LZS compression"},
 196 {0, "None"},
 197 {0,NULL}};
 198
 199 static value_string radius_login_service_vals[]=
 200 {{1, "Rlogin"},
 201 {2, "TCP Clear"},
 202 {3, "Portmaster"},
 203 {4, "LAT"},
 204 {5, "X.25-PAD"},
 205 {6, "X.25T3POS"},
 206 {8, "TCP Clear Quit"},
 207 {0, "Telnet"},
 208 {0,NULL}};
 209
 210 static value_string radius_terminating_action_vals[]=
 211 {{1, "RADIUS-Request"},
 212 {0, "Default"},
 213 {0,NULL}};
 214
 215 static value_string radius_accounting_status_type_vals[]=
 216 {{1, "Start"},
 217 {2, "Stop"},
 218 {7,"Accounting-On"},
 219 {8,"Accounting-Off"},
 220 {0,NULL}};
 221
 222 static value_string radius_accounting_authentication_vals[]=
 223 {{1, "Radius"},
 224 {2, "Local"},
 225 {7,"Remote"},
 226 {0,NULL}};
 227
 228 static value_string radius_acct_terminate_cause_vals[]=
 229 {{1, "User Request"},
 230 {2, "Lost Carrier"},
 231 {3,"Lost Service"},
 232 {4, "Idle Timeout"},
 233 {5,"Session Timeout"},
 234 {6, "Admin Reset"},
 235 {7, "Admin Reboot"},
 236 {8, "Port Error"},
 237 {9, "NAS Error"},
 238 {10, "NAS Request"},
 239 {11,"NAS Reboot"},
 240 {12, "Port Unneeded"},
 241 {13, "Port Preempted"},
 242 {14,"Port Suspended"},
 243 {15,"Service Unavailable"},
 244 {16,"Callback"},
 245 {17, "User Error"},
 246 {18,"Host Request"},
 247 {0,NULL}};
 248
 249 static value_string radius_nas_port_type_vals[]=
 250 {{0, "Async"},
 251 {1, "Sync"},
 252 {2,"ISDN Sync"},
 253 {3, "ISDN Async V.120"},
 254 {4,"ISDN Async V.110"},
 255 {5, "Virtual"},
 256 {6, "PIAFS"},
 257 {7, "HDLC Clear Channel"},
 258 {8, "X.25"},
 259 {9,"X.75"},
 260 {10, "G.3 Fax"},
 261 {11,"SDSL"},
 262 {12, "ADSL-CAP"},
 263 {13, "ADSL-DMT"},
 264 {14,"IDSL - ISDN"},
 265 {0,NULL}};
 266
 267 static value_value_pair radius_printinfo[] = {
 268 { RD_TP_USER_NAME, RADIUS_STRING },
 269 { RD_TP_USER_PASSWORD,RADIUS_BINSTRING },
 270 { RD_TP_CHAP_PASSWORD, RADIUS_BINSTRING },
 271 { RD_TP_NAS_IP_ADDRESS, RADIUS_IP_ADDRESS },
 272 { RD_TP_NAS_PORT, RADIUS_INTEGER4},
 273 { RD_TP_SERVICE_TYPE, RADIUS_SERVICE_TYPE},
 274 { RD_TP_FRAMED_PROTOCOL, RADIUS_FRAMED_PROTOCOL},
 275 { RD_TP_FRAMED_IP_ADDRESS, RADIUS_IP_ADDRESS},
 276 { RD_TP_FRAMED_IP_NETMASK, RADIUS_IP_ADDRESS},
 277 { RD_TP_FRAMED_ROUTING, RADIUS_FRAMED_ROUTING},
 278 { RD_TP_FILTER_ID, RADIUS_STRING},
 279 { RD_TP_FRAMED_MTU, RADIUS_INTEGER4},
 280 { RD_TP_FRAMED_COMPRESSION, RADIUS_FRAMED_COMPRESSION},
 281 { RD_TP_LOGIN_IP_HOST, RADIUS_IP_ADDRESS},
 282 { RD_TP_LOGIN_SERVICE, RADIUS_LOGIN_SERVICE},
 283 { RD_TP_LOGIN_TCP_PORT, RADIUS_INTEGER4},
 284 { RD_TP_UNASSIGNED, RADIUS_UNKNOWN},
 285 { RD_TP_REPLY_MESSAGE, RADIUS_STRING},
 286 { RD_TP_CALLBACK_NUMBER, RADIUS_BINSTRING},
 287 { RD_TP_CALLBACK_ID, RADIUS_BINSTRING},
 288 { RD_TP_UNASSIGNED2, RADIUS_UNKNOWN},
 289 { RD_TP_FRAMED_ROUTE, RADIUS_STRING},
 290 { RD_TP_FRAMED_IPX_NETWORK, RADIUS_IPX_ADDRESS},
 291 { RD_TP_STATE, RADIUS_BINSTRING},
 292 { RD_TP_CLASS, RADIUS_BINSTRING},
 293 { RD_TP_VENDOR_SPECIFIC, RADIUS_BINSTRING},
 294 { RD_TP_SESSION_TIMEOUT, RADIUS_INTEGER4},
 295 { RD_TP_IDLE_TIMEOUT, RADIUS_INTEGER4},
 296 { RD_TP_TERMINATING_ACTION, RADIUS_TERMINATING_ACTION},
 297 { RD_TP_CALLED_STATION_ID, RADIUS_BINSTRING},
 298 { RD_TP_CALLING_STATION_ID, RADIUS_BINSTRING},
 299 { RD_TP_NAS_IDENTIFIER, RADIUS_BINSTRING},
 300 { RD_TP_PROXY_STATE, RADIUS_BINSTRING},
 301 { RD_TP_LOGIN_LAT_SERVICE, RADIUS_BINSTRING},
 302 { RD_TP_LOGIN_LAT_NODE, RADIUS_BINSTRING},
 303 { RD_TP_LOGIN_LAT_GROUP, RADIUS_BINSTRING},
 304 { RD_TP_FRAMED_APPLETALK_LINK, RADIUS_INTEGER4},
 305 { RD_TP_FRAMED_APPLETALK_NETWORK, RADIUS_INTEGER4},
 306 { RD_TP_FRAMED_APPLETALK_ZONE, RADIUS_BINSTRING},
 307 { RD_TP_ACCT_STATUS_TYPE, RADIUS_ACCOUNTING_STATUS_TYPE},
 308 { RD_TP_ACCT_DELAY_TIME, RADIUS_INTEGER4},
 309 { RD_TP_ACCT_INPUT_OCTETS, RADIUS_INTEGER4},
 310 { RD_TP_ACCT_OUTPUT_OCTETS, RADIUS_INTEGER4},
 311 { RD_TP_ACCT_SESSION_ID, RADIUS_STRING},
 312 { RD_TP_ACCT_AUTHENTIC, RADIUS_ACCT_AUTHENTIC},
 313 { RD_TP_ACCT_SESSION_TIME, RADIUS_INTEGER4},
 314 { RD_TP_ACCT_INPUT_PACKETS, RADIUS_INTEGER4},
 315 { RD_TP_ACCT_OUTPUT_PACKETS, RADIUS_INTEGER4},
 316 { RD_TP_ACCT_TERMINATE_CAUSE, RADIUS_ACCT_TERMINATE_CAUSE},
 317 { RD_TP_ACCT_MULTI_SESSION_ID, RADIUS_STRING},
 318 { RD_TP_ACCT_LINK_COUNT, RADIUS_INTEGER4},
 319 { RD_TP_CHAP_CHALLENGE, RADIUS_BINSTRING},
 320 { RD_TP_NAS_PORT_TYPE, RADIUS_NAS_PORT_TYPE},
 321 { RD_TP_PORT_LIMIT, RADIUS_INTEGER4},
 322 { RD_TP_LOGIN_LAT_PORT, RADIUS_BINSTRING},
 323 {0,0},
 324 };
 325
 326 static value_string radius_attrib_type_vals[] = {
 327 { RD_TP_USER_NAME, "User Name"},
 328 { RD_TP_USER_PASSWORD, "User Password"},
 329 { RD_TP_CHAP_PASSWORD, "Chap Password"},
 330 { RD_TP_NAS_IP_ADDRESS, "NAS IP Address"},
 331 { RD_TP_NAS_PORT, "NAS Port"},
 332 { RD_TP_SERVICE_TYPE, "Service Type"},
 333 { RD_TP_FRAMED_PROTOCOL, "Framed Protocol"},
 334 { RD_TP_FRAMED_IP_ADDRESS, "Framed IP Address"},
 335 { RD_TP_FRAMED_IP_NETMASK, "Framed IP Netmask"},
 336 { RD_TP_FRAMED_ROUTING, "Framed Routing"},
 337 { RD_TP_FILTER_ID, "Filter Id"},
 338 { RD_TP_FRAMED_MTU, "Framed MTU"},
 339 { RD_TP_FRAMED_COMPRESSION, "Framed Compression"},
 340 { RD_TP_LOGIN_IP_HOST, "Login IP Host"},
 341 { RD_TP_LOGIN_SERVICE, "Login Service"},
 342 { RD_TP_LOGIN_TCP_PORT, "Login TCP Port"},
 343 { RD_TP_UNASSIGNED, "Unassigned"},
 344 { RD_TP_REPLY_MESSAGE, "Reply Message"},
 345 { RD_TP_CALLBACK_NUMBER, "Callback Number"},
 346 { RD_TP_CALLBACK_ID, "Callback Id"},
 347 { RD_TP_UNASSIGNED2, "Unassigned"},
 348 { RD_TP_FRAMED_ROUTE, "Framed Route"},
 349 { RD_TP_FRAMED_IPX_NETWORK, "Framed IPX network"},
 350 { RD_TP_STATE, "State"},
 351 { RD_TP_CLASS, "Class"},
 352 { RD_TP_VENDOR_SPECIFIC, "Vendor Specific" },
 353 { RD_TP_SESSION_TIMEOUT, "Session Timeout"},
 354 { RD_TP_IDLE_TIMEOUT, "Idle Timeout"},
 355 { RD_TP_TERMINATING_ACTION, "Terminating Action"},
 356 { RD_TP_CALLED_STATION_ID, "Called Station Id"},
 357 { RD_TP_CALLING_STATION_ID, "Calling Station Id"},
 358 { RD_TP_NAS_IDENTIFIER, "NAS identifier"},
 359 { RD_TP_PROXY_STATE, "Proxy State"},
 360 { RD_TP_LOGIN_LAT_SERVICE, "Login LAT Service"},
 361 { RD_TP_LOGIN_LAT_NODE, "Login LAT Node"},
 362 { RD_TP_LOGIN_LAT_GROUP, "Login LAT Group"},
 363 { RD_TP_FRAMED_APPLETALK_LINK, "Framed Appletalk Link"},
 364 { RD_TP_FRAMED_APPLETALK_NETWORK, "Framed Appletalk Network"},
 365 { RD_TP_FRAMED_APPLETALK_ZONE, "Framed Appletalk Zone"},
 366 { RD_TP_ACCT_STATUS_TYPE, "Acct Status Type"},
 367 { RD_TP_ACCT_DELAY_TIME, "Acct Delay Time"},
 368 { RD_TP_ACCT_INPUT_OCTETS, "Acct Input Octets"},
 369 { RD_TP_ACCT_OUTPUT_OCTETS, "Acct Output Octets"},
 370 { RD_TP_ACCT_SESSION_ID, "Acct Session Id"},
 371 { RD_TP_ACCT_AUTHENTIC, "Acct Authentic"},
 372 { RD_TP_ACCT_SESSION_TIME, "Acct Session Time"},
 373 { RD_TP_ACCT_INPUT_PACKETS, "Acct Input Packets"},
 374 { RD_TP_ACCT_OUTPUT_PACKETS, "Acct Output Packets"},
 375 { RD_TP_ACCT_TERMINATE_CAUSE, "Acct Terminate Cause"},
 376 { RD_TP_ACCT_MULTI_SESSION_ID, "Acct Multi Session Id"},
 377 { RD_TP_ACCT_LINK_COUNT, "Acct Link Count"},
 378 { RD_TP_CHAP_CHALLENGE, "Chap Challenge"},
 379 { RD_TP_NAS_PORT_TYPE, "NAS Port Type"},
 380 { RD_TP_PORT_LIMIT, "Port Limit"},
 381 { RD_TP_LOGIN_LAT_PORT, "Login LAT Port"},
 382 {0,NULL},
 383 };
 384
 385 guint32 match_numval(guint32 val, const value_value_pair *vs)
 386 {
 387   guint32 i = 0;
 388
 389   while (vs[i].val1) {
 390     if (vs[i].val1 == val)
 391       return(vs[i].val2);
 392     i++;
 393   }
 394
 395   return(0);
 396 }
 397
 398 static gchar textbuffer[2000];
 399
 400 gchar *rdconvertbufftostr(guint8 length,const guint8 *pd)
 401 {
 402 /*converts the raw buffer into printable text */
 403 guint32 i;
 404 guint32 totlen=0;
 405
 406         textbuffer[0]='"';
 407         textbuffer[1]=0;
 408         totlen=1;
 409         for (i=0; i < (guint32)length; i++)
 410         {
 411                 if( isalnum((int)pd[i])||ispunct((int)pd[i])
 412                                 ||((int)pd[i]==' '))            {
 413                         textbuffer[totlen]=(gchar)pd[i];
 414                         totlen++;
 415                 }
 416                 else
 417                 {
 418                         sprintf(&(textbuffer[totlen]), "\\%03u", pd[i]);
 419                         totlen=totlen+strlen(&(textbuffer[totlen]));
 420                 }
 421         }
 422         textbuffer[totlen]='"';
 423         textbuffer[totlen+1]=0;
 424         return textbuffer;
 425 }
 426
 427 gchar *rd_value_to_str(e_avphdr *avph,const u_char *pd, int offset)
 428 {
 429 int print_type;
 430 gchar *result;
 431 guint32 intval;
 432 value_string *valstrarr;
 433 /* prints the values of the attribute value pairs into a text buffer */
 434   print_type=match_numval(avph->avp_type,radius_printinfo);
 435   intval=pntohl(&(pd[offset+2]));
 436   switch(print_type)
 437   {
 438         case( RADIUS_STRING ):
 439         case( RADIUS_BINSTRING ):
 440                 result=rdconvertbufftostr(avph->avp_length-2,&(pd[offset+2]));
 441                 break;
 442         case( RADIUS_INTEGER4 ):
 443                 sprintf(textbuffer,"%u", intval);
 444                 result=textbuffer;
 445                 break;
 446         case( RADIUS_IP_ADDRESS ):
 447                 sprintf(textbuffer,"%u.%u.%u.%u",(guint8)pd[offset+2],
 448                         (guint8)pd[offset+3],(guint8)pd[offset+4],
 449                         (guint8)pd[offset+5]);
 450                 result=textbuffer;
 451                 break;
 452         case( RADIUS_SERVICE_TYPE ):
 453                 valstrarr=radius_service_type_vals;
 454                 result=match_strval(intval,valstrarr);
 455                 break;
 456         case( RADIUS_FRAMED_PROTOCOL ):
 457                 valstrarr= radius_framed_protocol_vals;
 458                 result=match_strval(intval,valstrarr);
 459                 break;
 460         case( RADIUS_FRAMED_ROUTING ):
 461                 valstrarr=radius_framed_routing_vals;
 462                 result=match_strval(intval,valstrarr);
 463                 break;
 464         case( RADIUS_FRAMED_COMPRESSION ):
 465                 valstrarr=radius_framed_compression_vals;
 466                 result=match_strval(intval,valstrarr);
 467                 break;
 468         case( RADIUS_LOGIN_SERVICE ):
 469                 valstrarr=radius_login_service_vals;
 470                 result=match_strval(intval,valstrarr);
 471                 break;
 472         case( RADIUS_IPX_ADDRESS ):
 473                 sprintf(textbuffer,"%u:%u:%u:%u",(guint8)pd[offset+2],
 474                         (guint8)pd[offset+3],(guint8)pd[offset+4],
 475                         (guint8)pd[offset+5]);
 476                 result=textbuffer;
 477         case( RADIUS_TERMINATING_ACTION ):
 478                 valstrarr=radius_terminating_action_vals;
 479                 result=match_strval(intval,valstrarr);
 480                 break;
 481         case( RADIUS_ACCOUNTING_STATUS_TYPE ):
 482                 valstrarr=radius_accounting_status_type_vals;
 483                 result=match_strval(intval,valstrarr);
 484                 break;
 485         case( RADIUS_ACCT_AUTHENTIC ):
 486                 valstrarr=radius_accounting_authentication_vals;
 487                 result=match_strval(intval,valstrarr);
 488                 break;
 489         case( RADIUS_ACCT_TERMINATE_CAUSE ):
 490                 valstrarr=radius_acct_terminate_cause_vals;
 491                 result=match_strval(intval,valstrarr);
 492                 break;
 493         case( RADIUS_NAS_PORT_TYPE ):
 494                 valstrarr=radius_nas_port_type_vals;
 495                 result=match_strval(intval,valstrarr);
 496                 break;
 497         case( RADIUS_UNKNOWN ):
 498         default:
 499                 result="Unknown Value Type";
 500                 break;
 501   }
 502   if (result == NULL) result="Unknown Value";
 503   return result;
 504 }
 505
 506
 507 void dissect_attribute_value_pairs(const u_char *pd, int offset, frame_data
 508 *fd, proto_tree *tree, int avplength)
 509 {
 510 /* adds the attribute value pairs to the tree */
 511   e_avphdr avph;
 512   gchar *avptpstrval;
 513   gchar *valstr;
 514   if (avplength==0)
 515   {
 516         proto_tree_add_text(tree,offset,0,"No Attribute Value Pairs Found");
 517         return;
 518   }
 519
 520   while (avplength > 0 )
 521   {
 522
 523      memcpy(&avph,&pd[offset],sizeof(e_avphdr));
 524      avplength=avplength-avph.avp_length;
 525      avptpstrval=match_strval(avph.avp_type, radius_attrib_type_vals);
 526      if (avptpstrval == NULL) avptpstrval="Unknown Type";
 527      valstr=rd_value_to_str(&avph, pd, offset);
 528      proto_tree_add_text(tree,offset,avph.avp_length,
 529         "t:%s(%d) l:%d, value:%s",
 530         avptpstrval,avph.avp_type,avph.avp_length,valstr);
 531      offset=offset+avph.avp_length;
 532   }
 533 }
 534
 535 void dissect_radius(const u_char *pd, int offset, frame_data *fd,
 536 proto_tree
 537 *tree)
 538 {
 539   proto_tree *radius_tree,*avptree;
 540   proto_item *ti,*avptf;
 541   int rhlength;
 542   int rhcode;
 543   int rhident;
 544   int avplength,hdrlength, offsetavp;
 545   e_radiushdr rh;
 546
 547   gchar *codestrval;
 548
 549   memcpy(&rh,&pd[offset],sizeof(e_radiushdr));
 550
 551
 552   rhcode= (int)rh.rh_code;
 553   rhident= (int)rh.rh_ident;
 554   rhlength= (int)ntohs(rh.rh_pktlength);
 555   codestrval=  match_strval(rhcode,radius_vals);
 556   if (codestrval==NULL)
 557   {
 558         codestrval="Unknown Packet";
 559   }
 560   if (check_col(fd, COL_PROTOCOL))
 561         col_add_str(fd, COL_PROTOCOL, "RADIUS");
 562   if (check_col(fd, COL_INFO))
 563   {
 564         sprintf(textbuffer,"%s(%d) (id=%d, l=%d)",
 565                 codestrval, rhcode, rhident, rhlength);
 566         col_add_fstr(fd,COL_INFO,textbuffer);
 567   }
 568
 569   if (tree)
 570   {
 571
 572         ti = proto_tree_add_item(tree,proto_radius, offset, rhlength,
 573                         NULL);
 574
 575         radius_tree = proto_item_add_subtree(ti, ETT_RADIUS);
 576
 577         proto_tree_add_item_format(radius_tree,hf_radius_code, offset,      1,
 578                 rh.rh_code, "Packet code:0x%01x (%s)",rhcode, codestrval);
 579         proto_tree_add_item_format(radius_tree,hf_radius_id, offset+1, 1,
 580                 rh.rh_ident, "Packet identifier: 0x%01x (%d)",
 581                         rhident,rhident);
 582
 583         proto_tree_add_item_format(radius_tree, hf_radius_length,
 584                         offset+2, 2,
 585                  (guint16)rhlength,
 586                 "Packet length: 0x%02x(%d)",rhlength,rhlength);
 587          proto_tree_add_text(radius_tree, offset+4,
 588                         AUTHENTICATOR_LENGTH,
 589                          "Authenticator");
 590
 591         hdrlength=RD_HDR_LENGTH+AUTHENTICATOR_LENGTH;
 592         avplength= rhlength -hdrlength;
 593
 594         offsetavp=offset+hdrlength;
 595
 596
 597         /* list the attribute value pairs */
 598
 599         avptf = proto_tree_add_text(radius_tree
 600                         ,offset+hdrlength,avplength,
 601                         "Attribute value pairs");
 602         avptree = proto_item_add_subtree(avptf, ETT_RADIUS_AVP);
 603
 604         if (avptree !=NULL)
 605         {
 606                 dissect_attribute_value_pairs( pd,
 607                                 offsetavp,fd,avptree,avplength);
 608         }
 609   }
 610 }
 611 /* registration with the filtering engine */
 612 void
 613 proto_register_radius(void)
 614 {
 615         static hf_register_info hf[] = {
 616                 { &hf_radius_code,
 617                 { "Code","radius.code", FT_UINT8, BASE_DEC, NULL, 0x0,
 618                         "" }},
 619
 620                 { &hf_radius_id,
 621                 { "Identifier", "radius.id", FT_UINT8, BASE_DEC, NULL, 0x0,
 622                         "" }},
 623
 624                 { &hf_radius_length,
 625                 { "Length","radius.length", FT_UINT16, BASE_DEC, NULL, 0x0,
 626                         "" }}
 627         };
 628
 629         proto_radius = proto_register_protocol ("Radius Protocol", "radius");
 630         proto_register_field_array(proto_radius, hf, array_length(hf));
 631 }
 632