logread.c

   1 /*
   2  * Copyright (C) 2013 Felix Fietkau <nbd@openwrt.org>
   3  * Copyright (C) 2013 John Crispin <blogic@openwrt.org>
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU Lesser General Public License version 2.1
   7  * as published by the Free Software Foundation
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  */
  14
  15 #include <sys/types.h>
  16 #include <sys/stat.h>
  17
  18 #include <fcntl.h>
  19 #include <time.h>
  20 #include <stdio.h>
  21 #include <unistd.h>
  22 #include <sys/types.h>
  23 #include <sys/socket.h>
  24
  25 #define SYSLOG_NAMES
  26 #include <syslog.h>
  27
  28 #include <libubox/blobmsg_json.h>
  29 #include <libubox/usock.h>
  30 #include <libubox/uloop.h>
  31 #include "libubus.h"
  32
  33 enum {
  34         LOG_STDOUT,
  35         LOG_FILE,
  36         LOG_NET,
  37 };
  38
  39 enum {
  40         LOG_MSG,
  41         LOG_ID,
  42         LOG_PRIO,
  43         LOG_SOURCE,
  44         LOG_TIME,
  45         __LOG_MAX
  46 };
  47
  48 static const struct blobmsg_policy log_policy[] = {
  49         [LOG_MSG] = { .name = "msg", .type = BLOBMSG_TYPE_STRING },
  50         [LOG_ID] = { .name = "id", .type = BLOBMSG_TYPE_INT32 },
  51         [LOG_PRIO] = { .name = "priority", .type = BLOBMSG_TYPE_INT32 },
  52         [LOG_SOURCE] = { .name = "source", .type = BLOBMSG_TYPE_INT32 },
  53         [LOG_TIME] = { .name = "time", .type = BLOBMSG_TYPE_INT64 },
  54 };
  55
  56 static struct ubus_subscriber log_event;
  57 static struct uloop_timeout retry;
  58 static struct uloop_fd sender;
  59 static const char *log_file, *log_ip, *log_port, *pid_file;
  60 static int log_type = LOG_STDOUT;
  61 static int log_size, log_udp;
  62
  63 static void log_handle_reconnect(struct uloop_timeout *timeout)
  64 {
  65         sender.fd = usock((log_udp) ? (USOCK_UDP) : (USOCK_TCP), log_ip, log_port);
  66         if (sender.fd < 0) {
  67                 fprintf(stderr, "failed to connect: %s\n", strerror(errno));
  68                 uloop_timeout_set(&retry, 1000);
  69         } else {
  70                 uloop_fd_add(&sender, ULOOP_READ);
  71                 syslog(0, "Logread connected to %s:%s\n", log_ip, log_port);
  72         }
  73 }
  74
  75 static void log_handle_remove(struct ubus_context *ctx, struct ubus_subscriber *s,
  76                         uint32_t id)
  77 {
  78         fprintf(stderr, "Object %08x went away\n", id);
  79 }
  80
  81 static void log_handle_fd(struct uloop_fd *u, unsigned int events)
  82 {
  83         if (u->eof) {
  84                 uloop_fd_delete(u);
  85                 close(sender.fd);
  86                 sender.fd = -1;
  87                 uloop_timeout_set(&retry, 1000);
  88         }
  89 }
  90
  91 static int log_notify(struct ubus_context *ctx, struct ubus_object *obj,
  92                         struct ubus_request_data *req, const char *method,
  93                         struct blob_attr *msg)
  94 {
  95         struct blob_attr *tb[__LOG_MAX];
  96         struct stat s;
  97         char buf[256];
  98         uint32_t p;
  99         char *str;
 100         time_t t;
 101         char *c;
 102
 103         if (sender.fd < 0)
 104                 return 0;
 105
 106         blobmsg_parse(log_policy, ARRAY_SIZE(log_policy), tb, blob_data(msg), blob_len(msg));
 107         if (!tb[LOG_ID] || !tb[LOG_PRIO] || !tb[LOG_SOURCE] || !tb[LOG_TIME])
 108                 return 1;
 109
 110         if ((log_type == LOG_FILE) && log_size && (!stat(log_file, &s)) && (s.st_size > log_size)) {
 111                 char *old = malloc(strlen(log_file) + 5);
 112
 113                 close(sender.fd);
 114                 if (old) {
 115                         sprintf(old, "%s.old", log_file);
 116                         rename(log_file, old);
 117                         free(old);
 118                 }
 119                 sender.fd = open(log_file, O_CREAT | O_WRONLY | O_APPEND, 0600);
 120                 if (sender.fd < 0) {
 121 //                      fprintf(stderr, "failed to open %s: %s\n", log_file, strerror(errno));
 122                         exit(-1);
 123                 }
 124         }
 125
 126         t = blobmsg_get_u64(tb[LOG_TIME]) / 1000;
 127         c = ctime(&t);
 128         p = blobmsg_get_u32(tb[LOG_PRIO]);
 129         c[strlen(c) - 1] = '\0';
 130         str = blobmsg_format_json(msg, true);
 131         if (log_type == LOG_NET) {
 132                 snprintf(buf, sizeof(buf), "%s%s\n",
 133                         (blobmsg_get_u32(tb[LOG_SOURCE])) ? ("") : ("kernel: "),
 134                         method);
 135                 send(sender.fd, buf, strlen(buf), 0);
 136         } else {
 137                 snprintf(buf, sizeof(buf), "%s %s.%s%s %s\n",
 138                         c, facilitynames[LOG_FAC(p)].c_name, prioritynames[LOG_PRI(p)].c_name,
 139                         (blobmsg_get_u32(tb[LOG_SOURCE])) ? ("") : (" kernel:"),
 140                         method);
 141                 write(sender.fd, buf, strlen(buf));
 142         }
 143
 144         free(str);
 145         if (log_type == LOG_FILE)
 146                 fsync(sender.fd);
 147
 148         return 0;
 149 }
 150
 151 static void follow_log(struct ubus_context *ctx, int id)
 152 {
 153         FILE *fp;
 154         int ret;
 155
 156         signal(SIGPIPE, SIG_IGN);
 157
 158         if (pid_file) {
 159                 fp = fopen(pid_file, "w+");
 160                 if (fp) {
 161                         fprintf(fp, "%d", getpid());
 162                         fclose(fp);
 163                 }
 164         }
 165
 166         uloop_init();
 167         ubus_add_uloop(ctx);
 168
 169         log_event.remove_cb = log_handle_remove;
 170         log_event.cb = log_notify;
 171         ret = ubus_register_subscriber(ctx, &log_event);
 172         if (ret)
 173                 fprintf(stderr, "Failed to add watch handler: %s\n", ubus_strerror(ret));
 174
 175         ret = ubus_subscribe(ctx, &log_event, id);
 176         if (ret)
 177                 fprintf(stderr, "Failed to add watch handler: %s\n", ubus_strerror(ret));
 178
 179         if (log_ip && log_port) {
 180                 openlog("logread", LOG_PID, LOG_DAEMON);
 181                 log_type = LOG_NET;
 182                 sender.cb = log_handle_fd;
 183                 retry.cb = log_handle_reconnect;
 184                 uloop_timeout_set(&retry, 1000);
 185         } else if (log_file) {
 186                 log_type = LOG_FILE;
 187                 sender.fd = open(log_file, O_CREAT | O_WRONLY| O_APPEND, 0600);
 188                 if (sender.fd < 0) {
 189                         fprintf(stderr, "failed to open %s: %s\n", log_file, strerror(errno));
 190                         exit(-1);
 191                 }
 192         } else {
 193                 sender.fd = STDOUT_FILENO;
 194         }
 195
 196         uloop_run();
 197         ubus_free(ctx);
 198         uloop_done();
 199 }
 200
 201 enum {
 202         READ_LINE,
 203         __READ_MAX
 204 };
 205
 206 static const struct blobmsg_policy read_policy[] = {
 207         [READ_LINE] = { .name = "lines", .type = BLOBMSG_TYPE_ARRAY },
 208 };
 209
 210 static void read_cb(struct ubus_request *req, int type, struct blob_attr *msg)
 211 {
 212         struct blob_attr *cur;
 213         struct blob_attr *_tb[__READ_MAX];
 214         time_t t;
 215         int rem;
 216
 217         if (!msg)
 218                 return;
 219
 220         blobmsg_parse(read_policy, ARRAY_SIZE(read_policy), _tb, blob_data(msg), blob_len(msg));
 221         if (!_tb[READ_LINE])
 222                 return;
 223         blobmsg_for_each_attr(cur, _tb[READ_LINE], rem) {
 224                 struct blob_attr *tb[__LOG_MAX];
 225                 uint32_t p;
 226                 char *c;
 227
 228                 if (blobmsg_type(cur) != BLOBMSG_TYPE_TABLE)
 229                         continue;
 230
 231                 blobmsg_parse(log_policy, ARRAY_SIZE(log_policy), tb, blobmsg_data(cur), blobmsg_data_len(cur));
 232                 if (!tb[LOG_MSG] || !tb[LOG_ID] || !tb[LOG_PRIO] || !tb[LOG_SOURCE] || !tb[LOG_TIME])
 233                         continue;
 234
 235                 t = blobmsg_get_u64(tb[LOG_TIME]);
 236                 p = blobmsg_get_u32(tb[LOG_PRIO]);
 237                 c = ctime(&t);
 238                 c[strlen(c) - 1] = '\0';
 239
 240                 printf("%s %s.%s%s %s\n",
 241                         c, facilitynames[LOG_FAC(p)].c_name, prioritynames[LOG_PRI(p)].c_name,
 242                         (blobmsg_get_u32(tb[LOG_SOURCE])) ? ("") : (" kernel:"),
 243                         blobmsg_get_string(tb[LOG_MSG]));
 244         }
 245 }
 246
 247 static int usage(const char *prog)
 248 {
 249         fprintf(stderr, "Usage: %s [options]\n"
 250                 "Options:\n"
 251                 "    -s <path>          Path to ubus socket\n"
 252                 "    -l <count>         Got only the last 'count' messages\n"
 253                 "    -r <server> <port> Stream message to a server\n"
 254                 "    -F <file>          Log file\n"
 255                 "    -S <bytes>         Log size\n"
 256                 "    -p <file>          PID file\n"
 257                 "    -f                 Follow log messages\n"
 258                 "    -u                 Use UDP as the protocol\n"
 259                 "\n", prog);
 260         return 1;
 261 }
 262
 263 int main(int argc, char **argv)
 264 {
 265         struct ubus_context *ctx;
 266         uint32_t id;
 267         const char *ubus_socket = NULL;
 268         int ch, ret, subscribe = 0, lines = 0;
 269         static struct blob_buf b;
 270
 271         while ((ch = getopt(argc, argv, "ufcs:l:r:F:p:S:")) != -1) {
 272                 switch (ch) {
 273                 case 'u':
 274                         log_udp = 1;
 275                         break;
 276                 case 's':
 277                         ubus_socket = optarg;
 278                         break;
 279                 case 'r':
 280                         log_ip = optarg++;
 281                         log_port = argv[optind++];
 282                         break;
 283                 case 'F':
 284                         log_file = optarg;
 285                         break;
 286                 case 'p':
 287                         pid_file = optarg;
 288                         break;
 289                 case 'f':
 290                         subscribe = 1;
 291                         break;
 292                 case 'l':
 293                         lines = atoi(optarg);
 294                         break;
 295                 case 'S':
 296                         log_size = atoi(optarg);
 297                         if (log_size < 1)
 298                                 log_size = 1;
 299                         log_size *= 1024;
 300                         break;
 301                 default:
 302                         return usage(*argv);
 303                 }
 304         }
 305
 306         ctx = ubus_connect(ubus_socket);
 307         if (!ctx) {
 308                 fprintf(stderr, "Failed to connect to ubus\n");
 309                 return -1;
 310         }
 311
 312         ret = ubus_lookup_id(ctx, "log", &id);
 313         if (ret)
 314                 fprintf(stderr, "Failed to find log object: %s\n", ubus_strerror(ret));
 315
 316         if (!subscribe || lines) {
 317                 blob_buf_init(&b, 0);
 318                 if (lines)
 319                         blobmsg_add_u32(&b, "lines", lines);
 320                 ubus_invoke(ctx, id, "read", b.head, read_cb, 0, 3000);
 321         }
 322
 323         if (subscribe)
 324                 follow_log(ctx, id);
 325
 326         return 0;
 327 }