version 1.41, 1999/01/20 09:15:41 |
version 1.48, 1999/06/08 02:39:57 |
Line 100 socreate(dom, aso, type, proto) |
|
Line 100 socreate(dom, aso, type, proto) |
|
so->so_proto = prp; |
so->so_proto = prp; |
so->so_send = sosend; |
so->so_send = sosend; |
so->so_receive = soreceive; |
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, p); |
(struct mbuf *)(long)proto, (struct mbuf *)0, p); |
if (error) { |
if (error) { |
|
|
register struct socket *so; |
register struct socket *so; |
{ |
{ |
|
|
/* |
if (so->so_pcb || (so->so_state & SS_NOFDREF) == 0) |
* We must not decommission a socket that's on the accept(2) queue. |
|
* If we do, then accept(2) may hang even after select(2) indicated |
|
* that the listening socket was ready. |
|
*/ |
|
if (so->so_pcb || so->so_head || (so->so_state & SS_NOFDREF) == 0) |
|
return; |
return; |
|
if (so->so_head) { |
|
/* |
|
* We must not decommission a socket that's on the accept(2) |
|
* 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); |
pool_put(&socket_pool, so); |
pool_put(&socket_pool, so); |
|
|
|
|
if (so->so_options & SO_ACCEPTCONN) { |
if (so->so_options & SO_ACCEPTCONN) { |
while ((so2 = so->so_q0.tqh_first) != 0) { |
while ((so2 = so->so_q0.tqh_first) != 0) { |
so2->so_head = 0; |
(void) soqremque(so2, 0); |
(void) soabort(so2); |
(void) soabort(so2); |
} |
} |
while ((so2 = so->so_q.tqh_first) != 0) { |
while ((so2 = so->so_q.tqh_first) != 0) { |
so2->so_head = 0; |
(void) soqremque(so2, 1); |
(void) soabort(so2); |
(void) soabort(so2); |
} |
} |
} |
} |
|
|
s = splsoftnet(); |
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 && |
|
|
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 -= len; |
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; |
|
if (resid > 0) |
|
so->so_state |= SS_MORETOCOME; |
|
s = splsoftnet(); /* XXX */ |
|
error = (*so->so_proto->pr_usrreq)(so, |
|
(flags & MSG_OOB) ? PRU_SENDOOB : PRU_SEND, |
|
top, addr, control, p); |
|
splx(s); |
|
if (dontroute) |
|
so->so_options &= ~SO_DONTROUTE; |
|
if (resid > 0) |
|
so->so_state &= ~SS_MORETOCOME; |
|
clen = 0; |
|
control = 0; |
|
top = 0; |
|
mp = ⊤ |
|
if (error) |
|
goto release; |
|
} while (resid && space > 0); |
} while (resid && space > 0); |
} while (resid); |
} while (resid); |
|
|
|
|
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; |