log/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/ustream.h>
  29 #include <libubox/blobmsg_json.h>
  30 #include <libubox/usock.h>
  31 #include <libubox/uloop.h>
  32 #include "libubus.h"
  33 #include "syslog.h"
  34
  35 enum {
  36         LOG_STDOUT,
  37         LOG_FILE,
  38         LOG_NET,
  39 };
  40
  41 enum {
  42         LOG_MSG,
  43         LOG_ID,
  44         LOG_PRIO,
  45         LOG_SOURCE,
  46         LOG_TIME,
  47         __LOG_MAX
  48 };
  49
  50 static const struct blobmsg_policy log_policy[] = {
  51         [LOG_MSG] = { .name = "msg", .type = BLOBMSG_TYPE_STRING },
  52         [LOG_ID] = { .name = "id", .type = BLOBMSG_TYPE_INT32 },
  53         [LOG_PRIO] = { .name = "priority", .type = BLOBMSG_TYPE_INT32 },
  54         [LOG_SOURCE] = { .name = "source", .type = BLOBMSG_TYPE_INT32 },
  55         [LOG_TIME] = { .name = "time", .type = BLOBMSG_TYPE_INT64 },
  56 };
  57
  58 static struct uloop_timeout retry;
  59 static struct uloop_fd sender;
  60 static const char *log_file, *log_ip, *log_port, *log_prefix, *pid_file, *hostname;
  61 static int log_type = LOG_STDOUT;
  62 static int log_size, log_udp, log_follow = 0;
  63
  64 static const char* getcodetext(int value, CODE *codetable) {
  65         CODE *i;
  66
  67         if (value >= 0)
  68                 for (i = codetable; i->c_val != -1; i++)
  69                         if (i->c_val == value)
  70                                 return (i->c_name);
  71         return "<unknown>";
  72 };
  73
  74 static void log_handle_reconnect(struct uloop_timeout *timeout)
  75 {
  76         sender.fd = usock((log_udp) ? (USOCK_UDP) : (USOCK_TCP), log_ip, log_port);
  77         if (sender.fd < 0) {
  78                 fprintf(stderr, "failed to connect: %s\n", strerror(errno));
  79                 uloop_timeout_set(&retry, 1000);
  80         } else {
  81                 uloop_fd_add(&sender, ULOOP_READ);
  82                 syslog(LOG_INFO, "Logread connected to %s:%s\n", log_ip, log_port);
  83         }
  84 }
  85
  86 static void log_handle_fd(struct uloop_fd *u, unsigned int events)
  87 {
  88         if (u->eof) {
  89                 uloop_fd_delete(u);
  90                 close(sender.fd);
  91                 sender.fd = -1;
  92                 uloop_timeout_set(&retry, 1000);
  93         }
  94 }
  95
  96 static int log_notify(struct blob_attr *msg)
  97 {
  98         struct blob_attr *tb[__LOG_MAX];
  99         struct stat s;
 100         char buf[512];
 101         uint32_t p;
 102         char *str;
 103         time_t t;
 104         char *c, *m;
 105         int ret = 0;
 106
 107         if (sender.fd < 0)
 108                 return 0;
 109
 110         blobmsg_parse(log_policy, ARRAY_SIZE(log_policy), tb, blob_data(msg), blob_len(msg));
 111         if (!tb[LOG_ID] || !tb[LOG_PRIO] || !tb[LOG_SOURCE] || !tb[LOG_TIME] || !tb[LOG_MSG])
 112                 return 1;
 113
 114         if ((log_type == LOG_FILE) && log_size && (!stat(log_file, &s)) && (s.st_size > log_size)) {
 115                 char *old = malloc(strlen(log_file) + 5);
 116
 117                 close(sender.fd);
 118                 if (old) {
 119                         sprintf(old, "%s.old", log_file);
 120                         rename(log_file, old);
 121                         free(old);
 122                 }
 123                 sender.fd = open(log_file, O_CREAT | O_WRONLY | O_APPEND, 0600);
 124                 if (sender.fd < 0) {
 125                         fprintf(stderr, "failed to open %s: %s\n", log_file, strerror(errno));
 126                         exit(-1);
 127                 }
 128         }
 129
 130         m = blobmsg_get_string(tb[LOG_MSG]);
 131         t = blobmsg_get_u64(tb[LOG_TIME]) / 1000;
 132         c = ctime(&t);
 133         p = blobmsg_get_u32(tb[LOG_PRIO]);
 134         c[strlen(c) - 1] = '\0';
 135         str = blobmsg_format_json(msg, true);
 136         if (log_type == LOG_NET) {
 137                 int err;
 138
 139                 snprintf(buf, sizeof(buf), "<%u>", p);
 140                 strncat(buf, c + 4, 16);
 141                 if (hostname) {
 142                         strncat(buf, hostname, sizeof(buf) - strlen(buf) - 1);
 143                         strncat(buf, " ", sizeof(buf) - strlen(buf) - 1);
 144                 }
 145                 if (log_prefix) {
 146                         strncat(buf, log_prefix, sizeof(buf) - strlen(buf) - 1);
 147                         strncat(buf, ": ", sizeof(buf) - strlen(buf) - 1);
 148                 }
 149                 if (blobmsg_get_u32(tb[LOG_SOURCE]) == SOURCE_KLOG)
 150                         strncat(buf, "kernel: ", sizeof(buf) - strlen(buf) - 1);
 151                 strncat(buf, m, sizeof(buf) - strlen(buf) - 1);
 152                 if (log_udp)
 153                         err = write(sender.fd, buf, strlen(buf));
 154                 else
 155                         err = send(sender.fd, buf, strlen(buf), 0);
 156
 157                 if (err < 0) {
 158                         syslog(LOG_INFO, "failed to send log data to %s:%s via %s\n",
 159                                 log_ip, log_port, (log_udp) ? ("udp") : ("tcp"));
 160                         uloop_fd_delete(&sender);
 161                         close(sender.fd);
 162                         sender.fd = -1;
 163                         uloop_timeout_set(&retry, 1000);
 164                 }
 165         } else {
 166                 snprintf(buf, sizeof(buf), "%s %s.%s%s %s\n",
 167                         c, getcodetext(LOG_FAC(p) << 3, facilitynames), getcodetext(LOG_PRI(p), prioritynames),
 168                         (blobmsg_get_u32(tb[LOG_SOURCE])) ? ("") : (" kernel:"), m);
 169                 ret = write(sender.fd, buf, strlen(buf));
 170         }
 171
 172         free(str);
 173         if (log_type == LOG_FILE)
 174                 fsync(sender.fd);
 175
 176         return ret;
 177 }
 178
 179 static int usage(const char *prog)
 180 {
 181         fprintf(stderr, "Usage: %s [options]\n"
 182                 "Options:\n"
 183                 "    -s <path>          Path to ubus socket\n"
 184                 "    -l <count>         Got only the last 'count' messages\n"
 185                 "    -r <server> <port> Stream message to a server\n"
 186                 "    -F <file>          Log file\n"
 187                 "    -S <bytes>         Log size\n"
 188                 "    -p <file>          PID file\n"
 189                 "    -h <hostname>      Add hostname to the message\n"
 190                 "    -P <prefix>        Prefix custom text to streamed messages\n"
 191                 "    -f                 Follow log messages\n"
 192                 "    -u                 Use UDP as the protocol\n"
 193                 "\n", prog);
 194         return 1;
 195 }
 196
 197 static void logread_fd_data_cb(struct ustream *s, int bytes)
 198 {
 199         while (true) {
 200                 int len;
 201                 struct blob_attr *a;
 202
 203                 a = (void*) ustream_get_read_buf(s, &len);
 204                 if (len < sizeof(*a) || len < blob_len(a) + sizeof(*a))
 205                         break;
 206                 log_notify(a);
 207                 ustream_consume(s, blob_len(a) + sizeof(*a));
 208         }
 209         if (!log_follow)
 210                 uloop_end();
 211 }
 212
 213 static void logread_fd_cb(struct ubus_request *req, int fd)
 214 {
 215         static struct ustream_fd test_fd;
 216
 217         test_fd.stream.notify_read = logread_fd_data_cb;
 218         ustream_fd_init(&test_fd, fd);
 219 }
 220
 221 static void logread_complete_cb(struct ubus_request *req, int ret)
 222 {
 223 }
 224
 225 int main(int argc, char **argv)
 226 {
 227         static struct ubus_request req;
 228         struct ubus_context *ctx;
 229         uint32_t id;
 230         const char *ubus_socket = NULL;
 231         int ch, ret, lines = 0;
 232         static struct blob_buf b;
 233         int tries = 5;
 234
 235         signal(SIGPIPE, SIG_IGN);
 236
 237         while ((ch = getopt(argc, argv, "ufcs:l:r:F:p:S:P:h:")) != -1) {
 238                 switch (ch) {
 239                 case 'u':
 240                         log_udp = 1;
 241                         break;
 242                 case 's':
 243                         ubus_socket = optarg;
 244                         break;
 245                 case 'r':
 246                         log_ip = optarg++;
 247                         log_port = argv[optind++];
 248                         break;
 249                 case 'F':
 250                         log_file = optarg;
 251                         break;
 252                 case 'p':
 253                         pid_file = optarg;
 254                         break;
 255                 case 'P':
 256                         log_prefix = optarg;
 257                         break;
 258                 case 'f':
 259                         log_follow = 1;
 260                         break;
 261                 case 'l':
 262                         lines = atoi(optarg);
 263                         break;
 264                 case 'S':
 265                         log_size = atoi(optarg);
 266                         if (log_size < 1)
 267                                 log_size = 1;
 268                         log_size *= 1024;
 269                         break;
 270                 case 'h':
 271                         hostname = optarg;
 272                         break;
 273                 default:
 274                         return usage(*argv);
 275                 }
 276         }
 277         uloop_init();
 278
 279         ctx = ubus_connect(ubus_socket);
 280         if (!ctx) {
 281                 fprintf(stderr, "Failed to connect to ubus\n");
 282                 return -1;
 283         }
 284         ubus_add_uloop(ctx);
 285
 286         /* ugly ugly ugly ... we need a real reconnect logic */
 287         do {
 288                 ret = ubus_lookup_id(ctx, "log", &id);
 289                 if (ret) {
 290                         fprintf(stderr, "Failed to find log object: %s\n", ubus_strerror(ret));
 291                         sleep(1);
 292                         continue;
 293                 }
 294
 295                 blob_buf_init(&b, 0);
 296                 if (lines)
 297                         blobmsg_add_u32(&b, "lines", lines);
 298                 else if (log_follow)
 299                         blobmsg_add_u32(&b, "lines", 0);
 300                 if (log_follow) {
 301                         if (pid_file) {
 302                                 FILE *fp = fopen(pid_file, "w+");
 303                                 if (fp) {
 304                                         fprintf(fp, "%d", getpid());
 305                                         fclose(fp);
 306                                 }
 307                         }
 308                 }
 309
 310                 if (log_ip && log_port) {
 311                         openlog("logread", LOG_PID, LOG_DAEMON);
 312                         log_type = LOG_NET;
 313                         sender.cb = log_handle_fd;
 314                         retry.cb = log_handle_reconnect;
 315                         uloop_timeout_set(&retry, 1000);
 316                 } else if (log_file) {
 317                         log_type = LOG_FILE;
 318                         sender.fd = open(log_file, O_CREAT | O_WRONLY| O_APPEND, 0600);
 319                         if (sender.fd < 0) {
 320                                 fprintf(stderr, "failed to open %s: %s\n", log_file, strerror(errno));
 321                                 exit(-1);
 322                         }
 323                 } else {
 324                         sender.fd = STDOUT_FILENO;
 325                 }
 326
 327                 ubus_invoke_async(ctx, id, "read", b.head, &req);
 328                 req.fd_cb = logread_fd_cb;
 329                 req.complete_cb = logread_complete_cb;
 330                 ubus_complete_request_async(ctx, &req);
 331
 332                 uloop_run();
 333                 ubus_free(ctx);
 334                 uloop_done();
 335
 336         } while (ret && tries--);
 337
 338         return ret;
 339 }