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.8 2005/06/10 22:34:49 dillon 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 malloc(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 error = (*ifp->if_ioctl)(ifp, SIOCSIFDSTADDR,
170 td->td_proc->p_ucred);
174 *(struct sockaddr *)&ia->ia_dstaddr = ifr->ifr_dstaddr;
178 return (ipx_ifinit(ifp, ia,
179 (struct sockaddr_ipx *)&ifr->ifr_addr, 1));
182 ipx_ifscrub(ifp, ia);
183 ifa = (struct ifaddr *)ia;
184 TAILQ_REMOVE(&ifp->if_addrhead, ifa, ifa_link);
186 if (oia == (ia = ipx_ifaddr)) {
187 ipx_ifaddr = ia->ia_next;
189 while (ia->ia_next && (ia->ia_next != oia)) {
193 ia->ia_next = oia->ia_next;
195 printf("Didn't unlink ipxifadr from list\n");
197 IFAFREE((&oia->ia_ifa));
203 if (ia->ia_addr.sipx_family == AF_IPX) {
204 if (ifra->ifra_addr.sipx_len == 0) {
205 ifra->ifra_addr = ia->ia_addr;
207 } else if (ipx_neteq(ifra->ifra_addr.sipx_addr,
208 ia->ia_addr.sipx_addr))
211 if ((ifp->if_flags & IFF_POINTOPOINT) &&
212 (ifra->ifra_dstaddr.sipx_family == AF_IPX)) {
214 ipx_ifscrub(ifp, ia);
215 ia->ia_dstaddr = ifra->ifra_dstaddr;
218 if (ifra->ifra_addr.sipx_family == AF_IPX &&
219 (hostIsNew || dstIsNew))
220 error = ipx_ifinit(ifp, ia, &ifra->ifra_addr, 0);
224 if (ifp->if_ioctl == NULL)
226 return ((*ifp->if_ioctl)(ifp, cmd, data, td->td_proc->p_ucred));
231 * Delete any previous route for an old address.
236 struct ipx_ifaddr *ia;
238 if (ia->ia_flags & IFA_ROUTE) {
239 if (ifp->if_flags & IFF_POINTOPOINT) {
240 rtinit(&(ia->ia_ifa), (int)RTM_DELETE, RTF_HOST);
242 rtinit(&(ia->ia_ifa), (int)RTM_DELETE, 0);
243 ia->ia_flags &= ~IFA_ROUTE;
247 * Initialize an interface's internet address
248 * and routing table entry.
251 ipx_ifinit(ifp, ia, sipx, scrub)
253 struct ipx_ifaddr *ia;
254 struct sockaddr_ipx *sipx;
257 struct sockaddr_ipx oldaddr;
263 * Set up new addresses.
265 oldaddr = ia->ia_addr;
269 * The convention we shall adopt for naming is that
270 * a supplied address of zero means that "we don't care".
271 * Use the MAC address of the interface. If it is an
272 * interface without a MAC address, like a serial line, the
273 * address must be supplied.
275 * Give the interface a chance to initialize
276 * if this is its first address,
277 * and to validate the address if necessary.
279 if (ifp->if_ioctl != NULL &&
280 (error = (*ifp->if_ioctl)(ifp, SIOCSIFADDR, (void *)ia,
281 (struct ucred *)NULL))) {
282 ia->ia_addr = oldaddr;
287 ia->ia_ifa.ifa_metric = ifp->if_metric;
289 * Add route for the network.
292 ia->ia_ifa.ifa_addr = (struct sockaddr *)&oldaddr;
293 ipx_ifscrub(ifp, ia);
294 ia->ia_ifa.ifa_addr = (struct sockaddr *)&ia->ia_addr;
296 if (ifp->if_flags & IFF_POINTOPOINT)
297 rtinit(&(ia->ia_ifa), (int)RTM_ADD, RTF_HOST|RTF_UP);
299 ia->ia_broadaddr.sipx_addr.x_net = ia->ia_addr.sipx_addr.x_net;
300 rtinit(&(ia->ia_ifa), (int)RTM_ADD, RTF_UP);
302 ia->ia_flags |= IFA_ROUTE;
307 * Return address info for specified internet network.
311 struct ipx_addr *dst;
313 struct ipx_ifaddr *ia;
314 struct ipx_addr *compare;
316 struct ipx_ifaddr *ia_maybe = NULL;
317 union ipx_net net = dst->x_net;
319 for (ia = ipx_ifaddr; ia != NULL; ia = ia->ia_next) {
320 if ((ifp = ia->ia_ifp) != NULL) {
321 if (ifp->if_flags & IFF_POINTOPOINT) {
322 compare = &satoipx_addr(ia->ia_dstaddr);
323 if (ipx_hosteq(*dst, *compare))
325 if (ipx_neteqnn(net, ia->ia_addr.sipx_addr.x_net))
328 if (ipx_neteqnn(net, ia->ia_addr.sipx_addr.x_net))
339 struct ipx_addr *addr;
342 struct ipx_addr work = *addr;
344 char *net = "", *host = "";
345 char cport[10], chost[15], cnet[15];
347 port = ntohs(work.x_port);
349 if (ipx_nullnet(work) && ipx_nullhost(work)) {
352 printf("*.%x", port);
359 if (ipx_wildnet(work))
361 else if (ipx_nullnet(work))
364 q = work.x_net.c_net;
365 snprintf(cnet, sizeof(cnet), "%x%x%x%x",
366 q[0], q[1], q[2], q[3]);
367 for (p = cnet; *p == '0' && p < cnet + 8; p++)
372 if (ipx_wildhost(work))
374 else if (ipx_nullhost(work))
377 q = work.x_host.c_host;
378 snprintf(chost, sizeof(chost), "%x%x%x%x%x%x",
379 q[0], q[1], q[2], q[3], q[4], q[5]);
380 for (p = chost; *p == '0' && p < chost + 12; p++)
386 if (strcmp(host, "*") == 0) {
388 snprintf(cport, sizeof(cport), "%x", port);
390 snprintf(cport, sizeof(cport), ".%x", port);
394 printf("%s.%s%s", net, host, cport);