xnu-6153.41.3.tar.gz

[apple/xnu.git] / bsd / net / raw_usrreq.c

diff --git a/bsd/net/raw_usrreq.c b/bsd/net/raw_usrreq.c
index 9d54997190b3e2f18c94e026f4ef2bac7b3b8c3a..eb8521ed7738ae2270fd42ac5e97b64b8fda542b 100644 (file)
--- a/bsd/net/raw_usrreq.c
+++ b/bsd/net/raw_usrreq.c
@@ -1,15 +1,20 @@
 /*
 /*

- * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
+ * Copyright (c) 2000-2012 Apple Inc. All rights reserved.
+ *
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_START@

  *
  *

- * @APPLE_LICENSE_HEADER_START@
- * 

  * This file contains Original Code and/or Modifications of Original Code
  * as defined in and that are subject to the Apple Public Source License
  * Version 2.0 (the 'License'). You may not use this file except in
  * This file contains Original Code and/or Modifications of Original Code
  * as defined in and that are subject to the Apple Public Source License
  * Version 2.0 (the 'License'). You may not use this file except in

- * compliance with the License. Please obtain a copy of the License at
- * http://www.opensource.apple.com/apsl/ and read it before using this
- * file.
- * 
+ * compliance with the License. The rights granted to you under the License
+ * may not be used to create, or enable the creation or redistribution of,
+ * unlawful or unlicensed copies of an Apple operating system, or to
+ * circumvent, violate, or enable the circumvention or violation of, any
+ * terms of an Apple operating system software license agreement.
+ *
+ * Please obtain a copy of the License at
+ * http://www.opensource.apple.com/apsl/ and read it before using this file.
+ *

  * The Original Code and all software distributed under the License are
  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  * The Original Code and all software distributed under the License are
  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,


@@ -17,8 +22,8 @@
  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  * Please see the License for the specific language governing rights and
  * limitations under the License.
  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  * Please see the License for the specific language governing rights and
  * limitations under the License.

- * 
- * @APPLE_LICENSE_HEADER_END@
+ *
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_END@

  */
 /*
  * Copyright (c) 1980, 1986, 1993
  */
 /*
  * Copyright (c) 1980, 1986, 1993


@@ -68,31 +73,31 @@
 
 #include <net/raw_cb.h>
 
 
 #include <net/raw_cb.h>
 

-lck_mtx_t      *raw_mtx;       /*### global raw cb mutex for now */
-lck_attr_t     *raw_mtx_attr;
-lck_grp_t      *raw_mtx_grp;
-lck_grp_attr_t         *raw_mtx_grp_attr;
+decl_lck_mtx_data(, raw_mtx_data);       /*### global raw cb mutex for now */
+lck_mtx_t       *raw_mtx = &raw_mtx_data;
+lck_attr_t      *raw_mtx_attr;
+lck_grp_t       *raw_mtx_grp;
+lck_grp_attr_t  *raw_mtx_grp_attr;

 /*
  * Initialize raw connection block q.
  */
 void
 /*
  * Initialize raw connection block q.
  */
 void

-raw_init()
+raw_init(struct protosw *pp, struct domain *dp)

 {
 {

-       raw_mtx_grp_attr = lck_grp_attr_alloc_init();
-
-       lck_grp_attr_setdefault(raw_mtx_grp_attr);
-
-       raw_mtx_grp = lck_grp_alloc_init("rawcb", raw_mtx_grp_attr);
+#pragma unused(pp, dp)
+       static int raw_initialized = 0;

 
 

-       raw_mtx_attr = lck_attr_alloc_init();
+       /* This is called by key_init as well, so do it only once */
+       if (!raw_initialized) {
+               raw_initialized = 1;

 
 

-       lck_attr_setdefault(raw_mtx_attr);
+               raw_mtx_grp_attr = lck_grp_attr_alloc_init();
+               raw_mtx_grp = lck_grp_alloc_init("rawcb", raw_mtx_grp_attr);
+               raw_mtx_attr = lck_attr_alloc_init();

 
 

-       if ((raw_mtx = lck_mtx_alloc_init(raw_mtx_grp, raw_mtx_attr)) == NULL) {
-               printf("raw_init: can't alloc raw_mtx\n");
-               return;
+               lck_mtx_init(raw_mtx, raw_mtx_grp, raw_mtx_attr);
+               LIST_INIT(&rawcb_list);

        }
        }

-       LIST_INIT(&rawcb_list);

 }
 
 
 }
 
 


@@ -105,29 +110,29 @@ raw_init()
  * Raw protocol interface.
  */
 void
  * Raw protocol interface.
  */
 void

-raw_input(m0, proto, src, dst)
-       struct mbuf *m0;
-       register struct sockproto *proto;
-       struct sockaddr *src, *dst;
+raw_input(struct mbuf *m0, struct sockproto *proto, struct sockaddr *src,
+    struct sockaddr *dst)

 {
 {

-       register struct rawcb *rp;
-       register struct mbuf *m = m0;
-       register int sockets = 0;
+       struct rawcb *rp;
+       struct mbuf *m = m0;
+       int sockets = 0;

        struct socket *last;
        int error;
 
        struct socket *last;
        int error;
 

-//####LD raw_input is called from many places, input & output path. We have to assume the 
+//####LD raw_input is called from many places, input & output path. We have to assume the

 //####LD socket we'll find and need to append to is unlocked.
 //####LD calls from the output (locked) path need to make sure the socket is not locked when
 //####LD we call in raw_input
 //####LD socket we'll find and need to append to is unlocked.
 //####LD calls from the output (locked) path need to make sure the socket is not locked when
 //####LD we call in raw_input

-       last = 0;
+       last = NULL;

        lck_mtx_lock(raw_mtx);
        LIST_FOREACH(rp, &rawcb_list, list) {
        lck_mtx_lock(raw_mtx);
        LIST_FOREACH(rp, &rawcb_list, list) {

-               if (rp->rcb_proto.sp_family != proto->sp_family)
+               if (rp->rcb_proto.sp_family != proto->sp_family) {

                        continue;
                        continue;

-               if (rp->rcb_proto.sp_protocol  &&
-                   rp->rcb_proto.sp_protocol != proto->sp_protocol)
+               }
+               if (rp->rcb_proto.sp_protocol &&
+                   rp->rcb_proto.sp_protocol != proto->sp_protocol) {

                        continue;
                        continue;

+               }

                /*
                 * We assume the lower level routines have
                 * placed the address in a canonical format
                /*
                 * We assume the lower level routines have
                 * placed the address in a canonical format


@@ -136,12 +141,14 @@ raw_input(m0, proto, src, dst)
                 * Note that if the lengths are not the same
                 * the comparison will fail at the first byte.
                 */
                 * Note that if the lengths are not the same
                 * the comparison will fail at the first byte.
                 */

-#define        equal(a1, a2) \
+#define equal(a1, a2) \

   (bcmp((caddr_t)(a1), (caddr_t)(a2), a1->sa_len) == 0)
   (bcmp((caddr_t)(a1), (caddr_t)(a2), a1->sa_len) == 0)

-               if (rp->rcb_laddr && !equal(rp->rcb_laddr, dst))
+               if (rp->rcb_laddr && !equal(rp->rcb_laddr, dst)) {

                        continue;
                        continue;

-               if (rp->rcb_faddr && !equal(rp->rcb_faddr, src))
+               }
+               if (rp->rcb_faddr && !equal(rp->rcb_faddr, src)) {

                        continue;
                        continue;

+               }

                if (last) {
                        struct mbuf *n;
                        n = m_copy(m, 0, (int)M_COPYALL);
                if (last) {
                        struct mbuf *n;
                        n = m_copy(m, 0, (int)M_COPYALL);


@@ -165,21 +172,20 @@ raw_input(m0, proto, src, dst)
                        sockets++;
                }
                socket_unlock(last, 1);
                        sockets++;
                }
                socket_unlock(last, 1);

-       } else
+       } else {

                m_freem(m);
                m_freem(m);

+       }

        lck_mtx_unlock(raw_mtx);
 }
 
 /*ARGSUSED*/
 void
        lck_mtx_unlock(raw_mtx);
 }
 
 /*ARGSUSED*/
 void

-raw_ctlinput(cmd, arg, dummy)
-       int cmd;
-       struct sockaddr *arg;
-       void *dummy;
+raw_ctlinput(int cmd, __unused struct sockaddr *arg, __unused void *dummy,
+    __unused struct ifnet *ifp)

 {
 {

-
-       if (cmd < 0 || cmd > PRC_NCMDS)
+       if (cmd < 0 || cmd >= PRC_NCMDS) {

                return;
                return;

+       }

        /* INCOMPLETE */
 }
 
        /* INCOMPLETE */
 }
 


@@ -189,14 +195,16 @@ raw_uabort(struct socket *so)
        struct rawcb *rp = sotorawcb(so);
 
        lck_mtx_t * mutex_held;
        struct rawcb *rp = sotorawcb(so);
 
        lck_mtx_t * mutex_held;

-       if (so->so_proto->pr_getlock != NULL)
+       if (so->so_proto->pr_getlock != NULL) {

                mutex_held = (*so->so_proto->pr_getlock)(so, 0);
                mutex_held = (*so->so_proto->pr_getlock)(so, 0);

-       else
+       } else {

                mutex_held = so->so_proto->pr_domain->dom_mtx;
                mutex_held = so->so_proto->pr_domain->dom_mtx;

-       lck_mtx_assert(mutex_held, LCK_MTX_ASSERT_OWNED);
+       }
+       LCK_MTX_ASSERT(mutex_held, LCK_MTX_ASSERT_OWNED);

 
 

-       if (rp == 0)
+       if (rp == 0) {

                return EINVAL;
                return EINVAL;

+       }

        raw_disconnect(rp);
        sofree(so);
        soisdisconnected(so);
        raw_disconnect(rp);
        sofree(so);
        soisdisconnected(so);


@@ -206,33 +214,27 @@ raw_uabort(struct socket *so)
 /* pru_accept is EOPNOTSUPP */
 
 static int
 /* pru_accept is EOPNOTSUPP */
 
 static int

-raw_uattach(struct socket *so, int proto, struct proc *p)
+raw_uattach(struct socket *so, int proto, __unused struct proc *p)

 {
        struct rawcb *rp = sotorawcb(so);
 {
        struct rawcb *rp = sotorawcb(so);

-#ifndef __APPLE__
-       int error;
-#endif

 
 

-       if (rp == 0)
+       if (rp == 0) {

                return EINVAL;
                return EINVAL;

-#ifdef __APPLE__
-               if ((so->so_state & SS_PRIV) == 0)
-                       return (EPERM);
-#else
-       if (p && (error = suser(p)) != 0)
-               return error;
-#endif
+       }
+       if ((so->so_state & SS_PRIV) == 0) {
+               return EPERM;
+       }

        return raw_attach(so, proto);
 }
 
 static int
        return raw_attach(so, proto);
 }
 
 static int

-raw_ubind(struct socket *so, struct sockaddr *nam, struct proc *p)
+raw_ubind(__unused struct socket *so, __unused struct sockaddr *nam, __unused struct proc *p)

 {
        return EINVAL;
 }
 
 static int
 {
        return EINVAL;
 }
 
 static int

-raw_uconnect(struct socket *so, struct sockaddr *nam, struct proc *p)
+raw_uconnect(__unused struct socket *so, __unused struct sockaddr *nam, __unused struct proc *p)

 {
        return EINVAL;
 }
 {
        return EINVAL;
 }


@@ -246,13 +248,15 @@ raw_udetach(struct socket *so)
        struct rawcb *rp = sotorawcb(so);
 
        lck_mtx_t * mutex_held;
        struct rawcb *rp = sotorawcb(so);
 
        lck_mtx_t * mutex_held;

-       if (so->so_proto->pr_getlock != NULL)
+       if (so->so_proto->pr_getlock != NULL) {

                mutex_held = (*so->so_proto->pr_getlock)(so, 0);
                mutex_held = (*so->so_proto->pr_getlock)(so, 0);

-       else
+       } else {

                mutex_held = so->so_proto->pr_domain->dom_mtx;
                mutex_held = so->so_proto->pr_domain->dom_mtx;

-       lck_mtx_assert(mutex_held, LCK_MTX_ASSERT_OWNED);
-       if (rp == 0)
+       }
+       LCK_MTX_ASSERT(mutex_held, LCK_MTX_ASSERT_OWNED);
+       if (rp == 0) {

                return EINVAL;
                return EINVAL;

+       }

 
        raw_detach(rp);
        return 0;
 
        raw_detach(rp);
        return 0;


@@ -263,8 +267,9 @@ raw_udisconnect(struct socket *so)
 {
        struct rawcb *rp = sotorawcb(so);
 
 {
        struct rawcb *rp = sotorawcb(so);
 

-       if (rp == 0)
+       if (rp == 0) {

                return EINVAL;
                return EINVAL;

+       }

        if (rp->rcb_faddr == 0) {
                return ENOTCONN;
        }
        if (rp->rcb_faddr == 0) {
                return ENOTCONN;
        }


@@ -280,8 +285,9 @@ raw_upeeraddr(struct socket *so, struct sockaddr **nam)
 {
        struct rawcb *rp = sotorawcb(so);
 
 {
        struct rawcb *rp = sotorawcb(so);
 

-       if (rp == 0)
+       if (rp == 0) {

                return EINVAL;
                return EINVAL;

+       }

        if (rp->rcb_faddr == 0) {
                return ENOTCONN;
        }
        if (rp->rcb_faddr == 0) {
                return ENOTCONN;
        }


@@ -294,17 +300,18 @@ raw_upeeraddr(struct socket *so, struct sockaddr **nam)
 
 static int
 raw_usend(struct socket *so, int flags, struct mbuf *m,
 
 static int
 raw_usend(struct socket *so, int flags, struct mbuf *m,

-         struct sockaddr *nam, struct mbuf *control, struct proc *p)
+    struct sockaddr *nam, struct mbuf *control, __unused struct proc *p)

 {
        int error;
        struct rawcb *rp = sotorawcb(so);
 
        lck_mtx_t * mutex_held;
 {
        int error;
        struct rawcb *rp = sotorawcb(so);
 
        lck_mtx_t * mutex_held;

-       if (so->so_proto->pr_getlock != NULL)
+       if (so->so_proto->pr_getlock != NULL) {

                mutex_held = (*so->so_proto->pr_getlock)(so, 0);
                mutex_held = (*so->so_proto->pr_getlock)(so, 0);

-       else
+       } else {

                mutex_held = so->so_proto->pr_domain->dom_mtx;
                mutex_held = so->so_proto->pr_domain->dom_mtx;

-       lck_mtx_assert(mutex_held, LCK_MTX_ASSERT_OWNED);
+       }
+       LCK_MTX_ASSERT(mutex_held, LCK_MTX_ASSERT_OWNED);

 
        if (rp == 0) {
                error = EINVAL;
 
        if (rp == 0) {
                error = EINVAL;


@@ -316,6 +323,11 @@ raw_usend(struct socket *so, int flags, struct mbuf *m,
                goto release;
        }
 
                goto release;
        }
 

+       if (so->so_proto->pr_output == NULL) {
+               error = EOPNOTSUPP;
+               goto release;
+       }
+

        if (control && control->m_len) {
                error = EOPNOTSUPP;
                goto release;
        if (control && control->m_len) {
                error = EOPNOTSUPP;
                goto release;


@@ -332,12 +344,14 @@ raw_usend(struct socket *so, int flags, struct mbuf *m,
        }
        error = (*so->so_proto->pr_output)(m, so);
        m = NULL;
        }
        error = (*so->so_proto->pr_output)(m, so);
        m = NULL;

-       if (nam)
-               rp->rcb_faddr = 0;
+       if (nam) {
+               rp->rcb_faddr = NULL;
+       }

 release:
 release:

-       if (m != NULL)
+       if (m != NULL) {

                m_freem(m);
                m_freem(m);

-       return (error);
+       }
+       return error;

 }
 
 /* pru_sense is null */
 }
 
 /* pru_sense is null */


@@ -347,14 +361,16 @@ raw_ushutdown(struct socket *so)
 {
        struct rawcb *rp = sotorawcb(so);
        lck_mtx_t * mutex_held;
 {
        struct rawcb *rp = sotorawcb(so);
        lck_mtx_t * mutex_held;

-       if (so->so_proto->pr_getlock != NULL)
+       if (so->so_proto->pr_getlock != NULL) {

                mutex_held = (*so->so_proto->pr_getlock)(so, 0);
                mutex_held = (*so->so_proto->pr_getlock)(so, 0);

-       else
+       } else {

                mutex_held = so->so_proto->pr_domain->dom_mtx;
                mutex_held = so->so_proto->pr_domain->dom_mtx;

-       lck_mtx_assert(mutex_held, LCK_MTX_ASSERT_OWNED);
+       }
+       LCK_MTX_ASSERT(mutex_held, LCK_MTX_ASSERT_OWNED);

 
 

-       if (rp == 0)
+       if (rp == 0) {

                return EINVAL;
                return EINVAL;

+       }

        socantsendmore(so);
        return 0;
 }
        socantsendmore(so);
        return 0;
 }


@@ -364,18 +380,27 @@ raw_usockaddr(struct socket *so, struct sockaddr **nam)
 {
        struct rawcb *rp = sotorawcb(so);
 
 {
        struct rawcb *rp = sotorawcb(so);
 

-       if (rp == 0)
+       if (rp == 0) {

                return EINVAL;
                return EINVAL;

-       if (rp->rcb_laddr == 0)
+       }
+       if (rp->rcb_laddr == 0) {

                return EINVAL;
                return EINVAL;

+       }

        *nam = dup_sockaddr(rp->rcb_laddr, 1);
        return 0;
 }
 
 struct pr_usrreqs raw_usrreqs = {
        *nam = dup_sockaddr(rp->rcb_laddr, 1);
        return 0;
 }
 
 struct pr_usrreqs raw_usrreqs = {

-       raw_uabort, pru_accept_notsupp, raw_uattach, raw_ubind, raw_uconnect,
-       pru_connect2_notsupp, pru_control_notsupp, raw_udetach, 
-       raw_udisconnect, pru_listen_notsupp, raw_upeeraddr, pru_rcvd_notsupp,
-       pru_rcvoob_notsupp, raw_usend, pru_sense_null, raw_ushutdown,
-       raw_usockaddr, sosend, soreceive, pru_sopoll_notsupp
+       .pru_abort =            raw_uabort,
+       .pru_attach =           raw_uattach,
+       .pru_bind =             raw_ubind,
+       .pru_connect =          raw_uconnect,
+       .pru_detach =           raw_udetach,
+       .pru_disconnect =       raw_udisconnect,
+       .pru_peeraddr =         raw_upeeraddr,
+       .pru_send =             raw_usend,
+       .pru_shutdown =         raw_ushutdown,
+       .pru_sockaddr =         raw_usockaddr,
+       .pru_sosend =           sosend,
+       .pru_soreceive =        soreceive,

 };
 };