options.c

   1 /*
   2  * firewall3 - 3rd OpenWrt UCI firewall implementation
   3  *
   4  *   Copyright (C) 2013-2014 Jo-Philipp Wich <jo@mein.io>
   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 "options.h"
  20 #include "ubus.h"
  21
  22
  23 static bool
  24 put_value(void *ptr, void *val, int elem_size, bool is_list)
  25 {
  26         void *copy;
  27
  28         if (is_list)
  29         {
  30                 copy = malloc(elem_size);
  31
  32                 if (!copy)
  33                         return false;
  34
  35                 memcpy(copy, val, elem_size);
  36                 list_add_tail((struct list_head *)copy, (struct list_head *)ptr);
  37                 return true;
  38         }
  39
  40         memcpy(ptr, val, elem_size);
  41         return false;
  42 }
  43
  44 static bool
  45 parse_enum(void *ptr, const char *val, const char **values, int min, int max)
  46 {
  47         int i, l = strlen(val);
  48
  49         if (l > 0)
  50         {
  51                 for (i = 0; i <= (max - min); i++)
  52                 {
  53                         if (!strncasecmp(val, values[i], l))
  54                         {
  55                                 *((int *)ptr) = min + i;
  56                                 return true;
  57                         }
  58                 }
  59         }
  60
  61         return false;
  62 }
  63
  64
  65 const char *fw3_flag_names[__FW3_FLAG_MAX] = {
  66         "filter",
  67         "nat",
  68         "mangle",
  69         "raw",
  70
  71         "IPv4",
  72         "IPv6",
  73
  74         "ACCEPT",
  75         "REJECT",
  76         "DROP",
  77         "NOTRACK",
  78         "MARK",
  79         "DNAT",
  80         "SNAT",
  81         "MASQUERADE",
  82
  83         "ACCEPT",
  84         "REJECT",
  85         "DROP",
  86 };
  87
  88 const char *fw3_limit_units[__FW3_LIMIT_UNIT_MAX] = {
  89         "second",
  90         "minute",
  91         "hour",
  92         "day",
  93 };
  94
  95 const char *fw3_ipset_method_names[__FW3_IPSET_METHOD_MAX] = {
  96         "(bug)",
  97         "bitmap",
  98         "hash",
  99         "list",
 100 };
 101
 102 const char *fw3_ipset_type_names[__FW3_IPSET_TYPE_MAX] = {
 103         "(bug)",
 104         "ip",
 105         "port",
 106         "mac",
 107         "net",
 108         "set",
 109 };
 110
 111 static const char *weekdays[] = {
 112         "monday",
 113         "tuesday",
 114         "wednesday",
 115         "thursday",
 116         "friday",
 117         "saturday",
 118         "sunday",
 119 };
 120
 121 static const char *include_types[] = {
 122         "script",
 123         "restore",
 124 };
 125
 126 static const char *reflection_sources[] = {
 127         "internal",
 128         "external",
 129 };
 130
 131
 132 bool
 133 fw3_parse_bool(void *ptr, const char *val, bool is_list)
 134 {
 135         if (!strcmp(val, "true") || !strcmp(val, "yes") || !strcmp(val, "1"))
 136                 *((bool *)ptr) = true;
 137         else
 138                 *((bool *)ptr) = false;
 139
 140         return true;
 141 }
 142
 143 bool
 144 fw3_parse_int(void *ptr, const char *val, bool is_list)
 145 {
 146         char *e;
 147         int n = strtol(val, &e, 0);
 148
 149         if (e == val || *e)
 150                 return false;
 151
 152         *((int *)ptr) = n;
 153
 154         return true;
 155 }
 156
 157 bool
 158 fw3_parse_string(void *ptr, const char *val, bool is_list)
 159 {
 160         *((char **)ptr) = (char *)val;
 161         return true;
 162 }
 163
 164 bool
 165 fw3_parse_target(void *ptr, const char *val, bool is_list)
 166 {
 167         return parse_enum(ptr, val, &fw3_flag_names[FW3_FLAG_ACCEPT],
 168                           FW3_FLAG_ACCEPT, FW3_FLAG_MASQUERADE);
 169 }
 170
 171 bool
 172 fw3_parse_limit(void *ptr, const char *val, bool is_list)
 173 {
 174         struct fw3_limit *limit = ptr;
 175         enum fw3_limit_unit u = FW3_LIMIT_UNIT_SECOND;
 176         char *e;
 177         int n;
 178
 179         if (*val == '!')
 180         {
 181                 limit->invert = true;
 182                 while (isspace(*++val));
 183         }
 184
 185         n = strtol(val, &e, 10);
 186
 187         if (errno == ERANGE || errno == EINVAL)
 188                 return false;
 189
 190         if (*e && *e++ != '/')
 191                 return false;
 192
 193         if (!strlen(e))
 194                 return false;
 195
 196         if (!parse_enum(&u, e, fw3_limit_units, 0, FW3_LIMIT_UNIT_DAY))
 197                 return false;
 198
 199         limit->rate = n;
 200         limit->unit = u;
 201
 202         return true;
 203 }
 204
 205 bool
 206 fw3_parse_device(void *ptr, const char *val, bool is_list)
 207 {
 208         char *p;
 209         struct fw3_device dev = { };
 210
 211         if (*val == '*')
 212         {
 213                 dev.set = true;
 214                 dev.any = true;
 215                 put_value(ptr, &dev, sizeof(dev), is_list);
 216                 return true;
 217         }
 218
 219         if (*val == '!')
 220         {
 221                 dev.invert = true;
 222                 while (isspace(*++val));
 223         }
 224
 225         if ((p = strchr(val, '@')) != NULL)
 226         {
 227                 *p++ = 0;
 228                 snprintf(dev.network, sizeof(dev.network), "%s", p);
 229         }
 230
 231         if (*val)
 232                 snprintf(dev.name, sizeof(dev.name), "%s", val);
 233         else
 234                 return false;
 235
 236         dev.set = true;
 237         put_value(ptr, &dev, sizeof(dev), is_list);
 238         return true;
 239 }
 240
 241 bool
 242 fw3_parse_address(void *ptr, const char *val, bool is_list)
 243 {
 244         struct fw3_address addr = { };
 245         struct in_addr v4;
 246         struct in6_addr v6;
 247         char *p = NULL, *m = NULL, *s, *e;
 248         int bits = -1;
 249
 250         if (*val == '!')
 251         {
 252                 addr.invert = true;
 253                 while (isspace(*++val));
 254         }
 255
 256         s = strdup(val);
 257
 258         if (!s)
 259                 return false;
 260
 261         if ((m = strchr(s, '/')) != NULL)
 262                 *m++ = 0;
 263         else if ((p = strchr(s, '-')) != NULL)
 264                 *p++ = 0;
 265
 266         if (inet_pton(AF_INET6, s, &v6))
 267         {
 268                 addr.family = FW3_FAMILY_V6;
 269                 addr.address.v6 = v6;
 270
 271                 if (m)
 272                 {
 273                         if (!inet_pton(AF_INET6, m, &v6))
 274                         {
 275                                 bits = strtol(m, &e, 10);
 276
 277                                 if ((*e != 0) || !fw3_bitlen2netmask(addr.family, bits, &v6))
 278                                         goto fail;
 279                         }
 280
 281                         addr.mask.v6 = v6;
 282                 }
 283                 else if (p)
 284                 {
 285                         if (!inet_pton(AF_INET6, p, &addr.mask.v6))
 286                                 goto fail;
 287
 288                         addr.range = true;
 289                 }
 290                 else
 291                 {
 292                         memset(addr.mask.v6.s6_addr, 0xFF, 16);
 293                 }
 294         }
 295         else if (inet_pton(AF_INET, s, &v4))
 296         {
 297                 addr.family = FW3_FAMILY_V4;
 298                 addr.address.v4 = v4;
 299
 300                 if (m)
 301                 {
 302                         if (!inet_pton(AF_INET, m, &v4))
 303                         {
 304                                 bits = strtol(m, &e, 10);
 305
 306                                 if ((*e != 0) || !fw3_bitlen2netmask(addr.family, bits, &v4))
 307                                         goto fail;
 308                         }
 309
 310                         addr.mask.v4 = v4;
 311                 }
 312                 else if (p)
 313                 {
 314                         if (!inet_pton(AF_INET, p, &addr.mask.v4))
 315                                 goto fail;
 316
 317                         addr.range = true;
 318                 }
 319                 else
 320                 {
 321                         addr.mask.v4.s_addr = 0xFFFFFFFF;
 322                 }
 323         }
 324         else
 325         {
 326                 goto fail;
 327         }
 328
 329         free(s);
 330         addr.set = true;
 331         put_value(ptr, &addr, sizeof(addr), is_list);
 332         return true;
 333
 334 fail:
 335         free(s);
 336         return false;
 337 }
 338
 339 bool
 340 fw3_parse_network(void *ptr, const char *val, bool is_list)
 341 {
 342         struct fw3_device dev = { };
 343         struct fw3_address *addr, *tmp;
 344         LIST_HEAD(addr_list);
 345         int n_addrs;
 346
 347         if (!fw3_parse_address(ptr, val, is_list))
 348         {
 349                 if (!fw3_parse_device(&dev, val, false))
 350                         return false;
 351
 352                 n_addrs = fw3_ubus_address(&addr_list, dev.name);
 353
 354                 list_for_each_entry(addr, &addr_list, list)
 355                 {
 356                         addr->invert = dev.invert;
 357                         addr->resolved = true;
 358                 }
 359
 360                 /* add an empty address member with .set = false, .resolved = true
 361                  * to signal resolving failure to callers */
 362                 if (n_addrs == 0)
 363                 {
 364                         tmp = fw3_alloc(sizeof(*tmp));
 365                         tmp->resolved = true;
 366
 367                         list_add_tail(&tmp->list, &addr_list);
 368                 }
 369
 370                 if (is_list)
 371                 {
 372                         list_splice_tail(&addr_list, ptr);
 373                 }
 374                 else if (!list_empty(&addr_list))
 375                 {
 376                         memcpy(ptr, list_first_entry(&addr_list, typeof(*addr), list),
 377                                sizeof(*addr));
 378
 379                         list_for_each_entry_safe(addr, tmp, &addr_list, list)
 380                                 free(addr);
 381                 }
 382         }
 383
 384         return true;
 385 }
 386
 387 bool
 388 fw3_parse_mac(void *ptr, const char *val, bool is_list)
 389 {
 390         struct fw3_mac addr = { };
 391         struct ether_addr *mac;
 392
 393         if (*val == '!')
 394         {
 395                 addr.invert = true;
 396                 while (isspace(*++val));
 397         }
 398
 399         if ((mac = ether_aton(val)) != NULL)
 400         {
 401                 addr.mac = *mac;
 402                 addr.set = true;
 403
 404                 put_value(ptr, &addr, sizeof(addr), is_list);
 405                 return true;
 406         }
 407
 408         return false;
 409 }
 410
 411 bool
 412 fw3_parse_port(void *ptr, const char *val, bool is_list)
 413 {
 414         struct fw3_port range = { };
 415         uint16_t n;
 416         uint16_t m;
 417         char *p;
 418
 419         if (*val == '!')
 420         {
 421                 range.invert = true;
 422                 while (isspace(*++val));
 423         }
 424
 425         n = strtoul(val, &p, 10);
 426
 427         if (errno == ERANGE || errno == EINVAL)
 428                 return false;
 429
 430         if (*p && *p != '-' && *p != ':')
 431                 return false;
 432
 433         if (*p)
 434         {
 435                 m = strtoul(++p, NULL, 10);
 436
 437                 if (errno == ERANGE || errno == EINVAL || m < n)
 438                         return false;
 439
 440                 range.port_min = n;
 441                 range.port_max = m;
 442         }
 443         else
 444         {
 445                 range.port_min = n;
 446                 range.port_max = n;
 447         }
 448
 449         range.set = true;
 450         put_value(ptr, &range, sizeof(range), is_list);
 451         return true;
 452 }
 453
 454 bool
 455 fw3_parse_family(void *ptr, const char *val, bool is_list)
 456 {
 457         if (!strcmp(val, "any") || !strcmp(val, "*"))
 458                 *((enum fw3_family *)ptr) = FW3_FAMILY_ANY;
 459         else if (!strcmp(val, "inet") || strrchr(val, '4'))
 460                 *((enum fw3_family *)ptr) = FW3_FAMILY_V4;
 461         else if (!strcmp(val, "inet6") || strrchr(val, '6'))
 462                 *((enum fw3_family *)ptr) = FW3_FAMILY_V6;
 463         else
 464                 return false;
 465
 466         return true;
 467 }
 468
 469 bool
 470 fw3_parse_icmptype(void *ptr, const char *val, bool is_list)
 471 {
 472         struct fw3_icmptype icmp = { };
 473         bool v4 = false;
 474         bool v6 = false;
 475         char *p;
 476         int i;
 477
 478         for (i = 0; i < ARRAY_SIZE(fw3_icmptype_list_v4); i++)
 479         {
 480                 if (!strcmp(val, fw3_icmptype_list_v4[i].name))
 481                 {
 482                         icmp.type     = fw3_icmptype_list_v4[i].type;
 483                         icmp.code_min = fw3_icmptype_list_v4[i].code_min;
 484                         icmp.code_max = fw3_icmptype_list_v4[i].code_max;
 485
 486                         v4 = true;
 487                         break;
 488                 }
 489         }
 490
 491         for (i = 0; i < ARRAY_SIZE(fw3_icmptype_list_v6); i++)
 492         {
 493                 if (!strcmp(val, fw3_icmptype_list_v6[i].name))
 494                 {
 495                         icmp.type6     = fw3_icmptype_list_v6[i].type;
 496                         icmp.code6_min = fw3_icmptype_list_v6[i].code_min;
 497                         icmp.code6_max = fw3_icmptype_list_v6[i].code_max;
 498
 499                         v6 = true;
 500                         break;
 501                 }
 502         }
 503
 504         if (!v4 && !v6)
 505         {
 506                 i = strtoul(val, &p, 10);
 507
 508                 if ((p == val) || (*p != '/' && *p != 0) || (i > 0xFF))
 509                         return false;
 510
 511                 icmp.type = i;
 512
 513                 if (*p == '/')
 514                 {
 515                         val = ++p;
 516                         i = strtoul(val, &p, 10);
 517
 518                         if ((p == val) || (*p != 0) || (i > 0xFF))
 519                                 return false;
 520
 521                         icmp.code_min = i;
 522                         icmp.code_max = i;
 523                 }
 524                 else
 525                 {
 526                         icmp.code_min = 0;
 527                         icmp.code_max = 0xFF;
 528                 }
 529
 530                 icmp.type6     = icmp.type;
 531                 icmp.code6_min = icmp.code_max;
 532                 icmp.code6_max = icmp.code_max;
 533
 534                 v4 = true;
 535                 v6 = true;
 536         }
 537
 538         icmp.family = (v4 && v6) ? FW3_FAMILY_ANY
 539                                  : (v6 ? FW3_FAMILY_V6 : FW3_FAMILY_V4);
 540
 541         put_value(ptr, &icmp, sizeof(icmp), is_list);
 542         return true;
 543 }
 544
 545 bool
 546 fw3_parse_protocol(void *ptr, const char *val, bool is_list)
 547 {
 548         struct fw3_protocol proto = { };
 549         struct protoent *ent;
 550         char *e;
 551
 552         if (*val == '!')
 553         {
 554                 proto.invert = true;
 555                 while (isspace(*++val));
 556         }
 557
 558         if (!strcmp(val, "all") || !strcmp(val, "any") || !strcmp(val, "*"))
 559         {
 560                 proto.any = true;
 561                 put_value(ptr, &proto, sizeof(proto), is_list);
 562                 return true;
 563         }
 564         else if (!strcmp(val, "icmpv6"))
 565         {
 566                 val = "ipv6-icmp";
 567         }
 568         else if (!strcmp(val, "tcpudp"))
 569         {
 570                 proto.protocol = 6;
 571                 if (put_value(ptr, &proto, sizeof(proto), is_list))
 572                 {
 573                         proto.protocol = 17;
 574                         put_value(ptr, &proto, sizeof(proto), is_list);
 575                 }
 576
 577                 return true;
 578         }
 579
 580         ent = getprotobyname(val);
 581
 582         if (ent)
 583         {
 584                 proto.protocol = ent->p_proto;
 585                 put_value(ptr, &proto, sizeof(proto), is_list);
 586                 return true;
 587         }
 588
 589         proto.protocol = strtoul(val, &e, 10);
 590
 591         if ((e == val) || (*e != 0))
 592                 return false;
 593
 594         put_value(ptr, &proto, sizeof(proto), is_list);
 595         return true;
 596 }
 597
 598 bool
 599 fw3_parse_ipset_method(void *ptr, const char *val, bool is_list)
 600 {
 601         return parse_enum(ptr, val, &fw3_ipset_method_names[FW3_IPSET_METHOD_BITMAP],
 602                           FW3_IPSET_METHOD_BITMAP, FW3_IPSET_METHOD_LIST);
 603 }
 604
 605 bool
 606 fw3_parse_ipset_datatype(void *ptr, const char *val, bool is_list)
 607 {
 608         struct fw3_ipset_datatype type = { };
 609
 610         type.dir = "src";
 611
 612         if (!strncmp(val, "dest_", 5))
 613         {
 614                 val += 5;
 615                 type.dir = "dst";
 616         }
 617         else if (!strncmp(val, "dst_", 4))
 618         {
 619                 val += 4;
 620                 type.dir = "dst";
 621         }
 622         else if (!strncmp(val, "src_", 4))
 623         {
 624                 val += 4;
 625                 type.dir = "src";
 626         }
 627
 628         if (parse_enum(&type.type, val, &fw3_ipset_type_names[FW3_IPSET_TYPE_IP],
 629                        FW3_IPSET_TYPE_IP, FW3_IPSET_TYPE_SET))
 630         {
 631                 put_value(ptr, &type, sizeof(type), is_list);
 632                 return true;
 633         }
 634
 635         return false;
 636 }
 637
 638 bool
 639 fw3_parse_date(void *ptr, const char *val, bool is_list)
 640 {
 641         unsigned int year = 1970, mon = 1, day = 1, hour = 0, min = 0, sec = 0;
 642         struct tm tm = { 0 };
 643         char *p;
 644
 645         year = strtoul(val, &p, 10);
 646         if ((*p != '-' && *p) || year < 1970 || year > 2038)
 647                 goto fail;
 648         else if (!*p)
 649                 goto ret;
 650
 651         mon = strtoul(++p, &p, 10);
 652         if ((*p != '-' && *p) || mon > 12)
 653                 goto fail;
 654         else if (!*p)
 655                 goto ret;
 656
 657         day = strtoul(++p, &p, 10);
 658         if ((*p != 'T' && *p) || day > 31)
 659                 goto fail;
 660         else if (!*p)
 661                 goto ret;
 662
 663         hour = strtoul(++p, &p, 10);
 664         if ((*p != ':' && *p) || hour > 23)
 665                 goto fail;
 666         else if (!*p)
 667                 goto ret;
 668
 669         min = strtoul(++p, &p, 10);
 670         if ((*p != ':' && *p) || min > 59)
 671                 goto fail;
 672         else if (!*p)
 673                 goto ret;
 674
 675         sec = strtoul(++p, &p, 10);
 676         if (*p || sec > 59)
 677                 goto fail;
 678
 679 ret:
 680         tm.tm_year = year - 1900;
 681         tm.tm_mon  = mon - 1;
 682         tm.tm_mday = day;
 683         tm.tm_hour = hour;
 684         tm.tm_min  = min;
 685         tm.tm_sec  = sec;
 686
 687         if (mktime(&tm) >= 0)
 688         {
 689                 *((struct tm *)ptr) = tm;
 690                 return true;
 691         }
 692
 693 fail:
 694         return false;
 695 }
 696
 697 bool
 698 fw3_parse_time(void *ptr, const char *val, bool is_list)
 699 {
 700         unsigned int hour = 0, min = 0, sec = 0;
 701         char *p;
 702
 703         hour = strtoul(val, &p, 10);
 704         if (*p != ':' || hour > 23)
 705                 goto fail;
 706
 707         min = strtoul(++p, &p, 10);
 708         if ((*p != ':' && *p) || min > 59)
 709                 goto fail;
 710         else if (!*p)
 711                 goto ret;
 712
 713         sec = strtoul(++p, &p, 10);
 714         if (*p || sec > 59)
 715                 goto fail;
 716
 717 ret:
 718         *((int *)ptr) = 60 * 60 * hour + 60 * min + sec;
 719         return true;
 720
 721 fail:
 722         return false;
 723 }
 724
 725 bool
 726 fw3_parse_weekdays(void *ptr, const char *val, bool is_list)
 727 {
 728         unsigned int w = 0;
 729         char *p, *s;
 730
 731         if (*val == '!')
 732         {
 733                 fw3_setbit(*(uint8_t *)ptr, 0);
 734                 while (isspace(*++val));
 735         }
 736
 737         if (!(s = strdup(val)))
 738                 return false;
 739
 740         for (p = strtok(s, " \t"); p; p = strtok(NULL, " \t"))
 741         {
 742                 if (!parse_enum(&w, p, weekdays, 1, 7))
 743                 {
 744                         w = strtoul(p, &p, 10);
 745
 746                         if (*p || w < 1 || w > 7)
 747                         {
 748                                 free(s);
 749                                 return false;
 750                         }
 751                 }
 752
 753                 fw3_setbit(*(uint8_t *)ptr, w);
 754         }
 755
 756         free(s);
 757         return true;
 758 }
 759
 760 bool
 761 fw3_parse_monthdays(void *ptr, const char *val, bool is_list)
 762 {
 763         unsigned int d;
 764         char *p, *s;
 765
 766         if (*val == '!')
 767         {
 768                 fw3_setbit(*(uint32_t *)ptr, 0);
 769                 while (isspace(*++val));
 770         }
 771
 772         if (!(s = strdup(val)))
 773                 return false;
 774
 775         for (p = strtok(s, " \t"); p; p = strtok(NULL, " \t"))
 776         {
 777                 d = strtoul(p, &p, 10);
 778
 779                 if (*p || d < 1 || d > 31)
 780                 {
 781                         free(s);
 782                         return false;
 783                 }
 784
 785                 fw3_setbit(*(uint32_t *)ptr, d);
 786         }
 787
 788         free(s);
 789         return true;
 790 }
 791
 792 bool
 793 fw3_parse_include_type(void *ptr, const char *val, bool is_list)
 794 {
 795         return parse_enum(ptr, val, include_types,
 796                           FW3_INC_TYPE_SCRIPT, FW3_INC_TYPE_RESTORE);
 797 }
 798
 799 bool
 800 fw3_parse_reflection_source(void *ptr, const char *val, bool is_list)
 801 {
 802         return parse_enum(ptr, val, reflection_sources,
 803                           FW3_REFLECTION_INTERNAL, FW3_REFLECTION_EXTERNAL);
 804 }
 805
 806 bool
 807 fw3_parse_mark(void *ptr, const char *val, bool is_list)
 808 {
 809         uint32_t n;
 810         char *s, *e;
 811         struct fw3_mark *m = ptr;
 812
 813         if (*val == '!')
 814         {
 815                 m->invert = true;
 816                 while (isspace(*++val));
 817         }
 818
 819         if ((s = strchr(val, '/')) != NULL)
 820                 *s++ = 0;
 821
 822         n = strtoul(val, &e, 0);
 823
 824         if (e == val || *e)
 825                 return false;
 826
 827         m->mark = n;
 828         m->mask = 0xFFFFFFFF;
 829
 830         if (s)
 831         {
 832                 n = strtoul(s, &e, 0);
 833
 834                 if (e == s || *e)
 835                         return false;
 836
 837                 m->mask = n;
 838         }
 839
 840         m->set = true;
 841         return true;
 842 }
 843
 844 bool
 845 fw3_parse_setmatch(void *ptr, const char *val, bool is_list)
 846 {
 847         struct fw3_setmatch *m = ptr;
 848         char *p, *s;
 849         int i;
 850
 851         if (*val == '!')
 852         {
 853                 m->invert = true;
 854                 while (isspace(*++val));
 855         }
 856
 857         if (!(s = strdup(val)))
 858                 return false;
 859
 860         if (!(p = strtok(s, " \t")))
 861         {
 862                 free(s);
 863                 return false;
 864         }
 865
 866         strncpy(m->name, p, sizeof(m->name));
 867
 868         for (i = 0, p = strtok(NULL, " \t,");
 869              i < 3 && p != NULL;
 870              i++, p = strtok(NULL, " \t,"))
 871         {
 872                 if (!strncmp(p, "dest", 4) || !strncmp(p, "dst", 3))
 873                         m->dir[i] = "dst";
 874                 else if (!strncmp(p, "src", 3))
 875                         m->dir[i] = "src";
 876         }
 877
 878         free(s);
 879
 880         m->set = true;
 881         return true;
 882 }
 883
 884 bool
 885 fw3_parse_direction(void *ptr, const char *val, bool is_list)
 886 {
 887         bool *is_out = ptr;
 888         bool valid = true;
 889
 890         if (!strcmp(val, "in") || !strcmp(val, "ingress"))
 891                 *is_out = false;
 892         else if (!strcmp(val, "out") || !strcmp(val, "egress"))
 893                 *is_out = true;
 894         else
 895                 valid = false;
 896
 897         return valid;
 898 }
 899
 900
 901 bool
 902 fw3_parse_options(void *s, const struct fw3_option *opts,
 903                   struct uci_section *section)
 904 {
 905         char *p, *v;
 906         bool known, inv;
 907         struct uci_element *e, *l;
 908         struct uci_option *o;
 909         const struct fw3_option *opt;
 910         struct list_head *dest;
 911         bool valid = true;
 912
 913         uci_foreach_element(&section->options, e)
 914         {
 915                 o = uci_to_option(e);
 916                 known = false;
 917
 918                 for (opt = opts; opt->name; opt++)
 919                 {
 920                         if (!opt->parse)
 921                                 continue;
 922
 923                         if (strcmp(opt->name, e->name))
 924                                 continue;
 925
 926                         if (o->type == UCI_TYPE_LIST)
 927                         {
 928                                 if (!opt->elem_size)
 929                                 {
 930                                         warn_elem(e, "must not be a list");
 931                                         valid = false;
 932                                 }
 933                                 else
 934                                 {
 935                                         dest = (struct list_head *)((char *)s + opt->offset);
 936
 937                                         uci_foreach_element(&o->v.list, l)
 938                                         {
 939                                                 if (!l->name)
 940                                                         continue;
 941
 942                                                 if (!opt->parse(dest, l->name, true))
 943                                                 {
 944                                                         warn_elem(e, "has invalid value '%s'", l->name);
 945                                                         valid = false;
 946                                                         continue;
 947                                                 }
 948                                         }
 949                                 }
 950                         }
 951                         else
 952                         {
 953                                 v = o->v.string;
 954
 955                                 if (!v)
 956                                         continue;
 957
 958                                 if (!opt->elem_size)
 959                                 {
 960                                         if (!opt->parse((char *)s + opt->offset, o->v.string, false))
 961                                         {
 962                                                 warn_elem(e, "has invalid value '%s'", o->v.string);
 963                                                 valid = false;
 964                                         }
 965                                 }
 966                                 else
 967                                 {
 968                                         inv = false;
 969                                         dest = (struct list_head *)((char *)s + opt->offset);
 970
 971                                         for (p = strtok(v, " \t"); p != NULL; p = strtok(NULL, " \t"))
 972                                         {
 973                                                 /* If we encounter a sole "!" token, assume that it
 974                                                  * is meant to be part of the next token, so silently
 975                                                  * skip it and remember the state... */
 976                                                 if (!strcmp(p, "!"))
 977                                                 {
 978                                                         inv = true;
 979                                                         continue;
 980                                                 }
 981
 982                                                 /* The previous token was a sole "!", rewind pointer
 983                                                  * back by one byte to precede the value with an
 984                                                  * exclamation mark which effectively turns
 985                                                  * ("!", "foo") into ("!foo") */
 986                                                 if (inv)
 987                                                 {
 988                                                         *--p = '!';
 989                                                         inv = false;
 990                                                 }
 991
 992                                                 if (!opt->parse(dest, p, true))
 993                                                 {
 994                                                         warn_elem(e, "has invalid value '%s'", p);
 995                                                         valid = false;
 996                                                         continue;
 997                                                 }
 998                                         }
 999
1000                                         /* The last token was a sole "!" without any subsequent
1001                                          * text, so pass it to the option parser as-is. */
1002                                         if (inv && !opt->parse(dest, "!", true))
1003                                         {
1004                                                 warn_elem(e, "has invalid value '%s'", p);
1005                                                 valid = false;
1006                                         }
1007                                 }
1008                         }
1009
1010                         known = true;
1011                         break;
1012                 }
1013
1014                 if (!known)
1015                         warn_elem(e, "is unknown");
1016         }
1017
1018         return valid;
1019 }
1020
1021
1022 bool
1023 fw3_parse_blob_options(void *s, const struct fw3_option *opts,
1024                        struct blob_attr *a, const char *name)
1025 {
1026         char *p, *v, buf[16];
1027         bool known;
1028         unsigned rem, erem;
1029         struct blob_attr *o, *e;
1030         const struct fw3_option *opt;
1031         struct list_head *dest;
1032         bool valid = true;
1033
1034         blobmsg_for_each_attr(o, a, rem)
1035         {
1036                 known = false;
1037
1038                 for (opt = opts; opt->name; opt++)
1039                 {
1040                         if (!opt->parse)
1041                                 continue;
1042
1043                         if (strcmp(opt->name, blobmsg_name(o)))
1044                                 continue;
1045
1046                         if (blobmsg_type(o) == BLOBMSG_TYPE_ARRAY)
1047                         {
1048                                 if (!opt->elem_size)
1049                                 {
1050                                         fprintf(stderr, "%s: '%s' must not be a list\n",
1051                                                 name, opt->name);
1052
1053                                         valid = false;
1054                                 }
1055                                 else
1056                                 {
1057                                         dest = (struct list_head *)((char *)s + opt->offset);
1058
1059                                         blobmsg_for_each_attr(e, o, erem)
1060                                         {
1061                                                 if (blobmsg_type(e) == BLOBMSG_TYPE_INT32) {
1062                                                         snprintf(buf, sizeof(buf), "%d", blobmsg_get_u32(e));
1063                                                         v = buf;
1064                                                 } else {
1065                                                         v = blobmsg_get_string(e);
1066                                                 }
1067
1068                                                 if (!opt->parse(dest, v, true))
1069                                                 {
1070                                                         fprintf(stderr, "%s: '%s' has invalid value '%s'\n",
1071                                                                 name, opt->name, v);
1072                                                         valid = false;
1073                                                         continue;
1074                                                 }
1075                                         }
1076                                 }
1077                         }
1078                         else
1079                         {
1080                                 if (blobmsg_type(o) == BLOBMSG_TYPE_INT32) {
1081                                         snprintf(buf, sizeof(buf), "%d", blobmsg_get_u32(o));
1082                                         v = buf;
1083                                 } else {
1084                                         v = blobmsg_get_string(o);
1085                                 }
1086
1087                                 if (!v)
1088                                         continue;
1089
1090                                 if (!opt->elem_size)
1091                                 {
1092                                         if (!opt->parse((char *)s + opt->offset, v, false))
1093                                         {
1094                                                 fprintf(stderr, "%s: '%s' has invalid value '%s'\n",
1095                                                         name, opt->name, v);
1096                                                 valid = false;
1097                                         }
1098                                 }
1099                                 else
1100                                 {
1101                                         dest = (struct list_head *)((char *)s + opt->offset);
1102
1103                                         for (p = strtok(v, " \t"); p != NULL; p = strtok(NULL, " \t"))
1104                                         {
1105                                                 if (!opt->parse(dest, p, true))
1106                                                 {
1107                                                         fprintf(stderr, "%s: '%s' has invalid value '%s'\n",
1108                                                                 name, opt->name, p);
1109                                                         valid = false;
1110                                                         continue;
1111                                                 }
1112                                         }
1113                                 }
1114                         }
1115
1116                         known = true;
1117                         break;
1118                 }
1119
1120                 if (!known && strcmp(blobmsg_name(o), "type"))
1121                         fprintf(stderr, "%s: '%s' is unknown\n", name, blobmsg_name(o));
1122         }
1123
1124         return valid;
1125 }
1126
1127
1128 const char *
1129 fw3_address_to_string(struct fw3_address *address, bool allow_invert, bool as_cidr)
1130 {
1131         char *p, ip[INET6_ADDRSTRLEN];
1132         static char buf[INET6_ADDRSTRLEN * 2 + 2];
1133
1134         p = buf;
1135
1136         if (address->invert && allow_invert)
1137                 p += sprintf(p, "!");
1138
1139         inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
1140                   &address->address.v4, ip, sizeof(ip));
1141
1142         p += sprintf(p, "%s", ip);
1143
1144         if (address->range)
1145         {
1146                 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
1147                           &address->mask.v4, ip, sizeof(ip));
1148
1149                 p += sprintf(p, "-%s", ip);
1150         }
1151         else if (!as_cidr)
1152         {
1153                 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
1154                           &address->mask.v4, ip, sizeof(ip));
1155
1156                 p += sprintf(p, "/%s", ip);
1157         }
1158         else
1159         {
1160                 p += sprintf(p, "/%u", fw3_netmask2bitlen(address->family,
1161                                                           &address->mask.v6));
1162         }
1163
1164         return buf;
1165 }