![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to esis.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / sys / netiso|
Return to esis.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / sys / netiso |
1.1 ! root 1: /*********************************************************** ! 2: Copyright IBM Corporation 1987 ! 3: ! 4: All Rights Reserved ! 5: ! 6: Permission to use, copy, modify, and distribute this software and its ! 7: documentation for any purpose and without fee is hereby granted, ! 8: provided that the above copyright notice appear in all copies and that ! 9: both that copyright notice and this permission notice appear in ! 10: supporting documentation, and that the name of IBM not be ! 11: used in advertising or publicity pertaining to distribution of the ! 12: software without specific, written prior permission. ! 13: ! 14: IBM DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ! 15: ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL ! 16: IBM BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ! 17: ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, ! 18: WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ! 19: ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS ! 20: SOFTWARE. ! 21: ! 22: ******************************************************************/ ! 23: ! 24: /* ! 25: * ARGO Project, Computer Sciences Dept., University of Wisconsin - Madison ! 26: */ ! 27: /* @(#)esis.c 7.15 (Berkeley) 7/24/90 */ ! 28: #ifndef lint ! 29: static char *rcsid = "$Header: esis.c,v 4.10 88/09/15 18:57:03 hagens Exp $"; ! 30: #endif ! 31: ! 32: #ifdef ISO ! 33: ! 34: #include "types.h" ! 35: #include "param.h" ! 36: #include "systm.h" ! 37: #include "mbuf.h" ! 38: #include "domain.h" ! 39: #include "protosw.h" ! 40: #include "user.h" ! 41: #include "socket.h" ! 42: #include "socketvar.h" ! 43: #include "errno.h" ! 44: #include "kernel.h" ! 45: ! 46: #include "../net/if.h" ! 47: #include "../net/if_dl.h" ! 48: #include "../net/route.h" ! 49: #include "../net/raw_cb.h" ! 50: ! 51: #include "iso.h" ! 52: #include "iso_pcb.h" ! 53: #include "iso_var.h" ! 54: #include "iso_snpac.h" ! 55: #include "clnl.h" ! 56: #include "clnp.h" ! 57: #include "clnp_stat.h" ! 58: #include "esis.h" ! 59: #include "argo_debug.h" ! 60: ! 61: /* ! 62: * Global variables to esis implementation ! 63: * ! 64: * esis_holding_time - the holding time (sec) parameter for outgoing pdus ! 65: * esis_config_time - the frequency (sec) that hellos are generated ! 66: * esis_esconfig_time - suggested es configuration time placed in the ! 67: * ish. ! 68: * ! 69: */ ! 70: struct rawcb esis_pcb; ! 71: int esis_sendspace = 2048; ! 72: int esis_recvspace = 2048; ! 73: short esis_holding_time = ESIS_HT; ! 74: short esis_config_time = ESIS_CONFIG; ! 75: short esis_esconfig_time = ESIS_CONFIG; ! 76: extern int iso_systype; ! 77: struct sockaddr_dl esis_dl = { sizeof(esis_dl), AF_LINK }; ! 78: extern char all_es_snpa[], all_is_snpa[]; ! 79: ! 80: #define EXTEND_PACKET(m, mhdr, cp)\ ! 81: if (((m)->m_next = m_getclr(M_DONTWAIT, MT_HEADER)) == NULL) {\ ! 82: esis_stat.es_nomem++;\ ! 83: m_freem(mhdr);\ ! 84: return;\ ! 85: } else {\ ! 86: (m) = (m)->m_next;\ ! 87: (cp) = mtod((m), caddr_t);\ ! 88: } ! 89: /* ! 90: * FUNCTION: esis_init ! 91: * ! 92: * PURPOSE: Initialize the kernel portion of esis protocol ! 93: * ! 94: * RETURNS: nothing ! 95: * ! 96: * SIDE EFFECTS: ! 97: * ! 98: * NOTES: ! 99: */ ! 100: esis_init() ! 101: { ! 102: extern struct clnl_protosw clnl_protox[256]; ! 103: int esis_input(), isis_input(); ! 104: int esis_config(), snpac_age(); ! 105: #ifdef ISO_X25ESIS ! 106: int x25esis_input(); ! 107: #endif ISO_X25ESIS ! 108: ! 109: esis_pcb.rcb_next = esis_pcb.rcb_prev = &esis_pcb; ! 110: llinfo_llc.lc_next = llinfo_llc.lc_prev = &llinfo_llc; ! 111: ! 112: timeout(snpac_age, (caddr_t)0, hz); ! 113: timeout(esis_config, (caddr_t)0, hz); ! 114: ! 115: clnl_protox[ISO9542_ESIS].clnl_input = esis_input; ! 116: clnl_protox[ISO10589_ISIS].clnl_input = isis_input; ! 117: #ifdef ISO_X25ESIS ! 118: clnl_protox[ISO9542X25_ESIS].clnl_input = x25esis_input; ! 119: #endif ISO_X25ESIS ! 120: } ! 121: ! 122: /* ! 123: * FUNCTION: esis_usrreq ! 124: * ! 125: * PURPOSE: Handle user level esis requests ! 126: * ! 127: * RETURNS: 0 or appropriate errno ! 128: * ! 129: * SIDE EFFECTS: ! 130: * ! 131: */ ! 132: /*ARGSUSED*/ ! 133: esis_usrreq(so, req, m, nam, control) ! 134: struct socket *so; /* socket: used only to get to this code */ ! 135: int req; /* request */ ! 136: struct mbuf *m; /* data for request */ ! 137: struct mbuf *nam; /* optional name */ ! 138: struct mbuf *control; /* optional control */ ! 139: { ! 140: struct rawcb *rp = sotorawcb(so); ! 141: int error = 0; ! 142: ! 143: if (suser(u.u_cred, &u.u_acflag)) { ! 144: error = EACCES; ! 145: goto release; ! 146: } ! 147: if (rp == NULL && req != PRU_ATTACH) { ! 148: error = EINVAL; ! 149: goto release; ! 150: } ! 151: ! 152: switch (req) { ! 153: case PRU_ATTACH: ! 154: if (rp != NULL) { ! 155: error = EINVAL; ! 156: break; ! 157: } ! 158: MALLOC(rp, struct rawcb *, sizeof(*rp), M_PCB, M_WAITOK); ! 159: if (so->so_pcb = (caddr_t)rp) { ! 160: bzero(so->so_pcb, sizeof(*rp)); ! 161: insque(rp, &esis_pcb); ! 162: rp->rcb_socket = so; ! 163: error = soreserve(so, esis_sendspace, esis_recvspace); ! 164: } else ! 165: error = ENOBUFS; ! 166: break; ! 167: ! 168: case PRU_SEND: ! 169: if (nam == NULL) { ! 170: error = EINVAL; ! 171: break; ! 172: } ! 173: /* error checking here */ ! 174: error = isis_output(mtod(nam,struct sockaddr_dl *), m); ! 175: m = NULL; ! 176: break; ! 177: ! 178: case PRU_DETACH: ! 179: raw_detach(rp); ! 180: break; ! 181: ! 182: case PRU_SHUTDOWN: ! 183: socantsendmore(so); ! 184: break; ! 185: ! 186: case PRU_ABORT: ! 187: soisdisconnected(so); ! 188: raw_detach(rp); ! 189: break; ! 190: ! 191: case PRU_SENSE: ! 192: return (0); ! 193: ! 194: default: ! 195: return (EOPNOTSUPP); ! 196: } ! 197: release: ! 198: if (m != NULL) ! 199: m_freem(m); ! 200: ! 201: return (error); ! 202: } ! 203: ! 204: /* ! 205: * FUNCTION: esis_input ! 206: * ! 207: * PURPOSE: Process an incoming esis packet ! 208: * ! 209: * RETURNS: nothing ! 210: * ! 211: * SIDE EFFECTS: ! 212: * ! 213: * NOTES: ! 214: */ ! 215: esis_input(m0, shp) ! 216: struct mbuf *m0; /* ptr to first mbuf of pkt */ ! 217: struct snpa_hdr *shp; /* subnetwork header */ ! 218: { ! 219: register struct esis_fixed *pdu = mtod(m0, struct esis_fixed *); ! 220: register int type; ! 221: ! 222: /* ! 223: * check checksum if necessary ! 224: */ ! 225: if (ESIS_CKSUM_REQUIRED(pdu) && iso_check_csum(m0, (int)pdu->esis_hdr_len)) { ! 226: esis_stat.es_badcsum++; ! 227: goto bad; ! 228: } ! 229: ! 230: /* check version */ ! 231: if (pdu->esis_vers != ESIS_VERSION) { ! 232: esis_stat.es_badvers++; ! 233: goto bad; ! 234: } ! 235: type = pdu->esis_type & 0x1f; ! 236: switch (type) { ! 237: case ESIS_ESH: ! 238: esis_eshinput(m0, shp); ! 239: break; ! 240: ! 241: case ESIS_ISH: ! 242: esis_ishinput(m0, shp); ! 243: break; ! 244: ! 245: case ESIS_RD: ! 246: esis_rdinput(m0, shp); ! 247: break; ! 248: ! 249: default: ! 250: esis_stat.es_badtype++; ! 251: } ! 252: ! 253: bad: ! 254: if (esis_pcb.rcb_next != &esis_pcb) ! 255: isis_input(m0, shp); ! 256: else ! 257: m_freem(m0); ! 258: } ! 259: ! 260: /* ! 261: * FUNCTION: esis_rdoutput ! 262: * ! 263: * PURPOSE: Transmit a redirect pdu ! 264: * ! 265: * RETURNS: nothing ! 266: * ! 267: * SIDE EFFECTS: ! 268: * ! 269: * NOTES: Assumes there is enough space for fixed part of header, ! 270: * DA, BSNPA and NET in first mbuf. ! 271: */ ! 272: esis_rdoutput(inbound_shp, inbound_m, inbound_oidx, rd_dstnsap, rt) ! 273: struct snpa_hdr *inbound_shp; /* snpa hdr from incoming packet */ ! 274: struct mbuf *inbound_m; /* incoming pkt itself */ ! 275: struct clnp_optidx *inbound_oidx; /* clnp options assoc with incoming pkt */ ! 276: struct iso_addr *rd_dstnsap; /* ultimate destination of pkt */ ! 277: struct rtentry *rt; /* snpa cache info regarding next hop of ! 278: pkt */ ! 279: { ! 280: struct mbuf *m, *m0; ! 281: caddr_t cp; ! 282: struct esis_fixed *pdu; ! 283: int len, total_len = 0; ! 284: struct sockaddr_iso siso; ! 285: struct ifnet *ifp = inbound_shp->snh_ifp; ! 286: struct sockaddr_dl *sdl; ! 287: struct iso_addr *rd_gwnsap; ! 288: ! 289: if (rt->rt_flags & RTF_GATEWAY) { ! 290: rd_gwnsap = &((struct sockaddr_iso *)rt->rt_gateway)->siso_addr; ! 291: rt = rtalloc1(rt->rt_gateway, 0); ! 292: } else ! 293: rd_gwnsap = &((struct sockaddr_iso *)rt_key(rt))->siso_addr; ! 294: if (rt == 0 || (sdl = (struct sockaddr_dl *)rt->rt_gateway) == 0 || ! 295: sdl->sdl_family != AF_LINK) { ! 296: /* maybe we should have a function that you ! 297: could put in the iso_ifaddr structure ! 298: which could translate iso_addrs into snpa's ! 299: where there is a known mapping for that address type */ ! 300: esis_stat.es_badtype++; ! 301: return; ! 302: } ! 303: esis_stat.es_rdsent++; ! 304: IFDEBUG(D_ESISOUTPUT) ! 305: printf("esis_rdoutput: ifp x%x (%s%d), ht %d, m x%x, oidx x%x\n", ! 306: ifp, ifp->if_name, ifp->if_unit, esis_holding_time, inbound_m, ! 307: inbound_oidx); ! 308: printf("\tdestination: %s\n", clnp_iso_addrp(rd_dstnsap)); ! 309: printf("\tredirected toward:%s\n", clnp_iso_addrp(rd_gwnsap)); ! 310: ENDDEBUG ! 311: ! 312: if ((m0 = m = m_gethdr(M_DONTWAIT, MT_HEADER)) == NULL) { ! 313: esis_stat.es_nomem++; ! 314: return; ! 315: } ! 316: bzero(mtod(m, caddr_t), MHLEN); ! 317: ! 318: pdu = mtod(m, struct esis_fixed *); ! 319: cp = (caddr_t)(pdu + 1); /*pointer arith.; 1st byte after header */ ! 320: len = sizeof(struct esis_fixed); ! 321: ! 322: /* ! 323: * Build fixed part of header ! 324: */ ! 325: pdu->esis_proto_id = ISO9542_ESIS; ! 326: pdu->esis_vers = ESIS_VERSION; ! 327: pdu->esis_type = ESIS_RD; ! 328: HTOC(pdu->esis_ht_msb, pdu->esis_ht_lsb, esis_holding_time); ! 329: ! 330: /* Insert destination address */ ! 331: (void) esis_insert_addr(&cp, &len, rd_dstnsap, m, 0); ! 332: ! 333: /* Insert the snpa of better next hop */ ! 334: *cp++ = sdl->sdl_alen; ! 335: bcopy(LLADDR(sdl), cp, sdl->sdl_alen); ! 336: cp += sdl->sdl_alen; ! 337: len += (sdl->sdl_alen + 1); ! 338: ! 339: /* ! 340: * If the next hop is not the destination, then it ought to be ! 341: * an IS and it should be inserted next. Else, set the ! 342: * NETL to 0 ! 343: */ ! 344: /* PHASE2 use mask from ifp of outgoing interface */ ! 345: if (!iso_addrmatch1(rd_dstnsap, rd_gwnsap)) { ! 346: /* this should not happen: ! 347: if ((nhop_sc->sc_flags & SNPA_IS) == 0) { ! 348: printf("esis_rdoutput: next hop is not dst and not an IS\n"); ! 349: m_freem(m0); ! 350: return; ! 351: } */ ! 352: (void) esis_insert_addr(&cp, &len, rd_gwnsap, m, 0); ! 353: } else { ! 354: *cp++ = 0; /* NETL */ ! 355: len++; ! 356: } ! 357: m->m_len = len; ! 358: ! 359: /* ! 360: * PHASE2 ! 361: * If redirect is to an IS, add an address mask. The mask to be ! 362: * used should be the mask present in the routing entry used to ! 363: * forward the original data packet. ! 364: */ ! 365: ! 366: /* ! 367: * Copy Qos, priority, or security options present in original npdu ! 368: */ ! 369: if (inbound_oidx) { ! 370: /* THIS CODE IS CURRENTLY (mostly) UNTESTED */ ! 371: int optlen = 0; ! 372: if (inbound_oidx->cni_qos_formatp) ! 373: optlen += (inbound_oidx->cni_qos_len + 2); ! 374: if (inbound_oidx->cni_priorp) /* priority option is 1 byte long */ ! 375: optlen += 3; ! 376: if (inbound_oidx->cni_securep) ! 377: optlen += (inbound_oidx->cni_secure_len + 2); ! 378: if (M_TRAILINGSPACE(m) < optlen) { ! 379: EXTEND_PACKET(m, m0, cp); ! 380: m->m_len = 0; ! 381: /* assumes MLEN > optlen */ ! 382: } ! 383: /* assume MLEN-len > optlen */ ! 384: /* ! 385: * When copying options, copy from ptr - 2 in order to grab ! 386: * the option code and length ! 387: */ ! 388: if (inbound_oidx->cni_qos_formatp) { ! 389: bcopy(mtod(inbound_m, caddr_t) + inbound_oidx->cni_qos_formatp - 2, ! 390: cp, (unsigned)(inbound_oidx->cni_qos_len + 2)); ! 391: cp += inbound_oidx->cni_qos_len + 2; ! 392: } ! 393: if (inbound_oidx->cni_priorp) { ! 394: bcopy(mtod(inbound_m, caddr_t) + inbound_oidx->cni_priorp - 2, ! 395: cp, 3); ! 396: cp += 3; ! 397: } ! 398: if (inbound_oidx->cni_securep) { ! 399: bcopy(mtod(inbound_m, caddr_t) + inbound_oidx->cni_securep - 2, cp, ! 400: (unsigned)(inbound_oidx->cni_secure_len + 2)); ! 401: cp += inbound_oidx->cni_secure_len + 2; ! 402: } ! 403: m->m_len += optlen; ! 404: len += optlen; ! 405: } ! 406: ! 407: pdu->esis_hdr_len = m0->m_pkthdr.len = len; ! 408: iso_gen_csum(m0, ESIS_CKSUM_OFF, (int)pdu->esis_hdr_len); ! 409: ! 410: bzero((caddr_t)&siso, sizeof(siso)); ! 411: siso.siso_family = AF_ISO; ! 412: siso.siso_data[0] = AFI_SNA; ! 413: siso.siso_nlen = 6 + 1; /* should be taken from snpa_hdr */ ! 414: /* +1 is for AFI */ ! 415: bcopy(inbound_shp->snh_shost, siso.siso_data + 1, 6); ! 416: (ifp->if_output)(ifp, m0, &siso, 0); ! 417: } ! 418: ! 419: /* ! 420: * FUNCTION: esis_insert_addr ! 421: * ! 422: * PURPOSE: Insert an iso_addr into a buffer ! 423: * ! 424: * RETURNS: true if buffer was big enough, else false ! 425: * ! 426: * SIDE EFFECTS: Increment buf & len according to size of iso_addr ! 427: * ! 428: * NOTES: Plus 1 here is for length byte ! 429: */ ! 430: esis_insert_addr(buf, len, isoa, m, nsellen) ! 431: register caddr_t *buf; /* ptr to buffer to put address into */ ! 432: int *len; /* ptr to length of buffer so far */ ! 433: register struct iso_addr *isoa; /* ptr to address */ ! 434: register struct mbuf *m; /* determine if there remains space */ ! 435: int nsellen; ! 436: { ! 437: register int newlen, result = 0; ! 438: ! 439: isoa->isoa_len -= nsellen; ! 440: newlen = isoa->isoa_len + 1; ! 441: if (newlen <= M_TRAILINGSPACE(m)) { ! 442: bcopy((caddr_t)isoa, *buf, newlen); ! 443: *len += newlen; ! 444: *buf += newlen; ! 445: m->m_len += newlen; ! 446: result = 1; ! 447: } ! 448: isoa->isoa_len += nsellen; ! 449: return (result); ! 450: } ! 451: ! 452: #define ESIS_EXTRACT_ADDR(d, b) { d = (struct iso_addr *)(b); b += (1 + *b); \ ! 453: if (b > buflim) {esis_stat.es_toosmall++; goto bad;}} ! 454: #define ESIS_NEXT_OPTION(b) { b += (2 + b[1]); \ ! 455: if (b > buflim) {esis_stat.es_toosmall++; goto bad;}} ! 456: int ESHonly = 0; ! 457: /* ! 458: ! 459: /* ! 460: * FUNCTION: esis_eshinput ! 461: * ! 462: * PURPOSE: Process an incoming ESH pdu ! 463: * ! 464: * RETURNS: nothing ! 465: * ! 466: * SIDE EFFECTS: ! 467: * ! 468: * NOTES: ! 469: */ ! 470: esis_eshinput(m, shp) ! 471: struct mbuf *m; /* esh pdu */ ! 472: struct snpa_hdr *shp; /* subnetwork header */ ! 473: { ! 474: struct esis_fixed *pdu = mtod(m, struct esis_fixed *); ! 475: u_short ht; /* holding time */ ! 476: struct iso_addr *nsap; ! 477: int naddr; ! 478: u_char *buf = (u_char *)(pdu + 1); ! 479: u_char *buflim = pdu->esis_hdr_len + (u_char *)pdu; ! 480: int new_entry = 0; ! 481: ! 482: esis_stat.es_eshrcvd++; ! 483: ! 484: CTOH(pdu->esis_ht_msb, pdu->esis_ht_lsb, ht); ! 485: ! 486: naddr = *buf++; ! 487: if (buf >= buflim) ! 488: goto bad; ! 489: if (naddr == 1) { ! 490: ESIS_EXTRACT_ADDR(nsap, buf); ! 491: new_entry = snpac_add(shp->snh_ifp, ! 492: nsap, shp->snh_shost, SNPA_ES, ht, 0); ! 493: } else { ! 494: int nsellength = 0, nlen = 0; ! 495: { ! 496: /* See if we want to compress out multiple nsaps differing ! 497: only by nsel */ ! 498: register struct ifaddr *ifa = shp->snh_ifp->if_addrlist; ! 499: for (; ifa; ifa = ifa->ifa_next) ! 500: if (ifa->ifa_addr->sa_family == AF_ISO) { ! 501: nsellength = ((struct iso_ifaddr *)ifa)->ia_addr.siso_tlen; ! 502: break; ! 503: } ! 504: } ! 505: IFDEBUG(D_ESISINPUT) ! 506: printf("esis_eshinput: esh: ht %d, naddr %d nsellength %d\n", ! 507: ht, naddr, nsellength); ! 508: ENDDEBUG ! 509: while (naddr-- > 0) { ! 510: struct iso_addr *nsap2; u_char *buf2; ! 511: ESIS_EXTRACT_ADDR(nsap, buf); ! 512: /* see if there is at least one more nsap in ESH differing ! 513: only by nsel */ ! 514: if (nsellength != 0) for (buf2 = buf; buf2 < buflim;) { ! 515: ESIS_EXTRACT_ADDR(nsap2, buf2); ! 516: IFDEBUG(D_ESISINPUT) ! 517: printf("esis_eshinput: comparing %s ", ! 518: clnp_iso_addrp(nsap)); ! 519: printf("and %s\n", clnp_iso_addrp(nsap2)); ! 520: ENDDEBUG ! 521: if (Bcmp(nsap->isoa_genaddr, nsap2->isoa_genaddr, ! 522: nsap->isoa_len - nsellength) == 0) { ! 523: nlen = nsellength; ! 524: break; ! 525: } ! 526: } ! 527: new_entry |= snpac_add(shp->snh_ifp, ! 528: nsap, shp->snh_shost, SNPA_ES, ht, nlen); ! 529: nlen = 0; ! 530: } ! 531: } ! 532: IFDEBUG(D_ESISINPUT) ! 533: printf("esis_eshinput: nsap %s is %s\n", ! 534: clnp_iso_addrp(nsap), new_entry ? "new" : "old"); ! 535: ENDDEBUG ! 536: if (new_entry && (iso_systype & SNPA_IS)) ! 537: esis_shoutput(shp->snh_ifp, ESIS_ISH, esis_holding_time, ! 538: shp->snh_shost, 6, (struct iso_addr *)0); ! 539: bad: ! 540: return; ! 541: } ! 542: ! 543: /* ! 544: * FUNCTION: esis_ishinput ! 545: * ! 546: * PURPOSE: process an incoming ISH pdu ! 547: * ! 548: * RETURNS: ! 549: * ! 550: * SIDE EFFECTS: ! 551: * ! 552: * NOTES: ! 553: */ ! 554: esis_ishinput(m, shp) ! 555: struct mbuf *m; /* esh pdu */ ! 556: struct snpa_hdr *shp; /* subnetwork header */ ! 557: { ! 558: struct esis_fixed *pdu = mtod(m, struct esis_fixed *); ! 559: u_short ht, newct; /* holding time */ ! 560: struct iso_addr *nsap; /* Network Entity Title */ ! 561: register u_char *buf = (u_char *) (pdu + 1); ! 562: register u_char *buflim = pdu->esis_hdr_len + (u_char *)pdu; ! 563: int new_entry; ! 564: ! 565: esis_stat.es_ishrcvd++; ! 566: CTOH(pdu->esis_ht_msb, pdu->esis_ht_lsb, ht); ! 567: ! 568: IFDEBUG(D_ESISINPUT) ! 569: printf("esis_ishinput: ish: ht %d\n", ht); ! 570: ENDDEBUG ! 571: if (ESHonly) ! 572: goto bad; ! 573: ! 574: ESIS_EXTRACT_ADDR(nsap, buf); ! 575: ! 576: while (buf < buflim) { ! 577: switch (*buf) { ! 578: case ESISOVAL_ESCT: ! 579: if (iso_systype & SNPA_IS) ! 580: break; ! 581: if (buf[1] != 2) ! 582: goto bad; ! 583: CTOH(buf[2], buf[3], newct); ! 584: if (esis_config_time != newct) { ! 585: untimeout(esis_config,0); ! 586: esis_config_time = newct; ! 587: esis_config(); ! 588: } ! 589: break; ! 590: ! 591: default: ! 592: printf("Unknown ISH option: %x\n", *buf); ! 593: } ! 594: ESIS_NEXT_OPTION(buf); ! 595: } ! 596: new_entry = snpac_add(shp->snh_ifp, nsap, shp->snh_shost, SNPA_IS, ht, 0); ! 597: IFDEBUG(D_ESISINPUT) ! 598: printf("esis_ishinput: nsap %s is %s\n", ! 599: clnp_iso_addrp(nsap), new_entry ? "new" : "old"); ! 600: ENDDEBUG ! 601: ! 602: if (new_entry) ! 603: esis_shoutput(shp->snh_ifp, ! 604: iso_systype & SNPA_ES ? ESIS_ESH : ESIS_ISH, ! 605: esis_holding_time, shp->snh_shost, 6, (struct iso_addr *)0); ! 606: bad: ! 607: return; ! 608: } ! 609: ! 610: /* ! 611: * FUNCTION: esis_rdinput ! 612: * ! 613: * PURPOSE: Process an incoming RD pdu ! 614: * ! 615: * RETURNS: ! 616: * ! 617: * SIDE EFFECTS: ! 618: * ! 619: * NOTES: ! 620: */ ! 621: esis_rdinput(m0, shp) ! 622: struct mbuf *m0; /* esh pdu */ ! 623: struct snpa_hdr *shp; /* subnetwork header */ ! 624: { ! 625: struct esis_fixed *pdu = mtod(m0, struct esis_fixed *); ! 626: u_short ht; /* holding time */ ! 627: struct iso_addr *da, *net = 0, *netmask = 0, *snpamask = 0; ! 628: register struct iso_addr *bsnpa; ! 629: register u_char *buf = (u_char *)(pdu + 1); ! 630: register u_char *buflim = pdu->esis_hdr_len + (u_char *)pdu; ! 631: ! 632: esis_stat.es_rdrcvd++; ! 633: ! 634: /* intermediate systems ignore redirects */ ! 635: if (iso_systype & SNPA_IS) ! 636: return; ! 637: if (ESHonly) ! 638: return; ! 639: ! 640: CTOH(pdu->esis_ht_msb, pdu->esis_ht_lsb, ht); ! 641: if (buf >= buflim) ! 642: return; ! 643: ! 644: /* Extract DA */ ! 645: ESIS_EXTRACT_ADDR(da, buf); ! 646: ! 647: /* Extract better snpa */ ! 648: ESIS_EXTRACT_ADDR(bsnpa, buf); ! 649: ! 650: /* Extract NET if present */ ! 651: if (buf < buflim) { ! 652: if (*buf == 0) ! 653: buf++; /* no NET present, skip NETL anyway */ ! 654: else ! 655: ESIS_EXTRACT_ADDR(net, buf); ! 656: } ! 657: ! 658: /* process options */ ! 659: while (buf < buflim) { ! 660: switch (*buf) { ! 661: case ESISOVAL_SNPAMASK: ! 662: if (snpamask) /* duplicate */ ! 663: return; ! 664: snpamask = (struct iso_addr *)(buf + 1); ! 665: break; ! 666: ! 667: case ESISOVAL_NETMASK: ! 668: if (netmask) /* duplicate */ ! 669: return; ! 670: netmask = (struct iso_addr *)(buf + 1); ! 671: break; ! 672: ! 673: default: ! 674: printf("Unknown option in ESIS RD (0x%x)\n", buf[-1]); ! 675: } ! 676: ESIS_NEXT_OPTION(buf); ! 677: } ! 678: ! 679: IFDEBUG(D_ESISINPUT) ! 680: printf("esis_rdinput: rd: ht %d, da %s\n", ht, clnp_iso_addrp(da)); ! 681: if (net) ! 682: printf("\t: net %s\n", clnp_iso_addrp(net)); ! 683: ENDDEBUG ! 684: /* ! 685: * If netl is zero, then redirect is to an ES. We need to add an entry ! 686: * to the snpa cache for (destination, better snpa). ! 687: * If netl is not zero, then the redirect is to an IS. In this ! 688: * case, add an snpa cache entry for (net, better snpa). ! 689: * ! 690: * If the redirect is to an IS, add a route entry towards that ! 691: * IS. ! 692: */ ! 693: if (net == 0 || net->isoa_len == 0 || snpamask) { ! 694: /* redirect to an ES */ ! 695: snpac_add(shp->snh_ifp, da, ! 696: bsnpa->isoa_genaddr, SNPA_ES, ht, 0); ! 697: } else { ! 698: snpac_add(shp->snh_ifp, net, ! 699: bsnpa->isoa_genaddr, SNPA_IS, ht, 0); ! 700: snpac_addrt(shp->snh_ifp, da, net, netmask); ! 701: } ! 702: bad: ; /* Needed by ESIS_NEXT_OPTION */ ! 703: } ! 704: ! 705: /* ! 706: * FUNCTION: esis_config ! 707: * ! 708: * PURPOSE: Report configuration ! 709: * ! 710: * RETURNS: ! 711: * ! 712: * SIDE EFFECTS: ! 713: * ! 714: * NOTES: Called every esis_config_time seconds ! 715: */ ! 716: esis_config() ! 717: { ! 718: register struct ifnet *ifp; ! 719: ! 720: timeout(esis_config, (caddr_t)0, hz * esis_config_time); ! 721: ! 722: /* ! 723: * Report configuration for each interface that ! 724: * - is UP ! 725: * - is not loopback ! 726: * - has an ISO address ! 727: */ ! 728: ! 729: for (ifp = ifnet; ifp; ifp = ifp->if_next) { ! 730: if ((ifp->if_flags & IFF_UP) && ! 731: ((ifp->if_flags & IFF_LOOPBACK) == 0)) { ! 732: /* search for an ISO address family */ ! 733: struct ifaddr *ia; ! 734: ! 735: for (ia = ifp->if_addrlist; ia; ia = ia->ifa_next) { ! 736: if (ia->ifa_addr->sa_family == AF_ISO) { ! 737: esis_shoutput(ifp, ! 738: iso_systype & SNPA_ES ? ESIS_ESH : ESIS_ISH, ! 739: esis_holding_time, ! 740: (caddr_t)(iso_systype & SNPA_ES ? all_is_snpa : ! 741: all_es_snpa), 6, (struct iso_addr *)0); ! 742: break; ! 743: } ! 744: } ! 745: } ! 746: } ! 747: } ! 748: ! 749: /* ! 750: * FUNCTION: esis_shoutput ! 751: * ! 752: * PURPOSE: Transmit an esh or ish pdu ! 753: * ! 754: * RETURNS: nothing ! 755: * ! 756: * SIDE EFFECTS: ! 757: * ! 758: * NOTES: ! 759: */ ! 760: esis_shoutput(ifp, type, ht, sn_addr, sn_len, isoa) ! 761: struct ifnet *ifp; ! 762: int type; ! 763: short ht; ! 764: caddr_t sn_addr; ! 765: int sn_len; ! 766: struct iso_addr *isoa; ! 767: { ! 768: struct mbuf *m, *m0; ! 769: caddr_t cp, naddrp; ! 770: int naddr = 0; ! 771: struct esis_fixed *pdu; ! 772: struct iso_ifaddr *ia; ! 773: int len; ! 774: struct sockaddr_iso siso; ! 775: ! 776: if (type == ESIS_ESH) ! 777: esis_stat.es_eshsent++; ! 778: else if (type == ESIS_ISH) ! 779: esis_stat.es_ishsent++; ! 780: else { ! 781: printf("esis_shoutput: bad pdu type\n"); ! 782: return; ! 783: } ! 784: ! 785: IFDEBUG(D_ESISOUTPUT) ! 786: int i; ! 787: printf("esis_shoutput: ifp x%x (%s%d), %s, ht %d, to: [%d] ", ! 788: ifp, ifp->if_name, ifp->if_unit, type == ESIS_ESH ? "esh" : "ish", ! 789: ht, sn_len); ! 790: for (i=0; i<sn_len; i++) ! 791: printf("%x%c", *(sn_addr+i), i < (sn_len-1) ? ':' : ' '); ! 792: printf("\n"); ! 793: ENDDEBUG ! 794: ! 795: if ((m0 = m = m_gethdr(M_DONTWAIT, MT_HEADER)) == NULL) { ! 796: esis_stat.es_nomem++; ! 797: return; ! 798: } ! 799: bzero(mtod(m, caddr_t), MHLEN); ! 800: ! 801: pdu = mtod(m, struct esis_fixed *); ! 802: naddrp = cp = (caddr_t)(pdu + 1); ! 803: len = sizeof(struct esis_fixed); ! 804: ! 805: /* ! 806: * Build fixed part of header ! 807: */ ! 808: pdu->esis_proto_id = ISO9542_ESIS; ! 809: pdu->esis_vers = ESIS_VERSION; ! 810: pdu->esis_type = type; ! 811: HTOC(pdu->esis_ht_msb, pdu->esis_ht_lsb, ht); ! 812: ! 813: if (type == ESIS_ESH) { ! 814: cp++; ! 815: len++; ! 816: } ! 817: ! 818: m->m_len = len; ! 819: if (isoa) { ! 820: /* ! 821: * Here we are responding to a clnp packet sent to an NSAP ! 822: * that is ours which was sent to the MAC addr all_es's. ! 823: * It is possible that we did not specifically advertise this ! 824: * NSAP, even though it is ours, so we will respond ! 825: * directly to the sender that we are here. If we do have ! 826: * multiple NSEL's we'll tack them on so he can compress them out. ! 827: */ ! 828: (void) esis_insert_addr(&cp, &len, isoa, m, 0); ! 829: naddr = 1; ! 830: } ! 831: for (ia = iso_ifaddr; ia; ia = ia->ia_next) { ! 832: int nsellen = (type == ESIS_ISH ? ia->ia_addr.siso_tlen : 0); ! 833: int n = ia->ia_addr.siso_nlen; ! 834: register struct iso_ifaddr *ia2; ! 835: ! 836: if (type == ESIS_ISH && naddr > 0) ! 837: break; ! 838: for (ia2 = iso_ifaddr; ia2 != ia; ia2 = ia2->ia_next) ! 839: if (Bcmp(ia->ia_addr.siso_data, ia2->ia_addr.siso_data, n) == 0) ! 840: break; ! 841: if (ia2 != ia) ! 842: continue; /* Means we have previously copied this nsap */ ! 843: if (isoa && Bcmp(ia->ia_addr.siso_data, isoa->isoa_genaddr, n) == 0) { ! 844: isoa = 0; ! 845: continue; /* Ditto */ ! 846: } ! 847: IFDEBUG(D_ESISOUTPUT) ! 848: printf("esis_shoutput: adding NSAP %s\n", ! 849: clnp_iso_addrp(&ia->ia_addr.siso_addr)); ! 850: ENDDEBUG ! 851: if (!esis_insert_addr(&cp, &len, ! 852: &ia->ia_addr.siso_addr, m, nsellen)) { ! 853: EXTEND_PACKET(m, m0, cp); ! 854: (void) esis_insert_addr(&cp, &len, &ia->ia_addr.siso_addr, m, ! 855: nsellen); ! 856: } ! 857: naddr++; ! 858: } ! 859: ! 860: if (type == ESIS_ESH) ! 861: *naddrp = naddr; ! 862: else { ! 863: /* add suggested es config timer option to ISH */ ! 864: if (M_TRAILINGSPACE(m) < 4) { ! 865: printf("esis_shoutput: extending packet\n"); ! 866: EXTEND_PACKET(m, m0, cp); ! 867: } ! 868: *cp++ = ESISOVAL_ESCT; ! 869: *cp++ = 2; ! 870: HTOC(*cp, *(cp+1), esis_esconfig_time); ! 871: len += 4; ! 872: m->m_len += 4; ! 873: IFDEBUG(D_ESISOUTPUT) ! 874: printf("m0 0x%x, m 0x%x, data 0x%x, len %d, cp 0x%x\n", ! 875: m0, m, m->m_data, m->m_len, cp); ! 876: ENDDEBUG ! 877: } ! 878: ! 879: m0->m_pkthdr.len = len; ! 880: pdu->esis_hdr_len = len; ! 881: iso_gen_csum(m0, ESIS_CKSUM_OFF, (int)pdu->esis_hdr_len); ! 882: ! 883: bzero((caddr_t)&siso, sizeof(siso)); ! 884: siso.siso_family = AF_ISO; ! 885: siso.siso_data[0] = AFI_SNA; ! 886: siso.siso_nlen = sn_len + 1; ! 887: bcopy(sn_addr, siso.siso_data + 1, (unsigned)sn_len); ! 888: (ifp->if_output)(ifp, m0, &siso, 0); ! 889: } ! 890: ! 891: /* ! 892: * FUNCTION: isis_input ! 893: * ! 894: * PURPOSE: Process an incoming isis packet ! 895: * ! 896: * RETURNS: nothing ! 897: * ! 898: * SIDE EFFECTS: ! 899: * ! 900: * NOTES: ! 901: */ ! 902: isis_input(m0, shp) ! 903: struct mbuf *m0; /* ptr to first mbuf of pkt */ ! 904: struct snpa_hdr *shp; /* subnetwork header */ ! 905: { ! 906: register int type; ! 907: register struct rawcb *rp, *first_rp = 0; ! 908: struct ifnet *ifp = shp->snh_ifp; ! 909: char workbuf[16]; ! 910: struct mbuf *mm; ! 911: ! 912: IFDEBUG(D_ISISINPUT) ! 913: int i; ! 914: ! 915: printf("isis_input: pkt on ifp x%x (%s%d): from:", ifp, ! 916: ifp->if_name, ifp->if_unit); ! 917: for (i=0; i<6; i++) ! 918: printf("%x%c", shp->snh_shost[i]&0xff, (i<5) ? ':' : ' '); ! 919: printf(" to:"); ! 920: for (i=0; i<6; i++) ! 921: printf("%x%c", shp->snh_dhost[i]&0xff, (i<5) ? ':' : ' '); ! 922: printf("\n"); ! 923: ENDDEBUG ! 924: esis_dl.sdl_alen = ifp->if_addrlen; ! 925: esis_dl.sdl_index = ifp->if_index; ! 926: bcopy(shp->snh_shost, (caddr_t)esis_dl.sdl_data, esis_dl.sdl_alen); ! 927: for (rp = esis_pcb.rcb_next; rp != &esis_pcb; rp = rp->rcb_next) { ! 928: if (first_rp == 0) { ! 929: first_rp = rp; ! 930: continue; ! 931: } ! 932: if (mm = m_copy(m0, 0, M_COPYALL)) { /*can't block at interrupt level */ ! 933: if (sbappendaddr(&rp->rcb_socket->so_rcv, ! 934: &esis_dl, mm, (struct mbuf *)0) != 0) ! 935: sorwakeup(rp->rcb_socket); ! 936: else { ! 937: IFDEBUG(D_ISISINPUT) ! 938: printf("Error in sbappenaddr, mm = 0x%x\n", mm); ! 939: ENDDEBUG ! 940: m_freem(mm); ! 941: } ! 942: } ! 943: } ! 944: if (first_rp && sbappendaddr(&first_rp->rcb_socket->so_rcv, ! 945: &esis_dl, m0, (struct mbuf *)0) != 0) { ! 946: sorwakeup(first_rp->rcb_socket); ! 947: return; ! 948: } ! 949: m_freem(m0); ! 950: } ! 951: ! 952: isis_output(sdl, m) ! 953: register struct sockaddr_dl *sdl; ! 954: struct mbuf *m; ! 955: { ! 956: register struct ifnet *ifp; ! 957: struct ifaddr *ifa, *ifa_ifwithnet(); ! 958: struct sockaddr_iso siso; ! 959: int error = 0; ! 960: unsigned sn_len; ! 961: ! 962: ifa = ifa_ifwithnet(sdl); /* extract ifp from sockaddr_dl */ ! 963: if (ifa == 0) { ! 964: IFDEBUG(D_ISISOUTPUT) ! 965: printf("isis_output: interface not found\n"); ! 966: ENDDEBUG ! 967: error = EINVAL; ! 968: goto release; ! 969: } ! 970: ifp = ifa->ifa_ifp; ! 971: sn_len = ifp->if_addrlen; ! 972: IFDEBUG(D_ISISOUTPUT) ! 973: u_char *cp = (u_char *)LLADDR(sdl), *cplim = cp + sn_len; ! 974: printf("isis_output: ifp 0x%x (%s%d), to: ", ! 975: ifp, ifp->if_name, ifp->if_unit); ! 976: while (cp < cplim) { ! 977: printf("%x", *cp++); ! 978: printf("%c", (cp < cplim) ? ':' : ' '); ! 979: } ! 980: printf("\n"); ! 981: ENDDEBUG ! 982: bzero((caddr_t)&siso, sizeof(siso)); ! 983: siso.siso_family = AF_ISO; /* This convention may be useful for X.25 */ ! 984: siso.siso_data[0] = AFI_SNA; ! 985: siso.siso_nlen = sn_len + 1; ! 986: bcopy(LLADDR(sdl), siso.siso_data + 1, sn_len); ! 987: error = (ifp->if_output)(ifp, m, (struct sockaddr *)&siso, 0); ! 988: if (error) { ! 989: IFDEBUG(D_ISISOUTPUT) ! 990: printf("isis_output: error from ether_output is %d\n", error); ! 991: ENDDEBUG ! 992: } ! 993: return (error); ! 994: ! 995: release: ! 996: if (m != NULL) ! 997: m_freem(m); ! 998: return(error); ! 999: } ! 1000: ! 1001: ! 1002: /* ! 1003: * FUNCTION: esis_ctlinput ! 1004: * ! 1005: * PURPOSE: Handle the PRC_IFDOWN transition ! 1006: * ! 1007: * RETURNS: nothing ! 1008: * ! 1009: * SIDE EFFECTS: ! 1010: * ! 1011: * NOTES: Calls snpac_flush for interface specified. ! 1012: * The loop through iso_ifaddr is stupid because ! 1013: * back in if_down, we knew the ifp... ! 1014: */ ! 1015: esis_ctlinput(req, siso) ! 1016: int req; /* request: we handle only PRC_IFDOWN */ ! 1017: struct sockaddr_iso *siso; /* address of ifp */ ! 1018: { ! 1019: register struct iso_ifaddr *ia; /* scan through interface addresses */ ! 1020: ! 1021: if (req == PRC_IFDOWN) ! 1022: for (ia = iso_ifaddr; ia; ia = ia->ia_next) { ! 1023: if (iso_addrmatch(IA_SIS(ia), siso)) ! 1024: snpac_flushifp(ia->ia_ifp); ! 1025: } ! 1026: } ! 1027: ! 1028: #endif ISO
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.