redirects.c

   1 /*
   2  * firewall3 - 3rd OpenWrt UCI firewall implementation
   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 "redirects.h"
  20
  21
  22 const struct fw3_option fw3_redirect_opts[] = {
  23         FW3_OPT("enabled",             bool,      redirect,     enabled),
  24
  25         FW3_OPT("name",                string,    redirect,     name),
  26         FW3_OPT("family",              family,    redirect,     family),
  27
  28         FW3_OPT("src",                 device,    redirect,     src),
  29         FW3_OPT("dest",                device,    redirect,     dest),
  30
  31         FW3_OPT("ipset",               device,    redirect,     ipset),
  32
  33         FW3_LIST("proto",              protocol,  redirect,     proto),
  34
  35         FW3_OPT("src_ip",              address,   redirect,     ip_src),
  36         FW3_LIST("src_mac",            mac,       redirect,     mac_src),
  37         FW3_OPT("src_port",            port,      redirect,     port_src),
  38
  39         FW3_OPT("src_dip",             address,   redirect,     ip_dest),
  40         FW3_OPT("src_dport",           port,      redirect,     port_dest),
  41
  42         FW3_OPT("dest_ip",             address,   redirect,     ip_redir),
  43         FW3_OPT("dest_port",           port,      redirect,     port_redir),
  44
  45         FW3_OPT("extra",               string,    redirect,     extra),
  46
  47         FW3_OPT("utc_time",            bool,      redirect,     time.utc),
  48         FW3_OPT("start_date",          date,      redirect,     time.datestart),
  49         FW3_OPT("stop_date",           date,      redirect,     time.datestop),
  50         FW3_OPT("start_time",          time,      redirect,     time.timestart),
  51         FW3_OPT("stop_time",           time,      redirect,     time.timestop),
  52         FW3_OPT("weekdays",            weekdays,  redirect,     time.weekdays),
  53         FW3_OPT("monthdays",           monthdays, redirect,     time.monthdays),
  54
  55         FW3_OPT("reflection",          bool,      redirect,     reflection),
  56         FW3_OPT("reflection_src",      reflection_source,
  57                                                   redirect,     reflection_src),
  58
  59         FW3_OPT("target",              target,    redirect,     target),
  60
  61         { }
  62 };
  63
  64
  65 static bool
  66 check_families(struct uci_element *e, struct fw3_redirect *r)
  67 {
  68         if (r->family == FW3_FAMILY_ANY)
  69                 return true;
  70
  71         if (r->_src && r->_src->family && r->_src->family != r->family)
  72         {
  73                 warn_elem(e, "refers to source zone with different family");
  74                 return false;
  75         }
  76
  77         if (r->_dest && r->_dest->family && r->_dest->family != r->family)
  78         {
  79                 warn_elem(e, "refers to destination zone with different family");
  80                 return false;
  81         }
  82
  83         if (r->_ipset && r->_ipset->family && r->_ipset->family != r->family)
  84         {
  85                 warn_elem(e, "refers to ipset with different family");
  86                 return false;
  87         }
  88
  89         if (r->ip_src.family && r->ip_src.family != r->family)
  90         {
  91                 warn_elem(e, "uses source ip with different family");
  92                 return false;
  93         }
  94
  95         if (r->ip_dest.family && r->ip_dest.family != r->family)
  96         {
  97                 warn_elem(e, "uses destination ip with different family");
  98                 return false;
  99         }
 100
 101         if (r->ip_redir.family && r->ip_redir.family != r->family)
 102         {
 103                 warn_elem(e, "uses redirect ip with different family");
 104                 return false;
 105         }
 106
 107         return true;
 108 }
 109
 110 void
 111 fw3_load_redirects(struct fw3_state *state, struct uci_package *p)
 112 {
 113         struct uci_section *s;
 114         struct uci_element *e;
 115         struct fw3_redirect *redir;
 116
 117         bool valid;
 118
 119         INIT_LIST_HEAD(&state->redirects);
 120
 121         uci_foreach_element(&p->sections, e)
 122         {
 123                 s = uci_to_section(e);
 124
 125                 if (strcmp(s->type, "redirect"))
 126                         continue;
 127
 128                 redir = malloc(sizeof(*redir));
 129
 130                 if (!redir)
 131                         continue;
 132
 133                 memset(redir, 0, sizeof(*redir));
 134
 135                 INIT_LIST_HEAD(&redir->proto);
 136                 INIT_LIST_HEAD(&redir->mac_src);
 137
 138                 redir->enabled = true;
 139                 redir->reflection = true;
 140
 141                 valid = false;
 142
 143                 fw3_parse_options(redir, fw3_redirect_opts, s);
 144
 145                 if (!redir->enabled)
 146                 {
 147                         fw3_free_redirect(redir);
 148                         continue;
 149                 }
 150
 151                 if (redir->src.invert)
 152                 {
 153                         warn_elem(e, "must not have an inverted source");
 154                         fw3_free_redirect(redir);
 155                         continue;
 156                 }
 157                 else if (redir->src.set && !redir->src.any &&
 158                          !(redir->_src = fw3_lookup_zone(state, redir->src.name, false)))
 159                 {
 160                         warn_elem(e, "refers to not existing zone '%s'", redir->src.name);
 161                         fw3_free_redirect(redir);
 162                         continue;
 163                 }
 164                 else if (redir->dest.set && !redir->dest.any &&
 165                          !(redir->_dest = fw3_lookup_zone(state, redir->dest.name, false)))
 166                 {
 167                         warn_elem(e, "refers to not existing zone '%s'", redir->dest.name);
 168                         fw3_free_redirect(redir);
 169                         continue;
 170                 }
 171                 else if (redir->ipset.set && state->disable_ipsets)
 172                 {
 173                         warn_elem(e, "skipped due to disabled ipset support");
 174                         fw3_free_redirect(redir);
 175                         continue;
 176                 }
 177                 else if (redir->ipset.set && !redir->ipset.any &&
 178                          !(redir->_ipset = fw3_lookup_ipset(state, redir->ipset.name, false)))
 179                 {
 180                         warn_elem(e, "refers to unknown ipset '%s'", redir->ipset.name);
 181                         fw3_free_redirect(redir);
 182                         continue;
 183                 }
 184
 185                 if (!check_families(e, redir))
 186                 {
 187                         fw3_free_redirect(redir);
 188                         continue;
 189                 }
 190
 191                 if (redir->target == FW3_FLAG_UNSPEC)
 192                 {
 193                         warn_elem(e, "has no target specified, defaulting to DNAT");
 194                         redir->target = FW3_FLAG_DNAT;
 195                 }
 196                 else if (redir->target < FW3_FLAG_DNAT)
 197                 {
 198                         warn_elem(e, "has invalid target specified, defaulting to DNAT");
 199                         redir->target = FW3_FLAG_DNAT;
 200                 }
 201
 202                 if (redir->target == FW3_FLAG_DNAT)
 203                 {
 204                         if (redir->src.any)
 205                                 warn_elem(e, "must not have source '*' for DNAT target");
 206                         else if (!redir->_src)
 207                                 warn_elem(e, "has no source specified");
 208                         else
 209                         {
 210                                 set(redir->_src->flags, FW3_FAMILY_V4, redir->target);
 211                                 redir->_src->conntrack = true;
 212                                 valid = true;
 213                         }
 214
 215                         if (redir->reflection && redir->_dest && redir->_src->masq)
 216                         {
 217                                 set(redir->_dest->flags, FW3_FAMILY_V4, FW3_FLAG_ACCEPT);
 218                                 set(redir->_dest->flags, FW3_FAMILY_V4, FW3_FLAG_DNAT);
 219                                 set(redir->_dest->flags, FW3_FAMILY_V4, FW3_FLAG_SNAT);
 220                         }
 221                 }
 222                 else
 223                 {
 224                         if (redir->dest.any)
 225                                 warn_elem(e, "must not have destination '*' for SNAT target");
 226                         else if (!redir->_dest)
 227                                 warn_elem(e, "has no destination specified");
 228                         else if (!redir->ip_dest.set)
 229                                 warn_elem(e, "has no src_dip option specified");
 230                         else if (!list_empty(&redir->mac_src))
 231                                 warn_elem(e, "must not use 'src_mac' option for SNAT target");
 232                         else
 233                         {
 234                                 set(redir->_dest->flags, FW3_FAMILY_V4, redir->target);
 235                                 redir->_dest->conntrack = true;
 236                                 valid = true;
 237                         }
 238                 }
 239
 240                 if (list_empty(&redir->proto))
 241                 {
 242                         warn_elem(e, "does not specify a protocol, assuming TCP+UDP");
 243                         fw3_parse_protocol(&redir->proto, "tcpudp", true);
 244                 }
 245
 246                 if (!valid)
 247                 {
 248                         fw3_free_redirect(redir);
 249                         continue;
 250                 }
 251
 252                 if (!redir->port_redir.set)
 253                         redir->port_redir = redir->port_dest;
 254
 255                 list_add_tail(&redir->list, &state->redirects);
 256         }
 257 }
 258
 259 static void
 260 print_chain_nat(struct fw3_redirect *redir)
 261 {
 262         if (redir->target == FW3_FLAG_DNAT)
 263                 fw3_pr("-A zone_%s_prerouting", redir->src.name);
 264         else
 265                 fw3_pr("-A zone_%s_postrouting", redir->dest.name);
 266 }
 267
 268 static void
 269 print_snat_dnat(enum fw3_flag target,
 270                 struct fw3_address *addr, struct fw3_port *port)
 271 {
 272         char s[sizeof("255.255.255.255 ")];
 273
 274         if (target == FW3_FLAG_DNAT)
 275                 fw3_pr(" -j DNAT --to-destination ");
 276         else
 277                 fw3_pr(" -j SNAT --to-source ");
 278
 279         if (addr && addr->set)
 280         {
 281                 inet_ntop(AF_INET, &addr->address.v4, s, sizeof(s));
 282                 fw3_pr(s);
 283         }
 284
 285         if (port && port->set)
 286         {
 287                 if (port->port_min == port->port_max)
 288                         fw3_pr(":%u", port->port_min);
 289                 else
 290                         fw3_pr(":%u-%u", port->port_min, port->port_max);
 291         }
 292
 293         fw3_pr("\n");
 294 }
 295
 296 static void
 297 print_target_nat(struct fw3_redirect *redir)
 298 {
 299         if (redir->target == FW3_FLAG_DNAT)
 300                 print_snat_dnat(redir->target, &redir->ip_redir, &redir->port_redir);
 301         else
 302                 print_snat_dnat(redir->target, &redir->ip_dest, &redir->port_dest);
 303 }
 304
 305 static void
 306 print_chain_filter(struct fw3_redirect *redir)
 307 {
 308         if (redir->target == FW3_FLAG_DNAT)
 309         {
 310                 /* XXX: check for local ip */
 311                 if (!redir->ip_redir.set)
 312                         fw3_pr("-A zone_%s_input", redir->src.name);
 313                 else
 314                         fw3_pr("-A zone_%s_forward", redir->src.name);
 315         }
 316         else
 317         {
 318                 if (redir->src.set && !redir->src.any)
 319                         fw3_pr("-A zone_%s_forward", redir->src.name);
 320                 else
 321                         fw3_pr("-A delegate_forward");
 322         }
 323 }
 324
 325 static void
 326 print_target_filter(struct fw3_redirect *redir)
 327 {
 328         /* XXX: check for local ip */
 329         if (redir->target == FW3_FLAG_DNAT && !redir->ip_redir.set)
 330                 fw3_pr(" -m conntrack --ctstate DNAT -j ACCEPT\n");
 331         else
 332                 fw3_pr(" -j ACCEPT\n");
 333 }
 334
 335 static void
 336 print_redirect(struct fw3_state *state, enum fw3_family family,
 337                enum fw3_table table, struct fw3_redirect *redir, int num)
 338 {
 339         struct list_head *ext_addrs, *int_addrs;
 340         struct fw3_address *ext_addr, *int_addr, ref_addr;
 341         struct fw3_device *ext_net, *int_net;
 342         struct fw3_protocol *proto;
 343         struct fw3_mac *mac;
 344
 345         if (redir->name)
 346                 info("   * Redirect '%s'", redir->name);
 347         else
 348                 info("   * Redirect #%u", num);
 349
 350         if (!fw3_is_family(redir->_src, family) ||
 351                 !fw3_is_family(redir->_dest, family))
 352         {
 353                 info("     ! Skipping due to different family of zone");
 354                 return;
 355         }
 356
 357         if (!fw3_is_family(&redir->ip_src, family) ||
 358             !fw3_is_family(&redir->ip_dest, family) ||
 359                 !fw3_is_family(&redir->ip_redir, family))
 360         {
 361                 info("     ! Skipping due to different family of ip address");
 362                 return;
 363         }
 364
 365         if (redir->_ipset)
 366         {
 367                 if (!fw3_is_family(redir->_ipset, family))
 368                 {
 369                         info("     ! Skipping due to different family in ipset");
 370                         return;
 371                 }
 372
 373                 set(redir->_ipset->flags, family, family);
 374         }
 375
 376         fw3_foreach(proto, &redir->proto)
 377         fw3_foreach(mac, &redir->mac_src)
 378         {
 379                 if (table == FW3_TABLE_NAT)
 380                 {
 381                         print_chain_nat(redir);
 382                         fw3_format_ipset(redir->_ipset, redir->ipset.invert);
 383                         fw3_format_protocol(proto, family);
 384
 385                         if (redir->target == FW3_FLAG_DNAT)
 386                         {
 387                                 fw3_format_src_dest(&redir->ip_src, &redir->ip_dest);
 388                                 fw3_format_sport_dport(&redir->port_src, &redir->port_dest);
 389                         }
 390                         else
 391                         {
 392                                 fw3_format_src_dest(&redir->ip_src, &redir->ip_redir);
 393                                 fw3_format_sport_dport(&redir->port_src, &redir->port_redir);
 394                         }
 395
 396                         fw3_format_mac(mac);
 397                         fw3_format_time(&redir->time);
 398                         fw3_format_extra(redir->extra);
 399                         fw3_format_comment(redir->name);
 400                         print_target_nat(redir);
 401                 }
 402                 else if (table == FW3_TABLE_FILTER)
 403                 {
 404                         print_chain_filter(redir);
 405                         fw3_format_ipset(redir->_ipset, redir->ipset.invert);
 406                         fw3_format_protocol(proto, family);
 407                         fw3_format_src_dest(&redir->ip_src, &redir->ip_redir);
 408                         fw3_format_sport_dport(&redir->port_src, &redir->port_redir);
 409                         fw3_format_mac(mac);
 410                         fw3_format_time(&redir->time);
 411                         fw3_format_extra(redir->extra);
 412                         fw3_format_comment(redir->name);
 413                         print_target_filter(redir);
 414                 }
 415         }
 416
 417         /* reflection rules */
 418         if (redir->target != FW3_FLAG_DNAT || !redir->reflection)
 419                 return;
 420
 421         if (!redir->_dest || !redir->_src->masq)
 422                 return;
 423
 424         list_for_each_entry(ext_net, &redir->_src->networks, list)
 425         {
 426                 ext_addrs = fw3_ubus_address(ext_net->name);
 427
 428                 if (!ext_addrs || list_empty(ext_addrs))
 429                         continue;
 430
 431                 list_for_each_entry(int_net, &redir->_dest->networks, list)
 432                 {
 433                         int_addrs = fw3_ubus_address(int_net->name);
 434
 435                         if (!int_addrs || list_empty(int_addrs))
 436                                 continue;
 437
 438                         fw3_foreach(ext_addr, ext_addrs)
 439                         fw3_foreach(int_addr, int_addrs)
 440                         fw3_foreach(proto, &redir->proto)
 441                         {
 442                                 if (!fw3_is_family(int_addr, family) ||
 443                                     !fw3_is_family(ext_addr, family))
 444                                         continue;
 445
 446                                 if (!proto || (proto->protocol != 6 && proto->protocol != 17))
 447                                         continue;
 448
 449                                 if (redir->reflection_src == FW3_REFLECTION_INTERNAL)
 450                                         ref_addr = *int_addr;
 451                                 else
 452                                         ref_addr = *ext_addr;
 453
 454                                 ref_addr.mask = 32;
 455                                 ext_addr->mask = 32;
 456
 457                                 if (table == FW3_TABLE_NAT)
 458                                 {
 459                                         fw3_pr("-A zone_%s_prerouting", redir->dest.name);
 460                                         fw3_format_protocol(proto, family);
 461                                         fw3_format_src_dest(int_addr, ext_addr);
 462                                         fw3_format_sport_dport(NULL, &redir->port_dest);
 463                                         fw3_format_time(&redir->time);
 464                                         fw3_format_comment(redir->name, " (reflection)");
 465                                         print_snat_dnat(FW3_FLAG_DNAT,
 466                                                         &redir->ip_redir, &redir->port_redir);
 467
 468                                         fw3_pr("-A zone_%s_postrouting", redir->dest.name);
 469                                         fw3_format_protocol(proto, family);
 470                                         fw3_format_src_dest(int_addr, &redir->ip_redir);
 471                                         fw3_format_sport_dport(NULL, &redir->port_redir);
 472                                         fw3_format_time(&redir->time);
 473                                         fw3_format_comment(redir->name, " (reflection)");
 474                                         print_snat_dnat(FW3_FLAG_SNAT, &ref_addr, NULL);
 475                                 }
 476                                 else if (table == FW3_TABLE_FILTER)
 477                                 {
 478                                         fw3_pr("-A zone_%s_forward", redir->dest.name);
 479                                         fw3_format_protocol(proto, family);
 480                                         fw3_format_src_dest(int_addr, &redir->ip_redir);
 481                                         fw3_format_sport_dport(NULL, &redir->port_redir);
 482                                         fw3_format_time(&redir->time);
 483                                         fw3_format_comment(redir->name, " (reflection)");
 484                                         fw3_pr(" -j zone_%s_dest_ACCEPT\n", redir->dest.name);
 485                                 }
 486                         }
 487
 488                         fw3_ubus_address_free(int_addrs);
 489                 }
 490
 491                 fw3_ubus_address_free(ext_addrs);
 492         }
 493 }
 494
 495 void
 496 fw3_print_redirects(struct fw3_state *state, enum fw3_family family,
 497                     enum fw3_table table)
 498 {
 499         int num = 0;
 500         struct fw3_redirect *redir;
 501
 502         if (family == FW3_FAMILY_V6)
 503                 return;
 504
 505         if (table != FW3_TABLE_FILTER && table != FW3_TABLE_NAT)
 506                 return;
 507
 508         list_for_each_entry(redir, &state->redirects, list)
 509                 print_redirect(state, family, table, redir, num++);
 510 }