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.c,v 1.17.2.3 2003/04/04 09:35:43 tjr Exp $
37 * $DragonFly: src/sys/netproto/ipx/ipx.c,v 1.13 2006/12/22 23:57:54 swildner Exp $
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/malloc.h>
43 #include <sys/sockio.h>
45 #include <sys/socket.h>
46 #include <sys/thread2.h>
49 #include <net/route.h>
55 struct ipx_ifaddr
*ipx_ifaddr
;
57 static void ipx_ifscrub(struct ifnet
*ifp
, struct ipx_ifaddr
*ia
);
58 static int ipx_ifinit(struct ifnet
*ifp
, struct ipx_ifaddr
*ia
,
59 struct sockaddr_ipx
*sipx
, int scrub
);
62 * Generic internet control operations (ioctl's).
65 ipx_control(struct socket
*so
, u_long cmd
, caddr_t data
,
66 struct ifnet
*ifp
, struct thread
*td
)
68 struct ifreq
*ifr
= (struct ifreq
*)data
;
69 struct ipx_aliasreq
*ifra
= (struct ipx_aliasreq
*)data
;
70 struct ipx_ifaddr
*ia
;
72 struct ipx_ifaddr
*oia
;
73 int dstIsNew
, hostIsNew
;
77 * Find address for this interface, if it exists.
80 return (EADDRNOTAVAIL
);
81 for (ia
= ipx_ifaddr
; ia
!= NULL
; ia
= ia
->ia_next
)
82 if (ia
->ia_ifp
== ifp
)
89 return (EADDRNOTAVAIL
);
90 *(struct sockaddr_ipx
*)&ifr
->ifr_addr
= ia
->ia_addr
;
95 return (EADDRNOTAVAIL
);
96 if ((ifp
->if_flags
& IFF_BROADCAST
) == 0)
98 *(struct sockaddr_ipx
*)&ifr
->ifr_dstaddr
= ia
->ia_broadaddr
;
103 return (EADDRNOTAVAIL
);
104 if ((ifp
->if_flags
& IFF_POINTOPOINT
) == 0)
106 *(struct sockaddr_ipx
*)&ifr
->ifr_dstaddr
= ia
->ia_dstaddr
;
110 if ((error
= suser(td
)) != 0)
116 if (ifra
->ifra_addr
.sipx_family
== AF_IPX
)
117 for (oia
= ia
; ia
!= NULL
; ia
= ia
->ia_next
) {
118 if (ia
->ia_ifp
== ifp
&&
119 ipx_neteq(ia
->ia_addr
.sipx_addr
,
120 ifra
->ifra_addr
.sipx_addr
))
123 if (cmd
== SIOCDIFADDR
&& ia
== NULL
)
124 return (EADDRNOTAVAIL
);
130 oia
= (struct ipx_ifaddr
*)
131 kmalloc(sizeof(*ia
), M_IFADDR
,
135 if ((ia
= ipx_ifaddr
) != NULL
) {
136 for ( ; ia
->ia_next
!= NULL
; ia
= ia
->ia_next
)
142 ifa
= (struct ifaddr
*)ia
;
143 TAILQ_INSERT_TAIL(&ifp
->if_addrhead
, ifa
, ifa_link
);
145 ifa
->ifa_addr
= (struct sockaddr
*)&ia
->ia_addr
;
147 ifa
->ifa_netmask
= (struct sockaddr
*)&ipx_netmask
;
149 ifa
->ifa_dstaddr
= (struct sockaddr
*)&ia
->ia_dstaddr
;
150 if (ifp
->if_flags
& IFF_BROADCAST
) {
151 ia
->ia_broadaddr
.sipx_family
= AF_IPX
;
152 ia
->ia_broadaddr
.sipx_len
= sizeof(ia
->ia_addr
);
153 ia
->ia_broadaddr
.sipx_addr
.x_host
= ipx_broadhost
;
161 if ((ifp
->if_flags
& IFF_POINTOPOINT
) == 0)
163 if (ia
->ia_flags
& IFA_ROUTE
) {
164 rtinit(&(ia
->ia_ifa
), (int)RTM_DELETE
, RTF_HOST
);
165 ia
->ia_flags
&= ~IFA_ROUTE
;
168 lwkt_serialize_enter(ifp
->if_serializer
);
169 error
= ifp
->if_ioctl(ifp
, SIOCSIFDSTADDR
,
170 (void *)ia
, td
->td_proc
->p_ucred
);
171 lwkt_serialize_exit(ifp
->if_serializer
);
175 *(struct sockaddr
*)&ia
->ia_dstaddr
= ifr
->ifr_dstaddr
;
179 return (ipx_ifinit(ifp
, ia
,
180 (struct sockaddr_ipx
*)&ifr
->ifr_addr
, 1));
183 ipx_ifscrub(ifp
, ia
);
184 ifa
= (struct ifaddr
*)ia
;
185 TAILQ_REMOVE(&ifp
->if_addrhead
, ifa
, ifa_link
);
187 if (oia
== (ia
= ipx_ifaddr
)) {
188 ipx_ifaddr
= ia
->ia_next
;
190 while (ia
->ia_next
&& (ia
->ia_next
!= oia
)) {
194 ia
->ia_next
= oia
->ia_next
;
196 kprintf("Didn't unlink ipxifadr from list\n");
198 IFAFREE((&oia
->ia_ifa
));
204 if (ia
->ia_addr
.sipx_family
== AF_IPX
) {
205 if (ifra
->ifra_addr
.sipx_len
== 0) {
206 ifra
->ifra_addr
= ia
->ia_addr
;
208 } else if (ipx_neteq(ifra
->ifra_addr
.sipx_addr
,
209 ia
->ia_addr
.sipx_addr
))
212 if ((ifp
->if_flags
& IFF_POINTOPOINT
) &&
213 (ifra
->ifra_dstaddr
.sipx_family
== AF_IPX
)) {
215 ipx_ifscrub(ifp
, ia
);
216 ia
->ia_dstaddr
= ifra
->ifra_dstaddr
;
219 if (ifra
->ifra_addr
.sipx_family
== AF_IPX
&&
220 (hostIsNew
|| dstIsNew
))
221 error
= ipx_ifinit(ifp
, ia
, &ifra
->ifra_addr
, 0);
225 if (ifp
->if_ioctl
== NULL
)
227 lwkt_serialize_enter(ifp
->if_serializer
);
228 error
= ifp
->if_ioctl(ifp
, cmd
, data
, td
->td_proc
->p_ucred
);
229 lwkt_serialize_exit(ifp
->if_serializer
);
235 * Delete any previous route for an old address.
238 ipx_ifscrub(struct ifnet
*ifp
, struct ipx_ifaddr
*ia
)
240 if (ia
->ia_flags
& IFA_ROUTE
) {
241 if (ifp
->if_flags
& IFF_POINTOPOINT
) {
242 rtinit(&(ia
->ia_ifa
), (int)RTM_DELETE
, RTF_HOST
);
244 rtinit(&(ia
->ia_ifa
), (int)RTM_DELETE
, 0);
245 ia
->ia_flags
&= ~IFA_ROUTE
;
249 * Initialize an interface's internet address
250 * and routing table entry.
253 ipx_ifinit(struct ifnet
*ifp
, struct ipx_ifaddr
*ia
,
254 struct sockaddr_ipx
*sipx
, int scrub
)
256 struct sockaddr_ipx oldaddr
;
260 * Set up new addresses.
262 oldaddr
= ia
->ia_addr
;
266 * The convention we shall adopt for naming is that
267 * a supplied address of zero means that "we don't care".
268 * Use the MAC address of the interface. If it is an
269 * interface without a MAC address, like a serial line, the
270 * address must be supplied.
272 * Give the interface a chance to initialize
273 * if this is its first address,
274 * and to validate the address if necessary.
276 lwkt_serialize_enter(ifp
->if_serializer
);
277 if (ifp
->if_ioctl
!= NULL
&&
278 (error
= ifp
->if_ioctl(ifp
, SIOCSIFADDR
, (void *)ia
,
279 (struct ucred
*)NULL
))) {
280 ia
->ia_addr
= oldaddr
;
281 lwkt_serialize_exit(ifp
->if_serializer
);
284 lwkt_serialize_exit(ifp
->if_serializer
);
285 ia
->ia_ifa
.ifa_metric
= ifp
->if_metric
;
287 * Add route for the network.
290 ia
->ia_ifa
.ifa_addr
= (struct sockaddr
*)&oldaddr
;
291 ipx_ifscrub(ifp
, ia
);
292 ia
->ia_ifa
.ifa_addr
= (struct sockaddr
*)&ia
->ia_addr
;
294 if (ifp
->if_flags
& IFF_POINTOPOINT
)
295 rtinit(&(ia
->ia_ifa
), (int)RTM_ADD
, RTF_HOST
|RTF_UP
);
297 ia
->ia_broadaddr
.sipx_addr
.x_net
= ia
->ia_addr
.sipx_addr
.x_net
;
298 rtinit(&(ia
->ia_ifa
), (int)RTM_ADD
, RTF_UP
);
300 ia
->ia_flags
|= IFA_ROUTE
;
305 * Return address info for specified internet network.
308 ipx_iaonnetof(struct ipx_addr
*dst
)
310 struct ipx_ifaddr
*ia
;
311 struct ipx_addr
*compare
;
313 struct ipx_ifaddr
*ia_maybe
= NULL
;
314 union ipx_net net
= dst
->x_net
;
316 for (ia
= ipx_ifaddr
; ia
!= NULL
; ia
= ia
->ia_next
) {
317 if ((ifp
= ia
->ia_ifp
) != NULL
) {
318 if (ifp
->if_flags
& IFF_POINTOPOINT
) {
319 compare
= &satoipx_addr(ia
->ia_dstaddr
);
320 if (ipx_hosteq(*dst
, *compare
))
322 if (ipx_neteqnn(net
, ia
->ia_addr
.sipx_addr
.x_net
))
325 if (ipx_neteqnn(net
, ia
->ia_addr
.sipx_addr
.x_net
))
335 ipx_printhost(struct ipx_addr
*addr
)
338 struct ipx_addr work
= *addr
;
340 char *net
= "", *host
= "";
341 char cport
[10], chost
[15], cnet
[15];
343 port
= ntohs(work
.x_port
);
345 if (ipx_nullnet(work
) && ipx_nullhost(work
)) {
348 kprintf("*.%x", port
);
355 if (ipx_wildnet(work
))
357 else if (ipx_nullnet(work
))
360 q
= work
.x_net
.c_net
;
361 ksnprintf(cnet
, sizeof(cnet
), "%x%x%x%x",
362 q
[0], q
[1], q
[2], q
[3]);
363 for (p
= cnet
; *p
== '0' && p
< cnet
+ 8; p
++)
368 if (ipx_wildhost(work
))
370 else if (ipx_nullhost(work
))
373 q
= work
.x_host
.c_host
;
374 ksnprintf(chost
, sizeof(chost
), "%x%x%x%x%x%x",
375 q
[0], q
[1], q
[2], q
[3], q
[4], q
[5]);
376 for (p
= chost
; *p
== '0' && p
< chost
+ 12; p
++)
382 if (strcmp(host
, "*") == 0) {
384 ksnprintf(cport
, sizeof(cport
), "%x", port
);
386 ksnprintf(cport
, sizeof(cport
), ".%x", port
);
390 kprintf("%s.%s%s", net
, host
, cport
);