usr.sbin/mopd/common/device.c

   1 /*      $NetBSD: device.c,v 1.10 2009/10/20 00:51:13 snj Exp $  */
   2
   3 /*
   4  * Copyright (c) 1993-95 Mats O Jansson.  All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   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  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  18  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  20  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  21  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  22  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  24  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  25  */
  26
  27 #include <sys/cdefs.h>
  28 #ifndef lint
  29 __RCSID("$NetBSD: device.c,v 1.10 2009/10/20 00:51:13 snj Exp $");
  30 #endif
  31
  32 #include "os.h"
  33 #include "common.h"
  34 #include "device.h"
  35 #include "mopdef.h"
  36 #include "pf.h"
  37 #include "log.h"
  38
  39 struct  if_info *iflist;                /* Interface List               */
  40
  41 void    deviceOpen(const char *, u_short, int);
  42
  43 #ifdef  DEV_NEW_CONF
  44 /*
  45  * Return ethernet address for interface
  46  */
  47
  48 void
  49 deviceEthAddr(const char *ifname, u_char *eaddr)
  50 {
  51         struct sockaddr_dl *sdl;
  52         struct ifaddrs *ifap, *ifa;
  53
  54         if (getifaddrs(&ifap) != 0)
  55                 mopLogErr("deviceEthAddr: getifaddrs");
  56
  57         for (ifa = ifap; ifa; ifa = ifa->ifa_next) {
  58                 sdl = (struct sockaddr_dl *)ifa->ifa_addr;
  59                 if (sdl->sdl_family != AF_LINK || sdl->sdl_type != IFT_ETHER ||
  60                     sdl->sdl_alen != 6)
  61                         continue;
  62                 if (!strcmp(ifa->ifa_name, ifname)) {
  63                         memmove((caddr_t)eaddr, (caddr_t)LLADDR(sdl), 6);
  64                         freeifaddrs(ifap);
  65                         return;
  66                 }
  67         }
  68
  69         freeifaddrs(ifap);
  70         mopLogErrX("deviceEthAddr: Never saw interface `%s'!", ifname);
  71 }
  72 #endif  /* DEV_NEW_CONF */
  73
  74 void
  75 deviceOpen(const char *ifname, u_short proto, int trans)
  76 {
  77         struct if_info *p, tmp;
  78
  79         strlcpy(tmp.if_name, ifname, sizeof(tmp.if_name));
  80         tmp.iopen   = pfInit;
  81
  82         switch (proto) {
  83         case MOP_K_PROTO_RC:
  84                 tmp.read = mopReadRC;
  85                 tmp.fd   = mopOpenRC(&tmp, trans);
  86                 break;
  87         case MOP_K_PROTO_DL:
  88                 tmp.read = mopReadDL;
  89                 tmp.fd   = mopOpenDL(&tmp, trans);
  90                 break;
  91         default:
  92                 break;
  93         }
  94
  95         if (tmp.fd != -1) {
  96                 p = (struct if_info *)malloc(sizeof(*p));
  97                 if (p == 0)
  98                         mopLogErr("deviceOpen: malloc");
  99
 100                 p->next = iflist;
 101                 iflist = p;
 102
 103                 strlcpy(p->if_name, tmp.if_name, sizeof(p->if_name));
 104                 p->iopen   = tmp.iopen;
 105                 p->write   = pfWrite;
 106                 p->read    = tmp.read;
 107                 memset((char *)p->eaddr, 0, sizeof(p->eaddr));
 108                 p->fd      = tmp.fd;
 109
 110 #ifdef  DEV_NEW_CONF
 111                 deviceEthAddr(p->if_name,&p->eaddr[0]);
 112 #else
 113                 p->eaddr[0]= tmp.eaddr[0];
 114                 p->eaddr[1]= tmp.eaddr[1];
 115                 p->eaddr[2]= tmp.eaddr[2];
 116                 p->eaddr[3]= tmp.eaddr[3];
 117                 p->eaddr[4]= tmp.eaddr[4];
 118                 p->eaddr[5]= tmp.eaddr[5];
 119 #endif  /* DEV_NEW_CONF */
 120
 121         }
 122 }
 123
 124 void
 125 deviceInitOne(const char *ifname)
 126 {
 127         char    interface[IFNAME_SIZE];
 128         struct if_info *p;
 129         int     trans;
 130 #ifdef _AIX
 131         char    dev[IFNAME_SIZE];
 132         int     unit,j;
 133
 134         unit = 0;
 135         for (j = 0; j < strlen(ifname); j++) {
 136                 if (isalpha(ifname[j])) {
 137                         dev[j] = ifname[j];
 138                 } else {
 139                         if (isdigit(ifname[j])) {
 140                                 unit = unit*10 + ifname[j] - '0';
 141                                 dev[j] = '\0';
 142                         }
 143                 }
 144         }
 145
 146         if ((strlen(dev) == 2) &&
 147             (dev[0] == 'e') &&
 148             ((dev[1] == 'n') || (dev[1] == 't'))) {
 149                 snprintf(interface, sizeof(interface), "ent%d\0", unit);
 150         } else {
 151                 snprintf(interface, sizeof(interface), "%s%d\0", dev, unit);
 152         }
 153 #else
 154         snprintf(interface, sizeof(interface), "%s", ifname);
 155 #endif /* _AIX */
 156
 157         /* Ok, init it just once */
 158
 159         p = iflist;
 160         for (p = iflist; p; p = p->next)  {
 161                 if (strcmp(p->if_name,interface) == 0) {
 162                         return;
 163                 }
 164         }
 165
 166         if (!mopInteractive)
 167                 syslog(LOG_INFO, "Initialized %s", interface);
 168
 169         /* Ok, get transport information */
 170
 171         trans = pfTrans(interface);
 172
 173 #ifndef NORC
 174         /* Start with MOP Remote Console */
 175
 176         switch (trans) {
 177         case TRANS_ETHER:
 178                 deviceOpen(interface,MOP_K_PROTO_RC,TRANS_ETHER);
 179                 break;
 180         case TRANS_8023:
 181                 deviceOpen(interface,MOP_K_PROTO_RC,TRANS_8023);
 182                 break;
 183         case TRANS_ETHER+TRANS_8023:
 184                 deviceOpen(interface,MOP_K_PROTO_RC,TRANS_ETHER);
 185                 deviceOpen(interface,MOP_K_PROTO_RC,TRANS_8023);
 186                 break;
 187         case TRANS_ETHER+TRANS_8023+TRANS_AND:
 188                 deviceOpen(interface,MOP_K_PROTO_RC,TRANS_ETHER+TRANS_8023);
 189                 break;
 190         }
 191 #endif
 192
 193 #ifndef NODL
 194         /* and next MOP Dump/Load */
 195
 196         switch (trans) {
 197         case TRANS_ETHER:
 198                 deviceOpen(interface,MOP_K_PROTO_DL,TRANS_ETHER);
 199                 break;
 200         case TRANS_8023:
 201                 deviceOpen(interface,MOP_K_PROTO_DL,TRANS_8023);
 202                 break;
 203         case TRANS_ETHER+TRANS_8023:
 204                 deviceOpen(interface,MOP_K_PROTO_DL,TRANS_ETHER);
 205                 deviceOpen(interface,MOP_K_PROTO_DL,TRANS_8023);
 206                 break;
 207         case TRANS_ETHER+TRANS_8023+TRANS_AND:
 208                 deviceOpen(interface,MOP_K_PROTO_DL,TRANS_ETHER+TRANS_8023);
 209                 break;
 210         }
 211 #endif
 212
 213 }
 214
 215 /*
 216  * Initialize all "candidate" interfaces that are in the system
 217  * configuration list.  A "candidate" is up, not loopback and not
 218  * point to point.
 219  */
 220 void
 221 deviceInitAll()
 222 {
 223 #ifdef  DEV_NEW_CONF
 224         struct sockaddr_dl *sdl;
 225         struct ifaddrs *ifap, *ifa;
 226
 227         if (getifaddrs(&ifap) != 0)
 228                 mopLogErr("deviceInitAll: socket");
 229
 230         for (ifa = ifap; ifa; ifa = ifa->ifa_next) {
 231                 sdl = (struct sockaddr_dl *)ifa->ifa_addr;
 232                 if (sdl->sdl_family != AF_LINK || sdl->sdl_type != IFT_ETHER ||
 233                     sdl->sdl_alen != 6)
 234                         continue;
 235                 if ((ifa->ifa_flags &
 236                     (IFF_UP | IFF_LOOPBACK | IFF_POINTOPOINT)) != IFF_UP)
 237                         continue;
 238                 deviceInitOne(ifa->ifa_name);
 239         }
 240
 241         freeifaddrs(ifap);
 242 #else
 243         struct ifaddrs *ifap, *ifa;
 244
 245         if (getifaddrs(&ifap) != 0)
 246                 mopLogErr("deviceInitAll: old socket");
 247
 248         for (ifa = ifap; ifa; ifa = ifa->ifa_next) {
 249                 if (/*(ifa->ifa_flags & IFF_UP) == 0 ||*/
 250                     ifa->ifa_flags & IFF_LOOPBACK ||
 251                     ifa->ifa_flags & IFF_POINTOPOINT)
 252                         continue;
 253                 deviceInitOne(ifa->ifa_name);
 254         }
 255
 256         freeifaddrs(ifap);
 257 #endif /* DEV_NEW_CONF */
 258 }