net/sctp/socket.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-2003 Intel Corp.
   6  * Copyright (c) 2001-2002 Nokia, Inc.
   7  * Copyright (c) 2001 La Monte H.P. Yarroll
   8  *
   9  * This file is part of the SCTP kernel implementation
  10  *
  11  * These functions interface with the sockets layer to implement the
  12  * SCTP Extensions for the Sockets API.
  13  *
  14  * Note that the descriptions from the specification are USER level
  15  * functions--this file is the functions which populate the struct proto
  16  * for SCTP which is the BOTTOM of the sockets interface.
  17  *
  18  * This SCTP implementation is free software;
  19  * you can redistribute it and/or modify it under the terms of
  20  * the GNU General Public License as published by
  21  * the Free Software Foundation; either version 2, or (at your option)
  22  * any later version.
  23  *
  24  * This SCTP implementation is distributed in the hope that it
  25  * will be useful, but WITHOUT ANY WARRANTY; without even the implied
  26  *                 ************************
  27  * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  28  * See the GNU General Public License for more details.
  29  *
  30  * You should have received a copy of the GNU General Public License
  31  * along with GNU CC; see the file COPYING.  If not, see
  32  * <http://www.gnu.org/licenses/>.
  33  *
  34  * Please send any bug reports or fixes you make to the
  35  * email address(es):
  36  *    lksctp developers <linux-sctp@vger.kernel.org>
  37  *
  38  * Written or modified by:
  39  *    La Monte H.P. Yarroll <piggy@acm.org>
  40  *    Narasimha Budihal     <narsi@refcode.org>
  41  *    Karl Knutson          <karl@athena.chicago.il.us>
  42  *    Jon Grimm             <jgrimm@us.ibm.com>
  43  *    Xingang Guo           <xingang.guo@intel.com>
  44  *    Daisy Chang           <daisyc@us.ibm.com>
  45  *    Sridhar Samudrala     <samudrala@us.ibm.com>
  46  *    Inaky Perez-Gonzalez  <inaky.gonzalez@intel.com>
  47  *    Ardelle Fan           <ardelle.fan@intel.com>
  48  *    Ryan Layer            <rmlayer@us.ibm.com>
  49  *    Anup Pemmaiah         <pemmaiah@cc.usu.edu>
  50  *    Kevin Gao             <kevin.gao@intel.com>
  51  */
  52
  53 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  54
  55 #include <crypto/hash.h>
  56 #include <linux/types.h>
  57 #include <linux/kernel.h>
  58 #include <linux/wait.h>
  59 #include <linux/time.h>
  60 #include <linux/sched/signal.h>
  61 #include <linux/ip.h>
  62 #include <linux/capability.h>
  63 #include <linux/fcntl.h>
  64 #include <linux/poll.h>
  65 #include <linux/init.h>
  66 #include <linux/slab.h>
  67 #include <linux/file.h>
  68 #include <linux/compat.h>
  69 #include <linux/rhashtable.h>
  70
  71 #include <net/ip.h>
  72 #include <net/icmp.h>
  73 #include <net/route.h>
  74 #include <net/ipv6.h>
  75 #include <net/inet_common.h>
  76 #include <net/busy_poll.h>
  77
  78 #include <linux/socket.h> /* for sa_family_t */
  79 #include <linux/export.h>
  80 #include <net/sock.h>
  81 #include <net/sctp/sctp.h>
  82 #include <net/sctp/sm.h>
  83 #include <net/sctp/stream_sched.h>
  84
  85 /* Forward declarations for internal helper functions. */
  86 static bool sctp_writeable(struct sock *sk);
  87 static void sctp_wfree(struct sk_buff *skb);
  88 static int sctp_wait_for_sndbuf(struct sctp_association *asoc, long *timeo_p,
  89                                 size_t msg_len);
  90 static int sctp_wait_for_packet(struct sock *sk, int *err, long *timeo_p);
  91 static int sctp_wait_for_connect(struct sctp_association *, long *timeo_p);
  92 static int sctp_wait_for_accept(struct sock *sk, long timeo);
  93 static void sctp_wait_for_close(struct sock *sk, long timeo);
  94 static void sctp_destruct_sock(struct sock *sk);
  95 static struct sctp_af *sctp_sockaddr_af(struct sctp_sock *opt,
  96                                         union sctp_addr *addr, int len);
  97 static int sctp_bindx_add(struct sock *, struct sockaddr *, int);
  98 static int sctp_bindx_rem(struct sock *, struct sockaddr *, int);
  99 static int sctp_send_asconf_add_ip(struct sock *, struct sockaddr *, int);
 100 static int sctp_send_asconf_del_ip(struct sock *, struct sockaddr *, int);
 101 static int sctp_send_asconf(struct sctp_association *asoc,
 102                             struct sctp_chunk *chunk);
 103 static int sctp_do_bind(struct sock *, union sctp_addr *, int);
 104 static int sctp_autobind(struct sock *sk);
 105 static void sctp_sock_migrate(struct sock *oldsk, struct sock *newsk,
 106                               struct sctp_association *assoc,
 107                               enum sctp_socket_type type);
 108
 109 static unsigned long sctp_memory_pressure;
 110 static atomic_long_t sctp_memory_allocated;
 111 struct percpu_counter sctp_sockets_allocated;
 112
 113 static void sctp_enter_memory_pressure(struct sock *sk)
 114 {
 115         sctp_memory_pressure = 1;
 116 }
 117
 118
 119 /* Get the sndbuf space available at the time on the association.  */
 120 static inline int sctp_wspace(struct sctp_association *asoc)
 121 {
 122         struct sock *sk = asoc->base.sk;
 123
 124         return asoc->ep->sndbuf_policy ? sk->sk_sndbuf - asoc->sndbuf_used
 125                                        : sk_stream_wspace(sk);
 126 }
 127
 128 /* Increment the used sndbuf space count of the corresponding association by
 129  * the size of the outgoing data chunk.
 130  * Also, set the skb destructor for sndbuf accounting later.
 131  *
 132  * Since it is always 1-1 between chunk and skb, and also a new skb is always
 133  * allocated for chunk bundling in sctp_packet_transmit(), we can use the
 134  * destructor in the data chunk skb for the purpose of the sndbuf space
 135  * tracking.
 136  */
 137 static inline void sctp_set_owner_w(struct sctp_chunk *chunk)
 138 {
 139         struct sctp_association *asoc = chunk->asoc;
 140         struct sock *sk = asoc->base.sk;
 141
 142         /* The sndbuf space is tracked per association.  */
 143         sctp_association_hold(asoc);
 144
 145         if (chunk->shkey)
 146                 sctp_auth_shkey_hold(chunk->shkey);
 147
 148         skb_set_owner_w(chunk->skb, sk);
 149
 150         chunk->skb->destructor = sctp_wfree;
 151         /* Save the chunk pointer in skb for sctp_wfree to use later.  */
 152         skb_shinfo(chunk->skb)->destructor_arg = chunk;
 153
 154         refcount_add(sizeof(struct sctp_chunk), &sk->sk_wmem_alloc);
 155         asoc->sndbuf_used += chunk->skb->truesize + sizeof(struct sctp_chunk);
 156         sk->sk_wmem_queued += chunk->skb->truesize + sizeof(struct sctp_chunk);
 157         sk_mem_charge(sk, chunk->skb->truesize);
 158 }
 159
 160 static void sctp_clear_owner_w(struct sctp_chunk *chunk)
 161 {
 162         skb_orphan(chunk->skb);
 163 }
 164
 165 static void sctp_for_each_tx_datachunk(struct sctp_association *asoc,
 166                                        void (*cb)(struct sctp_chunk *))
 167
 168 {
 169         struct sctp_outq *q = &asoc->outqueue;
 170         struct sctp_transport *t;
 171         struct sctp_chunk *chunk;
 172
 173         list_for_each_entry(t, &asoc->peer.transport_addr_list, transports)
 174                 list_for_each_entry(chunk, &t->transmitted, transmitted_list)
 175                         cb(chunk);
 176
 177         list_for_each_entry(chunk, &q->retransmit, transmitted_list)
 178                 cb(chunk);
 179
 180         list_for_each_entry(chunk, &q->sacked, transmitted_list)
 181                 cb(chunk);
 182
 183         list_for_each_entry(chunk, &q->abandoned, transmitted_list)
 184                 cb(chunk);
 185
 186         list_for_each_entry(chunk, &q->out_chunk_list, list)
 187                 cb(chunk);
 188 }
 189
 190 static void sctp_for_each_rx_skb(struct sctp_association *asoc, struct sock *sk,
 191                                  void (*cb)(struct sk_buff *, struct sock *))
 192
 193 {
 194         struct sk_buff *skb, *tmp;
 195
 196         sctp_skb_for_each(skb, &asoc->ulpq.lobby, tmp)
 197                 cb(skb, sk);
 198
 199         sctp_skb_for_each(skb, &asoc->ulpq.reasm, tmp)
 200                 cb(skb, sk);
 201
 202         sctp_skb_for_each(skb, &asoc->ulpq.reasm_uo, tmp)
 203                 cb(skb, sk);
 204 }
 205
 206 /* Verify that this is a valid address. */
 207 static inline int sctp_verify_addr(struct sock *sk, union sctp_addr *addr,
 208                                    int len)
 209 {
 210         struct sctp_af *af;
 211
 212         /* Verify basic sockaddr. */
 213         af = sctp_sockaddr_af(sctp_sk(sk), addr, len);
 214         if (!af)
 215                 return -EINVAL;
 216
 217         /* Is this a valid SCTP address?  */
 218         if (!af->addr_valid(addr, sctp_sk(sk), NULL))
 219                 return -EINVAL;
 220
 221         if (!sctp_sk(sk)->pf->send_verify(sctp_sk(sk), (addr)))
 222                 return -EINVAL;
 223
 224         return 0;
 225 }
 226
 227 /* Look up the association by its id.  If this is not a UDP-style
 228  * socket, the ID field is always ignored.
 229  */
 230 struct sctp_association *sctp_id2assoc(struct sock *sk, sctp_assoc_t id)
 231 {
 232         struct sctp_association *asoc = NULL;
 233
 234         /* If this is not a UDP-style socket, assoc id should be ignored. */
 235         if (!sctp_style(sk, UDP)) {
 236                 /* Return NULL if the socket state is not ESTABLISHED. It
 237                  * could be a TCP-style listening socket or a socket which
 238                  * hasn't yet called connect() to establish an association.
 239                  */
 240                 if (!sctp_sstate(sk, ESTABLISHED) && !sctp_sstate(sk, CLOSING))
 241                         return NULL;
 242
 243                 /* Get the first and the only association from the list. */
 244                 if (!list_empty(&sctp_sk(sk)->ep->asocs))
 245                         asoc = list_entry(sctp_sk(sk)->ep->asocs.next,
 246                                           struct sctp_association, asocs);
 247                 return asoc;
 248         }
 249
 250         /* Otherwise this is a UDP-style socket. */
 251         if (id <= SCTP_ALL_ASSOC)
 252                 return NULL;
 253
 254         spin_lock_bh(&sctp_assocs_id_lock);
 255         asoc = (struct sctp_association *)idr_find(&sctp_assocs_id, (int)id);
 256         if (asoc && (asoc->base.sk != sk || asoc->base.dead))
 257                 asoc = NULL;
 258         spin_unlock_bh(&sctp_assocs_id_lock);
 259
 260         return asoc;
 261 }
 262
 263 /* Look up the transport from an address and an assoc id. If both address and
 264  * id are specified, the associations matching the address and the id should be
 265  * the same.
 266  */
 267 static struct sctp_transport *sctp_addr_id2transport(struct sock *sk,
 268                                               struct sockaddr_storage *addr,
 269                                               sctp_assoc_t id)
 270 {
 271         struct sctp_association *addr_asoc = NULL, *id_asoc = NULL;
 272         struct sctp_af *af = sctp_get_af_specific(addr->ss_family);
 273         union sctp_addr *laddr = (union sctp_addr *)addr;
 274         struct sctp_transport *transport;
 275
 276         if (!af || sctp_verify_addr(sk, laddr, af->sockaddr_len))
 277                 return NULL;
 278
 279         addr_asoc = sctp_endpoint_lookup_assoc(sctp_sk(sk)->ep,
 280                                                laddr,
 281                                                &transport);
 282
 283         if (!addr_asoc)
 284                 return NULL;
 285
 286         id_asoc = sctp_id2assoc(sk, id);
 287         if (id_asoc && (id_asoc != addr_asoc))
 288                 return NULL;
 289
 290         sctp_get_pf_specific(sk->sk_family)->addr_to_user(sctp_sk(sk),
 291                                                 (union sctp_addr *)addr);
 292
 293         return transport;
 294 }
 295
 296 /* API 3.1.2 bind() - UDP Style Syntax
 297  * The syntax of bind() is,
 298  *
 299  *   ret = bind(int sd, struct sockaddr *addr, int addrlen);
 300  *
 301  *   sd      - the socket descriptor returned by socket().
 302  *   addr    - the address structure (struct sockaddr_in or struct
 303  *             sockaddr_in6 [RFC 2553]),
 304  *   addr_len - the size of the address structure.
 305  */
 306 static int sctp_bind(struct sock *sk, struct sockaddr *addr, int addr_len)
 307 {
 308         int retval = 0;
 309
 310         lock_sock(sk);
 311
 312         pr_debug("%s: sk:%p, addr:%p, addr_len:%d\n", __func__, sk,
 313                  addr, addr_len);
 314
 315         /* Disallow binding twice. */
 316         if (!sctp_sk(sk)->ep->base.bind_addr.port)
 317                 retval = sctp_do_bind(sk, (union sctp_addr *)addr,
 318                                       addr_len);
 319         else
 320                 retval = -EINVAL;
 321
 322         release_sock(sk);
 323
 324         return retval;
 325 }
 326
 327 static long sctp_get_port_local(struct sock *, union sctp_addr *);
 328
 329 /* Verify this is a valid sockaddr. */
 330 static struct sctp_af *sctp_sockaddr_af(struct sctp_sock *opt,
 331                                         union sctp_addr *addr, int len)
 332 {
 333         struct sctp_af *af;
 334
 335         /* Check minimum size.  */
 336         if (len < sizeof (struct sockaddr))
 337                 return NULL;
 338
 339         if (!opt->pf->af_supported(addr->sa.sa_family, opt))
 340                 return NULL;
 341
 342         if (addr->sa.sa_family == AF_INET6) {
 343                 if (len < SIN6_LEN_RFC2133)
 344                         return NULL;
 345                 /* V4 mapped address are really of AF_INET family */
 346                 if (ipv6_addr_v4mapped(&addr->v6.sin6_addr) &&
 347                     !opt->pf->af_supported(AF_INET, opt))
 348                         return NULL;
 349         }
 350
 351         /* If we get this far, af is valid. */
 352         af = sctp_get_af_specific(addr->sa.sa_family);
 353
 354         if (len < af->sockaddr_len)
 355                 return NULL;
 356
 357         return af;
 358 }
 359
 360 /* Bind a local address either to an endpoint or to an association.  */
 361 static int sctp_do_bind(struct sock *sk, union sctp_addr *addr, int len)
 362 {
 363         struct net *net = sock_net(sk);
 364         struct sctp_sock *sp = sctp_sk(sk);
 365         struct sctp_endpoint *ep = sp->ep;
 366         struct sctp_bind_addr *bp = &ep->base.bind_addr;
 367         struct sctp_af *af;
 368         unsigned short snum;
 369         int ret = 0;
 370
 371         /* Common sockaddr verification. */
 372         af = sctp_sockaddr_af(sp, addr, len);
 373         if (!af) {
 374                 pr_debug("%s: sk:%p, newaddr:%p, len:%d EINVAL\n",
 375                          __func__, sk, addr, len);
 376                 return -EINVAL;
 377         }
 378
 379         snum = ntohs(addr->v4.sin_port);
 380
 381         pr_debug("%s: sk:%p, new addr:%pISc, port:%d, new port:%d, len:%d\n",
 382                  __func__, sk, &addr->sa, bp->port, snum, len);
 383
 384         /* PF specific bind() address verification. */
 385         if (!sp->pf->bind_verify(sp, addr))
 386                 return -EADDRNOTAVAIL;
 387
 388         /* We must either be unbound, or bind to the same port.
 389          * It's OK to allow 0 ports if we are already bound.
 390          * We'll just inhert an already bound port in this case
 391          */
 392         if (bp->port) {
 393                 if (!snum)
 394                         snum = bp->port;
 395                 else if (snum != bp->port) {
 396                         pr_debug("%s: new port %d doesn't match existing port "
 397                                  "%d\n", __func__, snum, bp->port);
 398                         return -EINVAL;
 399                 }
 400         }
 401
 402         if (snum && snum < inet_prot_sock(net) &&
 403             !ns_capable(net->user_ns, CAP_NET_BIND_SERVICE))
 404                 return -EACCES;
 405
 406         /* See if the address matches any of the addresses we may have
 407          * already bound before checking against other endpoints.
 408          */
 409         if (sctp_bind_addr_match(bp, addr, sp))
 410                 return -EINVAL;
 411
 412         /* Make sure we are allowed to bind here.
 413          * The function sctp_get_port_local() does duplicate address
 414          * detection.
 415          */
 416         addr->v4.sin_port = htons(snum);
 417         if ((ret = sctp_get_port_local(sk, addr))) {
 418                 return -EADDRINUSE;
 419         }
 420
 421         /* Refresh ephemeral port.  */
 422         if (!bp->port)
 423                 bp->port = inet_sk(sk)->inet_num;
 424
 425         /* Add the address to the bind address list.
 426          * Use GFP_ATOMIC since BHs will be disabled.
 427          */
 428         ret = sctp_add_bind_addr(bp, addr, af->sockaddr_len,
 429                                  SCTP_ADDR_SRC, GFP_ATOMIC);
 430
 431         /* Copy back into socket for getsockname() use. */
 432         if (!ret) {
 433                 inet_sk(sk)->inet_sport = htons(inet_sk(sk)->inet_num);
 434                 sp->pf->to_sk_saddr(addr, sk);
 435         }
 436
 437         return ret;
 438 }
 439
 440  /* ADDIP Section 4.1.1 Congestion Control of ASCONF Chunks
 441  *
 442  * R1) One and only one ASCONF Chunk MAY be in transit and unacknowledged
 443  * at any one time.  If a sender, after sending an ASCONF chunk, decides
 444  * it needs to transfer another ASCONF Chunk, it MUST wait until the
 445  * ASCONF-ACK Chunk returns from the previous ASCONF Chunk before sending a
 446  * subsequent ASCONF. Note this restriction binds each side, so at any
 447  * time two ASCONF may be in-transit on any given association (one sent
 448  * from each endpoint).
 449  */
 450 static int sctp_send_asconf(struct sctp_association *asoc,
 451                             struct sctp_chunk *chunk)
 452 {
 453         struct net      *net = sock_net(asoc->base.sk);
 454         int             retval = 0;
 455
 456         /* If there is an outstanding ASCONF chunk, queue it for later
 457          * transmission.
 458          */
 459         if (asoc->addip_last_asconf) {
 460                 list_add_tail(&chunk->list, &asoc->addip_chunk_list);
 461                 goto out;
 462         }
 463
 464         /* Hold the chunk until an ASCONF_ACK is received. */
 465         sctp_chunk_hold(chunk);
 466         retval = sctp_primitive_ASCONF(net, asoc, chunk);
 467         if (retval)
 468                 sctp_chunk_free(chunk);
 469         else
 470                 asoc->addip_last_asconf = chunk;
 471
 472 out:
 473         return retval;
 474 }
 475
 476 /* Add a list of addresses as bind addresses to local endpoint or
 477  * association.
 478  *
 479  * Basically run through each address specified in the addrs/addrcnt
 480  * array/length pair, determine if it is IPv6 or IPv4 and call
 481  * sctp_do_bind() on it.
 482  *
 483  * If any of them fails, then the operation will be reversed and the
 484  * ones that were added will be removed.
 485  *
 486  * Only sctp_setsockopt_bindx() is supposed to call this function.
 487  */
 488 static int sctp_bindx_add(struct sock *sk, struct sockaddr *addrs, int addrcnt)
 489 {
 490         int cnt;
 491         int retval = 0;
 492         void *addr_buf;
 493         struct sockaddr *sa_addr;
 494         struct sctp_af *af;
 495
 496         pr_debug("%s: sk:%p, addrs:%p, addrcnt:%d\n", __func__, sk,
 497                  addrs, addrcnt);
 498
 499         addr_buf = addrs;
 500         for (cnt = 0; cnt < addrcnt; cnt++) {
 501                 /* The list may contain either IPv4 or IPv6 address;
 502                  * determine the address length for walking thru the list.
 503                  */
 504                 sa_addr = addr_buf;
 505                 af = sctp_get_af_specific(sa_addr->sa_family);
 506                 if (!af) {
 507                         retval = -EINVAL;
 508                         goto err_bindx_add;
 509                 }
 510
 511                 retval = sctp_do_bind(sk, (union sctp_addr *)sa_addr,
 512                                       af->sockaddr_len);
 513
 514                 addr_buf += af->sockaddr_len;
 515
 516 err_bindx_add:
 517                 if (retval < 0) {
 518                         /* Failed. Cleanup the ones that have been added */
 519                         if (cnt > 0)
 520                                 sctp_bindx_rem(sk, addrs, cnt);
 521                         return retval;
 522                 }
 523         }
 524
 525         return retval;
 526 }
 527
 528 /* Send an ASCONF chunk with Add IP address parameters to all the peers of the
 529  * associations that are part of the endpoint indicating that a list of local
 530  * addresses are added to the endpoint.
 531  *
 532  * If any of the addresses is already in the bind address list of the
 533  * association, we do not send the chunk for that association.  But it will not
 534  * affect other associations.
 535  *
 536  * Only sctp_setsockopt_bindx() is supposed to call this function.
 537  */
 538 static int sctp_send_asconf_add_ip(struct sock          *sk,
 539                                    struct sockaddr      *addrs,
 540                                    int                  addrcnt)
 541 {
 542         struct net *net = sock_net(sk);
 543         struct sctp_sock                *sp;
 544         struct sctp_endpoint            *ep;
 545         struct sctp_association         *asoc;
 546         struct sctp_bind_addr           *bp;
 547         struct sctp_chunk               *chunk;
 548         struct sctp_sockaddr_entry      *laddr;
 549         union sctp_addr                 *addr;
 550         union sctp_addr                 saveaddr;
 551         void                            *addr_buf;
 552         struct sctp_af                  *af;
 553         struct list_head                *p;
 554         int                             i;
 555         int                             retval = 0;
 556
 557         if (!net->sctp.addip_enable)
 558                 return retval;
 559
 560         sp = sctp_sk(sk);
 561         ep = sp->ep;
 562
 563         pr_debug("%s: sk:%p, addrs:%p, addrcnt:%d\n",
 564                  __func__, sk, addrs, addrcnt);
 565
 566         list_for_each_entry(asoc, &ep->asocs, asocs) {
 567                 if (!asoc->peer.asconf_capable)
 568                         continue;
 569
 570                 if (asoc->peer.addip_disabled_mask & SCTP_PARAM_ADD_IP)
 571                         continue;
 572
 573                 if (!sctp_state(asoc, ESTABLISHED))
 574                         continue;
 575
 576                 /* Check if any address in the packed array of addresses is
 577                  * in the bind address list of the association. If so,
 578                  * do not send the asconf chunk to its peer, but continue with
 579                  * other associations.
 580                  */
 581                 addr_buf = addrs;
 582                 for (i = 0; i < addrcnt; i++) {
 583                         addr = addr_buf;
 584                         af = sctp_get_af_specific(addr->v4.sin_family);
 585                         if (!af) {
 586                                 retval = -EINVAL;
 587                                 goto out;
 588                         }
 589
 590                         if (sctp_assoc_lookup_laddr(asoc, addr))
 591                                 break;
 592
 593                         addr_buf += af->sockaddr_len;
 594                 }
 595                 if (i < addrcnt)
 596                         continue;
 597
 598                 /* Use the first valid address in bind addr list of
 599                  * association as Address Parameter of ASCONF CHUNK.
 600                  */
 601                 bp = &asoc->base.bind_addr;
 602                 p = bp->address_list.next;
 603                 laddr = list_entry(p, struct sctp_sockaddr_entry, list);
 604                 chunk = sctp_make_asconf_update_ip(asoc, &laddr->a, addrs,
 605                                                    addrcnt, SCTP_PARAM_ADD_IP);
 606                 if (!chunk) {
 607                         retval = -ENOMEM;
 608                         goto out;
 609                 }
 610
 611                 /* Add the new addresses to the bind address list with
 612                  * use_as_src set to 0.
 613                  */
 614                 addr_buf = addrs;
 615                 for (i = 0; i < addrcnt; i++) {
 616                         addr = addr_buf;
 617                         af = sctp_get_af_specific(addr->v4.sin_family);
 618                         memcpy(&saveaddr, addr, af->sockaddr_len);
 619                         retval = sctp_add_bind_addr(bp, &saveaddr,
 620                                                     sizeof(saveaddr),
 621                                                     SCTP_ADDR_NEW, GFP_ATOMIC);
 622                         addr_buf += af->sockaddr_len;
 623                 }
 624                 if (asoc->src_out_of_asoc_ok) {
 625                         struct sctp_transport *trans;
 626
 627                         list_for_each_entry(trans,
 628                             &asoc->peer.transport_addr_list, transports) {
 629                                 trans->cwnd = min(4*asoc->pathmtu, max_t(__u32,
 630                                     2*asoc->pathmtu, 4380));
 631                                 trans->ssthresh = asoc->peer.i.a_rwnd;
 632                                 trans->rto = asoc->rto_initial;
 633                                 sctp_max_rto(asoc, trans);
 634                                 trans->rtt = trans->srtt = trans->rttvar = 0;
 635                                 /* Clear the source and route cache */
 636                                 sctp_transport_route(trans, NULL,
 637                                                      sctp_sk(asoc->base.sk));
 638                         }
 639                 }
 640                 retval = sctp_send_asconf(asoc, chunk);
 641         }
 642
 643 out:
 644         return retval;
 645 }
 646
 647 /* Remove a list of addresses from bind addresses list.  Do not remove the
 648  * last address.
 649  *
 650  * Basically run through each address specified in the addrs/addrcnt
 651  * array/length pair, determine if it is IPv6 or IPv4 and call
 652  * sctp_del_bind() on it.
 653  *
 654  * If any of them fails, then the operation will be reversed and the
 655  * ones that were removed will be added back.
 656  *
 657  * At least one address has to be left; if only one address is
 658  * available, the operation will return -EBUSY.
 659  *
 660  * Only sctp_setsockopt_bindx() is supposed to call this function.
 661  */
 662 static int sctp_bindx_rem(struct sock *sk, struct sockaddr *addrs, int addrcnt)
 663 {
 664         struct sctp_sock *sp = sctp_sk(sk);
 665         struct sctp_endpoint *ep = sp->ep;
 666         int cnt;
 667         struct sctp_bind_addr *bp = &ep->base.bind_addr;
 668         int retval = 0;
 669         void *addr_buf;
 670         union sctp_addr *sa_addr;
 671         struct sctp_af *af;
 672
 673         pr_debug("%s: sk:%p, addrs:%p, addrcnt:%d\n",
 674                  __func__, sk, addrs, addrcnt);
 675
 676         addr_buf = addrs;
 677         for (cnt = 0; cnt < addrcnt; cnt++) {
 678                 /* If the bind address list is empty or if there is only one
 679                  * bind address, there is nothing more to be removed (we need
 680                  * at least one address here).
 681                  */
 682                 if (list_empty(&bp->address_list) ||
 683                     (sctp_list_single_entry(&bp->address_list))) {
 684                         retval = -EBUSY;
 685                         goto err_bindx_rem;
 686                 }
 687
 688                 sa_addr = addr_buf;
 689                 af = sctp_get_af_specific(sa_addr->sa.sa_family);
 690                 if (!af) {
 691                         retval = -EINVAL;
 692                         goto err_bindx_rem;
 693                 }
 694
 695                 if (!af->addr_valid(sa_addr, sp, NULL)) {
 696                         retval = -EADDRNOTAVAIL;
 697                         goto err_bindx_rem;
 698                 }
 699
 700                 if (sa_addr->v4.sin_port &&
 701                     sa_addr->v4.sin_port != htons(bp->port)) {
 702                         retval = -EINVAL;
 703                         goto err_bindx_rem;
 704                 }
 705
 706                 if (!sa_addr->v4.sin_port)
 707                         sa_addr->v4.sin_port = htons(bp->port);
 708
 709                 /* FIXME - There is probably a need to check if sk->sk_saddr and
 710                  * sk->sk_rcv_addr are currently set to one of the addresses to
 711                  * be removed. This is something which needs to be looked into
 712                  * when we are fixing the outstanding issues with multi-homing
 713                  * socket routing and failover schemes. Refer to comments in
 714                  * sctp_do_bind(). -daisy
 715                  */
 716                 retval = sctp_del_bind_addr(bp, sa_addr);
 717
 718                 addr_buf += af->sockaddr_len;
 719 err_bindx_rem:
 720                 if (retval < 0) {
 721                         /* Failed. Add the ones that has been removed back */
 722                         if (cnt > 0)
 723                                 sctp_bindx_add(sk, addrs, cnt);
 724                         return retval;
 725                 }
 726         }
 727
 728         return retval;
 729 }
 730
 731 /* Send an ASCONF chunk with Delete IP address parameters to all the peers of
 732  * the associations that are part of the endpoint indicating that a list of
 733  * local addresses are removed from the endpoint.
 734  *
 735  * If any of the addresses is already in the bind address list of the
 736  * association, we do not send the chunk for that association.  But it will not
 737  * affect other associations.
 738  *
 739  * Only sctp_setsockopt_bindx() is supposed to call this function.
 740  */
 741 static int sctp_send_asconf_del_ip(struct sock          *sk,
 742                                    struct sockaddr      *addrs,
 743                                    int                  addrcnt)
 744 {
 745         struct net *net = sock_net(sk);
 746         struct sctp_sock        *sp;
 747         struct sctp_endpoint    *ep;
 748         struct sctp_association *asoc;
 749         struct sctp_transport   *transport;
 750         struct sctp_bind_addr   *bp;
 751         struct sctp_chunk       *chunk;
 752         union sctp_addr         *laddr;
 753         void                    *addr_buf;
 754         struct sctp_af          *af;
 755         struct sctp_sockaddr_entry *saddr;
 756         int                     i;
 757         int                     retval = 0;
 758         int                     stored = 0;
 759
 760         chunk = NULL;
 761         if (!net->sctp.addip_enable)
 762                 return retval;
 763
 764         sp = sctp_sk(sk);
 765         ep = sp->ep;
 766
 767         pr_debug("%s: sk:%p, addrs:%p, addrcnt:%d\n",
 768                  __func__, sk, addrs, addrcnt);
 769
 770         list_for_each_entry(asoc, &ep->asocs, asocs) {
 771
 772                 if (!asoc->peer.asconf_capable)
 773                         continue;
 774
 775                 if (asoc->peer.addip_disabled_mask & SCTP_PARAM_DEL_IP)
 776                         continue;
 777
 778                 if (!sctp_state(asoc, ESTABLISHED))
 779                         continue;
 780
 781                 /* Check if any address in the packed array of addresses is
 782                  * not present in the bind address list of the association.
 783                  * If so, do not send the asconf chunk to its peer, but
 784                  * continue with other associations.
 785                  */
 786                 addr_buf = addrs;
 787                 for (i = 0; i < addrcnt; i++) {
 788                         laddr = addr_buf;
 789                         af = sctp_get_af_specific(laddr->v4.sin_family);
 790                         if (!af) {
 791                                 retval = -EINVAL;
 792                                 goto out;
 793                         }
 794
 795                         if (!sctp_assoc_lookup_laddr(asoc, laddr))
 796                                 break;
 797
 798                         addr_buf += af->sockaddr_len;
 799                 }
 800                 if (i < addrcnt)
 801                         continue;
 802
 803                 /* Find one address in the association's bind address list
 804                  * that is not in the packed array of addresses. This is to
 805                  * make sure that we do not delete all the addresses in the
 806                  * association.
 807                  */
 808                 bp = &asoc->base.bind_addr;
 809                 laddr = sctp_find_unmatch_addr(bp, (union sctp_addr *)addrs,
 810                                                addrcnt, sp);
 811                 if ((laddr == NULL) && (addrcnt == 1)) {
 812                         if (asoc->asconf_addr_del_pending)
 813                                 continue;
 814                         asoc->asconf_addr_del_pending =
 815                             kzalloc(sizeof(union sctp_addr), GFP_ATOMIC);
 816                         if (asoc->asconf_addr_del_pending == NULL) {
 817                                 retval = -ENOMEM;
 818                                 goto out;
 819                         }
 820                         asoc->asconf_addr_del_pending->sa.sa_family =
 821                                     addrs->sa_family;
 822                         asoc->asconf_addr_del_pending->v4.sin_port =
 823                                     htons(bp->port);
 824                         if (addrs->sa_family == AF_INET) {
 825                                 struct sockaddr_in *sin;
 826
 827                                 sin = (struct sockaddr_in *)addrs;
 828                                 asoc->asconf_addr_del_pending->v4.sin_addr.s_addr = sin->sin_addr.s_addr;
 829                         } else if (addrs->sa_family == AF_INET6) {
 830                                 struct sockaddr_in6 *sin6;
 831
 832                                 sin6 = (struct sockaddr_in6 *)addrs;
 833                                 asoc->asconf_addr_del_pending->v6.sin6_addr = sin6->sin6_addr;
 834                         }
 835
 836                         pr_debug("%s: keep the last address asoc:%p %pISc at %p\n",
 837                                  __func__, asoc, &asoc->asconf_addr_del_pending->sa,
 838                                  asoc->asconf_addr_del_pending);
 839
 840                         asoc->src_out_of_asoc_ok = 1;
 841                         stored = 1;
 842                         goto skip_mkasconf;
 843                 }
 844
 845                 if (laddr == NULL)
 846                         return -EINVAL;
 847
 848                 /* We do not need RCU protection throughout this loop
 849                  * because this is done under a socket lock from the
 850                  * setsockopt call.
 851                  */
 852                 chunk = sctp_make_asconf_update_ip(asoc, laddr, addrs, addrcnt,
 853                                                    SCTP_PARAM_DEL_IP);
 854                 if (!chunk) {
 855                         retval = -ENOMEM;
 856                         goto out;
 857                 }
 858
 859 skip_mkasconf:
 860                 /* Reset use_as_src flag for the addresses in the bind address
 861                  * list that are to be deleted.
 862                  */
 863                 addr_buf = addrs;
 864                 for (i = 0; i < addrcnt; i++) {
 865                         laddr = addr_buf;
 866                         af = sctp_get_af_specific(laddr->v4.sin_family);
 867                         list_for_each_entry(saddr, &bp->address_list, list) {
 868                                 if (sctp_cmp_addr_exact(&saddr->a, laddr))
 869                                         saddr->state = SCTP_ADDR_DEL;
 870                         }
 871                         addr_buf += af->sockaddr_len;
 872                 }
 873
 874                 /* Update the route and saddr entries for all the transports
 875                  * as some of the addresses in the bind address list are
 876                  * about to be deleted and cannot be used as source addresses.
 877                  */
 878                 list_for_each_entry(transport, &asoc->peer.transport_addr_list,
 879                                         transports) {
 880                         sctp_transport_route(transport, NULL,
 881                                              sctp_sk(asoc->base.sk));
 882                 }
 883
 884                 if (stored)
 885                         /* We don't need to transmit ASCONF */
 886                         continue;
 887                 retval = sctp_send_asconf(asoc, chunk);
 888         }
 889 out:
 890         return retval;
 891 }
 892
 893 /* set addr events to assocs in the endpoint.  ep and addr_wq must be locked */
 894 int sctp_asconf_mgmt(struct sctp_sock *sp, struct sctp_sockaddr_entry *addrw)
 895 {
 896         struct sock *sk = sctp_opt2sk(sp);
 897         union sctp_addr *addr;
 898         struct sctp_af *af;
 899
 900         /* It is safe to write port space in caller. */
 901         addr = &addrw->a;
 902         addr->v4.sin_port = htons(sp->ep->base.bind_addr.port);
 903         af = sctp_get_af_specific(addr->sa.sa_family);
 904         if (!af)
 905                 return -EINVAL;
 906         if (sctp_verify_addr(sk, addr, af->sockaddr_len))
 907                 return -EINVAL;
 908
 909         if (addrw->state == SCTP_ADDR_NEW)
 910                 return sctp_send_asconf_add_ip(sk, (struct sockaddr *)addr, 1);
 911         else
 912                 return sctp_send_asconf_del_ip(sk, (struct sockaddr *)addr, 1);
 913 }
 914
 915 /* Helper for tunneling sctp_bindx() requests through sctp_setsockopt()
 916  *
 917  * API 8.1
 918  * int sctp_bindx(int sd, struct sockaddr *addrs, int addrcnt,
 919  *                int flags);
 920  *
 921  * If sd is an IPv4 socket, the addresses passed must be IPv4 addresses.
 922  * If the sd is an IPv6 socket, the addresses passed can either be IPv4
 923  * or IPv6 addresses.
 924  *
 925  * A single address may be specified as INADDR_ANY or IN6ADDR_ANY, see
 926  * Section 3.1.2 for this usage.
 927  *
 928  * addrs is a pointer to an array of one or more socket addresses. Each
 929  * address is contained in its appropriate structure (i.e. struct
 930  * sockaddr_in or struct sockaddr_in6) the family of the address type
 931  * must be used to distinguish the address length (note that this
 932  * representation is termed a "packed array" of addresses). The caller
 933  * specifies the number of addresses in the array with addrcnt.
 934  *
 935  * On success, sctp_bindx() returns 0. On failure, sctp_bindx() returns
 936  * -1, and sets errno to the appropriate error code.
 937  *
 938  * For SCTP, the port given in each socket address must be the same, or
 939  * sctp_bindx() will fail, setting errno to EINVAL.
 940  *
 941  * The flags parameter is formed from the bitwise OR of zero or more of
 942  * the following currently defined flags:
 943  *
 944  * SCTP_BINDX_ADD_ADDR
 945  *
 946  * SCTP_BINDX_REM_ADDR
 947  *
 948  * SCTP_BINDX_ADD_ADDR directs SCTP to add the given addresses to the
 949  * association, and SCTP_BINDX_REM_ADDR directs SCTP to remove the given
 950  * addresses from the association. The two flags are mutually exclusive;
 951  * if both are given, sctp_bindx() will fail with EINVAL. A caller may
 952  * not remove all addresses from an association; sctp_bindx() will
 953  * reject such an attempt with EINVAL.
 954  *
 955  * An application can use sctp_bindx(SCTP_BINDX_ADD_ADDR) to associate
 956  * additional addresses with an endpoint after calling bind().  Or use
 957  * sctp_bindx(SCTP_BINDX_REM_ADDR) to remove some addresses a listening
 958  * socket is associated with so that no new association accepted will be
 959  * associated with those addresses. If the endpoint supports dynamic
 960  * address a SCTP_BINDX_REM_ADDR or SCTP_BINDX_ADD_ADDR may cause a
 961  * endpoint to send the appropriate message to the peer to change the
 962  * peers address lists.
 963  *
 964  * Adding and removing addresses from a connected association is
 965  * optional functionality. Implementations that do not support this
 966  * functionality should return EOPNOTSUPP.
 967  *
 968  * Basically do nothing but copying the addresses from user to kernel
 969  * land and invoking either sctp_bindx_add() or sctp_bindx_rem() on the sk.
 970  * This is used for tunneling the sctp_bindx() request through sctp_setsockopt()
 971  * from userspace.
 972  *
 973  * On exit there is no need to do sockfd_put(), sys_setsockopt() does
 974  * it.
 975  *
 976  * sk        The sk of the socket
 977  * addrs     The pointer to the addresses in user land
 978  * addrssize Size of the addrs buffer
 979  * op        Operation to perform (add or remove, see the flags of
 980  *           sctp_bindx)
 981  *
 982  * Returns 0 if ok, <0 errno code on error.
 983  */
 984 static int sctp_setsockopt_bindx(struct sock *sk,
 985                                  struct sockaddr __user *addrs,
 986                                  int addrs_size, int op)
 987 {
 988         struct sockaddr *kaddrs;
 989         int err;
 990         int addrcnt = 0;
 991         int walk_size = 0;
 992         struct sockaddr *sa_addr;
 993         void *addr_buf;
 994         struct sctp_af *af;
 995
 996         pr_debug("%s: sk:%p addrs:%p addrs_size:%d opt:%d\n",
 997                  __func__, sk, addrs, addrs_size, op);
 998
 999         if (unlikely(addrs_size <= 0))
1000                 return -EINVAL;
1001
1002         kaddrs = vmemdup_user(addrs, addrs_size);
1003         if (unlikely(IS_ERR(kaddrs)))
1004                 return PTR_ERR(kaddrs);
1005
1006         /* Walk through the addrs buffer and count the number of addresses. */
1007         addr_buf = kaddrs;
1008         while (walk_size < addrs_size) {
1009                 if (walk_size + sizeof(sa_family_t) > addrs_size) {
1010                         kvfree(kaddrs);
1011                         return -EINVAL;
1012                 }
1013
1014                 sa_addr = addr_buf;
1015                 af = sctp_get_af_specific(sa_addr->sa_family);
1016
1017                 /* If the address family is not supported or if this address
1018                  * causes the address buffer to overflow return EINVAL.
1019                  */
1020                 if (!af || (walk_size + af->sockaddr_len) > addrs_size) {
1021                         kvfree(kaddrs);
1022                         return -EINVAL;
1023                 }
1024                 addrcnt++;
1025                 addr_buf += af->sockaddr_len;
1026                 walk_size += af->sockaddr_len;
1027         }
1028
1029         /* Do the work. */
1030         switch (op) {
1031         case SCTP_BINDX_ADD_ADDR:
1032                 /* Allow security module to validate bindx addresses. */
1033                 err = security_sctp_bind_connect(sk, SCTP_SOCKOPT_BINDX_ADD,
1034                                                  (struct sockaddr *)kaddrs,
1035                                                  addrs_size);
1036                 if (err)
1037                         goto out;
1038                 err = sctp_bindx_add(sk, kaddrs, addrcnt);
1039                 if (err)
1040                         goto out;
1041                 err = sctp_send_asconf_add_ip(sk, kaddrs, addrcnt);
1042                 break;
1043
1044         case SCTP_BINDX_REM_ADDR:
1045                 err = sctp_bindx_rem(sk, kaddrs, addrcnt);
1046                 if (err)
1047                         goto out;
1048                 err = sctp_send_asconf_del_ip(sk, kaddrs, addrcnt);
1049                 break;
1050
1051         default:
1052                 err = -EINVAL;
1053                 break;
1054         }
1055
1056 out:
1057         kvfree(kaddrs);
1058
1059         return err;
1060 }
1061
1062 /* __sctp_connect(struct sock* sk, struct sockaddr *kaddrs, int addrs_size)
1063  *
1064  * Common routine for handling connect() and sctp_connectx().
1065  * Connect will come in with just a single address.
1066  */
1067 static int __sctp_connect(struct sock *sk,
1068                           struct sockaddr *kaddrs,
1069                           int addrs_size, int flags,
1070                           sctp_assoc_t *assoc_id)
1071 {
1072         struct net *net = sock_net(sk);
1073         struct sctp_sock *sp;
1074         struct sctp_endpoint *ep;
1075         struct sctp_association *asoc = NULL;
1076         struct sctp_association *asoc2;
1077         struct sctp_transport *transport;
1078         union sctp_addr to;
1079         enum sctp_scope scope;
1080         long timeo;
1081         int err = 0;
1082         int addrcnt = 0;
1083         int walk_size = 0;
1084         union sctp_addr *sa_addr = NULL;
1085         void *addr_buf;
1086         unsigned short port;
1087
1088         sp = sctp_sk(sk);
1089         ep = sp->ep;
1090
1091         /* connect() cannot be done on a socket that is already in ESTABLISHED
1092          * state - UDP-style peeled off socket or a TCP-style socket that
1093          * is already connected.
1094          * It cannot be done even on a TCP-style listening socket.
1095          */
1096         if (sctp_sstate(sk, ESTABLISHED) || sctp_sstate(sk, CLOSING) ||
1097             (sctp_style(sk, TCP) && sctp_sstate(sk, LISTENING))) {
1098                 err = -EISCONN;
1099                 goto out_free;
1100         }
1101
1102         /* Walk through the addrs buffer and count the number of addresses. */
1103         addr_buf = kaddrs;
1104         while (walk_size < addrs_size) {
1105                 struct sctp_af *af;
1106
1107                 if (walk_size + sizeof(sa_family_t) > addrs_size) {
1108                         err = -EINVAL;
1109                         goto out_free;
1110                 }
1111
1112                 sa_addr = addr_buf;
1113                 af = sctp_get_af_specific(sa_addr->sa.sa_family);
1114
1115                 /* If the address family is not supported or if this address
1116                  * causes the address buffer to overflow return EINVAL.
1117                  */
1118                 if (!af || (walk_size + af->sockaddr_len) > addrs_size) {
1119                         err = -EINVAL;
1120                         goto out_free;
1121                 }
1122
1123                 port = ntohs(sa_addr->v4.sin_port);
1124
1125                 /* Save current address so we can work with it */
1126                 memcpy(&to, sa_addr, af->sockaddr_len);
1127
1128                 err = sctp_verify_addr(sk, &to, af->sockaddr_len);
1129                 if (err)
1130                         goto out_free;
1131
1132                 /* Make sure the destination port is correctly set
1133                  * in all addresses.
1134                  */
1135                 if (asoc && asoc->peer.port && asoc->peer.port != port) {
1136                         err = -EINVAL;
1137                         goto out_free;
1138                 }
1139
1140                 /* Check if there already is a matching association on the
1141                  * endpoint (other than the one created here).
1142                  */
1143                 asoc2 = sctp_endpoint_lookup_assoc(ep, &to, &transport);
1144                 if (asoc2 && asoc2 != asoc) {
1145                         if (asoc2->state >= SCTP_STATE_ESTABLISHED)
1146                                 err = -EISCONN;
1147                         else
1148                                 err = -EALREADY;
1149                         goto out_free;
1150                 }
1151
1152                 /* If we could not find a matching association on the endpoint,
1153                  * make sure that there is no peeled-off association matching
1154                  * the peer address even on another socket.
1155                  */
1156                 if (sctp_endpoint_is_peeled_off(ep, &to)) {
1157                         err = -EADDRNOTAVAIL;
1158                         goto out_free;
1159                 }
1160
1161                 if (!asoc) {
1162                         /* If a bind() or sctp_bindx() is not called prior to
1163                          * an sctp_connectx() call, the system picks an
1164                          * ephemeral port and will choose an address set
1165                          * equivalent to binding with a wildcard address.
1166                          */
1167                         if (!ep->base.bind_addr.port) {
1168                                 if (sctp_autobind(sk)) {
1169                                         err = -EAGAIN;
1170                                         goto out_free;
1171                                 }
1172                         } else {
1173                                 /*
1174                                  * If an unprivileged user inherits a 1-many
1175                                  * style socket with open associations on a
1176                                  * privileged port, it MAY be permitted to
1177                                  * accept new associations, but it SHOULD NOT
1178                                  * be permitted to open new associations.
1179                                  */
1180                                 if (ep->base.bind_addr.port <
1181                                     inet_prot_sock(net) &&
1182                                     !ns_capable(net->user_ns,
1183                                     CAP_NET_BIND_SERVICE)) {
1184                                         err = -EACCES;
1185                                         goto out_free;
1186                                 }
1187                         }
1188
1189                         scope = sctp_scope(&to);
1190                         asoc = sctp_association_new(ep, sk, scope, GFP_KERNEL);
1191                         if (!asoc) {
1192                                 err = -ENOMEM;
1193                                 goto out_free;
1194                         }
1195
1196                         err = sctp_assoc_set_bind_addr_from_ep(asoc, scope,
1197                                                               GFP_KERNEL);
1198                         if (err < 0) {
1199                                 goto out_free;
1200                         }
1201
1202                 }
1203
1204                 /* Prime the peer's transport structures.  */
1205                 transport = sctp_assoc_add_peer(asoc, &to, GFP_KERNEL,
1206                                                 SCTP_UNKNOWN);
1207                 if (!transport) {
1208                         err = -ENOMEM;
1209                         goto out_free;
1210                 }
1211
1212                 addrcnt++;
1213                 addr_buf += af->sockaddr_len;
1214                 walk_size += af->sockaddr_len;
1215         }
1216
1217         /* In case the user of sctp_connectx() wants an association
1218          * id back, assign one now.
1219          */
1220         if (assoc_id) {
1221                 err = sctp_assoc_set_id(asoc, GFP_KERNEL);
1222                 if (err < 0)
1223                         goto out_free;
1224         }
1225
1226         err = sctp_primitive_ASSOCIATE(net, asoc, NULL);
1227         if (err < 0) {
1228                 goto out_free;
1229         }
1230
1231         /* Initialize sk's dport and daddr for getpeername() */
1232         inet_sk(sk)->inet_dport = htons(asoc->peer.port);
1233         sp->pf->to_sk_daddr(sa_addr, sk);
1234         sk->sk_err = 0;
1235
1236         timeo = sock_sndtimeo(sk, flags & O_NONBLOCK);
1237
1238         if (assoc_id)
1239                 *assoc_id = asoc->assoc_id;
1240
1241         err = sctp_wait_for_connect(asoc, &timeo);
1242         /* Note: the asoc may be freed after the return of
1243          * sctp_wait_for_connect.
1244          */
1245
1246         /* Don't free association on exit. */
1247         asoc = NULL;
1248
1249 out_free:
1250         pr_debug("%s: took out_free path with asoc:%p kaddrs:%p err:%d\n",
1251                  __func__, asoc, kaddrs, err);
1252
1253         if (asoc) {
1254                 /* sctp_primitive_ASSOCIATE may have added this association
1255                  * To the hash table, try to unhash it, just in case, its a noop
1256                  * if it wasn't hashed so we're safe
1257                  */
1258                 sctp_association_free(asoc);
1259         }
1260         return err;
1261 }
1262
1263 /* Helper for tunneling sctp_connectx() requests through sctp_setsockopt()
1264  *
1265  * API 8.9
1266  * int sctp_connectx(int sd, struct sockaddr *addrs, int addrcnt,
1267  *                      sctp_assoc_t *asoc);
1268  *
1269  * If sd is an IPv4 socket, the addresses passed must be IPv4 addresses.
1270  * If the sd is an IPv6 socket, the addresses passed can either be IPv4
1271  * or IPv6 addresses.
1272  *
1273  * A single address may be specified as INADDR_ANY or IN6ADDR_ANY, see
1274  * Section 3.1.2 for this usage.
1275  *
1276  * addrs is a pointer to an array of one or more socket addresses. Each
1277  * address is contained in its appropriate structure (i.e. struct
1278  * sockaddr_in or struct sockaddr_in6) the family of the address type
1279  * must be used to distengish the address length (note that this
1280  * representation is termed a "packed array" of addresses). The caller
1281  * specifies the number of addresses in the array with addrcnt.
1282  *
1283  * On success, sctp_connectx() returns 0. It also sets the assoc_id to
1284  * the association id of the new association.  On failure, sctp_connectx()
1285  * returns -1, and sets errno to the appropriate error code.  The assoc_id
1286  * is not touched by the kernel.
1287  *
1288  * For SCTP, the port given in each socket address must be the same, or
1289  * sctp_connectx() will fail, setting errno to EINVAL.
1290  *
1291  * An application can use sctp_connectx to initiate an association with
1292  * an endpoint that is multi-homed.  Much like sctp_bindx() this call
1293  * allows a caller to specify multiple addresses at which a peer can be
1294  * reached.  The way the SCTP stack uses the list of addresses to set up
1295  * the association is implementation dependent.  This function only
1296  * specifies that the stack will try to make use of all the addresses in
1297  * the list when needed.
1298  *
1299  * Note that the list of addresses passed in is only used for setting up
1300  * the association.  It does not necessarily equal the set of addresses
1301  * the peer uses for the resulting association.  If the caller wants to
1302  * find out the set of peer addresses, it must use sctp_getpaddrs() to
1303  * retrieve them after the association has been set up.
1304  *
1305  * Basically do nothing but copying the addresses from user to kernel
1306  * land and invoking either sctp_connectx(). This is used for tunneling
1307  * the sctp_connectx() request through sctp_setsockopt() from userspace.
1308  *
1309  * On exit there is no need to do sockfd_put(), sys_setsockopt() does
1310  * it.
1311  *
1312  * sk        The sk of the socket
1313  * addrs     The pointer to the addresses in user land
1314  * addrssize Size of the addrs buffer
1315  *
1316  * Returns >=0 if ok, <0 errno code on error.
1317  */
1318 static int __sctp_setsockopt_connectx(struct sock *sk,
1319                                       struct sockaddr __user *addrs,
1320                                       int addrs_size,
1321                                       sctp_assoc_t *assoc_id)
1322 {
1323         struct sockaddr *kaddrs;
1324         int err = 0, flags = 0;
1325
1326         pr_debug("%s: sk:%p addrs:%p addrs_size:%d\n",
1327                  __func__, sk, addrs, addrs_size);
1328
1329         if (unlikely(addrs_size <= 0))
1330                 return -EINVAL;
1331
1332         kaddrs = vmemdup_user(addrs, addrs_size);
1333         if (unlikely(IS_ERR(kaddrs)))
1334                 return PTR_ERR(kaddrs);
1335
1336         /* Allow security module to validate connectx addresses. */
1337         err = security_sctp_bind_connect(sk, SCTP_SOCKOPT_CONNECTX,
1338                                          (struct sockaddr *)kaddrs,
1339                                           addrs_size);
1340         if (err)
1341                 goto out_free;
1342
1343         /* in-kernel sockets don't generally have a file allocated to them
1344          * if all they do is call sock_create_kern().
1345          */
1346         if (sk->sk_socket->file)
1347                 flags = sk->sk_socket->file->f_flags;
1348
1349         err = __sctp_connect(sk, kaddrs, addrs_size, flags, assoc_id);
1350
1351 out_free:
1352         kvfree(kaddrs);
1353
1354         return err;
1355 }
1356
1357 /*
1358  * This is an older interface.  It's kept for backward compatibility
1359  * to the option that doesn't provide association id.
1360  */
1361 static int sctp_setsockopt_connectx_old(struct sock *sk,
1362                                         struct sockaddr __user *addrs,
1363                                         int addrs_size)
1364 {
1365         return __sctp_setsockopt_connectx(sk, addrs, addrs_size, NULL);
1366 }
1367
1368 /*
1369  * New interface for the API.  The since the API is done with a socket
1370  * option, to make it simple we feed back the association id is as a return
1371  * indication to the call.  Error is always negative and association id is
1372  * always positive.
1373  */
1374 static int sctp_setsockopt_connectx(struct sock *sk,
1375                                     struct sockaddr __user *addrs,
1376                                     int addrs_size)
1377 {
1378         sctp_assoc_t assoc_id = 0;
1379         int err = 0;
1380
1381         err = __sctp_setsockopt_connectx(sk, addrs, addrs_size, &assoc_id);
1382
1383         if (err)
1384                 return err;
1385         else
1386                 return assoc_id;
1387 }
1388
1389 /*
1390  * New (hopefully final) interface for the API.
1391  * We use the sctp_getaddrs_old structure so that use-space library
1392  * can avoid any unnecessary allocations. The only different part
1393  * is that we store the actual length of the address buffer into the
1394  * addrs_num structure member. That way we can re-use the existing
1395  * code.
1396  */
1397 #ifdef CONFIG_COMPAT
1398 struct compat_sctp_getaddrs_old {
1399         sctp_assoc_t    assoc_id;
1400         s32             addr_num;
1401         compat_uptr_t   addrs;          /* struct sockaddr * */
1402 };
1403 #endif
1404
1405 static int sctp_getsockopt_connectx3(struct sock *sk, int len,
1406                                      char __user *optval,
1407                                      int __user *optlen)
1408 {
1409         struct sctp_getaddrs_old param;
1410         sctp_assoc_t assoc_id = 0;
1411         int err = 0;
1412
1413 #ifdef CONFIG_COMPAT
1414         if (in_compat_syscall()) {
1415                 struct compat_sctp_getaddrs_old param32;
1416
1417                 if (len < sizeof(param32))
1418                         return -EINVAL;
1419                 if (copy_from_user(&param32, optval, sizeof(param32)))
1420                         return -EFAULT;
1421
1422                 param.assoc_id = param32.assoc_id;
1423                 param.addr_num = param32.addr_num;
1424                 param.addrs = compat_ptr(param32.addrs);
1425         } else
1426 #endif
1427         {
1428                 if (len < sizeof(param))
1429                         return -EINVAL;
1430                 if (copy_from_user(&param, optval, sizeof(param)))
1431                         return -EFAULT;
1432         }
1433
1434         err = __sctp_setsockopt_connectx(sk, (struct sockaddr __user *)
1435                                          param.addrs, param.addr_num,
1436                                          &assoc_id);
1437         if (err == 0 || err == -EINPROGRESS) {
1438                 if (copy_to_user(optval, &assoc_id, sizeof(assoc_id)))
1439                         return -EFAULT;
1440                 if (put_user(sizeof(assoc_id), optlen))
1441                         return -EFAULT;
1442         }
1443
1444         return err;
1445 }
1446
1447 /* API 3.1.4 close() - UDP Style Syntax
1448  * Applications use close() to perform graceful shutdown (as described in
1449  * Section 10.1 of [SCTP]) on ALL the associations currently represented
1450  * by a UDP-style socket.
1451  *
1452  * The syntax is
1453  *
1454  *   ret = close(int sd);
1455  *
1456  *   sd      - the socket descriptor of the associations to be closed.
1457  *
1458  * To gracefully shutdown a specific association represented by the
1459  * UDP-style socket, an application should use the sendmsg() call,
1460  * passing no user data, but including the appropriate flag in the
1461  * ancillary data (see Section xxxx).
1462  *
1463  * If sd in the close() call is a branched-off socket representing only
1464  * one association, the shutdown is performed on that association only.
1465  *
1466  * 4.1.6 close() - TCP Style Syntax
1467  *
1468  * Applications use close() to gracefully close down an association.
1469  *
1470  * The syntax is:
1471  *
1472  *    int close(int sd);
1473  *
1474  *      sd      - the socket descriptor of the association to be closed.
1475  *
1476  * After an application calls close() on a socket descriptor, no further
1477  * socket operations will succeed on that descriptor.
1478  *
1479  * API 7.1.4 SO_LINGER
1480  *
1481  * An application using the TCP-style socket can use this option to
1482  * perform the SCTP ABORT primitive.  The linger option structure is:
1483  *
1484  *  struct  linger {
1485  *     int     l_onoff;                // option on/off
1486  *     int     l_linger;               // linger time
1487  * };
1488  *
1489  * To enable the option, set l_onoff to 1.  If the l_linger value is set
1490  * to 0, calling close() is the same as the ABORT primitive.  If the
1491  * value is set to a negative value, the setsockopt() call will return
1492  * an error.  If the value is set to a positive value linger_time, the
1493  * close() can be blocked for at most linger_time ms.  If the graceful
1494  * shutdown phase does not finish during this period, close() will
1495  * return but the graceful shutdown phase continues in the system.
1496  */
1497 static void sctp_close(struct sock *sk, long timeout)
1498 {
1499         struct net *net = sock_net(sk);
1500         struct sctp_endpoint *ep;
1501         struct sctp_association *asoc;
1502         struct list_head *pos, *temp;
1503         unsigned int data_was_unread;
1504
1505         pr_debug("%s: sk:%p, timeout:%ld\n", __func__, sk, timeout);
1506
1507         lock_sock_nested(sk, SINGLE_DEPTH_NESTING);
1508         sk->sk_shutdown = SHUTDOWN_MASK;
1509         inet_sk_set_state(sk, SCTP_SS_CLOSING);
1510
1511         ep = sctp_sk(sk)->ep;
1512
1513         /* Clean up any skbs sitting on the receive queue.  */
1514         data_was_unread = sctp_queue_purge_ulpevents(&sk->sk_receive_queue);
1515         data_was_unread += sctp_queue_purge_ulpevents(&sctp_sk(sk)->pd_lobby);
1516
1517         /* Walk all associations on an endpoint.  */
1518         list_for_each_safe(pos, temp, &ep->asocs) {
1519                 asoc = list_entry(pos, struct sctp_association, asocs);
1520
1521                 if (sctp_style(sk, TCP)) {
1522                         /* A closed association can still be in the list if
1523                          * it belongs to a TCP-style listening socket that is
1524                          * not yet accepted. If so, free it. If not, send an
1525                          * ABORT or SHUTDOWN based on the linger options.
1526                          */
1527                         if (sctp_state(asoc, CLOSED)) {
1528                                 sctp_association_free(asoc);
1529                                 continue;
1530                         }
1531                 }
1532
1533                 if (data_was_unread || !skb_queue_empty(&asoc->ulpq.lobby) ||
1534                     !skb_queue_empty(&asoc->ulpq.reasm) ||
1535                     !skb_queue_empty(&asoc->ulpq.reasm_uo) ||
1536                     (sock_flag(sk, SOCK_LINGER) && !sk->sk_lingertime)) {
1537                         struct sctp_chunk *chunk;
1538
1539                         chunk = sctp_make_abort_user(asoc, NULL, 0);
1540                         sctp_primitive_ABORT(net, asoc, chunk);
1541                 } else
1542                         sctp_primitive_SHUTDOWN(net, asoc, NULL);
1543         }
1544
1545         /* On a TCP-style socket, block for at most linger_time if set. */
1546         if (sctp_style(sk, TCP) && timeout)
1547                 sctp_wait_for_close(sk, timeout);
1548
1549         /* This will run the backlog queue.  */
1550         release_sock(sk);
1551
1552         /* Supposedly, no process has access to the socket, but
1553          * the net layers still may.
1554          * Also, sctp_destroy_sock() needs to be called with addr_wq_lock
1555          * held and that should be grabbed before socket lock.
1556          */
1557         spin_lock_bh(&net->sctp.addr_wq_lock);
1558         bh_lock_sock_nested(sk);
1559
1560         /* Hold the sock, since sk_common_release() will put sock_put()
1561          * and we have just a little more cleanup.
1562          */
1563         sock_hold(sk);
1564         sk_common_release(sk);
1565
1566         bh_unlock_sock(sk);
1567         spin_unlock_bh(&net->sctp.addr_wq_lock);
1568
1569         sock_put(sk);
1570
1571         SCTP_DBG_OBJCNT_DEC(sock);
1572 }
1573
1574 /* Handle EPIPE error. */
1575 static int sctp_error(struct sock *sk, int flags, int err)
1576 {
1577         if (err == -EPIPE)
1578                 err = sock_error(sk) ? : -EPIPE;
1579         if (err == -EPIPE && !(flags & MSG_NOSIGNAL))
1580                 send_sig(SIGPIPE, current, 0);
1581         return err;
1582 }
1583
1584 /* API 3.1.3 sendmsg() - UDP Style Syntax
1585  *
1586  * An application uses sendmsg() and recvmsg() calls to transmit data to
1587  * and receive data from its peer.
1588  *
1589  *  ssize_t sendmsg(int socket, const struct msghdr *message,
1590  *                  int flags);
1591  *
1592  *  socket  - the socket descriptor of the endpoint.
1593  *  message - pointer to the msghdr structure which contains a single
1594  *            user message and possibly some ancillary data.
1595  *
1596  *            See Section 5 for complete description of the data
1597  *            structures.
1598  *
1599  *  flags   - flags sent or received with the user message, see Section
1600  *            5 for complete description of the flags.
1601  *
1602  * Note:  This function could use a rewrite especially when explicit
1603  * connect support comes in.
1604  */
1605 /* BUG:  We do not implement the equivalent of sk_stream_wait_memory(). */
1606
1607 static int sctp_msghdr_parse(const struct msghdr *msg,
1608                              struct sctp_cmsgs *cmsgs);
1609
1610 static int sctp_sendmsg_parse(struct sock *sk, struct sctp_cmsgs *cmsgs,
1611                               struct sctp_sndrcvinfo *srinfo,
1612                               const struct msghdr *msg, size_t msg_len)
1613 {
1614         __u16 sflags;
1615         int err;
1616
1617         if (sctp_sstate(sk, LISTENING) && sctp_style(sk, TCP))
1618                 return -EPIPE;
1619
1620         if (msg_len > sk->sk_sndbuf)
1621                 return -EMSGSIZE;
1622
1623         memset(cmsgs, 0, sizeof(*cmsgs));
1624         err = sctp_msghdr_parse(msg, cmsgs);
1625         if (err) {
1626                 pr_debug("%s: msghdr parse err:%x\n", __func__, err);
1627                 return err;
1628         }
1629
1630         memset(srinfo, 0, sizeof(*srinfo));
1631         if (cmsgs->srinfo) {
1632                 srinfo->sinfo_stream = cmsgs->srinfo->sinfo_stream;
1633                 srinfo->sinfo_flags = cmsgs->srinfo->sinfo_flags;
1634                 srinfo->sinfo_ppid = cmsgs->srinfo->sinfo_ppid;
1635                 srinfo->sinfo_context = cmsgs->srinfo->sinfo_context;
1636                 srinfo->sinfo_assoc_id = cmsgs->srinfo->sinfo_assoc_id;
1637                 srinfo->sinfo_timetolive = cmsgs->srinfo->sinfo_timetolive;
1638         }
1639
1640         if (cmsgs->sinfo) {
1641                 srinfo->sinfo_stream = cmsgs->sinfo->snd_sid;
1642                 srinfo->sinfo_flags = cmsgs->sinfo->snd_flags;
1643                 srinfo->sinfo_ppid = cmsgs->sinfo->snd_ppid;
1644                 srinfo->sinfo_context = cmsgs->sinfo->snd_context;
1645                 srinfo->sinfo_assoc_id = cmsgs->sinfo->snd_assoc_id;
1646         }
1647
1648         if (cmsgs->prinfo) {
1649                 srinfo->sinfo_timetolive = cmsgs->prinfo->pr_value;
1650                 SCTP_PR_SET_POLICY(srinfo->sinfo_flags,
1651                                    cmsgs->prinfo->pr_policy);
1652         }
1653
1654         sflags = srinfo->sinfo_flags;
1655         if (!sflags && msg_len)
1656                 return 0;
1657
1658         if (sctp_style(sk, TCP) && (sflags & (SCTP_EOF | SCTP_ABORT)))
1659                 return -EINVAL;
1660
1661         if (((sflags & SCTP_EOF) && msg_len > 0) ||
1662             (!(sflags & (SCTP_EOF | SCTP_ABORT)) && msg_len == 0))
1663                 return -EINVAL;
1664
1665         if ((sflags & SCTP_ADDR_OVER) && !msg->msg_name)
1666                 return -EINVAL;
1667
1668         return 0;
1669 }
1670
1671 static int sctp_sendmsg_new_asoc(struct sock *sk, __u16 sflags,
1672                                  struct sctp_cmsgs *cmsgs,
1673                                  union sctp_addr *daddr,
1674                                  struct sctp_transport **tp)
1675 {
1676         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
1677         struct net *net = sock_net(sk);
1678         struct sctp_association *asoc;
1679         enum sctp_scope scope;
1680         struct cmsghdr *cmsg;
1681         __be32 flowinfo = 0;
1682         struct sctp_af *af;
1683         int err;
1684
1685         *tp = NULL;
1686
1687         if (sflags & (SCTP_EOF | SCTP_ABORT))
1688                 return -EINVAL;
1689
1690         if (sctp_style(sk, TCP) && (sctp_sstate(sk, ESTABLISHED) ||
1691                                     sctp_sstate(sk, CLOSING)))
1692                 return -EADDRNOTAVAIL;
1693
1694         if (sctp_endpoint_is_peeled_off(ep, daddr))
1695                 return -EADDRNOTAVAIL;
1696
1697         if (!ep->base.bind_addr.port) {
1698                 if (sctp_autobind(sk))
1699                         return -EAGAIN;
1700         } else {
1701                 if (ep->base.bind_addr.port < inet_prot_sock(net) &&
1702                     !ns_capable(net->user_ns, CAP_NET_BIND_SERVICE))
1703                         return -EACCES;
1704         }
1705
1706         scope = sctp_scope(daddr);
1707
1708         /* Label connection socket for first association 1-to-many
1709          * style for client sequence socket()->sendmsg(). This
1710          * needs to be done before sctp_assoc_add_peer() as that will
1711          * set up the initial packet that needs to account for any
1712          * security ip options (CIPSO/CALIPSO) added to the packet.
1713          */
1714         af = sctp_get_af_specific(daddr->sa.sa_family);
1715         if (!af)
1716                 return -EINVAL;
1717         err = security_sctp_bind_connect(sk, SCTP_SENDMSG_CONNECT,
1718                                          (struct sockaddr *)daddr,
1719                                          af->sockaddr_len);
1720         if (err < 0)
1721                 return err;
1722
1723         asoc = sctp_association_new(ep, sk, scope, GFP_KERNEL);
1724         if (!asoc)
1725                 return -ENOMEM;
1726
1727         if (sctp_assoc_set_bind_addr_from_ep(asoc, scope, GFP_KERNEL) < 0) {
1728                 err = -ENOMEM;
1729                 goto free;
1730         }
1731
1732         if (cmsgs->init) {
1733                 struct sctp_initmsg *init = cmsgs->init;
1734
1735                 if (init->sinit_num_ostreams) {
1736                         __u16 outcnt = init->sinit_num_ostreams;
1737
1738                         asoc->c.sinit_num_ostreams = outcnt;
1739                         /* outcnt has been changed, need to re-init stream */
1740                         err = sctp_stream_init(&asoc->stream, outcnt, 0,
1741                                                GFP_KERNEL);
1742                         if (err)
1743                                 goto free;
1744                 }
1745
1746                 if (init->sinit_max_instreams)
1747                         asoc->c.sinit_max_instreams = init->sinit_max_instreams;
1748
1749                 if (init->sinit_max_attempts)
1750                         asoc->max_init_attempts = init->sinit_max_attempts;
1751
1752                 if (init->sinit_max_init_timeo)
1753                         asoc->max_init_timeo =
1754                                 msecs_to_jiffies(init->sinit_max_init_timeo);
1755         }
1756
1757         *tp = sctp_assoc_add_peer(asoc, daddr, GFP_KERNEL, SCTP_UNKNOWN);
1758         if (!*tp) {
1759                 err = -ENOMEM;
1760                 goto free;
1761         }
1762
1763         if (!cmsgs->addrs_msg)
1764                 return 0;
1765
1766         if (daddr->sa.sa_family == AF_INET6)
1767                 flowinfo = daddr->v6.sin6_flowinfo;
1768
1769         /* sendv addr list parse */
1770         for_each_cmsghdr(cmsg, cmsgs->addrs_msg) {
1771                 struct sctp_transport *transport;
1772                 struct sctp_association *old;
1773                 union sctp_addr _daddr;
1774                 int dlen;
1775
1776                 if (cmsg->cmsg_level != IPPROTO_SCTP ||
1777                     (cmsg->cmsg_type != SCTP_DSTADDRV4 &&
1778                      cmsg->cmsg_type != SCTP_DSTADDRV6))
1779                         continue;
1780
1781                 daddr = &_daddr;
1782                 memset(daddr, 0, sizeof(*daddr));
1783                 dlen = cmsg->cmsg_len - sizeof(struct cmsghdr);
1784                 if (cmsg->cmsg_type == SCTP_DSTADDRV4) {
1785                         if (dlen < sizeof(struct in_addr)) {
1786                                 err = -EINVAL;
1787                                 goto free;
1788                         }
1789
1790                         dlen = sizeof(struct in_addr);
1791                         daddr->v4.sin_family = AF_INET;
1792                         daddr->v4.sin_port = htons(asoc->peer.port);
1793                         memcpy(&daddr->v4.sin_addr, CMSG_DATA(cmsg), dlen);
1794                 } else {
1795                         if (dlen < sizeof(struct in6_addr)) {
1796                                 err = -EINVAL;
1797                                 goto free;
1798                         }
1799
1800                         dlen = sizeof(struct in6_addr);
1801                         daddr->v6.sin6_flowinfo = flowinfo;
1802                         daddr->v6.sin6_family = AF_INET6;
1803                         daddr->v6.sin6_port = htons(asoc->peer.port);
1804                         memcpy(&daddr->v6.sin6_addr, CMSG_DATA(cmsg), dlen);
1805                 }
1806                 err = sctp_verify_addr(sk, daddr, sizeof(*daddr));
1807                 if (err)
1808                         goto free;
1809
1810                 old = sctp_endpoint_lookup_assoc(ep, daddr, &transport);
1811                 if (old && old != asoc) {
1812                         if (old->state >= SCTP_STATE_ESTABLISHED)
1813                                 err = -EISCONN;
1814                         else
1815                                 err = -EALREADY;
1816                         goto free;
1817                 }
1818
1819                 if (sctp_endpoint_is_peeled_off(ep, daddr)) {
1820                         err = -EADDRNOTAVAIL;
1821                         goto free;
1822                 }
1823
1824                 transport = sctp_assoc_add_peer(asoc, daddr, GFP_KERNEL,
1825                                                 SCTP_UNKNOWN);
1826                 if (!transport) {
1827                         err = -ENOMEM;
1828                         goto free;
1829                 }
1830         }
1831
1832         return 0;
1833
1834 free:
1835         sctp_association_free(asoc);
1836         return err;
1837 }
1838
1839 static int sctp_sendmsg_check_sflags(struct sctp_association *asoc,
1840                                      __u16 sflags, struct msghdr *msg,
1841                                      size_t msg_len)
1842 {
1843         struct sock *sk = asoc->base.sk;
1844         struct net *net = sock_net(sk);
1845
1846         if (sctp_state(asoc, CLOSED) && sctp_style(sk, TCP))
1847                 return -EPIPE;
1848
1849         if ((sflags & SCTP_SENDALL) && sctp_style(sk, UDP) &&
1850             !sctp_state(asoc, ESTABLISHED))
1851                 return 0;
1852
1853         if (sflags & SCTP_EOF) {
1854                 pr_debug("%s: shutting down association:%p\n", __func__, asoc);
1855                 sctp_primitive_SHUTDOWN(net, asoc, NULL);
1856
1857                 return 0;
1858         }
1859
1860         if (sflags & SCTP_ABORT) {
1861                 struct sctp_chunk *chunk;
1862
1863                 chunk = sctp_make_abort_user(asoc, msg, msg_len);
1864                 if (!chunk)
1865                         return -ENOMEM;
1866
1867                 pr_debug("%s: aborting association:%p\n", __func__, asoc);
1868                 sctp_primitive_ABORT(net, asoc, chunk);
1869
1870                 return 0;
1871         }
1872
1873         return 1;
1874 }
1875
1876 static int sctp_sendmsg_to_asoc(struct sctp_association *asoc,
1877                                 struct msghdr *msg, size_t msg_len,
1878                                 struct sctp_transport *transport,
1879                                 struct sctp_sndrcvinfo *sinfo)
1880 {
1881         struct sock *sk = asoc->base.sk;
1882         struct sctp_sock *sp = sctp_sk(sk);
1883         struct net *net = sock_net(sk);
1884         struct sctp_datamsg *datamsg;
1885         bool wait_connect = false;
1886         struct sctp_chunk *chunk;
1887         long timeo;
1888         int err;
1889
1890         if (sinfo->sinfo_stream >= asoc->stream.outcnt) {
1891                 err = -EINVAL;
1892                 goto err;
1893         }
1894
1895         if (unlikely(!SCTP_SO(&asoc->stream, sinfo->sinfo_stream)->ext)) {
1896                 err = sctp_stream_init_ext(&asoc->stream, sinfo->sinfo_stream);
1897                 if (err)
1898                         goto err;
1899         }
1900
1901         if (sp->disable_fragments && msg_len > asoc->frag_point) {
1902                 err = -EMSGSIZE;
1903                 goto err;
1904         }
1905
1906         if (asoc->pmtu_pending) {
1907                 if (sp->param_flags & SPP_PMTUD_ENABLE)
1908                         sctp_assoc_sync_pmtu(asoc);
1909                 asoc->pmtu_pending = 0;
1910         }
1911
1912         if (sctp_wspace(asoc) < (int)msg_len)
1913                 sctp_prsctp_prune(asoc, sinfo, msg_len - sctp_wspace(asoc));
1914
1915         if (sctp_wspace(asoc) <= 0) {
1916                 timeo = sock_sndtimeo(sk, msg->msg_flags & MSG_DONTWAIT);
1917                 err = sctp_wait_for_sndbuf(asoc, &timeo, msg_len);
1918                 if (err)
1919                         goto err;
1920         }
1921
1922         if (sctp_state(asoc, CLOSED)) {
1923                 err = sctp_primitive_ASSOCIATE(net, asoc, NULL);
1924                 if (err)
1925                         goto err;
1926
1927                 if (sp->strm_interleave) {
1928                         timeo = sock_sndtimeo(sk, 0);
1929                         err = sctp_wait_for_connect(asoc, &timeo);
1930                         if (err) {
1931                                 err = -ESRCH;
1932                                 goto err;
1933                         }
1934                 } else {
1935                         wait_connect = true;
1936                 }
1937
1938                 pr_debug("%s: we associated primitively\n", __func__);
1939         }
1940
1941         datamsg = sctp_datamsg_from_user(asoc, sinfo, &msg->msg_iter);
1942         if (IS_ERR(datamsg)) {
1943                 err = PTR_ERR(datamsg);
1944                 goto err;
1945         }
1946
1947         asoc->force_delay = !!(msg->msg_flags & MSG_MORE);
1948
1949         list_for_each_entry(chunk, &datamsg->chunks, frag_list) {
1950                 sctp_chunk_hold(chunk);
1951                 sctp_set_owner_w(chunk);
1952                 chunk->transport = transport;
1953         }
1954
1955         err = sctp_primitive_SEND(net, asoc, datamsg);
1956         if (err) {
1957                 sctp_datamsg_free(datamsg);
1958                 goto err;
1959         }
1960
1961         pr_debug("%s: we sent primitively\n", __func__);
1962
1963         sctp_datamsg_put(datamsg);
1964
1965         if (unlikely(wait_connect)) {
1966                 timeo = sock_sndtimeo(sk, msg->msg_flags & MSG_DONTWAIT);
1967                 sctp_wait_for_connect(asoc, &timeo);
1968         }
1969
1970         err = msg_len;
1971
1972 err:
1973         return err;
1974 }
1975
1976 static union sctp_addr *sctp_sendmsg_get_daddr(struct sock *sk,
1977                                                const struct msghdr *msg,
1978                                                struct sctp_cmsgs *cmsgs)
1979 {
1980         union sctp_addr *daddr = NULL;
1981         int err;
1982
1983         if (!sctp_style(sk, UDP_HIGH_BANDWIDTH) && msg->msg_name) {
1984                 int len = msg->msg_namelen;
1985
1986                 if (len > sizeof(*daddr))
1987                         len = sizeof(*daddr);
1988
1989                 daddr = (union sctp_addr *)msg->msg_name;
1990
1991                 err = sctp_verify_addr(sk, daddr, len);
1992                 if (err)
1993                         return ERR_PTR(err);
1994         }
1995
1996         return daddr;
1997 }
1998
1999 static void sctp_sendmsg_update_sinfo(struct sctp_association *asoc,
2000                                       struct sctp_sndrcvinfo *sinfo,
2001                                       struct sctp_cmsgs *cmsgs)
2002 {
2003         if (!cmsgs->srinfo && !cmsgs->sinfo) {
2004                 sinfo->sinfo_stream = asoc->default_stream;
2005                 sinfo->sinfo_ppid = asoc->default_ppid;
2006                 sinfo->sinfo_context = asoc->default_context;
2007                 sinfo->sinfo_assoc_id = sctp_assoc2id(asoc);
2008
2009                 if (!cmsgs->prinfo)
2010                         sinfo->sinfo_flags = asoc->default_flags;
2011         }
2012
2013         if (!cmsgs->srinfo && !cmsgs->prinfo)
2014                 sinfo->sinfo_timetolive = asoc->default_timetolive;
2015
2016         if (cmsgs->authinfo) {
2017                 /* Reuse sinfo_tsn to indicate that authinfo was set and
2018                  * sinfo_ssn to save the keyid on tx path.
2019                  */
2020                 sinfo->sinfo_tsn = 1;
2021                 sinfo->sinfo_ssn = cmsgs->authinfo->auth_keynumber;
2022         }
2023 }
2024
2025 static int sctp_sendmsg(struct sock *sk, struct msghdr *msg, size_t msg_len)
2026 {
2027         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
2028         struct sctp_transport *transport = NULL;
2029         struct sctp_sndrcvinfo _sinfo, *sinfo;
2030         struct sctp_association *asoc;
2031         struct sctp_cmsgs cmsgs;
2032         union sctp_addr *daddr;
2033         bool new = false;
2034         __u16 sflags;
2035         int err;
2036
2037         /* Parse and get snd_info */
2038         err = sctp_sendmsg_parse(sk, &cmsgs, &_sinfo, msg, msg_len);
2039         if (err)
2040                 goto out;
2041
2042         sinfo  = &_sinfo;
2043         sflags = sinfo->sinfo_flags;
2044
2045         /* Get daddr from msg */
2046         daddr = sctp_sendmsg_get_daddr(sk, msg, &cmsgs);
2047         if (IS_ERR(daddr)) {
2048                 err = PTR_ERR(daddr);
2049                 goto out;
2050         }
2051
2052         lock_sock(sk);
2053
2054         /* SCTP_SENDALL process */
2055         if ((sflags & SCTP_SENDALL) && sctp_style(sk, UDP)) {
2056                 list_for_each_entry(asoc, &ep->asocs, asocs) {
2057                         err = sctp_sendmsg_check_sflags(asoc, sflags, msg,
2058                                                         msg_len);
2059                         if (err == 0)
2060                                 continue;
2061                         if (err < 0)
2062                                 goto out_unlock;
2063
2064                         sctp_sendmsg_update_sinfo(asoc, sinfo, &cmsgs);
2065
2066                         err = sctp_sendmsg_to_asoc(asoc, msg, msg_len,
2067                                                    NULL, sinfo);
2068                         if (err < 0)
2069                                 goto out_unlock;
2070
2071                         iov_iter_revert(&msg->msg_iter, err);
2072                 }
2073
2074                 goto out_unlock;
2075         }
2076
2077         /* Get and check or create asoc */
2078         if (daddr) {
2079                 asoc = sctp_endpoint_lookup_assoc(ep, daddr, &transport);
2080                 if (asoc) {
2081                         err = sctp_sendmsg_check_sflags(asoc, sflags, msg,
2082                                                         msg_len);
2083                         if (err <= 0)
2084                                 goto out_unlock;
2085                 } else {
2086                         err = sctp_sendmsg_new_asoc(sk, sflags, &cmsgs, daddr,
2087                                                     &transport);
2088                         if (err)
2089                                 goto out_unlock;
2090
2091                         asoc = transport->asoc;
2092                         new = true;
2093                 }
2094
2095                 if (!sctp_style(sk, TCP) && !(sflags & SCTP_ADDR_OVER))
2096                         transport = NULL;
2097         } else {
2098                 asoc = sctp_id2assoc(sk, sinfo->sinfo_assoc_id);
2099                 if (!asoc) {
2100                         err = -EPIPE;
2101                         goto out_unlock;
2102                 }
2103
2104                 err = sctp_sendmsg_check_sflags(asoc, sflags, msg, msg_len);
2105                 if (err <= 0)
2106                         goto out_unlock;
2107         }
2108
2109         /* Update snd_info with the asoc */
2110         sctp_sendmsg_update_sinfo(asoc, sinfo, &cmsgs);
2111
2112         /* Send msg to the asoc */
2113         err = sctp_sendmsg_to_asoc(asoc, msg, msg_len, transport, sinfo);
2114         if (err < 0 && err != -ESRCH && new)
2115                 sctp_association_free(asoc);
2116
2117 out_unlock:
2118         release_sock(sk);
2119 out:
2120         return sctp_error(sk, msg->msg_flags, err);
2121 }
2122
2123 /* This is an extended version of skb_pull() that removes the data from the
2124  * start of a skb even when data is spread across the list of skb's in the
2125  * frag_list. len specifies the total amount of data that needs to be removed.
2126  * when 'len' bytes could be removed from the skb, it returns 0.
2127  * If 'len' exceeds the total skb length,  it returns the no. of bytes that
2128  * could not be removed.
2129  */
2130 static int sctp_skb_pull(struct sk_buff *skb, int len)
2131 {
2132         struct sk_buff *list;
2133         int skb_len = skb_headlen(skb);
2134         int rlen;
2135
2136         if (len <= skb_len) {
2137                 __skb_pull(skb, len);
2138                 return 0;
2139         }
2140         len -= skb_len;
2141         __skb_pull(skb, skb_len);
2142
2143         skb_walk_frags(skb, list) {
2144                 rlen = sctp_skb_pull(list, len);
2145                 skb->len -= (len-rlen);
2146                 skb->data_len -= (len-rlen);
2147
2148                 if (!rlen)
2149                         return 0;
2150
2151                 len = rlen;
2152         }
2153
2154         return len;
2155 }
2156
2157 /* API 3.1.3  recvmsg() - UDP Style Syntax
2158  *
2159  *  ssize_t recvmsg(int socket, struct msghdr *message,
2160  *                    int flags);
2161  *
2162  *  socket  - the socket descriptor of the endpoint.
2163  *  message - pointer to the msghdr structure which contains a single
2164  *            user message and possibly some ancillary data.
2165  *
2166  *            See Section 5 for complete description of the data
2167  *            structures.
2168  *
2169  *  flags   - flags sent or received with the user message, see Section
2170  *            5 for complete description of the flags.
2171  */
2172 static int sctp_recvmsg(struct sock *sk, struct msghdr *msg, size_t len,
2173                         int noblock, int flags, int *addr_len)
2174 {
2175         struct sctp_ulpevent *event = NULL;
2176         struct sctp_sock *sp = sctp_sk(sk);
2177         struct sk_buff *skb, *head_skb;
2178         int copied;
2179         int err = 0;
2180         int skb_len;
2181
2182         pr_debug("%s: sk:%p, msghdr:%p, len:%zd, noblock:%d, flags:0x%x, "
2183                  "addr_len:%p)\n", __func__, sk, msg, len, noblock, flags,
2184                  addr_len);
2185
2186         lock_sock(sk);
2187
2188         if (sctp_style(sk, TCP) && !sctp_sstate(sk, ESTABLISHED) &&
2189             !sctp_sstate(sk, CLOSING) && !sctp_sstate(sk, CLOSED)) {
2190                 err = -ENOTCONN;
2191                 goto out;
2192         }
2193
2194         skb = sctp_skb_recv_datagram(sk, flags, noblock, &err);
2195         if (!skb)
2196                 goto out;
2197
2198         /* Get the total length of the skb including any skb's in the
2199          * frag_list.
2200          */
2201         skb_len = skb->len;
2202
2203         copied = skb_len;
2204         if (copied > len)
2205                 copied = len;
2206
2207         err = skb_copy_datagram_msg(skb, 0, msg, copied);
2208
2209         event = sctp_skb2event(skb);
2210
2211         if (err)
2212                 goto out_free;
2213
2214         if (event->chunk && event->chunk->head_skb)
2215                 head_skb = event->chunk->head_skb;
2216         else
2217                 head_skb = skb;
2218         sock_recv_ts_and_drops(msg, sk, head_skb);
2219         if (sctp_ulpevent_is_notification(event)) {
2220                 msg->msg_flags |= MSG_NOTIFICATION;
2221                 sp->pf->event_msgname(event, msg->msg_name, addr_len);
2222         } else {
2223                 sp->pf->skb_msgname(head_skb, msg->msg_name, addr_len);
2224         }
2225
2226         /* Check if we allow SCTP_NXTINFO. */
2227         if (sp->recvnxtinfo)
2228                 sctp_ulpevent_read_nxtinfo(event, msg, sk);
2229         /* Check if we allow SCTP_RCVINFO. */
2230         if (sp->recvrcvinfo)
2231                 sctp_ulpevent_read_rcvinfo(event, msg);
2232         /* Check if we allow SCTP_SNDRCVINFO. */
2233         if (sctp_ulpevent_type_enabled(sp->subscribe, SCTP_DATA_IO_EVENT))
2234                 sctp_ulpevent_read_sndrcvinfo(event, msg);
2235
2236         err = copied;
2237
2238         /* If skb's length exceeds the user's buffer, update the skb and
2239          * push it back to the receive_queue so that the next call to
2240          * recvmsg() will return the remaining data. Don't set MSG_EOR.
2241          */
2242         if (skb_len > copied) {
2243                 msg->msg_flags &= ~MSG_EOR;
2244                 if (flags & MSG_PEEK)
2245                         goto out_free;
2246                 sctp_skb_pull(skb, copied);
2247                 skb_queue_head(&sk->sk_receive_queue, skb);
2248
2249                 /* When only partial message is copied to the user, increase
2250                  * rwnd by that amount. If all the data in the skb is read,
2251                  * rwnd is updated when the event is freed.
2252                  */
2253                 if (!sctp_ulpevent_is_notification(event))
2254                         sctp_assoc_rwnd_increase(event->asoc, copied);
2255                 goto out;
2256         } else if ((event->msg_flags & MSG_NOTIFICATION) ||
2257                    (event->msg_flags & MSG_EOR))
2258                 msg->msg_flags |= MSG_EOR;
2259         else
2260                 msg->msg_flags &= ~MSG_EOR;
2261
2262 out_free:
2263         if (flags & MSG_PEEK) {
2264                 /* Release the skb reference acquired after peeking the skb in
2265                  * sctp_skb_recv_datagram().
2266                  */
2267                 kfree_skb(skb);
2268         } else {
2269                 /* Free the event which includes releasing the reference to
2270                  * the owner of the skb, freeing the skb and updating the
2271                  * rwnd.
2272                  */
2273                 sctp_ulpevent_free(event);
2274         }
2275 out:
2276         release_sock(sk);
2277         return err;
2278 }
2279
2280 /* 7.1.12 Enable/Disable message fragmentation (SCTP_DISABLE_FRAGMENTS)
2281  *
2282  * This option is a on/off flag.  If enabled no SCTP message
2283  * fragmentation will be performed.  Instead if a message being sent
2284  * exceeds the current PMTU size, the message will NOT be sent and
2285  * instead a error will be indicated to the user.
2286  */
2287 static int sctp_setsockopt_disable_fragments(struct sock *sk,
2288                                              char __user *optval,
2289                                              unsigned int optlen)
2290 {
2291         int val;
2292
2293         if (optlen < sizeof(int))
2294                 return -EINVAL;
2295
2296         if (get_user(val, (int __user *)optval))
2297                 return -EFAULT;
2298
2299         sctp_sk(sk)->disable_fragments = (val == 0) ? 0 : 1;
2300
2301         return 0;
2302 }
2303
2304 static int sctp_setsockopt_events(struct sock *sk, char __user *optval,
2305                                   unsigned int optlen)
2306 {
2307         struct sctp_event_subscribe subscribe;
2308         __u8 *sn_type = (__u8 *)&subscribe;
2309         struct sctp_sock *sp = sctp_sk(sk);
2310         struct sctp_association *asoc;
2311         int i;
2312
2313         if (optlen > sizeof(struct sctp_event_subscribe))
2314                 return -EINVAL;
2315
2316         if (copy_from_user(&subscribe, optval, optlen))
2317                 return -EFAULT;
2318
2319         for (i = 0; i < optlen; i++)
2320                 sctp_ulpevent_type_set(&sp->subscribe, SCTP_SN_TYPE_BASE + i,
2321                                        sn_type[i]);
2322
2323         list_for_each_entry(asoc, &sp->ep->asocs, asocs)
2324                 asoc->subscribe = sctp_sk(sk)->subscribe;
2325
2326         /* At the time when a user app subscribes to SCTP_SENDER_DRY_EVENT,
2327          * if there is no data to be sent or retransmit, the stack will
2328          * immediately send up this notification.
2329          */
2330         if (sctp_ulpevent_type_enabled(sp->subscribe, SCTP_SENDER_DRY_EVENT)) {
2331                 struct sctp_ulpevent *event;
2332
2333                 asoc = sctp_id2assoc(sk, 0);
2334                 if (asoc && sctp_outq_is_empty(&asoc->outqueue)) {
2335                         event = sctp_ulpevent_make_sender_dry_event(asoc,
2336                                         GFP_USER | __GFP_NOWARN);
2337                         if (!event)
2338                                 return -ENOMEM;
2339
2340                         asoc->stream.si->enqueue_event(&asoc->ulpq, event);
2341                 }
2342         }
2343
2344         return 0;
2345 }
2346
2347 /* 7.1.8 Automatic Close of associations (SCTP_AUTOCLOSE)
2348  *
2349  * This socket option is applicable to the UDP-style socket only.  When
2350  * set it will cause associations that are idle for more than the
2351  * specified number of seconds to automatically close.  An association
2352  * being idle is defined an association that has NOT sent or received
2353  * user data.  The special value of '0' indicates that no automatic
2354  * close of any associations should be performed.  The option expects an
2355  * integer defining the number of seconds of idle time before an
2356  * association is closed.
2357  */
2358 static int sctp_setsockopt_autoclose(struct sock *sk, char __user *optval,
2359                                      unsigned int optlen)
2360 {
2361         struct sctp_sock *sp = sctp_sk(sk);
2362         struct net *net = sock_net(sk);
2363
2364         /* Applicable to UDP-style socket only */
2365         if (sctp_style(sk, TCP))
2366                 return -EOPNOTSUPP;
2367         if (optlen != sizeof(int))
2368                 return -EINVAL;
2369         if (copy_from_user(&sp->autoclose, optval, optlen))
2370                 return -EFAULT;
2371
2372         if (sp->autoclose > net->sctp.max_autoclose)
2373                 sp->autoclose = net->sctp.max_autoclose;
2374
2375         return 0;
2376 }
2377
2378 /* 7.1.13 Peer Address Parameters (SCTP_PEER_ADDR_PARAMS)
2379  *
2380  * Applications can enable or disable heartbeats for any peer address of
2381  * an association, modify an address's heartbeat interval, force a
2382  * heartbeat to be sent immediately, and adjust the address's maximum
2383  * number of retransmissions sent before an address is considered
2384  * unreachable.  The following structure is used to access and modify an
2385  * address's parameters:
2386  *
2387  *  struct sctp_paddrparams {
2388  *     sctp_assoc_t            spp_assoc_id;
2389  *     struct sockaddr_storage spp_address;
2390  *     uint32_t                spp_hbinterval;
2391  *     uint16_t                spp_pathmaxrxt;
2392  *     uint32_t                spp_pathmtu;
2393  *     uint32_t                spp_sackdelay;
2394  *     uint32_t                spp_flags;
2395  *     uint32_t                spp_ipv6_flowlabel;
2396  *     uint8_t                 spp_dscp;
2397  * };
2398  *
2399  *   spp_assoc_id    - (one-to-many style socket) This is filled in the
2400  *                     application, and identifies the association for
2401  *                     this query.
2402  *   spp_address     - This specifies which address is of interest.
2403  *   spp_hbinterval  - This contains the value of the heartbeat interval,
2404  *                     in milliseconds.  If a  value of zero
2405  *                     is present in this field then no changes are to
2406  *                     be made to this parameter.
2407  *   spp_pathmaxrxt  - This contains the maximum number of
2408  *                     retransmissions before this address shall be
2409  *                     considered unreachable. If a  value of zero
2410  *                     is present in this field then no changes are to
2411  *                     be made to this parameter.
2412  *   spp_pathmtu     - When Path MTU discovery is disabled the value
2413  *                     specified here will be the "fixed" path mtu.
2414  *                     Note that if the spp_address field is empty
2415  *                     then all associations on this address will
2416  *                     have this fixed path mtu set upon them.
2417  *
2418  *   spp_sackdelay   - When delayed sack is enabled, this value specifies
2419  *                     the number of milliseconds that sacks will be delayed
2420  *                     for. This value will apply to all addresses of an
2421  *                     association if the spp_address field is empty. Note
2422  *                     also, that if delayed sack is enabled and this
2423  *                     value is set to 0, no change is made to the last
2424  *                     recorded delayed sack timer value.
2425  *
2426  *   spp_flags       - These flags are used to control various features
2427  *                     on an association. The flag field may contain
2428  *                     zero or more of the following options.
2429  *
2430  *                     SPP_HB_ENABLE  - Enable heartbeats on the
2431  *                     specified address. Note that if the address
2432  *                     field is empty all addresses for the association
2433  *                     have heartbeats enabled upon them.
2434  *
2435  *                     SPP_HB_DISABLE - Disable heartbeats on the
2436  *                     speicifed address. Note that if the address
2437  *                     field is empty all addresses for the association
2438  *                     will have their heartbeats disabled. Note also
2439  *                     that SPP_HB_ENABLE and SPP_HB_DISABLE are
2440  *                     mutually exclusive, only one of these two should
2441  *                     be specified. Enabling both fields will have
2442  *                     undetermined results.
2443  *
2444  *                     SPP_HB_DEMAND - Request a user initiated heartbeat
2445  *                     to be made immediately.
2446  *
2447  *                     SPP_HB_TIME_IS_ZERO - Specify's that the time for
2448  *                     heartbeat delayis to be set to the value of 0
2449  *                     milliseconds.
2450  *
2451  *                     SPP_PMTUD_ENABLE - This field will enable PMTU
2452  *                     discovery upon the specified address. Note that
2453  *                     if the address feild is empty then all addresses
2454  *                     on the association are effected.
2455  *
2456  *                     SPP_PMTUD_DISABLE - This field will disable PMTU
2457  *                     discovery upon the specified address. Note that
2458  *                     if the address feild is empty then all addresses
2459  *                     on the association are effected. Not also that
2460  *                     SPP_PMTUD_ENABLE and SPP_PMTUD_DISABLE are mutually
2461  *                     exclusive. Enabling both will have undetermined
2462  *                     results.
2463  *
2464  *                     SPP_SACKDELAY_ENABLE - Setting this flag turns
2465  *                     on delayed sack. The time specified in spp_sackdelay
2466  *                     is used to specify the sack delay for this address. Note
2467  *                     that if spp_address is empty then all addresses will
2468  *                     enable delayed sack and take on the sack delay
2469  *                     value specified in spp_sackdelay.
2470  *                     SPP_SACKDELAY_DISABLE - Setting this flag turns
2471  *                     off delayed sack. If the spp_address field is blank then
2472  *                     delayed sack is disabled for the entire association. Note
2473  *                     also that this field is mutually exclusive to
2474  *                     SPP_SACKDELAY_ENABLE, setting both will have undefined
2475  *                     results.
2476  *
2477  *                     SPP_IPV6_FLOWLABEL:  Setting this flag enables the
2478  *                     setting of the IPV6 flow label value.  The value is
2479  *                     contained in the spp_ipv6_flowlabel field.
2480  *                     Upon retrieval, this flag will be set to indicate that
2481  *                     the spp_ipv6_flowlabel field has a valid value returned.
2482  *                     If a specific destination address is set (in the
2483  *                     spp_address field), then the value returned is that of
2484  *                     the address.  If just an association is specified (and
2485  *                     no address), then the association's default flow label
2486  *                     is returned.  If neither an association nor a destination
2487  *                     is specified, then the socket's default flow label is
2488  *                     returned.  For non-IPv6 sockets, this flag will be left
2489  *                     cleared.
2490  *
2491  *                     SPP_DSCP:  Setting this flag enables the setting of the
2492  *                     Differentiated Services Code Point (DSCP) value
2493  *                     associated with either the association or a specific
2494  *                     address.  The value is obtained in the spp_dscp field.
2495  *                     Upon retrieval, this flag will be set to indicate that
2496  *                     the spp_dscp field has a valid value returned.  If a
2497  *                     specific destination address is set when called (in the
2498  *                     spp_address field), then that specific destination
2499  *                     address's DSCP value is returned.  If just an association
2500  *                     is specified, then the association's default DSCP is
2501  *                     returned.  If neither an association nor a destination is
2502  *                     specified, then the socket's default DSCP is returned.
2503  *
2504  *   spp_ipv6_flowlabel
2505  *                   - This field is used in conjunction with the
2506  *                     SPP_IPV6_FLOWLABEL flag and contains the IPv6 flow label.
2507  *                     The 20 least significant bits are used for the flow
2508  *                     label.  This setting has precedence over any IPv6-layer
2509  *                     setting.
2510  *
2511  *   spp_dscp        - This field is used in conjunction with the SPP_DSCP flag
2512  *                     and contains the DSCP.  The 6 most significant bits are
2513  *                     used for the DSCP.  This setting has precedence over any
2514  *                     IPv4- or IPv6- layer setting.
2515  */
2516 static int sctp_apply_peer_addr_params(struct sctp_paddrparams *params,
2517                                        struct sctp_transport   *trans,
2518                                        struct sctp_association *asoc,
2519                                        struct sctp_sock        *sp,
2520                                        int                      hb_change,
2521                                        int                      pmtud_change,
2522                                        int                      sackdelay_change)
2523 {
2524         int error;
2525
2526         if (params->spp_flags & SPP_HB_DEMAND && trans) {
2527                 struct net *net = sock_net(trans->asoc->base.sk);
2528
2529                 error = sctp_primitive_REQUESTHEARTBEAT(net, trans->asoc, trans);
2530                 if (error)
2531                         return error;
2532         }
2533
2534         /* Note that unless the spp_flag is set to SPP_HB_ENABLE the value of
2535          * this field is ignored.  Note also that a value of zero indicates
2536          * the current setting should be left unchanged.
2537          */
2538         if (params->spp_flags & SPP_HB_ENABLE) {
2539
2540                 /* Re-zero the interval if the SPP_HB_TIME_IS_ZERO is
2541                  * set.  This lets us use 0 value when this flag
2542                  * is set.
2543                  */
2544                 if (params->spp_flags & SPP_HB_TIME_IS_ZERO)
2545                         params->spp_hbinterval = 0;
2546
2547                 if (params->spp_hbinterval ||
2548                     (params->spp_flags & SPP_HB_TIME_IS_ZERO)) {
2549                         if (trans) {
2550                                 trans->hbinterval =
2551                                     msecs_to_jiffies(params->spp_hbinterval);
2552                         } else if (asoc) {
2553                                 asoc->hbinterval =
2554                                     msecs_to_jiffies(params->spp_hbinterval);
2555                         } else {
2556                                 sp->hbinterval = params->spp_hbinterval;
2557                         }
2558                 }
2559         }
2560
2561         if (hb_change) {
2562                 if (trans) {
2563                         trans->param_flags =
2564                                 (trans->param_flags & ~SPP_HB) | hb_change;
2565                 } else if (asoc) {
2566                         asoc->param_flags =
2567                                 (asoc->param_flags & ~SPP_HB) | hb_change;
2568                 } else {
2569                         sp->param_flags =
2570                                 (sp->param_flags & ~SPP_HB) | hb_change;
2571                 }
2572         }
2573
2574         /* When Path MTU discovery is disabled the value specified here will
2575          * be the "fixed" path mtu (i.e. the value of the spp_flags field must
2576          * include the flag SPP_PMTUD_DISABLE for this field to have any
2577          * effect).
2578          */
2579         if ((params->spp_flags & SPP_PMTUD_DISABLE) && params->spp_pathmtu) {
2580                 if (trans) {
2581                         trans->pathmtu = params->spp_pathmtu;
2582                         sctp_assoc_sync_pmtu(asoc);
2583                 } else if (asoc) {
2584                         sctp_assoc_set_pmtu(asoc, params->spp_pathmtu);
2585                 } else {
2586                         sp->pathmtu = params->spp_pathmtu;
2587                 }
2588         }
2589
2590         if (pmtud_change) {
2591                 if (trans) {
2592                         int update = (trans->param_flags & SPP_PMTUD_DISABLE) &&
2593                                 (params->spp_flags & SPP_PMTUD_ENABLE);
2594                         trans->param_flags =
2595                                 (trans->param_flags & ~SPP_PMTUD) | pmtud_change;
2596                         if (update) {
2597                                 sctp_transport_pmtu(trans, sctp_opt2sk(sp));
2598                                 sctp_assoc_sync_pmtu(asoc);
2599                         }
2600                 } else if (asoc) {
2601                         asoc->param_flags =
2602                                 (asoc->param_flags & ~SPP_PMTUD) | pmtud_change;
2603                 } else {
2604                         sp->param_flags =
2605                                 (sp->param_flags & ~SPP_PMTUD) | pmtud_change;
2606                 }
2607         }
2608
2609         /* Note that unless the spp_flag is set to SPP_SACKDELAY_ENABLE the
2610          * value of this field is ignored.  Note also that a value of zero
2611          * indicates the current setting should be left unchanged.
2612          */
2613         if ((params->spp_flags & SPP_SACKDELAY_ENABLE) && params->spp_sackdelay) {
2614                 if (trans) {
2615                         trans->sackdelay =
2616                                 msecs_to_jiffies(params->spp_sackdelay);
2617                 } else if (asoc) {
2618                         asoc->sackdelay =
2619                                 msecs_to_jiffies(params->spp_sackdelay);
2620                 } else {
2621                         sp->sackdelay = params->spp_sackdelay;
2622                 }
2623         }
2624
2625         if (sackdelay_change) {
2626                 if (trans) {
2627                         trans->param_flags =
2628                                 (trans->param_flags & ~SPP_SACKDELAY) |
2629                                 sackdelay_change;
2630                 } else if (asoc) {
2631                         asoc->param_flags =
2632                                 (asoc->param_flags & ~SPP_SACKDELAY) |
2633                                 sackdelay_change;
2634                 } else {
2635                         sp->param_flags =
2636                                 (sp->param_flags & ~SPP_SACKDELAY) |
2637                                 sackdelay_change;
2638                 }
2639         }
2640
2641         /* Note that a value of zero indicates the current setting should be
2642            left unchanged.
2643          */
2644         if (params->spp_pathmaxrxt) {
2645                 if (trans) {
2646                         trans->pathmaxrxt = params->spp_pathmaxrxt;
2647                 } else if (asoc) {
2648                         asoc->pathmaxrxt = params->spp_pathmaxrxt;
2649                 } else {
2650                         sp->pathmaxrxt = params->spp_pathmaxrxt;
2651                 }
2652         }
2653
2654         if (params->spp_flags & SPP_IPV6_FLOWLABEL) {
2655                 if (trans) {
2656                         if (trans->ipaddr.sa.sa_family == AF_INET6) {
2657                                 trans->flowlabel = params->spp_ipv6_flowlabel &
2658                                                    SCTP_FLOWLABEL_VAL_MASK;
2659                                 trans->flowlabel |= SCTP_FLOWLABEL_SET_MASK;
2660                         }
2661                 } else if (asoc) {
2662                         struct sctp_transport *t;
2663
2664                         list_for_each_entry(t, &asoc->peer.transport_addr_list,
2665                                             transports) {
2666                                 if (t->ipaddr.sa.sa_family != AF_INET6)
2667                                         continue;
2668                                 t->flowlabel = params->spp_ipv6_flowlabel &
2669                                                SCTP_FLOWLABEL_VAL_MASK;
2670                                 t->flowlabel |= SCTP_FLOWLABEL_SET_MASK;
2671                         }
2672                         asoc->flowlabel = params->spp_ipv6_flowlabel &
2673                                           SCTP_FLOWLABEL_VAL_MASK;
2674                         asoc->flowlabel |= SCTP_FLOWLABEL_SET_MASK;
2675                 } else if (sctp_opt2sk(sp)->sk_family == AF_INET6) {
2676                         sp->flowlabel = params->spp_ipv6_flowlabel &
2677                                         SCTP_FLOWLABEL_VAL_MASK;
2678                         sp->flowlabel |= SCTP_FLOWLABEL_SET_MASK;
2679                 }
2680         }
2681
2682         if (params->spp_flags & SPP_DSCP) {
2683                 if (trans) {
2684                         trans->dscp = params->spp_dscp & SCTP_DSCP_VAL_MASK;
2685                         trans->dscp |= SCTP_DSCP_SET_MASK;
2686                 } else if (asoc) {
2687                         struct sctp_transport *t;
2688
2689                         list_for_each_entry(t, &asoc->peer.transport_addr_list,
2690                                             transports) {
2691                                 t->dscp = params->spp_dscp &
2692                                           SCTP_DSCP_VAL_MASK;
2693                                 t->dscp |= SCTP_DSCP_SET_MASK;
2694                         }
2695                         asoc->dscp = params->spp_dscp & SCTP_DSCP_VAL_MASK;
2696                         asoc->dscp |= SCTP_DSCP_SET_MASK;
2697                 } else {
2698                         sp->dscp = params->spp_dscp & SCTP_DSCP_VAL_MASK;
2699                         sp->dscp |= SCTP_DSCP_SET_MASK;
2700                 }
2701         }
2702
2703         return 0;
2704 }
2705
2706 static int sctp_setsockopt_peer_addr_params(struct sock *sk,
2707                                             char __user *optval,
2708                                             unsigned int optlen)
2709 {
2710         struct sctp_paddrparams  params;
2711         struct sctp_transport   *trans = NULL;
2712         struct sctp_association *asoc = NULL;
2713         struct sctp_sock        *sp = sctp_sk(sk);
2714         int error;
2715         int hb_change, pmtud_change, sackdelay_change;
2716
2717         if (optlen == sizeof(params)) {
2718                 if (copy_from_user(&params, optval, optlen))
2719                         return -EFAULT;
2720         } else if (optlen == ALIGN(offsetof(struct sctp_paddrparams,
2721                                             spp_ipv6_flowlabel), 4)) {
2722                 if (copy_from_user(&params, optval, optlen))
2723                         return -EFAULT;
2724                 if (params.spp_flags & (SPP_DSCP | SPP_IPV6_FLOWLABEL))
2725                         return -EINVAL;
2726         } else {
2727                 return -EINVAL;
2728         }
2729
2730         /* Validate flags and value parameters. */
2731         hb_change        = params.spp_flags & SPP_HB;
2732         pmtud_change     = params.spp_flags & SPP_PMTUD;
2733         sackdelay_change = params.spp_flags & SPP_SACKDELAY;
2734
2735         if (hb_change        == SPP_HB ||
2736             pmtud_change     == SPP_PMTUD ||
2737             sackdelay_change == SPP_SACKDELAY ||
2738             params.spp_sackdelay > 500 ||
2739             (params.spp_pathmtu &&
2740              params.spp_pathmtu < SCTP_DEFAULT_MINSEGMENT))
2741                 return -EINVAL;
2742
2743         /* If an address other than INADDR_ANY is specified, and
2744          * no transport is found, then the request is invalid.
2745          */
2746         if (!sctp_is_any(sk, (union sctp_addr *)&params.spp_address)) {
2747                 trans = sctp_addr_id2transport(sk, &params.spp_address,
2748                                                params.spp_assoc_id);
2749                 if (!trans)
2750                         return -EINVAL;
2751         }
2752
2753         /* Get association, if assoc_id != SCTP_FUTURE_ASSOC and the
2754          * socket is a one to many style socket, and an association
2755          * was not found, then the id was invalid.
2756          */
2757         asoc = sctp_id2assoc(sk, params.spp_assoc_id);
2758         if (!asoc && params.spp_assoc_id != SCTP_FUTURE_ASSOC &&
2759             sctp_style(sk, UDP))
2760                 return -EINVAL;
2761
2762         /* Heartbeat demand can only be sent on a transport or
2763          * association, but not a socket.
2764          */
2765         if (params.spp_flags & SPP_HB_DEMAND && !trans && !asoc)
2766                 return -EINVAL;
2767
2768         /* Process parameters. */
2769         error = sctp_apply_peer_addr_params(&params, trans, asoc, sp,
2770                                             hb_change, pmtud_change,
2771                                             sackdelay_change);
2772
2773         if (error)
2774                 return error;
2775
2776         /* If changes are for association, also apply parameters to each
2777          * transport.
2778          */
2779         if (!trans && asoc) {
2780                 list_for_each_entry(trans, &asoc->peer.transport_addr_list,
2781                                 transports) {
2782                         sctp_apply_peer_addr_params(&params, trans, asoc, sp,
2783                                                     hb_change, pmtud_change,
2784                                                     sackdelay_change);
2785                 }
2786         }
2787
2788         return 0;
2789 }
2790
2791 static inline __u32 sctp_spp_sackdelay_enable(__u32 param_flags)
2792 {
2793         return (param_flags & ~SPP_SACKDELAY) | SPP_SACKDELAY_ENABLE;
2794 }
2795
2796 static inline __u32 sctp_spp_sackdelay_disable(__u32 param_flags)
2797 {
2798         return (param_flags & ~SPP_SACKDELAY) | SPP_SACKDELAY_DISABLE;
2799 }
2800
2801 static void sctp_apply_asoc_delayed_ack(struct sctp_sack_info *params,
2802                                         struct sctp_association *asoc)
2803 {
2804         struct sctp_transport *trans;
2805
2806         if (params->sack_delay) {
2807                 asoc->sackdelay = msecs_to_jiffies(params->sack_delay);
2808                 asoc->param_flags =
2809                         sctp_spp_sackdelay_enable(asoc->param_flags);
2810         }
2811         if (params->sack_freq == 1) {
2812                 asoc->param_flags =
2813                         sctp_spp_sackdelay_disable(asoc->param_flags);
2814         } else if (params->sack_freq > 1) {
2815                 asoc->sackfreq = params->sack_freq;
2816                 asoc->param_flags =
2817                         sctp_spp_sackdelay_enable(asoc->param_flags);
2818         }
2819
2820         list_for_each_entry(trans, &asoc->peer.transport_addr_list,
2821                             transports) {
2822                 if (params->sack_delay) {
2823                         trans->sackdelay = msecs_to_jiffies(params->sack_delay);
2824                         trans->param_flags =
2825                                 sctp_spp_sackdelay_enable(trans->param_flags);
2826                 }
2827                 if (params->sack_freq == 1) {
2828                         trans->param_flags =
2829                                 sctp_spp_sackdelay_disable(trans->param_flags);
2830                 } else if (params->sack_freq > 1) {
2831                         trans->sackfreq = params->sack_freq;
2832                         trans->param_flags =
2833                                 sctp_spp_sackdelay_enable(trans->param_flags);
2834                 }
2835         }
2836 }
2837
2838 /*
2839  * 7.1.23.  Get or set delayed ack timer (SCTP_DELAYED_SACK)
2840  *
2841  * This option will effect the way delayed acks are performed.  This
2842  * option allows you to get or set the delayed ack time, in
2843  * milliseconds.  It also allows changing the delayed ack frequency.
2844  * Changing the frequency to 1 disables the delayed sack algorithm.  If
2845  * the assoc_id is 0, then this sets or gets the endpoints default
2846  * values.  If the assoc_id field is non-zero, then the set or get
2847  * effects the specified association for the one to many model (the
2848  * assoc_id field is ignored by the one to one model).  Note that if
2849  * sack_delay or sack_freq are 0 when setting this option, then the
2850  * current values will remain unchanged.
2851  *
2852  * struct sctp_sack_info {
2853  *     sctp_assoc_t            sack_assoc_id;
2854  *     uint32_t                sack_delay;
2855  *     uint32_t                sack_freq;
2856  * };
2857  *
2858  * sack_assoc_id -  This parameter, indicates which association the user
2859  *    is performing an action upon.  Note that if this field's value is
2860  *    zero then the endpoints default value is changed (effecting future
2861  *    associations only).
2862  *
2863  * sack_delay -  This parameter contains the number of milliseconds that
2864  *    the user is requesting the delayed ACK timer be set to.  Note that
2865  *    this value is defined in the standard to be between 200 and 500
2866  *    milliseconds.
2867  *
2868  * sack_freq -  This parameter contains the number of packets that must
2869  *    be received before a sack is sent without waiting for the delay
2870  *    timer to expire.  The default value for this is 2, setting this
2871  *    value to 1 will disable the delayed sack algorithm.
2872  */
2873
2874 static int sctp_setsockopt_delayed_ack(struct sock *sk,
2875                                        char __user *optval, unsigned int optlen)
2876 {
2877         struct sctp_sock *sp = sctp_sk(sk);
2878         struct sctp_association *asoc;
2879         struct sctp_sack_info params;
2880
2881         if (optlen == sizeof(struct sctp_sack_info)) {
2882                 if (copy_from_user(&params, optval, optlen))
2883                         return -EFAULT;
2884
2885                 if (params.sack_delay == 0 && params.sack_freq == 0)
2886                         return 0;
2887         } else if (optlen == sizeof(struct sctp_assoc_value)) {
2888                 pr_warn_ratelimited(DEPRECATED
2889                                     "%s (pid %d) "
2890                                     "Use of struct sctp_assoc_value in delayed_ack socket option.\n"
2891                                     "Use struct sctp_sack_info instead\n",
2892                                     current->comm, task_pid_nr(current));
2893                 if (copy_from_user(&params, optval, optlen))
2894                         return -EFAULT;
2895
2896                 if (params.sack_delay == 0)
2897                         params.sack_freq = 1;
2898                 else
2899                         params.sack_freq = 0;
2900         } else
2901                 return -EINVAL;
2902
2903         /* Validate value parameter. */
2904         if (params.sack_delay > 500)
2905                 return -EINVAL;
2906
2907         /* Get association, if sack_assoc_id != SCTP_FUTURE_ASSOC and the
2908          * socket is a one to many style socket, and an association
2909          * was not found, then the id was invalid.
2910          */
2911         asoc = sctp_id2assoc(sk, params.sack_assoc_id);
2912         if (!asoc && params.sack_assoc_id > SCTP_ALL_ASSOC &&
2913             sctp_style(sk, UDP))
2914                 return -EINVAL;
2915
2916         if (asoc) {
2917                 sctp_apply_asoc_delayed_ack(&params, asoc);
2918
2919                 return 0;
2920         }
2921
2922         if (params.sack_assoc_id == SCTP_FUTURE_ASSOC ||
2923             params.sack_assoc_id == SCTP_ALL_ASSOC) {
2924                 if (params.sack_delay) {
2925                         sp->sackdelay = params.sack_delay;
2926                         sp->param_flags =
2927                                 sctp_spp_sackdelay_enable(sp->param_flags);
2928                 }
2929                 if (params.sack_freq == 1) {
2930                         sp->param_flags =
2931                                 sctp_spp_sackdelay_disable(sp->param_flags);
2932                 } else if (params.sack_freq > 1) {
2933                         sp->sackfreq = params.sack_freq;
2934                         sp->param_flags =
2935                                 sctp_spp_sackdelay_enable(sp->param_flags);
2936                 }
2937         }
2938
2939         if (params.sack_assoc_id == SCTP_CURRENT_ASSOC ||
2940             params.sack_assoc_id == SCTP_ALL_ASSOC)
2941                 list_for_each_entry(asoc, &sp->ep->asocs, asocs)
2942                         sctp_apply_asoc_delayed_ack(&params, asoc);
2943
2944         return 0;
2945 }
2946
2947 /* 7.1.3 Initialization Parameters (SCTP_INITMSG)
2948  *
2949  * Applications can specify protocol parameters for the default association
2950  * initialization.  The option name argument to setsockopt() and getsockopt()
2951  * is SCTP_INITMSG.
2952  *
2953  * Setting initialization parameters is effective only on an unconnected
2954  * socket (for UDP-style sockets only future associations are effected
2955  * by the change).  With TCP-style sockets, this option is inherited by
2956  * sockets derived from a listener socket.
2957  */
2958 static int sctp_setsockopt_initmsg(struct sock *sk, char __user *optval, unsigned int optlen)
2959 {
2960         struct sctp_initmsg sinit;
2961         struct sctp_sock *sp = sctp_sk(sk);
2962
2963         if (optlen != sizeof(struct sctp_initmsg))
2964                 return -EINVAL;
2965         if (copy_from_user(&sinit, optval, optlen))
2966                 return -EFAULT;
2967
2968         if (sinit.sinit_num_ostreams)
2969                 sp->initmsg.sinit_num_ostreams = sinit.sinit_num_ostreams;
2970         if (sinit.sinit_max_instreams)
2971                 sp->initmsg.sinit_max_instreams = sinit.sinit_max_instreams;
2972         if (sinit.sinit_max_attempts)
2973                 sp->initmsg.sinit_max_attempts = sinit.sinit_max_attempts;
2974         if (sinit.sinit_max_init_timeo)
2975                 sp->initmsg.sinit_max_init_timeo = sinit.sinit_max_init_timeo;
2976
2977         return 0;
2978 }
2979
2980 /*
2981  * 7.1.14 Set default send parameters (SCTP_DEFAULT_SEND_PARAM)
2982  *
2983  *   Applications that wish to use the sendto() system call may wish to
2984  *   specify a default set of parameters that would normally be supplied
2985  *   through the inclusion of ancillary data.  This socket option allows
2986  *   such an application to set the default sctp_sndrcvinfo structure.
2987  *   The application that wishes to use this socket option simply passes
2988  *   in to this call the sctp_sndrcvinfo structure defined in Section
2989  *   5.2.2) The input parameters accepted by this call include
2990  *   sinfo_stream, sinfo_flags, sinfo_ppid, sinfo_context,
2991  *   sinfo_timetolive.  The user must provide the sinfo_assoc_id field in
2992  *   to this call if the caller is using the UDP model.
2993  */
2994 static int sctp_setsockopt_default_send_param(struct sock *sk,
2995                                               char __user *optval,
2996                                               unsigned int optlen)
2997 {
2998         struct sctp_sock *sp = sctp_sk(sk);
2999         struct sctp_association *asoc;
3000         struct sctp_sndrcvinfo info;
3001
3002         if (optlen != sizeof(info))
3003                 return -EINVAL;
3004         if (copy_from_user(&info, optval, optlen))
3005                 return -EFAULT;
3006         if (info.sinfo_flags &
3007             ~(SCTP_UNORDERED | SCTP_ADDR_OVER |
3008               SCTP_ABORT | SCTP_EOF))
3009                 return -EINVAL;
3010
3011         asoc = sctp_id2assoc(sk, info.sinfo_assoc_id);
3012         if (!asoc && info.sinfo_assoc_id > SCTP_ALL_ASSOC &&
3013             sctp_style(sk, UDP))
3014                 return -EINVAL;
3015
3016         if (asoc) {
3017                 asoc->default_stream = info.sinfo_stream;
3018                 asoc->default_flags = info.sinfo_flags;
3019                 asoc->default_ppid = info.sinfo_ppid;
3020                 asoc->default_context = info.sinfo_context;
3021                 asoc->default_timetolive = info.sinfo_timetolive;
3022
3023                 return 0;
3024         }
3025
3026         if (info.sinfo_assoc_id == SCTP_FUTURE_ASSOC ||
3027             info.sinfo_assoc_id == SCTP_ALL_ASSOC) {
3028                 sp->default_stream = info.sinfo_stream;
3029                 sp->default_flags = info.sinfo_flags;
3030                 sp->default_ppid = info.sinfo_ppid;
3031                 sp->default_context = info.sinfo_context;
3032                 sp->default_timetolive = info.sinfo_timetolive;
3033         }
3034
3035         if (info.sinfo_assoc_id == SCTP_CURRENT_ASSOC ||
3036             info.sinfo_assoc_id == SCTP_ALL_ASSOC) {
3037                 list_for_each_entry(asoc, &sp->ep->asocs, asocs) {
3038                         asoc->default_stream = info.sinfo_stream;
3039                         asoc->default_flags = info.sinfo_flags;
3040                         asoc->default_ppid = info.sinfo_ppid;
3041                         asoc->default_context = info.sinfo_context;
3042                         asoc->default_timetolive = info.sinfo_timetolive;
3043                 }
3044         }
3045
3046         return 0;
3047 }
3048
3049 /* RFC6458, Section 8.1.31. Set/get Default Send Parameters
3050  * (SCTP_DEFAULT_SNDINFO)
3051  */
3052 static int sctp_setsockopt_default_sndinfo(struct sock *sk,
3053                                            char __user *optval,
3054                                            unsigned int optlen)
3055 {
3056         struct sctp_sock *sp = sctp_sk(sk);
3057         struct sctp_association *asoc;
3058         struct sctp_sndinfo info;
3059
3060         if (optlen != sizeof(info))
3061                 return -EINVAL;
3062         if (copy_from_user(&info, optval, optlen))
3063                 return -EFAULT;
3064         if (info.snd_flags &
3065             ~(SCTP_UNORDERED | SCTP_ADDR_OVER |
3066               SCTP_ABORT | SCTP_EOF))
3067                 return -EINVAL;
3068
3069         asoc = sctp_id2assoc(sk, info.snd_assoc_id);
3070         if (!asoc && info.snd_assoc_id > SCTP_ALL_ASSOC &&
3071             sctp_style(sk, UDP))
3072                 return -EINVAL;
3073
3074         if (asoc) {
3075                 asoc->default_stream = info.snd_sid;
3076                 asoc->default_flags = info.snd_flags;
3077                 asoc->default_ppid = info.snd_ppid;
3078                 asoc->default_context = info.snd_context;
3079
3080                 return 0;
3081         }
3082
3083         if (info.snd_assoc_id == SCTP_FUTURE_ASSOC ||
3084             info.snd_assoc_id == SCTP_ALL_ASSOC) {
3085                 sp->default_stream = info.snd_sid;
3086                 sp->default_flags = info.snd_flags;
3087                 sp->default_ppid = info.snd_ppid;
3088                 sp->default_context = info.snd_context;
3089         }
3090
3091         if (info.snd_assoc_id == SCTP_CURRENT_ASSOC ||
3092             info.snd_assoc_id == SCTP_ALL_ASSOC) {
3093                 list_for_each_entry(asoc, &sp->ep->asocs, asocs) {
3094                         asoc->default_stream = info.snd_sid;
3095                         asoc->default_flags = info.snd_flags;
3096                         asoc->default_ppid = info.snd_ppid;
3097                         asoc->default_context = info.snd_context;
3098                 }
3099         }
3100
3101         return 0;
3102 }
3103
3104 /* 7.1.10 Set Primary Address (SCTP_PRIMARY_ADDR)
3105  *
3106  * Requests that the local SCTP stack use the enclosed peer address as
3107  * the association primary.  The enclosed address must be one of the
3108  * association peer's addresses.
3109  */
3110 static int sctp_setsockopt_primary_addr(struct sock *sk, char __user *optval,
3111                                         unsigned int optlen)
3112 {
3113         struct sctp_prim prim;
3114         struct sctp_transport *trans;
3115         struct sctp_af *af;
3116         int err;
3117
3118         if (optlen != sizeof(struct sctp_prim))
3119                 return -EINVAL;
3120
3121         if (copy_from_user(&prim, optval, sizeof(struct sctp_prim)))
3122                 return -EFAULT;
3123
3124         /* Allow security module to validate address but need address len. */
3125         af = sctp_get_af_specific(prim.ssp_addr.ss_family);
3126         if (!af)
3127                 return -EINVAL;
3128
3129         err = security_sctp_bind_connect(sk, SCTP_PRIMARY_ADDR,
3130                                          (struct sockaddr *)&prim.ssp_addr,
3131                                          af->sockaddr_len);
3132         if (err)
3133                 return err;
3134
3135         trans = sctp_addr_id2transport(sk, &prim.ssp_addr, prim.ssp_assoc_id);
3136         if (!trans)
3137                 return -EINVAL;
3138
3139         sctp_assoc_set_primary(trans->asoc, trans);
3140
3141         return 0;
3142 }
3143
3144 /*
3145  * 7.1.5 SCTP_NODELAY
3146  *
3147  * Turn on/off any Nagle-like algorithm.  This means that packets are
3148  * generally sent as soon as possible and no unnecessary delays are
3149  * introduced, at the cost of more packets in the network.  Expects an
3150  *  integer boolean flag.
3151  */
3152 static int sctp_setsockopt_nodelay(struct sock *sk, char __user *optval,
3153                                    unsigned int optlen)
3154 {
3155         int val;
3156
3157         if (optlen < sizeof(int))
3158                 return -EINVAL;
3159         if (get_user(val, (int __user *)optval))
3160                 return -EFAULT;
3161
3162         sctp_sk(sk)->nodelay = (val == 0) ? 0 : 1;
3163         return 0;
3164 }
3165
3166 /*
3167  *
3168  * 7.1.1 SCTP_RTOINFO
3169  *
3170  * The protocol parameters used to initialize and bound retransmission
3171  * timeout (RTO) are tunable. sctp_rtoinfo structure is used to access
3172  * and modify these parameters.
3173  * All parameters are time values, in milliseconds.  A value of 0, when
3174  * modifying the parameters, indicates that the current value should not
3175  * be changed.
3176  *
3177  */
3178 static int sctp_setsockopt_rtoinfo(struct sock *sk, char __user *optval, unsigned int optlen)
3179 {
3180         struct sctp_rtoinfo rtoinfo;
3181         struct sctp_association *asoc;
3182         unsigned long rto_min, rto_max;
3183         struct sctp_sock *sp = sctp_sk(sk);
3184
3185         if (optlen != sizeof (struct sctp_rtoinfo))
3186                 return -EINVAL;
3187
3188         if (copy_from_user(&rtoinfo, optval, optlen))
3189                 return -EFAULT;
3190
3191         asoc = sctp_id2assoc(sk, rtoinfo.srto_assoc_id);
3192
3193         /* Set the values to the specific association */
3194         if (!asoc && rtoinfo.srto_assoc_id != SCTP_FUTURE_ASSOC &&
3195             sctp_style(sk, UDP))
3196                 return -EINVAL;
3197
3198         rto_max = rtoinfo.srto_max;
3199         rto_min = rtoinfo.srto_min;
3200
3201         if (rto_max)
3202                 rto_max = asoc ? msecs_to_jiffies(rto_max) : rto_max;
3203         else
3204                 rto_max = asoc ? asoc->rto_max : sp->rtoinfo.srto_max;
3205
3206         if (rto_min)
3207                 rto_min = asoc ? msecs_to_jiffies(rto_min) : rto_min;
3208         else
3209                 rto_min = asoc ? asoc->rto_min : sp->rtoinfo.srto_min;
3210
3211         if (rto_min > rto_max)
3212                 return -EINVAL;
3213
3214         if (asoc) {
3215                 if (rtoinfo.srto_initial != 0)
3216                         asoc->rto_initial =
3217                                 msecs_to_jiffies(rtoinfo.srto_initial);
3218                 asoc->rto_max = rto_max;
3219                 asoc->rto_min = rto_min;
3220         } else {
3221                 /* If there is no association or the association-id = 0
3222                  * set the values to the endpoint.
3223                  */
3224                 if (rtoinfo.srto_initial != 0)
3225                         sp->rtoinfo.srto_initial = rtoinfo.srto_initial;
3226                 sp->rtoinfo.srto_max = rto_max;
3227                 sp->rtoinfo.srto_min = rto_min;
3228         }
3229
3230         return 0;
3231 }
3232
3233 /*
3234  *
3235  * 7.1.2 SCTP_ASSOCINFO
3236  *
3237  * This option is used to tune the maximum retransmission attempts
3238  * of the association.
3239  * Returns an error if the new association retransmission value is
3240  * greater than the sum of the retransmission value  of the peer.
3241  * See [SCTP] for more information.
3242  *
3243  */
3244 static int sctp_setsockopt_associnfo(struct sock *sk, char __user *optval, unsigned int optlen)
3245 {
3246
3247         struct sctp_assocparams assocparams;
3248         struct sctp_association *asoc;
3249
3250         if (optlen != sizeof(struct sctp_assocparams))
3251                 return -EINVAL;
3252         if (copy_from_user(&assocparams, optval, optlen))
3253                 return -EFAULT;
3254
3255         asoc = sctp_id2assoc(sk, assocparams.sasoc_assoc_id);
3256
3257         if (!asoc && assocparams.sasoc_assoc_id != SCTP_FUTURE_ASSOC &&
3258             sctp_style(sk, UDP))
3259                 return -EINVAL;
3260
3261         /* Set the values to the specific association */
3262         if (asoc) {
3263                 if (assocparams.sasoc_asocmaxrxt != 0) {
3264                         __u32 path_sum = 0;
3265                         int   paths = 0;
3266                         struct sctp_transport *peer_addr;
3267
3268                         list_for_each_entry(peer_addr, &asoc->peer.transport_addr_list,
3269                                         transports) {
3270                                 path_sum += peer_addr->pathmaxrxt;
3271                                 paths++;
3272                         }
3273
3274                         /* Only validate asocmaxrxt if we have more than
3275                          * one path/transport.  We do this because path
3276                          * retransmissions are only counted when we have more
3277                          * then one path.
3278                          */
3279                         if (paths > 1 &&
3280                             assocparams.sasoc_asocmaxrxt > path_sum)
3281                                 return -EINVAL;
3282
3283                         asoc->max_retrans = assocparams.sasoc_asocmaxrxt;
3284                 }
3285
3286                 if (assocparams.sasoc_cookie_life != 0)
3287                         asoc->cookie_life = ms_to_ktime(assocparams.sasoc_cookie_life);
3288         } else {
3289                 /* Set the values to the endpoint */
3290                 struct sctp_sock *sp = sctp_sk(sk);
3291
3292                 if (assocparams.sasoc_asocmaxrxt != 0)
3293                         sp->assocparams.sasoc_asocmaxrxt =
3294                                                 assocparams.sasoc_asocmaxrxt;
3295                 if (assocparams.sasoc_cookie_life != 0)
3296                         sp->assocparams.sasoc_cookie_life =
3297                                                 assocparams.sasoc_cookie_life;
3298         }
3299         return 0;
3300 }
3301
3302 /*
3303  * 7.1.16 Set/clear IPv4 mapped addresses (SCTP_I_WANT_MAPPED_V4_ADDR)
3304  *
3305  * This socket option is a boolean flag which turns on or off mapped V4
3306  * addresses.  If this option is turned on and the socket is type
3307  * PF_INET6, then IPv4 addresses will be mapped to V6 representation.
3308  * If this option is turned off, then no mapping will be done of V4
3309  * addresses and a user will receive both PF_INET6 and PF_INET type
3310  * addresses on the socket.
3311  */
3312 static int sctp_setsockopt_mappedv4(struct sock *sk, char __user *optval, unsigned int optlen)
3313 {
3314         int val;
3315         struct sctp_sock *sp = sctp_sk(sk);
3316
3317         if (optlen < sizeof(int))
3318                 return -EINVAL;
3319         if (get_user(val, (int __user *)optval))
3320                 return -EFAULT;
3321         if (val)
3322                 sp->v4mapped = 1;
3323         else
3324                 sp->v4mapped = 0;
3325
3326         return 0;
3327 }
3328
3329 /*
3330  * 8.1.16.  Get or Set the Maximum Fragmentation Size (SCTP_MAXSEG)
3331  * This option will get or set the maximum size to put in any outgoing
3332  * SCTP DATA chunk.  If a message is larger than this size it will be
3333  * fragmented by SCTP into the specified size.  Note that the underlying
3334  * SCTP implementation may fragment into smaller sized chunks when the
3335  * PMTU of the underlying association is smaller than the value set by
3336  * the user.  The default value for this option is '0' which indicates
3337  * the user is NOT limiting fragmentation and only the PMTU will effect
3338  * SCTP's choice of DATA chunk size.  Note also that values set larger
3339  * than the maximum size of an IP datagram will effectively let SCTP
3340  * control fragmentation (i.e. the same as setting this option to 0).
3341  *
3342  * The following structure is used to access and modify this parameter:
3343  *
3344  * struct sctp_assoc_value {
3345  *   sctp_assoc_t assoc_id;
3346  *   uint32_t assoc_value;
3347  * };
3348  *
3349  * assoc_id:  This parameter is ignored for one-to-one style sockets.
3350  *    For one-to-many style sockets this parameter indicates which
3351  *    association the user is performing an action upon.  Note that if
3352  *    this field's value is zero then the endpoints default value is
3353  *    changed (effecting future associations only).
3354  * assoc_value:  This parameter specifies the maximum size in bytes.
3355  */
3356 static int sctp_setsockopt_maxseg(struct sock *sk, char __user *optval, unsigned int optlen)
3357 {
3358         struct sctp_sock *sp = sctp_sk(sk);
3359         struct sctp_assoc_value params;
3360         struct sctp_association *asoc;
3361         int val;
3362
3363         if (optlen == sizeof(int)) {
3364                 pr_warn_ratelimited(DEPRECATED
3365                                     "%s (pid %d) "
3366                                     "Use of int in maxseg socket option.\n"
3367                                     "Use struct sctp_assoc_value instead\n",
3368                                     current->comm, task_pid_nr(current));
3369                 if (copy_from_user(&val, optval, optlen))
3370                         return -EFAULT;
3371                 params.assoc_id = SCTP_FUTURE_ASSOC;
3372         } else if (optlen == sizeof(struct sctp_assoc_value)) {
3373                 if (copy_from_user(&params, optval, optlen))
3374                         return -EFAULT;
3375                 val = params.assoc_value;
3376         } else {
3377                 return -EINVAL;
3378         }
3379
3380         asoc = sctp_id2assoc(sk, params.assoc_id);
3381         if (!asoc && params.assoc_id != SCTP_FUTURE_ASSOC &&
3382             sctp_style(sk, UDP))
3383                 return -EINVAL;
3384
3385         if (val) {
3386                 int min_len, max_len;
3387                 __u16 datasize = asoc ? sctp_datachk_len(&asoc->stream) :
3388                                  sizeof(struct sctp_data_chunk);
3389
3390                 min_len = sctp_min_frag_point(sp, datasize);
3391                 max_len = SCTP_MAX_CHUNK_LEN - datasize;
3392
3393                 if (val < min_len || val > max_len)
3394                         return -EINVAL;
3395         }
3396
3397         if (asoc) {
3398                 asoc->user_frag = val;
3399                 sctp_assoc_update_frag_point(asoc);
3400         } else {
3401                 sp->user_frag = val;
3402         }
3403
3404         return 0;
3405 }
3406
3407
3408 /*
3409  *  7.1.9 Set Peer Primary Address (SCTP_SET_PEER_PRIMARY_ADDR)
3410  *
3411  *   Requests that the peer mark the enclosed address as the association
3412  *   primary. The enclosed address must be one of the association's
3413  *   locally bound addresses. The following structure is used to make a
3414  *   set primary request:
3415  */
3416 static int sctp_setsockopt_peer_primary_addr(struct sock *sk, char __user *optval,
3417                                              unsigned int optlen)
3418 {
3419         struct net *net = sock_net(sk);
3420         struct sctp_sock        *sp;
3421         struct sctp_association *asoc = NULL;
3422         struct sctp_setpeerprim prim;
3423         struct sctp_chunk       *chunk;
3424         struct sctp_af          *af;
3425         int                     err;
3426
3427         sp = sctp_sk(sk);
3428
3429         if (!net->sctp.addip_enable)
3430                 return -EPERM;
3431
3432         if (optlen != sizeof(struct sctp_setpeerprim))
3433                 return -EINVAL;
3434
3435         if (copy_from_user(&prim, optval, optlen))
3436                 return -EFAULT;
3437
3438         asoc = sctp_id2assoc(sk, prim.sspp_assoc_id);
3439         if (!asoc)
3440                 return -EINVAL;
3441
3442         if (!asoc->peer.asconf_capable)
3443                 return -EPERM;
3444
3445         if (asoc->peer.addip_disabled_mask & SCTP_PARAM_SET_PRIMARY)
3446                 return -EPERM;
3447
3448         if (!sctp_state(asoc, ESTABLISHED))
3449                 return -ENOTCONN;
3450
3451         af = sctp_get_af_specific(prim.sspp_addr.ss_family);
3452         if (!af)
3453                 return -EINVAL;
3454
3455         if (!af->addr_valid((union sctp_addr *)&prim.sspp_addr, sp, NULL))
3456                 return -EADDRNOTAVAIL;
3457
3458         if (!sctp_assoc_lookup_laddr(asoc, (union sctp_addr *)&prim.sspp_addr))
3459                 return -EADDRNOTAVAIL;
3460
3461         /* Allow security module to validate address. */
3462         err = security_sctp_bind_connect(sk, SCTP_SET_PEER_PRIMARY_ADDR,
3463                                          (struct sockaddr *)&prim.sspp_addr,
3464                                          af->sockaddr_len);
3465         if (err)
3466                 return err;
3467
3468         /* Create an ASCONF chunk with SET_PRIMARY parameter    */
3469         chunk = sctp_make_asconf_set_prim(asoc,
3470                                           (union sctp_addr *)&prim.sspp_addr);
3471         if (!chunk)
3472                 return -ENOMEM;
3473
3474         err = sctp_send_asconf(asoc, chunk);
3475
3476         pr_debug("%s: we set peer primary addr primitively\n", __func__);
3477
3478         return err;
3479 }
3480
3481 static int sctp_setsockopt_adaptation_layer(struct sock *sk, char __user *optval,
3482                                             unsigned int optlen)
3483 {
3484         struct sctp_setadaptation adaptation;
3485
3486         if (optlen != sizeof(struct sctp_setadaptation))
3487                 return -EINVAL;
3488         if (copy_from_user(&adaptation, optval, optlen))
3489                 return -EFAULT;
3490
3491         sctp_sk(sk)->adaptation_ind = adaptation.ssb_adaptation_ind;
3492
3493         return 0;
3494 }
3495
3496 /*
3497  * 7.1.29.  Set or Get the default context (SCTP_CONTEXT)
3498  *
3499  * The context field in the sctp_sndrcvinfo structure is normally only
3500  * used when a failed message is retrieved holding the value that was
3501  * sent down on the actual send call.  This option allows the setting of
3502  * a default context on an association basis that will be received on
3503  * reading messages from the peer.  This is especially helpful in the
3504  * one-2-many model for an application to keep some reference to an
3505  * internal state machine that is processing messages on the
3506  * association.  Note that the setting of this value only effects
3507  * received messages from the peer and does not effect the value that is
3508  * saved with outbound messages.
3509  */
3510 static int sctp_setsockopt_context(struct sock *sk, char __user *optval,
3511                                    unsigned int optlen)
3512 {
3513         struct sctp_assoc_value params;
3514         struct sctp_sock *sp;
3515         struct sctp_association *asoc;
3516
3517         if (optlen != sizeof(struct sctp_assoc_value))
3518                 return -EINVAL;
3519         if (copy_from_user(&params, optval, optlen))
3520                 return -EFAULT;
3521
3522         sp = sctp_sk(sk);
3523
3524         if (params.assoc_id != 0) {
3525                 asoc = sctp_id2assoc(sk, params.assoc_id);
3526                 if (!asoc)
3527                         return -EINVAL;
3528                 asoc->default_rcv_context = params.assoc_value;
3529         } else {
3530                 sp->default_rcv_context = params.assoc_value;
3531         }
3532
3533         return 0;
3534 }
3535
3536 /*
3537  * 7.1.24.  Get or set fragmented interleave (SCTP_FRAGMENT_INTERLEAVE)
3538  *
3539  * This options will at a minimum specify if the implementation is doing
3540  * fragmented interleave.  Fragmented interleave, for a one to many
3541  * socket, is when subsequent calls to receive a message may return
3542  * parts of messages from different associations.  Some implementations
3543  * may allow you to turn this value on or off.  If so, when turned off,
3544  * no fragment interleave will occur (which will cause a head of line
3545  * blocking amongst multiple associations sharing the same one to many
3546  * socket).  When this option is turned on, then each receive call may
3547  * come from a different association (thus the user must receive data
3548  * with the extended calls (e.g. sctp_recvmsg) to keep track of which
3549  * association each receive belongs to.
3550  *
3551  * This option takes a boolean value.  A non-zero value indicates that
3552  * fragmented interleave is on.  A value of zero indicates that
3553  * fragmented interleave is off.
3554  *
3555  * Note that it is important that an implementation that allows this
3556  * option to be turned on, have it off by default.  Otherwise an unaware
3557  * application using the one to many model may become confused and act
3558  * incorrectly.
3559  */
3560 static int sctp_setsockopt_fragment_interleave(struct sock *sk,
3561                                                char __user *optval,
3562                                                unsigned int optlen)
3563 {
3564         int val;
3565
3566         if (optlen != sizeof(int))
3567                 return -EINVAL;
3568         if (get_user(val, (int __user *)optval))
3569                 return -EFAULT;
3570
3571         sctp_sk(sk)->frag_interleave = !!val;
3572
3573         if (!sctp_sk(sk)->frag_interleave)
3574                 sctp_sk(sk)->strm_interleave = 0;
3575
3576         return 0;
3577 }
3578
3579 /*
3580  * 8.1.21.  Set or Get the SCTP Partial Delivery Point
3581  *       (SCTP_PARTIAL_DELIVERY_POINT)
3582  *
3583  * This option will set or get the SCTP partial delivery point.  This
3584  * point is the size of a message where the partial delivery API will be
3585  * invoked to help free up rwnd space for the peer.  Setting this to a
3586  * lower value will cause partial deliveries to happen more often.  The
3587  * calls argument is an integer that sets or gets the partial delivery
3588  * point.  Note also that the call will fail if the user attempts to set
3589  * this value larger than the socket receive buffer size.
3590  *
3591  * Note that any single message having a length smaller than or equal to
3592  * the SCTP partial delivery point will be delivered in one single read
3593  * call as long as the user provided buffer is large enough to hold the
3594  * message.
3595  */
3596 static int sctp_setsockopt_partial_delivery_point(struct sock *sk,
3597                                                   char __user *optval,
3598                                                   unsigned int optlen)
3599 {
3600         u32 val;
3601
3602         if (optlen != sizeof(u32))
3603                 return -EINVAL;
3604         if (get_user(val, (int __user *)optval))
3605                 return -EFAULT;
3606
3607         /* Note: We double the receive buffer from what the user sets
3608          * it to be, also initial rwnd is based on rcvbuf/2.
3609          */
3610         if (val > (sk->sk_rcvbuf >> 1))
3611                 return -EINVAL;
3612
3613         sctp_sk(sk)->pd_point = val;
3614
3615         return 0; /* is this the right error code? */
3616 }
3617
3618 /*
3619  * 7.1.28.  Set or Get the maximum burst (SCTP_MAX_BURST)
3620  *
3621  * This option will allow a user to change the maximum burst of packets
3622  * that can be emitted by this association.  Note that the default value
3623  * is 4, and some implementations may restrict this setting so that it
3624  * can only be lowered.
3625  *
3626  * NOTE: This text doesn't seem right.  Do this on a socket basis with
3627  * future associations inheriting the socket value.
3628  */
3629 static int sctp_setsockopt_maxburst(struct sock *sk,
3630                                     char __user *optval,
3631                                     unsigned int optlen)
3632 {
3633         struct sctp_assoc_value params;
3634         struct sctp_sock *sp;
3635         struct sctp_association *asoc;
3636         int val;
3637         int assoc_id = 0;
3638
3639         if (optlen == sizeof(int)) {
3640                 pr_warn_ratelimited(DEPRECATED
3641                                     "%s (pid %d) "
3642                                     "Use of int in max_burst socket option deprecated.\n"
3643                                     "Use struct sctp_assoc_value instead\n",
3644                                     current->comm, task_pid_nr(current));
3645                 if (copy_from_user(&val, optval, optlen))
3646                         return -EFAULT;
3647         } else if (optlen == sizeof(struct sctp_assoc_value)) {
3648                 if (copy_from_user(&params, optval, optlen))
3649                         return -EFAULT;
3650                 val = params.assoc_value;
3651                 assoc_id = params.assoc_id;
3652         } else
3653                 return -EINVAL;
3654
3655         sp = sctp_sk(sk);
3656
3657         if (assoc_id != 0) {
3658                 asoc = sctp_id2assoc(sk, assoc_id);
3659                 if (!asoc)
3660                         return -EINVAL;
3661                 asoc->max_burst = val;
3662         } else
3663                 sp->max_burst = val;
3664
3665         return 0;
3666 }
3667
3668 /*
3669  * 7.1.18.  Add a chunk that must be authenticated (SCTP_AUTH_CHUNK)
3670  *
3671  * This set option adds a chunk type that the user is requesting to be
3672  * received only in an authenticated way.  Changes to the list of chunks
3673  * will only effect future associations on the socket.
3674  */
3675 static int sctp_setsockopt_auth_chunk(struct sock *sk,
3676                                       char __user *optval,
3677                                       unsigned int optlen)
3678 {
3679         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
3680         struct sctp_authchunk val;
3681
3682         if (!ep->auth_enable)
3683                 return -EACCES;
3684
3685         if (optlen != sizeof(struct sctp_authchunk))
3686                 return -EINVAL;
3687         if (copy_from_user(&val, optval, optlen))
3688                 return -EFAULT;
3689
3690         switch (val.sauth_chunk) {
3691         case SCTP_CID_INIT:
3692         case SCTP_CID_INIT_ACK:
3693         case SCTP_CID_SHUTDOWN_COMPLETE:
3694         case SCTP_CID_AUTH:
3695                 return -EINVAL;
3696         }
3697
3698         /* add this chunk id to the endpoint */
3699         return sctp_auth_ep_add_chunkid(ep, val.sauth_chunk);
3700 }
3701
3702 /*
3703  * 7.1.19.  Get or set the list of supported HMAC Identifiers (SCTP_HMAC_IDENT)
3704  *
3705  * This option gets or sets the list of HMAC algorithms that the local
3706  * endpoint requires the peer to use.
3707  */
3708 static int sctp_setsockopt_hmac_ident(struct sock *sk,
3709                                       char __user *optval,
3710                                       unsigned int optlen)
3711 {
3712         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
3713         struct sctp_hmacalgo *hmacs;
3714         u32 idents;
3715         int err;
3716
3717         if (!ep->auth_enable)
3718                 return -EACCES;
3719
3720         if (optlen < sizeof(struct sctp_hmacalgo))
3721                 return -EINVAL;
3722         optlen = min_t(unsigned int, optlen, sizeof(struct sctp_hmacalgo) +
3723                                              SCTP_AUTH_NUM_HMACS * sizeof(u16));
3724
3725         hmacs = memdup_user(optval, optlen);
3726         if (IS_ERR(hmacs))
3727                 return PTR_ERR(hmacs);
3728
3729         idents = hmacs->shmac_num_idents;
3730         if (idents == 0 || idents > SCTP_AUTH_NUM_HMACS ||
3731             (idents * sizeof(u16)) > (optlen - sizeof(struct sctp_hmacalgo))) {
3732                 err = -EINVAL;
3733                 goto out;
3734         }
3735
3736         err = sctp_auth_ep_set_hmacs(ep, hmacs);
3737 out:
3738         kfree(hmacs);
3739         return err;
3740 }
3741
3742 /*
3743  * 7.1.20.  Set a shared key (SCTP_AUTH_KEY)
3744  *
3745  * This option will set a shared secret key which is used to build an
3746  * association shared key.
3747  */
3748 static int sctp_setsockopt_auth_key(struct sock *sk,
3749                                     char __user *optval,
3750                                     unsigned int optlen)
3751 {
3752         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
3753         struct sctp_authkey *authkey;
3754         struct sctp_association *asoc;
3755         int ret;
3756
3757         if (!ep->auth_enable)
3758                 return -EACCES;
3759
3760         if (optlen <= sizeof(struct sctp_authkey))
3761                 return -EINVAL;
3762         /* authkey->sca_keylength is u16, so optlen can't be bigger than
3763          * this.
3764          */
3765         optlen = min_t(unsigned int, optlen, USHRT_MAX +
3766                                              sizeof(struct sctp_authkey));
3767
3768         authkey = memdup_user(optval, optlen);
3769         if (IS_ERR(authkey))
3770                 return PTR_ERR(authkey);
3771
3772         if (authkey->sca_keylength > optlen - sizeof(struct sctp_authkey)) {
3773                 ret = -EINVAL;
3774                 goto out;
3775         }
3776
3777         asoc = sctp_id2assoc(sk, authkey->sca_assoc_id);
3778         if (!asoc && authkey->sca_assoc_id && sctp_style(sk, UDP)) {
3779                 ret = -EINVAL;
3780                 goto out;
3781         }
3782
3783         ret = sctp_auth_set_key(ep, asoc, authkey);
3784 out:
3785         kzfree(authkey);
3786         return ret;
3787 }
3788
3789 /*
3790  * 7.1.21.  Get or set the active shared key (SCTP_AUTH_ACTIVE_KEY)
3791  *
3792  * This option will get or set the active shared key to be used to build
3793  * the association shared key.
3794  */
3795 static int sctp_setsockopt_active_key(struct sock *sk,
3796                                       char __user *optval,
3797                                       unsigned int optlen)
3798 {
3799         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
3800         struct sctp_authkeyid val;
3801         struct sctp_association *asoc;
3802
3803         if (!ep->auth_enable)
3804                 return -EACCES;
3805
3806         if (optlen != sizeof(struct sctp_authkeyid))
3807                 return -EINVAL;
3808         if (copy_from_user(&val, optval, optlen))
3809                 return -EFAULT;
3810
3811         asoc = sctp_id2assoc(sk, val.scact_assoc_id);
3812         if (!asoc && val.scact_assoc_id && sctp_style(sk, UDP))
3813                 return -EINVAL;
3814
3815         return sctp_auth_set_active_key(ep, asoc, val.scact_keynumber);
3816 }
3817
3818 /*
3819  * 7.1.22.  Delete a shared key (SCTP_AUTH_DELETE_KEY)
3820  *
3821  * This set option will delete a shared secret key from use.
3822  */
3823 static int sctp_setsockopt_del_key(struct sock *sk,
3824                                    char __user *optval,
3825                                    unsigned int optlen)
3826 {
3827         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
3828         struct sctp_authkeyid val;
3829         struct sctp_association *asoc;
3830
3831         if (!ep->auth_enable)
3832                 return -EACCES;
3833
3834         if (optlen != sizeof(struct sctp_authkeyid))
3835                 return -EINVAL;
3836         if (copy_from_user(&val, optval, optlen))
3837                 return -EFAULT;
3838
3839         asoc = sctp_id2assoc(sk, val.scact_assoc_id);
3840         if (!asoc && val.scact_assoc_id && sctp_style(sk, UDP))
3841                 return -EINVAL;
3842
3843         return sctp_auth_del_key_id(ep, asoc, val.scact_keynumber);
3844
3845 }
3846
3847 /*
3848  * 8.3.4  Deactivate a Shared Key (SCTP_AUTH_DEACTIVATE_KEY)
3849  *
3850  * This set option will deactivate a shared secret key.
3851  */
3852 static int sctp_setsockopt_deactivate_key(struct sock *sk, char __user *optval,
3853                                           unsigned int optlen)
3854 {
3855         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
3856         struct sctp_authkeyid val;
3857         struct sctp_association *asoc;
3858
3859         if (!ep->auth_enable)
3860                 return -EACCES;
3861
3862         if (optlen != sizeof(struct sctp_authkeyid))
3863                 return -EINVAL;
3864         if (copy_from_user(&val, optval, optlen))
3865                 return -EFAULT;
3866
3867         asoc = sctp_id2assoc(sk, val.scact_assoc_id);
3868         if (!asoc && val.scact_assoc_id && sctp_style(sk, UDP))
3869                 return -EINVAL;
3870
3871         return sctp_auth_deact_key_id(ep, asoc, val.scact_keynumber);
3872 }
3873
3874 /*
3875  * 8.1.23 SCTP_AUTO_ASCONF
3876  *
3877  * This option will enable or disable the use of the automatic generation of
3878  * ASCONF chunks to add and delete addresses to an existing association.  Note
3879  * that this option has two caveats namely: a) it only affects sockets that
3880  * are bound to all addresses available to the SCTP stack, and b) the system
3881  * administrator may have an overriding control that turns the ASCONF feature
3882  * off no matter what setting the socket option may have.
3883  * This option expects an integer boolean flag, where a non-zero value turns on
3884  * the option, and a zero value turns off the option.
3885  * Note. In this implementation, socket operation overrides default parameter
3886  * being set by sysctl as well as FreeBSD implementation
3887  */
3888 static int sctp_setsockopt_auto_asconf(struct sock *sk, char __user *optval,
3889                                         unsigned int optlen)
3890 {
3891         int val;
3892         struct sctp_sock *sp = sctp_sk(sk);
3893
3894         if (optlen < sizeof(int))
3895                 return -EINVAL;
3896         if (get_user(val, (int __user *)optval))
3897                 return -EFAULT;
3898         if (!sctp_is_ep_boundall(sk) && val)
3899                 return -EINVAL;
3900         if ((val && sp->do_auto_asconf) || (!val && !sp->do_auto_asconf))
3901                 return 0;
3902
3903         spin_lock_bh(&sock_net(sk)->sctp.addr_wq_lock);
3904         if (val == 0 && sp->do_auto_asconf) {
3905                 list_del(&sp->auto_asconf_list);
3906                 sp->do_auto_asconf = 0;
3907         } else if (val && !sp->do_auto_asconf) {
3908                 list_add_tail(&sp->auto_asconf_list,
3909                     &sock_net(sk)->sctp.auto_asconf_splist);
3910                 sp->do_auto_asconf = 1;
3911         }
3912         spin_unlock_bh(&sock_net(sk)->sctp.addr_wq_lock);
3913         return 0;
3914 }
3915
3916 /*
3917  * SCTP_PEER_ADDR_THLDS
3918  *
3919  * This option allows us to alter the partially failed threshold for one or all
3920  * transports in an association.  See Section 6.1 of:
3921  * http://www.ietf.org/id/draft-nishida-tsvwg-sctp-failover-05.txt
3922  */
3923 static int sctp_setsockopt_paddr_thresholds(struct sock *sk,
3924                                             char __user *optval,
3925                                             unsigned int optlen)
3926 {
3927         struct sctp_paddrthlds val;
3928         struct sctp_transport *trans;
3929         struct sctp_association *asoc;
3930
3931         if (optlen < sizeof(struct sctp_paddrthlds))
3932                 return -EINVAL;
3933         if (copy_from_user(&val, (struct sctp_paddrthlds __user *)optval,
3934                            sizeof(struct sctp_paddrthlds)))
3935                 return -EFAULT;
3936
3937         if (!sctp_is_any(sk, (const union sctp_addr *)&val.spt_address)) {
3938                 trans = sctp_addr_id2transport(sk, &val.spt_address,
3939                                                val.spt_assoc_id);
3940                 if (!trans)
3941                         return -ENOENT;
3942
3943                 if (val.spt_pathmaxrxt)
3944                         trans->pathmaxrxt = val.spt_pathmaxrxt;
3945                 trans->pf_retrans = val.spt_pathpfthld;
3946
3947                 return 0;
3948         }
3949
3950         asoc = sctp_id2assoc(sk, val.spt_assoc_id);
3951         if (!asoc && val.spt_assoc_id != SCTP_FUTURE_ASSOC &&
3952             sctp_style(sk, UDP))
3953                 return -EINVAL;
3954
3955         if (asoc) {
3956                 list_for_each_entry(trans, &asoc->peer.transport_addr_list,
3957                                     transports) {
3958                         if (val.spt_pathmaxrxt)
3959                                 trans->pathmaxrxt = val.spt_pathmaxrxt;
3960                         trans->pf_retrans = val.spt_pathpfthld;
3961                 }
3962
3963                 if (val.spt_pathmaxrxt)
3964                         asoc->pathmaxrxt = val.spt_pathmaxrxt;
3965                 asoc->pf_retrans = val.spt_pathpfthld;
3966         } else {
3967                 struct sctp_sock *sp = sctp_sk(sk);
3968
3969                 if (val.spt_pathmaxrxt)
3970                         sp->pathmaxrxt = val.spt_pathmaxrxt;
3971                 sp->pf_retrans = val.spt_pathpfthld;
3972         }
3973
3974         return 0;
3975 }
3976
3977 static int sctp_setsockopt_recvrcvinfo(struct sock *sk,
3978                                        char __user *optval,
3979                                        unsigned int optlen)
3980 {
3981         int val;
3982
3983         if (optlen < sizeof(int))
3984                 return -EINVAL;
3985         if (get_user(val, (int __user *) optval))
3986                 return -EFAULT;
3987
3988         sctp_sk(sk)->recvrcvinfo = (val == 0) ? 0 : 1;
3989
3990         return 0;
3991 }
3992
3993 static int sctp_setsockopt_recvnxtinfo(struct sock *sk,
3994                                        char __user *optval,
3995                                        unsigned int optlen)
3996 {
3997         int val;
3998
3999         if (optlen < sizeof(int))
4000                 return -EINVAL;
4001         if (get_user(val, (int __user *) optval))
4002                 return -EFAULT;
4003
4004         sctp_sk(sk)->recvnxtinfo = (val == 0) ? 0 : 1;
4005
4006         return 0;
4007 }
4008
4009 static int sctp_setsockopt_pr_supported(struct sock *sk,
4010                                         char __user *optval,
4011                                         unsigned int optlen)
4012 {
4013         struct sctp_assoc_value params;
4014         struct sctp_association *asoc;
4015
4016         if (optlen != sizeof(params))
4017                 return -EINVAL;
4018
4019         if (copy_from_user(&params, optval, optlen))
4020                 return -EFAULT;
4021
4022         asoc = sctp_id2assoc(sk, params.assoc_id);
4023         if (!asoc && params.assoc_id != SCTP_FUTURE_ASSOC &&
4024             sctp_style(sk, UDP))
4025                 return -EINVAL;
4026
4027         sctp_sk(sk)->ep->prsctp_enable = !!params.assoc_value;
4028
4029         return 0;
4030 }
4031
4032 static int sctp_setsockopt_default_prinfo(struct sock *sk,
4033                                           char __user *optval,
4034                                           unsigned int optlen)
4035 {
4036         struct sctp_default_prinfo info;
4037         struct sctp_association *asoc;
4038         int retval = -EINVAL;
4039
4040         if (optlen != sizeof(info))
4041                 goto out;
4042
4043         if (copy_from_user(&info, optval, sizeof(info))) {
4044                 retval = -EFAULT;
4045                 goto out;
4046         }
4047
4048         if (info.pr_policy & ~SCTP_PR_SCTP_MASK)
4049                 goto out;
4050
4051         if (info.pr_policy == SCTP_PR_SCTP_NONE)
4052                 info.pr_value = 0;
4053
4054         asoc = sctp_id2assoc(sk, info.pr_assoc_id);
4055         if (asoc) {
4056                 SCTP_PR_SET_POLICY(asoc->default_flags, info.pr_policy);
4057                 asoc->default_timetolive = info.pr_value;
4058         } else if (!info.pr_assoc_id) {
4059                 struct sctp_sock *sp = sctp_sk(sk);
4060
4061                 SCTP_PR_SET_POLICY(sp->default_flags, info.pr_policy);
4062                 sp->default_timetolive = info.pr_value;
4063         } else {
4064                 goto out;
4065         }
4066
4067         retval = 0;
4068
4069 out:
4070         return retval;
4071 }
4072
4073 static int sctp_setsockopt_reconfig_supported(struct sock *sk,
4074                                               char __user *optval,
4075                                               unsigned int optlen)
4076 {
4077         struct sctp_assoc_value params;
4078         struct sctp_association *asoc;
4079         int retval = -EINVAL;
4080
4081         if (optlen != sizeof(params))
4082                 goto out;
4083
4084         if (copy_from_user(&params, optval, optlen)) {
4085                 retval = -EFAULT;
4086                 goto out;
4087         }
4088
4089         asoc = sctp_id2assoc(sk, params.assoc_id);
4090         if (!asoc && params.assoc_id != SCTP_FUTURE_ASSOC &&
4091             sctp_style(sk, UDP))
4092                 goto out;
4093
4094         if (asoc)
4095                 asoc->reconf_enable = !!params.assoc_value;
4096         else
4097                 sctp_sk(sk)->ep->reconf_enable = !!params.assoc_value;
4098
4099         retval = 0;
4100
4101 out:
4102         return retval;
4103 }
4104
4105 static int sctp_setsockopt_enable_strreset(struct sock *sk,
4106                                            char __user *optval,
4107                                            unsigned int optlen)
4108 {
4109         struct sctp_assoc_value params;
4110         struct sctp_association *asoc;
4111         int retval = -EINVAL;
4112
4113         if (optlen != sizeof(params))
4114                 goto out;
4115
4116         if (copy_from_user(&params, optval, optlen)) {
4117                 retval = -EFAULT;
4118                 goto out;
4119         }
4120
4121         if (params.assoc_value & (~SCTP_ENABLE_STRRESET_MASK))
4122                 goto out;
4123
4124         asoc = sctp_id2assoc(sk, params.assoc_id);
4125         if (asoc) {
4126                 asoc->strreset_enable = params.assoc_value;
4127         } else if (!params.assoc_id) {
4128                 struct sctp_sock *sp = sctp_sk(sk);
4129
4130                 sp->ep->strreset_enable = params.assoc_value;
4131         } else {
4132                 goto out;
4133         }
4134
4135         retval = 0;
4136
4137 out:
4138         return retval;
4139 }
4140
4141 static int sctp_setsockopt_reset_streams(struct sock *sk,
4142                                          char __user *optval,
4143                                          unsigned int optlen)
4144 {
4145         struct sctp_reset_streams *params;
4146         struct sctp_association *asoc;
4147         int retval = -EINVAL;
4148
4149         if (optlen < sizeof(*params))
4150                 return -EINVAL;
4151         /* srs_number_streams is u16, so optlen can't be bigger than this. */
4152         optlen = min_t(unsigned int, optlen, USHRT_MAX +
4153                                              sizeof(__u16) * sizeof(*params));
4154
4155         params = memdup_user(optval, optlen);
4156         if (IS_ERR(params))
4157                 return PTR_ERR(params);
4158
4159         if (params->srs_number_streams * sizeof(__u16) >
4160             optlen - sizeof(*params))
4161                 goto out;
4162
4163         asoc = sctp_id2assoc(sk, params->srs_assoc_id);
4164         if (!asoc)
4165                 goto out;
4166
4167         retval = sctp_send_reset_streams(asoc, params);
4168
4169 out:
4170         kfree(params);
4171         return retval;
4172 }
4173
4174 static int sctp_setsockopt_reset_assoc(struct sock *sk,
4175                                        char __user *optval,
4176                                        unsigned int optlen)
4177 {
4178         struct sctp_association *asoc;
4179         sctp_assoc_t associd;
4180         int retval = -EINVAL;
4181
4182         if (optlen != sizeof(associd))
4183                 goto out;
4184
4185         if (copy_from_user(&associd, optval, optlen)) {
4186                 retval = -EFAULT;
4187                 goto out;
4188         }
4189
4190         asoc = sctp_id2assoc(sk, associd);
4191         if (!asoc)
4192                 goto out;
4193
4194         retval = sctp_send_reset_assoc(asoc);
4195
4196 out:
4197         return retval;
4198 }
4199
4200 static int sctp_setsockopt_add_streams(struct sock *sk,
4201                                        char __user *optval,
4202                                        unsigned int optlen)
4203 {
4204         struct sctp_association *asoc;
4205         struct sctp_add_streams params;
4206         int retval = -EINVAL;
4207
4208         if (optlen != sizeof(params))
4209                 goto out;
4210
4211         if (copy_from_user(&params, optval, optlen)) {
4212                 retval = -EFAULT;
4213                 goto out;
4214         }
4215
4216         asoc = sctp_id2assoc(sk, params.sas_assoc_id);
4217         if (!asoc)
4218                 goto out;
4219
4220         retval = sctp_send_add_streams(asoc, &params);
4221
4222 out:
4223         return retval;
4224 }
4225
4226 static int sctp_setsockopt_scheduler(struct sock *sk,
4227                                      char __user *optval,
4228                                      unsigned int optlen)
4229 {
4230         struct sctp_association *asoc;
4231         struct sctp_assoc_value params;
4232         int retval = -EINVAL;
4233
4234         if (optlen < sizeof(params))
4235                 goto out;
4236
4237         optlen = sizeof(params);
4238         if (copy_from_user(&params, optval, optlen)) {
4239                 retval = -EFAULT;
4240                 goto out;
4241         }
4242
4243         if (params.assoc_value > SCTP_SS_MAX)
4244                 goto out;
4245
4246         asoc = sctp_id2assoc(sk, params.assoc_id);
4247         if (!asoc)
4248                 goto out;
4249
4250         retval = sctp_sched_set_sched(asoc, params.assoc_value);
4251
4252 out:
4253         return retval;
4254 }
4255
4256 static int sctp_setsockopt_scheduler_value(struct sock *sk,
4257                                            char __user *optval,
4258                                            unsigned int optlen)
4259 {
4260         struct sctp_stream_value params;
4261         struct sctp_association *asoc;
4262         int retval = -EINVAL;
4263
4264         if (optlen < sizeof(params))
4265                 goto out;
4266
4267         optlen = sizeof(params);
4268         if (copy_from_user(&params, optval, optlen)) {
4269                 retval = -EFAULT;
4270                 goto out;
4271         }
4272
4273         asoc = sctp_id2assoc(sk, params.assoc_id);
4274         if (!asoc && params.assoc_id != SCTP_CURRENT_ASSOC &&
4275             sctp_style(sk, UDP))
4276                 goto out;
4277
4278         if (asoc) {
4279                 retval = sctp_sched_set_value(asoc, params.stream_id,
4280                                               params.stream_value, GFP_KERNEL);
4281                 goto out;
4282         }
4283
4284         retval = 0;
4285
4286         list_for_each_entry(asoc, &sctp_sk(sk)->ep->asocs, asocs) {
4287                 int ret = sctp_sched_set_value(asoc, params.stream_id,
4288                                                params.stream_value, GFP_KERNEL);
4289                 if (ret && !retval) /* try to return the 1st error. */
4290                         retval = ret;
4291         }
4292
4293 out:
4294         return retval;
4295 }
4296
4297 static int sctp_setsockopt_interleaving_supported(struct sock *sk,
4298                                                   char __user *optval,
4299                                                   unsigned int optlen)
4300 {
4301         struct sctp_sock *sp = sctp_sk(sk);
4302         struct sctp_assoc_value params;
4303         struct sctp_association *asoc;
4304         int retval = -EINVAL;
4305
4306         if (optlen < sizeof(params))
4307                 goto out;
4308
4309         optlen = sizeof(params);
4310         if (copy_from_user(&params, optval, optlen)) {
4311                 retval = -EFAULT;
4312                 goto out;
4313         }
4314
4315         asoc = sctp_id2assoc(sk, params.assoc_id);
4316         if (!asoc && params.assoc_id != SCTP_FUTURE_ASSOC &&
4317             sctp_style(sk, UDP))
4318                 goto out;
4319
4320         if (!sock_net(sk)->sctp.intl_enable || !sp->frag_interleave) {
4321                 retval = -EPERM;
4322                 goto out;
4323         }
4324
4325         sp->strm_interleave = !!params.assoc_value;
4326
4327         retval = 0;
4328
4329 out:
4330         return retval;
4331 }
4332
4333 static int sctp_setsockopt_reuse_port(struct sock *sk, char __user *optval,
4334                                       unsigned int optlen)
4335 {
4336         int val;
4337
4338         if (!sctp_style(sk, TCP))
4339                 return -EOPNOTSUPP;
4340
4341         if (sctp_sk(sk)->ep->base.bind_addr.port)
4342                 return -EFAULT;
4343
4344         if (optlen < sizeof(int))
4345                 return -EINVAL;
4346
4347         if (get_user(val, (int __user *)optval))
4348                 return -EFAULT;
4349
4350         sctp_sk(sk)->reuse = !!val;
4351
4352         return 0;
4353 }
4354
4355 static int sctp_setsockopt_event(struct sock *sk, char __user *optval,
4356                                  unsigned int optlen)
4357 {
4358         struct sctp_association *asoc;
4359         struct sctp_ulpevent *event;
4360         struct sctp_event param;
4361         int retval = 0;
4362
4363         if (optlen < sizeof(param)) {
4364                 retval = -EINVAL;
4365                 goto out;
4366         }
4367
4368         optlen = sizeof(param);
4369         if (copy_from_user(&param, optval, optlen)) {
4370                 retval = -EFAULT;
4371                 goto out;
4372         }
4373
4374         if (param.se_type < SCTP_SN_TYPE_BASE ||
4375             param.se_type > SCTP_SN_TYPE_MAX) {
4376                 retval = -EINVAL;
4377                 goto out;
4378         }
4379
4380         asoc = sctp_id2assoc(sk, param.se_assoc_id);
4381         if (!asoc) {
4382                 sctp_ulpevent_type_set(&sctp_sk(sk)->subscribe,
4383                                        param.se_type, param.se_on);
4384                 goto out;
4385         }
4386
4387         sctp_ulpevent_type_set(&asoc->subscribe, param.se_type, param.se_on);
4388
4389         if (param.se_type == SCTP_SENDER_DRY_EVENT && param.se_on) {
4390                 if (sctp_outq_is_empty(&asoc->outqueue)) {
4391                         event = sctp_ulpevent_make_sender_dry_event(asoc,
4392                                         GFP_USER | __GFP_NOWARN);
4393                         if (!event) {
4394                                 retval = -ENOMEM;
4395                                 goto out;
4396                         }
4397
4398                         asoc->stream.si->enqueue_event(&asoc->ulpq, event);
4399                 }
4400         }
4401
4402 out:
4403         return retval;
4404 }
4405
4406 /* API 6.2 setsockopt(), getsockopt()
4407  *
4408  * Applications use setsockopt() and getsockopt() to set or retrieve
4409  * socket options.  Socket options are used to change the default
4410  * behavior of sockets calls.  They are described in Section 7.
4411  *
4412  * The syntax is:
4413  *
4414  *   ret = getsockopt(int sd, int level, int optname, void __user *optval,
4415  *                    int __user *optlen);
4416  *   ret = setsockopt(int sd, int level, int optname, const void __user *optval,
4417  *                    int optlen);
4418  *
4419  *   sd      - the socket descript.
4420  *   level   - set to IPPROTO_SCTP for all SCTP options.
4421  *   optname - the option name.
4422  *   optval  - the buffer to store the value of the option.
4423  *   optlen  - the size of the buffer.
4424  */
4425 static int sctp_setsockopt(struct sock *sk, int level, int optname,
4426                            char __user *optval, unsigned int optlen)
4427 {
4428         int retval = 0;
4429
4430         pr_debug("%s: sk:%p, optname:%d\n", __func__, sk, optname);
4431
4432         /* I can hardly begin to describe how wrong this is.  This is
4433          * so broken as to be worse than useless.  The API draft
4434          * REALLY is NOT helpful here...  I am not convinced that the
4435          * semantics of setsockopt() with a level OTHER THAN SOL_SCTP
4436          * are at all well-founded.
4437          */
4438         if (level != SOL_SCTP) {
4439                 struct sctp_af *af = sctp_sk(sk)->pf->af;
4440                 retval = af->setsockopt(sk, level, optname, optval, optlen);
4441                 goto out_nounlock;
4442         }
4443
4444         lock_sock(sk);
4445
4446         switch (optname) {
4447         case SCTP_SOCKOPT_BINDX_ADD:
4448                 /* 'optlen' is the size of the addresses buffer. */
4449                 retval = sctp_setsockopt_bindx(sk, (struct sockaddr __user *)optval,
4450                                                optlen, SCTP_BINDX_ADD_ADDR);
4451                 break;
4452
4453         case SCTP_SOCKOPT_BINDX_REM:
4454                 /* 'optlen' is the size of the addresses buffer. */
4455                 retval = sctp_setsockopt_bindx(sk, (struct sockaddr __user *)optval,
4456                                                optlen, SCTP_BINDX_REM_ADDR);
4457                 break;
4458
4459         case SCTP_SOCKOPT_CONNECTX_OLD:
4460                 /* 'optlen' is the size of the addresses buffer. */
4461                 retval = sctp_setsockopt_connectx_old(sk,
4462                                             (struct sockaddr __user *)optval,
4463                                             optlen);
4464                 break;
4465
4466         case SCTP_SOCKOPT_CONNECTX:
4467                 /* 'optlen' is the size of the addresses buffer. */
4468                 retval = sctp_setsockopt_connectx(sk,
4469                                             (struct sockaddr __user *)optval,
4470                                             optlen);
4471                 break;
4472
4473         case SCTP_DISABLE_FRAGMENTS:
4474                 retval = sctp_setsockopt_disable_fragments(sk, optval, optlen);
4475                 break;
4476
4477         case SCTP_EVENTS:
4478                 retval = sctp_setsockopt_events(sk, optval, optlen);
4479                 break;
4480
4481         case SCTP_AUTOCLOSE:
4482                 retval = sctp_setsockopt_autoclose(sk, optval, optlen);
4483                 break;
4484
4485         case SCTP_PEER_ADDR_PARAMS:
4486                 retval = sctp_setsockopt_peer_addr_params(sk, optval, optlen);
4487                 break;
4488
4489         case SCTP_DELAYED_SACK:
4490                 retval = sctp_setsockopt_delayed_ack(sk, optval, optlen);
4491                 break;
4492         case SCTP_PARTIAL_DELIVERY_POINT:
4493                 retval = sctp_setsockopt_partial_delivery_point(sk, optval, optlen);
4494                 break;
4495
4496         case SCTP_INITMSG:
4497                 retval = sctp_setsockopt_initmsg(sk, optval, optlen);
4498                 break;
4499         case SCTP_DEFAULT_SEND_PARAM:
4500                 retval = sctp_setsockopt_default_send_param(sk, optval,
4501                                                             optlen);
4502                 break;
4503         case SCTP_DEFAULT_SNDINFO:
4504                 retval = sctp_setsockopt_default_sndinfo(sk, optval, optlen);
4505                 break;
4506         case SCTP_PRIMARY_ADDR:
4507                 retval = sctp_setsockopt_primary_addr(sk, optval, optlen);
4508                 break;
4509         case SCTP_SET_PEER_PRIMARY_ADDR:
4510                 retval = sctp_setsockopt_peer_primary_addr(sk, optval, optlen);
4511                 break;
4512         case SCTP_NODELAY:
4513                 retval = sctp_setsockopt_nodelay(sk, optval, optlen);
4514                 break;
4515         case SCTP_RTOINFO:
4516                 retval = sctp_setsockopt_rtoinfo(sk, optval, optlen);
4517                 break;
4518         case SCTP_ASSOCINFO:
4519                 retval = sctp_setsockopt_associnfo(sk, optval, optlen);
4520                 break;
4521         case SCTP_I_WANT_MAPPED_V4_ADDR:
4522                 retval = sctp_setsockopt_mappedv4(sk, optval, optlen);
4523                 break;
4524         case SCTP_MAXSEG:
4525                 retval = sctp_setsockopt_maxseg(sk, optval, optlen);
4526                 break;
4527         case SCTP_ADAPTATION_LAYER:
4528                 retval = sctp_setsockopt_adaptation_layer(sk, optval, optlen);
4529                 break;
4530         case SCTP_CONTEXT:
4531                 retval = sctp_setsockopt_context(sk, optval, optlen);
4532                 break;
4533         case SCTP_FRAGMENT_INTERLEAVE:
4534                 retval = sctp_setsockopt_fragment_interleave(sk, optval, optlen);
4535                 break;
4536         case SCTP_MAX_BURST:
4537                 retval = sctp_setsockopt_maxburst(sk, optval, optlen);
4538                 break;
4539         case SCTP_AUTH_CHUNK:
4540                 retval = sctp_setsockopt_auth_chunk(sk, optval, optlen);
4541                 break;
4542         case SCTP_HMAC_IDENT:
4543                 retval = sctp_setsockopt_hmac_ident(sk, optval, optlen);
4544                 break;
4545         case SCTP_AUTH_KEY:
4546                 retval = sctp_setsockopt_auth_key(sk, optval, optlen);
4547                 break;
4548         case SCTP_AUTH_ACTIVE_KEY:
4549                 retval = sctp_setsockopt_active_key(sk, optval, optlen);
4550                 break;
4551         case SCTP_AUTH_DELETE_KEY:
4552                 retval = sctp_setsockopt_del_key(sk, optval, optlen);
4553                 break;
4554         case SCTP_AUTH_DEACTIVATE_KEY:
4555                 retval = sctp_setsockopt_deactivate_key(sk, optval, optlen);
4556                 break;
4557         case SCTP_AUTO_ASCONF:
4558                 retval = sctp_setsockopt_auto_asconf(sk, optval, optlen);
4559                 break;
4560         case SCTP_PEER_ADDR_THLDS:
4561                 retval = sctp_setsockopt_paddr_thresholds(sk, optval, optlen);
4562                 break;
4563         case SCTP_RECVRCVINFO:
4564                 retval = sctp_setsockopt_recvrcvinfo(sk, optval, optlen);
4565                 break;
4566         case SCTP_RECVNXTINFO:
4567                 retval = sctp_setsockopt_recvnxtinfo(sk, optval, optlen);
4568                 break;
4569         case SCTP_PR_SUPPORTED:
4570                 retval = sctp_setsockopt_pr_supported(sk, optval, optlen);
4571                 break;
4572         case SCTP_DEFAULT_PRINFO:
4573                 retval = sctp_setsockopt_default_prinfo(sk, optval, optlen);
4574                 break;
4575         case SCTP_RECONFIG_SUPPORTED:
4576                 retval = sctp_setsockopt_reconfig_supported(sk, optval, optlen);
4577                 break;
4578         case SCTP_ENABLE_STREAM_RESET:
4579                 retval = sctp_setsockopt_enable_strreset(sk, optval, optlen);
4580                 break;
4581         case SCTP_RESET_STREAMS:
4582                 retval = sctp_setsockopt_reset_streams(sk, optval, optlen);
4583                 break;
4584         case SCTP_RESET_ASSOC:
4585                 retval = sctp_setsockopt_reset_assoc(sk, optval, optlen);
4586                 break;
4587         case SCTP_ADD_STREAMS:
4588                 retval = sctp_setsockopt_add_streams(sk, optval, optlen);
4589                 break;
4590         case SCTP_STREAM_SCHEDULER:
4591                 retval = sctp_setsockopt_scheduler(sk, optval, optlen);
4592                 break;
4593         case SCTP_STREAM_SCHEDULER_VALUE:
4594                 retval = sctp_setsockopt_scheduler_value(sk, optval, optlen);
4595                 break;
4596         case SCTP_INTERLEAVING_SUPPORTED:
4597                 retval = sctp_setsockopt_interleaving_supported(sk, optval,
4598                                                                 optlen);
4599                 break;
4600         case SCTP_REUSE_PORT:
4601                 retval = sctp_setsockopt_reuse_port(sk, optval, optlen);
4602                 break;
4603         case SCTP_EVENT:
4604                 retval = sctp_setsockopt_event(sk, optval, optlen);
4605                 break;
4606         default:
4607                 retval = -ENOPROTOOPT;
4608                 break;
4609         }
4610
4611         release_sock(sk);
4612
4613 out_nounlock:
4614         return retval;
4615 }
4616
4617 /* API 3.1.6 connect() - UDP Style Syntax
4618  *
4619  * An application may use the connect() call in the UDP model to initiate an
4620  * association without sending data.
4621  *
4622  * The syntax is:
4623  *
4624  * ret = connect(int sd, const struct sockaddr *nam, socklen_t len);
4625  *
4626  * sd: the socket descriptor to have a new association added to.
4627  *
4628  * nam: the address structure (either struct sockaddr_in or struct
4629  *    sockaddr_in6 defined in RFC2553 [7]).
4630  *
4631  * len: the size of the address.
4632  */
4633 static int sctp_connect(struct sock *sk, struct sockaddr *addr,
4634                         int addr_len, int flags)
4635 {
4636         struct inet_sock *inet = inet_sk(sk);
4637         struct sctp_af *af;
4638         int err = 0;
4639
4640         lock_sock(sk);
4641
4642         pr_debug("%s: sk:%p, sockaddr:%p, addr_len:%d\n", __func__, sk,
4643                  addr, addr_len);
4644
4645         /* We may need to bind the socket. */
4646         if (!inet->inet_num) {
4647                 if (sk->sk_prot->get_port(sk, 0)) {
4648                         release_sock(sk);
4649                         return -EAGAIN;
4650                 }
4651                 inet->inet_sport = htons(inet->inet_num);
4652         }
4653
4654         /* Validate addr_len before calling common connect/connectx routine. */
4655         af = sctp_get_af_specific(addr->sa_family);
4656         if (!af || addr_len < af->sockaddr_len) {
4657                 err = -EINVAL;
4658         } else {
4659                 /* Pass correct addr len to common routine (so it knows there
4660                  * is only one address being passed.
4661                  */
4662                 err = __sctp_connect(sk, addr, af->sockaddr_len, flags, NULL);
4663         }
4664
4665         release_sock(sk);
4666         return err;
4667 }
4668
4669 int sctp_inet_connect(struct socket *sock, struct sockaddr *uaddr,
4670                       int addr_len, int flags)
4671 {
4672         if (addr_len < sizeof(uaddr->sa_family))
4673                 return -EINVAL;
4674
4675         if (uaddr->sa_family == AF_UNSPEC)
4676                 return -EOPNOTSUPP;
4677
4678         return sctp_connect(sock->sk, uaddr, addr_len, flags);
4679 }
4680
4681 /* FIXME: Write comments. */
4682 static int sctp_disconnect(struct sock *sk, int flags)
4683 {
4684         return -EOPNOTSUPP; /* STUB */
4685 }
4686
4687 /* 4.1.4 accept() - TCP Style Syntax
4688  *
4689  * Applications use accept() call to remove an established SCTP
4690  * association from the accept queue of the endpoint.  A new socket
4691  * descriptor will be returned from accept() to represent the newly
4692  * formed association.
4693  */
4694 static struct sock *sctp_accept(struct sock *sk, int flags, int *err, bool kern)
4695 {
4696         struct sctp_sock *sp;
4697         struct sctp_endpoint *ep;
4698         struct sock *newsk = NULL;
4699         struct sctp_association *asoc;
4700         long timeo;
4701         int error = 0;
4702
4703         lock_sock(sk);
4704
4705         sp = sctp_sk(sk);
4706         ep = sp->ep;
4707
4708         if (!sctp_style(sk, TCP)) {
4709                 error = -EOPNOTSUPP;
4710                 goto out;
4711         }
4712
4713         if (!sctp_sstate(sk, LISTENING)) {
4714                 error = -EINVAL;
4715                 goto out;
4716         }
4717
4718         timeo = sock_rcvtimeo(sk, flags & O_NONBLOCK);
4719
4720         error = sctp_wait_for_accept(sk, timeo);
4721         if (error)
4722                 goto out;
4723
4724         /* We treat the list of associations on the endpoint as the accept
4725          * queue and pick the first association on the list.
4726          */
4727         asoc = list_entry(ep->asocs.next, struct sctp_association, asocs);
4728
4729         newsk = sp->pf->create_accept_sk(sk, asoc, kern);
4730         if (!newsk) {
4731                 error = -ENOMEM;
4732                 goto out;
4733         }
4734
4735         /* Populate the fields of the newsk from the oldsk and migrate the
4736          * asoc to the newsk.
4737          */
4738         sctp_sock_migrate(sk, newsk, asoc, SCTP_SOCKET_TCP);
4739
4740 out:
4741         release_sock(sk);
4742         *err = error;
4743         return newsk;
4744 }
4745
4746 /* The SCTP ioctl handler. */
4747 static int sctp_ioctl(struct sock *sk, int cmd, unsigned long arg)
4748 {
4749         int rc = -ENOTCONN;
4750
4751         lock_sock(sk);
4752
4753         /*
4754          * SEQPACKET-style sockets in LISTENING state are valid, for
4755          * SCTP, so only discard TCP-style sockets in LISTENING state.
4756          */
4757         if (sctp_style(sk, TCP) && sctp_sstate(sk, LISTENING))
4758                 goto out;
4759
4760         switch (cmd) {
4761         case SIOCINQ: {
4762                 struct sk_buff *skb;
4763                 unsigned int amount = 0;
4764
4765                 skb = skb_peek(&sk->sk_receive_queue);
4766                 if (skb != NULL) {
4767                         /*
4768                          * We will only return the amount of this packet since
4769                          * that is all that will be read.
4770                          */
4771                         amount = skb->len;
4772                 }
4773                 rc = put_user(amount, (int __user *)arg);
4774                 break;
4775         }
4776         default:
4777                 rc = -ENOIOCTLCMD;
4778                 break;
4779         }
4780 out:
4781         release_sock(sk);
4782         return rc;
4783 }
4784
4785 /* This is the function which gets called during socket creation to
4786  * initialized the SCTP-specific portion of the sock.
4787  * The sock structure should already be zero-filled memory.
4788  */
4789 static int sctp_init_sock(struct sock *sk)
4790 {
4791         struct net *net = sock_net(sk);
4792         struct sctp_sock *sp;
4793
4794         pr_debug("%s: sk:%p\n", __func__, sk);
4795
4796         sp = sctp_sk(sk);
4797
4798         /* Initialize the SCTP per socket area.  */
4799         switch (sk->sk_type) {
4800         case SOCK_SEQPACKET:
4801                 sp->type = SCTP_SOCKET_UDP;
4802                 break;
4803         case SOCK_STREAM:
4804                 sp->type = SCTP_SOCKET_TCP;
4805                 break;
4806         default:
4807                 return -ESOCKTNOSUPPORT;
4808         }
4809
4810         sk->sk_gso_type = SKB_GSO_SCTP;
4811
4812         /* Initialize default send parameters. These parameters can be
4813          * modified with the SCTP_DEFAULT_SEND_PARAM socket option.
4814          */
4815         sp->default_stream = 0;
4816         sp->default_ppid = 0;
4817         sp->default_flags = 0;
4818         sp->default_context = 0;
4819         sp->default_timetolive = 0;
4820
4821         sp->default_rcv_context = 0;
4822         sp->max_burst = net->sctp.max_burst;
4823
4824         sp->sctp_hmac_alg = net->sctp.sctp_hmac_alg;
4825
4826         /* Initialize default setup parameters. These parameters
4827          * can be modified with the SCTP_INITMSG socket option or
4828          * overridden by the SCTP_INIT CMSG.
4829          */
4830         sp->initmsg.sinit_num_ostreams   = sctp_max_outstreams;
4831         sp->initmsg.sinit_max_instreams  = sctp_max_instreams;
4832         sp->initmsg.sinit_max_attempts   = net->sctp.max_retrans_init;
4833         sp->initmsg.sinit_max_init_timeo = net->sctp.rto_max;
4834
4835         /* Initialize default RTO related parameters.  These parameters can
4836          * be modified for with the SCTP_RTOINFO socket option.
4837          */
4838         sp->rtoinfo.srto_initial = net->sctp.rto_initial;
4839         sp->rtoinfo.srto_max     = net->sctp.rto_max;
4840         sp->rtoinfo.srto_min     = net->sctp.rto_min;
4841
4842         /* Initialize default association related parameters. These parameters
4843          * can be modified with the SCTP_ASSOCINFO socket option.
4844          */
4845         sp->assocparams.sasoc_asocmaxrxt = net->sctp.max_retrans_association;
4846         sp->assocparams.sasoc_number_peer_destinations = 0;
4847         sp->assocparams.sasoc_peer_rwnd = 0;
4848         sp->assocparams.sasoc_local_rwnd = 0;
4849         sp->assocparams.sasoc_cookie_life = net->sctp.valid_cookie_life;
4850
4851         /* Initialize default event subscriptions. By default, all the
4852          * options are off.
4853          */
4854         sp->subscribe = 0;
4855
4856         /* Default Peer Address Parameters.  These defaults can
4857          * be modified via SCTP_PEER_ADDR_PARAMS
4858          */
4859         sp->hbinterval  = net->sctp.hb_interval;
4860         sp->pathmaxrxt  = net->sctp.max_retrans_path;
4861         sp->pf_retrans  = net->sctp.pf_retrans;
4862         sp->pathmtu     = 0; /* allow default discovery */
4863         sp->sackdelay   = net->sctp.sack_timeout;
4864         sp->sackfreq    = 2;
4865         sp->param_flags = SPP_HB_ENABLE |
4866                           SPP_PMTUD_ENABLE |
4867                           SPP_SACKDELAY_ENABLE;
4868
4869         /* If enabled no SCTP message fragmentation will be performed.
4870          * Configure through SCTP_DISABLE_FRAGMENTS socket option.
4871          */
4872         sp->disable_fragments = 0;
4873
4874         /* Enable Nagle algorithm by default.  */
4875         sp->nodelay           = 0;
4876
4877         sp->recvrcvinfo = 0;
4878         sp->recvnxtinfo = 0;
4879
4880         /* Enable by default. */
4881         sp->v4mapped          = 1;
4882
4883         /* Auto-close idle associations after the configured
4884          * number of seconds.  A value of 0 disables this
4885          * feature.  Configure through the SCTP_AUTOCLOSE socket option,
4886          * for UDP-style sockets only.
4887          */
4888         sp->autoclose         = 0;
4889
4890         /* User specified fragmentation limit. */
4891         sp->user_frag         = 0;
4892
4893         sp->adaptation_ind = 0;
4894
4895         sp->pf = sctp_get_pf_specific(sk->sk_family);
4896
4897         /* Control variables for partial data delivery. */
4898         atomic_set(&sp->pd_mode, 0);
4899         skb_queue_head_init(&sp->pd_lobby);
4900         sp->frag_interleave = 0;
4901
4902         /* Create a per socket endpoint structure.  Even if we
4903          * change the data structure relationships, this may still
4904          * be useful for storing pre-connect address information.
4905          */
4906         sp->ep = sctp_endpoint_new(sk, GFP_KERNEL);
4907         if (!sp->ep)
4908                 return -ENOMEM;
4909
4910         sp->hmac = NULL;
4911
4912         sk->sk_destruct = sctp_destruct_sock;
4913
4914         SCTP_DBG_OBJCNT_INC(sock);
4915
4916         local_bh_disable();
4917         sk_sockets_allocated_inc(sk);
4918         sock_prot_inuse_add(net, sk->sk_prot, 1);
4919
4920         /* Nothing can fail after this block, otherwise
4921          * sctp_destroy_sock() will be called without addr_wq_lock held
4922          */
4923         if (net->sctp.default_auto_asconf) {
4924                 spin_lock(&sock_net(sk)->sctp.addr_wq_lock);
4925                 list_add_tail(&sp->auto_asconf_list,
4926                     &net->sctp.auto_asconf_splist);
4927                 sp->do_auto_asconf = 1;
4928                 spin_unlock(&sock_net(sk)->sctp.addr_wq_lock);
4929         } else {
4930                 sp->do_auto_asconf = 0;
4931         }
4932
4933         local_bh_enable();
4934
4935         return 0;
4936 }
4937
4938 /* Cleanup any SCTP per socket resources. Must be called with
4939  * sock_net(sk)->sctp.addr_wq_lock held if sp->do_auto_asconf is true
4940  */
4941 static void sctp_destroy_sock(struct sock *sk)
4942 {
4943         struct sctp_sock *sp;
4944
4945         pr_debug("%s: sk:%p\n", __func__, sk);
4946
4947         /* Release our hold on the endpoint. */
4948         sp = sctp_sk(sk);
4949         /* This could happen during socket init, thus we bail out
4950          * early, since the rest of the below is not setup either.
4951          */
4952         if (sp->ep == NULL)
4953                 return;
4954
4955         if (sp->do_auto_asconf) {
4956                 sp->do_auto_asconf = 0;
4957                 list_del(&sp->auto_asconf_list);
4958         }
4959         sctp_endpoint_free(sp->ep);
4960         local_bh_disable();
4961         sk_sockets_allocated_dec(sk);
4962         sock_prot_inuse_add(sock_net(sk), sk->sk_prot, -1);
4963         local_bh_enable();
4964 }
4965
4966 /* Triggered when there are no references on the socket anymore */
4967 static void sctp_destruct_sock(struct sock *sk)
4968 {
4969         struct sctp_sock *sp = sctp_sk(sk);
4970
4971         /* Free up the HMAC transform. */
4972         crypto_free_shash(sp->hmac);
4973
4974         inet_sock_destruct(sk);
4975 }
4976
4977 /* API 4.1.7 shutdown() - TCP Style Syntax
4978  *     int shutdown(int socket, int how);
4979  *
4980  *     sd      - the socket descriptor of the association to be closed.
4981  *     how     - Specifies the type of shutdown.  The  values  are
4982  *               as follows:
4983  *               SHUT_RD
4984  *                     Disables further receive operations. No SCTP
4985  *                     protocol action is taken.
4986  *               SHUT_WR
4987  *                     Disables further send operations, and initiates
4988  *                     the SCTP shutdown sequence.
4989  *               SHUT_RDWR
4990  *                     Disables further send  and  receive  operations
4991  *                     and initiates the SCTP shutdown sequence.
4992  */
4993 static void sctp_shutdown(struct sock *sk, int how)
4994 {
4995         struct net *net = sock_net(sk);
4996         struct sctp_endpoint *ep;
4997
4998         if (!sctp_style(sk, TCP))
4999                 return;
5000
5001         ep = sctp_sk(sk)->ep;
5002         if (how & SEND_SHUTDOWN && !list_empty(&ep->asocs)) {
5003                 struct sctp_association *asoc;
5004
5005                 inet_sk_set_state(sk, SCTP_SS_CLOSING);
5006                 asoc = list_entry(ep->asocs.next,
5007                                   struct sctp_association, asocs);
5008                 sctp_primitive_SHUTDOWN(net, asoc, NULL);
5009         }
5010 }
5011
5012 int sctp_get_sctp_info(struct sock *sk, struct sctp_association *asoc,
5013                        struct sctp_info *info)
5014 {
5015         struct sctp_transport *prim;
5016         struct list_head *pos;
5017         int mask;
5018
5019         memset(info, 0, sizeof(*info));
5020         if (!asoc) {
5021                 struct sctp_sock *sp = sctp_sk(sk);
5022
5023                 info->sctpi_s_autoclose = sp->autoclose;
5024                 info->sctpi_s_adaptation_ind = sp->adaptation_ind;
5025                 info->sctpi_s_pd_point = sp->pd_point;
5026                 info->sctpi_s_nodelay = sp->nodelay;
5027                 info->sctpi_s_disable_fragments = sp->disable_fragments;
5028                 info->sctpi_s_v4mapped = sp->v4mapped;
5029                 info->sctpi_s_frag_interleave = sp->frag_interleave;
5030                 info->sctpi_s_type = sp->type;
5031
5032                 return 0;
5033         }
5034
5035         info->sctpi_tag = asoc->c.my_vtag;
5036         info->sctpi_state = asoc->state;
5037         info->sctpi_rwnd = asoc->a_rwnd;
5038         info->sctpi_unackdata = asoc->unack_data;
5039         info->sctpi_penddata = sctp_tsnmap_pending(&asoc->peer.tsn_map);
5040         info->sctpi_instrms = asoc->stream.incnt;
5041         info->sctpi_outstrms = asoc->stream.outcnt;
5042         list_for_each(pos, &asoc->base.inqueue.in_chunk_list)
5043                 info->sctpi_inqueue++;
5044         list_for_each(pos, &asoc->outqueue.out_chunk_list)
5045                 info->sctpi_outqueue++;
5046         info->sctpi_overall_error = asoc->overall_error_count;
5047         info->sctpi_max_burst = asoc->max_burst;
5048         info->sctpi_maxseg = asoc->frag_point;
5049         info->sctpi_peer_rwnd = asoc->peer.rwnd;
5050         info->sctpi_peer_tag = asoc->c.peer_vtag;
5051
5052         mask = asoc->peer.ecn_capable << 1;
5053         mask = (mask | asoc->peer.ipv4_address) << 1;
5054         mask = (mask | asoc->peer.ipv6_address) << 1;
5055         mask = (mask | asoc->peer.hostname_address) << 1;
5056         mask = (mask | asoc->peer.asconf_capable) << 1;
5057         mask = (mask | asoc->peer.prsctp_capable) << 1;
5058         mask = (mask | asoc->peer.auth_capable);
5059         info->sctpi_peer_capable = mask;
5060         mask = asoc->peer.sack_needed << 1;
5061         mask = (mask | asoc->peer.sack_generation) << 1;
5062         mask = (mask | asoc->peer.zero_window_announced);
5063         info->sctpi_peer_sack = mask;
5064
5065         info->sctpi_isacks = asoc->stats.isacks;
5066         info->sctpi_osacks = asoc->stats.osacks;
5067         info->sctpi_opackets = asoc->stats.opackets;
5068         info->sctpi_ipackets = asoc->stats.ipackets;
5069         info->sctpi_rtxchunks = asoc->stats.rtxchunks;
5070         info->sctpi_outofseqtsns = asoc->stats.outofseqtsns;
5071         info->sctpi_idupchunks = asoc->stats.idupchunks;
5072         info->sctpi_gapcnt = asoc->stats.gapcnt;
5073         info->sctpi_ouodchunks = asoc->stats.ouodchunks;
5074         info->sctpi_iuodchunks = asoc->stats.iuodchunks;
5075         info->sctpi_oodchunks = asoc->stats.oodchunks;
5076         info->sctpi_iodchunks = asoc->stats.iodchunks;
5077         info->sctpi_octrlchunks = asoc->stats.octrlchunks;
5078         info->sctpi_ictrlchunks = asoc->stats.ictrlchunks;
5079
5080         prim = asoc->peer.primary_path;
5081         memcpy(&info->sctpi_p_address, &prim->ipaddr, sizeof(prim->ipaddr));
5082         info->sctpi_p_state = prim->state;
5083         info->sctpi_p_cwnd = prim->cwnd;
5084         info->sctpi_p_srtt = prim->srtt;
5085         info->sctpi_p_rto = jiffies_to_msecs(prim->rto);
5086         info->sctpi_p_hbinterval = prim->hbinterval;
5087         info->sctpi_p_pathmaxrxt = prim->pathmaxrxt;
5088         info->sctpi_p_sackdelay = jiffies_to_msecs(prim->sackdelay);
5089         info->sctpi_p_ssthresh = prim->ssthresh;
5090         info->sctpi_p_partial_bytes_acked = prim->partial_bytes_acked;
5091         info->sctpi_p_flight_size = prim->flight_size;
5092         info->sctpi_p_error = prim->error_count;
5093
5094         return 0;
5095 }
5096 EXPORT_SYMBOL_GPL(sctp_get_sctp_info);
5097
5098 /* use callback to avoid exporting the core structure */
5099 void sctp_transport_walk_start(struct rhashtable_iter *iter)
5100 {
5101         rhltable_walk_enter(&sctp_transport_hashtable, iter);
5102
5103         rhashtable_walk_start(iter);
5104 }
5105
5106 void sctp_transport_walk_stop(struct rhashtable_iter *iter)
5107 {
5108         rhashtable_walk_stop(iter);
5109         rhashtable_walk_exit(iter);
5110 }
5111
5112 struct sctp_transport *sctp_transport_get_next(struct net *net,
5113                                                struct rhashtable_iter *iter)
5114 {
5115         struct sctp_transport *t;
5116
5117         t = rhashtable_walk_next(iter);
5118         for (; t; t = rhashtable_walk_next(iter)) {
5119                 if (IS_ERR(t)) {
5120                         if (PTR_ERR(t) == -EAGAIN)
5121                                 continue;
5122                         break;
5123                 }
5124
5125                 if (!sctp_transport_hold(t))
5126                         continue;
5127
5128                 if (net_eq(sock_net(t->asoc->base.sk), net) &&
5129                     t->asoc->peer.primary_path == t)
5130                         break;
5131
5132                 sctp_transport_put(t);
5133         }
5134
5135         return t;
5136 }
5137
5138 struct sctp_transport *sctp_transport_get_idx(struct net *net,
5139                                               struct rhashtable_iter *iter,
5140                                               int pos)
5141 {
5142         struct sctp_transport *t;
5143
5144         if (!pos)
5145                 return SEQ_START_TOKEN;
5146
5147         while ((t = sctp_transport_get_next(net, iter)) && !IS_ERR(t)) {
5148                 if (!--pos)
5149                         break;
5150                 sctp_transport_put(t);
5151         }
5152
5153         return t;
5154 }
5155
5156 int sctp_for_each_endpoint(int (*cb)(struct sctp_endpoint *, void *),
5157                            void *p) {
5158         int err = 0;
5159         int hash = 0;
5160         struct sctp_ep_common *epb;
5161         struct sctp_hashbucket *head;
5162
5163         for (head = sctp_ep_hashtable; hash < sctp_ep_hashsize;
5164              hash++, head++) {
5165                 read_lock_bh(&head->lock);
5166                 sctp_for_each_hentry(epb, &head->chain) {
5167                         err = cb(sctp_ep(epb), p);
5168                         if (err)
5169                                 break;
5170                 }
5171                 read_unlock_bh(&head->lock);
5172         }
5173
5174         return err;
5175 }
5176 EXPORT_SYMBOL_GPL(sctp_for_each_endpoint);
5177
5178 int sctp_transport_lookup_process(int (*cb)(struct sctp_transport *, void *),
5179                                   struct net *net,
5180                                   const union sctp_addr *laddr,
5181                                   const union sctp_addr *paddr, void *p)
5182 {
5183         struct sctp_transport *transport;
5184         int err;
5185
5186         rcu_read_lock();
5187         transport = sctp_addrs_lookup_transport(net, laddr, paddr);
5188         rcu_read_unlock();
5189         if (!transport)
5190                 return -ENOENT;
5191
5192         err = cb(transport, p);
5193         sctp_transport_put(transport);
5194
5195         return err;
5196 }
5197 EXPORT_SYMBOL_GPL(sctp_transport_lookup_process);
5198
5199 int sctp_for_each_transport(int (*cb)(struct sctp_transport *, void *),
5200                             int (*cb_done)(struct sctp_transport *, void *),
5201                             struct net *net, int *pos, void *p) {
5202         struct rhashtable_iter hti;
5203         struct sctp_transport *tsp;
5204         int ret;
5205
5206 again:
5207         ret = 0;
5208         sctp_transport_walk_start(&hti);
5209
5210         tsp = sctp_transport_get_idx(net, &hti, *pos + 1);
5211         for (; !IS_ERR_OR_NULL(tsp); tsp = sctp_transport_get_next(net, &hti)) {
5212                 ret = cb(tsp, p);
5213                 if (ret)
5214                         break;
5215                 (*pos)++;
5216                 sctp_transport_put(tsp);
5217         }
5218         sctp_transport_walk_stop(&hti);
5219
5220         if (ret) {
5221                 if (cb_done && !cb_done(tsp, p)) {
5222                         (*pos)++;
5223                         sctp_transport_put(tsp);
5224                         goto again;
5225                 }
5226                 sctp_transport_put(tsp);
5227         }
5228
5229         return ret;
5230 }
5231 EXPORT_SYMBOL_GPL(sctp_for_each_transport);
5232
5233 /* 7.2.1 Association Status (SCTP_STATUS)
5234
5235  * Applications can retrieve current status information about an
5236  * association, including association state, peer receiver window size,
5237  * number of unacked data chunks, and number of data chunks pending
5238  * receipt.  This information is read-only.
5239  */
5240 static int sctp_getsockopt_sctp_status(struct sock *sk, int len,
5241                                        char __user *optval,
5242                                        int __user *optlen)
5243 {
5244         struct sctp_status status;
5245         struct sctp_association *asoc = NULL;
5246         struct sctp_transport *transport;
5247         sctp_assoc_t associd;
5248         int retval = 0;
5249
5250         if (len < sizeof(status)) {
5251                 retval = -EINVAL;
5252                 goto out;
5253         }
5254
5255         len = sizeof(status);
5256         if (copy_from_user(&status, optval, len)) {
5257                 retval = -EFAULT;
5258                 goto out;
5259         }
5260
5261         associd = status.sstat_assoc_id;
5262         asoc = sctp_id2assoc(sk, associd);
5263         if (!asoc) {
5264                 retval = -EINVAL;
5265                 goto out;
5266         }
5267
5268         transport = asoc->peer.primary_path;
5269
5270         status.sstat_assoc_id = sctp_assoc2id(asoc);
5271         status.sstat_state = sctp_assoc_to_state(asoc);
5272         status.sstat_rwnd =  asoc->peer.rwnd;
5273         status.sstat_unackdata = asoc->unack_data;
5274
5275         status.sstat_penddata = sctp_tsnmap_pending(&asoc->peer.tsn_map);
5276         status.sstat_instrms = asoc->stream.incnt;
5277         status.sstat_outstrms = asoc->stream.outcnt;
5278         status.sstat_fragmentation_point = asoc->frag_point;
5279         status.sstat_primary.spinfo_assoc_id = sctp_assoc2id(transport->asoc);
5280         memcpy(&status.sstat_primary.spinfo_address, &transport->ipaddr,
5281                         transport->af_specific->sockaddr_len);
5282         /* Map ipv4 address into v4-mapped-on-v6 address.  */
5283         sctp_get_pf_specific(sk->sk_family)->addr_to_user(sctp_sk(sk),
5284                 (union sctp_addr *)&status.sstat_primary.spinfo_address);
5285         status.sstat_primary.spinfo_state = transport->state;
5286         status.sstat_primary.spinfo_cwnd = transport->cwnd;
5287         status.sstat_primary.spinfo_srtt = transport->srtt;
5288         status.sstat_primary.spinfo_rto = jiffies_to_msecs(transport->rto);
5289         status.sstat_primary.spinfo_mtu = transport->pathmtu;
5290
5291         if (status.sstat_primary.spinfo_state == SCTP_UNKNOWN)
5292                 status.sstat_primary.spinfo_state = SCTP_ACTIVE;
5293
5294         if (put_user(len, optlen)) {
5295                 retval = -EFAULT;
5296                 goto out;
5297         }
5298
5299         pr_debug("%s: len:%d, state:%d, rwnd:%d, assoc_id:%d\n",
5300                  __func__, len, status.sstat_state, status.sstat_rwnd,
5301                  status.sstat_assoc_id);
5302
5303         if (copy_to_user(optval, &status, len)) {
5304                 retval = -EFAULT;
5305                 goto out;
5306         }
5307
5308 out:
5309         return retval;
5310 }
5311
5312
5313 /* 7.2.2 Peer Address Information (SCTP_GET_PEER_ADDR_INFO)
5314  *
5315  * Applications can retrieve information about a specific peer address
5316  * of an association, including its reachability state, congestion
5317  * window, and retransmission timer values.  This information is
5318  * read-only.
5319  */
5320 static int sctp_getsockopt_peer_addr_info(struct sock *sk, int len,
5321                                           char __user *optval,
5322                                           int __user *optlen)
5323 {
5324         struct sctp_paddrinfo pinfo;
5325         struct sctp_transport *transport;
5326         int retval = 0;
5327
5328         if (len < sizeof(pinfo)) {
5329                 retval = -EINVAL;
5330                 goto out;
5331         }
5332
5333         len = sizeof(pinfo);
5334         if (copy_from_user(&pinfo, optval, len)) {
5335                 retval = -EFAULT;
5336                 goto out;
5337         }
5338
5339         transport = sctp_addr_id2transport(sk, &pinfo.spinfo_address,
5340                                            pinfo.spinfo_assoc_id);
5341         if (!transport)
5342                 return -EINVAL;
5343
5344         pinfo.spinfo_assoc_id = sctp_assoc2id(transport->asoc);
5345         pinfo.spinfo_state = transport->state;
5346         pinfo.spinfo_cwnd = transport->cwnd;
5347         pinfo.spinfo_srtt = transport->srtt;
5348         pinfo.spinfo_rto = jiffies_to_msecs(transport->rto);
5349         pinfo.spinfo_mtu = transport->pathmtu;
5350
5351         if (pinfo.spinfo_state == SCTP_UNKNOWN)
5352                 pinfo.spinfo_state = SCTP_ACTIVE;
5353
5354         if (put_user(len, optlen)) {
5355                 retval = -EFAULT;
5356                 goto out;
5357         }
5358
5359         if (copy_to_user(optval, &pinfo, len)) {
5360                 retval = -EFAULT;
5361                 goto out;
5362         }
5363
5364 out:
5365         return retval;
5366 }
5367
5368 /* 7.1.12 Enable/Disable message fragmentation (SCTP_DISABLE_FRAGMENTS)
5369  *
5370  * This option is a on/off flag.  If enabled no SCTP message
5371  * fragmentation will be performed.  Instead if a message being sent
5372  * exceeds the current PMTU size, the message will NOT be sent and
5373  * instead a error will be indicated to the user.
5374  */
5375 static int sctp_getsockopt_disable_fragments(struct sock *sk, int len,
5376                                         char __user *optval, int __user *optlen)
5377 {
5378         int val;
5379
5380         if (len < sizeof(int))
5381                 return -EINVAL;
5382
5383         len = sizeof(int);
5384         val = (sctp_sk(sk)->disable_fragments == 1);
5385         if (put_user(len, optlen))
5386                 return -EFAULT;
5387         if (copy_to_user(optval, &val, len))
5388                 return -EFAULT;
5389         return 0;
5390 }
5391
5392 /* 7.1.15 Set notification and ancillary events (SCTP_EVENTS)
5393  *
5394  * This socket option is used to specify various notifications and
5395  * ancillary data the user wishes to receive.
5396  */
5397 static int sctp_getsockopt_events(struct sock *sk, int len, char __user *optval,
5398                                   int __user *optlen)
5399 {
5400         struct sctp_event_subscribe subscribe;
5401         __u8 *sn_type = (__u8 *)&subscribe;
5402         int i;
5403
5404         if (len == 0)
5405                 return -EINVAL;
5406         if (len > sizeof(struct sctp_event_subscribe))
5407                 len = sizeof(struct sctp_event_subscribe);
5408         if (put_user(len, optlen))
5409                 return -EFAULT;
5410
5411         for (i = 0; i < len; i++)
5412                 sn_type[i] = sctp_ulpevent_type_enabled(sctp_sk(sk)->subscribe,
5413                                                         SCTP_SN_TYPE_BASE + i);
5414
5415         if (copy_to_user(optval, &subscribe, len))
5416                 return -EFAULT;
5417
5418         return 0;
5419 }
5420
5421 /* 7.1.8 Automatic Close of associations (SCTP_AUTOCLOSE)
5422  *
5423  * This socket option is applicable to the UDP-style socket only.  When
5424  * set it will cause associations that are idle for more than the
5425  * specified number of seconds to automatically close.  An association
5426  * being idle is defined an association that has NOT sent or received
5427  * user data.  The special value of '0' indicates that no automatic
5428  * close of any associations should be performed.  The option expects an
5429  * integer defining the number of seconds of idle time before an
5430  * association is closed.
5431  */
5432 static int sctp_getsockopt_autoclose(struct sock *sk, int len, char __user *optval, int __user *optlen)
5433 {
5434         /* Applicable to UDP-style socket only */
5435         if (sctp_style(sk, TCP))
5436                 return -EOPNOTSUPP;
5437         if (len < sizeof(int))
5438                 return -EINVAL;
5439         len = sizeof(int);
5440         if (put_user(len, optlen))
5441                 return -EFAULT;
5442         if (put_user(sctp_sk(sk)->autoclose, (int __user *)optval))
5443                 return -EFAULT;
5444         return 0;
5445 }
5446
5447 /* Helper routine to branch off an association to a new socket.  */
5448 int sctp_do_peeloff(struct sock *sk, sctp_assoc_t id, struct socket **sockp)
5449 {
5450         struct sctp_association *asoc = sctp_id2assoc(sk, id);
5451         struct sctp_sock *sp = sctp_sk(sk);
5452         struct socket *sock;
5453         int err = 0;
5454
5455         /* Do not peel off from one netns to another one. */
5456         if (!net_eq(current->nsproxy->net_ns, sock_net(sk)))
5457                 return -EINVAL;
5458
5459         if (!asoc)
5460                 return -EINVAL;
5461
5462         /* An association cannot be branched off from an already peeled-off
5463          * socket, nor is this supported for tcp style sockets.
5464          */
5465         if (!sctp_style(sk, UDP))
5466                 return -EINVAL;
5467
5468         /* Create a new socket.  */
5469         err = sock_create(sk->sk_family, SOCK_SEQPACKET, IPPROTO_SCTP, &sock);
5470         if (err < 0)
5471                 return err;
5472
5473         sctp_copy_sock(sock->sk, sk, asoc);
5474
5475         /* Make peeled-off sockets more like 1-1 accepted sockets.
5476          * Set the daddr and initialize id to something more random and also
5477          * copy over any ip options.
5478          */
5479         sp->pf->to_sk_daddr(&asoc->peer.primary_addr, sk);
5480         sp->pf->copy_ip_options(sk, sock->sk);
5481
5482         /* Populate the fields of the newsk from the oldsk and migrate the
5483          * asoc to the newsk.
5484          */
5485         sctp_sock_migrate(sk, sock->sk, asoc, SCTP_SOCKET_UDP_HIGH_BANDWIDTH);
5486
5487         *sockp = sock;
5488
5489         return err;
5490 }
5491 EXPORT_SYMBOL(sctp_do_peeloff);
5492
5493 static int sctp_getsockopt_peeloff_common(struct sock *sk, sctp_peeloff_arg_t *peeloff,
5494                                           struct file **newfile, unsigned flags)
5495 {
5496         struct socket *newsock;
5497         int retval;
5498
5499         retval = sctp_do_peeloff(sk, peeloff->associd, &newsock);
5500         if (retval < 0)
5501                 goto out;
5502
5503         /* Map the socket to an unused fd that can be returned to the user.  */
5504         retval = get_unused_fd_flags(flags & SOCK_CLOEXEC);
5505         if (retval < 0) {
5506                 sock_release(newsock);
5507                 goto out;
5508         }
5509
5510         *newfile = sock_alloc_file(newsock, 0, NULL);
5511         if (IS_ERR(*newfile)) {
5512                 put_unused_fd(retval);
5513                 retval = PTR_ERR(*newfile);
5514                 *newfile = NULL;
5515                 return retval;
5516         }
5517
5518         pr_debug("%s: sk:%p, newsk:%p, sd:%d\n", __func__, sk, newsock->sk,
5519                  retval);
5520
5521         peeloff->sd = retval;
5522
5523         if (flags & SOCK_NONBLOCK)
5524                 (*newfile)->f_flags |= O_NONBLOCK;
5525 out:
5526         return retval;
5527 }
5528
5529 static int sctp_getsockopt_peeloff(struct sock *sk, int len, char __user *optval, int __user *optlen)
5530 {
5531         sctp_peeloff_arg_t peeloff;
5532         struct file *newfile = NULL;
5533         int retval = 0;
5534
5535         if (len < sizeof(sctp_peeloff_arg_t))
5536                 return -EINVAL;
5537         len = sizeof(sctp_peeloff_arg_t);
5538         if (copy_from_user(&peeloff, optval, len))
5539                 return -EFAULT;
5540
5541         retval = sctp_getsockopt_peeloff_common(sk, &peeloff, &newfile, 0);
5542         if (retval < 0)
5543                 goto out;
5544
5545         /* Return the fd mapped to the new socket.  */
5546         if (put_user(len, optlen)) {
5547                 fput(newfile);
5548                 put_unused_fd(retval);
5549                 return -EFAULT;
5550         }
5551
5552         if (copy_to_user(optval, &peeloff, len)) {
5553                 fput(newfile);
5554                 put_unused_fd(retval);
5555                 return -EFAULT;
5556         }
5557         fd_install(retval, newfile);
5558 out:
5559         return retval;
5560 }
5561
5562 static int sctp_getsockopt_peeloff_flags(struct sock *sk, int len,
5563                                          char __user *optval, int __user *optlen)
5564 {
5565         sctp_peeloff_flags_arg_t peeloff;
5566         struct file *newfile = NULL;
5567         int retval = 0;
5568
5569         if (len < sizeof(sctp_peeloff_flags_arg_t))
5570                 return -EINVAL;
5571         len = sizeof(sctp_peeloff_flags_arg_t);
5572         if (copy_from_user(&peeloff, optval, len))
5573                 return -EFAULT;
5574
5575         retval = sctp_getsockopt_peeloff_common(sk, &peeloff.p_arg,
5576                                                 &newfile, peeloff.flags);
5577         if (retval < 0)
5578                 goto out;
5579
5580         /* Return the fd mapped to the new socket.  */
5581         if (put_user(len, optlen)) {
5582                 fput(newfile);
5583                 put_unused_fd(retval);
5584                 return -EFAULT;
5585         }
5586
5587         if (copy_to_user(optval, &peeloff, len)) {
5588                 fput(newfile);
5589                 put_unused_fd(retval);
5590                 return -EFAULT;
5591         }
5592         fd_install(retval, newfile);
5593 out:
5594         return retval;
5595 }
5596
5597 /* 7.1.13 Peer Address Parameters (SCTP_PEER_ADDR_PARAMS)
5598  *
5599  * Applications can enable or disable heartbeats for any peer address of
5600  * an association, modify an address's heartbeat interval, force a
5601  * heartbeat to be sent immediately, and adjust the address's maximum
5602  * number of retransmissions sent before an address is considered
5603  * unreachable.  The following structure is used to access and modify an
5604  * address's parameters:
5605  *
5606  *  struct sctp_paddrparams {
5607  *     sctp_assoc_t            spp_assoc_id;
5608  *     struct sockaddr_storage spp_address;
5609  *     uint32_t                spp_hbinterval;
5610  *     uint16_t                spp_pathmaxrxt;
5611  *     uint32_t                spp_pathmtu;
5612  *     uint32_t                spp_sackdelay;
5613  *     uint32_t                spp_flags;
5614  * };
5615  *
5616  *   spp_assoc_id    - (one-to-many style socket) This is filled in the
5617  *                     application, and identifies the association for
5618  *                     this query.
5619  *   spp_address     - This specifies which address is of interest.
5620  *   spp_hbinterval  - This contains the value of the heartbeat interval,
5621  *                     in milliseconds.  If a  value of zero
5622  *                     is present in this field then no changes are to
5623  *                     be made to this parameter.
5624  *   spp_pathmaxrxt  - This contains the maximum number of
5625  *                     retransmissions before this address shall be
5626  *                     considered unreachable. If a  value of zero
5627  *                     is present in this field then no changes are to
5628  *                     be made to this parameter.
5629  *   spp_pathmtu     - When Path MTU discovery is disabled the value
5630  *                     specified here will be the "fixed" path mtu.
5631  *                     Note that if the spp_address field is empty
5632  *                     then all associations on this address will
5633  *                     have this fixed path mtu set upon them.
5634  *
5635  *   spp_sackdelay   - When delayed sack is enabled, this value specifies
5636  *                     the number of milliseconds that sacks will be delayed
5637  *                     for. This value will apply to all addresses of an
5638  *                     association if the spp_address field is empty. Note
5639  *                     also, that if delayed sack is enabled and this
5640  *                     value is set to 0, no change is made to the last
5641  *                     recorded delayed sack timer value.
5642  *
5643  *   spp_flags       - These flags are used to control various features
5644  *                     on an association. The flag field may contain
5645  *                     zero or more of the following options.
5646  *
5647  *                     SPP_HB_ENABLE  - Enable heartbeats on the
5648  *                     specified address. Note that if the address
5649  *                     field is empty all addresses for the association
5650  *                     have heartbeats enabled upon them.
5651  *
5652  *                     SPP_HB_DISABLE - Disable heartbeats on the
5653  *                     speicifed address. Note that if the address
5654  *                     field is empty all addresses for the association
5655  *                     will have their heartbeats disabled. Note also
5656  *                     that SPP_HB_ENABLE and SPP_HB_DISABLE are
5657  *                     mutually exclusive, only one of these two should
5658  *                     be specified. Enabling both fields will have
5659  *                     undetermined results.
5660  *
5661  *                     SPP_HB_DEMAND - Request a user initiated heartbeat
5662  *                     to be made immediately.
5663  *
5664  *                     SPP_PMTUD_ENABLE - This field will enable PMTU
5665  *                     discovery upon the specified address. Note that
5666  *                     if the address feild is empty then all addresses
5667  *                     on the association are effected.
5668  *
5669  *                     SPP_PMTUD_DISABLE - This field will disable PMTU
5670  *                     discovery upon the specified address. Note that
5671  *                     if the address feild is empty then all addresses
5672  *                     on the association are effected. Not also that
5673  *                     SPP_PMTUD_ENABLE and SPP_PMTUD_DISABLE are mutually
5674  *                     exclusive. Enabling both will have undetermined
5675  *                     results.
5676  *
5677  *                     SPP_SACKDELAY_ENABLE - Setting this flag turns
5678  *                     on delayed sack. The time specified in spp_sackdelay
5679  *                     is used to specify the sack delay for this address. Note
5680  *                     that if spp_address is empty then all addresses will
5681  *                     enable delayed sack and take on the sack delay
5682  *                     value specified in spp_sackdelay.
5683  *                     SPP_SACKDELAY_DISABLE - Setting this flag turns
5684  *                     off delayed sack. If the spp_address field is blank then
5685  *                     delayed sack is disabled for the entire association. Note
5686  *                     also that this field is mutually exclusive to
5687  *                     SPP_SACKDELAY_ENABLE, setting both will have undefined
5688  *                     results.
5689  *
5690  *                     SPP_IPV6_FLOWLABEL:  Setting this flag enables the
5691  *                     setting of the IPV6 flow label value.  The value is
5692  *                     contained in the spp_ipv6_flowlabel field.
5693  *                     Upon retrieval, this flag will be set to indicate that
5694  *                     the spp_ipv6_flowlabel field has a valid value returned.
5695  *                     If a specific destination address is set (in the
5696  *                     spp_address field), then the value returned is that of
5697  *                     the address.  If just an association is specified (and
5698  *                     no address), then the association's default flow label
5699  *                     is returned.  If neither an association nor a destination
5700  *                     is specified, then the socket's default flow label is
5701  *                     returned.  For non-IPv6 sockets, this flag will be left
5702  *                     cleared.
5703  *
5704  *                     SPP_DSCP:  Setting this flag enables the setting of the
5705  *                     Differentiated Services Code Point (DSCP) value
5706  *                     associated with either the association or a specific
5707  *                     address.  The value is obtained in the spp_dscp field.
5708  *                     Upon retrieval, this flag will be set to indicate that
5709  *                     the spp_dscp field has a valid value returned.  If a
5710  *                     specific destination address is set when called (in the
5711  *                     spp_address field), then that specific destination
5712  *                     address's DSCP value is returned.  If just an association
5713  *                     is specified, then the association's default DSCP is
5714  *                     returned.  If neither an association nor a destination is
5715  *                     specified, then the socket's default DSCP is returned.
5716  *
5717  *   spp_ipv6_flowlabel
5718  *                   - This field is used in conjunction with the
5719  *                     SPP_IPV6_FLOWLABEL flag and contains the IPv6 flow label.
5720  *                     The 20 least significant bits are used for the flow
5721  *                     label.  This setting has precedence over any IPv6-layer
5722  *                     setting.
5723  *
5724  *   spp_dscp        - This field is used in conjunction with the SPP_DSCP flag
5725  *                     and contains the DSCP.  The 6 most significant bits are
5726  *                     used for the DSCP.  This setting has precedence over any
5727  *                     IPv4- or IPv6- layer setting.
5728  */
5729 static int sctp_getsockopt_peer_addr_params(struct sock *sk, int len,
5730                                             char __user *optval, int __user *optlen)
5731 {
5732         struct sctp_paddrparams  params;
5733         struct sctp_transport   *trans = NULL;
5734         struct sctp_association *asoc = NULL;
5735         struct sctp_sock        *sp = sctp_sk(sk);
5736
5737         if (len >= sizeof(params))
5738                 len = sizeof(params);
5739         else if (len >= ALIGN(offsetof(struct sctp_paddrparams,
5740                                        spp_ipv6_flowlabel), 4))
5741                 len = ALIGN(offsetof(struct sctp_paddrparams,
5742                                      spp_ipv6_flowlabel), 4);
5743         else
5744                 return -EINVAL;
5745
5746         if (copy_from_user(&params, optval, len))
5747                 return -EFAULT;
5748
5749         /* If an address other than INADDR_ANY is specified, and
5750          * no transport is found, then the request is invalid.
5751          */
5752         if (!sctp_is_any(sk, (union sctp_addr *)&params.spp_address)) {
5753                 trans = sctp_addr_id2transport(sk, &params.spp_address,
5754                                                params.spp_assoc_id);
5755                 if (!trans) {
5756                         pr_debug("%s: failed no transport\n", __func__);
5757                         return -EINVAL;
5758                 }
5759         }
5760
5761         /* Get association, if assoc_id != SCTP_FUTURE_ASSOC and the
5762          * socket is a one to many style socket, and an association
5763          * was not found, then the id was invalid.
5764          */
5765         asoc = sctp_id2assoc(sk, params.spp_assoc_id);
5766         if (!asoc && params.spp_assoc_id != SCTP_FUTURE_ASSOC &&
5767             sctp_style(sk, UDP)) {
5768                 pr_debug("%s: failed no association\n", __func__);
5769                 return -EINVAL;
5770         }
5771
5772         if (trans) {
5773                 /* Fetch transport values. */
5774                 params.spp_hbinterval = jiffies_to_msecs(trans->hbinterval);
5775                 params.spp_pathmtu    = trans->pathmtu;
5776                 params.spp_pathmaxrxt = trans->pathmaxrxt;
5777                 params.spp_sackdelay  = jiffies_to_msecs(trans->sackdelay);
5778
5779                 /*draft-11 doesn't say what to return in spp_flags*/
5780                 params.spp_flags      = trans->param_flags;
5781                 if (trans->flowlabel & SCTP_FLOWLABEL_SET_MASK) {
5782                         params.spp_ipv6_flowlabel = trans->flowlabel &
5783                                                     SCTP_FLOWLABEL_VAL_MASK;
5784                         params.spp_flags |= SPP_IPV6_FLOWLABEL;
5785                 }
5786                 if (trans->dscp & SCTP_DSCP_SET_MASK) {
5787                         params.spp_dscp = trans->dscp & SCTP_DSCP_VAL_MASK;
5788                         params.spp_flags |= SPP_DSCP;
5789                 }
5790         } else if (asoc) {
5791                 /* Fetch association values. */
5792                 params.spp_hbinterval = jiffies_to_msecs(asoc->hbinterval);
5793                 params.spp_pathmtu    = asoc->pathmtu;
5794                 params.spp_pathmaxrxt = asoc->pathmaxrxt;
5795                 params.spp_sackdelay  = jiffies_to_msecs(asoc->sackdelay);
5796
5797                 /*draft-11 doesn't say what to return in spp_flags*/
5798                 params.spp_flags      = asoc->param_flags;
5799                 if (asoc->flowlabel & SCTP_FLOWLABEL_SET_MASK) {
5800                         params.spp_ipv6_flowlabel = asoc->flowlabel &
5801                                                     SCTP_FLOWLABEL_VAL_MASK;
5802                         params.spp_flags |= SPP_IPV6_FLOWLABEL;
5803                 }
5804                 if (asoc->dscp & SCTP_DSCP_SET_MASK) {
5805                         params.spp_dscp = asoc->dscp & SCTP_DSCP_VAL_MASK;
5806                         params.spp_flags |= SPP_DSCP;
5807                 }
5808         } else {
5809                 /* Fetch socket values. */
5810                 params.spp_hbinterval = sp->hbinterval;
5811                 params.spp_pathmtu    = sp->pathmtu;
5812                 params.spp_sackdelay  = sp->sackdelay;
5813                 params.spp_pathmaxrxt = sp->pathmaxrxt;
5814
5815                 /*draft-11 doesn't say what to return in spp_flags*/
5816                 params.spp_flags      = sp->param_flags;
5817                 if (sp->flowlabel & SCTP_FLOWLABEL_SET_MASK) {
5818                         params.spp_ipv6_flowlabel = sp->flowlabel &
5819                                                     SCTP_FLOWLABEL_VAL_MASK;
5820                         params.spp_flags |= SPP_IPV6_FLOWLABEL;
5821                 }
5822                 if (sp->dscp & SCTP_DSCP_SET_MASK) {
5823                         params.spp_dscp = sp->dscp & SCTP_DSCP_VAL_MASK;
5824                         params.spp_flags |= SPP_DSCP;
5825                 }
5826         }
5827
5828         if (copy_to_user(optval, &params, len))
5829                 return -EFAULT;
5830
5831         if (put_user(len, optlen))
5832                 return -EFAULT;
5833
5834         return 0;
5835 }
5836
5837 /*
5838  * 7.1.23.  Get or set delayed ack timer (SCTP_DELAYED_SACK)
5839  *
5840  * This option will effect the way delayed acks are performed.  This
5841  * option allows you to get or set the delayed ack time, in
5842  * milliseconds.  It also allows changing the delayed ack frequency.
5843  * Changing the frequency to 1 disables the delayed sack algorithm.  If
5844  * the assoc_id is 0, then this sets or gets the endpoints default
5845  * values.  If the assoc_id field is non-zero, then the set or get
5846  * effects the specified association for the one to many model (the
5847  * assoc_id field is ignored by the one to one model).  Note that if
5848  * sack_delay or sack_freq are 0 when setting this option, then the
5849  * current values will remain unchanged.
5850  *
5851  * struct sctp_sack_info {
5852  *     sctp_assoc_t            sack_assoc_id;
5853  *     uint32_t                sack_delay;
5854  *     uint32_t                sack_freq;
5855  * };
5856  *
5857  * sack_assoc_id -  This parameter, indicates which association the user
5858  *    is performing an action upon.  Note that if this field's value is
5859  *    zero then the endpoints default value is changed (effecting future
5860  *    associations only).
5861  *
5862  * sack_delay -  This parameter contains the number of milliseconds that
5863  *    the user is requesting the delayed ACK timer be set to.  Note that
5864  *    this value is defined in the standard to be between 200 and 500
5865  *    milliseconds.
5866  *
5867  * sack_freq -  This parameter contains the number of packets that must
5868  *    be received before a sack is sent without waiting for the delay
5869  *    timer to expire.  The default value for this is 2, setting this
5870  *    value to 1 will disable the delayed sack algorithm.
5871  */
5872 static int sctp_getsockopt_delayed_ack(struct sock *sk, int len,
5873                                             char __user *optval,
5874                                             int __user *optlen)
5875 {
5876         struct sctp_sack_info    params;
5877         struct sctp_association *asoc = NULL;
5878         struct sctp_sock        *sp = sctp_sk(sk);
5879
5880         if (len >= sizeof(struct sctp_sack_info)) {
5881                 len = sizeof(struct sctp_sack_info);
5882
5883                 if (copy_from_user(&params, optval, len))
5884                         return -EFAULT;
5885         } else if (len == sizeof(struct sctp_assoc_value)) {
5886                 pr_warn_ratelimited(DEPRECATED
5887                                     "%s (pid %d) "
5888                                     "Use of struct sctp_assoc_value in delayed_ack socket option.\n"
5889                                     "Use struct sctp_sack_info instead\n",
5890                                     current->comm, task_pid_nr(current));
5891                 if (copy_from_user(&params, optval, len))
5892                         return -EFAULT;
5893         } else
5894                 return -EINVAL;
5895
5896         /* Get association, if sack_assoc_id != SCTP_FUTURE_ASSOC and the
5897          * socket is a one to many style socket, and an association
5898          * was not found, then the id was invalid.
5899          */
5900         asoc = sctp_id2assoc(sk, params.sack_assoc_id);
5901         if (!asoc && params.sack_assoc_id != SCTP_FUTURE_ASSOC &&
5902             sctp_style(sk, UDP))
5903                 return -EINVAL;
5904
5905         if (asoc) {
5906                 /* Fetch association values. */
5907                 if (asoc->param_flags & SPP_SACKDELAY_ENABLE) {
5908                         params.sack_delay = jiffies_to_msecs(asoc->sackdelay);
5909                         params.sack_freq = asoc->sackfreq;
5910
5911                 } else {
5912                         params.sack_delay = 0;
5913                         params.sack_freq = 1;
5914                 }
5915         } else {
5916                 /* Fetch socket values. */
5917                 if (sp->param_flags & SPP_SACKDELAY_ENABLE) {
5918                         params.sack_delay  = sp->sackdelay;
5919                         params.sack_freq = sp->sackfreq;
5920                 } else {
5921                         params.sack_delay  = 0;
5922                         params.sack_freq = 1;
5923                 }
5924         }
5925
5926         if (copy_to_user(optval, &params, len))
5927                 return -EFAULT;
5928
5929         if (put_user(len, optlen))
5930                 return -EFAULT;
5931
5932         return 0;
5933 }
5934
5935 /* 7.1.3 Initialization Parameters (SCTP_INITMSG)
5936  *
5937  * Applications can specify protocol parameters for the default association
5938  * initialization.  The option name argument to setsockopt() and getsockopt()
5939  * is SCTP_INITMSG.
5940  *
5941  * Setting initialization parameters is effective only on an unconnected
5942  * socket (for UDP-style sockets only future associations are effected
5943  * by the change).  With TCP-style sockets, this option is inherited by
5944  * sockets derived from a listener socket.
5945  */
5946 static int sctp_getsockopt_initmsg(struct sock *sk, int len, char __user *optval, int __user *optlen)
5947 {
5948         if (len < sizeof(struct sctp_initmsg))
5949                 return -EINVAL;
5950         len = sizeof(struct sctp_initmsg);
5951         if (put_user(len, optlen))
5952                 return -EFAULT;
5953         if (copy_to_user(optval, &sctp_sk(sk)->initmsg, len))
5954                 return -EFAULT;
5955         return 0;
5956 }
5957
5958
5959 static int sctp_getsockopt_peer_addrs(struct sock *sk, int len,
5960                                       char __user *optval, int __user *optlen)
5961 {
5962         struct sctp_association *asoc;
5963         int cnt = 0;
5964         struct sctp_getaddrs getaddrs;
5965         struct sctp_transport *from;
5966         void __user *to;
5967         union sctp_addr temp;
5968         struct sctp_sock *sp = sctp_sk(sk);
5969         int addrlen;
5970         size_t space_left;
5971         int bytes_copied;
5972
5973         if (len < sizeof(struct sctp_getaddrs))
5974                 return -EINVAL;
5975
5976         if (copy_from_user(&getaddrs, optval, sizeof(struct sctp_getaddrs)))
5977                 return -EFAULT;
5978
5979         /* For UDP-style sockets, id specifies the association to query.  */
5980         asoc = sctp_id2assoc(sk, getaddrs.assoc_id);
5981         if (!asoc)
5982                 return -EINVAL;
5983
5984         to = optval + offsetof(struct sctp_getaddrs, addrs);
5985         space_left = len - offsetof(struct sctp_getaddrs, addrs);
5986
5987         list_for_each_entry(from, &asoc->peer.transport_addr_list,
5988                                 transports) {
5989                 memcpy(&temp, &from->ipaddr, sizeof(temp));
5990                 addrlen = sctp_get_pf_specific(sk->sk_family)
5991                               ->addr_to_user(sp, &temp);
5992                 if (space_left < addrlen)
5993                         return -ENOMEM;
5994                 if (copy_to_user(to, &temp, addrlen))
5995                         return -EFAULT;
5996                 to += addrlen;
5997                 cnt++;
5998                 space_left -= addrlen;
5999         }
6000
6001         if (put_user(cnt, &((struct sctp_getaddrs __user *)optval)->addr_num))
6002                 return -EFAULT;
6003         bytes_copied = ((char __user *)to) - optval;
6004         if (put_user(bytes_copied, optlen))
6005                 return -EFAULT;
6006
6007         return 0;
6008 }
6009
6010 static int sctp_copy_laddrs(struct sock *sk, __u16 port, void *to,
6011                             size_t space_left, int *bytes_copied)
6012 {
6013         struct sctp_sockaddr_entry *addr;
6014         union sctp_addr temp;
6015         int cnt = 0;
6016         int addrlen;
6017         struct net *net = sock_net(sk);
6018
6019         rcu_read_lock();
6020         list_for_each_entry_rcu(addr, &net->sctp.local_addr_list, list) {
6021                 if (!addr->valid)
6022                         continue;
6023
6024                 if ((PF_INET == sk->sk_family) &&
6025                     (AF_INET6 == addr->a.sa.sa_family))
6026                         continue;
6027                 if ((PF_INET6 == sk->sk_family) &&
6028                     inet_v6_ipv6only(sk) &&
6029                     (AF_INET == addr->a.sa.sa_family))
6030                         continue;
6031                 memcpy(&temp, &addr->a, sizeof(temp));
6032                 if (!temp.v4.sin_port)
6033                         temp.v4.sin_port = htons(port);
6034
6035                 addrlen = sctp_get_pf_specific(sk->sk_family)
6036                               ->addr_to_user(sctp_sk(sk), &temp);
6037
6038                 if (space_left < addrlen) {
6039                         cnt =  -ENOMEM;
6040                         break;
6041                 }
6042                 memcpy(to, &temp, addrlen);
6043
6044                 to += addrlen;
6045                 cnt++;
6046                 space_left -= addrlen;
6047                 *bytes_copied += addrlen;
6048         }
6049         rcu_read_unlock();
6050
6051         return cnt;
6052 }
6053
6054
6055 static int sctp_getsockopt_local_addrs(struct sock *sk, int len,
6056                                        char __user *optval, int __user *optlen)
6057 {
6058         struct sctp_bind_addr *bp;
6059         struct sctp_association *asoc;
6060         int cnt = 0;
6061         struct sctp_getaddrs getaddrs;
6062         struct sctp_sockaddr_entry *addr;
6063         void __user *to;
6064         union sctp_addr temp;
6065         struct sctp_sock *sp = sctp_sk(sk);
6066         int addrlen;
6067         int err = 0;
6068         size_t space_left;
6069         int bytes_copied = 0;
6070         void *addrs;
6071         void *buf;
6072
6073         if (len < sizeof(struct sctp_getaddrs))
6074                 return -EINVAL;
6075
6076         if (copy_from_user(&getaddrs, optval, sizeof(struct sctp_getaddrs)))
6077                 return -EFAULT;
6078
6079         /*
6080          *  For UDP-style sockets, id specifies the association to query.
6081          *  If the id field is set to the value '0' then the locally bound
6082          *  addresses are returned without regard to any particular
6083          *  association.
6084          */
6085         if (0 == getaddrs.assoc_id) {
6086                 bp = &sctp_sk(sk)->ep->base.bind_addr;
6087         } else {
6088                 asoc = sctp_id2assoc(sk, getaddrs.assoc_id);
6089                 if (!asoc)
6090                         return -EINVAL;
6091                 bp = &asoc->base.bind_addr;
6092         }
6093
6094         to = optval + offsetof(struct sctp_getaddrs, addrs);
6095         space_left = len - offsetof(struct sctp_getaddrs, addrs);
6096
6097         addrs = kmalloc(space_left, GFP_USER | __GFP_NOWARN);
6098         if (!addrs)
6099                 return -ENOMEM;
6100
6101         /* If the endpoint is bound to 0.0.0.0 or ::0, get the valid
6102          * addresses from the global local address list.
6103          */
6104         if (sctp_list_single_entry(&bp->address_list)) {
6105                 addr = list_entry(bp->address_list.next,
6106                                   struct sctp_sockaddr_entry, list);
6107                 if (sctp_is_any(sk, &addr->a)) {
6108                         cnt = sctp_copy_laddrs(sk, bp->port, addrs,
6109                                                 space_left, &bytes_copied);
6110                         if (cnt < 0) {
6111                                 err = cnt;
6112                                 goto out;
6113                         }
6114                         goto copy_getaddrs;
6115                 }
6116         }
6117
6118         buf = addrs;
6119         /* Protection on the bound address list is not needed since
6120          * in the socket option context we hold a socket lock and
6121          * thus the bound address list can't change.
6122          */
6123         list_for_each_entry(addr, &bp->address_list, list) {
6124                 memcpy(&temp, &addr->a, sizeof(temp));
6125                 addrlen = sctp_get_pf_specific(sk->sk_family)
6126                               ->addr_to_user(sp, &temp);
6127                 if (space_left < addrlen) {
6128                         err =  -ENOMEM; /*fixme: right error?*/
6129                         goto out;
6130                 }
6131                 memcpy(buf, &temp, addrlen);
6132                 buf += addrlen;
6133                 bytes_copied += addrlen;
6134                 cnt++;
6135                 space_left -= addrlen;
6136         }
6137
6138 copy_getaddrs:
6139         if (copy_to_user(to, addrs, bytes_copied)) {
6140                 err = -EFAULT;
6141                 goto out;
6142         }
6143         if (put_user(cnt, &((struct sctp_getaddrs __user *)optval)->addr_num)) {
6144                 err = -EFAULT;
6145                 goto out;
6146         }
6147         /* XXX: We should have accounted for sizeof(struct sctp_getaddrs) too,
6148          * but we can't change it anymore.
6149          */
6150         if (put_user(bytes_copied, optlen))
6151                 err = -EFAULT;
6152 out:
6153         kfree(addrs);
6154         return err;
6155 }
6156
6157 /* 7.1.10 Set Primary Address (SCTP_PRIMARY_ADDR)
6158  *
6159  * Requests that the local SCTP stack use the enclosed peer address as
6160  * the association primary.  The enclosed address must be one of the
6161  * association peer's addresses.
6162  */
6163 static int sctp_getsockopt_primary_addr(struct sock *sk, int len,
6164                                         char __user *optval, int __user *optlen)
6165 {
6166         struct sctp_prim prim;
6167         struct sctp_association *asoc;
6168         struct sctp_sock *sp = sctp_sk(sk);
6169
6170         if (len < sizeof(struct sctp_prim))
6171                 return -EINVAL;
6172
6173         len = sizeof(struct sctp_prim);
6174
6175         if (copy_from_user(&prim, optval, len))
6176                 return -EFAULT;
6177
6178         asoc = sctp_id2assoc(sk, prim.ssp_assoc_id);
6179         if (!asoc)
6180                 return -EINVAL;
6181
6182         if (!asoc->peer.primary_path)
6183                 return -ENOTCONN;
6184
6185         memcpy(&prim.ssp_addr, &asoc->peer.primary_path->ipaddr,
6186                 asoc->peer.primary_path->af_specific->sockaddr_len);
6187
6188         sctp_get_pf_specific(sk->sk_family)->addr_to_user(sp,
6189                         (union sctp_addr *)&prim.ssp_addr);
6190
6191         if (put_user(len, optlen))
6192                 return -EFAULT;
6193         if (copy_to_user(optval, &prim, len))
6194                 return -EFAULT;
6195
6196         return 0;
6197 }
6198
6199 /*
6200  * 7.1.11  Set Adaptation Layer Indicator (SCTP_ADAPTATION_LAYER)
6201  *
6202  * Requests that the local endpoint set the specified Adaptation Layer
6203  * Indication parameter for all future INIT and INIT-ACK exchanges.
6204  */
6205 static int sctp_getsockopt_adaptation_layer(struct sock *sk, int len,
6206                                   char __user *optval, int __user *optlen)
6207 {
6208         struct sctp_setadaptation adaptation;
6209
6210         if (len < sizeof(struct sctp_setadaptation))
6211                 return -EINVAL;
6212
6213         len = sizeof(struct sctp_setadaptation);
6214
6215         adaptation.ssb_adaptation_ind = sctp_sk(sk)->adaptation_ind;
6216
6217         if (put_user(len, optlen))
6218                 return -EFAULT;
6219         if (copy_to_user(optval, &adaptation, len))
6220                 return -EFAULT;
6221
6222         return 0;
6223 }
6224
6225 /*
6226  *
6227  * 7.1.14 Set default send parameters (SCTP_DEFAULT_SEND_PARAM)
6228  *
6229  *   Applications that wish to use the sendto() system call may wish to
6230  *   specify a default set of parameters that would normally be supplied
6231  *   through the inclusion of ancillary data.  This socket option allows
6232  *   such an application to set the default sctp_sndrcvinfo structure.
6233
6234
6235  *   The application that wishes to use this socket option simply passes
6236  *   in to this call the sctp_sndrcvinfo structure defined in Section
6237  *   5.2.2) The input parameters accepted by this call include
6238  *   sinfo_stream, sinfo_flags, sinfo_ppid, sinfo_context,
6239  *   sinfo_timetolive.  The user must provide the sinfo_assoc_id field in
6240  *   to this call if the caller is using the UDP model.
6241  *
6242  *   For getsockopt, it get the default sctp_sndrcvinfo structure.
6243  */
6244 static int sctp_getsockopt_default_send_param(struct sock *sk,
6245                                         int len, char __user *optval,
6246                                         int __user *optlen)
6247 {
6248         struct sctp_sock *sp = sctp_sk(sk);
6249         struct sctp_association *asoc;
6250         struct sctp_sndrcvinfo info;
6251
6252         if (len < sizeof(info))
6253                 return -EINVAL;
6254
6255         len = sizeof(info);
6256
6257         if (copy_from_user(&info, optval, len))
6258                 return -EFAULT;
6259
6260         asoc = sctp_id2assoc(sk, info.sinfo_assoc_id);
6261         if (!asoc && info.sinfo_assoc_id != SCTP_FUTURE_ASSOC &&
6262             sctp_style(sk, UDP))
6263                 return -EINVAL;
6264
6265         if (asoc) {
6266                 info.sinfo_stream = asoc->default_stream;
6267                 info.sinfo_flags = asoc->default_flags;
6268                 info.sinfo_ppid = asoc->default_ppid;
6269                 info.sinfo_context = asoc->default_context;
6270                 info.sinfo_timetolive = asoc->default_timetolive;
6271         } else {
6272                 info.sinfo_stream = sp->default_stream;
6273                 info.sinfo_flags = sp->default_flags;
6274                 info.sinfo_ppid = sp->default_ppid;
6275                 info.sinfo_context = sp->default_context;
6276                 info.sinfo_timetolive = sp->default_timetolive;
6277         }
6278
6279         if (put_user(len, optlen))
6280                 return -EFAULT;
6281         if (copy_to_user(optval, &info, len))
6282                 return -EFAULT;
6283
6284         return 0;
6285 }
6286
6287 /* RFC6458, Section 8.1.31. Set/get Default Send Parameters
6288  * (SCTP_DEFAULT_SNDINFO)
6289  */
6290 static int sctp_getsockopt_default_sndinfo(struct sock *sk, int len,
6291                                            char __user *optval,
6292                                            int __user *optlen)
6293 {
6294         struct sctp_sock *sp = sctp_sk(sk);
6295         struct sctp_association *asoc;
6296         struct sctp_sndinfo info;
6297
6298         if (len < sizeof(info))
6299                 return -EINVAL;
6300
6301         len = sizeof(info);
6302
6303         if (copy_from_user(&info, optval, len))
6304                 return -EFAULT;
6305
6306         asoc = sctp_id2assoc(sk, info.snd_assoc_id);
6307         if (!asoc && info.snd_assoc_id != SCTP_FUTURE_ASSOC &&
6308             sctp_style(sk, UDP))
6309                 return -EINVAL;
6310
6311         if (asoc) {
6312                 info.snd_sid = asoc->default_stream;
6313                 info.snd_flags = asoc->default_flags;
6314                 info.snd_ppid = asoc->default_ppid;
6315                 info.snd_context = asoc->default_context;
6316         } else {
6317                 info.snd_sid = sp->default_stream;
6318                 info.snd_flags = sp->default_flags;
6319                 info.snd_ppid = sp->default_ppid;
6320                 info.snd_context = sp->default_context;
6321         }
6322
6323         if (put_user(len, optlen))
6324                 return -EFAULT;
6325         if (copy_to_user(optval, &info, len))
6326                 return -EFAULT;
6327
6328         return 0;
6329 }
6330
6331 /*
6332  *
6333  * 7.1.5 SCTP_NODELAY
6334  *
6335  * Turn on/off any Nagle-like algorithm.  This means that packets are
6336  * generally sent as soon as possible and no unnecessary delays are
6337  * introduced, at the cost of more packets in the network.  Expects an
6338  * integer boolean flag.
6339  */
6340
6341 static int sctp_getsockopt_nodelay(struct sock *sk, int len,
6342                                    char __user *optval, int __user *optlen)
6343 {
6344         int val;
6345
6346         if (len < sizeof(int))
6347                 return -EINVAL;
6348
6349         len = sizeof(int);
6350         val = (sctp_sk(sk)->nodelay == 1);
6351         if (put_user(len, optlen))
6352                 return -EFAULT;
6353         if (copy_to_user(optval, &val, len))
6354                 return -EFAULT;
6355         return 0;
6356 }
6357
6358 /*
6359  *
6360  * 7.1.1 SCTP_RTOINFO
6361  *
6362  * The protocol parameters used to initialize and bound retransmission
6363  * timeout (RTO) are tunable. sctp_rtoinfo structure is used to access
6364  * and modify these parameters.
6365  * All parameters are time values, in milliseconds.  A value of 0, when
6366  * modifying the parameters, indicates that the current value should not
6367  * be changed.
6368  *
6369  */
6370 static int sctp_getsockopt_rtoinfo(struct sock *sk, int len,
6371                                 char __user *optval,
6372                                 int __user *optlen) {
6373         struct sctp_rtoinfo rtoinfo;
6374         struct sctp_association *asoc;
6375
6376         if (len < sizeof (struct sctp_rtoinfo))
6377                 return -EINVAL;
6378
6379         len = sizeof(struct sctp_rtoinfo);
6380
6381         if (copy_from_user(&rtoinfo, optval, len))
6382                 return -EFAULT;
6383
6384         asoc = sctp_id2assoc(sk, rtoinfo.srto_assoc_id);
6385
6386         if (!asoc && rtoinfo.srto_assoc_id != SCTP_FUTURE_ASSOC &&
6387             sctp_style(sk, UDP))
6388                 return -EINVAL;
6389
6390         /* Values corresponding to the specific association. */
6391         if (asoc) {
6392                 rtoinfo.srto_initial = jiffies_to_msecs(asoc->rto_initial);
6393                 rtoinfo.srto_max = jiffies_to_msecs(asoc->rto_max);
6394                 rtoinfo.srto_min = jiffies_to_msecs(asoc->rto_min);
6395         } else {
6396                 /* Values corresponding to the endpoint. */
6397                 struct sctp_sock *sp = sctp_sk(sk);
6398
6399                 rtoinfo.srto_initial = sp->rtoinfo.srto_initial;
6400                 rtoinfo.srto_max = sp->rtoinfo.srto_max;
6401                 rtoinfo.srto_min = sp->rtoinfo.srto_min;
6402         }
6403
6404         if (put_user(len, optlen))
6405                 return -EFAULT;
6406
6407         if (copy_to_user(optval, &rtoinfo, len))
6408                 return -EFAULT;
6409
6410         return 0;
6411 }
6412
6413 /*
6414  *
6415  * 7.1.2 SCTP_ASSOCINFO
6416  *
6417  * This option is used to tune the maximum retransmission attempts
6418  * of the association.
6419  * Returns an error if the new association retransmission value is
6420  * greater than the sum of the retransmission value  of the peer.
6421  * See [SCTP] for more information.
6422  *
6423  */
6424 static int sctp_getsockopt_associnfo(struct sock *sk, int len,
6425                                      char __user *optval,
6426                                      int __user *optlen)
6427 {
6428
6429         struct sctp_assocparams assocparams;
6430         struct sctp_association *asoc;
6431         struct list_head *pos;
6432         int cnt = 0;
6433
6434         if (len < sizeof (struct sctp_assocparams))
6435                 return -EINVAL;
6436
6437         len = sizeof(struct sctp_assocparams);
6438
6439         if (copy_from_user(&assocparams, optval, len))
6440                 return -EFAULT;
6441
6442         asoc = sctp_id2assoc(sk, assocparams.sasoc_assoc_id);
6443
6444         if (!asoc && assocparams.sasoc_assoc_id != SCTP_FUTURE_ASSOC &&
6445             sctp_style(sk, UDP))
6446                 return -EINVAL;
6447
6448         /* Values correspoinding to the specific association */
6449         if (asoc) {
6450                 assocparams.sasoc_asocmaxrxt = asoc->max_retrans;
6451                 assocparams.sasoc_peer_rwnd = asoc->peer.rwnd;
6452                 assocparams.sasoc_local_rwnd = asoc->a_rwnd;
6453                 assocparams.sasoc_cookie_life = ktime_to_ms(asoc->cookie_life);
6454
6455                 list_for_each(pos, &asoc->peer.transport_addr_list) {
6456                         cnt++;
6457                 }
6458
6459                 assocparams.sasoc_number_peer_destinations = cnt;
6460         } else {
6461                 /* Values corresponding to the endpoint */
6462                 struct sctp_sock *sp = sctp_sk(sk);
6463
6464                 assocparams.sasoc_asocmaxrxt = sp->assocparams.sasoc_asocmaxrxt;
6465                 assocparams.sasoc_peer_rwnd = sp->assocparams.sasoc_peer_rwnd;
6466                 assocparams.sasoc_local_rwnd = sp->assocparams.sasoc_local_rwnd;
6467                 assocparams.sasoc_cookie_life =
6468                                         sp->assocparams.sasoc_cookie_life;
6469                 assocparams.sasoc_number_peer_destinations =
6470                                         sp->assocparams.
6471                                         sasoc_number_peer_destinations;
6472         }
6473
6474         if (put_user(len, optlen))
6475                 return -EFAULT;
6476
6477         if (copy_to_user(optval, &assocparams, len))
6478                 return -EFAULT;
6479
6480         return 0;
6481 }
6482
6483 /*
6484  * 7.1.16 Set/clear IPv4 mapped addresses (SCTP_I_WANT_MAPPED_V4_ADDR)
6485  *
6486  * This socket option is a boolean flag which turns on or off mapped V4
6487  * addresses.  If this option is turned on and the socket is type
6488  * PF_INET6, then IPv4 addresses will be mapped to V6 representation.
6489  * If this option is turned off, then no mapping will be done of V4
6490  * addresses and a user will receive both PF_INET6 and PF_INET type
6491  * addresses on the socket.
6492  */
6493 static int sctp_getsockopt_mappedv4(struct sock *sk, int len,
6494                                     char __user *optval, int __user *optlen)
6495 {
6496         int val;
6497         struct sctp_sock *sp = sctp_sk(sk);
6498
6499         if (len < sizeof(int))
6500                 return -EINVAL;
6501
6502         len = sizeof(int);
6503         val = sp->v4mapped;
6504         if (put_user(len, optlen))
6505                 return -EFAULT;
6506         if (copy_to_user(optval, &val, len))
6507                 return -EFAULT;
6508
6509         return 0;
6510 }
6511
6512 /*
6513  * 7.1.29.  Set or Get the default context (SCTP_CONTEXT)
6514  * (chapter and verse is quoted at sctp_setsockopt_context())
6515  */
6516 static int sctp_getsockopt_context(struct sock *sk, int len,
6517                                    char __user *optval, int __user *optlen)
6518 {
6519         struct sctp_assoc_value params;
6520         struct sctp_sock *sp;
6521         struct sctp_association *asoc;
6522
6523         if (len < sizeof(struct sctp_assoc_value))
6524                 return -EINVAL;
6525
6526         len = sizeof(struct sctp_assoc_value);
6527
6528         if (copy_from_user(&params, optval, len))
6529                 return -EFAULT;
6530
6531         sp = sctp_sk(sk);
6532
6533         if (params.assoc_id != 0) {
6534                 asoc = sctp_id2assoc(sk, params.assoc_id);
6535                 if (!asoc)
6536                         return -EINVAL;
6537                 params.assoc_value = asoc->default_rcv_context;
6538         } else {
6539                 params.assoc_value = sp->default_rcv_context;
6540         }
6541
6542         if (put_user(len, optlen))
6543                 return -EFAULT;
6544         if (copy_to_user(optval, &params, len))
6545                 return -EFAULT;
6546
6547         return 0;
6548 }
6549
6550 /*
6551  * 8.1.16.  Get or Set the Maximum Fragmentation Size (SCTP_MAXSEG)
6552  * This option will get or set the maximum size to put in any outgoing
6553  * SCTP DATA chunk.  If a message is larger than this size it will be
6554  * fragmented by SCTP into the specified size.  Note that the underlying
6555  * SCTP implementation may fragment into smaller sized chunks when the
6556  * PMTU of the underlying association is smaller than the value set by
6557  * the user.  The default value for this option is '0' which indicates
6558  * the user is NOT limiting fragmentation and only the PMTU will effect
6559  * SCTP's choice of DATA chunk size.  Note also that values set larger
6560  * than the maximum size of an IP datagram will effectively let SCTP
6561  * control fragmentation (i.e. the same as setting this option to 0).
6562  *
6563  * The following structure is used to access and modify this parameter:
6564  *
6565  * struct sctp_assoc_value {
6566  *   sctp_assoc_t assoc_id;
6567  *   uint32_t assoc_value;
6568  * };
6569  *
6570  * assoc_id:  This parameter is ignored for one-to-one style sockets.
6571  *    For one-to-many style sockets this parameter indicates which
6572  *    association the user is performing an action upon.  Note that if
6573  *    this field's value is zero then the endpoints default value is
6574  *    changed (effecting future associations only).
6575  * assoc_value:  This parameter specifies the maximum size in bytes.
6576  */
6577 static int sctp_getsockopt_maxseg(struct sock *sk, int len,
6578                                   char __user *optval, int __user *optlen)
6579 {
6580         struct sctp_assoc_value params;
6581         struct sctp_association *asoc;
6582
6583         if (len == sizeof(int)) {
6584                 pr_warn_ratelimited(DEPRECATED
6585                                     "%s (pid %d) "
6586                                     "Use of int in maxseg socket option.\n"
6587                                     "Use struct sctp_assoc_value instead\n",
6588                                     current->comm, task_pid_nr(current));
6589                 params.assoc_id = SCTP_FUTURE_ASSOC;
6590         } else if (len >= sizeof(struct sctp_assoc_value)) {
6591                 len = sizeof(struct sctp_assoc_value);
6592                 if (copy_from_user(&params, optval, len))
6593                         return -EFAULT;
6594         } else
6595                 return -EINVAL;
6596
6597         asoc = sctp_id2assoc(sk, params.assoc_id);
6598         if (!asoc && params.assoc_id != SCTP_FUTURE_ASSOC &&
6599             sctp_style(sk, UDP))
6600                 return -EINVAL;
6601
6602         if (asoc)
6603                 params.assoc_value = asoc->frag_point;
6604         else
6605                 params.assoc_value = sctp_sk(sk)->user_frag;
6606
6607         if (put_user(len, optlen))
6608                 return -EFAULT;
6609         if (len == sizeof(int)) {
6610                 if (copy_to_user(optval, &params.assoc_value, len))
6611                         return -EFAULT;
6612         } else {
6613                 if (copy_to_user(optval, &params, len))
6614                         return -EFAULT;
6615         }
6616
6617         return 0;
6618 }
6619
6620 /*
6621  * 7.1.24.  Get or set fragmented interleave (SCTP_FRAGMENT_INTERLEAVE)
6622  * (chapter and verse is quoted at sctp_setsockopt_fragment_interleave())
6623  */
6624 static int sctp_getsockopt_fragment_interleave(struct sock *sk, int len,
6625                                                char __user *optval, int __user *optlen)
6626 {
6627         int val;
6628
6629         if (len < sizeof(int))
6630                 return -EINVAL;
6631
6632         len = sizeof(int);
6633
6634         val = sctp_sk(sk)->frag_interleave;
6635         if (put_user(len, optlen))
6636                 return -EFAULT;
6637         if (copy_to_user(optval, &val, len))
6638                 return -EFAULT;
6639
6640         return 0;
6641 }
6642
6643 /*
6644  * 7.1.25.  Set or Get the sctp partial delivery point
6645  * (chapter and verse is quoted at sctp_setsockopt_partial_delivery_point())
6646  */
6647 static int sctp_getsockopt_partial_delivery_point(struct sock *sk, int len,
6648                                                   char __user *optval,
6649                                                   int __user *optlen)
6650 {
6651         u32 val;
6652
6653         if (len < sizeof(u32))
6654                 return -EINVAL;
6655
6656         len = sizeof(u32);
6657
6658         val = sctp_sk(sk)->pd_point;
6659         if (put_user(len, optlen))
6660                 return -EFAULT;
6661         if (copy_to_user(optval, &val, len))
6662                 return -EFAULT;
6663
6664         return 0;
6665 }
6666
6667 /*
6668  * 7.1.28.  Set or Get the maximum burst (SCTP_MAX_BURST)
6669  * (chapter and verse is quoted at sctp_setsockopt_maxburst())
6670  */
6671 static int sctp_getsockopt_maxburst(struct sock *sk, int len,
6672                                     char __user *optval,
6673                                     int __user *optlen)
6674 {
6675         struct sctp_assoc_value params;
6676         struct sctp_sock *sp;
6677         struct sctp_association *asoc;
6678
6679         if (len == sizeof(int)) {
6680                 pr_warn_ratelimited(DEPRECATED
6681                                     "%s (pid %d) "
6682                                     "Use of int in max_burst socket option.\n"
6683                                     "Use struct sctp_assoc_value instead\n",
6684                                     current->comm, task_pid_nr(current));
6685                 params.assoc_id = 0;
6686         } else if (len >= sizeof(struct sctp_assoc_value)) {
6687                 len = sizeof(struct sctp_assoc_value);
6688                 if (copy_from_user(&params, optval, len))
6689                         return -EFAULT;
6690         } else
6691                 return -EINVAL;
6692
6693         sp = sctp_sk(sk);
6694
6695         if (params.assoc_id != 0) {
6696                 asoc = sctp_id2assoc(sk, params.assoc_id);
6697                 if (!asoc)
6698                         return -EINVAL;
6699                 params.assoc_value = asoc->max_burst;
6700         } else
6701                 params.assoc_value = sp->max_burst;
6702
6703         if (len == sizeof(int)) {
6704                 if (copy_to_user(optval, &params.assoc_value, len))
6705                         return -EFAULT;
6706         } else {
6707                 if (copy_to_user(optval, &params, len))
6708                         return -EFAULT;
6709         }
6710
6711         return 0;
6712
6713 }
6714
6715 static int sctp_getsockopt_hmac_ident(struct sock *sk, int len,
6716                                     char __user *optval, int __user *optlen)
6717 {
6718         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
6719         struct sctp_hmacalgo  __user *p = (void __user *)optval;
6720         struct sctp_hmac_algo_param *hmacs;
6721         __u16 data_len = 0;
6722         u32 num_idents;
6723         int i;
6724
6725         if (!ep->auth_enable)
6726                 return -EACCES;
6727
6728         hmacs = ep->auth_hmacs_list;
6729         data_len = ntohs(hmacs->param_hdr.length) -
6730                    sizeof(struct sctp_paramhdr);
6731
6732         if (len < sizeof(struct sctp_hmacalgo) + data_len)
6733                 return -EINVAL;
6734
6735         len = sizeof(struct sctp_hmacalgo) + data_len;
6736         num_idents = data_len / sizeof(u16);
6737
6738         if (put_user(len, optlen))
6739                 return -EFAULT;
6740         if (put_user(num_idents, &p->shmac_num_idents))
6741                 return -EFAULT;
6742         for (i = 0; i < num_idents; i++) {
6743                 __u16 hmacid = ntohs(hmacs->hmac_ids[i]);
6744
6745                 if (copy_to_user(&p->shmac_idents[i], &hmacid, sizeof(__u16)))
6746                         return -EFAULT;
6747         }
6748         return 0;
6749 }
6750
6751 static int sctp_getsockopt_active_key(struct sock *sk, int len,
6752                                     char __user *optval, int __user *optlen)
6753 {
6754         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
6755         struct sctp_authkeyid val;
6756         struct sctp_association *asoc;
6757
6758         if (!ep->auth_enable)
6759                 return -EACCES;
6760
6761         if (len < sizeof(struct sctp_authkeyid))
6762                 return -EINVAL;
6763
6764         len = sizeof(struct sctp_authkeyid);
6765         if (copy_from_user(&val, optval, len))
6766                 return -EFAULT;
6767
6768         asoc = sctp_id2assoc(sk, val.scact_assoc_id);
6769         if (!asoc && val.scact_assoc_id && sctp_style(sk, UDP))
6770                 return -EINVAL;
6771
6772         if (asoc)
6773                 val.scact_keynumber = asoc->active_key_id;
6774         else
6775                 val.scact_keynumber = ep->active_key_id;
6776
6777         if (put_user(len, optlen))
6778                 return -EFAULT;
6779         if (copy_to_user(optval, &val, len))
6780                 return -EFAULT;
6781
6782         return 0;
6783 }
6784
6785 static int sctp_getsockopt_peer_auth_chunks(struct sock *sk, int len,
6786                                     char __user *optval, int __user *optlen)
6787 {
6788         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
6789         struct sctp_authchunks __user *p = (void __user *)optval;
6790         struct sctp_authchunks val;
6791         struct sctp_association *asoc;
6792         struct sctp_chunks_param *ch;
6793         u32    num_chunks = 0;
6794         char __user *to;
6795
6796         if (!ep->auth_enable)
6797                 return -EACCES;
6798
6799         if (len < sizeof(struct sctp_authchunks))
6800                 return -EINVAL;
6801
6802         if (copy_from_user(&val, optval, sizeof(val)))
6803                 return -EFAULT;
6804
6805         to = p->gauth_chunks;
6806         asoc = sctp_id2assoc(sk, val.gauth_assoc_id);
6807         if (!asoc)
6808                 return -EINVAL;
6809
6810         ch = asoc->peer.peer_chunks;
6811         if (!ch)
6812                 goto num;
6813
6814         /* See if the user provided enough room for all the data */
6815         num_chunks = ntohs(ch->param_hdr.length) - sizeof(struct sctp_paramhdr);
6816         if (len < num_chunks)
6817                 return -EINVAL;
6818
6819         if (copy_to_user(to, ch->chunks, num_chunks))
6820                 return -EFAULT;
6821 num:
6822         len = sizeof(struct sctp_authchunks) + num_chunks;
6823         if (put_user(len, optlen))
6824                 return -EFAULT;
6825         if (put_user(num_chunks, &p->gauth_number_of_chunks))
6826                 return -EFAULT;
6827         return 0;
6828 }
6829
6830 static int sctp_getsockopt_local_auth_chunks(struct sock *sk, int len,
6831                                     char __user *optval, int __user *optlen)
6832 {
6833         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
6834         struct sctp_authchunks __user *p = (void __user *)optval;
6835         struct sctp_authchunks val;
6836         struct sctp_association *asoc;
6837         struct sctp_chunks_param *ch;
6838         u32    num_chunks = 0;
6839         char __user *to;
6840
6841         if (!ep->auth_enable)
6842                 return -EACCES;
6843
6844         if (len < sizeof(struct sctp_authchunks))
6845                 return -EINVAL;
6846
6847         if (copy_from_user(&val, optval, sizeof(val)))
6848                 return -EFAULT;
6849
6850         to = p->gauth_chunks;
6851         asoc = sctp_id2assoc(sk, val.gauth_assoc_id);
6852         if (!asoc && val.gauth_assoc_id != SCTP_FUTURE_ASSOC &&
6853             sctp_style(sk, UDP))
6854                 return -EINVAL;
6855
6856         ch = asoc ? (struct sctp_chunks_param *)asoc->c.auth_chunks
6857                   : ep->auth_chunk_list;
6858         if (!ch)
6859                 goto num;
6860
6861         num_chunks = ntohs(ch->param_hdr.length) - sizeof(struct sctp_paramhdr);
6862         if (len < sizeof(struct sctp_authchunks) + num_chunks)
6863                 return -EINVAL;
6864
6865         if (copy_to_user(to, ch->chunks, num_chunks))
6866                 return -EFAULT;
6867 num:
6868         len = sizeof(struct sctp_authchunks) + num_chunks;
6869         if (put_user(len, optlen))
6870                 return -EFAULT;
6871         if (put_user(num_chunks, &p->gauth_number_of_chunks))
6872                 return -EFAULT;
6873
6874         return 0;
6875 }
6876
6877 /*
6878  * 8.2.5.  Get the Current Number of Associations (SCTP_GET_ASSOC_NUMBER)
6879  * This option gets the current number of associations that are attached
6880  * to a one-to-many style socket.  The option value is an uint32_t.
6881  */
6882 static int sctp_getsockopt_assoc_number(struct sock *sk, int len,
6883                                     char __user *optval, int __user *optlen)
6884 {
6885         struct sctp_sock *sp = sctp_sk(sk);
6886         struct sctp_association *asoc;
6887         u32 val = 0;
6888
6889         if (sctp_style(sk, TCP))
6890                 return -EOPNOTSUPP;
6891
6892         if (len < sizeof(u32))
6893                 return -EINVAL;
6894
6895         len = sizeof(u32);
6896
6897         list_for_each_entry(asoc, &(sp->ep->asocs), asocs) {
6898                 val++;
6899         }
6900
6901         if (put_user(len, optlen))
6902                 return -EFAULT;
6903         if (copy_to_user(optval, &val, len))
6904                 return -EFAULT;
6905
6906         return 0;
6907 }
6908
6909 /*
6910  * 8.1.23 SCTP_AUTO_ASCONF
6911  * See the corresponding setsockopt entry as description
6912  */
6913 static int sctp_getsockopt_auto_asconf(struct sock *sk, int len,
6914                                    char __user *optval, int __user *optlen)
6915 {
6916         int val = 0;
6917
6918         if (len < sizeof(int))
6919                 return -EINVAL;
6920
6921         len = sizeof(int);
6922         if (sctp_sk(sk)->do_auto_asconf && sctp_is_ep_boundall(sk))
6923                 val = 1;
6924         if (put_user(len, optlen))
6925                 return -EFAULT;
6926         if (copy_to_user(optval, &val, len))
6927                 return -EFAULT;
6928         return 0;
6929 }
6930
6931 /*
6932  * 8.2.6. Get the Current Identifiers of Associations
6933  *        (SCTP_GET_ASSOC_ID_LIST)
6934  *
6935  * This option gets the current list of SCTP association identifiers of
6936  * the SCTP associations handled by a one-to-many style socket.
6937  */
6938 static int sctp_getsockopt_assoc_ids(struct sock *sk, int len,
6939                                     char __user *optval, int __user *optlen)
6940 {
6941         struct sctp_sock *sp = sctp_sk(sk);
6942         struct sctp_association *asoc;
6943         struct sctp_assoc_ids *ids;
6944         u32 num = 0;
6945
6946         if (sctp_style(sk, TCP))
6947                 return -EOPNOTSUPP;
6948
6949         if (len < sizeof(struct sctp_assoc_ids))
6950                 return -EINVAL;
6951
6952         list_for_each_entry(asoc, &(sp->ep->asocs), asocs) {
6953                 num++;
6954         }
6955
6956         if (len < sizeof(struct sctp_assoc_ids) + sizeof(sctp_assoc_t) * num)
6957                 return -EINVAL;
6958
6959         len = sizeof(struct sctp_assoc_ids) + sizeof(sctp_assoc_t) * num;
6960
6961         ids = kmalloc(len, GFP_USER | __GFP_NOWARN);
6962         if (unlikely(!ids))
6963                 return -ENOMEM;
6964
6965         ids->gaids_number_of_ids = num;
6966         num = 0;
6967         list_for_each_entry(asoc, &(sp->ep->asocs), asocs) {
6968                 ids->gaids_assoc_id[num++] = asoc->assoc_id;
6969         }
6970
6971         if (put_user(len, optlen) || copy_to_user(optval, ids, len)) {
6972                 kfree(ids);
6973                 return -EFAULT;
6974         }
6975
6976         kfree(ids);
6977         return 0;
6978 }
6979
6980 /*
6981  * SCTP_PEER_ADDR_THLDS
6982  *
6983  * This option allows us to fetch the partially failed threshold for one or all
6984  * transports in an association.  See Section 6.1 of:
6985  * http://www.ietf.org/id/draft-nishida-tsvwg-sctp-failover-05.txt
6986  */
6987 static int sctp_getsockopt_paddr_thresholds(struct sock *sk,
6988                                             char __user *optval,
6989                                             int len,
6990                                             int __user *optlen)
6991 {
6992         struct sctp_paddrthlds val;
6993         struct sctp_transport *trans;
6994         struct sctp_association *asoc;
6995
6996         if (len < sizeof(struct sctp_paddrthlds))
6997                 return -EINVAL;
6998         len = sizeof(struct sctp_paddrthlds);
6999         if (copy_from_user(&val, (struct sctp_paddrthlds __user *)optval, len))
7000                 return -EFAULT;
7001
7002         if (!sctp_is_any(sk, (const union sctp_addr *)&val.spt_address)) {
7003                 trans = sctp_addr_id2transport(sk, &val.spt_address,
7004                                                val.spt_assoc_id);
7005                 if (!trans)
7006                         return -ENOENT;
7007
7008                 val.spt_pathmaxrxt = trans->pathmaxrxt;
7009                 val.spt_pathpfthld = trans->pf_retrans;
7010
7011                 return 0;
7012         }
7013
7014         asoc = sctp_id2assoc(sk, val.spt_assoc_id);
7015         if (!asoc && val.spt_assoc_id != SCTP_FUTURE_ASSOC &&
7016             sctp_style(sk, UDP))
7017                 return -EINVAL;
7018
7019         if (asoc) {
7020                 val.spt_pathpfthld = asoc->pf_retrans;
7021                 val.spt_pathmaxrxt = asoc->pathmaxrxt;
7022         } else {
7023                 struct sctp_sock *sp = sctp_sk(sk);
7024
7025                 val.spt_pathpfthld = sp->pf_retrans;
7026                 val.spt_pathmaxrxt = sp->pathmaxrxt;
7027         }
7028
7029         if (put_user(len, optlen) || copy_to_user(optval, &val, len))
7030                 return -EFAULT;
7031
7032         return 0;
7033 }
7034
7035 /*
7036  * SCTP_GET_ASSOC_STATS
7037  *
7038  * This option retrieves local per endpoint statistics. It is modeled
7039  * after OpenSolaris' implementation
7040  */
7041 static int sctp_getsockopt_assoc_stats(struct sock *sk, int len,
7042                                        char __user *optval,
7043                                        int __user *optlen)
7044 {
7045         struct sctp_assoc_stats sas;
7046         struct sctp_association *asoc = NULL;
7047
7048         /* User must provide at least the assoc id */
7049         if (len < sizeof(sctp_assoc_t))
7050                 return -EINVAL;
7051
7052         /* Allow the struct to grow and fill in as much as possible */
7053         len = min_t(size_t, len, sizeof(sas));
7054
7055         if (copy_from_user(&sas, optval, len))
7056                 return -EFAULT;
7057
7058         asoc = sctp_id2assoc(sk, sas.sas_assoc_id);
7059         if (!asoc)
7060                 return -EINVAL;
7061
7062         sas.sas_rtxchunks = asoc->stats.rtxchunks;
7063         sas.sas_gapcnt = asoc->stats.gapcnt;
7064         sas.sas_outofseqtsns = asoc->stats.outofseqtsns;
7065         sas.sas_osacks = asoc->stats.osacks;
7066         sas.sas_isacks = asoc->stats.isacks;
7067         sas.sas_octrlchunks = asoc->stats.octrlchunks;
7068         sas.sas_ictrlchunks = asoc->stats.ictrlchunks;
7069         sas.sas_oodchunks = asoc->stats.oodchunks;
7070         sas.sas_iodchunks = asoc->stats.iodchunks;
7071         sas.sas_ouodchunks = asoc->stats.ouodchunks;
7072         sas.sas_iuodchunks = asoc->stats.iuodchunks;
7073         sas.sas_idupchunks = asoc->stats.idupchunks;
7074         sas.sas_opackets = asoc->stats.opackets;
7075         sas.sas_ipackets = asoc->stats.ipackets;
7076
7077         /* New high max rto observed, will return 0 if not a single
7078          * RTO update took place. obs_rto_ipaddr will be bogus
7079          * in such a case
7080          */
7081         sas.sas_maxrto = asoc->stats.max_obs_rto;
7082         memcpy(&sas.sas_obs_rto_ipaddr, &asoc->stats.obs_rto_ipaddr,
7083                 sizeof(struct sockaddr_storage));
7084
7085         /* Mark beginning of a new observation period */
7086         asoc->stats.max_obs_rto = asoc->rto_min;
7087
7088         if (put_user(len, optlen))
7089                 return -EFAULT;
7090
7091         pr_debug("%s: len:%d, assoc_id:%d\n", __func__, len, sas.sas_assoc_id);
7092
7093         if (copy_to_user(optval, &sas, len))
7094                 return -EFAULT;
7095
7096         return 0;
7097 }
7098
7099 static int sctp_getsockopt_recvrcvinfo(struct sock *sk, int len,
7100                                        char __user *optval,
7101                                        int __user *optlen)
7102 {
7103         int val = 0;
7104
7105         if (len < sizeof(int))
7106                 return -EINVAL;
7107
7108         len = sizeof(int);
7109         if (sctp_sk(sk)->recvrcvinfo)
7110                 val = 1;
7111         if (put_user(len, optlen))
7112                 return -EFAULT;
7113         if (copy_to_user(optval, &val, len))
7114                 return -EFAULT;
7115
7116         return 0;
7117 }
7118
7119 static int sctp_getsockopt_recvnxtinfo(struct sock *sk, int len,
7120                                        char __user *optval,
7121                                        int __user *optlen)
7122 {
7123         int val = 0;
7124
7125         if (len < sizeof(int))
7126                 return -EINVAL;
7127
7128         len = sizeof(int);
7129         if (sctp_sk(sk)->recvnxtinfo)
7130                 val = 1;
7131         if (put_user(len, optlen))
7132                 return -EFAULT;
7133         if (copy_to_user(optval, &val, len))
7134                 return -EFAULT;
7135
7136         return 0;
7137 }
7138
7139 static int sctp_getsockopt_pr_supported(struct sock *sk, int len,
7140                                         char __user *optval,
7141                                         int __user *optlen)
7142 {
7143         struct sctp_assoc_value params;
7144         struct sctp_association *asoc;
7145         int retval = -EFAULT;
7146
7147         if (len < sizeof(params)) {
7148                 retval = -EINVAL;
7149                 goto out;
7150         }
7151
7152         len = sizeof(params);
7153         if (copy_from_user(&params, optval, len))
7154                 goto out;
7155
7156         asoc = sctp_id2assoc(sk, params.assoc_id);
7157         if (!asoc && params.assoc_id != SCTP_FUTURE_ASSOC &&
7158             sctp_style(sk, UDP)) {
7159                 retval = -EINVAL;
7160                 goto out;
7161         }
7162
7163         params.assoc_value = asoc ? asoc->prsctp_enable
7164                                   : sctp_sk(sk)->ep->prsctp_enable;
7165
7166         if (put_user(len, optlen))
7167                 goto out;
7168
7169         if (copy_to_user(optval, &params, len))
7170                 goto out;
7171
7172         retval = 0;
7173
7174 out:
7175         return retval;
7176 }
7177
7178 static int sctp_getsockopt_default_prinfo(struct sock *sk, int len,
7179                                           char __user *optval,
7180                                           int __user *optlen)
7181 {
7182         struct sctp_default_prinfo info;
7183         struct sctp_association *asoc;
7184         int retval = -EFAULT;
7185
7186         if (len < sizeof(info)) {
7187                 retval = -EINVAL;
7188                 goto out;
7189         }
7190
7191         len = sizeof(info);
7192         if (copy_from_user(&info, optval, len))
7193                 goto out;
7194
7195         asoc = sctp_id2assoc(sk, info.pr_assoc_id);
7196         if (asoc) {
7197                 info.pr_policy = SCTP_PR_POLICY(asoc->default_flags);
7198                 info.pr_value = asoc->default_timetolive;
7199         } else if (!info.pr_assoc_id) {
7200                 struct sctp_sock *sp = sctp_sk(sk);
7201
7202                 info.pr_policy = SCTP_PR_POLICY(sp->default_flags);
7203                 info.pr_value = sp->default_timetolive;
7204         } else {
7205                 retval = -EINVAL;
7206                 goto out;
7207         }
7208
7209         if (put_user(len, optlen))
7210                 goto out;
7211
7212         if (copy_to_user(optval, &info, len))
7213                 goto out;
7214
7215         retval = 0;
7216
7217 out:
7218         return retval;
7219 }
7220
7221 static int sctp_getsockopt_pr_assocstatus(struct sock *sk, int len,
7222                                           char __user *optval,
7223                                           int __user *optlen)
7224 {
7225         struct sctp_prstatus params;
7226         struct sctp_association *asoc;
7227         int policy;
7228         int retval = -EINVAL;
7229
7230         if (len < sizeof(params))
7231                 goto out;
7232
7233         len = sizeof(params);
7234         if (copy_from_user(&params, optval, len)) {
7235                 retval = -EFAULT;
7236                 goto out;
7237         }
7238
7239         policy = params.sprstat_policy;
7240         if (!policy || (policy & ~(SCTP_PR_SCTP_MASK | SCTP_PR_SCTP_ALL)) ||
7241             ((policy & SCTP_PR_SCTP_ALL) && (policy & SCTP_PR_SCTP_MASK)))
7242                 goto out;
7243
7244         asoc = sctp_id2assoc(sk, params.sprstat_assoc_id);
7245         if (!asoc)
7246                 goto out;
7247
7248         if (policy == SCTP_PR_SCTP_ALL) {
7249                 params.sprstat_abandoned_unsent = 0;
7250                 params.sprstat_abandoned_sent = 0;
7251                 for (policy = 0; policy <= SCTP_PR_INDEX(MAX); policy++) {
7252                         params.sprstat_abandoned_unsent +=
7253                                 asoc->abandoned_unsent[policy];
7254                         params.sprstat_abandoned_sent +=
7255                                 asoc->abandoned_sent[policy];
7256                 }
7257         } else {
7258                 params.sprstat_abandoned_unsent =
7259                         asoc->abandoned_unsent[__SCTP_PR_INDEX(policy)];
7260                 params.sprstat_abandoned_sent =
7261                         asoc->abandoned_sent[__SCTP_PR_INDEX(policy)];
7262         }
7263
7264         if (put_user(len, optlen)) {
7265                 retval = -EFAULT;
7266                 goto out;
7267         }
7268
7269         if (copy_to_user(optval, &params, len)) {
7270                 retval = -EFAULT;
7271                 goto out;
7272         }
7273
7274         retval = 0;
7275
7276 out:
7277         return retval;
7278 }
7279
7280 static int sctp_getsockopt_pr_streamstatus(struct sock *sk, int len,
7281                                            char __user *optval,
7282                                            int __user *optlen)
7283 {
7284         struct sctp_stream_out_ext *streamoute;
7285         struct sctp_association *asoc;
7286         struct sctp_prstatus params;
7287         int retval = -EINVAL;
7288         int policy;
7289
7290         if (len < sizeof(params))
7291                 goto out;
7292
7293         len = sizeof(params);
7294         if (copy_from_user(&params, optval, len)) {
7295                 retval = -EFAULT;
7296                 goto out;
7297         }
7298
7299         policy = params.sprstat_policy;
7300         if (!policy || (policy & ~(SCTP_PR_SCTP_MASK | SCTP_PR_SCTP_ALL)) ||
7301             ((policy & SCTP_PR_SCTP_ALL) && (policy & SCTP_PR_SCTP_MASK)))
7302                 goto out;
7303
7304         asoc = sctp_id2assoc(sk, params.sprstat_assoc_id);
7305         if (!asoc || params.sprstat_sid >= asoc->stream.outcnt)
7306                 goto out;
7307
7308         streamoute = SCTP_SO(&asoc->stream, params.sprstat_sid)->ext;
7309         if (!streamoute) {
7310                 /* Not allocated yet, means all stats are 0 */
7311                 params.sprstat_abandoned_unsent = 0;
7312                 params.sprstat_abandoned_sent = 0;
7313                 retval = 0;
7314                 goto out;
7315         }
7316
7317         if (policy == SCTP_PR_SCTP_ALL) {
7318                 params.sprstat_abandoned_unsent = 0;
7319                 params.sprstat_abandoned_sent = 0;
7320                 for (policy = 0; policy <= SCTP_PR_INDEX(MAX); policy++) {
7321                         params.sprstat_abandoned_unsent +=
7322                                 streamoute->abandoned_unsent[policy];
7323                         params.sprstat_abandoned_sent +=
7324                                 streamoute->abandoned_sent[policy];
7325                 }
7326         } else {
7327                 params.sprstat_abandoned_unsent =
7328                         streamoute->abandoned_unsent[__SCTP_PR_INDEX(policy)];
7329                 params.sprstat_abandoned_sent =
7330                         streamoute->abandoned_sent[__SCTP_PR_INDEX(policy)];
7331         }
7332
7333         if (put_user(len, optlen) || copy_to_user(optval, &params, len)) {
7334                 retval = -EFAULT;
7335                 goto out;
7336         }
7337
7338         retval = 0;
7339
7340 out:
7341         return retval;
7342 }
7343
7344 static int sctp_getsockopt_reconfig_supported(struct sock *sk, int len,
7345                                               char __user *optval,
7346                                               int __user *optlen)
7347 {
7348         struct sctp_assoc_value params;
7349         struct sctp_association *asoc;
7350         int retval = -EFAULT;
7351
7352         if (len < sizeof(params)) {
7353                 retval = -EINVAL;
7354                 goto out;
7355         }
7356
7357         len = sizeof(params);
7358         if (copy_from_user(&params, optval, len))
7359                 goto out;
7360
7361         asoc = sctp_id2assoc(sk, params.assoc_id);
7362         if (!asoc && params.assoc_id != SCTP_FUTURE_ASSOC &&
7363             sctp_style(sk, UDP)) {
7364                 retval = -EINVAL;
7365                 goto out;
7366         }
7367
7368         params.assoc_value = asoc ? asoc->reconf_enable
7369                                   : sctp_sk(sk)->ep->reconf_enable;
7370
7371         if (put_user(len, optlen))
7372                 goto out;
7373
7374         if (copy_to_user(optval, &params, len))
7375                 goto out;
7376
7377         retval = 0;
7378
7379 out:
7380         return retval;
7381 }
7382
7383 static int sctp_getsockopt_enable_strreset(struct sock *sk, int len,
7384                                            char __user *optval,
7385                                            int __user *optlen)
7386 {
7387         struct sctp_assoc_value params;
7388         struct sctp_association *asoc;
7389         int retval = -EFAULT;
7390
7391         if (len < sizeof(params)) {
7392                 retval = -EINVAL;
7393                 goto out;
7394         }
7395
7396         len = sizeof(params);
7397         if (copy_from_user(&params, optval, len))
7398                 goto out;
7399
7400         asoc = sctp_id2assoc(sk, params.assoc_id);
7401         if (asoc) {
7402                 params.assoc_value = asoc->strreset_enable;
7403         } else if (!params.assoc_id) {
7404                 struct sctp_sock *sp = sctp_sk(sk);
7405
7406                 params.assoc_value = sp->ep->strreset_enable;
7407         } else {
7408                 retval = -EINVAL;
7409                 goto out;
7410         }
7411
7412         if (put_user(len, optlen))
7413                 goto out;
7414
7415         if (copy_to_user(optval, &params, len))
7416                 goto out;
7417
7418         retval = 0;
7419
7420 out:
7421         return retval;
7422 }
7423
7424 static int sctp_getsockopt_scheduler(struct sock *sk, int len,
7425                                      char __user *optval,
7426                                      int __user *optlen)
7427 {
7428         struct sctp_assoc_value params;
7429         struct sctp_association *asoc;
7430         int retval = -EFAULT;
7431
7432         if (len < sizeof(params)) {
7433                 retval = -EINVAL;
7434                 goto out;
7435         }
7436
7437         len = sizeof(params);
7438         if (copy_from_user(&params, optval, len))
7439                 goto out;
7440
7441         asoc = sctp_id2assoc(sk, params.assoc_id);
7442         if (!asoc) {
7443                 retval = -EINVAL;
7444                 goto out;
7445         }
7446
7447         params.assoc_value = sctp_sched_get_sched(asoc);
7448
7449         if (put_user(len, optlen))
7450                 goto out;
7451
7452         if (copy_to_user(optval, &params, len))
7453                 goto out;
7454
7455         retval = 0;
7456
7457 out:
7458         return retval;
7459 }
7460
7461 static int sctp_getsockopt_scheduler_value(struct sock *sk, int len,
7462                                            char __user *optval,
7463                                            int __user *optlen)
7464 {
7465         struct sctp_stream_value params;
7466         struct sctp_association *asoc;
7467         int retval = -EFAULT;
7468
7469         if (len < sizeof(params)) {
7470                 retval = -EINVAL;
7471                 goto out;
7472         }
7473
7474         len = sizeof(params);
7475         if (copy_from_user(&params, optval, len))
7476                 goto out;
7477
7478         asoc = sctp_id2assoc(sk, params.assoc_id);
7479         if (!asoc) {
7480                 retval = -EINVAL;
7481                 goto out;
7482         }
7483
7484         retval = sctp_sched_get_value(asoc, params.stream_id,
7485                                       &params.stream_value);
7486         if (retval)
7487                 goto out;
7488
7489         if (put_user(len, optlen)) {
7490                 retval = -EFAULT;
7491                 goto out;
7492         }
7493
7494         if (copy_to_user(optval, &params, len)) {
7495                 retval = -EFAULT;
7496                 goto out;
7497         }
7498
7499 out:
7500         return retval;
7501 }
7502
7503 static int sctp_getsockopt_interleaving_supported(struct sock *sk, int len,
7504                                                   char __user *optval,
7505                                                   int __user *optlen)
7506 {
7507         struct sctp_assoc_value params;
7508         struct sctp_association *asoc;
7509         int retval = -EFAULT;
7510
7511         if (len < sizeof(params)) {
7512                 retval = -EINVAL;
7513                 goto out;
7514         }
7515
7516         len = sizeof(params);
7517         if (copy_from_user(&params, optval, len))
7518                 goto out;
7519
7520         asoc = sctp_id2assoc(sk, params.assoc_id);
7521         if (!asoc && params.assoc_id != SCTP_FUTURE_ASSOC &&
7522             sctp_style(sk, UDP)) {
7523                 retval = -EINVAL;
7524                 goto out;
7525         }
7526
7527         params.assoc_value = asoc ? asoc->intl_enable
7528                                   : sctp_sk(sk)->strm_interleave;
7529
7530         if (put_user(len, optlen))
7531                 goto out;
7532
7533         if (copy_to_user(optval, &params, len))
7534                 goto out;
7535
7536         retval = 0;
7537
7538 out:
7539         return retval;
7540 }
7541
7542 static int sctp_getsockopt_reuse_port(struct sock *sk, int len,
7543                                       char __user *optval,
7544                                       int __user *optlen)
7545 {
7546         int val;
7547
7548         if (len < sizeof(int))
7549                 return -EINVAL;
7550
7551         len = sizeof(int);
7552         val = sctp_sk(sk)->reuse;
7553         if (put_user(len, optlen))
7554                 return -EFAULT;
7555
7556         if (copy_to_user(optval, &val, len))
7557                 return -EFAULT;
7558
7559         return 0;
7560 }
7561
7562 static int sctp_getsockopt_event(struct sock *sk, int len, char __user *optval,
7563                                  int __user *optlen)
7564 {
7565         struct sctp_association *asoc;
7566         struct sctp_event param;
7567         __u16 subscribe;
7568
7569         if (len < sizeof(param))
7570                 return -EINVAL;
7571
7572         len = sizeof(param);
7573         if (copy_from_user(&param, optval, len))
7574                 return -EFAULT;
7575
7576         if (param.se_type < SCTP_SN_TYPE_BASE ||
7577             param.se_type > SCTP_SN_TYPE_MAX)
7578                 return -EINVAL;
7579
7580         asoc = sctp_id2assoc(sk, param.se_assoc_id);
7581         subscribe = asoc ? asoc->subscribe : sctp_sk(sk)->subscribe;
7582         param.se_on = sctp_ulpevent_type_enabled(subscribe, param.se_type);
7583
7584         if (put_user(len, optlen))
7585                 return -EFAULT;
7586
7587         if (copy_to_user(optval, &param, len))
7588                 return -EFAULT;
7589
7590         return 0;
7591 }
7592
7593 static int sctp_getsockopt(struct sock *sk, int level, int optname,
7594                            char __user *optval, int __user *optlen)
7595 {
7596         int retval = 0;
7597         int len;
7598
7599         pr_debug("%s: sk:%p, optname:%d\n", __func__, sk, optname);
7600
7601         /* I can hardly begin to describe how wrong this is.  This is
7602          * so broken as to be worse than useless.  The API draft
7603          * REALLY is NOT helpful here...  I am not convinced that the
7604          * semantics of getsockopt() with a level OTHER THAN SOL_SCTP
7605          * are at all well-founded.
7606          */
7607         if (level != SOL_SCTP) {
7608                 struct sctp_af *af = sctp_sk(sk)->pf->af;
7609
7610                 retval = af->getsockopt(sk, level, optname, optval, optlen);
7611                 return retval;
7612         }
7613
7614         if (get_user(len, optlen))
7615                 return -EFAULT;
7616
7617         if (len < 0)
7618                 return -EINVAL;
7619
7620         lock_sock(sk);
7621
7622         switch (optname) {
7623         case SCTP_STATUS:
7624                 retval = sctp_getsockopt_sctp_status(sk, len, optval, optlen);
7625                 break;
7626         case SCTP_DISABLE_FRAGMENTS:
7627                 retval = sctp_getsockopt_disable_fragments(sk, len, optval,
7628                                                            optlen);
7629                 break;
7630         case SCTP_EVENTS:
7631                 retval = sctp_getsockopt_events(sk, len, optval, optlen);
7632                 break;
7633         case SCTP_AUTOCLOSE:
7634                 retval = sctp_getsockopt_autoclose(sk, len, optval, optlen);
7635                 break;
7636         case SCTP_SOCKOPT_PEELOFF:
7637                 retval = sctp_getsockopt_peeloff(sk, len, optval, optlen);
7638                 break;
7639         case SCTP_SOCKOPT_PEELOFF_FLAGS:
7640                 retval = sctp_getsockopt_peeloff_flags(sk, len, optval, optlen);
7641                 break;
7642         case SCTP_PEER_ADDR_PARAMS:
7643                 retval = sctp_getsockopt_peer_addr_params(sk, len, optval,
7644                                                           optlen);
7645                 break;
7646         case SCTP_DELAYED_SACK:
7647                 retval = sctp_getsockopt_delayed_ack(sk, len, optval,
7648                                                           optlen);
7649                 break;
7650         case SCTP_INITMSG:
7651                 retval = sctp_getsockopt_initmsg(sk, len, optval, optlen);
7652                 break;
7653         case SCTP_GET_PEER_ADDRS:
7654                 retval = sctp_getsockopt_peer_addrs(sk, len, optval,
7655                                                     optlen);
7656                 break;
7657         case SCTP_GET_LOCAL_ADDRS:
7658                 retval = sctp_getsockopt_local_addrs(sk, len, optval,
7659                                                      optlen);
7660                 break;
7661         case SCTP_SOCKOPT_CONNECTX3:
7662                 retval = sctp_getsockopt_connectx3(sk, len, optval, optlen);
7663                 break;
7664         case SCTP_DEFAULT_SEND_PARAM:
7665                 retval = sctp_getsockopt_default_send_param(sk, len,
7666                                                             optval, optlen);
7667                 break;
7668         case SCTP_DEFAULT_SNDINFO:
7669                 retval = sctp_getsockopt_default_sndinfo(sk, len,
7670                                                          optval, optlen);
7671                 break;
7672         case SCTP_PRIMARY_ADDR:
7673                 retval = sctp_getsockopt_primary_addr(sk, len, optval, optlen);
7674                 break;
7675         case SCTP_NODELAY:
7676                 retval = sctp_getsockopt_nodelay(sk, len, optval, optlen);
7677                 break;
7678         case SCTP_RTOINFO:
7679                 retval = sctp_getsockopt_rtoinfo(sk, len, optval, optlen);
7680                 break;
7681         case SCTP_ASSOCINFO:
7682                 retval = sctp_getsockopt_associnfo(sk, len, optval, optlen);
7683                 break;
7684         case SCTP_I_WANT_MAPPED_V4_ADDR:
7685                 retval = sctp_getsockopt_mappedv4(sk, len, optval, optlen);
7686                 break;
7687         case SCTP_MAXSEG:
7688                 retval = sctp_getsockopt_maxseg(sk, len, optval, optlen);
7689                 break;
7690         case SCTP_GET_PEER_ADDR_INFO:
7691                 retval = sctp_getsockopt_peer_addr_info(sk, len, optval,
7692                                                         optlen);
7693                 break;
7694         case SCTP_ADAPTATION_LAYER:
7695                 retval = sctp_getsockopt_adaptation_layer(sk, len, optval,
7696                                                         optlen);
7697                 break;
7698         case SCTP_CONTEXT:
7699                 retval = sctp_getsockopt_context(sk, len, optval, optlen);
7700                 break;
7701         case SCTP_FRAGMENT_INTERLEAVE:
7702                 retval = sctp_getsockopt_fragment_interleave(sk, len, optval,
7703                                                              optlen);
7704                 break;
7705         case SCTP_PARTIAL_DELIVERY_POINT:
7706                 retval = sctp_getsockopt_partial_delivery_point(sk, len, optval,
7707                                                                 optlen);
7708                 break;
7709         case SCTP_MAX_BURST:
7710                 retval = sctp_getsockopt_maxburst(sk, len, optval, optlen);
7711                 break;
7712         case SCTP_AUTH_KEY:
7713         case SCTP_AUTH_CHUNK:
7714         case SCTP_AUTH_DELETE_KEY:
7715         case SCTP_AUTH_DEACTIVATE_KEY:
7716                 retval = -EOPNOTSUPP;
7717                 break;
7718         case SCTP_HMAC_IDENT:
7719                 retval = sctp_getsockopt_hmac_ident(sk, len, optval, optlen);
7720                 break;
7721         case SCTP_AUTH_ACTIVE_KEY:
7722                 retval = sctp_getsockopt_active_key(sk, len, optval, optlen);
7723                 break;
7724         case SCTP_PEER_AUTH_CHUNKS:
7725                 retval = sctp_getsockopt_peer_auth_chunks(sk, len, optval,
7726                                                         optlen);
7727                 break;
7728         case SCTP_LOCAL_AUTH_CHUNKS:
7729                 retval = sctp_getsockopt_local_auth_chunks(sk, len, optval,
7730                                                         optlen);
7731                 break;
7732         case SCTP_GET_ASSOC_NUMBER:
7733                 retval = sctp_getsockopt_assoc_number(sk, len, optval, optlen);
7734                 break;
7735         case SCTP_GET_ASSOC_ID_LIST:
7736                 retval = sctp_getsockopt_assoc_ids(sk, len, optval, optlen);
7737                 break;
7738         case SCTP_AUTO_ASCONF:
7739                 retval = sctp_getsockopt_auto_asconf(sk, len, optval, optlen);
7740                 break;
7741         case SCTP_PEER_ADDR_THLDS:
7742                 retval = sctp_getsockopt_paddr_thresholds(sk, optval, len, optlen);
7743                 break;
7744         case SCTP_GET_ASSOC_STATS:
7745                 retval = sctp_getsockopt_assoc_stats(sk, len, optval, optlen);
7746                 break;
7747         case SCTP_RECVRCVINFO:
7748                 retval = sctp_getsockopt_recvrcvinfo(sk, len, optval, optlen);
7749                 break;
7750         case SCTP_RECVNXTINFO:
7751                 retval = sctp_getsockopt_recvnxtinfo(sk, len, optval, optlen);
7752                 break;
7753         case SCTP_PR_SUPPORTED:
7754                 retval = sctp_getsockopt_pr_supported(sk, len, optval, optlen);
7755                 break;
7756         case SCTP_DEFAULT_PRINFO:
7757                 retval = sctp_getsockopt_default_prinfo(sk, len, optval,
7758                                                         optlen);
7759                 break;
7760         case SCTP_PR_ASSOC_STATUS:
7761                 retval = sctp_getsockopt_pr_assocstatus(sk, len, optval,
7762                                                         optlen);
7763                 break;
7764         case SCTP_PR_STREAM_STATUS:
7765                 retval = sctp_getsockopt_pr_streamstatus(sk, len, optval,
7766                                                          optlen);
7767                 break;
7768         case SCTP_RECONFIG_SUPPORTED:
7769                 retval = sctp_getsockopt_reconfig_supported(sk, len, optval,
7770                                                             optlen);
7771                 break;
7772         case SCTP_ENABLE_STREAM_RESET:
7773                 retval = sctp_getsockopt_enable_strreset(sk, len, optval,
7774                                                          optlen);
7775                 break;
7776         case SCTP_STREAM_SCHEDULER:
7777                 retval = sctp_getsockopt_scheduler(sk, len, optval,
7778                                                    optlen);
7779                 break;
7780         case SCTP_STREAM_SCHEDULER_VALUE:
7781                 retval = sctp_getsockopt_scheduler_value(sk, len, optval,
7782                                                          optlen);
7783                 break;
7784         case SCTP_INTERLEAVING_SUPPORTED:
7785                 retval = sctp_getsockopt_interleaving_supported(sk, len, optval,
7786                                                                 optlen);
7787                 break;
7788         case SCTP_REUSE_PORT:
7789                 retval = sctp_getsockopt_reuse_port(sk, len, optval, optlen);
7790                 break;
7791         case SCTP_EVENT:
7792                 retval = sctp_getsockopt_event(sk, len, optval, optlen);
7793                 break;
7794         default:
7795                 retval = -ENOPROTOOPT;
7796                 break;
7797         }
7798
7799         release_sock(sk);
7800         return retval;
7801 }
7802
7803 static int sctp_hash(struct sock *sk)
7804 {
7805         /* STUB */
7806         return 0;
7807 }
7808
7809 static void sctp_unhash(struct sock *sk)
7810 {
7811         /* STUB */
7812 }
7813
7814 /* Check if port is acceptable.  Possibly find first available port.
7815  *
7816  * The port hash table (contained in the 'global' SCTP protocol storage
7817  * returned by struct sctp_protocol *sctp_get_protocol()). The hash
7818  * table is an array of 4096 lists (sctp_bind_hashbucket). Each
7819  * list (the list number is the port number hashed out, so as you
7820  * would expect from a hash function, all the ports in a given list have
7821  * such a number that hashes out to the same list number; you were
7822  * expecting that, right?); so each list has a set of ports, with a
7823  * link to the socket (struct sock) that uses it, the port number and
7824  * a fastreuse flag (FIXME: NPI ipg).
7825  */
7826 static struct sctp_bind_bucket *sctp_bucket_create(
7827         struct sctp_bind_hashbucket *head, struct net *, unsigned short snum);
7828
7829 static long sctp_get_port_local(struct sock *sk, union sctp_addr *addr)
7830 {
7831         struct sctp_sock *sp = sctp_sk(sk);
7832         bool reuse = (sk->sk_reuse || sp->reuse);
7833         struct sctp_bind_hashbucket *head; /* hash list */
7834         kuid_t uid = sock_i_uid(sk);
7835         struct sctp_bind_bucket *pp;
7836         unsigned short snum;
7837         int ret;
7838
7839         snum = ntohs(addr->v4.sin_port);
7840
7841         pr_debug("%s: begins, snum:%d\n", __func__, snum);
7842
7843         local_bh_disable();
7844
7845         if (snum == 0) {
7846                 /* Search for an available port. */
7847                 int low, high, remaining, index;
7848                 unsigned int rover;
7849                 struct net *net = sock_net(sk);
7850
7851                 inet_get_local_port_range(net, &low, &high);
7852                 remaining = (high - low) + 1;
7853                 rover = prandom_u32() % remaining + low;
7854
7855                 do {
7856                         rover++;
7857                         if ((rover < low) || (rover > high))
7858                                 rover = low;
7859                         if (inet_is_local_reserved_port(net, rover))
7860                                 continue;
7861                         index = sctp_phashfn(sock_net(sk), rover);
7862                         head = &sctp_port_hashtable[index];
7863                         spin_lock(&head->lock);
7864                         sctp_for_each_hentry(pp, &head->chain)
7865                                 if ((pp->port == rover) &&
7866                                     net_eq(sock_net(sk), pp->net))
7867                                         goto next;
7868                         break;
7869                 next:
7870                         spin_unlock(&head->lock);
7871                 } while (--remaining > 0);
7872
7873                 /* Exhausted local port range during search? */
7874                 ret = 1;
7875                 if (remaining <= 0)
7876                         goto fail;
7877
7878                 /* OK, here is the one we will use.  HEAD (the port
7879                  * hash table list entry) is non-NULL and we hold it's
7880                  * mutex.
7881                  */
7882                 snum = rover;
7883         } else {
7884                 /* We are given an specific port number; we verify
7885                  * that it is not being used. If it is used, we will
7886                  * exahust the search in the hash list corresponding
7887                  * to the port number (snum) - we detect that with the
7888                  * port iterator, pp being NULL.
7889                  */
7890                 head = &sctp_port_hashtable[sctp_phashfn(sock_net(sk), snum)];
7891                 spin_lock(&head->lock);
7892                 sctp_for_each_hentry(pp, &head->chain) {
7893                         if ((pp->port == snum) && net_eq(pp->net, sock_net(sk)))
7894                                 goto pp_found;
7895                 }
7896         }
7897         pp = NULL;
7898         goto pp_not_found;
7899 pp_found:
7900         if (!hlist_empty(&pp->owner)) {
7901                 /* We had a port hash table hit - there is an
7902                  * available port (pp != NULL) and it is being
7903                  * used by other socket (pp->owner not empty); that other
7904                  * socket is going to be sk2.
7905                  */
7906                 struct sock *sk2;
7907
7908                 pr_debug("%s: found a possible match\n", __func__);
7909
7910                 if ((pp->fastreuse && reuse &&
7911                      sk->sk_state != SCTP_SS_LISTENING) ||
7912                     (pp->fastreuseport && sk->sk_reuseport &&
7913                      uid_eq(pp->fastuid, uid)))
7914                         goto success;
7915
7916                 /* Run through the list of sockets bound to the port
7917                  * (pp->port) [via the pointers bind_next and
7918                  * bind_pprev in the struct sock *sk2 (pp->sk)]. On each one,
7919                  * we get the endpoint they describe and run through
7920                  * the endpoint's list of IP (v4 or v6) addresses,
7921                  * comparing each of the addresses with the address of
7922                  * the socket sk. If we find a match, then that means
7923                  * that this port/socket (sk) combination are already
7924                  * in an endpoint.
7925                  */
7926                 sk_for_each_bound(sk2, &pp->owner) {
7927                         struct sctp_sock *sp2 = sctp_sk(sk2);
7928                         struct sctp_endpoint *ep2 = sp2->ep;
7929
7930                         if (sk == sk2 ||
7931                             (reuse && (sk2->sk_reuse || sp2->reuse) &&
7932                              sk2->sk_state != SCTP_SS_LISTENING) ||
7933                             (sk->sk_reuseport && sk2->sk_reuseport &&
7934                              uid_eq(uid, sock_i_uid(sk2))))
7935                                 continue;
7936
7937                         if (sctp_bind_addr_conflict(&ep2->base.bind_addr,
7938                                                     addr, sp2, sp)) {
7939                                 ret = (long)sk2;
7940                                 goto fail_unlock;
7941                         }
7942                 }
7943
7944                 pr_debug("%s: found a match\n", __func__);
7945         }
7946 pp_not_found:
7947         /* If there was a hash table miss, create a new port.  */
7948         ret = 1;
7949         if (!pp && !(pp = sctp_bucket_create(head, sock_net(sk), snum)))
7950                 goto fail_unlock;
7951
7952         /* In either case (hit or miss), make sure fastreuse is 1 only
7953          * if sk->sk_reuse is too (that is, if the caller requested
7954          * SO_REUSEADDR on this socket -sk-).
7955          */
7956         if (hlist_empty(&pp->owner)) {
7957                 if (reuse && sk->sk_state != SCTP_SS_LISTENING)
7958                         pp->fastreuse = 1;
7959                 else
7960                         pp->fastreuse = 0;
7961
7962                 if (sk->sk_reuseport) {
7963                         pp->fastreuseport = 1;
7964                         pp->fastuid = uid;
7965                 } else {
7966                         pp->fastreuseport = 0;
7967                 }
7968         } else {
7969                 if (pp->fastreuse &&
7970                     (!reuse || sk->sk_state == SCTP_SS_LISTENING))
7971                         pp->fastreuse = 0;
7972
7973                 if (pp->fastreuseport &&
7974                     (!sk->sk_reuseport || !uid_eq(pp->fastuid, uid)))
7975                         pp->fastreuseport = 0;
7976         }
7977
7978         /* We are set, so fill up all the data in the hash table
7979          * entry, tie the socket list information with the rest of the
7980          * sockets FIXME: Blurry, NPI (ipg).
7981          */
7982 success:
7983         if (!sp->bind_hash) {
7984                 inet_sk(sk)->inet_num = snum;
7985                 sk_add_bind_node(sk, &pp->owner);
7986                 sp->bind_hash = pp;
7987         }
7988         ret = 0;
7989
7990 fail_unlock:
7991         spin_unlock(&head->lock);
7992
7993 fail:
7994         local_bh_enable();
7995         return ret;
7996 }
7997
7998 /* Assign a 'snum' port to the socket.  If snum == 0, an ephemeral
7999  * port is requested.
8000  */
8001 static int sctp_get_port(struct sock *sk, unsigned short snum)
8002 {
8003         union sctp_addr addr;
8004         struct sctp_af *af = sctp_sk(sk)->pf->af;
8005
8006         /* Set up a dummy address struct from the sk. */
8007         af->from_sk(&addr, sk);
8008         addr.v4.sin_port = htons(snum);
8009
8010         /* Note: sk->sk_num gets filled in if ephemeral port request. */
8011         return !!sctp_get_port_local(sk, &addr);
8012 }
8013
8014 /*
8015  *  Move a socket to LISTENING state.
8016  */
8017 static int sctp_listen_start(struct sock *sk, int backlog)
8018 {
8019         struct sctp_sock *sp = sctp_sk(sk);
8020         struct sctp_endpoint *ep = sp->ep;
8021         struct crypto_shash *tfm = NULL;
8022         char alg[32];
8023
8024         /* Allocate HMAC for generating cookie. */
8025         if (!sp->hmac && sp->sctp_hmac_alg) {
8026                 sprintf(alg, "hmac(%s)", sp->sctp_hmac_alg);
8027                 tfm = crypto_alloc_shash(alg, 0, 0);
8028                 if (IS_ERR(tfm)) {
8029                         net_info_ratelimited("failed to load transform for %s: %ld\n",
8030                                              sp->sctp_hmac_alg, PTR_ERR(tfm));
8031                         return -ENOSYS;
8032                 }
8033                 sctp_sk(sk)->hmac = tfm;
8034         }
8035
8036         /*
8037          * If a bind() or sctp_bindx() is not called prior to a listen()
8038          * call that allows new associations to be accepted, the system
8039          * picks an ephemeral port and will choose an address set equivalent
8040          * to binding with a wildcard address.
8041          *
8042          * This is not currently spelled out in the SCTP sockets
8043          * extensions draft, but follows the practice as seen in TCP
8044          * sockets.
8045          *
8046          */
8047         inet_sk_set_state(sk, SCTP_SS_LISTENING);
8048         if (!ep->base.bind_addr.port) {
8049                 if (sctp_autobind(sk))
8050                         return -EAGAIN;
8051         } else {
8052                 if (sctp_get_port(sk, inet_sk(sk)->inet_num)) {
8053                         inet_sk_set_state(sk, SCTP_SS_CLOSED);
8054                         return -EADDRINUSE;
8055                 }
8056         }
8057
8058         sk->sk_max_ack_backlog = backlog;
8059         return sctp_hash_endpoint(ep);
8060 }
8061
8062 /*
8063  * 4.1.3 / 5.1.3 listen()
8064  *
8065  *   By default, new associations are not accepted for UDP style sockets.
8066  *   An application uses listen() to mark a socket as being able to
8067  *   accept new associations.
8068  *
8069  *   On TCP style sockets, applications use listen() to ready the SCTP
8070  *   endpoint for accepting inbound associations.
8071  *
8072  *   On both types of endpoints a backlog of '0' disables listening.
8073  *
8074  *  Move a socket to LISTENING state.
8075  */
8076 int sctp_inet_listen(struct socket *sock, int backlog)
8077 {
8078         struct sock *sk = sock->sk;
8079         struct sctp_endpoint *ep = sctp_sk(sk)->ep;
8080         int err = -EINVAL;
8081
8082         if (unlikely(backlog < 0))
8083                 return err;
8084
8085         lock_sock(sk);
8086
8087         /* Peeled-off sockets are not allowed to listen().  */
8088         if (sctp_style(sk, UDP_HIGH_BANDWIDTH))
8089                 goto out;
8090
8091         if (sock->state != SS_UNCONNECTED)
8092                 goto out;
8093
8094         if (!sctp_sstate(sk, LISTENING) && !sctp_sstate(sk, CLOSED))
8095                 goto out;
8096
8097         /* If backlog is zero, disable listening. */
8098         if (!backlog) {
8099                 if (sctp_sstate(sk, CLOSED))
8100                         goto out;
8101
8102                 err = 0;
8103                 sctp_unhash_endpoint(ep);
8104                 sk->sk_state = SCTP_SS_CLOSED;
8105                 if (sk->sk_reuse || sctp_sk(sk)->reuse)
8106                         sctp_sk(sk)->bind_hash->fastreuse = 1;
8107                 goto out;
8108         }
8109
8110         /* If we are already listening, just update the backlog */
8111         if (sctp_sstate(sk, LISTENING))
8112                 sk->sk_max_ack_backlog = backlog;
8113         else {
8114                 err = sctp_listen_start(sk, backlog);
8115                 if (err)
8116                         goto out;
8117         }
8118
8119         err = 0;
8120 out:
8121         release_sock(sk);
8122         return err;
8123 }
8124
8125 /*
8126  * This function is done by modeling the current datagram_poll() and the
8127  * tcp_poll().  Note that, based on these implementations, we don't
8128  * lock the socket in this function, even though it seems that,
8129  * ideally, locking or some other mechanisms can be used to ensure
8130  * the integrity of the counters (sndbuf and wmem_alloc) used
8131  * in this place.  We assume that we don't need locks either until proven
8132  * otherwise.
8133  *
8134  * Another thing to note is that we include the Async I/O support
8135  * here, again, by modeling the current TCP/UDP code.  We don't have
8136  * a good way to test with it yet.
8137  */
8138 __poll_t sctp_poll(struct file *file, struct socket *sock, poll_table *wait)
8139 {
8140         struct sock *sk = sock->sk;
8141         struct sctp_sock *sp = sctp_sk(sk);
8142         __poll_t mask;
8143
8144         poll_wait(file, sk_sleep(sk), wait);
8145
8146         sock_rps_record_flow(sk);
8147
8148         /* A TCP-style listening socket becomes readable when the accept queue
8149          * is not empty.
8150          */
8151         if (sctp_style(sk, TCP) && sctp_sstate(sk, LISTENING))
8152                 return (!list_empty(&sp->ep->asocs)) ?
8153                         (EPOLLIN | EPOLLRDNORM) : 0;
8154
8155         mask = 0;
8156
8157         /* Is there any exceptional events?  */
8158         if (sk->sk_err || !skb_queue_empty(&sk->sk_error_queue))
8159                 mask |= EPOLLERR |
8160                         (sock_flag(sk, SOCK_SELECT_ERR_QUEUE) ? EPOLLPRI : 0);
8161         if (sk->sk_shutdown & RCV_SHUTDOWN)
8162                 mask |= EPOLLRDHUP | EPOLLIN | EPOLLRDNORM;
8163         if (sk->sk_shutdown == SHUTDOWN_MASK)
8164                 mask |= EPOLLHUP;
8165
8166         /* Is it readable?  Reconsider this code with TCP-style support.  */
8167         if (!skb_queue_empty(&sk->sk_receive_queue))
8168                 mask |= EPOLLIN | EPOLLRDNORM;
8169
8170         /* The association is either gone or not ready.  */
8171         if (!sctp_style(sk, UDP) && sctp_sstate(sk, CLOSED))
8172                 return mask;
8173
8174         /* Is it writable?  */
8175         if (sctp_writeable(sk)) {
8176                 mask |= EPOLLOUT | EPOLLWRNORM;
8177         } else {
8178                 sk_set_bit(SOCKWQ_ASYNC_NOSPACE, sk);
8179                 /*
8180                  * Since the socket is not locked, the buffer
8181                  * might be made available after the writeable check and
8182                  * before the bit is set.  This could cause a lost I/O
8183                  * signal.  tcp_poll() has a race breaker for this race
8184                  * condition.  Based on their implementation, we put
8185                  * in the following code to cover it as well.
8186                  */
8187                 if (sctp_writeable(sk))
8188                         mask |= EPOLLOUT | EPOLLWRNORM;
8189         }
8190         return mask;
8191 }
8192
8193 /********************************************************************
8194  * 2nd Level Abstractions
8195  ********************************************************************/
8196
8197 static struct sctp_bind_bucket *sctp_bucket_create(
8198         struct sctp_bind_hashbucket *head, struct net *net, unsigned short snum)
8199 {
8200         struct sctp_bind_bucket *pp;
8201
8202         pp = kmem_cache_alloc(sctp_bucket_cachep, GFP_ATOMIC);
8203         if (pp) {
8204                 SCTP_DBG_OBJCNT_INC(bind_bucket);
8205                 pp->port = snum;
8206                 pp->fastreuse = 0;
8207                 INIT_HLIST_HEAD(&pp->owner);
8208                 pp->net = net;
8209                 hlist_add_head(&pp->node, &head->chain);
8210         }
8211         return pp;
8212 }
8213
8214 /* Caller must hold hashbucket lock for this tb with local BH disabled */
8215 static void sctp_bucket_destroy(struct sctp_bind_bucket *pp)
8216 {
8217         if (pp && hlist_empty(&pp->owner)) {
8218                 __hlist_del(&pp->node);
8219                 kmem_cache_free(sctp_bucket_cachep, pp);
8220                 SCTP_DBG_OBJCNT_DEC(bind_bucket);
8221         }
8222 }
8223
8224 /* Release this socket's reference to a local port.  */
8225 static inline void __sctp_put_port(struct sock *sk)
8226 {
8227         struct sctp_bind_hashbucket *head =
8228                 &sctp_port_hashtable[sctp_phashfn(sock_net(sk),
8229                                                   inet_sk(sk)->inet_num)];
8230         struct sctp_bind_bucket *pp;
8231
8232         spin_lock(&head->lock);
8233         pp = sctp_sk(sk)->bind_hash;
8234         __sk_del_bind_node(sk);
8235         sctp_sk(sk)->bind_hash = NULL;
8236         inet_sk(sk)->inet_num = 0;
8237         sctp_bucket_destroy(pp);
8238         spin_unlock(&head->lock);
8239 }
8240
8241 void sctp_put_port(struct sock *sk)
8242 {
8243         local_bh_disable();
8244         __sctp_put_port(sk);
8245         local_bh_enable();
8246 }
8247
8248 /*
8249  * The system picks an ephemeral port and choose an address set equivalent
8250  * to binding with a wildcard address.
8251  * One of those addresses will be the primary address for the association.
8252  * This automatically enables the multihoming capability of SCTP.
8253  */
8254 static int sctp_autobind(struct sock *sk)
8255 {
8256         union sctp_addr autoaddr;
8257         struct sctp_af *af;
8258         __be16 port;
8259
8260         /* Initialize a local sockaddr structure to INADDR_ANY. */
8261         af = sctp_sk(sk)->pf->af;
8262
8263         port = htons(inet_sk(sk)->inet_num);
8264         af->inaddr_any(&autoaddr, port);
8265
8266         return sctp_do_bind(sk, &autoaddr, af->sockaddr_len);
8267 }
8268
8269 /* Parse out IPPROTO_SCTP CMSG headers.  Perform only minimal validation.
8270  *
8271  * From RFC 2292
8272  * 4.2 The cmsghdr Structure *
8273  *
8274  * When ancillary data is sent or received, any number of ancillary data
8275  * objects can be specified by the msg_control and msg_controllen members of
8276  * the msghdr structure, because each object is preceded by
8277  * a cmsghdr structure defining the object's length (the cmsg_len member).
8278  * Historically Berkeley-derived implementations have passed only one object
8279  * at a time, but this API allows multiple objects to be
8280  * passed in a single call to sendmsg() or recvmsg(). The following example
8281  * shows two ancillary data objects in a control buffer.
8282  *
8283  *   |<--------------------------- msg_controllen -------------------------->|
8284  *   |                                                                       |
8285  *
8286  *   |<----- ancillary data object ----->|<----- ancillary data object ----->|
8287  *
8288  *   |<---------- CMSG_SPACE() --------->|<---------- CMSG_SPACE() --------->|
8289  *   |                                   |                                   |
8290  *
8291  *   |<---------- cmsg_len ---------->|  |<--------- cmsg_len ----------->|  |
8292  *
8293  *   |<--------- CMSG_LEN() --------->|  |<-------- CMSG_LEN() ---------->|  |
8294  *   |                                |  |                                |  |
8295  *
8296  *   +-----+-----+-----+--+-----------+--+-----+-----+-----+--+-----------+--+
8297  *   |cmsg_|cmsg_|cmsg_|XX|           |XX|cmsg_|cmsg_|cmsg_|XX|           |XX|
8298  *
8299  *   |len  |level|type |XX|cmsg_data[]|XX|len  |level|type |XX|cmsg_data[]|XX|
8300  *
8301  *   +-----+-----+-----+--+-----------+--+-----+-----+-----+--+-----------+--+
8302  *    ^
8303  *    |
8304  *
8305  * msg_control
8306  * points here
8307  */
8308 static int sctp_msghdr_parse(const struct msghdr *msg, struct sctp_cmsgs *cmsgs)
8309 {
8310         struct msghdr *my_msg = (struct msghdr *)msg;
8311         struct cmsghdr *cmsg;
8312
8313         for_each_cmsghdr(cmsg, my_msg) {
8314                 if (!CMSG_OK(my_msg, cmsg))
8315                         return -EINVAL;
8316
8317                 /* Should we parse this header or ignore?  */
8318                 if (cmsg->cmsg_level != IPPROTO_SCTP)
8319                         continue;
8320
8321                 /* Strictly check lengths following example in SCM code.  */
8322                 switch (cmsg->cmsg_type) {
8323                 case SCTP_INIT:
8324                         /* SCTP Socket API Extension
8325                          * 5.3.1 SCTP Initiation Structure (SCTP_INIT)
8326                          *
8327                          * This cmsghdr structure provides information for
8328                          * initializing new SCTP associations with sendmsg().
8329                          * The SCTP_INITMSG socket option uses this same data
8330                          * structure.  This structure is not used for
8331                          * recvmsg().
8332                          *
8333                          * cmsg_level    cmsg_type      cmsg_data[]
8334                          * ------------  ------------   ----------------------
8335                          * IPPROTO_SCTP  SCTP_INIT      struct sctp_initmsg
8336                          */
8337                         if (cmsg->cmsg_len != CMSG_LEN(sizeof(struct sctp_initmsg)))
8338                                 return -EINVAL;
8339
8340                         cmsgs->init = CMSG_DATA(cmsg);
8341                         break;
8342
8343                 case SCTP_SNDRCV:
8344                         /* SCTP Socket API Extension
8345                          * 5.3.2 SCTP Header Information Structure(SCTP_SNDRCV)
8346                          *
8347                          * This cmsghdr structure specifies SCTP options for
8348                          * sendmsg() and describes SCTP header information
8349                          * about a received message through recvmsg().
8350                          *
8351                          * cmsg_level    cmsg_type      cmsg_data[]
8352                          * ------------  ------------   ----------------------
8353                          * IPPROTO_SCTP  SCTP_SNDRCV    struct sctp_sndrcvinfo
8354                          */
8355                         if (cmsg->cmsg_len != CMSG_LEN(sizeof(struct sctp_sndrcvinfo)))
8356                                 return -EINVAL;
8357
8358                         cmsgs->srinfo = CMSG_DATA(cmsg);
8359
8360                         if (cmsgs->srinfo->sinfo_flags &
8361                             ~(SCTP_UNORDERED | SCTP_ADDR_OVER |
8362                               SCTP_SACK_IMMEDIATELY | SCTP_SENDALL |
8363                               SCTP_PR_SCTP_MASK | SCTP_ABORT | SCTP_EOF))
8364                                 return -EINVAL;
8365                         break;
8366
8367                 case SCTP_SNDINFO:
8368                         /* SCTP Socket API Extension
8369                          * 5.3.4 SCTP Send Information Structure (SCTP_SNDINFO)
8370                          *
8371                          * This cmsghdr structure specifies SCTP options for
8372                          * sendmsg(). This structure and SCTP_RCVINFO replaces
8373                          * SCTP_SNDRCV which has been deprecated.
8374                          *
8375                          * cmsg_level    cmsg_type      cmsg_data[]
8376                          * ------------  ------------   ---------------------
8377                          * IPPROTO_SCTP  SCTP_SNDINFO    struct sctp_sndinfo
8378                          */
8379                         if (cmsg->cmsg_len != CMSG_LEN(sizeof(struct sctp_sndinfo)))
8380                                 return -EINVAL;
8381
8382                         cmsgs->sinfo = CMSG_DATA(cmsg);
8383
8384                         if (cmsgs->sinfo->snd_flags &
8385                             ~(SCTP_UNORDERED | SCTP_ADDR_OVER |
8386                               SCTP_SACK_IMMEDIATELY | SCTP_SENDALL |
8387                               SCTP_PR_SCTP_MASK | SCTP_ABORT | SCTP_EOF))
8388                                 return -EINVAL;
8389                         break;
8390                 case SCTP_PRINFO:
8391                         /* SCTP Socket API Extension
8392                          * 5.3.7 SCTP PR-SCTP Information Structure (SCTP_PRINFO)
8393                          *
8394                          * This cmsghdr structure specifies SCTP options for sendmsg().
8395                          *
8396                          * cmsg_level    cmsg_type      cmsg_data[]
8397                          * ------------  ------------   ---------------------
8398                          * IPPROTO_SCTP  SCTP_PRINFO    struct sctp_prinfo
8399                          */
8400                         if (cmsg->cmsg_len != CMSG_LEN(sizeof(struct sctp_prinfo)))
8401                                 return -EINVAL;
8402
8403                         cmsgs->prinfo = CMSG_DATA(cmsg);
8404                         if (cmsgs->prinfo->pr_policy & ~SCTP_PR_SCTP_MASK)
8405                                 return -EINVAL;
8406
8407                         if (cmsgs->prinfo->pr_policy == SCTP_PR_SCTP_NONE)
8408                                 cmsgs->prinfo->pr_value = 0;
8409                         break;
8410                 case SCTP_AUTHINFO:
8411                         /* SCTP Socket API Extension
8412                          * 5.3.8 SCTP AUTH Information Structure (SCTP_AUTHINFO)
8413                          *
8414                          * This cmsghdr structure specifies SCTP options for sendmsg().
8415                          *
8416                          * cmsg_level    cmsg_type      cmsg_data[]
8417                          * ------------  ------------   ---------------------
8418                          * IPPROTO_SCTP  SCTP_AUTHINFO  struct sctp_authinfo
8419                          */
8420                         if (cmsg->cmsg_len != CMSG_LEN(sizeof(struct sctp_authinfo)))
8421                                 return -EINVAL;
8422
8423                         cmsgs->authinfo = CMSG_DATA(cmsg);
8424                         break;
8425                 case SCTP_DSTADDRV4:
8426                 case SCTP_DSTADDRV6:
8427                         /* SCTP Socket API Extension
8428                          * 5.3.9/10 SCTP Destination IPv4/6 Address Structure (SCTP_DSTADDRV4/6)
8429                          *
8430                          * This cmsghdr structure specifies SCTP options for sendmsg().
8431                          *
8432                          * cmsg_level    cmsg_type         cmsg_data[]
8433                          * ------------  ------------   ---------------------
8434                          * IPPROTO_SCTP  SCTP_DSTADDRV4 struct in_addr
8435                          * ------------  ------------   ---------------------
8436                          * IPPROTO_SCTP  SCTP_DSTADDRV6 struct in6_addr
8437                          */
8438                         cmsgs->addrs_msg = my_msg;
8439                         break;
8440                 default:
8441                         return -EINVAL;
8442                 }
8443         }
8444
8445         return 0;
8446 }
8447
8448 /*
8449  * Wait for a packet..
8450  * Note: This function is the same function as in core/datagram.c
8451  * with a few modifications to make lksctp work.
8452  */
8453 static int sctp_wait_for_packet(struct sock *sk, int *err, long *timeo_p)
8454 {
8455         int error;
8456         DEFINE_WAIT(wait);
8457
8458         prepare_to_wait_exclusive(sk_sleep(sk), &wait, TASK_INTERRUPTIBLE);
8459
8460         /* Socket errors? */
8461         error = sock_error(sk);
8462         if (error)
8463                 goto out;
8464
8465         if (!skb_queue_empty(&sk->sk_receive_queue))
8466                 goto ready;
8467
8468         /* Socket shut down?  */
8469         if (sk->sk_shutdown & RCV_SHUTDOWN)
8470                 goto out;
8471
8472         /* Sequenced packets can come disconnected.  If so we report the
8473          * problem.
8474          */
8475         error = -ENOTCONN;
8476
8477         /* Is there a good reason to think that we may receive some data?  */
8478         if (list_empty(&sctp_sk(sk)->ep->asocs) && !sctp_sstate(sk, LISTENING))
8479                 goto out;
8480
8481         /* Handle signals.  */
8482         if (signal_pending(current))
8483                 goto interrupted;
8484
8485         /* Let another process have a go.  Since we are going to sleep
8486          * anyway.  Note: This may cause odd behaviors if the message
8487          * does not fit in the user's buffer, but this seems to be the
8488          * only way to honor MSG_DONTWAIT realistically.
8489          */
8490         release_sock(sk);
8491         *timeo_p = schedule_timeout(*timeo_p);
8492         lock_sock(sk);
8493
8494 ready:
8495         finish_wait(sk_sleep(sk), &wait);
8496         return 0;
8497
8498 interrupted:
8499         error = sock_intr_errno(*timeo_p);
8500
8501 out:
8502         finish_wait(sk_sleep(sk), &wait);
8503         *err = error;
8504         return error;
8505 }
8506
8507 /* Receive a datagram.
8508  * Note: This is pretty much the same routine as in core/datagram.c
8509  * with a few changes to make lksctp work.
8510  */
8511 struct sk_buff *sctp_skb_recv_datagram(struct sock *sk, int flags,
8512                                        int noblock, int *err)
8513 {
8514         int error;
8515         struct sk_buff *skb;
8516         long timeo;
8517
8518         timeo = sock_rcvtimeo(sk, noblock);
8519
8520         pr_debug("%s: timeo:%ld, max:%ld\n", __func__, timeo,
8521                  MAX_SCHEDULE_TIMEOUT);
8522
8523         do {
8524                 /* Again only user level code calls this function,
8525                  * so nothing interrupt level
8526                  * will suddenly eat the receive_queue.
8527                  *
8528                  *  Look at current nfs client by the way...
8529                  *  However, this function was correct in any case. 8)
8530                  */
8531                 if (flags & MSG_PEEK) {
8532                         skb = skb_peek(&sk->sk_receive_queue);
8533                         if (skb)
8534                                 refcount_inc(&skb->users);
8535                 } else {
8536                         skb = __skb_dequeue(&sk->sk_receive_queue);
8537                 }
8538
8539                 if (skb)
8540                         return skb;
8541
8542                 /* Caller is allowed not to check sk->sk_err before calling. */
8543                 error = sock_error(sk);
8544                 if (error)
8545                         goto no_packet;
8546
8547                 if (sk->sk_shutdown & RCV_SHUTDOWN)
8548                         break;
8549
8550                 if (sk_can_busy_loop(sk)) {
8551                         sk_busy_loop(sk, noblock);
8552
8553                         if (!skb_queue_empty(&sk->sk_receive_queue))
8554                                 continue;
8555                 }
8556
8557                 /* User doesn't want to wait.  */
8558                 error = -EAGAIN;
8559                 if (!timeo)
8560                         goto no_packet;
8561         } while (sctp_wait_for_packet(sk, err, &timeo) == 0);
8562
8563         return NULL;
8564
8565 no_packet:
8566         *err = error;
8567         return NULL;
8568 }
8569
8570 /* If sndbuf has changed, wake up per association sndbuf waiters.  */
8571 static void __sctp_write_space(struct sctp_association *asoc)
8572 {
8573         struct sock *sk = asoc->base.sk;
8574
8575         if (sctp_wspace(asoc) <= 0)
8576                 return;
8577
8578         if (waitqueue_active(&asoc->wait))
8579                 wake_up_interruptible(&asoc->wait);
8580
8581         if (sctp_writeable(sk)) {
8582                 struct socket_wq *wq;
8583
8584                 rcu_read_lock();
8585                 wq = rcu_dereference(sk->sk_wq);
8586                 if (wq) {
8587                         if (waitqueue_active(&wq->wait))
8588                                 wake_up_interruptible(&wq->wait);
8589
8590                         /* Note that we try to include the Async I/O support
8591                          * here by modeling from the current TCP/UDP code.
8592                          * We have not tested with it yet.
8593                          */
8594                         if (!(sk->sk_shutdown & SEND_SHUTDOWN))
8595                                 sock_wake_async(wq, SOCK_WAKE_SPACE, POLL_OUT);
8596                 }
8597                 rcu_read_unlock();
8598         }
8599 }
8600
8601 static void sctp_wake_up_waiters(struct sock *sk,
8602                                  struct sctp_association *asoc)
8603 {
8604         struct sctp_association *tmp = asoc;
8605
8606         /* We do accounting for the sndbuf space per association,
8607          * so we only need to wake our own association.
8608          */
8609         if (asoc->ep->sndbuf_policy)
8610                 return __sctp_write_space(asoc);
8611
8612         /* If association goes down and is just flushing its
8613          * outq, then just normally notify others.
8614          */
8615         if (asoc->base.dead)
8616                 return sctp_write_space(sk);
8617
8618         /* Accounting for the sndbuf space is per socket, so we
8619          * need to wake up others, try to be fair and in case of
8620          * other associations, let them have a go first instead
8621          * of just doing a sctp_write_space() call.
8622          *
8623          * Note that we reach sctp_wake_up_waiters() only when
8624          * associations free up queued chunks, thus we are under
8625          * lock and the list of associations on a socket is
8626          * guaranteed not to change.
8627          */
8628         for (tmp = list_next_entry(tmp, asocs); 1;
8629              tmp = list_next_entry(tmp, asocs)) {
8630                 /* Manually skip the head element. */
8631                 if (&tmp->asocs == &((sctp_sk(sk))->ep->asocs))
8632                         continue;
8633                 /* Wake up association. */
8634                 __sctp_write_space(tmp);
8635                 /* We've reached the end. */
8636                 if (tmp == asoc)
8637                         break;
8638         }
8639 }
8640
8641 /* Do accounting for the sndbuf space.
8642  * Decrement the used sndbuf space of the corresponding association by the
8643  * data size which was just transmitted(freed).
8644  */
8645 static void sctp_wfree(struct sk_buff *skb)
8646 {
8647         struct sctp_chunk *chunk = skb_shinfo(skb)->destructor_arg;
8648         struct sctp_association *asoc = chunk->asoc;
8649         struct sock *sk = asoc->base.sk;
8650
8651         sk_mem_uncharge(sk, skb->truesize);
8652         sk->sk_wmem_queued -= skb->truesize + sizeof(struct sctp_chunk);
8653         asoc->sndbuf_used -= skb->truesize + sizeof(struct sctp_chunk);
8654         WARN_ON(refcount_sub_and_test(sizeof(struct sctp_chunk),
8655                                       &sk->sk_wmem_alloc));
8656
8657         if (chunk->shkey) {
8658                 struct sctp_shared_key *shkey = chunk->shkey;
8659
8660                 /* refcnt == 2 and !list_empty mean after this release, it's
8661                  * not being used anywhere, and it's time to notify userland
8662                  * that this shkey can be freed if it's been deactivated.
8663                  */
8664                 if (shkey->deactivated && !list_empty(&shkey->key_list) &&
8665                     refcount_read(&shkey->refcnt) == 2) {
8666                         struct sctp_ulpevent *ev;
8667
8668                         ev = sctp_ulpevent_make_authkey(asoc, shkey->key_id,
8669                                                         SCTP_AUTH_FREE_KEY,
8670                                                         GFP_KERNEL);
8671                         if (ev)
8672                                 asoc->stream.si->enqueue_event(&asoc->ulpq, ev);
8673                 }
8674                 sctp_auth_shkey_release(chunk->shkey);
8675         }
8676
8677         sock_wfree(skb);
8678         sctp_wake_up_waiters(sk, asoc);
8679
8680         sctp_association_put(asoc);
8681 }
8682
8683 /* Do accounting for the receive space on the socket.
8684  * Accounting for the association is done in ulpevent.c
8685  * We set this as a destructor for the cloned data skbs so that
8686  * accounting is done at the correct time.
8687  */
8688 void sctp_sock_rfree(struct sk_buff *skb)
8689 {
8690         struct sock *sk = skb->sk;
8691         struct sctp_ulpevent *event = sctp_skb2event(skb);
8692
8693         atomic_sub(event->rmem_len, &sk->sk_rmem_alloc);
8694
8695         /*
8696          * Mimic the behavior of sock_rfree
8697          */
8698         sk_mem_uncharge(sk, event->rmem_len);
8699 }
8700
8701
8702 /* Helper function to wait for space in the sndbuf.  */
8703 static int sctp_wait_for_sndbuf(struct sctp_association *asoc, long *timeo_p,
8704                                 size_t msg_len)
8705 {
8706         struct sock *sk = asoc->base.sk;
8707         long current_timeo = *timeo_p;
8708         DEFINE_WAIT(wait);
8709         int err = 0;
8710
8711         pr_debug("%s: asoc:%p, timeo:%ld, msg_len:%zu\n", __func__, asoc,
8712                  *timeo_p, msg_len);
8713
8714         /* Increment the association's refcnt.  */
8715         sctp_association_hold(asoc);
8716
8717         /* Wait on the association specific sndbuf space. */
8718         for (;;) {
8719                 prepare_to_wait_exclusive(&asoc->wait, &wait,
8720                                           TASK_INTERRUPTIBLE);
8721                 if (asoc->base.dead)
8722                         goto do_dead;
8723                 if (!*timeo_p)
8724                         goto do_nonblock;
8725                 if (sk->sk_err || asoc->state >= SCTP_STATE_SHUTDOWN_PENDING)
8726                         goto do_error;
8727                 if (signal_pending(current))
8728                         goto do_interrupted;
8729                 if ((int)msg_len <= sctp_wspace(asoc))
8730                         break;
8731
8732                 /* Let another process have a go.  Since we are going
8733                  * to sleep anyway.
8734                  */
8735                 release_sock(sk);
8736                 current_timeo = schedule_timeout(current_timeo);
8737                 lock_sock(sk);
8738                 if (sk != asoc->base.sk)
8739                         goto do_error;
8740
8741                 *timeo_p = current_timeo;
8742         }
8743
8744 out:
8745         finish_wait(&asoc->wait, &wait);
8746
8747         /* Release the association's refcnt.  */
8748         sctp_association_put(asoc);
8749
8750         return err;
8751
8752 do_dead:
8753         err = -ESRCH;
8754         goto out;
8755
8756 do_error:
8757         err = -EPIPE;
8758         goto out;
8759
8760 do_interrupted:
8761         err = sock_intr_errno(*timeo_p);
8762         goto out;
8763
8764 do_nonblock:
8765         err = -EAGAIN;
8766         goto out;
8767 }
8768
8769 void sctp_data_ready(struct sock *sk)
8770 {
8771         struct socket_wq *wq;
8772
8773         rcu_read_lock();
8774         wq = rcu_dereference(sk->sk_wq);
8775         if (skwq_has_sleeper(wq))
8776                 wake_up_interruptible_sync_poll(&wq->wait, EPOLLIN |
8777                                                 EPOLLRDNORM | EPOLLRDBAND);
8778         sk_wake_async(sk, SOCK_WAKE_WAITD, POLL_IN);
8779         rcu_read_unlock();
8780 }
8781
8782 /* If socket sndbuf has changed, wake up all per association waiters.  */
8783 void sctp_write_space(struct sock *sk)
8784 {
8785         struct sctp_association *asoc;
8786
8787         /* Wake up the tasks in each wait queue.  */
8788         list_for_each_entry(asoc, &((sctp_sk(sk))->ep->asocs), asocs) {
8789                 __sctp_write_space(asoc);
8790         }
8791 }
8792
8793 /* Is there any sndbuf space available on the socket?
8794  *
8795  * Note that sk_wmem_alloc is the sum of the send buffers on all of the
8796  * associations on the same socket.  For a UDP-style socket with
8797  * multiple associations, it is possible for it to be "unwriteable"
8798  * prematurely.  I assume that this is acceptable because
8799  * a premature "unwriteable" is better than an accidental "writeable" which
8800  * would cause an unwanted block under certain circumstances.  For the 1-1
8801  * UDP-style sockets or TCP-style sockets, this code should work.
8802  *  - Daisy
8803  */
8804 static bool sctp_writeable(struct sock *sk)
8805 {
8806         return sk->sk_sndbuf > sk->sk_wmem_queued;
8807 }
8808
8809 /* Wait for an association to go into ESTABLISHED state. If timeout is 0,
8810  * returns immediately with EINPROGRESS.
8811  */
8812 static int sctp_wait_for_connect(struct sctp_association *asoc, long *timeo_p)
8813 {
8814         struct sock *sk = asoc->base.sk;
8815         int err = 0;
8816         long current_timeo = *timeo_p;
8817         DEFINE_WAIT(wait);
8818
8819         pr_debug("%s: asoc:%p, timeo:%ld\n", __func__, asoc, *timeo_p);
8820
8821         /* Increment the association's refcnt.  */
8822         sctp_association_hold(asoc);
8823
8824         for (;;) {
8825                 prepare_to_wait_exclusive(&asoc->wait, &wait,
8826                                           TASK_INTERRUPTIBLE);
8827                 if (!*timeo_p)
8828                         goto do_nonblock;
8829                 if (sk->sk_shutdown & RCV_SHUTDOWN)
8830                         break;
8831                 if (sk->sk_err || asoc->state >= SCTP_STATE_SHUTDOWN_PENDING ||
8832                     asoc->base.dead)
8833                         goto do_error;
8834                 if (signal_pending(current))
8835                         goto do_interrupted;
8836
8837                 if (sctp_state(asoc, ESTABLISHED))
8838                         break;
8839
8840                 /* Let another process have a go.  Since we are going
8841                  * to sleep anyway.
8842                  */
8843                 release_sock(sk);
8844                 current_timeo = schedule_timeout(current_timeo);
8845                 lock_sock(sk);
8846
8847                 *timeo_p = current_timeo;
8848         }
8849
8850 out:
8851         finish_wait(&asoc->wait, &wait);
8852
8853         /* Release the association's refcnt.  */
8854         sctp_association_put(asoc);
8855
8856         return err;
8857
8858 do_error:
8859         if (asoc->init_err_counter + 1 > asoc->max_init_attempts)
8860                 err = -ETIMEDOUT;
8861         else
8862                 err = -ECONNREFUSED;
8863         goto out;
8864
8865 do_interrupted:
8866         err = sock_intr_errno(*timeo_p);
8867         goto out;
8868
8869 do_nonblock:
8870         err = -EINPROGRESS;
8871         goto out;
8872 }
8873
8874 static int sctp_wait_for_accept(struct sock *sk, long timeo)
8875 {
8876         struct sctp_endpoint *ep;
8877         int err = 0;
8878         DEFINE_WAIT(wait);
8879
8880         ep = sctp_sk(sk)->ep;
8881
8882
8883         for (;;) {
8884                 prepare_to_wait_exclusive(sk_sleep(sk), &wait,
8885                                           TASK_INTERRUPTIBLE);
8886
8887                 if (list_empty(&ep->asocs)) {
8888                         release_sock(sk);
8889                         timeo = schedule_timeout(timeo);
8890                         lock_sock(sk);
8891                 }
8892
8893                 err = -EINVAL;
8894                 if (!sctp_sstate(sk, LISTENING))
8895                         break;
8896
8897                 err = 0;
8898                 if (!list_empty(&ep->asocs))
8899                         break;
8900
8901                 err = sock_intr_errno(timeo);
8902                 if (signal_pending(current))
8903                         break;
8904
8905                 err = -EAGAIN;
8906                 if (!timeo)
8907                         break;
8908         }
8909
8910         finish_wait(sk_sleep(sk), &wait);
8911
8912         return err;
8913 }
8914
8915 static void sctp_wait_for_close(struct sock *sk, long timeout)
8916 {
8917         DEFINE_WAIT(wait);
8918
8919         do {
8920                 prepare_to_wait(sk_sleep(sk), &wait, TASK_INTERRUPTIBLE);
8921                 if (list_empty(&sctp_sk(sk)->ep->asocs))
8922                         break;
8923                 release_sock(sk);
8924                 timeout = schedule_timeout(timeout);
8925                 lock_sock(sk);
8926         } while (!signal_pending(current) && timeout);
8927
8928         finish_wait(sk_sleep(sk), &wait);
8929 }
8930
8931 static void sctp_skb_set_owner_r_frag(struct sk_buff *skb, struct sock *sk)
8932 {
8933         struct sk_buff *frag;
8934
8935         if (!skb->data_len)
8936                 goto done;
8937
8938         /* Don't forget the fragments. */
8939         skb_walk_frags(skb, frag)
8940                 sctp_skb_set_owner_r_frag(frag, sk);
8941
8942 done:
8943         sctp_skb_set_owner_r(skb, sk);
8944 }
8945
8946 void sctp_copy_sock(struct sock *newsk, struct sock *sk,
8947                     struct sctp_association *asoc)
8948 {
8949         struct inet_sock *inet = inet_sk(sk);
8950         struct inet_sock *newinet;
8951         struct sctp_sock *sp = sctp_sk(sk);
8952         struct sctp_endpoint *ep = sp->ep;
8953
8954         newsk->sk_type = sk->sk_type;
8955         newsk->sk_bound_dev_if = sk->sk_bound_dev_if;
8956         newsk->sk_flags = sk->sk_flags;
8957         newsk->sk_tsflags = sk->sk_tsflags;
8958         newsk->sk_no_check_tx = sk->sk_no_check_tx;
8959         newsk->sk_no_check_rx = sk->sk_no_check_rx;
8960         newsk->sk_reuse = sk->sk_reuse;
8961         sctp_sk(newsk)->reuse = sp->reuse;
8962
8963         newsk->sk_shutdown = sk->sk_shutdown;
8964         newsk->sk_destruct = sctp_destruct_sock;
8965         newsk->sk_family = sk->sk_family;
8966         newsk->sk_protocol = IPPROTO_SCTP;
8967         newsk->sk_backlog_rcv = sk->sk_prot->backlog_rcv;
8968         newsk->sk_sndbuf = sk->sk_sndbuf;
8969         newsk->sk_rcvbuf = sk->sk_rcvbuf;
8970         newsk->sk_lingertime = sk->sk_lingertime;
8971         newsk->sk_rcvtimeo = sk->sk_rcvtimeo;
8972         newsk->sk_sndtimeo = sk->sk_sndtimeo;
8973         newsk->sk_rxhash = sk->sk_rxhash;
8974
8975         newinet = inet_sk(newsk);
8976
8977         /* Initialize sk's sport, dport, rcv_saddr and daddr for
8978          * getsockname() and getpeername()
8979          */
8980         newinet->inet_sport = inet->inet_sport;
8981         newinet->inet_saddr = inet->inet_saddr;
8982         newinet->inet_rcv_saddr = inet->inet_rcv_saddr;
8983         newinet->inet_dport = htons(asoc->peer.port);
8984         newinet->pmtudisc = inet->pmtudisc;
8985         newinet->inet_id = asoc->next_tsn ^ jiffies;
8986
8987         newinet->uc_ttl = inet->uc_ttl;
8988         newinet->mc_loop = 1;
8989         newinet->mc_ttl = 1;
8990         newinet->mc_index = 0;
8991         newinet->mc_list = NULL;
8992
8993         if (newsk->sk_flags & SK_FLAGS_TIMESTAMP)
8994                 net_enable_timestamp();
8995
8996         /* Set newsk security attributes from orginal sk and connection
8997          * security attribute from ep.
8998          */
8999         security_sctp_sk_clone(ep, sk, newsk);
9000 }
9001
9002 static inline void sctp_copy_descendant(struct sock *sk_to,
9003                                         const struct sock *sk_from)
9004 {
9005         int ancestor_size = sizeof(struct inet_sock) +
9006                             sizeof(struct sctp_sock) -
9007                             offsetof(struct sctp_sock, auto_asconf_list);
9008
9009         if (sk_from->sk_family == PF_INET6)
9010                 ancestor_size += sizeof(struct ipv6_pinfo);
9011
9012         __inet_sk_copy_descendant(sk_to, sk_from, ancestor_size);
9013 }
9014
9015 /* Populate the fields of the newsk from the oldsk and migrate the assoc
9016  * and its messages to the newsk.
9017  */
9018 static void sctp_sock_migrate(struct sock *oldsk, struct sock *newsk,
9019                               struct sctp_association *assoc,
9020                               enum sctp_socket_type type)
9021 {
9022         struct sctp_sock *oldsp = sctp_sk(oldsk);
9023         struct sctp_sock *newsp = sctp_sk(newsk);
9024         struct sctp_bind_bucket *pp; /* hash list port iterator */
9025         struct sctp_endpoint *newep = newsp->ep;
9026         struct sk_buff *skb, *tmp;
9027         struct sctp_ulpevent *event;
9028         struct sctp_bind_hashbucket *head;
9029
9030         /* Migrate socket buffer sizes and all the socket level options to the
9031          * new socket.
9032          */
9033         newsk->sk_sndbuf = oldsk->sk_sndbuf;
9034         newsk->sk_rcvbuf = oldsk->sk_rcvbuf;
9035         /* Brute force copy old sctp opt. */
9036         sctp_copy_descendant(newsk, oldsk);
9037
9038         /* Restore the ep value that was overwritten with the above structure
9039          * copy.
9040          */
9041         newsp->ep = newep;
9042         newsp->hmac = NULL;
9043
9044         /* Hook this new socket in to the bind_hash list. */
9045         head = &sctp_port_hashtable[sctp_phashfn(sock_net(oldsk),
9046                                                  inet_sk(oldsk)->inet_num)];
9047         spin_lock_bh(&head->lock);
9048         pp = sctp_sk(oldsk)->bind_hash;
9049         sk_add_bind_node(newsk, &pp->owner);
9050         sctp_sk(newsk)->bind_hash = pp;
9051         inet_sk(newsk)->inet_num = inet_sk(oldsk)->inet_num;
9052         spin_unlock_bh(&head->lock);
9053
9054         /* Copy the bind_addr list from the original endpoint to the new
9055          * endpoint so that we can handle restarts properly
9056          */
9057         sctp_bind_addr_dup(&newsp->ep->base.bind_addr,
9058                                 &oldsp->ep->base.bind_addr, GFP_KERNEL);
9059
9060         /* Move any messages in the old socket's receive queue that are for the
9061          * peeled off association to the new socket's receive queue.
9062          */
9063         sctp_skb_for_each(skb, &oldsk->sk_receive_queue, tmp) {
9064                 event = sctp_skb2event(skb);
9065                 if (event->asoc == assoc) {
9066                         __skb_unlink(skb, &oldsk->sk_receive_queue);
9067                         __skb_queue_tail(&newsk->sk_receive_queue, skb);
9068                         sctp_skb_set_owner_r_frag(skb, newsk);
9069                 }
9070         }
9071
9072         /* Clean up any messages pending delivery due to partial
9073          * delivery.   Three cases:
9074          * 1) No partial deliver;  no work.
9075          * 2) Peeling off partial delivery; keep pd_lobby in new pd_lobby.
9076          * 3) Peeling off non-partial delivery; move pd_lobby to receive_queue.
9077          */
9078         skb_queue_head_init(&newsp->pd_lobby);
9079         atomic_set(&sctp_sk(newsk)->pd_mode, assoc->ulpq.pd_mode);
9080
9081         if (atomic_read(&sctp_sk(oldsk)->pd_mode)) {
9082                 struct sk_buff_head *queue;
9083
9084                 /* Decide which queue to move pd_lobby skbs to. */
9085                 if (assoc->ulpq.pd_mode) {
9086                         queue = &newsp->pd_lobby;
9087                 } else
9088                         queue = &newsk->sk_receive_queue;
9089
9090                 /* Walk through the pd_lobby, looking for skbs that
9091                  * need moved to the new socket.
9092                  */
9093                 sctp_skb_for_each(skb, &oldsp->pd_lobby, tmp) {
9094                         event = sctp_skb2event(skb);
9095                         if (event->asoc == assoc) {
9096                                 __skb_unlink(skb, &oldsp->pd_lobby);
9097                                 __skb_queue_tail(queue, skb);
9098                                 sctp_skb_set_owner_r_frag(skb, newsk);
9099                         }
9100                 }
9101
9102                 /* Clear up any skbs waiting for the partial
9103                  * delivery to finish.
9104                  */
9105                 if (assoc->ulpq.pd_mode)
9106                         sctp_clear_pd(oldsk, NULL);
9107
9108         }
9109
9110         sctp_for_each_rx_skb(assoc, newsk, sctp_skb_set_owner_r_frag);
9111
9112         /* Set the type of socket to indicate that it is peeled off from the
9113          * original UDP-style socket or created with the accept() call on a
9114          * TCP-style socket..
9115          */
9116         newsp->type = type;
9117
9118         /* Mark the new socket "in-use" by the user so that any packets
9119          * that may arrive on the association after we've moved it are
9120          * queued to the backlog.  This prevents a potential race between
9121          * backlog processing on the old socket and new-packet processing
9122          * on the new socket.
9123          *
9124          * The caller has just allocated newsk so we can guarantee that other
9125          * paths won't try to lock it and then oldsk.
9126          */
9127         lock_sock_nested(newsk, SINGLE_DEPTH_NESTING);
9128         sctp_for_each_tx_datachunk(assoc, sctp_clear_owner_w);
9129         sctp_assoc_migrate(assoc, newsk);
9130         sctp_for_each_tx_datachunk(assoc, sctp_set_owner_w);
9131
9132         /* If the association on the newsk is already closed before accept()
9133          * is called, set RCV_SHUTDOWN flag.
9134          */
9135         if (sctp_state(assoc, CLOSED) && sctp_style(newsk, TCP)) {
9136                 inet_sk_set_state(newsk, SCTP_SS_CLOSED);
9137                 newsk->sk_shutdown |= RCV_SHUTDOWN;
9138         } else {
9139                 inet_sk_set_state(newsk, SCTP_SS_ESTABLISHED);
9140         }
9141
9142         release_sock(newsk);
9143 }
9144
9145
9146 /* This proto struct describes the ULP interface for SCTP.  */
9147 struct proto sctp_prot = {
9148         .name        =  "SCTP",
9149         .owner       =  THIS_MODULE,
9150         .close       =  sctp_close,
9151         .disconnect  =  sctp_disconnect,
9152         .accept      =  sctp_accept,
9153         .ioctl       =  sctp_ioctl,
9154         .init        =  sctp_init_sock,
9155         .destroy     =  sctp_destroy_sock,
9156         .shutdown    =  sctp_shutdown,
9157         .setsockopt  =  sctp_setsockopt,
9158         .getsockopt  =  sctp_getsockopt,
9159         .sendmsg     =  sctp_sendmsg,
9160         .recvmsg     =  sctp_recvmsg,
9161         .bind        =  sctp_bind,
9162         .backlog_rcv =  sctp_backlog_rcv,
9163         .hash        =  sctp_hash,
9164         .unhash      =  sctp_unhash,
9165         .get_port    =  sctp_get_port,
9166         .obj_size    =  sizeof(struct sctp_sock),
9167         .useroffset  =  offsetof(struct sctp_sock, subscribe),
9168         .usersize    =  offsetof(struct sctp_sock, initmsg) -
9169                                 offsetof(struct sctp_sock, subscribe) +
9170                                 sizeof_field(struct sctp_sock, initmsg),
9171         .sysctl_mem  =  sysctl_sctp_mem,
9172         .sysctl_rmem =  sysctl_sctp_rmem,
9173         .sysctl_wmem =  sysctl_sctp_wmem,
9174         .memory_pressure = &sctp_memory_pressure,
9175         .enter_memory_pressure = sctp_enter_memory_pressure,
9176         .memory_allocated = &sctp_memory_allocated,
9177         .sockets_allocated = &sctp_sockets_allocated,
9178 };
9179
9180 #if IS_ENABLED(CONFIG_IPV6)
9181
9182 #include <net/transp_v6.h>
9183 static void sctp_v6_destroy_sock(struct sock *sk)
9184 {
9185         sctp_destroy_sock(sk);
9186         inet6_destroy_sock(sk);
9187 }
9188
9189 struct proto sctpv6_prot = {
9190         .name           = "SCTPv6",
9191         .owner          = THIS_MODULE,
9192         .close          = sctp_close,
9193         .disconnect     = sctp_disconnect,
9194         .accept         = sctp_accept,
9195         .ioctl          = sctp_ioctl,
9196         .init           = sctp_init_sock,
9197         .destroy        = sctp_v6_destroy_sock,
9198         .shutdown       = sctp_shutdown,
9199         .setsockopt     = sctp_setsockopt,
9200         .getsockopt     = sctp_getsockopt,
9201         .sendmsg        = sctp_sendmsg,
9202         .recvmsg        = sctp_recvmsg,
9203         .bind           = sctp_bind,
9204         .backlog_rcv    = sctp_backlog_rcv,
9205         .hash           = sctp_hash,
9206         .unhash         = sctp_unhash,
9207         .get_port       = sctp_get_port,
9208         .obj_size       = sizeof(struct sctp6_sock),
9209         .useroffset     = offsetof(struct sctp6_sock, sctp.subscribe),
9210         .usersize       = offsetof(struct sctp6_sock, sctp.initmsg) -
9211                                 offsetof(struct sctp6_sock, sctp.subscribe) +
9212                                 sizeof_field(struct sctp6_sock, sctp.initmsg),
9213         .sysctl_mem     = sysctl_sctp_mem,
9214         .sysctl_rmem    = sysctl_sctp_rmem,
9215         .sysctl_wmem    = sysctl_sctp_wmem,
9216         .memory_pressure = &sctp_memory_pressure,
9217         .enter_memory_pressure = sctp_enter_memory_pressure,
9218         .memory_allocated = &sctp_memory_allocated,
9219         .sockets_allocated = &sctp_sockets_allocated,
9220 };
9221 #endif /* IS_ENABLED(CONFIG_IPV6) */