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 <linux/kernel.h>
  18 #include <linux/skbuff.h>
  19
  20 #include "ackvec.h"
  21 #include "ccid.h"
  22 #include "dccp.h"
  23 #include "feat.h"
  24
  25 int sysctl_dccp_feat_sequence_window = DCCPF_INITIAL_SEQUENCE_WINDOW;
  26 int sysctl_dccp_feat_rx_ccid          = DCCPF_INITIAL_CCID;
  27 int sysctl_dccp_feat_tx_ccid          = DCCPF_INITIAL_CCID;
  28 int sysctl_dccp_feat_ack_ratio        = DCCPF_INITIAL_ACK_RATIO;
  29 int sysctl_dccp_feat_send_ack_vector = DCCPF_INITIAL_SEND_ACK_VECTOR;
  30 int sysctl_dccp_feat_send_ndp_count  = DCCPF_INITIAL_SEND_NDP_COUNT;
  31
  32 EXPORT_SYMBOL_GPL(sysctl_dccp_feat_sequence_window);
  33
  34 void dccp_minisock_init(struct dccp_minisock *dmsk)
  35 {
  36         dmsk->dccpms_sequence_window = sysctl_dccp_feat_sequence_window;
  37         dmsk->dccpms_rx_ccid         = sysctl_dccp_feat_rx_ccid;
  38         dmsk->dccpms_tx_ccid         = sysctl_dccp_feat_tx_ccid;
  39         dmsk->dccpms_ack_ratio       = sysctl_dccp_feat_ack_ratio;
  40         dmsk->dccpms_send_ack_vector = sysctl_dccp_feat_send_ack_vector;
  41         dmsk->dccpms_send_ndp_count  = sysctl_dccp_feat_send_ndp_count;
  42 }
  43
  44 static u32 dccp_decode_value_var(const unsigned char *bf, const u8 len)
  45 {
  46         u32 value = 0;
  47
  48         if (len > 3)
  49                 value += *bf++ << 24;
  50         if (len > 2)
  51                 value += *bf++ << 16;
  52         if (len > 1)
  53                 value += *bf++ << 8;
  54         if (len > 0)
  55                 value += *bf;
  56
  57         return value;
  58 }
  59
  60 int dccp_parse_options(struct sock *sk, struct sk_buff *skb)
  61 {
  62         struct dccp_sock *dp = dccp_sk(sk);
  63         const struct dccp_hdr *dh = dccp_hdr(skb);
  64         const u8 pkt_type = DCCP_SKB_CB(skb)->dccpd_type;
  65         u64 ackno = DCCP_SKB_CB(skb)->dccpd_ack_seq;
  66         unsigned char *options = (unsigned char *)dh + dccp_hdr_len(skb);
  67         unsigned char *opt_ptr = options;
  68         const unsigned char *opt_end = (unsigned char *)dh +
  69                                         (dh->dccph_doff * 4);
  70         struct dccp_options_received *opt_recv = &dp->dccps_options_received;
  71         unsigned char opt, len;
  72         unsigned char *value;
  73         u32 elapsed_time;
  74         int rc;
  75         int mandatory = 0;
  76
  77         memset(opt_recv, 0, sizeof(*opt_recv));
  78
  79         opt = len = 0;
  80         while (opt_ptr != opt_end) {
  81                 opt   = *opt_ptr++;
  82                 len   = 0;
  83                 value = NULL;
  84
  85                 /* Check if this isn't a single byte option */
  86                 if (opt > DCCPO_MAX_RESERVED) {
  87                         if (opt_ptr == opt_end)
  88                                 goto out_invalid_option;
  89
  90                         len = *opt_ptr++;
  91                         if (len < 3)
  92                                 goto out_invalid_option;
  93                         /*
  94                          * Remove the type and len fields, leaving
  95                          * just the value size
  96                          */
  97                         len     -= 2;
  98                         value   = opt_ptr;
  99                         opt_ptr += len;
 100
 101                         if (opt_ptr > opt_end)
 102                                 goto out_invalid_option;
 103                 }
 104
 105                 switch (opt) {
 106                 case DCCPO_PADDING:
 107                         break;
 108                 case DCCPO_MANDATORY:
 109                         if (mandatory)
 110                                 goto out_invalid_option;
 111                         if (pkt_type != DCCP_PKT_DATA)
 112                                 mandatory = 1;
 113                         break;
 114                 case DCCPO_NDP_COUNT:
 115                         if (len > 3)
 116                                 goto out_invalid_option;
 117
 118                         opt_recv->dccpor_ndp = dccp_decode_value_var(value, len);
 119                         dccp_pr_debug("%s rx opt: NDP count=%d\n", dccp_role(sk),
 120                                       opt_recv->dccpor_ndp);
 121                         break;
 122                 case DCCPO_CHANGE_L:
 123                         /* fall through */
 124                 case DCCPO_CHANGE_R:
 125                         if (len < 2)
 126                                 goto out_invalid_option;
 127                         rc = dccp_feat_change_recv(sk, opt, *value, value + 1,
 128                                                    len - 1);
 129                         /*
 130                          * When there is a change error, change_recv is
 131                          * responsible for dealing with it.  i.e. reply with an
 132                          * empty confirm.
 133                          * If the change was mandatory, then we need to die.
 134                          */
 135                         if (rc && mandatory)
 136                                 goto out_invalid_option;
 137                         break;
 138                 case DCCPO_CONFIRM_L:
 139                         /* fall through */
 140                 case DCCPO_CONFIRM_R:
 141                         if (len < 2)
 142                                 goto out_invalid_option;
 143                         if (dccp_feat_confirm_recv(sk, opt, *value,
 144                                                    value + 1, len - 1))
 145                                 goto out_invalid_option;
 146                         break;
 147                 case DCCPO_ACK_VECTOR_0:
 148                 case DCCPO_ACK_VECTOR_1:
 149                         if (pkt_type == DCCP_PKT_DATA)
 150                                 break;
 151
 152                         if (dccp_msk(sk)->dccpms_send_ack_vector &&
 153                             dccp_ackvec_parse(sk, skb, &ackno, opt, value, len))
 154                                 goto out_invalid_option;
 155                         break;
 156                 case DCCPO_TIMESTAMP:
 157                         if (len != 4)
 158                                 goto out_invalid_option;
 159
 160                         opt_recv->dccpor_timestamp = ntohl(*(__be32 *)value);
 161
 162                         dp->dccps_timestamp_echo = opt_recv->dccpor_timestamp;
 163                         dccp_timestamp(sk, &dp->dccps_timestamp_time);
 164
 165                         dccp_pr_debug("%s rx opt: TIMESTAMP=%u, ackno=%llu\n",
 166                                       dccp_role(sk), opt_recv->dccpor_timestamp,
 167                                       (unsigned long long)
 168                                       DCCP_SKB_CB(skb)->dccpd_ack_seq);
 169                         break;
 170                 case DCCPO_TIMESTAMP_ECHO:
 171                         if (len != 4 && len != 6 && len != 8)
 172                                 goto out_invalid_option;
 173
 174                         opt_recv->dccpor_timestamp_echo = ntohl(*(__be32 *)value);
 175
 176                         dccp_pr_debug("%s rx opt: TIMESTAMP_ECHO=%u, len=%d, "
 177                                       "ackno=%llu, ",  dccp_role(sk),
 178                                       opt_recv->dccpor_timestamp_echo,
 179                                       len + 2,
 180                                       (unsigned long long)
 181                                       DCCP_SKB_CB(skb)->dccpd_ack_seq);
 182
 183
 184                         if (len == 4)
 185                                 break;
 186
 187                         if (len == 6)
 188                                 elapsed_time = ntohs(*(__be16 *)(value + 4));
 189                         else
 190                                 elapsed_time = ntohl(*(__be32 *)(value + 4));
 191
 192                         /* Give precedence to the biggest ELAPSED_TIME */
 193                         if (elapsed_time > opt_recv->dccpor_elapsed_time)
 194                                 opt_recv->dccpor_elapsed_time = elapsed_time;
 195                         break;
 196                 case DCCPO_ELAPSED_TIME:
 197                         if (len != 2 && len != 4)
 198                                 goto out_invalid_option;
 199
 200                         if (pkt_type == DCCP_PKT_DATA)
 201                                 continue;
 202
 203                         if (len == 2)
 204                                 elapsed_time = ntohs(*(__be16 *)value);
 205                         else
 206                                 elapsed_time = ntohl(*(__be32 *)value);
 207
 208                         if (elapsed_time > opt_recv->dccpor_elapsed_time)
 209                                 opt_recv->dccpor_elapsed_time = elapsed_time;
 210
 211                         dccp_pr_debug("%s rx opt: ELAPSED_TIME=%d\n",
 212                                       dccp_role(sk), elapsed_time);
 213                         break;
 214                         /*
 215                          * From RFC 4340, sec. 10.3:
 216                          *
 217                          *      Option numbers 128 through 191 are for
 218                          *      options sent from the HC-Sender to the
 219                          *      HC-Receiver; option numbers 192 through 255
 220                          *      are for options sent from the HC-Receiver to
 221                          *      the HC-Sender.
 222                          */
 223                 case 128 ... 191: {
 224                         const u16 idx = value - options;
 225
 226                         if (ccid_hc_rx_parse_options(dp->dccps_hc_rx_ccid, sk,
 227                                                      opt, len, idx,
 228                                                      value) != 0)
 229                                 goto out_invalid_option;
 230                 }
 231                         break;
 232                 case 192 ... 255: {
 233                         const u16 idx = value - options;
 234
 235                         if (ccid_hc_tx_parse_options(dp->dccps_hc_tx_ccid, sk,
 236                                                      opt, len, idx,
 237                                                      value) != 0)
 238                                 goto out_invalid_option;
 239                 }
 240                         break;
 241                 default:
 242                         DCCP_CRIT("DCCP(%p): option %d(len=%d) not "
 243                                   "implemented, ignoring", sk, opt, len);
 244                         break;
 245                 }
 246
 247                 if (opt != DCCPO_MANDATORY)
 248                         mandatory = 0;
 249         }
 250
 251         /* mandatory was the last byte in option list -> reset connection */
 252         if (mandatory)
 253                 goto out_invalid_option;
 254
 255         return 0;
 256
 257 out_invalid_option:
 258         DCCP_INC_STATS_BH(DCCP_MIB_INVALIDOPT);
 259         DCCP_SKB_CB(skb)->dccpd_reset_code = DCCP_RESET_CODE_OPTION_ERROR;
 260         DCCP_WARN("DCCP(%p): invalid option %d, len=%d", sk, opt, len);
 261         return -1;
 262 }
 263
 264 EXPORT_SYMBOL_GPL(dccp_parse_options);
 265
 266 static void dccp_encode_value_var(const u32 value, unsigned char *to,
 267                                   const unsigned int len)
 268 {
 269         if (len > 3)
 270                 *to++ = (value & 0xFF000000) >> 24;
 271         if (len > 2)
 272                 *to++ = (value & 0xFF0000) >> 16;
 273         if (len > 1)
 274                 *to++ = (value & 0xFF00) >> 8;
 275         if (len > 0)
 276                 *to++ = (value & 0xFF);
 277 }
 278
 279 static inline int dccp_ndp_len(const int ndp)
 280 {
 281         return likely(ndp <= 0xFF) ? 1 : ndp <= 0xFFFF ? 2 : 3;
 282 }
 283
 284 int dccp_insert_option(struct sock *sk, struct sk_buff *skb,
 285                         const unsigned char option,
 286                         const void *value, const unsigned char len)
 287 {
 288         unsigned char *to;
 289
 290         if (DCCP_SKB_CB(skb)->dccpd_opt_len + len + 2 > DCCP_MAX_OPT_LEN)
 291                 return -1;
 292
 293         DCCP_SKB_CB(skb)->dccpd_opt_len += len + 2;
 294
 295         to    = skb_push(skb, len + 2);
 296         *to++ = option;
 297         *to++ = len + 2;
 298
 299         memcpy(to, value, len);
 300         return 0;
 301 }
 302
 303 EXPORT_SYMBOL_GPL(dccp_insert_option);
 304
 305 static int dccp_insert_option_ndp(struct sock *sk, struct sk_buff *skb)
 306 {
 307         struct dccp_sock *dp = dccp_sk(sk);
 308         int ndp = dp->dccps_ndp_count;
 309
 310         if (dccp_non_data_packet(skb))
 311                 ++dp->dccps_ndp_count;
 312         else
 313                 dp->dccps_ndp_count = 0;
 314
 315         if (ndp > 0) {
 316                 unsigned char *ptr;
 317                 const int ndp_len = dccp_ndp_len(ndp);
 318                 const int len = ndp_len + 2;
 319
 320                 if (DCCP_SKB_CB(skb)->dccpd_opt_len + len > DCCP_MAX_OPT_LEN)
 321                         return -1;
 322
 323                 DCCP_SKB_CB(skb)->dccpd_opt_len += len;
 324
 325                 ptr = skb_push(skb, len);
 326                 *ptr++ = DCCPO_NDP_COUNT;
 327                 *ptr++ = len;
 328                 dccp_encode_value_var(ndp, ptr, ndp_len);
 329         }
 330
 331         return 0;
 332 }
 333
 334 static inline int dccp_elapsed_time_len(const u32 elapsed_time)
 335 {
 336         return elapsed_time == 0 ? 0 : elapsed_time <= 0xFFFF ? 2 : 4;
 337 }
 338
 339 int dccp_insert_option_elapsed_time(struct sock *sk, struct sk_buff *skb,
 340                                     u32 elapsed_time)
 341 {
 342         const int elapsed_time_len = dccp_elapsed_time_len(elapsed_time);
 343         const int len = 2 + elapsed_time_len;
 344         unsigned char *to;
 345
 346         if (elapsed_time_len == 0)
 347                 return 0;
 348
 349         if (DCCP_SKB_CB(skb)->dccpd_opt_len + len > DCCP_MAX_OPT_LEN)
 350                 return -1;
 351
 352         DCCP_SKB_CB(skb)->dccpd_opt_len += len;
 353
 354         to    = skb_push(skb, len);
 355         *to++ = DCCPO_ELAPSED_TIME;
 356         *to++ = len;
 357
 358         if (elapsed_time_len == 2) {
 359                 const __be16 var16 = htons((u16)elapsed_time);
 360                 memcpy(to, &var16, 2);
 361         } else {
 362                 const __be32 var32 = htonl(elapsed_time);
 363                 memcpy(to, &var32, 4);
 364         }
 365
 366         return 0;
 367 }
 368
 369 EXPORT_SYMBOL_GPL(dccp_insert_option_elapsed_time);
 370
 371 void dccp_timestamp(const struct sock *sk, struct timeval *tv)
 372 {
 373         const struct dccp_sock *dp = dccp_sk(sk);
 374
 375         do_gettimeofday(tv);
 376         tv->tv_sec  -= dp->dccps_epoch.tv_sec;
 377         tv->tv_usec -= dp->dccps_epoch.tv_usec;
 378
 379         while (tv->tv_usec < 0) {
 380                 tv->tv_sec--;
 381                 tv->tv_usec += USEC_PER_SEC;
 382         }
 383 }
 384
 385 EXPORT_SYMBOL_GPL(dccp_timestamp);
 386
 387 int dccp_insert_option_timestamp(struct sock *sk, struct sk_buff *skb)
 388 {
 389         struct timeval tv;
 390         __be32 now;
 391
 392         dccp_timestamp(sk, &tv);
 393         now = htonl(timeval_usecs(&tv) / 10);
 394         /* yes this will overflow but that is the point as we want a
 395          * 10 usec 32 bit timer which mean it wraps every 11.9 hours */
 396
 397         return dccp_insert_option(sk, skb, DCCPO_TIMESTAMP, &now, sizeof(now));
 398 }
 399
 400 EXPORT_SYMBOL_GPL(dccp_insert_option_timestamp);
 401
 402 static int dccp_insert_option_timestamp_echo(struct sock *sk,
 403                                              struct sk_buff *skb)
 404 {
 405         struct dccp_sock *dp = dccp_sk(sk);
 406         struct timeval now;
 407         __be32 tstamp_echo;
 408         u32 elapsed_time;
 409         int len, elapsed_time_len;
 410         unsigned char *to;
 411
 412         dccp_timestamp(sk, &now);
 413         elapsed_time = timeval_delta(&now, &dp->dccps_timestamp_time) / 10;
 414         elapsed_time_len = dccp_elapsed_time_len(elapsed_time);
 415         len = 6 + elapsed_time_len;
 416
 417         if (DCCP_SKB_CB(skb)->dccpd_opt_len + len > DCCP_MAX_OPT_LEN)
 418                 return -1;
 419
 420         DCCP_SKB_CB(skb)->dccpd_opt_len += len;
 421
 422         to    = skb_push(skb, len);
 423         *to++ = DCCPO_TIMESTAMP_ECHO;
 424         *to++ = len;
 425
 426         tstamp_echo = htonl(dp->dccps_timestamp_echo);
 427         memcpy(to, &tstamp_echo, 4);
 428         to += 4;
 429
 430         if (elapsed_time_len == 2) {
 431                 const __be16 var16 = htons((u16)elapsed_time);
 432                 memcpy(to, &var16, 2);
 433         } else if (elapsed_time_len == 4) {
 434                 const __be32 var32 = htonl(elapsed_time);
 435                 memcpy(to, &var32, 4);
 436         }
 437
 438         dp->dccps_timestamp_echo = 0;
 439         dp->dccps_timestamp_time.tv_sec = 0;
 440         dp->dccps_timestamp_time.tv_usec = 0;
 441         return 0;
 442 }
 443
 444 static int dccp_insert_feat_opt(struct sk_buff *skb, u8 type, u8 feat,
 445                                 u8 *val, u8 len)
 446 {
 447         u8 *to;
 448
 449         if (DCCP_SKB_CB(skb)->dccpd_opt_len + len + 3 > DCCP_MAX_OPT_LEN) {
 450                 DCCP_WARN("packet too small for feature %d option!\n", feat);
 451                 return -1;
 452         }
 453
 454         DCCP_SKB_CB(skb)->dccpd_opt_len += len + 3;
 455
 456         to    = skb_push(skb, len + 3);
 457         *to++ = type;
 458         *to++ = len + 3;
 459         *to++ = feat;
 460
 461         if (len)
 462                 memcpy(to, val, len);
 463
 464         dccp_pr_debug("%s(%s (%d), ...), length %d\n",
 465                       dccp_feat_typename(type),
 466                       dccp_feat_name(feat), feat, len);
 467         return 0;
 468 }
 469
 470 static int dccp_insert_options_feat(struct sock *sk, struct sk_buff *skb)
 471 {
 472         struct dccp_sock *dp = dccp_sk(sk);
 473         struct dccp_minisock *dmsk = dccp_msk(sk);
 474         struct dccp_opt_pend *opt, *next;
 475         int change = 0;
 476
 477         /* confirm any options [NN opts] */
 478         list_for_each_entry_safe(opt, next, &dmsk->dccpms_conf, dccpop_node) {
 479                 dccp_insert_feat_opt(skb, opt->dccpop_type,
 480                                      opt->dccpop_feat, opt->dccpop_val,
 481                                      opt->dccpop_len);
 482                 /* fear empty confirms */
 483                 if (opt->dccpop_val)
 484                         kfree(opt->dccpop_val);
 485                 kfree(opt);
 486         }
 487         INIT_LIST_HEAD(&dmsk->dccpms_conf);
 488
 489         /* see which features we need to send */
 490         list_for_each_entry(opt, &dmsk->dccpms_pending, dccpop_node) {
 491                 /* see if we need to send any confirm */
 492                 if (opt->dccpop_sc) {
 493                         dccp_insert_feat_opt(skb, opt->dccpop_type + 1,
 494                                              opt->dccpop_feat,
 495                                              opt->dccpop_sc->dccpoc_val,
 496                                              opt->dccpop_sc->dccpoc_len);
 497
 498                         BUG_ON(!opt->dccpop_sc->dccpoc_val);
 499                         kfree(opt->dccpop_sc->dccpoc_val);
 500                         kfree(opt->dccpop_sc);
 501                         opt->dccpop_sc = NULL;
 502                 }
 503
 504                 /* any option not confirmed, re-send it */
 505                 if (!opt->dccpop_conf) {
 506                         dccp_insert_feat_opt(skb, opt->dccpop_type,
 507                                              opt->dccpop_feat, opt->dccpop_val,
 508                                              opt->dccpop_len);
 509                         change++;
 510                 }
 511         }
 512
 513         /* Retransmit timer.
 514          * If this is the master listening sock, we don't set a timer on it.  It
 515          * should be fine because if the dude doesn't receive our RESPONSE
 516          * [which will contain the CHANGE] he will send another REQUEST which
 517          * will "retrnasmit" the change.
 518          */
 519         if (change && dp->dccps_role != DCCP_ROLE_LISTEN) {
 520                 dccp_pr_debug("reset feat negotiation timer %p\n", sk);
 521
 522                 /* XXX don't reset the timer on re-transmissions.  I.e. reset it
 523                  * only when sending new stuff i guess.  Currently the timer
 524                  * never backs off because on re-transmission it just resets it!
 525                  */
 526                 inet_csk_reset_xmit_timer(sk, ICSK_TIME_RETRANS,
 527                                           inet_csk(sk)->icsk_rto, DCCP_RTO_MAX);
 528         }
 529
 530         return 0;
 531 }
 532
 533 int dccp_insert_options(struct sock *sk, struct sk_buff *skb)
 534 {
 535         struct dccp_sock *dp = dccp_sk(sk);
 536         struct dccp_minisock *dmsk = dccp_msk(sk);
 537
 538         DCCP_SKB_CB(skb)->dccpd_opt_len = 0;
 539
 540         if (dmsk->dccpms_send_ndp_count &&
 541             dccp_insert_option_ndp(sk, skb))
 542                 return -1;
 543
 544         if (!dccp_packet_without_ack(skb)) {
 545                 if (dmsk->dccpms_send_ack_vector &&
 546                     dccp_ackvec_pending(dp->dccps_hc_rx_ackvec) &&
 547                     dccp_insert_option_ackvec(sk, skb))
 548                         return -1;
 549
 550                 if (dp->dccps_timestamp_echo != 0 &&
 551                     dccp_insert_option_timestamp_echo(sk, skb))
 552                         return -1;
 553         }
 554
 555         if (dp->dccps_hc_rx_insert_options) {
 556                 if (ccid_hc_rx_insert_options(dp->dccps_hc_rx_ccid, sk, skb))
 557                         return -1;
 558                 dp->dccps_hc_rx_insert_options = 0;
 559         }
 560
 561         /* Feature negotiation */
 562         /* Data packets can't do feat negotiation */
 563         if (DCCP_SKB_CB(skb)->dccpd_type != DCCP_PKT_DATA &&
 564             DCCP_SKB_CB(skb)->dccpd_type != DCCP_PKT_DATAACK &&
 565             dccp_insert_options_feat(sk, skb))
 566                 return -1;
 567
 568         /* XXX: insert other options when appropriate */
 569
 570         if (DCCP_SKB_CB(skb)->dccpd_opt_len != 0) {
 571                 /* The length of all options has to be a multiple of 4 */
 572                 int padding = DCCP_SKB_CB(skb)->dccpd_opt_len % 4;
 573
 574                 if (padding != 0) {
 575                         padding = 4 - padding;
 576                         memset(skb_push(skb, padding), 0, padding);
 577                         DCCP_SKB_CB(skb)->dccpd_opt_len += padding;
 578                 }
 579         }
 580
 581         return 0;
 582 }