net/dccp/options.c

   1 /*
   2  *  net/dccp/options.c
   3  *
   4  *  An implementation of the DCCP protocol
   5  *  Copyright (c) 2005 Aristeu Sergio Rozanski Filho <aris@cathedrallabs.org>
   6  *  Copyright (c) 2005 Arnaldo Carvalho de Melo <acme@ghostprotocols.net>
   7  *  Copyright (c) 2005 Ian McDonald <ian.mcdonald@jandi.co.nz>
   8  *
   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
  12  *      2 of the License, or (at your option) any later version.
  13  */
  14 #include <linux/dccp.h>
  15 #include <linux/module.h>
  16 #include <linux/types.h>
  17 #include <asm/unaligned.h>
  18 #include <linux/kernel.h>
  19 #include <linux/skbuff.h>
  20
  21 #include "ackvec.h"
  22 #include "ccid.h"
  23 #include "dccp.h"
  24 #include "feat.h"
  25
  26 u64 dccp_decode_value_var(const u8 *bf, const u8 len)
  27 {
  28         u64 value = 0;
  29
  30         if (len >= DCCP_OPTVAL_MAXLEN)
  31                 value += ((u64)*bf++) << 40;
  32         if (len > 4)
  33                 value += ((u64)*bf++) << 32;
  34         if (len > 3)
  35                 value += ((u64)*bf++) << 24;
  36         if (len > 2)
  37                 value += ((u64)*bf++) << 16;
  38         if (len > 1)
  39                 value += ((u64)*bf++) << 8;
  40         if (len > 0)
  41                 value += *bf;
  42
  43         return value;
  44 }
  45
  46 /**
  47  * dccp_parse_options  -  Parse DCCP options present in @skb
  48  * @sk: client|server|listening dccp socket (when @dreq != NULL)
  49  * @dreq: request socket to use during connection setup, or NULL
  50  */
  51 int dccp_parse_options(struct sock *sk, struct dccp_request_sock *dreq,
  52                        struct sk_buff *skb)
  53 {
  54         struct dccp_sock *dp = dccp_sk(sk);
  55         const struct dccp_hdr *dh = dccp_hdr(skb);
  56         const u8 pkt_type = DCCP_SKB_CB(skb)->dccpd_type;
  57         u64 ackno = DCCP_SKB_CB(skb)->dccpd_ack_seq;
  58         unsigned char *options = (unsigned char *)dh + dccp_hdr_len(skb);
  59         unsigned char *opt_ptr = options;
  60         const unsigned char *opt_end = (unsigned char *)dh +
  61                                         (dh->dccph_doff * 4);
  62         struct dccp_options_received *opt_recv = &dp->dccps_options_received;
  63         unsigned char opt, len;
  64         unsigned char *value;
  65         u32 elapsed_time;
  66         __be32 opt_val;
  67         int rc;
  68         int mandatory = 0;
  69
  70         memset(opt_recv, 0, sizeof(*opt_recv));
  71
  72         opt = len = 0;
  73         while (opt_ptr != opt_end) {
  74                 opt   = *opt_ptr++;
  75                 len   = 0;
  76                 value = NULL;
  77
  78                 /* Check if this isn't a single byte option */
  79                 if (opt > DCCPO_MAX_RESERVED) {
  80                         if (opt_ptr == opt_end)
  81                                 goto out_nonsensical_length;
  82
  83                         len = *opt_ptr++;
  84                         if (len < 2)
  85                                 goto out_nonsensical_length;
  86                         /*
  87                          * Remove the type and len fields, leaving
  88                          * just the value size
  89                          */
  90                         len     -= 2;
  91                         value   = opt_ptr;
  92                         opt_ptr += len;
  93
  94                         if (opt_ptr > opt_end)
  95                                 goto out_nonsensical_length;
  96                 }
  97
  98                 /*
  99                  * CCID-Specific Options (from RFC 4340, sec. 10.3):
 100                  *
 101                  * Option numbers 128 through 191 are for options sent from the
 102                  * HC-Sender to the HC-Receiver; option numbers 192 through 255
 103                  * are for options sent from the HC-Receiver to the HC-Sender.
 104                  *
 105                  * CCID-specific options are ignored during connection setup, as
 106                  * negotiation may still be in progress (see RFC 4340, 10.3).
 107                  * The same applies to Ack Vectors, as these depend on the CCID.
 108                  *
 109                  */
 110                 if (dreq != NULL && (opt >= 128 ||
 111                     opt == DCCPO_ACK_VECTOR_0 || opt == DCCPO_ACK_VECTOR_1))
 112                         goto ignore_option;
 113
 114                 switch (opt) {
 115                 case DCCPO_PADDING:
 116                         break;
 117                 case DCCPO_MANDATORY:
 118                         if (mandatory)
 119                                 goto out_invalid_option;
 120                         if (pkt_type != DCCP_PKT_DATA)
 121                                 mandatory = 1;
 122                         break;
 123                 case DCCPO_NDP_COUNT:
 124                         if (len > 6)
 125                                 goto out_invalid_option;
 126
 127                         opt_recv->dccpor_ndp = dccp_decode_value_var(value, len);
 128                         dccp_pr_debug("%s opt: NDP count=%llu\n", dccp_role(sk),
 129                                       (unsigned long long)opt_recv->dccpor_ndp);
 130                         break;
 131                 case DCCPO_CHANGE_L ... DCCPO_CONFIRM_R:
 132                         if (pkt_type == DCCP_PKT_DATA)      /* RFC 4340, 6 */
 133                                 break;
 134                         rc = dccp_feat_parse_options(sk, dreq, mandatory, opt,
 135                                                     *value, value + 1, len - 1);
 136                         if (rc)
 137                                 goto out_featneg_failed;
 138                         break;
 139                 case DCCPO_ACK_VECTOR_0:
 140                 case DCCPO_ACK_VECTOR_1:
 141                         if (dccp_packet_without_ack(skb))   /* RFC 4340, 11.4 */
 142                                 break;
 143                         if (dp->dccps_hc_rx_ackvec != NULL &&
 144                             dccp_ackvec_parse(sk, skb, &ackno, opt, value, len))
 145                                 goto out_invalid_option;
 146                         break;
 147                 case DCCPO_TIMESTAMP:
 148                         if (len != 4)
 149                                 goto out_invalid_option;
 150                         /*
 151                          * RFC 4340 13.1: "The precise time corresponding to
 152                          * Timestamp Value zero is not specified". We use
 153                          * zero to indicate absence of a meaningful timestamp.
 154                          */
 155                         opt_val = get_unaligned((__be32 *)value);
 156                         if (unlikely(opt_val == 0)) {
 157                                 DCCP_WARN("Timestamp with zero value\n");
 158                                 break;
 159                         }
 160
 161                         if (dreq != NULL) {
 162                                 dreq->dreq_timestamp_echo = ntohl(opt_val);
 163                                 dreq->dreq_timestamp_time = dccp_timestamp();
 164                         } else {
 165                                 opt_recv->dccpor_timestamp =
 166                                         dp->dccps_timestamp_echo = ntohl(opt_val);
 167                                 dp->dccps_timestamp_time = dccp_timestamp();
 168                         }
 169                         dccp_pr_debug("%s rx opt: TIMESTAMP=%u, ackno=%llu\n",
 170                                       dccp_role(sk), ntohl(opt_val),
 171                                       (unsigned long long)
 172                                       DCCP_SKB_CB(skb)->dccpd_ack_seq);
 173                         break;
 174                 case DCCPO_TIMESTAMP_ECHO:
 175                         if (len != 4 && len != 6 && len != 8)
 176                                 goto out_invalid_option;
 177
 178                         opt_val = get_unaligned((__be32 *)value);
 179                         opt_recv->dccpor_timestamp_echo = ntohl(opt_val);
 180
 181                         dccp_pr_debug("%s rx opt: TIMESTAMP_ECHO=%u, len=%d, "
 182                                       "ackno=%llu", dccp_role(sk),
 183                                       opt_recv->dccpor_timestamp_echo,
 184                                       len + 2,
 185                                       (unsigned long long)
 186                                       DCCP_SKB_CB(skb)->dccpd_ack_seq);
 187
 188                         value += 4;
 189
 190                         if (len == 4) {         /* no elapsed time included */
 191                                 dccp_pr_debug_cat("\n");
 192                                 break;
 193                         }
 194
 195                         if (len == 6) {         /* 2-byte elapsed time */
 196                                 __be16 opt_val2 = get_unaligned((__be16 *)value);
 197                                 elapsed_time = ntohs(opt_val2);
 198                         } else {                /* 4-byte elapsed time */
 199                                 opt_val = get_unaligned((__be32 *)value);
 200                                 elapsed_time = ntohl(opt_val);
 201                         }
 202
 203                         dccp_pr_debug_cat(", ELAPSED_TIME=%u\n", elapsed_time);
 204
 205                         /* Give precedence to the biggest ELAPSED_TIME */
 206                         if (elapsed_time > opt_recv->dccpor_elapsed_time)
 207                                 opt_recv->dccpor_elapsed_time = elapsed_time;
 208                         break;
 209                 case DCCPO_ELAPSED_TIME:
 210                         if (dccp_packet_without_ack(skb))   /* RFC 4340, 13.2 */
 211                                 break;
 212
 213                         if (len == 2) {
 214                                 __be16 opt_val2 = get_unaligned((__be16 *)value);
 215                                 elapsed_time = ntohs(opt_val2);
 216                         } else if (len == 4) {
 217                                 opt_val = get_unaligned((__be32 *)value);
 218                                 elapsed_time = ntohl(opt_val);
 219                         } else {
 220                                 goto out_invalid_option;
 221                         }
 222
 223                         if (elapsed_time > opt_recv->dccpor_elapsed_time)
 224                                 opt_recv->dccpor_elapsed_time = elapsed_time;
 225
 226                         dccp_pr_debug("%s rx opt: ELAPSED_TIME=%d\n",
 227                                       dccp_role(sk), elapsed_time);
 228                         break;
 229                 case 128 ... 191:
 230                         if (ccid_hc_rx_parse_options(dp->dccps_hc_rx_ccid, sk,
 231                                                      pkt_type, opt, value, len))
 232                                 goto out_invalid_option;
 233                         break;
 234                 case 192 ... 255:
 235                         if (ccid_hc_tx_parse_options(dp->dccps_hc_tx_ccid, sk,
 236                                                      pkt_type, opt, value, len))
 237                                 goto out_invalid_option;
 238                         break;
 239                 default:
 240                         DCCP_CRIT("DCCP(%p): option %d(len=%d) not "
 241                                   "implemented, ignoring", sk, opt, len);
 242                         break;
 243                 }
 244 ignore_option:
 245                 if (opt != DCCPO_MANDATORY)
 246                         mandatory = 0;
 247         }
 248
 249         /* mandatory was the last byte in option list -> reset connection */
 250         if (mandatory)
 251                 goto out_invalid_option;
 252
 253 out_nonsensical_length:
 254         /* RFC 4340, 5.8: ignore option and all remaining option space */
 255         return 0;
 256
 257 out_invalid_option:
 258         DCCP_INC_STATS_BH(DCCP_MIB_INVALIDOPT);
 259         rc = DCCP_RESET_CODE_OPTION_ERROR;
 260 out_featneg_failed:
 261         DCCP_WARN("DCCP(%p): Option %d (len=%d) error=%u\n", sk, opt, len, rc);
 262         DCCP_SKB_CB(skb)->dccpd_reset_code = rc;
 263         DCCP_SKB_CB(skb)->dccpd_reset_data[0] = opt;
 264         DCCP_SKB_CB(skb)->dccpd_reset_data[1] = len > 0 ? value[0] : 0;
 265         DCCP_SKB_CB(skb)->dccpd_reset_data[2] = len > 1 ? value[1] : 0;
 266         return -1;
 267 }
 268
 269 EXPORT_SYMBOL_GPL(dccp_parse_options);
 270
 271 void dccp_encode_value_var(const u64 value, u8 *to, const u8 len)
 272 {
 273         if (len >= DCCP_OPTVAL_MAXLEN)
 274                 *to++ = (value & 0xFF0000000000ull) >> 40;
 275         if (len > 4)
 276                 *to++ = (value & 0xFF00000000ull) >> 32;
 277         if (len > 3)
 278                 *to++ = (value & 0xFF000000) >> 24;
 279         if (len > 2)
 280                 *to++ = (value & 0xFF0000) >> 16;
 281         if (len > 1)
 282                 *to++ = (value & 0xFF00) >> 8;
 283         if (len > 0)
 284                 *to++ = (value & 0xFF);
 285 }
 286
 287 static inline u8 dccp_ndp_len(const u64 ndp)
 288 {
 289         if (likely(ndp <= 0xFF))
 290                 return 1;
 291         return likely(ndp <= USHORT_MAX) ? 2 : (ndp <= UINT_MAX ? 4 : 6);
 292 }
 293
 294 int dccp_insert_option(struct sock *sk, struct sk_buff *skb,
 295                         const unsigned char option,
 296                         const void *value, const unsigned char len)
 297 {
 298         unsigned char *to;
 299
 300         if (DCCP_SKB_CB(skb)->dccpd_opt_len + len + 2 > DCCP_MAX_OPT_LEN)
 301                 return -1;
 302
 303         DCCP_SKB_CB(skb)->dccpd_opt_len += len + 2;
 304
 305         to    = skb_push(skb, len + 2);
 306         *to++ = option;
 307         *to++ = len + 2;
 308
 309         memcpy(to, value, len);
 310         return 0;
 311 }
 312
 313 EXPORT_SYMBOL_GPL(dccp_insert_option);
 314
 315 static int dccp_insert_option_ndp(struct sock *sk, struct sk_buff *skb)
 316 {
 317         struct dccp_sock *dp = dccp_sk(sk);
 318         u64 ndp = dp->dccps_ndp_count;
 319
 320         if (dccp_non_data_packet(skb))
 321                 ++dp->dccps_ndp_count;
 322         else
 323                 dp->dccps_ndp_count = 0;
 324
 325         if (ndp > 0) {
 326                 unsigned char *ptr;
 327                 const int ndp_len = dccp_ndp_len(ndp);
 328                 const int len = ndp_len + 2;
 329
 330                 if (DCCP_SKB_CB(skb)->dccpd_opt_len + len > DCCP_MAX_OPT_LEN)
 331                         return -1;
 332
 333                 DCCP_SKB_CB(skb)->dccpd_opt_len += len;
 334
 335                 ptr = skb_push(skb, len);
 336                 *ptr++ = DCCPO_NDP_COUNT;
 337                 *ptr++ = len;
 338                 dccp_encode_value_var(ndp, ptr, ndp_len);
 339         }
 340
 341         return 0;
 342 }
 343
 344 static inline int dccp_elapsed_time_len(const u32 elapsed_time)
 345 {
 346         return elapsed_time == 0 ? 0 : elapsed_time <= 0xFFFF ? 2 : 4;
 347 }
 348
 349 int dccp_insert_option_elapsed_time(struct sock *sk, struct sk_buff *skb,
 350                                     u32 elapsed_time)
 351 {
 352         const int elapsed_time_len = dccp_elapsed_time_len(elapsed_time);
 353         const int len = 2 + elapsed_time_len;
 354         unsigned char *to;
 355
 356         if (elapsed_time_len == 0)
 357                 return 0;
 358
 359         if (DCCP_SKB_CB(skb)->dccpd_opt_len + len > DCCP_MAX_OPT_LEN)
 360                 return -1;
 361
 362         DCCP_SKB_CB(skb)->dccpd_opt_len += len;
 363
 364         to    = skb_push(skb, len);
 365         *to++ = DCCPO_ELAPSED_TIME;
 366         *to++ = len;
 367
 368         if (elapsed_time_len == 2) {
 369                 const __be16 var16 = htons((u16)elapsed_time);
 370                 memcpy(to, &var16, 2);
 371         } else {
 372                 const __be32 var32 = htonl(elapsed_time);
 373                 memcpy(to, &var32, 4);
 374         }
 375
 376         return 0;
 377 }
 378
 379 EXPORT_SYMBOL_GPL(dccp_insert_option_elapsed_time);
 380
 381 int dccp_insert_option_timestamp(struct sock *sk, struct sk_buff *skb)
 382 {
 383         __be32 now = htonl(dccp_timestamp());
 384         /* yes this will overflow but that is the point as we want a
 385          * 10 usec 32 bit timer which mean it wraps every 11.9 hours */
 386
 387         return dccp_insert_option(sk, skb, DCCPO_TIMESTAMP, &now, sizeof(now));
 388 }
 389
 390 EXPORT_SYMBOL_GPL(dccp_insert_option_timestamp);
 391
 392 static int dccp_insert_option_timestamp_echo(struct dccp_sock *dp,
 393                                              struct dccp_request_sock *dreq,
 394                                              struct sk_buff *skb)
 395 {
 396         __be32 tstamp_echo;
 397         unsigned char *to;
 398         u32 elapsed_time, elapsed_time_len, len;
 399
 400         if (dreq != NULL) {
 401                 elapsed_time = dccp_timestamp() - dreq->dreq_timestamp_time;
 402                 tstamp_echo  = htonl(dreq->dreq_timestamp_echo);
 403                 dreq->dreq_timestamp_echo = 0;
 404         } else {
 405                 elapsed_time = dccp_timestamp() - dp->dccps_timestamp_time;
 406                 tstamp_echo  = htonl(dp->dccps_timestamp_echo);
 407                 dp->dccps_timestamp_echo = 0;
 408         }
 409
 410         elapsed_time_len = dccp_elapsed_time_len(elapsed_time);
 411         len = 6 + elapsed_time_len;
 412
 413         if (DCCP_SKB_CB(skb)->dccpd_opt_len + len > DCCP_MAX_OPT_LEN)
 414                 return -1;
 415
 416         DCCP_SKB_CB(skb)->dccpd_opt_len += len;
 417
 418         to    = skb_push(skb, len);
 419         *to++ = DCCPO_TIMESTAMP_ECHO;
 420         *to++ = len;
 421
 422         memcpy(to, &tstamp_echo, 4);
 423         to += 4;
 424
 425         if (elapsed_time_len == 2) {
 426                 const __be16 var16 = htons((u16)elapsed_time);
 427                 memcpy(to, &var16, 2);
 428         } else if (elapsed_time_len == 4) {
 429                 const __be32 var32 = htonl(elapsed_time);
 430                 memcpy(to, &var32, 4);
 431         }
 432
 433         return 0;
 434 }
 435
 436 /**
 437  * dccp_insert_option_mandatory  -  Mandatory option (5.8.2)
 438  * Note that since we are using skb_push, this function needs to be called
 439  * _after_ inserting the option it is supposed to influence (stack order).
 440  */
 441 int dccp_insert_option_mandatory(struct sk_buff *skb)
 442 {
 443         if (DCCP_SKB_CB(skb)->dccpd_opt_len >= DCCP_MAX_OPT_LEN)
 444                 return -1;
 445
 446         DCCP_SKB_CB(skb)->dccpd_opt_len++;
 447         *skb_push(skb, 1) = DCCPO_MANDATORY;
 448         return 0;
 449 }
 450
 451 /**
 452  * dccp_insert_fn_opt  -  Insert single Feature-Negotiation option into @skb
 453  * @type: %DCCPO_CHANGE_L, %DCCPO_CHANGE_R, %DCCPO_CONFIRM_L, %DCCPO_CONFIRM_R
 454  * @feat: one out of %dccp_feature_numbers
 455  * @val: NN value or SP array (preferred element first) to copy
 456  * @len: true length of @val in bytes (excluding first element repetition)
 457  * @repeat_first: whether to copy the first element of @val twice
 458  * The last argument is used to construct Confirm options, where the preferred
 459  * value and the preference list appear separately (RFC 4340, 6.3.1). Preference
 460  * lists are kept such that the preferred entry is always first, so we only need
 461  * to copy twice, and avoid the overhead of cloning into a bigger array.
 462  */
 463 int dccp_insert_fn_opt(struct sk_buff *skb, u8 type, u8 feat,
 464                        u8 *val, u8 len, bool repeat_first)
 465 {
 466         u8 tot_len, *to;
 467
 468         /* take the `Feature' field and possible repetition into account */
 469         if (len > (DCCP_SINGLE_OPT_MAXLEN - 2)) {
 470                 DCCP_WARN("length %u for feature %u too large\n", len, feat);
 471                 return -1;
 472         }
 473
 474         if (unlikely(val == NULL || len == 0))
 475                 len = repeat_first = 0;
 476         tot_len = 3 + repeat_first + len;
 477
 478         if (DCCP_SKB_CB(skb)->dccpd_opt_len + tot_len > DCCP_MAX_OPT_LEN) {
 479                 DCCP_WARN("packet too small for feature %d option!\n", feat);
 480                 return -1;
 481         }
 482         DCCP_SKB_CB(skb)->dccpd_opt_len += tot_len;
 483
 484         to    = skb_push(skb, tot_len);
 485         *to++ = type;
 486         *to++ = tot_len;
 487         *to++ = feat;
 488
 489         if (repeat_first)
 490                 *to++ = *val;
 491         if (len)
 492                 memcpy(to, val, len);
 493         return 0;
 494 }
 495
 496 /* The length of all options needs to be a multiple of 4 (5.8) */
 497 static void dccp_insert_option_padding(struct sk_buff *skb)
 498 {
 499         int padding = DCCP_SKB_CB(skb)->dccpd_opt_len % 4;
 500
 501         if (padding != 0) {
 502                 padding = 4 - padding;
 503                 memset(skb_push(skb, padding), 0, padding);
 504                 DCCP_SKB_CB(skb)->dccpd_opt_len += padding;
 505         }
 506 }
 507
 508 int dccp_insert_options(struct sock *sk, struct sk_buff *skb)
 509 {
 510         struct dccp_sock *dp = dccp_sk(sk);
 511
 512         DCCP_SKB_CB(skb)->dccpd_opt_len = 0;
 513
 514         if (dp->dccps_send_ndp_count && dccp_insert_option_ndp(sk, skb))
 515                 return -1;
 516
 517         if (DCCP_SKB_CB(skb)->dccpd_type != DCCP_PKT_DATA) {
 518
 519                 /* Feature Negotiation */
 520                 if (dccp_feat_insert_opts(dp, NULL, skb))
 521                         return -1;
 522
 523                 if (DCCP_SKB_CB(skb)->dccpd_type == DCCP_PKT_REQUEST) {
 524                         /*
 525                          * Obtain RTT sample from Request/Response exchange.
 526                          * This is currently used in CCID 3 initialisation.
 527                          */
 528                         if (dccp_insert_option_timestamp(sk, skb))
 529                                 return -1;
 530
 531                 } else if (dp->dccps_hc_rx_ackvec != NULL &&
 532                            dccp_ackvec_pending(dp->dccps_hc_rx_ackvec) &&
 533                            dccp_insert_option_ackvec(sk, skb)) {
 534                                 return -1;
 535                 }
 536         }
 537
 538         if (dp->dccps_hc_rx_insert_options) {
 539                 if (ccid_hc_rx_insert_options(dp->dccps_hc_rx_ccid, sk, skb))
 540                         return -1;
 541                 dp->dccps_hc_rx_insert_options = 0;
 542         }
 543
 544         if (dp->dccps_timestamp_echo != 0 &&
 545             dccp_insert_option_timestamp_echo(dp, NULL, skb))
 546                 return -1;
 547
 548         dccp_insert_option_padding(skb);
 549         return 0;
 550 }
 551
 552 int dccp_insert_options_rsk(struct dccp_request_sock *dreq, struct sk_buff *skb)
 553 {
 554         DCCP_SKB_CB(skb)->dccpd_opt_len = 0;
 555
 556         if (dccp_feat_insert_opts(NULL, dreq, skb))
 557                 return -1;
 558
 559         if (dreq->dreq_timestamp_echo != 0 &&
 560             dccp_insert_option_timestamp_echo(NULL, dreq, skb))
 561                 return -1;
 562
 563         dccp_insert_option_padding(skb);
 564         return 0;
 565 }