version 1.21.4.1, 1996/12/06 02:29:04 |
version 1.38, 1998/08/04 04:03:17 |
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
* SUCH DAMAGE. |
* SUCH DAMAGE. |
* |
* |
* @(#)uipc_socket.c 8.3 (Berkeley) 4/15/94 |
* @(#)uipc_socket.c 8.6 (Berkeley) 5/2/95 |
*/ |
*/ |
|
|
|
#include "opt_compat_sunos.h" |
|
|
#include <sys/param.h> |
#include <sys/param.h> |
#include <sys/systm.h> |
#include <sys/systm.h> |
#include <sys/proc.h> |
#include <sys/proc.h> |
|
|
#include <sys/socketvar.h> |
#include <sys/socketvar.h> |
#include <sys/signalvar.h> |
#include <sys/signalvar.h> |
#include <sys/resourcevar.h> |
#include <sys/resourcevar.h> |
|
#include <sys/pool.h> |
|
|
|
struct pool socket_pool; |
|
|
|
void |
|
soinit() |
|
{ |
|
|
|
pool_init(&socket_pool, sizeof(struct socket), 0, 0, 0, |
|
"sockpl", 0, NULL, NULL, M_SOCKET); |
|
} |
|
|
/* |
/* |
* Socket operation routines. |
* Socket operation routines. |
Line 77 socreate(dom, aso, type, proto) |
|
Line 90 socreate(dom, aso, type, proto) |
|
return (EPROTONOSUPPORT); |
return (EPROTONOSUPPORT); |
if (prp->pr_type != type) |
if (prp->pr_type != type) |
return (EPROTOTYPE); |
return (EPROTOTYPE); |
MALLOC(so, struct socket *, sizeof(*so), M_SOCKET, M_WAIT); |
so = pool_get(&socket_pool, PR_WAITOK); |
bzero((caddr_t)so, sizeof(*so)); |
memset((caddr_t)so, 0, sizeof(*so)); |
|
TAILQ_INIT(&so->so_q0); |
|
TAILQ_INIT(&so->so_q); |
so->so_type = type; |
so->so_type = type; |
if (p->p_ucred->cr_uid == 0) |
|
so->so_state = SS_PRIV; |
|
so->so_proto = prp; |
so->so_proto = prp; |
error = |
so->so_send = sosend; |
(*prp->pr_usrreq)(so, PRU_ATTACH, NULL, (struct mbuf *)(long)proto, |
so->so_receive = soreceive; |
NULL); |
error = (*prp->pr_usrreq)(so, PRU_ATTACH, (struct mbuf *)0, |
|
(struct mbuf *)(long)proto, (struct mbuf *)0, p); |
if (error) { |
if (error) { |
so->so_state |= SS_NOFDREF; |
so->so_state |= SS_NOFDREF; |
sofree(so); |
sofree(so); |
|
|
struct socket *so; |
struct socket *so; |
struct mbuf *nam; |
struct mbuf *nam; |
{ |
{ |
|
struct proc *p = curproc; /* XXX */ |
int s = splsoftnet(); |
int s = splsoftnet(); |
int error; |
int error; |
|
|
error = (*so->so_proto->pr_usrreq)(so, PRU_BIND, NULL, nam, NULL); |
error = (*so->so_proto->pr_usrreq)(so, PRU_BIND, (struct mbuf *)0, |
|
nam, (struct mbuf *)0, p); |
splx(s); |
splx(s); |
return (error); |
return (error); |
} |
} |
Line 122 solisten(so, backlog) |
|
Line 138 solisten(so, backlog) |
|
{ |
{ |
int s = splsoftnet(), error; |
int s = splsoftnet(), error; |
|
|
error = (*so->so_proto->pr_usrreq)(so, PRU_LISTEN, NULL, NULL, NULL); |
error = (*so->so_proto->pr_usrreq)(so, PRU_LISTEN, (struct mbuf *)0, |
|
(struct mbuf *)0, (struct mbuf *)0, (struct proc *)0); |
if (error) { |
if (error) { |
splx(s); |
splx(s); |
return (error); |
return (error); |
} |
} |
if (so->so_q == 0) |
if (so->so_q.tqh_first == NULL) |
so->so_options |= SO_ACCEPTCONN; |
so->so_options |= SO_ACCEPTCONN; |
if (backlog < 0) |
if (backlog < 0) |
backlog = 0; |
backlog = 0; |
|
|
} |
} |
sbrelease(&so->so_snd); |
sbrelease(&so->so_snd); |
sorflush(so); |
sorflush(so); |
FREE(so, M_SOCKET); |
pool_put(&socket_pool, so); |
} |
} |
|
|
/* |
/* |
|
|
int error = 0; |
int error = 0; |
|
|
if (so->so_options & SO_ACCEPTCONN) { |
if (so->so_options & SO_ACCEPTCONN) { |
while (so->so_q0) |
while (so->so_q0.tqh_first) |
(void) soabort(so->so_q0); |
(void) soabort(so->so_q0.tqh_first); |
while (so->so_q) |
while (so->so_q.tqh_first) |
(void) soabort(so->so_q); |
(void) soabort(so->so_q.tqh_first); |
} |
} |
if (so->so_pcb == 0) |
if (so->so_pcb == 0) |
goto discard; |
goto discard; |
|
|
while (so->so_state & SS_ISCONNECTED) { |
while (so->so_state & SS_ISCONNECTED) { |
error = tsleep((caddr_t)&so->so_timeo, |
error = tsleep((caddr_t)&so->so_timeo, |
PSOCK | PCATCH, netcls, |
PSOCK | PCATCH, netcls, |
so->so_linger); |
so->so_linger * hz); |
if (error) |
if (error) |
break; |
break; |
} |
} |
|
|
} |
} |
drop: |
drop: |
if (so->so_pcb) { |
if (so->so_pcb) { |
int error2 = (*so->so_proto->pr_usrreq)(so, PRU_DETACH, NULL, |
int error2 = (*so->so_proto->pr_usrreq)(so, PRU_DETACH, |
NULL, NULL); |
(struct mbuf *)0, (struct mbuf *)0, (struct mbuf *)0, |
|
(struct proc *)0); |
if (error == 0) |
if (error == 0) |
error = error2; |
error = error2; |
} |
} |
|
|
struct socket *so; |
struct socket *so; |
{ |
{ |
|
|
return (*so->so_proto->pr_usrreq)(so, PRU_ABORT, NULL, NULL, NULL); |
return (*so->so_proto->pr_usrreq)(so, PRU_ABORT, (struct mbuf *)0, |
|
(struct mbuf *)0, (struct mbuf *)0, (struct proc *)0); |
} |
} |
|
|
int |
int |
Line 230 soaccept(so, nam) |
|
Line 249 soaccept(so, nam) |
|
if ((so->so_state & SS_NOFDREF) == 0) |
if ((so->so_state & SS_NOFDREF) == 0) |
panic("soaccept: !NOFDREF"); |
panic("soaccept: !NOFDREF"); |
so->so_state &= ~SS_NOFDREF; |
so->so_state &= ~SS_NOFDREF; |
error = (*so->so_proto->pr_usrreq)(so, PRU_ACCEPT, NULL, nam, NULL); |
error = (*so->so_proto->pr_usrreq)(so, PRU_ACCEPT, (struct mbuf *)0, |
|
nam, (struct mbuf *)0, (struct proc *)0); |
splx(s); |
splx(s); |
return (error); |
return (error); |
} |
} |
Line 240 soconnect(so, nam) |
|
Line 260 soconnect(so, nam) |
|
register struct socket *so; |
register struct socket *so; |
struct mbuf *nam; |
struct mbuf *nam; |
{ |
{ |
|
struct proc *p = curproc; /* XXX */ |
int s; |
int s; |
int error; |
int error; |
|
|
Line 258 soconnect(so, nam) |
|
Line 279 soconnect(so, nam) |
|
error = EISCONN; |
error = EISCONN; |
else |
else |
error = (*so->so_proto->pr_usrreq)(so, PRU_CONNECT, |
error = (*so->so_proto->pr_usrreq)(so, PRU_CONNECT, |
NULL, nam, NULL); |
(struct mbuf *)0, nam, (struct mbuf *)0, p); |
splx(s); |
splx(s); |
return (error); |
return (error); |
} |
} |
Line 271 soconnect2(so1, so2) |
|
Line 292 soconnect2(so1, so2) |
|
int s = splsoftnet(); |
int s = splsoftnet(); |
int error; |
int error; |
|
|
error = (*so1->so_proto->pr_usrreq)(so1, PRU_CONNECT2, NULL, |
error = (*so1->so_proto->pr_usrreq)(so1, PRU_CONNECT2, |
(struct mbuf *)so2, NULL); |
(struct mbuf *)0, (struct mbuf *)so2, (struct mbuf *)0, |
|
(struct proc *)0); |
splx(s); |
splx(s); |
return (error); |
return (error); |
} |
} |
Line 292 sodisconnect(so) |
|
Line 314 sodisconnect(so) |
|
error = EALREADY; |
error = EALREADY; |
goto bad; |
goto bad; |
} |
} |
error = (*so->so_proto->pr_usrreq)(so, PRU_DISCONNECT, NULL, NULL, |
error = (*so->so_proto->pr_usrreq)(so, PRU_DISCONNECT, |
NULL); |
(struct mbuf *)0, (struct mbuf *)0, (struct mbuf *)0, |
|
(struct proc *)0); |
bad: |
bad: |
splx(s); |
splx(s); |
return (error); |
return (error); |
Line 344 sosend(so, addr, uio, top, control, flag |
|
Line 367 sosend(so, addr, uio, top, control, flag |
|
* of space and resid. On the other hand, a negative resid |
* of space and resid. On the other hand, a negative resid |
* causes us to loop sending 0-length segments to the protocol. |
* causes us to loop sending 0-length segments to the protocol. |
*/ |
*/ |
if (resid < 0) |
if (resid < 0) { |
return (EINVAL); |
error = EINVAL; |
|
goto out; |
|
} |
dontroute = |
dontroute = |
(flags & MSG_DONTROUTE) && (so->so_options & SO_DONTROUTE) == 0 && |
(flags & MSG_DONTROUTE) && (so->so_options & SO_DONTROUTE) == 0 && |
(so->so_proto->pr_flags & PR_ATOMIC); |
(so->so_proto->pr_flags & PR_ATOMIC); |
|
|
if (dontroute) |
if (dontroute) |
so->so_options |= SO_DONTROUTE; |
so->so_options |= SO_DONTROUTE; |
s = splsoftnet(); /* XXX */ |
s = splsoftnet(); /* XXX */ |
error = (*so->so_proto->pr_usrreq)(so, (flags & MSG_OOB) ? |
error = (*so->so_proto->pr_usrreq)(so, |
PRU_SENDOOB : PRU_SEND, |
(flags & MSG_OOB) ? PRU_SENDOOB : PRU_SEND, |
top, addr, control); |
top, addr, control, p); |
splx(s); |
splx(s); |
if (dontroute) |
if (dontroute) |
so->so_options &= ~SO_DONTROUTE; |
so->so_options &= ~SO_DONTROUTE; |
Line 521 soreceive(so, paddr, uio, mp0, controlp, |
|
Line 546 soreceive(so, paddr, uio, mp0, controlp, |
|
if (flags & MSG_OOB) { |
if (flags & MSG_OOB) { |
m = m_get(M_WAIT, MT_DATA); |
m = m_get(M_WAIT, MT_DATA); |
error = (*pr->pr_usrreq)(so, PRU_RCVOOB, m, |
error = (*pr->pr_usrreq)(so, PRU_RCVOOB, m, |
(struct mbuf *)(long)(flags & MSG_PEEK), |
(struct mbuf *)(long)(flags & MSG_PEEK), (struct mbuf *)0, |
NULL); |
(struct proc *)0); |
if (error) |
if (error) |
goto bad; |
goto bad; |
do { |
do { |
|
|
if (mp) |
if (mp) |
*mp = (struct mbuf *)0; |
*mp = (struct mbuf *)0; |
if (so->so_state & SS_ISCONFIRMING && uio->uio_resid) |
if (so->so_state & SS_ISCONFIRMING && uio->uio_resid) |
(*pr->pr_usrreq)(so, PRU_RCVD, NULL, NULL, NULL); |
(*pr->pr_usrreq)(so, PRU_RCVD, (struct mbuf *)0, |
|
(struct mbuf *)0, (struct mbuf *)0, (struct proc *)0); |
|
|
restart: |
restart: |
if ((error = sblock(&so->so_rcv, SBLOCKWAIT(flags))) != 0) |
if ((error = sblock(&so->so_rcv, SBLOCKWAIT(flags))) != 0) |
|
|
if (m == 0) |
if (m == 0) |
so->so_rcv.sb_mb = nextrecord; |
so->so_rcv.sb_mb = nextrecord; |
if (pr->pr_flags & PR_WANTRCVD && so->so_pcb) |
if (pr->pr_flags & PR_WANTRCVD && so->so_pcb) |
(*pr->pr_usrreq)(so, PRU_RCVD, NULL, |
(*pr->pr_usrreq)(so, PRU_RCVD, (struct mbuf *)0, |
(struct mbuf *)(long)flags, NULL); |
(struct mbuf *)(long)flags, (struct mbuf *)0, |
|
(struct proc *)0); |
} |
} |
if (orig_resid == uio->uio_resid && orig_resid && |
if (orig_resid == uio->uio_resid && orig_resid && |
(flags & MSG_EOR) == 0 && (so->so_state & SS_CANTRCVMORE) == 0) { |
(flags & MSG_EOR) == 0 && (so->so_state & SS_CANTRCVMORE) == 0) { |
|
|
|
|
int |
int |
soshutdown(so, how) |
soshutdown(so, how) |
register struct socket *so; |
struct socket *so; |
register int how; |
int how; |
{ |
{ |
register struct protosw *pr = so->so_proto; |
struct protosw *pr = so->so_proto; |
|
|
|
if (!(how == SHUT_RD || how == SHUT_WR || how == SHUT_RDWR)) |
|
return (EINVAL); |
|
|
how++; |
if (how == SHUT_RD || how == SHUT_RDWR) |
if (how & FREAD) |
|
sorflush(so); |
sorflush(so); |
if (how & FWRITE) |
if (how == SHUT_WR || how == SHUT_RDWR) |
return (*pr->pr_usrreq)(so, PRU_SHUTDOWN, NULL, NULL, NULL); |
return (*pr->pr_usrreq)(so, PRU_SHUTDOWN, (struct mbuf *)0, |
|
(struct mbuf *)0, (struct mbuf *)0, (struct proc *)0); |
return (0); |
return (0); |
} |
} |
|
|
|
|
socantrcvmore(so); |
socantrcvmore(so); |
sbunlock(sb); |
sbunlock(sb); |
asb = *sb; |
asb = *sb; |
bzero((caddr_t)sb, sizeof (*sb)); |
memset((caddr_t)sb, 0, sizeof(*sb)); |
splx(s); |
splx(s); |
if (pr->pr_flags & PR_RIGHTS && pr->pr_domain->dom_dispose) |
if (pr->pr_flags & PR_RIGHTS && pr->pr_domain->dom_dispose) |
(*pr->pr_domain->dom_dispose)(asb.sb_mb); |
(*pr->pr_domain->dom_dispose)(asb.sb_mb); |
Line 848 sosetopt(so, level, optname, m0) |
|
Line 878 sosetopt(so, level, optname, m0) |
|
switch (optname) { |
switch (optname) { |
|
|
case SO_LINGER: |
case SO_LINGER: |
if (m == NULL || m->m_len != sizeof (struct linger)) { |
if (m == NULL || m->m_len != sizeof(struct linger)) { |
error = EINVAL; |
error = EINVAL; |
goto bad; |
goto bad; |
} |
} |
Line 863 sosetopt(so, level, optname, m0) |
|
Line 893 sosetopt(so, level, optname, m0) |
|
case SO_REUSEADDR: |
case SO_REUSEADDR: |
case SO_REUSEPORT: |
case SO_REUSEPORT: |
case SO_OOBINLINE: |
case SO_OOBINLINE: |
if (m == NULL || m->m_len < sizeof (int)) { |
case SO_TIMESTAMP: |
|
if (m == NULL || m->m_len < sizeof(int)) { |
error = EINVAL; |
error = EINVAL; |
goto bad; |
goto bad; |
} |
} |
Line 877 sosetopt(so, level, optname, m0) |
|
Line 908 sosetopt(so, level, optname, m0) |
|
case SO_RCVBUF: |
case SO_RCVBUF: |
case SO_SNDLOWAT: |
case SO_SNDLOWAT: |
case SO_RCVLOWAT: |
case SO_RCVLOWAT: |
if (m == NULL || m->m_len < sizeof (int)) { |
{ |
|
int optval; |
|
|
|
if (m == NULL || m->m_len < sizeof(int)) { |
error = EINVAL; |
error = EINVAL; |
goto bad; |
goto bad; |
} |
} |
|
|
|
/* |
|
* Values < 1 make no sense for any of these |
|
* options, so disallow them. |
|
*/ |
|
optval = *mtod(m, int *); |
|
if (optval < 1) { |
|
error = EINVAL; |
|
goto bad; |
|
} |
|
|
switch (optname) { |
switch (optname) { |
|
|
case SO_SNDBUF: |
case SO_SNDBUF: |
case SO_RCVBUF: |
case SO_RCVBUF: |
if (sbreserve(optname == SO_SNDBUF ? |
if (sbreserve(optname == SO_SNDBUF ? |
&so->so_snd : &so->so_rcv, |
&so->so_snd : &so->so_rcv, |
(u_long) *mtod(m, int *)) == 0) { |
(u_long) optval) == 0) { |
error = ENOBUFS; |
error = ENOBUFS; |
goto bad; |
goto bad; |
} |
} |
break; |
break; |
|
|
|
/* |
|
* Make sure the low-water is never greater than |
|
* the high-water. |
|
*/ |
case SO_SNDLOWAT: |
case SO_SNDLOWAT: |
so->so_snd.sb_lowat = *mtod(m, int *); |
so->so_snd.sb_lowat = |
|
(optval > so->so_snd.sb_hiwat) ? |
|
so->so_snd.sb_hiwat : optval; |
break; |
break; |
case SO_RCVLOWAT: |
case SO_RCVLOWAT: |
so->so_rcv.sb_lowat = *mtod(m, int *); |
so->so_rcv.sb_lowat = |
|
(optval > so->so_rcv.sb_hiwat) ? |
|
so->so_rcv.sb_hiwat : optval; |
break; |
break; |
} |
} |
break; |
break; |
|
} |
|
|
case SO_SNDTIMEO: |
case SO_SNDTIMEO: |
case SO_RCVTIMEO: |
case SO_RCVTIMEO: |
Line 908 sosetopt(so, level, optname, m0) |
|
Line 962 sosetopt(so, level, optname, m0) |
|
struct timeval *tv; |
struct timeval *tv; |
short val; |
short val; |
|
|
if (m == NULL || m->m_len < sizeof (*tv)) { |
if (m == NULL || m->m_len < sizeof(*tv)) { |
error = EINVAL; |
error = EINVAL; |
goto bad; |
goto bad; |
} |
} |
Line 963 sogetopt(so, level, optname, mp) |
|
Line 1017 sogetopt(so, level, optname, mp) |
|
return (ENOPROTOOPT); |
return (ENOPROTOOPT); |
} else { |
} else { |
m = m_get(M_WAIT, MT_SOOPTS); |
m = m_get(M_WAIT, MT_SOOPTS); |
m->m_len = sizeof (int); |
m->m_len = sizeof(int); |
|
|
switch (optname) { |
switch (optname) { |
|
|
case SO_LINGER: |
case SO_LINGER: |
m->m_len = sizeof (struct linger); |
m->m_len = sizeof(struct linger); |
mtod(m, struct linger *)->l_onoff = |
mtod(m, struct linger *)->l_onoff = |
so->so_options & SO_LINGER; |
so->so_options & SO_LINGER; |
mtod(m, struct linger *)->l_linger = so->so_linger; |
mtod(m, struct linger *)->l_linger = so->so_linger; |
Line 982 sogetopt(so, level, optname, mp) |
|
Line 1036 sogetopt(so, level, optname, mp) |
|
case SO_REUSEPORT: |
case SO_REUSEPORT: |
case SO_BROADCAST: |
case SO_BROADCAST: |
case SO_OOBINLINE: |
case SO_OOBINLINE: |
|
case SO_TIMESTAMP: |
*mtod(m, int *) = so->so_options & optname; |
*mtod(m, int *) = so->so_options & optname; |
break; |
break; |
|
|
Line 1019 sogetopt(so, level, optname, mp) |
|
Line 1074 sogetopt(so, level, optname, mp) |
|
m->m_len = sizeof(struct timeval); |
m->m_len = sizeof(struct timeval); |
mtod(m, struct timeval *)->tv_sec = val / hz; |
mtod(m, struct timeval *)->tv_sec = val / hz; |
mtod(m, struct timeval *)->tv_usec = |
mtod(m, struct timeval *)->tv_usec = |
(val % hz) / tick; |
(val % hz) * tick; |
break; |
break; |
} |
} |
|
|