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