Pileus Git - ~andy/fetchmail/blob - options.c

   1 /*
   2  * options.c -- command-line option processing
   3  *
   4  * For license terms, see the file COPYING in this directory.
   5  */
   6
   7 #include "config.h"
   8
   9 #include <stdio.h>
  10 #if defined(HAVE_ALLOCA_H)
  11 #include <alloca.h>
  12 #else
  13 #ifdef _AIX
  14  #pragma alloca
  15 #endif
  16 #endif
  17 #include <pwd.h>
  18 #include <string.h>
  19 #include <errno.h>
  20 #if defined(STDC_HEADERS)
  21 #include  <stdlib.h>
  22 #include  <limits.h>
  23 #else
  24 #include  <ctype.h>
  25 #endif
  26
  27 #include "getopt.h"
  28 #include "fetchmail.h"
  29
  30 #define LA_HELP         1
  31 #define LA_VERSION      2
  32 #define LA_CHECK        3
  33 #define LA_SILENT       4
  34 #define LA_VERBOSE      5
  35 #define LA_DAEMON       6
  36 #define LA_NODETACH     7
  37 #define LA_QUIT         8
  38 #define LA_LOGFILE      9
  39 #define LA_INVISIBLE    10
  40 #define LA_SYSLOG       11
  41 #define LA_NOSYSLOG     12
  42 #define LA_RCFILE       13
  43 #define LA_IDFILE       14
  44 #define LA_POSTMASTER   15
  45 #define LA_PROTOCOL     16
  46 #define LA_UIDL         17
  47 #define LA_PORT         18
  48 #define LA_AUTHENTICATE 19
  49 #define LA_TIMEOUT      20
  50 #define LA_ENVELOPE     21
  51 #define LA_QVIRTUAL     22
  52 #define LA_USERNAME     23
  53 #define LA_ALL          24
  54 #define LA_NOKEEP       25
  55 #define LA_KEEP         26
  56 #define LA_FLUSH        27
  57 #define LA_NOREWRITE    28
  58 #define LA_LIMIT        29
  59 #define LA_FOLDER       30
  60 #define LA_SMTPHOST     31
  61 #define LA_SMTPADDR     32
  62 #define LA_ANTISPAM     33
  63 #define LA_BATCHLIMIT   34
  64 #define LA_FETCHLIMIT   35
  65 #define LA_EXPUNGE      36
  66 #define LA_MDA          37
  67 #define LA_NETSEC       38
  68 #define LA_INTERFACE    39
  69 #define LA_MONITOR      41
  70 #define LA_CONFIGDUMP   42
  71 #define LA_YYDEBUG      43
  72
  73 /* options still left: CgGhHjJoORwWxXYz */
  74 static const char *shortoptions =
  75         "?Vcsvd:NqL:f:i:p:UP:A:t:E:Q:u:akKFnl:r:S:Z:b:B:e:m:T:I:M:y";
  76
  77 static const struct option longoptions[] = {
  78 /* this can be const because all flag fields are 0 and will never get set */
  79   {"help",      no_argument,       (int *) 0, LA_HELP        },
  80   {"version",   no_argument,       (int *) 0, LA_VERSION     },
  81   {"check",     no_argument,       (int *) 0, LA_CHECK       },
  82   {"silent",    no_argument,       (int *) 0, LA_SILENT      },
  83   {"verbose",   no_argument,       (int *) 0, LA_VERBOSE     },
  84   {"daemon",    required_argument, (int *) 0, LA_DAEMON      },
  85   {"nodetach",  no_argument,       (int *) 0, LA_NODETACH    },
  86   {"quit",      no_argument,       (int *) 0, LA_QUIT        },
  87   {"logfile",   required_argument, (int *) 0, LA_LOGFILE     },
  88   {"invisible", no_argument,       (int *) 0, LA_INVISIBLE   },
  89   {"syslog",    no_argument,       (int *) 0, LA_SYSLOG      },
  90   {"nosyslog",  no_argument,       (int *) 0, LA_NOSYSLOG    },
  91   {"fetchmailrc",required_argument,(int *) 0, LA_RCFILE      },
  92   {"idfile",    required_argument, (int *) 0, LA_IDFILE      },
  93   {"postmaster",required_argument, (int *) 0, LA_POSTMASTER  },
  94
  95   {"protocol",  required_argument, (int *) 0, LA_PROTOCOL    },
  96   {"proto",     required_argument, (int *) 0, LA_PROTOCOL    },
  97   {"uidl",      no_argument,       (int *) 0, LA_UIDL        },
  98   {"port",      required_argument, (int *) 0, LA_PORT        },
  99   {"auth",      required_argument, (int *) 0, LA_AUTHENTICATE},
 100   {"timeout",   required_argument, (int *) 0, LA_TIMEOUT     },
 101   {"envelope",  required_argument, (int *) 0, LA_ENVELOPE    },
 102   {"qvirtual",  required_argument, (int *) 0, LA_QVIRTUAL    },
 103
 104   {"user",      required_argument, (int *) 0, LA_USERNAME    },
 105   {"username",  required_argument, (int *) 0, LA_USERNAME    },
 106
 107   {"all",       no_argument,       (int *) 0, LA_ALL         },
 108   {"nokeep",    no_argument,       (int *) 0, LA_NOKEEP      },
 109   {"keep",      no_argument,       (int *) 0, LA_KEEP        },
 110   {"flush",     no_argument,       (int *) 0, LA_FLUSH       },
 111   {"norewrite", no_argument,       (int *) 0, LA_NOREWRITE   },
 112   {"limit",     required_argument, (int *) 0, LA_LIMIT       },
 113
 114   {"folder",    required_argument, (int *) 0, LA_FOLDER      },
 115   {"smtphost",  required_argument, (int *) 0, LA_SMTPHOST    },
 116   {"smtpaddress", required_argument, (int *) 0, LA_SMTPADDR  },
 117   {"antispam",  required_argument, (int *) 0, LA_ANTISPAM    },
 118
 119   {"batchlimit",required_argument, (int *) 0, LA_BATCHLIMIT  },
 120   {"fetchlimit",required_argument, (int *) 0, LA_FETCHLIMIT  },
 121   {"expunge",   required_argument, (int *) 0, LA_EXPUNGE     },
 122   {"mda",       required_argument, (int *) 0, LA_MDA         },
 123
 124 #ifdef INET6
 125   {"netsec",    required_argument, (int *) 0, LA_NETSEC    },
 126 #endif /* INET6 */
 127
 128 #if defined(linux) && !INET6
 129   {"interface", required_argument, (int *) 0, LA_INTERFACE   },
 130   {"monitor",   required_argument, (int *) 0, LA_MONITOR     },
 131 #endif /* defined(linux) && !INET6 */
 132
 133   {"configdump",no_argument,       (int *) 0, LA_CONFIGDUMP  },
 134
 135   {"yydebug",   no_argument,       (int *) 0, LA_YYDEBUG     },
 136
 137   {(char *) 0,  no_argument,       (int *) 0, 0              }
 138 };
 139
 140 static int xatoi(char *s, int *errflagptr)
 141 /* do safe conversion from string to number */
 142 {
 143 #if defined (STDC_HEADERS) && defined (LONG_MAX) && defined (INT_MAX)
 144     /* parse and convert numbers, but also check for invalid characters in
 145      * numbers
 146      */
 147
 148     char *endptr;
 149     long value;
 150
 151     errno = 0;
 152
 153     value = strtol(s, &endptr, 0);
 154
 155     /* any invalid chars in string? */
 156     if ( (endptr == s) || (*endptr != '\0') ) {
 157         (void) fprintf(stderr, "String '%s' is not a valid number string.\n", s);
 158         (*errflagptr)++;
 159         return 0;
 160     }
 161
 162     /* is the range valid? */
 163     if ( (((value == LONG_MAX) || (value == LONG_MIN)) && (errno == ERANGE)) ||
 164                                 (value > INT_MAX) || (value < INT_MIN)) {
 165
 166         (void) fprintf(stderr, "Value of string '%s' is %s than %d.\n", s,
 167                                         (value < 0) ? "smaller": "larger",
 168                                         (value < 0) ? INT_MIN : INT_MAX);
 169         (*errflagptr)++;
 170         return 0;
 171     }
 172
 173     return (int) value;  /* shut up, I know what I'm doing */
 174 #else
 175     int i;
 176     char *dp;
 177 # if defined (STDC_HEADERS)
 178     size_t      len;
 179 # else
 180     int         len;
 181 # endif
 182
 183     /* We do only base 10 conversions here (atoi)! */
 184
 185     len = strlen(s);
 186     /* check for leading white spaces */
 187     for (i = 0; (i < len) && isspace(s[i]); i++)
 188         ;
 189
 190     dp = &s[i];
 191
 192     /* check for +/- */
 193     if (i < len && (s[i] == '+' || s[i] == '-'))        i++;
 194
 195     /* skip over digits */
 196     for ( /* no init */ ; (i < len) && isdigit(s[i]); i++)
 197         ;
 198
 199     /* check for trailing garbage */
 200     if (i != len) {
 201         (void) fprintf(stderr, "String '%s' is not a valid number string.\n", s);
 202         (*errflagptr)++;
 203         return 0;
 204     }
 205
 206     /* atoi should be safe by now, except for number range over/underflow */
 207     return atoi(dp);
 208 #endif
 209 }
 210
 211 int parsecmdline (argc, argv, rctl, ctl)
 212 /* parse and validate the command line options */
 213 int argc;               /* argument count */
 214 char **argv;            /* argument strings */
 215 struct runctl *rctl;    /* global run controls to modify */
 216 struct query *ctl;      /* option record to be initialized */
 217 {
 218     /*
 219      * return value: if positive, argv index of last parsed option + 1
 220      * (presumes one or more server names follows).  if zero, the
 221      * command line switches are such that no server names are
 222      * required (e.g. --version).  if negative, the command line is
 223      * has one or more syntax errors.
 224      */
 225
 226     int c;
 227     int ocount = 0;     /* count of destinations specified */
 228     int errflag = 0;   /* TRUE when a syntax error is detected */
 229     int option_index;
 230     char *buf, *cp;
 231
 232     rctl->poll_interval = -1;
 233
 234     memset(ctl, '\0', sizeof(struct query));    /* start clean */
 235     ctl->smtp_socket = -1;
 236
 237     while (!errflag &&
 238            (c = getopt_long(argc,argv,shortoptions,
 239                             longoptions,&option_index)) != -1) {
 240
 241         switch (c) {
 242         case 'V':
 243         case LA_VERSION:
 244             versioninfo = TRUE;
 245             break;
 246         case 'c':
 247         case LA_CHECK:
 248             check_only = TRUE;
 249             break;
 250         case 's':
 251         case LA_SILENT:
 252             outlevel = O_SILENT;
 253             break;
 254         case 'v':
 255         case LA_VERBOSE:
 256             outlevel = O_VERBOSE;
 257             break;
 258         case 'd':
 259         case LA_DAEMON:
 260             rctl->poll_interval = xatoi(optarg, &errflag);
 261             break;
 262         case 'N':
 263         case LA_NODETACH:
 264             nodetach = TRUE;
 265             break;
 266         case 'q':
 267         case LA_QUIT:
 268             quitmode = TRUE;
 269             break;
 270         case 'L':
 271         case LA_LOGFILE:
 272             rctl->logfile = optarg;
 273             break;
 274         case LA_INVISIBLE:
 275             rctl->invisible = TRUE;
 276             break;
 277         case 'f':
 278         case LA_RCFILE:
 279             rcfile = (char *) xmalloc(strlen(optarg)+1);
 280             strcpy(rcfile,optarg);
 281             break;
 282         case 'i':
 283         case LA_IDFILE:
 284             rctl->idfile = (char *) xmalloc(strlen(optarg)+1);
 285             strcpy(rctl->idfile,optarg);
 286             break;
 287         case LA_POSTMASTER:
 288             rctl->postmaster = (char *) xmalloc(strlen(optarg)+1);
 289             break;
 290         case 'p':
 291         case LA_PROTOCOL:
 292             /* XXX -- should probably use a table lookup here */
 293             if (strcasecmp(optarg,"pop2") == 0)
 294                 ctl->server.protocol = P_POP2;
 295 #ifdef SDPS_ENABLE
 296             else if (strcasecmp(optarg,"sdps") == 0)
 297             {
 298                 ctl->server.protocol = P_POP3;
 299                 ctl->server.sdps = TRUE;
 300             }
 301 #endif /* SDPS_ENABLE */
 302             else if (strcasecmp(optarg,"pop3") == 0)
 303                 ctl->server.protocol = P_POP3;
 304             else if (strcasecmp(optarg,"apop") == 0)
 305                 ctl->server.protocol = P_APOP;
 306             else if (strcasecmp(optarg,"rpop") == 0)
 307                 ctl->server.protocol = P_RPOP;
 308             else if (strcasecmp(optarg,"kpop") == 0)
 309             {
 310                 ctl->server.protocol = P_POP3;
 311 #if INET6
 312                 ctl->server.service = KPOP_PORT;
 313 #else /* INET6 */
 314                 ctl->server.port = KPOP_PORT;
 315 #endif /* INET6 */
 316 #ifdef KERBEROS_V5
 317                 ctl->server.preauthenticate =  A_KERBEROS_V5;
 318 #else
 319                 ctl->server.preauthenticate =  A_KERBEROS_V4;
 320 #endif /* KERBEROS_V5 */
 321             }
 322             else if (strcasecmp(optarg,"imap") == 0)
 323                 ctl->server.protocol = P_IMAP;
 324 #ifdef KERBEROS_V4
 325             else if (strcasecmp(optarg,"imap-k4") == 0)
 326                 ctl->server.protocol = P_IMAP_K4;
 327 #endif /* KERBEROS_V4 */
 328 #ifdef GSSAPI
 329             else if (strcasecmp(optarg, "imap-gss") == 0)
 330                 ctl->server.protocol = P_IMAP_GSS;
 331 #endif /* GSSAPI */
 332             else if (strcasecmp(optarg,"etrn") == 0)
 333                 ctl->server.protocol = P_ETRN;
 334             else {
 335                 fprintf(stderr,"Invalid protocol `%s' specified.\n", optarg);
 336                 errflag++;
 337             }
 338             break;
 339         case 'U':
 340         case LA_UIDL:
 341             ctl->server.uidl = FLAG_TRUE;
 342             break;
 343         case 'P':
 344         case LA_PORT:
 345 #if INET6
 346             ctl->server.service = optarg;
 347 #else /* INET6 */
 348             ctl->server.port = xatoi(optarg, &errflag);
 349 #endif /* INET6 */
 350             break;
 351         case 'A':
 352         case LA_AUTHENTICATE:
 353             if (strcmp(optarg, "password") == 0)
 354                 ctl->server.preauthenticate = A_PASSWORD;
 355             else if (strcmp(optarg, "kerberos") == 0)
 356 #ifdef KERBEROS_V5
 357                 ctl->server.preauthenticate = A_KERBEROS_V5;
 358             else if (strcmp(optarg, "kerberos_v5") == 0)
 359                 ctl->server.preauthenticate = A_KERBEROS_V5;
 360 #else
 361                 ctl->server.preauthenticate = A_KERBEROS_V4;
 362             else if (strcmp(optarg, "kerberos_v4") == 0)
 363                 ctl->server.preauthenticate = A_KERBEROS_V4;
 364 #endif /* KERBEROS_V5 */
 365             else {
 366                 fprintf(stderr,"Invalid preauthentication `%s' specified.\n", optarg);
 367                 errflag++;
 368             }
 369             break;
 370         case 't':
 371         case LA_TIMEOUT:
 372             ctl->server.timeout = xatoi(optarg, &errflag);
 373             if (ctl->server.timeout == 0)
 374                 ctl->server.timeout = -1;
 375             break;
 376         case 'E':
 377         case LA_ENVELOPE:
 378             ctl->server.envelope = xstrdup(optarg);
 379             break;
 380         case 'Q':
 381         case LA_QVIRTUAL:
 382             ctl->server.qvirtual = xstrdup(optarg);
 383             break;
 384
 385         case 'u':
 386         case LA_USERNAME:
 387             ctl->remotename = xstrdup(optarg);
 388             break;
 389         case 'a':
 390         case LA_ALL:
 391             ctl->fetchall = FLAG_TRUE;
 392             break;
 393         case 'K':
 394         case LA_NOKEEP:
 395             ctl->keep = FLAG_FALSE;
 396             break;
 397         case 'k':
 398         case LA_KEEP:
 399             ctl->keep = FLAG_TRUE;
 400             break;
 401         case 'F':
 402         case LA_FLUSH:
 403             ctl->flush = FLAG_TRUE;
 404             break;
 405         case 'n':
 406         case LA_NOREWRITE:
 407             ctl->rewrite = FLAG_FALSE;
 408             break;
 409         case 'l':
 410         case LA_LIMIT:
 411             c = xatoi(optarg, &errflag);
 412             ctl->limit = NUM_VALUE(c);
 413             break;
 414         case 'r':
 415         case LA_FOLDER:
 416             buf = alloca(strlen(optarg));
 417             strcpy(buf, optarg);
 418             cp = strtok(buf, ",");
 419             do {
 420                 save_str(&ctl->mailboxes, cp, 0);
 421             } while
 422                 ((cp = strtok((char *)NULL, ",")));
 423             break;
 424         case 'S':
 425         case LA_SMTPHOST:
 426             buf = alloca(strlen(optarg));
 427             strcpy(buf, optarg);
 428             cp = strtok(buf, ",");
 429             do {
 430                 save_str(&ctl->smtphunt, cp, TRUE);
 431             } while
 432                 ((cp = strtok((char *)NULL, ",")));
 433             ocount++;
 434             break;
 435         case 'D':
 436         case LA_SMTPADDR:
 437             ctl->smtpaddress = xstrdup(optarg);
 438             break;
 439         case 'Z':
 440         case LA_ANTISPAM:
 441             buf = alloca(strlen(optarg));
 442             strcpy(buf, optarg);
 443             cp = strtok(buf, ",");
 444             do {
 445                 struct idlist   *idp = save_str(&ctl->antispam, NULL, 0);;
 446
 447                 idp->val.status.num = atoi(cp);
 448             } while
 449                 ((cp = strtok((char *)NULL, ",")));
 450             break;
 451         case 'b':
 452         case LA_BATCHLIMIT:
 453             c = xatoi(optarg, &errflag);
 454             ctl->batchlimit = NUM_VALUE(c);
 455             break;
 456         case 'B':
 457         case LA_FETCHLIMIT:
 458             c = xatoi(optarg, &errflag);
 459             ctl->fetchlimit = NUM_VALUE(c);
 460             break;
 461         case 'e':
 462         case LA_EXPUNGE:
 463             c = xatoi(optarg, &errflag);
 464             ctl->expunge = NUM_VALUE(c);
 465             break;
 466         case 'm':
 467         case LA_MDA:
 468             ctl->mda = xstrdup(optarg);
 469             ocount++;
 470             break;
 471
 472         case 'T':
 473         case LA_NETSEC:
 474 #if NET_SECURITY
 475             ctl->server.netsec = (void *)optarg;
 476 #else
 477             fprintf(stderr, "fetchmail: network security support is disabled\n");
 478             errflag++;
 479 #endif /* NET_SECURITY */
 480             break;
 481
 482 #if defined(linux) && !INET6
 483         case 'I':
 484         case LA_INTERFACE:
 485             interface_parse(optarg, &ctl->server);
 486             break;
 487         case 'M':
 488         case LA_MONITOR:
 489             ctl->server.monitor = xstrdup(optarg);
 490             break;
 491 #endif /* defined(linux) && !INET6 */
 492
 493         case 'y':
 494         case LA_YYDEBUG:
 495             yydebug = TRUE;
 496             break;
 497
 498         case LA_CONFIGDUMP:
 499             configdump = TRUE;
 500             break;
 501
 502         case LA_SYSLOG:
 503             rctl->use_syslog = FLAG_TRUE;
 504             break;
 505
 506         case LA_NOSYSLOG:
 507             rctl->use_syslog = FLAG_FALSE;
 508             break;
 509
 510         case '?':
 511         case LA_HELP:
 512         default:
 513             errflag++;
 514         }
 515     }
 516
 517     if (errflag || ocount > 1) {
 518         /* squawk if syntax errors were detected */
 519         fputs("usage:  fetchmail [options] [server ...]\n", stderr);
 520         fputs("  Options are as follows:\n",stderr);
 521         fputs("  -?, --help        display this option help\n", stderr);
 522         fputs("  -V, --version     display version info\n", stderr);
 523
 524         fputs("  -c, --check       check for messages without fetching\n", stderr);
 525         fputs("  -s, --silent      work silently\n", stderr);
 526         fputs("  -v, --verbose     work noisily (diagnostic output)\n", stderr);
 527         fputs("  -d, --daemon      run as a daemon once per n seconds\n", stderr);
 528         fputs("  -N, --nodetach    don't detach daemon process\n", stderr);
 529         fputs("  -q, --quit        kill daemon process\n", stderr);
 530         fputs("  -L, --logfile     specify logfile name\n", stderr);
 531         fputs("      --syslog      use syslog(3) for most messages when running as a daemon\n", stderr);
 532         fputs("      --invisible   suppress Received line & enable host spoofing\n", stderr);
 533         fputs("  -f, --fetchmailrc specify alternate run control file\n", stderr);
 534         fputs("  -i, --idfile      specify alternate UIDs file\n", stderr);
 535         fputs("      --postmaster  specify recipient of last resort\n",stderr);
 536 #if defined(linux) && !INET6
 537         fputs("  -I, --interface   interface required specification\n",stderr);
 538         fputs("  -M, --monitor     monitor interface for activity\n",stderr);
 539 #endif
 540
 541 #ifdef KERBEROS_V4
 542         fputs("  -p, --protocol    specify pop2, pop3, imap, apop, rpop, kpop, etrn, imap-k4\n", stderr);
 543 #else
 544         fputs("  -p, --protocol    specify pop2, pop3, imap, apop, rpop, kpop, etrn\n", stderr);
 545 #endif /* KERBEROS_V4 */
 546         fputs("  -U, --uidl        force the use of UIDLs (pop3 only)\n", stderr);
 547         fputs("  -P, --port        TCP/IP service port to connect to\n",stderr);
 548         fputs("  -A, --auth        authentication type (password or kerberos)\n",stderr);
 549         fputs("  -t, --timeout     server nonresponse timeout\n",stderr);
 550         fputs("  -E, --envelope    envelope address header\n",stderr);
 551         fputs("  -Q, --qvirtual    prefix to remove from local user id\n",stderr);
 552
 553         fputs("  -u, --username    specify users's login on server\n", stderr);
 554         fputs("  -a, --all         retrieve old and new messages\n", stderr);
 555         fputs("  -K, --nokeep      delete new messages after retrieval\n", stderr);
 556         fputs("  -k, --keep        save new messages after retrieval\n", stderr);
 557         fputs("  -F, --flush       delete old messages from server\n", stderr);
 558         fputs("  -n, --norewrite   don't rewrite header addresses\n", stderr);
 559         fputs("  -l, --limit       don't fetch messages over given size\n", stderr);
 560
 561 #if NET_SECURITY
 562         fputs("  -T, --netsec      set IP security request\n", stderr);
 563 #endif /* NET_SECURITY */
 564         fputs("  -S, --smtphost    set SMTP forwarding host\n", stderr);
 565         fputs("  -D, --smtpaddress set SMTP delivery domain to use\n", stderr);
 566         fputs("  -Z, --antispam,   set antispam response values\n", stderr);
 567         fputs("  -b, --batchlimit  set batch limit for SMTP connections\n", stderr);
 568         fputs("  -B, --fetchlimit  set fetch limit for server connections\n", stderr);
 569         fputs("  -e, --expunge     set max deletions between expunges\n", stderr);
 570         fputs("  -r, --folder      specify remote folder name\n", stderr);
 571         return(-1);
 572     }
 573
 574     return(optind);
 575 }
 576
 577 /* options.c ends here */