The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/kern/uipc_socket.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*-
    2  * Copyright (c) 1982, 1986, 1988, 1990, 1993
    3  *      The Regents of the University of California.
    4  * Copyright (c) 2004 The FreeBSD Foundation
    5  * Copyright (c) 2004-2008 Robert N. M. Watson
    6  * All rights reserved.
    7  *
    8  * Redistribution and use in source and binary forms, with or without
    9  * modification, are permitted provided that the following conditions
   10  * are met:
   11  * 1. Redistributions of source code must retain the above copyright
   12  *    notice, this list of conditions and the following disclaimer.
   13  * 2. Redistributions in binary form must reproduce the above copyright
   14  *    notice, this list of conditions and the following disclaimer in the
   15  *    documentation and/or other materials provided with the distribution.
   16  * 4. Neither the name of the University nor the names of its contributors
   17  *    may be used to endorse or promote products derived from this software
   18  *    without specific prior written permission.
   19  *
   20  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
   21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
   24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
   25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
   26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
   28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   30  * SUCH DAMAGE.
   31  *
   32  *      @(#)uipc_socket.c       8.3 (Berkeley) 4/15/94
   33  */
   34 
   35 /*
   36  * Comments on the socket life cycle:
   37  *
   38  * soalloc() sets of socket layer state for a socket, called only by
   39  * socreate() and sonewconn().  Socket layer private.
   40  *
   41  * sodealloc() tears down socket layer state for a socket, called only by
   42  * sofree() and sonewconn().  Socket layer private.
   43  *
   44  * pru_attach() associates protocol layer state with an allocated socket;
   45  * called only once, may fail, aborting socket allocation.  This is called
   46  * from socreate() and sonewconn().  Socket layer private.
   47  *
   48  * pru_detach() disassociates protocol layer state from an attached socket,
   49  * and will be called exactly once for sockets in which pru_attach() has
   50  * been successfully called.  If pru_attach() returned an error,
   51  * pru_detach() will not be called.  Socket layer private.
   52  *
   53  * pru_abort() and pru_close() notify the protocol layer that the last
   54  * consumer of a socket is starting to tear down the socket, and that the
   55  * protocol should terminate the connection.  Historically, pru_abort() also
   56  * detached protocol state from the socket state, but this is no longer the
   57  * case.
   58  *
   59  * socreate() creates a socket and attaches protocol state.  This is a public
   60  * interface that may be used by socket layer consumers to create new
   61  * sockets.
   62  *
   63  * sonewconn() creates a socket and attaches protocol state.  This is a
   64  * public interface  that may be used by protocols to create new sockets when
   65  * a new connection is received and will be available for accept() on a
   66  * listen socket.
   67  *
   68  * soclose() destroys a socket after possibly waiting for it to disconnect.
   69  * This is a public interface that socket consumers should use to close and
   70  * release a socket when done with it.
   71  *
   72  * soabort() destroys a socket without waiting for it to disconnect (used
   73  * only for incoming connections that are already partially or fully
   74  * connected).  This is used internally by the socket layer when clearing
   75  * listen socket queues (due to overflow or close on the listen socket), but
   76  * is also a public interface protocols may use to abort connections in
   77  * their incomplete listen queues should they no longer be required.  Sockets
   78  * placed in completed connection listen queues should not be aborted for
   79  * reasons described in the comment above the soclose() implementation.  This
   80  * is not a general purpose close routine, and except in the specific
   81  * circumstances described here, should not be used.
   82  *
   83  * sofree() will free a socket and its protocol state if all references on
   84  * the socket have been released, and is the public interface to attempt to
   85  * free a socket when a reference is removed.  This is a socket layer private
   86  * interface.
   87  *
   88  * NOTE: In addition to socreate() and soclose(), which provide a single
   89  * socket reference to the consumer to be managed as required, there are two
   90  * calls to explicitly manage socket references, soref(), and sorele().
   91  * Currently, these are generally required only when transitioning a socket
   92  * from a listen queue to a file descriptor, in order to prevent garbage
   93  * collection of the socket at an untimely moment.  For a number of reasons,
   94  * these interfaces are not preferred, and should be avoided.
   95  * 
   96  * NOTE: With regard to VNETs the general rule is that callers do not set
   97  * curvnet. Exceptions to this rule include soabort(), sodisconnect(),
   98  * sofree() (and with that sorele(), sotryfree()), as well as sonewconn()
   99  * and sorflush(), which are usually called from a pre-set VNET context.
  100  * sopoll() currently does not need a VNET context to be set.
  101  */
  102 
  103 #include <sys/cdefs.h>
  104 __FBSDID("$FreeBSD$");
  105 
  106 #include "opt_inet.h"
  107 #include "opt_inet6.h"
  108 #include "opt_zero.h"
  109 #include "opt_compat.h"
  110 
  111 #include <sys/param.h>
  112 #include <sys/systm.h>
  113 #include <sys/fcntl.h>
  114 #include <sys/limits.h>
  115 #include <sys/lock.h>
  116 #include <sys/mac.h>
  117 #include <sys/malloc.h>
  118 #include <sys/mbuf.h>
  119 #include <sys/mutex.h>
  120 #include <sys/domain.h>
  121 #include <sys/file.h>                   /* for struct knote */
  122 #include <sys/kernel.h>
  123 #include <sys/event.h>
  124 #include <sys/eventhandler.h>
  125 #include <sys/poll.h>
  126 #include <sys/proc.h>
  127 #include <sys/protosw.h>
  128 #include <sys/socket.h>
  129 #include <sys/socketvar.h>
  130 #include <sys/resourcevar.h>
  131 #include <net/route.h>
  132 #include <sys/signalvar.h>
  133 #include <sys/stat.h>
  134 #include <sys/sx.h>
  135 #include <sys/sysctl.h>
  136 #include <sys/uio.h>
  137 #include <sys/jail.h>
  138 #include <sys/syslog.h>
  139 #include <netinet/in.h>
  140 
  141 #include <net/vnet.h>
  142 
  143 #include <security/mac/mac_framework.h>
  144 
  145 #include <vm/uma.h>
  146 
  147 #ifdef COMPAT_FREEBSD32
  148 #include <sys/mount.h>
  149 #include <sys/sysent.h>
  150 #include <compat/freebsd32/freebsd32.h>
  151 #endif
  152 
  153 static int      soreceive_rcvoob(struct socket *so, struct uio *uio,
  154                     int flags);
  155 
  156 static void     filt_sordetach(struct knote *kn);
  157 static int      filt_soread(struct knote *kn, long hint);
  158 static void     filt_sowdetach(struct knote *kn);
  159 static int      filt_sowrite(struct knote *kn, long hint);
  160 static int      filt_solisten(struct knote *kn, long hint);
  161 
  162 static struct filterops solisten_filtops = {
  163         .f_isfd = 1,
  164         .f_detach = filt_sordetach,
  165         .f_event = filt_solisten,
  166 };
  167 static struct filterops soread_filtops = {
  168         .f_isfd = 1,
  169         .f_detach = filt_sordetach,
  170         .f_event = filt_soread,
  171 };
  172 static struct filterops sowrite_filtops = {
  173         .f_isfd = 1,
  174         .f_detach = filt_sowdetach,
  175         .f_event = filt_sowrite,
  176 };
  177 
  178 so_gen_t        so_gencnt;      /* generation count for sockets */
  179 
  180 MALLOC_DEFINE(M_SONAME, "soname", "socket name");
  181 MALLOC_DEFINE(M_PCB, "pcb", "protocol control block");
  182 
  183 #define VNET_SO_ASSERT(so)                                              \
  184         VNET_ASSERT(curvnet != NULL,                                    \
  185             ("%s:%d curvnet is NULL, so=%p", __func__, __LINE__, (so)));
  186 
  187 /*
  188  * Limit on the number of connections in the listen queue waiting
  189  * for accept(2).
  190  */
  191 static int somaxconn = SOMAXCONN;
  192 
  193 static int
  194 sysctl_somaxconn(SYSCTL_HANDLER_ARGS)
  195 {
  196         int error;
  197         int val;
  198 
  199         val = somaxconn;
  200         error = sysctl_handle_int(oidp, &val, 0, req);
  201         if (error || !req->newptr )
  202                 return (error);
  203 
  204         if (val < 1 || val > USHRT_MAX)
  205                 return (EINVAL);
  206 
  207         somaxconn = val;
  208         return (0);
  209 }
  210 SYSCTL_PROC(_kern_ipc, KIPC_SOMAXCONN, somaxconn, CTLTYPE_UINT | CTLFLAG_RW,
  211     0, sizeof(int), sysctl_somaxconn, "I",
  212     "Maximum listen socket pending connection accept queue size");
  213 
  214 static int numopensockets;
  215 SYSCTL_INT(_kern_ipc, OID_AUTO, numopensockets, CTLFLAG_RD,
  216     &numopensockets, 0, "Number of open sockets");
  217 
  218 #ifdef ZERO_COPY_SOCKETS
  219 /* These aren't static because they're used in other files. */
  220 int so_zero_copy_send = 1;
  221 int so_zero_copy_receive = 1;
  222 SYSCTL_NODE(_kern_ipc, OID_AUTO, zero_copy, CTLFLAG_RD, 0,
  223     "Zero copy controls");
  224 SYSCTL_INT(_kern_ipc_zero_copy, OID_AUTO, receive, CTLFLAG_RW,
  225     &so_zero_copy_receive, 0, "Enable zero copy receive");
  226 SYSCTL_INT(_kern_ipc_zero_copy, OID_AUTO, send, CTLFLAG_RW,
  227     &so_zero_copy_send, 0, "Enable zero copy send");
  228 #endif /* ZERO_COPY_SOCKETS */
  229 
  230 /*
  231  * accept_mtx locks down per-socket fields relating to accept queues.  See
  232  * socketvar.h for an annotation of the protected fields of struct socket.
  233  */
  234 struct mtx accept_mtx;
  235 MTX_SYSINIT(accept_mtx, &accept_mtx, "accept", MTX_DEF);
  236 
  237 /*
  238  * so_global_mtx protects so_gencnt, numopensockets, and the per-socket
  239  * so_gencnt field.
  240  */
  241 static struct mtx so_global_mtx;
  242 MTX_SYSINIT(so_global_mtx, &so_global_mtx, "so_glabel", MTX_DEF);
  243 
  244 /*
  245  * General IPC sysctl name space, used by sockets and a variety of other IPC
  246  * types.
  247  */
  248 SYSCTL_NODE(_kern, KERN_IPC, ipc, CTLFLAG_RW, 0, "IPC");
  249 
  250 /*
  251  * Initialize the socket subsystem and set up the socket
  252  * memory allocator.
  253  */
  254 uma_zone_t socket_zone;
  255 int     maxsockets;
  256 
  257 static void
  258 socket_zone_change(void *tag)
  259 {
  260 
  261         uma_zone_set_max(socket_zone, maxsockets);
  262 }
  263 
  264 static void
  265 socket_init(void *tag)
  266 {
  267 
  268         socket_zone = uma_zcreate("socket", sizeof(struct socket), NULL, NULL,
  269             NULL, NULL, UMA_ALIGN_PTR, UMA_ZONE_NOFREE);
  270         uma_zone_set_max(socket_zone, maxsockets);
  271         EVENTHANDLER_REGISTER(maxsockets_change, socket_zone_change, NULL,
  272                 EVENTHANDLER_PRI_FIRST);
  273 }
  274 SYSINIT(socket, SI_SUB_PROTO_DOMAININIT, SI_ORDER_ANY, socket_init, NULL);
  275 
  276 /*
  277  * Initialise maxsockets.  This SYSINIT must be run after
  278  * tunable_mbinit().
  279  */
  280 static void
  281 init_maxsockets(void *ignored)
  282 {
  283 
  284         TUNABLE_INT_FETCH("kern.ipc.maxsockets", &maxsockets);
  285         maxsockets = imax(maxsockets, maxfiles);
  286 }
  287 SYSINIT(param, SI_SUB_TUNABLES, SI_ORDER_ANY, init_maxsockets, NULL);
  288 
  289 /*
  290  * Sysctl to get and set the maximum global sockets limit.  Notify protocols
  291  * of the change so that they can update their dependent limits as required.
  292  */
  293 static int
  294 sysctl_maxsockets(SYSCTL_HANDLER_ARGS)
  295 {
  296         int error, newmaxsockets;
  297 
  298         newmaxsockets = maxsockets;
  299         error = sysctl_handle_int(oidp, &newmaxsockets, 0, req);
  300         if (error == 0 && req->newptr) {
  301                 if (newmaxsockets > maxsockets &&
  302                     newmaxsockets <= maxfiles) {
  303                         maxsockets = newmaxsockets;
  304                         EVENTHANDLER_INVOKE(maxsockets_change);
  305                 } else
  306                         error = EINVAL;
  307         }
  308         return (error);
  309 }
  310 SYSCTL_PROC(_kern_ipc, OID_AUTO, maxsockets, CTLTYPE_INT|CTLFLAG_RW,
  311     &maxsockets, 0, sysctl_maxsockets, "IU",
  312     "Maximum number of sockets avaliable");
  313 
  314 /*
  315  * Socket operation routines.  These routines are called by the routines in
  316  * sys_socket.c or from a system process, and implement the semantics of
  317  * socket operations by switching out to the protocol specific routines.
  318  */
  319 
  320 /*
  321  * Get a socket structure from our zone, and initialize it.  Note that it
  322  * would probably be better to allocate socket and PCB at the same time, but
  323  * I'm not convinced that all the protocols can be easily modified to do
  324  * this.
  325  *
  326  * soalloc() returns a socket with a ref count of 0.
  327  */
  328 static struct socket *
  329 soalloc(struct vnet *vnet)
  330 {
  331         struct socket *so;
  332 
  333         so = uma_zalloc(socket_zone, M_NOWAIT | M_ZERO);
  334         if (so == NULL)
  335                 return (NULL);
  336 #ifdef MAC
  337         if (mac_socket_init(so, M_NOWAIT) != 0) {
  338                 uma_zfree(socket_zone, so);
  339                 return (NULL);
  340         }
  341 #endif
  342         SOCKBUF_LOCK_INIT(&so->so_snd, "so_snd");
  343         SOCKBUF_LOCK_INIT(&so->so_rcv, "so_rcv");
  344         sx_init(&so->so_snd.sb_sx, "so_snd_sx");
  345         sx_init(&so->so_rcv.sb_sx, "so_rcv_sx");
  346         TAILQ_INIT(&so->so_aiojobq);
  347         mtx_lock(&so_global_mtx);
  348         so->so_gencnt = ++so_gencnt;
  349         ++numopensockets;
  350 #ifdef VIMAGE
  351         VNET_ASSERT(vnet != NULL, ("%s:%d vnet is NULL, so=%p",
  352             __func__, __LINE__, so));
  353         vnet->vnet_sockcnt++;
  354         so->so_vnet = vnet;
  355 #endif
  356         mtx_unlock(&so_global_mtx);
  357         return (so);
  358 }
  359 
  360 /*
  361  * Free the storage associated with a socket at the socket layer, tear down
  362  * locks, labels, etc.  All protocol state is assumed already to have been
  363  * torn down (and possibly never set up) by the caller.
  364  */
  365 static void
  366 sodealloc(struct socket *so)
  367 {
  368 
  369         KASSERT(so->so_count == 0, ("sodealloc(): so_count %d", so->so_count));
  370         KASSERT(so->so_pcb == NULL, ("sodealloc(): so_pcb != NULL"));
  371 
  372         mtx_lock(&so_global_mtx);
  373         so->so_gencnt = ++so_gencnt;
  374         --numopensockets;       /* Could be below, but faster here. */
  375 #ifdef VIMAGE
  376         VNET_ASSERT(so->so_vnet != NULL, ("%s:%d so_vnet is NULL, so=%p",
  377             __func__, __LINE__, so));
  378         so->so_vnet->vnet_sockcnt--;
  379 #endif
  380         mtx_unlock(&so_global_mtx);
  381         if (so->so_rcv.sb_hiwat)
  382                 (void)chgsbsize(so->so_cred->cr_uidinfo,
  383                     &so->so_rcv.sb_hiwat, 0, RLIM_INFINITY);
  384         if (so->so_snd.sb_hiwat)
  385                 (void)chgsbsize(so->so_cred->cr_uidinfo,
  386                     &so->so_snd.sb_hiwat, 0, RLIM_INFINITY);
  387 #ifdef INET
  388         /* remove acccept filter if one is present. */
  389         if (so->so_accf != NULL)
  390                 do_setopt_accept_filter(so, NULL);
  391 #endif
  392 #ifdef MAC
  393         mac_socket_destroy(so);
  394 #endif
  395         crfree(so->so_cred);
  396         sx_destroy(&so->so_snd.sb_sx);
  397         sx_destroy(&so->so_rcv.sb_sx);
  398         SOCKBUF_LOCK_DESTROY(&so->so_snd);
  399         SOCKBUF_LOCK_DESTROY(&so->so_rcv);
  400         uma_zfree(socket_zone, so);
  401 }
  402 
  403 /*
  404  * socreate returns a socket with a ref count of 1.  The socket should be
  405  * closed with soclose().
  406  */
  407 int
  408 socreate(int dom, struct socket **aso, int type, int proto,
  409     struct ucred *cred, struct thread *td)
  410 {
  411         struct protosw *prp;
  412         struct socket *so;
  413         int error;
  414 
  415         if (proto)
  416                 prp = pffindproto(dom, proto, type);
  417         else
  418                 prp = pffindtype(dom, type);
  419 
  420         if (prp == NULL || prp->pr_usrreqs->pru_attach == NULL ||
  421             prp->pr_usrreqs->pru_attach == pru_attach_notsupp)
  422                 return (EPROTONOSUPPORT);
  423 
  424         if (prison_check_af(cred, prp->pr_domain->dom_family) != 0)
  425                 return (EPROTONOSUPPORT);
  426 
  427         if (prp->pr_type != type)
  428                 return (EPROTOTYPE);
  429         so = soalloc(CRED_TO_VNET(cred));
  430         if (so == NULL)
  431                 return (ENOBUFS);
  432 
  433         TAILQ_INIT(&so->so_incomp);
  434         TAILQ_INIT(&so->so_comp);
  435         so->so_type = type;
  436         so->so_cred = crhold(cred);
  437         if ((prp->pr_domain->dom_family == PF_INET) ||
  438             (prp->pr_domain->dom_family == PF_INET6) ||
  439             (prp->pr_domain->dom_family == PF_ROUTE))
  440                 so->so_fibnum = td->td_proc->p_fibnum;
  441         else
  442                 so->so_fibnum = 0;
  443         so->so_proto = prp;
  444 #ifdef MAC
  445         mac_socket_create(cred, so);
  446 #endif
  447         knlist_init_mtx(&so->so_rcv.sb_sel.si_note, SOCKBUF_MTX(&so->so_rcv));
  448         knlist_init_mtx(&so->so_snd.sb_sel.si_note, SOCKBUF_MTX(&so->so_snd));
  449         so->so_count = 1;
  450         /*
  451          * Auto-sizing of socket buffers is managed by the protocols and
  452          * the appropriate flags must be set in the pru_attach function.
  453          */
  454         CURVNET_SET(so->so_vnet);
  455         error = (*prp->pr_usrreqs->pru_attach)(so, proto, td);
  456         CURVNET_RESTORE();
  457         if (error) {
  458                 KASSERT(so->so_count == 1, ("socreate: so_count %d",
  459                     so->so_count));
  460                 so->so_count = 0;
  461                 sodealloc(so);
  462                 return (error);
  463         }
  464         *aso = so;
  465         return (0);
  466 }
  467 
  468 #ifdef REGRESSION
  469 static int regression_sonewconn_earlytest = 1;
  470 SYSCTL_INT(_regression, OID_AUTO, sonewconn_earlytest, CTLFLAG_RW,
  471     &regression_sonewconn_earlytest, 0, "Perform early sonewconn limit test");
  472 #endif
  473 
  474 /*
  475  * When an attempt at a new connection is noted on a socket which accepts
  476  * connections, sonewconn is called.  If the connection is possible (subject
  477  * to space constraints, etc.) then we allocate a new structure, propoerly
  478  * linked into the data structure of the original socket, and return this.
  479  * Connstatus may be 0, or SO_ISCONFIRMING, or SO_ISCONNECTED.
  480  *
  481  * Note: the ref count on the socket is 0 on return.
  482  */
  483 struct socket *
  484 sonewconn(struct socket *head, int connstatus)
  485 {
  486         static struct timeval lastover;
  487         static struct timeval overinterval = { 60, 0 };
  488         static int overcount;
  489 
  490         struct socket *so;
  491         int over;
  492 
  493         ACCEPT_LOCK();
  494         over = (head->so_qlen > 3 * head->so_qlimit / 2);
  495         ACCEPT_UNLOCK();
  496 #ifdef REGRESSION
  497         if (regression_sonewconn_earlytest && over) {
  498 #else
  499         if (over) {
  500 #endif
  501                 overcount++;
  502 
  503                 if (ratecheck(&lastover, &overinterval)) {
  504                         log(LOG_DEBUG, "%s: pcb %p: Listen queue overflow: "
  505                             "%i already in queue awaiting acceptance "
  506                             "(%d occurrences)\n",
  507                             __func__, head->so_pcb, head->so_qlen, overcount);
  508 
  509                         overcount = 0;
  510                 }
  511 
  512                 return (NULL);
  513         }
  514         VNET_ASSERT(head->so_vnet != NULL, ("%s:%d so_vnet is NULL, head=%p",
  515             __func__, __LINE__, head));
  516         so = soalloc(head->so_vnet);
  517         if (so == NULL) {
  518                 log(LOG_DEBUG, "%s: pcb %p: New socket allocation failure: "
  519                     "limit reached or out of memory\n",
  520                     __func__, head->so_pcb);
  521                 return (NULL);
  522         }
  523         if ((head->so_options & SO_ACCEPTFILTER) != 0)
  524                 connstatus = 0;
  525         so->so_head = head;
  526         so->so_type = head->so_type;
  527         so->so_options = head->so_options &~ SO_ACCEPTCONN;
  528         so->so_linger = head->so_linger;
  529         so->so_state = head->so_state | SS_NOFDREF;
  530         so->so_fibnum = head->so_fibnum;
  531         so->so_proto = head->so_proto;
  532         so->so_cred = crhold(head->so_cred);
  533 #ifdef MAC
  534         mac_socket_newconn(head, so);
  535 #endif
  536         knlist_init_mtx(&so->so_rcv.sb_sel.si_note, SOCKBUF_MTX(&so->so_rcv));
  537         knlist_init_mtx(&so->so_snd.sb_sel.si_note, SOCKBUF_MTX(&so->so_snd));
  538         VNET_SO_ASSERT(head);
  539         if (soreserve(so, head->so_snd.sb_hiwat, head->so_rcv.sb_hiwat)) {
  540                 sodealloc(so);
  541                 log(LOG_DEBUG, "%s: pcb %p: soreserve() failed\n",
  542                     __func__, head->so_pcb);
  543                 return (NULL);
  544         }
  545         if ((*so->so_proto->pr_usrreqs->pru_attach)(so, 0, NULL)) {
  546                 sodealloc(so);
  547                 log(LOG_DEBUG, "%s: pcb %p: pru_attach() failed\n",
  548                     __func__, head->so_pcb);
  549                 return (NULL);
  550         }
  551         so->so_rcv.sb_lowat = head->so_rcv.sb_lowat;
  552         so->so_snd.sb_lowat = head->so_snd.sb_lowat;
  553         so->so_rcv.sb_timeo = head->so_rcv.sb_timeo;
  554         so->so_snd.sb_timeo = head->so_snd.sb_timeo;
  555         so->so_rcv.sb_flags |= head->so_rcv.sb_flags & SB_AUTOSIZE;
  556         so->so_snd.sb_flags |= head->so_snd.sb_flags & SB_AUTOSIZE;
  557         so->so_state |= connstatus;
  558         ACCEPT_LOCK();
  559         /*
  560          * The accept socket may be tearing down but we just
  561          * won a race on the ACCEPT_LOCK.
  562          * However, if sctp_peeloff() is called on a 1-to-many
  563          * style socket, the SO_ACCEPTCONN doesn't need to be set.
  564          */
  565         if (!(head->so_options & SO_ACCEPTCONN) &&
  566             ((head->so_proto->pr_protocol != IPPROTO_SCTP) ||
  567              (head->so_type != SOCK_SEQPACKET))) {
  568                 SOCK_LOCK(so);
  569                 so->so_head = NULL;
  570                 sofree(so);             /* NB: returns ACCEPT_UNLOCK'ed. */
  571                 return (NULL);
  572         }
  573         if (connstatus) {
  574                 TAILQ_INSERT_TAIL(&head->so_comp, so, so_list);
  575                 so->so_qstate |= SQ_COMP;
  576                 head->so_qlen++;
  577         } else {
  578                 /*
  579                  * Keep removing sockets from the head until there's room for
  580                  * us to insert on the tail.  In pre-locking revisions, this
  581                  * was a simple if(), but as we could be racing with other
  582                  * threads and soabort() requires dropping locks, we must
  583                  * loop waiting for the condition to be true.
  584                  */
  585                 while (head->so_incqlen > head->so_qlimit) {
  586                         struct socket *sp;
  587                         sp = TAILQ_FIRST(&head->so_incomp);
  588                         TAILQ_REMOVE(&head->so_incomp, sp, so_list);
  589                         head->so_incqlen--;
  590                         sp->so_qstate &= ~SQ_INCOMP;
  591                         sp->so_head = NULL;
  592                         ACCEPT_UNLOCK();
  593                         soabort(sp);
  594                         ACCEPT_LOCK();
  595                 }
  596                 TAILQ_INSERT_TAIL(&head->so_incomp, so, so_list);
  597                 so->so_qstate |= SQ_INCOMP;
  598                 head->so_incqlen++;
  599         }
  600         ACCEPT_UNLOCK();
  601         if (connstatus) {
  602                 sorwakeup(head);
  603                 wakeup_one(&head->so_timeo);
  604         }
  605         return (so);
  606 }
  607 
  608 int
  609 sobind(struct socket *so, struct sockaddr *nam, struct thread *td)
  610 {
  611         int error;
  612 
  613         CURVNET_SET(so->so_vnet);
  614         error = (*so->so_proto->pr_usrreqs->pru_bind)(so, nam, td);
  615         CURVNET_RESTORE();
  616         return error;
  617 }
  618 
  619 /*
  620  * solisten() transitions a socket from a non-listening state to a listening
  621  * state, but can also be used to update the listen queue depth on an
  622  * existing listen socket.  The protocol will call back into the sockets
  623  * layer using solisten_proto_check() and solisten_proto() to check and set
  624  * socket-layer listen state.  Call backs are used so that the protocol can
  625  * acquire both protocol and socket layer locks in whatever order is required
  626  * by the protocol.
  627  *
  628  * Protocol implementors are advised to hold the socket lock across the
  629  * socket-layer test and set to avoid races at the socket layer.
  630  */
  631 int
  632 solisten(struct socket *so, int backlog, struct thread *td)
  633 {
  634         int error;
  635 
  636         CURVNET_SET(so->so_vnet);
  637         error = (*so->so_proto->pr_usrreqs->pru_listen)(so, backlog, td);
  638         CURVNET_RESTORE();
  639         return error;
  640 }
  641 
  642 int
  643 solisten_proto_check(struct socket *so)
  644 {
  645 
  646         SOCK_LOCK_ASSERT(so);
  647 
  648         if (so->so_state & (SS_ISCONNECTED | SS_ISCONNECTING |
  649             SS_ISDISCONNECTING))
  650                 return (EINVAL);
  651         return (0);
  652 }
  653 
  654 void
  655 solisten_proto(struct socket *so, int backlog)
  656 {
  657 
  658         SOCK_LOCK_ASSERT(so);
  659 
  660         if (backlog < 0 || backlog > somaxconn)
  661                 backlog = somaxconn;
  662         so->so_qlimit = backlog;
  663         so->so_options |= SO_ACCEPTCONN;
  664 }
  665 
  666 /*
  667  * Evaluate the reference count and named references on a socket; if no
  668  * references remain, free it.  This should be called whenever a reference is
  669  * released, such as in sorele(), but also when named reference flags are
  670  * cleared in socket or protocol code.
  671  *
  672  * sofree() will free the socket if:
  673  *
  674  * - There are no outstanding file descriptor references or related consumers
  675  *   (so_count == 0).
  676  *
  677  * - The socket has been closed by user space, if ever open (SS_NOFDREF).
  678  *
  679  * - The protocol does not have an outstanding strong reference on the socket
  680  *   (SS_PROTOREF).
  681  *
  682  * - The socket is not in a completed connection queue, so a process has been
  683  *   notified that it is present.  If it is removed, the user process may
  684  *   block in accept() despite select() saying the socket was ready.
  685  */
  686 void
  687 sofree(struct socket *so)
  688 {
  689         struct protosw *pr = so->so_proto;
  690         struct socket *head;
  691 
  692         ACCEPT_LOCK_ASSERT();
  693         SOCK_LOCK_ASSERT(so);
  694 
  695         if ((so->so_state & SS_NOFDREF) == 0 || so->so_count != 0 ||
  696             (so->so_state & SS_PROTOREF) || (so->so_qstate & SQ_COMP)) {
  697                 SOCK_UNLOCK(so);
  698                 ACCEPT_UNLOCK();
  699                 return;
  700         }
  701 
  702         head = so->so_head;
  703         if (head != NULL) {
  704                 KASSERT((so->so_qstate & SQ_COMP) != 0 ||
  705                     (so->so_qstate & SQ_INCOMP) != 0,
  706                     ("sofree: so_head != NULL, but neither SQ_COMP nor "
  707                     "SQ_INCOMP"));
  708                 KASSERT((so->so_qstate & SQ_COMP) == 0 ||
  709                     (so->so_qstate & SQ_INCOMP) == 0,
  710                     ("sofree: so->so_qstate is SQ_COMP and also SQ_INCOMP"));
  711                 TAILQ_REMOVE(&head->so_incomp, so, so_list);
  712                 head->so_incqlen--;
  713                 so->so_qstate &= ~SQ_INCOMP;
  714                 so->so_head = NULL;
  715         }
  716         KASSERT((so->so_qstate & SQ_COMP) == 0 &&
  717             (so->so_qstate & SQ_INCOMP) == 0,
  718             ("sofree: so_head == NULL, but still SQ_COMP(%d) or SQ_INCOMP(%d)",
  719             so->so_qstate & SQ_COMP, so->so_qstate & SQ_INCOMP));
  720         if (so->so_options & SO_ACCEPTCONN) {
  721                 KASSERT((TAILQ_EMPTY(&so->so_comp)), ("sofree: so_comp populated"));
  722                 KASSERT((TAILQ_EMPTY(&so->so_incomp)), ("sofree: so_incomp populated"));
  723         }
  724         SOCK_UNLOCK(so);
  725         ACCEPT_UNLOCK();
  726 
  727         VNET_SO_ASSERT(so);
  728         if (pr->pr_flags & PR_RIGHTS && pr->pr_domain->dom_dispose != NULL)
  729                 (*pr->pr_domain->dom_dispose)(so->so_rcv.sb_mb);
  730         if (pr->pr_usrreqs->pru_detach != NULL)
  731                 (*pr->pr_usrreqs->pru_detach)(so);
  732 
  733         /*
  734          * From this point on, we assume that no other references to this
  735          * socket exist anywhere else in the stack.  Therefore, no locks need
  736          * to be acquired or held.
  737          *
  738          * We used to do a lot of socket buffer and socket locking here, as
  739          * well as invoke sorflush() and perform wakeups.  The direct call to
  740          * dom_dispose() and sbrelease_internal() are an inlining of what was
  741          * necessary from sorflush().
  742          *
  743          * Notice that the socket buffer and kqueue state are torn down
  744          * before calling pru_detach.  This means that protocols shold not
  745          * assume they can perform socket wakeups, etc, in their detach code.
  746          */
  747         sbdestroy(&so->so_snd, so);
  748         sbdestroy(&so->so_rcv, so);
  749         seldrain(&so->so_snd.sb_sel);
  750         seldrain(&so->so_rcv.sb_sel);
  751         knlist_destroy(&so->so_rcv.sb_sel.si_note);
  752         knlist_destroy(&so->so_snd.sb_sel.si_note);
  753         sodealloc(so);
  754 }
  755 
  756 /*
  757  * Close a socket on last file table reference removal.  Initiate disconnect
  758  * if connected.  Free socket when disconnect complete.
  759  *
  760  * This function will sorele() the socket.  Note that soclose() may be called
  761  * prior to the ref count reaching zero.  The actual socket structure will
  762  * not be freed until the ref count reaches zero.
  763  */
  764 int
  765 soclose(struct socket *so)
  766 {
  767         int error = 0;
  768 
  769         KASSERT(!(so->so_state & SS_NOFDREF), ("soclose: SS_NOFDREF on enter"));
  770 
  771         CURVNET_SET(so->so_vnet);
  772         funsetown(&so->so_sigio);
  773         if (so->so_state & SS_ISCONNECTED) {
  774                 if ((so->so_state & SS_ISDISCONNECTING) == 0) {
  775                         error = sodisconnect(so);
  776                         if (error) {
  777                                 if (error == ENOTCONN)
  778                                         error = 0;
  779                                 goto drop;
  780                         }
  781                 }
  782                 if (so->so_options & SO_LINGER) {
  783                         if ((so->so_state & SS_ISDISCONNECTING) &&
  784                             (so->so_state & SS_NBIO))
  785                                 goto drop;
  786                         while (so->so_state & SS_ISCONNECTED) {
  787                                 error = tsleep(&so->so_timeo,
  788                                     PSOCK | PCATCH, "soclos", so->so_linger * hz);
  789                                 if (error)
  790                                         break;
  791                         }
  792                 }
  793         }
  794 
  795 drop:
  796         if (so->so_proto->pr_usrreqs->pru_close != NULL)
  797                 (*so->so_proto->pr_usrreqs->pru_close)(so);
  798         ACCEPT_LOCK();
  799         if (so->so_options & SO_ACCEPTCONN) {
  800                 struct socket *sp;
  801                 /*
  802                  * Prevent new additions to the accept queues due
  803                  * to ACCEPT_LOCK races while we are draining them.
  804                  */
  805                 so->so_options &= ~SO_ACCEPTCONN;
  806                 while ((sp = TAILQ_FIRST(&so->so_incomp)) != NULL) {
  807                         TAILQ_REMOVE(&so->so_incomp, sp, so_list);
  808                         so->so_incqlen--;
  809                         sp->so_qstate &= ~SQ_INCOMP;
  810                         sp->so_head = NULL;
  811                         ACCEPT_UNLOCK();
  812                         soabort(sp);
  813                         ACCEPT_LOCK();
  814                 }
  815                 while ((sp = TAILQ_FIRST(&so->so_comp)) != NULL) {
  816                         TAILQ_REMOVE(&so->so_comp, sp, so_list);
  817                         so->so_qlen--;
  818                         sp->so_qstate &= ~SQ_COMP;
  819                         sp->so_head = NULL;
  820                         ACCEPT_UNLOCK();
  821                         soabort(sp);
  822                         ACCEPT_LOCK();
  823                 }
  824                 KASSERT((TAILQ_EMPTY(&so->so_comp)),
  825                     ("%s: so_comp populated", __func__));
  826                 KASSERT((TAILQ_EMPTY(&so->so_incomp)),
  827                     ("%s: so_incomp populated", __func__));
  828         }
  829         SOCK_LOCK(so);
  830         KASSERT((so->so_state & SS_NOFDREF) == 0, ("soclose: NOFDREF"));
  831         so->so_state |= SS_NOFDREF;
  832         sorele(so);                     /* NB: Returns with ACCEPT_UNLOCK(). */
  833         CURVNET_RESTORE();
  834         return (error);
  835 }
  836 
  837 /*
  838  * soabort() is used to abruptly tear down a connection, such as when a
  839  * resource limit is reached (listen queue depth exceeded), or if a listen
  840  * socket is closed while there are sockets waiting to be accepted.
  841  *
  842  * This interface is tricky, because it is called on an unreferenced socket,
  843  * and must be called only by a thread that has actually removed the socket
  844  * from the listen queue it was on, or races with other threads are risked.
  845  *
  846  * This interface will call into the protocol code, so must not be called
  847  * with any socket locks held.  Protocols do call it while holding their own
  848  * recursible protocol mutexes, but this is something that should be subject
  849  * to review in the future.
  850  */
  851 void
  852 soabort(struct socket *so)
  853 {
  854 
  855         /*
  856          * In as much as is possible, assert that no references to this
  857          * socket are held.  This is not quite the same as asserting that the
  858          * current thread is responsible for arranging for no references, but
  859          * is as close as we can get for now.
  860          */
  861         KASSERT(so->so_count == 0, ("soabort: so_count"));
  862         KASSERT((so->so_state & SS_PROTOREF) == 0, ("soabort: SS_PROTOREF"));
  863         KASSERT(so->so_state & SS_NOFDREF, ("soabort: !SS_NOFDREF"));
  864         KASSERT((so->so_state & SQ_COMP) == 0, ("soabort: SQ_COMP"));
  865         KASSERT((so->so_state & SQ_INCOMP) == 0, ("soabort: SQ_INCOMP"));
  866         VNET_SO_ASSERT(so);
  867 
  868         if (so->so_proto->pr_usrreqs->pru_abort != NULL)
  869                 (*so->so_proto->pr_usrreqs->pru_abort)(so);
  870         ACCEPT_LOCK();
  871         SOCK_LOCK(so);
  872         sofree(so);
  873 }
  874 
  875 int
  876 soaccept(struct socket *so, struct sockaddr **nam)
  877 {
  878         int error;
  879 
  880         SOCK_LOCK(so);
  881         KASSERT((so->so_state & SS_NOFDREF) != 0, ("soaccept: !NOFDREF"));
  882         so->so_state &= ~SS_NOFDREF;
  883         SOCK_UNLOCK(so);
  884 
  885         CURVNET_SET(so->so_vnet);
  886         error = (*so->so_proto->pr_usrreqs->pru_accept)(so, nam);
  887         CURVNET_RESTORE();
  888         return (error);
  889 }
  890 
  891 int
  892 soconnect(struct socket *so, struct sockaddr *nam, struct thread *td)
  893 {
  894         int error;
  895 
  896         if (so->so_options & SO_ACCEPTCONN)
  897                 return (EOPNOTSUPP);
  898 
  899         CURVNET_SET(so->so_vnet);
  900         /*
  901          * If protocol is connection-based, can only connect once.
  902          * Otherwise, if connected, try to disconnect first.  This allows
  903          * user to disconnect by connecting to, e.g., a null address.
  904          */
  905         if (so->so_state & (SS_ISCONNECTED|SS_ISCONNECTING) &&
  906             ((so->so_proto->pr_flags & PR_CONNREQUIRED) ||
  907             (error = sodisconnect(so)))) {
  908                 error = EISCONN;
  909         } else {
  910                 /*
  911                  * Prevent accumulated error from previous connection from
  912                  * biting us.
  913                  */
  914                 so->so_error = 0;
  915                 error = (*so->so_proto->pr_usrreqs->pru_connect)(so, nam, td);
  916         }
  917         CURVNET_RESTORE();
  918 
  919         return (error);
  920 }
  921 
  922 int
  923 soconnect2(struct socket *so1, struct socket *so2)
  924 {
  925         int error;
  926 
  927         CURVNET_SET(so1->so_vnet);
  928         error = (*so1->so_proto->pr_usrreqs->pru_connect2)(so1, so2);
  929         CURVNET_RESTORE();
  930         return (error);
  931 }
  932 
  933 int
  934 sodisconnect(struct socket *so)
  935 {
  936         int error;
  937 
  938         if ((so->so_state & SS_ISCONNECTED) == 0)
  939                 return (ENOTCONN);
  940         if (so->so_state & SS_ISDISCONNECTING)
  941                 return (EALREADY);
  942         VNET_SO_ASSERT(so);
  943         error = (*so->so_proto->pr_usrreqs->pru_disconnect)(so);
  944         return (error);
  945 }
  946 
  947 #ifdef ZERO_COPY_SOCKETS
  948 struct so_zerocopy_stats{
  949         int size_ok;
  950         int align_ok;
  951         int found_ifp;
  952 };
  953 struct so_zerocopy_stats so_zerocp_stats = {0,0,0};
  954 
  955 /*
  956  * sosend_copyin() is only used if zero copy sockets are enabled.  Otherwise
  957  * sosend_dgram() and sosend_generic() use m_uiotombuf().
  958  * 
  959  * sosend_copyin() accepts a uio and prepares an mbuf chain holding part or
  960  * all of the data referenced by the uio.  If desired, it uses zero-copy.
  961  * *space will be updated to reflect data copied in.
  962  *
  963  * NB: If atomic I/O is requested, the caller must already have checked that
  964  * space can hold resid bytes.
  965  *
  966  * NB: In the event of an error, the caller may need to free the partial
  967  * chain pointed to by *mpp.  The contents of both *uio and *space may be
  968  * modified even in the case of an error.
  969  */
  970 static int
  971 sosend_copyin(struct uio *uio, struct mbuf **retmp, int atomic, long *space,
  972     int flags)
  973 {
  974         struct mbuf *m, **mp, *top;
  975         long len;
  976         ssize_t resid;
  977         int error;
  978         int cow_send;
  979 
  980         *retmp = top = NULL;
  981         mp = &top;
  982         len = 0;
  983         resid = uio->uio_resid;
  984         error = 0;
  985         do {
  986                 cow_send = 0;
  987                 if (resid >= MINCLSIZE) {
  988                         if (top == NULL) {
  989                                 m = m_gethdr(M_WAITOK, MT_DATA);
  990                                 m->m_pkthdr.len = 0;
  991                                 m->m_pkthdr.rcvif = NULL;
  992                         } else
  993                                 m = m_get(M_WAITOK, MT_DATA);
  994                         if (so_zero_copy_send &&
  995                             resid >= PAGE_SIZE &&
  996                             *space >= PAGE_SIZE &&
  997                             uio->uio_iov->iov_len >= PAGE_SIZE) {
  998                                 so_zerocp_stats.size_ok++;
  999                                 so_zerocp_stats.align_ok++;
 1000                                 cow_send = socow_setup(m, uio);
 1001                                 len = cow_send;
 1002                         }
 1003                         if (!cow_send) {
 1004                                 m_clget(m, M_WAITOK);
 1005                                 len = min(min(MCLBYTES, resid), *space);
 1006                         }
 1007                 } else {
 1008                         if (top == NULL) {
 1009                                 m = m_gethdr(M_WAIT, MT_DATA);
 1010                                 m->m_pkthdr.len = 0;
 1011                                 m->m_pkthdr.rcvif = NULL;
 1012 
 1013                                 len = min(min(MHLEN, resid), *space);
 1014                                 /*
 1015                                  * For datagram protocols, leave room
 1016                                  * for protocol headers in first mbuf.
 1017                                  */
 1018                                 if (atomic && m && len < MHLEN)
 1019                                         MH_ALIGN(m, len);
 1020                         } else {
 1021                                 m = m_get(M_WAIT, MT_DATA);
 1022                                 len = min(min(MLEN, resid), *space);
 1023                         }
 1024                 }
 1025                 if (m == NULL) {
 1026                         error = ENOBUFS;
 1027                         goto out;
 1028                 }
 1029 
 1030                 *space -= len;
 1031                 if (cow_send)
 1032                         error = 0;
 1033                 else
 1034                         error = uiomove(mtod(m, void *), (int)len, uio);
 1035                 resid = uio->uio_resid;
 1036                 m->m_len = len;
 1037                 *mp = m;
 1038                 top->m_pkthdr.len += len;
 1039                 if (error)
 1040                         goto out;
 1041                 mp = &m->m_next;
 1042                 if (resid <= 0) {
 1043                         if (flags & MSG_EOR)
 1044                                 top->m_flags |= M_EOR;
 1045                         break;
 1046                 }
 1047         } while (*space > 0 && atomic);
 1048 out:
 1049         *retmp = top;
 1050         return (error);
 1051 }
 1052 #endif /* ZERO_COPY_SOCKETS */
 1053 
 1054 #define SBLOCKWAIT(f)   (((f) & MSG_DONTWAIT) ? 0 : SBL_WAIT)
 1055 
 1056 int
 1057 sosend_dgram(struct socket *so, struct sockaddr *addr, struct uio *uio,
 1058     struct mbuf *top, struct mbuf *control, int flags, struct thread *td)
 1059 {
 1060         long space;
 1061         ssize_t resid;
 1062         int clen = 0, error, dontroute;
 1063 #ifdef ZERO_COPY_SOCKETS
 1064         int atomic = sosendallatonce(so) || top;
 1065 #endif
 1066 
 1067         KASSERT(so->so_type == SOCK_DGRAM, ("sodgram_send: !SOCK_DGRAM"));
 1068         KASSERT(so->so_proto->pr_flags & PR_ATOMIC,
 1069             ("sodgram_send: !PR_ATOMIC"));
 1070 
 1071         if (uio != NULL)
 1072                 resid = uio->uio_resid;
 1073         else
 1074                 resid = top->m_pkthdr.len;
 1075         /*
 1076          * In theory resid should be unsigned.  However, space must be
 1077          * signed, as it might be less than 0 if we over-committed, and we
 1078          * must use a signed comparison of space and resid.  On the other
 1079          * hand, a negative resid causes us to loop sending 0-length
 1080          * segments to the protocol.
 1081          */
 1082         if (resid < 0) {
 1083                 error = EINVAL;
 1084                 goto out;
 1085         }
 1086 
 1087         dontroute =
 1088             (flags & MSG_DONTROUTE) && (so->so_options & SO_DONTROUTE) == 0;
 1089         if (td != NULL)
 1090                 td->td_ru.ru_msgsnd++;
 1091         if (control != NULL)
 1092                 clen = control->m_len;
 1093 
 1094         SOCKBUF_LOCK(&so->so_snd);
 1095         if (so->so_snd.sb_state & SBS_CANTSENDMORE) {
 1096                 SOCKBUF_UNLOCK(&so->so_snd);
 1097                 error = EPIPE;
 1098                 goto out;
 1099         }
 1100         if (so->so_error) {
 1101                 error = so->so_error;
 1102                 so->so_error = 0;
 1103                 SOCKBUF_UNLOCK(&so->so_snd);
 1104                 goto out;
 1105         }
 1106         if ((so->so_state & SS_ISCONNECTED) == 0) {
 1107                 /*
 1108                  * `sendto' and `sendmsg' is allowed on a connection-based
 1109                  * socket if it supports implied connect.  Return ENOTCONN if
 1110                  * not connected and no address is supplied.
 1111                  */
 1112                 if ((so->so_proto->pr_flags & PR_CONNREQUIRED) &&
 1113                     (so->so_proto->pr_flags & PR_IMPLOPCL) == 0) {
 1114                         if ((so->so_state & SS_ISCONFIRMING) == 0 &&
 1115                             !(resid == 0 && clen != 0)) {
 1116                                 SOCKBUF_UNLOCK(&so->so_snd);
 1117                                 error = ENOTCONN;
 1118                                 goto out;
 1119                         }
 1120                 } else if (addr == NULL) {
 1121                         if (so->so_proto->pr_flags & PR_CONNREQUIRED)
 1122                                 error = ENOTCONN;
 1123                         else
 1124                                 error = EDESTADDRREQ;
 1125                         SOCKBUF_UNLOCK(&so->so_snd);
 1126                         goto out;
 1127                 }
 1128         }
 1129 
 1130         /*
 1131          * Do we need MSG_OOB support in SOCK_DGRAM?  Signs here may be a
 1132          * problem and need fixing.
 1133          */
 1134         space = sbspace(&so->so_snd);
 1135         if (flags & MSG_OOB)
 1136                 space += 1024;
 1137         space -= clen;
 1138         SOCKBUF_UNLOCK(&so->so_snd);
 1139         if (resid > space) {
 1140                 error = EMSGSIZE;
 1141                 goto out;
 1142         }
 1143         if (uio == NULL) {
 1144                 resid = 0;
 1145                 if (flags & MSG_EOR)
 1146                         top->m_flags |= M_EOR;
 1147         } else {
 1148 #ifdef ZERO_COPY_SOCKETS
 1149                 error = sosend_copyin(uio, &top, atomic, &space, flags);
 1150                 if (error)
 1151                         goto out;
 1152 #else
 1153                 /*
 1154                  * Copy the data from userland into a mbuf chain.
 1155                  * If no data is to be copied in, a single empty mbuf
 1156                  * is returned.
 1157                  */
 1158                 top = m_uiotombuf(uio, M_WAITOK, space, max_hdr,
 1159                     (M_PKTHDR | ((flags & MSG_EOR) ? M_EOR : 0)));
 1160                 if (top == NULL) {
 1161                         error = EFAULT; /* only possible error */
 1162                         goto out;
 1163                 }
 1164                 space -= resid - uio->uio_resid;
 1165 #endif
 1166                 resid = uio->uio_resid;
 1167         }
 1168         KASSERT(resid == 0, ("sosend_dgram: resid != 0"));
 1169         /*
 1170          * XXXRW: Frobbing SO_DONTROUTE here is even worse without sblock
 1171          * than with.
 1172          */
 1173         if (dontroute) {
 1174                 SOCK_LOCK(so);
 1175                 so->so_options |= SO_DONTROUTE;
 1176                 SOCK_UNLOCK(so);
 1177         }
 1178         /*
 1179          * XXX all the SBS_CANTSENDMORE checks previously done could be out
 1180          * of date.  We could have recieved a reset packet in an interrupt or
 1181          * maybe we slept while doing page faults in uiomove() etc.  We could
 1182          * probably recheck again inside the locking protection here, but
 1183          * there are probably other places that this also happens.  We must
 1184          * rethink this.
 1185          */
 1186         VNET_SO_ASSERT(so);
 1187         error = (*so->so_proto->pr_usrreqs->pru_send)(so,
 1188             (flags & MSG_OOB) ? PRUS_OOB :
 1189         /*
 1190          * If the user set MSG_EOF, the protocol understands this flag and
 1191          * nothing left to send then use PRU_SEND_EOF instead of PRU_SEND.
 1192          */
 1193             ((flags & MSG_EOF) &&
 1194              (so->so_proto->pr_flags & PR_IMPLOPCL) &&
 1195              (resid <= 0)) ?
 1196                 PRUS_EOF :
 1197                 /* If there is more to send set PRUS_MORETOCOME */
 1198                 (resid > 0 && space > 0) ? PRUS_MORETOCOME : 0,
 1199                 top, addr, control, td);
 1200         if (dontroute) {
 1201                 SOCK_LOCK(so);
 1202                 so->so_options &= ~SO_DONTROUTE;
 1203                 SOCK_UNLOCK(so);
 1204         }
 1205         clen = 0;
 1206         control = NULL;
 1207         top = NULL;
 1208 out:
 1209         if (top != NULL)
 1210                 m_freem(top);
 1211         if (control != NULL)
 1212                 m_freem(control);
 1213         return (error);
 1214 }
 1215 
 1216 /*
 1217  * Send on a socket.  If send must go all at once and message is larger than
 1218  * send buffering, then hard error.  Lock against other senders.  If must go
 1219  * all at once and not enough room now, then inform user that this would
 1220  * block and do nothing.  Otherwise, if nonblocking, send as much as
 1221  * possible.  The data to be sent is described by "uio" if nonzero, otherwise
 1222  * by the mbuf chain "top" (which must be null if uio is not).  Data provided
 1223  * in mbuf chain must be small enough to send all at once.
 1224  *
 1225  * Returns nonzero on error, timeout or signal; callers must check for short
 1226  * counts if EINTR/ERESTART are returned.  Data and control buffers are freed
 1227  * on return.
 1228  */
 1229 int
 1230 sosend_generic(struct socket *so, struct sockaddr *addr, struct uio *uio,
 1231     struct mbuf *top, struct mbuf *control, int flags, struct thread *td)
 1232 {
 1233         long space;
 1234         ssize_t resid;
 1235         int clen = 0, error, dontroute;
 1236         int atomic = sosendallatonce(so) || top;
 1237 
 1238         if (uio != NULL)
 1239                 resid = uio->uio_resid;
 1240         else
 1241                 resid = top->m_pkthdr.len;
 1242         /*
 1243          * In theory resid should be unsigned.  However, space must be
 1244          * signed, as it might be less than 0 if we over-committed, and we
 1245          * must use a signed comparison of space and resid.  On the other
 1246          * hand, a negative resid causes us to loop sending 0-length
 1247          * segments to the protocol.
 1248          *
 1249          * Also check to make sure that MSG_EOR isn't used on SOCK_STREAM
 1250          * type sockets since that's an error.
 1251          */
 1252         if (resid < 0 || (so->so_type == SOCK_STREAM && (flags & MSG_EOR))) {
 1253                 error = EINVAL;
 1254                 goto out;
 1255         }
 1256 
 1257         dontroute =
 1258             (flags & MSG_DONTROUTE) && (so->so_options & SO_DONTROUTE) == 0 &&
 1259             (so->so_proto->pr_flags & PR_ATOMIC);
 1260         if (td != NULL)
 1261                 td->td_ru.ru_msgsnd++;
 1262         if (control != NULL)
 1263                 clen = control->m_len;
 1264 
 1265         error = sblock(&so->so_snd, SBLOCKWAIT(flags));
 1266         if (error)
 1267                 goto out;
 1268 
 1269 restart:
 1270         do {
 1271                 SOCKBUF_LOCK(&so->so_snd);
 1272                 if (so->so_snd.sb_state & SBS_CANTSENDMORE) {
 1273                         SOCKBUF_UNLOCK(&so->so_snd);
 1274                         error = EPIPE;
 1275                         goto release;
 1276                 }
 1277                 if (so->so_error) {
 1278                         error = so->so_error;
 1279                         so->so_error = 0;
 1280                         SOCKBUF_UNLOCK(&so->so_snd);
 1281                         goto release;
 1282                 }
 1283                 if ((so->so_state & SS_ISCONNECTED) == 0) {
 1284                         /*
 1285                          * `sendto' and `sendmsg' is allowed on a connection-
 1286                          * based socket if it supports implied connect.
 1287                          * Return ENOTCONN if not connected and no address is
 1288                          * supplied.
 1289                          */
 1290                         if ((so->so_proto->pr_flags & PR_CONNREQUIRED) &&
 1291                             (so->so_proto->pr_flags & PR_IMPLOPCL) == 0) {
 1292                                 if ((so->so_state & SS_ISCONFIRMING) == 0 &&
 1293                                     !(resid == 0 && clen != 0)) {
 1294                                         SOCKBUF_UNLOCK(&so->so_snd);
 1295                                         error = ENOTCONN;
 1296                                         goto release;
 1297                                 }
 1298                         } else if (addr == NULL) {
 1299                                 SOCKBUF_UNLOCK(&so->so_snd);
 1300                                 if (so->so_proto->pr_flags & PR_CONNREQUIRED)
 1301                                         error = ENOTCONN;
 1302                                 else
 1303                                         error = EDESTADDRREQ;
 1304                                 goto release;
 1305                         }
 1306                 }
 1307                 space = sbspace(&so->so_snd);
 1308                 if (flags & MSG_OOB)
 1309                         space += 1024;
 1310                 if ((atomic && resid > so->so_snd.sb_hiwat) ||
 1311                     clen > so->so_snd.sb_hiwat) {
 1312                         SOCKBUF_UNLOCK(&so->so_snd);
 1313                         error = EMSGSIZE;
 1314                         goto release;
 1315                 }
 1316                 if (space < resid + clen &&
 1317                     (atomic || space < so->so_snd.sb_lowat || space < clen)) {
 1318                         if ((so->so_state & SS_NBIO) || (flags & MSG_NBIO)) {
 1319                                 SOCKBUF_UNLOCK(&so->so_snd);
 1320                                 error = EWOULDBLOCK;
 1321                                 goto release;
 1322                         }
 1323                         error = sbwait(&so->so_snd);
 1324                         SOCKBUF_UNLOCK(&so->so_snd);
 1325                         if (error)
 1326                                 goto release;
 1327                         goto restart;
 1328                 }
 1329                 SOCKBUF_UNLOCK(&so->so_snd);
 1330                 space -= clen;
 1331                 do {
 1332                         if (uio == NULL) {
 1333                                 resid = 0;
 1334                                 if (flags & MSG_EOR)
 1335                                         top->m_flags |= M_EOR;
 1336                         } else {
 1337 #ifdef ZERO_COPY_SOCKETS
 1338                                 error = sosend_copyin(uio, &top, atomic,
 1339                                     &space, flags);
 1340                                 if (error != 0)
 1341                                         goto release;
 1342 #else
 1343                                 /*
 1344                                  * Copy the data from userland into a mbuf
 1345                                  * chain.  If no data is to be copied in,
 1346                                  * a single empty mbuf is returned.
 1347                                  */
 1348                                 top = m_uiotombuf(uio, M_WAITOK, space,
 1349                                     (atomic ? max_hdr : 0),
 1350                                     (atomic ? M_PKTHDR : 0) |
 1351                                     ((flags & MSG_EOR) ? M_EOR : 0));
 1352                                 if (top == NULL) {
 1353                                         error = EFAULT; /* only possible error */
 1354                                         goto release;
 1355                                 }
 1356                                 space -= resid - uio->uio_resid;
 1357 #endif
 1358                                 resid = uio->uio_resid;
 1359                         }
 1360                         if (dontroute) {
 1361                                 SOCK_LOCK(so);
 1362                                 so->so_options |= SO_DONTROUTE;
 1363                                 SOCK_UNLOCK(so);
 1364                         }
 1365                         /*
 1366                          * XXX all the SBS_CANTSENDMORE checks previously
 1367                          * done could be out of date.  We could have recieved
 1368                          * a reset packet in an interrupt or maybe we slept
 1369                          * while doing page faults in uiomove() etc.  We
 1370                          * could probably recheck again inside the locking
 1371                          * protection here, but there are probably other
 1372                          * places that this also happens.  We must rethink
 1373                          * this.
 1374                          */
 1375                         VNET_SO_ASSERT(so);
 1376                         error = (*so->so_proto->pr_usrreqs->pru_send)(so,
 1377                             (flags & MSG_OOB) ? PRUS_OOB :
 1378                         /*
 1379                          * If the user set MSG_EOF, the protocol understands
 1380                          * this flag and nothing left to send then use
 1381                          * PRU_SEND_EOF instead of PRU_SEND.
 1382                          */
 1383                             ((flags & MSG_EOF) &&
 1384                              (so->so_proto->pr_flags & PR_IMPLOPCL) &&
 1385                              (resid <= 0)) ?
 1386                                 PRUS_EOF :
 1387                         /* If there is more to send set PRUS_MORETOCOME. */
 1388                             (resid > 0 && space > 0) ? PRUS_MORETOCOME : 0,
 1389                             top, addr, control, td);
 1390                         if (dontroute) {
 1391                                 SOCK_LOCK(so);
 1392                                 so->so_options &= ~SO_DONTROUTE;
 1393                                 SOCK_UNLOCK(so);
 1394                         }
 1395                         clen = 0;
 1396                         control = NULL;
 1397                         top = NULL;
 1398                         if (error)
 1399                                 goto release;
 1400                 } while (resid && space > 0);
 1401         } while (resid);
 1402 
 1403 release:
 1404         sbunlock(&so->so_snd);
 1405 out:
 1406         if (top != NULL)
 1407                 m_freem(top);
 1408         if (control != NULL)
 1409                 m_freem(control);
 1410         return (error);
 1411 }
 1412 
 1413 int
 1414 sosend(struct socket *so, struct sockaddr *addr, struct uio *uio,
 1415     struct mbuf *top, struct mbuf *control, int flags, struct thread *td)
 1416 {
 1417         int error;
 1418 
 1419         CURVNET_SET(so->so_vnet);
 1420         error = so->so_proto->pr_usrreqs->pru_sosend(so, addr, uio, top,
 1421             control, flags, td);
 1422         CURVNET_RESTORE();
 1423         return (error);
 1424 }
 1425 
 1426 /*
 1427  * The part of soreceive() that implements reading non-inline out-of-band
 1428  * data from a socket.  For more complete comments, see soreceive(), from
 1429  * which this code originated.
 1430  *
 1431  * Note that soreceive_rcvoob(), unlike the remainder of soreceive(), is
 1432  * unable to return an mbuf chain to the caller.
 1433  */
 1434 static int
 1435 soreceive_rcvoob(struct socket *so, struct uio *uio, int flags)
 1436 {
 1437         struct protosw *pr = so->so_proto;
 1438         struct mbuf *m;
 1439         int error;
 1440 
 1441         KASSERT(flags & MSG_OOB, ("soreceive_rcvoob: (flags & MSG_OOB) == 0"));
 1442         VNET_SO_ASSERT(so);
 1443 
 1444         m = m_get(M_WAIT, MT_DATA);
 1445         error = (*pr->pr_usrreqs->pru_rcvoob)(so, m, flags & MSG_PEEK);
 1446         if (error)
 1447                 goto bad;
 1448         do {
 1449 #ifdef ZERO_COPY_SOCKETS
 1450                 if (so_zero_copy_receive) {
 1451                         int disposable;
 1452 
 1453                         if ((m->m_flags & M_EXT)
 1454                          && (m->m_ext.ext_type == EXT_DISPOSABLE))
 1455                                 disposable = 1;
 1456                         else
 1457                                 disposable = 0;
 1458 
 1459                         error = uiomoveco(mtod(m, void *),
 1460                                           min(uio->uio_resid, m->m_len),
 1461                                           uio, disposable);
 1462                 } else
 1463 #endif /* ZERO_COPY_SOCKETS */
 1464                 error = uiomove(mtod(m, void *),
 1465                     (int) min(uio->uio_resid, m->m_len), uio);
 1466                 m = m_free(m);
 1467         } while (uio->uio_resid && error == 0 && m);
 1468 bad:
 1469         if (m != NULL)
 1470                 m_freem(m);
 1471         return (error);
 1472 }
 1473 
 1474 /*
 1475  * Following replacement or removal of the first mbuf on the first mbuf chain
 1476  * of a socket buffer, push necessary state changes back into the socket
 1477  * buffer so that other consumers see the values consistently.  'nextrecord'
 1478  * is the callers locally stored value of the original value of
 1479  * sb->sb_mb->m_nextpkt which must be restored when the lead mbuf changes.
 1480  * NOTE: 'nextrecord' may be NULL.
 1481  */
 1482 static __inline void
 1483 sockbuf_pushsync(struct sockbuf *sb, struct mbuf *nextrecord)
 1484 {
 1485 
 1486         SOCKBUF_LOCK_ASSERT(sb);
 1487         /*
 1488          * First, update for the new value of nextrecord.  If necessary, make
 1489          * it the first record.
 1490          */
 1491         if (sb->sb_mb != NULL)
 1492                 sb->sb_mb->m_nextpkt = nextrecord;
 1493         else
 1494                 sb->sb_mb = nextrecord;
 1495 
 1496         /*
 1497          * Now update any dependent socket buffer fields to reflect the new
 1498          * state.  This is an expanded inline of SB_EMPTY_FIXUP(), with the
 1499          * addition of a second clause that takes care of the case where
 1500          * sb_mb has been updated, but remains the last record.
 1501          */
 1502         if (sb->sb_mb == NULL) {
 1503                 sb->sb_mbtail = NULL;
 1504                 sb->sb_lastrecord = NULL;
 1505         } else if (sb->sb_mb->m_nextpkt == NULL)
 1506                 sb->sb_lastrecord = sb->sb_mb;
 1507 }
 1508 
 1509 
 1510 /*
 1511  * Implement receive operations on a socket.  We depend on the way that
 1512  * records are added to the sockbuf by sbappend.  In particular, each record
 1513  * (mbufs linked through m_next) must begin with an address if the protocol
 1514  * so specifies, followed by an optional mbuf or mbufs containing ancillary
 1515  * data, and then zero or more mbufs of data.  In order to allow parallelism
 1516  * between network receive and copying to user space, as well as avoid
 1517  * sleeping with a mutex held, we release the socket buffer mutex during the
 1518  * user space copy.  Although the sockbuf is locked, new data may still be
 1519  * appended, and thus we must maintain consistency of the sockbuf during that
 1520  * time.
 1521  *
 1522  * The caller may receive the data as a single mbuf chain by supplying an
 1523  * mbuf **mp0 for use in returning the chain.  The uio is then used only for
 1524  * the count in uio_resid.
 1525  */
 1526 int
 1527 soreceive_generic(struct socket *so, struct sockaddr **psa, struct uio *uio,
 1528     struct mbuf **mp0, struct mbuf **controlp, int *flagsp)
 1529 {
 1530         struct mbuf *m, **mp;
 1531         int flags, error, offset;
 1532         ssize_t len;
 1533         struct protosw *pr = so->so_proto;
 1534         struct mbuf *nextrecord;
 1535         int moff, type = 0;
 1536         ssize_t orig_resid = uio->uio_resid;
 1537 
 1538         mp = mp0;
 1539         if (psa != NULL)
 1540                 *psa = NULL;
 1541         if (controlp != NULL)
 1542                 *controlp = NULL;
 1543         if (flagsp != NULL)
 1544                 flags = *flagsp &~ MSG_EOR;
 1545         else
 1546                 flags = 0;
 1547         if (flags & MSG_OOB)
 1548                 return (soreceive_rcvoob(so, uio, flags));
 1549         if (mp != NULL)
 1550                 *mp = NULL;
 1551         if ((pr->pr_flags & PR_WANTRCVD) && (so->so_state & SS_ISCONFIRMING)
 1552             && uio->uio_resid) {
 1553                 VNET_SO_ASSERT(so);
 1554                 (*pr->pr_usrreqs->pru_rcvd)(so, 0);
 1555         }
 1556 
 1557         error = sblock(&so->so_rcv, SBLOCKWAIT(flags));
 1558         if (error)
 1559                 return (error);
 1560 
 1561 restart:
 1562         SOCKBUF_LOCK(&so->so_rcv);
 1563         m = so->so_rcv.sb_mb;
 1564         /*
 1565          * If we have less data than requested, block awaiting more (subject
 1566          * to any timeout) if:
 1567          *   1. the current count is less than the low water mark, or
 1568          *   2. MSG_DONTWAIT is not set
 1569          */
 1570         if (m == NULL || (((flags & MSG_DONTWAIT) == 0 &&
 1571             so->so_rcv.sb_cc < uio->uio_resid) &&
 1572             so->so_rcv.sb_cc < so->so_rcv.sb_lowat &&
 1573             m->m_nextpkt == NULL && (pr->pr_flags & PR_ATOMIC) == 0)) {
 1574                 KASSERT(m != NULL || !so->so_rcv.sb_cc,
 1575                     ("receive: m == %p so->so_rcv.sb_cc == %u",
 1576                     m, so->so_rcv.sb_cc));
 1577                 if (so->so_error) {
 1578                         if (m != NULL)
 1579                                 goto dontblock;
 1580                         error = so->so_error;
 1581                         if ((flags & MSG_PEEK) == 0)
 1582                                 so->so_error = 0;
 1583                         SOCKBUF_UNLOCK(&so->so_rcv);
 1584                         goto release;
 1585                 }
 1586                 SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 1587                 if (so->so_rcv.sb_state & SBS_CANTRCVMORE) {
 1588                         if (m == NULL) {
 1589                                 SOCKBUF_UNLOCK(&so->so_rcv);
 1590                                 goto release;
 1591                         } else
 1592                                 goto dontblock;
 1593                 }
 1594                 for (; m != NULL; m = m->m_next)
 1595                         if (m->m_type == MT_OOBDATA  || (m->m_flags & M_EOR)) {
 1596                                 m = so->so_rcv.sb_mb;
 1597                                 goto dontblock;
 1598                         }
 1599                 if ((so->so_state & (SS_ISCONNECTED|SS_ISCONNECTING)) == 0 &&
 1600                     (so->so_proto->pr_flags & PR_CONNREQUIRED)) {
 1601                         SOCKBUF_UNLOCK(&so->so_rcv);
 1602                         error = ENOTCONN;
 1603                         goto release;
 1604                 }
 1605                 if (uio->uio_resid == 0) {
 1606                         SOCKBUF_UNLOCK(&so->so_rcv);
 1607                         goto release;
 1608                 }
 1609                 if ((so->so_state & SS_NBIO) ||
 1610                     (flags & (MSG_DONTWAIT|MSG_NBIO))) {
 1611                         SOCKBUF_UNLOCK(&so->so_rcv);
 1612                         error = EWOULDBLOCK;
 1613                         goto release;
 1614                 }
 1615                 SBLASTRECORDCHK(&so->so_rcv);
 1616                 SBLASTMBUFCHK(&so->so_rcv);
 1617                 error = sbwait(&so->so_rcv);
 1618                 SOCKBUF_UNLOCK(&so->so_rcv);
 1619                 if (error)
 1620                         goto release;
 1621                 goto restart;
 1622         }
 1623 dontblock:
 1624         /*
 1625          * From this point onward, we maintain 'nextrecord' as a cache of the
 1626          * pointer to the next record in the socket buffer.  We must keep the
 1627          * various socket buffer pointers and local stack versions of the
 1628          * pointers in sync, pushing out modifications before dropping the
 1629          * socket buffer mutex, and re-reading them when picking it up.
 1630          *
 1631          * Otherwise, we will race with the network stack appending new data
 1632          * or records onto the socket buffer by using inconsistent/stale
 1633          * versions of the field, possibly resulting in socket buffer
 1634          * corruption.
 1635          *
 1636          * By holding the high-level sblock(), we prevent simultaneous
 1637          * readers from pulling off the front of the socket buffer.
 1638          */
 1639         SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 1640         if (uio->uio_td)
 1641                 uio->uio_td->td_ru.ru_msgrcv++;
 1642         KASSERT(m == so->so_rcv.sb_mb, ("soreceive: m != so->so_rcv.sb_mb"));
 1643         SBLASTRECORDCHK(&so->so_rcv);
 1644         SBLASTMBUFCHK(&so->so_rcv);
 1645         nextrecord = m->m_nextpkt;
 1646         if (pr->pr_flags & PR_ADDR) {
 1647                 KASSERT(m->m_type == MT_SONAME,
 1648                     ("m->m_type == %d", m->m_type));
 1649                 orig_resid = 0;
 1650                 if (psa != NULL)
 1651                         *psa = sodupsockaddr(mtod(m, struct sockaddr *),
 1652                             M_NOWAIT);
 1653                 if (flags & MSG_PEEK) {
 1654                         m = m->m_next;
 1655                 } else {
 1656                         sbfree(&so->so_rcv, m);
 1657                         so->so_rcv.sb_mb = m_free(m);
 1658                         m = so->so_rcv.sb_mb;
 1659                         sockbuf_pushsync(&so->so_rcv, nextrecord);
 1660                 }
 1661         }
 1662 
 1663         /*
 1664          * Process one or more MT_CONTROL mbufs present before any data mbufs
 1665          * in the first mbuf chain on the socket buffer.  If MSG_PEEK, we
 1666          * just copy the data; if !MSG_PEEK, we call into the protocol to
 1667          * perform externalization (or freeing if controlp == NULL).
 1668          */
 1669         if (m != NULL && m->m_type == MT_CONTROL) {
 1670                 struct mbuf *cm = NULL, *cmn;
 1671                 struct mbuf **cme = &cm;
 1672 
 1673                 do {
 1674                         if (flags & MSG_PEEK) {
 1675                                 if (controlp != NULL) {
 1676                                         *controlp = m_copy(m, 0, m->m_len);
 1677                                         controlp = &(*controlp)->m_next;
 1678                                 }
 1679                                 m = m->m_next;
 1680                         } else {
 1681                                 sbfree(&so->so_rcv, m);
 1682                                 so->so_rcv.sb_mb = m->m_next;
 1683                                 m->m_next = NULL;
 1684                                 *cme = m;
 1685                                 cme = &(*cme)->m_next;
 1686                                 m = so->so_rcv.sb_mb;
 1687                         }
 1688                 } while (m != NULL && m->m_type == MT_CONTROL);
 1689                 if ((flags & MSG_PEEK) == 0)
 1690                         sockbuf_pushsync(&so->so_rcv, nextrecord);
 1691                 while (cm != NULL) {
 1692                         cmn = cm->m_next;
 1693                         cm->m_next = NULL;
 1694                         if (pr->pr_domain->dom_externalize != NULL) {
 1695                                 SOCKBUF_UNLOCK(&so->so_rcv);
 1696                                 VNET_SO_ASSERT(so);
 1697                                 error = (*pr->pr_domain->dom_externalize)
 1698                                     (cm, controlp);
 1699                                 SOCKBUF_LOCK(&so->so_rcv);
 1700                         } else if (controlp != NULL)
 1701                                 *controlp = cm;
 1702                         else
 1703                                 m_freem(cm);
 1704                         if (controlp != NULL) {
 1705                                 orig_resid = 0;
 1706                                 while (*controlp != NULL)
 1707                                         controlp = &(*controlp)->m_next;
 1708                         }
 1709                         cm = cmn;
 1710                 }
 1711                 if (m != NULL)
 1712                         nextrecord = so->so_rcv.sb_mb->m_nextpkt;
 1713                 else
 1714                         nextrecord = so->so_rcv.sb_mb;
 1715                 orig_resid = 0;
 1716         }
 1717         if (m != NULL) {
 1718                 if ((flags & MSG_PEEK) == 0) {
 1719                         KASSERT(m->m_nextpkt == nextrecord,
 1720                             ("soreceive: post-control, nextrecord !sync"));
 1721                         if (nextrecord == NULL) {
 1722                                 KASSERT(so->so_rcv.sb_mb == m,
 1723                                     ("soreceive: post-control, sb_mb!=m"));
 1724                                 KASSERT(so->so_rcv.sb_lastrecord == m,
 1725                                     ("soreceive: post-control, lastrecord!=m"));
 1726                         }
 1727                 }
 1728                 type = m->m_type;
 1729                 if (type == MT_OOBDATA)
 1730                         flags |= MSG_OOB;
 1731         } else {
 1732                 if ((flags & MSG_PEEK) == 0) {
 1733                         KASSERT(so->so_rcv.sb_mb == nextrecord,
 1734                             ("soreceive: sb_mb != nextrecord"));
 1735                         if (so->so_rcv.sb_mb == NULL) {
 1736                                 KASSERT(so->so_rcv.sb_lastrecord == NULL,
 1737                                     ("soreceive: sb_lastercord != NULL"));
 1738                         }
 1739                 }
 1740         }
 1741         SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 1742         SBLASTRECORDCHK(&so->so_rcv);
 1743         SBLASTMBUFCHK(&so->so_rcv);
 1744 
 1745         /*
 1746          * Now continue to read any data mbufs off of the head of the socket
 1747          * buffer until the read request is satisfied.  Note that 'type' is
 1748          * used to store the type of any mbuf reads that have happened so far
 1749          * such that soreceive() can stop reading if the type changes, which
 1750          * causes soreceive() to return only one of regular data and inline
 1751          * out-of-band data in a single socket receive operation.
 1752          */
 1753         moff = 0;
 1754         offset = 0;
 1755         while (m != NULL && uio->uio_resid > 0 && error == 0) {
 1756                 /*
 1757                  * If the type of mbuf has changed since the last mbuf
 1758                  * examined ('type'), end the receive operation.
 1759                  */
 1760                 SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 1761                 if (m->m_type == MT_OOBDATA || m->m_type == MT_CONTROL) {
 1762                         if (type != m->m_type)
 1763                                 break;
 1764                 } else if (type == MT_OOBDATA)
 1765                         break;
 1766                 else
 1767                     KASSERT(m->m_type == MT_DATA,
 1768                         ("m->m_type == %d", m->m_type));
 1769                 so->so_rcv.sb_state &= ~SBS_RCVATMARK;
 1770                 len = uio->uio_resid;
 1771                 if (so->so_oobmark && len > so->so_oobmark - offset)
 1772                         len = so->so_oobmark - offset;
 1773                 if (len > m->m_len - moff)
 1774                         len = m->m_len - moff;
 1775                 /*
 1776                  * If mp is set, just pass back the mbufs.  Otherwise copy
 1777                  * them out via the uio, then free.  Sockbuf must be
 1778                  * consistent here (points to current mbuf, it points to next
 1779                  * record) when we drop priority; we must note any additions
 1780                  * to the sockbuf when we block interrupts again.
 1781                  */
 1782                 if (mp == NULL) {
 1783                         SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 1784                         SBLASTRECORDCHK(&so->so_rcv);
 1785                         SBLASTMBUFCHK(&so->so_rcv);
 1786                         SOCKBUF_UNLOCK(&so->so_rcv);
 1787 #ifdef ZERO_COPY_SOCKETS
 1788                         if (so_zero_copy_receive) {
 1789                                 int disposable;
 1790 
 1791                                 if ((m->m_flags & M_EXT)
 1792                                  && (m->m_ext.ext_type == EXT_DISPOSABLE))
 1793                                         disposable = 1;
 1794                                 else
 1795                                         disposable = 0;
 1796 
 1797                                 error = uiomoveco(mtod(m, char *) + moff,
 1798                                                   (int)len, uio,
 1799                                                   disposable);
 1800                         } else
 1801 #endif /* ZERO_COPY_SOCKETS */
 1802                         error = uiomove(mtod(m, char *) + moff, (int)len, uio);
 1803                         SOCKBUF_LOCK(&so->so_rcv);
 1804                         if (error) {
 1805                                 /*
 1806                                  * The MT_SONAME mbuf has already been removed
 1807                                  * from the record, so it is necessary to
 1808                                  * remove the data mbufs, if any, to preserve
 1809                                  * the invariant in the case of PR_ADDR that
 1810                                  * requires MT_SONAME mbufs at the head of
 1811                                  * each record.
 1812                                  */
 1813                                 if (m && pr->pr_flags & PR_ATOMIC &&
 1814                                     ((flags & MSG_PEEK) == 0))
 1815                                         (void)sbdroprecord_locked(&so->so_rcv);
 1816                                 SOCKBUF_UNLOCK(&so->so_rcv);
 1817                                 goto release;
 1818                         }
 1819                 } else
 1820                         uio->uio_resid -= len;
 1821                 SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 1822                 if (len == m->m_len - moff) {
 1823                         if (m->m_flags & M_EOR)
 1824                                 flags |= MSG_EOR;
 1825                         if (flags & MSG_PEEK) {
 1826                                 m = m->m_next;
 1827                                 moff = 0;
 1828                         } else {
 1829                                 nextrecord = m->m_nextpkt;
 1830                                 sbfree(&so->so_rcv, m);
 1831                                 if (mp != NULL) {
 1832                                         *mp = m;
 1833                                         mp = &m->m_next;
 1834                                         so->so_rcv.sb_mb = m = m->m_next;
 1835                                         *mp = NULL;
 1836                                 } else {
 1837                                         so->so_rcv.sb_mb = m_free(m);
 1838                                         m = so->so_rcv.sb_mb;
 1839                                 }
 1840                                 sockbuf_pushsync(&so->so_rcv, nextrecord);
 1841                                 SBLASTRECORDCHK(&so->so_rcv);
 1842                                 SBLASTMBUFCHK(&so->so_rcv);
 1843                         }
 1844                 } else {
 1845                         if (flags & MSG_PEEK)
 1846                                 moff += len;
 1847                         else {
 1848                                 if (mp != NULL) {
 1849                                         int copy_flag;
 1850 
 1851                                         if (flags & MSG_DONTWAIT)
 1852                                                 copy_flag = M_DONTWAIT;
 1853                                         else
 1854                                                 copy_flag = M_WAIT;
 1855                                         if (copy_flag == M_WAIT)
 1856                                                 SOCKBUF_UNLOCK(&so->so_rcv);
 1857                                         *mp = m_copym(m, 0, len, copy_flag);
 1858                                         if (copy_flag == M_WAIT)
 1859                                                 SOCKBUF_LOCK(&so->so_rcv);
 1860                                         if (*mp == NULL) {
 1861                                                 /*
 1862                                                  * m_copym() couldn't
 1863                                                  * allocate an mbuf.  Adjust
 1864                                                  * uio_resid back (it was
 1865                                                  * adjusted down by len
 1866                                                  * bytes, which we didn't end
 1867                                                  * up "copying" over).
 1868                                                  */
 1869                                                 uio->uio_resid += len;
 1870                                                 break;
 1871                                         }
 1872                                 }
 1873                                 m->m_data += len;
 1874                                 m->m_len -= len;
 1875                                 so->so_rcv.sb_cc -= len;
 1876                         }
 1877                 }
 1878                 SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 1879                 if (so->so_oobmark) {
 1880                         if ((flags & MSG_PEEK) == 0) {
 1881                                 so->so_oobmark -= len;
 1882                                 if (so->so_oobmark == 0) {
 1883                                         so->so_rcv.sb_state |= SBS_RCVATMARK;
 1884                                         break;
 1885                                 }
 1886                         } else {
 1887                                 offset += len;
 1888                                 if (offset == so->so_oobmark)
 1889                                         break;
 1890                         }
 1891                 }
 1892                 if (flags & MSG_EOR)
 1893                         break;
 1894                 /*
 1895                  * If the MSG_WAITALL flag is set (for non-atomic socket), we
 1896                  * must not quit until "uio->uio_resid == 0" or an error
 1897                  * termination.  If a signal/timeout occurs, return with a
 1898                  * short count but without error.  Keep sockbuf locked
 1899                  * against other readers.
 1900                  */
 1901                 while (flags & MSG_WAITALL && m == NULL && uio->uio_resid > 0 &&
 1902                     !sosendallatonce(so) && nextrecord == NULL) {
 1903                         SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 1904                         if (so->so_error || so->so_rcv.sb_state & SBS_CANTRCVMORE)
 1905                                 break;
 1906                         /*
 1907                          * Notify the protocol that some data has been
 1908                          * drained before blocking.
 1909                          */
 1910                         if (pr->pr_flags & PR_WANTRCVD) {
 1911                                 SOCKBUF_UNLOCK(&so->so_rcv);
 1912                                 VNET_SO_ASSERT(so);
 1913                                 (*pr->pr_usrreqs->pru_rcvd)(so, flags);
 1914                                 SOCKBUF_LOCK(&so->so_rcv);
 1915                         }
 1916                         SBLASTRECORDCHK(&so->so_rcv);
 1917                         SBLASTMBUFCHK(&so->so_rcv);
 1918                         /*
 1919                          * We could receive some data while was notifying
 1920                          * the protocol. Skip blocking in this case.
 1921                          */
 1922                         if (so->so_rcv.sb_mb == NULL) {
 1923                                 error = sbwait(&so->so_rcv);
 1924                                 if (error) {
 1925                                         SOCKBUF_UNLOCK(&so->so_rcv);
 1926                                         goto release;
 1927                                 }
 1928                         }
 1929                         m = so->so_rcv.sb_mb;
 1930                         if (m != NULL)
 1931                                 nextrecord = m->m_nextpkt;
 1932                 }
 1933         }
 1934 
 1935         SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 1936         if (m != NULL && pr->pr_flags & PR_ATOMIC) {
 1937                 flags |= MSG_TRUNC;
 1938                 if ((flags & MSG_PEEK) == 0)
 1939                         (void) sbdroprecord_locked(&so->so_rcv);
 1940         }
 1941         if ((flags & MSG_PEEK) == 0) {
 1942                 if (m == NULL) {
 1943                         /*
 1944                          * First part is an inline SB_EMPTY_FIXUP().  Second
 1945                          * part makes sure sb_lastrecord is up-to-date if
 1946                          * there is still data in the socket buffer.
 1947                          */
 1948                         so->so_rcv.sb_mb = nextrecord;
 1949                         if (so->so_rcv.sb_mb == NULL) {
 1950                                 so->so_rcv.sb_mbtail = NULL;
 1951                                 so->so_rcv.sb_lastrecord = NULL;
 1952                         } else if (nextrecord->m_nextpkt == NULL)
 1953                                 so->so_rcv.sb_lastrecord = nextrecord;
 1954                 }
 1955                 SBLASTRECORDCHK(&so->so_rcv);
 1956                 SBLASTMBUFCHK(&so->so_rcv);
 1957                 /*
 1958                  * If soreceive() is being done from the socket callback,
 1959                  * then don't need to generate ACK to peer to update window,
 1960                  * since ACK will be generated on return to TCP.
 1961                  */
 1962                 if (!(flags & MSG_SOCALLBCK) &&
 1963                     (pr->pr_flags & PR_WANTRCVD)) {
 1964                         SOCKBUF_UNLOCK(&so->so_rcv);
 1965                         VNET_SO_ASSERT(so);
 1966                         (*pr->pr_usrreqs->pru_rcvd)(so, flags);
 1967                         SOCKBUF_LOCK(&so->so_rcv);
 1968                 }
 1969         }
 1970         SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 1971         if (orig_resid == uio->uio_resid && orig_resid &&
 1972             (flags & MSG_EOR) == 0 && (so->so_rcv.sb_state & SBS_CANTRCVMORE) == 0) {
 1973                 SOCKBUF_UNLOCK(&so->so_rcv);
 1974                 goto restart;
 1975         }
 1976         SOCKBUF_UNLOCK(&so->so_rcv);
 1977 
 1978         if (flagsp != NULL)
 1979                 *flagsp |= flags;
 1980 release:
 1981         sbunlock(&so->so_rcv);
 1982         return (error);
 1983 }
 1984 
 1985 /*
 1986  * Optimized version of soreceive() for stream (TCP) sockets.
 1987  * XXXAO: (MSG_WAITALL | MSG_PEEK) isn't properly handled.
 1988  */
 1989 int
 1990 soreceive_stream(struct socket *so, struct sockaddr **psa, struct uio *uio,
 1991     struct mbuf **mp0, struct mbuf **controlp, int *flagsp)
 1992 {
 1993         int len = 0, error = 0, flags, oresid;
 1994         struct sockbuf *sb;
 1995         struct mbuf *m, *n = NULL;
 1996 
 1997         /* We only do stream sockets. */
 1998         if (so->so_type != SOCK_STREAM)
 1999                 return (EINVAL);
 2000         if (psa != NULL)
 2001                 *psa = NULL;
 2002         if (controlp != NULL)
 2003                 return (EINVAL);
 2004         if (flagsp != NULL)
 2005                 flags = *flagsp &~ MSG_EOR;
 2006         else
 2007                 flags = 0;
 2008         if (flags & MSG_OOB)
 2009                 return (soreceive_rcvoob(so, uio, flags));
 2010         if (mp0 != NULL)
 2011                 *mp0 = NULL;
 2012 
 2013         sb = &so->so_rcv;
 2014 
 2015         /* Prevent other readers from entering the socket. */
 2016         error = sblock(sb, SBLOCKWAIT(flags));
 2017         if (error)
 2018                 goto out;
 2019         SOCKBUF_LOCK(sb);
 2020 
 2021         /* Easy one, no space to copyout anything. */
 2022         if (uio->uio_resid == 0) {
 2023                 error = EINVAL;
 2024                 goto out;
 2025         }
 2026         oresid = uio->uio_resid;
 2027 
 2028         /* We will never ever get anything unless we are or were connected. */
 2029         if (!(so->so_state & (SS_ISCONNECTED|SS_ISDISCONNECTED))) {
 2030                 error = ENOTCONN;
 2031                 goto out;
 2032         }
 2033 
 2034 restart:
 2035         SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 2036 
 2037         /* Abort if socket has reported problems. */
 2038         if (so->so_error) {
 2039                 if (sb->sb_cc > 0)
 2040                         goto deliver;
 2041                 if (oresid > uio->uio_resid)
 2042                         goto out;
 2043                 error = so->so_error;
 2044                 if (!(flags & MSG_PEEK))
 2045                         so->so_error = 0;
 2046                 goto out;
 2047         }
 2048 
 2049         /* Door is closed.  Deliver what is left, if any. */
 2050         if (sb->sb_state & SBS_CANTRCVMORE) {
 2051                 if (sb->sb_cc > 0)
 2052                         goto deliver;
 2053                 else
 2054                         goto out;
 2055         }
 2056 
 2057         /* Socket buffer is empty and we shall not block. */
 2058         if (sb->sb_cc == 0 &&
 2059             ((so->so_state & SS_NBIO) || (flags & (MSG_DONTWAIT|MSG_NBIO)))) {
 2060                 error = EAGAIN;
 2061                 goto out;
 2062         }
 2063 
 2064         /* Socket buffer got some data that we shall deliver now. */
 2065         if (sb->sb_cc > 0 && !(flags & MSG_WAITALL) &&
 2066             ((so->so_state & SS_NBIO) ||
 2067              (flags & (MSG_DONTWAIT|MSG_NBIO)) ||
 2068              sb->sb_cc >= sb->sb_lowat ||
 2069              sb->sb_cc >= uio->uio_resid ||
 2070              sb->sb_cc >= sb->sb_hiwat) ) {
 2071                 goto deliver;
 2072         }
 2073 
 2074         /* On MSG_WAITALL we must wait until all data or error arrives. */
 2075         if ((flags & MSG_WAITALL) &&
 2076             (sb->sb_cc >= uio->uio_resid || sb->sb_cc >= sb->sb_hiwat))
 2077                 goto deliver;
 2078 
 2079         /*
 2080          * Wait and block until (more) data comes in.
 2081          * NB: Drops the sockbuf lock during wait.
 2082          */
 2083         error = sbwait(sb);
 2084         if (error)
 2085                 goto out;
 2086         goto restart;
 2087 
 2088 deliver:
 2089         SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 2090         KASSERT(sb->sb_cc > 0, ("%s: sockbuf empty", __func__));
 2091         KASSERT(sb->sb_mb != NULL, ("%s: sb_mb == NULL", __func__));
 2092 
 2093         /* Statistics. */
 2094         if (uio->uio_td)
 2095                 uio->uio_td->td_ru.ru_msgrcv++;
 2096 
 2097         /* Fill uio until full or current end of socket buffer is reached. */
 2098         len = min(uio->uio_resid, sb->sb_cc);
 2099         if (mp0 != NULL) {
 2100                 /* Dequeue as many mbufs as possible. */
 2101                 if (!(flags & MSG_PEEK) && len >= sb->sb_mb->m_len) {
 2102                         if (*mp0 == NULL)
 2103                                 *mp0 = sb->sb_mb;
 2104                         else
 2105                                 m_cat(*mp0, sb->sb_mb);
 2106                         for (m = sb->sb_mb;
 2107                              m != NULL && m->m_len <= len;
 2108                              m = m->m_next) {
 2109                                 len -= m->m_len;
 2110                                 uio->uio_resid -= m->m_len;
 2111                                 sbfree(sb, m);
 2112                                 n = m;
 2113                         }
 2114                         n->m_next = NULL;
 2115                         sb->sb_mb = m;
 2116                         sb->sb_lastrecord = sb->sb_mb;
 2117                         if (sb->sb_mb == NULL)
 2118                                 SB_EMPTY_FIXUP(sb);
 2119                 }
 2120                 /* Copy the remainder. */
 2121                 if (len > 0) {
 2122                         KASSERT(sb->sb_mb != NULL,
 2123                             ("%s: len > 0 && sb->sb_mb empty", __func__));
 2124 
 2125                         m = m_copym(sb->sb_mb, 0, len, M_DONTWAIT);
 2126                         if (m == NULL)
 2127                                 len = 0;        /* Don't flush data from sockbuf. */
 2128                         else
 2129                                 uio->uio_resid -= len;
 2130                         if (*mp0 != NULL)
 2131                                 m_cat(*mp0, m);
 2132                         else
 2133                                 *mp0 = m;
 2134                         if (*mp0 == NULL) {
 2135                                 error = ENOBUFS;
 2136                                 goto out;
 2137                         }
 2138                 }
 2139         } else {
 2140                 /* NB: Must unlock socket buffer as uiomove may sleep. */
 2141                 SOCKBUF_UNLOCK(sb);
 2142                 error = m_mbuftouio(uio, sb->sb_mb, len);
 2143                 SOCKBUF_LOCK(sb);
 2144                 if (error)
 2145                         goto out;
 2146         }
 2147         SBLASTRECORDCHK(sb);
 2148         SBLASTMBUFCHK(sb);
 2149 
 2150         /*
 2151          * Remove the delivered data from the socket buffer unless we
 2152          * were only peeking.
 2153          */
 2154         if (!(flags & MSG_PEEK)) {
 2155                 if (len > 0)
 2156                         sbdrop_locked(sb, len);
 2157 
 2158                 /* Notify protocol that we drained some data. */
 2159                 if ((so->so_proto->pr_flags & PR_WANTRCVD) &&
 2160                     (((flags & MSG_WAITALL) && uio->uio_resid > 0) ||
 2161                      !(flags & MSG_SOCALLBCK))) {
 2162                         SOCKBUF_UNLOCK(sb);
 2163                         VNET_SO_ASSERT(so);
 2164                         (*so->so_proto->pr_usrreqs->pru_rcvd)(so, flags);
 2165                         SOCKBUF_LOCK(sb);
 2166                 }
 2167         }
 2168 
 2169         /*
 2170          * For MSG_WAITALL we may have to loop again and wait for
 2171          * more data to come in.
 2172          */
 2173         if ((flags & MSG_WAITALL) && uio->uio_resid > 0)
 2174                 goto restart;
 2175 out:
 2176         SOCKBUF_LOCK_ASSERT(sb);
 2177         SBLASTRECORDCHK(sb);
 2178         SBLASTMBUFCHK(sb);
 2179         SOCKBUF_UNLOCK(sb);
 2180         sbunlock(sb);
 2181         return (error);
 2182 }
 2183 
 2184 /*
 2185  * Optimized version of soreceive() for simple datagram cases from userspace.
 2186  * Unlike in the stream case, we're able to drop a datagram if copyout()
 2187  * fails, and because we handle datagrams atomically, we don't need to use a
 2188  * sleep lock to prevent I/O interlacing.
 2189  */
 2190 int
 2191 soreceive_dgram(struct socket *so, struct sockaddr **psa, struct uio *uio,
 2192     struct mbuf **mp0, struct mbuf **controlp, int *flagsp)
 2193 {
 2194         struct mbuf *m, *m2;
 2195         int flags, error;
 2196         ssize_t len;
 2197         struct protosw *pr = so->so_proto;
 2198         struct mbuf *nextrecord;
 2199 
 2200         if (psa != NULL)
 2201                 *psa = NULL;
 2202         if (controlp != NULL)
 2203                 *controlp = NULL;
 2204         if (flagsp != NULL)
 2205                 flags = *flagsp &~ MSG_EOR;
 2206         else
 2207                 flags = 0;
 2208 
 2209         /*
 2210          * For any complicated cases, fall back to the full
 2211          * soreceive_generic().
 2212          */
 2213         if (mp0 != NULL || (flags & MSG_PEEK) || (flags & MSG_OOB))
 2214                 return (soreceive_generic(so, psa, uio, mp0, controlp,
 2215                     flagsp));
 2216 
 2217         /*
 2218          * Enforce restrictions on use.
 2219          */
 2220         KASSERT((pr->pr_flags & PR_WANTRCVD) == 0,
 2221             ("soreceive_dgram: wantrcvd"));
 2222         KASSERT(pr->pr_flags & PR_ATOMIC, ("soreceive_dgram: !atomic"));
 2223         KASSERT((so->so_rcv.sb_state & SBS_RCVATMARK) == 0,
 2224             ("soreceive_dgram: SBS_RCVATMARK"));
 2225         KASSERT((so->so_proto->pr_flags & PR_CONNREQUIRED) == 0,
 2226             ("soreceive_dgram: P_CONNREQUIRED"));
 2227 
 2228         /*
 2229          * Loop blocking while waiting for a datagram.
 2230          */
 2231         SOCKBUF_LOCK(&so->so_rcv);
 2232         while ((m = so->so_rcv.sb_mb) == NULL) {
 2233                 KASSERT(so->so_rcv.sb_cc == 0,
 2234                     ("soreceive_dgram: sb_mb NULL but sb_cc %u",
 2235                     so->so_rcv.sb_cc));
 2236                 if (so->so_error) {
 2237                         error = so->so_error;
 2238                         so->so_error = 0;
 2239                         SOCKBUF_UNLOCK(&so->so_rcv);
 2240                         return (error);
 2241                 }
 2242                 if (so->so_rcv.sb_state & SBS_CANTRCVMORE ||
 2243                     uio->uio_resid == 0) {
 2244                         SOCKBUF_UNLOCK(&so->so_rcv);
 2245                         return (0);
 2246                 }
 2247                 if ((so->so_state & SS_NBIO) ||
 2248                     (flags & (MSG_DONTWAIT|MSG_NBIO))) {
 2249                         SOCKBUF_UNLOCK(&so->so_rcv);
 2250                         return (EWOULDBLOCK);
 2251                 }
 2252                 SBLASTRECORDCHK(&so->so_rcv);
 2253                 SBLASTMBUFCHK(&so->so_rcv);
 2254                 error = sbwait(&so->so_rcv);
 2255                 if (error) {
 2256                         SOCKBUF_UNLOCK(&so->so_rcv);
 2257                         return (error);
 2258                 }
 2259         }
 2260         SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 2261 
 2262         if (uio->uio_td)
 2263                 uio->uio_td->td_ru.ru_msgrcv++;
 2264         SBLASTRECORDCHK(&so->so_rcv);
 2265         SBLASTMBUFCHK(&so->so_rcv);
 2266         nextrecord = m->m_nextpkt;
 2267         if (nextrecord == NULL) {
 2268                 KASSERT(so->so_rcv.sb_lastrecord == m,
 2269                     ("soreceive_dgram: lastrecord != m"));
 2270         }
 2271 
 2272         KASSERT(so->so_rcv.sb_mb->m_nextpkt == nextrecord,
 2273             ("soreceive_dgram: m_nextpkt != nextrecord"));
 2274 
 2275         /*
 2276          * Pull 'm' and its chain off the front of the packet queue.
 2277          */
 2278         so->so_rcv.sb_mb = NULL;
 2279         sockbuf_pushsync(&so->so_rcv, nextrecord);
 2280 
 2281         /*
 2282          * Walk 'm's chain and free that many bytes from the socket buffer.
 2283          */
 2284         for (m2 = m; m2 != NULL; m2 = m2->m_next)
 2285                 sbfree(&so->so_rcv, m2);
 2286 
 2287         /*
 2288          * Do a few last checks before we let go of the lock.
 2289          */
 2290         SBLASTRECORDCHK(&so->so_rcv);
 2291         SBLASTMBUFCHK(&so->so_rcv);
 2292         SOCKBUF_UNLOCK(&so->so_rcv);
 2293 
 2294         if (pr->pr_flags & PR_ADDR) {
 2295                 KASSERT(m->m_type == MT_SONAME,
 2296                     ("m->m_type == %d", m->m_type));
 2297                 if (psa != NULL)
 2298                         *psa = sodupsockaddr(mtod(m, struct sockaddr *),
 2299                             M_NOWAIT);
 2300                 m = m_free(m);
 2301         }
 2302         if (m == NULL) {
 2303                 /* XXXRW: Can this happen? */
 2304                 return (0);
 2305         }
 2306 
 2307         /*
 2308          * Packet to copyout() is now in 'm' and it is disconnected from the
 2309          * queue.
 2310          *
 2311          * Process one or more MT_CONTROL mbufs present before any data mbufs
 2312          * in the first mbuf chain on the socket buffer.  We call into the
 2313          * protocol to perform externalization (or freeing if controlp ==
 2314          * NULL). In some cases there can be only MT_CONTROL mbufs without
 2315          * MT_DATA mbufs.
 2316          */
 2317         if (m->m_type == MT_CONTROL) {
 2318                 struct mbuf *cm = NULL, *cmn;
 2319                 struct mbuf **cme = &cm;
 2320 
 2321                 do {
 2322                         m2 = m->m_next;
 2323                         m->m_next = NULL;
 2324                         *cme = m;
 2325                         cme = &(*cme)->m_next;
 2326                         m = m2;
 2327                 } while (m != NULL && m->m_type == MT_CONTROL);
 2328                 while (cm != NULL) {
 2329                         cmn = cm->m_next;
 2330                         cm->m_next = NULL;
 2331                         if (pr->pr_domain->dom_externalize != NULL) {
 2332                                 error = (*pr->pr_domain->dom_externalize)
 2333                                     (cm, controlp);
 2334                         } else if (controlp != NULL)
 2335                                 *controlp = cm;
 2336                         else
 2337                                 m_freem(cm);
 2338                         if (controlp != NULL) {
 2339                                 while (*controlp != NULL)
 2340                                         controlp = &(*controlp)->m_next;
 2341                         }
 2342                         cm = cmn;
 2343                 }
 2344         }
 2345         KASSERT(m == NULL || m->m_type == MT_DATA,
 2346             ("soreceive_dgram: !data"));
 2347         while (m != NULL && uio->uio_resid > 0) {
 2348                 len = uio->uio_resid;
 2349                 if (len > m->m_len)
 2350                         len = m->m_len;
 2351                 error = uiomove(mtod(m, char *), (int)len, uio);
 2352                 if (error) {
 2353                         m_freem(m);
 2354                         return (error);
 2355                 }
 2356                 if (len == m->m_len)
 2357                         m = m_free(m);
 2358                 else {
 2359                         m->m_data += len;
 2360                         m->m_len -= len;
 2361                 }
 2362         }
 2363         if (m != NULL) {
 2364                 flags |= MSG_TRUNC;
 2365                 m_freem(m);
 2366         }
 2367         if (flagsp != NULL)
 2368                 *flagsp |= flags;
 2369         return (0);
 2370 }
 2371 
 2372 int
 2373 soreceive(struct socket *so, struct sockaddr **psa, struct uio *uio,
 2374     struct mbuf **mp0, struct mbuf **controlp, int *flagsp)
 2375 {
 2376         int error;
 2377 
 2378         CURVNET_SET(so->so_vnet);
 2379         error = (so->so_proto->pr_usrreqs->pru_soreceive(so, psa, uio, mp0,
 2380             controlp, flagsp));
 2381         CURVNET_RESTORE();
 2382         return (error);
 2383 }
 2384 
 2385 int
 2386 soshutdown(struct socket *so, int how)
 2387 {
 2388         struct protosw *pr = so->so_proto;
 2389         int error;
 2390 
 2391         if (!(how == SHUT_RD || how == SHUT_WR || how == SHUT_RDWR))
 2392                 return (EINVAL);
 2393 
 2394         CURVNET_SET(so->so_vnet);
 2395         if (pr->pr_usrreqs->pru_flush != NULL) {
 2396                 (*pr->pr_usrreqs->pru_flush)(so, how);
 2397         }
 2398         if (how != SHUT_WR)
 2399                 sorflush(so);
 2400         if (how != SHUT_RD) {
 2401                 error = (*pr->pr_usrreqs->pru_shutdown)(so);
 2402                 wakeup(&so->so_timeo);
 2403                 CURVNET_RESTORE();
 2404                 return (error);
 2405         }
 2406         wakeup(&so->so_timeo);
 2407         CURVNET_RESTORE();
 2408         return (0);
 2409 }
 2410 
 2411 void
 2412 sorflush(struct socket *so)
 2413 {
 2414         struct sockbuf *sb = &so->so_rcv;
 2415         struct protosw *pr = so->so_proto;
 2416         struct sockbuf asb;
 2417 
 2418         VNET_SO_ASSERT(so);
 2419 
 2420         /*
 2421          * In order to avoid calling dom_dispose with the socket buffer mutex
 2422          * held, and in order to generally avoid holding the lock for a long
 2423          * time, we make a copy of the socket buffer and clear the original
 2424          * (except locks, state).  The new socket buffer copy won't have
 2425          * initialized locks so we can only call routines that won't use or
 2426          * assert those locks.
 2427          *
 2428          * Dislodge threads currently blocked in receive and wait to acquire
 2429          * a lock against other simultaneous readers before clearing the
 2430          * socket buffer.  Don't let our acquire be interrupted by a signal
 2431          * despite any existing socket disposition on interruptable waiting.
 2432          */
 2433         socantrcvmore(so);
 2434         (void) sblock(sb, SBL_WAIT | SBL_NOINTR);
 2435 
 2436         /*
 2437          * Invalidate/clear most of the sockbuf structure, but leave selinfo
 2438          * and mutex data unchanged.
 2439          */
 2440         SOCKBUF_LOCK(sb);
 2441         bzero(&asb, offsetof(struct sockbuf, sb_startzero));
 2442         bcopy(&sb->sb_startzero, &asb.sb_startzero,
 2443             sizeof(*sb) - offsetof(struct sockbuf, sb_startzero));
 2444         bzero(&sb->sb_startzero,
 2445             sizeof(*sb) - offsetof(struct sockbuf, sb_startzero));
 2446         SOCKBUF_UNLOCK(sb);
 2447         sbunlock(sb);
 2448 
 2449         /*
 2450          * Dispose of special rights and flush the socket buffer.  Don't call
 2451          * any unsafe routines (that rely on locks being initialized) on asb.
 2452          */
 2453         if (pr->pr_flags & PR_RIGHTS && pr->pr_domain->dom_dispose != NULL)
 2454                 (*pr->pr_domain->dom_dispose)(asb.sb_mb);
 2455         sbrelease_internal(&asb, so);
 2456 }
 2457 
 2458 /*
 2459  * Perhaps this routine, and sooptcopyout(), below, ought to come in an
 2460  * additional variant to handle the case where the option value needs to be
 2461  * some kind of integer, but not a specific size.  In addition to their use
 2462  * here, these functions are also called by the protocol-level pr_ctloutput()
 2463  * routines.
 2464  */
 2465 int
 2466 sooptcopyin(struct sockopt *sopt, void *buf, size_t len, size_t minlen)
 2467 {
 2468         size_t  valsize;
 2469 
 2470         /*
 2471          * If the user gives us more than we wanted, we ignore it, but if we
 2472          * don't get the minimum length the caller wants, we return EINVAL.
 2473          * On success, sopt->sopt_valsize is set to however much we actually
 2474          * retrieved.
 2475          */
 2476         if ((valsize = sopt->sopt_valsize) < minlen)
 2477                 return EINVAL;
 2478         if (valsize > len)
 2479                 sopt->sopt_valsize = valsize = len;
 2480 
 2481         if (sopt->sopt_td != NULL)
 2482                 return (copyin(sopt->sopt_val, buf, valsize));
 2483 
 2484         bcopy(sopt->sopt_val, buf, valsize);
 2485         return (0);
 2486 }
 2487 
 2488 /*
 2489  * Kernel version of setsockopt(2).
 2490  *
 2491  * XXX: optlen is size_t, not socklen_t
 2492  */
 2493 int
 2494 so_setsockopt(struct socket *so, int level, int optname, void *optval,
 2495     size_t optlen)
 2496 {
 2497         struct sockopt sopt;
 2498 
 2499         sopt.sopt_level = level;
 2500         sopt.sopt_name = optname;
 2501         sopt.sopt_dir = SOPT_SET;
 2502         sopt.sopt_val = optval;
 2503         sopt.sopt_valsize = optlen;
 2504         sopt.sopt_td = NULL;
 2505         return (sosetopt(so, &sopt));
 2506 }
 2507 
 2508 int
 2509 sosetopt(struct socket *so, struct sockopt *sopt)
 2510 {
 2511         int     error, optval;
 2512         struct  linger l;
 2513         struct  timeval tv;
 2514         u_long  val;
 2515         uint32_t val32;
 2516 #ifdef MAC
 2517         struct mac extmac;
 2518 #endif
 2519 
 2520         CURVNET_SET(so->so_vnet);
 2521         error = 0;
 2522         if (sopt->sopt_level != SOL_SOCKET) {
 2523                 if (so->so_proto->pr_ctloutput != NULL) {
 2524                         error = (*so->so_proto->pr_ctloutput)(so, sopt);
 2525                         CURVNET_RESTORE();
 2526                         return (error);
 2527                 }
 2528                 error = ENOPROTOOPT;
 2529         } else {
 2530                 switch (sopt->sopt_name) {
 2531 #ifdef INET
 2532                 case SO_ACCEPTFILTER:
 2533                         error = do_setopt_accept_filter(so, sopt);
 2534                         if (error)
 2535                                 goto bad;
 2536                         break;
 2537 #endif
 2538                 case SO_LINGER:
 2539                         error = sooptcopyin(sopt, &l, sizeof l, sizeof l);
 2540                         if (error)
 2541                                 goto bad;
 2542 
 2543                         SOCK_LOCK(so);
 2544                         so->so_linger = l.l_linger;
 2545                         if (l.l_onoff)
 2546                                 so->so_options |= SO_LINGER;
 2547                         else
 2548                                 so->so_options &= ~SO_LINGER;
 2549                         SOCK_UNLOCK(so);
 2550                         break;
 2551 
 2552                 case SO_DEBUG:
 2553                 case SO_KEEPALIVE:
 2554                 case SO_DONTROUTE:
 2555                 case SO_USELOOPBACK:
 2556                 case SO_BROADCAST:
 2557                 case SO_REUSEADDR:
 2558                 case SO_REUSEPORT:
 2559                 case SO_OOBINLINE:
 2560                 case SO_TIMESTAMP:
 2561                 case SO_BINTIME:
 2562                 case SO_NOSIGPIPE:
 2563                 case SO_NO_DDP:
 2564                 case SO_NO_OFFLOAD:
 2565                         error = sooptcopyin(sopt, &optval, sizeof optval,
 2566                                             sizeof optval);
 2567                         if (error)
 2568                                 goto bad;
 2569                         SOCK_LOCK(so);
 2570                         if (optval)
 2571                                 so->so_options |= sopt->sopt_name;
 2572                         else
 2573                                 so->so_options &= ~sopt->sopt_name;
 2574                         SOCK_UNLOCK(so);
 2575                         break;
 2576 
 2577                 case SO_SETFIB:
 2578                         error = sooptcopyin(sopt, &optval, sizeof optval,
 2579                                             sizeof optval);
 2580                         if (error)
 2581                                 goto bad;
 2582 
 2583                         if (optval < 0 || optval >= rt_numfibs) {
 2584                                 error = EINVAL;
 2585                                 goto bad;
 2586                         }
 2587                         if (((so->so_proto->pr_domain->dom_family == PF_INET) ||
 2588                            (so->so_proto->pr_domain->dom_family == PF_INET6) ||
 2589                            (so->so_proto->pr_domain->dom_family == PF_ROUTE)))
 2590                                 so->so_fibnum = optval;
 2591                         else
 2592                                 so->so_fibnum = 0;
 2593                         break;
 2594 
 2595                 case SO_USER_COOKIE:
 2596                         error = sooptcopyin(sopt, &val32, sizeof val32,
 2597                                             sizeof val32);
 2598                         if (error)
 2599                                 goto bad;
 2600                         so->so_user_cookie = val32;
 2601                         break;
 2602 
 2603                 case SO_SNDBUF:
 2604                 case SO_RCVBUF:
 2605                 case SO_SNDLOWAT:
 2606                 case SO_RCVLOWAT:
 2607                         error = sooptcopyin(sopt, &optval, sizeof optval,
 2608                                             sizeof optval);
 2609                         if (error)
 2610                                 goto bad;
 2611 
 2612                         /*
 2613                          * Values < 1 make no sense for any of these options,
 2614                          * so disallow them.
 2615                          */
 2616                         if (optval < 1) {
 2617                                 error = EINVAL;
 2618                                 goto bad;
 2619                         }
 2620 
 2621                         switch (sopt->sopt_name) {
 2622                         case SO_SNDBUF:
 2623                         case SO_RCVBUF:
 2624                                 if (sbreserve(sopt->sopt_name == SO_SNDBUF ?
 2625                                     &so->so_snd : &so->so_rcv, (u_long)optval,
 2626                                     so, curthread) == 0) {
 2627                                         error = ENOBUFS;
 2628                                         goto bad;
 2629                                 }
 2630                                 (sopt->sopt_name == SO_SNDBUF ? &so->so_snd :
 2631                                     &so->so_rcv)->sb_flags &= ~SB_AUTOSIZE;
 2632                                 break;
 2633 
 2634                         /*
 2635                          * Make sure the low-water is never greater than the
 2636                          * high-water.
 2637                          */
 2638                         case SO_SNDLOWAT:
 2639                                 SOCKBUF_LOCK(&so->so_snd);
 2640                                 so->so_snd.sb_lowat =
 2641                                     (optval > so->so_snd.sb_hiwat) ?
 2642                                     so->so_snd.sb_hiwat : optval;
 2643                                 SOCKBUF_UNLOCK(&so->so_snd);
 2644                                 break;
 2645                         case SO_RCVLOWAT:
 2646                                 SOCKBUF_LOCK(&so->so_rcv);
 2647                                 so->so_rcv.sb_lowat =
 2648                                     (optval > so->so_rcv.sb_hiwat) ?
 2649                                     so->so_rcv.sb_hiwat : optval;
 2650                                 SOCKBUF_UNLOCK(&so->so_rcv);
 2651                                 break;
 2652                         }
 2653                         break;
 2654 
 2655                 case SO_SNDTIMEO:
 2656                 case SO_RCVTIMEO:
 2657 #ifdef COMPAT_FREEBSD32
 2658                         if (SV_CURPROC_FLAG(SV_ILP32)) {
 2659                                 struct timeval32 tv32;
 2660 
 2661                                 error = sooptcopyin(sopt, &tv32, sizeof tv32,
 2662                                     sizeof tv32);
 2663                                 CP(tv32, tv, tv_sec);
 2664                                 CP(tv32, tv, tv_usec);
 2665                         } else
 2666 #endif
 2667                                 error = sooptcopyin(sopt, &tv, sizeof tv,
 2668                                     sizeof tv);
 2669                         if (error)
 2670                                 goto bad;
 2671                         if (tv.tv_sec < 0 || tv.tv_usec < 0 ||
 2672                             tv.tv_usec >= 1000000) {
 2673                                 error = EDOM;
 2674                                 goto bad;
 2675                         }
 2676                         val = tvtohz(&tv);
 2677 
 2678                         switch (sopt->sopt_name) {
 2679                         case SO_SNDTIMEO:
 2680                                 so->so_snd.sb_timeo = val;
 2681                                 break;
 2682                         case SO_RCVTIMEO:
 2683                                 so->so_rcv.sb_timeo = val;
 2684                                 break;
 2685                         }
 2686                         break;
 2687 
 2688                 case SO_LABEL:
 2689 #ifdef MAC
 2690                         error = sooptcopyin(sopt, &extmac, sizeof extmac,
 2691                             sizeof extmac);
 2692                         if (error)
 2693                                 goto bad;
 2694                         error = mac_setsockopt_label(sopt->sopt_td->td_ucred,
 2695                             so, &extmac);
 2696 #else
 2697                         error = EOPNOTSUPP;
 2698 #endif
 2699                         break;
 2700 
 2701                 default:
 2702                         error = ENOPROTOOPT;
 2703                         break;
 2704                 }
 2705                 if (error == 0 && so->so_proto->pr_ctloutput != NULL)
 2706                         (void)(*so->so_proto->pr_ctloutput)(so, sopt);
 2707         }
 2708 bad:
 2709         CURVNET_RESTORE();
 2710         return (error);
 2711 }
 2712 
 2713 /*
 2714  * Helper routine for getsockopt.
 2715  */
 2716 int
 2717 sooptcopyout(struct sockopt *sopt, const void *buf, size_t len)
 2718 {
 2719         int     error;
 2720         size_t  valsize;
 2721 
 2722         error = 0;
 2723 
 2724         /*
 2725          * Documented get behavior is that we always return a value, possibly
 2726          * truncated to fit in the user's buffer.  Traditional behavior is
 2727          * that we always tell the user precisely how much we copied, rather
 2728          * than something useful like the total amount we had available for
 2729          * her.  Note that this interface is not idempotent; the entire
 2730          * answer must generated ahead of time.
 2731          */
 2732         valsize = min(len, sopt->sopt_valsize);
 2733         sopt->sopt_valsize = valsize;
 2734         if (sopt->sopt_val != NULL) {
 2735                 if (sopt->sopt_td != NULL)
 2736                         error = copyout(buf, sopt->sopt_val, valsize);
 2737                 else
 2738                         bcopy(buf, sopt->sopt_val, valsize);
 2739         }
 2740         return (error);
 2741 }
 2742 
 2743 int
 2744 sogetopt(struct socket *so, struct sockopt *sopt)
 2745 {
 2746         int     error, optval;
 2747         struct  linger l;
 2748         struct  timeval tv;
 2749 #ifdef MAC
 2750         struct mac extmac;
 2751 #endif
 2752 
 2753         CURVNET_SET(so->so_vnet);
 2754         error = 0;
 2755         if (sopt->sopt_level != SOL_SOCKET) {
 2756                 if (so->so_proto->pr_ctloutput != NULL)
 2757                         error = (*so->so_proto->pr_ctloutput)(so, sopt);
 2758                 else
 2759                         error = ENOPROTOOPT;
 2760                 CURVNET_RESTORE();
 2761                 return (error);
 2762         } else {
 2763                 switch (sopt->sopt_name) {
 2764 #ifdef INET
 2765                 case SO_ACCEPTFILTER:
 2766                         error = do_getopt_accept_filter(so, sopt);
 2767                         break;
 2768 #endif
 2769                 case SO_LINGER:
 2770                         SOCK_LOCK(so);
 2771                         l.l_onoff = so->so_options & SO_LINGER;
 2772                         l.l_linger = so->so_linger;
 2773                         SOCK_UNLOCK(so);
 2774                         error = sooptcopyout(sopt, &l, sizeof l);
 2775                         break;
 2776 
 2777                 case SO_USELOOPBACK:
 2778                 case SO_DONTROUTE:
 2779                 case SO_DEBUG:
 2780                 case SO_KEEPALIVE:
 2781                 case SO_REUSEADDR:
 2782                 case SO_REUSEPORT:
 2783                 case SO_BROADCAST:
 2784                 case SO_OOBINLINE:
 2785                 case SO_ACCEPTCONN:
 2786                 case SO_TIMESTAMP:
 2787                 case SO_BINTIME:
 2788                 case SO_NOSIGPIPE:
 2789                         optval = so->so_options & sopt->sopt_name;
 2790 integer:
 2791                         error = sooptcopyout(sopt, &optval, sizeof optval);
 2792                         break;
 2793 
 2794                 case SO_TYPE:
 2795                         optval = so->so_type;
 2796                         goto integer;
 2797 
 2798                 case SO_PROTOCOL:
 2799                         optval = so->so_proto->pr_protocol;
 2800                         goto integer;
 2801 
 2802                 case SO_ERROR:
 2803                         SOCK_LOCK(so);
 2804                         optval = so->so_error;
 2805                         so->so_error = 0;
 2806                         SOCK_UNLOCK(so);
 2807                         goto integer;
 2808 
 2809                 case SO_SNDBUF:
 2810                         optval = so->so_snd.sb_hiwat;
 2811                         goto integer;
 2812 
 2813                 case SO_RCVBUF:
 2814                         optval = so->so_rcv.sb_hiwat;
 2815                         goto integer;
 2816 
 2817                 case SO_SNDLOWAT:
 2818                         optval = so->so_snd.sb_lowat;
 2819                         goto integer;
 2820 
 2821                 case SO_RCVLOWAT:
 2822                         optval = so->so_rcv.sb_lowat;
 2823                         goto integer;
 2824 
 2825                 case SO_SNDTIMEO:
 2826                 case SO_RCVTIMEO:
 2827                         optval = (sopt->sopt_name == SO_SNDTIMEO ?
 2828                                   so->so_snd.sb_timeo : so->so_rcv.sb_timeo);
 2829 
 2830                         tv.tv_sec = optval / hz;
 2831                         tv.tv_usec = (optval % hz) * tick;
 2832 #ifdef COMPAT_FREEBSD32
 2833                         if (SV_CURPROC_FLAG(SV_ILP32)) {
 2834                                 struct timeval32 tv32;
 2835 
 2836                                 CP(tv, tv32, tv_sec);
 2837                                 CP(tv, tv32, tv_usec);
 2838                                 error = sooptcopyout(sopt, &tv32, sizeof tv32);
 2839                         } else
 2840 #endif
 2841                                 error = sooptcopyout(sopt, &tv, sizeof tv);
 2842                         break;
 2843 
 2844                 case SO_LABEL:
 2845 #ifdef MAC
 2846                         error = sooptcopyin(sopt, &extmac, sizeof(extmac),
 2847                             sizeof(extmac));
 2848                         if (error)
 2849                                 goto bad;
 2850                         error = mac_getsockopt_label(sopt->sopt_td->td_ucred,
 2851                             so, &extmac);
 2852                         if (error)
 2853                                 goto bad;
 2854                         error = sooptcopyout(sopt, &extmac, sizeof extmac);
 2855 #else
 2856                         error = EOPNOTSUPP;
 2857 #endif
 2858                         break;
 2859 
 2860                 case SO_PEERLABEL:
 2861 #ifdef MAC
 2862                         error = sooptcopyin(sopt, &extmac, sizeof(extmac),
 2863                             sizeof(extmac));
 2864                         if (error)
 2865                                 goto bad;
 2866                         error = mac_getsockopt_peerlabel(
 2867                             sopt->sopt_td->td_ucred, so, &extmac);
 2868                         if (error)
 2869                                 goto bad;
 2870                         error = sooptcopyout(sopt, &extmac, sizeof extmac);
 2871 #else
 2872                         error = EOPNOTSUPP;
 2873 #endif
 2874                         break;
 2875 
 2876                 case SO_LISTENQLIMIT:
 2877                         optval = so->so_qlimit;
 2878                         goto integer;
 2879 
 2880                 case SO_LISTENQLEN:
 2881                         optval = so->so_qlen;
 2882                         goto integer;
 2883 
 2884                 case SO_LISTENINCQLEN:
 2885                         optval = so->so_incqlen;
 2886                         goto integer;
 2887 
 2888                 default:
 2889                         error = ENOPROTOOPT;
 2890                         break;
 2891                 }
 2892         }
 2893 #ifdef MAC
 2894 bad:
 2895 #endif
 2896         CURVNET_RESTORE();
 2897         return (error);
 2898 }
 2899 
 2900 /* XXX; prepare mbuf for (__FreeBSD__ < 3) routines. */
 2901 int
 2902 soopt_getm(struct sockopt *sopt, struct mbuf **mp)
 2903 {
 2904         struct mbuf *m, *m_prev;
 2905         int sopt_size = sopt->sopt_valsize;
 2906 
 2907         MGET(m, sopt->sopt_td ? M_WAIT : M_DONTWAIT, MT_DATA);
 2908         if (m == NULL)
 2909                 return ENOBUFS;
 2910         if (sopt_size > MLEN) {
 2911                 MCLGET(m, sopt->sopt_td ? M_WAIT : M_DONTWAIT);
 2912                 if ((m->m_flags & M_EXT) == 0) {
 2913                         m_free(m);
 2914                         return ENOBUFS;
 2915                 }
 2916                 m->m_len = min(MCLBYTES, sopt_size);
 2917         } else {
 2918                 m->m_len = min(MLEN, sopt_size);
 2919         }
 2920         sopt_size -= m->m_len;
 2921         *mp = m;
 2922         m_prev = m;
 2923 
 2924         while (sopt_size) {
 2925                 MGET(m, sopt->sopt_td ? M_WAIT : M_DONTWAIT, MT_DATA);
 2926                 if (m == NULL) {
 2927                         m_freem(*mp);
 2928                         return ENOBUFS;
 2929                 }
 2930                 if (sopt_size > MLEN) {
 2931                         MCLGET(m, sopt->sopt_td != NULL ? M_WAIT :
 2932                             M_DONTWAIT);
 2933                         if ((m->m_flags & M_EXT) == 0) {
 2934                                 m_freem(m);
 2935                                 m_freem(*mp);
 2936                                 return ENOBUFS;
 2937                         }
 2938                         m->m_len = min(MCLBYTES, sopt_size);
 2939                 } else {
 2940                         m->m_len = min(MLEN, sopt_size);
 2941                 }
 2942                 sopt_size -= m->m_len;
 2943                 m_prev->m_next = m;
 2944                 m_prev = m;
 2945         }
 2946         return (0);
 2947 }
 2948 
 2949 /* XXX; copyin sopt data into mbuf chain for (__FreeBSD__ < 3) routines. */
 2950 int
 2951 soopt_mcopyin(struct sockopt *sopt, struct mbuf *m)
 2952 {
 2953         struct mbuf *m0 = m;
 2954 
 2955         if (sopt->sopt_val == NULL)
 2956                 return (0);
 2957         while (m != NULL && sopt->sopt_valsize >= m->m_len) {
 2958                 if (sopt->sopt_td != NULL) {
 2959                         int error;
 2960 
 2961                         error = copyin(sopt->sopt_val, mtod(m, char *),
 2962                                        m->m_len);
 2963                         if (error != 0) {
 2964                                 m_freem(m0);
 2965                                 return(error);
 2966                         }
 2967                 } else
 2968                         bcopy(sopt->sopt_val, mtod(m, char *), m->m_len);
 2969                 sopt->sopt_valsize -= m->m_len;
 2970                 sopt->sopt_val = (char *)sopt->sopt_val + m->m_len;
 2971                 m = m->m_next;
 2972         }
 2973         if (m != NULL) /* should be allocated enoughly at ip6_sooptmcopyin() */
 2974                 panic("ip6_sooptmcopyin");
 2975         return (0);
 2976 }
 2977 
 2978 /* XXX; copyout mbuf chain data into soopt for (__FreeBSD__ < 3) routines. */
 2979 int
 2980 soopt_mcopyout(struct sockopt *sopt, struct mbuf *m)
 2981 {
 2982         struct mbuf *m0 = m;
 2983         size_t valsize = 0;
 2984 
 2985         if (sopt->sopt_val == NULL)
 2986                 return (0);
 2987         while (m != NULL && sopt->sopt_valsize >= m->m_len) {
 2988                 if (sopt->sopt_td != NULL) {
 2989                         int error;
 2990 
 2991                         error = copyout(mtod(m, char *), sopt->sopt_val,
 2992                                        m->m_len);
 2993                         if (error != 0) {
 2994                                 m_freem(m0);
 2995                                 return(error);
 2996                         }
 2997                 } else
 2998                         bcopy(mtod(m, char *), sopt->sopt_val, m->m_len);
 2999                sopt->sopt_valsize -= m->m_len;
 3000                sopt->sopt_val = (char *)sopt->sopt_val + m->m_len;
 3001                valsize += m->m_len;
 3002                m = m->m_next;
 3003         }
 3004         if (m != NULL) {
 3005                 /* enough soopt buffer should be given from user-land */
 3006                 m_freem(m0);
 3007                 return(EINVAL);
 3008         }
 3009         sopt->sopt_valsize = valsize;
 3010         return (0);
 3011 }
 3012 
 3013 /*
 3014  * sohasoutofband(): protocol notifies socket layer of the arrival of new
 3015  * out-of-band data, which will then notify socket consumers.
 3016  */
 3017 void
 3018 sohasoutofband(struct socket *so)
 3019 {
 3020 
 3021         if (so->so_sigio != NULL)
 3022                 pgsigio(&so->so_sigio, SIGURG, 0);
 3023         selwakeuppri(&so->so_rcv.sb_sel, PSOCK);
 3024 }
 3025 
 3026 int
 3027 sopoll(struct socket *so, int events, struct ucred *active_cred,
 3028     struct thread *td)
 3029 {
 3030 
 3031         /*
 3032          * We do not need to set or assert curvnet as long as everyone uses
 3033          * sopoll_generic().
 3034          */
 3035         return (so->so_proto->pr_usrreqs->pru_sopoll(so, events, active_cred,
 3036             td));
 3037 }
 3038 
 3039 int
 3040 sopoll_generic(struct socket *so, int events, struct ucred *active_cred,
 3041     struct thread *td)
 3042 {
 3043         int revents = 0;
 3044 
 3045         SOCKBUF_LOCK(&so->so_snd);
 3046         SOCKBUF_LOCK(&so->so_rcv);
 3047         if (events & (POLLIN | POLLRDNORM))
 3048                 if (soreadabledata(so))
 3049                         revents |= events & (POLLIN | POLLRDNORM);
 3050 
 3051         if (events & (POLLOUT | POLLWRNORM))
 3052                 if (sowriteable(so))
 3053                         revents |= events & (POLLOUT | POLLWRNORM);
 3054 
 3055         if (events & (POLLPRI | POLLRDBAND))
 3056                 if (so->so_oobmark || (so->so_rcv.sb_state & SBS_RCVATMARK))
 3057                         revents |= events & (POLLPRI | POLLRDBAND);
 3058 
 3059         if ((events & POLLINIGNEOF) == 0) {
 3060                 if (so->so_rcv.sb_state & SBS_CANTRCVMORE) {
 3061                         revents |= events & (POLLIN | POLLRDNORM);
 3062                         if (so->so_snd.sb_state & SBS_CANTSENDMORE)
 3063                                 revents |= POLLHUP;
 3064                 }
 3065         }
 3066 
 3067         if (revents == 0) {
 3068                 if (events & (POLLIN | POLLPRI | POLLRDNORM | POLLRDBAND)) {
 3069                         selrecord(td, &so->so_rcv.sb_sel);
 3070                         so->so_rcv.sb_flags |= SB_SEL;
 3071                 }
 3072 
 3073                 if (events & (POLLOUT | POLLWRNORM)) {
 3074                         selrecord(td, &so->so_snd.sb_sel);
 3075                         so->so_snd.sb_flags |= SB_SEL;
 3076                 }
 3077         }
 3078 
 3079         SOCKBUF_UNLOCK(&so->so_rcv);
 3080         SOCKBUF_UNLOCK(&so->so_snd);
 3081         return (revents);
 3082 }
 3083 
 3084 int
 3085 soo_kqfilter(struct file *fp, struct knote *kn)
 3086 {
 3087         struct socket *so = kn->kn_fp->f_data;
 3088         struct sockbuf *sb;
 3089 
 3090         switch (kn->kn_filter) {
 3091         case EVFILT_READ:
 3092                 if (so->so_options & SO_ACCEPTCONN)
 3093                         kn->kn_fop = &solisten_filtops;
 3094                 else
 3095                         kn->kn_fop = &soread_filtops;
 3096                 sb = &so->so_rcv;
 3097                 break;
 3098         case EVFILT_WRITE:
 3099                 kn->kn_fop = &sowrite_filtops;
 3100                 sb = &so->so_snd;
 3101                 break;
 3102         default:
 3103                 return (EINVAL);
 3104         }
 3105 
 3106         SOCKBUF_LOCK(sb);
 3107         knlist_add(&sb->sb_sel.si_note, kn, 1);
 3108         sb->sb_flags |= SB_KNOTE;
 3109         SOCKBUF_UNLOCK(sb);
 3110         return (0);
 3111 }
 3112 
 3113 /*
 3114  * Some routines that return EOPNOTSUPP for entry points that are not
 3115  * supported by a protocol.  Fill in as needed.
 3116  */
 3117 int
 3118 pru_accept_notsupp(struct socket *so, struct sockaddr **nam)
 3119 {
 3120 
 3121         return EOPNOTSUPP;
 3122 }
 3123 
 3124 int
 3125 pru_attach_notsupp(struct socket *so, int proto, struct thread *td)
 3126 {
 3127 
 3128         return EOPNOTSUPP;
 3129 }
 3130 
 3131 int
 3132 pru_bind_notsupp(struct socket *so, struct sockaddr *nam, struct thread *td)
 3133 {
 3134 
 3135         return EOPNOTSUPP;
 3136 }
 3137 
 3138 int
 3139 pru_connect_notsupp(struct socket *so, struct sockaddr *nam, struct thread *td)
 3140 {
 3141 
 3142         return EOPNOTSUPP;
 3143 }
 3144 
 3145 int
 3146 pru_connect2_notsupp(struct socket *so1, struct socket *so2)
 3147 {
 3148 
 3149         return EOPNOTSUPP;
 3150 }
 3151 
 3152 int
 3153 pru_control_notsupp(struct socket *so, u_long cmd, caddr_t data,
 3154     struct ifnet *ifp, struct thread *td)
 3155 {
 3156 
 3157         return EOPNOTSUPP;
 3158 }
 3159 
 3160 int
 3161 pru_disconnect_notsupp(struct socket *so)
 3162 {
 3163 
 3164         return EOPNOTSUPP;
 3165 }
 3166 
 3167 int
 3168 pru_listen_notsupp(struct socket *so, int backlog, struct thread *td)
 3169 {
 3170 
 3171         return EOPNOTSUPP;
 3172 }
 3173 
 3174 int
 3175 pru_peeraddr_notsupp(struct socket *so, struct sockaddr **nam)
 3176 {
 3177 
 3178         return EOPNOTSUPP;
 3179 }
 3180 
 3181 int
 3182 pru_rcvd_notsupp(struct socket *so, int flags)
 3183 {
 3184 
 3185         return EOPNOTSUPP;
 3186 }
 3187 
 3188 int
 3189 pru_rcvoob_notsupp(struct socket *so, struct mbuf *m, int flags)
 3190 {
 3191 
 3192         return EOPNOTSUPP;
 3193 }
 3194 
 3195 int
 3196 pru_send_notsupp(struct socket *so, int flags, struct mbuf *m,
 3197     struct sockaddr *addr, struct mbuf *control, struct thread *td)
 3198 {
 3199 
 3200         return EOPNOTSUPP;
 3201 }
 3202 
 3203 /*
 3204  * This isn't really a ``null'' operation, but it's the default one and
 3205  * doesn't do anything destructive.
 3206  */
 3207 int
 3208 pru_sense_null(struct socket *so, struct stat *sb)
 3209 {
 3210 
 3211         sb->st_blksize = so->so_snd.sb_hiwat;
 3212         return 0;
 3213 }
 3214 
 3215 int
 3216 pru_shutdown_notsupp(struct socket *so)
 3217 {
 3218 
 3219         return EOPNOTSUPP;
 3220 }
 3221 
 3222 int
 3223 pru_sockaddr_notsupp(struct socket *so, struct sockaddr **nam)
 3224 {
 3225 
 3226         return EOPNOTSUPP;
 3227 }
 3228 
 3229 int
 3230 pru_sosend_notsupp(struct socket *so, struct sockaddr *addr, struct uio *uio,
 3231     struct mbuf *top, struct mbuf *control, int flags, struct thread *td)
 3232 {
 3233 
 3234         return EOPNOTSUPP;
 3235 }
 3236 
 3237 int
 3238 pru_soreceive_notsupp(struct socket *so, struct sockaddr **paddr,
 3239     struct uio *uio, struct mbuf **mp0, struct mbuf **controlp, int *flagsp)
 3240 {
 3241 
 3242         return EOPNOTSUPP;
 3243 }
 3244 
 3245 int
 3246 pru_sopoll_notsupp(struct socket *so, int events, struct ucred *cred,
 3247     struct thread *td)
 3248 {
 3249 
 3250         return EOPNOTSUPP;
 3251 }
 3252 
 3253 static void
 3254 filt_sordetach(struct knote *kn)
 3255 {
 3256         struct socket *so = kn->kn_fp->f_data;
 3257 
 3258         SOCKBUF_LOCK(&so->so_rcv);
 3259         knlist_remove(&so->so_rcv.sb_sel.si_note, kn, 1);
 3260         if (knlist_empty(&so->so_rcv.sb_sel.si_note))
 3261                 so->so_rcv.sb_flags &= ~SB_KNOTE;
 3262         SOCKBUF_UNLOCK(&so->so_rcv);
 3263 }
 3264 
 3265 /*ARGSUSED*/
 3266 static int
 3267 filt_soread(struct knote *kn, long hint)
 3268 {
 3269         struct socket *so;
 3270 
 3271         so = kn->kn_fp->f_data;
 3272         SOCKBUF_LOCK_ASSERT(&so->so_rcv);
 3273 
 3274         kn->kn_data = so->so_rcv.sb_cc - so->so_rcv.sb_ctl;
 3275         if (so->so_rcv.sb_state & SBS_CANTRCVMORE) {
 3276                 kn->kn_flags |= EV_EOF;
 3277                 kn->kn_fflags = so->so_error;
 3278                 return (1);
 3279         } else if (so->so_error)        /* temporary udp error */
 3280                 return (1);
 3281         else if (kn->kn_sfflags & NOTE_LOWAT)
 3282                 return (kn->kn_data >= kn->kn_sdata);
 3283         else
 3284                 return (so->so_rcv.sb_cc >= so->so_rcv.sb_lowat);
 3285 }
 3286 
 3287 static void
 3288 filt_sowdetach(struct knote *kn)
 3289 {
 3290         struct socket *so = kn->kn_fp->f_data;
 3291 
 3292         SOCKBUF_LOCK(&so->so_snd);
 3293         knlist_remove(&so->so_snd.sb_sel.si_note, kn, 1);
 3294         if (knlist_empty(&so->so_snd.sb_sel.si_note))
 3295                 so->so_snd.sb_flags &= ~SB_KNOTE;
 3296         SOCKBUF_UNLOCK(&so->so_snd);
 3297 }
 3298 
 3299 /*ARGSUSED*/
 3300 static int
 3301 filt_sowrite(struct knote *kn, long hint)
 3302 {
 3303         struct socket *so;
 3304 
 3305         so = kn->kn_fp->f_data;
 3306         SOCKBUF_LOCK_ASSERT(&so->so_snd);
 3307         kn->kn_data = sbspace(&so->so_snd);
 3308         if (so->so_snd.sb_state & SBS_CANTSENDMORE) {
 3309                 kn->kn_flags |= EV_EOF;
 3310                 kn->kn_fflags = so->so_error;
 3311                 return (1);
 3312         } else if (so->so_error)        /* temporary udp error */
 3313                 return (1);
 3314         else if (((so->so_state & SS_ISCONNECTED) == 0) &&
 3315             (so->so_proto->pr_flags & PR_CONNREQUIRED))
 3316                 return (0);
 3317         else if (kn->kn_sfflags & NOTE_LOWAT)
 3318                 return (kn->kn_data >= kn->kn_sdata);
 3319         else
 3320                 return (kn->kn_data >= so->so_snd.sb_lowat);
 3321 }
 3322 
 3323 /*ARGSUSED*/
 3324 static int
 3325 filt_solisten(struct knote *kn, long hint)
 3326 {
 3327         struct socket *so = kn->kn_fp->f_data;
 3328 
 3329         kn->kn_data = so->so_qlen;
 3330         return (! TAILQ_EMPTY(&so->so_comp));
 3331 }
 3332 
 3333 int
 3334 socheckuid(struct socket *so, uid_t uid)
 3335 {
 3336 
 3337         if (so == NULL)
 3338                 return (EPERM);
 3339         if (so->so_cred->cr_uid != uid)
 3340                 return (EPERM);
 3341         return (0);
 3342 }
 3343 
 3344 /*
 3345  * These functions are used by protocols to notify the socket layer (and its
 3346  * consumers) of state changes in the sockets driven by protocol-side events.
 3347  */
 3348 
 3349 /*
 3350  * Procedures to manipulate state flags of socket and do appropriate wakeups.
 3351  *
 3352  * Normal sequence from the active (originating) side is that
 3353  * soisconnecting() is called during processing of connect() call, resulting
 3354  * in an eventual call to soisconnected() if/when the connection is
 3355  * established.  When the connection is torn down soisdisconnecting() is
 3356  * called during processing of disconnect() call, and soisdisconnected() is
 3357  * called when the connection to the peer is totally severed.  The semantics
 3358  * of these routines are such that connectionless protocols can call
 3359  * soisconnected() and soisdisconnected() only, bypassing the in-progress
 3360  * calls when setting up a ``connection'' takes no time.
 3361  *
 3362  * From the passive side, a socket is created with two queues of sockets:
 3363  * so_incomp for connections in progress and so_comp for connections already
 3364  * made and awaiting user acceptance.  As a protocol is preparing incoming
 3365  * connections, it creates a socket structure queued on so_incomp by calling
 3366  * sonewconn().  When the connection is established, soisconnected() is
 3367  * called, and transfers the socket structure to so_comp, making it available
 3368  * to accept().
 3369  *
 3370  * If a socket is closed with sockets on either so_incomp or so_comp, these
 3371  * sockets are dropped.
 3372  *
 3373  * If higher-level protocols are implemented in the kernel, the wakeups done
 3374  * here will sometimes cause software-interrupt process scheduling.
 3375  */
 3376 void
 3377 soisconnecting(struct socket *so)
 3378 {
 3379 
 3380         SOCK_LOCK(so);
 3381         so->so_state &= ~(SS_ISCONNECTED|SS_ISDISCONNECTING);
 3382         so->so_state |= SS_ISCONNECTING;
 3383         SOCK_UNLOCK(so);
 3384 }
 3385 
 3386 void
 3387 soisconnected(struct socket *so)
 3388 {
 3389         struct socket *head;    
 3390         int ret;
 3391 
 3392 restart:
 3393         ACCEPT_LOCK();
 3394         SOCK_LOCK(so);
 3395         so->so_state &= ~(SS_ISCONNECTING|SS_ISDISCONNECTING|SS_ISCONFIRMING);
 3396         so->so_state |= SS_ISCONNECTED;
 3397         head = so->so_head;
 3398         if (head != NULL && (so->so_qstate & SQ_INCOMP)) {
 3399                 if ((so->so_options & SO_ACCEPTFILTER) == 0) {
 3400                         SOCK_UNLOCK(so);
 3401                         TAILQ_REMOVE(&head->so_incomp, so, so_list);
 3402                         head->so_incqlen--;
 3403                         so->so_qstate &= ~SQ_INCOMP;
 3404                         TAILQ_INSERT_TAIL(&head->so_comp, so, so_list);
 3405                         head->so_qlen++;
 3406                         so->so_qstate |= SQ_COMP;
 3407                         ACCEPT_UNLOCK();
 3408                         sorwakeup(head);
 3409                         wakeup_one(&head->so_timeo);
 3410                 } else {
 3411                         ACCEPT_UNLOCK();
 3412                         soupcall_set(so, SO_RCV,
 3413                             head->so_accf->so_accept_filter->accf_callback,
 3414                             head->so_accf->so_accept_filter_arg);
 3415                         so->so_options &= ~SO_ACCEPTFILTER;
 3416                         ret = head->so_accf->so_accept_filter->accf_callback(so,
 3417                             head->so_accf->so_accept_filter_arg, M_DONTWAIT);
 3418                         if (ret == SU_ISCONNECTED)
 3419                                 soupcall_clear(so, SO_RCV);
 3420                         SOCK_UNLOCK(so);
 3421                         if (ret == SU_ISCONNECTED)
 3422                                 goto restart;
 3423                 }
 3424                 return;
 3425         }
 3426         SOCK_UNLOCK(so);
 3427         ACCEPT_UNLOCK();
 3428         wakeup(&so->so_timeo);
 3429         sorwakeup(so);
 3430         sowwakeup(so);
 3431 }
 3432 
 3433 void
 3434 soisdisconnecting(struct socket *so)
 3435 {
 3436 
 3437         /*
 3438          * Note: This code assumes that SOCK_LOCK(so) and
 3439          * SOCKBUF_LOCK(&so->so_rcv) are the same.
 3440          */
 3441         SOCKBUF_LOCK(&so->so_rcv);
 3442         so->so_state &= ~SS_ISCONNECTING;
 3443         so->so_state |= SS_ISDISCONNECTING;
 3444         so->so_rcv.sb_state |= SBS_CANTRCVMORE;
 3445         sorwakeup_locked(so);
 3446         SOCKBUF_LOCK(&so->so_snd);
 3447         so->so_snd.sb_state |= SBS_CANTSENDMORE;
 3448         sowwakeup_locked(so);
 3449         wakeup(&so->so_timeo);
 3450 }
 3451 
 3452 void
 3453 soisdisconnected(struct socket *so)
 3454 {
 3455 
 3456         /*
 3457          * Note: This code assumes that SOCK_LOCK(so) and
 3458          * SOCKBUF_LOCK(&so->so_rcv) are the same.
 3459          */
 3460         SOCKBUF_LOCK(&so->so_rcv);
 3461         so->so_state &= ~(SS_ISCONNECTING|SS_ISCONNECTED|SS_ISDISCONNECTING);
 3462         so->so_state |= SS_ISDISCONNECTED;
 3463         so->so_rcv.sb_state |= SBS_CANTRCVMORE;
 3464         sorwakeup_locked(so);
 3465         SOCKBUF_LOCK(&so->so_snd);
 3466         so->so_snd.sb_state |= SBS_CANTSENDMORE;
 3467         sbdrop_locked(&so->so_snd, so->so_snd.sb_cc);
 3468         sowwakeup_locked(so);
 3469         wakeup(&so->so_timeo);
 3470 }
 3471 
 3472 /*
 3473  * Make a copy of a sockaddr in a malloced buffer of type M_SONAME.
 3474  */
 3475 struct sockaddr *
 3476 sodupsockaddr(const struct sockaddr *sa, int mflags)
 3477 {
 3478         struct sockaddr *sa2;
 3479 
 3480         sa2 = malloc(sa->sa_len, M_SONAME, mflags);
 3481         if (sa2)
 3482                 bcopy(sa, sa2, sa->sa_len);
 3483         return sa2;
 3484 }
 3485 
 3486 /*
 3487  * Register per-socket buffer upcalls.
 3488  */
 3489 void
 3490 soupcall_set(struct socket *so, int which,
 3491     int (*func)(struct socket *, void *, int), void *arg)
 3492 {
 3493         struct sockbuf *sb;
 3494         
 3495         switch (which) {
 3496         case SO_RCV:
 3497                 sb = &so->so_rcv;
 3498                 break;
 3499         case SO_SND:
 3500                 sb = &so->so_snd;
 3501                 break;
 3502         default:
 3503                 panic("soupcall_set: bad which");
 3504         }
 3505         SOCKBUF_LOCK_ASSERT(sb);
 3506 #if 0
 3507         /* XXX: accf_http actually wants to do this on purpose. */
 3508         KASSERT(sb->sb_upcall == NULL, ("soupcall_set: overwriting upcall"));
 3509 #endif
 3510         sb->sb_upcall = func;
 3511         sb->sb_upcallarg = arg;
 3512         sb->sb_flags |= SB_UPCALL;
 3513 }
 3514 
 3515 void
 3516 soupcall_clear(struct socket *so, int which)
 3517 {
 3518         struct sockbuf *sb;
 3519 
 3520         switch (which) {
 3521         case SO_RCV:
 3522                 sb = &so->so_rcv;
 3523                 break;
 3524         case SO_SND:
 3525                 sb = &so->so_snd;
 3526                 break;
 3527         default:
 3528                 panic("soupcall_clear: bad which");
 3529         }
 3530         SOCKBUF_LOCK_ASSERT(sb);
 3531         KASSERT(sb->sb_upcall != NULL, ("soupcall_clear: no upcall to clear"));
 3532         sb->sb_upcall = NULL;
 3533         sb->sb_upcallarg = NULL;
 3534         sb->sb_flags &= ~SB_UPCALL;
 3535 }
 3536 
 3537 /*
 3538  * Create an external-format (``xsocket'') structure using the information in
 3539  * the kernel-format socket structure pointed to by so.  This is done to
 3540  * reduce the spew of irrelevant information over this interface, to isolate
 3541  * user code from changes in the kernel structure, and potentially to provide
 3542  * information-hiding if we decide that some of this information should be
 3543  * hidden from users.
 3544  */
 3545 void
 3546 sotoxsocket(struct socket *so, struct xsocket *xso)
 3547 {
 3548 
 3549         xso->xso_len = sizeof *xso;
 3550         xso->xso_so = so;
 3551         xso->so_type = so->so_type;
 3552         xso->so_options = so->so_options;
 3553         xso->so_linger = so->so_linger;
 3554         xso->so_state = so->so_state;
 3555         xso->so_pcb = so->so_pcb;
 3556         xso->xso_protocol = so->so_proto->pr_protocol;
 3557         xso->xso_family = so->so_proto->pr_domain->dom_family;
 3558         xso->so_qlen = so->so_qlen;
 3559         xso->so_incqlen = so->so_incqlen;
 3560         xso->so_qlimit = so->so_qlimit;
 3561         xso->so_timeo = so->so_timeo;
 3562         xso->so_error = so->so_error;
 3563         xso->so_pgid = so->so_sigio ? so->so_sigio->sio_pgid : 0;
 3564         xso->so_oobmark = so->so_oobmark;
 3565         sbtoxsockbuf(&so->so_snd, &xso->so_snd);
 3566         sbtoxsockbuf(&so->so_rcv, &xso->so_rcv);
 3567         xso->so_uid = so->so_cred->cr_uid;
 3568 }
 3569 
 3570 
 3571 /*
 3572  * Socket accessor functions to provide external consumers with
 3573  * a safe interface to socket state
 3574  *
 3575  */
 3576 
 3577 void
 3578 so_listeners_apply_all(struct socket *so, void (*func)(struct socket *, void *), void *arg)
 3579 {
 3580         
 3581         TAILQ_FOREACH(so, &so->so_comp, so_list)
 3582                 func(so, arg);
 3583 }
 3584 
 3585 struct sockbuf *
 3586 so_sockbuf_rcv(struct socket *so)
 3587 {
 3588 
 3589         return (&so->so_rcv);
 3590 }
 3591 
 3592 struct sockbuf *
 3593 so_sockbuf_snd(struct socket *so)
 3594 {
 3595 
 3596         return (&so->so_snd);
 3597 }
 3598 
 3599 int
 3600 so_state_get(const struct socket *so)
 3601 {
 3602 
 3603         return (so->so_state);
 3604 }
 3605 
 3606 void
 3607 so_state_set(struct socket *so, int val)
 3608 {
 3609 
 3610         so->so_state = val;
 3611 }
 3612 
 3613 int
 3614 so_options_get(const struct socket *so)
 3615 {
 3616 
 3617         return (so->so_options);
 3618 }
 3619 
 3620 void
 3621 so_options_set(struct socket *so, int val)
 3622 {
 3623 
 3624         so->so_options = val;
 3625 }
 3626 
 3627 int
 3628 so_error_get(const struct socket *so)
 3629 {
 3630 
 3631         return (so->so_error);
 3632 }
 3633 
 3634 void
 3635 so_error_set(struct socket *so, int val)
 3636 {
 3637 
 3638         so->so_error = val;
 3639 }
 3640 
 3641 int
 3642 so_linger_get(const struct socket *so)
 3643 {
 3644 
 3645         return (so->so_linger);
 3646 }
 3647 
 3648 void
 3649 so_linger_set(struct socket *so, int val)
 3650 {
 3651 
 3652         so->so_linger = val;
 3653 }
 3654 
 3655 struct protosw *
 3656 so_protosw_get(const struct socket *so)
 3657 {
 3658 
 3659         return (so->so_proto);
 3660 }
 3661 
 3662 void
 3663 so_protosw_set(struct socket *so, struct protosw *val)
 3664 {
 3665 
 3666         so->so_proto = val;
 3667 }
 3668 
 3669 void
 3670 so_sorwakeup(struct socket *so)
 3671 {
 3672 
 3673         sorwakeup(so);
 3674 }
 3675 
 3676 void
 3677 so_sowwakeup(struct socket *so)
 3678 {
 3679 
 3680         sowwakeup(so);
 3681 }
 3682 
 3683 void
 3684 so_sorwakeup_locked(struct socket *so)
 3685 {
 3686 
 3687         sorwakeup_locked(so);
 3688 }
 3689 
 3690 void
 3691 so_sowwakeup_locked(struct socket *so)
 3692 {
 3693 
 3694         sowwakeup_locked(so);
 3695 }
 3696 
 3697 void
 3698 so_lock(struct socket *so)
 3699 {
 3700         SOCK_LOCK(so);
 3701 }
 3702 
 3703 void
 3704 so_unlock(struct socket *so)
 3705 {
 3706         SOCK_UNLOCK(so);
 3707 }

Cache object: 4ff75f8091b164c2214fb4c61283f48e


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.