1 /*
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.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
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.
21 *
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
32 * SUCH DAMAGE.
33 *
34 * @(#)ipx_outputfl.c
35 *
36 * $FreeBSD$
37 */
38
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/mbuf.h>
42 #include <sys/socket.h>
43
44 #include <net/if.h>
45 #include <net/route.h>
46
47 #include <netipx/ipx.h>
48 #include <netipx/ipx_if.h>
49 #include <netipx/ipx_var.h>
50
51 #ifdef vax
52 #include <machine/mtpr.h>
53 #endif
54
55 static int ipx_copy_output = 0;
56
57 int
58 ipx_outputfl(m0, ro, flags)
59 struct mbuf *m0;
60 struct route *ro;
61 int flags;
62 {
63 register struct ipx *ipx = mtod(m0, struct ipx *);
64 register struct ifnet *ifp = NULL;
65 int error = 0;
66 struct sockaddr_ipx *dst;
67 struct route ipxroute;
68
69 /*
70 * Route packet.
71 */
72 if (ro == NULL) {
73 ro = &ipxroute;
74 bzero((caddr_t)ro, sizeof(*ro));
75 }
76 dst = (struct sockaddr_ipx *)&ro->ro_dst;
77 if (ro->ro_rt == NULL) {
78 dst->sipx_family = AF_IPX;
79 dst->sipx_len = sizeof(*dst);
80 dst->sipx_addr = ipx->ipx_dna;
81 dst->sipx_addr.x_port = 0;
82 /*
83 * If routing to interface only,
84 * short circuit routing lookup.
85 */
86 if (flags & IPX_ROUTETOIF) {
87 struct ipx_ifaddr *ia = ipx_iaonnetof(&ipx->ipx_dna);
88
89 if (ia == NULL) {
90 ipxstat.ipxs_noroute++;
91 error = ENETUNREACH;
92 goto bad;
93 }
94 ifp = ia->ia_ifp;
95 goto gotif;
96 }
97 rtalloc(ro);
98 } else if ((ro->ro_rt->rt_flags & RTF_UP) == 0) {
99 /*
100 * The old route has gone away; try for a new one.
101 */
102 rtfree(ro->ro_rt);
103 ro->ro_rt = NULL;
104 rtalloc(ro);
105 }
106 if (ro->ro_rt == NULL || (ifp = ro->ro_rt->rt_ifp) == NULL) {
107 ipxstat.ipxs_noroute++;
108 error = ENETUNREACH;
109 goto bad;
110 }
111 ro->ro_rt->rt_use++;
112 if (ro->ro_rt->rt_flags & (RTF_GATEWAY|RTF_HOST))
113 dst = (struct sockaddr_ipx *)ro->ro_rt->rt_gateway;
114 gotif:
115 /*
116 * Look for multicast addresses and
117 * and verify user is allowed to send
118 * such a packet.
119 */
120 if (dst->sipx_addr.x_host.c_host[0]&1) {
121 if ((ifp->if_flags & (IFF_BROADCAST | IFF_LOOPBACK)) == 0) {
122 error = EADDRNOTAVAIL;
123 goto bad;
124 }
125 if ((flags & IPX_ALLOWBROADCAST) == 0) {
126 error = EACCES;
127 goto bad;
128 }
129 m0->m_flags |= M_BCAST;
130 }
131
132 if (htons(ipx->ipx_len) <= ifp->if_mtu) {
133 ipxstat.ipxs_localout++;
134 if (ipx_copy_output) {
135 ipx_watch_output(m0, ifp);
136 }
137 error = (*ifp->if_output)(ifp, m0,
138 (struct sockaddr *)dst, ro->ro_rt);
139 goto done;
140 } else {
141 ipxstat.ipxs_mtutoosmall++;
142 error = EMSGSIZE;
143 }
144 bad:
145 if (ipx_copy_output) {
146 ipx_watch_output(m0, ifp);
147 }
148 m_freem(m0);
149 done:
150 if (ro == &ipxroute && (flags & IPX_ROUTETOIF) == 0 &&
151 ro->ro_rt != NULL) {
152 RTFREE(ro->ro_rt);
153 ro->ro_rt = NULL;
154 }
155 return (error);
156 }
157
158 /*
159 * This will broadcast the type 20 (Netbios) packet to all the interfaces
160 * that have ipx configured and isn't in the list yet.
161 */
162 int
163 ipx_output_type20(m)
164 struct mbuf *m;
165 {
166 register struct ipx *ipx;
167 union ipx_net *nbnet = (union ipx_net *)(ipx + 1);
168 struct ipx_ifaddr *ia, *tia = NULL;
169 int error = 0;
170 struct mbuf *m1;
171 int i;
172 struct ifnet *ifp;
173 struct sockaddr_ipx dst;
174
175 /*
176 * We have to get to the 32 bytes after the ipx header also, so
177 * that we can fill in the network address of the receiving
178 * interface.
179 */
180 if ((m->m_flags & M_EXT || m->m_len < (sizeof(struct ipx) + 32)) &&
181 (m = m_pullup(m, sizeof(struct ipx) + 32)) == NULL) {
182 ipxstat.ipxs_toosmall++;
183 return (0);
184 }
185 ipx = mtod(m, struct ipx *);
186 nbnet = (union ipx_net *)(ipx + 1);
187
188 if (ipx->ipx_tc >= 8)
189 goto bad;
190 /*
191 * Now see if we have already seen this.
192 */
193 for (ia = ipx_ifaddr; ia != NULL; ia = ia->ia_next)
194 if(ia->ia_ifa.ifa_ifp == m->m_pkthdr.rcvif) {
195 if(tia == NULL)
196 tia = ia;
197
198 for (i=0;i<ipx->ipx_tc;i++,nbnet++)
199 if(ipx_neteqnn(ia->ia_addr.sipx_addr.x_net,
200 *nbnet))
201 goto bad;
202 }
203 /*
204 * Don't route the packet if the interface where it come from
205 * does not have an IPX address.
206 */
207 if(tia == NULL)
208 goto bad;
209
210 /*
211 * Add our receiving interface to the list.
212 */
213 nbnet = (union ipx_net *)(ipx + 1);
214 nbnet += ipx->ipx_tc;
215 *nbnet = tia->ia_addr.sipx_addr.x_net;
216
217 /*
218 * Increment the hop count.
219 */
220 ipx->ipx_tc++;
221 ipxstat.ipxs_forward++;
222
223 /*
224 * Send to all directly connected ifaces not in list and
225 * not to the one it came from.
226 */
227 m->m_flags &= ~M_BCAST;
228 bzero(&dst, sizeof(dst));
229 dst.sipx_family = AF_IPX;
230 dst.sipx_len = 12;
231 dst.sipx_addr.x_host = ipx_broadhost;
232
233 for (ia = ipx_ifaddr; ia != NULL; ia = ia->ia_next)
234 if(ia->ia_ifa.ifa_ifp != m->m_pkthdr.rcvif) {
235 nbnet = (union ipx_net *)(ipx + 1);
236 for (i=0;i<ipx->ipx_tc;i++,nbnet++)
237 if(ipx_neteqnn(ia->ia_addr.sipx_addr.x_net,
238 *nbnet))
239 goto skip_this;
240
241 /*
242 * Insert the net address of the dest net and
243 * calculate the new checksum if needed.
244 */
245 ifp = ia->ia_ifa.ifa_ifp;
246 dst.sipx_addr.x_net = ia->ia_addr.sipx_addr.x_net;
247 ipx->ipx_dna.x_net = dst.sipx_addr.x_net;
248 m1 = m_copym(m, 0, M_COPYALL, M_DONTWAIT);
249
250 if(ipx->ipx_sum != 0xffff)
251 ipx->ipx_sum = ipx_cksum(m, ntohs(ipx->ipx_len));
252 if(m1) {
253 error = (*ifp->if_output)(ifp, m1,
254 (struct sockaddr *)&dst, NULL);
255 /* XXX ipxstat.ipxs_localout++; */
256 }
257 skip_this: ;
258 }
259
260 bad:
261 m_freem(m);
262 return (error);
263 }
Cache object: 8df994488e897637020525d9d5afd54a
|