statistics.c

   1 /*
   2  * Copyright 1997,1999,2000 Andi Kleen. Subject to the GPL.
   3  * $Id: statistics.c,v 1.16 2001/10/24 11:57:05 ak Exp $
   4  * 19980630 - i18n - Arnaldo Carvalho de Melo <acme@conectiva.com.br>
   5  * 19981113 - i18n fixes - Arnaldo Carvalho de Melo <acme@conectiva.com.br>
   6  * 19990101 - added net/netstat, -t, -u, -w supprt - Bernd Eckenfels
   7  */
   8 #include <ctype.h>
   9 #include <stdio.h>
  10 #include <stdlib.h>
  11 #include <string.h>
  12 #include "config.h"
  13 #include "intl.h"
  14
  15 /* #define WARN 1 */
  16
  17 #ifdef WARN
  18 #define UFWARN(x) x
  19 #else
  20 #define UFWARN(x)
  21 #endif
  22
  23 int print_static,f_raw,f_tcp,f_udp,f_unknown = 1;
  24
  25 enum State {
  26     number = 0, opt_number, i_forward, i_inp_icmp, i_outp_icmp, i_rto_alg,
  27     MaxState
  28 };
  29
  30 #define normal number
  31
  32 struct entry {
  33     char *title;
  34     char *out;
  35     enum State type;
  36 };
  37
  38 struct statedesc {
  39     int indent;
  40     char *title;
  41 };
  42
  43 struct statedesc states[] = {
  44     [number] = { 4, NULL },
  45     [opt_number] = { 4, NULL },
  46     [i_forward] = { 4, NULL },
  47     [i_inp_icmp] = { 8, N_("ICMP input histogram:") },
  48     [i_outp_icmp] = { 8, N_("ICMP output histogram:") },
  49     [MaxState] = {0},
  50 };
  51
  52 static enum State state;
  53
  54 #define I_STATIC (1<<16)        /* static configuration option. */
  55 #define I_TITLE  (1<<17)
  56
  57 /*
  58  * XXX check against the snmp mib rfc.
  59  *
  60  * Don't mark the first field as translatable! It's a snmp MIB standard.
  61  * - acme
  62  */
  63 struct entry Iptab[] =
  64 {
  65     {"Forwarding", N_("Forwarding is %s"), i_forward | I_STATIC},
  66     {"DefaultTTL", N_("Default TTL is %u"), number | I_STATIC},
  67     {"InReceives", N_("%u total packets received"), number},
  68     {"InHdrErrors", N_("%u with invalid headers"), opt_number},
  69     {"InAddrErrors", N_("%u with invalid addresses"), opt_number},
  70     {"ForwDatagrams", N_("%u forwarded"), number},
  71     {"InUnknownProtos", N_("%u with unknown protocol"), opt_number},
  72     {"InDiscards", N_("%u incoming packets discarded"), number},
  73     {"InDelivers", N_("%u incoming packets delivered"), number},
  74     {"OutRequests", N_("%u requests sent out"), number},        /*? */
  75     {"OutDiscards", N_("%u outgoing packets dropped"), opt_number},
  76     {"OutNoRoutes", N_("%u dropped because of missing route"), opt_number},
  77     {"ReasmTimeout", N_("%u fragments dropped after timeout"), opt_number},
  78     {"ReasmReqds", N_("%u reassemblies required"), opt_number}, /* ? */
  79     {"ReasmOKs", N_("%u packets reassembled ok"), opt_number},
  80     {"ReasmFails", N_("%u packet reassembles failed"), opt_number},
  81     {"FragOKs", N_("%u fragments received ok"), opt_number},
  82     {"FragFails", N_("%u fragments failed"), opt_number},
  83     {"FragCreates", N_("%u fragments created"), opt_number}
  84 };
  85
  86 struct entry Icmptab[] =
  87 {
  88     {"InMsgs", N_("%u ICMP messages received"), number},
  89     {"InErrors", N_("%u input ICMP message failed."), number},
  90     {"InDestUnreachs", N_("destination unreachable: %u"), i_inp_icmp | I_TITLE},
  91     {"InTimeExcds", N_("timeout in transit: %u"), i_inp_icmp | I_TITLE},
  92     {"InParmProbs", N_("wrong parameters: %u"), i_inp_icmp | I_TITLE},  /*? */
  93     {"InSrcQuenchs", N_("source quenches: %u"), i_inp_icmp | I_TITLE},
  94     {"InRedirects", N_("redirects: %u"), i_inp_icmp | I_TITLE},
  95     {"InEchos", N_("echo requests: %u"), i_inp_icmp | I_TITLE},
  96     {"InEchoReps", N_("echo replies: %u"), i_inp_icmp | I_TITLE},
  97     {"InTimestamps", N_("timestamp request: %u"), i_inp_icmp | I_TITLE},
  98     {"InTimestampReps", N_("timestamp reply: %u"), i_inp_icmp | I_TITLE},
  99     {"InAddrMasks", N_("address mask request: %u"), i_inp_icmp | I_TITLE},      /*? */
 100     {"InAddrMaskReps", N_("address mask replies: %u"), i_inp_icmp | I_TITLE},   /*? */
 101     {"OutMsgs", N_("%u ICMP messages sent"), number},
 102     {"OutErrors", N_("%u ICMP messages failed"), number},
 103     {"OutDestUnreachs", N_("destination unreachable: %u"), i_outp_icmp | I_TITLE},
 104     {"OutTimeExcds", N_("time exceeded: %u"), i_outp_icmp | I_TITLE},
 105     {"OutParmProbs", N_("wrong parameters: %u"), i_outp_icmp | I_TITLE},        /*? */
 106     {"OutSrcQuenchs", N_("source quench: %u"), i_outp_icmp | I_TITLE},
 107     {"OutRedirects", N_("redirect: %u"), i_outp_icmp | I_TITLE},
 108     {"OutEchos", N_("echo request: %u"), i_outp_icmp | I_TITLE},
 109     {"OutEchoReps", N_("echo replies: %u"), i_outp_icmp | I_TITLE},
 110     {"OutTimestamps", N_("timestamp requests: %u"), i_outp_icmp | I_TITLE},
 111     {"OutTimestampReps", N_("timestamp replies: %u"), i_outp_icmp | I_TITLE},
 112     {"OutAddrMasks", N_("address mask requests: %u"), i_outp_icmp | I_TITLE},
 113     {"OutAddrMaskReps", N_("address mask replies: %u"), i_outp_icmp | I_TITLE},
 114 };
 115
 116 struct entry Tcptab[] =
 117 {
 118     {"RtoAlgorithm", N_("RTO algorithm is %s"), i_rto_alg | I_STATIC},
 119     {"RtoMin", "", number},
 120     {"RtoMax", "", number},
 121     {"MaxConn", "", number},
 122     {"ActiveOpens", N_("%u active connections openings"), number},
 123     {"PassiveOpens", N_("%u passive connection openings"), number},
 124     {"AttemptFails", N_("%u failed connection attempts"), number},
 125     {"EstabResets", N_("%u connection resets received"), number},
 126     {"CurrEstab", N_("%u connections established"), number},
 127     {"InSegs", N_("%u segments received"), number},
 128     {"OutSegs", N_("%u segments send out"), number},
 129     {"RetransSegs", N_("%u segments retransmited"), number},
 130     {"InErrs", N_("%u bad segments received."), number},
 131     {"OutRsts", N_("%u resets sent"), number},
 132 };
 133
 134 struct entry Udptab[] =
 135 {
 136     {"InDatagrams", N_("%u packets received"), number},
 137     {"NoPorts", N_("%u packets to unknown port received."), number},
 138     {"InErrors", N_("%u packet receive errors"), number},
 139     {"OutDatagrams", N_("%u packets sent"), number},
 140 };
 141
 142 struct entry Tcpexttab[] =
 143 {
 144     {"SyncookiesSent", N_("%u SYN cookies sent"), opt_number},
 145     {"SyncookiesRecv", N_("%u SYN cookies received"), opt_number},
 146     {"SyncookiesFailed", N_("%u invalid SYN cookies received"), opt_number},
 147
 148     { "EmbryonicRsts", N_("%u resets received for embryonic SYN_RECV sockets"),
 149       opt_number },
 150     { "PruneCalled", N_("%u packets pruned from receive queue because of socket"
 151                         " buffer overrun"), opt_number },
 152     /* obsolete: 2.2.0 doesn't do that anymore */
 153     { "RcvPruned", N_("%u packets pruned from receive queue"), opt_number },
 154     { "OfoPruned", N_("%u packets dropped from out-of-order queue because of"
 155                       " socket buffer overrun"), opt_number },
 156     { "OutOfWindowIcmps", N_("%u ICMP packets dropped because they were "
 157                              "out-of-window"), opt_number },
 158     { "LockDroppedIcmps", N_("%u ICMP packets dropped because"
 159                              " socket was locked"), opt_number },
 160     { "TW", N_("%u TCP sockets finished time wait in fast timer"), opt_number },
 161     { "TWRecycled", N_("%u time wait sockets recycled by time stamp"), opt_number },
 162     { "TWKilled", N_("%u TCP sockets finished time wait in slow timer"), opt_number },
 163     { "PAWSPassive", N_("%u passive connections rejected because of"
 164                         " time stamp"), opt_number },
 165     { "PAWSActive", N_("%u active connections rejected because of "
 166                        "time stamp"), opt_number },
 167     { "PAWSEstab", N_("%u packets rejects in established connections because of"
 168                       " timestamp"), opt_number },
 169     { "DelayedACKs", N_("%u delayed acks sent"), opt_number },
 170     { "DelayedACKLocked", N_("%u delayed acks further delayed because of"
 171                              " locked socket"), opt_number },
 172     { "DelayedACKLost", N_("Quick ack mode was activated %u times"), opt_number },
 173     { "ListenOverflows", N_("%u times the listen queue of a socket overflowed"),
 174       opt_number },
 175     { "ListenDrops", N_("%u SYNs to LISTEN sockets ignored"), opt_number },
 176     { "TCPPrequeued", N_("%u packets directly queued to recvmsg prequeue."),
 177       opt_number },
 178     { "TCPDirectCopyFromBacklog", N_("%u packets directly received"
 179                                      " from backlog"), opt_number },
 180     { "TCPDirectCopyFromPrequeue", N_("%u packets directly received"
 181                                       " from prequeue"), opt_number },
 182     { "TCPPrequeueDropped", N_("%u packets dropped from prequeue"), opt_number },
 183     { "TCPHPHits", N_("%u packet headers predicted"), number },
 184     { "TCPHPHitsToUser", N_("%u packets header predicted and "
 185                             "directly queued to user"), opt_number },
 186     { "SockMallocOOM", N_("Ran %u times out of system memory during "
 187                           "packet sending"), opt_number },
 188     { "TCPPureAcks", N_("%u acknowledgments not containing data received"), opt_number },
 189     { "TCPHPAcks", N_("%u predicted acknowledgments"), opt_number },
 190     { "TCPRenoRecovery", N_("%u times recovered from packet loss due to fast retransmit"), opt_number },
 191     { "TCPSackRecovery", N_("%u times recovered from packet loss due to SACK data"), opt_number },
 192     { "TCPSACKReneging", N_("%u bad SACKs received"), opt_number },
 193     { "TCPFACKReorder", N_("Detected reordering %u times using FACK"), opt_number },
 194     { "TCPSACKReorder", N_("Detected reordering %u times using SACK"), opt_number },
 195     { "TCPTSReorder", N_("Detected reordering %u times using time stamp"), opt_number },
 196     { "TCPRenoReorder", N_("Detected reordering %u times using reno fast retransmit"), opt_number },
 197     { "TCPFullUndo", N_("%u congestion windows fully recovered"), opt_number },
 198     { "TCPPartialUndo", N_("%u congestion windows partially recovered using Hoe heuristic"), opt_number },
 199     { "TCPDSackUndo", N_("%u congestion window recovered using DSACK"), opt_number },
 200     { "TCPLossUndo", N_("%u congestion windows recovered after partial ack"), opt_number },
 201     { "TCPLostRetransmits", N_("%u retransmits lost"), opt_number },
 202     { "TCPRenoFailures",  N_("%u timeouts after reno fast retransmit"), opt_number },
 203     { "TCPSackFailures",  N_("%u timeouts after SACK recovery"), opt_number },
 204     { "TCPLossFailures",  N_("%u timeouts in loss state"), opt_number },
 205     { "TCPFastRetrans", N_("%u fast retransmits"), opt_number },
 206     { "TCPForwardRetrans", N_("%u forward retransmits"), opt_number },
 207     { "TCPSlowStartRetrans", N_("%u retransmits in slow start"), opt_number },
 208     { "TCPTimeouts", N_("%u other TCP timeouts"), opt_number },
 209     { "TCPRenoRecoveryFailed", N_("%u reno fast retransmits failed"), opt_number },
 210     { "TCPSackRecoveryFail", N_("%u sack retransmits failed"), opt_number },
 211     { "TCPSchedulerFailed", N_("%u times receiver scheduled too late for direct processing"), opt_number },
 212     { "TCPRcvCollapsed", N_("%u packets collapsed in receive queue due to low socket buffer"), opt_number },
 213     { "TCPDSACKOldSent", N_("%u DSACKs sent for old packets"), opt_number },
 214     { "TCPDSACKOfoSent", N_("%u DSACKs sent for out of order packets"), opt_number },
 215     { "TCPDSACKRecv", N_("%u DSACKs received"), opt_number },
 216     { "TCPDSACKOfoRecv", N_("%u DSACKs for out of order packets received"), opt_number },
 217     { "TCPAbortOnSyn", N_("%u connections reset due to unexpected SYN"), opt_number },
 218     { "TCPAbortOnData", N_("%u connections reset due to unexpected data"), opt_number },
 219     { "TCPAbortOnClose", N_("%u connections reset due to early user close"), opt_number },
 220     { "TCPAbortOnMemory", N_("%u connections aborted due to memory pressure"), opt_number },
 221     { "TCPAbortOnTimeout", N_("%u connections aborted due to timeout"), opt_number },
 222     { "TCPAbortOnLinger", N_("%u connections aborted after user close in linger timeout"), opt_number },
 223     { "TCPAbortFailed", N_("%u times unabled to send RST due to no memory"), opt_number },
 224     { "TCPMemoryPressures", N_("TCP ran low on memory %u times"), opt_number },
 225     { "TCPLoss", N_("%u TCP data loss events") },
 226 };
 227
 228 struct tabtab {
 229     char *title;
 230     struct entry *tab;
 231     size_t size;
 232     int *flag;
 233 };
 234
 235 struct tabtab snmptabs[] =
 236 {
 237     {"Ip", Iptab, sizeof(Iptab), &f_raw},
 238     {"Icmp", Icmptab, sizeof(Icmptab), &f_raw},
 239     {"Tcp", Tcptab, sizeof(Tcptab), &f_tcp},
 240     {"Udp", Udptab, sizeof(Udptab), &f_udp},
 241     {"TcpExt", Tcpexttab, sizeof(Tcpexttab), &f_tcp},
 242     {NULL}
 243 };
 244
 245 /* XXX IGMP */
 246
 247 int cmpentries(const void *a, const void *b)
 248 {
 249     return strcmp(((struct entry *) a)->title, ((struct entry *) b)->title);
 250 }
 251
 252 void printval(struct tabtab *tab, char *title, int val)
 253 {
 254     struct entry *ent = NULL, key;
 255     int type;
 256     char buf[512];
 257
 258     key.title = title;
 259         if (tab->tab)
 260             ent = bsearch(&key, tab->tab, tab->size / sizeof(struct entry),
 261                           sizeof(struct entry), cmpentries);
 262     if (!ent) {                 /* try our best */
 263         if (val)
 264                 printf("%*s%s: %d\n", states[state].indent, "", title, val);
 265         return;
 266     }
 267     type = ent->type;
 268     if (type & I_STATIC) {
 269         type &= ~I_STATIC;
 270         if (!print_static)
 271             return;
 272     }
 273     if (*ent->out == '\0')
 274         return;
 275
 276     if (type & I_TITLE) {
 277         type &= ~I_TITLE;
 278         if (state != type)
 279             printf("%*s%s\n", states[state].indent, "", _(states[type].title));
 280     }
 281     buf[0] = '\0';
 282     switch (type) {
 283     case opt_number:
 284         if (val == 0)
 285             break;
 286         /*FALL THOUGH*/
 287     case number:
 288         snprintf(buf, sizeof(buf), _(ent->out), val);
 289         break;
 290     case i_forward:
 291         type = normal;
 292         snprintf(buf, sizeof(buf), _(ent->out), val == 2 ? _("enabled") : _("disabled"));
 293         break;
 294     case i_outp_icmp:
 295     case i_inp_icmp:
 296         if (val > 0)
 297             snprintf(buf, sizeof(buf), _(ent->out), val);
 298         break;
 299     case i_rto_alg:             /* XXXX */
 300         break;
 301     default:
 302         abort();
 303     }
 304     if (buf[0])
 305         printf("%*s%s\n", states[type].indent, "", buf);
 306
 307     state = type;
 308 }
 309
 310 struct tabtab *newtable(struct tabtab *tabs, char *title)
 311 {
 312     struct tabtab *t;
 313         static struct tabtab dummytab;
 314
 315     for (t = tabs; t->title; t++) {
 316                 if (!strcmp(title, t->title)) {
 317                 if (*(t->flag))
 318                                 printf("%s:\n", _(title));
 319                     state = normal;
 320                         return t;
 321                 }
 322         }
 323         if (!f_unknown)
 324                 return NULL;
 325         printf("%s:\n", _(title));
 326         dummytab.title = title;
 327         dummytab.flag = &f_unknown;
 328         return &dummytab;
 329 }
 330
 331 void process_fd(FILE *f)
 332 {
 333     char buf1[1024], buf2[1024];
 334     char *sp, *np, *p;
 335     while (fgets(buf1, sizeof buf1, f)) {
 336         int endflag;
 337         struct tabtab *tab;
 338
 339         if (!fgets(buf2, sizeof buf2, f))
 340             break;
 341         sp = strchr(buf1, ':');
 342         np = strchr(buf2, ':');
 343         if (!np || !sp)
 344             goto formaterr;
 345         *sp = '\0';
 346
 347         tab = newtable(snmptabs, buf1);
 348         if (tab == NULL) {
 349                 printf("unknown %s\n", buf1);
 350                 continue;
 351         }
 352         np++;
 353         sp++;
 354
 355         endflag = 0;
 356         while (!endflag) {
 357             sp += strspn(sp, " \t\n");
 358             np += strspn(np, " \t\n");
 359             /*if (*np == '\0') goto formaterr; */
 360
 361             p = sp+strcspn(sp, " \t\n");
 362             if (*p == '\0')
 363                 endflag = 1;
 364             *p = '\0';
 365
 366             if (*sp != '\0' && *(tab->flag))
 367                 printval(tab, sp, strtoul(np, &np, 10));
 368
 369             sp = p + 1;
 370         }
 371     }
 372   return;
 373
 374 formaterr:
 375   perror(_("error parsing /proc/net/snmp"));
 376   return;
 377 }
 378
 379
 380 void parsesnmp(int flag_raw, int flag_tcp, int flag_udp)
 381 {
 382     FILE *f;
 383
 384     f_raw = flag_raw; f_tcp = flag_tcp; f_udp = flag_udp;
 385
 386     f = fopen("/proc/net/snmp", "r");
 387     if (!f) {
 388         perror(_("cannot open /proc/net/snmp"));
 389         return;
 390     }
 391     process_fd(f);
 392
 393     if (ferror(f))
 394         perror("/proc/net/snmp");
 395
 396     fclose(f);
 397
 398     f = fopen("/proc/net/netstat", "r");
 399
 400     if (f) {
 401         process_fd(f);
 402
 403         if (ferror(f))
 404             perror("/proc/net/netstat");
 405
 406         fclose(f);
 407     }
 408     return;
 409 }
 410
 411
 412 void inittab(void)
 413 {
 414     struct tabtab *t;
 415
 416     /* we sort at runtime because I'm lazy ;) */
 417     for (t = snmptabs; t->title; t++)
 418         qsort(t->tab, t->size / sizeof(struct entry),
 419               sizeof(struct entry), cmpentries);
 420 }