net/sctp/associola.c

   1 /* SCTP kernel implementation
   2  * (C) Copyright IBM Corp. 2001, 2004
   3  * Copyright (c) 1999-2000 Cisco, Inc.
   4  * Copyright (c) 1999-2001 Motorola, Inc.
   5  * Copyright (c) 2001 Intel Corp.
   6  * Copyright (c) 2001 La Monte H.P. Yarroll
   7  *
   8  * This file is part of the SCTP kernel implementation
   9  *
  10  * This module provides the abstraction for an SCTP association.
  11  *
  12  * This SCTP implementation is free software;
  13  * you can redistribute it and/or modify it under the terms of
  14  * the GNU General Public License as published by
  15  * the Free Software Foundation; either version 2, or (at your option)
  16  * any later version.
  17  *
  18  * This SCTP implementation is distributed in the hope that it
  19  * will be useful, but WITHOUT ANY WARRANTY; without even the implied
  20  *                 ************************
  21  * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  22  * See the GNU General Public License for more details.
  23  *
  24  * You should have received a copy of the GNU General Public License
  25  * along with GNU CC; see the file COPYING.  If not, see
  26  * <http://www.gnu.org/licenses/>.
  27  *
  28  * Please send any bug reports or fixes you make to the
  29  * email address(es):
  30  *    lksctp developers <linux-sctp@vger.kernel.org>
  31  *
  32  * Written or modified by:
  33  *    La Monte H.P. Yarroll <piggy@acm.org>
  34  *    Karl Knutson          <karl@athena.chicago.il.us>
  35  *    Jon Grimm             <jgrimm@us.ibm.com>
  36  *    Xingang Guo           <xingang.guo@intel.com>
  37  *    Hui Huang             <hui.huang@nokia.com>
  38  *    Sridhar Samudrala     <sri@us.ibm.com>
  39  *    Daisy Chang           <daisyc@us.ibm.com>
  40  *    Ryan Layer            <rmlayer@us.ibm.com>
  41  *    Kevin Gao             <kevin.gao@intel.com>
  42  */
  43
  44 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  45
  46 #include <linux/types.h>
  47 #include <linux/fcntl.h>
  48 #include <linux/poll.h>
  49 #include <linux/init.h>
  50
  51 #include <linux/slab.h>
  52 #include <linux/in.h>
  53 #include <net/ipv6.h>
  54 #include <net/sctp/sctp.h>
  55 #include <net/sctp/sm.h>
  56
  57 /* Forward declarations for internal functions. */
  58 static void sctp_select_active_and_retran_path(struct sctp_association *asoc);
  59 static void sctp_assoc_bh_rcv(struct work_struct *work);
  60 static void sctp_assoc_free_asconf_acks(struct sctp_association *asoc);
  61 static void sctp_assoc_free_asconf_queue(struct sctp_association *asoc);
  62
  63 /* 1st Level Abstractions. */
  64
  65 /* Initialize a new association from provided memory. */
  66 static struct sctp_association *sctp_association_init(struct sctp_association *asoc,
  67                                           const struct sctp_endpoint *ep,
  68                                           const struct sock *sk,
  69                                           sctp_scope_t scope,
  70                                           gfp_t gfp)
  71 {
  72         struct net *net = sock_net(sk);
  73         struct sctp_sock *sp;
  74         int i;
  75         sctp_paramhdr_t *p;
  76         int err;
  77
  78         /* Retrieve the SCTP per socket area.  */
  79         sp = sctp_sk((struct sock *)sk);
  80
  81         /* Discarding const is appropriate here.  */
  82         asoc->ep = (struct sctp_endpoint *)ep;
  83         asoc->base.sk = (struct sock *)sk;
  84         asoc->base.net = sock_net(sk);
  85
  86         sctp_endpoint_hold(asoc->ep);
  87         sock_hold(asoc->base.sk);
  88
  89         /* Initialize the common base substructure.  */
  90         asoc->base.type = SCTP_EP_TYPE_ASSOCIATION;
  91
  92         /* Initialize the object handling fields.  */
  93         atomic_set(&asoc->base.refcnt, 1);
  94
  95         /* Initialize the bind addr area.  */
  96         sctp_bind_addr_init(&asoc->base.bind_addr, ep->base.bind_addr.port);
  97
  98         asoc->state = SCTP_STATE_CLOSED;
  99         asoc->cookie_life = ms_to_ktime(sp->assocparams.sasoc_cookie_life);
 100         asoc->user_frag = sp->user_frag;
 101
 102         /* Set the association max_retrans and RTO values from the
 103          * socket values.
 104          */
 105         asoc->max_retrans = sp->assocparams.sasoc_asocmaxrxt;
 106         asoc->pf_retrans  = net->sctp.pf_retrans;
 107
 108         asoc->rto_initial = msecs_to_jiffies(sp->rtoinfo.srto_initial);
 109         asoc->rto_max = msecs_to_jiffies(sp->rtoinfo.srto_max);
 110         asoc->rto_min = msecs_to_jiffies(sp->rtoinfo.srto_min);
 111
 112         /* Initialize the association's heartbeat interval based on the
 113          * sock configured value.
 114          */
 115         asoc->hbinterval = msecs_to_jiffies(sp->hbinterval);
 116
 117         /* Initialize path max retrans value. */
 118         asoc->pathmaxrxt = sp->pathmaxrxt;
 119
 120         /* Initialize default path MTU. */
 121         asoc->pathmtu = sp->pathmtu;
 122
 123         /* Set association default SACK delay */
 124         asoc->sackdelay = msecs_to_jiffies(sp->sackdelay);
 125         asoc->sackfreq = sp->sackfreq;
 126
 127         /* Set the association default flags controlling
 128          * Heartbeat, SACK delay, and Path MTU Discovery.
 129          */
 130         asoc->param_flags = sp->param_flags;
 131
 132         /* Initialize the maximum number of new data packets that can be sent
 133          * in a burst.
 134          */
 135         asoc->max_burst = sp->max_burst;
 136
 137         /* initialize association timers */
 138         asoc->timeouts[SCTP_EVENT_TIMEOUT_T1_COOKIE] = asoc->rto_initial;
 139         asoc->timeouts[SCTP_EVENT_TIMEOUT_T1_INIT] = asoc->rto_initial;
 140         asoc->timeouts[SCTP_EVENT_TIMEOUT_T2_SHUTDOWN] = asoc->rto_initial;
 141
 142         /* sctpimpguide Section 2.12.2
 143          * If the 'T5-shutdown-guard' timer is used, it SHOULD be set to the
 144          * recommended value of 5 times 'RTO.Max'.
 145          */
 146         asoc->timeouts[SCTP_EVENT_TIMEOUT_T5_SHUTDOWN_GUARD]
 147                 = 5 * asoc->rto_max;
 148
 149         asoc->timeouts[SCTP_EVENT_TIMEOUT_SACK] = asoc->sackdelay;
 150         asoc->timeouts[SCTP_EVENT_TIMEOUT_AUTOCLOSE] = sp->autoclose * HZ;
 151
 152         /* Initializes the timers */
 153         for (i = SCTP_EVENT_TIMEOUT_NONE; i < SCTP_NUM_TIMEOUT_TYPES; ++i)
 154                 setup_timer(&asoc->timers[i], sctp_timer_events[i],
 155                                 (unsigned long)asoc);
 156
 157         /* Pull default initialization values from the sock options.
 158          * Note: This assumes that the values have already been
 159          * validated in the sock.
 160          */
 161         asoc->c.sinit_max_instreams = sp->initmsg.sinit_max_instreams;
 162         asoc->c.sinit_num_ostreams  = sp->initmsg.sinit_num_ostreams;
 163         asoc->max_init_attempts = sp->initmsg.sinit_max_attempts;
 164
 165         asoc->max_init_timeo =
 166                  msecs_to_jiffies(sp->initmsg.sinit_max_init_timeo);
 167
 168         /* Set the local window size for receive.
 169          * This is also the rcvbuf space per association.
 170          * RFC 6 - A SCTP receiver MUST be able to receive a minimum of
 171          * 1500 bytes in one SCTP packet.
 172          */
 173         if ((sk->sk_rcvbuf/2) < SCTP_DEFAULT_MINWINDOW)
 174                 asoc->rwnd = SCTP_DEFAULT_MINWINDOW;
 175         else
 176                 asoc->rwnd = sk->sk_rcvbuf/2;
 177
 178         asoc->a_rwnd = asoc->rwnd;
 179
 180         /* Use my own max window until I learn something better.  */
 181         asoc->peer.rwnd = SCTP_DEFAULT_MAXWINDOW;
 182
 183         /* Initialize the receive memory counter */
 184         atomic_set(&asoc->rmem_alloc, 0);
 185
 186         init_waitqueue_head(&asoc->wait);
 187
 188         asoc->c.my_vtag = sctp_generate_tag(ep);
 189         asoc->c.my_port = ep->base.bind_addr.port;
 190
 191         asoc->c.initial_tsn = sctp_generate_tsn(ep);
 192
 193         asoc->next_tsn = asoc->c.initial_tsn;
 194
 195         asoc->ctsn_ack_point = asoc->next_tsn - 1;
 196         asoc->adv_peer_ack_point = asoc->ctsn_ack_point;
 197         asoc->highest_sacked = asoc->ctsn_ack_point;
 198         asoc->last_cwr_tsn = asoc->ctsn_ack_point;
 199
 200         /* ADDIP Section 4.1 Asconf Chunk Procedures
 201          *
 202          * When an endpoint has an ASCONF signaled change to be sent to the
 203          * remote endpoint it should do the following:
 204          * ...
 205          * A2) a serial number should be assigned to the chunk. The serial
 206          * number SHOULD be a monotonically increasing number. The serial
 207          * numbers SHOULD be initialized at the start of the
 208          * association to the same value as the initial TSN.
 209          */
 210         asoc->addip_serial = asoc->c.initial_tsn;
 211
 212         INIT_LIST_HEAD(&asoc->addip_chunk_list);
 213         INIT_LIST_HEAD(&asoc->asconf_ack_list);
 214
 215         /* Make an empty list of remote transport addresses.  */
 216         INIT_LIST_HEAD(&asoc->peer.transport_addr_list);
 217
 218         /* RFC 2960 5.1 Normal Establishment of an Association
 219          *
 220          * After the reception of the first data chunk in an
 221          * association the endpoint must immediately respond with a
 222          * sack to acknowledge the data chunk.  Subsequent
 223          * acknowledgements should be done as described in Section
 224          * 6.2.
 225          *
 226          * [We implement this by telling a new association that it
 227          * already received one packet.]
 228          */
 229         asoc->peer.sack_needed = 1;
 230         asoc->peer.sack_generation = 1;
 231
 232         /* Assume that the peer will tell us if he recognizes ASCONF
 233          * as part of INIT exchange.
 234          * The sctp_addip_noauth option is there for backward compatibility
 235          * and will revert old behavior.
 236          */
 237         if (net->sctp.addip_noauth)
 238                 asoc->peer.asconf_capable = 1;
 239
 240         /* Create an input queue.  */
 241         sctp_inq_init(&asoc->base.inqueue);
 242         sctp_inq_set_th_handler(&asoc->base.inqueue, sctp_assoc_bh_rcv);
 243
 244         /* Create an output queue.  */
 245         sctp_outq_init(asoc, &asoc->outqueue);
 246
 247         if (!sctp_ulpq_init(&asoc->ulpq, asoc))
 248                 goto fail_init;
 249
 250         /* Assume that peer would support both address types unless we are
 251          * told otherwise.
 252          */
 253         asoc->peer.ipv4_address = 1;
 254         if (asoc->base.sk->sk_family == PF_INET6)
 255                 asoc->peer.ipv6_address = 1;
 256         INIT_LIST_HEAD(&asoc->asocs);
 257
 258         asoc->default_stream = sp->default_stream;
 259         asoc->default_ppid = sp->default_ppid;
 260         asoc->default_flags = sp->default_flags;
 261         asoc->default_context = sp->default_context;
 262         asoc->default_timetolive = sp->default_timetolive;
 263         asoc->default_rcv_context = sp->default_rcv_context;
 264
 265         /* AUTH related initializations */
 266         INIT_LIST_HEAD(&asoc->endpoint_shared_keys);
 267         err = sctp_auth_asoc_copy_shkeys(ep, asoc, gfp);
 268         if (err)
 269                 goto fail_init;
 270
 271         asoc->active_key_id = ep->active_key_id;
 272         asoc->prsctp_enable = ep->prsctp_enable;
 273
 274         /* Save the hmacs and chunks list into this association */
 275         if (ep->auth_hmacs_list)
 276                 memcpy(asoc->c.auth_hmacs, ep->auth_hmacs_list,
 277                         ntohs(ep->auth_hmacs_list->param_hdr.length));
 278         if (ep->auth_chunk_list)
 279                 memcpy(asoc->c.auth_chunks, ep->auth_chunk_list,
 280                         ntohs(ep->auth_chunk_list->param_hdr.length));
 281
 282         /* Get the AUTH random number for this association */
 283         p = (sctp_paramhdr_t *)asoc->c.auth_random;
 284         p->type = SCTP_PARAM_RANDOM;
 285         p->length = htons(sizeof(sctp_paramhdr_t) + SCTP_AUTH_RANDOM_LENGTH);
 286         get_random_bytes(p+1, SCTP_AUTH_RANDOM_LENGTH);
 287
 288         return asoc;
 289
 290 fail_init:
 291         sock_put(asoc->base.sk);
 292         sctp_endpoint_put(asoc->ep);
 293         return NULL;
 294 }
 295
 296 /* Allocate and initialize a new association */
 297 struct sctp_association *sctp_association_new(const struct sctp_endpoint *ep,
 298                                          const struct sock *sk,
 299                                          sctp_scope_t scope,
 300                                          gfp_t gfp)
 301 {
 302         struct sctp_association *asoc;
 303
 304         asoc = kzalloc(sizeof(*asoc), gfp);
 305         if (!asoc)
 306                 goto fail;
 307
 308         if (!sctp_association_init(asoc, ep, sk, scope, gfp))
 309                 goto fail_init;
 310
 311         SCTP_DBG_OBJCNT_INC(assoc);
 312
 313         pr_debug("Created asoc %p\n", asoc);
 314
 315         return asoc;
 316
 317 fail_init:
 318         kfree(asoc);
 319 fail:
 320         return NULL;
 321 }
 322
 323 /* Free this association if possible.  There may still be users, so
 324  * the actual deallocation may be delayed.
 325  */
 326 void sctp_association_free(struct sctp_association *asoc)
 327 {
 328         struct sock *sk = asoc->base.sk;
 329         struct sctp_transport *transport;
 330         struct list_head *pos, *temp;
 331         int i;
 332
 333         /* Only real associations count against the endpoint, so
 334          * don't bother for if this is a temporary association.
 335          */
 336         if (!list_empty(&asoc->asocs)) {
 337                 list_del(&asoc->asocs);
 338
 339                 /* Decrement the backlog value for a TCP-style listening
 340                  * socket.
 341                  */
 342                 if (sctp_style(sk, TCP) && sctp_sstate(sk, LISTENING))
 343                         sk->sk_ack_backlog--;
 344         }
 345
 346         /* Mark as dead, so other users can know this structure is
 347          * going away.
 348          */
 349         asoc->base.dead = true;
 350
 351         /* Dispose of any data lying around in the outqueue. */
 352         sctp_outq_free(&asoc->outqueue);
 353
 354         /* Dispose of any pending messages for the upper layer. */
 355         sctp_ulpq_free(&asoc->ulpq);
 356
 357         /* Dispose of any pending chunks on the inqueue. */
 358         sctp_inq_free(&asoc->base.inqueue);
 359
 360         sctp_tsnmap_free(&asoc->peer.tsn_map);
 361
 362         /* Free ssnmap storage. */
 363         sctp_ssnmap_free(asoc->ssnmap);
 364
 365         /* Clean up the bound address list. */
 366         sctp_bind_addr_free(&asoc->base.bind_addr);
 367
 368         /* Do we need to go through all of our timers and
 369          * delete them?   To be safe we will try to delete all, but we
 370          * should be able to go through and make a guess based
 371          * on our state.
 372          */
 373         for (i = SCTP_EVENT_TIMEOUT_NONE; i < SCTP_NUM_TIMEOUT_TYPES; ++i) {
 374                 if (del_timer(&asoc->timers[i]))
 375                         sctp_association_put(asoc);
 376         }
 377
 378         /* Free peer's cached cookie. */
 379         kfree(asoc->peer.cookie);
 380         kfree(asoc->peer.peer_random);
 381         kfree(asoc->peer.peer_chunks);
 382         kfree(asoc->peer.peer_hmacs);
 383
 384         /* Release the transport structures. */
 385         list_for_each_safe(pos, temp, &asoc->peer.transport_addr_list) {
 386                 transport = list_entry(pos, struct sctp_transport, transports);
 387                 list_del_rcu(pos);
 388                 sctp_unhash_transport(transport);
 389                 sctp_transport_free(transport);
 390         }
 391
 392         asoc->peer.transport_count = 0;
 393
 394         sctp_asconf_queue_teardown(asoc);
 395
 396         /* Free pending address space being deleted */
 397         kfree(asoc->asconf_addr_del_pending);
 398
 399         /* AUTH - Free the endpoint shared keys */
 400         sctp_auth_destroy_keys(&asoc->endpoint_shared_keys);
 401
 402         /* AUTH - Free the association shared key */
 403         sctp_auth_key_put(asoc->asoc_shared_key);
 404
 405         sctp_association_put(asoc);
 406 }
 407
 408 /* Cleanup and free up an association. */
 409 static void sctp_association_destroy(struct sctp_association *asoc)
 410 {
 411         if (unlikely(!asoc->base.dead)) {
 412                 WARN(1, "Attempt to destroy undead association %p!\n", asoc);
 413                 return;
 414         }
 415
 416         sctp_endpoint_put(asoc->ep);
 417         sock_put(asoc->base.sk);
 418
 419         if (asoc->assoc_id != 0) {
 420                 spin_lock_bh(&sctp_assocs_id_lock);
 421                 idr_remove(&sctp_assocs_id, asoc->assoc_id);
 422                 spin_unlock_bh(&sctp_assocs_id_lock);
 423         }
 424
 425         WARN_ON(atomic_read(&asoc->rmem_alloc));
 426
 427         kfree(asoc);
 428         SCTP_DBG_OBJCNT_DEC(assoc);
 429 }
 430
 431 /* Change the primary destination address for the peer. */
 432 void sctp_assoc_set_primary(struct sctp_association *asoc,
 433                             struct sctp_transport *transport)
 434 {
 435         int changeover = 0;
 436
 437         /* it's a changeover only if we already have a primary path
 438          * that we are changing
 439          */
 440         if (asoc->peer.primary_path != NULL &&
 441             asoc->peer.primary_path != transport)
 442                 changeover = 1 ;
 443
 444         asoc->peer.primary_path = transport;
 445
 446         /* Set a default msg_name for events. */
 447         memcpy(&asoc->peer.primary_addr, &transport->ipaddr,
 448                sizeof(union sctp_addr));
 449
 450         /* If the primary path is changing, assume that the
 451          * user wants to use this new path.
 452          */
 453         if ((transport->state == SCTP_ACTIVE) ||
 454             (transport->state == SCTP_UNKNOWN))
 455                 asoc->peer.active_path = transport;
 456
 457         /*
 458          * SFR-CACC algorithm:
 459          * Upon the receipt of a request to change the primary
 460          * destination address, on the data structure for the new
 461          * primary destination, the sender MUST do the following:
 462          *
 463          * 1) If CHANGEOVER_ACTIVE is set, then there was a switch
 464          * to this destination address earlier. The sender MUST set
 465          * CYCLING_CHANGEOVER to indicate that this switch is a
 466          * double switch to the same destination address.
 467          *
 468          * Really, only bother is we have data queued or outstanding on
 469          * the association.
 470          */
 471         if (!asoc->outqueue.outstanding_bytes && !asoc->outqueue.out_qlen)
 472                 return;
 473
 474         if (transport->cacc.changeover_active)
 475                 transport->cacc.cycling_changeover = changeover;
 476
 477         /* 2) The sender MUST set CHANGEOVER_ACTIVE to indicate that
 478          * a changeover has occurred.
 479          */
 480         transport->cacc.changeover_active = changeover;
 481
 482         /* 3) The sender MUST store the next TSN to be sent in
 483          * next_tsn_at_change.
 484          */
 485         transport->cacc.next_tsn_at_change = asoc->next_tsn;
 486 }
 487
 488 /* Remove a transport from an association.  */
 489 void sctp_assoc_rm_peer(struct sctp_association *asoc,
 490                         struct sctp_transport *peer)
 491 {
 492         struct sctp_transport *transport;
 493         struct list_head *pos;
 494         struct sctp_chunk *ch;
 495
 496         pr_debug("%s: association:%p addr:%pISpc\n",
 497                  __func__, asoc, &peer->ipaddr.sa);
 498
 499         /* If we are to remove the current retran_path, update it
 500          * to the next peer before removing this peer from the list.
 501          */
 502         if (asoc->peer.retran_path == peer)
 503                 sctp_assoc_update_retran_path(asoc);
 504
 505         /* Remove this peer from the list. */
 506         list_del_rcu(&peer->transports);
 507         /* Remove this peer from the transport hashtable */
 508         sctp_unhash_transport(peer);
 509
 510         /* Get the first transport of asoc. */
 511         pos = asoc->peer.transport_addr_list.next;
 512         transport = list_entry(pos, struct sctp_transport, transports);
 513
 514         /* Update any entries that match the peer to be deleted. */
 515         if (asoc->peer.primary_path == peer)
 516                 sctp_assoc_set_primary(asoc, transport);
 517         if (asoc->peer.active_path == peer)
 518                 asoc->peer.active_path = transport;
 519         if (asoc->peer.retran_path == peer)
 520                 asoc->peer.retran_path = transport;
 521         if (asoc->peer.last_data_from == peer)
 522                 asoc->peer.last_data_from = transport;
 523
 524         /* If we remove the transport an INIT was last sent to, set it to
 525          * NULL. Combined with the update of the retran path above, this
 526          * will cause the next INIT to be sent to the next available
 527          * transport, maintaining the cycle.
 528          */
 529         if (asoc->init_last_sent_to == peer)
 530                 asoc->init_last_sent_to = NULL;
 531
 532         /* If we remove the transport an SHUTDOWN was last sent to, set it
 533          * to NULL. Combined with the update of the retran path above, this
 534          * will cause the next SHUTDOWN to be sent to the next available
 535          * transport, maintaining the cycle.
 536          */
 537         if (asoc->shutdown_last_sent_to == peer)
 538                 asoc->shutdown_last_sent_to = NULL;
 539
 540         /* If we remove the transport an ASCONF was last sent to, set it to
 541          * NULL.
 542          */
 543         if (asoc->addip_last_asconf &&
 544             asoc->addip_last_asconf->transport == peer)
 545                 asoc->addip_last_asconf->transport = NULL;
 546
 547         /* If we have something on the transmitted list, we have to
 548          * save it off.  The best place is the active path.
 549          */
 550         if (!list_empty(&peer->transmitted)) {
 551                 struct sctp_transport *active = asoc->peer.active_path;
 552
 553                 /* Reset the transport of each chunk on this list */
 554                 list_for_each_entry(ch, &peer->transmitted,
 555                                         transmitted_list) {
 556                         ch->transport = NULL;
 557                         ch->rtt_in_progress = 0;
 558                 }
 559
 560                 list_splice_tail_init(&peer->transmitted,
 561                                         &active->transmitted);
 562
 563                 /* Start a T3 timer here in case it wasn't running so
 564                  * that these migrated packets have a chance to get
 565                  * retransmitted.
 566                  */
 567                 if (!timer_pending(&active->T3_rtx_timer))
 568                         if (!mod_timer(&active->T3_rtx_timer,
 569                                         jiffies + active->rto))
 570                                 sctp_transport_hold(active);
 571         }
 572
 573         list_for_each_entry(ch, &asoc->outqueue.out_chunk_list, list)
 574                 if (ch->transport == peer)
 575                         ch->transport = NULL;
 576
 577         asoc->peer.transport_count--;
 578
 579         sctp_transport_free(peer);
 580 }
 581
 582 /* Add a transport address to an association.  */
 583 struct sctp_transport *sctp_assoc_add_peer(struct sctp_association *asoc,
 584                                            const union sctp_addr *addr,
 585                                            const gfp_t gfp,
 586                                            const int peer_state)
 587 {
 588         struct net *net = sock_net(asoc->base.sk);
 589         struct sctp_transport *peer;
 590         struct sctp_sock *sp;
 591         unsigned short port;
 592
 593         sp = sctp_sk(asoc->base.sk);
 594
 595         /* AF_INET and AF_INET6 share common port field. */
 596         port = ntohs(addr->v4.sin_port);
 597
 598         pr_debug("%s: association:%p addr:%pISpc state:%d\n", __func__,
 599                  asoc, &addr->sa, peer_state);
 600
 601         /* Set the port if it has not been set yet.  */
 602         if (0 == asoc->peer.port)
 603                 asoc->peer.port = port;
 604
 605         /* Check to see if this is a duplicate. */
 606         peer = sctp_assoc_lookup_paddr(asoc, addr);
 607         if (peer) {
 608                 /* An UNKNOWN state is only set on transports added by
 609                  * user in sctp_connectx() call.  Such transports should be
 610                  * considered CONFIRMED per RFC 4960, Section 5.4.
 611                  */
 612                 if (peer->state == SCTP_UNKNOWN) {
 613                         peer->state = SCTP_ACTIVE;
 614                 }
 615                 return peer;
 616         }
 617
 618         peer = sctp_transport_new(net, addr, gfp);
 619         if (!peer)
 620                 return NULL;
 621
 622         sctp_transport_set_owner(peer, asoc);
 623
 624         /* Initialize the peer's heartbeat interval based on the
 625          * association configured value.
 626          */
 627         peer->hbinterval = asoc->hbinterval;
 628
 629         /* Set the path max_retrans.  */
 630         peer->pathmaxrxt = asoc->pathmaxrxt;
 631
 632         /* And the partial failure retrans threshold */
 633         peer->pf_retrans = asoc->pf_retrans;
 634
 635         /* Initialize the peer's SACK delay timeout based on the
 636          * association configured value.
 637          */
 638         peer->sackdelay = asoc->sackdelay;
 639         peer->sackfreq = asoc->sackfreq;
 640
 641         /* Enable/disable heartbeat, SACK delay, and path MTU discovery
 642          * based on association setting.
 643          */
 644         peer->param_flags = asoc->param_flags;
 645
 646         sctp_transport_route(peer, NULL, sp);
 647
 648         /* Initialize the pmtu of the transport. */
 649         if (peer->param_flags & SPP_PMTUD_DISABLE) {
 650                 if (asoc->pathmtu)
 651                         peer->pathmtu = asoc->pathmtu;
 652                 else
 653                         peer->pathmtu = SCTP_DEFAULT_MAXSEGMENT;
 654         }
 655
 656         /* If this is the first transport addr on this association,
 657          * initialize the association PMTU to the peer's PMTU.
 658          * If not and the current association PMTU is higher than the new
 659          * peer's PMTU, reset the association PMTU to the new peer's PMTU.
 660          */
 661         if (asoc->pathmtu)
 662                 asoc->pathmtu = min_t(int, peer->pathmtu, asoc->pathmtu);
 663         else
 664                 asoc->pathmtu = peer->pathmtu;
 665
 666         pr_debug("%s: association:%p PMTU set to %d\n", __func__, asoc,
 667                  asoc->pathmtu);
 668
 669         peer->pmtu_pending = 0;
 670
 671         asoc->frag_point = sctp_frag_point(asoc, asoc->pathmtu);
 672
 673         /* The asoc->peer.port might not be meaningful yet, but
 674          * initialize the packet structure anyway.
 675          */
 676         sctp_packet_init(&peer->packet, peer, asoc->base.bind_addr.port,
 677                          asoc->peer.port);
 678
 679         /* 7.2.1 Slow-Start
 680          *
 681          * o The initial cwnd before DATA transmission or after a sufficiently
 682          *   long idle period MUST be set to
 683          *      min(4*MTU, max(2*MTU, 4380 bytes))
 684          *
 685          * o The initial value of ssthresh MAY be arbitrarily high
 686          *   (for example, implementations MAY use the size of the
 687          *   receiver advertised window).
 688          */
 689         peer->cwnd = min(4*asoc->pathmtu, max_t(__u32, 2*asoc->pathmtu, 4380));
 690
 691         /* At this point, we may not have the receiver's advertised window,
 692          * so initialize ssthresh to the default value and it will be set
 693          * later when we process the INIT.
 694          */
 695         peer->ssthresh = SCTP_DEFAULT_MAXWINDOW;
 696
 697         peer->partial_bytes_acked = 0;
 698         peer->flight_size = 0;
 699         peer->burst_limited = 0;
 700
 701         /* Set the transport's RTO.initial value */
 702         peer->rto = asoc->rto_initial;
 703         sctp_max_rto(asoc, peer);
 704
 705         /* Set the peer's active state. */
 706         peer->state = peer_state;
 707
 708         /* Attach the remote transport to our asoc.  */
 709         list_add_tail_rcu(&peer->transports, &asoc->peer.transport_addr_list);
 710         asoc->peer.transport_count++;
 711         /* Add this peer into the transport hashtable */
 712         sctp_hash_transport(peer);
 713
 714         /* If we do not yet have a primary path, set one.  */
 715         if (!asoc->peer.primary_path) {
 716                 sctp_assoc_set_primary(asoc, peer);
 717                 asoc->peer.retran_path = peer;
 718         }
 719
 720         if (asoc->peer.active_path == asoc->peer.retran_path &&
 721             peer->state != SCTP_UNCONFIRMED) {
 722                 asoc->peer.retran_path = peer;
 723         }
 724
 725         return peer;
 726 }
 727
 728 /* Delete a transport address from an association.  */
 729 void sctp_assoc_del_peer(struct sctp_association *asoc,
 730                          const union sctp_addr *addr)
 731 {
 732         struct list_head        *pos;
 733         struct list_head        *temp;
 734         struct sctp_transport   *transport;
 735
 736         list_for_each_safe(pos, temp, &asoc->peer.transport_addr_list) {
 737                 transport = list_entry(pos, struct sctp_transport, transports);
 738                 if (sctp_cmp_addr_exact(addr, &transport->ipaddr)) {
 739                         /* Do book keeping for removing the peer and free it. */
 740                         sctp_assoc_rm_peer(asoc, transport);
 741                         break;
 742                 }
 743         }
 744 }
 745
 746 /* Lookup a transport by address. */
 747 struct sctp_transport *sctp_assoc_lookup_paddr(
 748                                         const struct sctp_association *asoc,
 749                                         const union sctp_addr *address)
 750 {
 751         struct sctp_transport *t;
 752
 753         /* Cycle through all transports searching for a peer address. */
 754
 755         list_for_each_entry(t, &asoc->peer.transport_addr_list,
 756                         transports) {
 757                 if (sctp_cmp_addr_exact(address, &t->ipaddr))
 758                         return t;
 759         }
 760
 761         return NULL;
 762 }
 763
 764 /* Remove all transports except a give one */
 765 void sctp_assoc_del_nonprimary_peers(struct sctp_association *asoc,
 766                                      struct sctp_transport *primary)
 767 {
 768         struct sctp_transport   *temp;
 769         struct sctp_transport   *t;
 770
 771         list_for_each_entry_safe(t, temp, &asoc->peer.transport_addr_list,
 772                                  transports) {
 773                 /* if the current transport is not the primary one, delete it */
 774                 if (t != primary)
 775                         sctp_assoc_rm_peer(asoc, t);
 776         }
 777 }
 778
 779 /* Engage in transport control operations.
 780  * Mark the transport up or down and send a notification to the user.
 781  * Select and update the new active and retran paths.
 782  */
 783 void sctp_assoc_control_transport(struct sctp_association *asoc,
 784                                   struct sctp_transport *transport,
 785                                   sctp_transport_cmd_t command,
 786                                   sctp_sn_error_t error)
 787 {
 788         struct sctp_ulpevent *event;
 789         struct sockaddr_storage addr;
 790         int spc_state = 0;
 791         bool ulp_notify = true;
 792
 793         /* Record the transition on the transport.  */
 794         switch (command) {
 795         case SCTP_TRANSPORT_UP:
 796                 /* If we are moving from UNCONFIRMED state due
 797                  * to heartbeat success, report the SCTP_ADDR_CONFIRMED
 798                  * state to the user, otherwise report SCTP_ADDR_AVAILABLE.
 799                  */
 800                 if (SCTP_UNCONFIRMED == transport->state &&
 801                     SCTP_HEARTBEAT_SUCCESS == error)
 802                         spc_state = SCTP_ADDR_CONFIRMED;
 803                 else
 804                         spc_state = SCTP_ADDR_AVAILABLE;
 805                 /* Don't inform ULP about transition from PF to
 806                  * active state and set cwnd to 1 MTU, see SCTP
 807                  * Quick failover draft section 5.1, point 5
 808                  */
 809                 if (transport->state == SCTP_PF) {
 810                         ulp_notify = false;
 811                         transport->cwnd = asoc->pathmtu;
 812                 }
 813                 transport->state = SCTP_ACTIVE;
 814                 break;
 815
 816         case SCTP_TRANSPORT_DOWN:
 817                 /* If the transport was never confirmed, do not transition it
 818                  * to inactive state.  Also, release the cached route since
 819                  * there may be a better route next time.
 820                  */
 821                 if (transport->state != SCTP_UNCONFIRMED)
 822                         transport->state = SCTP_INACTIVE;
 823                 else {
 824                         dst_release(transport->dst);
 825                         transport->dst = NULL;
 826                         ulp_notify = false;
 827                 }
 828
 829                 spc_state = SCTP_ADDR_UNREACHABLE;
 830                 break;
 831
 832         case SCTP_TRANSPORT_PF:
 833                 transport->state = SCTP_PF;
 834                 ulp_notify = false;
 835                 break;
 836
 837         default:
 838                 return;
 839         }
 840
 841         /* Generate and send a SCTP_PEER_ADDR_CHANGE notification
 842          * to the user.
 843          */
 844         if (ulp_notify) {
 845                 memset(&addr, 0, sizeof(struct sockaddr_storage));
 846                 memcpy(&addr, &transport->ipaddr,
 847                        transport->af_specific->sockaddr_len);
 848
 849                 event = sctp_ulpevent_make_peer_addr_change(asoc, &addr,
 850                                         0, spc_state, error, GFP_ATOMIC);
 851                 if (event)
 852                         sctp_ulpq_tail_event(&asoc->ulpq, event);
 853         }
 854
 855         /* Select new active and retran paths. */
 856         sctp_select_active_and_retran_path(asoc);
 857 }
 858
 859 /* Hold a reference to an association. */
 860 void sctp_association_hold(struct sctp_association *asoc)
 861 {
 862         atomic_inc(&asoc->base.refcnt);
 863 }
 864
 865 /* Release a reference to an association and cleanup
 866  * if there are no more references.
 867  */
 868 void sctp_association_put(struct sctp_association *asoc)
 869 {
 870         if (atomic_dec_and_test(&asoc->base.refcnt))
 871                 sctp_association_destroy(asoc);
 872 }
 873
 874 /* Allocate the next TSN, Transmission Sequence Number, for the given
 875  * association.
 876  */
 877 __u32 sctp_association_get_next_tsn(struct sctp_association *asoc)
 878 {
 879         /* From Section 1.6 Serial Number Arithmetic:
 880          * Transmission Sequence Numbers wrap around when they reach
 881          * 2**32 - 1.  That is, the next TSN a DATA chunk MUST use
 882          * after transmitting TSN = 2*32 - 1 is TSN = 0.
 883          */
 884         __u32 retval = asoc->next_tsn;
 885         asoc->next_tsn++;
 886         asoc->unack_data++;
 887
 888         return retval;
 889 }
 890
 891 /* Compare two addresses to see if they match.  Wildcard addresses
 892  * only match themselves.
 893  */
 894 int sctp_cmp_addr_exact(const union sctp_addr *ss1,
 895                         const union sctp_addr *ss2)
 896 {
 897         struct sctp_af *af;
 898
 899         af = sctp_get_af_specific(ss1->sa.sa_family);
 900         if (unlikely(!af))
 901                 return 0;
 902
 903         return af->cmp_addr(ss1, ss2);
 904 }
 905
 906 /* Return an ecne chunk to get prepended to a packet.
 907  * Note:  We are sly and return a shared, prealloced chunk.  FIXME:
 908  * No we don't, but we could/should.
 909  */
 910 struct sctp_chunk *sctp_get_ecne_prepend(struct sctp_association *asoc)
 911 {
 912         if (!asoc->need_ecne)
 913                 return NULL;
 914
 915         /* Send ECNE if needed.
 916          * Not being able to allocate a chunk here is not deadly.
 917          */
 918         return sctp_make_ecne(asoc, asoc->last_ecne_tsn);
 919 }
 920
 921 /*
 922  * Find which transport this TSN was sent on.
 923  */
 924 struct sctp_transport *sctp_assoc_lookup_tsn(struct sctp_association *asoc,
 925                                              __u32 tsn)
 926 {
 927         struct sctp_transport *active;
 928         struct sctp_transport *match;
 929         struct sctp_transport *transport;
 930         struct sctp_chunk *chunk;
 931         __be32 key = htonl(tsn);
 932
 933         match = NULL;
 934
 935         /*
 936          * FIXME: In general, find a more efficient data structure for
 937          * searching.
 938          */
 939
 940         /*
 941          * The general strategy is to search each transport's transmitted
 942          * list.   Return which transport this TSN lives on.
 943          *
 944          * Let's be hopeful and check the active_path first.
 945          * Another optimization would be to know if there is only one
 946          * outbound path and not have to look for the TSN at all.
 947          *
 948          */
 949
 950         active = asoc->peer.active_path;
 951
 952         list_for_each_entry(chunk, &active->transmitted,
 953                         transmitted_list) {
 954
 955                 if (key == chunk->subh.data_hdr->tsn) {
 956                         match = active;
 957                         goto out;
 958                 }
 959         }
 960
 961         /* If not found, go search all the other transports. */
 962         list_for_each_entry(transport, &asoc->peer.transport_addr_list,
 963                         transports) {
 964
 965                 if (transport == active)
 966                         continue;
 967                 list_for_each_entry(chunk, &transport->transmitted,
 968                                 transmitted_list) {
 969                         if (key == chunk->subh.data_hdr->tsn) {
 970                                 match = transport;
 971                                 goto out;
 972                         }
 973                 }
 974         }
 975 out:
 976         return match;
 977 }
 978
 979 /* Is this the association we are looking for? */
 980 struct sctp_transport *sctp_assoc_is_match(struct sctp_association *asoc,
 981                                            struct net *net,
 982                                            const union sctp_addr *laddr,
 983                                            const union sctp_addr *paddr)
 984 {
 985         struct sctp_transport *transport;
 986
 987         if ((htons(asoc->base.bind_addr.port) == laddr->v4.sin_port) &&
 988             (htons(asoc->peer.port) == paddr->v4.sin_port) &&
 989             net_eq(sock_net(asoc->base.sk), net)) {
 990                 transport = sctp_assoc_lookup_paddr(asoc, paddr);
 991                 if (!transport)
 992                         goto out;
 993
 994                 if (sctp_bind_addr_match(&asoc->base.bind_addr, laddr,
 995                                          sctp_sk(asoc->base.sk)))
 996                         goto out;
 997         }
 998         transport = NULL;
 999
1000 out:
1001         return transport;
1002 }
1003
1004 /* Do delayed input processing.  This is scheduled by sctp_rcv(). */
1005 static void sctp_assoc_bh_rcv(struct work_struct *work)
1006 {
1007         struct sctp_association *asoc =
1008                 container_of(work, struct sctp_association,
1009                              base.inqueue.immediate);
1010         struct net *net = sock_net(asoc->base.sk);
1011         struct sctp_endpoint *ep;
1012         struct sctp_chunk *chunk;
1013         struct sctp_inq *inqueue;
1014         sctp_subtype_t subtype;
1015         int first_time = 1;     /* is this the first time through the loop */
1016         int error = 0;
1017         int state;
1018
1019         /* The association should be held so we should be safe. */
1020         ep = asoc->ep;
1021
1022         inqueue = &asoc->base.inqueue;
1023         sctp_association_hold(asoc);
1024         while (NULL != (chunk = sctp_inq_pop(inqueue))) {
1025                 state = asoc->state;
1026                 subtype = SCTP_ST_CHUNK(chunk->chunk_hdr->type);
1027
1028                 /* If the first chunk in the packet is AUTH, do special
1029                  * processing specified in Section 6.3 of SCTP-AUTH spec
1030                  */
1031                 if (first_time && subtype.chunk == SCTP_CID_AUTH) {
1032                         struct sctp_chunkhdr *next_hdr;
1033
1034                         next_hdr = sctp_inq_peek(inqueue);
1035                         if (!next_hdr)
1036                                 goto normal;
1037
1038                         /* If the next chunk is COOKIE-ECHO, skip the AUTH
1039                          * chunk while saving a pointer to it so we can do
1040                          * Authentication later (during cookie-echo
1041                          * processing).
1042                          */
1043                         if (next_hdr->type == SCTP_CID_COOKIE_ECHO) {
1044                                 chunk->auth_chunk = skb_clone(chunk->skb,
1045                                                               GFP_ATOMIC);
1046                                 chunk->auth = 1;
1047                                 continue;
1048                         }
1049                 }
1050
1051 normal:
1052                 /* SCTP-AUTH, Section 6.3:
1053                  *    The receiver has a list of chunk types which it expects
1054                  *    to be received only after an AUTH-chunk.  This list has
1055                  *    been sent to the peer during the association setup.  It
1056                  *    MUST silently discard these chunks if they are not placed
1057                  *    after an AUTH chunk in the packet.
1058                  */
1059                 if (sctp_auth_recv_cid(subtype.chunk, asoc) && !chunk->auth)
1060                         continue;
1061
1062                 /* Remember where the last DATA chunk came from so we
1063                  * know where to send the SACK.
1064                  */
1065                 if (sctp_chunk_is_data(chunk))
1066                         asoc->peer.last_data_from = chunk->transport;
1067                 else {
1068                         SCTP_INC_STATS(net, SCTP_MIB_INCTRLCHUNKS);
1069                         asoc->stats.ictrlchunks++;
1070                         if (chunk->chunk_hdr->type == SCTP_CID_SACK)
1071                                 asoc->stats.isacks++;
1072                 }
1073
1074                 if (chunk->transport)
1075                         chunk->transport->last_time_heard = ktime_get();
1076
1077                 /* Run through the state machine. */
1078                 error = sctp_do_sm(net, SCTP_EVENT_T_CHUNK, subtype,
1079                                    state, ep, asoc, chunk, GFP_ATOMIC);
1080
1081                 /* Check to see if the association is freed in response to
1082                  * the incoming chunk.  If so, get out of the while loop.
1083                  */
1084                 if (asoc->base.dead)
1085                         break;
1086
1087                 /* If there is an error on chunk, discard this packet. */
1088                 if (error && chunk)
1089                         chunk->pdiscard = 1;
1090
1091                 if (first_time)
1092                         first_time = 0;
1093         }
1094         sctp_association_put(asoc);
1095 }
1096
1097 /* This routine moves an association from its old sk to a new sk.  */
1098 void sctp_assoc_migrate(struct sctp_association *assoc, struct sock *newsk)
1099 {
1100         struct sctp_sock *newsp = sctp_sk(newsk);
1101         struct sock *oldsk = assoc->base.sk;
1102
1103         /* Delete the association from the old endpoint's list of
1104          * associations.
1105          */
1106         list_del_init(&assoc->asocs);
1107
1108         /* Decrement the backlog value for a TCP-style socket. */
1109         if (sctp_style(oldsk, TCP))
1110                 oldsk->sk_ack_backlog--;
1111
1112         /* Release references to the old endpoint and the sock.  */
1113         sctp_endpoint_put(assoc->ep);
1114         sock_put(assoc->base.sk);
1115
1116         /* Get a reference to the new endpoint.  */
1117         assoc->ep = newsp->ep;
1118         sctp_endpoint_hold(assoc->ep);
1119
1120         /* Get a reference to the new sock.  */
1121         assoc->base.sk = newsk;
1122         sock_hold(assoc->base.sk);
1123
1124         /* Add the association to the new endpoint's list of associations.  */
1125         sctp_endpoint_add_asoc(newsp->ep, assoc);
1126 }
1127
1128 /* Update an association (possibly from unexpected COOKIE-ECHO processing).  */
1129 void sctp_assoc_update(struct sctp_association *asoc,
1130                        struct sctp_association *new)
1131 {
1132         struct sctp_transport *trans;
1133         struct list_head *pos, *temp;
1134
1135         /* Copy in new parameters of peer. */
1136         asoc->c = new->c;
1137         asoc->peer.rwnd = new->peer.rwnd;
1138         asoc->peer.sack_needed = new->peer.sack_needed;
1139         asoc->peer.auth_capable = new->peer.auth_capable;
1140         asoc->peer.i = new->peer.i;
1141         sctp_tsnmap_init(&asoc->peer.tsn_map, SCTP_TSN_MAP_INITIAL,
1142                          asoc->peer.i.initial_tsn, GFP_ATOMIC);
1143
1144         /* Remove any peer addresses not present in the new association. */
1145         list_for_each_safe(pos, temp, &asoc->peer.transport_addr_list) {
1146                 trans = list_entry(pos, struct sctp_transport, transports);
1147                 if (!sctp_assoc_lookup_paddr(new, &trans->ipaddr)) {
1148                         sctp_assoc_rm_peer(asoc, trans);
1149                         continue;
1150                 }
1151
1152                 if (asoc->state >= SCTP_STATE_ESTABLISHED)
1153                         sctp_transport_reset(trans);
1154         }
1155
1156         /* If the case is A (association restart), use
1157          * initial_tsn as next_tsn. If the case is B, use
1158          * current next_tsn in case data sent to peer
1159          * has been discarded and needs retransmission.
1160          */
1161         if (asoc->state >= SCTP_STATE_ESTABLISHED) {
1162                 asoc->next_tsn = new->next_tsn;
1163                 asoc->ctsn_ack_point = new->ctsn_ack_point;
1164                 asoc->adv_peer_ack_point = new->adv_peer_ack_point;
1165
1166                 /* Reinitialize SSN for both local streams
1167                  * and peer's streams.
1168                  */
1169                 sctp_ssnmap_clear(asoc->ssnmap);
1170
1171                 /* Flush the ULP reassembly and ordered queue.
1172                  * Any data there will now be stale and will
1173                  * cause problems.
1174                  */
1175                 sctp_ulpq_flush(&asoc->ulpq);
1176
1177                 /* reset the overall association error count so
1178                  * that the restarted association doesn't get torn
1179                  * down on the next retransmission timer.
1180                  */
1181                 asoc->overall_error_count = 0;
1182
1183         } else {
1184                 /* Add any peer addresses from the new association. */
1185                 list_for_each_entry(trans, &new->peer.transport_addr_list,
1186                                 transports) {
1187                         if (!sctp_assoc_lookup_paddr(asoc, &trans->ipaddr))
1188                                 sctp_assoc_add_peer(asoc, &trans->ipaddr,
1189                                                     GFP_ATOMIC, trans->state);
1190                 }
1191
1192                 asoc->ctsn_ack_point = asoc->next_tsn - 1;
1193                 asoc->adv_peer_ack_point = asoc->ctsn_ack_point;
1194                 if (!asoc->ssnmap) {
1195                         /* Move the ssnmap. */
1196                         asoc->ssnmap = new->ssnmap;
1197                         new->ssnmap = NULL;
1198                 }
1199
1200                 if (!asoc->assoc_id) {
1201                         /* get a new association id since we don't have one
1202                          * yet.
1203                          */
1204                         sctp_assoc_set_id(asoc, GFP_ATOMIC);
1205                 }
1206         }
1207
1208         /* SCTP-AUTH: Save the peer parameters from the new associations
1209          * and also move the association shared keys over
1210          */
1211         kfree(asoc->peer.peer_random);
1212         asoc->peer.peer_random = new->peer.peer_random;
1213         new->peer.peer_random = NULL;
1214
1215         kfree(asoc->peer.peer_chunks);
1216         asoc->peer.peer_chunks = new->peer.peer_chunks;
1217         new->peer.peer_chunks = NULL;
1218
1219         kfree(asoc->peer.peer_hmacs);
1220         asoc->peer.peer_hmacs = new->peer.peer_hmacs;
1221         new->peer.peer_hmacs = NULL;
1222
1223         sctp_auth_asoc_init_active_key(asoc, GFP_ATOMIC);
1224 }
1225
1226 /* Update the retran path for sending a retransmitted packet.
1227  * See also RFC4960, 6.4. Multi-Homed SCTP Endpoints:
1228  *
1229  *   When there is outbound data to send and the primary path
1230  *   becomes inactive (e.g., due to failures), or where the
1231  *   SCTP user explicitly requests to send data to an
1232  *   inactive destination transport address, before reporting
1233  *   an error to its ULP, the SCTP endpoint should try to send
1234  *   the data to an alternate active destination transport
1235  *   address if one exists.
1236  *
1237  *   When retransmitting data that timed out, if the endpoint
1238  *   is multihomed, it should consider each source-destination
1239  *   address pair in its retransmission selection policy.
1240  *   When retransmitting timed-out data, the endpoint should
1241  *   attempt to pick the most divergent source-destination
1242  *   pair from the original source-destination pair to which
1243  *   the packet was transmitted.
1244  *
1245  *   Note: Rules for picking the most divergent source-destination
1246  *   pair are an implementation decision and are not specified
1247  *   within this document.
1248  *
1249  * Our basic strategy is to round-robin transports in priorities
1250  * according to sctp_trans_score() e.g., if no such
1251  * transport with state SCTP_ACTIVE exists, round-robin through
1252  * SCTP_UNKNOWN, etc. You get the picture.
1253  */
1254 static u8 sctp_trans_score(const struct sctp_transport *trans)
1255 {
1256         switch (trans->state) {
1257         case SCTP_ACTIVE:
1258                 return 3;       /* best case */
1259         case SCTP_UNKNOWN:
1260                 return 2;
1261         case SCTP_PF:
1262                 return 1;
1263         default: /* case SCTP_INACTIVE */
1264                 return 0;       /* worst case */
1265         }
1266 }
1267
1268 static struct sctp_transport *sctp_trans_elect_tie(struct sctp_transport *trans1,
1269                                                    struct sctp_transport *trans2)
1270 {
1271         if (trans1->error_count > trans2->error_count) {
1272                 return trans2;
1273         } else if (trans1->error_count == trans2->error_count &&
1274                    ktime_after(trans2->last_time_heard,
1275                                trans1->last_time_heard)) {
1276                 return trans2;
1277         } else {
1278                 return trans1;
1279         }
1280 }
1281
1282 static struct sctp_transport *sctp_trans_elect_best(struct sctp_transport *curr,
1283                                                     struct sctp_transport *best)
1284 {
1285         u8 score_curr, score_best;
1286
1287         if (best == NULL || curr == best)
1288                 return curr;
1289
1290         score_curr = sctp_trans_score(curr);
1291         score_best = sctp_trans_score(best);
1292
1293         /* First, try a score-based selection if both transport states
1294          * differ. If we're in a tie, lets try to make a more clever
1295          * decision here based on error counts and last time heard.
1296          */
1297         if (score_curr > score_best)
1298                 return curr;
1299         else if (score_curr == score_best)
1300                 return sctp_trans_elect_tie(best, curr);
1301         else
1302                 return best;
1303 }
1304
1305 void sctp_assoc_update_retran_path(struct sctp_association *asoc)
1306 {
1307         struct sctp_transport *trans = asoc->peer.retran_path;
1308         struct sctp_transport *trans_next = NULL;
1309
1310         /* We're done as we only have the one and only path. */
1311         if (asoc->peer.transport_count == 1)
1312                 return;
1313         /* If active_path and retran_path are the same and active,
1314          * then this is the only active path. Use it.
1315          */
1316         if (asoc->peer.active_path == asoc->peer.retran_path &&
1317             asoc->peer.active_path->state == SCTP_ACTIVE)
1318                 return;
1319
1320         /* Iterate from retran_path's successor back to retran_path. */
1321         for (trans = list_next_entry(trans, transports); 1;
1322              trans = list_next_entry(trans, transports)) {
1323                 /* Manually skip the head element. */
1324                 if (&trans->transports == &asoc->peer.transport_addr_list)
1325                         continue;
1326                 if (trans->state == SCTP_UNCONFIRMED)
1327                         continue;
1328                 trans_next = sctp_trans_elect_best(trans, trans_next);
1329                 /* Active is good enough for immediate return. */
1330                 if (trans_next->state == SCTP_ACTIVE)
1331                         break;
1332                 /* We've reached the end, time to update path. */
1333                 if (trans == asoc->peer.retran_path)
1334                         break;
1335         }
1336
1337         asoc->peer.retran_path = trans_next;
1338
1339         pr_debug("%s: association:%p updated new path to addr:%pISpc\n",
1340                  __func__, asoc, &asoc->peer.retran_path->ipaddr.sa);
1341 }
1342
1343 static void sctp_select_active_and_retran_path(struct sctp_association *asoc)
1344 {
1345         struct sctp_transport *trans, *trans_pri = NULL, *trans_sec = NULL;
1346         struct sctp_transport *trans_pf = NULL;
1347
1348         /* Look for the two most recently used active transports. */
1349         list_for_each_entry(trans, &asoc->peer.transport_addr_list,
1350                             transports) {
1351                 /* Skip uninteresting transports. */
1352                 if (trans->state == SCTP_INACTIVE ||
1353                     trans->state == SCTP_UNCONFIRMED)
1354                         continue;
1355                 /* Keep track of the best PF transport from our
1356                  * list in case we don't find an active one.
1357                  */
1358                 if (trans->state == SCTP_PF) {
1359                         trans_pf = sctp_trans_elect_best(trans, trans_pf);
1360                         continue;
1361                 }
1362                 /* For active transports, pick the most recent ones. */
1363                 if (trans_pri == NULL ||
1364                     ktime_after(trans->last_time_heard,
1365                                 trans_pri->last_time_heard)) {
1366                         trans_sec = trans_pri;
1367                         trans_pri = trans;
1368                 } else if (trans_sec == NULL ||
1369                            ktime_after(trans->last_time_heard,
1370                                        trans_sec->last_time_heard)) {
1371                         trans_sec = trans;
1372                 }
1373         }
1374
1375         /* RFC 2960 6.4 Multi-Homed SCTP Endpoints
1376          *
1377          * By default, an endpoint should always transmit to the primary
1378          * path, unless the SCTP user explicitly specifies the
1379          * destination transport address (and possibly source transport
1380          * address) to use. [If the primary is active but not most recent,
1381          * bump the most recently used transport.]
1382          */
1383         if ((asoc->peer.primary_path->state == SCTP_ACTIVE ||
1384              asoc->peer.primary_path->state == SCTP_UNKNOWN) &&
1385              asoc->peer.primary_path != trans_pri) {
1386                 trans_sec = trans_pri;
1387                 trans_pri = asoc->peer.primary_path;
1388         }
1389
1390         /* We did not find anything useful for a possible retransmission
1391          * path; either primary path that we found is the the same as
1392          * the current one, or we didn't generally find an active one.
1393          */
1394         if (trans_sec == NULL)
1395                 trans_sec = trans_pri;
1396
1397         /* If we failed to find a usable transport, just camp on the
1398          * active or pick a PF iff it's the better choice.
1399          */
1400         if (trans_pri == NULL) {
1401                 trans_pri = sctp_trans_elect_best(asoc->peer.active_path, trans_pf);
1402                 trans_sec = trans_pri;
1403         }
1404
1405         /* Set the active and retran transports. */
1406         asoc->peer.active_path = trans_pri;
1407         asoc->peer.retran_path = trans_sec;
1408 }
1409
1410 struct sctp_transport *
1411 sctp_assoc_choose_alter_transport(struct sctp_association *asoc,
1412                                   struct sctp_transport *last_sent_to)
1413 {
1414         /* If this is the first time packet is sent, use the active path,
1415          * else use the retran path. If the last packet was sent over the
1416          * retran path, update the retran path and use it.
1417          */
1418         if (last_sent_to == NULL) {
1419                 return asoc->peer.active_path;
1420         } else {
1421                 if (last_sent_to == asoc->peer.retran_path)
1422                         sctp_assoc_update_retran_path(asoc);
1423
1424                 return asoc->peer.retran_path;
1425         }
1426 }
1427
1428 /* Update the association's pmtu and frag_point by going through all the
1429  * transports. This routine is called when a transport's PMTU has changed.
1430  */
1431 void sctp_assoc_sync_pmtu(struct sock *sk, struct sctp_association *asoc)
1432 {
1433         struct sctp_transport *t;
1434         __u32 pmtu = 0;
1435
1436         if (!asoc)
1437                 return;
1438
1439         /* Get the lowest pmtu of all the transports. */
1440         list_for_each_entry(t, &asoc->peer.transport_addr_list,
1441                                 transports) {
1442                 if (t->pmtu_pending && t->dst) {
1443                         sctp_transport_update_pmtu(sk, t,
1444                                                    SCTP_TRUNC4(dst_mtu(t->dst)));
1445                         t->pmtu_pending = 0;
1446                 }
1447                 if (!pmtu || (t->pathmtu < pmtu))
1448                         pmtu = t->pathmtu;
1449         }
1450
1451         if (pmtu) {
1452                 asoc->pathmtu = pmtu;
1453                 asoc->frag_point = sctp_frag_point(asoc, pmtu);
1454         }
1455
1456         pr_debug("%s: asoc:%p, pmtu:%d, frag_point:%d\n", __func__, asoc,
1457                  asoc->pathmtu, asoc->frag_point);
1458 }
1459
1460 /* Should we send a SACK to update our peer? */
1461 static inline bool sctp_peer_needs_update(struct sctp_association *asoc)
1462 {
1463         struct net *net = sock_net(asoc->base.sk);
1464         switch (asoc->state) {
1465         case SCTP_STATE_ESTABLISHED:
1466         case SCTP_STATE_SHUTDOWN_PENDING:
1467         case SCTP_STATE_SHUTDOWN_RECEIVED:
1468         case SCTP_STATE_SHUTDOWN_SENT:
1469                 if ((asoc->rwnd > asoc->a_rwnd) &&
1470                     ((asoc->rwnd - asoc->a_rwnd) >= max_t(__u32,
1471                            (asoc->base.sk->sk_rcvbuf >> net->sctp.rwnd_upd_shift),
1472                            asoc->pathmtu)))
1473                         return true;
1474                 break;
1475         default:
1476                 break;
1477         }
1478         return false;
1479 }
1480
1481 /* Increase asoc's rwnd by len and send any window update SACK if needed. */
1482 void sctp_assoc_rwnd_increase(struct sctp_association *asoc, unsigned int len)
1483 {
1484         struct sctp_chunk *sack;
1485         struct timer_list *timer;
1486
1487         if (asoc->rwnd_over) {
1488                 if (asoc->rwnd_over >= len) {
1489                         asoc->rwnd_over -= len;
1490                 } else {
1491                         asoc->rwnd += (len - asoc->rwnd_over);
1492                         asoc->rwnd_over = 0;
1493                 }
1494         } else {
1495                 asoc->rwnd += len;
1496         }
1497
1498         /* If we had window pressure, start recovering it
1499          * once our rwnd had reached the accumulated pressure
1500          * threshold.  The idea is to recover slowly, but up
1501          * to the initial advertised window.
1502          */
1503         if (asoc->rwnd_press && asoc->rwnd >= asoc->rwnd_press) {
1504                 int change = min(asoc->pathmtu, asoc->rwnd_press);
1505                 asoc->rwnd += change;
1506                 asoc->rwnd_press -= change;
1507         }
1508
1509         pr_debug("%s: asoc:%p rwnd increased by %d to (%u, %u) - %u\n",
1510                  __func__, asoc, len, asoc->rwnd, asoc->rwnd_over,
1511                  asoc->a_rwnd);
1512
1513         /* Send a window update SACK if the rwnd has increased by at least the
1514          * minimum of the association's PMTU and half of the receive buffer.
1515          * The algorithm used is similar to the one described in
1516          * Section 4.2.3.3 of RFC 1122.
1517          */
1518         if (sctp_peer_needs_update(asoc)) {
1519                 asoc->a_rwnd = asoc->rwnd;
1520
1521                 pr_debug("%s: sending window update SACK- asoc:%p rwnd:%u "
1522                          "a_rwnd:%u\n", __func__, asoc, asoc->rwnd,
1523                          asoc->a_rwnd);
1524
1525                 sack = sctp_make_sack(asoc);
1526                 if (!sack)
1527                         return;
1528
1529                 asoc->peer.sack_needed = 0;
1530
1531                 sctp_outq_tail(&asoc->outqueue, sack, GFP_ATOMIC);
1532
1533                 /* Stop the SACK timer.  */
1534                 timer = &asoc->timers[SCTP_EVENT_TIMEOUT_SACK];
1535                 if (del_timer(timer))
1536                         sctp_association_put(asoc);
1537         }
1538 }
1539
1540 /* Decrease asoc's rwnd by len. */
1541 void sctp_assoc_rwnd_decrease(struct sctp_association *asoc, unsigned int len)
1542 {
1543         int rx_count;
1544         int over = 0;
1545
1546         if (unlikely(!asoc->rwnd || asoc->rwnd_over))
1547                 pr_debug("%s: association:%p has asoc->rwnd:%u, "
1548                          "asoc->rwnd_over:%u!\n", __func__, asoc,
1549                          asoc->rwnd, asoc->rwnd_over);
1550
1551         if (asoc->ep->rcvbuf_policy)
1552                 rx_count = atomic_read(&asoc->rmem_alloc);
1553         else
1554                 rx_count = atomic_read(&asoc->base.sk->sk_rmem_alloc);
1555
1556         /* If we've reached or overflowed our receive buffer, announce
1557          * a 0 rwnd if rwnd would still be positive.  Store the
1558          * the potential pressure overflow so that the window can be restored
1559          * back to original value.
1560          */
1561         if (rx_count >= asoc->base.sk->sk_rcvbuf)
1562                 over = 1;
1563
1564         if (asoc->rwnd >= len) {
1565                 asoc->rwnd -= len;
1566                 if (over) {
1567                         asoc->rwnd_press += asoc->rwnd;
1568                         asoc->rwnd = 0;
1569                 }
1570         } else {
1571                 asoc->rwnd_over = len - asoc->rwnd;
1572                 asoc->rwnd = 0;
1573         }
1574
1575         pr_debug("%s: asoc:%p rwnd decreased by %d to (%u, %u, %u)\n",
1576                  __func__, asoc, len, asoc->rwnd, asoc->rwnd_over,
1577                  asoc->rwnd_press);
1578 }
1579
1580 /* Build the bind address list for the association based on info from the
1581  * local endpoint and the remote peer.
1582  */
1583 int sctp_assoc_set_bind_addr_from_ep(struct sctp_association *asoc,
1584                                      sctp_scope_t scope, gfp_t gfp)
1585 {
1586         struct sock *sk = asoc->base.sk;
1587         int flags;
1588
1589         /* Use scoping rules to determine the subset of addresses from
1590          * the endpoint.
1591          */
1592         flags = (PF_INET6 == sk->sk_family) ? SCTP_ADDR6_ALLOWED : 0;
1593         if (!inet_v6_ipv6only(sk))
1594                 flags |= SCTP_ADDR4_ALLOWED;
1595         if (asoc->peer.ipv4_address)
1596                 flags |= SCTP_ADDR4_PEERSUPP;
1597         if (asoc->peer.ipv6_address)
1598                 flags |= SCTP_ADDR6_PEERSUPP;
1599
1600         return sctp_bind_addr_copy(sock_net(asoc->base.sk),
1601                                    &asoc->base.bind_addr,
1602                                    &asoc->ep->base.bind_addr,
1603                                    scope, gfp, flags);
1604 }
1605
1606 /* Build the association's bind address list from the cookie.  */
1607 int sctp_assoc_set_bind_addr_from_cookie(struct sctp_association *asoc,
1608                                          struct sctp_cookie *cookie,
1609                                          gfp_t gfp)
1610 {
1611         int var_size2 = ntohs(cookie->peer_init->chunk_hdr.length);
1612         int var_size3 = cookie->raw_addr_list_len;
1613         __u8 *raw = (__u8 *)cookie->peer_init + var_size2;
1614
1615         return sctp_raw_to_bind_addrs(&asoc->base.bind_addr, raw, var_size3,
1616                                       asoc->ep->base.bind_addr.port, gfp);
1617 }
1618
1619 /* Lookup laddr in the bind address list of an association. */
1620 int sctp_assoc_lookup_laddr(struct sctp_association *asoc,
1621                             const union sctp_addr *laddr)
1622 {
1623         int found = 0;
1624
1625         if ((asoc->base.bind_addr.port == ntohs(laddr->v4.sin_port)) &&
1626             sctp_bind_addr_match(&asoc->base.bind_addr, laddr,
1627                                  sctp_sk(asoc->base.sk)))
1628                 found = 1;
1629
1630         return found;
1631 }
1632
1633 /* Set an association id for a given association */
1634 int sctp_assoc_set_id(struct sctp_association *asoc, gfp_t gfp)
1635 {
1636         bool preload = gfpflags_allow_blocking(gfp);
1637         int ret;
1638
1639         /* If the id is already assigned, keep it. */
1640         if (asoc->assoc_id)
1641                 return 0;
1642
1643         if (preload)
1644                 idr_preload(gfp);
1645         spin_lock_bh(&sctp_assocs_id_lock);
1646         /* 0 is not a valid assoc_id, must be >= 1 */
1647         ret = idr_alloc_cyclic(&sctp_assocs_id, asoc, 1, 0, GFP_NOWAIT);
1648         spin_unlock_bh(&sctp_assocs_id_lock);
1649         if (preload)
1650                 idr_preload_end();
1651         if (ret < 0)
1652                 return ret;
1653
1654         asoc->assoc_id = (sctp_assoc_t)ret;
1655         return 0;
1656 }
1657
1658 /* Free the ASCONF queue */
1659 static void sctp_assoc_free_asconf_queue(struct sctp_association *asoc)
1660 {
1661         struct sctp_chunk *asconf;
1662         struct sctp_chunk *tmp;
1663
1664         list_for_each_entry_safe(asconf, tmp, &asoc->addip_chunk_list, list) {
1665                 list_del_init(&asconf->list);
1666                 sctp_chunk_free(asconf);
1667         }
1668 }
1669
1670 /* Free asconf_ack cache */
1671 static void sctp_assoc_free_asconf_acks(struct sctp_association *asoc)
1672 {
1673         struct sctp_chunk *ack;
1674         struct sctp_chunk *tmp;
1675
1676         list_for_each_entry_safe(ack, tmp, &asoc->asconf_ack_list,
1677                                 transmitted_list) {
1678                 list_del_init(&ack->transmitted_list);
1679                 sctp_chunk_free(ack);
1680         }
1681 }
1682
1683 /* Clean up the ASCONF_ACK queue */
1684 void sctp_assoc_clean_asconf_ack_cache(const struct sctp_association *asoc)
1685 {
1686         struct sctp_chunk *ack;
1687         struct sctp_chunk *tmp;
1688
1689         /* We can remove all the entries from the queue up to
1690          * the "Peer-Sequence-Number".
1691          */
1692         list_for_each_entry_safe(ack, tmp, &asoc->asconf_ack_list,
1693                                 transmitted_list) {
1694                 if (ack->subh.addip_hdr->serial ==
1695                                 htonl(asoc->peer.addip_serial))
1696                         break;
1697
1698                 list_del_init(&ack->transmitted_list);
1699                 sctp_chunk_free(ack);
1700         }
1701 }
1702
1703 /* Find the ASCONF_ACK whose serial number matches ASCONF */
1704 struct sctp_chunk *sctp_assoc_lookup_asconf_ack(
1705                                         const struct sctp_association *asoc,
1706                                         __be32 serial)
1707 {
1708         struct sctp_chunk *ack;
1709
1710         /* Walk through the list of cached ASCONF-ACKs and find the
1711          * ack chunk whose serial number matches that of the request.
1712          */
1713         list_for_each_entry(ack, &asoc->asconf_ack_list, transmitted_list) {
1714                 if (sctp_chunk_pending(ack))
1715                         continue;
1716                 if (ack->subh.addip_hdr->serial == serial) {
1717                         sctp_chunk_hold(ack);
1718                         return ack;
1719                 }
1720         }
1721
1722         return NULL;
1723 }
1724
1725 void sctp_asconf_queue_teardown(struct sctp_association *asoc)
1726 {
1727         /* Free any cached ASCONF_ACK chunk. */
1728         sctp_assoc_free_asconf_acks(asoc);
1729
1730         /* Free the ASCONF queue. */
1731         sctp_assoc_free_asconf_queue(asoc);
1732
1733         /* Free any cached ASCONF chunk. */
1734         if (asoc->addip_last_asconf)
1735                 sctp_chunk_free(asoc->addip_last_asconf);
1736 }