xref: /freebsd/usr.sbin/ppp/command.c (revision 817420dc8eac7df799c78f5309b75092b7f7cd40)
1 /*
2  *		PPP User command processing module
3  *
4  *	    Written by Toshiharu OHNO (tony-o@iij.ad.jp)
5  *
6  *   Copyright (C) 1993, Internet Initiative Japan, Inc. All rights reserverd.
7  *
8  * Redistribution and use in source and binary forms are permitted
9  * provided that the above copyright notice and this paragraph are
10  * duplicated in all such forms and that any documentation,
11  * advertising materials, and other materials related to such
12  * distribution and use acknowledge that the software was developed
13  * by the Internet Initiative Japan, Inc.  The name of the
14  * IIJ may not be used to endorse or promote products derived
15  * from this software without specific prior written permission.
16  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
17  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
18  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
19  *
20  * $FreeBSD$
21  *
22  */
23 #include <sys/param.h>
24 #include <netinet/in_systm.h>
25 #include <netinet/in.h>
26 #include <netinet/ip.h>
27 #include <arpa/inet.h>
28 #include <sys/socket.h>
29 #include <net/route.h>
30 #include <netdb.h>
31 #include <sys/un.h>
32 
33 #include <ctype.h>
34 #include <errno.h>
35 #include <fcntl.h>
36 #include <paths.h>
37 #include <stdio.h>
38 #include <stdlib.h>
39 #include <string.h>
40 #include <sys/wait.h>
41 #include <termios.h>
42 #include <unistd.h>
43 
44 #ifndef NONAT
45 #ifdef LOCALNAT
46 #include "alias.h"
47 #else
48 #include <alias.h>
49 #endif
50 #endif
51 
52 #include "layer.h"
53 #include "defs.h"
54 #include "command.h"
55 #include "mbuf.h"
56 #include "log.h"
57 #include "timer.h"
58 #include "fsm.h"
59 #include "iplist.h"
60 #include "throughput.h"
61 #include "slcompress.h"
62 #include "lqr.h"
63 #include "hdlc.h"
64 #include "lcp.h"
65 #include "ipcp.h"
66 #ifndef NONAT
67 #include "nat_cmd.h"
68 #endif
69 #include "systems.h"
70 #include "filter.h"
71 #include "descriptor.h"
72 #include "main.h"
73 #include "route.h"
74 #include "ccp.h"
75 #include "auth.h"
76 #include "async.h"
77 #include "link.h"
78 #include "physical.h"
79 #include "mp.h"
80 #ifndef NORADIUS
81 #include "radius.h"
82 #endif
83 #include "bundle.h"
84 #include "server.h"
85 #include "prompt.h"
86 #include "chat.h"
87 #include "chap.h"
88 #include "cbcp.h"
89 #include "datalink.h"
90 #include "iface.h"
91 #include "id.h"
92 
93 /* ``set'' values */
94 #define	VAR_AUTHKEY	0
95 #define	VAR_DIAL	1
96 #define	VAR_LOGIN	2
97 #define	VAR_AUTHNAME	3
98 #define	VAR_AUTOLOAD	4
99 #define	VAR_WINSIZE	5
100 #define	VAR_DEVICE	6
101 #define	VAR_ACCMAP	7
102 #define	VAR_MRRU	8
103 #define	VAR_MRU		9
104 #define	VAR_MTU		10
105 #define	VAR_OPENMODE	11
106 #define	VAR_PHONE	12
107 #define	VAR_HANGUP	13
108 #define	VAR_IDLETIMEOUT	14
109 #define	VAR_LQRPERIOD	15
110 #define	VAR_LCPRETRY	16
111 #define	VAR_CHAPRETRY	17
112 #define	VAR_PAPRETRY	18
113 #define	VAR_CCPRETRY	19
114 #define	VAR_IPCPRETRY	20
115 #define	VAR_DNS		21
116 #define	VAR_NBNS	22
117 #define	VAR_MODE	23
118 #define	VAR_CALLBACK	24
119 #define	VAR_CBCP	25
120 #define	VAR_CHOKED	26
121 #define	VAR_SENDPIPE	27
122 #define	VAR_RECVPIPE	28
123 #define	VAR_RADIUS	29
124 #define	VAR_CD		30
125 #define	VAR_PARITY	31
126 #define VAR_CRTSCTS	32
127 #define VAR_URGENTPORTS	33
128 #define	VAR_LOGOUT	34
129 #define	VAR_IFQUEUE	35
130 #define	VAR_KEYBITS	36
131 
132 /* ``accept|deny|disable|enable'' masks */
133 #define NEG_HISMASK (1)
134 #define NEG_MYMASK (2)
135 
136 /* ``accept|deny|disable|enable'' values */
137 #define NEG_ACFCOMP	40
138 #define NEG_CHAP05	41
139 #define NEG_CHAP80	42
140 #define NEG_CHAP80LM	43
141 #define NEG_DEFLATE	44
142 #define NEG_DNS		45
143 #define NEG_ENDDISC	46
144 #define NEG_LQR		47
145 #define NEG_PAP		48
146 #define NEG_PPPDDEFLATE	49
147 #define NEG_PRED1	50
148 #define NEG_PROTOCOMP	51
149 #define NEG_SHORTSEQ	52
150 #define NEG_VJCOMP	53
151 #define NEG_MPPE	54
152 #define NEG_CHAP81	55
153 
154 const char Version[] = "2.3";
155 
156 static int ShowCommand(struct cmdargs const *);
157 static int TerminalCommand(struct cmdargs const *);
158 static int QuitCommand(struct cmdargs const *);
159 static int OpenCommand(struct cmdargs const *);
160 static int CloseCommand(struct cmdargs const *);
161 static int DownCommand(struct cmdargs const *);
162 static int SetCommand(struct cmdargs const *);
163 static int LinkCommand(struct cmdargs const *);
164 static int AddCommand(struct cmdargs const *);
165 static int DeleteCommand(struct cmdargs const *);
166 static int NegotiateCommand(struct cmdargs const *);
167 static int ClearCommand(struct cmdargs const *);
168 static int RunListCommand(struct cmdargs const *);
169 static int IfaceAddCommand(struct cmdargs const *);
170 static int IfaceDeleteCommand(struct cmdargs const *);
171 static int IfaceClearCommand(struct cmdargs const *);
172 static int SetProcTitle(struct cmdargs const *);
173 #ifndef NONAT
174 static int NatEnable(struct cmdargs const *);
175 static int NatOption(struct cmdargs const *);
176 #endif
177 
178 static const char *
179 showcx(struct cmdtab const *cmd)
180 {
181   if (cmd->lauth & LOCAL_CX)
182     return "(c)";
183   else if (cmd->lauth & LOCAL_CX_OPT)
184     return "(o)";
185 
186   return "";
187 }
188 
189 static int
190 HelpCommand(struct cmdargs const *arg)
191 {
192   struct cmdtab const *cmd;
193   int n, cmax, dmax, cols, cxlen;
194   const char *cx;
195 
196   if (!arg->prompt) {
197     log_Printf(LogWARN, "help: Cannot help without a prompt\n");
198     return 0;
199   }
200 
201   if (arg->argc > arg->argn) {
202     for (cmd = arg->cmdtab; cmd->name || cmd->alias; cmd++)
203       if ((cmd->lauth & arg->prompt->auth) &&
204           ((cmd->name && !strcasecmp(cmd->name, arg->argv[arg->argn])) ||
205            (cmd->alias && !strcasecmp(cmd->alias, arg->argv[arg->argn])))) {
206 	prompt_Printf(arg->prompt, "%s %s\n", cmd->syntax, showcx(cmd));
207 	return 0;
208       }
209     return -1;
210   }
211 
212   cmax = dmax = 0;
213   for (cmd = arg->cmdtab; cmd->func; cmd++)
214     if (cmd->name && (cmd->lauth & arg->prompt->auth)) {
215       if ((n = strlen(cmd->name) + strlen(showcx(cmd))) > cmax)
216         cmax = n;
217       if ((n = strlen(cmd->helpmes)) > dmax)
218         dmax = n;
219     }
220 
221   cols = 80 / (dmax + cmax + 3);
222   n = 0;
223   prompt_Printf(arg->prompt, "(o) = Optional context,"
224                 " (c) = Context required\n");
225   for (cmd = arg->cmdtab; cmd->func; cmd++)
226     if (cmd->name && (cmd->lauth & arg->prompt->auth)) {
227       cx = showcx(cmd);
228       cxlen = cmax - strlen(cmd->name);
229       if (n % cols != 0)
230         prompt_Printf(arg->prompt, " ");
231       prompt_Printf(arg->prompt, "%s%-*.*s: %-*.*s",
232               cmd->name, cxlen, cxlen, cx, dmax, dmax, cmd->helpmes);
233       if (++n % cols == 0)
234         prompt_Printf(arg->prompt, "\n");
235     }
236   if (n % cols != 0)
237     prompt_Printf(arg->prompt, "\n");
238 
239   return 0;
240 }
241 
242 static int
243 IdentCommand(struct cmdargs const *arg)
244 {
245   int f, pos;
246 
247   *arg->cx->physical->link.lcp.cfg.ident = '\0';
248 
249   for (pos = 0, f = arg->argn; f < arg->argc; f++)
250     pos += snprintf(arg->cx->physical->link.lcp.cfg.ident + pos,
251                     sizeof arg->cx->physical->link.lcp.cfg.ident - pos, "%s%s",
252                     f == arg->argn ? "" : " ", arg->argv[f]);
253 
254   return 0;
255 }
256 
257 static int
258 SendIdentification(struct cmdargs const *arg)
259 {
260   if (arg->cx->state < DATALINK_LCP) {
261     log_Printf(LogWARN, "sendident: link has not reached LCP\n");
262     return 2;
263   }
264   return lcp_SendIdentification(&arg->cx->physical->link.lcp) ? 0 : 1;
265 }
266 
267 static int
268 CloneCommand(struct cmdargs const *arg)
269 {
270   char namelist[LINE_LEN];
271   char *name;
272   int f;
273 
274   if (arg->argc == arg->argn)
275     return -1;
276 
277   namelist[sizeof namelist - 1] = '\0';
278   for (f = arg->argn; f < arg->argc; f++) {
279     strncpy(namelist, arg->argv[f], sizeof namelist - 1);
280     for(name = strtok(namelist, ", "); name; name = strtok(NULL,", "))
281       bundle_DatalinkClone(arg->bundle, arg->cx, name);
282   }
283 
284   return 0;
285 }
286 
287 static int
288 RemoveCommand(struct cmdargs const *arg)
289 {
290   if (arg->argc != arg->argn)
291     return -1;
292 
293   if (arg->cx->state != DATALINK_CLOSED) {
294     log_Printf(LogWARN, "remove: Cannot delete links that aren't closed\n");
295     return 2;
296   }
297 
298   bundle_DatalinkRemove(arg->bundle, arg->cx);
299   return 0;
300 }
301 
302 static int
303 RenameCommand(struct cmdargs const *arg)
304 {
305   if (arg->argc != arg->argn + 1)
306     return -1;
307 
308   if (bundle_RenameDatalink(arg->bundle, arg->cx, arg->argv[arg->argn]))
309     return 0;
310 
311   log_Printf(LogWARN, "%s -> %s: target name already exists\n",
312              arg->cx->name, arg->argv[arg->argn]);
313   return 1;
314 }
315 
316 int
317 LoadCommand(struct cmdargs const *arg)
318 {
319   const char *err;
320   int n, mode;
321 
322   mode = arg->bundle->phys_type.all;
323 
324   if (arg->argn < arg->argc) {
325     for (n = arg->argn; n < arg->argc; n++)
326       if ((err = system_IsValid(arg->argv[n], arg->prompt, mode)) != NULL) {
327         log_Printf(LogWARN, "%s: %s\n", arg->argv[n], err);
328         return 1;
329       }
330 
331     for (n = arg->argn; n < arg->argc; n++) {
332       bundle_SetLabel(arg->bundle, arg->argv[arg->argc - 1]);
333       system_Select(arg->bundle, arg->argv[n], CONFFILE, arg->prompt, arg->cx);
334     }
335     bundle_SetLabel(arg->bundle, arg->argv[arg->argc - 1]);
336   } else if ((err = system_IsValid("default", arg->prompt, mode)) != NULL) {
337     log_Printf(LogWARN, "default: %s\n", err);
338     return 1;
339   } else {
340     bundle_SetLabel(arg->bundle, "default");
341     system_Select(arg->bundle, "default", CONFFILE, arg->prompt, arg->cx);
342     bundle_SetLabel(arg->bundle, "default");
343   }
344 
345   return 0;
346 }
347 
348 int
349 SaveCommand(struct cmdargs const *arg)
350 {
351   log_Printf(LogWARN, "save command is not implemented (yet).\n");
352   return 1;
353 }
354 
355 static int
356 DialCommand(struct cmdargs const *arg)
357 {
358   int res;
359 
360   if ((arg->cx && !(arg->cx->physical->type & (PHYS_INTERACTIVE|PHYS_AUTO)))
361       || (!arg->cx &&
362           (arg->bundle->phys_type.all & ~(PHYS_INTERACTIVE|PHYS_AUTO)))) {
363     log_Printf(LogWARN, "Manual dial is only available for auto and"
364               " interactive links\n");
365     return 1;
366   }
367 
368   if (arg->argc > arg->argn && (res = LoadCommand(arg)) != 0)
369     return res;
370 
371   bundle_Open(arg->bundle, arg->cx ? arg->cx->name : NULL, PHYS_ALL, 1);
372 
373   return 0;
374 }
375 
376 #define isinword(ch) (isalnum(ch) || (ch) == '_')
377 
378 static char *
379 strstrword(char *big, const char *little)
380 {
381   /* Get the first occurance of the word ``little'' in ``big'' */
382   char *pos;
383   int len;
384 
385   pos = big;
386   len = strlen(little);
387 
388   while ((pos = strstr(pos, little)) != NULL)
389     if ((pos != big && isinword(pos[-1])) || isinword(pos[len]))
390       pos++;
391     else if (pos != big && pos[-1] == '\\')
392       memmove(pos - 1, pos, strlen(pos) + 1);
393     else
394       break;
395 
396   return pos;
397 }
398 
399 static char *
400 subst(char *tgt, const char *oldstr, const char *newstr)
401 {
402   /* tgt is a malloc()d area... realloc() as necessary */
403   char *word, *ntgt;
404   int ltgt, loldstr, lnewstr, pos;
405 
406   if ((word = strstrword(tgt, oldstr)) == NULL)
407     return tgt;
408 
409   ltgt = strlen(tgt) + 1;
410   loldstr = strlen(oldstr);
411   lnewstr = strlen(newstr);
412   do {
413     pos = word - tgt;
414     if (loldstr > lnewstr)
415       bcopy(word + loldstr, word + lnewstr, ltgt - pos - loldstr);
416     if (loldstr != lnewstr) {
417       ntgt = realloc(tgt, ltgt += lnewstr - loldstr);
418       if (ntgt == NULL)
419         break;			/* Oh wonderful ! */
420       word = ntgt + pos;
421       tgt = ntgt;
422     }
423     if (lnewstr > loldstr)
424       bcopy(word + loldstr, word + lnewstr, ltgt - pos - loldstr);
425     bcopy(newstr, word, lnewstr);
426   } while ((word = strstrword(word, oldstr)));
427 
428   return tgt;
429 }
430 
431 void
432 command_Expand(char **nargv, int argc, char const *const *oargv,
433                struct bundle *bundle, int inc0, pid_t pid)
434 {
435   int arg;
436   char pidstr[12];
437 
438   if (inc0)
439     arg = 0;		/* Start at arg 0 */
440   else {
441     nargv[0] = strdup(oargv[0]);
442     arg = 1;
443   }
444   snprintf(pidstr, sizeof pidstr, "%d", (int)pid);
445   for (; arg < argc; arg++) {
446     nargv[arg] = strdup(oargv[arg]);
447     nargv[arg] = subst(nargv[arg], "HISADDR",
448                        inet_ntoa(bundle->ncp.ipcp.peer_ip));
449     nargv[arg] = subst(nargv[arg], "AUTHNAME", bundle->cfg.auth.name);
450     nargv[arg] = subst(nargv[arg], "INTERFACE", bundle->iface->name);
451     nargv[arg] = subst(nargv[arg], "MYADDR", inet_ntoa(bundle->ncp.ipcp.my_ip));
452     nargv[arg] = subst(nargv[arg], "USER", bundle->ncp.mp.peer.authname);
453     nargv[arg] = subst(nargv[arg], "PEER_ENDDISC",
454                        mp_Enddisc(bundle->ncp.mp.peer.enddisc.class,
455                                   bundle->ncp.mp.peer.enddisc.address,
456                                   bundle->ncp.mp.peer.enddisc.len));
457     nargv[arg] = subst(nargv[arg], "ENDDISC",
458                        mp_Enddisc(bundle->ncp.mp.cfg.enddisc.class,
459                                   bundle->ncp.mp.cfg.enddisc.address,
460                                   bundle->ncp.mp.cfg.enddisc.len));
461     nargv[arg] = subst(nargv[arg], "PROCESSID", pidstr);
462     nargv[arg] = subst(nargv[arg], "LABEL", bundle_GetLabel(bundle));
463     nargv[arg] = subst(nargv[arg], "DNS0",
464                        inet_ntoa(bundle->ncp.ipcp.ns.dns[0]));
465     nargv[arg] = subst(nargv[arg], "DNS1",
466                        inet_ntoa(bundle->ncp.ipcp.ns.dns[1]));
467     nargv[arg] = subst(nargv[arg], "VERSION", Version);
468     nargv[arg] = subst(nargv[arg], "COMPILATIONDATE", __DATE__);
469   }
470   nargv[arg] = NULL;
471 }
472 
473 static int
474 ShellCommand(struct cmdargs const *arg, int bg)
475 {
476   const char *shell;
477   pid_t shpid, pid;
478 
479 #ifdef SHELL_ONLY_INTERACTIVELY
480   /* we're only allowed to shell when we run ppp interactively */
481   if (arg->prompt && arg->prompt->owner) {
482     log_Printf(LogWARN, "Can't start a shell from a network connection\n");
483     return 1;
484   }
485 #endif
486 
487   if (arg->argc == arg->argn) {
488     if (!arg->prompt) {
489       log_Printf(LogWARN, "Can't start an interactive shell from"
490                 " a config file\n");
491       return 1;
492     } else if (arg->prompt->owner) {
493       log_Printf(LogWARN, "Can't start an interactive shell from"
494                 " a socket connection\n");
495       return 1;
496     } else if (bg) {
497       log_Printf(LogWARN, "Can only start an interactive shell in"
498 		" the foreground mode\n");
499       return 1;
500     }
501   }
502 
503   pid = getpid();
504   if ((shpid = fork()) == 0) {
505     int i, fd;
506 
507     if ((shell = getenv("SHELL")) == 0)
508       shell = _PATH_BSHELL;
509 
510     timer_TermService();
511 
512     if (arg->prompt)
513       fd = arg->prompt->fd_out;
514     else if ((fd = open(_PATH_DEVNULL, O_RDWR)) == -1) {
515       log_Printf(LogALERT, "Failed to open %s: %s\n",
516                 _PATH_DEVNULL, strerror(errno));
517       exit(1);
518     }
519     dup2(fd, STDIN_FILENO);
520     dup2(fd, STDOUT_FILENO);
521     dup2(fd, STDERR_FILENO);
522     for (i = getdtablesize(); i > STDERR_FILENO; i--)
523       fcntl(i, F_SETFD, 1);
524 
525 #ifndef NOSUID
526     setuid(ID0realuid());
527 #endif
528     if (arg->argc > arg->argn) {
529       /* substitute pseudo args */
530       char *argv[MAXARGS];
531       int argc = arg->argc - arg->argn;
532 
533       if (argc >= sizeof argv / sizeof argv[0]) {
534         argc = sizeof argv / sizeof argv[0] - 1;
535         log_Printf(LogWARN, "Truncating shell command to %d args\n", argc);
536       }
537       command_Expand(argv, argc, arg->argv + arg->argn, arg->bundle, 0, pid);
538       if (bg) {
539 	pid_t p;
540 
541 	p = getpid();
542 	if (daemon(1, 1) == -1) {
543 	  log_Printf(LogERROR, "%d: daemon: %s\n", (int)p, strerror(errno));
544 	  exit(1);
545 	}
546       } else if (arg->prompt)
547         printf("ppp: Pausing until %s finishes\n", arg->argv[arg->argn]);
548       execvp(argv[0], argv);
549     } else {
550       if (arg->prompt)
551         printf("ppp: Pausing until %s finishes\n", shell);
552       prompt_TtyOldMode(arg->prompt);
553       execl(shell, shell, NULL);
554     }
555 
556     log_Printf(LogWARN, "exec() of %s failed: %s\n",
557               arg->argc > arg->argn ? arg->argv[arg->argn] : shell,
558               strerror(errno));
559     _exit(255);
560   }
561 
562   if (shpid == (pid_t) - 1)
563     log_Printf(LogERROR, "Fork failed: %s\n", strerror(errno));
564   else {
565     int status;
566     waitpid(shpid, &status, 0);
567   }
568 
569   if (arg->prompt && !arg->prompt->owner)
570     prompt_TtyCommandMode(arg->prompt);
571 
572   return 0;
573 }
574 
575 static int
576 BgShellCommand(struct cmdargs const *arg)
577 {
578   if (arg->argc == arg->argn)
579     return -1;
580   return ShellCommand(arg, 1);
581 }
582 
583 static int
584 FgShellCommand(struct cmdargs const *arg)
585 {
586   return ShellCommand(arg, 0);
587 }
588 
589 static int
590 ResolvCommand(struct cmdargs const *arg)
591 {
592   if (arg->argc == arg->argn + 1) {
593     if (!strcasecmp(arg->argv[arg->argn], "reload"))
594       ipcp_LoadDNS(&arg->bundle->ncp.ipcp);
595     else if (!strcasecmp(arg->argv[arg->argn], "restore"))
596       ipcp_RestoreDNS(&arg->bundle->ncp.ipcp);
597     else if (!strcasecmp(arg->argv[arg->argn], "rewrite"))
598       ipcp_WriteDNS(&arg->bundle->ncp.ipcp);
599     else if (!strcasecmp(arg->argv[arg->argn], "readonly"))
600       arg->bundle->ncp.ipcp.ns.writable = 0;
601     else if (!strcasecmp(arg->argv[arg->argn], "writable"))
602       arg->bundle->ncp.ipcp.ns.writable = 1;
603     else
604       return -1;
605 
606     return 0;
607   }
608 
609   return -1;
610 }
611 
612 #ifndef NONAT
613 static struct cmdtab const NatCommands[] =
614 {
615   {"addr", NULL, nat_RedirectAddr, LOCAL_AUTH,
616    "static address translation", "nat addr [addr_local addr_alias]"},
617   {"deny_incoming", NULL, NatOption, LOCAL_AUTH,
618    "stop incoming connections", "nat deny_incoming yes|no",
619    (const void *) PKT_ALIAS_DENY_INCOMING},
620   {"enable", NULL, NatEnable, LOCAL_AUTH,
621    "enable NAT", "nat enable yes|no"},
622   {"log", NULL, NatOption, LOCAL_AUTH,
623    "log NAT link creation", "nat log yes|no",
624    (const void *) PKT_ALIAS_LOG},
625   {"port", NULL, nat_RedirectPort, LOCAL_AUTH, "port redirection",
626    "nat port proto localaddr:port[-port] aliasport[-aliasport]"},
627   {"proxy", NULL, nat_ProxyRule, LOCAL_AUTH,
628    "proxy control", "nat proxy server host[:port] ..."},
629   {"same_ports", NULL, NatOption, LOCAL_AUTH,
630    "try to leave port numbers unchanged", "nat same_ports yes|no",
631    (const void *) PKT_ALIAS_SAME_PORTS},
632   {"target", NULL, nat_SetTarget, LOCAL_AUTH,
633    "Default address for incoming connections", "nat target addr" },
634   {"unregistered_only", NULL, NatOption, LOCAL_AUTH,
635    "translate unregistered (private) IP address space only",
636    "nat unregistered_only yes|no",
637    (const void *) PKT_ALIAS_UNREGISTERED_ONLY},
638   {"use_sockets", NULL, NatOption, LOCAL_AUTH,
639    "allocate host sockets", "nat use_sockets yes|no",
640    (const void *) PKT_ALIAS_USE_SOCKETS},
641   {"help", "?", HelpCommand, LOCAL_AUTH | LOCAL_NO_AUTH,
642    "Display this message", "nat help|? [command]", NatCommands},
643   {NULL, NULL, NULL},
644 };
645 #endif
646 
647 static struct cmdtab const AllowCommands[] = {
648   {"modes", "mode", AllowModes, LOCAL_AUTH,
649   "Only allow certain ppp modes", "allow modes mode..."},
650   {"users", "user", AllowUsers, LOCAL_AUTH,
651   "Only allow ppp access to certain users", "allow users logname..."},
652   {"help", "?", HelpCommand, LOCAL_AUTH | LOCAL_NO_AUTH,
653   "Display this message", "allow help|? [command]", AllowCommands},
654   {NULL, NULL, NULL},
655 };
656 
657 static struct cmdtab const IfaceCommands[] =
658 {
659   {"add", NULL, IfaceAddCommand, LOCAL_AUTH,
660    "Add iface address", "iface add addr[/bits| mask] peer", NULL},
661   {NULL, "add!", IfaceAddCommand, LOCAL_AUTH,
662    "Add or change an iface address", "iface add! addr[/bits| mask] peer",
663    (void *)1},
664   {"clear", NULL, IfaceClearCommand, LOCAL_AUTH,
665    "Clear iface address(es)", "iface clear"},
666   {"delete", "rm", IfaceDeleteCommand, LOCAL_AUTH,
667    "Delete iface address", "iface delete addr", NULL},
668   {NULL, "rm!", IfaceDeleteCommand, LOCAL_AUTH,
669    "Delete iface address", "iface delete addr", (void *)1},
670   {NULL, "delete!", IfaceDeleteCommand, LOCAL_AUTH,
671    "Delete iface address", "iface delete addr", (void *)1},
672   {"show", NULL, iface_Show, LOCAL_AUTH,
673    "Show iface address(es)", "iface show"},
674   {"help", "?", HelpCommand, LOCAL_AUTH | LOCAL_NO_AUTH,
675    "Display this message", "nat help|? [command]", IfaceCommands},
676   {NULL, NULL, NULL},
677 };
678 
679 static struct cmdtab const Commands[] = {
680   {"accept", NULL, NegotiateCommand, LOCAL_AUTH | LOCAL_CX_OPT,
681   "accept option request", "accept option .."},
682   {"add", NULL, AddCommand, LOCAL_AUTH,
683   "add route", "add dest mask gateway", NULL},
684   {NULL, "add!", AddCommand, LOCAL_AUTH,
685   "add or change route", "add! dest mask gateway", (void *)1},
686   {"allow", "auth", RunListCommand, LOCAL_AUTH,
687   "Allow ppp access", "allow users|modes ....", AllowCommands},
688   {"bg", "!bg", BgShellCommand, LOCAL_AUTH,
689   "Run a background command", "[!]bg command"},
690   {"clear", NULL, ClearCommand, LOCAL_AUTH | LOCAL_CX_OPT,
691   "Clear throughput statistics",
692   "clear ipcp|physical [current|overall|peak]..."},
693   {"clone", NULL, CloneCommand, LOCAL_AUTH | LOCAL_CX,
694   "Clone a link", "clone newname..."},
695   {"close", NULL, CloseCommand, LOCAL_AUTH | LOCAL_CX_OPT,
696   "Close an FSM", "close [lcp|ccp]"},
697   {"delete", NULL, DeleteCommand, LOCAL_AUTH,
698   "delete route", "delete dest", NULL},
699   {NULL, "delete!", DeleteCommand, LOCAL_AUTH,
700   "delete a route if it exists", "delete! dest", (void *)1},
701   {"deny", NULL, NegotiateCommand, LOCAL_AUTH | LOCAL_CX_OPT,
702   "Deny option request", "deny option .."},
703   {"dial", "call", DialCommand, LOCAL_AUTH | LOCAL_CX_OPT,
704   "Dial and login", "dial|call [system ...]", NULL},
705   {"disable", NULL, NegotiateCommand, LOCAL_AUTH | LOCAL_CX_OPT,
706   "Disable option", "disable option .."},
707   {"down", NULL, DownCommand, LOCAL_AUTH | LOCAL_CX_OPT,
708   "Generate a down event", "down [ccp|lcp]"},
709   {"enable", NULL, NegotiateCommand, LOCAL_AUTH | LOCAL_CX_OPT,
710   "Enable option", "enable option .."},
711   {"ident", NULL, IdentCommand, LOCAL_AUTH | LOCAL_CX,
712   "Set the link identity", "ident text..."},
713   {"iface", "interface", RunListCommand, LOCAL_AUTH,
714   "interface control", "iface option ...", IfaceCommands},
715   {"link", "datalink", LinkCommand, LOCAL_AUTH,
716   "Link specific commands", "link name command ..."},
717   {"load", NULL, LoadCommand, LOCAL_AUTH | LOCAL_CX_OPT,
718   "Load settings", "load [system ...]"},
719 #ifndef NONAT
720   {"nat", "alias", RunListCommand, LOCAL_AUTH,
721   "NAT control", "nat option yes|no", NatCommands},
722 #endif
723   {"open", NULL, OpenCommand, LOCAL_AUTH | LOCAL_CX_OPT,
724   "Open an FSM", "open! [lcp|ccp|ipcp]", (void *)1},
725   {"passwd", NULL, PasswdCommand, LOCAL_NO_AUTH,
726   "Password for manipulation", "passwd LocalPassword"},
727   {"quit", "bye", QuitCommand, LOCAL_AUTH | LOCAL_NO_AUTH,
728   "Quit PPP program", "quit|bye [all]"},
729   {"remove", "rm", RemoveCommand, LOCAL_AUTH | LOCAL_CX,
730   "Remove a link", "remove"},
731   {"rename", "mv", RenameCommand, LOCAL_AUTH | LOCAL_CX,
732   "Rename a link", "rename name"},
733   {"resolv", NULL, ResolvCommand, LOCAL_AUTH,
734   "Manipulate resolv.conf", "resolv readonly|reload|restore|rewrite|writable"},
735   {"save", NULL, SaveCommand, LOCAL_AUTH,
736   "Save settings", "save"},
737   {"sendident", NULL, SendIdentification, LOCAL_AUTH | LOCAL_CX,
738   "Transmit the link identity", "sendident"},
739   {"set", "setup", SetCommand, LOCAL_AUTH | LOCAL_CX_OPT,
740   "Set parameters", "set[up] var value"},
741   {"shell", "!", FgShellCommand, LOCAL_AUTH,
742   "Run a subshell", "shell|! [sh command]"},
743   {"show", NULL, ShowCommand, LOCAL_AUTH | LOCAL_CX_OPT,
744   "Show status and stats", "show var"},
745   {"term", NULL, TerminalCommand, LOCAL_AUTH | LOCAL_CX,
746   "Enter terminal mode", "term"},
747   {"help", "?", HelpCommand, LOCAL_AUTH | LOCAL_NO_AUTH,
748   "Display this message", "help|? [command]", Commands},
749   {NULL, NULL, NULL},
750 };
751 
752 static int
753 ShowEscape(struct cmdargs const *arg)
754 {
755   if (arg->cx->physical->async.cfg.EscMap[32]) {
756     int code, bit;
757     const char *sep = "";
758 
759     for (code = 0; code < 32; code++)
760       if (arg->cx->physical->async.cfg.EscMap[code])
761 	for (bit = 0; bit < 8; bit++)
762 	  if (arg->cx->physical->async.cfg.EscMap[code] & (1 << bit)) {
763 	    prompt_Printf(arg->prompt, "%s0x%02x", sep, (code << 3) + bit);
764             sep = ", ";
765           }
766     prompt_Printf(arg->prompt, "\n");
767   }
768   return 0;
769 }
770 
771 static int
772 ShowTimerList(struct cmdargs const *arg)
773 {
774   timer_Show(0, arg->prompt);
775   return 0;
776 }
777 
778 static int
779 ShowStopped(struct cmdargs const *arg)
780 {
781   prompt_Printf(arg->prompt, " Stopped Timer:  LCP: ");
782   if (!arg->cx->physical->link.lcp.fsm.StoppedTimer.load)
783     prompt_Printf(arg->prompt, "Disabled");
784   else
785     prompt_Printf(arg->prompt, "%ld secs",
786                   arg->cx->physical->link.lcp.fsm.StoppedTimer.load / SECTICKS);
787 
788   prompt_Printf(arg->prompt, ", CCP: ");
789   if (!arg->cx->physical->link.ccp.fsm.StoppedTimer.load)
790     prompt_Printf(arg->prompt, "Disabled");
791   else
792     prompt_Printf(arg->prompt, "%ld secs",
793                   arg->cx->physical->link.ccp.fsm.StoppedTimer.load / SECTICKS);
794 
795   prompt_Printf(arg->prompt, "\n");
796 
797   return 0;
798 }
799 
800 static int
801 ShowVersion(struct cmdargs const *arg)
802 {
803   prompt_Printf(arg->prompt, "PPP Version %s - %s\n", Version, __DATE__);
804   return 0;
805 }
806 
807 static int
808 ShowProtocolStats(struct cmdargs const *arg)
809 {
810   struct link *l = command_ChooseLink(arg);
811 
812   prompt_Printf(arg->prompt, "%s:\n", l->name);
813   link_ReportProtocolStatus(l, arg->prompt);
814   return 0;
815 }
816 
817 static struct cmdtab const ShowCommands[] = {
818   {"bundle", NULL, bundle_ShowStatus, LOCAL_AUTH,
819   "bundle details", "show bundle"},
820   {"ccp", NULL, ccp_ReportStatus, LOCAL_AUTH | LOCAL_CX_OPT,
821   "CCP status", "show cpp"},
822   {"compress", NULL, sl_Show, LOCAL_AUTH,
823   "VJ compression stats", "show compress"},
824   {"escape", NULL, ShowEscape, LOCAL_AUTH | LOCAL_CX,
825   "escape characters", "show escape"},
826   {"filter", NULL, filter_Show, LOCAL_AUTH,
827   "packet filters", "show filter [in|out|dial|alive]"},
828   {"hdlc", NULL, hdlc_ReportStatus, LOCAL_AUTH | LOCAL_CX,
829   "HDLC errors", "show hdlc"},
830   {"iface", "interface", iface_Show, LOCAL_AUTH,
831   "Interface status", "show iface"},
832   {"ipcp", NULL, ipcp_Show, LOCAL_AUTH,
833   "IPCP status", "show ipcp"},
834   {"layers", NULL, link_ShowLayers, LOCAL_AUTH | LOCAL_CX_OPT,
835   "Protocol layers", "show layers"},
836   {"lcp", NULL, lcp_ReportStatus, LOCAL_AUTH | LOCAL_CX,
837   "LCP status", "show lcp"},
838   {"link", "datalink", datalink_Show, LOCAL_AUTH | LOCAL_CX,
839   "(high-level) link info", "show link"},
840   {"links", NULL, bundle_ShowLinks, LOCAL_AUTH,
841   "available link names", "show links"},
842   {"log", NULL, log_ShowLevel, LOCAL_AUTH,
843   "log levels", "show log"},
844   {"mem", NULL, mbuf_Show, LOCAL_AUTH,
845   "mbuf allocations", "show mem"},
846   {"physical", NULL, physical_ShowStatus, LOCAL_AUTH | LOCAL_CX,
847   "(low-level) link info", "show physical"},
848   {"mp", "multilink", mp_ShowStatus, LOCAL_AUTH,
849   "multilink setup", "show mp"},
850   {"proto", NULL, ShowProtocolStats, LOCAL_AUTH | LOCAL_CX_OPT,
851   "protocol summary", "show proto"},
852   {"route", NULL, route_Show, LOCAL_AUTH,
853   "routing table", "show route"},
854   {"stopped", NULL, ShowStopped, LOCAL_AUTH | LOCAL_CX,
855   "STOPPED timeout", "show stopped"},
856   {"timers", NULL, ShowTimerList, LOCAL_AUTH,
857   "alarm timers", "show timers"},
858   {"version", NULL, ShowVersion, LOCAL_NO_AUTH | LOCAL_AUTH,
859   "version string", "show version"},
860   {"who", NULL, log_ShowWho, LOCAL_AUTH,
861   "client list", "show who"},
862   {"help", "?", HelpCommand, LOCAL_NO_AUTH | LOCAL_AUTH,
863   "Display this message", "show help|? [command]", ShowCommands},
864   {NULL, NULL, NULL},
865 };
866 
867 static struct cmdtab const *
868 FindCommand(struct cmdtab const *cmds, const char *str, int *pmatch)
869 {
870   int nmatch;
871   int len;
872   struct cmdtab const *found;
873 
874   found = NULL;
875   len = strlen(str);
876   nmatch = 0;
877   while (cmds->func) {
878     if (cmds->name && strncasecmp(str, cmds->name, len) == 0) {
879       if (cmds->name[len] == '\0') {
880 	*pmatch = 1;
881 	return cmds;
882       }
883       nmatch++;
884       found = cmds;
885     } else if (cmds->alias && strncasecmp(str, cmds->alias, len) == 0) {
886       if (cmds->alias[len] == '\0') {
887 	*pmatch = 1;
888 	return cmds;
889       }
890       nmatch++;
891       found = cmds;
892     }
893     cmds++;
894   }
895   *pmatch = nmatch;
896   return found;
897 }
898 
899 static const char *
900 mkPrefix(int argc, char const *const *argv, char *tgt, int sz)
901 {
902   int f, tlen, len;
903 
904   tlen = 0;
905   for (f = 0; f < argc && tlen < sz - 2; f++) {
906     if (f)
907       tgt[tlen++] = ' ';
908     len = strlen(argv[f]);
909     if (len > sz - tlen - 1)
910       len = sz - tlen - 1;
911     strncpy(tgt+tlen, argv[f], len);
912     tlen += len;
913   }
914   tgt[tlen] = '\0';
915   return tgt;
916 }
917 
918 static int
919 FindExec(struct bundle *bundle, struct cmdtab const *cmds, int argc, int argn,
920          char const *const *argv, struct prompt *prompt, struct datalink *cx)
921 {
922   struct cmdtab const *cmd;
923   int val = 1;
924   int nmatch;
925   struct cmdargs arg;
926   char prefix[100];
927 
928   cmd = FindCommand(cmds, argv[argn], &nmatch);
929   if (nmatch > 1)
930     log_Printf(LogWARN, "%s: Ambiguous command\n",
931               mkPrefix(argn+1, argv, prefix, sizeof prefix));
932   else if (cmd && (!prompt || (cmd->lauth & prompt->auth))) {
933     if ((cmd->lauth & LOCAL_CX) && !cx)
934       /* We've got no context, but we require it */
935       cx = bundle2datalink(bundle, NULL);
936 
937     if ((cmd->lauth & LOCAL_CX) && !cx)
938       log_Printf(LogWARN, "%s: No context (use the `link' command)\n",
939                 mkPrefix(argn+1, argv, prefix, sizeof prefix));
940     else {
941       if (cx && !(cmd->lauth & (LOCAL_CX|LOCAL_CX_OPT))) {
942         log_Printf(LogWARN, "%s: Redundant context (%s) ignored\n",
943                   mkPrefix(argn+1, argv, prefix, sizeof prefix), cx->name);
944         cx = NULL;
945       }
946       arg.cmdtab = cmds;
947       arg.cmd = cmd;
948       arg.argc = argc;
949       arg.argn = argn+1;
950       arg.argv = argv;
951       arg.bundle = bundle;
952       arg.cx = cx;
953       arg.prompt = prompt;
954       val = (*cmd->func) (&arg);
955     }
956   } else
957     log_Printf(LogWARN, "%s: Invalid command\n",
958               mkPrefix(argn+1, argv, prefix, sizeof prefix));
959 
960   if (val == -1)
961     log_Printf(LogWARN, "Usage: %s\n", cmd->syntax);
962   else if (val)
963     log_Printf(LogWARN, "%s: Failed %d\n",
964               mkPrefix(argn+1, argv, prefix, sizeof prefix), val);
965 
966   return val;
967 }
968 
969 int
970 command_Expand_Interpret(char *buff, int nb, char *argv[MAXARGS], int offset)
971 {
972   char buff2[LINE_LEN-offset];
973 
974   InterpretArg(buff, buff2);
975   strncpy(buff, buff2, LINE_LEN - offset - 1);
976   buff[LINE_LEN - offset - 1] = '\0';
977 
978   return command_Interpret(buff, nb, argv);
979 }
980 
981 int
982 command_Interpret(char *buff, int nb, char *argv[MAXARGS])
983 {
984   char *cp;
985 
986   if (nb > 0) {
987     cp = buff + strcspn(buff, "\r\n");
988     if (cp)
989       *cp = '\0';
990     return MakeArgs(buff, argv, MAXARGS, PARSE_REDUCE);
991   }
992   return 0;
993 }
994 
995 static int
996 arghidden(int argc, char const *const *argv, int n)
997 {
998   /* Is arg n of the given command to be hidden from the log ? */
999 
1000   /* set authkey xxxxx */
1001   /* set key xxxxx */
1002   if (n == 2 && !strncasecmp(argv[0], "se", 2) &&
1003       (!strncasecmp(argv[1], "authk", 5) || !strncasecmp(argv[1], "ke", 2)))
1004     return 1;
1005 
1006   /* passwd xxxxx */
1007   if (n == 1 && !strncasecmp(argv[0], "p", 1))
1008     return 1;
1009 
1010   /* set server port xxxxx .... */
1011   if (n == 3 && !strncasecmp(argv[0], "se", 2) &&
1012       !strncasecmp(argv[1], "se", 2))
1013     return 1;
1014 
1015   return 0;
1016 }
1017 
1018 void
1019 command_Run(struct bundle *bundle, int argc, char const *const *argv,
1020            struct prompt *prompt, const char *label, struct datalink *cx)
1021 {
1022   if (argc > 0) {
1023     if (log_IsKept(LogCOMMAND)) {
1024       char buf[LINE_LEN];
1025       int f, n;
1026 
1027       if (label) {
1028         strncpy(buf, label, sizeof buf - 3);
1029         buf[sizeof buf - 3] = '\0';
1030         strcat(buf, ": ");
1031         n = strlen(buf);
1032       } else {
1033         *buf = '\0';
1034         n = 0;
1035       }
1036       buf[sizeof buf - 1] = '\0';	/* In case we run out of room in buf */
1037 
1038       for (f = 0; f < argc; f++) {
1039         if (n < sizeof buf - 1 && f)
1040           buf[n++] = ' ';
1041         if (arghidden(argc, argv, f))
1042           strncpy(buf+n, "********", sizeof buf - n - 1);
1043         else
1044           strncpy(buf+n, argv[f], sizeof buf - n - 1);
1045         n += strlen(buf+n);
1046       }
1047       log_Printf(LogCOMMAND, "%s\n", buf);
1048     }
1049     FindExec(bundle, Commands, argc, 0, argv, prompt, cx);
1050   }
1051 }
1052 
1053 int
1054 command_Decode(struct bundle *bundle, char *buff, int nb, struct prompt *prompt,
1055               const char *label)
1056 {
1057   int argc;
1058   char *argv[MAXARGS];
1059 
1060   if ((argc = command_Expand_Interpret(buff, nb, argv, 0)) < 0)
1061     return 0;
1062 
1063   command_Run(bundle, argc, (char const *const *)argv, prompt, label, NULL);
1064   return 1;
1065 }
1066 
1067 static int
1068 ShowCommand(struct cmdargs const *arg)
1069 {
1070   if (!arg->prompt)
1071     log_Printf(LogWARN, "show: Cannot show without a prompt\n");
1072   else if (arg->argc > arg->argn)
1073     FindExec(arg->bundle, ShowCommands, arg->argc, arg->argn, arg->argv,
1074              arg->prompt, arg->cx);
1075   else
1076     prompt_Printf(arg->prompt, "Use ``show ?'' to get a list.\n");
1077 
1078   return 0;
1079 }
1080 
1081 static int
1082 TerminalCommand(struct cmdargs const *arg)
1083 {
1084   if (!arg->prompt) {
1085     log_Printf(LogWARN, "term: Need a prompt\n");
1086     return 1;
1087   }
1088 
1089   if (arg->cx->physical->link.lcp.fsm.state > ST_CLOSED) {
1090     prompt_Printf(arg->prompt, "LCP state is [%s]\n",
1091                   State2Nam(arg->cx->physical->link.lcp.fsm.state));
1092     return 1;
1093   }
1094 
1095   datalink_Up(arg->cx, 0, 0);
1096   prompt_TtyTermMode(arg->prompt, arg->cx);
1097   return 0;
1098 }
1099 
1100 static int
1101 QuitCommand(struct cmdargs const *arg)
1102 {
1103   if (!arg->prompt || prompt_IsController(arg->prompt) ||
1104       (arg->argc > arg->argn && !strcasecmp(arg->argv[arg->argn], "all") &&
1105        (arg->prompt->auth & LOCAL_AUTH)))
1106     Cleanup(EX_NORMAL);
1107   if (arg->prompt)
1108     prompt_Destroy(arg->prompt, 1);
1109 
1110   return 0;
1111 }
1112 
1113 static int
1114 OpenCommand(struct cmdargs const *arg)
1115 {
1116   if (arg->argc == arg->argn)
1117     bundle_Open(arg->bundle, arg->cx ? arg->cx->name : NULL, PHYS_ALL, 1);
1118   else if (arg->argc == arg->argn + 1) {
1119     if (!strcasecmp(arg->argv[arg->argn], "lcp")) {
1120       struct datalink *cx = arg->cx ?
1121         arg->cx : bundle2datalink(arg->bundle, NULL);
1122       if (cx) {
1123         if (cx->physical->link.lcp.fsm.state == ST_OPENED)
1124           fsm_Reopen(&cx->physical->link.lcp.fsm);
1125         else
1126           bundle_Open(arg->bundle, cx->name, PHYS_ALL, 1);
1127       } else
1128         log_Printf(LogWARN, "open lcp: You must specify a link\n");
1129     } else if (!strcasecmp(arg->argv[arg->argn], "ccp")) {
1130       struct fsm *fp;
1131 
1132       fp = &command_ChooseLink(arg)->ccp.fsm;
1133       if (fp->link->lcp.fsm.state != ST_OPENED)
1134         log_Printf(LogWARN, "open: LCP must be open before opening CCP\n");
1135       else if (fp->state == ST_OPENED)
1136         fsm_Reopen(fp);
1137       else {
1138         fp->open_mode = 0;	/* Not passive any more */
1139         if (fp->state == ST_STOPPED) {
1140           fsm_Down(fp);
1141           fsm_Up(fp);
1142         } else {
1143           fsm_Up(fp);
1144           fsm_Open(fp);
1145         }
1146       }
1147     } else if (!strcasecmp(arg->argv[arg->argn], "ipcp")) {
1148       if (arg->cx)
1149         log_Printf(LogWARN, "open ipcp: You need not specify a link\n");
1150       if (arg->bundle->ncp.ipcp.fsm.state == ST_OPENED)
1151         fsm_Reopen(&arg->bundle->ncp.ipcp.fsm);
1152       else
1153         bundle_Open(arg->bundle, NULL, PHYS_ALL, 1);
1154     } else
1155       return -1;
1156   } else
1157     return -1;
1158 
1159   return 0;
1160 }
1161 
1162 static int
1163 CloseCommand(struct cmdargs const *arg)
1164 {
1165   if (arg->argc == arg->argn)
1166     bundle_Close(arg->bundle, arg->cx ? arg->cx->name : NULL, CLOSE_STAYDOWN);
1167   else if (arg->argc == arg->argn + 1) {
1168     if (!strcasecmp(arg->argv[arg->argn], "lcp"))
1169       bundle_Close(arg->bundle, arg->cx ? arg->cx->name : NULL, CLOSE_LCP);
1170     else if (!strcasecmp(arg->argv[arg->argn], "ccp") ||
1171              !strcasecmp(arg->argv[arg->argn], "ccp!")) {
1172       struct fsm *fp;
1173 
1174       fp = &command_ChooseLink(arg)->ccp.fsm;
1175       if (fp->state == ST_OPENED) {
1176         fsm_Close(fp);
1177         if (arg->argv[arg->argn][3] == '!')
1178           fp->open_mode = 0;		/* Stay ST_CLOSED */
1179         else
1180           fp->open_mode = OPEN_PASSIVE;	/* Wait for the peer to start */
1181       }
1182     } else
1183       return -1;
1184   } else
1185     return -1;
1186 
1187   return 0;
1188 }
1189 
1190 static int
1191 DownCommand(struct cmdargs const *arg)
1192 {
1193   if (arg->argc == arg->argn) {
1194       if (arg->cx)
1195         datalink_Down(arg->cx, CLOSE_STAYDOWN);
1196       else
1197         bundle_Down(arg->bundle, CLOSE_STAYDOWN);
1198   } else if (arg->argc == arg->argn + 1) {
1199     if (!strcasecmp(arg->argv[arg->argn], "lcp")) {
1200       if (arg->cx)
1201         datalink_Down(arg->cx, CLOSE_LCP);
1202       else
1203         bundle_Down(arg->bundle, CLOSE_LCP);
1204     } else if (!strcasecmp(arg->argv[arg->argn], "ccp")) {
1205       struct fsm *fp = arg->cx ? &arg->cx->physical->link.ccp.fsm :
1206                                  &arg->bundle->ncp.mp.link.ccp.fsm;
1207       fsm2initial(fp);
1208     } else
1209       return -1;
1210   } else
1211     return -1;
1212 
1213   return 0;
1214 }
1215 
1216 static int
1217 SetModemSpeed(struct cmdargs const *arg)
1218 {
1219   long speed;
1220   char *end;
1221 
1222   if (arg->argc > arg->argn && *arg->argv[arg->argn]) {
1223     if (arg->argc > arg->argn+1) {
1224       log_Printf(LogWARN, "SetModemSpeed: Too many arguments\n");
1225       return -1;
1226     }
1227     if (strcasecmp(arg->argv[arg->argn], "sync") == 0) {
1228       physical_SetSync(arg->cx->physical);
1229       return 0;
1230     }
1231     end = NULL;
1232     speed = strtol(arg->argv[arg->argn], &end, 10);
1233     if (*end) {
1234       log_Printf(LogWARN, "SetModemSpeed: Bad argument \"%s\"",
1235                 arg->argv[arg->argn]);
1236       return -1;
1237     }
1238     if (physical_SetSpeed(arg->cx->physical, speed))
1239       return 0;
1240     log_Printf(LogWARN, "%s: Invalid speed\n", arg->argv[arg->argn]);
1241   } else
1242     log_Printf(LogWARN, "SetModemSpeed: No speed specified\n");
1243 
1244   return -1;
1245 }
1246 
1247 static int
1248 SetStoppedTimeout(struct cmdargs const *arg)
1249 {
1250   struct link *l = &arg->cx->physical->link;
1251 
1252   l->lcp.fsm.StoppedTimer.load = 0;
1253   l->ccp.fsm.StoppedTimer.load = 0;
1254   if (arg->argc <= arg->argn+2) {
1255     if (arg->argc > arg->argn) {
1256       l->lcp.fsm.StoppedTimer.load = atoi(arg->argv[arg->argn]) * SECTICKS;
1257       if (arg->argc > arg->argn+1)
1258         l->ccp.fsm.StoppedTimer.load = atoi(arg->argv[arg->argn+1]) * SECTICKS;
1259     }
1260     return 0;
1261   }
1262   return -1;
1263 }
1264 
1265 static int
1266 SetServer(struct cmdargs const *arg)
1267 {
1268   int res = -1;
1269 
1270   if (arg->argc > arg->argn && arg->argc < arg->argn+4) {
1271     const char *port, *passwd, *mask;
1272     int mlen;
1273 
1274     /* What's what ? */
1275     port = arg->argv[arg->argn];
1276     if (arg->argc == arg->argn + 2) {
1277       passwd = arg->argv[arg->argn+1];
1278       mask = NULL;
1279     } else if (arg->argc == arg->argn + 3) {
1280       passwd = arg->argv[arg->argn+1];
1281       mask = arg->argv[arg->argn+2];
1282       mlen = strlen(mask);
1283       if (mlen == 0 || mlen > 4 || strspn(mask, "01234567") != mlen ||
1284           (mlen == 4 && *mask != '0')) {
1285         log_Printf(LogWARN, "%s %s: %s: Invalid mask\n",
1286                    arg->argv[arg->argn - 2], arg->argv[arg->argn - 1], mask);
1287         return -1;
1288       }
1289     } else if (strcasecmp(port, "none") == 0) {
1290       if (server_Close(arg->bundle))
1291         log_Printf(LogPHASE, "Disabled server port.\n");
1292       return 0;
1293     } else
1294       return -1;
1295 
1296     strncpy(server.passwd, passwd, sizeof server.passwd - 1);
1297     server.passwd[sizeof server.passwd - 1] = '\0';
1298 
1299     if (*port == '/') {
1300       mode_t imask;
1301       char *ptr, name[LINE_LEN + 12];
1302 
1303       if (mask == NULL)
1304         imask = (mode_t)-1;
1305       else for (imask = mlen = 0; mask[mlen]; mlen++)
1306         imask = (imask * 8) + mask[mlen] - '0';
1307 
1308       ptr = strstr(port, "%d");
1309       if (ptr) {
1310         snprintf(name, sizeof name, "%.*s%d%s",
1311                  (int)(ptr - port), port, arg->bundle->unit, ptr + 2);
1312         port = name;
1313       }
1314       res = server_LocalOpen(arg->bundle, port, imask);
1315     } else {
1316       int iport, add = 0;
1317 
1318       if (mask != NULL)
1319         return -1;
1320 
1321       if (*port == '+') {
1322         port++;
1323         add = 1;
1324       }
1325       if (strspn(port, "0123456789") != strlen(port)) {
1326         struct servent *s;
1327 
1328         if ((s = getservbyname(port, "tcp")) == NULL) {
1329 	  iport = 0;
1330 	  log_Printf(LogWARN, "%s: Invalid port or service\n", port);
1331 	} else
1332 	  iport = ntohs(s->s_port);
1333       } else
1334         iport = atoi(port);
1335 
1336       if (iport) {
1337         if (add)
1338           iport += arg->bundle->unit;
1339         res = server_TcpOpen(arg->bundle, iport);
1340       } else
1341         res = -1;
1342     }
1343   }
1344 
1345   return res;
1346 }
1347 
1348 static int
1349 SetEscape(struct cmdargs const *arg)
1350 {
1351   int code;
1352   int argc = arg->argc - arg->argn;
1353   char const *const *argv = arg->argv + arg->argn;
1354 
1355   for (code = 0; code < 33; code++)
1356     arg->cx->physical->async.cfg.EscMap[code] = 0;
1357 
1358   while (argc-- > 0) {
1359     sscanf(*argv++, "%x", &code);
1360     code &= 0xff;
1361     arg->cx->physical->async.cfg.EscMap[code >> 3] |= (1 << (code & 7));
1362     arg->cx->physical->async.cfg.EscMap[32] = 1;
1363   }
1364   return 0;
1365 }
1366 
1367 static int
1368 SetInterfaceAddr(struct cmdargs const *arg)
1369 {
1370   struct ipcp *ipcp = &arg->bundle->ncp.ipcp;
1371   const char *hisaddr;
1372 
1373   if (arg->argc > arg->argn + 4)
1374     return -1;
1375 
1376   hisaddr = NULL;
1377   memset(&ipcp->cfg.my_range, '\0', sizeof ipcp->cfg.my_range);
1378   memset(&ipcp->cfg.peer_range, '\0', sizeof ipcp->cfg.peer_range);
1379   ipcp->cfg.HaveTriggerAddress = 0;
1380   ipcp->cfg.netmask.s_addr = INADDR_ANY;
1381   iplist_reset(&ipcp->cfg.peer_list);
1382 
1383   if (arg->argc > arg->argn) {
1384     if (!ParseAddr(ipcp, arg->argv[arg->argn],
1385                    &ipcp->cfg.my_range.ipaddr, &ipcp->cfg.my_range.mask,
1386                    &ipcp->cfg.my_range.width))
1387       return 1;
1388     if (arg->argc > arg->argn+1) {
1389       hisaddr = arg->argv[arg->argn+1];
1390       if (arg->argc > arg->argn+2) {
1391         ipcp->ifmask = ipcp->cfg.netmask = GetIpAddr(arg->argv[arg->argn+2]);
1392 	if (arg->argc > arg->argn+3) {
1393 	  ipcp->cfg.TriggerAddress = GetIpAddr(arg->argv[arg->argn+3]);
1394 	  ipcp->cfg.HaveTriggerAddress = 1;
1395 	}
1396       }
1397     }
1398   }
1399 
1400   /* 0.0.0.0 means any address (0 bits) */
1401   if (ipcp->cfg.my_range.ipaddr.s_addr == INADDR_ANY) {
1402     ipcp->cfg.my_range.mask.s_addr = INADDR_ANY;
1403     ipcp->cfg.my_range.width = 0;
1404   }
1405   ipcp->my_ip.s_addr = ipcp->cfg.my_range.ipaddr.s_addr;
1406   bundle_AdjustFilters(arg->bundle, &ipcp->my_ip, NULL);
1407 
1408   if (hisaddr && !ipcp_UseHisaddr(arg->bundle, hisaddr,
1409                                   arg->bundle->phys_type.all & PHYS_AUTO))
1410     return 4;
1411 
1412   return 0;
1413 }
1414 
1415 static int
1416 SetRetry(int argc, char const *const *argv, u_int *timeout, u_int *maxreq,
1417           u_int *maxtrm, int def)
1418 {
1419   if (argc == 0) {
1420     *timeout = DEF_FSMRETRY;
1421     *maxreq = def;
1422     if (maxtrm != NULL)
1423       *maxtrm = def;
1424   } else {
1425     long l = atol(argv[0]);
1426 
1427     if (l < MIN_FSMRETRY) {
1428       log_Printf(LogWARN, "%ld: Invalid FSM retry period - min %d\n",
1429                  l, MIN_FSMRETRY);
1430       return 1;
1431     } else
1432       *timeout = l;
1433 
1434     if (argc > 1) {
1435       l = atol(argv[1]);
1436       if (l < 1) {
1437         log_Printf(LogWARN, "%ld: Invalid FSM REQ tries - changed to 1\n", l);
1438         l = 1;
1439       }
1440       *maxreq = l;
1441 
1442       if (argc > 2 && maxtrm != NULL) {
1443         l = atol(argv[2]);
1444         if (l < 1) {
1445           log_Printf(LogWARN, "%ld: Invalid FSM TRM tries - changed to 1\n", l);
1446           l = 1;
1447         }
1448         *maxtrm = l;
1449       }
1450     }
1451   }
1452 
1453   return 0;
1454 }
1455 
1456 static int
1457 SetVariable(struct cmdargs const *arg)
1458 {
1459   long long_val, param = (long)arg->cmd->args;
1460   int mode, dummyint, f, first;
1461   const char *argp;
1462   struct datalink *cx = arg->cx;	/* LOCAL_CX uses this */
1463   const char *err = NULL;
1464   struct link *l = command_ChooseLink(arg);	/* LOCAL_CX_OPT uses this */
1465   struct in_addr dummyaddr, *addr;
1466 
1467   if (arg->argc > arg->argn)
1468     argp = arg->argv[arg->argn];
1469   else
1470     argp = "";
1471 
1472   if ((arg->cmd->lauth & LOCAL_CX) && !cx) {
1473     log_Printf(LogWARN, "set %s: No context (use the `link' command)\n",
1474               arg->cmd->name);
1475     return 1;
1476   } else if (cx && !(arg->cmd->lauth & (LOCAL_CX|LOCAL_CX_OPT))) {
1477     log_Printf(LogWARN, "set %s: Redundant context (%s) ignored\n",
1478               arg->cmd->name, cx->name);
1479     cx = NULL;
1480   }
1481 
1482   switch (param) {
1483   case VAR_AUTHKEY:
1484     strncpy(arg->bundle->cfg.auth.key, argp,
1485             sizeof arg->bundle->cfg.auth.key - 1);
1486     arg->bundle->cfg.auth.key[sizeof arg->bundle->cfg.auth.key - 1] = '\0';
1487     break;
1488 
1489   case VAR_AUTHNAME:
1490     switch (bundle_Phase(arg->bundle)) {
1491       default:
1492         log_Printf(LogWARN, "Altering authname while at phase %s\n",
1493                    bundle_PhaseName(arg->bundle));
1494         /* drop through */
1495       case PHASE_DEAD:
1496       case PHASE_ESTABLISH:
1497         strncpy(arg->bundle->cfg.auth.name, argp,
1498                 sizeof arg->bundle->cfg.auth.name - 1);
1499         arg->bundle->cfg.auth.name[sizeof arg->bundle->cfg.auth.name-1] = '\0';
1500         break;
1501     }
1502     break;
1503 
1504   case VAR_AUTOLOAD:
1505     if (arg->argc == arg->argn + 3) {
1506       int v1, v2, v3;
1507       char *end;
1508 
1509       v1 = strtol(arg->argv[arg->argn], &end, 0);
1510       if (v1 < 0 || *end) {
1511         log_Printf(LogWARN, "autoload: %s: Invalid min percentage\n",
1512                    arg->argv[arg->argn]);
1513         return 1;
1514       }
1515 
1516       v2 = strtol(arg->argv[arg->argn + 1], &end, 0);
1517       if (v2 < 0 || *end) {
1518         log_Printf(LogWARN, "autoload: %s: Invalid max percentage\n",
1519                    arg->argv[arg->argn + 1]);
1520         return 1;
1521       }
1522       if (v2 < v1) {
1523         v3 = v1;
1524         v1 = v2;
1525         v2 = v3;
1526       }
1527 
1528       v3 = strtol(arg->argv[arg->argn + 2], &end, 0);
1529       if (v3 <= 0 || *end) {
1530         log_Printf(LogWARN, "autoload: %s: Invalid throughput period\n",
1531                    arg->argv[arg->argn + 2]);
1532         return 1;
1533       }
1534 
1535       arg->bundle->ncp.mp.cfg.autoload.min = v1;
1536       arg->bundle->ncp.mp.cfg.autoload.max = v2;
1537       arg->bundle->ncp.mp.cfg.autoload.period = v3;
1538       mp_RestartAutoloadTimer(&arg->bundle->ncp.mp);
1539     } else {
1540       err = "Set autoload requires three arguments\n";
1541       log_Printf(LogWARN, err);
1542     }
1543     break;
1544 
1545   case VAR_DIAL:
1546     strncpy(cx->cfg.script.dial, argp, sizeof cx->cfg.script.dial - 1);
1547     cx->cfg.script.dial[sizeof cx->cfg.script.dial - 1] = '\0';
1548     break;
1549 
1550   case VAR_LOGIN:
1551     strncpy(cx->cfg.script.login, argp, sizeof cx->cfg.script.login - 1);
1552     cx->cfg.script.login[sizeof cx->cfg.script.login - 1] = '\0';
1553     break;
1554 
1555   case VAR_WINSIZE:
1556     if (arg->argc > arg->argn) {
1557       l->ccp.cfg.deflate.out.winsize = atoi(arg->argv[arg->argn]);
1558       if (l->ccp.cfg.deflate.out.winsize < 8 ||
1559           l->ccp.cfg.deflate.out.winsize > 15) {
1560           log_Printf(LogWARN, "%d: Invalid outgoing window size\n",
1561                     l->ccp.cfg.deflate.out.winsize);
1562           l->ccp.cfg.deflate.out.winsize = 15;
1563       }
1564       if (arg->argc > arg->argn+1) {
1565         l->ccp.cfg.deflate.in.winsize = atoi(arg->argv[arg->argn+1]);
1566         if (l->ccp.cfg.deflate.in.winsize < 8 ||
1567             l->ccp.cfg.deflate.in.winsize > 15) {
1568             log_Printf(LogWARN, "%d: Invalid incoming window size\n",
1569                       l->ccp.cfg.deflate.in.winsize);
1570             l->ccp.cfg.deflate.in.winsize = 15;
1571         }
1572       } else
1573         l->ccp.cfg.deflate.in.winsize = 0;
1574     } else {
1575       err = "No window size specified\n";
1576       log_Printf(LogWARN, err);
1577     }
1578     break;
1579 
1580 #ifdef HAVE_DES
1581   case VAR_KEYBITS:
1582     if (arg->argc > arg->argn) {
1583       l->ccp.cfg.mppe.keybits = atoi(arg->argv[arg->argn]);
1584       if (l->ccp.cfg.mppe.keybits != 40 &&
1585           l->ccp.cfg.mppe.keybits != 56 &&
1586           l->ccp.cfg.mppe.keybits != 128 ) {
1587         log_Printf(LogWARN, "%d: Invalid bits number\n",
1588                   l->ccp.cfg.mppe.keybits);
1589         l->ccp.cfg.mppe.keybits = 40;
1590       }
1591     } else {
1592       err = "No bits number pecified\n";
1593       log_Printf(LogWARN, err);
1594     }
1595     break;
1596 #endif
1597 
1598   case VAR_DEVICE:
1599     physical_SetDeviceList(cx->physical, arg->argc - arg->argn,
1600                            arg->argv + arg->argn);
1601     break;
1602 
1603   case VAR_ACCMAP:
1604     if (arg->argc > arg->argn) {
1605       u_long ulong_val;
1606       sscanf(argp, "%lx", &ulong_val);
1607       cx->physical->link.lcp.cfg.accmap = (u_int32_t)ulong_val;
1608     } else {
1609       err = "No accmap specified\n";
1610       log_Printf(LogWARN, err);
1611     }
1612     break;
1613 
1614   case VAR_MODE:
1615     mode = Nam2mode(argp);
1616     if (mode == PHYS_NONE || mode == PHYS_ALL) {
1617       log_Printf(LogWARN, "%s: Invalid mode\n", argp);
1618       return -1;
1619     }
1620     bundle_SetMode(arg->bundle, cx, mode);
1621     break;
1622 
1623   case VAR_MRRU:
1624     switch (bundle_Phase(arg->bundle)) {
1625       case PHASE_DEAD:
1626         break;
1627       case PHASE_ESTABLISH:
1628         /* Make sure none of our links are DATALINK_LCP or greater */
1629         if (bundle_HighestState(arg->bundle) >= DATALINK_LCP) {
1630           log_Printf(LogWARN, "mrru: Only changable before LCP negotiations\n");
1631           return 1;
1632         }
1633         break;
1634       default:
1635         log_Printf(LogWARN, "mrru: Only changable at phase DEAD/ESTABLISH\n");
1636         return 1;
1637     }
1638     long_val = atol(argp);
1639     if (long_val && long_val < MIN_MRU) {
1640       log_Printf(LogWARN, "MRRU %ld: too small - min %d\n", long_val, MIN_MRU);
1641       return 1;
1642     } else if (long_val > MAX_MRU) {
1643       log_Printf(LogWARN, "MRRU %ld: too big - max %d\n", long_val, MAX_MRU);
1644       return 1;
1645     } else
1646       arg->bundle->ncp.mp.cfg.mrru = long_val;
1647     break;
1648 
1649   case VAR_MRU:
1650     long_val = atol(argp);
1651     if (long_val == 0)
1652       l->lcp.cfg.mru = DEF_MRU;
1653     else if (long_val < MIN_MRU) {
1654       log_Printf(LogWARN, "MRU %ld: too small - min %d\n", long_val, MIN_MRU);
1655       return 1;
1656     } else if (long_val > MAX_MRU) {
1657       log_Printf(LogWARN, "MRU %ld: too big - max %d\n", long_val, MAX_MRU);
1658       return 1;
1659     } else
1660       l->lcp.cfg.mru = long_val;
1661     break;
1662 
1663   case VAR_MTU:
1664     long_val = atol(argp);
1665     if (long_val && long_val < MIN_MTU) {
1666       log_Printf(LogWARN, "MTU %ld: too small - min %d\n", long_val, MIN_MTU);
1667       return 1;
1668     } else if (long_val > MAX_MTU) {
1669       log_Printf(LogWARN, "MTU %ld: too big - max %d\n", long_val, MAX_MTU);
1670       return 1;
1671     } else
1672       arg->bundle->cfg.mtu = long_val;
1673     break;
1674 
1675   case VAR_OPENMODE:
1676     if (strcasecmp(argp, "active") == 0)
1677       cx->physical->link.lcp.cfg.openmode = arg->argc > arg->argn+1 ?
1678         atoi(arg->argv[arg->argn+1]) : 1;
1679     else if (strcasecmp(argp, "passive") == 0)
1680       cx->physical->link.lcp.cfg.openmode = OPEN_PASSIVE;
1681     else {
1682       err = "%s: Invalid openmode\n";
1683       log_Printf(LogWARN, err, argp);
1684     }
1685     break;
1686 
1687   case VAR_PHONE:
1688     strncpy(cx->cfg.phone.list, argp, sizeof cx->cfg.phone.list - 1);
1689     cx->cfg.phone.list[sizeof cx->cfg.phone.list - 1] = '\0';
1690     cx->phone.alt = cx->phone.next = NULL;
1691     break;
1692 
1693   case VAR_HANGUP:
1694     strncpy(cx->cfg.script.hangup, argp, sizeof cx->cfg.script.hangup - 1);
1695     cx->cfg.script.hangup[sizeof cx->cfg.script.hangup - 1] = '\0';
1696     break;
1697 
1698   case VAR_IFQUEUE:
1699     long_val = atol(argp);
1700     arg->bundle->cfg.ifqueue = long_val < 0 ? 0 : long_val;
1701     break;
1702 
1703   case VAR_LOGOUT:
1704     strncpy(cx->cfg.script.logout, argp, sizeof cx->cfg.script.logout - 1);
1705     cx->cfg.script.logout[sizeof cx->cfg.script.logout - 1] = '\0';
1706     break;
1707 
1708   case VAR_IDLETIMEOUT:
1709     if (arg->argc > arg->argn+2)
1710       err = "Too many idle timeout values\n";
1711     else if (arg->argc == arg->argn)
1712       err = "Too few idle timeout values\n";
1713     else {
1714       int timeout, min;
1715 
1716       timeout = atoi(argp);
1717       min = arg->argc == arg->argn + 2 ? atoi(arg->argv[arg->argn + 1]) : -1;
1718       bundle_SetIdleTimer(arg->bundle, timeout, min);
1719     }
1720     if (err)
1721       log_Printf(LogWARN, err);
1722     break;
1723 
1724   case VAR_LQRPERIOD:
1725     long_val = atol(argp);
1726     if (long_val < MIN_LQRPERIOD) {
1727       log_Printf(LogWARN, "%ld: Invalid lqr period - min %d\n",
1728                  long_val, MIN_LQRPERIOD);
1729       return 1;
1730     } else
1731       l->lcp.cfg.lqrperiod = long_val;
1732     break;
1733 
1734   case VAR_LCPRETRY:
1735     return SetRetry(arg->argc - arg->argn, arg->argv + arg->argn,
1736                     &cx->physical->link.lcp.cfg.fsm.timeout,
1737                     &cx->physical->link.lcp.cfg.fsm.maxreq,
1738                     &cx->physical->link.lcp.cfg.fsm.maxtrm, DEF_FSMTRIES);
1739     break;
1740 
1741   case VAR_CHAPRETRY:
1742     return SetRetry(arg->argc - arg->argn, arg->argv + arg->argn,
1743                     &cx->chap.auth.cfg.fsm.timeout,
1744                     &cx->chap.auth.cfg.fsm.maxreq, NULL, DEF_FSMAUTHTRIES);
1745     break;
1746 
1747   case VAR_PAPRETRY:
1748     return SetRetry(arg->argc - arg->argn, arg->argv + arg->argn,
1749                     &cx->pap.cfg.fsm.timeout, &cx->pap.cfg.fsm.maxreq,
1750                     NULL, DEF_FSMAUTHTRIES);
1751     break;
1752 
1753   case VAR_CCPRETRY:
1754     return SetRetry(arg->argc - arg->argn, arg->argv + arg->argn,
1755                     &l->ccp.cfg.fsm.timeout, &l->ccp.cfg.fsm.maxreq,
1756                     &l->ccp.cfg.fsm.maxtrm, DEF_FSMTRIES);
1757     break;
1758 
1759   case VAR_IPCPRETRY:
1760     return SetRetry(arg->argc - arg->argn, arg->argv + arg->argn,
1761                     &arg->bundle->ncp.ipcp.cfg.fsm.timeout,
1762                     &arg->bundle->ncp.ipcp.cfg.fsm.maxreq,
1763                     &arg->bundle->ncp.ipcp.cfg.fsm.maxtrm, DEF_FSMTRIES);
1764     break;
1765 
1766   case VAR_NBNS:
1767   case VAR_DNS:
1768     if (param == VAR_DNS) {
1769       addr = arg->bundle->ncp.ipcp.cfg.ns.dns;
1770       addr[0].s_addr = addr[1].s_addr = INADDR_NONE;
1771     } else {
1772       addr = arg->bundle->ncp.ipcp.cfg.ns.nbns;
1773       addr[0].s_addr = addr[1].s_addr = INADDR_ANY;
1774     }
1775 
1776     if (arg->argc > arg->argn) {
1777       ParseAddr(&arg->bundle->ncp.ipcp, arg->argv[arg->argn],
1778                 addr, &dummyaddr, &dummyint);
1779       if (arg->argc > arg->argn+1)
1780         ParseAddr(&arg->bundle->ncp.ipcp, arg->argv[arg->argn + 1],
1781                   addr + 1, &dummyaddr, &dummyint);
1782 
1783       if (addr[0].s_addr == INADDR_ANY) {
1784         addr[0].s_addr = addr[1].s_addr;
1785         addr[1].s_addr = INADDR_ANY;
1786       }
1787       if (addr[0].s_addr == INADDR_NONE) {
1788         addr[0].s_addr = addr[1].s_addr;
1789         addr[1].s_addr = INADDR_NONE;
1790       }
1791     }
1792     break;
1793 
1794   case VAR_CALLBACK:
1795     cx->cfg.callback.opmask = 0;
1796     for (dummyint = arg->argn; dummyint < arg->argc; dummyint++) {
1797       if (!strcasecmp(arg->argv[dummyint], "auth"))
1798         cx->cfg.callback.opmask |= CALLBACK_BIT(CALLBACK_AUTH);
1799       else if (!strcasecmp(arg->argv[dummyint], "cbcp"))
1800         cx->cfg.callback.opmask |= CALLBACK_BIT(CALLBACK_CBCP);
1801       else if (!strcasecmp(arg->argv[dummyint], "e.164")) {
1802         if (dummyint == arg->argc - 1)
1803           log_Printf(LogWARN, "No E.164 arg (E.164 ignored) !\n");
1804         else {
1805           cx->cfg.callback.opmask |= CALLBACK_BIT(CALLBACK_E164);
1806           strncpy(cx->cfg.callback.msg, arg->argv[++dummyint],
1807                   sizeof cx->cfg.callback.msg - 1);
1808           cx->cfg.callback.msg[sizeof cx->cfg.callback.msg - 1] = '\0';
1809         }
1810       } else if (!strcasecmp(arg->argv[dummyint], "none"))
1811         cx->cfg.callback.opmask |= CALLBACK_BIT(CALLBACK_NONE);
1812       else
1813         return -1;
1814     }
1815     if (cx->cfg.callback.opmask == CALLBACK_BIT(CALLBACK_NONE))
1816       cx->cfg.callback.opmask = 0;
1817     break;
1818 
1819   case VAR_CBCP:
1820     cx->cfg.cbcp.delay = 0;
1821     *cx->cfg.cbcp.phone = '\0';
1822     cx->cfg.cbcp.fsmretry = DEF_FSMRETRY;
1823     if (arg->argc > arg->argn) {
1824       strncpy(cx->cfg.cbcp.phone, arg->argv[arg->argn],
1825               sizeof cx->cfg.cbcp.phone - 1);
1826       cx->cfg.cbcp.phone[sizeof cx->cfg.cbcp.phone - 1] = '\0';
1827       if (arg->argc > arg->argn + 1) {
1828         cx->cfg.cbcp.delay = atoi(arg->argv[arg->argn + 1]);
1829         if (arg->argc > arg->argn + 2) {
1830           long_val = atol(arg->argv[arg->argn + 2]);
1831           if (long_val < MIN_FSMRETRY)
1832             log_Printf(LogWARN, "%ld: Invalid CBCP FSM retry period - min %d\n",
1833                        long_val, MIN_FSMRETRY);
1834           else
1835             cx->cfg.cbcp.fsmretry = long_val;
1836         }
1837       }
1838     }
1839     break;
1840 
1841   case VAR_CHOKED:
1842     arg->bundle->cfg.choked.timeout = atoi(argp);
1843     if (arg->bundle->cfg.choked.timeout <= 0)
1844       arg->bundle->cfg.choked.timeout = CHOKED_TIMEOUT;
1845     break;
1846 
1847   case VAR_SENDPIPE:
1848     long_val = atol(argp);
1849     arg->bundle->ncp.ipcp.cfg.sendpipe = long_val;
1850     break;
1851 
1852   case VAR_RECVPIPE:
1853     long_val = atol(argp);
1854     arg->bundle->ncp.ipcp.cfg.recvpipe = long_val;
1855     break;
1856 
1857 #ifndef NORADIUS
1858   case VAR_RADIUS:
1859     if (!*argp)
1860       *arg->bundle->radius.cfg.file = '\0';
1861     else if (access(argp, R_OK)) {
1862       log_Printf(LogWARN, "%s: %s\n", argp, strerror(errno));
1863       return 1;
1864     } else {
1865       strncpy(arg->bundle->radius.cfg.file, argp,
1866               sizeof arg->bundle->radius.cfg.file - 1);
1867       arg->bundle->radius.cfg.file
1868         [sizeof arg->bundle->radius.cfg.file - 1] = '\0';
1869     }
1870     break;
1871 #endif
1872 
1873   case VAR_CD:
1874     if (*argp) {
1875       if (strcasecmp(argp, "off")) {
1876         long_val = atol(argp);
1877         if (long_val < 0)
1878           long_val = 0;
1879         cx->physical->cfg.cd.delay = long_val;
1880         cx->physical->cfg.cd.necessity = argp[strlen(argp)-1] == '!' ?
1881           CD_REQUIRED : CD_VARIABLE;
1882       } else
1883         cx->physical->cfg.cd.necessity = CD_NOTREQUIRED;
1884     } else {
1885       cx->physical->cfg.cd.delay = 0;
1886       cx->physical->cfg.cd.necessity = CD_DEFAULT;
1887     }
1888     break;
1889 
1890   case VAR_PARITY:
1891     if (arg->argc == arg->argn + 1)
1892       return physical_SetParity(arg->cx->physical, argp);
1893     else {
1894       err = "Parity value must be odd, even or none\n";
1895       log_Printf(LogWARN, err);
1896     }
1897     break;
1898 
1899   case VAR_CRTSCTS:
1900     if (strcasecmp(argp, "on") == 0)
1901       physical_SetRtsCts(arg->cx->physical, 1);
1902     else if (strcasecmp(argp, "off") == 0)
1903       physical_SetRtsCts(arg->cx->physical, 0);
1904     else {
1905       err = "RTS/CTS value must be on or off\n";
1906       log_Printf(LogWARN, err);
1907     }
1908     break;
1909 
1910   case VAR_URGENTPORTS:
1911     if (arg->argn == arg->argc) {
1912       ipcp_SetUrgentTOS(&arg->bundle->ncp.ipcp);
1913       ipcp_ClearUrgentTcpPorts(&arg->bundle->ncp.ipcp);
1914       ipcp_ClearUrgentUdpPorts(&arg->bundle->ncp.ipcp);
1915     } else if (!strcasecmp(arg->argv[arg->argn], "udp")) {
1916       ipcp_SetUrgentTOS(&arg->bundle->ncp.ipcp);
1917       if (arg->argn == arg->argc - 1)
1918         ipcp_ClearUrgentUdpPorts(&arg->bundle->ncp.ipcp);
1919       else for (f = arg->argn + 1; f < arg->argc; f++)
1920         if (*arg->argv[f] == '+')
1921           ipcp_AddUrgentUdpPort(&arg->bundle->ncp.ipcp, atoi(arg->argv[f] + 1));
1922         else if (*arg->argv[f] == '-')
1923           ipcp_RemoveUrgentUdpPort(&arg->bundle->ncp.ipcp,
1924                                    atoi(arg->argv[f] + 1));
1925         else {
1926           if (f == arg->argn)
1927             ipcp_ClearUrgentUdpPorts(&arg->bundle->ncp.ipcp);
1928           ipcp_AddUrgentUdpPort(&arg->bundle->ncp.ipcp, atoi(arg->argv[f]));
1929         }
1930     } else if (arg->argn == arg->argc - 1 &&
1931                !strcasecmp(arg->argv[arg->argn], "none")) {
1932       ipcp_ClearUrgentTcpPorts(&arg->bundle->ncp.ipcp);
1933       ipcp_ClearUrgentUdpPorts(&arg->bundle->ncp.ipcp);
1934       ipcp_ClearUrgentTOS(&arg->bundle->ncp.ipcp);
1935     } else {
1936       ipcp_SetUrgentTOS(&arg->bundle->ncp.ipcp);
1937       first = arg->argn;
1938       if (!strcasecmp(arg->argv[first], "tcp") && ++first == arg->argc)
1939         ipcp_ClearUrgentTcpPorts(&arg->bundle->ncp.ipcp);
1940 
1941       for (f = first; f < arg->argc; f++)
1942         if (*arg->argv[f] == '+')
1943           ipcp_AddUrgentTcpPort(&arg->bundle->ncp.ipcp, atoi(arg->argv[f] + 1));
1944         else if (*arg->argv[f] == '-')
1945           ipcp_RemoveUrgentTcpPort(&arg->bundle->ncp.ipcp,
1946                                    atoi(arg->argv[f] + 1));
1947         else {
1948           if (f == first)
1949             ipcp_ClearUrgentTcpPorts(&arg->bundle->ncp.ipcp);
1950           ipcp_AddUrgentTcpPort(&arg->bundle->ncp.ipcp, atoi(arg->argv[f]));
1951         }
1952     }
1953     break;
1954   }
1955 
1956   return err ? 1 : 0;
1957 }
1958 
1959 static struct cmdtab const SetCommands[] = {
1960   {"accmap", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX,
1961   "accmap value", "set accmap hex-value", (const void *)VAR_ACCMAP},
1962   {"authkey", "key", SetVariable, LOCAL_AUTH,
1963   "authentication key", "set authkey|key key", (const void *)VAR_AUTHKEY},
1964   {"authname", NULL, SetVariable, LOCAL_AUTH,
1965   "authentication name", "set authname name", (const void *)VAR_AUTHNAME},
1966   {"autoload", NULL, SetVariable, LOCAL_AUTH,
1967   "auto link [de]activation", "set autoload maxtime maxload mintime minload",
1968   (const void *)VAR_AUTOLOAD},
1969   {"bandwidth", NULL, mp_SetDatalinkBandwidth, LOCAL_AUTH | LOCAL_CX,
1970   "datalink bandwidth", "set bandwidth value"},
1971   {"callback", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX,
1972   "callback control", "set callback [none|auth|cbcp|"
1973   "E.164 *|number[,number]...]...", (const void *)VAR_CALLBACK},
1974   {"cbcp", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX,
1975   "CBCP control", "set cbcp [*|phone[,phone...] [delay [timeout]]]",
1976   (const void *)VAR_CBCP},
1977   {"ccpretry", "ccpretries", SetVariable, LOCAL_AUTH | LOCAL_CX_OPT,
1978    "CCP retries", "set ccpretry value [attempts]", (const void *)VAR_CCPRETRY},
1979   {"cd", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX, "Carrier delay requirement",
1980    "set cd value[!]", (const void *)VAR_CD},
1981   {"chapretry", "chapretries", SetVariable, LOCAL_AUTH | LOCAL_CX,
1982    "CHAP retries", "set chapretry value [attempts]",
1983    (const void *)VAR_CHAPRETRY},
1984   {"choked", NULL, SetVariable, LOCAL_AUTH,
1985   "choked timeout", "set choked [secs]", (const void *)VAR_CHOKED},
1986   {"ctsrts", "crtscts", SetVariable, LOCAL_AUTH | LOCAL_CX,
1987    "Use hardware flow control", "set ctsrts [on|off]",
1988    (const char *)VAR_CRTSCTS},
1989   {"deflate", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX_OPT,
1990   "deflate window sizes", "set deflate out-winsize in-winsize",
1991   (const void *) VAR_WINSIZE},
1992 #ifdef HAVE_DES
1993   {"mppe", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX_OPT,
1994   "MPPE key size", "set mppe {40|56|128}",
1995   (const void *) VAR_KEYBITS},
1996 #endif
1997   {"device", "line", SetVariable, LOCAL_AUTH | LOCAL_CX,
1998   "physical device name", "set device|line device-name[,device-name]",
1999   (const void *) VAR_DEVICE},
2000   {"dial", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX,
2001   "dialing script", "set dial chat-script", (const void *) VAR_DIAL},
2002   {"dns", NULL, SetVariable, LOCAL_AUTH, "Domain Name Server",
2003   "set dns pri-addr [sec-addr]", (const void *)VAR_DNS},
2004   {"enddisc", NULL, mp_SetEnddisc, LOCAL_AUTH,
2005   "Endpoint Discriminator", "set enddisc [IP|magic|label|psn value]"},
2006   {"escape", NULL, SetEscape, LOCAL_AUTH | LOCAL_CX,
2007   "escape characters", "set escape hex-digit ..."},
2008   {"filter", NULL, filter_Set, LOCAL_AUTH,
2009   "packet filters", "set filter alive|dial|in|out rule-no permit|deny "
2010   "[src_addr[/width]] [dst_addr[/width]] [tcp|udp|icmp|ospf|igmp "
2011   "[src [lt|eq|gt port]] [dst [lt|eq|gt port]] [estab] [syn] [finrst]]"},
2012   {"hangup", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX,
2013   "hangup script", "set hangup chat-script", (const void *) VAR_HANGUP},
2014   {"ifaddr", NULL, SetInterfaceAddr, LOCAL_AUTH, "destination address",
2015   "set ifaddr [src-addr [dst-addr [netmask [trg-addr]]]]"},
2016   {"ifqueue", NULL, SetVariable, LOCAL_AUTH, "interface queue",
2017   "set ifqueue packets", (const void *)VAR_IFQUEUE},
2018   {"ipcpretry", "ipcpretries", SetVariable, LOCAL_AUTH, "IPCP retries",
2019    "set ipcpretry value [attempts]", (const void *)VAR_IPCPRETRY},
2020   {"lcpretry", "lcpretries", SetVariable, LOCAL_AUTH | LOCAL_CX, "LCP retries",
2021    "set lcpretry value [attempts]", (const void *)VAR_LCPRETRY},
2022   {"log", NULL, log_SetLevel, LOCAL_AUTH, "log level",
2023   "set log [local] [+|-]all|async|cbcp|ccp|chat|command|connect|debug|dns|hdlc|"
2024   "id0|ipcp|lcp|lqm|phase|physical|sync|tcp/ip|timer|tun..."},
2025   {"login", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX,
2026   "login script", "set login chat-script", (const void *) VAR_LOGIN},
2027   {"logout", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX,
2028   "logout script", "set logout chat-script", (const void *) VAR_LOGOUT},
2029   {"lqrperiod", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX_OPT,
2030   "LQR period", "set lqrperiod value", (const void *)VAR_LQRPERIOD},
2031   {"mode", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX, "mode value",
2032   "set mode interactive|auto|ddial|background", (const void *)VAR_MODE},
2033   {"mrru", NULL, SetVariable, LOCAL_AUTH, "MRRU value",
2034   "set mrru value", (const void *)VAR_MRRU},
2035   {"mru", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX_OPT,
2036   "MRU value", "set mru value", (const void *)VAR_MRU},
2037   {"mtu", NULL, SetVariable, LOCAL_AUTH,
2038   "interface MTU value", "set mtu value", (const void *)VAR_MTU},
2039   {"nbns", NULL, SetVariable, LOCAL_AUTH, "NetBIOS Name Server",
2040   "set nbns pri-addr [sec-addr]", (const void *)VAR_NBNS},
2041   {"openmode", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX, "open mode",
2042   "set openmode active|passive [secs]", (const void *)VAR_OPENMODE},
2043   {"papretry", "papretries", SetVariable, LOCAL_AUTH | LOCAL_CX, "PAP retries",
2044    "set papretry value [attempts]", (const void *)VAR_PAPRETRY},
2045   {"parity", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX, "serial parity",
2046    "set parity [odd|even|none]", (const void *)VAR_PARITY},
2047   {"phone", NULL, SetVariable, LOCAL_AUTH | LOCAL_CX, "telephone number(s)",
2048   "set phone phone1[:phone2[...]]", (const void *)VAR_PHONE},
2049   {"proctitle", "title", SetProcTitle, LOCAL_AUTH,
2050   "Process title", "set proctitle [value]"},
2051 #ifndef NORADIUS
2052   {"radius", NULL, SetVariable, LOCAL_AUTH,
2053   "RADIUS Config", "set radius cfgfile", (const void *)VAR_RADIUS},
2054 #endif
2055   {"reconnect", NULL, datalink_SetReconnect, LOCAL_AUTH | LOCAL_CX,
2056   "Reconnect timeout", "set reconnect value ntries"},
2057   {"recvpipe", NULL, SetVariable, LOCAL_AUTH,
2058   "RECVPIPE value", "set recvpipe value", (const void *)VAR_RECVPIPE},
2059   {"redial", NULL, datalink_SetRedial, LOCAL_AUTH | LOCAL_CX,
2060   "Redial timeout", "set redial secs[+inc[-incmax]][.next] [attempts]"},
2061   {"sendpipe", NULL, SetVariable, LOCAL_AUTH,
2062   "SENDPIPE value", "set sendpipe value", (const void *)VAR_SENDPIPE},
2063   {"server", "socket", SetServer, LOCAL_AUTH,
2064   "server port", "set server|socket TcpPort|LocalName|none password [mask]"},
2065   {"speed", NULL, SetModemSpeed, LOCAL_AUTH | LOCAL_CX,
2066   "physical speed", "set speed value|sync"},
2067   {"stopped", NULL, SetStoppedTimeout, LOCAL_AUTH | LOCAL_CX,
2068   "STOPPED timeouts", "set stopped [LCPseconds [CCPseconds]]"},
2069   {"timeout", NULL, SetVariable, LOCAL_AUTH, "Idle timeout",
2070   "set timeout idletime", (const void *)VAR_IDLETIMEOUT},
2071   {"urgent", NULL, SetVariable, LOCAL_AUTH, "urgent ports",
2072   "set urgent [tcp|udp] [+|-]port...", (const void *)VAR_URGENTPORTS},
2073   {"vj", NULL, ipcp_vjset, LOCAL_AUTH,
2074   "vj values", "set vj slots|slotcomp [value]"},
2075   {"help", "?", HelpCommand, LOCAL_AUTH | LOCAL_NO_AUTH,
2076   "Display this message", "set help|? [command]", SetCommands},
2077   {NULL, NULL, NULL},
2078 };
2079 
2080 static int
2081 SetCommand(struct cmdargs const *arg)
2082 {
2083   if (arg->argc > arg->argn)
2084     FindExec(arg->bundle, SetCommands, arg->argc, arg->argn, arg->argv,
2085              arg->prompt, arg->cx);
2086   else if (arg->prompt)
2087     prompt_Printf(arg->prompt, "Use `set ?' to get a list or `set ? <var>' for"
2088 	          " syntax help.\n");
2089   else
2090     log_Printf(LogWARN, "set command must have arguments\n");
2091 
2092   return 0;
2093 }
2094 
2095 static int
2096 AddCommand(struct cmdargs const *arg)
2097 {
2098   struct in_addr dest, gateway, netmask;
2099   int gw, addrs;
2100 
2101   if (arg->argc != arg->argn+3 && arg->argc != arg->argn+2)
2102     return -1;
2103 
2104   addrs = 0;
2105   if (arg->argc == arg->argn+2) {
2106     if (!strcasecmp(arg->argv[arg->argn], "default"))
2107       dest.s_addr = netmask.s_addr = INADDR_ANY;
2108     else {
2109       int width;
2110 
2111       if (!ParseAddr(&arg->bundle->ncp.ipcp, arg->argv[arg->argn],
2112 	             &dest, &netmask, &width))
2113         return -1;
2114       if (!strncasecmp(arg->argv[arg->argn], "MYADDR", 6))
2115         addrs = ROUTE_DSTMYADDR;
2116       else if (!strncasecmp(arg->argv[arg->argn], "HISADDR", 7))
2117         addrs = ROUTE_DSTHISADDR;
2118       else if (!strncasecmp(arg->argv[arg->argn], "DNS0", 4))
2119         addrs = ROUTE_DSTDNS0;
2120       else if (!strncasecmp(arg->argv[arg->argn], "DNS1", 4))
2121         addrs = ROUTE_DSTDNS1;
2122     }
2123     gw = 1;
2124   } else {
2125     if (strcasecmp(arg->argv[arg->argn], "MYADDR") == 0) {
2126       addrs = ROUTE_DSTMYADDR;
2127       dest = arg->bundle->ncp.ipcp.my_ip;
2128     } else if (strcasecmp(arg->argv[arg->argn], "HISADDR") == 0) {
2129       addrs = ROUTE_DSTHISADDR;
2130       dest = arg->bundle->ncp.ipcp.peer_ip;
2131     } else if (strcasecmp(arg->argv[arg->argn], "DNS0") == 0) {
2132       addrs = ROUTE_DSTDNS0;
2133       dest = arg->bundle->ncp.ipcp.ns.dns[0];
2134     } else if (strcasecmp(arg->argv[arg->argn], "DNS1") == 0) {
2135       addrs = ROUTE_DSTDNS1;
2136       dest = arg->bundle->ncp.ipcp.ns.dns[1];
2137     } else {
2138       dest = GetIpAddr(arg->argv[arg->argn]);
2139       if (dest.s_addr == INADDR_NONE) {
2140         log_Printf(LogWARN, "%s: Invalid destination address\n",
2141                    arg->argv[arg->argn]);
2142         return -1;
2143       }
2144     }
2145     netmask = GetIpAddr(arg->argv[arg->argn+1]);
2146     gw = 2;
2147   }
2148 
2149   if (strcasecmp(arg->argv[arg->argn+gw], "HISADDR") == 0) {
2150     gateway = arg->bundle->ncp.ipcp.peer_ip;
2151     addrs |= ROUTE_GWHISADDR;
2152   } else {
2153     gateway = GetIpAddr(arg->argv[arg->argn+gw]);
2154     if (gateway.s_addr == INADDR_NONE) {
2155       log_Printf(LogWARN, "%s: Invalid gateway address\n",
2156                  arg->argv[arg->argn + gw]);
2157       return -1;
2158     }
2159   }
2160 
2161   if (bundle_SetRoute(arg->bundle, RTM_ADD, dest, gateway, netmask,
2162                   arg->cmd->args ? 1 : 0, (addrs & ROUTE_GWHISADDR) ? 1 : 0)
2163       && addrs != ROUTE_STATIC)
2164     route_Add(&arg->bundle->ncp.ipcp.route, addrs, dest, netmask, gateway);
2165 
2166   return 0;
2167 }
2168 
2169 static int
2170 DeleteCommand(struct cmdargs const *arg)
2171 {
2172   struct in_addr dest, none;
2173   int addrs;
2174 
2175   if (arg->argc == arg->argn+1) {
2176     if(strcasecmp(arg->argv[arg->argn], "all") == 0) {
2177       route_IfDelete(arg->bundle, 0);
2178       route_DeleteAll(&arg->bundle->ncp.ipcp.route);
2179     } else {
2180       addrs = 0;
2181       if (strcasecmp(arg->argv[arg->argn], "MYADDR") == 0) {
2182         dest = arg->bundle->ncp.ipcp.my_ip;
2183         addrs = ROUTE_DSTMYADDR;
2184       } else if (strcasecmp(arg->argv[arg->argn], "HISADDR") == 0) {
2185         dest = arg->bundle->ncp.ipcp.peer_ip;
2186         addrs = ROUTE_DSTHISADDR;
2187       } else if (strcasecmp(arg->argv[arg->argn], "DNS0") == 0) {
2188         dest = arg->bundle->ncp.ipcp.ns.dns[0];
2189         addrs = ROUTE_DSTDNS0;
2190       } else if (strcasecmp(arg->argv[arg->argn], "DNS1") == 0) {
2191         dest = arg->bundle->ncp.ipcp.ns.dns[1];
2192         addrs = ROUTE_DSTDNS1;
2193       } else {
2194         dest = GetIpAddr(arg->argv[arg->argn]);
2195         if (dest.s_addr == INADDR_NONE) {
2196           log_Printf(LogWARN, "%s: Invalid IP address\n", arg->argv[arg->argn]);
2197           return -1;
2198         }
2199         addrs = ROUTE_STATIC;
2200       }
2201       none.s_addr = INADDR_ANY;
2202       bundle_SetRoute(arg->bundle, RTM_DELETE, dest, none, none,
2203                       arg->cmd->args ? 1 : 0, 0);
2204       route_Delete(&arg->bundle->ncp.ipcp.route, addrs, dest);
2205     }
2206   } else
2207     return -1;
2208 
2209   return 0;
2210 }
2211 
2212 #ifndef NONAT
2213 static int
2214 NatEnable(struct cmdargs const *arg)
2215 {
2216   if (arg->argc == arg->argn+1) {
2217     if (strcasecmp(arg->argv[arg->argn], "yes") == 0) {
2218       if (!arg->bundle->NatEnabled) {
2219         if (arg->bundle->ncp.ipcp.fsm.state == ST_OPENED)
2220           PacketAliasSetAddress(arg->bundle->ncp.ipcp.my_ip);
2221         arg->bundle->NatEnabled = 1;
2222       }
2223       return 0;
2224     } else if (strcasecmp(arg->argv[arg->argn], "no") == 0) {
2225       arg->bundle->NatEnabled = 0;
2226       arg->bundle->cfg.opt &= ~OPT_IFACEALIAS;
2227       /* Don't iface_Clear() - there may be manually configured addresses */
2228       return 0;
2229     }
2230   }
2231 
2232   return -1;
2233 }
2234 
2235 
2236 static int
2237 NatOption(struct cmdargs const *arg)
2238 {
2239   long param = (long)arg->cmd->args;
2240 
2241   if (arg->argc == arg->argn+1) {
2242     if (strcasecmp(arg->argv[arg->argn], "yes") == 0) {
2243       if (arg->bundle->NatEnabled) {
2244 	PacketAliasSetMode(param, param);
2245 	return 0;
2246       }
2247       log_Printf(LogWARN, "nat not enabled\n");
2248     } else if (strcmp(arg->argv[arg->argn], "no") == 0) {
2249       if (arg->bundle->NatEnabled) {
2250 	PacketAliasSetMode(0, param);
2251 	return 0;
2252       }
2253       log_Printf(LogWARN, "nat not enabled\n");
2254     }
2255   }
2256   return -1;
2257 }
2258 #endif /* #ifndef NONAT */
2259 
2260 static int
2261 LinkCommand(struct cmdargs const *arg)
2262 {
2263   if (arg->argc > arg->argn+1) {
2264     char namelist[LINE_LEN];
2265     struct datalink *cx;
2266     char *name;
2267     int result = 0;
2268 
2269     if (!strcmp(arg->argv[arg->argn], "*")) {
2270       struct datalink *dl;
2271 
2272       cx = arg->bundle->links;
2273       while (cx) {
2274         /* Watch it, the command could be a ``remove'' */
2275         dl = cx->next;
2276         FindExec(arg->bundle, Commands, arg->argc, arg->argn+1, arg->argv,
2277                  arg->prompt, cx);
2278         for (cx = arg->bundle->links; cx; cx = cx->next)
2279           if (cx == dl)
2280             break;		/* Pointer's still valid ! */
2281       }
2282     } else {
2283       strncpy(namelist, arg->argv[arg->argn], sizeof namelist - 1);
2284       namelist[sizeof namelist - 1] = '\0';
2285       for(name = strtok(namelist, ", "); name; name = strtok(NULL,", "))
2286         if (!bundle2datalink(arg->bundle, name)) {
2287           log_Printf(LogWARN, "link: %s: Invalid link name\n", name);
2288           return 1;
2289         }
2290 
2291       strncpy(namelist, arg->argv[arg->argn], sizeof namelist - 1);
2292       namelist[sizeof namelist - 1] = '\0';
2293       for(name = strtok(namelist, ", "); name; name = strtok(NULL,", ")) {
2294         cx = bundle2datalink(arg->bundle, name);
2295         if (cx)
2296           FindExec(arg->bundle, Commands, arg->argc, arg->argn+1, arg->argv,
2297                    arg->prompt, cx);
2298         else {
2299           log_Printf(LogWARN, "link: %s: Invalidated link name !\n", name);
2300           result++;
2301         }
2302       }
2303     }
2304     return result;
2305   }
2306 
2307   log_Printf(LogWARN, "Usage: %s\n", arg->cmd->syntax);
2308   return 2;
2309 }
2310 
2311 struct link *
2312 command_ChooseLink(struct cmdargs const *arg)
2313 {
2314   if (arg->cx)
2315     return &arg->cx->physical->link;
2316   else if (!arg->bundle->ncp.mp.cfg.mrru) {
2317     struct datalink *dl = bundle2datalink(arg->bundle, NULL);
2318     if (dl)
2319       return &dl->physical->link;
2320   }
2321   return &arg->bundle->ncp.mp.link;
2322 }
2323 
2324 static const char *
2325 ident_cmd(const char *cmd, unsigned *keep, unsigned *add)
2326 {
2327   const char *result;
2328 
2329   switch (*cmd) {
2330     case 'A':
2331     case 'a':
2332       result = "accept";
2333       *keep = NEG_MYMASK;
2334       *add = NEG_ACCEPTED;
2335       break;
2336     case 'D':
2337     case 'd':
2338       switch (cmd[1]) {
2339         case 'E':
2340         case 'e':
2341           result = "deny";
2342           *keep = NEG_MYMASK;
2343           *add = 0;
2344           break;
2345         case 'I':
2346         case 'i':
2347           result = "disable";
2348           *keep = NEG_HISMASK;
2349           *add = 0;
2350           break;
2351         default:
2352           return NULL;
2353       }
2354       break;
2355     case 'E':
2356     case 'e':
2357       result = "enable";
2358       *keep = NEG_HISMASK;
2359       *add = NEG_ENABLED;
2360       break;
2361     default:
2362       return NULL;
2363   }
2364 
2365   return result;
2366 }
2367 
2368 static int
2369 OptSet(struct cmdargs const *arg)
2370 {
2371   int bit = (int)(long)arg->cmd->args;
2372   const char *cmd;
2373   unsigned keep;			/* Keep these bits */
2374   unsigned add;				/* Add these bits */
2375 
2376   if ((cmd = ident_cmd(arg->argv[arg->argn-2], &keep, &add)) == NULL)
2377     return 1;
2378 
2379   if (add)
2380     arg->bundle->cfg.opt |= bit;
2381   else
2382     arg->bundle->cfg.opt &= ~bit;
2383   return 0;
2384 }
2385 
2386 static int
2387 IfaceAliasOptSet(struct cmdargs const *arg)
2388 {
2389   unsigned save = arg->bundle->cfg.opt;
2390   int result = OptSet(arg);
2391 
2392   if (result == 0)
2393     if (Enabled(arg->bundle, OPT_IFACEALIAS) && !arg->bundle->NatEnabled) {
2394       arg->bundle->cfg.opt = save;
2395       log_Printf(LogWARN, "Cannot enable iface-alias without NAT\n");
2396       result = 2;
2397     }
2398 
2399   return result;
2400 }
2401 
2402 static int
2403 NegotiateSet(struct cmdargs const *arg)
2404 {
2405   long param = (long)arg->cmd->args;
2406   struct link *l = command_ChooseLink(arg);	/* LOCAL_CX_OPT uses this */
2407   struct datalink *cx = arg->cx;	/* LOCAL_CX uses this */
2408   const char *cmd;
2409   unsigned keep;			/* Keep these bits */
2410   unsigned add;				/* Add these bits */
2411 
2412   if ((cmd = ident_cmd(arg->argv[arg->argn-2], &keep, &add)) == NULL)
2413     return 1;
2414 
2415   if ((arg->cmd->lauth & LOCAL_CX) && !cx) {
2416     log_Printf(LogWARN, "%s %s: No context (use the `link' command)\n",
2417               cmd, arg->cmd->name);
2418     return 2;
2419   } else if (cx && !(arg->cmd->lauth & (LOCAL_CX|LOCAL_CX_OPT))) {
2420     log_Printf(LogWARN, "%s %s: Redundant context (%s) ignored\n",
2421               cmd, arg->cmd->name, cx->name);
2422     cx = NULL;
2423   }
2424 
2425   switch (param) {
2426     case NEG_ACFCOMP:
2427       cx->physical->link.lcp.cfg.acfcomp &= keep;
2428       cx->physical->link.lcp.cfg.acfcomp |= add;
2429       break;
2430     case NEG_CHAP05:
2431       cx->physical->link.lcp.cfg.chap05 &= keep;
2432       cx->physical->link.lcp.cfg.chap05 |= add;
2433       break;
2434 #ifdef HAVE_DES
2435     case NEG_CHAP80:
2436       cx->physical->link.lcp.cfg.chap80nt &= keep;
2437       cx->physical->link.lcp.cfg.chap80nt |= add;
2438       break;
2439     case NEG_CHAP80LM:
2440       cx->physical->link.lcp.cfg.chap80lm &= keep;
2441       cx->physical->link.lcp.cfg.chap80lm |= add;
2442       break;
2443     case NEG_CHAP81:
2444       cx->physical->link.lcp.cfg.chap81 &= keep;
2445       cx->physical->link.lcp.cfg.chap81 |= add;
2446       break;
2447     case NEG_MPPE:
2448       l->ccp.cfg.neg[CCP_NEG_MPPE] &= keep;
2449       l->ccp.cfg.neg[CCP_NEG_MPPE] |= add;
2450       break;
2451 #endif
2452     case NEG_DEFLATE:
2453       l->ccp.cfg.neg[CCP_NEG_DEFLATE] &= keep;
2454       l->ccp.cfg.neg[CCP_NEG_DEFLATE] |= add;
2455       break;
2456     case NEG_DNS:
2457       arg->bundle->ncp.ipcp.cfg.ns.dns_neg &= keep;
2458       arg->bundle->ncp.ipcp.cfg.ns.dns_neg |= add;
2459       break;
2460     case NEG_ENDDISC:
2461       arg->bundle->ncp.mp.cfg.negenddisc &= keep;
2462       arg->bundle->ncp.mp.cfg.negenddisc |= add;
2463       break;
2464     case NEG_LQR:
2465       cx->physical->link.lcp.cfg.lqr &= keep;
2466       cx->physical->link.lcp.cfg.lqr |= add;
2467       break;
2468     case NEG_PAP:
2469       cx->physical->link.lcp.cfg.pap &= keep;
2470       cx->physical->link.lcp.cfg.pap |= add;
2471       break;
2472     case NEG_PPPDDEFLATE:
2473       l->ccp.cfg.neg[CCP_NEG_DEFLATE24] &= keep;
2474       l->ccp.cfg.neg[CCP_NEG_DEFLATE24] |= add;
2475       break;
2476     case NEG_PRED1:
2477       l->ccp.cfg.neg[CCP_NEG_PRED1] &= keep;
2478       l->ccp.cfg.neg[CCP_NEG_PRED1] |= add;
2479       break;
2480     case NEG_PROTOCOMP:
2481       cx->physical->link.lcp.cfg.protocomp &= keep;
2482       cx->physical->link.lcp.cfg.protocomp |= add;
2483       break;
2484     case NEG_SHORTSEQ:
2485       switch (bundle_Phase(arg->bundle)) {
2486         case PHASE_DEAD:
2487           break;
2488         case PHASE_ESTABLISH:
2489           /* Make sure none of our links are DATALINK_LCP or greater */
2490           if (bundle_HighestState(arg->bundle) >= DATALINK_LCP) {
2491             log_Printf(LogWARN, "shortseq: Only changable before"
2492                        " LCP negotiations\n");
2493             return 1;
2494           }
2495           break;
2496         default:
2497           log_Printf(LogWARN, "shortseq: Only changable at phase"
2498                      " DEAD/ESTABLISH\n");
2499           return 1;
2500       }
2501       arg->bundle->ncp.mp.cfg.shortseq &= keep;
2502       arg->bundle->ncp.mp.cfg.shortseq |= add;
2503       break;
2504     case NEG_VJCOMP:
2505       arg->bundle->ncp.ipcp.cfg.vj.neg &= keep;
2506       arg->bundle->ncp.ipcp.cfg.vj.neg |= add;
2507       break;
2508   }
2509 
2510   return 0;
2511 }
2512 
2513 static struct cmdtab const NegotiateCommands[] = {
2514   {"filter-decapsulation", NULL, OptSet, LOCAL_AUTH,
2515   "filter on PPPoUDP payloads", "disable|enable",
2516   (const void *)OPT_FILTERDECAP},
2517   {"idcheck", NULL, OptSet, LOCAL_AUTH, "Check FSM reply ids",
2518   "disable|enable", (const void *)OPT_IDCHECK},
2519   {"iface-alias", NULL, IfaceAliasOptSet, LOCAL_AUTH,
2520   "retain interface addresses", "disable|enable",
2521   (const void *)OPT_IFACEALIAS},
2522   {"keep-session", NULL, OptSet, LOCAL_AUTH, "Retain device session leader",
2523   "disable|enable", (const void *)OPT_KEEPSESSION},
2524   {"loopback", NULL, OptSet, LOCAL_AUTH, "Loop packets for local iface",
2525   "disable|enable", (const void *)OPT_LOOPBACK},
2526   {"passwdauth", NULL, OptSet, LOCAL_AUTH, "Use passwd file",
2527   "disable|enable", (const void *)OPT_PASSWDAUTH},
2528   {"proxy", NULL, OptSet, LOCAL_AUTH, "Create a proxy ARP entry",
2529   "disable|enable", (const void *)OPT_PROXY},
2530   {"proxyall", NULL, OptSet, LOCAL_AUTH, "Proxy ARP for all remote hosts",
2531   "disable|enable", (const void *)OPT_PROXYALL},
2532   {"sroutes", NULL, OptSet, LOCAL_AUTH, "Use sticky routes",
2533   "disable|enable", (const void *)OPT_SROUTES},
2534   {"throughput", NULL, OptSet, LOCAL_AUTH, "Rolling throughput",
2535   "disable|enable", (const void *)OPT_THROUGHPUT},
2536   {"utmp", NULL, OptSet, LOCAL_AUTH, "Log connections in utmp",
2537   "disable|enable", (const void *)OPT_UTMP},
2538 
2539 #define OPT_MAX 10	/* accept/deny allowed below and not above */
2540 
2541   {"acfcomp", NULL, NegotiateSet, LOCAL_AUTH | LOCAL_CX,
2542   "Address & Control field compression", "accept|deny|disable|enable",
2543   (const void *)NEG_ACFCOMP},
2544   {"chap", "chap05", NegotiateSet, LOCAL_AUTH | LOCAL_CX,
2545   "Challenge Handshake Authentication Protocol", "accept|deny|disable|enable",
2546   (const void *)NEG_CHAP05},
2547 #ifdef HAVE_DES
2548   {"mschap", "chap80nt", NegotiateSet, LOCAL_AUTH | LOCAL_CX,
2549   "Microsoft (NT) CHAP", "accept|deny|disable|enable",
2550   (const void *)NEG_CHAP80},
2551   {"LANMan", "chap80lm", NegotiateSet, LOCAL_AUTH | LOCAL_CX,
2552   "Microsoft (NT) CHAP", "accept|deny|disable|enable",
2553   (const void *)NEG_CHAP80LM},
2554   {"mschapv2", "chap81", NegotiateSet, LOCAL_AUTH | LOCAL_CX,
2555   "Microsoft CHAP v2", "accept|deny|disable|enable",
2556   (const void *)NEG_CHAP81},
2557   {"mppe", NULL, NegotiateSet, LOCAL_AUTH | LOCAL_CX_OPT,
2558   "MPPE encryption", "accept|deny|disable|enable",
2559   (const void *)NEG_MPPE},
2560 #endif
2561   {"deflate", NULL, NegotiateSet, LOCAL_AUTH | LOCAL_CX_OPT,
2562   "Deflate compression", "accept|deny|disable|enable",
2563   (const void *)NEG_DEFLATE},
2564   {"deflate24", NULL, NegotiateSet, LOCAL_AUTH | LOCAL_CX_OPT,
2565   "Deflate (type 24) compression", "accept|deny|disable|enable",
2566   (const void *)NEG_PPPDDEFLATE},
2567   {"dns", NULL, NegotiateSet, LOCAL_AUTH,
2568   "DNS specification", "accept|deny|disable|enable", (const void *)NEG_DNS},
2569   {"enddisc", NULL, NegotiateSet, LOCAL_AUTH, "ENDDISC negotiation",
2570   "accept|deny|disable|enable", (const void *)NEG_ENDDISC},
2571   {"lqr", NULL, NegotiateSet, LOCAL_AUTH | LOCAL_CX,
2572   "Link Quality Reports", "accept|deny|disable|enable",
2573   (const void *)NEG_LQR},
2574   {"pap", NULL, NegotiateSet, LOCAL_AUTH | LOCAL_CX,
2575   "Password Authentication protocol", "accept|deny|disable|enable",
2576   (const void *)NEG_PAP},
2577   {"pred1", "predictor1", NegotiateSet, LOCAL_AUTH | LOCAL_CX_OPT,
2578   "Predictor 1 compression", "accept|deny|disable|enable",
2579   (const void *)NEG_PRED1},
2580   {"protocomp", NULL, NegotiateSet, LOCAL_AUTH | LOCAL_CX,
2581   "Protocol field compression", "accept|deny|disable|enable",
2582   (const void *)NEG_PROTOCOMP},
2583   {"shortseq", NULL, NegotiateSet, LOCAL_AUTH,
2584   "MP Short Sequence Numbers", "accept|deny|disable|enable",
2585   (const void *)NEG_SHORTSEQ},
2586   {"vjcomp", NULL, NegotiateSet, LOCAL_AUTH,
2587   "Van Jacobson header compression", "accept|deny|disable|enable",
2588   (const void *)NEG_VJCOMP},
2589   {"help", "?", HelpCommand, LOCAL_AUTH | LOCAL_NO_AUTH,
2590   "Display this message", "accept|deny|disable|enable help|? [value]",
2591   NegotiateCommands},
2592   {NULL, NULL, NULL},
2593 };
2594 
2595 static int
2596 NegotiateCommand(struct cmdargs const *arg)
2597 {
2598   if (arg->argc > arg->argn) {
2599     char const *argv[3];
2600     unsigned keep, add;
2601     int n;
2602 
2603     if ((argv[0] = ident_cmd(arg->argv[arg->argn-1], &keep, &add)) == NULL)
2604       return -1;
2605     argv[2] = NULL;
2606 
2607     for (n = arg->argn; n < arg->argc; n++) {
2608       argv[1] = arg->argv[n];
2609       FindExec(arg->bundle, NegotiateCommands + (keep == NEG_HISMASK ?
2610                0 : OPT_MAX), 2, 1, argv, arg->prompt, arg->cx);
2611     }
2612   } else if (arg->prompt)
2613     prompt_Printf(arg->prompt, "Use `%s ?' to get a list.\n",
2614 	    arg->argv[arg->argn-1]);
2615   else
2616     log_Printf(LogWARN, "%s command must have arguments\n",
2617               arg->argv[arg->argn] );
2618 
2619   return 0;
2620 }
2621 
2622 const char *
2623 command_ShowNegval(unsigned val)
2624 {
2625   switch (val&3) {
2626     case 1: return "disabled & accepted";
2627     case 2: return "enabled & denied";
2628     case 3: return "enabled & accepted";
2629   }
2630   return "disabled & denied";
2631 }
2632 
2633 static int
2634 ClearCommand(struct cmdargs const *arg)
2635 {
2636   struct pppThroughput *t;
2637   struct datalink *cx;
2638   int i, clear_type;
2639 
2640   if (arg->argc < arg->argn + 1)
2641     return -1;
2642 
2643   if (strcasecmp(arg->argv[arg->argn], "physical") == 0) {
2644     cx = arg->cx;
2645     if (!cx)
2646       cx = bundle2datalink(arg->bundle, NULL);
2647     if (!cx) {
2648       log_Printf(LogWARN, "A link must be specified for ``clear physical''\n");
2649       return 1;
2650     }
2651     t = &cx->physical->link.stats.total;
2652   } else if (strcasecmp(arg->argv[arg->argn], "ipcp") == 0)
2653     t = &arg->bundle->ncp.ipcp.throughput;
2654   else
2655     return -1;
2656 
2657   if (arg->argc > arg->argn + 1) {
2658     clear_type = 0;
2659     for (i = arg->argn + 1; i < arg->argc; i++)
2660       if (strcasecmp(arg->argv[i], "overall") == 0)
2661         clear_type |= THROUGHPUT_OVERALL;
2662       else if (strcasecmp(arg->argv[i], "current") == 0)
2663         clear_type |= THROUGHPUT_CURRENT;
2664       else if (strcasecmp(arg->argv[i], "peak") == 0)
2665         clear_type |= THROUGHPUT_PEAK;
2666       else
2667         return -1;
2668   } else
2669     clear_type = THROUGHPUT_ALL;
2670 
2671   throughput_clear(t, clear_type, arg->prompt);
2672   return 0;
2673 }
2674 
2675 static int
2676 RunListCommand(struct cmdargs const *arg)
2677 {
2678   const char *cmd = arg->argc ? arg->argv[arg->argc - 1] : "???";
2679 
2680 #ifndef NONAT
2681   if (arg->cmd->args == NatCommands &&
2682       tolower(*arg->argv[arg->argn - 1]) == 'a') {
2683     if (arg->prompt)
2684       prompt_Printf(arg->prompt, "The alias command is deprecated\n");
2685     else
2686       log_Printf(LogWARN, "The alias command is deprecated\n");
2687   }
2688 #endif
2689 
2690   if (arg->argc > arg->argn)
2691     FindExec(arg->bundle, arg->cmd->args, arg->argc, arg->argn, arg->argv,
2692              arg->prompt, arg->cx);
2693   else if (arg->prompt)
2694     prompt_Printf(arg->prompt, "Use `%s help' to get a list or `%s help"
2695                   " <option>' for syntax help.\n", cmd, cmd);
2696   else
2697     log_Printf(LogWARN, "%s command must have arguments\n", cmd);
2698 
2699   return 0;
2700 }
2701 
2702 static int
2703 IfaceAddCommand(struct cmdargs const *arg)
2704 {
2705   int bits, n, how;
2706   struct in_addr ifa, mask, brd;
2707 
2708   if (arg->argc == arg->argn + 1) {
2709     if (!ParseAddr(NULL, arg->argv[arg->argn], &ifa, NULL, NULL))
2710       return -1;
2711     mask.s_addr = brd.s_addr = INADDR_BROADCAST;
2712   } else {
2713     if (arg->argc == arg->argn + 2) {
2714       if (!ParseAddr(NULL, arg->argv[arg->argn], &ifa, &mask, &bits))
2715         return -1;
2716       n = 1;
2717     } else if (arg->argc == arg->argn + 3) {
2718       if (!ParseAddr(NULL, arg->argv[arg->argn], &ifa, NULL, NULL))
2719         return -1;
2720       if (!ParseAddr(NULL, arg->argv[arg->argn + 1], &mask, NULL, NULL))
2721         return -1;
2722       n = 2;
2723     } else
2724       return -1;
2725 
2726     if (!ParseAddr(NULL, arg->argv[arg->argn + n], &brd, NULL, NULL))
2727       return -1;
2728   }
2729 
2730   how = IFACE_ADD_LAST;
2731   if (arg->cmd->args)
2732     how |= IFACE_FORCE_ADD;
2733 
2734   return !iface_inAdd(arg->bundle->iface, ifa, mask, brd, how);
2735 }
2736 
2737 static int
2738 IfaceDeleteCommand(struct cmdargs const *arg)
2739 {
2740   struct in_addr ifa;
2741   int ok;
2742 
2743   if (arg->argc != arg->argn + 1)
2744     return -1;
2745 
2746   if (!ParseAddr(NULL, arg->argv[arg->argn], &ifa, NULL, NULL))
2747     return -1;
2748 
2749   if (arg->bundle->ncp.ipcp.fsm.state == ST_OPENED &&
2750       arg->bundle->ncp.ipcp.my_ip.s_addr == ifa.s_addr) {
2751     log_Printf(LogWARN, "%s: Cannot remove active interface address\n",
2752                inet_ntoa(ifa));
2753     return 1;
2754   }
2755 
2756   ok = iface_inDelete(arg->bundle->iface, ifa);
2757   if (!ok) {
2758     if (arg->cmd->args)
2759       ok = 1;
2760     else if (arg->prompt)
2761       prompt_Printf(arg->prompt, "%s: No such address\n", inet_ntoa(ifa));
2762     else
2763       log_Printf(LogWARN, "%s: No such address\n", inet_ntoa(ifa));
2764   }
2765 
2766   return !ok;
2767 }
2768 
2769 static int
2770 IfaceClearCommand(struct cmdargs const *arg)
2771 {
2772   int how;
2773 
2774   if (arg->argc != arg->argn)
2775     return -1;
2776 
2777   how = arg->bundle->ncp.ipcp.fsm.state == ST_OPENED ||
2778         arg->bundle->phys_type.all & PHYS_AUTO ?
2779         IFACE_CLEAR_ALIASES : IFACE_CLEAR_ALL;
2780   iface_Clear(arg->bundle->iface, how);
2781 
2782   return 0;
2783 }
2784 
2785 static int
2786 SetProcTitle(struct cmdargs const *arg)
2787 {
2788   static char title[LINE_LEN];
2789   char *argv[MAXARGS], *ptr;
2790   int len, remaining, f, argc = arg->argc - arg->argn;
2791 
2792   if (arg->argc == arg->argn) {
2793     SetTitle(NULL);
2794     return 0;
2795   }
2796 
2797   if (argc >= sizeof argv / sizeof argv[0]) {
2798     argc = sizeof argv / sizeof argv[0] - 1;
2799     log_Printf(LogWARN, "Truncating proc title to %d args\n", argc);
2800   }
2801   command_Expand(argv, argc, arg->argv + arg->argn, arg->bundle, 1, getpid());
2802 
2803   ptr = title;
2804   remaining = sizeof title - 1;
2805   for (f = 0; f < argc && remaining; f++) {
2806     if (f) {
2807       *ptr++ = ' ';
2808       remaining--;
2809     }
2810     len = strlen(argv[f]);
2811     if (len > remaining)
2812       len = remaining;
2813     memcpy(ptr, argv[f], len);
2814     remaining -= len;
2815     ptr += len;
2816   }
2817   *ptr = '\0';
2818 
2819   SetTitle(title);
2820 
2821   return 0;
2822 }
2823