ip/ipmonitor.c

   1 /*
   2  * ipmonitor.c          "ip monitor".
   3  *
   4  *              This program is free software; you can redistribute it and/or
   5  *              modify it under the terms of the GNU General Public License
   6  *              as published by the Free Software Foundation; either version
   7  *              2 of the License, or (at your option) any later version.
   8  *
   9  * Authors:     Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
  10  *
  11  */
  12
  13 #include <stdio.h>
  14 #include <stdlib.h>
  15 #include <unistd.h>
  16 #include <syslog.h>
  17 #include <fcntl.h>
  18 #include <sys/socket.h>
  19 #include <netinet/in.h>
  20 #include <arpa/inet.h>
  21 #include <string.h>
  22 #include <time.h>
  23
  24 #include "utils.h"
  25 #include "ip_common.h"
  26
  27 static void usage(void) __attribute__((noreturn));
  28 int prefix_banner;
  29
  30 static void usage(void)
  31 {
  32         fprintf(stderr, "Usage: ip monitor [ all | LISTofOBJECTS ] [ FILE ] [ label ]\n");
  33         fprintf(stderr, "LISTofOBJECTS := link | address | route | mroute | prefix |\n");
  34         fprintf(stderr, "                 neigh | netconf\n");
  35         fprintf(stderr, "FILE := file FILENAME\n");
  36         exit(-1);
  37 }
  38
  39 static int accept_msg(const struct sockaddr_nl *who,
  40                       struct nlmsghdr *n, void *arg)
  41 {
  42         FILE *fp = (FILE*)arg;
  43
  44         if (n->nlmsg_type == RTM_NEWROUTE || n->nlmsg_type == RTM_DELROUTE) {
  45                 struct rtmsg *r = NLMSG_DATA(n);
  46                 int len = n->nlmsg_len - NLMSG_LENGTH(sizeof(*r));
  47
  48                 if (len < 0) {
  49                         fprintf(stderr, "BUG: wrong nlmsg len %d\n", len);
  50                         return -1;
  51                 }
  52
  53                 if (r->rtm_flags & RTM_F_CLONED)
  54                         return 0;
  55
  56                 if (timestamp)
  57                         print_timestamp(fp);
  58
  59                 if (r->rtm_family == RTNL_FAMILY_IPMR ||
  60                     r->rtm_family == RTNL_FAMILY_IP6MR) {
  61                         if (prefix_banner)
  62                                 fprintf(fp, "[MROUTE]");
  63                         print_mroute(who, n, arg);
  64                         return 0;
  65                 } else {
  66                         if (prefix_banner)
  67                                 fprintf(fp, "[ROUTE]");
  68                         print_route(who, n, arg);
  69                         return 0;
  70                 }
  71         }
  72
  73         if (timestamp)
  74                 print_timestamp(fp);
  75
  76         if (n->nlmsg_type == RTM_NEWLINK || n->nlmsg_type == RTM_DELLINK) {
  77                 ll_remember_index(who, n, NULL);
  78                 if (prefix_banner)
  79                         fprintf(fp, "[LINK]");
  80                 print_linkinfo(who, n, arg);
  81                 return 0;
  82         }
  83         if (n->nlmsg_type == RTM_NEWADDR || n->nlmsg_type == RTM_DELADDR) {
  84                 if (prefix_banner)
  85                         fprintf(fp, "[ADDR]");
  86                 print_addrinfo(who, n, arg);
  87                 return 0;
  88         }
  89         if (n->nlmsg_type == RTM_NEWADDRLABEL || n->nlmsg_type == RTM_DELADDRLABEL) {
  90                 if (prefix_banner)
  91                         fprintf(fp, "[ADDRLABEL]");
  92                 print_addrlabel(who, n, arg);
  93                 return 0;
  94         }
  95         if (n->nlmsg_type == RTM_NEWNEIGH || n->nlmsg_type == RTM_DELNEIGH ||
  96             n->nlmsg_type == RTM_GETNEIGH) {
  97                 if (preferred_family) {
  98                         struct ndmsg *r = NLMSG_DATA(n);
  99
 100                         if (r->ndm_family != preferred_family)
 101                                 return 0;
 102                 }
 103
 104                 if (prefix_banner)
 105                         fprintf(fp, "[NEIGH]");
 106                 print_neigh(who, n, arg);
 107                 return 0;
 108         }
 109         if (n->nlmsg_type == RTM_NEWPREFIX) {
 110                 if (prefix_banner)
 111                         fprintf(fp, "[PREFIX]");
 112                 print_prefix(who, n, arg);
 113                 return 0;
 114         }
 115         if (n->nlmsg_type == RTM_NEWRULE || n->nlmsg_type == RTM_DELRULE) {
 116                 if (prefix_banner)
 117                         fprintf(fp, "[RULE]");
 118                 print_rule(who, n, arg);
 119                 return 0;
 120         }
 121         if (n->nlmsg_type == RTM_NEWNETCONF) {
 122                 if (prefix_banner)
 123                         fprintf(fp, "[NETCONF]");
 124                 print_netconf(who, n, arg);
 125                 return 0;
 126         }
 127         if (n->nlmsg_type == 15) {
 128                 char *tstr;
 129                 time_t secs = ((__u32*)NLMSG_DATA(n))[0];
 130                 long usecs = ((__u32*)NLMSG_DATA(n))[1];
 131                 tstr = asctime(localtime(&secs));
 132                 tstr[strlen(tstr)-1] = 0;
 133                 fprintf(fp, "Timestamp: %s %lu us\n", tstr, usecs);
 134                 return 0;
 135         }
 136         if (n->nlmsg_type == RTM_NEWQDISC ||
 137             n->nlmsg_type == RTM_DELQDISC ||
 138             n->nlmsg_type == RTM_NEWTCLASS ||
 139             n->nlmsg_type == RTM_DELTCLASS ||
 140             n->nlmsg_type == RTM_NEWTFILTER ||
 141             n->nlmsg_type == RTM_DELTFILTER ||
 142             n->nlmsg_type == RTM_NEWNDUSEROPT)
 143                 return 0;
 144         if (n->nlmsg_type != NLMSG_ERROR && n->nlmsg_type != NLMSG_NOOP &&
 145             n->nlmsg_type != NLMSG_DONE) {
 146                 fprintf(fp, "Unknown message: type=0x%08x(%d) flags=0x%08x(%d)"
 147                         "len=0x%08x(%d)\n", n->nlmsg_type, n->nlmsg_type,
 148                         n->nlmsg_flags, n->nlmsg_flags, n->nlmsg_len,
 149                         n->nlmsg_len);
 150         }
 151         return 0;
 152 }
 153
 154 int do_ipmonitor(int argc, char **argv)
 155 {
 156         char *file = NULL;
 157         unsigned groups = ~RTMGRP_TC;
 158         int llink=0;
 159         int laddr=0;
 160         int lroute=0;
 161         int lmroute=0;
 162         int lprefix=0;
 163         int lneigh=0;
 164         int lnetconf=0;
 165
 166         rtnl_close(&rth);
 167         ipaddr_reset_filter(1);
 168         iproute_reset_filter();
 169         ipmroute_reset_filter();
 170         ipneigh_reset_filter();
 171
 172         while (argc > 0) {
 173                 if (matches(*argv, "file") == 0) {
 174                         NEXT_ARG();
 175                         file = *argv;
 176                 } else if (matches(*argv, "label") == 0) {
 177                         prefix_banner = 1;
 178                 } else if (matches(*argv, "link") == 0) {
 179                         llink=1;
 180                         groups = 0;
 181                 } else if (matches(*argv, "address") == 0) {
 182                         laddr=1;
 183                         groups = 0;
 184                 } else if (matches(*argv, "route") == 0) {
 185                         lroute=1;
 186                         groups = 0;
 187                 } else if (matches(*argv, "mroute") == 0) {
 188                         lmroute=1;
 189                         groups = 0;
 190                 } else if (matches(*argv, "prefix") == 0) {
 191                         lprefix=1;
 192                         groups = 0;
 193                 } else if (matches(*argv, "neigh") == 0) {
 194                         lneigh = 1;
 195                         groups = 0;
 196                 } else if (matches(*argv, "netconf") == 0) {
 197                         lnetconf = 1;
 198                         groups = 0;
 199                 } else if (strcmp(*argv, "all") == 0) {
 200                         groups = ~RTMGRP_TC;
 201                         prefix_banner=1;
 202                 } else if (matches(*argv, "help") == 0) {
 203                         usage();
 204                 } else {
 205                         fprintf(stderr, "Argument \"%s\" is unknown, try \"ip monitor help\".\n", *argv);
 206                         exit(-1);
 207                 }
 208                 argc--; argv++;
 209         }
 210
 211         if (llink)
 212                 groups |= nl_mgrp(RTNLGRP_LINK);
 213         if (laddr) {
 214                 if (!preferred_family || preferred_family == AF_INET)
 215                         groups |= nl_mgrp(RTNLGRP_IPV4_IFADDR);
 216                 if (!preferred_family || preferred_family == AF_INET6)
 217                         groups |= nl_mgrp(RTNLGRP_IPV6_IFADDR);
 218         }
 219         if (lroute) {
 220                 if (!preferred_family || preferred_family == AF_INET)
 221                         groups |= nl_mgrp(RTNLGRP_IPV4_ROUTE);
 222                 if (!preferred_family || preferred_family == AF_INET6)
 223                         groups |= nl_mgrp(RTNLGRP_IPV6_ROUTE);
 224         }
 225         if (lmroute) {
 226                 if (!preferred_family || preferred_family == AF_INET)
 227                         groups |= nl_mgrp(RTNLGRP_IPV4_MROUTE);
 228                 if (!preferred_family || preferred_family == AF_INET6)
 229                         groups |= nl_mgrp(RTNLGRP_IPV6_MROUTE);
 230         }
 231         if (lprefix) {
 232                 if (!preferred_family || preferred_family == AF_INET6)
 233                         groups |= nl_mgrp(RTNLGRP_IPV6_PREFIX);
 234         }
 235         if (lneigh) {
 236                 groups |= nl_mgrp(RTNLGRP_NEIGH);
 237         }
 238         if (lnetconf) {
 239                 if (!preferred_family || preferred_family == AF_INET)
 240                         groups |= nl_mgrp(RTNLGRP_IPV4_NETCONF);
 241                 if (!preferred_family || preferred_family == AF_INET6)
 242                         groups |= nl_mgrp(RTNLGRP_IPV6_NETCONF);
 243         }
 244         if (file) {
 245                 FILE *fp;
 246                 fp = fopen(file, "r");
 247                 if (fp == NULL) {
 248                         perror("Cannot fopen");
 249                         exit(-1);
 250                 }
 251                 return rtnl_from_file(fp, accept_msg, stdout);
 252         }
 253
 254         if (rtnl_open(&rth, groups) < 0)
 255                 exit(1);
 256         ll_init_map(&rth);
 257
 258         if (rtnl_listen(&rth, accept_msg, stdout) < 0)
 259                 exit(2);
 260
 261         return 0;
 262 }