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