iptables-restore.c

   1 /* Code to restore the iptables state, from file by iptables-save.
   2  * (C) 2000-2002 by Harald Welte <laforge@gnumonks.org>
   3  * based on previous code from Rusty Russell <rusty@linuxcare.com.au>
   4  *
   5  * This code is distributed under the terms of GNU GPL v2
   6  *
   7  * $Id$
   8  */
   9
  10 #include <getopt.h>
  11 #include <sys/errno.h>
  12 #include <string.h>
  13 #include <stdio.h>
  14 #include <stdlib.h>
  15 #include "iptables.h"
  16 #include "xtables.h"
  17 #include "libiptc/libiptc.h"
  18 #include "iptables-multi.h"
  19
  20 #ifdef DEBUG
  21 #define DEBUGP(x, args...) fprintf(stderr, x, ## args)
  22 #else
  23 #define DEBUGP(x, args...)
  24 #endif
  25
  26 static int binary = 0, counters = 0, verbose = 0, noflush = 0;
  27
  28 /* Keeping track of external matches and targets.  */
  29 static const struct option options[] = {
  30         {.name = "binary",   .has_arg = false, .val = 'b'},
  31         {.name = "counters", .has_arg = false, .val = 'c'},
  32         {.name = "verbose",  .has_arg = false, .val = 'v'},
  33         {.name = "test",     .has_arg = false, .val = 't'},
  34         {.name = "help",     .has_arg = false, .val = 'h'},
  35         {.name = "noflush",  .has_arg = false, .val = 'n'},
  36         {.name = "modprobe", .has_arg = true,  .val = 'M'},
  37         {.name = "table",    .has_arg = true,  .val = 'T'},
  38         {NULL},
  39 };
  40
  41 static void print_usage(const char *name, const char *version) __attribute__((noreturn));
  42
  43 static void print_usage(const char *name, const char *version)
  44 {
  45         fprintf(stderr, "Usage: %s [-b] [-c] [-v] [-t] [-h]\n"
  46                         "          [ --binary ]\n"
  47                         "          [ --counters ]\n"
  48                         "          [ --verbose ]\n"
  49                         "          [ --test ]\n"
  50                         "          [ --help ]\n"
  51                         "          [ --noflush ]\n"
  52                         "          [ --table=<TABLE> ]\n"
  53                         "          [ --modprobe=<command>]\n", name);
  54
  55         exit(1);
  56 }
  57
  58 static struct iptc_handle *create_handle(const char *tablename)
  59 {
  60         struct iptc_handle *handle;
  61
  62         handle = iptc_init(tablename);
  63
  64         if (!handle) {
  65                 /* try to insmod the module if iptc_init failed */
  66                 load_xtables_ko(modprobe_program, 0);
  67                 handle = iptc_init(tablename);
  68         }
  69
  70         if (!handle) {
  71                 exit_error(PARAMETER_PROBLEM, "%s: unable to initialize "
  72                         "table '%s'\n", program_name, tablename);
  73                 exit(1);
  74         }
  75         return handle;
  76 }
  77
  78 static int parse_counters(char *string, struct ipt_counters *ctr)
  79 {
  80         unsigned long long pcnt, bcnt;
  81         int ret;
  82
  83         ret = sscanf(string, "[%llu:%llu]",
  84                      (unsigned long long *)&pcnt,
  85                      (unsigned long long *)&bcnt);
  86         ctr->pcnt = pcnt;
  87         ctr->bcnt = bcnt;
  88         return ret == 2;
  89 }
  90
  91 /* global new argv and argc */
  92 static char *newargv[255];
  93 static int newargc;
  94
  95 /* function adding one argument to newargv, updating newargc
  96  * returns true if argument added, false otherwise */
  97 static int add_argv(char *what) {
  98         DEBUGP("add_argv: %s\n", what);
  99         if (what && ((newargc + 1) < sizeof(newargv)/sizeof(char *))) {
 100                 newargv[newargc] = strdup(what);
 101                 newargc++;
 102                 return 1;
 103         } else
 104                 return 0;
 105 }
 106
 107 static void free_argv(void) {
 108         int i;
 109
 110         for (i = 0; i < newargc; i++)
 111                 free(newargv[i]);
 112 }
 113
 114 #ifdef IPTABLES_MULTI
 115 int
 116 iptables_restore_main(int argc, char *argv[])
 117 #else
 118 int
 119 main(int argc, char *argv[])
 120 #endif
 121 {
 122         struct iptc_handle *handle = NULL;
 123         char buffer[10240];
 124         int c;
 125         char curtable[IPT_TABLE_MAXNAMELEN + 1];
 126         FILE *in;
 127         int in_table = 0, testing = 0;
 128         const char *tablename = NULL;
 129
 130         program_name = "iptables-restore";
 131         program_version = XTABLES_VERSION;
 132         line = 0;
 133
 134         lib_dir = getenv("XTABLES_LIBDIR");
 135         if (lib_dir == NULL) {
 136                 lib_dir = getenv("IPTABLES_LIB_DIR");
 137                 if (lib_dir != NULL)
 138                         fprintf(stderr, "IPTABLES_LIB_DIR is deprecated\n");
 139         }
 140         if (lib_dir == NULL)
 141                 lib_dir = XTABLES_LIBDIR;
 142
 143 #ifdef NO_SHARED_LIBS
 144         init_extensions();
 145 #endif
 146
 147         while ((c = getopt_long(argc, argv, "bcvthnM:T:", options, NULL)) != -1) {
 148                 switch (c) {
 149                         case 'b':
 150                                 binary = 1;
 151                                 break;
 152                         case 'c':
 153                                 counters = 1;
 154                                 break;
 155                         case 'v':
 156                                 verbose = 1;
 157                                 break;
 158                         case 't':
 159                                 testing = 1;
 160                                 break;
 161                         case 'h':
 162                                 print_usage("iptables-restore",
 163                                             XTABLES_VERSION);
 164                                 break;
 165                         case 'n':
 166                                 noflush = 1;
 167                                 break;
 168                         case 'M':
 169                                 modprobe_program = optarg;
 170                                 break;
 171                         case 'T':
 172                                 tablename = optarg;
 173                                 break;
 174                 }
 175         }
 176
 177         if (optind == argc - 1) {
 178                 in = fopen(argv[optind], "r");
 179                 if (!in) {
 180                         fprintf(stderr, "Can't open %s: %s\n", argv[optind],
 181                                 strerror(errno));
 182                         exit(1);
 183                 }
 184         }
 185         else if (optind < argc) {
 186                 fprintf(stderr, "Unknown arguments found on commandline\n");
 187                 exit(1);
 188         }
 189         else in = stdin;
 190
 191         /* Grab standard input. */
 192         while (fgets(buffer, sizeof(buffer), in)) {
 193                 int ret = 0;
 194
 195                 line++;
 196                 if (buffer[0] == '\n')
 197                         continue;
 198                 else if (buffer[0] == '#') {
 199                         if (verbose)
 200                                 fputs(buffer, stdout);
 201                         continue;
 202                 } else if ((strcmp(buffer, "COMMIT\n") == 0) && (in_table)) {
 203                         if (!testing) {
 204                                 DEBUGP("Calling commit\n");
 205                                 ret = iptc_commit(handle);
 206                                 iptc_free(handle);
 207                                 handle = NULL;
 208                         } else {
 209                                 DEBUGP("Not calling commit, testing\n");
 210                                 ret = 1;
 211                         }
 212                         in_table = 0;
 213                 } else if ((buffer[0] == '*') && (!in_table)) {
 214                         /* New table */
 215                         char *table;
 216
 217                         table = strtok(buffer+1, " \t\n");
 218                         DEBUGP("line %u, table '%s'\n", line, table);
 219                         if (!table) {
 220                                 exit_error(PARAMETER_PROBLEM,
 221                                         "%s: line %u table name invalid\n",
 222                                         program_name, line);
 223                                 exit(1);
 224                         }
 225                         strncpy(curtable, table, IPT_TABLE_MAXNAMELEN);
 226                         curtable[IPT_TABLE_MAXNAMELEN] = '\0';
 227
 228                         if (tablename && (strcmp(tablename, table) != 0))
 229                                 continue;
 230                         if (handle)
 231                                 iptc_free(handle);
 232
 233                         handle = create_handle(table);
 234                         if (noflush == 0) {
 235                                 DEBUGP("Cleaning all chains of table '%s'\n",
 236                                         table);
 237                                 for_each_chain(flush_entries, verbose, 1,
 238                                                 handle);
 239
 240                                 DEBUGP("Deleting all user-defined chains "
 241                                        "of table '%s'\n", table);
 242                                 for_each_chain(delete_chain, verbose, 0,
 243                                                 handle);
 244                         }
 245
 246                         ret = 1;
 247                         in_table = 1;
 248
 249                 } else if ((buffer[0] == ':') && (in_table)) {
 250                         /* New chain. */
 251                         char *policy, *chain;
 252
 253                         chain = strtok(buffer+1, " \t\n");
 254                         DEBUGP("line %u, chain '%s'\n", line, chain);
 255                         if (!chain) {
 256                                 exit_error(PARAMETER_PROBLEM,
 257                                            "%s: line %u chain name invalid\n",
 258                                            program_name, line);
 259                                 exit(1);
 260                         }
 261
 262                         if (iptc_builtin(chain, handle) <= 0) {
 263                                 if (noflush && iptc_is_chain(chain, handle)) {
 264                                         DEBUGP("Flushing existing user defined chain '%s'\n", chain);
 265                                         if (!iptc_flush_entries(chain, handle))
 266                                                 exit_error(PARAMETER_PROBLEM,
 267                                                            "error flushing chain "
 268                                                            "'%s':%s\n", chain,
 269                                                            strerror(errno));
 270                                 } else {
 271                                         DEBUGP("Creating new chain '%s'\n", chain);
 272                                         if (!iptc_create_chain(chain, handle))
 273                                                 exit_error(PARAMETER_PROBLEM,
 274                                                            "error creating chain "
 275                                                            "'%s':%s\n", chain,
 276                                                            strerror(errno));
 277                                 }
 278                         }
 279
 280                         policy = strtok(NULL, " \t\n");
 281                         DEBUGP("line %u, policy '%s'\n", line, policy);
 282                         if (!policy) {
 283                                 exit_error(PARAMETER_PROBLEM,
 284                                            "%s: line %u policy invalid\n",
 285                                            program_name, line);
 286                                 exit(1);
 287                         }
 288
 289                         if (strcmp(policy, "-") != 0) {
 290                                 struct ipt_counters count;
 291
 292                                 if (counters) {
 293                                         char *ctrs;
 294                                         ctrs = strtok(NULL, " \t\n");
 295
 296                                         if (!ctrs || !parse_counters(ctrs, &count))
 297                                                 exit_error(PARAMETER_PROBLEM,
 298                                                            "invalid policy counters "
 299                                                            "for chain '%s'\n", chain);
 300
 301                                 } else {
 302                                         memset(&count, 0,
 303                                                sizeof(struct ipt_counters));
 304                                 }
 305
 306                                 DEBUGP("Setting policy of chain %s to %s\n",
 307                                         chain, policy);
 308
 309                                 if (!iptc_set_policy(chain, policy, &count,
 310                                                      handle))
 311                                         exit_error(OTHER_PROBLEM,
 312                                                 "Can't set policy `%s'"
 313                                                 " on `%s' line %u: %s\n",
 314                                                 chain, policy, line,
 315                                                 iptc_strerror(errno));
 316                         }
 317
 318                         ret = 1;
 319
 320                 } else if (in_table) {
 321                         int a;
 322                         char *ptr = buffer;
 323                         char *pcnt = NULL;
 324                         char *bcnt = NULL;
 325                         char *parsestart;
 326
 327                         /* the parser */
 328                         char *curchar;
 329                         int quote_open, escaped;
 330                         size_t param_len;
 331
 332                         /* reset the newargv */
 333                         newargc = 0;
 334
 335                         if (buffer[0] == '[') {
 336                                 /* we have counters in our input */
 337                                 ptr = strchr(buffer, ']');
 338                                 if (!ptr)
 339                                         exit_error(PARAMETER_PROBLEM,
 340                                                    "Bad line %u: need ]\n",
 341                                                    line);
 342
 343                                 pcnt = strtok(buffer+1, ":");
 344                                 if (!pcnt)
 345                                         exit_error(PARAMETER_PROBLEM,
 346                                                    "Bad line %u: need :\n",
 347                                                    line);
 348
 349                                 bcnt = strtok(NULL, "]");
 350                                 if (!bcnt)
 351                                         exit_error(PARAMETER_PROBLEM,
 352                                                    "Bad line %u: need ]\n",
 353                                                    line);
 354
 355                                 /* start command parsing after counter */
 356                                 parsestart = ptr + 1;
 357                         } else {
 358                                 /* start command parsing at start of line */
 359                                 parsestart = buffer;
 360                         }
 361
 362                         add_argv(argv[0]);
 363                         add_argv("-t");
 364                         add_argv((char *) &curtable);
 365
 366                         if (counters && pcnt && bcnt) {
 367                                 add_argv("--set-counters");
 368                                 add_argv((char *) pcnt);
 369                                 add_argv((char *) bcnt);
 370                         }
 371
 372                         /* After fighting with strtok enough, here's now
 373                          * a 'real' parser. According to Rusty I'm now no
 374                          * longer a real hacker, but I can live with that */
 375
 376                         quote_open = 0;
 377                         escaped = 0;
 378                         param_len = 0;
 379
 380                         for (curchar = parsestart; *curchar; curchar++) {
 381                                 char param_buffer[1024];
 382
 383                                 if (quote_open) {
 384                                         if (escaped) {
 385                                                 param_buffer[param_len++] = *curchar;
 386                                                 escaped = 0;
 387                                                 continue;
 388                                         } else if (*curchar == '\\') {
 389                                                 escaped = 1;
 390                                                 continue;
 391                                         } else if (*curchar == '"') {
 392                                                 quote_open = 0;
 393                                                 *curchar = ' ';
 394                                         } else {
 395                                                 param_buffer[param_len++] = *curchar;
 396                                                 continue;
 397                                         }
 398                                 } else {
 399                                         if (*curchar == '"') {
 400                                                 quote_open = 1;
 401                                                 continue;
 402                                         }
 403                                 }
 404
 405                                 if (*curchar == ' '
 406                                     || *curchar == '\t'
 407                                     || * curchar == '\n') {
 408                                         if (!param_len) {
 409                                                 /* two spaces? */
 410                                                 continue;
 411                                         }
 412
 413                                         param_buffer[param_len] = '\0';
 414
 415                                         /* check if table name specified */
 416                                         if (!strncmp(param_buffer, "-t", 2)
 417                                             || !strncmp(param_buffer, "--table", 8)) {
 418                                                 exit_error(PARAMETER_PROBLEM,
 419                                                    "Line %u seems to have a "
 420                                                    "-t table option.\n", line);
 421                                                 exit(1);
 422                                         }
 423
 424                                         add_argv(param_buffer);
 425                                         param_len = 0;
 426                                 } else {
 427                                         /* regular character, copy to buffer */
 428                                         param_buffer[param_len++] = *curchar;
 429
 430                                         if (param_len >= sizeof(param_buffer))
 431                                                 exit_error(PARAMETER_PROBLEM,
 432                                                    "Parameter too long!");
 433                                 }
 434                         }
 435
 436                         DEBUGP("calling do_command(%u, argv, &%s, handle):\n",
 437                                 newargc, curtable);
 438
 439                         for (a = 0; a < newargc; a++)
 440                                 DEBUGP("argv[%u]: %s\n", a, newargv[a]);
 441
 442                         ret = do_command(newargc, newargv,
 443                                          &newargv[2], &handle);
 444
 445                         free_argv();
 446                         fflush(stdout);
 447                 }
 448                 if (tablename && (strcmp(tablename, curtable) != 0))
 449                         continue;
 450                 if (!ret) {
 451                         fprintf(stderr, "%s: line %u failed\n",
 452                                         program_name, line);
 453                         exit(1);
 454                 }
 455         }
 456         if (in_table) {
 457                 fprintf(stderr, "%s: COMMIT expected at line %u\n",
 458                                 program_name, line + 1);
 459                 exit(1);
 460         }
 461
 462         return 0;
 463 }