2 * Copyright (c) 1995, Mike Mitchell
3 * Copyright (c) 1984, 1985, 1986, 1987, 1993
4 * The Regents of the University of California. All rights reserved.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. All advertising materials mentioning features or use of this software
15 * must display the following acknowledgement:
16 * This product includes software developed by the University of
17 * California, Berkeley and its contributors.
18 * 4. Neither the name of the University nor the names of its contributors
19 * may be used to endorse or promote products derived from this software
20 * without specific prior written permission.
22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * $FreeBSD: src/sys/netipx/ipx_usrreq.c,v 1.26.2.1 2001/02/22 09:44:18 bp Exp $
37 * $DragonFly: src/sys/netproto/ipx/ipx_usrreq.c,v 1.6 2004/03/05 16:57:16 hsu Exp $
42 #include <sys/param.h>
43 #include <sys/systm.h>
44 #include <sys/kernel.h>
47 #include <sys/protosw.h>
48 #include <sys/socket.h>
49 #include <sys/socketvar.h>
50 #include <sys/sysctl.h>
53 #include <net/route.h>
55 #include <netinet/in.h>
64 * IPX protocol implementation.
67 static int ipxsendspace = IPXSNDQ;
68 SYSCTL_INT(_net_ipx_ipx, OID_AUTO, ipxsendspace, CTLFLAG_RW,
69 &ipxsendspace, 0, "");
70 static int ipxrecvspace = IPXRCVQ;
71 SYSCTL_INT(_net_ipx_ipx, OID_AUTO, ipxrecvspace, CTLFLAG_RW,
72 &ipxrecvspace, 0, "");
74 static int ipx_usr_abort(struct socket *so);
75 static int ipx_attach(struct socket *so, int proto,
76 struct pru_attach_info *ai);
77 static int ipx_bind(struct socket *so, struct sockaddr *nam,
79 static int ipx_connect(struct socket *so, struct sockaddr *nam,
81 static int ipx_detach(struct socket *so);
82 static int ipx_disconnect(struct socket *so);
83 static int ipx_send(struct socket *so, int flags, struct mbuf *m,
84 struct sockaddr *addr, struct mbuf *control,
86 static int ipx_shutdown(struct socket *so);
87 static int ripx_attach(struct socket *so, int proto,
88 struct pru_attach_info *ai);
89 static int ipx_output(struct ipxpcb *ipxp, struct mbuf *m0);
91 struct pr_usrreqs ipx_usrreqs = {
92 ipx_usr_abort, pru_accept_notsupp, ipx_attach, ipx_bind,
93 ipx_connect, pru_connect2_notsupp, ipx_control, ipx_detach,
94 ipx_disconnect, pru_listen_notsupp, ipx_peeraddr, pru_rcvd_notsupp,
95 pru_rcvoob_notsupp, ipx_send, pru_sense_null, ipx_shutdown,
96 ipx_sockaddr, sosend, soreceive, sopoll
99 struct pr_usrreqs ripx_usrreqs = {
100 ipx_usr_abort, pru_accept_notsupp, ripx_attach, ipx_bind,
101 ipx_connect, pru_connect2_notsupp, ipx_control, ipx_detach,
102 ipx_disconnect, pru_listen_notsupp, ipx_peeraddr, pru_rcvd_notsupp,
103 pru_rcvoob_notsupp, ipx_send, pru_sense_null, ipx_shutdown,
104 ipx_sockaddr, sosend, soreceive, sopoll
108 * This may also be called for raw listeners.
115 struct ipx *ipx = mtod(m, struct ipx *);
116 struct ifnet *ifp = m->m_pkthdr.rcvif;
117 struct sockaddr_ipx ipx_ipx;
122 * Construct sockaddr format source address.
123 * Stuff source address and datagram in user buffer.
125 ipx_ipx.sipx_len = sizeof(ipx_ipx);
126 ipx_ipx.sipx_family = AF_IPX;
127 ipx_ipx.sipx_addr = ipx->ipx_sna;
128 ipx_ipx.sipx_zero[0] = '\0';
129 ipx_ipx.sipx_zero[1] = '\0';
130 if (ipx_neteqnn(ipx->ipx_sna.x_net, ipx_zeronet) && ifp != NULL) {
133 for (ifa = TAILQ_FIRST(&ifp->if_addrhead); ifa != NULL;
134 ifa = TAILQ_NEXT(ifa, ifa_link)) {
135 if (ifa->ifa_addr->sa_family == AF_IPX) {
136 ipx_ipx.sipx_addr.x_net =
137 IA_SIPX(ifa)->sipx_addr.x_net;
142 ipxp->ipxp_rpt = ipx->ipx_pt;
143 if (!(ipxp->ipxp_flags & IPXP_RAWIN) ) {
144 m->m_len -= sizeof(struct ipx);
145 m->m_pkthdr.len -= sizeof(struct ipx);
146 m->m_data += sizeof(struct ipx);
148 if (sbappendaddr(&ipxp->ipxp_socket->so_rcv, (struct sockaddr *)&ipx_ipx,
149 m, (struct mbuf *)NULL) == 0)
151 sorwakeup(ipxp->ipxp_socket);
161 struct socket *so = ipxp->ipxp_socket;
163 ipx_pcbdisconnect(ipxp);
164 soisdisconnected(so);
168 * Drop connection, reporting
169 * the specified error.
172 ipx_drop(ipxp, errno)
176 struct socket *so = ipxp->ipxp_socket;
179 * someday, in the IPX world
180 * we will generate error protocol packets
181 * announcing that the socket has gone away.
183 * XXX Probably never. IPX does not have error packets.
185 /*if (TCPS_HAVERCVDSYN(tp->t_state)) {
186 tp->t_state = TCPS_CLOSED;
189 so->so_error = errno;
190 ipx_pcbdisconnect(ipxp);
191 soisdisconnected(so);
204 struct mbuf *mprev = NULL;
207 * Calculate data length.
209 for (m = m0; m != NULL; m = m->m_next) {
214 * Make sure packet is actually of even length.
219 if ((m->m_flags & M_EXT) == 0 &&
220 (m->m_len + m->m_data < &m->m_dat[MLEN])) {
221 mtod(m, char*)[m->m_len++] = 0;
223 struct mbuf *m1 = m_get(M_DONTWAIT, MT_DATA);
230 * mtod(m1, char *) = 0;
237 * Fill in mbuf with extended IPX header
238 * and addresses and length put into network format.
241 if (ipxp->ipxp_flags & IPXP_RAWOUT) {
242 ipx = mtod(m, struct ipx *);
244 M_PREPEND(m, sizeof(struct ipx), M_DONTWAIT);
247 ipx = mtod(m, struct ipx *);
249 ipx->ipx_pt = ipxp->ipxp_dpt;
250 ipx->ipx_sna = ipxp->ipxp_laddr;
251 ipx->ipx_dna = ipxp->ipxp_faddr;
252 len += sizeof(struct ipx);
255 ipx->ipx_len = htons((u_short)len);
257 if (ipxp->ipxp_flags & IPXP_CHECKSUM) {
258 ipx->ipx_sum = ipx_cksum(m, len);
260 ipx->ipx_sum = 0xffff;
265 so = ipxp->ipxp_socket;
266 if (so->so_options & SO_DONTROUTE)
267 return (ipx_outputfl(m, (struct route *)NULL,
268 (so->so_options & SO_BROADCAST) | IPX_ROUTETOIF));
270 * Use cached route for previous datagram if
271 * possible. If the previous net was the same
272 * and the interface was a broadcast medium, or
273 * if the previous destination was identical,
276 * NB: We don't handle broadcasts because that
277 * would require 3 subroutine calls.
279 ro = &ipxp->ipxp_route;
280 #ifdef ancient_history
282 * I think that this will all be handled in ipx_pcbconnect!
284 if (ro->ro_rt != NULL) {
285 if(ipx_neteq(ipxp->ipxp_lastdst, ipx->ipx_dna)) {
287 * This assumes we have no GH type routes
289 if (ro->ro_rt->rt_flags & RTF_HOST) {
290 if (!ipx_hosteq(ipxp->ipxp_lastdst, ipx->ipx_dna))
294 if ((ro->ro_rt->rt_flags & RTF_GATEWAY) == 0) {
295 struct ipx_addr *dst =
296 &satoipx_addr(ro->ro_dst);
297 dst->x_host = ipx->ipx_dna.x_host;
300 * Otherwise, we go through the same gateway
301 * and dst is already set up.
309 ipxp->ipxp_lastdst = ipx->ipx_dna;
310 #endif /* ancient_history */
311 return (ipx_outputfl(m, ro, so->so_options & SO_BROADCAST));
315 ipx_ctloutput(so, sopt)
317 struct sockopt *sopt;
319 struct ipxpcb *ipxp = sotoipxpcb(so);
320 int mask, error, optval;
328 switch (sopt->sopt_dir) {
330 switch (sopt->sopt_name) {
332 mask = IPXP_ALL_PACKETS;
335 case SO_HEADERS_ON_INPUT:
339 case SO_IPX_CHECKSUM:
340 mask = IPXP_CHECKSUM;
343 case SO_HEADERS_ON_OUTPUT:
346 soptval = ipxp->ipxp_flags & mask;
347 error = sooptcopyout(sopt, &soptval, sizeof soptval);
350 case SO_DEFAULT_HEADERS:
354 ioptval.ipx_pt = ipxp->ipxp_dpt;
355 ioptval.ipx_dna = ipxp->ipxp_faddr;
356 ioptval.ipx_sna = ipxp->ipxp_laddr;
357 error = sooptcopyout(sopt, &soptval, sizeof soptval);
361 error = sooptcopyout(sopt, &ipx_pexseq,
372 switch (sopt->sopt_name) {
374 mask = IPXP_ALL_PACKETS;
377 case SO_HEADERS_ON_INPUT:
381 case SO_IPX_CHECKSUM:
382 mask = IPXP_CHECKSUM;
384 case SO_HEADERS_ON_OUTPUT:
387 error = sooptcopyin(sopt, &optval, sizeof optval,
392 ipxp->ipxp_flags |= mask;
394 ipxp->ipxp_flags &= ~mask;
397 case SO_DEFAULT_HEADERS:
398 error = sooptcopyin(sopt, &ioptval, sizeof ioptval,
402 ipxp->ipxp_dpt = ioptval.ipx_pt;
406 error = ipxip_route(so, sopt);
411 case SO_IPXTUNNEL_ROUTE:
412 error = ipxtun_route(so, sopt);
429 struct ipxpcb *ipxp = sotoipxpcb(so);
435 soisdisconnected(so);
440 ipx_attach(struct socket *so, int proto, struct pru_attach_info *ai)
444 struct ipxpcb *ipxp = sotoipxpcb(so);
449 error = ipx_pcballoc(so, &ipxpcb);
452 error = soreserve(so, ipxsendspace, ipxrecvspace,
458 ipx_bind(struct socket *so, struct sockaddr *nam, struct thread *td)
460 struct ipxpcb *ipxp = sotoipxpcb(so);
462 return (ipx_pcbbind(ipxp, nam, td));
466 ipx_connect(struct socket *so, struct sockaddr *nam, struct thread *td)
470 struct ipxpcb *ipxp = sotoipxpcb(so);
472 if (!ipx_nullhost(ipxp->ipxp_faddr))
475 error = ipx_pcbconnect(ipxp, nam, td);
487 struct ipxpcb *ipxp = sotoipxpcb(so);
502 struct ipxpcb *ipxp = sotoipxpcb(so);
504 if (ipx_nullhost(ipxp->ipxp_faddr))
507 ipx_pcbdisconnect(ipxp);
509 soisdisconnected(so);
514 ipx_peeraddr(so, nam)
516 struct sockaddr **nam;
518 struct ipxpcb *ipxp = sotoipxpcb(so);
520 ipx_setpeeraddr(ipxp, nam); /* XXX what if alloc fails? */
525 ipx_send(struct socket *so, int flags, struct mbuf *m, struct sockaddr *nam,
526 struct mbuf *control, struct thread *td)
529 struct ipxpcb *ipxp = sotoipxpcb(so);
530 struct ipx_addr laddr;
534 laddr = ipxp->ipxp_laddr;
535 if (!ipx_nullhost(ipxp->ipxp_faddr)) {
540 * Must block input while temporarily connected.
543 error = ipx_pcbconnect(ipxp, nam, td);
549 if (ipx_nullhost(ipxp->ipxp_faddr)) {
554 error = ipx_output(ipxp, m);
557 ipx_pcbdisconnect(ipxp);
559 ipxp->ipxp_laddr = laddr;
577 ipx_sockaddr(so, nam)
579 struct sockaddr **nam;
581 struct ipxpcb *ipxp = sotoipxpcb(so);
583 ipx_setsockaddr(ipxp, nam); /* XXX what if alloc fails? */
588 ripx_attach(struct socket *so, int proto, struct pru_attach_info *ai)
592 struct ipxpcb *ipxp = sotoipxpcb(so);
594 if ((error = suser_cred(ai->p_ucred, NULL_CRED_OKAY)) != 0)
597 error = ipx_pcballoc(so, &ipxrawpcb);
601 error = soreserve(so, ipxsendspace, ipxrecvspace, ai->sb_rlimit);
604 ipxp = sotoipxpcb(so);
605 ipxp->ipxp_faddr.x_host = ipx_broadhost;
606 ipxp->ipxp_flags = IPXP_RAWIN | IPXP_RAWOUT;