sys/src/libip/readipifc.c

   1 #include <u.h>
   2 #include <libc.h>
   3 #include <ctype.h>
   4 #include <ip.h>
   5
   6 static Ipifc**
   7 _readoldipifc(char *buf, Ipifc **l, int index)
   8 {
   9         char *f[200];
  10         int i, n;
  11         Ipifc *ifc;
  12         Iplifc *lifc, **ll;
  13
  14         /* allocate new interface */
  15         *l = ifc = mallocz(sizeof(Ipifc), 1);
  16         if(ifc == nil)
  17                 return l;
  18         l = &ifc->next;
  19         ifc->index = index;
  20
  21         n = tokenize(buf, f, nelem(f));
  22         if(n < 2)
  23                 return l;
  24
  25         strncpy(ifc->dev, f[0], sizeof ifc->dev);
  26         ifc->dev[sizeof(ifc->dev) - 1] = 0;
  27         ifc->mtu = strtoul(f[1], nil, 10);
  28
  29         ll = &ifc->lifc;
  30         for(i = 2; n-i >= 7; i += 7){
  31                 /* allocate new local address */
  32                 *ll = lifc = mallocz(sizeof(Iplifc), 1);
  33                 ll = &lifc->next;
  34
  35                 parseip(lifc->ip, f[i]);
  36                 parseipmask(lifc->mask, f[i+1]);
  37                 parseip(lifc->net, f[i+2]);
  38                 ifc->pktin = strtoul(f[i+3], nil, 10);
  39                 ifc->pktout = strtoul(f[i+4], nil, 10);
  40                 ifc->errin = strtoul(f[i+5], nil, 10);
  41                 ifc->errout = strtoul(f[i+6], nil, 10);
  42         }
  43         return l;
  44 }
  45
  46 static char*
  47 findfield(char *name, char **f, int n)
  48 {
  49         int i;
  50
  51         for(i = 0; i < n-1; i++)
  52                 if(strcmp(f[i], name) == 0)
  53                         return f[i+1];
  54         return "";
  55 }
  56
  57 static Ipifc**
  58 _readipifc(char *file, Ipifc **l, int index)
  59 {
  60         int i, n, fd, lines;
  61         char buf[4*1024];
  62         char *line[32];
  63         char *f[64];
  64         Ipifc *ifc, **l0;
  65         Iplifc *lifc, **ll;
  66
  67         /* read the file */
  68         fd = open(file, OREAD);
  69         if(fd < 0)
  70                 return l;
  71         n = 0;
  72         while((i = read(fd, buf+n, sizeof(buf)-1-n)) > 0 && n < sizeof(buf) - 1)
  73                 n += i;
  74         buf[n] = 0;
  75         close(fd);
  76
  77         if(strncmp(buf, "device", 6) != 0)
  78                 return _readoldipifc(buf, l, index);
  79         /* ignore ifcs with no associated device */
  80         if(strncmp(buf+6, "  ", 2) == 0)
  81                 return l;
  82         /* allocate new interface */
  83         *l = ifc = mallocz(sizeof(Ipifc), 1);
  84         if(ifc == nil)
  85                 return l;
  86         l0 = l;
  87         l = &ifc->next;
  88         ifc->index = index;
  89
  90         lines = getfields(buf, line, nelem(line), 1, "\n");
  91
  92         /* pick off device specific info(first line) */
  93         n = tokenize(line[0], f, nelem(f));
  94         if(n%2 != 0)
  95                 goto lose;
  96         strncpy(ifc->dev, findfield("device", f, n), sizeof(ifc->dev));
  97         ifc->dev[sizeof(ifc->dev)-1] = 0;
  98         if(ifc->dev[0] == 0){
  99 lose:
 100                 free(ifc);
 101                 *l0 = nil;
 102                 return l;
 103         }
 104         ifc->mtu = strtoul(findfield("maxtu", f, n), nil, 10);
 105         ifc->sendra6 = atoi(findfield("sendra", f, n));
 106         ifc->recvra6 = atoi(findfield("recvra", f, n));
 107         ifc->rp.mflag = atoi(findfield("mflag", f, n));
 108         ifc->rp.oflag = atoi(findfield("oflag", f, n));
 109         ifc->rp.maxraint = atoi(findfield("maxraint", f, n));
 110         ifc->rp.minraint = atoi(findfield("minraint", f, n));
 111         ifc->rp.linkmtu = atoi(findfield("linkmtu", f, n));
 112         ifc->rp.reachtime = atoi(findfield("reachtime", f, n));
 113         ifc->rp.rxmitra = atoi(findfield("rxmitra", f, n));
 114         ifc->rp.ttl = atoi(findfield("ttl", f, n));
 115         ifc->rp.routerlt = atoi(findfield("routerlt", f, n));
 116         ifc->pktin = strtoul(findfield("pktin", f, n), nil, 10);
 117         ifc->pktout = strtoul(findfield("pktout", f, n), nil, 10);
 118         ifc->errin = strtoul(findfield("errin", f, n), nil, 10);
 119         ifc->errout = strtoul(findfield("errout", f, n), nil, 10);
 120
 121         /* now read the addresses */
 122         ll = &ifc->lifc;
 123         for(i = 1; i < lines; i++){
 124                 n = tokenize(line[i], f, nelem(f));
 125                 if(n < 5)
 126                         break;
 127
 128                 /* allocate new local address */
 129                 *ll = lifc = mallocz(sizeof(Iplifc), 1);
 130                 ll = &lifc->next;
 131
 132                 parseip(lifc->ip, f[0]);
 133                 parseipmask(lifc->mask, f[1]);
 134                 parseip(lifc->net, f[2]);
 135
 136                 lifc->validlt = strtoul(f[3], nil, 10);
 137                 lifc->preflt = strtoul(f[4], nil, 10);
 138         }
 139
 140         return l;
 141 }
 142
 143 static void
 144 _freeifc(Ipifc *ifc)
 145 {
 146         Ipifc *next;
 147         Iplifc *lnext, *lifc;
 148
 149         if(ifc == nil)
 150                 return;
 151         for(; ifc; ifc = next){
 152                 next = ifc->next;
 153                 for(lifc = ifc->lifc; lifc; lifc = lnext){
 154                         lnext = lifc->next;
 155                         free(lifc);
 156                 }
 157                 free(ifc);
 158         }
 159 }
 160
 161 Ipifc*
 162 readipifc(char *net, Ipifc *ifc, int index)
 163 {
 164         int fd, i, n;
 165         Dir *dir;
 166         char directory[128];
 167         char buf[128];
 168         Ipifc **l;
 169
 170         _freeifc(ifc);
 171
 172         l = &ifc;
 173         ifc = nil;
 174
 175         if(net == 0)
 176                 net = "/net";
 177         snprint(directory, sizeof(directory), "%s/ipifc", net);
 178
 179         if(index >= 0){
 180                 snprint(buf, sizeof(buf), "%s/%d/status", directory, index);
 181                 _readipifc(buf, l, index);
 182         } else {
 183                 fd = open(directory, OREAD);
 184                 if(fd < 0)
 185                         return nil;
 186                 n = dirreadall(fd, &dir);
 187                 close(fd);
 188
 189                 for(i = 0; i < n; i++){
 190                         if(strcmp(dir[i].name, "clone") == 0)
 191                                 continue;
 192                         if(strcmp(dir[i].name, "stats") == 0)
 193                                 continue;
 194                         snprint(buf, sizeof(buf), "%s/%s/status", directory, dir[i].name);
 195                         l = _readipifc(buf, l, atoi(dir[i].name));
 196                 }
 197                 free(dir);
 198         }
 199
 200         return ifc;
 201 }