![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to interfaces.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / snmp|
Return to interfaces.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / snmp |
1.1 ! root 1: /* interfaces.c - MIB realization of the Interfaces group */ ! 2: ! 3: #ifndef lint ! 4: static char *rcsid = "$Header: /f/osi/snmp/RCS/interfaces.c,v 7.6 90/03/24 10:54:02 mrose Exp $"; ! 5: #endif ! 6: ! 7: /* ! 8: * $Header: /f/osi/snmp/RCS/interfaces.c,v 7.6 90/03/24 10:54:02 mrose Exp $ ! 9: * ! 10: * Contributed by NYSERNet Inc. This work was partially supported by the ! 11: * U.S. Defense Advanced Research Projects Agency and the Rome Air Development ! 12: * Center of the U.S. Air Force Systems Command under contract number ! 13: * F30602-88-C-0016. ! 14: * ! 15: * ! 16: * $Log: interfaces.c,v $ ! 17: * Revision 7.6 90/03/24 10:54:02 mrose ! 18: * update ! 19: * ! 20: * Revision 7.5 90/02/27 18:49:35 mrose ! 21: * unix stuff ! 22: * ! 23: * Revision 7.4 90/02/23 17:47:38 mrose ! 24: * update ! 25: * ! 26: * Revision 7.3 90/02/17 10:38:10 mrose ! 27: * smux ! 28: * ! 29: * Revision 7.2 90/01/27 08:21:47 mrose ! 30: * touch-up ! 31: * ! 32: * Revision 7.1 90/01/11 18:34:04 mrose ! 33: * real-sync ! 34: * ! 35: * Revision 7.0 89/11/23 22:23:03 mrose ! 36: * Release 6.0 ! 37: * ! 38: */ ! 39: ! 40: /* ! 41: * NOTICE ! 42: * ! 43: * Acquisition, use, and distribution of this module and related ! 44: * materials are subject to the restrictions of a license agreement. ! 45: * Consult the Preface in the User's Manual for the full terms of ! 46: * this agreement. ! 47: * ! 48: */ ! 49: ! 50: ! 51: #include <stdio.h> ! 52: #include "mib.h" ! 53: #include "interfaces.h" ! 54: #ifdef BSD44 ! 55: #include <net/if_types.h> ! 56: #endif ! 57: #include <sys/ioctl.h> ! 58: ! 59: /* */ ! 60: ! 61: #define TYPE_MIN 1 /* ifType */ ! 62: #define TYPE_OTHER 1 ! 63: #define TYPE_ETHER 6 ! 64: #define TYPE_P10 12 ! 65: #define TYPE_P80 13 ! 66: #define TYPE_MAX 28 ! 67: ! 68: ! 69: #define ADMIN_MIN 1 /* ifAdminStatus */ ! 70: #define ADMIN_MAX 3 ! 71: ! 72: #define OPER_UP 1 /* ifOperStatus */ ! 73: #define OPER_DOWN 2 ! 74: ! 75: ! 76: /* we assume that all interfaces are present at startup time and that they ! 77: don't move around in memory... */ ! 78: ! 79: int ifNumber = 0; ! 80: ! 81: struct interface *ifs = NULL; ! 82: ! 83: static struct address *afs = NULL; ! 84: struct address *afs_inet = NULL; ! 85: #ifdef BSD44 ! 86: struct address *afs_iso = NULL; ! 87: #endif ! 88: ! 89: static OID nullSpecific = NULLOID; ! 90: ! 91: /* */ ! 92: ! 93: #define ifIndex 0 ! 94: #define ifDescr 1 ! 95: #define ifType 2 /* SEMI IMPLEMENTED */ ! 96: #define ifMtu 3 ! 97: #define ifSpeed 4 /* SEMI IMPLEMENTED */ ! 98: #define ifPhysAddress 5 ! 99: #define ifAdminStatus 6 ! 100: #define ifOperStatus 7 ! 101: #ifdef BSD44 ! 102: #define ifLastChange 8 ! 103: #endif ! 104: #ifdef BSD44 ! 105: #define ifInOctets 9 ! 106: #endif ! 107: #define ifInUcastPkts 10 ! 108: #ifdef BSD44 ! 109: #define ifInNUcastPkts 11 ! 110: #define ifInDiscards 12 ! 111: #endif ! 112: #define ifInErrors 13 ! 113: #ifdef BSD44 ! 114: #define ifInUnknownProtos 14 ! 115: #define ifOutOctets 15 ! 116: #endif ! 117: #define ifOutUcastPkts 16 ! 118: #ifdef BSD44 ! 119: #define ifOutNUcastPkts 17 ! 120: #endif ! 121: #define ifOutDiscards 18 ! 122: #define ifOutErrors 19 ! 123: #define ifOutQLen 20 ! 124: #define ifSpecific 21 ! 125: ! 126: ! 127: static int o_interfaces (oi, v, offset) ! 128: OI oi; ! 129: register struct type_SNMP_VarBind *v; ! 130: int offset; ! 131: { ! 132: int ifnum, ! 133: ifvar; ! 134: register struct interface *is; ! 135: register struct ifnet *ifn; ! 136: register OID oid = oi -> oi_name; ! 137: register OT ot = oi -> oi_type; ! 138: #ifdef ifLastChange ! 139: static int lastq = -1; ! 140: static integer diff; ! 141: #endif ! 142: ! 143: if (sort_interfaces () == NOTOK) ! 144: return int_SNMP_error__status_genErr; ! 145: ! 146: ifvar = (int) ot -> ot_info; ! 147: switch (offset) { ! 148: case type_SNMP_PDUs_get__request: ! 149: if (oid -> oid_nelem != ot -> ot_name -> oid_nelem + 1) ! 150: return int_SNMP_error__status_noSuchName; ! 151: ifnum = oid -> oid_elements[oid -> oid_nelem - 1]; ! 152: for (is = ifs; is; is = is -> ifn_next) ! 153: if (is -> ifn_index == ifnum) ! 154: break; ! 155: if (is == NULL || !is -> ifn_ready) ! 156: return int_SNMP_error__status_noSuchName; ! 157: break; ! 158: ! 159: case type_SNMP_PDUs_get__next__request: ! 160: if (oid -> oid_nelem == ot -> ot_name -> oid_nelem) { ! 161: OID new; ! 162: ! 163: for (is = ifs; is; is = is -> ifn_next) ! 164: if (is -> ifn_ready) ! 165: break; ! 166: if (!is) ! 167: return NOTOK; ! 168: ifnum = is -> ifn_index; ! 169: ! 170: if ((new = oid_extend (oid, 1)) == NULLOID) ! 171: return int_SNMP_error__status_genErr; ! 172: new -> oid_elements[new -> oid_nelem - 1] = ifnum; ! 173: ! 174: if (v -> name) ! 175: free_SNMP_ObjectName (v -> name); ! 176: v -> name = new; ! 177: } ! 178: else { ! 179: int i = ot -> ot_name -> oid_nelem; ! 180: register struct interface *iz; ! 181: ! 182: if ((ifnum = oid -> oid_elements[i]) == 0) { ! 183: if ((is = ifs) == NULL) ! 184: return NOTOK; ! 185: if (is -> ifn_ready) ! 186: goto stuff_ifnum; ! 187: ifnum = 1; ! 188: } ! 189: for (is = iz = ifs; is; is = is -> ifn_next) ! 190: if ((iz = is) -> ifn_index == ifnum) ! 191: break; ! 192: for (is = iz -> ifn_next; is; is = is -> ifn_next) ! 193: if (is -> ifn_ready) ! 194: break; ! 195: if (!is) ! 196: return NOTOK; ! 197: stuff_ifnum: ; ! 198: ifnum = is -> ifn_index; ! 199: ! 200: oid -> oid_elements[i] = ifnum; ! 201: oid -> oid_nelem = i + 1; ! 202: } ! 203: break; ! 204: ! 205: default: ! 206: return int_SNMP_error__status_genErr; ! 207: } ! 208: ifn = &is -> ifn_interface.ac_if; ! 209: ! 210: switch (ifvar) { ! 211: case ifIndex: ! 212: return o_integer (oi, v, is -> ifn_index); ! 213: ! 214: case ifDescr: ! 215: return o_string (oi, v, is -> ifn_descr, strlen (is -> ifn_descr)); ! 216: ! 217: case ifType: ! 218: if (is -> ifn_type < TYPE_MIN || is -> ifn_type > TYPE_MAX) ! 219: is -> ifn_type = TYPE_OTHER; ! 220: return o_integer (oi, v, is -> ifn_type); ! 221: ! 222: case ifMtu: ! 223: return o_integer (oi, v, ifn -> if_mtu); ! 224: ! 225: case ifSpeed: ! 226: return o_integer (oi, v, is -> ifn_speed); ! 227: ! 228: case ifPhysAddress: ! 229: #ifdef NEW_AT ! 230: return o_string (oi, v, ! 231: (char *) is -> ifn_interface.ac_enaddr, ! 232: sizeof is -> ifn_interface.ac_enaddr); ! 233: #else ! 234: return o_string (oi, v, ! 235: (char *) is -> ifn_interface.ac_enaddr.ether_addr_octet, ! 236: sizeof is -> ifn_interface.ac_enaddr.ether_addr_octet); ! 237: #endif ! 238: ! 239: case ifAdminStatus: ! 240: return o_integer (oi, v, is -> ifn_admin); ! 241: ! 242: case ifOperStatus: ! 243: return o_integer (oi, v, ifn -> if_flags & IFF_UP ? OPER_UP ! 244: : OPER_DOWN); ! 245: ! 246: #ifdef ifLastChange ! 247: case ifLastChange: ! 248: if (quantum != lastq) { ! 249: struct timeval now; ! 250: ! 251: lastq = quantum; ! 252: ! 253: if (gettimeofday (&now, (struct timezone *) 0) == NOTOK) { ! 254: advise (LLOG_EXCEPTIONS, "failed", "gettimeofday"); ! 255: return int_SNMP_error__status_genErr; ! 256: } ! 257: diff = (now.tv_sec - ifn -> if_lastchange.tv_sec) * 100 ! 258: + ((now.tv_usec - ifn -> if_lastchange.tv_usec) / 10000); ! 259: } ! 260: ! 261: return o_number (oi, v, diff); ! 262: #endif ! 263: ! 264: #ifdef ifInOctets ! 265: case ifInOctets: ! 266: return o_integer (oi, v, ifn -> if_ibytes); ! 267: #endif ! 268: ! 269: case ifInUcastPkts: ! 270: #ifndef BSD44 ! 271: return o_integer (oi, v, ifn -> if_ipackets); ! 272: #else ! 273: return o_integer (oi, v, ifn -> if_ipackets - ifn -> if_imcasts); ! 274: #endif ! 275: ! 276: #ifdef ifInNUcastPkts ! 277: case ifInNUcastPkts: ! 278: return o_integer (oi, v, ifn -> if_imcasts); ! 279: #endif ! 280: ! 281: #ifdef ifInDiscards ! 282: case ifInDiscards: ! 283: return o_integer (oi, v, ifn -> if_iqdrops); ! 284: #endif ! 285: ! 286: case ifInErrors: ! 287: return o_integer (oi, v, ifn -> if_ierrors); ! 288: ! 289: #ifdef ifInUnknownProtos ! 290: case ifInUnknownProtos: ! 291: return o_integer (oi, v, ifn -> if_noproto); ! 292: #endif ! 293: ! 294: #ifdef ifOutOctets ! 295: case ifOutOctets: ! 296: return o_integer (oi, v, ifn -> if_obytes); ! 297: #endif ! 298: ! 299: case ifOutUcastPkts: ! 300: #ifndef BSD44 ! 301: return o_integer (oi, v, ifn -> if_opackets); ! 302: #else ! 303: return o_integer (oi, v, ifn -> if_opackets - ifn -> if_omcasts); ! 304: #endif ! 305: ! 306: #ifdef ifOutNUcastPkts ! 307: case ifOutNUcastPkts: ! 308: return o_integer (oi, v, ifn -> if_omcasts); ! 309: #endif ! 310: ! 311: case ifOutDiscards: ! 312: return o_integer (oi, v, ifn -> if_snd.ifq_drops); ! 313: ! 314: case ifOutErrors: ! 315: return o_integer (oi, v, ifn -> if_oerrors); ! 316: ! 317: case ifOutQLen: ! 318: return o_integer (oi, v, ifn -> if_snd.ifq_len); ! 319: ! 320: case ifSpecific: ! 321: return o_specific (oi, v, (caddr_t) nullSpecific); ! 322: ! 323: default: ! 324: return int_SNMP_error__status_noSuchName; ! 325: } ! 326: } ! 327: ! 328: /* */ ! 329: ! 330: set_interface (name, ava) ! 331: char *name, ! 332: *ava; ! 333: { ! 334: int i; ! 335: register char *cp; ! 336: register struct interface *is; ! 337: ! 338: for (is = ifs; is; is = is -> ifn_next) ! 339: if (strcmp (is -> ifn_descr, name) == 0) ! 340: break; ! 341: if (!is) { ! 342: advise (LLOG_DEBUG, NULLCP, "no such interface as \"%s\"", name); ! 343: return; ! 344: } ! 345: ! 346: if ((cp = index (ava, '=')) == NULL) ! 347: return; ! 348: *cp++ = NULL; ! 349: ! 350: if (lexequ (ava, "ifType") == 0) { ! 351: if (sscanf (cp, "%d", &i) != 1 || i < TYPE_MIN || i > TYPE_MAX) { ! 352: malformed: ; ! 353: advise (LLOG_EXCEPTIONS, NULLCP, "malformed attribute \"%s=%s\"", ! 354: ava, cp); ! 355: return; ! 356: } ! 357: ! 358: switch (is -> ifn_type = i) { ! 359: case TYPE_ETHER: ! 360: case TYPE_P10: ! 361: is -> ifn_speed = 10000000; ! 362: break; ! 363: ! 364: case TYPE_P80: ! 365: is -> ifn_speed = 80000000; ! 366: break; ! 367: ! 368: default: ! 369: break; ! 370: } ! 371: return; ! 372: } ! 373: ! 374: if (lexequ (ava, "ifSpeed") == 0) { ! 375: if (sscanf (cp, "%d", &i) != 1 || i < 0) ! 376: goto malformed; ! 377: ! 378: is -> ifn_speed = i; ! 379: return; ! 380: } ! 381: ! 382: if (lexequ (ava, "ifAdminStatus") == 0) { ! 383: if (sscanf (cp, "%d", &i) != 1 || i < ADMIN_MIN || i > ADMIN_MAX) ! 384: goto malformed; ! 385: ! 386: is -> ifn_admin = i; ! 387: return; ! 388: } ! 389: ! 390: advise (LLOG_EXCEPTIONS, NULLCP, "unknown attribute \"%s=%s\"", ava, cp); ! 391: } ! 392: ! 393: /* */ ! 394: ! 395: init_interfaces () { ! 396: int i; ! 397: struct ifnet *ifnet; ! 398: register OT ot; ! 399: register struct interface *is, ! 400: **ifp; ! 401: struct nlist nzs; ! 402: register struct nlist *nz = &nzs; ! 403: ! 404: if (getkmem (nl + N_IFNET, (caddr_t) &ifnet, sizeof ifnet) == NOTOK) { ! 405: register struct interface *ip; ! 406: ! 407: disabled: ; ! 408: advise (LLOG_EXCEPTIONS, NULLCP, "interfaces group disabled!"); ! 409: for (is = ifs; is; is = ip) { ! 410: ip = is -> ifn_next; ! 411: ! 412: free ((char *) is); ! 413: } ! 414: ifs = NULL; ! 415: ! 416: return; ! 417: } ! 418: ! 419: ifp = &ifs; ! 420: for (i = 0; ifnet; i++) { ! 421: register struct ifnet *ifn; ! 422: ! 423: if ((is = (struct interface *) calloc (1, sizeof *is)) == NULL) ! 424: adios (NULLCP, "out of memory"); ! 425: is -> ifn_index = i + 1; ! 426: is -> ifn_indexmask = 1 << i; ! 427: ! 428: ifn = &is -> ifn_interface.ac_if; ! 429: ! 430: is -> ifn_offset = (unsigned long) ifnet; ! 431: ! 432: nz -> n_name = "struct ifnet", nz -> n_value = is -> ifn_offset; ! 433: if (getkmem (nz, (caddr_t) ifn, sizeof is -> ifn_interface) == NOTOK) ! 434: goto disabled; ! 435: ifnet = ifn -> if_next; ! 436: ! 437: nz -> n_name = "if_name", ! 438: nz -> n_value = (unsigned long) ifn -> if_name; ! 439: if (getkmem (nz, (caddr_t) is -> ifn_descr, sizeof is -> ifn_descr - 1) ! 440: == NOTOK) ! 441: goto disabled; ! 442: is -> ifn_descr[sizeof is -> ifn_descr - 1] = NULL; ! 443: (void) sprintf (is -> ifn_descr + strlen (is -> ifn_descr), "%d", ! 444: ifn -> if_unit); ! 445: ! 446: #ifdef BSD44 ! 447: switch (is -> ifn_type = ifn -> if_type) { ! 448: case IFT_ETHER: ! 449: case IFT_P10: ! 450: is -> ifn_speed = 10000000; ! 451: break; ! 452: ! 453: case IFT_P80: ! 454: is -> ifn_speed = 80000000; ! 455: break; ! 456: ! 457: default: ! 458: break; ! 459: } ! 460: #endif ! 461: if (is -> ifn_type != TYPE_ETHER) ! 462: #ifdef NEW_AT ! 463: bzero ((char *) is -> ifn_interface.ac_enaddr, ! 464: sizeof is -> ifn_interface.ac_enaddr); ! 465: #else ! 466: bzero ((char *) is -> ifn_interface.ac_enaddr.ether_addr_octet, ! 467: sizeof is -> ifn_interface.ac_enaddr.ether_addr_octet); ! 468: #endif ! 469: ! 470: is -> ifn_admin = OPER_UP; ! 471: ! 472: *ifp = is, ifp = &is -> ifn_next; ! 473: ! 474: if (debug) ! 475: advise (LLOG_DEBUG, NULLCP, ! 476: "add interface %d: %s 0x%x", ! 477: is -> ifn_index, is -> ifn_descr, is -> ifn_offset); ! 478: } ! 479: ! 480: if (ot = text2obj ("ifNumber")) { ! 481: ot -> ot_getfnx = o_generic; ! 482: if ((ot -> ot_info = (caddr_t) malloc (sizeof (integer))) == NULL) ! 483: adios (NULLCP, "out of memory"); ! 484: *((integer *) ot -> ot_info) = ifNumber = i; ! 485: } ! 486: ! 487: (void) sort_interfaces (); ! 488: ! 489: if (ot = text2obj ("ifIndex")) ! 490: ot -> ot_getfnx = o_interfaces, ! 491: ot -> ot_info = (caddr_t) ifIndex; ! 492: if (ot = text2obj ("ifDescr")) ! 493: ot -> ot_getfnx = o_interfaces, ! 494: ot -> ot_info = (caddr_t) ifDescr; ! 495: if (ot = text2obj ("ifType")) ! 496: ot -> ot_getfnx = o_interfaces, ! 497: ot -> ot_info = (caddr_t) ifType; ! 498: if (ot = text2obj ("ifMtu")) ! 499: ot -> ot_getfnx = o_interfaces, ! 500: ot -> ot_info = (caddr_t) ifMtu; ! 501: if (ot = text2obj ("ifSpeed")) ! 502: ot -> ot_getfnx = o_interfaces, ! 503: ot -> ot_info = (caddr_t) ifSpeed; ! 504: if (ot = text2obj ("ifPhysAddress")) ! 505: ot -> ot_getfnx = o_interfaces, ! 506: ot -> ot_info = (caddr_t) ifPhysAddress; ! 507: if (ot = text2obj ("ifAdminStatus")) ! 508: ot -> ot_getfnx = o_interfaces, ! 509: ot -> ot_info = (caddr_t) ifAdminStatus; ! 510: if (ot = text2obj ("ifOperStatus")) ! 511: ot -> ot_getfnx = o_interfaces, ! 512: ot -> ot_info = (caddr_t) ifOperStatus; ! 513: #ifdef ifLastChange ! 514: if (ot = text2obj ("ifLastChange")) ! 515: ot -> ot_getfnx = o_interfaces, ! 516: ot -> ot_info = (caddr_t) ifLastChange; ! 517: #endif ! 518: #ifdef ifInOctets ! 519: if (ot = text2obj ("ifInOctets")) ! 520: ot -> ot_getfnx = o_interfaces, ! 521: ot -> ot_info = (caddr_t) ifInOctets; ! 522: #endif ! 523: if (ot = text2obj ("ifInUcastPkts")) ! 524: ot -> ot_getfnx = o_interfaces, ! 525: ot -> ot_info = (caddr_t) ifInUcastPkts; ! 526: #ifdef ifInNUcastPkts ! 527: if (ot = text2obj ("ifInNUcastPkts")) ! 528: ot -> ot_getfnx = o_interfaces, ! 529: ot -> ot_info = (caddr_t) ifInNUcastPkts; ! 530: #endif ! 531: #ifdef ifInDiscards ! 532: if (ot = text2obj ("ifInDiscards")) ! 533: ot -> ot_getfnx = o_interfaces, ! 534: ot -> ot_info = (caddr_t) ifInDiscards; ! 535: #endif ! 536: if (ot = text2obj ("ifInErrors")) ! 537: ot -> ot_getfnx = o_interfaces, ! 538: ot -> ot_info = (caddr_t) ifInErrors; ! 539: #ifdef ifInUnknownProtos ! 540: if (ot = text2obj ("ifInUnknownProtos")) ! 541: ot -> ot_getfnx = o_interfaces, ! 542: ot -> ot_info = (caddr_t) ifInUnknownProtos; ! 543: #endif ! 544: #ifdef ifOutOctets ! 545: if (ot = text2obj ("ifOutOctets")) ! 546: ot -> ot_getfnx = o_interfaces, ! 547: ot -> ot_info = (caddr_t) ifOutOctets; ! 548: #endif ! 549: if (ot = text2obj ("ifOutUcastPkts")) ! 550: ot -> ot_getfnx = o_interfaces, ! 551: ot -> ot_info = (caddr_t) ifOutUcastPkts; ! 552: #ifdef ifOutNUcastPkts ! 553: if (ot = text2obj ("ifOutNUcastPkts")) ! 554: ot -> ot_getfnx = o_interfaces, ! 555: ot -> ot_info = (caddr_t) ifOutNUcastPkts; ! 556: #endif ! 557: if (ot = text2obj ("ifOutDiscards")) ! 558: ot -> ot_getfnx = o_interfaces, ! 559: ot -> ot_info = (caddr_t) ifOutDiscards; ! 560: if (ot = text2obj ("ifOutErrors")) ! 561: ot -> ot_getfnx = o_interfaces, ! 562: ot -> ot_info = (caddr_t) ifOutErrors; ! 563: if (ot = text2obj ("ifOutQLen")) ! 564: ot -> ot_getfnx = o_interfaces, ! 565: ot -> ot_info = (caddr_t) ifOutQLen; ! 566: if (ot = text2obj ("ifSpecific")) ! 567: ot -> ot_getfnx = o_interfaces, ! 568: ot -> ot_info = (caddr_t) ifSpecific; ! 569: if ((nullSpecific = text2oid ("nullSpecific")) == NULLOID) ! 570: adios (NULLCP, "unable to find nullSpecific"); ! 571: } ! 572: ! 573: /* */ ! 574: ! 575: static int adr_compar (a, b) ! 576: register struct address **a, ! 577: **b; ! 578: { ! 579: int i; ! 580: ! 581: if ((i = (*a) -> adr_address.sa.sa_family ! 582: - (*b) -> adr_address.sa.sa_family)) ! 583: return (i > 0 ? 1 : -1); ! 584: ! 585: return elem_cmp ((*a) -> adr_instance, (*a) -> adr_insize, ! 586: (*b) -> adr_instance, (*b) -> adr_insize); ! 587: } ! 588: ! 589: ! 590: int sort_interfaces () { ! 591: int adrNumber = 0; ! 592: register OT ot; ! 593: register struct interface *is; ! 594: register struct address *as, ! 595: *ap, ! 596: **base, ! 597: **afe, ! 598: **afp; ! 599: static int first_time = 1; ! 600: static int lastq = -1; ! 601: ! 602: if (quantum == lastq) ! 603: return OK; ! 604: lastq = quantum; ! 605: ! 606: for (as = afs; as; as = ap) { ! 607: ap = as -> adr_next; ! 608: ! 609: free ((char *) as); ! 610: } ! 611: afs = afs_inet = NULL; ! 612: #ifdef BSD44 ! 613: afs_iso = NULL; ! 614: #endif ! 615: ! 616: afp = &afs; ! 617: for (is = ifs; is; is = is -> ifn_next) { ! 618: struct arpcom ifns; ! 619: register struct ifnet *ifn = &ifns.ac_if; ! 620: #ifdef BSD43 ! 621: struct ifaddr ifaddr; ! 622: register struct ifaddr *ifa; ! 623: #ifdef BSD44 ! 624: union sockaddr_un ifsocka, ! 625: ifsockb; ! 626: #endif ! 627: union sockaddr_un ifsockc; ! 628: register union sockaddr_un *ia, ! 629: *ib; ! 630: register union sockaddr_un *ic = &ifsockc; ! 631: #endif ! 632: #ifndef BSD44 ! 633: struct ifreq ifreq; ! 634: #endif ! 635: struct nlist nzs; ! 636: register struct nlist *nz = &nzs; ! 637: ! 638: nz -> n_name = "struct ifnet", nz -> n_value = is -> ifn_offset; ! 639: if (getkmem (nz, (caddr_t) ifn, sizeof ifns) == NOTOK) ! 640: return NOTOK; ! 641: ! 642: #ifndef BSD43 ! 643: if (ifn -> if_addr.sa_family == AF_UNSPEC) ! 644: continue; ! 645: ! 646: if (nd != NOTOK) { ! 647: (void) strcpy (ifreq.ifr_name, is -> ifn_descr); ! 648: if (ioctl (nd, SIOCGIFNETMASK, (char *) &ifreq) == NOTOK) { ! 649: advise (LLOG_EXCEPTIONS, "failed", "SIOCGIFNETMASK on %s", ! 650: is -> ifn_descr); ! 651: continue; ! 652: } ! 653: } ! 654: else ! 655: bzero ((char *) &ifreq, sizeof ifreq); ! 656: if (ifn -> if_addr.sa_family == AF_INET) { ! 657: struct sockaddr_in *sx = (struct sockaddr_in *) &ifreq.ifr_addr; ! 658: struct sockaddr_in *sy = (struct sockaddr_in *) &ifn -> if_addr; ! 659: ! 660: if (sx -> sin_addr.s_addr == 0) { ! 661: if (IN_CLASSA (sy -> sin_addr.s_addr)) ! 662: sx -> sin_addr.s_addr = IN_CLASSA_NET; ! 663: else ! 664: if (IN_CLASSB (sy -> sin_addr.s_addr)) ! 665: sx -> sin_addr.s_addr = IN_CLASSB_NET; ! 666: else ! 667: sx -> sin_addr.s_addr = IN_CLASSC_NET; ! 668: } ! 669: } ! 670: ! 671: if (as = find_address ((union sockaddr_un *) &ifn -> if_addr)) ! 672: as -> adr_indexmask |= is -> ifn_indexmask; ! 673: else { ! 674: if ((as = (struct address *) calloc (1, sizeof *as)) == NULL) ! 675: adios (NULLCP, "out of memory"); ! 676: *afp = as, afp = &as -> adr_next, adrNumber++; ! 677: ! 678: as -> adr_address.sa = ifn -> if_addr; /* struct copy */ ! 679: if (ifn -> if_addr.sa_family == AF_INET) ! 680: as -> adr_broadaddr.sa = ifn -> if_broadaddr; /* .. */ ! 681: as -> adr_netmask.sa = ifreq.ifr_addr; /* .. */ ! 682: as -> adr_indexmask = is -> ifn_indexmask; ! 683: ! 684: switch (ifn -> if_addr.sa_family) { ! 685: case AF_INET: ! 686: as -> adr_insize = ! 687: ipaddr2oid (as -> adr_instance, ! 688: &((struct sockaddr_in *) &ifn -> if_addr) ! 689: -> sin_addr); ! 690: if (afs_inet == NULL) /* needed for find_address */ ! 691: afs_inet = as; ! 692: break; ! 693: ! 694: default: ! 695: bzero ((char *) as -> adr_instance, ! 696: sizeof as -> adr_instance); ! 697: as -> adr_insize = 0; ! 698: break; ! 699: } ! 700: } ! 701: #else ! 702: #ifndef BSD44 ! 703: ia = (union sockaddr_un *) &ifaddr.ifa_addr, ! 704: ib = (union sockaddr_un *) &ifaddr.ifa_broadaddr; ! 705: #else ! 706: ia = &ifsocka, ib = &ifsockb; ! 707: #endif ! 708: ! 709: for (ifa = ifn -> if_addrlist; ifa; ifa = ifaddr.ifa_next) { ! 710: nz -> n_name = "struct ifaddr", ! 711: nz -> n_value = (unsigned long) ifa; ! 712: if (getkmem (nz, (caddr_t) &ifaddr, sizeof ifaddr) == NOTOK) ! 713: continue; ! 714: #ifndef BSD44 ! 715: if (ia -> sa.sa_family == AF_UNSPEC) ! 716: continue; ! 717: ! 718: if (nd != NOTOK) { ! 719: (void) strcpy (ifreq.ifr_name, is -> ifn_descr); ! 720: if (ioctl (nd, SIOCGIFNETMASK, (char *) &ifreq) == NOTOK) { ! 721: advise (LLOG_EXCEPTIONS, "failed", "SIOCGIFNETMASK on %s", ! 722: is -> ifn_descr); ! 723: continue; ! 724: } ! 725: ic -> sa = ifreq.ifr_addr; /* struct copy */ ! 726: } ! 727: else ! 728: bzero ((char *) ic, sizeof *ic); ! 729: #else ! 730: nz -> n_name = "union sockaddr_un", ! 731: nz -> n_value = (unsigned long) ifaddr.ifa_addr; ! 732: if (getkmem (nz, (caddr_t) ia, sizeof *ia) == NOTOK) ! 733: continue; ! 734: ! 735: if (ia -> sa.sa_family == AF_UNSPEC) ! 736: continue; ! 737: ! 738: if (ia -> sa.sa_family == AF_INET) { ! 739: nz -> n_value = (unsigned long) ifaddr.ifa_broadaddr; ! 740: if (getkmem (nz, (caddr_t) ib, sizeof *ib) == NOTOK) ! 741: continue; ! 742: } ! 743: ! 744: nz -> n_value = (unsigned long) ifaddr.ifa_netmask; ! 745: if (getkmem (nz, (caddr_t) ic, sizeof *ic) == NOTOK) ! 746: continue; ! 747: #endif ! 748: if (ia -> sa.sa_family == AF_INET ! 749: && ic -> un_in.sin_addr.s_addr == 0) { ! 750: if (IN_CLASSA (ia -> un_in.sin_addr.s_addr)) ! 751: ic -> un_in.sin_addr.s_addr = IN_CLASSA_NET; ! 752: else ! 753: if (IN_CLASSB (ia -> un_in.sin_addr.s_addr)) ! 754: ic -> un_in.sin_addr.s_addr = IN_CLASSB_NET; ! 755: else ! 756: ic -> un_in.sin_addr.s_addr = IN_CLASSC_NET; ! 757: } ! 758: ! 759: if (as = find_address (ia)) ! 760: as -> adr_indexmask |= is -> ifn_indexmask; ! 761: else { ! 762: if ((as = (struct address *) calloc (1, sizeof *as)) == NULL) ! 763: adios (NULLCP, "out of memory"); ! 764: *afp = as, afp = &as -> adr_next, adrNumber++; ! 765: ! 766: as -> adr_address = *ia; /* struct copy */ ! 767: if (ia -> sa.sa_family == AF_INET) ! 768: as -> adr_broadaddr = *ib; /* struct copy */ ! 769: as -> adr_netmask = *ic; /* .. */ ! 770: ! 771: as -> adr_indexmask = is -> ifn_indexmask; ! 772: ! 773: switch (ia -> sa.sa_family) { ! 774: case AF_INET: ! 775: as -> adr_insize = ! 776: ipaddr2oid (as -> adr_instance, ! 777: &ia -> un_in.sin_addr); ! 778: if (afs_inet == NULL) /* needed for find_address */ ! 779: afs_inet = as; ! 780: break; ! 781: ! 782: #ifdef BSD44 ! 783: case AF_ISO: ! 784: as -> adr_insize = ! 785: clnpaddr2oid (as -> adr_instance, ! 786: &ia -> un_iso.siso_addr); ! 787: if (afs_iso == NULL) /* needed for find_address */ ! 788: afs_iso = as; ! 789: break; ! 790: #endif ! 791: ! 792: default: ! 793: bzero ((char *) as -> adr_instance, ! 794: sizeof as -> adr_instance); ! 795: as -> adr_insize = 0; ! 796: break; ! 797: } ! 798: } ! 799: } ! 800: #endif ! 801: ! 802: is -> ifn_interface = ifns; /* struct copy */ ! 803: ! 804: if (is -> ifn_type != TYPE_ETHER) ! 805: #ifdef NEW_AT ! 806: bzero ((char *) is -> ifn_interface.ac_enaddr, ! 807: sizeof is -> ifn_interface.ac_enaddr); ! 808: #else ! 809: bzero ((char *) is -> ifn_interface.ac_enaddr.ether_addr_octet, ! 810: sizeof is -> ifn_interface.ac_enaddr.ether_addr_octet); ! 811: #endif ! 812: } ! 813: ! 814: ifNumber = 0; ! 815: for (is = ifs; is; is = is -> ifn_next) { ! 816: is -> ifn_ready = 0; ! 817: ! 818: for (as = afs; as; as = as -> adr_next) ! 819: if (as -> adr_indexmask & is -> ifn_indexmask) ! 820: break; ! 821: if (as) ! 822: ifNumber += (is -> ifn_ready = 1); ! 823: } ! 824: if (ot = text2obj ("ifNumber")) ! 825: *((integer *) ot -> ot_info) = ifNumber; ! 826: ! 827: if (debug && first_time) { ! 828: first_time = 0; ! 829: ! 830: for (as = afs; as; as = as -> adr_next) { ! 831: OIDentifier oids; ! 832: ! 833: oids.oid_elements = as -> adr_instance; ! 834: oids.oid_nelem = as -> adr_insize; ! 835: advise (LLOG_DEBUG, NULLCP, ! 836: "add address: %d/%s with mask 0x%x", ! 837: as -> adr_address.sa.sa_family, sprintoid (&oids), ! 838: as -> adr_indexmask); ! 839: } ! 840: } ! 841: ! 842: if (adrNumber <= 1) ! 843: return OK; ! 844: ! 845: if ((base = (struct address **) ! 846: malloc ((unsigned) (adrNumber * sizeof *base))) == NULL) ! 847: adios (NULLCP, "out of memory"); ! 848: ! 849: afe = base; ! 850: for (as = afs; as; as = as -> adr_next) ! 851: *afe++ = as; ! 852: ! 853: qsort ((char *) base, adrNumber, sizeof *base, adr_compar); ! 854: ! 855: afp = base; ! 856: as = afs = *afp++; ! 857: afs_inet = NULL; ! 858: #ifdef BSD44 ! 859: afs_iso = NULL; ! 860: #endif ! 861: while (afp < afe) { ! 862: switch (as -> adr_address.sa.sa_family) { ! 863: case AF_INET: ! 864: if (afs_inet == NULL) ! 865: afs_inet = as; ! 866: break; ! 867: ! 868: #ifdef BSD44 ! 869: case AF_ISO: ! 870: if (afs_iso == NULL) ! 871: afs_iso = as; ! 872: break; ! 873: #endif ! 874: } ! 875: ! 876: as -> adr_next = *afp; ! 877: as = *afp++; ! 878: } ! 879: switch (as -> adr_address.sa.sa_family) { ! 880: case AF_INET: ! 881: if (afs_inet == NULL) ! 882: afs_inet = as; ! 883: break; ! 884: ! 885: #ifdef BSD44 ! 886: case AF_ISO: ! 887: if (afs_iso == NULL) ! 888: afs_iso = as; ! 889: break; ! 890: #endif ! 891: } ! 892: as -> adr_next = NULL; ! 893: ! 894: free ((char *) base); ! 895: ! 896: return OK; ! 897: } ! 898: ! 899: /* */ ! 900: ! 901: struct address *find_address (addr) ! 902: register union sockaddr_un *addr; ! 903: { ! 904: register struct address *as; ! 905: register struct in_addr *in; ! 906: #ifdef BSD44 ! 907: register struct iso_addr *iso; ! 908: #endif ! 909: ! 910: switch (addr -> sa.sa_family) { ! 911: case AF_INET: ! 912: in = &addr -> un_in.sin_addr; ! 913: for (as = afs_inet; as; as = as -> adr_next) ! 914: if (as -> adr_address.sa.sa_family != AF_INET) ! 915: break; ! 916: else ! 917: if (bcmp ((char *) in, ! 918: (char *) &as -> adr_address.un_in.sin_addr, ! 919: sizeof *in) == 0) ! 920: return as; ! 921: break; ! 922: ! 923: #ifdef BSD44 ! 924: case AF_ISO: ! 925: iso = &addr -> un_iso.siso_addr; ! 926: for (as = afs_iso; as; as = as -> adr_next) ! 927: if (as -> adr_address.sa.sa_family != AF_ISO) ! 928: break; ! 929: else ! 930: if (bcmp ((char *) iso, ! 931: (char *) &as -> adr_address.un_iso.siso_addr, ! 932: sizeof *iso) == 0) ! 933: return as; ! 934: ! 935: break; ! 936: #endif ! 937: ! 938: default: ! 939: break; ! 940: } ! 941: ! 942: return NULL; ! 943: } ! 944: ! 945: /* */ ! 946: ! 947: struct address *get_addrent (ip, len, head, isnext) ! 948: register unsigned int *ip; ! 949: int len; ! 950: struct address *head; ! 951: int isnext; ! 952: { ! 953: int family; ! 954: register struct address *as; ! 955: ! 956: if (head) ! 957: family = head -> adr_address.sa.sa_family; ! 958: for (as = head; as; as = as -> adr_next) ! 959: if (as -> adr_address.sa.sa_family != family) ! 960: break; ! 961: else ! 962: switch (elem_cmp (as -> adr_instance, as -> adr_insize, ip, len)) { ! 963: case 0: ! 964: if (!isnext) ! 965: return as; ! 966: if ((as = as -> adr_next) == NULL ! 967: || as -> adr_address.sa.sa_family != family) ! 968: return NULL; ! 969: /* else fall... */ ! 970: ! 971: case 1: ! 972: return (isnext ? as : NULL); ! 973: } ! 974: ! 975: return NULL; ! 976: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.