modules/admin-full: filter localhost<->localhost connections live connection graph
[project/luci.git] / modules / admin-full / src / luci-bwc.c
index f173d44..1a4f510 100644 (file)
@@ -31,6 +31,7 @@
 #include <sys/mman.h>
 #include <arpa/inet.h>
 
+#include <dlfcn.h>
 
 #define STEP_COUNT     60
 #define STEP_TIME      1
 
 #define DB_PATH                "/var/lib/luci-bwc"
 #define DB_IF_FILE     DB_PATH "/if/%s"
+#define DB_RD_FILE     DB_PATH "/radio/%s"
 #define DB_CN_FILE     DB_PATH "/connections"
 #define DB_LD_FILE     DB_PATH "/load"
 
 #define IF_SCAN_PATTERN \
-       " %[^ :]:%" SCNu64 " %" SCNu64 \
+       " %[^ :]:%u %u" \
        " %*d %*d %*d %*d %*d %*d" \
-       " %" SCNu64 " %" SCNu64
+       " %u %u"
 
 #define LD_SCAN_PATTERN \
        "%f %f %f"
@@ -59,40 +61,33 @@ struct file_map {
 };
 
 struct traffic_entry {
-       uint64_t time;
-       uint64_t rxb;
-       uint64_t rxp;
-       uint64_t txb;
-       uint64_t txp;
+       uint32_t time;
+       uint32_t rxb;
+       uint32_t rxp;
+       uint32_t txb;
+       uint32_t txp;
 };
 
 struct conn_entry {
-       uint64_t time;
+       uint32_t time;
        uint32_t udp;
        uint32_t tcp;
        uint32_t other;
 };
 
 struct load_entry {
-       uint64_t time;
+       uint32_t time;
        uint16_t load1;
        uint16_t load5;
        uint16_t load15;
 };
 
-
-static uint64_t htonll(uint64_t value)
-{
-       int num = 1;
-
-       if (*(char *)&num == 1)
-               return htonl((uint32_t)(value & 0xFFFFFFFF)) |
-                      htonl((uint32_t)(value >> 32));
-
-       return value;
-}
-
-#define ntohll htonll
+struct radio_entry {
+       uint32_t time;
+       uint16_t rate;
+       uint8_t  rssi;
+       uint8_t  noise;
+};
 
 static int readpid(void)
 {
@@ -142,6 +137,14 @@ static void reset_countdown(int sig)
 }
 
 
+static char *progname;
+static int prognamelen;
+
+static int (*iw_get_rate)(const char *, int *) = NULL;
+static int (*iw_get_rssi)(const char *, int *) = NULL;
+static int (*iw_get_noise)(const char *, int *) = NULL;
+
+
 static int init_directory(char *path)
 {
        char *p = path;
@@ -186,9 +189,9 @@ static int init_file(char *path, int esize)
        return -1;
 }
 
-static inline uint64_t timeof(void *entry)
+static inline uint32_t timeof(void *entry)
 {
-       return ((struct traffic_entry *)entry)->time;
+       return ntohl(((struct traffic_entry *)entry)->time);
 }
 
 static int update_file(const char *path, void *entry, int esize)
@@ -249,9 +252,66 @@ static void umap_file(struct file_map *m)
                close(m->fd);
 }
 
+static void * iwinfo_open(void)
+{
+       return dlopen("/usr/lib/libiwinfo.so", RTLD_LAZY);
+}
+
+static int iwinfo_update(
+       void *iw, const char *ifname, uint16_t *rate, uint8_t *rssi, uint8_t *noise
+) {
+       int (*probe)(const char *);
+       int val;
+
+       if (!iw_get_rate)
+       {
+               if ((probe = dlsym(iw, "nl80211_probe")) != NULL && probe(ifname))
+               {
+                       iw_get_rate  = dlsym(iw, "nl80211_get_bitrate");
+                       iw_get_rssi  = dlsym(iw, "nl80211_get_signal");
+                       iw_get_noise = dlsym(iw, "nl80211_get_noise");
+               }
+               else if ((probe = dlsym(iw, "madwifi_probe")) != NULL && probe(ifname))
+               {
+                       iw_get_rate  = dlsym(iw, "madwifi_get_bitrate");
+                       iw_get_rssi  = dlsym(iw, "madwifi_get_signal");
+                       iw_get_noise = dlsym(iw, "madwifi_get_noise");
+               }
+               else if ((probe = dlsym(iw, "wl_probe")) != NULL && probe(ifname))
+               {
+                       iw_get_rate  = dlsym(iw, "wl_get_bitrate");
+                       iw_get_rssi  = dlsym(iw, "wl_get_signal");
+                       iw_get_noise = dlsym(iw, "wl_get_noise");
+               }
+               else
+               {
+                       return 0;
+               }
+       }
+
+       *rate = (iw_get_rate && !iw_get_rate(ifname, &val)) ? val : 0;
+       *rssi = (iw_get_rssi && !iw_get_rssi(ifname, &val)) ? val : 0;
+       *noise = (iw_get_noise && !iw_get_noise(ifname, &val)) ? val : 0;
+
+       return 1;
+}
+
+static void iwinfo_close(void *iw)
+{
+       void (*do_close)(void);
+
+       if ((do_close = dlsym(iw, "nl80211_close")) != NULL) do_close();
+       if ((do_close = dlsym(iw, "madwifi_close")) != NULL) do_close();
+       if ((do_close = dlsym(iw, "wl_close"))      != NULL) do_close();
+       if ((do_close = dlsym(iw, "wext_close"))    != NULL) do_close();
+       if ((do_close = dlsym(iw, "iwinfo_close"))  != NULL) do_close();
+
+       dlclose(iw);
+}
+
 
 static int update_ifstat(
-       const char *ifname, uint64_t rxb, uint64_t rxp, uint64_t txb, uint64_t txp
+       const char *ifname, uint32_t rxb, uint32_t rxp, uint32_t txb, uint32_t txp
 ) {
        char path[1024];
 
@@ -271,15 +331,44 @@ static int update_ifstat(
                }
        }
 
-       e.time = htonll(time(NULL));
-       e.rxb  = htonll(rxb);
-       e.rxp  = htonll(rxp);
-       e.txb  = htonll(txb);
-       e.txp  = htonll(txp);
+       e.time = htonl(time(NULL));
+       e.rxb  = htonl(rxb);
+       e.rxp  = htonl(rxp);
+       e.txb  = htonl(txb);
+       e.txp  = htonl(txp);
 
        return update_file(path, &e, sizeof(struct traffic_entry));
 }
 
+static int update_radiostat(
+       const char *ifname, uint16_t rate, uint8_t rssi, uint8_t noise
+) {
+       char path[1024];
+
+       struct stat s;
+       struct radio_entry e;
+
+       snprintf(path, sizeof(path), DB_RD_FILE, ifname);
+
+       if (stat(path, &s))
+       {
+               if (init_file(path, sizeof(struct radio_entry)))
+               {
+                       fprintf(stderr, "Failed to init %s: %s\n",
+                                       path, strerror(errno));
+
+                       return -1;
+               }
+       }
+
+       e.time  = htonl(time(NULL));
+       e.rate  = htons(rate);
+       e.rssi  = rssi;
+       e.noise = noise;
+
+       return update_file(path, &e, sizeof(struct radio_entry));
+}
+
 static int update_cnstat(uint32_t udp, uint32_t tcp, uint32_t other)
 {
        char path[1024];
@@ -300,7 +389,7 @@ static int update_cnstat(uint32_t udp, uint32_t tcp, uint32_t other)
                }
        }
 
-       e.time  = htonll(time(NULL));
+       e.time  = htonl(time(NULL));
        e.udp   = htonl(udp);
        e.tcp   = htonl(tcp);
        e.other = htonl(other);
@@ -328,7 +417,7 @@ static int update_ldstat(uint16_t load1, uint16_t load5, uint16_t load15)
                }
        }
 
-       e.time   = htonll(time(NULL));
+       e.time   = htonl(time(NULL));
        e.load1  = htons(load1);
        e.load5  = htons(load5);
        e.load15 = htons(load15);
@@ -336,15 +425,18 @@ static int update_ldstat(uint16_t load1, uint16_t load5, uint16_t load15)
        return update_file(path, &e, sizeof(struct load_entry));
 }
 
-static int run_daemon(char *progname)
+static int run_daemon(void)
 {
        FILE *info;
-       uint64_t rxb, txb, rxp, txp;
+       uint32_t rxb, txb, rxp, txp;
        uint32_t udp, tcp, other;
+       uint16_t rate;
+       uint8_t rssi, noise;
        float lf1, lf5, lf15;
        char line[1024];
        char ifname[16];
-
+       int i;
+       void *iw;
        struct sigaction sa;
 
        struct stat s;
@@ -386,11 +478,15 @@ static int run_daemon(char *progname)
                return 1;
        }
 
+       /* initialize iwinfo */
+       iw = iwinfo_open();
+
        /* go */
        for (reset_countdown(0); countdown >= 0; countdown--)
        {
                /* alter progname for ps, top */
-               sprintf(progname, "luci-bwc %d", countdown);
+               memset(progname, 0, prognamelen);
+               snprintf(progname, prognamelen, "luci-bwc %d", countdown);
 
                if ((info = fopen("/proc/net/dev", "r")) != NULL)
                {
@@ -409,6 +505,26 @@ static int run_daemon(char *progname)
                        fclose(info);
                }
 
+               if (iw)
+               {
+                       for (i = 0; i < 5; i++)
+                       {
+#define iwinfo_checkif(pattern) \
+                               do {                                                      \
+                                       snprintf(ifname, sizeof(ifname), pattern, i);         \
+                                       if (iwinfo_update(iw, ifname, &rate, &rssi, &noise))  \
+                                       {                                                     \
+                                               update_radiostat(ifname, rate, rssi, noise);      \
+                                               continue;                                         \
+                                       }                                                     \
+                               } while(0)
+
+                               iwinfo_checkif("wlan%d");
+                               iwinfo_checkif("ath%d");
+                               iwinfo_checkif("wl%d");
+                       }
+               }
+
                if ((info = fopen(ipc, "r")) != NULL)
                {
                        udp   = 0;
@@ -420,6 +536,10 @@ static int run_daemon(char *progname)
                                if (strstr(line, "TIME_WAIT"))
                                        continue;
 
+                               if (strstr(line, "src=127.0.0.1 ") &&
+                                   strstr(line, "dst=127.0.0.1 "))
+                                       continue;
+
                                if (sscanf(line, "%*s %*d %s", ifname) || sscanf(line, "%s %*d", ifname))
                                {
                                        if (!strcmp(ifname, "tcp"))
@@ -453,48 +573,45 @@ static int run_daemon(char *progname)
 
        unlink(PID_PATH);
 
+       if (iw)
+               iwinfo_close(iw);
+
        return 0;
 }
 
-static int check_daemon(char *progname)
+static void check_daemon(void)
 {
        int pid;
 
        if ((pid = readpid()) < 0 || kill(pid, 0) < 0)
        {
                /* daemon ping failed, try to start it up */
-               if (run_daemon(progname))
+               if (run_daemon())
                {
                        fprintf(stderr,
                                "Failed to ping daemon and unable to start it up: %s\n",
                                strerror(errno));
 
-                       return 1;
+                       exit(1);
                }
        }
        else if (kill(pid, SIGUSR1))
        {
                fprintf(stderr, "Failed to send signal: %s\n", strerror(errno));
-               return 1;
+               exit(2);
        }
-
-       return 0;
 }
 
-static int run_dump_ifname(char *progname, const char *ifname)
+static int run_dump_ifname(const char *ifname)
 {
        int i;
        char path[1024];
        struct file_map m;
        struct traffic_entry *e;
 
+       check_daemon();
        snprintf(path, sizeof(path), DB_IF_FILE, ifname);
 
-       if (check_daemon(progname))
-       {
-               return 1;
-       }
-
        if (mmap_file(path, sizeof(struct traffic_entry), &m))
        {
                fprintf(stderr, "Failed to open %s: %s\n", path, strerror(errno));
@@ -508,11 +625,11 @@ static int run_dump_ifname(char *progname, const char *ifname)
                if (!e->time)
                        continue;
 
-               printf("[ %" PRIu64 ", %" PRIu64 ", %" PRIu64
-                          ", %" PRIu64 ", %" PRIu64 " ]%s\n",
-                       ntohll(e->time),
-                       ntohll(e->rxb), ntohll(e->rxp),
-                       ntohll(e->txb), ntohll(e->txp),
+               printf("[ %u, %u, %" PRIu32
+                          ", %u, %u ]%s\n",
+                       ntohl(e->time),
+                       ntohl(e->rxb), ntohl(e->rxp),
+                       ntohl(e->txb), ntohl(e->txp),
                        ((i + sizeof(struct traffic_entry)) < m.size) ? "," : "");
        }
 
@@ -521,20 +638,50 @@ static int run_dump_ifname(char *progname, const char *ifname)
        return 0;
 }
 
-static int run_dump_conns(char *progname)
+static int run_dump_radio(const char *ifname)
 {
        int i;
        char path[1024];
        struct file_map m;
-       struct conn_entry *e;
+       struct radio_entry *e;
 
-       snprintf(path, sizeof(path), DB_CN_FILE);
+       check_daemon();
+       snprintf(path, sizeof(path), DB_RD_FILE, ifname);
 
-       if (check_daemon(progname))
+       if (mmap_file(path, sizeof(struct radio_entry), &m))
        {
+               fprintf(stderr, "Failed to open %s: %s\n", path, strerror(errno));
                return 1;
        }
 
+       for (i = 0; i < m.size; i += sizeof(struct radio_entry))
+       {
+               e = (struct radio_entry *) &m.mmap[i];
+
+               if (!e->time)
+                       continue;
+
+               printf("[ %u, %d, %d, %d ]%s\n",
+                       ntohl(e->time),
+                       e->rate, e->rssi, e->noise,
+                       ((i + sizeof(struct radio_entry)) < m.size) ? "," : "");
+       }
+
+       umap_file(&m);
+
+       return 0;
+}
+
+static int run_dump_conns(void)
+{
+       int i;
+       char path[1024];
+       struct file_map m;
+       struct conn_entry *e;
+
+       check_daemon();
+       snprintf(path, sizeof(path), DB_CN_FILE);
+
        if (mmap_file(path, sizeof(struct conn_entry), &m))
        {
                fprintf(stderr, "Failed to open %s: %s\n", path, strerror(errno));
@@ -548,8 +695,8 @@ static int run_dump_conns(char *progname)
                if (!e->time)
                        continue;
 
-               printf("[ %" PRIu64 ", %u, %u, %u ]%s\n",
-                       ntohll(e->time), ntohl(e->udp),
+               printf("[ %u, %u, %u, %u ]%s\n",
+                       ntohl(e->time), ntohl(e->udp),
                        ntohl(e->tcp), ntohl(e->other),
                        ((i + sizeof(struct conn_entry)) < m.size) ? "," : "");
        }
@@ -559,20 +706,16 @@ static int run_dump_conns(char *progname)
        return 0;
 }
 
-static int run_dump_load(char *progname)
+static int run_dump_load(void)
 {
        int i;
        char path[1024];
        struct file_map m;
        struct load_entry *e;
 
+       check_daemon();
        snprintf(path, sizeof(path), DB_LD_FILE);
 
-       if (check_daemon(progname))
-       {
-               return 1;
-       }
-
        if (mmap_file(path, sizeof(struct load_entry), &m))
        {
                fprintf(stderr, "Failed to open %s: %s\n", path, strerror(errno));
@@ -586,8 +729,8 @@ static int run_dump_load(char *progname)
                if (!e->time)
                        continue;
 
-               printf("[ %" PRIu64 ", %u, %u, %u ]%s\n",
-                       ntohll(e->time),
+               printf("[ %u, %u, %u, %u ]%s\n",
+                       ntohl(e->time),
                        ntohs(e->load1), ntohs(e->load5), ntohs(e->load15),
                        ((i + sizeof(struct load_entry)) < m.size) ? "," : "");
        }
@@ -602,7 +745,13 @@ int main(int argc, char *argv[])
 {
        int opt;
 
-       while ((opt = getopt(argc, argv, "t:i:cl")) > -1)
+       progname = argv[0];
+       prognamelen = -1;
+
+       for (opt = 0; opt < argc; opt++)
+               prognamelen += 1 + strlen(argv[opt]);
+
+       while ((opt = getopt(argc, argv, "t:i:r:cl")) > -1)
        {
                switch (opt)
                {
@@ -612,14 +761,19 @@ int main(int argc, char *argv[])
 
                        case 'i':
                                if (optarg)
-                                       return run_dump_ifname(argv[0], optarg);
+                                       return run_dump_ifname(optarg);
+                               break;
+
+                       case 'r':
+                               if (optarg)
+                                       return run_dump_radio(optarg);
                                break;
 
                        case 'c':
-                               return run_dump_conns(argv[0]);
+                               return run_dump_conns();
 
                        case 'l':
-                               return run_dump_load(argv[0]);
+                               return run_dump_load();
 
                        default:
                                break;
@@ -629,9 +783,10 @@ int main(int argc, char *argv[])
        fprintf(stderr,
                "Usage:\n"
                "       %s [-t timeout] -i ifname\n"
+               "       %s [-t timeout] -r radiodev\n"
                "       %s [-t timeout] -c\n"
                "       %s [-t timeout] -l\n",
-                       argv[0], argv[0], argv[0]
+                       argv[0], argv[0], argv[0], argv[0]
        );
 
        return 1;