Home | History | Annotate | Line # | Download | only in common
commands.c revision 1.2.2.3
      1  1.2.2.3  kardel /*	$NetBSD: commands.c,v 1.2.2.3 2006/06/01 22:34:54 kardel Exp $	*/
      2  1.2.2.2  simonb 
      3  1.2.2.2  simonb /*-
      4  1.2.2.2  simonb  * Copyright (c) 1998 Michael Smith <msmith (at) freebsd.org>
      5  1.2.2.2  simonb  * All rights reserved.
      6  1.2.2.2  simonb  *
      7  1.2.2.2  simonb  * Redistribution and use in source and binary forms, with or without
      8  1.2.2.2  simonb  * modification, are permitted provided that the following conditions
      9  1.2.2.2  simonb  * are met:
     10  1.2.2.2  simonb  * 1. Redistributions of source code must retain the above copyright
     11  1.2.2.2  simonb  *    notice, this list of conditions and the following disclaimer.
     12  1.2.2.2  simonb  * 2. Redistributions in binary form must reproduce the above copyright
     13  1.2.2.2  simonb  *    notice, this list of conditions and the following disclaimer in the
     14  1.2.2.2  simonb  *    documentation and/or other materials provided with the distribution.
     15  1.2.2.2  simonb  *
     16  1.2.2.2  simonb  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
     17  1.2.2.2  simonb  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     18  1.2.2.2  simonb  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     19  1.2.2.2  simonb  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
     20  1.2.2.2  simonb  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     21  1.2.2.2  simonb  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     22  1.2.2.2  simonb  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     23  1.2.2.2  simonb  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     24  1.2.2.2  simonb  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     25  1.2.2.2  simonb  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     26  1.2.2.2  simonb  * SUCH DAMAGE.
     27  1.2.2.2  simonb  */
     28  1.2.2.2  simonb 
     29  1.2.2.2  simonb #include <sys/cdefs.h>
     30  1.2.2.3  kardel /* __FBSDID("$FreeBSD: src/sys/boot/common/commands.c,v 1.19 2003/08/25 23:30:41 obrien Exp $"); */
     31  1.2.2.2  simonb 
     32  1.2.2.2  simonb #include <lib/libsa/stand.h>
     33  1.2.2.2  simonb #include <lib/libkern/libkern.h>
     34  1.2.2.2  simonb 
     35  1.2.2.2  simonb #include "bootstrap.h"
     36  1.2.2.2  simonb 
     37  1.2.2.2  simonb char		*command_errmsg;
     38  1.2.2.2  simonb char		command_errbuf[256];	/* XXX should have procedural interface for setting, size limit? */
     39  1.2.2.2  simonb 
     40  1.2.2.2  simonb static int page_file(char *filename);
     41  1.2.2.2  simonb 
     42  1.2.2.2  simonb /*
     43  1.2.2.2  simonb  * Help is read from a formatted text file.
     44  1.2.2.2  simonb  *
     45  1.2.2.2  simonb  * Entries in the file are formatted as
     46  1.2.2.2  simonb 
     47  1.2.2.2  simonb # Ttopic [Ssubtopic] Ddescription
     48  1.2.2.2  simonb help
     49  1.2.2.2  simonb text
     50  1.2.2.2  simonb here
     51  1.2.2.2  simonb #
     52  1.2.2.2  simonb 
     53  1.2.2.2  simonb  *
     54  1.2.2.2  simonb  * Note that for code simplicity's sake, the above format must be followed
     55  1.2.2.2  simonb  * exactly.
     56  1.2.2.2  simonb  *
     57  1.2.2.2  simonb  * Subtopic entries must immediately follow the topic (this is used to
     58  1.2.2.2  simonb  * produce the listing of subtopics).
     59  1.2.2.2  simonb  *
     60  1.2.2.2  simonb  * If no argument(s) are supplied by the user, the help for 'help' is displayed.
     61  1.2.2.2  simonb  */
     62  1.2.2.2  simonb 
     63  1.2.2.2  simonb static int
     64  1.2.2.2  simonb help_getnext(int fd, char **topic, char **subtopic, char **desc)
     65  1.2.2.2  simonb {
     66  1.2.2.2  simonb     char	line[81], *cp, *ep;
     67  1.2.2.2  simonb 
     68  1.2.2.2  simonb     for (;;) {
     69  1.2.2.2  simonb 	if (fgetstr(line, 80, fd) < 0)
     70  1.2.2.2  simonb 	    return(0);
     71  1.2.2.2  simonb 
     72  1.2.2.2  simonb 	if ((strlen(line) < 3) || (line[0] != '#') || (line[1] != ' '))
     73  1.2.2.2  simonb 	    continue;
     74  1.2.2.2  simonb 
     75  1.2.2.2  simonb 	*topic = *subtopic = *desc = NULL;
     76  1.2.2.2  simonb 	cp = line + 2;
     77  1.2.2.2  simonb 	while((cp != NULL) && (*cp != 0)) {
     78  1.2.2.2  simonb 	    ep = strchr(cp, ' ');
     79  1.2.2.2  simonb 	    if ((*cp == 'T') && (*topic == NULL)) {
     80  1.2.2.2  simonb 		if (ep != NULL)
     81  1.2.2.2  simonb 		    *ep++ = 0;
     82  1.2.2.2  simonb 		*topic = strdup(cp + 1);
     83  1.2.2.2  simonb 	    } else if ((*cp == 'S') && (*subtopic == NULL)) {
     84  1.2.2.2  simonb 		if (ep != NULL)
     85  1.2.2.2  simonb 		    *ep++ = 0;
     86  1.2.2.2  simonb 		*subtopic = strdup(cp + 1);
     87  1.2.2.2  simonb 	    } else if (*cp == 'D') {
     88  1.2.2.2  simonb 		*desc = strdup(cp + 1);
     89  1.2.2.2  simonb 		ep = NULL;
     90  1.2.2.2  simonb 	    }
     91  1.2.2.2  simonb 	    cp = ep;
     92  1.2.2.2  simonb 	}
     93  1.2.2.2  simonb 	if (*topic == NULL) {
     94  1.2.2.2  simonb 	    if (*subtopic != NULL)
     95  1.2.2.2  simonb 		free(*subtopic);
     96  1.2.2.2  simonb 	    if (*desc != NULL)
     97  1.2.2.2  simonb 		free(*desc);
     98  1.2.2.2  simonb 	    continue;
     99  1.2.2.2  simonb 	}
    100  1.2.2.2  simonb 	return(1);
    101  1.2.2.2  simonb     }
    102  1.2.2.2  simonb }
    103  1.2.2.2  simonb 
    104  1.2.2.2  simonb static int
    105  1.2.2.2  simonb help_emitsummary(char *topic, char *subtopic, char *desc)
    106  1.2.2.2  simonb {
    107  1.2.2.2  simonb     int		i;
    108  1.2.2.2  simonb 
    109  1.2.2.2  simonb     pager_output("    ");
    110  1.2.2.2  simonb     pager_output(topic);
    111  1.2.2.2  simonb     i = strlen(topic);
    112  1.2.2.2  simonb     if (subtopic != NULL) {
    113  1.2.2.2  simonb 	pager_output(" ");
    114  1.2.2.2  simonb 	pager_output(subtopic);
    115  1.2.2.2  simonb 	i += strlen(subtopic) + 1;
    116  1.2.2.2  simonb     }
    117  1.2.2.2  simonb     if (desc != NULL) {
    118  1.2.2.2  simonb 	do {
    119  1.2.2.2  simonb 	    pager_output(" ");
    120  1.2.2.2  simonb 	} while (i++ < 30);
    121  1.2.2.2  simonb 	pager_output(desc);
    122  1.2.2.2  simonb     }
    123  1.2.2.2  simonb     return (pager_output("\n"));
    124  1.2.2.2  simonb }
    125  1.2.2.2  simonb 
    126  1.2.2.2  simonb 
    127  1.2.2.2  simonb int
    128  1.2.2.2  simonb command_help(int argc, char *argv[])
    129  1.2.2.2  simonb {
    130  1.2.2.2  simonb     char	buf[81];	/* XXX buffer size? */
    131  1.2.2.2  simonb     int		hfd, matched, doindex;
    132  1.2.2.2  simonb     char	*topic, *subtopic, *t, *s, *d;
    133  1.2.2.2  simonb 
    134  1.2.2.2  simonb     /* page the help text from our load path */
    135  1.2.2.2  simonb     sprintf(buf, "%s/boot/loader.help", getenv("loaddev"));
    136  1.2.2.2  simonb     if ((hfd = open(buf, O_RDONLY)) < 0) {
    137  1.2.2.2  simonb 	printf("Verbose help not available, use '?' to list commands\n");
    138  1.2.2.2  simonb 	return(CMD_OK);
    139  1.2.2.2  simonb     }
    140  1.2.2.2  simonb 
    141  1.2.2.2  simonb     /* pick up request from arguments */
    142  1.2.2.2  simonb     topic = subtopic = NULL;
    143  1.2.2.2  simonb     switch(argc) {
    144  1.2.2.2  simonb     case 3:
    145  1.2.2.2  simonb 	subtopic = strdup(argv[2]);
    146  1.2.2.2  simonb     case 2:
    147  1.2.2.2  simonb 	topic = strdup(argv[1]);
    148  1.2.2.2  simonb 	break;
    149  1.2.2.2  simonb     case 1:
    150  1.2.2.2  simonb 	topic = strdup("help");
    151  1.2.2.2  simonb 	break;
    152  1.2.2.2  simonb     default:
    153  1.2.2.2  simonb 	command_errmsg = "usage is 'help <topic> [<subtopic>]";
    154  1.2.2.2  simonb 	return(CMD_ERROR);
    155  1.2.2.2  simonb     }
    156  1.2.2.2  simonb 
    157  1.2.2.2  simonb     /* magic "index" keyword */
    158  1.2.2.2  simonb     doindex = !strcmp(topic, "index");
    159  1.2.2.2  simonb     matched = doindex;
    160  1.2.2.2  simonb 
    161  1.2.2.2  simonb     /* Scan the helpfile looking for help matching the request */
    162  1.2.2.2  simonb     pager_open();
    163  1.2.2.2  simonb     while(help_getnext(hfd, &t, &s, &d)) {
    164  1.2.2.2  simonb 
    165  1.2.2.2  simonb 	if (doindex) {		/* dink around formatting */
    166  1.2.2.2  simonb 	    if (help_emitsummary(t, s, d))
    167  1.2.2.2  simonb 		break;
    168  1.2.2.2  simonb 
    169  1.2.2.2  simonb 	} else if (strcmp(topic, t)) {
    170  1.2.2.2  simonb 	    /* topic mismatch */
    171  1.2.2.2  simonb 	    if(matched)		/* nothing more on this topic, stop scanning */
    172  1.2.2.2  simonb 		break;
    173  1.2.2.2  simonb 
    174  1.2.2.2  simonb 	} else {
    175  1.2.2.2  simonb 	    /* topic matched */
    176  1.2.2.2  simonb 	    matched = 1;
    177  1.2.2.2  simonb 	    if (((subtopic == NULL) && (s == NULL)) ||
    178  1.2.2.2  simonb 		((subtopic != NULL) && (s != NULL) && !strcmp(subtopic, s))) {
    179  1.2.2.2  simonb 		/* exact match, print text */
    180  1.2.2.2  simonb 		while((fgetstr(buf, 80, hfd) >= 0) && (buf[0] != '#')) {
    181  1.2.2.2  simonb 		    if (pager_output(buf))
    182  1.2.2.2  simonb 			break;
    183  1.2.2.2  simonb 		    if (pager_output("\n"))
    184  1.2.2.2  simonb 			break;
    185  1.2.2.2  simonb 		}
    186  1.2.2.2  simonb 	    } else if ((subtopic == NULL) && (s != NULL)) {
    187  1.2.2.2  simonb 		/* topic match, list subtopics */
    188  1.2.2.2  simonb 		if (help_emitsummary(t, s, d))
    189  1.2.2.2  simonb 		    break;
    190  1.2.2.2  simonb 	    }
    191  1.2.2.2  simonb 	}
    192  1.2.2.2  simonb 	free(t);
    193  1.2.2.2  simonb 	free(s);
    194  1.2.2.2  simonb 	free(d);
    195  1.2.2.2  simonb     }
    196  1.2.2.2  simonb     pager_close();
    197  1.2.2.2  simonb     close(hfd);
    198  1.2.2.2  simonb     if (!matched) {
    199  1.2.2.2  simonb 	sprintf(command_errbuf, "no help available for '%s'", topic);
    200  1.2.2.2  simonb 	free(topic);
    201  1.2.2.2  simonb 	if (subtopic)
    202  1.2.2.2  simonb 	    free(subtopic);
    203  1.2.2.2  simonb 	return(CMD_ERROR);
    204  1.2.2.2  simonb     }
    205  1.2.2.2  simonb     free(topic);
    206  1.2.2.2  simonb     if (subtopic)
    207  1.2.2.2  simonb 	free(subtopic);
    208  1.2.2.2  simonb     return(CMD_OK);
    209  1.2.2.2  simonb }
    210  1.2.2.2  simonb 
    211  1.2.2.2  simonb 
    212  1.2.2.2  simonb int
    213  1.2.2.2  simonb command_commandlist(int argc, char *argv[])
    214  1.2.2.2  simonb {
    215  1.2.2.2  simonb     struct bootblk_command	*cmdp;
    216  1.2.2.2  simonb     int		res;
    217  1.2.2.2  simonb     char	name[20];
    218  1.2.2.2  simonb     int i;
    219  1.2.2.2  simonb 
    220  1.2.2.2  simonb     res = 0;
    221  1.2.2.2  simonb     pager_open();
    222  1.2.2.2  simonb     res = pager_output("Available commands:\n");
    223  1.2.2.2  simonb 
    224  1.2.2.2  simonb     for (i = 0, cmdp = commands; (cmdp->c_name != NULL) && (cmdp->c_desc != NULL ); i++, cmdp = commands + i) {
    225  1.2.2.2  simonb 	    if (res)
    226  1.2.2.2  simonb 	    break;
    227  1.2.2.2  simonb 	if ((cmdp->c_name != NULL) && (cmdp->c_desc != NULL)) {
    228  1.2.2.2  simonb 	    sprintf(name, "  %s  ", cmdp->c_name);
    229  1.2.2.2  simonb 	    pager_output(name);
    230  1.2.2.2  simonb 	    pager_output(cmdp->c_desc);
    231  1.2.2.2  simonb 	    res = pager_output("\n");
    232  1.2.2.2  simonb 	}
    233  1.2.2.2  simonb     }
    234  1.2.2.2  simonb     pager_close();
    235  1.2.2.2  simonb     return(CMD_OK);
    236  1.2.2.2  simonb }
    237  1.2.2.2  simonb 
    238  1.2.2.2  simonb /*
    239  1.2.2.2  simonb  * XXX set/show should become set/echo if we have variable
    240  1.2.2.2  simonb  * substitution happening.
    241  1.2.2.2  simonb  */
    242  1.2.2.2  simonb 
    243  1.2.2.2  simonb int
    244  1.2.2.2  simonb command_show(int argc, char *argv[])
    245  1.2.2.2  simonb {
    246  1.2.2.2  simonb     struct env_var	*ev;
    247  1.2.2.2  simonb     char		*cp;
    248  1.2.2.2  simonb 
    249  1.2.2.2  simonb     if (argc < 2) {
    250  1.2.2.2  simonb 	/*
    251  1.2.2.2  simonb 	 * With no arguments, print everything.
    252  1.2.2.2  simonb 	 */
    253  1.2.2.2  simonb 	pager_open();
    254  1.2.2.2  simonb 	for (ev = environ; ev != NULL; ev = ev->ev_next) {
    255  1.2.2.2  simonb 	    pager_output(ev->ev_name);
    256  1.2.2.2  simonb 	    cp = getenv(ev->ev_name);
    257  1.2.2.2  simonb 	    if (cp != NULL) {
    258  1.2.2.2  simonb 		pager_output("=");
    259  1.2.2.2  simonb 		pager_output(cp);
    260  1.2.2.2  simonb 	    }
    261  1.2.2.2  simonb 	    if (pager_output("\n"))
    262  1.2.2.2  simonb 		break;
    263  1.2.2.2  simonb 	}
    264  1.2.2.2  simonb 	pager_close();
    265  1.2.2.2  simonb     } else {
    266  1.2.2.2  simonb 	if ((cp = getenv(argv[1])) != NULL) {
    267  1.2.2.2  simonb 	    printf("%s\n", cp);
    268  1.2.2.2  simonb 	} else {
    269  1.2.2.2  simonb 	    sprintf(command_errbuf, "variable '%s' not found", argv[1]);
    270  1.2.2.2  simonb 	    return(CMD_ERROR);
    271  1.2.2.2  simonb 	}
    272  1.2.2.2  simonb     }
    273  1.2.2.2  simonb     return(CMD_OK);
    274  1.2.2.2  simonb }
    275  1.2.2.2  simonb 
    276  1.2.2.2  simonb 
    277  1.2.2.2  simonb int
    278  1.2.2.2  simonb command_set(int argc, char *argv[])
    279  1.2.2.2  simonb {
    280  1.2.2.2  simonb     int		err;
    281  1.2.2.2  simonb 
    282  1.2.2.2  simonb     if (argc != 2) {
    283  1.2.2.2  simonb 	command_errmsg = "wrong number of arguments";
    284  1.2.2.2  simonb 	return(CMD_ERROR);
    285  1.2.2.2  simonb     } else {
    286  1.2.2.2  simonb 	if ((err = putenv(argv[1])) != 0) {
    287  1.2.2.2  simonb 	    command_errmsg = strerror(err);
    288  1.2.2.2  simonb 	    return(CMD_ERROR);
    289  1.2.2.2  simonb 	}
    290  1.2.2.2  simonb     }
    291  1.2.2.2  simonb     return(CMD_OK);
    292  1.2.2.2  simonb }
    293  1.2.2.2  simonb 
    294  1.2.2.2  simonb 
    295  1.2.2.2  simonb int
    296  1.2.2.2  simonb command_unset(int argc, char *argv[])
    297  1.2.2.2  simonb {
    298  1.2.2.2  simonb     int		err;
    299  1.2.2.2  simonb 
    300  1.2.2.2  simonb     if (argc != 2) {
    301  1.2.2.2  simonb 	command_errmsg = "wrong number of arguments";
    302  1.2.2.2  simonb 	return(CMD_ERROR);
    303  1.2.2.2  simonb     } else {
    304  1.2.2.2  simonb 	if ((err = unsetenv(argv[1])) != 0) {
    305  1.2.2.2  simonb 	    command_errmsg = strerror(err);
    306  1.2.2.2  simonb 	    return(CMD_ERROR);
    307  1.2.2.2  simonb 	}
    308  1.2.2.2  simonb     }
    309  1.2.2.2  simonb     return(CMD_OK);
    310  1.2.2.2  simonb }
    311  1.2.2.2  simonb 
    312  1.2.2.2  simonb 
    313  1.2.2.2  simonb int
    314  1.2.2.2  simonb command_echo(int argc, char *argv[])
    315  1.2.2.2  simonb {
    316  1.2.2.2  simonb     char	*s;
    317  1.2.2.2  simonb     int		nl, ch;
    318  1.2.2.2  simonb 
    319  1.2.2.2  simonb     nl = 0;
    320  1.2.2.2  simonb     optind = 1;
    321  1.2.2.2  simonb     optreset = 1;
    322  1.2.2.2  simonb     while ((ch = getopt(argc, argv, "n")) != -1) {
    323  1.2.2.2  simonb 	switch(ch) {
    324  1.2.2.2  simonb 	case 'n':
    325  1.2.2.2  simonb 	    nl = 1;
    326  1.2.2.2  simonb 	    break;
    327  1.2.2.2  simonb 	case '?':
    328  1.2.2.2  simonb 	default:
    329  1.2.2.2  simonb 	    /* getopt has already reported an error */
    330  1.2.2.2  simonb 	    return(CMD_OK);
    331  1.2.2.2  simonb 	}
    332  1.2.2.2  simonb     }
    333  1.2.2.2  simonb     argv += (optind);
    334  1.2.2.2  simonb     argc -= (optind);
    335  1.2.2.2  simonb 
    336  1.2.2.2  simonb     s = unargv(argc, argv);
    337  1.2.2.2  simonb     if (s != NULL) {
    338  1.2.2.2  simonb 	printf("%s", s);
    339  1.2.2.2  simonb 	free(s);
    340  1.2.2.2  simonb     }
    341  1.2.2.2  simonb     if (!nl)
    342  1.2.2.2  simonb 	printf("\n");
    343  1.2.2.2  simonb     return(CMD_OK);
    344  1.2.2.2  simonb }
    345  1.2.2.2  simonb 
    346  1.2.2.2  simonb /*
    347  1.2.2.2  simonb  * A passable emulation of the sh(1) command of the same name.
    348  1.2.2.2  simonb  */
    349  1.2.2.2  simonb 
    350  1.2.2.2  simonb 
    351  1.2.2.2  simonb int
    352  1.2.2.2  simonb command_read(int argc, char *argv[])
    353  1.2.2.2  simonb {
    354  1.2.2.2  simonb     char	*prompt;
    355  1.2.2.2  simonb     int		timeout;
    356  1.2.2.2  simonb     time_t	when;
    357  1.2.2.2  simonb     char	*cp;
    358  1.2.2.2  simonb     char	*name;
    359  1.2.2.2  simonb     char	buf[256];		/* XXX size? */
    360  1.2.2.2  simonb     int		c;
    361  1.2.2.2  simonb 
    362  1.2.2.2  simonb     timeout = -1;
    363  1.2.2.2  simonb     prompt = NULL;
    364  1.2.2.2  simonb     optind = 1;
    365  1.2.2.2  simonb     optreset = 1;
    366  1.2.2.2  simonb     while ((c = getopt(argc, argv, "p:t:")) != -1) {
    367  1.2.2.2  simonb 	switch(c) {
    368  1.2.2.2  simonb 
    369  1.2.2.2  simonb 	case 'p':
    370  1.2.2.2  simonb 	    prompt = optarg;
    371  1.2.2.2  simonb 	    break;
    372  1.2.2.2  simonb 	case 't':
    373  1.2.2.2  simonb 	    timeout = strtol(optarg, &cp, 0);
    374  1.2.2.2  simonb 	    if (cp == optarg) {
    375  1.2.2.2  simonb 		sprintf(command_errbuf, "bad timeout '%s'", optarg);
    376  1.2.2.2  simonb 		return(CMD_ERROR);
    377  1.2.2.2  simonb 	    }
    378  1.2.2.2  simonb 	    break;
    379  1.2.2.2  simonb 	default:
    380  1.2.2.2  simonb 	    return(CMD_OK);
    381  1.2.2.2  simonb 	}
    382  1.2.2.2  simonb     }
    383  1.2.2.2  simonb 
    384  1.2.2.2  simonb     argv += (optind);
    385  1.2.2.2  simonb     argc -= (optind);
    386  1.2.2.2  simonb     name = (argc > 0) ? argv[0]: NULL;
    387  1.2.2.2  simonb 
    388  1.2.2.2  simonb     if (prompt != NULL)
    389  1.2.2.2  simonb 	printf("%s", prompt);
    390  1.2.2.2  simonb     if (timeout >= 0) {
    391  1.2.2.2  simonb 	when = time(NULL) + timeout;
    392  1.2.2.2  simonb 	while (!ischar())
    393  1.2.2.2  simonb 	    if (time(NULL) >= when)
    394  1.2.2.2  simonb 		return(CMD_OK);		/* is timeout an error? */
    395  1.2.2.2  simonb     }
    396  1.2.2.2  simonb 
    397  1.2.2.2  simonb     ngets(buf, sizeof(buf));
    398  1.2.2.2  simonb 
    399  1.2.2.2  simonb     if (name != NULL)
    400  1.2.2.2  simonb 	setenv(name, buf, 1);
    401  1.2.2.2  simonb     return(CMD_OK);
    402  1.2.2.2  simonb }
    403  1.2.2.2  simonb 
    404  1.2.2.2  simonb /*
    405  1.2.2.2  simonb  * File pager
    406  1.2.2.2  simonb  */
    407  1.2.2.2  simonb 
    408  1.2.2.2  simonb int
    409  1.2.2.2  simonb command_more(int argc, char *argv[])
    410  1.2.2.2  simonb {
    411  1.2.2.2  simonb     int         i;
    412  1.2.2.2  simonb     int         res;
    413  1.2.2.2  simonb     char	line[80];
    414  1.2.2.2  simonb 
    415  1.2.2.2  simonb     res=0;
    416  1.2.2.2  simonb     pager_open();
    417  1.2.2.2  simonb     for (i = 1; (i < argc) && (res == 0); i++) {
    418  1.2.2.2  simonb 	sprintf(line, "*** FILE %s BEGIN ***\n", argv[i]);
    419  1.2.2.2  simonb 	if (pager_output(line))
    420  1.2.2.2  simonb 		break;
    421  1.2.2.2  simonb         res = page_file(argv[i]);
    422  1.2.2.2  simonb 	if (!res) {
    423  1.2.2.2  simonb 	    sprintf(line, "*** FILE %s END ***\n", argv[i]);
    424  1.2.2.2  simonb 	    res = pager_output(line);
    425  1.2.2.2  simonb 	}
    426  1.2.2.2  simonb     }
    427  1.2.2.2  simonb     pager_close();
    428  1.2.2.2  simonb 
    429  1.2.2.2  simonb     if (res == 0)
    430  1.2.2.2  simonb 	return CMD_OK;
    431  1.2.2.2  simonb     else
    432  1.2.2.2  simonb 	return CMD_ERROR;
    433  1.2.2.2  simonb }
    434  1.2.2.2  simonb 
    435  1.2.2.2  simonb static int
    436  1.2.2.2  simonb page_file(char *filename)
    437  1.2.2.2  simonb {
    438  1.2.2.2  simonb     int result;
    439  1.2.2.2  simonb 
    440  1.2.2.2  simonb     result = pager_file(filename);
    441  1.2.2.2  simonb 
    442  1.2.2.2  simonb     if (result == -1)
    443  1.2.2.2  simonb 	sprintf(command_errbuf, "error showing %s", filename);
    444  1.2.2.2  simonb 
    445  1.2.2.2  simonb     return result;
    446  1.2.2.2  simonb }
    447  1.2.2.2  simonb 
    448  1.2.2.2  simonb /*
    449  1.2.2.2  simonb  * List all disk-like devices
    450  1.2.2.2  simonb  */
    451  1.2.2.2  simonb 
    452  1.2.2.2  simonb int
    453  1.2.2.2  simonb command_lsdev(int argc, char *argv[])
    454  1.2.2.2  simonb {
    455  1.2.2.2  simonb     int		verbose, ch, i;
    456  1.2.2.2  simonb     char	line[80];
    457  1.2.2.2  simonb 
    458  1.2.2.2  simonb     verbose = 0;
    459  1.2.2.2  simonb     optind = 1;
    460  1.2.2.2  simonb     optreset = 1;
    461  1.2.2.2  simonb     while ((ch = getopt(argc, argv, "v")) != -1) {
    462  1.2.2.2  simonb 	switch(ch) {
    463  1.2.2.2  simonb 	case 'v':
    464  1.2.2.2  simonb 	    verbose = 1;
    465  1.2.2.2  simonb 	    break;
    466  1.2.2.2  simonb 	case '?':
    467  1.2.2.2  simonb 	default:
    468  1.2.2.2  simonb 	    /* getopt has already reported an error */
    469  1.2.2.2  simonb 	    return(CMD_OK);
    470  1.2.2.2  simonb 	}
    471  1.2.2.2  simonb     }
    472  1.2.2.2  simonb     argv += (optind);
    473  1.2.2.2  simonb     argc -= (optind);
    474  1.2.2.2  simonb 
    475  1.2.2.2  simonb     pager_open();
    476  1.2.2.2  simonb 
    477  1.2.2.2  simonb     sprintf(line, "Device Enumeration:\n");
    478  1.2.2.2  simonb     pager_output(line);
    479  1.2.2.2  simonb 
    480  1.2.2.2  simonb     for (i = 0; i < ndevs; i++) {
    481  1.2.2.2  simonb 	 sprintf(line, "%s\n", devsw[i].dv_name);
    482  1.2.2.2  simonb 	    if (pager_output(line))
    483  1.2.2.2  simonb 		    break;
    484  1.2.2.2  simonb     }
    485  1.2.2.2  simonb 
    486  1.2.2.2  simonb     pager_close();
    487  1.2.2.2  simonb     return(CMD_OK);
    488  1.2.2.2  simonb }
    489  1.2.2.2  simonb 
    490