version 1.1.1.3, 1998/03/01 02:13:08 |
version 1.50.4.5, 2002/09/18 16:04:53 |
|
|
|
/* $NetBSD$ */ |
|
|
/* |
/* |
* Copyright (c) 1982, 1986, 1988, 1990, 1993 |
* Copyright (c) 1982, 1986, 1988, 1990, 1993 |
* The Regents of the University of California. All rights reserved. |
* The Regents of the University of California. All rights reserved. |
|
|
* @(#)uipc_socket.c 8.6 (Berkeley) 5/2/95 |
* @(#)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/protosw.h> |
#include <sys/protosw.h> |
#include <sys/socket.h> |
#include <sys/socket.h> |
#include <sys/socketvar.h> |
#include <sys/socketvar.h> |
|
#include <sys/signalvar.h> |
#include <sys/resourcevar.h> |
#include <sys/resourcevar.h> |
|
#include <sys/pool.h> |
|
|
|
struct pool socket_pool; |
|
|
|
extern int somaxconn; /* patchable (XXX sysctl) */ |
|
int somaxconn = SOMAXCONN; |
|
|
|
void |
|
soinit() |
|
{ |
|
|
|
pool_init(&socket_pool, sizeof(struct socket), 0, 0, 0, |
|
"sockpl", 0, NULL, NULL, M_SOCKET); |
|
} |
|
|
/* |
/* |
* Socket operation routines. |
* Socket operation routines. |
|
|
socreate(dom, aso, type, proto) |
socreate(dom, aso, type, proto) |
int dom; |
int dom; |
struct socket **aso; |
struct socket **aso; |
register int type; |
int type; |
int proto; |
int proto; |
{ |
{ |
struct proc *p = curproc; /* XXX */ |
struct proc *p = curproc; /* XXX */ |
register struct protosw *prp; |
struct protosw *prp; |
register struct socket *so; |
struct socket *so; |
register int error; |
int error; |
|
int s; |
|
|
if (proto) |
if (proto) |
prp = pffindproto(dom, proto, type); |
prp = pffindproto(dom, proto, type); |
Line 74 socreate(dom, aso, type, proto) |
|
Line 94 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); |
s = splsoftnet(); |
bzero((caddr_t)so, sizeof(*so)); |
so = pool_get(&socket_pool, PR_WAITOK); |
|
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; |
|
so->so_send = sosend; |
|
so->so_receive = soreceive; |
|
if (p != 0) |
|
so->so_uid = p->p_ucred->cr_uid; |
error = (*prp->pr_usrreq)(so, PRU_ATTACH, (struct mbuf *)0, |
error = (*prp->pr_usrreq)(so, PRU_ATTACH, (struct mbuf *)0, |
(struct mbuf *)(long)proto, (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); |
|
splx(s); |
return (error); |
return (error); |
} |
} |
|
#ifdef COMPAT_SUNOS |
|
{ |
|
extern struct emul emul_sunos; |
|
if (p->p_emul == &emul_sunos && type == SOCK_DGRAM) |
|
so->so_options |= SO_BROADCAST; |
|
} |
|
#endif |
|
splx(s); |
*aso = so; |
*aso = so; |
return (0); |
return (0); |
} |
} |
|
|
int |
int |
sobind(so, nam) |
sobind(so, nam, p) |
struct socket *so; |
struct socket *so; |
struct mbuf *nam; |
struct mbuf *nam; |
|
struct proc *p; |
{ |
{ |
int s = splnet(); |
int s = splsoftnet(); |
int error; |
int error; |
|
|
error = |
error = (*so->so_proto->pr_usrreq)(so, PRU_BIND, (struct mbuf *)0, |
(*so->so_proto->pr_usrreq)(so, PRU_BIND, |
nam, (struct mbuf *)0, p); |
(struct mbuf *)0, nam, (struct mbuf *)0); |
|
splx(s); |
splx(s); |
return (error); |
return (error); |
} |
} |
|
|
int |
int |
solisten(so, backlog) |
solisten(so, backlog) |
register struct socket *so; |
struct socket *so; |
int backlog; |
int backlog; |
{ |
{ |
int s = splnet(), error; |
int s = splsoftnet(), error; |
|
|
error = |
error = (*so->so_proto->pr_usrreq)(so, PRU_LISTEN, (struct mbuf *)0, |
(*so->so_proto->pr_usrreq)(so, PRU_LISTEN, |
(struct mbuf *)0, (struct mbuf *)0, (struct proc *)0); |
(struct mbuf *)0, (struct mbuf *)0, (struct mbuf *)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; |
so->so_qlimit = min(backlog, SOMAXCONN); |
so->so_qlimit = min(backlog, somaxconn); |
splx(s); |
splx(s); |
return (0); |
return (0); |
} |
} |
|
|
int |
void |
sofree(so) |
sofree(so) |
register struct socket *so; |
struct socket *so; |
{ |
{ |
|
|
if (so->so_pcb || (so->so_state & SS_NOFDREF) == 0) |
if (so->so_pcb || (so->so_state & SS_NOFDREF) == 0) |
return; |
return; |
if (so->so_head) { |
if (so->so_head) { |
if (!soqremque(so, 0) && !soqremque(so, 1)) |
/* |
panic("sofree dq"); |
* We must not decommission a socket that's on the accept(2) |
so->so_head = 0; |
* queue. If we do, then accept(2) may hang after select(2) |
|
* indicated that the listening socket was ready. |
|
*/ |
|
if (!soqremque(so, 0)) |
|
return; |
} |
} |
sbrelease(&so->so_snd); |
sbrelease(&so->so_snd); |
sorflush(so); |
sorflush(so); |
FREE(so, M_SOCKET); |
pool_put(&socket_pool, so); |
} |
} |
|
|
/* |
/* |
|
|
*/ |
*/ |
int |
int |
soclose(so) |
soclose(so) |
register struct socket *so; |
struct socket *so; |
{ |
{ |
int s = splnet(); /* conservative */ |
struct socket *so2; |
|
int s = splsoftnet(); /* conservative */ |
int error = 0; |
int error = 0; |
|
|
if (so->so_options & SO_ACCEPTCONN) { |
if (so->so_options & SO_ACCEPTCONN) { |
while (so->so_q0) |
while ((so2 = so->so_q0.tqh_first) != 0) { |
(void) soabort(so->so_q0); |
(void) soqremque(so2, 0); |
while (so->so_q) |
(void) soabort(so2); |
(void) soabort(so->so_q); |
} |
|
while ((so2 = so->so_q.tqh_first) != 0) { |
|
(void) soqremque(so2, 1); |
|
(void) soabort(so2); |
|
} |
} |
} |
if (so->so_pcb == 0) |
if (so->so_pcb == 0) |
goto discard; |
goto discard; |
|
|
if ((so->so_state & SS_ISDISCONNECTING) && |
if ((so->so_state & SS_ISDISCONNECTING) && |
(so->so_state & SS_NBIO)) |
(so->so_state & SS_NBIO)) |
goto drop; |
goto drop; |
while (so->so_state & SS_ISCONNECTED) |
while (so->so_state & SS_ISCONNECTED) { |
if (error = tsleep((caddr_t)&so->so_timeo, |
error = tsleep((caddr_t)&so->so_timeo, |
PSOCK | PCATCH, netcls, so->so_linger * hz)) |
PSOCK | PCATCH, netcls, |
|
so->so_linger * hz); |
|
if (error) |
break; |
break; |
|
} |
} |
} |
} |
} |
drop: |
drop: |
if (so->so_pcb) { |
if (so->so_pcb) { |
int error2 = |
int error2 = (*so->so_proto->pr_usrreq)(so, PRU_DETACH, |
(*so->so_proto->pr_usrreq)(so, PRU_DETACH, |
(struct mbuf *)0, (struct mbuf *)0, (struct mbuf *)0, |
(struct mbuf *)0, (struct mbuf *)0, (struct mbuf *)0); |
(struct proc *)0); |
if (error == 0) |
if (error == 0) |
error = error2; |
error = error2; |
} |
} |
|
|
} |
} |
|
|
/* |
/* |
* Must be called at splnet... |
* Must be called at splsoftnet... |
*/ |
*/ |
int |
int |
soabort(so) |
soabort(so) |
struct socket *so; |
struct socket *so; |
{ |
{ |
|
|
return ( |
return (*so->so_proto->pr_usrreq)(so, PRU_ABORT, (struct mbuf *)0, |
(*so->so_proto->pr_usrreq)(so, PRU_ABORT, |
(struct mbuf *)0, (struct mbuf *)0, (struct proc *)0); |
(struct mbuf *)0, (struct mbuf *)0, (struct mbuf *)0)); |
|
} |
} |
|
|
int |
int |
soaccept(so, nam) |
soaccept(so, nam) |
register struct socket *so; |
struct socket *so; |
struct mbuf *nam; |
struct mbuf *nam; |
{ |
{ |
int s = splnet(); |
int s = splsoftnet(); |
int error; |
int error = 0; |
|
|
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, |
if ((so->so_state & SS_ISDISCONNECTED) == 0) |
(struct mbuf *)0, nam, (struct mbuf *)0); |
error = (*so->so_proto->pr_usrreq)(so, PRU_ACCEPT, |
|
(struct mbuf *)0, nam, (struct mbuf *)0, (struct proc *)0); |
|
else |
|
error = ECONNABORTED; |
|
|
splx(s); |
splx(s); |
return (error); |
return (error); |
} |
} |
|
|
int |
int |
soconnect(so, nam) |
soconnect(so, nam) |
register struct socket *so; |
struct socket *so; |
struct mbuf *nam; |
struct mbuf *nam; |
{ |
{ |
|
struct proc *p = curproc; /* XXX */ |
int s; |
int s; |
int error; |
int error; |
|
|
if (so->so_options & SO_ACCEPTCONN) |
if (so->so_options & SO_ACCEPTCONN) |
return (EOPNOTSUPP); |
return (EOPNOTSUPP); |
s = splnet(); |
s = splsoftnet(); |
/* |
/* |
* If protocol is connection-based, can only connect once. |
* If protocol is connection-based, can only connect once. |
* Otherwise, if connected, try to disconnect first. |
* Otherwise, if connected, try to disconnect first. |
Line 252 soconnect(so, nam) |
|
Line 301 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, |
(struct mbuf *)0, nam, (struct mbuf *)0); |
(struct mbuf *)0, nam, (struct mbuf *)0, p); |
splx(s); |
splx(s); |
return (error); |
return (error); |
} |
} |
|
|
int |
int |
soconnect2(so1, so2) |
soconnect2(so1, so2) |
register struct socket *so1; |
struct socket *so1; |
struct socket *so2; |
struct socket *so2; |
{ |
{ |
int s = splnet(); |
int s = splsoftnet(); |
int error; |
int error; |
|
|
error = (*so1->so_proto->pr_usrreq)(so1, PRU_CONNECT2, |
error = (*so1->so_proto->pr_usrreq)(so1, PRU_CONNECT2, |
(struct mbuf *)0, (struct mbuf *)so2, (struct mbuf *)0); |
(struct mbuf *)0, (struct mbuf *)so2, (struct mbuf *)0, |
|
(struct proc *)0); |
splx(s); |
splx(s); |
return (error); |
return (error); |
} |
} |
|
|
int |
int |
sodisconnect(so) |
sodisconnect(so) |
register struct socket *so; |
struct socket *so; |
{ |
{ |
int s = splnet(); |
int s = splsoftnet(); |
int error; |
int error; |
|
|
if ((so->so_state & SS_ISCONNECTED) == 0) { |
if ((so->so_state & SS_ISCONNECTED) == 0) { |
Line 287 sodisconnect(so) |
|
Line 337 sodisconnect(so) |
|
goto bad; |
goto bad; |
} |
} |
error = (*so->so_proto->pr_usrreq)(so, PRU_DISCONNECT, |
error = (*so->so_proto->pr_usrreq)(so, PRU_DISCONNECT, |
(struct mbuf *)0, (struct mbuf *)0, (struct mbuf *)0); |
(struct mbuf *)0, (struct mbuf *)0, (struct mbuf *)0, |
|
(struct proc *)0); |
bad: |
bad: |
splx(s); |
splx(s); |
return (error); |
return (error); |
|
|
*/ |
*/ |
int |
int |
sosend(so, addr, uio, top, control, flags) |
sosend(so, addr, uio, top, control, flags) |
register struct socket *so; |
struct socket *so; |
struct mbuf *addr; |
struct mbuf *addr; |
struct uio *uio; |
struct uio *uio; |
struct mbuf *top; |
struct mbuf *top; |
Line 322 sosend(so, addr, uio, top, control, flag |
|
Line 373 sosend(so, addr, uio, top, control, flag |
|
{ |
{ |
struct proc *p = curproc; /* XXX */ |
struct proc *p = curproc; /* XXX */ |
struct mbuf **mp; |
struct mbuf **mp; |
register struct mbuf *m; |
struct mbuf *m; |
register long space, len, resid; |
long space, len, resid; |
int clen = 0, error, s, dontroute, mlen; |
int clen = 0, error, s, dontroute, mlen; |
int atomic = sosendallatonce(so) || top; |
int atomic = sosendallatonce(so) || top; |
|
|
Line 338 sosend(so, addr, uio, top, control, flag |
|
Line 389 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); |
Line 349 sosend(so, addr, uio, top, control, flag |
|
Line 402 sosend(so, addr, uio, top, control, flag |
|
#define snderr(errno) { error = errno; splx(s); goto release; } |
#define snderr(errno) { error = errno; splx(s); goto release; } |
|
|
restart: |
restart: |
if (error = sblock(&so->so_snd, SBLOCKWAIT(flags))) |
if ((error = sblock(&so->so_snd, SBLOCKWAIT(flags))) != 0) |
goto out; |
goto out; |
do { |
do { |
s = splnet(); |
s = splsoftnet(); |
if (so->so_state & SS_CANTSENDMORE) |
if (so->so_state & SS_CANTSENDMORE) |
snderr(EPIPE); |
snderr(EPIPE); |
if (so->so_error) |
if (so->so_error) { |
snderr(so->so_error); |
error = so->so_error; |
|
so->so_error = 0; |
|
splx(s); |
|
goto release; |
|
} |
if ((so->so_state & SS_ISCONNECTED) == 0) { |
if ((so->so_state & SS_ISCONNECTED) == 0) { |
if (so->so_proto->pr_flags & PR_CONNREQUIRED) { |
if (so->so_proto->pr_flags & PR_CONNREQUIRED) { |
if ((so->so_state & SS_ISCONFIRMING) == 0 && |
if ((so->so_state & SS_ISCONFIRMING) == 0 && |
|
|
space = sbspace(&so->so_snd); |
space = sbspace(&so->so_snd); |
if (flags & MSG_OOB) |
if (flags & MSG_OOB) |
space += 1024; |
space += 1024; |
if (atomic && resid > so->so_snd.sb_hiwat || |
if ((atomic && resid > so->so_snd.sb_hiwat) || |
clen > so->so_snd.sb_hiwat) |
clen > so->so_snd.sb_hiwat) |
snderr(EMSGSIZE); |
snderr(EMSGSIZE); |
if (space < resid + clen && uio && |
if (space < resid + clen && uio && |
|
|
mp = ⊤ |
mp = ⊤ |
space -= clen; |
space -= clen; |
do { |
do { |
if (uio == NULL) { |
if (uio == NULL) { |
/* |
/* |
* Data is prepackaged in "top". |
* Data is prepackaged in "top". |
*/ |
*/ |
resid = 0; |
resid = 0; |
if (flags & MSG_EOR) |
if (flags & MSG_EOR) |
top->m_flags |= M_EOR; |
top->m_flags |= M_EOR; |
} else do { |
} else do { |
if (top == 0) { |
if (top == 0) { |
MGETHDR(m, M_WAIT, MT_DATA); |
MGETHDR(m, M_WAIT, MT_DATA); |
mlen = MHLEN; |
mlen = MHLEN; |
m->m_pkthdr.len = 0; |
m->m_pkthdr.len = 0; |
m->m_pkthdr.rcvif = (struct ifnet *)0; |
m->m_pkthdr.rcvif = (struct ifnet *)0; |
} else { |
} else { |
MGET(m, M_WAIT, MT_DATA); |
MGET(m, M_WAIT, MT_DATA); |
mlen = MLEN; |
mlen = MLEN; |
} |
} |
if (resid >= MINCLSIZE && space >= MCLBYTES) { |
if (resid >= MINCLSIZE && space >= MCLBYTES) { |
MCLGET(m, M_WAIT); |
MCLGET(m, M_WAIT); |
if ((m->m_flags & M_EXT) == 0) |
if ((m->m_flags & M_EXT) == 0) |
goto nopages; |
goto nopages; |
mlen = MCLBYTES; |
mlen = MCLBYTES; |
#ifdef MAPPED_MBUFS |
#ifdef MAPPED_MBUFS |
len = min(MCLBYTES, resid); |
|
#else |
|
if (atomic && top == 0) { |
|
len = min(MCLBYTES - max_hdr, resid); |
|
m->m_data += max_hdr; |
|
} else |
|
len = min(MCLBYTES, resid); |
len = min(MCLBYTES, resid); |
|
#else |
|
if (atomic && top == 0) { |
|
len = min(MCLBYTES - max_hdr, resid); |
|
m->m_data += max_hdr; |
|
} else |
|
len = min(MCLBYTES, resid); |
#endif |
#endif |
space -= MCLBYTES; |
space -= len; |
} else { |
} else { |
nopages: |
nopages: |
len = min(min(mlen, resid), space); |
len = min(min(mlen, resid), space); |
space -= len; |
space -= len; |
/* |
/* |
* For datagram protocols, leave room |
* For datagram protocols, leave room |
* for protocol headers in first mbuf. |
* for protocol headers in first mbuf. |
*/ |
*/ |
if (atomic && top == 0 && len < mlen) |
if (atomic && top == 0 && len < mlen) |
MH_ALIGN(m, len); |
MH_ALIGN(m, len); |
} |
} |
error = uiomove(mtod(m, caddr_t), (int)len, uio); |
error = uiomove(mtod(m, caddr_t), (int)len, uio); |
resid = uio->uio_resid; |
resid = uio->uio_resid; |
m->m_len = len; |
m->m_len = len; |
*mp = m; |
*mp = m; |
top->m_pkthdr.len += len; |
top->m_pkthdr.len += len; |
|
if (error) |
|
goto release; |
|
mp = &m->m_next; |
|
if (resid <= 0) { |
|
if (flags & MSG_EOR) |
|
top->m_flags |= M_EOR; |
|
break; |
|
} |
|
} while (space > 0 && atomic); |
|
|
|
s = splsoftnet(); |
|
|
|
if (so->so_state & SS_CANTSENDMORE) |
|
snderr(EPIPE); |
|
|
|
if (dontroute) |
|
so->so_options |= SO_DONTROUTE; |
|
if (resid > 0) |
|
so->so_state |= SS_MORETOCOME; |
|
error = (*so->so_proto->pr_usrreq)(so, |
|
(flags & MSG_OOB) ? PRU_SENDOOB : PRU_SEND, |
|
top, addr, control, p); |
|
if (dontroute) |
|
so->so_options &= ~SO_DONTROUTE; |
|
if (resid > 0) |
|
so->so_state &= ~SS_MORETOCOME; |
|
splx(s); |
|
|
|
clen = 0; |
|
control = 0; |
|
top = 0; |
|
mp = ⊤ |
if (error) |
if (error) |
goto release; |
goto release; |
mp = &m->m_next; |
|
if (resid <= 0) { |
|
if (flags & MSG_EOR) |
|
top->m_flags |= M_EOR; |
|
break; |
|
} |
|
} while (space > 0 && atomic); |
|
if (dontroute) |
|
so->so_options |= SO_DONTROUTE; |
|
s = splnet(); /* XXX */ |
|
error = (*so->so_proto->pr_usrreq)(so, |
|
(flags & MSG_OOB) ? PRU_SENDOOB : PRU_SEND, |
|
top, addr, control); |
|
splx(s); |
|
if (dontroute) |
|
so->so_options &= ~SO_DONTROUTE; |
|
clen = 0; |
|
control = 0; |
|
top = 0; |
|
mp = ⊤ |
|
if (error) |
|
goto release; |
|
} while (resid && space > 0); |
} while (resid && space > 0); |
} while (resid); |
} while (resid); |
|
|
|
|
*/ |
*/ |
int |
int |
soreceive(so, paddr, uio, mp0, controlp, flagsp) |
soreceive(so, paddr, uio, mp0, controlp, flagsp) |
register struct socket *so; |
struct socket *so; |
struct mbuf **paddr; |
struct mbuf **paddr; |
struct uio *uio; |
struct uio *uio; |
struct mbuf **mp0; |
struct mbuf **mp0; |
struct mbuf **controlp; |
struct mbuf **controlp; |
int *flagsp; |
int *flagsp; |
{ |
{ |
register struct mbuf *m, **mp; |
struct mbuf *m, **mp; |
register int flags, len, error, s, offset; |
int flags, len, error, s, offset; |
struct protosw *pr = so->so_proto; |
struct protosw *pr = so->so_proto; |
struct mbuf *nextrecord; |
struct mbuf *nextrecord; |
int moff, type; |
int moff, type = 0; |
int orig_resid = uio->uio_resid; |
int orig_resid = uio->uio_resid; |
|
int mbuf_removed = 0; |
|
|
mp = mp0; |
mp = mp0; |
if (paddr) |
if (paddr) |
Line 515 soreceive(so, paddr, uio, mp0, controlp, |
|
Line 583 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 *)0); |
(struct mbuf *)(long)(flags & MSG_PEEK), (struct mbuf *)0, |
|
(struct proc *)0); |
if (error) |
if (error) |
goto bad; |
goto bad; |
do { |
do { |
|
|
*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, (struct mbuf *)0, |
(*pr->pr_usrreq)(so, PRU_RCVD, (struct mbuf *)0, |
(struct mbuf *)0, (struct mbuf *)0); |
(struct mbuf *)0, (struct mbuf *)0, (struct proc *)0); |
|
|
restart: |
restart: |
if (error = sblock(&so->so_rcv, SBLOCKWAIT(flags))) |
if ((error = sblock(&so->so_rcv, SBLOCKWAIT(flags))) != 0) |
return (error); |
return (error); |
s = splnet(); |
s = splsoftnet(); |
|
|
m = so->so_rcv.sb_mb; |
m = so->so_rcv.sb_mb; |
/* |
/* |
* If we have less data than requested, block awaiting more |
* If we have less data than requested, block awaiting more |
* (subject to any timeout) if: |
* (subject to any timeout) if: |
* 1. the current count is less than the low water mark, or |
* 1. the current count is less than the low water mark, |
* 2. MSG_WAITALL is set, and it is possible to do the entire |
* 2. MSG_WAITALL is set, and it is possible to do the entire |
* receive operation at once if we block (resid <= hiwat), or |
* receive operation at once if we block (resid <= hiwat), or |
* 3. MSG_DONTWAIT is not set. |
* 3. MSG_DONTWAIT is not set. |
|
|
* we have to do the receive in sections, and thus risk returning |
* we have to do the receive in sections, and thus risk returning |
* a short count if a timeout or signal occurs after we start. |
* a short count if a timeout or signal occurs after we start. |
*/ |
*/ |
if (m == 0 || ((flags & MSG_DONTWAIT) == 0 && |
if (m == 0 || (((flags & MSG_DONTWAIT) == 0 && |
so->so_rcv.sb_cc < uio->uio_resid) && |
so->so_rcv.sb_cc < uio->uio_resid) && |
(so->so_rcv.sb_cc < so->so_rcv.sb_lowat || |
(so->so_rcv.sb_cc < so->so_rcv.sb_lowat || |
((flags & MSG_WAITALL) && uio->uio_resid <= so->so_rcv.sb_hiwat)) && |
((flags & MSG_WAITALL) && uio->uio_resid <= so->so_rcv.sb_hiwat)) && |
m->m_nextpkt == 0 && (pr->pr_flags & PR_ATOMIC) == 0) { |
m->m_nextpkt == 0 && (pr->pr_flags & PR_ATOMIC) == 0)) { |
#ifdef DIAGNOSTIC |
#ifdef DIAGNOSTIC |
if (m == 0 && so->so_rcv.sb_cc) |
if (m == 0 && so->so_rcv.sb_cc) |
panic("receive 1"); |
panic("receive 1"); |
|
|
goto restart; |
goto restart; |
} |
} |
dontblock: |
dontblock: |
|
#ifdef notyet /* XXXX */ |
if (uio->uio_procp) |
if (uio->uio_procp) |
uio->uio_procp->p_stats->p_ru.ru_msgrcv++; |
uio->uio_procp->p_stats->p_ru.ru_msgrcv++; |
|
#endif |
nextrecord = m->m_nextpkt; |
nextrecord = m->m_nextpkt; |
if (pr->pr_flags & PR_ADDR) { |
if (pr->pr_flags & PR_ADDR) { |
#ifdef DIAGNOSTIC |
#ifdef DIAGNOSTIC |
|
|
m = m->m_next; |
m = m->m_next; |
} else { |
} else { |
sbfree(&so->so_rcv, m); |
sbfree(&so->so_rcv, m); |
|
mbuf_removed = 1; |
if (paddr) { |
if (paddr) { |
*paddr = m; |
*paddr = m; |
so->so_rcv.sb_mb = m->m_next; |
so->so_rcv.sb_mb = m->m_next; |
|
|
m = m->m_next; |
m = m->m_next; |
} else { |
} else { |
sbfree(&so->so_rcv, m); |
sbfree(&so->so_rcv, m); |
|
mbuf_removed = 1; |
if (controlp) { |
if (controlp) { |
if (pr->pr_domain->dom_externalize && |
if (pr->pr_domain->dom_externalize && |
mtod(m, struct cmsghdr *)->cmsg_type == |
mtod(m, struct cmsghdr *)->cmsg_type == |
SCM_RIGHTS) |
SCM_RIGHTS) |
error = (*pr->pr_domain->dom_externalize)(m); |
error = (*pr->pr_domain->dom_externalize)(m); |
*controlp = m; |
*controlp = m; |
so->so_rcv.sb_mb = m->m_next; |
so->so_rcv.sb_mb = m->m_next; |
m->m_next = 0; |
m->m_next = 0; |
|
|
if (mp == 0) { |
if (mp == 0) { |
splx(s); |
splx(s); |
error = uiomove(mtod(m, caddr_t) + moff, (int)len, uio); |
error = uiomove(mtod(m, caddr_t) + moff, (int)len, uio); |
s = splnet(); |
s = splsoftnet(); |
|
if (error) { |
|
/* |
|
* If any part of the record has been removed |
|
* (such as the MT_SONAME mbuf, which will |
|
* happen when PR_ADDR, and thus also |
|
* PR_ATOMIC, is set), then drop the entire |
|
* record to maintain the atomicity of the |
|
* receive operation. |
|
* |
|
* This avoids a later panic("receive 1a") |
|
* when compiled with DIAGNOSTIC. |
|
*/ |
|
if (m && mbuf_removed |
|
&& (pr->pr_flags & PR_ATOMIC)) |
|
(void) sbdroprecord(&so->so_rcv); |
|
|
|
goto release; |
|
} |
} else |
} else |
uio->uio_resid -= len; |
uio->uio_resid -= len; |
if (len == m->m_len - moff) { |
if (len == m->m_len - moff) { |
|
|
splx(s); |
splx(s); |
return (0); |
return (0); |
} |
} |
if (m = so->so_rcv.sb_mb) |
if ((m = so->so_rcv.sb_mb) != NULL) |
nextrecord = m->m_nextpkt; |
nextrecord = m->m_nextpkt; |
} |
} |
} |
} |
|
|
if (pr->pr_flags & PR_WANTRCVD && so->so_pcb) |
if (pr->pr_flags & PR_WANTRCVD && so->so_pcb) |
(*pr->pr_usrreq)(so, PRU_RCVD, (struct mbuf *)0, |
(*pr->pr_usrreq)(so, PRU_RCVD, (struct mbuf *)0, |
(struct mbuf *)(long)flags, (struct mbuf *)0, |
(struct mbuf *)(long)flags, (struct mbuf *)0, |
(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, |
return (*pr->pr_usrreq)(so, PRU_SHUTDOWN, (struct mbuf *)0, |
(struct mbuf *)0, (struct mbuf *)0, (struct mbuf *)0)); |
(struct mbuf *)0, (struct mbuf *)0, (struct proc *)0); |
return (0); |
return (0); |
} |
} |
|
|
void |
void |
sorflush(so) |
sorflush(so) |
register struct socket *so; |
struct socket *so; |
{ |
{ |
register struct sockbuf *sb = &so->so_rcv; |
struct sockbuf *sb = &so->so_rcv; |
register struct protosw *pr = so->so_proto; |
struct protosw *pr = so->so_proto; |
register int s; |
int s; |
struct sockbuf asb; |
struct sockbuf asb; |
|
|
sb->sb_flags |= SB_NOINTR; |
sb->sb_flags |= SB_NOINTR; |
|
|
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); |
|
|
|
|
int |
int |
sosetopt(so, level, optname, m0) |
sosetopt(so, level, optname, m0) |
register struct socket *so; |
struct socket *so; |
int level, optname; |
int level, optname; |
struct mbuf *m0; |
struct mbuf *m0; |
{ |
{ |
int error = 0; |
int error = 0; |
register struct mbuf *m = m0; |
struct mbuf *m = m0; |
|
|
if (level != SOL_SOCKET) { |
if (level != SOL_SOCKET) { |
if (so->so_proto && so->so_proto->pr_ctloutput) |
if (so->so_proto && so->so_proto->pr_ctloutput) |
Line 842 sosetopt(so, level, optname, m0) |
|
Line 935 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 857 sosetopt(so, level, optname, m0) |
|
Line 950 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 871 sosetopt(so, level, optname, m0) |
|
Line 965 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 902 sosetopt(so, level, optname, m0) |
|
Line 1019 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; |
} |
} |
|
|
|
|
int |
int |
sogetopt(so, level, optname, mp) |
sogetopt(so, level, optname, mp) |
register struct socket *so; |
struct socket *so; |
int level, optname; |
int level, optname; |
struct mbuf **mp; |
struct mbuf **mp; |
{ |
{ |
register struct mbuf *m; |
struct mbuf *m; |
|
|
if (level != SOL_SOCKET) { |
if (level != SOL_SOCKET) { |
if (so->so_proto && so->so_proto->pr_ctloutput) { |
if (so->so_proto && so->so_proto->pr_ctloutput) { |
Line 957 sogetopt(so, level, optname, mp) |
|
Line 1074 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 976 sogetopt(so, level, optname, mp) |
|
Line 1093 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 1028 sogetopt(so, level, optname, mp) |
|
Line 1146 sogetopt(so, level, optname, mp) |
|
|
|
void |
void |
sohasoutofband(so) |
sohasoutofband(so) |
register struct socket *so; |
struct socket *so; |
{ |
{ |
struct proc *p; |
struct proc *p; |
|
|