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

   1 /*
   2  * options.c -- command-line option processing
   3  *
   4  * Copyright 1998 by Eric S. Raymond.
   5  * For license terms, see the file COPYING in this directory.
   6  */
   7
   8 #include "config.h"
   9
  10 #include <stdio.h>
  11 #include <pwd.h>
  12 #include <string.h>
  13 #include <errno.h>
  14 #if defined(STDC_HEADERS)
  15 #include  <stdlib.h>
  16 #include  <limits.h>
  17 #else
  18 #include  <ctype.h>
  19 #endif
  20
  21 #include "getopt.h"
  22 #include "fetchmail.h"
  23 #include "i18n.h"
  24
  25 enum {
  26     LA_INVISIBLE = 256,
  27     LA_PIDFILE,
  28     LA_SYSLOG,
  29     LA_NOSYSLOG,
  30     LA_POSTMASTER,
  31     LA_NOBOUNCE,
  32     LA_AUTH,
  33     LA_FETCHDOMAINS,
  34     LA_BSMTP,
  35     LA_LMTP,
  36     LA_PLUGIN,
  37     LA_PLUGOUT,
  38     LA_CONFIGDUMP,
  39     LA_SMTPNAME,
  40     LA_SHOWDOTS,
  41     LA_PRINCIPAL,
  42     LA_TRACEPOLLS,
  43     LA_SSL,
  44     LA_SSLKEY,
  45     LA_SSLCERT,
  46     LA_SSLPROTO,
  47     LA_SSLCERTCK,
  48     LA_SSLCERTFILE,
  49     LA_SSLCERTPATH,
  50     LA_SSLCOMMONNAME,
  51     LA_SSLFINGERPRINT,
  52     LA_FETCHSIZELIMIT,
  53     LA_FASTUIDL,
  54     LA_LIMITFLUSH,
  55     LA_IDLE,
  56     LA_NOSOFTBOUNCE,
  57     LA_SOFTBOUNCE,
  58     LA_BADHEADER
  59 };
  60
  61 #ifdef HAVE_LIBPWMD
  62 static const char *shortoptions =
  63         "O:C:G:?Vcsvd:NqL:f:i:p:UP:A:t:E:Q:u:akKFnl:r:S:Z:b:B:e:m:I:M:yw:D:";
  64 #else
  65 /* options still left: CgGhHjJoORTWxXYz */
  66 static const char *shortoptions =
  67         "?Vcsvd:NqL:f:i:p:UP:A:t:E:Q:u:akKFnl:r:S:Z:b:B:e:m:I:M:yw:D:";
  68 #endif
  69
  70 static const struct option longoptions[] = {
  71 /* this can be const because all flag fields are 0 and will never get set */
  72 #ifdef HAVE_LIBPWMD
  73   {"pwmd-socket",      required_argument,         (int *) 0, 'C' },
  74   {"pwmd-file",        required_argument,         (int *) 0, 'G' },
  75   {"pinentry-timeout",    required_argument,         (int *) 0, 'O' },
  76 #endif
  77   {"help",      no_argument,       (int *) 0, '?' },
  78   {"version",   no_argument,       (int *) 0, 'V' },
  79   {"check",     no_argument,       (int *) 0, 'c' },
  80   {"silent",    no_argument,       (int *) 0, 's' },
  81   {"verbose",   no_argument,       (int *) 0, 'v' },
  82   {"daemon",    required_argument, (int *) 0, 'd' },
  83   {"nodetach",  no_argument,       (int *) 0, 'N' },
  84   {"quit",      no_argument,       (int *) 0, 'q' },
  85   {"logfile",   required_argument, (int *) 0, 'L' },
  86   {"invisible", no_argument,       (int *) 0, LA_INVISIBLE },
  87   {"showdots",  no_argument,       (int *) 0, LA_SHOWDOTS },
  88   {"syslog",    no_argument,       (int *) 0, LA_SYSLOG },
  89   {"nosyslog",  no_argument,       (int *) 0, LA_NOSYSLOG },
  90   {"fetchmailrc",required_argument,(int *) 0, 'f' },
  91   {"idfile",    required_argument, (int *) 0, 'i' },
  92   {"pidfile",   required_argument, (int *) 0, LA_PIDFILE },
  93   {"postmaster",required_argument, (int *) 0, LA_POSTMASTER },
  94   {"nobounce",  no_argument,       (int *) 0, LA_NOBOUNCE },
  95   {"nosoftbounce", no_argument,    (int *) 0, LA_NOSOFTBOUNCE },
  96   {"softbounce", no_argument,      (int *) 0, LA_SOFTBOUNCE },
  97
  98   {"protocol",  required_argument, (int *) 0, 'p' },
  99   {"proto",     required_argument, (int *) 0, 'p' },
 100   {"uidl",      no_argument,       (int *) 0, 'U' },
 101   {"idle",      no_argument,       (int *) 0, LA_IDLE},
 102   {"port",      required_argument, (int *) 0, 'P' },
 103   {"service",   required_argument, (int *) 0, 'P' },
 104   {"auth",      required_argument, (int *) 0, LA_AUTH},
 105   {"timeout",   required_argument, (int *) 0, 't' },
 106   {"envelope",  required_argument, (int *) 0, 'E' },
 107   {"qvirtual",  required_argument, (int *) 0, 'Q' },
 108   {"bad-header",required_argument, (int *) 0, LA_BADHEADER},
 109
 110   {"user",      required_argument, (int *) 0, 'u' },
 111   {"username",  required_argument, (int *) 0, 'u' },
 112
 113   {"all",       no_argument,       (int *) 0, 'a' },
 114   {"fetchall",  no_argument,       (int *) 0, 'a' },
 115   {"nokeep",    no_argument,       (int *) 0, 'K' },
 116   {"keep",      no_argument,       (int *) 0, 'k' },
 117   {"flush",     no_argument,       (int *) 0, 'F' },
 118   {"limitflush",        no_argument, (int *) 0, LA_LIMITFLUSH },
 119   {"norewrite", no_argument,       (int *) 0, 'n' },
 120   {"limit",     required_argument, (int *) 0, 'l' },
 121   {"warnings",  required_argument, (int *) 0, 'w' },
 122
 123   {"folder",    required_argument, (int *) 0, 'r' },
 124   {"smtphost",  required_argument, (int *) 0, 'S' },
 125   {"fetchdomains",      required_argument, (int *) 0, LA_FETCHDOMAINS },
 126   {"smtpaddress", required_argument, (int *) 0, 'D' },
 127   {"smtpname",  required_argument, (int *) 0, LA_SMTPNAME },
 128   {"antispam",  required_argument, (int *) 0, 'Z' },
 129
 130   {"batchlimit",required_argument, (int *) 0, 'b' },
 131   {"fetchlimit",required_argument, (int *) 0, 'B' },
 132   {"fetchsizelimit",required_argument, (int *) 0, LA_FETCHSIZELIMIT },
 133   {"fastuidl",  required_argument, (int *) 0, LA_FASTUIDL },
 134   {"expunge",   required_argument, (int *) 0, 'e' },
 135   {"mda",       required_argument, (int *) 0, 'm' },
 136   {"bsmtp",     required_argument, (int *) 0, LA_BSMTP },
 137   {"lmtp",      no_argument,       (int *) 0, LA_LMTP },
 138
 139 #ifdef SSL_ENABLE
 140   {"ssl",       no_argument,       (int *) 0, LA_SSL },
 141   {"sslkey",    required_argument, (int *) 0, LA_SSLKEY },
 142   {"sslcert",   required_argument, (int *) 0, LA_SSLCERT },
 143   {"sslproto",   required_argument, (int *) 0, LA_SSLPROTO },
 144   {"sslcertck", no_argument,       (int *) 0, LA_SSLCERTCK },
 145   {"sslcertfile",   required_argument, (int *) 0, LA_SSLCERTFILE },
 146   {"sslcertpath",   required_argument, (int *) 0, LA_SSLCERTPATH },
 147   {"sslcommonname",    required_argument, (int *) 0, LA_SSLCOMMONNAME },
 148   {"sslfingerprint",   required_argument, (int *) 0, LA_SSLFINGERPRINT },
 149 #endif
 150
 151   {"principal", required_argument, (int *) 0, LA_PRINCIPAL },
 152
 153 #ifdef CAN_MONITOR
 154   {"interface", required_argument, (int *) 0, 'I' },
 155   {"monitor",   required_argument, (int *) 0, 'M' },
 156 #endif /* CAN_MONITOR */
 157   {"plugin",    required_argument, (int *) 0, LA_PLUGIN },
 158   {"plugout",   required_argument, (int *) 0, LA_PLUGOUT },
 159
 160   {"configdump",no_argument,       (int *) 0, LA_CONFIGDUMP },
 161
 162   {"yydebug",   no_argument,       (int *) 0, 'y' },
 163
 164   {"tracepolls",no_argument,       (int *) 0, LA_TRACEPOLLS },
 165
 166   {(char *) 0,  no_argument,       (int *) 0, 0 }
 167 };
 168
 169 static int xatoi(char *s, int *errflagptr)
 170 /* do safe conversion from string to number */
 171 {
 172 #if defined (STDC_HEADERS) && defined (LONG_MAX) && defined (INT_MAX)
 173     /* parse and convert numbers, but also check for invalid characters in
 174      * numbers
 175      */
 176
 177     char *endptr;
 178     long value;
 179
 180     errno = 0;
 181
 182     value = strtol(s, &endptr, 0);
 183
 184     /* any invalid chars in string? */
 185     if ( (endptr == s) || (*endptr != '\0') ) {
 186         (void) fprintf(stderr, GT_("String '%s' is not a valid number string.\n"), s);
 187         (*errflagptr)++;
 188         return 0;
 189     }
 190
 191     /* is the range valid? */
 192     if ( (((value == LONG_MAX) || (value == LONG_MIN)) && (errno == ERANGE)) ||
 193                                 (value > INT_MAX) || (value < INT_MIN)) {
 194
 195         (void) fprintf(stderr, GT_("Value of string '%s' is %s than %d.\n"), s,
 196                                         (value < 0) ? GT_("smaller"): GT_("larger"),
 197                                         (value < 0) ? INT_MIN : INT_MAX);
 198         (*errflagptr)++;
 199         return 0;
 200     }
 201
 202     return (int) value;  /* shut up, I know what I'm doing */
 203 #else
 204     int i;
 205     char *dp;
 206 # if defined (STDC_HEADERS)
 207     size_t      len;
 208 # else
 209     int         len;
 210 # endif
 211
 212     /* We do only base 10 conversions here (atoi)! */
 213
 214     len = strlen(s);
 215     /* check for leading white spaces */
 216     for (i = 0; (i < len) && isspace((unsigned char)s[i]); i++)
 217         ;
 218
 219     dp = &s[i];
 220
 221     /* check for +/- */
 222     if (i < len && (s[i] == '+' || s[i] == '-'))        i++;
 223
 224     /* skip over digits */
 225     for ( /* no init */ ; (i < len) && isdigit((unsigned char)s[i]); i++)
 226         ;
 227
 228     /* check for trailing garbage */
 229     if (i != len) {
 230         (void) fprintf(stderr, GT_("String '%s' is not a valid number string.\n"), s);
 231         (*errflagptr)++;
 232         return 0;
 233     }
 234
 235     /* atoi should be safe by now, except for number range over/underflow */
 236     return atoi(dp);
 237 #endif
 238 }
 239
 240 /** parse and validate the command line options */
 241 int parsecmdline (int argc /** argument count */,
 242                   char **argv /** argument strings */,
 243                   struct runctl *rctl /** global run controls to modify */,
 244                   struct query *ctl /** option record to initialize */)
 245 {
 246     /*
 247      * return value: if positive, argv index of last parsed option + 1
 248      * (presumes one or more server names follows).  if zero, the
 249      * command line switches are such that no server names are
 250      * required (e.g. --version).  if negative, the command line is
 251      * has one or more syntax errors.
 252      */
 253
 254     int c;
 255     int ocount = 0;     /* count of destinations specified */
 256     int errflag = 0;    /* TRUE when a syntax error is detected */
 257     int helpflag = 0;   /* TRUE when option help was explicitly requested */
 258     int option_index;
 259     char *buf, *cp;
 260
 261     rctl->poll_interval = -1;
 262
 263     memset(ctl, '\0', sizeof(struct query));    /* start clean */
 264     ctl->smtp_socket = -1;
 265
 266     while (!errflag &&
 267            (c = getopt_long(argc,argv,shortoptions,
 268                             longoptions, &option_index)) != -1)
 269     {
 270         switch (c) {
 271 #ifdef HAVE_LIBPWMD
 272         case 'C':
 273             ctl->pwmd_socket = prependdir(optarg, currentwd);
 274             break;
 275         case 'G':
 276             ctl->pwmd_file = xstrdup(optarg);
 277             break;
 278         case 'O':
 279             rctl->pinentry_timeout = atoi(optarg);
 280             break;
 281 #endif
 282         case 'V':
 283             versioninfo = TRUE;
 284             break;
 285         case 'c':
 286             check_only = TRUE;
 287             break;
 288         case 's':
 289             outlevel = O_SILENT;
 290             break;
 291         case 'v':
 292             if (outlevel >= O_VERBOSE)
 293                 outlevel = O_DEBUG;
 294             else
 295                 outlevel = O_VERBOSE;
 296             break;
 297         case 'd':
 298             rctl->poll_interval = xatoi(optarg, &errflag);
 299             break;
 300         case 'N':
 301             nodetach = TRUE;
 302             break;
 303         case 'q':
 304             quitmode = TRUE;
 305             quitind = optind;
 306             break;
 307         case 'L':
 308             rctl->logfile = prependdir (optarg, currentwd);
 309             break;
 310         case LA_INVISIBLE:
 311             rctl->invisible = FLAG_TRUE;
 312             break;
 313         case LA_SHOWDOTS:
 314             rctl->showdots = FLAG_TRUE;
 315             break;
 316         case 'f':
 317             xfree(rcfile);
 318             rcfile = prependdir (optarg, currentwd);
 319             break;
 320         case 'i':
 321             rctl->idfile = prependdir (optarg, currentwd);
 322             break;
 323         case LA_PIDFILE:
 324             rctl->pidfile = prependdir (optarg, currentwd);
 325             break;
 326         case LA_POSTMASTER:
 327             rctl->postmaster = (char *) xstrdup(optarg);
 328             break;
 329         case LA_NOBOUNCE:
 330             rctl->bouncemail = FLAG_FALSE;
 331             break;
 332         case LA_NOSOFTBOUNCE:
 333             rctl->softbounce = FLAG_FALSE;
 334             break;
 335         case LA_SOFTBOUNCE:
 336             rctl->softbounce = FLAG_TRUE;
 337             break;
 338         case LA_BADHEADER:
 339             if (strcasecmp(optarg,"accept") == 0) {
 340                 ctl->server.badheader = BHACCEPT;
 341             } else if (strcasecmp(optarg,"reject") == 0) {
 342                 ctl->server.badheader = BHREJECT;
 343             } else {
 344                 fprintf(stderr,GT_("Invalid bad-header policy `%s' specified.\n"), optarg);
 345                 errflag++;
 346             }
 347             break;
 348
 349         case 'p':
 350             /* XXX -- should probably use a table lookup here */
 351             if (strcasecmp(optarg,"auto") == 0)
 352                 ctl->server.protocol = P_AUTO;
 353             else if (strcasecmp(optarg,"pop2") == 0)
 354                 ctl->server.protocol = P_POP2;
 355 #ifdef SDPS_ENABLE
 356             else if (strcasecmp(optarg,"sdps") == 0)
 357             {
 358                 ctl->server.protocol = P_POP3;
 359                 ctl->server.sdps = TRUE;
 360             }
 361 #endif /* SDPS_ENABLE */
 362             else if (strcasecmp(optarg,"pop3") == 0)
 363                 ctl->server.protocol = P_POP3;
 364             else if (strcasecmp(optarg,"apop") == 0)
 365                 ctl->server.protocol = P_APOP;
 366             else if (strcasecmp(optarg,"rpop") == 0)
 367                 ctl->server.protocol = P_RPOP;
 368             else if (strcasecmp(optarg,"kpop") == 0)
 369             {
 370                 ctl->server.protocol = P_POP3;
 371                 ctl->server.service = KPOP_PORT;
 372 #ifdef KERBEROS_V5
 373                 ctl->server.authenticate =  A_KERBEROS_V5;
 374 #else
 375                 ctl->server.authenticate =  A_KERBEROS_V4;
 376 #endif /* KERBEROS_V5 */
 377             }
 378             else if (strcasecmp(optarg,"imap") == 0)
 379                 ctl->server.protocol = P_IMAP;
 380             else if (strcasecmp(optarg,"etrn") == 0)
 381                 ctl->server.protocol = P_ETRN;
 382             else if (strcasecmp(optarg,"odmr") == 0)
 383                 ctl->server.protocol = P_ODMR;
 384             else {
 385                 fprintf(stderr,GT_("Invalid protocol `%s' specified.\n"), optarg);
 386                 errflag++;
 387             }
 388             break;
 389         case 'U':
 390             ctl->server.uidl = FLAG_TRUE;
 391             break;
 392         case LA_IDLE:
 393             ctl->idle = FLAG_TRUE;
 394             break;
 395         case 'P':
 396             ctl->server.service = optarg;
 397             break;
 398         case LA_AUTH:
 399             if (strcmp(optarg, "password") == 0)
 400                 ctl->server.authenticate = A_PASSWORD;
 401             else if (strcmp(optarg, "kerberos") == 0)
 402 #ifdef KERBEROS_V5
 403                 ctl->server.authenticate = A_KERBEROS_V5;
 404 #else
 405                 ctl->server.authenticate = A_KERBEROS_V4;
 406 #endif /* KERBEROS_V5 */
 407             else if (strcmp(optarg, "kerberos_v5") == 0)
 408                 ctl->server.authenticate = A_KERBEROS_V5;
 409             else if (strcmp(optarg, "kerberos_v4") == 0)
 410                 ctl->server.authenticate = A_KERBEROS_V4;
 411             else if (strcmp(optarg, "ssh") == 0)
 412                 ctl->server.authenticate = A_SSH;
 413             else if (strcasecmp(optarg, "external") == 0)
 414                 ctl->server.authenticate = A_EXTERNAL;
 415             else if (strcmp(optarg, "otp") == 0)
 416                 ctl->server.authenticate = A_OTP;
 417             else if (strcmp(optarg, "opie") == 0)
 418                 ctl->server.authenticate = A_OTP;
 419             else if (strcmp(optarg, "ntlm") == 0)
 420                 ctl->server.authenticate = A_NTLM;
 421             else if (strcmp(optarg, "cram") == 0)
 422                 ctl->server.authenticate = A_CRAM_MD5;
 423             else if (strcmp(optarg, "cram-md5") == 0)
 424                 ctl->server.authenticate = A_CRAM_MD5;
 425             else if (strcmp(optarg, "gssapi") == 0)
 426                 ctl->server.authenticate = A_GSSAPI;
 427             else if (strcmp(optarg, "any") == 0)
 428                 ctl->server.authenticate = A_ANY;
 429             else if (strcmp(optarg, "msn") == 0)
 430                 ctl->server.authenticate = A_MSN;
 431             else {
 432                 fprintf(stderr,GT_("Invalid authentication `%s' specified.\n"), optarg);
 433                 errflag++;
 434             }
 435             break;
 436         case 't':
 437             ctl->server.timeout = xatoi(optarg, &errflag);
 438             if (ctl->server.timeout == 0)
 439                 ctl->server.timeout = -1;
 440             break;
 441         case 'E':
 442             ctl->server.envelope = xstrdup(optarg);
 443             break;
 444         case 'Q':
 445             ctl->server.qvirtual = xstrdup(optarg);
 446             break;
 447
 448         case 'u':
 449             ctl->remotename = xstrdup(optarg);
 450             break;
 451         case 'a':
 452             ctl->fetchall = FLAG_TRUE;
 453             break;
 454         case 'K':
 455             ctl->keep = FLAG_FALSE;
 456             break;
 457         case 'k':
 458             ctl->keep = FLAG_TRUE;
 459             break;
 460         case 'F':
 461             ctl->flush = FLAG_TRUE;
 462             break;
 463         case LA_LIMITFLUSH:
 464             ctl->limitflush = FLAG_TRUE;
 465             break;
 466         case 'n':
 467             ctl->rewrite = FLAG_FALSE;
 468             break;
 469         case 'l':
 470             c = xatoi(optarg, &errflag);
 471             ctl->limit = NUM_VALUE_IN(c);
 472             break;
 473         case 'r':
 474             buf = xstrdup(optarg);
 475             cp = strtok(buf, ",");
 476             do {
 477                 save_str(&ctl->mailboxes, cp, 0);
 478             } while
 479                 ((cp = strtok((char *)NULL, ",")));
 480             free(buf);
 481             break;
 482         case 'S':
 483             buf = xstrdup(optarg);
 484             cp = strtok(buf, ",");
 485             do {
 486                 save_str(&ctl->smtphunt, cp, TRUE);
 487             } while
 488                 ((cp = strtok((char *)NULL, ",")));
 489             free(buf);
 490             ocount++;
 491             break;
 492         case LA_FETCHDOMAINS:
 493             buf = xstrdup(optarg);
 494             cp = strtok(buf, ",");
 495             do {
 496                 save_str(&ctl->domainlist, cp, TRUE);
 497             } while
 498                 ((cp = strtok((char *)NULL, ",")));
 499             free(buf);
 500             break;
 501         case 'D':
 502             ctl->smtpaddress = xstrdup(optarg);
 503             break;
 504         case LA_SMTPNAME:
 505           ctl->smtpname = xstrdup(optarg);
 506           break;
 507         case 'Z':
 508             buf = xstrdup(optarg);
 509             cp = strtok(buf, ",");
 510             do {
 511                 struct idlist   *idp = save_str(&ctl->antispam, NULL, 0);;
 512
 513                 idp->val.status.num = xatoi(cp, &errflag);
 514             } while
 515                 ((cp = strtok((char *)NULL, ",")));
 516             free(buf);
 517             break;
 518         case 'b':
 519             c = xatoi(optarg, &errflag);
 520             ctl->batchlimit = NUM_VALUE_IN(c);
 521             break;
 522         case 'B':
 523             c = xatoi(optarg, &errflag);
 524             ctl->fetchlimit = NUM_VALUE_IN(c);
 525             break;
 526         case LA_FETCHSIZELIMIT:
 527             c = xatoi(optarg, &errflag);
 528             ctl->fetchsizelimit = NUM_VALUE_IN(c);
 529             break;
 530         case LA_FASTUIDL:
 531             c = xatoi(optarg, &errflag);
 532             ctl->fastuidl = NUM_VALUE_IN(c);
 533             break;
 534         case 'e':
 535             c = xatoi(optarg, &errflag);
 536             ctl->expunge = NUM_VALUE_IN(c);
 537             break;
 538         case 'm':
 539             ctl->mda = xstrdup(optarg);
 540             ocount++;
 541             break;
 542         case LA_BSMTP:
 543             ctl->bsmtp = prependdir (optarg, currentwd);
 544             ocount++;
 545             break;
 546         case LA_LMTP:
 547             ctl->listener = LMTP_MODE;
 548             break;
 549
 550 #ifdef CAN_MONITOR
 551         case 'I':
 552             interface_parse(optarg, &ctl->server);
 553             break;
 554         case 'M':
 555             ctl->server.monitor = xstrdup(optarg);
 556             break;
 557 #endif /* CAN_MONITOR */
 558         case LA_PLUGIN:
 559             ctl->server.plugin = xstrdup(optarg);
 560             break;
 561         case LA_PLUGOUT:
 562             ctl->server.plugout = xstrdup(optarg);
 563             break;
 564
 565 #ifdef SSL_ENABLE
 566         case LA_SSL:
 567             ctl->use_ssl = FLAG_TRUE;
 568             break;
 569
 570         case LA_SSLKEY:
 571             ctl->sslkey = prependdir (optarg, currentwd);
 572             break;
 573
 574         case LA_SSLCERT:
 575             ctl->sslcert = prependdir (optarg, currentwd);
 576             break;
 577
 578         case LA_SSLPROTO:
 579             ctl->sslproto = xstrdup(optarg);
 580             break;
 581
 582         case LA_SSLCERTCK:
 583             ctl->sslcertck = FLAG_TRUE;
 584             break;
 585
 586         case LA_SSLCERTFILE:
 587             ctl->sslcertfile = prependdir(optarg, currentwd);
 588             break;
 589
 590         case LA_SSLCERTPATH:
 591             ctl->sslcertpath = prependdir(optarg, currentwd);
 592             break;
 593
 594         case LA_SSLCOMMONNAME:
 595             ctl->sslcommonname = xstrdup(optarg);
 596             break;
 597
 598         case LA_SSLFINGERPRINT:
 599             ctl->sslfingerprint = xstrdup(optarg);
 600             break;
 601 #endif
 602
 603         case LA_PRINCIPAL:
 604             ctl->server.principal = xstrdup(optarg);
 605             break;
 606
 607         case 'y':
 608             yydebug = TRUE;
 609             break;
 610
 611         case 'w':
 612             c = xatoi(optarg, &errflag);
 613             ctl->warnings = NUM_VALUE_IN(c);
 614             break;
 615
 616         case LA_CONFIGDUMP:
 617             configdump = TRUE;
 618             break;
 619
 620         case LA_SYSLOG:
 621             rctl->use_syslog = FLAG_TRUE;
 622             break;
 623
 624         case LA_NOSYSLOG:
 625             rctl->use_syslog = FLAG_FALSE;
 626             break;
 627
 628         case LA_TRACEPOLLS:
 629             ctl->server.tracepolls = FLAG_TRUE;
 630             break;
 631
 632         case '?':
 633         default:
 634             helpflag++;
 635         }
 636     }
 637
 638     if (errflag || ocount > 1 || helpflag) {
 639         /* squawk if syntax errors were detected */
 640 #define P(s)    fputs(s, helpflag ? stdout : stderr)
 641         P(GT_("usage:  fetchmail [options] [server ...]\n"));
 642         P(GT_("  Options are as follows:\n"));
 643         P(GT_("  -?, --help        display this option help\n"));
 644         P(GT_("  -V, --version     display version info\n"));
 645
 646         P(GT_("  -c, --check       check for messages without fetching\n"));
 647         P(GT_("  -s, --silent      work silently\n"));
 648         P(GT_("  -v, --verbose     work noisily (diagnostic output)\n"));
 649         P(GT_("  -d, --daemon      run as a daemon once per n seconds\n"));
 650         P(GT_("  -N, --nodetach    don't detach daemon process\n"));
 651         P(GT_("  -q, --quit        kill daemon process\n"));
 652         P(GT_("  -L, --logfile     specify logfile name\n"));
 653         P(GT_("      --syslog      use syslog(3) for most messages when running as a daemon\n"));
 654         P(GT_("      --invisible   don't write Received & enable host spoofing\n"));
 655         P(GT_("  -f, --fetchmailrc specify alternate run control file\n"));
 656         P(GT_("  -i, --idfile      specify alternate UIDs file\n"));
 657         P(GT_("      --pidfile     specify alternate PID (lock) file\n"));
 658         P(GT_("      --postmaster  specify recipient of last resort\n"));
 659         P(GT_("      --nobounce    redirect bounces from user to postmaster.\n"));
 660         P(GT_("      --nosoftbounce fetchmail deletes permanently undeliverable messages.\n"));
 661         P(GT_("      --softbounce  keep permanently undeliverable messages on server (default).\n"));
 662 #ifdef CAN_MONITOR
 663         P(GT_("  -I, --interface   interface required specification\n"));
 664         P(GT_("  -M, --monitor     monitor interface for activity\n"));
 665 #endif
 666 #if defined( SSL_ENABLE )
 667         P(GT_("      --ssl         enable ssl encrypted session\n"));
 668         P(GT_("      --sslkey      ssl private key file\n"));
 669         P(GT_("      --sslcert     ssl client certificate\n"));
 670         P(GT_("      --sslcertck   do strict server certificate check (recommended)\n"));
 671         P(GT_("      --sslcertfile path to trusted-CA ssl certificate file\n"));
 672         P(GT_("      --sslcertpath path to trusted-CA ssl certificate directory\n"));
 673         P(GT_("      --sslcommonname  expect this CommonName from server (discouraged)\n"));
 674         P(GT_("      --sslfingerprint fingerprint that must match that of the server's cert.\n"));
 675         P(GT_("      --sslproto    force ssl protocol (SSL2/SSL3/TLS1)\n"));
 676 #endif
 677         P(GT_("      --plugin      specify external command to open connection\n"));
 678         P(GT_("      --plugout     specify external command to open smtp connection\n"));
 679         P(GT_("      --bad-header {reject|accept}\n"
 680               "                    specify policy for handling messages with bad headers\n"));
 681
 682         P(GT_("  -p, --protocol    specify retrieval protocol (see man page)\n"));
 683 #ifdef HAVE_LIBPWMD
 684         P(GT_("  -C, --pwmd-socket pwmd socket path (~/.pwmd/socket)\n"));
 685         P(GT_("  -G, --pwmd-file   filename to use on the pwmd server\n"));
 686         P(GT_("  -O, --pinentry-timeout   seconds until pinentry is canceled\n"));
 687 #endif
 688
 689         P(GT_("  -U, --uidl        force the use of UIDLs (pop3 only)\n"));
 690         P(GT_("      --port        TCP port to connect to (obsolete, use --service)\n"));
 691         P(GT_("  -P, --service     TCP service to connect to (can be numeric TCP port)\n"));
 692         P(GT_("      --auth        authentication type (password/kerberos/ssh/otp)\n"));
 693         P(GT_("  -t, --timeout     server nonresponse timeout\n"));
 694         P(GT_("  -E, --envelope    envelope address header\n"));
 695         P(GT_("  -Q, --qvirtual    prefix to remove from local user id\n"));
 696         P(GT_("      --principal   mail service principal\n"));
 697         P(GT_("      --tracepolls  add poll-tracing information to Received header\n"));
 698
 699         P(GT_("  -u, --username    specify users's login on server\n"));
 700         P(GT_("  -a, --[fetch]all  retrieve old and new messages\n"));
 701         P(GT_("  -K, --nokeep      delete new messages after retrieval\n"));
 702         P(GT_("  -k, --keep        save new messages after retrieval\n"));
 703         P(GT_("  -F, --flush       delete old messages from server\n"));
 704         P(GT_("      --limitflush  delete oversized messages\n"));
 705         P(GT_("  -n, --norewrite   don't rewrite header addresses\n"));
 706         P(GT_("  -l, --limit       don't fetch messages over given size\n"));
 707         P(GT_("  -w, --warnings    interval between warning mail notification\n"));
 708
 709         P(GT_("  -S, --smtphost    set SMTP forwarding host\n"));
 710         P(GT_("      --fetchdomains fetch mail for specified domains\n"));
 711         P(GT_("  -D, --smtpaddress set SMTP delivery domain to use\n"));
 712         P(GT_("      --smtpname    set SMTP full name username@domain\n"));
 713         P(GT_("  -Z, --antispam,   set antispam response values\n"));
 714         P(GT_("  -b, --batchlimit  set batch limit for SMTP connections\n"));
 715         P(GT_("  -B, --fetchlimit  set fetch limit for server connections\n"));
 716         P(GT_("      --fetchsizelimit set fetch message size limit\n"));
 717         P(GT_("      --fastuidl    do a binary search for UIDLs\n"));
 718         P(GT_("  -e, --expunge     set max deletions between expunges\n"));
 719         P(GT_("  -m, --mda         set MDA to use for forwarding\n"));
 720         P(GT_("      --bsmtp       set output BSMTP file\n"));
 721         P(GT_("      --lmtp        use LMTP (RFC2033) for delivery\n"));
 722         P(GT_("  -r, --folder      specify remote folder name\n"));
 723         P(GT_("      --showdots    show progress dots even in logfiles\n"));
 724 #undef P
 725         /* undocumented:
 726          * --configdump (internal use by fetchmailconf, dumps
 727          *               configuration as Python source code)
 728          * --yydebug    (developer use, enables parser debugging) */
 729
 730         if (helpflag)
 731             exit(PS_SUCCESS);
 732         else
 733             exit(PS_SYNTAX);
 734     }
 735
 736     return(optind);
 737 }
 738
 739 /* options.c ends here */