2 * options.c - handles option processing for PPP.
4 * Copyright (c) 1984-2000 Carnegie Mellon University. All rights reserved.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in
15 * the documentation and/or other materials provided with the
18 * 3. The name "Carnegie Mellon University" must not be used to
19 * endorse or promote products derived from this software without
20 * prior written permission. For permission or any legal
21 * details, please contact
22 * Office of Technology Transfer
23 * Carnegie Mellon University
25 * Pittsburgh, PA 15213-3890
26 * (412) 268-4387, fax: (412) 268-7395
27 * tech-transfer@andrew.cmu.edu
29 * 4. Redistributions of any form whatsoever must retain the following
31 * "This product includes software developed by Computing Services
32 * at Carnegie Mellon University (http://www.cmu.edu/computing/)."
34 * CARNEGIE MELLON UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO
35 * THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
36 * AND FITNESS, IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY BE LIABLE
37 * FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
38 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
39 * AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
40 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
43 #define RCSID "$Id: options.c,v 1.102 2008/06/15 06:53:06 paulus Exp $"
61 * There have been 3 or 4 different names for this in libpcap CVS, but
62 * this seems to be what they have settled on...
63 * For older versions of libpcap, use DLT_PPP - but that means
64 * we lose the inbound and outbound qualifiers.
67 #ifdef DLT_PPP_WITHDIRECTION
68 #define DLT_PPP_PPPD DLT_PPP_WITHDIRECTION
70 #define DLT_PPP_PPPD DLT_PPP
73 #endif /* PPP_FILTER */
76 #include "pathnames.h"
78 #if defined(ultrix) || defined(NeXT)
79 char *strdup
__P((char *));
81 bool tx_only
; /* JYWeng 20031216: idle time counting on tx traffic */
83 static const char rcsid
[] = RCSID
;
86 struct option_value
*next
;
92 * Option variables and default values.
94 bool nochecktime
= 0; /* Don't check time */
95 int debug
= 0; /* Debug flag */
96 int kdebugflag
= 0; /* Tell kernel to print debug messages */
97 int default_device
= 1; /* Using /dev/tty or equivalent */
98 char devnam
[MAXPATHLEN
]; /* Device name */
99 bool nodetach
= 0; /* Don't detach from controlling tty */
100 bool updetach
= 0; /* Detach once link is up */
101 int maxconnect
= 0; /* Maximum connect time */
102 char user
[MAXNAMELEN
]; /* Username for PAP */
103 char passwd
[MAXSECRETLEN
]; /* Password for PAP */
104 bool persist
= 0; /* Reopen link after it goes down */
105 char our_name
[MAXNAMELEN
]; /* Our name for authentication purposes */
106 bool demand
= 0; /* do dial-on-demand */
107 char *ipparam
= NULL
; /* Extra parameter for ip up/down scripts */
108 char *chapseccustom
= NULL
; /* Custom chap-secrets file */
110 int idle_time_limit
= 0; /* Disconnect if idle for this many seconds */
111 int holdoff
= 30; /* # seconds to pause before reconnecting */
112 bool holdoff_specified
; /* true if a holdoff value has been given */
113 int log_to_fd
= 1; /* send log messages to this fd too */
114 bool log_default
= 1; /* log_to_fd is default (stdout) */
115 int maxfail
= 10; /* max # of unsuccessful connection attempts */
116 char linkname
[MAXPATHLEN
]; /* logical name for link */
117 bool tune_kernel
; /* may alter kernel settings */
118 int connect_delay
= 1000; /* wait this many ms after connect script */
119 int req_unit
= -1; /* requested interface unit */
120 int req_minunit
= -1; /* requested minimal interface unit */
121 char path_ipup
[MAXPATHLEN
]; /* pathname of ip-up script */
122 char path_ipdown
[MAXPATHLEN
];/* pathname of ip-down script */
123 bool multilink
= 0; /* Enable multilink operation */
124 char *bundle_name
= NULL
; /* bundle name for multilink */
125 bool dump_options
; /* print out option values */
126 bool dryrun
; /* print out option values and exit */
127 char *domain
; /* domain name set by domain option */
128 int child_wait
= 5; /* # seconds to wait for children at exit */
131 unsigned int maxoctets
= 0; /* default - no limit */
132 int maxoctets_dir
= 0; /* default - sum of traffic */
133 int maxoctets_timeout
= 1; /* default 1 second */
137 extern option_t auth_options
[];
138 extern struct stat devstat
;
141 struct bpf_program pass_filter
;/* Filter program for packets to pass */
142 struct bpf_program active_filter
; /* Filter program for link-active pkts */
145 char *current_option
; /* the name of the option being parsed */
146 int privileged_option
; /* set iff the current option came from root */
147 char *option_source
; /* string saying where the option came from */
148 int option_priority
= OPRIO_CFGFILE
; /* priority of the current options */
149 bool devnam_fixed
; /* can no longer change device name */
151 static int logfile_fd
= -1; /* fd opened for log file */
152 static char logfile_name
[MAXPATHLEN
]; /* name of log file */
157 static int setdomain
__P((char **));
158 static int readfile
__P((char **));
159 static int callfile
__P((char **));
160 static int showversion
__P((char **));
161 static int showhelp
__P((char **));
162 static void usage
__P((void));
163 static int setlogfile
__P((char **));
165 static int loadplugin
__P((char **));
169 static int setpassfilter
__P((char **));
170 static int setactivefilter
__P((char **));
174 static int setmodir
__P((char **));
177 static option_t
*find_option
__P((const char *name
));
178 static int process_option
__P((option_t
*, char *, char **));
179 static int n_arguments
__P((option_t
*));
180 static int number_option
__P((char *, u_int32_t
*, int));
183 * Structure to store extra lists of options.
187 struct option_list
*next
;
190 static struct option_list
*extra_options
= NULL
;
195 option_t general_options
[] = {
196 { "nochecktime", o_bool
, &nochecktime
,
197 "Don't check time", OPT_PRIO
| 1 },
198 { "debug", o_int
, &debug
,
199 "Increase debugging level", OPT_INC
| OPT_NOARG
| 1 },
200 { "-d", o_int
, &debug
,
201 "Increase debugging level",
202 OPT_ALIAS
| OPT_INC
| OPT_NOARG
| 1 },
204 { "kdebug", o_int
, &kdebugflag
,
205 "Set kernel driver debug level", OPT_PRIO
},
207 { "nodetach", o_bool
, &nodetach
,
208 "Don't detach from controlling tty", OPT_PRIO
| 1 },
209 { "-detach", o_bool
, &nodetach
,
210 "Don't detach from controlling tty", OPT_ALIAS
| OPT_PRIOSUB
| 1 },
211 { "updetach", o_bool
, &updetach
,
212 "Detach from controlling tty once link is up",
213 OPT_PRIOSUB
| OPT_A2CLR
| 1, &nodetach
},
215 { "holdoff", o_int
, &holdoff
,
216 "Set time in seconds before retrying connection",
217 OPT_PRIO
, &holdoff_specified
},
219 { "idle", o_int
, &idle_time_limit
,
220 "Set time in seconds before disconnecting idle link", OPT_PRIO
},
222 { "maxconnect", o_int
, &maxconnect
,
223 "Set connection time limit",
224 OPT_PRIO
| OPT_LLIMIT
| OPT_NOINCR
| OPT_ZEROINF
},
226 { "domain", o_special
, (void *)setdomain
,
227 "Add given domain name to hostname",
228 OPT_PRIO
| OPT_PRIV
| OPT_A2STRVAL
, &domain
},
230 { "file", o_special
, (void *)readfile
,
231 "Take options from a file", OPT_NOPRINT
},
232 { "call", o_special
, (void *)callfile
,
233 "Take options from a privileged file", OPT_NOPRINT
},
235 { "persist", o_bool
, &persist
,
236 "Keep on reopening connection after close", OPT_PRIO
| 1 },
237 { "nopersist", o_bool
, &persist
,
238 "Turn off persist option", OPT_PRIOSUB
},
240 { "demand", o_bool
, &demand
,
241 "Dial on demand", OPT_INITONLY
| 1, &persist
},
243 { "--version", o_special_noarg
, (void *)showversion
,
244 "Show version number" },
245 { "--help", o_special_noarg
, (void *)showhelp
,
246 "Show brief listing of options" },
247 { "-h", o_special_noarg
, (void *)showhelp
,
248 "Show brief listing of options", OPT_ALIAS
},
250 { "logfile", o_special
, (void *)setlogfile
,
251 "Append log messages to this file",
252 OPT_PRIO
| OPT_A2STRVAL
| OPT_STATIC
, &logfile_name
},
253 { "logfd", o_int
, &log_to_fd
,
254 "Send log messages to this file descriptor",
255 OPT_PRIOSUB
| OPT_A2CLR
, &log_default
},
256 { "nolog", o_int
, &log_to_fd
,
257 "Don't send log messages to any file",
258 OPT_PRIOSUB
| OPT_NOARG
| OPT_VAL(-1) },
259 { "nologfd", o_int
, &log_to_fd
,
260 "Don't send log messages to any file descriptor",
261 OPT_PRIOSUB
| OPT_ALIAS
| OPT_NOARG
| OPT_VAL(-1) },
263 { "linkname", o_string
, linkname
,
264 "Set logical name for link",
265 OPT_PRIO
| OPT_PRIV
| OPT_STATIC
, NULL
, MAXPATHLEN
},
267 { "maxfail", o_int
, &maxfail
,
268 "Maximum number of unsuccessful connection attempts to allow",
271 { "ktune", o_bool
, &tune_kernel
,
272 "Alter kernel settings as necessary", OPT_PRIO
| 1 },
273 { "noktune", o_bool
, &tune_kernel
,
274 "Don't alter kernel settings", OPT_PRIOSUB
},
276 { "connect-delay", o_int
, &connect_delay
,
277 "Maximum time (in ms) to wait after connect script finishes",
280 { "unit", o_int
, &req_unit
,
281 "PPP interface unit number to use if possible",
282 OPT_PRIO
| OPT_LLIMIT
, 0, 0 },
283 { "minunit", o_int
, &req_minunit
,
284 "PPP interface minimal unit number",
285 OPT_PRIO
| OPT_LLIMIT
, 0, 0 },
287 { "dump", o_bool
, &dump_options
,
288 "Print out option values after parsing all options", 1 },
289 { "dryrun", o_bool
, &dryrun
,
290 "Stop after parsing, printing, and checking options", 1 },
292 { "child-timeout", o_int
, &child_wait
,
293 "Number of seconds to wait for child processes at exit",
296 { "ip-up-script", o_string
, path_ipup
,
297 "Set pathname of ip-up script",
298 OPT_PRIV
|OPT_STATIC
, NULL
, MAXPATHLEN
},
299 { "ip-down-script", o_string
, path_ipdown
,
300 "Set pathname of ip-down script",
301 OPT_PRIV
|OPT_STATIC
, NULL
, MAXPATHLEN
},
303 #ifdef HAVE_MULTILINK
304 { "multilink", o_bool
, &multilink
,
305 "Enable multilink operation", OPT_PRIO
| 1 },
306 { "mp", o_bool
, &multilink
,
307 "Enable multilink operation", OPT_PRIOSUB
| OPT_ALIAS
| 1 },
308 { "nomultilink", o_bool
, &multilink
,
309 "Disable multilink operation", OPT_PRIOSUB
| 0 },
310 { "nomp", o_bool
, &multilink
,
311 "Disable multilink operation", OPT_PRIOSUB
| OPT_ALIAS
| 0 },
313 { "bundle", o_string
, &bundle_name
,
314 "Bundle name for multilink", OPT_PRIO
},
315 #endif /* HAVE_MULTILINK */
318 { "plugin", o_special
, (void *)loadplugin
,
319 "Load a plug-in module into pppd", OPT_PRIV
| OPT_A2LIST
},
323 { "pass-filter", o_special
, setpassfilter
,
324 "set filter for packets to pass", OPT_PRIO
},
326 { "active-filter", o_special
, setactivefilter
,
327 "set filter for active pkts", OPT_PRIO
},
331 { "maxoctets", o_int
, &maxoctets
,
332 "Set connection traffic limit",
333 OPT_PRIO
| OPT_LLIMIT
| OPT_NOINCR
| OPT_ZEROINF
},
334 { "mo", o_int
, &maxoctets
,
335 "Set connection traffic limit",
336 OPT_ALIAS
| OPT_PRIO
| OPT_LLIMIT
| OPT_NOINCR
| OPT_ZEROINF
},
337 { "mo-direction", o_special
, setmodir
,
338 "Set direction for limit traffic (sum,in,out,max)" },
339 { "mo-timeout", o_int
, &maxoctets_timeout
,
340 "Check for traffic limit every N seconds", OPT_PRIO
| OPT_LLIMIT
| 1 },
343 /* JYWeng 20031216: add for tx_only option*/
344 { "tx_only", o_bool
, &tx_only
,
345 "set idle time counting on tx_only or not", 1 },
350 #ifndef IMPLEMENTATION
351 #define IMPLEMENTATION ""
354 static char *usage_string
= "\
356 Usage: %s [ options ], where options are:\n\
357 <device> Communicate over the named device\n\
358 <speed> Set the baud rate to <speed>\n\
359 <loc>:<rem> Set the local and/or remote interface IP\n\
360 addresses. Either one may be omitted.\n\
361 asyncmap <n> Set the desired async map to hex <n>\n\
362 auth Require authentication from peer\n\
363 connect <p> Invoke shell command <p> to set up the serial line\n\
364 crtscts Use hardware RTS/CTS flow control\n\
365 defaultroute Add default route through interface\n\
366 file <f> Take options from file <f>\n\
367 modem Use modem control lines\n\
368 mru <n> Set MRU value to <n> for negotiation\n\
369 See pppd(8) for more options.\n\
373 * parse_args - parse a string of arguments from the command line.
376 parse_args(argc
, argv
)
384 privileged_option
= privileged
;
385 option_source
= "command line";
386 option_priority
= OPRIO_CMDLINE
;
390 opt
= find_option(arg
);
392 option_error("unrecognized option '%s'", arg
);
396 n
= n_arguments(opt
);
398 option_error("too few parameters for option %s", arg
);
401 if (!process_option(opt
, arg
, argv
))
410 * options_from_file - Read a string of options from a file,
411 * and interpret them.
414 options_from_file(filename
, must_exist
, check_prot
, priv
)
421 int i
, newline
, ret
, err
;
427 char args
[MAXARGS
][MAXWORDLEN
];
428 char cmd
[MAXWORDLEN
];
431 if (check_prot
&& seteuid(getuid()) == -1) {
432 option_error("unable to drop privileges to open %s: %m", filename
);
435 f
= fopen(filename
, "r");
437 if (check_prot
&& seteuid(euid
) == -1)
438 fatal("unable to regain privileges");
442 if (err
!= ENOENT
&& err
!= ENOTDIR
)
443 warn("Warning: can't open options file %s: %m", filename
);
446 option_error("Can't open options file %s: %m", filename
);
450 oldpriv
= privileged_option
;
451 privileged_option
= priv
;
452 oldsource
= option_source
;
453 option_source
= strdup(filename
);
454 if (option_source
== NULL
)
455 option_source
= "file";
457 while (getword(f
, cmd
, &newline
, filename
)) {
458 opt
= find_option(cmd
);
460 option_error("In file %s: unrecognized option '%s'",
464 n
= n_arguments(opt
);
465 for (i
= 0; i
< n
; ++i
) {
466 if (!getword(f
, args
[i
], &newline
, filename
)) {
468 "In file %s: too few parameters for option '%s'",
474 if (!process_option(opt
, cmd
, argv
))
481 privileged_option
= oldpriv
;
482 option_source
= oldsource
;
487 * options_from_user - See if the use has a ~/.ppprc file,
488 * and if so, interpret options from it.
493 char *user
, *path
, *file
;
498 pw
= getpwuid(getuid());
499 if (pw
== NULL
|| (user
= pw
->pw_dir
) == NULL
|| user
[0] == 0)
501 file
= _PATH_USEROPT
;
502 pl
= strlen(user
) + strlen(file
) + 2;
505 novm("init file name");
506 slprintf(path
, pl
, "%s/%s", user
, file
);
507 option_priority
= OPRIO_CFGFILE
;
508 ret
= options_from_file(path
, 0, 1, privileged
);
514 * options_for_tty - See if an options file exists for the serial
515 * device, and if so, interpret options from it.
516 * We only allow the per-tty options file to override anything from
517 * the command line if it is something that the user can't override
518 * once it has been set by root; this is done by giving configuration
519 * files a lower priority than the command line.
524 char *dev
, *path
, *p
;
529 if ((p
= strstr(dev
, "/dev/")) != NULL
)
531 if (dev
[0] == 0 || strcmp(dev
, "tty") == 0)
532 return 1; /* don't look for /etc/ppp/options.tty */
533 pl
= strlen(_PATH_TTYOPT
) + strlen(dev
) + 1;
536 novm("tty init file name");
537 slprintf(path
, pl
, "%s%s", _PATH_TTYOPT
, dev
);
538 /* Turn slashes into dots, for Solaris case (e.g. /dev/term/a) */
539 for (p
= path
+ strlen(_PATH_TTYOPT
); *p
!= 0; ++p
)
542 option_priority
= OPRIO_CFGFILE
;
543 ret
= options_from_file(path
, 0, 0, 1);
549 * options_from_list - process a string of options in a wordlist.
552 options_from_list(w
, priv
)
561 privileged_option
= priv
;
562 option_source
= "secrets file";
563 option_priority
= OPRIO_SECFILE
;
566 opt
= find_option(w
->word
);
568 option_error("In secrets file: unrecognized option '%s'",
572 n
= n_arguments(opt
);
574 for (i
= 0; i
< n
; ++i
) {
578 "In secrets file: too few parameters for option '%s'",
584 if (!process_option(opt
, w0
->word
, argv
))
595 * match_option - see if this option matches an option_t structure.
598 match_option(name
, opt
, dowild
)
603 int (*match
) __P((char *, char **, int));
605 if (dowild
!= (opt
->type
== o_wild
))
608 return strcmp(name
, opt
->name
) == 0;
609 match
= (int (*) __P((char *, char **, int))) opt
->addr
;
610 return (*match
)(name
, NULL
, 0);
614 * find_option - scan the option lists for the various protocols
615 * looking for an entry with the given name.
616 * This could be optimized by using a hash table.
623 struct option_list
*list
;
626 for (dowild
= 0; dowild
<= 1; ++dowild
) {
627 for (opt
= general_options
; opt
->name
!= NULL
; ++opt
)
628 if (match_option(name
, opt
, dowild
))
630 for (opt
= auth_options
; opt
->name
!= NULL
; ++opt
)
631 if (match_option(name
, opt
, dowild
))
633 for (list
= extra_options
; list
!= NULL
; list
= list
->next
)
634 for (opt
= list
->options
; opt
->name
!= NULL
; ++opt
)
635 if (match_option(name
, opt
, dowild
))
637 for (opt
= the_channel
->options
; opt
->name
!= NULL
; ++opt
)
638 if (match_option(name
, opt
, dowild
))
640 for (i
= 0; protocols
[i
] != NULL
; ++i
)
641 if ((opt
= protocols
[i
]->options
) != NULL
)
642 for (; opt
->name
!= NULL
; ++opt
)
643 if (match_option(name
, opt
, dowild
))
650 * process_option - process one new-style option.
653 process_option(opt
, cmd
, argv
)
661 int (*parser
) __P((char **));
662 int (*wildp
) __P((char *, char **, int));
663 char *optopt
= (opt
->type
== o_wild
)? "": " option";
664 int prio
= option_priority
;
665 option_t
*mainopt
= opt
;
667 current_option
= opt
->name
;
668 if ((opt
->flags
& OPT_PRIVFIX
) && privileged_option
)
670 while (mainopt
->flags
& OPT_PRIOSUB
)
672 if (mainopt
->flags
& OPT_PRIO
) {
673 if (prio
< mainopt
->priority
) {
674 /* new value doesn't override old */
675 if (prio
== OPRIO_CMDLINE
&& mainopt
->priority
> OPRIO_ROOT
) {
676 option_error("%s%s set in %s cannot be overridden\n",
677 opt
->name
, optopt
, mainopt
->source
);
682 if (prio
> OPRIO_ROOT
&& mainopt
->priority
== OPRIO_CMDLINE
)
683 warn("%s%s from %s overrides command line",
684 opt
->name
, optopt
, option_source
);
687 if ((opt
->flags
& OPT_INITONLY
) && phase
!= PHASE_INITIALIZE
) {
688 option_error("%s%s cannot be changed after initialization",
692 if ((opt
->flags
& OPT_PRIV
) && !privileged_option
) {
693 option_error("using the %s%s requires root privilege",
697 if ((opt
->flags
& OPT_ENABLE
) && *(bool *)(opt
->addr2
) == 0) {
698 option_error("%s%s is disabled", opt
->name
, optopt
);
701 if ((opt
->flags
& OPT_DEVEQUIV
) && devnam_fixed
) {
702 option_error("the %s%s may not be changed in %s",
703 opt
->name
, optopt
, option_source
);
709 v
= opt
->flags
& OPT_VALUE
;
710 *(bool *)(opt
->addr
) = v
;
711 if (opt
->addr2
&& (opt
->flags
& OPT_A2COPY
))
712 *(bool *)(opt
->addr2
) = v
;
713 else if (opt
->addr2
&& (opt
->flags
& OPT_A2CLR
))
714 *(bool *)(opt
->addr2
) = 0;
715 else if (opt
->addr2
&& (opt
->flags
& OPT_A2CLRB
))
716 *(u_char
*)(opt
->addr2
) &= ~v
;
717 else if (opt
->addr2
&& (opt
->flags
& OPT_A2OR
))
718 *(u_char
*)(opt
->addr2
) |= v
;
723 if ((opt
->flags
& OPT_NOARG
) == 0) {
724 if (!int_option(*argv
, &iv
))
726 if ((((opt
->flags
& OPT_LLIMIT
) && iv
< opt
->lower_limit
)
727 || ((opt
->flags
& OPT_ULIMIT
) && iv
> opt
->upper_limit
))
728 && !((opt
->flags
& OPT_ZEROOK
&& iv
== 0))) {
729 char *zok
= (opt
->flags
& OPT_ZEROOK
)? " zero or": "";
730 switch (opt
->flags
& OPT_LIMITS
) {
732 option_error("%s value must be%s >= %d",
733 opt
->name
, zok
, opt
->lower_limit
);
736 option_error("%s value must be%s <= %d",
737 opt
->name
, zok
, opt
->upper_limit
);
740 option_error("%s value must be%s between %d and %d",
741 opt
->name
, zok
, opt
->lower_limit
, opt
->upper_limit
);
747 a
= opt
->flags
& OPT_VALUE
;
749 a
-= 256; /* sign extend */
751 if (opt
->flags
& OPT_INC
)
752 iv
+= *(int *)(opt
->addr
);
753 if ((opt
->flags
& OPT_NOINCR
) && !privileged_option
) {
754 int oldv
= *(int *)(opt
->addr
);
755 if ((opt
->flags
& OPT_ZEROINF
) ?
756 (oldv
!= 0 && (iv
== 0 || iv
> oldv
)) : (iv
> oldv
)) {
757 option_error("%s value cannot be increased", opt
->name
);
761 *(int *)(opt
->addr
) = iv
;
762 if (opt
->addr2
&& (opt
->flags
& OPT_A2COPY
))
763 *(int *)(opt
->addr2
) = iv
;
767 if (opt
->flags
& OPT_NOARG
) {
768 v
= opt
->flags
& OPT_VALUE
;
771 } else if (!number_option(*argv
, &v
, 16))
773 if (opt
->flags
& OPT_OR
)
774 v
|= *(u_int32_t
*)(opt
->addr
);
775 *(u_int32_t
*)(opt
->addr
) = v
;
776 if (opt
->addr2
&& (opt
->flags
& OPT_A2COPY
))
777 *(u_int32_t
*)(opt
->addr2
) = v
;
781 if (opt
->flags
& OPT_STATIC
) {
782 strlcpy((char *)(opt
->addr
), *argv
, opt
->upper_limit
);
786 novm("option argument");
787 *(char **)(opt
->addr
) = sv
;
791 case o_special_noarg
:
793 parser
= (int (*) __P((char **))) opt
->addr
;
794 if (!(*parser
)(argv
))
796 if (opt
->flags
& OPT_A2LIST
) {
797 struct option_value
*ovp
, *pp
;
799 ovp
= malloc(sizeof(*ovp
) + strlen(*argv
));
801 strcpy(ovp
->value
, *argv
);
802 ovp
->source
= option_source
;
804 if (opt
->addr2
== NULL
) {
807 for (pp
= opt
->addr2
; pp
->next
!= NULL
; pp
= pp
->next
)
816 wildp
= (int (*) __P((char *, char **, int))) opt
->addr
;
817 if (!(*wildp
)(cmd
, argv
, 1))
823 * If addr2 wasn't used by any flag (OPT_A2COPY, etc.) but is set,
824 * treat it as a bool and set/clear it based on the OPT_A2CLR bit.
826 if (opt
->addr2
&& (opt
->flags
& (OPT_A2COPY
|OPT_ENABLE
827 |OPT_A2PRINTER
|OPT_A2STRVAL
|OPT_A2LIST
|OPT_A2OR
)) == 0)
828 *(bool *)(opt
->addr2
) = !(opt
->flags
& OPT_A2CLR
);
830 mainopt
->source
= option_source
;
831 mainopt
->priority
= prio
;
832 mainopt
->winner
= opt
- mainopt
;
838 * override_value - if the option priorities would permit us to
839 * override the value of option, return 1 and update the priority
840 * and source of the option value. Otherwise returns 0.
843 override_value(option
, priority
, source
)
850 opt
= find_option(option
);
853 while (opt
->flags
& OPT_PRIOSUB
)
855 if ((opt
->flags
& OPT_PRIO
) && priority
< opt
->priority
)
857 opt
->priority
= priority
;
858 opt
->source
= source
;
864 * n_arguments - tell how many arguments an option takes
870 return (opt
->type
== o_bool
|| opt
->type
== o_special_noarg
871 || (opt
->flags
& OPT_NOARG
))? 0: 1;
875 * add_options - add a list of options to the set we grok.
881 struct option_list
*list
;
883 list
= malloc(sizeof(*list
));
885 novm("option list entry");
887 list
->next
= extra_options
;
888 extra_options
= list
;
892 * check_options - check that options are valid and consistent.
897 if (logfile_fd
>= 0 && logfile_fd
!= log_to_fd
)
902 * print_option - print out an option and its value
905 print_option(opt
, mainopt
, printer
, arg
)
906 option_t
*opt
, *mainopt
;
907 void (*printer
) __P((void *, char *, ...));
913 if (opt
->flags
& OPT_NOPRINT
)
917 v
= opt
->flags
& OPT_VALUE
;
918 if (*(bool *)opt
->addr
!= v
)
919 /* this can happen legitimately, e.g. lock
920 option turned off for default device */
922 printer(arg
, "%s", opt
->name
);
925 v
= opt
->flags
& OPT_VALUE
;
928 i
= *(int *)opt
->addr
;
929 if (opt
->flags
& OPT_NOARG
) {
930 printer(arg
, "%s", opt
->name
);
932 if (opt
->flags
& OPT_INC
) {
933 for (; i
> v
; i
-= v
)
934 printer(arg
, " %s", opt
->name
);
936 printer(arg
, " # oops: %d not %d\n",
940 printer(arg
, "%s %d", opt
->name
, i
);
944 printer(arg
, "%s", opt
->name
);
945 if ((opt
->flags
& OPT_NOARG
) == 0)
946 printer(arg
, " %x", *(u_int32_t
*)opt
->addr
);
950 if (opt
->flags
& OPT_HIDE
) {
953 p
= (char *) opt
->addr
;
954 if ((opt
->flags
& OPT_STATIC
) == 0)
957 printer(arg
, "%s %q", opt
->name
, p
);
961 case o_special_noarg
:
963 if (opt
->type
!= o_wild
) {
964 printer(arg
, "%s", opt
->name
);
965 if (n_arguments(opt
) == 0)
969 if (opt
->flags
& OPT_A2PRINTER
) {
970 void (*oprt
) __P((option_t
*,
971 void ((*)__P((void *, char *, ...))),
973 oprt
= (void (*) __P((option_t
*,
974 void ((*)__P((void *, char *, ...))),
976 (*oprt
)(opt
, printer
, arg
);
977 } else if (opt
->flags
& OPT_A2STRVAL
) {
978 p
= (char *) opt
->addr2
;
979 if ((opt
->flags
& OPT_STATIC
) == 0)
982 } else if (opt
->flags
& OPT_A2LIST
) {
983 struct option_value
*ovp
;
985 ovp
= (struct option_value
*) opt
->addr2
;
987 printer(arg
, "%q", ovp
->value
);
988 if ((ovp
= ovp
->next
) == NULL
)
990 printer(arg
, "\t\t# (from %s)\n%s ",
991 ovp
->source
, opt
->name
);
994 printer(arg
, "xxx # [don't know how to print value]");
999 printer(arg
, "# %s value (type %d\?\?)", opt
->name
, opt
->type
);
1002 printer(arg
, "\t\t# (from %s)\n", mainopt
->source
);
1006 * print_option_list - print out options in effect from an
1010 print_option_list(opt
, printer
, arg
)
1012 void (*printer
) __P((void *, char *, ...));
1015 while (opt
->name
!= NULL
) {
1016 if (opt
->priority
!= OPRIO_DEFAULT
1017 && opt
->winner
!= (short int) -1)
1018 print_option(opt
+ opt
->winner
, opt
, printer
, arg
);
1021 } while (opt
->flags
& OPT_PRIOSUB
);
1026 * print_options - print out what options are in effect.
1029 print_options(printer
, arg
)
1030 void (*printer
) __P((void *, char *, ...));
1033 struct option_list
*list
;
1036 printer(arg
, "pppd options in effect:\n");
1037 print_option_list(general_options
, printer
, arg
);
1038 print_option_list(auth_options
, printer
, arg
);
1039 for (list
= extra_options
; list
!= NULL
; list
= list
->next
)
1040 print_option_list(list
->options
, printer
, arg
);
1041 print_option_list(the_channel
->options
, printer
, arg
);
1042 for (i
= 0; protocols
[i
] != NULL
; ++i
)
1043 print_option_list(protocols
[i
]->options
, printer
, arg
);
1047 * usage - print out a message telling how to use the program.
1052 if (phase
== PHASE_INITIALIZE
)
1053 fprintf(stderr
, usage_string
, VERSION
, progname
);
1057 * showhelp - print out usage message and exit.
1063 if (phase
== PHASE_INITIALIZE
) {
1071 * showversion - print out the version number and exit.
1077 if (phase
== PHASE_INITIALIZE
) {
1078 fprintf(stderr
, "pppd version %s\n", VERSION
);
1085 * option_error - print a message about an error in an option.
1086 * The message is logged, and also sent to
1087 * stderr if phase == PHASE_INITIALIZE.
1090 option_error
__V((char *fmt
, ...))
1095 #if defined(__STDC__)
1096 va_start(args
, fmt
);
1100 fmt
= va_arg(args
, char *);
1102 vslprintf(buf
, sizeof(buf
), fmt
, args
);
1104 if (phase
== PHASE_INITIALIZE
)
1105 fprintf(stderr
, "%s: %s\n", progname
, buf
);
1106 syslog(LOG_ERR
, "%s", buf
);
1111 * readable - check if a file is readable by the real user.
1124 if (fstat(fd
, &sbuf
) != 0)
1126 if (sbuf
.st_uid
== uid
)
1127 return sbuf
.st_mode
& S_IRUSR
;
1128 if (sbuf
.st_gid
== getgid())
1129 return sbuf
.st_mode
& S_IRGRP
;
1130 for (i
= 0; i
< ngroups
; ++i
)
1131 if (sbuf
.st_gid
== groups
[i
])
1132 return sbuf
.st_mode
& S_IRGRP
;
1133 return sbuf
.st_mode
& S_IROTH
;
1138 * Read a word from a file.
1139 * Words are delimited by white-space or by quotes (" or ').
1140 * Quotes, white-space and \ may be escaped with \.
1141 * \<newline> is ignored.
1144 getword(f
, word
, newlinep
, filename
)
1151 int quoted
, comment
;
1152 int value
, digit
, got
, n
;
1154 #define isoctal(c) ((c) >= '0' && (c) < '8')
1163 * First skip white-space and comments.
1171 * A newline means the end of a comment; backslash-newline
1172 * is ignored. Note that we cannot have escape && comment.
1184 * Ignore characters other than newline in a comment.
1190 * If this character is escaped, we have a word start.
1196 * If this is the escape character, look at the next character.
1204 * If this is the start of a comment, ignore the rest of the line.
1212 * A non-whitespace character is the start of a word.
1219 * Process characters until the end of the word.
1224 * This character is escaped: backslash-newline is ignored,
1225 * various other characters indicate particular values
1226 * as for C backslash-escapes.
1261 * \ddd octal sequence
1264 for (n
= 0; n
< 3 && isoctal(c
); ++n
) {
1265 value
= (value
<< 3) + (c
& 07);
1274 * \x<hex_string> sequence
1278 for (n
= 0; n
< 2 && isxdigit(c
); ++n
) {
1279 digit
= toupper(c
) - '0';
1281 digit
+= '0' + 10 - 'A';
1282 value
= (value
<< 4) + digit
;
1290 * Otherwise the character stands for itself.
1297 * Store the resulting character for the escape sequence.
1299 if (len
< MAXWORDLEN
-1)
1309 * Backslash starts a new escape sequence.
1318 * Not escaped: check for the start or end of a quoted
1319 * section and see if we've reached the end of the word.
1327 } else if (c
== '"' || c
== '\'') {
1331 } else if (isspace(c
) || c
== '#') {
1337 * An ordinary character: store it in the word and get another.
1339 if (len
< MAXWORDLEN
-1)
1347 * End of the word: check for errors.
1353 option_error("Error reading %s: %m", filename
);
1357 * If len is zero, then we didn't find a word before the
1363 option_error("warning: quoted word runs to end of file (%.20s...)",
1368 * Warn if the word was too long, and append a terminating null.
1370 if (len
>= MAXWORDLEN
) {
1371 option_error("warning: word in file %s too long (%.20s...)",
1373 len
= MAXWORDLEN
- 1;
1384 * number_option - parse an unsigned numeric parameter for an option.
1387 number_option(str
, valp
, base
)
1394 *valp
= strtoul(str
, &ptr
, base
);
1396 option_error("invalid numeric parameter '%s' for %s option",
1397 str
, current_option
);
1405 * int_option - like number_option, but valp is int *,
1406 * the base is assumed to be 0, and *valp is not changed
1407 * if there is an error.
1410 int_option(str
, valp
)
1416 if (!number_option(str
, &v
, 0))
1424 * The following procedures parse options.
1428 * readfile - take commands from a file.
1434 return options_from_file(*argv
, 1, 1, privileged_option
);
1438 * callfile - take commands from /etc/ppp/peers/<name>.
1439 * Name may not contain /../, start with / or ../, or end in /..
1445 char *fname
, *arg
, *p
;
1450 if (arg
[0] == '/' || arg
[0] == 0)
1453 for (p
= arg
; *p
!= 0; ) {
1454 if (p
[0] == '.' && p
[1] == '.' && (p
[2] == '/' || p
[2] == 0)) {
1458 while (*p
!= '/' && *p
!= 0)
1465 option_error("call option value may not contain .. or start with /");
1469 l
= strlen(arg
) + strlen(_PATH_PEERFILES
) + 1;
1470 if ((fname
= (char *) malloc(l
)) == NULL
)
1471 novm("call file name");
1472 slprintf(fname
, l
, "%s%s", _PATH_PEERFILES
, arg
);
1474 ok
= options_from_file(fname
, 1, 1, 1);
1482 * setpassfilter - Set the pass filter for packets
1491 pc
= pcap_open_dead(DLT_PPP_PPPD
, 65535);
1492 if (pcap_compile(pc
, &pass_filter
, *argv
, 1, netmask
) == -1) {
1493 option_error("error in pass-filter expression: %s\n",
1503 * setactivefilter - Set the active filter for packets
1506 setactivefilter(argv
)
1512 pc
= pcap_open_dead(DLT_PPP_PPPD
, 65535);
1513 if (pcap_compile(pc
, &active_filter
, *argv
, 1, netmask
) == -1) {
1514 option_error("error in active-filter expression: %s\n",
1525 * setdomain - Set domain name to append to hostname
1531 gethostname(hostname
, MAXNAMELEN
);
1534 strncat(hostname
, ".", MAXNAMELEN
- strlen(hostname
));
1535 domain
= hostname
+ strlen(hostname
);
1536 strncat(hostname
, *argv
, MAXNAMELEN
- strlen(hostname
));
1538 hostname
[MAXNAMELEN
-1] = 0;
1550 if (!privileged_option
&& seteuid(getuid()) == -1) {
1551 option_error("unable to drop permissions to open %s: %m", *argv
);
1554 fd
= open(*argv
, O_WRONLY
| O_APPEND
| O_CREAT
| O_EXCL
, 0644);
1555 if (fd
< 0 && errno
== EEXIST
)
1556 fd
= open(*argv
, O_WRONLY
| O_APPEND
);
1558 if (!privileged_option
&& seteuid(euid
) == -1)
1559 fatal("unable to regain privileges: %m");
1562 option_error("Can't open log file %s: %m", *argv
);
1565 strlcpy(logfile_name
, *argv
, sizeof(logfile_name
));
1566 if (logfile_fd
>= 0)
1581 if(!strcmp(*argv
,"in")) {
1582 maxoctets_dir
= PPP_OCTETS_DIRECTION_IN
;
1583 } else if (!strcmp(*argv
,"out")) {
1584 maxoctets_dir
= PPP_OCTETS_DIRECTION_OUT
;
1585 } else if (!strcmp(*argv
,"max")) {
1586 maxoctets_dir
= PPP_OCTETS_DIRECTION_MAXOVERAL
;
1588 maxoctets_dir
= PPP_OCTETS_DIRECTION_SUM
;
1602 void (*init
) __P((void));
1606 if (strchr(arg
, '/') == 0) {
1607 const char *base
= _PATH_PLUGIN
;
1608 int l
= strlen(base
) + strlen(arg
) + 2;
1611 novm("plugin file path");
1612 strlcpy(path
, base
, l
);
1613 strlcat(path
, "/", l
);
1614 strlcat(path
, arg
, l
);
1616 handle
= dlopen(path
, RTLD_GLOBAL
| RTLD_NOW
);
1620 option_error("%s", err
);
1621 option_error("Couldn't load plugin %s", arg
);
1624 init
= (void (*)(void))dlsym(handle
, "plugin_init");
1626 option_error("%s has no initialization entry point", arg
);
1629 vers
= (const char *) dlsym(handle
, "pppd_version");
1631 warn("Warning: plugin %s has no version information", arg
);
1632 } else if (strcmp(vers
, VERSION
) != 0) {
1633 option_error("Plugin %s is for pppd version %s, this is %s",
1634 arg
, vers
, VERSION
);
1637 info("Plugin %s loaded.", arg
);