1 /* 2 * Copyright (c) 1984, 1985, 1986, 1987 Regents of the University of California. 3 * All rights reserved. 4 * 5 * %sccs.include.redist.c% 6 * 7 * @(#)ns.c 7.9 (Berkeley) 12/19/91 8 */ 9 10 #include "param.h" 11 #include "mbuf.h" 12 #include "ioctl.h" 13 #include "protosw.h" 14 #include "errno.h" 15 #include "socket.h" 16 #include "socketvar.h" 17 18 19 #include "../net/if.h" 20 #include "../net/route.h" 21 #include "../net/af.h" 22 23 #include "ns.h" 24 #include "ns_if.h" 25 26 #ifdef NS 27 28 struct ns_ifaddr *ns_ifaddr; 29 int ns_interfaces; 30 extern struct sockaddr_ns ns_netmask, ns_hostmask; 31 32 /* 33 * Generic internet control operations (ioctl's). 34 */ 35 /* ARGSUSED */ 36 ns_control(so, cmd, data, ifp) 37 struct socket *so; 38 int cmd; 39 caddr_t data; 40 register struct ifnet *ifp; 41 { 42 register struct ifreq *ifr = (struct ifreq *)data; 43 register struct ns_aliasreq *ifra = (struct ns_aliasreq *)data; 44 register struct ns_ifaddr *ia; 45 struct ifaddr *ifa; 46 struct ns_ifaddr *oia; 47 int error, dstIsNew, hostIsNew; 48 49 /* 50 * Find address for this interface, if it exists. 51 */ 52 if (ifp == 0) 53 return (EADDRNOTAVAIL); 54 for (ia = ns_ifaddr; ia; ia = ia->ia_next) 55 if (ia->ia_ifp == ifp) 56 break; 57 58 switch (cmd) { 59 60 case SIOCGIFADDR: 61 if (ia == (struct ns_ifaddr *)0) 62 return (EADDRNOTAVAIL); 63 *(struct sockaddr_ns *)&ifr->ifr_addr = ia->ia_addr; 64 return (0); 65 66 67 case SIOCGIFBRDADDR: 68 if (ia == (struct ns_ifaddr *)0) 69 return (EADDRNOTAVAIL); 70 if ((ifp->if_flags & IFF_BROADCAST) == 0) 71 return (EINVAL); 72 *(struct sockaddr_ns *)&ifr->ifr_dstaddr = ia->ia_broadaddr; 73 return (0); 74 75 case SIOCGIFDSTADDR: 76 if (ia == (struct ns_ifaddr *)0) 77 return (EADDRNOTAVAIL); 78 if ((ifp->if_flags & IFF_POINTOPOINT) == 0) 79 return (EINVAL); 80 *(struct sockaddr_ns *)&ifr->ifr_dstaddr = ia->ia_dstaddr; 81 return (0); 82 } 83 84 if ((so->so_state & SS_PRIV) == 0) 85 return (EPERM); 86 87 switch (cmd) { 88 case SIOCAIFADDR: 89 case SIOCDIFADDR: 90 if (ifra->ifra_addr.sns_family == AF_NS) 91 for (oia = ia; ia; ia = ia->ia_next) { 92 if (ia->ia_ifp == ifp && 93 ns_neteq(ia->ia_addr.sns_addr, 94 ifra->ifra_addr.sns_addr)) 95 break; 96 } 97 if (cmd == SIOCDIFADDR && ia == 0) 98 return (EADDRNOTAVAIL); 99 /* FALLTHROUGH */ 100 101 case SIOCSIFADDR: 102 case SIOCSIFDSTADDR: 103 if (ia == (struct ns_ifaddr *)0) { 104 oia = (struct ns_ifaddr *) 105 malloc(sizeof *ia, M_IFADDR, M_WAITOK); 106 if (oia == (struct ns_ifaddr *)NULL) 107 return (ENOBUFS); 108 if (ia = ns_ifaddr) { 109 for ( ; ia->ia_next; ia = ia->ia_next) 110 ; 111 ia->ia_next = oia; 112 } else 113 ns_ifaddr = oia; 114 ia = oia; 115 if (ifa = ifp->if_addrlist) { 116 for ( ; ifa->ifa_next; ifa = ifa->ifa_next) 117 ; 118 ifa->ifa_next = (struct ifaddr *) ia; 119 } else 120 ifp->if_addrlist = (struct ifaddr *) ia; 121 ia->ia_ifp = ifp; 122 ia->ia_ifa.ifa_addr = (struct sockaddr *)&ia->ia_addr; 123 124 ia->ia_ifa.ifa_netmask = 125 (struct sockaddr *)&ns_netmask; 126 127 ia->ia_ifa.ifa_dstaddr = 128 (struct sockaddr *)&ia->ia_dstaddr; 129 if (ifp->if_flags & IFF_BROADCAST) { 130 ia->ia_broadaddr.sns_family = AF_NS; 131 ia->ia_broadaddr.sns_len = sizeof(ia->ia_addr); 132 ia->ia_broadaddr.sns_addr.x_host = ns_broadhost; 133 } 134 ns_interfaces++; 135 } 136 } 137 138 switch (cmd) { 139 int error; 140 141 case SIOCSIFDSTADDR: 142 if ((ifp->if_flags & IFF_POINTOPOINT) == 0) 143 return (EINVAL); 144 if (ia->ia_flags & IFA_ROUTE) { 145 rtinit(&(ia->ia_ifa), (int)RTM_DELETE, RTF_HOST); 146 ia->ia_flags &= ~IFA_ROUTE; 147 } 148 if (ifp->if_ioctl) { 149 error = (*ifp->if_ioctl)(ifp, SIOCSIFDSTADDR, ia); 150 if (error) 151 return (error); 152 } 153 *(struct sockaddr *)&ia->ia_dstaddr = ifr->ifr_dstaddr; 154 return (0); 155 156 case SIOCSIFADDR: 157 return (ns_ifinit(ifp, ia, 158 (struct sockaddr_ns *)&ifr->ifr_addr, 1)); 159 160 case SIOCDIFADDR: 161 ns_ifscrub(ifp, ia); 162 if ((ifa = ifp->if_addrlist) == (struct ifaddr *)ia) 163 ifp->if_addrlist = ifa->ifa_next; 164 else { 165 while (ifa->ifa_next && 166 (ifa->ifa_next != (struct ifaddr *)ia)) 167 ifa = ifa->ifa_next; 168 if (ifa->ifa_next) 169 ifa->ifa_next = ((struct ifaddr *)ia)->ifa_next; 170 else 171 printf("Couldn't unlink nsifaddr from ifp\n"); 172 } 173 oia = ia; 174 if (oia == (ia = ns_ifaddr)) { 175 ns_ifaddr = ia->ia_next; 176 } else { 177 while (ia->ia_next && (ia->ia_next != oia)) { 178 ia = ia->ia_next; 179 } 180 if (ia->ia_next) 181 ia->ia_next = oia->ia_next; 182 else 183 printf("Didn't unlink nsifadr from list\n"); 184 } 185 IFAFREE((&oia->ia_ifa)); 186 if (0 == --ns_interfaces) { 187 /* 188 * We reset to virginity and start all over again 189 */ 190 ns_thishost = ns_zerohost; 191 } 192 return (0); 193 194 case SIOCAIFADDR: 195 dstIsNew = 0; hostIsNew = 1; 196 if (ia->ia_addr.sns_family == AF_NS) { 197 if (ifra->ifra_addr.sns_len == 0) { 198 ifra->ifra_addr = ia->ia_addr; 199 hostIsNew = 0; 200 } else if (ns_neteq(ifra->ifra_addr.sns_addr, 201 ia->ia_addr.sns_addr)) 202 hostIsNew = 0; 203 } 204 if ((ifp->if_flags & IFF_POINTOPOINT) && 205 (ifra->ifra_dstaddr.sns_family == AF_NS)) { 206 if (hostIsNew == 0) 207 ns_ifscrub(ifp, ia); 208 ia->ia_dstaddr = ifra->ifra_dstaddr; 209 dstIsNew = 1; 210 } 211 if (ifra->ifra_addr.sns_family == AF_NS && 212 (hostIsNew || dstIsNew)) 213 error = ns_ifinit(ifp, ia, &ifra->ifra_addr, 0); 214 return (error); 215 216 default: 217 if (ifp->if_ioctl == 0) 218 return (EOPNOTSUPP); 219 return ((*ifp->if_ioctl)(ifp, cmd, data)); 220 } 221 } 222 223 /* 224 * Delete any previous route for an old address. 225 */ 226 ns_ifscrub(ifp, ia) 227 register struct ifnet *ifp; 228 register struct ns_ifaddr *ia; 229 { 230 if (ia->ia_flags & IFA_ROUTE) { 231 if (ifp->if_flags & IFF_POINTOPOINT) { 232 rtinit(&(ia->ia_ifa), (int)RTM_DELETE, RTF_HOST); 233 } else 234 rtinit(&(ia->ia_ifa), (int)RTM_DELETE, 0); 235 ia->ia_flags &= ~IFA_ROUTE; 236 } 237 } 238 /* 239 * Initialize an interface's internet address 240 * and routing table entry. 241 */ 242 ns_ifinit(ifp, ia, sns, scrub) 243 register struct ifnet *ifp; 244 register struct ns_ifaddr *ia; 245 register struct sockaddr_ns *sns; 246 { 247 struct sockaddr_ns oldaddr; 248 register union ns_host *h = &ia->ia_addr.sns_addr.x_host; 249 int s = splimp(), error; 250 251 /* 252 * Set up new addresses. 253 */ 254 oldaddr = ia->ia_addr; 255 ia->ia_addr = *sns; 256 /* 257 * The convention we shall adopt for naming is that 258 * a supplied address of zero means that "we don't care". 259 * if there is a single interface, use the address of that 260 * interface as our 6 byte host address. 261 * if there are multiple interfaces, use any address already 262 * used. 263 * 264 * Give the interface a chance to initialize 265 * if this is its first address, 266 * and to validate the address if necessary. 267 */ 268 if (ns_hosteqnh(ns_thishost, ns_zerohost)) { 269 if (ifp->if_ioctl && 270 (error = (*ifp->if_ioctl)(ifp, SIOCSIFADDR, ia))) { 271 ia->ia_addr = oldaddr; 272 splx(s); 273 return (error); 274 } 275 ns_thishost = *h; 276 } else if (ns_hosteqnh(sns->sns_addr.x_host, ns_zerohost) 277 || ns_hosteqnh(sns->sns_addr.x_host, ns_thishost)) { 278 *h = ns_thishost; 279 if (ifp->if_ioctl && 280 (error = (*ifp->if_ioctl)(ifp, SIOCSIFADDR, ia))) { 281 ia->ia_addr = oldaddr; 282 splx(s); 283 return (error); 284 } 285 if (!ns_hosteqnh(ns_thishost,*h)) { 286 ia->ia_addr = oldaddr; 287 splx(s); 288 return (EINVAL); 289 } 290 } else { 291 ia->ia_addr = oldaddr; 292 splx(s); 293 return (EINVAL); 294 } 295 /* 296 * Add route for the network. 297 */ 298 if (scrub) { 299 ia->ia_ifa.ifa_addr = (struct sockaddr *)&oldaddr; 300 ns_ifscrub(ifp, ia); 301 ia->ia_ifa.ifa_addr = (struct sockaddr *)&ia->ia_addr; 302 } 303 if (ifp->if_flags & IFF_POINTOPOINT) 304 rtinit(&(ia->ia_ifa), (int)RTM_ADD, RTF_HOST|RTF_UP); 305 else { 306 ia->ia_broadaddr.sns_addr.x_net = ia->ia_net; 307 rtinit(&(ia->ia_ifa), (int)RTM_ADD, RTF_UP); 308 } 309 ia->ia_flags |= IFA_ROUTE; 310 return (0); 311 } 312 313 /* 314 * Return address info for specified internet network. 315 */ 316 struct ns_ifaddr * 317 ns_iaonnetof(dst) 318 register struct ns_addr *dst; 319 { 320 register struct ns_ifaddr *ia; 321 register struct ns_addr *compare; 322 register struct ifnet *ifp; 323 struct ns_ifaddr *ia_maybe = 0; 324 union ns_net net = dst->x_net; 325 326 for (ia = ns_ifaddr; ia; ia = ia->ia_next) { 327 if (ifp = ia->ia_ifp) { 328 if (ifp->if_flags & IFF_POINTOPOINT) { 329 compare = &satons_addr(ia->ia_dstaddr); 330 if (ns_hosteq(*dst, *compare)) 331 return (ia); 332 if (ns_neteqnn(net, ia->ia_net)) 333 ia_maybe = ia; 334 } else { 335 if (ns_neteqnn(net, ia->ia_net)) 336 return (ia); 337 } 338 } 339 } 340 return (ia_maybe); 341 } 342 #endif 343