options.c

   1 /*
   2  * firewall3 - 3rd OpenWrt UCI firewall implementation
   3  *
   4  *   Copyright (C) 2013-2014 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 "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 && !inet_pton(AF_INET6, m, &addr.mask.v6))
 272                 {
 273                         bits = strtol(m, &e, 10);
 274
 275                         if ((*e != 0) || !fw3_bitlen2netmask(addr.family, bits, &v6))
 276                                 goto fail;
 277
 278                         addr.mask.v6 = v6;
 279                 }
 280                 else if (p)
 281                 {
 282                         if (!inet_pton(AF_INET6, p, &addr.mask.v6))
 283                                 goto fail;
 284
 285                         addr.range = true;
 286                 }
 287                 else
 288                 {
 289                         memset(addr.mask.v6.s6_addr, 0xFF, 16);
 290                 }
 291         }
 292         else if (inet_pton(AF_INET, s, &v4))
 293         {
 294                 addr.family = FW3_FAMILY_V4;
 295                 addr.address.v4 = v4;
 296
 297                 if (m && !inet_pton(AF_INET, m, &addr.mask.v4))
 298                 {
 299                         bits = strtol(m, &e, 10);
 300
 301                         if ((*e != 0) || !fw3_bitlen2netmask(addr.family, bits, &v4))
 302                                 goto fail;
 303
 304                         addr.mask.v4 = v4;
 305                 }
 306                 else if (p)
 307                 {
 308                         if (!inet_pton(AF_INET, p, &addr.mask.v4))
 309                                 goto fail;
 310
 311                         addr.range = true;
 312                 }
 313                 else
 314                 {
 315                         addr.mask.v4.s_addr = 0xFFFFFFFF;
 316                 }
 317         }
 318         else
 319         {
 320                 goto fail;
 321         }
 322
 323         free(s);
 324         addr.set = true;
 325         put_value(ptr, &addr, sizeof(addr), is_list);
 326         return true;
 327
 328 fail:
 329         free(s);
 330         return false;
 331 }
 332
 333 bool
 334 fw3_parse_network(void *ptr, const char *val, bool is_list)
 335 {
 336         struct fw3_device dev = { };
 337         struct fw3_address *addr, *tmp;
 338         LIST_HEAD(addr_list);
 339
 340         if (!fw3_parse_address(ptr, val, is_list))
 341         {
 342                 if (!fw3_parse_device(&dev, val, false))
 343                         return false;
 344
 345                 fw3_ubus_address(&addr_list, dev.name);
 346                 list_for_each_entry(addr, &addr_list, list)
 347                 {
 348                         addr->invert = dev.invert;
 349                         addr->resolved = true;
 350                 }
 351
 352                 if (is_list)
 353                 {
 354                         list_splice_tail(&addr_list, ptr);
 355                 }
 356                 else if (!list_empty(&addr_list))
 357                 {
 358                         memcpy(ptr, list_first_entry(&addr_list, typeof(*addr), list),
 359                                sizeof(*addr));
 360
 361                         list_for_each_entry_safe(addr, tmp, &addr_list, list)
 362                                 free(addr);
 363                 }
 364         }
 365
 366         return true;
 367 }
 368
 369 bool
 370 fw3_parse_mac(void *ptr, const char *val, bool is_list)
 371 {
 372         struct fw3_mac addr = { };
 373         struct ether_addr *mac;
 374
 375         if (*val == '!')
 376         {
 377                 addr.invert = true;
 378                 while (isspace(*++val));
 379         }
 380
 381         if ((mac = ether_aton(val)) != NULL)
 382         {
 383                 addr.mac = *mac;
 384                 addr.set = true;
 385
 386                 put_value(ptr, &addr, sizeof(addr), is_list);
 387                 return true;
 388         }
 389
 390         return false;
 391 }
 392
 393 bool
 394 fw3_parse_port(void *ptr, const char *val, bool is_list)
 395 {
 396         struct fw3_port range = { };
 397         uint16_t n;
 398         uint16_t m;
 399         char *p;
 400
 401         if (*val == '!')
 402         {
 403                 range.invert = true;
 404                 while (isspace(*++val));
 405         }
 406
 407         n = strtoul(val, &p, 10);
 408
 409         if (errno == ERANGE || errno == EINVAL)
 410                 return false;
 411
 412         if (*p && *p != '-' && *p != ':')
 413                 return false;
 414
 415         if (*p)
 416         {
 417                 m = strtoul(++p, NULL, 10);
 418
 419                 if (errno == ERANGE || errno == EINVAL || m < n)
 420                         return false;
 421
 422                 range.port_min = n;
 423                 range.port_max = m;
 424         }
 425         else
 426         {
 427                 range.port_min = n;
 428                 range.port_max = n;
 429         }
 430
 431         range.set = true;
 432         put_value(ptr, &range, sizeof(range), is_list);
 433         return true;
 434 }
 435
 436 bool
 437 fw3_parse_family(void *ptr, const char *val, bool is_list)
 438 {
 439         if (!strcmp(val, "any"))
 440                 *((enum fw3_family *)ptr) = FW3_FAMILY_ANY;
 441         else if (!strcmp(val, "inet") || strrchr(val, '4'))
 442                 *((enum fw3_family *)ptr) = FW3_FAMILY_V4;
 443         else if (!strcmp(val, "inet6") || strrchr(val, '6'))
 444                 *((enum fw3_family *)ptr) = FW3_FAMILY_V6;
 445         else
 446                 return false;
 447
 448         return true;
 449 }
 450
 451 bool
 452 fw3_parse_icmptype(void *ptr, const char *val, bool is_list)
 453 {
 454         struct fw3_icmptype icmp = { };
 455         bool v4 = false;
 456         bool v6 = false;
 457         char *p;
 458         int i;
 459
 460         for (i = 0; i < ARRAY_SIZE(fw3_icmptype_list_v4); i++)
 461         {
 462                 if (!strcmp(val, fw3_icmptype_list_v4[i].name))
 463                 {
 464                         icmp.type     = fw3_icmptype_list_v4[i].type;
 465                         icmp.code_min = fw3_icmptype_list_v4[i].code_min;
 466                         icmp.code_max = fw3_icmptype_list_v4[i].code_max;
 467
 468                         v4 = true;
 469                         break;
 470                 }
 471         }
 472
 473         for (i = 0; i < ARRAY_SIZE(fw3_icmptype_list_v6); i++)
 474         {
 475                 if (!strcmp(val, fw3_icmptype_list_v6[i].name))
 476                 {
 477                         icmp.type6     = fw3_icmptype_list_v6[i].type;
 478                         icmp.code6_min = fw3_icmptype_list_v6[i].code_min;
 479                         icmp.code6_max = fw3_icmptype_list_v6[i].code_max;
 480
 481                         v6 = true;
 482                         break;
 483                 }
 484         }
 485
 486         if (!v4 && !v6)
 487         {
 488                 i = strtoul(val, &p, 10);
 489
 490                 if ((p == val) || (*p != '/' && *p != 0) || (i > 0xFF))
 491                         return false;
 492
 493                 icmp.type = i;
 494
 495                 if (*p == '/')
 496                 {
 497                         val = ++p;
 498                         i = strtoul(val, &p, 10);
 499
 500                         if ((p == val) || (*p != 0) || (i > 0xFF))
 501                                 return false;
 502
 503                         icmp.code_min = i;
 504                         icmp.code_max = i;
 505                 }
 506                 else
 507                 {
 508                         icmp.code_min = 0;
 509                         icmp.code_max = 0xFF;
 510                 }
 511
 512                 icmp.type6     = icmp.type;
 513                 icmp.code6_min = icmp.code_max;
 514                 icmp.code6_max = icmp.code_max;
 515
 516                 v4 = true;
 517                 v6 = true;
 518         }
 519
 520         icmp.family = (v4 && v6) ? FW3_FAMILY_ANY
 521                                  : (v6 ? FW3_FAMILY_V6 : FW3_FAMILY_V4);
 522
 523         put_value(ptr, &icmp, sizeof(icmp), is_list);
 524         return true;
 525 }
 526
 527 bool
 528 fw3_parse_protocol(void *ptr, const char *val, bool is_list)
 529 {
 530         struct fw3_protocol proto = { };
 531         struct protoent *ent;
 532         char *e;
 533
 534         if (*val == '!')
 535         {
 536                 proto.invert = true;
 537                 while (isspace(*++val));
 538         }
 539
 540         if (!strcmp(val, "all"))
 541         {
 542                 proto.any = true;
 543                 put_value(ptr, &proto, sizeof(proto), is_list);
 544                 return true;
 545         }
 546         else if (!strcmp(val, "icmpv6"))
 547         {
 548                 val = "ipv6-icmp";
 549         }
 550         else if (!strcmp(val, "tcpudp"))
 551         {
 552                 proto.protocol = 6;
 553                 if (put_value(ptr, &proto, sizeof(proto), is_list))
 554                 {
 555                         proto.protocol = 17;
 556                         put_value(ptr, &proto, sizeof(proto), is_list);
 557                 }
 558
 559                 return true;
 560         }
 561
 562         ent = getprotobyname(val);
 563
 564         if (ent)
 565         {
 566                 proto.protocol = ent->p_proto;
 567                 put_value(ptr, &proto, sizeof(proto), is_list);
 568                 return true;
 569         }
 570
 571         proto.protocol = strtoul(val, &e, 10);
 572
 573         if ((e == val) || (*e != 0))
 574                 return false;
 575
 576         put_value(ptr, &proto, sizeof(proto), is_list);
 577         return true;
 578 }
 579
 580 bool
 581 fw3_parse_ipset_method(void *ptr, const char *val, bool is_list)
 582 {
 583         return parse_enum(ptr, val, &fw3_ipset_method_names[FW3_IPSET_METHOD_BITMAP],
 584                           FW3_IPSET_METHOD_BITMAP, FW3_IPSET_METHOD_LIST);
 585 }
 586
 587 bool
 588 fw3_parse_ipset_datatype(void *ptr, const char *val, bool is_list)
 589 {
 590         struct fw3_ipset_datatype type = { };
 591
 592         type.dir = "src";
 593
 594         if (!strncmp(val, "dest_", 5))
 595         {
 596                 val += 5;
 597                 type.dir = "dst";
 598         }
 599         else if (!strncmp(val, "dst_", 4))
 600         {
 601                 val += 4;
 602                 type.dir = "dst";
 603         }
 604         else if (!strncmp(val, "src_", 4))
 605         {
 606                 val += 4;
 607                 type.dir = "src";
 608         }
 609
 610         if (parse_enum(&type.type, val, &fw3_ipset_type_names[FW3_IPSET_TYPE_IP],
 611                        FW3_IPSET_TYPE_IP, FW3_IPSET_TYPE_SET))
 612         {
 613                 put_value(ptr, &type, sizeof(type), is_list);
 614                 return true;
 615         }
 616
 617         return false;
 618 }
 619
 620 bool
 621 fw3_parse_date(void *ptr, const char *val, bool is_list)
 622 {
 623         unsigned int year = 1970, mon = 1, day = 1, hour = 0, min = 0, sec = 0;
 624         struct tm tm = { 0 };
 625         char *p;
 626
 627         year = strtoul(val, &p, 10);
 628         if ((*p != '-' && *p) || year < 1970 || year > 2038)
 629                 goto fail;
 630         else if (!*p)
 631                 goto ret;
 632
 633         mon = strtoul(++p, &p, 10);
 634         if ((*p != '-' && *p) || mon > 12)
 635                 goto fail;
 636         else if (!*p)
 637                 goto ret;
 638
 639         day = strtoul(++p, &p, 10);
 640         if ((*p != 'T' && *p) || day > 31)
 641                 goto fail;
 642         else if (!*p)
 643                 goto ret;
 644
 645         hour = strtoul(++p, &p, 10);
 646         if ((*p != ':' && *p) || hour > 23)
 647                 goto fail;
 648         else if (!*p)
 649                 goto ret;
 650
 651         min = strtoul(++p, &p, 10);
 652         if ((*p != ':' && *p) || min > 59)
 653                 goto fail;
 654         else if (!*p)
 655                 goto ret;
 656
 657         sec = strtoul(++p, &p, 10);
 658         if (*p || sec > 59)
 659                 goto fail;
 660
 661 ret:
 662         tm.tm_year = year - 1900;
 663         tm.tm_mon  = mon - 1;
 664         tm.tm_mday = day;
 665         tm.tm_hour = hour;
 666         tm.tm_min  = min;
 667         tm.tm_sec  = sec;
 668
 669         if (mktime(&tm) >= 0)
 670         {
 671                 *((struct tm *)ptr) = tm;
 672                 return true;
 673         }
 674
 675 fail:
 676         return false;
 677 }
 678
 679 bool
 680 fw3_parse_time(void *ptr, const char *val, bool is_list)
 681 {
 682         unsigned int hour = 0, min = 0, sec = 0;
 683         char *p;
 684
 685         hour = strtoul(val, &p, 10);
 686         if (*p != ':' || hour > 23)
 687                 goto fail;
 688
 689         min = strtoul(++p, &p, 10);
 690         if ((*p != ':' && *p) || min > 59)
 691                 goto fail;
 692         else if (!*p)
 693                 goto ret;
 694
 695         sec = strtoul(++p, &p, 10);
 696         if (*p || sec > 59)
 697                 goto fail;
 698
 699 ret:
 700         *((int *)ptr) = 60 * 60 * hour + 60 * min + sec;
 701         return true;
 702
 703 fail:
 704         return false;
 705 }
 706
 707 bool
 708 fw3_parse_weekdays(void *ptr, const char *val, bool is_list)
 709 {
 710         unsigned int w = 0;
 711         char *p, *s;
 712
 713         if (*val == '!')
 714         {
 715                 setbit(*(uint8_t *)ptr, 0);
 716                 while (isspace(*++val));
 717         }
 718
 719         if (!(s = strdup(val)))
 720                 return false;
 721
 722         for (p = strtok(s, " \t"); p; p = strtok(NULL, " \t"))
 723         {
 724                 if (!parse_enum(&w, p, weekdays, 1, 7))
 725                 {
 726                         w = strtoul(p, &p, 10);
 727
 728                         if (*p || w < 1 || w > 7)
 729                         {
 730                                 free(s);
 731                                 return false;
 732                         }
 733                 }
 734
 735                 setbit(*(uint8_t *)ptr, w);
 736         }
 737
 738         free(s);
 739         return true;
 740 }
 741
 742 bool
 743 fw3_parse_monthdays(void *ptr, const char *val, bool is_list)
 744 {
 745         unsigned int d;
 746         char *p, *s;
 747
 748         if (*val == '!')
 749         {
 750                 setbit(*(uint32_t *)ptr, 0);
 751                 while (isspace(*++val));
 752         }
 753
 754         if (!(s = strdup(val)))
 755                 return false;
 756
 757         for (p = strtok(s, " \t"); p; p = strtok(NULL, " \t"))
 758         {
 759                 d = strtoul(p, &p, 10);
 760
 761                 if (*p || d < 1 || d > 31)
 762                 {
 763                         free(s);
 764                         return false;
 765                 }
 766
 767                 setbit(*(uint32_t *)ptr, d);
 768         }
 769
 770         free(s);
 771         return true;
 772 }
 773
 774 bool
 775 fw3_parse_include_type(void *ptr, const char *val, bool is_list)
 776 {
 777         return parse_enum(ptr, val, include_types,
 778                           FW3_INC_TYPE_SCRIPT, FW3_INC_TYPE_RESTORE);
 779 }
 780
 781 bool
 782 fw3_parse_reflection_source(void *ptr, const char *val, bool is_list)
 783 {
 784         return parse_enum(ptr, val, reflection_sources,
 785                           FW3_REFLECTION_INTERNAL, FW3_REFLECTION_EXTERNAL);
 786 }
 787
 788 bool
 789 fw3_parse_mark(void *ptr, const char *val, bool is_list)
 790 {
 791         uint32_t n;
 792         char *s, *e;
 793         struct fw3_mark *m = ptr;
 794
 795         if (*val == '!')
 796         {
 797                 m->invert = true;
 798                 while (isspace(*++val));
 799         }
 800
 801         if ((s = strchr(val, '/')) != NULL)
 802                 *s++ = 0;
 803
 804         n = strtoul(val, &e, 0);
 805
 806         if (e == val || *e)
 807                 return false;
 808
 809         m->mark = n;
 810         m->mask = 0xFFFFFFFF;
 811
 812         if (s)
 813         {
 814                 n = strtoul(s, &e, 0);
 815
 816                 if (e == s || *e)
 817                         return false;
 818
 819                 m->mask = n;
 820         }
 821
 822         m->set = true;
 823         return true;
 824 }
 825
 826 bool
 827 fw3_parse_setmatch(void *ptr, const char *val, bool is_list)
 828 {
 829         struct fw3_setmatch *m = ptr;
 830         char *p, *s;
 831         int i;
 832
 833         if (*val == '!')
 834         {
 835                 m->invert = true;
 836                 while (isspace(*++val));
 837         }
 838
 839         if (!(s = strdup(val)))
 840                 return false;
 841
 842         if (!(p = strtok(s, " \t")))
 843         {
 844                 free(s);
 845                 return false;
 846         }
 847
 848         strncpy(m->name, p, sizeof(m->name));
 849
 850         for (i = 0, p = strtok(NULL, " \t,");
 851              i < 3 && p != NULL;
 852              i++, p = strtok(NULL, " \t,"))
 853         {
 854                 if (!strncmp(p, "dest", 4) || !strncmp(p, "dst", 3))
 855                         m->dir[i] = "dst";
 856                 else if (!strncmp(p, "src", 3))
 857                         m->dir[i] = "src";
 858         }
 859
 860         free(s);
 861
 862         m->set = true;
 863         return true;
 864 }
 865
 866 bool
 867 fw3_parse_direction(void *ptr, const char *val, bool is_list)
 868 {
 869         bool *is_out = ptr;
 870         bool valid = true;
 871
 872         if (!strcmp(val, "in") || !strcmp(val, "ingress"))
 873                 *is_out = false;
 874         else if (!strcmp(val, "out") || !strcmp(val, "egress"))
 875                 *is_out = true;
 876         else
 877                 valid = false;
 878
 879         return valid;
 880 }
 881
 882
 883 bool
 884 fw3_parse_options(void *s, const struct fw3_option *opts,
 885                   struct uci_section *section)
 886 {
 887         char *p, *v;
 888         bool known;
 889         struct uci_element *e, *l;
 890         struct uci_option *o;
 891         const struct fw3_option *opt;
 892         struct list_head *dest;
 893         bool valid = true;
 894
 895         uci_foreach_element(&section->options, e)
 896         {
 897                 o = uci_to_option(e);
 898                 known = false;
 899
 900                 for (opt = opts; opt->name; opt++)
 901                 {
 902                         if (!opt->parse)
 903                                 continue;
 904
 905                         if (strcmp(opt->name, e->name))
 906                                 continue;
 907
 908                         if (o->type == UCI_TYPE_LIST)
 909                         {
 910                                 if (!opt->elem_size)
 911                                 {
 912                                         warn_elem(e, "must not be a list");
 913                                         valid = false;
 914                                 }
 915                                 else
 916                                 {
 917                                         dest = (struct list_head *)((char *)s + opt->offset);
 918
 919                                         uci_foreach_element(&o->v.list, l)
 920                                         {
 921                                                 if (!l->name)
 922                                                         continue;
 923
 924                                                 if (!opt->parse(dest, l->name, true))
 925                                                 {
 926                                                         warn_elem(e, "has invalid value '%s'", l->name);
 927                                                         valid = false;
 928                                                         continue;
 929                                                 }
 930                                         }
 931                                 }
 932                         }
 933                         else
 934                         {
 935                                 v = o->v.string;
 936
 937                                 if (!v)
 938                                         continue;
 939
 940                                 if (!opt->elem_size)
 941                                 {
 942                                         if (!opt->parse((char *)s + opt->offset, o->v.string, false))
 943                                         {
 944                                                 warn_elem(e, "has invalid value '%s'", o->v.string);
 945                                                 valid = false;
 946                                         }
 947                                 }
 948                                 else
 949                                 {
 950                                         dest = (struct list_head *)((char *)s + opt->offset);
 951
 952                                         for (p = strtok(v, " \t"); p != NULL; p = strtok(NULL, " \t"))
 953                                         {
 954                                                 if (!opt->parse(dest, p, true))
 955                                                 {
 956                                                         warn_elem(e, "has invalid value '%s'", p);
 957                                                         valid = false;
 958                                                         continue;
 959                                                 }
 960                                         }
 961                                 }
 962                         }
 963
 964                         known = true;
 965                         break;
 966                 }
 967
 968                 if (!known)
 969                         warn_elem(e, "is unknown");
 970         }
 971
 972         return valid;
 973 }
 974
 975
 976 bool
 977 fw3_parse_blob_options(void *s, const struct fw3_option *opts,
 978                   struct blob_attr *a)
 979 {
 980         char *p, *v, buf[16];
 981         bool known;
 982         unsigned rem, erem;
 983         struct blob_attr *o, *e;
 984         const struct fw3_option *opt;
 985         struct list_head *dest;
 986         bool valid = true;
 987
 988         blobmsg_for_each_attr(o, a, rem)
 989         {
 990                 known = false;
 991
 992                 for (opt = opts; opt->name; opt++)
 993                 {
 994                         if (!opt->parse)
 995                                 continue;
 996
 997                         if (strcmp(opt->name, blobmsg_name(o)))
 998                                 continue;
 999
1000                         if (blobmsg_type(o) == BLOBMSG_TYPE_ARRAY)
1001                         {
1002                                 if (!opt->elem_size)
1003                                 {
1004                                         fprintf(stderr, "%s must not be a list\n", opt->name);
1005                                         valid = false;
1006                                 }
1007                                 else
1008                                 {
1009                                         dest = (struct list_head *)((char *)s + opt->offset);
1010
1011                                         blobmsg_for_each_attr(e, o, erem)
1012                                         {
1013                                                 if (blobmsg_type(e) == BLOBMSG_TYPE_INT32) {
1014                                                         snprintf(buf, sizeof(buf), "%d", blobmsg_get_u32(e));
1015                                                         v = buf;
1016                                                 } else {
1017                                                         v = blobmsg_get_string(e);
1018                                                 }
1019
1020                                                 if (!opt->parse(dest, v, true))
1021                                                 {
1022                                                         fprintf(stderr, "%s has invalid value '%s'\n", opt->name, v);
1023                                                         valid = false;
1024                                                         continue;
1025                                                 }
1026                                         }
1027                                 }
1028                         }
1029                         else
1030                         {
1031                                 if (blobmsg_type(o) == BLOBMSG_TYPE_INT32) {
1032                                         snprintf(buf, sizeof(buf), "%d", blobmsg_get_u32(o));
1033                                         v = buf;
1034                                 } else {
1035                                         v = blobmsg_get_string(o);
1036                                 }
1037
1038                                 if (!v)
1039                                         continue;
1040
1041                                 if (!opt->elem_size)
1042                                 {
1043                                         if (!opt->parse((char *)s + opt->offset, v, false))
1044                                         {
1045                                                 fprintf(stderr, "%s has invalid value '%s'\n", opt->name, v);
1046                                                 valid = false;
1047                                         }
1048                                 }
1049                                 else
1050                                 {
1051                                         dest = (struct list_head *)((char *)s + opt->offset);
1052
1053                                         for (p = strtok(v, " \t"); p != NULL; p = strtok(NULL, " \t"))
1054                                         {
1055                                                 if (!opt->parse(dest, p, true))
1056                                                 {
1057                                                         fprintf(stderr, "%s has invalid value '%s'\n", opt->name, p);
1058                                                         valid = false;
1059                                                         continue;
1060                                                 }
1061                                         }
1062                                 }
1063                         }
1064
1065                         known = true;
1066                         break;
1067                 }
1068
1069                 if (!known)
1070                         fprintf(stderr, "%s is unknown\n", blobmsg_name(o));
1071         }
1072
1073         return valid;
1074 }
1075
1076
1077 const char *
1078 fw3_address_to_string(struct fw3_address *address, bool allow_invert, bool as_cidr)
1079 {
1080         char *p, ip[INET6_ADDRSTRLEN];
1081         static char buf[INET6_ADDRSTRLEN * 2 + 2];
1082
1083         p = buf;
1084
1085         if (address->invert && allow_invert)
1086                 p += sprintf(p, "!");
1087
1088         inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
1089                   &address->address.v4, ip, sizeof(ip));
1090
1091         p += sprintf(p, "%s", ip);
1092
1093         if (address->range)
1094         {
1095                 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
1096                           &address->mask.v4, ip, sizeof(ip));
1097
1098                 p += sprintf(p, "-%s", ip);
1099         }
1100         else if (!as_cidr)
1101         {
1102                 inet_ntop(address->family == FW3_FAMILY_V4 ? AF_INET : AF_INET6,
1103                           &address->mask.v4, ip, sizeof(ip));
1104
1105                 p += sprintf(p, "/%s", ip);
1106         }
1107         else
1108         {
1109                 p += sprintf(p, "/%u", fw3_netmask2bitlen(address->family,
1110                                                           &address->mask.v6));
1111         }
1112
1113         return buf;
1114 }