luci2.c

   1 /*
   2  * luci-rpcd - LuCI UBUS RPC server
   3  *
   4  *   Copyright (C) 2013 Jo-Philipp Wich <jow@openwrt.org>
   5  *
   6  * Permission to use, copy, modify, and/or distribute this software for any
   7  * purpose with or without fee is hereby granted, provided that the above
   8  * copyright notice and this permission notice appear in all copies.
   9  *
  10  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  11  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  12  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  13  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  14  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  15  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  16  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  17  */
  18
  19 #include <fcntl.h>
  20 #include <errno.h>
  21 #include <unistd.h>
  22 #include <stdlib.h>
  23 #include <string.h>
  24 #include <ctype.h>
  25 #include <sys/wait.h>
  26 #include <sys/stat.h>
  27 #include <sys/types.h>
  28 #include <sys/statvfs.h>
  29 #include <dirent.h>
  30 #include <arpa/inet.h>
  31 #include <signal.h>
  32
  33 #include "luci2.h"
  34 #include "exec.h"
  35
  36 static struct blob_buf buf;
  37 static struct uci_context *cursor;
  38
  39 enum {
  40         RPC_S_PID,
  41         RPC_S_SIGNAL,
  42         __RPC_S_MAX,
  43 };
  44
  45 static const struct blobmsg_policy rpc_signal_policy[__RPC_S_MAX] = {
  46         [RPC_S_PID]    = { .name = "pid",    .type = BLOBMSG_TYPE_INT32 },
  47         [RPC_S_SIGNAL] = { .name = "signal", .type = BLOBMSG_TYPE_INT32 },
  48 };
  49
  50 enum {
  51         RPC_I_NAME,
  52         RPC_I_ACTION,
  53         __RPC_I_MAX,
  54 };
  55
  56 static const struct blobmsg_policy rpc_init_policy[__RPC_I_MAX] = {
  57         [RPC_I_NAME]   = { .name = "name",   .type = BLOBMSG_TYPE_STRING },
  58         [RPC_I_ACTION] = { .name = "action", .type = BLOBMSG_TYPE_STRING },
  59 };
  60
  61 enum {
  62         RPC_D_DATA,
  63         __RPC_D_MAX
  64 };
  65
  66 static const struct blobmsg_policy rpc_data_policy[__RPC_D_MAX] = {
  67         [RPC_D_DATA]   = { .name = "data",  .type = BLOBMSG_TYPE_STRING },
  68 };
  69
  70 enum {
  71         RPC_K_KEYS,
  72         __RPC_K_MAX
  73 };
  74
  75 static const struct blobmsg_policy rpc_sshkey_policy[__RPC_K_MAX] = {
  76         [RPC_K_KEYS]   = { .name = "keys",   .type = BLOBMSG_TYPE_ARRAY },
  77 };
  78
  79 enum {
  80         RPC_P_USER,
  81         RPC_P_PASSWORD,
  82         __RPC_P_MAX
  83 };
  84
  85 static const struct blobmsg_policy rpc_password_policy[__RPC_P_MAX] = {
  86         [RPC_P_USER]     = { .name = "user",     .type = BLOBMSG_TYPE_STRING },
  87         [RPC_P_PASSWORD] = { .name = "password", .type = BLOBMSG_TYPE_STRING },
  88 };
  89
  90 enum {
  91         RPC_OM_LIMIT,
  92         RPC_OM_OFFSET,
  93         RPC_OM_PATTERN,
  94         __RPC_OM_MAX
  95 };
  96
  97 static const struct blobmsg_policy rpc_opkg_match_policy[__RPC_OM_MAX] = {
  98         [RPC_OM_LIMIT]    = { .name = "limit",    .type = BLOBMSG_TYPE_INT32  },
  99         [RPC_OM_OFFSET]   = { .name = "offset",   .type = BLOBMSG_TYPE_INT32  },
 100         [RPC_OM_PATTERN]  = { .name = "pattern",  .type = BLOBMSG_TYPE_STRING },
 101 };
 102
 103 enum {
 104         RPC_OP_PACKAGE,
 105         __RPC_OP_MAX
 106 };
 107
 108 static const struct blobmsg_policy rpc_opkg_package_policy[__RPC_OP_MAX] = {
 109         [RPC_OP_PACKAGE]  = { .name = "package",  .type = BLOBMSG_TYPE_STRING },
 110 };
 111
 112 enum {
 113         RPC_UPGRADE_KEEP,
 114         __RPC_UPGRADE_MAX
 115 };
 116
 117 static const struct blobmsg_policy rpc_upgrade_policy[__RPC_UPGRADE_MAX] = {
 118         [RPC_UPGRADE_KEEP] = { .name = "keep",    .type = BLOBMSG_TYPE_BOOL },
 119 };
 120
 121
 122 static int
 123 rpc_errno_status(void)
 124 {
 125         switch (errno)
 126         {
 127         case EACCES:
 128                 return UBUS_STATUS_PERMISSION_DENIED;
 129
 130         case ENOTDIR:
 131                 return UBUS_STATUS_INVALID_ARGUMENT;
 132
 133         case ENOENT:
 134                 return UBUS_STATUS_NOT_FOUND;
 135
 136         case EINVAL:
 137                 return UBUS_STATUS_INVALID_ARGUMENT;
 138
 139         default:
 140                 return UBUS_STATUS_UNKNOWN_ERROR;
 141         }
 142 }
 143
 144 static void
 145 log_read(FILE *log, int logsize)
 146 {
 147         int len;
 148         char *logbuf;
 149
 150         if (logsize == 0)
 151                 logsize = RPC_LUCI2_DEF_LOGSIZE;
 152
 153         len = (logsize > RPC_LUCI2_MAX_LOGSIZE) ? RPC_LUCI2_MAX_LOGSIZE : logsize;
 154         logbuf = blobmsg_alloc_string_buffer(&buf, "log", len + 1);
 155
 156         if (!logbuf)
 157                 return;
 158
 159         while (logsize > RPC_LUCI2_MAX_LOGSIZE)
 160         {
 161                 len = logsize % RPC_LUCI2_MAX_LOGSIZE;
 162
 163                 if (len == 0)
 164                         len = RPC_LUCI2_MAX_LOGSIZE;
 165
 166                 fread(logbuf, 1, len, log);
 167                 logsize -= len;
 168         }
 169
 170         len = fread(logbuf, 1, logsize, log);
 171         *(logbuf + len) = 0;
 172
 173         blobmsg_add_string_buffer(&buf);
 174 }
 175
 176 static int
 177 rpc_luci2_system_log(struct ubus_context *ctx, struct ubus_object *obj,
 178                      struct ubus_request_data *req, const char *method,
 179                      struct blob_attr *msg)
 180 {
 181         FILE *log;
 182         int logsize = 0;
 183         const char *logfile = NULL;
 184         struct stat st;
 185         struct uci_package *p;
 186         struct uci_element *e;
 187         struct uci_section *s;
 188         struct uci_ptr ptr = { .package = "system" };
 189
 190         uci_load(cursor, ptr.package, &p);
 191
 192         if (!p)
 193                 return UBUS_STATUS_NOT_FOUND;
 194
 195         uci_foreach_element(&p->sections, e)
 196         {
 197                 s = uci_to_section(e);
 198
 199                 if (strcmp(s->type, "system"))
 200                         continue;
 201
 202                 ptr.o = NULL;
 203                 ptr.option = "log_type";
 204                 ptr.section = e->name;
 205                 uci_lookup_ptr(cursor, &ptr, NULL, true);
 206                 break;
 207         }
 208
 209         if (ptr.o && ptr.o->type == UCI_TYPE_STRING &&
 210             !strcmp(ptr.o->v.string, "file"))
 211         {
 212                 ptr.o = NULL;
 213                 ptr.option = "log_file";
 214                 uci_lookup_ptr(cursor, &ptr, NULL, true);
 215
 216                 if (ptr.o && ptr.o->type == UCI_TYPE_STRING)
 217                         logfile = ptr.o->v.string;
 218                 else
 219                         logfile = "/var/log/messages";
 220
 221                 if (stat(logfile, &st) || !(log = fopen(logfile, "r")))
 222                         goto fail;
 223
 224                 logsize = st.st_size;
 225         }
 226         else
 227         {
 228                 ptr.o = NULL;
 229                 ptr.option = "log_size";
 230                 uci_lookup_ptr(cursor, &ptr, NULL, true);
 231
 232                 if (ptr.o && ptr.o->type == UCI_TYPE_STRING)
 233                         logsize = atoi(ptr.o->v.string) * 1024;
 234
 235                 if (!(log = popen("logread", "r")))
 236                         goto fail;
 237         }
 238
 239         blob_buf_init(&buf, 0);
 240
 241         log_read(log, logsize);
 242         fclose(log);
 243
 244         uci_unload(cursor, p);
 245         ubus_send_reply(ctx, req, buf.head);
 246         return 0;
 247
 248 fail:
 249         uci_unload(cursor, p);
 250         return rpc_errno_status();
 251 }
 252
 253 static int
 254 rpc_luci2_system_dmesg(struct ubus_context *ctx, struct ubus_object *obj,
 255                        struct ubus_request_data *req, const char *method,
 256                        struct blob_attr *msg)
 257 {
 258         FILE *log;
 259
 260         if (!(log = popen("dmesg", "r")))
 261                 return rpc_errno_status();
 262
 263         blob_buf_init(&buf, 0);
 264
 265         log_read(log, RPC_LUCI2_MAX_LOGSIZE);
 266         fclose(log);
 267
 268         ubus_send_reply(ctx, req, buf.head);
 269         return 0;
 270 }
 271
 272 static int
 273 rpc_luci2_system_diskfree(struct ubus_context *ctx, struct ubus_object *obj,
 274                           struct ubus_request_data *req, const char *method,
 275                           struct blob_attr *msg)
 276 {
 277         int i;
 278         void *c;
 279         struct statvfs s;
 280         const char *fslist[] = {
 281                 "/",    "root",
 282                 "/tmp", "tmp",
 283         };
 284
 285         blob_buf_init(&buf, 0);
 286
 287         for (i = 0; i < sizeof(fslist) / sizeof(fslist[0]); i += 2)
 288         {
 289                 if (statvfs(fslist[i], &s))
 290                         continue;
 291
 292                 c = blobmsg_open_table(&buf, fslist[i+1]);
 293
 294                 blobmsg_add_u32(&buf, "total", s.f_blocks * s.f_frsize);
 295                 blobmsg_add_u32(&buf, "free",  s.f_bfree  * s.f_frsize);
 296                 blobmsg_add_u32(&buf, "used", (s.f_blocks - s.f_bfree) * s.f_frsize);
 297
 298                 blobmsg_close_table(&buf, c);
 299         }
 300
 301         ubus_send_reply(ctx, req, buf.head);
 302         return 0;
 303 }
 304
 305 static int
 306 rpc_luci2_process_list(struct ubus_context *ctx, struct ubus_object *obj,
 307                        struct ubus_request_data *req, const char *method,
 308                        struct blob_attr *msg)
 309 {
 310         FILE *top;
 311         void *c, *d;
 312         char line[1024];
 313         char *pid, *ppid, *user, *stat, *vsz, *pvsz, *pcpu, *cmd;
 314
 315         if (!(top = popen("/bin/busybox top -bn1", "r")))
 316                 return rpc_errno_status();
 317
 318         blob_buf_init(&buf, 0);
 319         c = blobmsg_open_array(&buf, "processes");
 320
 321         while (fgets(line, sizeof(line) - 1, top))
 322         {
 323                 pid  = strtok(line, " ");
 324
 325                 if (*pid < '0' || *pid > '9')
 326                         continue;
 327
 328                 ppid = strtok(NULL, " ");
 329                 user = strtok(NULL, " ");
 330                 stat = strtok(NULL, " ");
 331
 332                 if (!stat)
 333                         continue;
 334
 335                 if (!*(stat + 1))
 336                         *(stat + 1) = ' ';
 337
 338                 if (!*(stat + 2))
 339                         *(stat + 2) = ' ';
 340
 341                 *(stat + 3) = 0;
 342
 343                 vsz  = strtok(stat + 4, " ");
 344                 pvsz = strtok(NULL, " ");
 345                 pcpu = strtok(NULL, " ");
 346                 cmd  = strtok(NULL, "\n");
 347
 348                 if (!cmd)
 349                         continue;
 350
 351                 d = blobmsg_open_table(&buf, NULL);
 352
 353                 blobmsg_add_u32(&buf, "pid", atoi(pid));
 354                 blobmsg_add_u32(&buf, "ppid", atoi(ppid));
 355                 blobmsg_add_string(&buf, "user", user);
 356                 blobmsg_add_string(&buf, "stat", stat);
 357                 blobmsg_add_u32(&buf, "vsize", atoi(vsz) * 1024);
 358                 blobmsg_add_u32(&buf, "vsize_percent", atoi(pvsz));
 359                 blobmsg_add_u32(&buf, "cpu_percent", atoi(pcpu));
 360                 blobmsg_add_string(&buf, "command", cmd);
 361
 362                 blobmsg_close_table(&buf, d);
 363         }
 364
 365         fclose(top);
 366         blobmsg_close_array(&buf, c);
 367
 368         ubus_send_reply(ctx, req, buf.head);
 369         return 0;
 370 }
 371
 372 static int
 373 rpc_luci2_process_signal(struct ubus_context *ctx, struct ubus_object *obj,
 374                          struct ubus_request_data *req, const char *method,
 375                          struct blob_attr *msg)
 376 {
 377         int pid, sig;
 378         struct blob_attr *tb[__RPC_S_MAX];
 379
 380         blobmsg_parse(rpc_signal_policy, __RPC_S_MAX, tb,
 381                       blob_data(msg), blob_len(msg));
 382
 383         if (!tb[RPC_S_SIGNAL] || !tb[RPC_S_PID])
 384         {
 385                 errno = EINVAL;
 386                 return rpc_errno_status();
 387         }
 388
 389         pid = blobmsg_get_u32(tb[RPC_S_PID]);
 390         sig = blobmsg_get_u32(tb[RPC_S_SIGNAL]);
 391
 392         if (kill(pid, sig))
 393                 return rpc_errno_status();
 394
 395         return 0;
 396 }
 397
 398 static int
 399 rpc_luci2_init_list(struct ubus_context *ctx, struct ubus_object *obj,
 400                     struct ubus_request_data *req, const char *method,
 401                     struct blob_attr *msg)
 402 {
 403         int n;
 404         void *c, *t;
 405         char *p, path[PATH_MAX];
 406         struct stat s;
 407         struct dirent *e;
 408         FILE *f;
 409         DIR *d;
 410
 411         if (!(d = opendir("/etc/init.d")))
 412                 return rpc_errno_status();
 413
 414         blob_buf_init(&buf, 0);
 415         c = blobmsg_open_array(&buf, "initscripts");
 416
 417         while ((e = readdir(d)) != NULL)
 418         {
 419                 snprintf(path, sizeof(path) - 1, "/etc/init.d/%s", e->d_name);
 420
 421                 if (stat(path, &s) || !S_ISREG(s.st_mode) || !(s.st_mode & S_IXUSR))
 422                         continue;
 423
 424                 if ((f = fopen(path, "r")) != NULL)
 425                 {
 426                         n = -1;
 427                         p = fgets(path, sizeof(path) - 1, f);
 428
 429                         if (!p || !strstr(p, "/etc/rc.common"))
 430                                 goto skip;
 431
 432                         t = blobmsg_open_table(&buf, NULL);
 433
 434                         blobmsg_add_string(&buf, "name", e->d_name);
 435
 436                         while (fgets(path, sizeof(path) - 1, f))
 437                         {
 438                                 p = strtok(path, "= \t");
 439
 440                                 if (!strcmp(p, "START") && !!(p = strtok(NULL, "= \t\n")))
 441                                 {
 442                                         n = atoi(p);
 443                                         blobmsg_add_u32(&buf, "start", n);
 444                                 }
 445                                 else if (!strcmp(p, "STOP") && !!(p = strtok(NULL, "= \t\n")))
 446                                 {
 447                                         blobmsg_add_u32(&buf, "stop", atoi(p));
 448                                         break;
 449                                 }
 450                         }
 451
 452                         if (n > -1)
 453                         {
 454                                 snprintf(path, sizeof(path) - 1, "/etc/rc.d/S%02d%s",
 455                                          n, e->d_name);
 456
 457                                 blobmsg_add_u8(&buf, "enabled",
 458                                                (!stat(path, &s) && (s.st_mode & S_IXUSR)));
 459                         }
 460                         else
 461                         {
 462                                 blobmsg_add_u8(&buf, "enabled", 0);
 463                         }
 464
 465                         blobmsg_close_table(&buf, t);
 466
 467 skip:
 468                         fclose(f);
 469                 }
 470         }
 471
 472         closedir(d);
 473         blobmsg_close_array(&buf, c);
 474
 475         ubus_send_reply(ctx, req, buf.head);
 476         return 0;
 477 }
 478
 479 static int
 480 rpc_luci2_init_action(struct ubus_context *ctx, struct ubus_object *obj,
 481                       struct ubus_request_data *req, const char *method,
 482                       struct blob_attr *msg)
 483 {
 484         int fd;
 485         pid_t pid;
 486         struct stat s;
 487         char path[PATH_MAX];
 488         const char *action;
 489         struct blob_attr *tb[__RPC_I_MAX];
 490
 491         blobmsg_parse(rpc_init_policy, __RPC_I_MAX, tb,
 492                       blob_data(msg), blob_len(msg));
 493
 494         if (!tb[RPC_I_NAME] || !tb[RPC_I_ACTION])
 495                 return UBUS_STATUS_INVALID_ARGUMENT;
 496
 497         action = blobmsg_data(tb[RPC_I_ACTION]);
 498
 499         if (strcmp(action, "start") && strcmp(action, "stop") &&
 500             strcmp(action, "reload") && strcmp(action, "restart") &&
 501             strcmp(action, "enable") && strcmp(action, "disable"))
 502                 return UBUS_STATUS_INVALID_ARGUMENT;
 503
 504         snprintf(path, sizeof(path) - 1, "/etc/init.d/%s",
 505                  (char *)blobmsg_data(tb[RPC_I_NAME]));
 506
 507         if (stat(path, &s))
 508                 return rpc_errno_status();
 509
 510         if (!(s.st_mode & S_IXUSR))
 511                 return UBUS_STATUS_PERMISSION_DENIED;
 512
 513         switch ((pid = fork()))
 514         {
 515         case -1:
 516                 return rpc_errno_status();
 517
 518         case 0:
 519                 uloop_done();
 520
 521                 if ((fd = open("/dev/null", O_RDWR)) > -1)
 522                 {
 523                         dup2(fd, 0);
 524                         dup2(fd, 1);
 525                         dup2(fd, 2);
 526
 527                         close(fd);
 528                 }
 529
 530                 chdir("/");
 531
 532                 if (execl(path, path, action, NULL))
 533                         return rpc_errno_status();
 534
 535         default:
 536                 return 0;
 537         }
 538 }
 539
 540 static int
 541 rpc_luci2_rclocal_get(struct ubus_context *ctx, struct ubus_object *obj,
 542                       struct ubus_request_data *req, const char *method,
 543                       struct blob_attr *msg)
 544 {
 545         FILE *f;
 546         char data[4096] = { 0 };
 547
 548         if (!(f = fopen("/etc/rc.local", "r")))
 549                 return rpc_errno_status();
 550
 551         fread(data, sizeof(data) - 1, 1, f);
 552         fclose(f);
 553
 554         blob_buf_init(&buf, 0);
 555         blobmsg_add_string(&buf, "data", data);
 556
 557         ubus_send_reply(ctx, req, buf.head);
 558         return 0;
 559 }
 560
 561 static int
 562 rpc_luci2_rclocal_set(struct ubus_context *ctx, struct ubus_object *obj,
 563                       struct ubus_request_data *req, const char *method,
 564                       struct blob_attr *msg)
 565 {
 566         FILE *f;
 567         struct blob_attr *tb[__RPC_D_MAX];
 568
 569         blobmsg_parse(rpc_data_policy, __RPC_D_MAX, tb,
 570                       blob_data(msg), blob_len(msg));
 571
 572         if (!tb[RPC_D_DATA] || blobmsg_data_len(tb[RPC_D_DATA]) >= 4096)
 573                 return UBUS_STATUS_INVALID_ARGUMENT;
 574
 575         if (!(f = fopen("/etc/rc.local", "w")))
 576                 return rpc_errno_status();
 577
 578         fwrite(blobmsg_data(tb[RPC_D_DATA]),
 579                blobmsg_data_len(tb[RPC_D_DATA]) - 1, 1, f);
 580
 581         fclose(f);
 582         return 0;
 583 }
 584
 585 static int
 586 rpc_luci2_crontab_get(struct ubus_context *ctx, struct ubus_object *obj,
 587                       struct ubus_request_data *req, const char *method,
 588                       struct blob_attr *msg)
 589 {
 590         FILE *f;
 591         char data[4096] = { 0 };
 592
 593         if (!(f = fopen("/etc/crontabs/root", "r")))
 594                 return rpc_errno_status();
 595
 596         fread(data, sizeof(data) - 1, 1, f);
 597         fclose(f);
 598
 599         blob_buf_init(&buf, 0);
 600         blobmsg_add_string(&buf, "data", data);
 601
 602         ubus_send_reply(ctx, req, buf.head);
 603         return 0;
 604 }
 605
 606 static int
 607 rpc_luci2_crontab_set(struct ubus_context *ctx, struct ubus_object *obj,
 608                       struct ubus_request_data *req, const char *method,
 609                       struct blob_attr *msg)
 610 {
 611         FILE *f;
 612         struct stat s;
 613         struct blob_attr *tb[__RPC_D_MAX];
 614
 615         blobmsg_parse(rpc_data_policy, __RPC_D_MAX, tb,
 616                       blob_data(msg), blob_len(msg));
 617
 618         if (!tb[RPC_D_DATA] || blobmsg_data_len(tb[RPC_D_DATA]) >= 4096)
 619                 return UBUS_STATUS_INVALID_ARGUMENT;
 620
 621         if (stat("/etc/crontabs", &s) && mkdir("/etc/crontabs", 0755))
 622                 return rpc_errno_status();
 623
 624         if (!(f = fopen("/etc/crontabs/root", "w")))
 625                 return rpc_errno_status();
 626
 627         fwrite(blobmsg_data(tb[RPC_D_DATA]),
 628                blobmsg_data_len(tb[RPC_D_DATA]) - 1, 1, f);
 629
 630         fclose(f);
 631         return 0;
 632 }
 633
 634 static int
 635 rpc_luci2_sshkeys_get(struct ubus_context *ctx, struct ubus_object *obj,
 636                       struct ubus_request_data *req, const char *method,
 637                       struct blob_attr *msg)
 638 {
 639         FILE *f;
 640         void *c;
 641         char *p, line[4096];
 642
 643         if (!(f = fopen("/etc/dropbear/authorized_keys", "r")))
 644                 return rpc_errno_status();
 645
 646         blob_buf_init(&buf, 0);
 647         c = blobmsg_open_array(&buf, "keys");
 648
 649         while (fgets(line, sizeof(line) - 1, f))
 650         {
 651                 for (p = line + strlen(line) - 1; (p > line) && isspace(*p); p--)
 652                         *p = 0;
 653
 654                 for (p = line; isspace(*p); p++)
 655                         *p = 0;
 656
 657                 if (*p)
 658                         blobmsg_add_string(&buf, NULL, p);
 659         }
 660
 661         blobmsg_close_array(&buf, c);
 662         fclose(f);
 663
 664         ubus_send_reply(ctx, req, buf.head);
 665         return 0;
 666 }
 667
 668 static int
 669 rpc_luci2_sshkeys_set(struct ubus_context *ctx, struct ubus_object *obj,
 670                       struct ubus_request_data *req, const char *method,
 671                       struct blob_attr *msg)
 672 {
 673         FILE *f;
 674         int rem;
 675         struct blob_attr *cur, *tb[__RPC_K_MAX];
 676
 677         blobmsg_parse(rpc_sshkey_policy, __RPC_K_MAX, tb,
 678                       blob_data(msg), blob_len(msg));
 679
 680         if (!tb[RPC_K_KEYS])
 681                 return UBUS_STATUS_INVALID_ARGUMENT;
 682
 683         if (!(f = fopen("/etc/dropbear/authorized_keys", "w")))
 684                 return rpc_errno_status();
 685
 686         blobmsg_for_each_attr(cur, tb[RPC_K_KEYS], rem)
 687         {
 688                 if (blobmsg_type(cur) != BLOBMSG_TYPE_STRING)
 689                         continue;
 690
 691                 fwrite(blobmsg_data(cur), blobmsg_data_len(cur) - 1, 1, f);
 692                 fwrite("\n", 1, 1, f);
 693         }
 694
 695         fclose(f);
 696         return 0;
 697 }
 698
 699 static int
 700 rpc_luci2_password_set(struct ubus_context *ctx, struct ubus_object *obj,
 701                        struct ubus_request_data *req, const char *method,
 702                        struct blob_attr *msg)
 703 {
 704         pid_t pid;
 705         int fd, fds[2];
 706         struct stat s;
 707         struct blob_attr *tb[__RPC_P_MAX];
 708
 709         blobmsg_parse(rpc_password_policy, __RPC_P_MAX, tb,
 710                       blob_data(msg), blob_len(msg));
 711
 712         if (!tb[RPC_P_USER] || !tb[RPC_P_PASSWORD])
 713                 return UBUS_STATUS_INVALID_ARGUMENT;
 714
 715         if (stat("/usr/bin/passwd", &s))
 716                 return UBUS_STATUS_NOT_FOUND;
 717
 718         if (!(s.st_mode & S_IXUSR))
 719                 return UBUS_STATUS_PERMISSION_DENIED;
 720
 721         if (pipe(fds))
 722                 return rpc_errno_status();
 723
 724         switch ((pid = fork()))
 725         {
 726         case -1:
 727                 close(fds[0]);
 728                 close(fds[1]);
 729                 return rpc_errno_status();
 730
 731         case 0:
 732                 uloop_done();
 733
 734                 dup2(fds[0], 0);
 735                 close(fds[0]);
 736                 close(fds[1]);
 737
 738                 if ((fd = open("/dev/null", O_RDWR)) > -1)
 739                 {
 740                         dup2(fd, 1);
 741                         dup2(fd, 2);
 742                         close(fd);
 743                 }
 744
 745                 chdir("/");
 746
 747                 if (execl("/usr/bin/passwd", "/usr/bin/passwd",
 748                           blobmsg_data(tb[RPC_P_USER]), NULL))
 749                         return rpc_errno_status();
 750
 751         default:
 752                 close(fds[0]);
 753
 754                 write(fds[1], blobmsg_data(tb[RPC_P_PASSWORD]),
 755                               blobmsg_data_len(tb[RPC_P_PASSWORD]) - 1);
 756                 write(fds[1], "\n", 1);
 757
 758                 usleep(100 * 1000);
 759
 760                 write(fds[1], blobmsg_data(tb[RPC_P_PASSWORD]),
 761                               blobmsg_data_len(tb[RPC_P_PASSWORD]) - 1);
 762                 write(fds[1], "\n", 1);
 763
 764                 close(fds[1]);
 765
 766                 waitpid(pid, NULL, 0);
 767
 768                 return 0;
 769         }
 770 }
 771
 772 static int
 773 rpc_luci2_led_list(struct ubus_context *ctx, struct ubus_object *obj,
 774                    struct ubus_request_data *req, const char *method,
 775                    struct blob_attr *msg)
 776 {
 777         DIR *d;
 778         FILE *f;
 779         void *list, *led, *trigger;
 780         char *p, *active_trigger, line[512];
 781         struct dirent *e;
 782
 783         if (!(d = opendir("/sys/class/leds")))
 784                 return rpc_errno_status();
 785
 786         blob_buf_init(&buf, 0);
 787         list = blobmsg_open_array(&buf, "leds");
 788
 789         while ((e = readdir(d)) != NULL)
 790         {
 791                 snprintf(line, sizeof(line) - 1, "/sys/class/leds/%s/trigger",
 792                          e->d_name);
 793
 794                 if (!(f = fopen(line, "r")))
 795                         continue;
 796
 797                 led = blobmsg_open_table(&buf, NULL);
 798
 799                 blobmsg_add_string(&buf, "name", e->d_name);
 800
 801                 if (fgets(line, sizeof(line) - 1, f))
 802                 {
 803                         trigger = blobmsg_open_array(&buf, "triggers");
 804
 805                         for (p = strtok(line, " \n"), active_trigger = NULL;
 806                              p != NULL;
 807                              p = strtok(NULL, " \n"))
 808                         {
 809                                 if (*p == '[')
 810                                 {
 811                                         *(p + strlen(p) - 1) = 0;
 812                                         *p++ = 0;
 813                                         active_trigger = p;
 814                                 }
 815
 816                                 blobmsg_add_string(&buf, NULL, p);
 817                         }
 818
 819                         blobmsg_close_array(&buf, trigger);
 820
 821                         if (active_trigger)
 822                                 blobmsg_add_string(&buf, "active_trigger", active_trigger);
 823                 }
 824
 825                 fclose(f);
 826
 827                 snprintf(line, sizeof(line) - 1, "/sys/class/leds/%s/brightness",
 828                          e->d_name);
 829
 830                 if ((f = fopen(line, "r")) != NULL)
 831                 {
 832                         if (fgets(line, sizeof(line) - 1, f))
 833                                 blobmsg_add_u32(&buf, "brightness", atoi(line));
 834
 835                         fclose(f);
 836                 }
 837
 838                 snprintf(line, sizeof(line) - 1, "/sys/class/leds/%s/max_brightness",
 839                          e->d_name);
 840
 841                 if ((f = fopen(line, "r")) != NULL)
 842                 {
 843                         if (fgets(line, sizeof(line) - 1, f))
 844                                 blobmsg_add_u32(&buf, "max_brightness", atoi(line));
 845
 846                         fclose(f);
 847                 }
 848
 849                 blobmsg_close_table(&buf, led);
 850         }
 851
 852         closedir(d);
 853
 854         blobmsg_close_array(&buf, list);
 855         ubus_send_reply(ctx, req, buf.head);
 856
 857         return 0;
 858 }
 859
 860 static int
 861 rpc_luci2_usb_list(struct ubus_context *ctx, struct ubus_object *obj,
 862                    struct ubus_request_data *req, const char *method,
 863                    struct blob_attr *msg)
 864 {
 865         DIR *d;
 866         FILE *f;
 867         int i;
 868         void *list, *device;
 869         char *p, line[512];
 870         struct stat s;
 871         struct dirent *e;
 872
 873         const char *attributes[] = {
 874                 "manufacturer", "vendor_name",  "s",
 875                 "product",      "product_name", "s",
 876                 "idVendor",     "vendor_id",    "x",
 877                 "idProduct",    "product_id",   "x",
 878                 "serial",       "serial",       "s",
 879                 "speed",        "speed",        "d",
 880         };
 881
 882         if (!(d = opendir("/sys/bus/usb/devices")))
 883                 return rpc_errno_status();
 884
 885         blob_buf_init(&buf, 0);
 886         list = blobmsg_open_array(&buf, "devices");
 887
 888         while ((e = readdir(d)) != NULL)
 889         {
 890                 if (e->d_name[0] < '0' || e->d_name[0] > '9')
 891                         continue;
 892
 893                 snprintf(line, sizeof(line) - 1,
 894                          "/sys/bus/usb/devices/%s/%s", e->d_name, attributes[0]);
 895
 896                 if (stat(line, &s))
 897                         continue;
 898
 899                 device = blobmsg_open_table(&buf, NULL);
 900
 901                 blobmsg_add_string(&buf, "name", e->d_name);
 902
 903                 for (i = 0; i < sizeof(attributes) / sizeof(attributes[0]); i += 3)
 904                 {
 905                         snprintf(line, sizeof(line) - 1,
 906                                          "/sys/bus/usb/devices/%s/%s", e->d_name, attributes[i]);
 907
 908                         if (!(f = fopen(line, "r")))
 909                                 continue;
 910
 911                         if (fgets(line, sizeof(line) - 1, f))
 912                         {
 913                                 switch (*attributes[i+2])
 914                                 {
 915                                 case 'x':
 916                                         blobmsg_add_u32(&buf, attributes[i+1],
 917                                                         strtoul(line, NULL, 16));
 918                                         break;
 919
 920                                 case 'd':
 921                                         blobmsg_add_u32(&buf, attributes[i+1],
 922                                                         strtoul(line, NULL, 10));
 923                                         break;
 924
 925                                 default:
 926                                         if ((p = strchr(line, '\n')) != NULL)
 927                                                 while (p > line && isspace(*p))
 928                                                         *p-- = 0;
 929
 930                                         blobmsg_add_string(&buf, attributes[i+1], line);
 931                                         break;
 932                                 }
 933                         }
 934
 935                         fclose(f);
 936                 }
 937
 938                 blobmsg_close_table(&buf, device);
 939         }
 940
 941         closedir(d);
 942
 943         blobmsg_close_array(&buf, list);
 944         ubus_send_reply(ctx, req, buf.head);
 945
 946         return 0;
 947 }
 948
 949 static int
 950 rpc_luci2_upgrade_test(struct ubus_context *ctx, struct ubus_object *obj,
 951                        struct ubus_request_data *req, const char *method,
 952                        struct blob_attr *msg)
 953 {
 954         const char *cmd[4] = { "sysupgrade", "--test", "/tmp/firmware.bin", NULL };
 955         return rpc_exec(cmd, NULL, NULL, NULL, NULL, ctx, req);
 956 }
 957
 958 static int
 959 rpc_luci2_upgrade_start(struct ubus_context *ctx, struct ubus_object *obj,
 960                         struct ubus_request_data *req, const char *method,
 961                         struct blob_attr *msg)
 962 {
 963         return 0;
 964 }
 965
 966 static int
 967 rpc_luci2_upgrade_clean(struct ubus_context *ctx, struct ubus_object *obj,
 968                         struct ubus_request_data *req, const char *method,
 969                         struct blob_attr *msg)
 970 {
 971         if (unlink("/tmp/firmware.bin"))
 972                 return rpc_errno_status();
 973
 974         return 0;
 975 }
 976
 977 static int
 978 rpc_luci2_backup_restore(struct ubus_context *ctx, struct ubus_object *obj,
 979                          struct ubus_request_data *req, const char *method,
 980                          struct blob_attr *msg)
 981 {
 982         const char *cmd[4] = { "sysupgrade", "--restore-backup",
 983                                "/tmp/backup.tar.gz", NULL };
 984
 985         return rpc_exec(cmd, NULL, NULL, NULL, NULL, ctx, req);
 986 }
 987
 988 static int
 989 rpc_luci2_backup_clean(struct ubus_context *ctx, struct ubus_object *obj,
 990                        struct ubus_request_data *req, const char *method,
 991                        struct blob_attr *msg)
 992 {
 993         if (unlink("/tmp/backup.tar.gz"))
 994                 return rpc_errno_status();
 995
 996         return 0;
 997 }
 998
 999 static int
1000 rpc_luci2_reset_test(struct ubus_context *ctx, struct ubus_object *obj,
1001                      struct ubus_request_data *req, const char *method,
1002                      struct blob_attr *msg)
1003 {
1004         FILE *mtd;
1005         struct stat s;
1006         char line[64] = { 0 };
1007         bool supported = false;
1008
1009         if (!stat("/sbin/mtd", &s) && (s.st_mode & S_IXUSR))
1010         {
1011                 if ((mtd = fopen("/proc/mtd", "r")) != NULL)
1012                 {
1013                         while (fgets(line, sizeof(line) - 1, mtd))
1014                         {
1015                                 if (strstr(line, "\"rootfs_data\""))
1016                                 {
1017                                         supported = true;
1018                                         break;
1019                                 }
1020                         }
1021
1022                         fclose(mtd);
1023                 }
1024         }
1025
1026         blob_buf_init(&buf, 0);
1027         blobmsg_add_u8(&buf, "supported", supported);
1028
1029         ubus_send_reply(ctx, req, buf.head);
1030
1031         return 0;
1032 }
1033
1034 static int
1035 rpc_luci2_reset_start(struct ubus_context *ctx, struct ubus_object *obj,
1036                       struct ubus_request_data *req, const char *method,
1037                       struct blob_attr *msg)
1038 {
1039         switch (fork())
1040         {
1041         case -1:
1042                 return rpc_errno_status();
1043
1044         case 0:
1045                 uloop_done();
1046
1047                 chdir("/");
1048
1049                 close(0);
1050                 close(1);
1051                 close(2);
1052
1053                 sleep(1);
1054
1055                 execl("/sbin/mtd", "/sbin/mtd", "-r", "erase", "rootfs_data", NULL);
1056
1057                 return rpc_errno_status();
1058
1059         default:
1060                 return 0;
1061         }
1062 }
1063
1064 static int
1065 rpc_luci2_reboot(struct ubus_context *ctx, struct ubus_object *obj,
1066                  struct ubus_request_data *req, const char *method,
1067                  struct blob_attr *msg)
1068 {
1069         switch (fork())
1070         {
1071         case -1:
1072                 return rpc_errno_status();
1073
1074         case 0:
1075                 chdir("/");
1076
1077                 close(0);
1078                 close(1);
1079                 close(2);
1080
1081                 sleep(1);
1082
1083                 execl("/sbin/reboot", "/sbin/reboot", NULL);
1084
1085                 return rpc_errno_status();
1086
1087         default:
1088                 return 0;
1089         }
1090 }
1091
1092
1093 static FILE *
1094 dnsmasq_leasefile(void)
1095 {
1096         FILE *leases = NULL;
1097         struct uci_package *p;
1098         struct uci_element *e;
1099         struct uci_section *s;
1100         struct uci_ptr ptr = {
1101                 .package = "dhcp",
1102                 .section = NULL,
1103                 .option  = "leasefile"
1104         };
1105
1106         uci_load(cursor, ptr.package, &p);
1107
1108         if (!p)
1109                 return NULL;
1110
1111         uci_foreach_element(&p->sections, e)
1112         {
1113                 s = uci_to_section(e);
1114
1115                 if (strcmp(s->type, "dnsmasq"))
1116                         continue;
1117
1118                 ptr.section = e->name;
1119                 uci_lookup_ptr(cursor, &ptr, NULL, true);
1120                 break;
1121         }
1122
1123         if (ptr.o && ptr.o->type == UCI_TYPE_STRING)
1124                 leases = fopen(ptr.o->v.string, "r");
1125
1126         uci_unload(cursor, p);
1127
1128         return leases;
1129 }
1130
1131 static int
1132 rpc_luci2_network_leases(struct ubus_context *ctx, struct ubus_object *obj,
1133                          struct ubus_request_data *req, const char *method,
1134                          struct blob_attr *msg)
1135 {
1136         FILE *leases;
1137         void *c, *d;
1138         char line[128];
1139         char *ts, *mac, *addr, *name;
1140         time_t now = time(NULL);
1141
1142         blob_buf_init(&buf, 0);
1143         c = blobmsg_open_array(&buf, "leases");
1144
1145         leases = dnsmasq_leasefile();
1146
1147         if (!leases)
1148                 goto out;
1149
1150         while (fgets(line, sizeof(line) - 1, leases))
1151         {
1152                 ts   = strtok(line, " \t");
1153                 mac  = strtok(NULL, " \t");
1154                 addr = strtok(NULL, " \t");
1155                 name = strtok(NULL, " \t");
1156
1157                 if (!ts || !mac || !addr || !name)
1158                         continue;
1159
1160                 if (strchr(addr, ':'))
1161                         continue;
1162
1163                 d = blobmsg_open_table(&buf, NULL);
1164
1165                 blobmsg_add_u32(&buf, "expires", atoi(ts) - now);
1166                 blobmsg_add_string(&buf, "macaddr", mac);
1167                 blobmsg_add_string(&buf, "ipaddr", addr);
1168
1169                 if (strcmp(name, "*"))
1170                         blobmsg_add_string(&buf, "hostname", name);
1171
1172                 blobmsg_close_table(&buf, d);
1173         }
1174
1175         fclose(leases);
1176
1177 out:
1178         blobmsg_close_array(&buf, c);
1179         ubus_send_reply(ctx, req, buf.head);
1180
1181         return 0;
1182 }
1183
1184 static int
1185 rpc_luci2_network_leases6(struct ubus_context *ctx, struct ubus_object *obj,
1186                           struct ubus_request_data *req, const char *method,
1187                           struct blob_attr *msg)
1188 {
1189         FILE *leases;
1190         void *c, *d;
1191         char line[128];
1192         char *ts, *mac, *addr, *name, *duid;
1193         time_t now = time(NULL);
1194
1195         blob_buf_init(&buf, 0);
1196         c = blobmsg_open_array(&buf, "leases");
1197
1198         leases = fopen("/tmp/hosts/6relayd", "r");
1199
1200         if (leases)
1201         {
1202                 while (fgets(line, sizeof(line) - 1, leases))
1203                 {
1204                         if (strncmp(line, "# ", 2))
1205                                 continue;
1206
1207                         strtok(line + 2, " \t"); /* iface */
1208
1209                         duid = strtok(NULL, " \t");
1210
1211                         strtok(NULL, " \t"); /* iaid */
1212
1213                         name = strtok(NULL, " \t");
1214                         ts   = strtok(NULL, " \t");
1215
1216                         strtok(NULL, " \t"); /* id */
1217                         strtok(NULL, " \t"); /* length */
1218
1219                         addr = strtok(NULL, " \t\n");
1220
1221                         if (!addr)
1222                                 continue;
1223
1224                         d = blobmsg_open_table(&buf, NULL);
1225
1226                         blobmsg_add_u32(&buf, "expires", atoi(ts) - now);
1227                         blobmsg_add_string(&buf, "duid", duid);
1228                         blobmsg_add_string(&buf, "ip6addr", addr);
1229
1230                         if (strcmp(name, "-"))
1231                                 blobmsg_add_string(&buf, "hostname", name);
1232
1233                         blobmsg_close_array(&buf, d);
1234                 }
1235
1236                 fclose(leases);
1237         }
1238         else
1239         {
1240                 leases = dnsmasq_leasefile();
1241
1242                 if (!leases)
1243                         goto out;
1244
1245                 while (fgets(line, sizeof(line) - 1, leases))
1246                 {
1247                         ts   = strtok(line, " \t");
1248                         mac  = strtok(NULL, " \t");
1249                         addr = strtok(NULL, " \t");
1250                         name = strtok(NULL, " \t");
1251                         duid = strtok(NULL, " \t\n");
1252
1253                         if (!ts || !mac || !addr || !duid)
1254                                 continue;
1255
1256                         if (!strchr(addr, ':'))
1257                                 continue;
1258
1259                         d = blobmsg_open_table(&buf, NULL);
1260
1261                         blobmsg_add_u32(&buf, "expires", atoi(ts) - now);
1262                         blobmsg_add_string(&buf, "macaddr", mac);
1263                         blobmsg_add_string(&buf, "ip6addr", addr);
1264
1265                         if (strcmp(name, "*"))
1266                                 blobmsg_add_string(&buf, "hostname", name);
1267
1268                         if (strcmp(duid, "*"))
1269                                 blobmsg_add_string(&buf, "duid", name);
1270
1271                         blobmsg_close_table(&buf, d);
1272                 }
1273
1274                 fclose(leases);
1275         }
1276
1277 out:
1278         blobmsg_close_array(&buf, c);
1279         ubus_send_reply(ctx, req, buf.head);
1280
1281         return 0;
1282 }
1283
1284 static int
1285 rpc_luci2_network_ct_count(struct ubus_context *ctx, struct ubus_object *obj,
1286                            struct ubus_request_data *req, const char *method,
1287                            struct blob_attr *msg)
1288 {
1289         FILE *f;
1290         char line[128];
1291
1292         blob_buf_init(&buf, 0);
1293
1294         if ((f = fopen("/proc/sys/net/netfilter/nf_conntrack_count", "r")) != NULL)
1295         {
1296                 if (fgets(line, sizeof(line) - 1, f))
1297                         blobmsg_add_u32(&buf, "count", atoi(line));
1298
1299                 fclose(f);
1300         }
1301
1302         if ((f = fopen("/proc/sys/net/netfilter/nf_conntrack_max", "r")) != NULL)
1303         {
1304                 if (fgets(line, sizeof(line) - 1, f))
1305                         blobmsg_add_u32(&buf, "limit", atoi(line));
1306
1307                 fclose(f);
1308         }
1309
1310         ubus_send_reply(ctx, req, buf.head);
1311
1312         return 0;
1313 }
1314
1315 static int
1316 rpc_luci2_network_ct_table(struct ubus_context *ctx, struct ubus_object *obj,
1317                            struct ubus_request_data *req, const char *method,
1318                            struct blob_attr *msg)
1319 {
1320         FILE *f;
1321         int i;
1322         void *c, *d;
1323         char *p, line[512];
1324         bool seen[6];
1325
1326         blob_buf_init(&buf, 0);
1327         c = blobmsg_open_array(&buf, "entries");
1328
1329         if ((f = fopen("/proc/net/nf_conntrack", "r")) != NULL)
1330         {
1331                 while (fgets(line, sizeof(line) - 1, f))
1332                 {
1333                         d = blobmsg_open_table(&buf, NULL);
1334                         memset(seen, 0, sizeof(seen));
1335
1336                         for (i = 0, p = strtok(line, " "); p; i++, p = strtok(NULL, " "))
1337                         {
1338                                 if (i == 0)
1339                                         blobmsg_add_u8(&buf, "ipv6", !strcmp(p, "ipv6"));
1340                                 else if (i == 3)
1341                                         blobmsg_add_u32(&buf, "protocol", atoi(p));
1342                                 else if (i == 4)
1343                                         blobmsg_add_u32(&buf, "expires", atoi(p));
1344                                 else if (i >= 5)
1345                                 {
1346                                         if (*p == '[')
1347                                                 continue;
1348
1349                                         if (!seen[0] && !strncmp(p, "src=", 4))
1350                                         {
1351                                                 blobmsg_add_string(&buf, "src", p + 4);
1352                                                 seen[0] = true;
1353                                         }
1354                                         else if (!seen[1] && !strncmp(p, "dst=", 4))
1355                                         {
1356                                                 blobmsg_add_string(&buf, "dest", p + 4);
1357                                                 seen[1] = true;
1358                                         }
1359                                         else if (!seen[2] && !strncmp(p, "sport=", 6))
1360                                         {
1361                                                 blobmsg_add_u32(&buf, "sport", atoi(p + 6));
1362                                                 seen[2] = true;
1363                                         }
1364                                         else if (!seen[3] && !strncmp(p, "dport=", 6))
1365                                         {
1366                                                 blobmsg_add_u32(&buf, "dport", atoi(p + 6));
1367                                                 seen[3] = true;
1368                                         }
1369                                         else if (!strncmp(p, "packets=", 8))
1370                                         {
1371                                                 blobmsg_add_u32(&buf,
1372                                                                 seen[4] ? "tx_packets" : "rx_packets",
1373                                                                 atoi(p + 8));
1374                                                 seen[4] = true;
1375                                         }
1376                                         else if (!strncmp(p, "bytes=", 6))
1377                                         {
1378                                                 blobmsg_add_u32(&buf,
1379                                                                                 seen[5] ? "tx_bytes" : "rx_bytes",
1380                                                                 atoi(p + 6));
1381                                                 seen[5] = true;
1382                                         }
1383                                 }
1384                         }
1385
1386                         blobmsg_close_table(&buf, d);
1387                 }
1388
1389                 fclose(f);
1390         }
1391
1392         blobmsg_close_array(&buf, c);
1393         ubus_send_reply(ctx, req, buf.head);
1394
1395         return 0;
1396 }
1397
1398 static int
1399 rpc_luci2_network_arp_table(struct ubus_context *ctx, struct ubus_object *obj,
1400                             struct ubus_request_data *req, const char *method,
1401                             struct blob_attr *msg)
1402 {
1403         FILE *f;
1404         void *c, *d;
1405         char *addr, *mac, *dev, line[128];
1406
1407         blob_buf_init(&buf, 0);
1408         c = blobmsg_open_array(&buf, "entries");
1409
1410         if ((f = fopen("/proc/net/arp", "r")) != NULL)
1411         {
1412                 /* skip header line */
1413                 fgets(line, sizeof(line) - 1, f);
1414
1415                 while (fgets(line, sizeof(line) - 1, f))
1416                 {
1417                         addr = strtok(line, " \t");
1418
1419                         strtok(NULL, " \t"); /* HW type */
1420                         strtok(NULL, " \t"); /* Flags */
1421
1422                         mac = strtok(NULL, " \t");
1423
1424                         strtok(NULL, " \t"); /* Mask */
1425
1426                         dev = strtok(NULL, " \t\n");
1427
1428                         if (!dev)
1429                                 continue;
1430
1431                         d = blobmsg_open_table(&buf, NULL);
1432                         blobmsg_add_string(&buf, "ipaddr", addr);
1433                         blobmsg_add_string(&buf, "macaddr", mac);
1434                         blobmsg_add_string(&buf, "device", dev);
1435                         blobmsg_close_table(&buf, d);
1436                 }
1437
1438                 fclose(f);
1439         }
1440
1441         blobmsg_close_array(&buf, c);
1442         ubus_send_reply(ctx, req, buf.head);
1443
1444         return 0;
1445 }
1446
1447 static void
1448 put_hexaddr(const char *name, const char *s, const char *m)
1449 {
1450         int bits;
1451         struct in_addr a;
1452         char as[sizeof("255.255.255.255/32\0")];
1453
1454         a.s_addr = strtoul(s, NULL, 16);
1455         inet_ntop(AF_INET, &a, as, sizeof(as));
1456
1457         if (m)
1458         {
1459                 for (a.s_addr = ntohl(strtoul(m, NULL, 16)), bits = 0;
1460                      a.s_addr & 0x80000000;
1461                      a.s_addr <<= 1)
1462                         bits++;
1463
1464                 sprintf(as + strlen(as), "/%u", bits);
1465         }
1466
1467         blobmsg_add_string(&buf, name, as);
1468 }
1469
1470 static int
1471 rpc_luci2_network_routes(struct ubus_context *ctx, struct ubus_object *obj,
1472                          struct ubus_request_data *req, const char *method,
1473                          struct blob_attr *msg)
1474 {
1475         FILE *routes;
1476         void *c, *d;
1477         char *dst, *dmask, *next, *metric, *device;
1478         char line[256];
1479         unsigned int n;
1480
1481         if (!(routes = fopen("/proc/net/route", "r")))
1482                 return rpc_errno_status();
1483
1484         blob_buf_init(&buf, 0);
1485         c = blobmsg_open_array(&buf, "routes");
1486
1487         /* skip header line */
1488         fgets(line, sizeof(line) - 1, routes);
1489
1490         while (fgets(line, sizeof(line) - 1, routes))
1491         {
1492                 device = strtok(line, "\t ");
1493                 dst    = strtok(NULL, "\t ");
1494                 next   = strtok(NULL, "\t ");
1495
1496                 strtok(NULL, "\t "); /* flags */
1497                 strtok(NULL, "\t "); /* refcount */
1498                 strtok(NULL, "\t "); /* usecount */
1499
1500                 metric = strtok(NULL, "\t ");
1501                 dmask  = strtok(NULL, "\t ");
1502
1503                 if (!dmask)
1504                         continue;
1505
1506                 d = blobmsg_open_table(&buf, NULL);
1507
1508                 put_hexaddr("target", dst, dmask);
1509                 put_hexaddr("nexthop", next, NULL);
1510
1511                 n = strtoul(metric, NULL, 10);
1512                 blobmsg_add_u32(&buf, "metric", n);
1513
1514                 blobmsg_add_string(&buf, "device", device);
1515
1516                 blobmsg_close_table(&buf, d);
1517         }
1518
1519         blobmsg_close_array(&buf, c);
1520         fclose(routes);
1521
1522         ubus_send_reply(ctx, req, buf.head);
1523         return 0;
1524 }
1525
1526 static void
1527 put_hex6addr(const char *name, const char *s, const char *m)
1528 {
1529         int i;
1530         struct in6_addr a;
1531         char as[INET6_ADDRSTRLEN + sizeof("/128")];
1532
1533 #define hex(x) \
1534         (((x) <= '9') ? ((x) - '0') : \
1535                 (((x) <= 'F') ? ((x) - 'A' + 10) : \
1536                         ((x) - 'a' + 10)))
1537
1538         for (i = 0; i < 16; i++, s += 2)
1539                 a.s6_addr[i] = (16 * hex(*s)) + hex(*(s+1));
1540
1541         inet_ntop(AF_INET6, &a, as, sizeof(as));
1542
1543         if (m)
1544                 sprintf(as + strlen(as), "/%lu", strtoul(m, NULL, 16));
1545
1546         blobmsg_add_string(&buf, name, as);
1547 }
1548
1549 static int
1550 rpc_luci2_network_routes6(struct ubus_context *ctx, struct ubus_object *obj,
1551                           struct ubus_request_data *req, const char *method,
1552                           struct blob_attr *msg)
1553 {
1554         FILE *routes;
1555         void *c, *d;
1556         char *src, *smask, *dst, *dmask, *next, *metric, *flags, *device;
1557         char line[256];
1558         unsigned int n;
1559
1560         if (!(routes = fopen("/proc/net/ipv6_route", "r")))
1561                 return rpc_errno_status();
1562
1563         blob_buf_init(&buf, 0);
1564         c = blobmsg_open_array(&buf, "routes");
1565
1566         while (fgets(line, sizeof(line) - 1, routes))
1567         {
1568                 dst    = strtok(line, " ");
1569                 dmask  = strtok(NULL, " ");
1570                 src    = strtok(NULL, " ");
1571                 smask  = strtok(NULL, " ");
1572                 next   = strtok(NULL, " ");
1573                 metric = strtok(NULL, " ");
1574
1575                 strtok(NULL, " "); /* refcount */
1576                 strtok(NULL, " "); /* usecount */
1577
1578                 flags  = strtok(NULL, " ");
1579                 device = strtok(NULL, " \n");
1580
1581                 if (!device)
1582                         continue;
1583
1584                 n = strtoul(flags, NULL, 16);
1585
1586                 if (!(n & 1))
1587                         continue;
1588
1589                 d = blobmsg_open_table(&buf, NULL);
1590
1591                 put_hex6addr("target", dst, dmask);
1592                 put_hex6addr("source", src, smask);
1593                 put_hex6addr("nexthop", next, NULL);
1594
1595                 n = strtoul(metric, NULL, 16);
1596                 blobmsg_add_u32(&buf, "metric", n);
1597
1598                 blobmsg_add_string(&buf, "device", device);
1599
1600                 blobmsg_close_table(&buf, d);
1601         }
1602
1603         blobmsg_close_array(&buf, c);
1604         fclose(routes);
1605
1606         ubus_send_reply(ctx, req, buf.head);
1607         return 0;
1608 }
1609
1610
1611 struct opkg_state {
1612         int cur_offset;
1613         int cur_count;
1614         int req_offset;
1615         int req_count;
1616         int total;
1617         bool open;
1618         void *array;
1619 };
1620
1621 static int
1622 opkg_parse_list(struct blob_buf *blob, char *buf, int len, void *priv)
1623 {
1624         struct opkg_state *s = priv;
1625
1626         char *ptr, *last;
1627         char *nl = strchr(buf, '\n');
1628         char *name = NULL, *vers = NULL, *desc = NULL;
1629         void *c;
1630
1631         if (!nl)
1632                 return 0;
1633
1634         s->total++;
1635
1636         if (s->cur_offset++ < s->req_offset)
1637                 goto skip;
1638
1639         if (s->cur_count++ >= s->req_count)
1640                 goto skip;
1641
1642         if (!s->open)
1643         {
1644                 s->open  = true;
1645                 s->array = blobmsg_open_array(blob, "packages");
1646         }
1647
1648         for (ptr = buf, last = buf, *nl = 0; ptr <= nl; ptr++)
1649         {
1650                 if (!*ptr || (*ptr == ' ' && *(ptr+1) == '-' && *(ptr+2) == ' '))
1651                 {
1652                         if (!name)
1653                         {
1654                                 name = last;
1655                                 last = ptr + 3;
1656                                 *ptr = 0;
1657                                 ptr += 2;
1658                         }
1659                         else if (!vers)
1660                         {
1661                                 vers = last;
1662                                 desc = *ptr ? (ptr + 3) : NULL;
1663                                 *ptr = 0;
1664                                 break;
1665                         }
1666                 }
1667         }
1668
1669         if (name && vers)
1670         {
1671                 c = blobmsg_open_array(blob, NULL);
1672
1673                 blobmsg_add_string(blob, NULL, name);
1674                 blobmsg_add_string(blob, NULL, vers);
1675
1676                 if (desc && *desc)
1677                         blobmsg_add_string(blob, NULL, desc);
1678
1679                 blobmsg_close_array(blob, c);
1680         }
1681
1682 skip:
1683         return (nl - buf + 1);
1684 }
1685
1686 static void
1687 opkg_finish_list(struct blob_buf *blob, int status, void *priv)
1688 {
1689         struct opkg_state *s = priv;
1690
1691         if (!s->open)
1692                 return;
1693
1694         blobmsg_close_array(blob, s->array);
1695         blobmsg_add_u32(blob, "total", s->total);
1696 }
1697
1698 static int
1699 opkg_exec_list(const char *action, struct blob_attr *msg,
1700                struct ubus_context *ctx, struct ubus_request_data *req)
1701 {
1702         struct opkg_state *state = NULL;
1703         struct blob_attr *tb[__RPC_OM_MAX];
1704         const char *cmd[5] = { "opkg", action, "-nocase", NULL, NULL };
1705
1706         blobmsg_parse(rpc_opkg_match_policy, __RPC_OM_MAX, tb,
1707                       blob_data(msg), blob_len(msg));
1708
1709         state = malloc(sizeof(*state));
1710
1711         if (!state)
1712                 return UBUS_STATUS_UNKNOWN_ERROR;
1713
1714         memset(state, 0, sizeof(*state));
1715
1716         if (tb[RPC_OM_PATTERN])
1717                 cmd[3] = blobmsg_data(tb[RPC_OM_PATTERN]);
1718
1719         if (tb[RPC_OM_LIMIT])
1720                 state->req_count = blobmsg_get_u32(tb[RPC_OM_LIMIT]);
1721
1722         if (tb[RPC_OM_OFFSET])
1723                 state->req_offset = blobmsg_get_u32(tb[RPC_OM_OFFSET]);
1724
1725         if (state->req_offset < 0)
1726                 state->req_offset = 0;
1727
1728         if (state->req_count <= 0 || state->req_count > 100)
1729                 state->req_count = 100;
1730
1731         return rpc_exec(cmd, opkg_parse_list, NULL, opkg_finish_list,
1732                         state, ctx, req);
1733 }
1734
1735
1736 static int
1737 rpc_luci2_opkg_list(struct ubus_context *ctx, struct ubus_object *obj,
1738                     struct ubus_request_data *req, const char *method,
1739                     struct blob_attr *msg)
1740 {
1741         return opkg_exec_list("list", msg, ctx, req);
1742 }
1743
1744 static int
1745 rpc_luci2_opkg_list_installed(struct ubus_context *ctx, struct ubus_object *obj,
1746                               struct ubus_request_data *req, const char *method,
1747                               struct blob_attr *msg)
1748 {
1749         return opkg_exec_list("list-installed", msg, ctx, req);
1750 }
1751
1752 static int
1753 rpc_luci2_opkg_find(struct ubus_context *ctx, struct ubus_object *obj,
1754                     struct ubus_request_data *req, const char *method,
1755                     struct blob_attr *msg)
1756 {
1757         return opkg_exec_list("find", msg, ctx, req);
1758 }
1759
1760 static int
1761 rpc_luci2_opkg_update(struct ubus_context *ctx, struct ubus_object *obj,
1762                       struct ubus_request_data *req, const char *method,
1763                       struct blob_attr *msg)
1764 {
1765         const char *cmd[3] = { "opkg", "update", NULL };
1766         return rpc_exec(cmd, NULL, NULL, NULL, NULL, ctx, req);
1767 }
1768
1769 static int
1770 rpc_luci2_opkg_install(struct ubus_context *ctx, struct ubus_object *obj,
1771                        struct ubus_request_data *req, const char *method,
1772                        struct blob_attr *msg)
1773 {
1774         struct blob_attr *tb[__RPC_OP_MAX];
1775         const char *cmd[5] = { "opkg", "--force-overwrite",
1776                                "install", NULL, NULL };
1777
1778         blobmsg_parse(rpc_opkg_package_policy, __RPC_OP_MAX, tb,
1779                       blob_data(msg), blob_len(msg));
1780
1781         if (!tb[RPC_OP_PACKAGE])
1782                 return UBUS_STATUS_INVALID_ARGUMENT;
1783
1784         cmd[3] = blobmsg_data(tb[RPC_OP_PACKAGE]);
1785
1786         return rpc_exec(cmd, NULL, NULL, NULL, NULL, ctx, req);
1787 }
1788
1789 static int
1790 rpc_luci2_opkg_remove(struct ubus_context *ctx, struct ubus_object *obj,
1791                       struct ubus_request_data *req, const char *method,
1792                       struct blob_attr *msg)
1793 {
1794         struct blob_attr *tb[__RPC_OP_MAX];
1795         const char *cmd[5] = { "opkg", "--force-removal-of-dependent-packages",
1796                                "remove", NULL, NULL };
1797
1798         blobmsg_parse(rpc_opkg_package_policy, __RPC_OP_MAX, tb,
1799                       blob_data(msg), blob_len(msg));
1800
1801         if (!tb[RPC_OP_PACKAGE])
1802                 return UBUS_STATUS_INVALID_ARGUMENT;
1803
1804         cmd[3] = blobmsg_data(tb[RPC_OP_PACKAGE]);
1805
1806         return rpc_exec(cmd, NULL, NULL, NULL, NULL, ctx, req);
1807 }
1808
1809 static int
1810 rpc_luci2_opkg_config_get(struct ubus_context *ctx, struct ubus_object *obj,
1811                           struct ubus_request_data *req, const char *method,
1812                           struct blob_attr *msg)
1813 {
1814         FILE *f;
1815         char conf[2048] = { 0 };
1816
1817         if (!(f = fopen("/etc/opkg.conf", "r")))
1818                 return rpc_errno_status();
1819
1820         fread(conf, sizeof(conf) - 1, 1, f);
1821         fclose(f);
1822
1823         blob_buf_init(&buf, 0);
1824         blobmsg_add_string(&buf, "config", conf);
1825
1826         ubus_send_reply(ctx, req, buf.head);
1827         return 0;
1828 }
1829
1830 static int
1831 rpc_luci2_opkg_config_set(struct ubus_context *ctx, struct ubus_object *obj,
1832                           struct ubus_request_data *req, const char *method,
1833                           struct blob_attr *msg)
1834 {
1835         FILE *f;
1836         struct blob_attr *tb[__RPC_D_MAX];
1837
1838         blobmsg_parse(rpc_data_policy, __RPC_D_MAX, tb,
1839                       blob_data(msg), blob_len(msg));
1840
1841         if (!tb[RPC_D_DATA])
1842                 return UBUS_STATUS_INVALID_ARGUMENT;
1843
1844         if (blobmsg_data_len(tb[RPC_D_DATA]) >= 2048)
1845                 return UBUS_STATUS_NOT_SUPPORTED;
1846
1847         if (!(f = fopen("/etc/opkg.conf", "w")))
1848                 return rpc_errno_status();
1849
1850         fwrite(blobmsg_data(tb[RPC_D_DATA]),
1851                blobmsg_data_len(tb[RPC_D_DATA]), 1, f);
1852
1853         fclose(f);
1854         return 0;
1855 }
1856
1857
1858 int rpc_luci2_api_init(struct ubus_context *ctx)
1859 {
1860         int rv = 0;
1861
1862         static const struct ubus_method luci2_system_methods[] = {
1863                 UBUS_METHOD_NOARG("syslog",       rpc_luci2_system_log),
1864                 UBUS_METHOD_NOARG("dmesg",        rpc_luci2_system_dmesg),
1865                 UBUS_METHOD_NOARG("diskfree",     rpc_luci2_system_diskfree),
1866                 UBUS_METHOD_NOARG("process_list", rpc_luci2_process_list),
1867                 UBUS_METHOD("process_signal",     rpc_luci2_process_signal,
1868                                                   rpc_signal_policy),
1869                 UBUS_METHOD_NOARG("init_list",    rpc_luci2_init_list),
1870                 UBUS_METHOD("init_action",        rpc_luci2_init_action,
1871                                                   rpc_init_policy),
1872                 UBUS_METHOD_NOARG("rclocal_get",  rpc_luci2_rclocal_get),
1873                 UBUS_METHOD("rclocal_set",        rpc_luci2_rclocal_set,
1874                                                   rpc_data_policy),
1875                 UBUS_METHOD_NOARG("crontab_get",  rpc_luci2_crontab_get),
1876                 UBUS_METHOD("crontab_set",        rpc_luci2_crontab_set,
1877                                                   rpc_data_policy),
1878                 UBUS_METHOD_NOARG("sshkeys_get",  rpc_luci2_sshkeys_get),
1879                 UBUS_METHOD("sshkeys_set",        rpc_luci2_sshkeys_set,
1880                                                   rpc_sshkey_policy),
1881                 UBUS_METHOD("password_set",       rpc_luci2_password_set,
1882                                                   rpc_password_policy),
1883                 UBUS_METHOD_NOARG("led_list",     rpc_luci2_led_list),
1884                 UBUS_METHOD_NOARG("usb_list",     rpc_luci2_usb_list),
1885                 UBUS_METHOD_NOARG("upgrade_test", rpc_luci2_upgrade_test),
1886                 UBUS_METHOD("upgrade_start",      rpc_luci2_upgrade_start,
1887                                                   rpc_upgrade_policy),
1888                 UBUS_METHOD_NOARG("upgrade_clean", rpc_luci2_upgrade_clean),
1889                 UBUS_METHOD_NOARG("backup_restore", rpc_luci2_backup_restore),
1890                 UBUS_METHOD_NOARG("backup_clean", rpc_luci2_backup_clean),
1891                 UBUS_METHOD_NOARG("reset_test",   rpc_luci2_reset_test),
1892                 UBUS_METHOD_NOARG("reset_start",  rpc_luci2_reset_start),
1893                 UBUS_METHOD_NOARG("reboot",       rpc_luci2_reboot)
1894         };
1895
1896         static struct ubus_object_type luci2_system_type =
1897                 UBUS_OBJECT_TYPE("luci-rpc-luci2-system", luci2_system_methods);
1898
1899         static struct ubus_object system_obj = {
1900                 .name = "luci2.system",
1901                 .type = &luci2_system_type,
1902                 .methods = luci2_system_methods,
1903                 .n_methods = ARRAY_SIZE(luci2_system_methods),
1904         };
1905
1906
1907         static const struct ubus_method luci2_network_methods[] = {
1908                 UBUS_METHOD_NOARG("conntrack_count", rpc_luci2_network_ct_count),
1909                 UBUS_METHOD_NOARG("conntrack_table", rpc_luci2_network_ct_table),
1910                 UBUS_METHOD_NOARG("arp_table",       rpc_luci2_network_arp_table),
1911                 UBUS_METHOD_NOARG("dhcp_leases",     rpc_luci2_network_leases),
1912                 UBUS_METHOD_NOARG("dhcp6_leases",    rpc_luci2_network_leases6),
1913                 UBUS_METHOD_NOARG("routes",          rpc_luci2_network_routes),
1914                 UBUS_METHOD_NOARG("routes6",         rpc_luci2_network_routes6),
1915         };
1916
1917         static struct ubus_object_type luci2_network_type =
1918                 UBUS_OBJECT_TYPE("luci-rpc-luci2-network", luci2_network_methods);
1919
1920         static struct ubus_object network_obj = {
1921                 .name = "luci2.network",
1922                 .type = &luci2_network_type,
1923                 .methods = luci2_network_methods,
1924                 .n_methods = ARRAY_SIZE(luci2_network_methods),
1925         };
1926
1927
1928         static const struct ubus_method luci2_opkg_methods[] = {
1929                 UBUS_METHOD("list",                  rpc_luci2_opkg_list,
1930                                                      rpc_opkg_match_policy),
1931                 UBUS_METHOD("list_installed",        rpc_luci2_opkg_list_installed,
1932                                                      rpc_opkg_match_policy),
1933                 UBUS_METHOD("find",                  rpc_luci2_opkg_find,
1934                                                      rpc_opkg_match_policy),
1935                 UBUS_METHOD("install",               rpc_luci2_opkg_install,
1936                                                      rpc_opkg_package_policy),
1937                 UBUS_METHOD("remove",                rpc_luci2_opkg_remove,
1938                                                      rpc_opkg_package_policy),
1939                 UBUS_METHOD_NOARG("update",          rpc_luci2_opkg_update),
1940                 UBUS_METHOD_NOARG("config_get",      rpc_luci2_opkg_config_get),
1941                 UBUS_METHOD("config_set",            rpc_luci2_opkg_config_set,
1942                                                      rpc_data_policy)
1943         };
1944
1945         static struct ubus_object_type luci2_opkg_type =
1946                 UBUS_OBJECT_TYPE("luci-rpc-luci2-network", luci2_opkg_methods);
1947
1948         static struct ubus_object opkg_obj = {
1949                 .name = "luci2.opkg",
1950                 .type = &luci2_opkg_type,
1951                 .methods = luci2_opkg_methods,
1952                 .n_methods = ARRAY_SIZE(luci2_opkg_methods),
1953         };
1954
1955         cursor = uci_alloc_context();
1956
1957         if (!cursor)
1958                 return UBUS_STATUS_UNKNOWN_ERROR;
1959
1960         rv |= ubus_add_object(ctx, &system_obj);
1961         rv |= ubus_add_object(ctx, &network_obj);
1962         rv |= ubus_add_object(ctx, &opkg_obj);
1963
1964         return rv;
1965 }