net/sctp/associola.c

   1 /* SCTP kernel reference 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 reference Implementation
   9  *
  10  * This module provides the abstraction for an SCTP association.
  11  *
  12  * The SCTP reference 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  * The SCTP reference 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, write to
  26  * the Free Software Foundation, 59 Temple Place - Suite 330,
  27  * Boston, MA 02111-1307, USA.
  28  *
  29  * Please send any bug reports or fixes you make to the
  30  * email address(es):
  31  *    lksctp developers <lksctp-developers@lists.sourceforge.net>
  32  *
  33  * Or submit a bug report through the following website:
  34  *    http://www.sf.net/projects/lksctp
  35  *
  36  * Written or modified by:
  37  *    La Monte H.P. Yarroll <piggy@acm.org>
  38  *    Karl Knutson          <karl@athena.chicago.il.us>
  39  *    Jon Grimm             <jgrimm@us.ibm.com>
  40  *    Xingang Guo           <xingang.guo@intel.com>
  41  *    Hui Huang             <hui.huang@nokia.com>
  42  *    Sridhar Samudrala     <sri@us.ibm.com>
  43  *    Daisy Chang           <daisyc@us.ibm.com>
  44  *    Ryan Layer            <rmlayer@us.ibm.com>
  45  *    Kevin Gao             <kevin.gao@intel.com>
  46  *
  47  * Any bugs reported given to us we will try to fix... any fixes shared will
  48  * be incorporated into the next SCTP release.
  49  */
  50
  51 #include <linux/types.h>
  52 #include <linux/fcntl.h>
  53 #include <linux/poll.h>
  54 #include <linux/init.h>
  55 #include <linux/sched.h>
  56
  57 #include <linux/slab.h>
  58 #include <linux/in.h>
  59 #include <net/ipv6.h>
  60 #include <net/sctp/sctp.h>
  61 #include <net/sctp/sm.h>
  62
  63 /* Forward declarations for internal functions. */
  64 static void sctp_assoc_bh_rcv(struct sctp_association *asoc);
  65
  66
  67 /* 1st Level Abstractions. */
  68
  69 /* Allocate and initialize a new association */
  70 struct sctp_association *sctp_association_new(const struct sctp_endpoint *ep,
  71                                          const struct sock *sk,
  72                                          sctp_scope_t scope, int gfp)
  73 {
  74         struct sctp_association *asoc;
  75
  76         asoc = t_new(struct sctp_association, gfp);
  77         if (!asoc)
  78                 goto fail;
  79
  80         if (!sctp_association_init(asoc, ep, sk, scope, gfp))
  81                 goto fail_init;
  82
  83         asoc->base.malloced = 1;
  84         SCTP_DBG_OBJCNT_INC(assoc);
  85
  86         return asoc;
  87
  88 fail_init:
  89         kfree(asoc);
  90 fail:
  91         return NULL;
  92 }
  93
  94 /* Initialize a new association from provided memory. */
  95 struct sctp_association *sctp_association_init(struct sctp_association *asoc,
  96                                           const struct sctp_endpoint *ep,
  97                                           const struct sock *sk,
  98                                           sctp_scope_t scope,
  99                                           int gfp)
 100 {
 101         struct sctp_opt *sp;
 102         int i;
 103
 104         /* Retrieve the SCTP per socket area.  */
 105         sp = sctp_sk((struct sock *)sk);
 106
 107         /* Init all variables to a known value.  */
 108         memset(asoc, 0, sizeof(struct sctp_association));
 109
 110         /* Discarding const is appropriate here.  */
 111         asoc->ep = (struct sctp_endpoint *)ep;
 112         sctp_endpoint_hold(asoc->ep);
 113
 114         /* Hold the sock.  */
 115         asoc->base.sk = (struct sock *)sk;
 116         sock_hold(asoc->base.sk);
 117
 118         /* Initialize the common base substructure.  */
 119         asoc->base.type = SCTP_EP_TYPE_ASSOCIATION;
 120
 121         /* Initialize the object handling fields.  */
 122         atomic_set(&asoc->base.refcnt, 1);
 123         asoc->base.dead = 0;
 124         asoc->base.malloced = 0;
 125
 126         /* Initialize the bind addr area.  */
 127         sctp_bind_addr_init(&asoc->base.bind_addr, ep->base.bind_addr.port);
 128         asoc->base.addr_lock = RW_LOCK_UNLOCKED;
 129
 130         asoc->state = SCTP_STATE_CLOSED;
 131
 132         /* Set these values from the socket values, a conversion between
 133          * millsecons to seconds/microseconds must also be done.
 134          */
 135         asoc->cookie_life.tv_sec = sp->assocparams.sasoc_cookie_life / 1000;
 136         asoc->cookie_life.tv_usec = (sp->assocparams.sasoc_cookie_life % 1000)
 137                                         * 1000;
 138         asoc->pmtu = 0;
 139         asoc->frag_point = 0;
 140
 141         /* Set the association max_retrans and RTO values from the
 142          * socket values.
 143          */
 144         asoc->max_retrans = sp->assocparams.sasoc_asocmaxrxt;
 145         asoc->rto_initial = msecs_to_jiffies(sp->rtoinfo.srto_initial);
 146         asoc->rto_max = msecs_to_jiffies(sp->rtoinfo.srto_max);
 147         asoc->rto_min = msecs_to_jiffies(sp->rtoinfo.srto_min);
 148
 149         asoc->overall_error_count = 0;
 150
 151         /* Initialize the maximum mumber of new data packets that can be sent
 152          * in a burst.
 153          */
 154         asoc->max_burst = sctp_max_burst;
 155
 156         /* Copy things from the endpoint.  */
 157         for (i = SCTP_EVENT_TIMEOUT_NONE; i < SCTP_NUM_TIMEOUT_TYPES; ++i) {
 158                 asoc->timeouts[i] = ep->timeouts[i];
 159                 init_timer(&asoc->timers[i]);
 160                 asoc->timers[i].function = sctp_timer_events[i];
 161                 asoc->timers[i].data = (unsigned long) asoc;
 162         }
 163
 164         /* Pull default initialization values from the sock options.
 165          * Note: This assumes that the values have already been
 166          * validated in the sock.
 167          */
 168         asoc->c.sinit_max_instreams = sp->initmsg.sinit_max_instreams;
 169         asoc->c.sinit_num_ostreams  = sp->initmsg.sinit_num_ostreams;
 170         asoc->max_init_attempts = sp->initmsg.sinit_max_attempts;
 171
 172         asoc->max_init_timeo =
 173                  msecs_to_jiffies(sp->initmsg.sinit_max_init_timeo);
 174
 175         /* Allocate storage for the ssnmap after the inbound and outbound
 176          * streams have been negotiated during Init.
 177          */
 178         asoc->ssnmap = NULL;
 179
 180         /* Set the local window size for receive.
 181          * This is also the rcvbuf space per association.
 182          * RFC 6 - A SCTP receiver MUST be able to receive a minimum of
 183          * 1500 bytes in one SCTP packet.
 184          */
 185         if (sk->sk_rcvbuf < SCTP_DEFAULT_MINWINDOW)
 186                 asoc->rwnd = SCTP_DEFAULT_MINWINDOW;
 187         else
 188                 asoc->rwnd = sk->sk_rcvbuf;
 189
 190         asoc->a_rwnd = asoc->rwnd;
 191
 192         asoc->rwnd_over = 0;
 193
 194         /* Use my own max window until I learn something better.  */
 195         asoc->peer.rwnd = SCTP_DEFAULT_MAXWINDOW;
 196
 197         /* Set the sndbuf size for transmit.  */
 198         asoc->sndbuf_used = 0;
 199
 200         init_waitqueue_head(&asoc->wait);
 201
 202         asoc->c.my_vtag = sctp_generate_tag(ep);
 203         asoc->peer.i.init_tag = 0;     /* INIT needs a vtag of 0. */
 204         asoc->c.peer_vtag = 0;
 205         asoc->c.my_ttag   = 0;
 206         asoc->c.peer_ttag = 0;
 207
 208         asoc->c.initial_tsn = sctp_generate_tsn(ep);
 209
 210         asoc->next_tsn = asoc->c.initial_tsn;
 211
 212         asoc->ctsn_ack_point = asoc->next_tsn - 1;
 213         asoc->adv_peer_ack_point = asoc->ctsn_ack_point;
 214         asoc->highest_sacked = asoc->ctsn_ack_point;
 215         asoc->last_cwr_tsn = asoc->ctsn_ack_point;
 216         asoc->unack_data = 0;
 217
 218         SCTP_DEBUG_PRINTK("myctsnap for %s INIT as 0x%x.\n",
 219                           asoc->ep->debug_name,
 220                           asoc->ctsn_ack_point);
 221
 222         /* ADDIP Section 4.1 Asconf Chunk Procedures
 223          *
 224          * When an endpoint has an ASCONF signaled change to be sent to the
 225          * remote endpoint it should do the following:
 226          * ...
 227          * A2) a serial number should be assigned to the chunk. The serial
 228          * number SHOULD be a monotonically increasing number. The serial
 229          * numbers SHOULD be initialized at the start of the
 230          * association to the same value as the initial TSN.
 231          */
 232         asoc->addip_serial = asoc->c.initial_tsn;
 233
 234         skb_queue_head_init(&asoc->addip_chunks);
 235
 236         /* Make an empty list of remote transport addresses.  */
 237         INIT_LIST_HEAD(&asoc->peer.transport_addr_list);
 238
 239         /* RFC 2960 5.1 Normal Establishment of an Association
 240          *
 241          * After the reception of the first data chunk in an
 242          * association the endpoint must immediately respond with a
 243          * sack to acknowledge the data chunk.  Subsequent
 244          * acknowledgements should be done as described in Section
 245          * 6.2.
 246          *
 247          * [We implement this by telling a new association that it
 248          * already received one packet.]
 249          */
 250         asoc->peer.sack_needed = 1;
 251
 252         /* Assume that the peer recongizes ASCONF until reported otherwise
 253          * via an ERROR chunk.
 254          */
 255         asoc->peer.asconf_capable = 1;
 256
 257         /* Create an input queue.  */
 258         sctp_inq_init(&asoc->base.inqueue);
 259         sctp_inq_set_th_handler(&asoc->base.inqueue,
 260                                     (void (*)(void *))sctp_assoc_bh_rcv,
 261                                     asoc);
 262
 263         /* Create an output queue.  */
 264         sctp_outq_init(asoc, &asoc->outqueue);
 265
 266         if (!sctp_ulpq_init(&asoc->ulpq, asoc))
 267                 goto fail_init;
 268
 269         /* Set up the tsn tracking. */
 270         sctp_tsnmap_init(&asoc->peer.tsn_map, SCTP_TSN_MAP_SIZE, 0);
 271
 272         asoc->need_ecne = 0;
 273
 274         asoc->assoc_id = (sctp_assoc_t)-1L;
 275
 276         /* Assume that peer would support both address types unless we are
 277          * told otherwise.
 278          */
 279         asoc->peer.ipv4_address = 1;
 280         asoc->peer.ipv6_address = 1;
 281         INIT_LIST_HEAD(&asoc->asocs);
 282
 283         asoc->autoclose = sp->autoclose;
 284
 285         asoc->default_stream = sp->default_stream;
 286         asoc->default_ppid = sp->default_ppid;
 287         asoc->default_flags = sp->default_flags;
 288         asoc->default_context = sp->default_context;
 289         asoc->default_timetolive = sp->default_timetolive;
 290
 291         return asoc;
 292
 293 fail_init:
 294         sctp_endpoint_put(asoc->ep);
 295         sock_put(asoc->base.sk);
 296         return NULL;
 297 }
 298
 299 /* Free this association if possible.  There may still be users, so
 300  * the actual deallocation may be delayed.
 301  */
 302 void sctp_association_free(struct sctp_association *asoc)
 303 {
 304         struct sock *sk = asoc->base.sk;
 305         struct sctp_transport *transport;
 306         struct list_head *pos, *temp;
 307         int i;
 308
 309         list_del(&asoc->asocs);
 310
 311         /* Decrement the backlog value for a TCP-style listening socket. */
 312         if (sctp_style(sk, TCP) && sctp_sstate(sk, LISTENING))
 313                 sk->sk_ack_backlog--;
 314
 315         /* Mark as dead, so other users can know this structure is
 316          * going away.
 317          */
 318         asoc->base.dead = 1;
 319
 320         /* Dispose of any data lying around in the outqueue. */
 321         sctp_outq_free(&asoc->outqueue);
 322
 323         /* Dispose of any pending messages for the upper layer. */
 324         sctp_ulpq_free(&asoc->ulpq);
 325
 326         /* Dispose of any pending chunks on the inqueue. */
 327         sctp_inq_free(&asoc->base.inqueue);
 328
 329         /* Free ssnmap storage. */
 330         sctp_ssnmap_free(asoc->ssnmap);
 331
 332         /* Clean up the bound address list. */
 333         sctp_bind_addr_free(&asoc->base.bind_addr);
 334
 335         /* Do we need to go through all of our timers and
 336          * delete them?   To be safe we will try to delete all, but we
 337          * should be able to go through and make a guess based
 338          * on our state.
 339          */
 340         for (i = SCTP_EVENT_TIMEOUT_NONE; i < SCTP_NUM_TIMEOUT_TYPES; ++i) {
 341                 if (timer_pending(&asoc->timers[i]) &&
 342                     del_timer(&asoc->timers[i]))
 343                         sctp_association_put(asoc);
 344         }
 345
 346         /* Free peer's cached cookie. */
 347         if (asoc->peer.cookie) {
 348                 kfree(asoc->peer.cookie);
 349         }
 350
 351         /* Release the transport structures. */
 352         list_for_each_safe(pos, temp, &asoc->peer.transport_addr_list) {
 353                 transport = list_entry(pos, struct sctp_transport, transports);
 354                 list_del(pos);
 355                 sctp_transport_free(transport);
 356         }
 357
 358         /* Free any cached ASCONF_ACK chunk. */
 359         if (asoc->addip_last_asconf_ack)
 360                 sctp_chunk_free(asoc->addip_last_asconf_ack);
 361
 362         /* Free any cached ASCONF chunk. */
 363         if (asoc->addip_last_asconf)
 364                 sctp_chunk_free(asoc->addip_last_asconf);
 365
 366         sctp_association_put(asoc);
 367 }
 368
 369 /* Cleanup and free up an association. */
 370 static void sctp_association_destroy(struct sctp_association *asoc)
 371 {
 372         SCTP_ASSERT(asoc->base.dead, "Assoc is not dead", return);
 373
 374         sctp_endpoint_put(asoc->ep);
 375         sock_put(asoc->base.sk);
 376
 377         if ((long)asoc->assoc_id != -1L) {
 378                 spin_lock_bh(&sctp_assocs_id_lock);
 379                 idr_remove(&sctp_assocs_id, (long)asoc->assoc_id);
 380                 spin_unlock_bh(&sctp_assocs_id_lock);
 381         }
 382
 383         if (asoc->base.malloced) {
 384                 kfree(asoc);
 385                 SCTP_DBG_OBJCNT_DEC(assoc);
 386         }
 387 }
 388
 389 /* Change the primary destination address for the peer. */
 390 void sctp_assoc_set_primary(struct sctp_association *asoc,
 391                             struct sctp_transport *transport)
 392 {
 393         asoc->peer.primary_path = transport;
 394
 395         /* Set a default msg_name for events. */
 396         memcpy(&asoc->peer.primary_addr, &transport->ipaddr,
 397                sizeof(union sctp_addr));
 398
 399         /* If the primary path is changing, assume that the
 400          * user wants to use this new path.
 401          */
 402         if (transport->active)
 403                 asoc->peer.active_path = transport;
 404
 405         /*
 406          * SFR-CACC algorithm:
 407          * Upon the receipt of a request to change the primary
 408          * destination address, on the data structure for the new
 409          * primary destination, the sender MUST do the following:
 410          *
 411          * 1) If CHANGEOVER_ACTIVE is set, then there was a switch
 412          * to this destination address earlier. The sender MUST set
 413          * CYCLING_CHANGEOVER to indicate that this switch is a
 414          * double switch to the same destination address.
 415          */
 416         if (transport->cacc.changeover_active)
 417                 transport->cacc.cycling_changeover = 1;
 418
 419         /* 2) The sender MUST set CHANGEOVER_ACTIVE to indicate that
 420          * a changeover has occurred.
 421          */
 422         transport->cacc.changeover_active = 1;
 423
 424         /* 3) The sender MUST store the next TSN to be sent in
 425          * next_tsn_at_change.
 426          */
 427         transport->cacc.next_tsn_at_change = asoc->next_tsn;
 428 }
 429
 430 /* Add a transport address to an association.  */
 431 struct sctp_transport *sctp_assoc_add_peer(struct sctp_association *asoc,
 432                                            const union sctp_addr *addr,
 433                                            int gfp)
 434 {
 435         struct sctp_transport *peer;
 436         struct sctp_opt *sp;
 437         unsigned short port;
 438
 439         sp = sctp_sk(asoc->base.sk);
 440
 441         /* AF_INET and AF_INET6 share common port field. */
 442         port = addr->v4.sin_port;
 443
 444         /* Set the port if it has not been set yet.  */
 445         if (0 == asoc->peer.port)
 446                 asoc->peer.port = port;
 447
 448         /* Check to see if this is a duplicate. */
 449         peer = sctp_assoc_lookup_paddr(asoc, addr);
 450         if (peer)
 451                 return peer;
 452
 453         peer = sctp_transport_new(addr, gfp);
 454         if (!peer)
 455                 return NULL;
 456
 457         sctp_transport_set_owner(peer, asoc);
 458
 459         /* Initialize the pmtu of the transport. */
 460         sctp_transport_pmtu(peer);
 461
 462         /* If this is the first transport addr on this association,
 463          * initialize the association PMTU to the peer's PMTU.
 464          * If not and the current association PMTU is higher than the new
 465          * peer's PMTU, reset the association PMTU to the new peer's PMTU.
 466          */
 467         if (asoc->pmtu)
 468                 asoc->pmtu = min_t(int, peer->pmtu, asoc->pmtu);
 469         else
 470                 asoc->pmtu = peer->pmtu;
 471
 472         SCTP_DEBUG_PRINTK("sctp_assoc_add_peer:association %p PMTU set to "
 473                           "%d\n", asoc, asoc->pmtu);
 474
 475         asoc->frag_point = sctp_frag_point(sp, asoc->pmtu);
 476
 477         /* The asoc->peer.port might not be meaningful yet, but
 478          * initialize the packet structure anyway.
 479          */
 480         sctp_packet_init(&peer->packet, peer, asoc->base.bind_addr.port,
 481                          asoc->peer.port);
 482
 483         /* 7.2.1 Slow-Start
 484          *
 485          * o The initial cwnd before data transmission or after a
 486          *   sufficiently long idle period MUST be <= 2*MTU.
 487          *
 488          * o The initial value of ssthresh MAY be arbitrarily high
 489          *   (for example, implementations MAY use the size of the
 490          *   receiver advertised window).
 491          */
 492         peer->cwnd = asoc->pmtu * 2;
 493
 494         /* At this point, we may not have the receiver's advertised window,
 495          * so initialize ssthresh to the default value and it will be set
 496          * later when we process the INIT.
 497          */
 498         peer->ssthresh = SCTP_DEFAULT_MAXWINDOW;
 499
 500         peer->partial_bytes_acked = 0;
 501         peer->flight_size = 0;
 502         peer->error_threshold = peer->max_retrans;
 503
 504         /* By default, enable heartbeat for peer address. */
 505         peer->hb_allowed = 1;
 506
 507         /* Initialize the peer's heartbeat interval based on the
 508          * sock configured value.
 509          */
 510         peer->hb_interval = msecs_to_jiffies(sp->paddrparam.spp_hbinterval);
 511
 512         /* Set the path max_retrans.  */
 513         peer->max_retrans = asoc->max_retrans;
 514
 515         /* Set the transport's RTO.initial value */
 516         peer->rto = asoc->rto_initial;
 517
 518         /* Attach the remote transport to our asoc.  */
 519         list_add_tail(&peer->transports, &asoc->peer.transport_addr_list);
 520
 521         /* If we do not yet have a primary path, set one.  */
 522         if (!asoc->peer.primary_path) {
 523                 sctp_assoc_set_primary(asoc, peer);
 524                 asoc->peer.retran_path = peer;
 525         }
 526
 527         if (asoc->peer.active_path == asoc->peer.retran_path)
 528                 asoc->peer.retran_path = peer;
 529
 530         return peer;
 531 }
 532
 533 /* Delete a transport address from an association.  */
 534 void sctp_assoc_del_peer(struct sctp_association *asoc,
 535                          const union sctp_addr *addr)
 536 {
 537         struct list_head        *pos;
 538         struct list_head        *temp;
 539         struct sctp_transport   *peer = NULL;
 540         struct sctp_transport   *transport;
 541
 542         list_for_each_safe(pos, temp, &asoc->peer.transport_addr_list) {
 543                 transport = list_entry(pos, struct sctp_transport, transports);
 544                 if (sctp_cmp_addr_exact(addr, &transport->ipaddr)) {
 545                         peer = transport;
 546                         list_del(pos);
 547                         break;
 548                 }
 549         }
 550
 551         /* The address we want delete is not in the association. */
 552         if (!peer)
 553                 return;
 554
 555         /* Get the first transport of asoc. */
 556         pos = asoc->peer.transport_addr_list.next;
 557         transport = list_entry(pos, struct sctp_transport, transports);
 558
 559         /* Update any entries that match the peer to be deleted. */
 560         if (asoc->peer.primary_path == peer)
 561                 sctp_assoc_set_primary(asoc, transport);
 562         if (asoc->peer.active_path == peer)
 563                 asoc->peer.active_path = transport;
 564         if (asoc->peer.retran_path == peer)
 565                 asoc->peer.retran_path = transport;
 566         if (asoc->peer.last_data_from == peer)
 567                 asoc->peer.last_data_from = transport;
 568
 569         sctp_transport_free(peer);
 570 }
 571
 572 /* Lookup a transport by address. */
 573 struct sctp_transport *sctp_assoc_lookup_paddr(
 574                                         const struct sctp_association *asoc,
 575                                         const union sctp_addr *address)
 576 {
 577         struct sctp_transport *t;
 578         struct list_head *pos;
 579
 580         /* Cycle through all transports searching for a peer address. */
 581
 582         list_for_each(pos, &asoc->peer.transport_addr_list) {
 583                 t = list_entry(pos, struct sctp_transport, transports);
 584                 if (sctp_cmp_addr_exact(address, &t->ipaddr))
 585                         return t;
 586         }
 587
 588         return NULL;
 589 }
 590
 591 /* Engage in transport control operations.
 592  * Mark the transport up or down and send a notification to the user.
 593  * Select and update the new active and retran paths.
 594  */
 595 void sctp_assoc_control_transport(struct sctp_association *asoc,
 596                                   struct sctp_transport *transport,
 597                                   sctp_transport_cmd_t command,
 598                                   sctp_sn_error_t error)
 599 {
 600         struct sctp_transport *t = NULL;
 601         struct sctp_transport *first;
 602         struct sctp_transport *second;
 603         struct sctp_ulpevent *event;
 604         struct list_head *pos;
 605         int spc_state = 0;
 606
 607         /* Record the transition on the transport.  */
 608         switch (command) {
 609         case SCTP_TRANSPORT_UP:
 610                 transport->active = SCTP_ACTIVE;
 611                 spc_state = SCTP_ADDR_AVAILABLE;
 612                 break;
 613
 614         case SCTP_TRANSPORT_DOWN:
 615                 transport->active = SCTP_INACTIVE;
 616                 spc_state = SCTP_ADDR_UNREACHABLE;
 617                 break;
 618
 619         default:
 620                 return;
 621         };
 622
 623         /* Generate and send a SCTP_PEER_ADDR_CHANGE notification to the
 624          * user.
 625          */
 626         event = sctp_ulpevent_make_peer_addr_change(asoc,
 627                                 (struct sockaddr_storage *) &transport->ipaddr,
 628                                 0, spc_state, error, GFP_ATOMIC);
 629         if (event)
 630                 sctp_ulpq_tail_event(&asoc->ulpq, event);
 631
 632         /* Select new active and retran paths. */
 633
 634         /* Look for the two most recently used active transports.
 635          *
 636          * This code produces the wrong ordering whenever jiffies
 637          * rolls over, but we still get usable transports, so we don't
 638          * worry about it.
 639          */
 640         first = NULL; second = NULL;
 641
 642         list_for_each(pos, &asoc->peer.transport_addr_list) {
 643                 t = list_entry(pos, struct sctp_transport, transports);
 644
 645                 if (!t->active)
 646                         continue;
 647                 if (!first || t->last_time_heard > first->last_time_heard) {
 648                         second = first;
 649                         first = t;
 650                 }
 651                 if (!second || t->last_time_heard > second->last_time_heard)
 652                         second = t;
 653         }
 654
 655         /* RFC 2960 6.4 Multi-Homed SCTP Endpoints
 656          *
 657          * By default, an endpoint should always transmit to the
 658          * primary path, unless the SCTP user explicitly specifies the
 659          * destination transport address (and possibly source
 660          * transport address) to use.
 661          *
 662          * [If the primary is active but not most recent, bump the most
 663          * recently used transport.]
 664          */
 665         if (asoc->peer.primary_path->active &&
 666             first != asoc->peer.primary_path) {
 667                 second = first;
 668                 first = asoc->peer.primary_path;
 669         }
 670
 671         /* If we failed to find a usable transport, just camp on the
 672          * primary, even if it is inactive.
 673          */
 674         if (!first) {
 675                 first = asoc->peer.primary_path;
 676                 second = asoc->peer.primary_path;
 677         }
 678
 679         /* Set the active and retran transports.  */
 680         asoc->peer.active_path = first;
 681         asoc->peer.retran_path = second;
 682 }
 683
 684 /* Hold a reference to an association. */
 685 void sctp_association_hold(struct sctp_association *asoc)
 686 {
 687         atomic_inc(&asoc->base.refcnt);
 688 }
 689
 690 /* Release a reference to an association and cleanup
 691  * if there are no more references.
 692  */
 693 void sctp_association_put(struct sctp_association *asoc)
 694 {
 695         if (atomic_dec_and_test(&asoc->base.refcnt))
 696                 sctp_association_destroy(asoc);
 697 }
 698
 699 /* Allocate the next TSN, Transmission Sequence Number, for the given
 700  * association.
 701  */
 702 __u32 sctp_association_get_next_tsn(struct sctp_association *asoc)
 703 {
 704         /* From Section 1.6 Serial Number Arithmetic:
 705          * Transmission Sequence Numbers wrap around when they reach
 706          * 2**32 - 1.  That is, the next TSN a DATA chunk MUST use
 707          * after transmitting TSN = 2*32 - 1 is TSN = 0.
 708          */
 709         __u32 retval = asoc->next_tsn;
 710         asoc->next_tsn++;
 711         asoc->unack_data++;
 712
 713         return retval;
 714 }
 715
 716 /* Allocate 'num' TSNs by incrementing the association's TSN by num. */
 717 __u32 sctp_association_get_tsn_block(struct sctp_association *asoc, int num)
 718 {
 719         __u32 retval = asoc->next_tsn;
 720
 721         asoc->next_tsn += num;
 722         asoc->unack_data += num;
 723
 724         return retval;
 725 }
 726
 727
 728 /* Compare two addresses to see if they match.  Wildcard addresses
 729  * only match themselves.
 730  */
 731 int sctp_cmp_addr_exact(const union sctp_addr *ss1,
 732                         const union sctp_addr *ss2)
 733 {
 734         struct sctp_af *af;
 735
 736         af = sctp_get_af_specific(ss1->sa.sa_family);
 737         if (unlikely(!af))
 738                 return 0;
 739
 740         return af->cmp_addr(ss1, ss2);
 741 }
 742
 743 /* Return an ecne chunk to get prepended to a packet.
 744  * Note:  We are sly and return a shared, prealloced chunk.  FIXME:
 745  * No we don't, but we could/should.
 746  */
 747 struct sctp_chunk *sctp_get_ecne_prepend(struct sctp_association *asoc)
 748 {
 749         struct sctp_chunk *chunk;
 750
 751         /* Send ECNE if needed.
 752          * Not being able to allocate a chunk here is not deadly.
 753          */
 754         if (asoc->need_ecne)
 755                 chunk = sctp_make_ecne(asoc, asoc->last_ecne_tsn);
 756         else
 757                 chunk = NULL;
 758
 759         return chunk;
 760 }
 761
 762 /* Use this function for the packet prepend callback when no ECNE
 763  * packet is desired (e.g. some packets don't like to be bundled).
 764  */
 765 struct sctp_chunk *sctp_get_no_prepend(struct sctp_association *asoc)
 766 {
 767         return NULL;
 768 }
 769
 770 /*
 771  * Find which transport this TSN was sent on.
 772  */
 773 struct sctp_transport *sctp_assoc_lookup_tsn(struct sctp_association *asoc,
 774                                              __u32 tsn)
 775 {
 776         struct sctp_transport *active;
 777         struct sctp_transport *match;
 778         struct list_head *entry, *pos;
 779         struct sctp_transport *transport;
 780         struct sctp_chunk *chunk;
 781         __u32 key = htonl(tsn);
 782
 783         match = NULL;
 784
 785         /*
 786          * FIXME: In general, find a more efficient data structure for
 787          * searching.
 788          */
 789
 790         /*
 791          * The general strategy is to search each transport's transmitted
 792          * list.   Return which transport this TSN lives on.
 793          *
 794          * Let's be hopeful and check the active_path first.
 795          * Another optimization would be to know if there is only one
 796          * outbound path and not have to look for the TSN at all.
 797          *
 798          */
 799
 800         active = asoc->peer.active_path;
 801
 802         list_for_each(entry, &active->transmitted) {
 803                 chunk = list_entry(entry, struct sctp_chunk, transmitted_list);
 804
 805                 if (key == chunk->subh.data_hdr->tsn) {
 806                         match = active;
 807                         goto out;
 808                 }
 809         }
 810
 811         /* If not found, go search all the other transports. */
 812         list_for_each(pos, &asoc->peer.transport_addr_list) {
 813                 transport = list_entry(pos, struct sctp_transport, transports);
 814
 815                 if (transport == active)
 816                         break;
 817                 list_for_each(entry, &transport->transmitted) {
 818                         chunk = list_entry(entry, struct sctp_chunk,
 819                                            transmitted_list);
 820                         if (key == chunk->subh.data_hdr->tsn) {
 821                                 match = transport;
 822                                 goto out;
 823                         }
 824                 }
 825         }
 826 out:
 827         return match;
 828 }
 829
 830 /* Is this the association we are looking for? */
 831 struct sctp_transport *sctp_assoc_is_match(struct sctp_association *asoc,
 832                                            const union sctp_addr *laddr,
 833                                            const union sctp_addr *paddr)
 834 {
 835         struct sctp_transport *transport;
 836
 837         sctp_read_lock(&asoc->base.addr_lock);
 838
 839         if ((asoc->base.bind_addr.port == laddr->v4.sin_port) &&
 840             (asoc->peer.port == paddr->v4.sin_port)) {
 841                 transport = sctp_assoc_lookup_paddr(asoc, paddr);
 842                 if (!transport)
 843                         goto out;
 844
 845                 if (sctp_bind_addr_match(&asoc->base.bind_addr, laddr,
 846                                          sctp_sk(asoc->base.sk)))
 847                         goto out;
 848         }
 849         transport = NULL;
 850
 851 out:
 852         sctp_read_unlock(&asoc->base.addr_lock);
 853         return transport;
 854 }
 855
 856 /* Do delayed input processing.  This is scheduled by sctp_rcv(). */
 857 static void sctp_assoc_bh_rcv(struct sctp_association *asoc)
 858 {
 859         struct sctp_endpoint *ep;
 860         struct sctp_chunk *chunk;
 861         struct sock *sk;
 862         struct sctp_inq *inqueue;
 863         int state, subtype;
 864         int error = 0;
 865
 866         /* The association should be held so we should be safe. */
 867         ep = asoc->ep;
 868         sk = asoc->base.sk;
 869
 870         inqueue = &asoc->base.inqueue;
 871         sctp_association_hold(asoc);
 872         while (NULL != (chunk = sctp_inq_pop(inqueue))) {
 873                 state = asoc->state;
 874                 subtype = chunk->chunk_hdr->type;
 875
 876                 /* Remember where the last DATA chunk came from so we
 877                  * know where to send the SACK.
 878                  */
 879                 if (sctp_chunk_is_data(chunk))
 880                         asoc->peer.last_data_from = chunk->transport;
 881                 else
 882                         SCTP_INC_STATS(SctpInCtrlChunks);
 883
 884                 if (chunk->transport)
 885                         chunk->transport->last_time_heard = jiffies;
 886
 887                 /* Run through the state machine. */
 888                 error = sctp_do_sm(SCTP_EVENT_T_CHUNK, SCTP_ST_CHUNK(subtype),
 889                                    state, ep, asoc, chunk, GFP_ATOMIC);
 890
 891                 /* Check to see if the association is freed in response to
 892                  * the incoming chunk.  If so, get out of the while loop.
 893                  */
 894                 if (asoc->base.dead)
 895                         break;
 896
 897                 /* If there is an error on chunk, discard this packet. */
 898                 if (error && chunk)
 899                         chunk->pdiscard = 1;
 900         }
 901         sctp_association_put(asoc);
 902 }
 903
 904 /* This routine moves an association from its old sk to a new sk.  */
 905 void sctp_assoc_migrate(struct sctp_association *assoc, struct sock *newsk)
 906 {
 907         struct sctp_opt *newsp = sctp_sk(newsk);
 908         struct sock *oldsk = assoc->base.sk;
 909
 910         /* Delete the association from the old endpoint's list of
 911          * associations.
 912          */
 913         list_del_init(&assoc->asocs);
 914
 915         /* Decrement the backlog value for a TCP-style socket. */
 916         if (sctp_style(oldsk, TCP))
 917                 oldsk->sk_ack_backlog--;
 918
 919         /* Release references to the old endpoint and the sock.  */
 920         sctp_endpoint_put(assoc->ep);
 921         sock_put(assoc->base.sk);
 922
 923         /* Get a reference to the new endpoint.  */
 924         assoc->ep = newsp->ep;
 925         sctp_endpoint_hold(assoc->ep);
 926
 927         /* Get a reference to the new sock.  */
 928         assoc->base.sk = newsk;
 929         sock_hold(assoc->base.sk);
 930
 931         /* Add the association to the new endpoint's list of associations.  */
 932         sctp_endpoint_add_asoc(newsp->ep, assoc);
 933 }
 934
 935 /* Update an association (possibly from unexpected COOKIE-ECHO processing).  */
 936 void sctp_assoc_update(struct sctp_association *asoc,
 937                        struct sctp_association *new)
 938 {
 939         struct sctp_transport *trans;
 940         struct list_head *pos, *temp;
 941
 942         /* Copy in new parameters of peer. */
 943         asoc->c = new->c;
 944         asoc->peer.rwnd = new->peer.rwnd;
 945         asoc->peer.sack_needed = new->peer.sack_needed;
 946         asoc->peer.i = new->peer.i;
 947         sctp_tsnmap_init(&asoc->peer.tsn_map, SCTP_TSN_MAP_SIZE,
 948                          asoc->peer.i.initial_tsn);
 949
 950         /* Remove any peer addresses not present in the new association. */
 951         list_for_each_safe(pos, temp, &asoc->peer.transport_addr_list) {
 952                 trans = list_entry(pos, struct sctp_transport, transports);
 953                 if (!sctp_assoc_lookup_paddr(new, &trans->ipaddr))
 954                         sctp_assoc_del_peer(asoc, &trans->ipaddr);
 955         }
 956
 957         /* If the case is A (association restart), use
 958          * initial_tsn as next_tsn. If the case is B, use
 959          * current next_tsn in case data sent to peer
 960          * has been discarded and needs retransmission.
 961          */
 962         if (asoc->state >= SCTP_STATE_ESTABLISHED) {
 963                 asoc->next_tsn = new->next_tsn;
 964                 asoc->ctsn_ack_point = new->ctsn_ack_point;
 965                 asoc->adv_peer_ack_point = new->adv_peer_ack_point;
 966
 967                 /* Reinitialize SSN for both local streams
 968                  * and peer's streams.
 969                  */
 970                 sctp_ssnmap_clear(asoc->ssnmap);
 971
 972         } else {
 973                 /* Add any peer addresses from the new association. */
 974                 list_for_each(pos, &new->peer.transport_addr_list) {
 975                         trans = list_entry(pos, struct sctp_transport,
 976                                            transports);
 977                         if (!sctp_assoc_lookup_paddr(asoc, &trans->ipaddr))
 978                                 sctp_assoc_add_peer(asoc, &trans->ipaddr,
 979                                                     GFP_ATOMIC);
 980                 }
 981
 982                 asoc->ctsn_ack_point = asoc->next_tsn - 1;
 983                 asoc->adv_peer_ack_point = asoc->ctsn_ack_point;
 984                 if (!asoc->ssnmap) {
 985                         /* Move the ssnmap. */
 986                         asoc->ssnmap = new->ssnmap;
 987                         new->ssnmap = NULL;
 988                 }
 989         }
 990 }
 991
 992 /* Update the retran path for sending a retransmitted packet.
 993  * Round-robin through the active transports, else round-robin
 994  * through the inactive transports as this is the next best thing
 995  * we can try.
 996  */
 997 void sctp_assoc_update_retran_path(struct sctp_association *asoc)
 998 {
 999         struct sctp_transport *t, *next;
1000         struct list_head *head = &asoc->peer.transport_addr_list;
1001         struct list_head *pos;
1002
1003         /* Find the next transport in a round-robin fashion. */
1004         t = asoc->peer.retran_path;
1005         pos = &t->transports;
1006         next = NULL;
1007
1008         while (1) {
1009                 /* Skip the head. */
1010                 if (pos->next == head)
1011                         pos = head->next;
1012                 else
1013                         pos = pos->next;
1014
1015                 t = list_entry(pos, struct sctp_transport, transports);
1016
1017                 /* Try to find an active transport. */
1018
1019                 if (t->active) {
1020                         break;
1021                 } else {
1022                         /* Keep track of the next transport in case
1023                          * we don't find any active transport.
1024                          */
1025                         if (!next)
1026                                 next = t;
1027                 }
1028
1029                 /* We have exhausted the list, but didn't find any
1030                  * other active transports.  If so, use the next
1031                  * transport.
1032                  */
1033                 if (t == asoc->peer.retran_path) {
1034                         t = next;
1035                         break;
1036                 }
1037         }
1038
1039         asoc->peer.retran_path = t;
1040 }
1041
1042 /* Choose the transport for sending a SHUTDOWN packet.  */
1043 struct sctp_transport *sctp_assoc_choose_shutdown_transport(
1044         struct sctp_association *asoc)
1045 {
1046         /* If this is the first time SHUTDOWN is sent, use the active path,
1047          * else use the retran path. If the last SHUTDOWN was sent over the
1048          * retran path, update the retran path and use it.
1049          */
1050         if (!asoc->shutdown_last_sent_to)
1051                 return asoc->peer.active_path;
1052         else {
1053                 if (asoc->shutdown_last_sent_to == asoc->peer.retran_path)
1054                         sctp_assoc_update_retran_path(asoc);
1055                 return asoc->peer.retran_path;
1056         }
1057
1058 }
1059
1060 /* Update the association's pmtu and frag_point by going through all the
1061  * transports. This routine is called when a transport's PMTU has changed.
1062  */
1063 void sctp_assoc_sync_pmtu(struct sctp_association *asoc)
1064 {
1065         struct sctp_transport *t;
1066         struct list_head *pos;
1067         __u32 pmtu = 0;
1068
1069         if (!asoc)
1070                 return;
1071
1072         /* Get the lowest pmtu of all the transports. */
1073         list_for_each(pos, &asoc->peer.transport_addr_list) {
1074                 t = list_entry(pos, struct sctp_transport, transports);
1075                 if (!pmtu || (t->pmtu < pmtu))
1076                         pmtu = t->pmtu;
1077         }
1078
1079         if (pmtu) {
1080                 struct sctp_opt *sp = sctp_sk(asoc->base.sk);
1081                 asoc->pmtu = pmtu;
1082                 asoc->frag_point = sctp_frag_point(sp, pmtu);
1083         }
1084
1085         SCTP_DEBUG_PRINTK("%s: asoc:%p, pmtu:%d, frag_point:%d\n",
1086                           __FUNCTION__, asoc, asoc->pmtu, asoc->frag_point);
1087 }
1088
1089 /* Should we send a SACK to update our peer? */
1090 static inline int sctp_peer_needs_update(struct sctp_association *asoc)
1091 {
1092         switch (asoc->state) {
1093         case SCTP_STATE_ESTABLISHED:
1094         case SCTP_STATE_SHUTDOWN_PENDING:
1095         case SCTP_STATE_SHUTDOWN_RECEIVED:
1096                 if ((asoc->rwnd > asoc->a_rwnd) &&
1097                     ((asoc->rwnd - asoc->a_rwnd) >=
1098                      min_t(__u32, (asoc->base.sk->sk_rcvbuf >> 1), asoc->pmtu)))
1099                         return 1;
1100                 break;
1101         default:
1102                 break;
1103         }
1104         return 0;
1105 }
1106
1107 /* Increase asoc's rwnd by len and send any window update SACK if needed. */
1108 void sctp_assoc_rwnd_increase(struct sctp_association *asoc, unsigned len)
1109 {
1110         struct sctp_chunk *sack;
1111         struct timer_list *timer;
1112
1113         if (asoc->rwnd_over) {
1114                 if (asoc->rwnd_over >= len) {
1115                         asoc->rwnd_over -= len;
1116                 } else {
1117                         asoc->rwnd += (len - asoc->rwnd_over);
1118                         asoc->rwnd_over = 0;
1119                 }
1120         } else {
1121                 asoc->rwnd += len;
1122         }
1123
1124         SCTP_DEBUG_PRINTK("%s: asoc %p rwnd increased by %d to (%u, %u) "
1125                           "- %u\n", __FUNCTION__, asoc, len, asoc->rwnd,
1126                           asoc->rwnd_over, asoc->a_rwnd);
1127
1128         /* Send a window update SACK if the rwnd has increased by at least the
1129          * minimum of the association's PMTU and half of the receive buffer.
1130          * The algorithm used is similar to the one described in
1131          * Section 4.2.3.3 of RFC 1122.
1132          */
1133         if (sctp_peer_needs_update(asoc)) {
1134                 asoc->a_rwnd = asoc->rwnd;
1135                 SCTP_DEBUG_PRINTK("%s: Sending window update SACK- asoc: %p "
1136                                   "rwnd: %u a_rwnd: %u\n", __FUNCTION__,
1137                                   asoc, asoc->rwnd, asoc->a_rwnd);
1138                 sack = sctp_make_sack(asoc);
1139                 if (!sack)
1140                         return;
1141
1142                 asoc->peer.sack_needed = 0;
1143
1144                 sctp_outq_tail(&asoc->outqueue, sack);
1145
1146                 /* Stop the SACK timer.  */
1147                 timer = &asoc->timers[SCTP_EVENT_TIMEOUT_SACK];
1148                 if (timer_pending(timer) && del_timer(timer))
1149                         sctp_association_put(asoc);
1150         }
1151 }
1152
1153 /* Decrease asoc's rwnd by len. */
1154 void sctp_assoc_rwnd_decrease(struct sctp_association *asoc, unsigned len)
1155 {
1156         SCTP_ASSERT(asoc->rwnd, "rwnd zero", return);
1157         SCTP_ASSERT(!asoc->rwnd_over, "rwnd_over not zero", return);
1158         if (asoc->rwnd >= len) {
1159                 asoc->rwnd -= len;
1160         } else {
1161                 asoc->rwnd_over = len - asoc->rwnd;
1162                 asoc->rwnd = 0;
1163         }
1164         SCTP_DEBUG_PRINTK("%s: asoc %p rwnd decreased by %d to (%u, %u)\n",
1165                           __FUNCTION__, asoc, len, asoc->rwnd,
1166                           asoc->rwnd_over);
1167 }
1168
1169 /* Build the bind address list for the association based on info from the
1170  * local endpoint and the remote peer.
1171  */
1172 int sctp_assoc_set_bind_addr_from_ep(struct sctp_association *asoc, int gfp)
1173 {
1174         sctp_scope_t scope;
1175         int flags;
1176
1177         /* Use scoping rules to determine the subset of addresses from
1178          * the endpoint.
1179          */
1180         scope = sctp_scope(&asoc->peer.active_path->ipaddr);
1181         flags = (PF_INET6 == asoc->base.sk->sk_family) ? SCTP_ADDR6_ALLOWED : 0;
1182         if (asoc->peer.ipv4_address)
1183                 flags |= SCTP_ADDR4_PEERSUPP;
1184         if (asoc->peer.ipv6_address)
1185                 flags |= SCTP_ADDR6_PEERSUPP;
1186
1187         return sctp_bind_addr_copy(&asoc->base.bind_addr,
1188                                    &asoc->ep->base.bind_addr,
1189                                    scope, gfp, flags);
1190 }
1191
1192 /* Build the association's bind address list from the cookie.  */
1193 int sctp_assoc_set_bind_addr_from_cookie(struct sctp_association *asoc,
1194                                          struct sctp_cookie *cookie, int gfp)
1195 {
1196         int var_size2 = ntohs(cookie->peer_init->chunk_hdr.length);
1197         int var_size3 = cookie->raw_addr_list_len;
1198         __u8 *raw = (__u8 *)cookie->peer_init + var_size2;
1199
1200         return sctp_raw_to_bind_addrs(&asoc->base.bind_addr, raw, var_size3,
1201                                       asoc->ep->base.bind_addr.port, gfp);
1202 }
1203
1204 /* Lookup laddr in the bind address list of an association. */
1205 int sctp_assoc_lookup_laddr(struct sctp_association *asoc,
1206                             const union sctp_addr *laddr)
1207 {
1208         int found;
1209
1210         sctp_read_lock(&asoc->base.addr_lock);
1211         if ((asoc->base.bind_addr.port == ntohs(laddr->v4.sin_port)) &&
1212             sctp_bind_addr_match(&asoc->base.bind_addr, laddr,
1213                                  sctp_sk(asoc->base.sk))) {
1214                 found = 1;
1215                 goto out;
1216         }
1217
1218         found = 0;
1219 out:
1220         sctp_read_unlock(&asoc->base.addr_lock);
1221         return found;
1222 }