/* $OpenBSD: vars.c,v 1.9 2003/06/02 20:20:54 mickey Exp $ */ /* * Copyright (c) 1998-2000 Michael Shalayeff * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF MIND, USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * */ #include #include #include #include #include "cmd.h" extern const char version[]; extern int debug; static int Xaddr(void); static int Xdevice(void); #ifdef DEBUG static int Xdebug(void); #endif static int Ximage(void); static int Xhowto(void); static int Xtty(void); static int Xtimeout(void); int Xset(void); int Xenv(void); const struct cmd_table cmd_set[] = { {"addr", CMDT_VAR, Xaddr}, {"howto", CMDT_VAR, Xhowto}, #ifdef DEBUG {"debug", CMDT_VAR, Xdebug}, #endif {"device", CMDT_VAR, Xdevice}, {"tty", CMDT_VAR, Xtty}, {"image", CMDT_VAR, Ximage}, {"timeout",CMDT_VAR, Xtimeout}, {NULL,0} }; #ifdef DEBUG static int Xdebug() { if (cmd.argc != 2) printf( "o%s\n", debug? "n": "ff" ); else debug = (cmd.argv[1][0] == '0' || (cmd.argv[1][0] == 'o' && cmd.argv[1][1] == 'f'))? 0: 1; return 0; } #endif static int Xtimeout() { if (cmd.argc != 2) printf( "%d\n", cmd.timeout ); else cmd.timeout = (int)strtol( cmd.argv[1], (char **)NULL, 0 ); return 0; } /* called only w/ no arguments */ int Xset() { register const struct cmd_table *ct; printf(">> OpenBSD/" MACHINE_ARCH " BOOT %s\n", version); for (ct = cmd_set; ct->cmd_name != NULL; ct++) { printf("%s\t ", ct->cmd_name); (*ct->cmd_exec)(); } return 0; } static int Xdevice() { if (cmd.argc != 2) printf("%s\n", cmd.bootdev); else strlcpy(cmd.bootdev, cmd.argv[1], sizeof(cmd.bootdev)); return 0; } static int Ximage() { if (cmd.argc != 2) printf("%s\n", cmd.image); else strlcpy(cmd.image, cmd.argv[1], sizeof(cmd.image)); return 0; } static int Xaddr() { if (cmd.argc != 2) printf("%p\n", cmd.addr); else cmd.addr = (void *)strtol(cmd.argv[1], NULL, 0); return 0; } static int Xtty() { dev_t dev; if (cmd.argc != 2) printf("%s\n", ttyname(0)); else { dev = ttydev(cmd.argv[1]); if (dev == NODEV) printf("%s not a console device\n", cmd.argv[1]); else { printf("switching console to %s\n", cmd.argv[1]); if (cnset(dev)) printf("%s console not present\n", cmd.argv[1]); } } return 0; } static int Xhowto() { if (cmd.argc == 1) { if (cmd.boothowto) { putchar('-'); if (cmd.boothowto & RB_ASKNAME) putchar('a'); #ifdef notused if (cmd.boothowto & RB_HALT) putchar('b'); #endif if (cmd.boothowto & RB_CONFIG) putchar('c'); if (cmd.boothowto & RB_SINGLE) putchar('s'); if (cmd.boothowto & RB_KDB) putchar('d'); } putchar('\n'); } else bootparse(1); return 0; } int bootparse(i) int i; { register char *cp; int howto = cmd.boothowto; for (; i < cmd.argc; i++) { cp = cmd.argv[i]; if (*cp == '-') { while (*++cp) { switch (*cp) { case 'a': howto |= RB_ASKNAME; break; #ifdef notused /* * one day i get the same nice drink i was having * and figure out what is it supposed to be used for */ case 'b': howto |= RB_HALT; break; #endif case 'c': howto |= RB_CONFIG; break; case 's': howto |= RB_SINGLE; break; case 'd': howto |= RB_KDB; break; default: printf("howto: bad option: %c\n", *cp); return 1; } } } else { printf("boot: illegal argument %s\n", cmd.argv[i]); return 1; } } cmd.boothowto = howto; return 0; } /* * maintain environment as a sequence of '\n' separated * variable definitions in the form =[] * terminated by the usual '\0' */ char *environ; int Xenv() { if (cmd.argc == 1) { if (environ) printf(environ); else printf("empty\n"); } else { register char *p, *q; int l; for (p = environ; p && *p; p = q) { l = strlen(cmd.argv[1]); for (q = p; *q != '='; q++) ; l = max(l, q - p) + 1; for (q = p; *q != '\n'; q++) ; if (*q) q++; if (!strncmp(p, cmd.argv[1], l)) { while((*p++ = *q++)) ; p--; } } if (!p) p = environ = alloc(4096); snprintf(p, environ + 4096 - p, "%s=%s\n", cmd.argv[1], (cmd.argc==3?cmd.argv[2]:"")); } return 0; }