xref: /freebsd/bin/sh/miscbltin.c (revision 4b88c807ea9c629dc5691abc7e3cac9ea0d776dd)
14b88c807SRodney W. Grimes /*-
24b88c807SRodney W. Grimes  * Copyright (c) 1991, 1993
34b88c807SRodney W. Grimes  *	The Regents of the University of California.  All rights reserved.
44b88c807SRodney W. Grimes  *
54b88c807SRodney W. Grimes  * This code is derived from software contributed to Berkeley by
64b88c807SRodney W. Grimes  * Kenneth Almquist.
74b88c807SRodney W. Grimes  *
84b88c807SRodney W. Grimes  * Redistribution and use in source and binary forms, with or without
94b88c807SRodney W. Grimes  * modification, are permitted provided that the following conditions
104b88c807SRodney W. Grimes  * are met:
114b88c807SRodney W. Grimes  * 1. Redistributions of source code must retain the above copyright
124b88c807SRodney W. Grimes  *    notice, this list of conditions and the following disclaimer.
134b88c807SRodney W. Grimes  * 2. Redistributions in binary form must reproduce the above copyright
144b88c807SRodney W. Grimes  *    notice, this list of conditions and the following disclaimer in the
154b88c807SRodney W. Grimes  *    documentation and/or other materials provided with the distribution.
164b88c807SRodney W. Grimes  * 3. All advertising materials mentioning features or use of this software
174b88c807SRodney W. Grimes  *    must display the following acknowledgement:
184b88c807SRodney W. Grimes  *	This product includes software developed by the University of
194b88c807SRodney W. Grimes  *	California, Berkeley and its contributors.
204b88c807SRodney W. Grimes  * 4. Neither the name of the University nor the names of its contributors
214b88c807SRodney W. Grimes  *    may be used to endorse or promote products derived from this software
224b88c807SRodney W. Grimes  *    without specific prior written permission.
234b88c807SRodney W. Grimes  *
244b88c807SRodney W. Grimes  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
254b88c807SRodney W. Grimes  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
264b88c807SRodney W. Grimes  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
274b88c807SRodney W. Grimes  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
284b88c807SRodney W. Grimes  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
294b88c807SRodney W. Grimes  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
304b88c807SRodney W. Grimes  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
314b88c807SRodney W. Grimes  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
324b88c807SRodney W. Grimes  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
334b88c807SRodney W. Grimes  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
344b88c807SRodney W. Grimes  * SUCH DAMAGE.
354b88c807SRodney W. Grimes  */
364b88c807SRodney W. Grimes 
374b88c807SRodney W. Grimes #ifndef lint
384b88c807SRodney W. Grimes static char sccsid[] = "@(#)miscbltin.c	8.2 (Berkeley) 4/16/94";
394b88c807SRodney W. Grimes #endif /* not lint */
404b88c807SRodney W. Grimes 
414b88c807SRodney W. Grimes /*
424b88c807SRodney W. Grimes  * Miscelaneous builtins.
434b88c807SRodney W. Grimes  */
444b88c807SRodney W. Grimes 
454b88c807SRodney W. Grimes #include "shell.h"
464b88c807SRodney W. Grimes #include "options.h"
474b88c807SRodney W. Grimes #include "var.h"
484b88c807SRodney W. Grimes #include "output.h"
494b88c807SRodney W. Grimes #include "memalloc.h"
504b88c807SRodney W. Grimes #include "error.h"
514b88c807SRodney W. Grimes #include "mystring.h"
524b88c807SRodney W. Grimes 
534b88c807SRodney W. Grimes #undef eflag
544b88c807SRodney W. Grimes 
554b88c807SRodney W. Grimes extern char **argptr;		/* argument list for builtin command */
564b88c807SRodney W. Grimes 
574b88c807SRodney W. Grimes 
584b88c807SRodney W. Grimes /*
594b88c807SRodney W. Grimes  * The read builtin.  The -e option causes backslashes to escape the
604b88c807SRodney W. Grimes  * following character.
614b88c807SRodney W. Grimes  *
624b88c807SRodney W. Grimes  * This uses unbuffered input, which may be avoidable in some cases.
634b88c807SRodney W. Grimes  */
644b88c807SRodney W. Grimes 
654b88c807SRodney W. Grimes readcmd(argc, argv)  char **argv; {
664b88c807SRodney W. Grimes 	char **ap;
674b88c807SRodney W. Grimes 	int backslash;
684b88c807SRodney W. Grimes 	char c;
694b88c807SRodney W. Grimes 	int eflag;
704b88c807SRodney W. Grimes 	char *prompt;
714b88c807SRodney W. Grimes 	char *ifs;
724b88c807SRodney W. Grimes 	char *p;
734b88c807SRodney W. Grimes 	int startword;
744b88c807SRodney W. Grimes 	int status;
754b88c807SRodney W. Grimes 	int i;
764b88c807SRodney W. Grimes 
774b88c807SRodney W. Grimes 	eflag = 0;
784b88c807SRodney W. Grimes 	prompt = NULL;
794b88c807SRodney W. Grimes 	while ((i = nextopt("ep:")) != '\0') {
804b88c807SRodney W. Grimes 		if (i == 'p')
814b88c807SRodney W. Grimes 			prompt = optarg;
824b88c807SRodney W. Grimes 		else
834b88c807SRodney W. Grimes 			eflag = 1;
844b88c807SRodney W. Grimes 	}
854b88c807SRodney W. Grimes 	if (prompt && isatty(0)) {
864b88c807SRodney W. Grimes 		out2str(prompt);
874b88c807SRodney W. Grimes 		flushall();
884b88c807SRodney W. Grimes 	}
894b88c807SRodney W. Grimes 	if (*(ap = argptr) == NULL)
904b88c807SRodney W. Grimes 		error("arg count");
914b88c807SRodney W. Grimes 	if ((ifs = bltinlookup("IFS", 1)) == NULL)
924b88c807SRodney W. Grimes 		ifs = nullstr;
934b88c807SRodney W. Grimes 	status = 0;
944b88c807SRodney W. Grimes 	startword = 1;
954b88c807SRodney W. Grimes 	backslash = 0;
964b88c807SRodney W. Grimes 	STARTSTACKSTR(p);
974b88c807SRodney W. Grimes 	for (;;) {
984b88c807SRodney W. Grimes 		if (read(0, &c, 1) != 1) {
994b88c807SRodney W. Grimes 			status = 1;
1004b88c807SRodney W. Grimes 			break;
1014b88c807SRodney W. Grimes 		}
1024b88c807SRodney W. Grimes 		if (c == '\0')
1034b88c807SRodney W. Grimes 			continue;
1044b88c807SRodney W. Grimes 		if (backslash) {
1054b88c807SRodney W. Grimes 			backslash = 0;
1064b88c807SRodney W. Grimes 			if (c != '\n')
1074b88c807SRodney W. Grimes 				STPUTC(c, p);
1084b88c807SRodney W. Grimes 			continue;
1094b88c807SRodney W. Grimes 		}
1104b88c807SRodney W. Grimes 		if (eflag && c == '\\') {
1114b88c807SRodney W. Grimes 			backslash++;
1124b88c807SRodney W. Grimes 			continue;
1134b88c807SRodney W. Grimes 		}
1144b88c807SRodney W. Grimes 		if (c == '\n')
1154b88c807SRodney W. Grimes 			break;
1164b88c807SRodney W. Grimes 		if (startword && *ifs == ' ' && strchr(ifs, c)) {
1174b88c807SRodney W. Grimes 			continue;
1184b88c807SRodney W. Grimes 		}
1194b88c807SRodney W. Grimes 		startword = 0;
1204b88c807SRodney W. Grimes 		if (backslash && c == '\\') {
1214b88c807SRodney W. Grimes 			if (read(0, &c, 1) != 1) {
1224b88c807SRodney W. Grimes 				status = 1;
1234b88c807SRodney W. Grimes 				break;
1244b88c807SRodney W. Grimes 			}
1254b88c807SRodney W. Grimes 			STPUTC(c, p);
1264b88c807SRodney W. Grimes 		} else if (ap[1] != NULL && strchr(ifs, c) != NULL) {
1274b88c807SRodney W. Grimes 			STACKSTRNUL(p);
1284b88c807SRodney W. Grimes 			setvar(*ap, stackblock(), 0);
1294b88c807SRodney W. Grimes 			ap++;
1304b88c807SRodney W. Grimes 			startword = 1;
1314b88c807SRodney W. Grimes 			STARTSTACKSTR(p);
1324b88c807SRodney W. Grimes 		} else {
1334b88c807SRodney W. Grimes 			STPUTC(c, p);
1344b88c807SRodney W. Grimes 		}
1354b88c807SRodney W. Grimes 	}
1364b88c807SRodney W. Grimes 	STACKSTRNUL(p);
1374b88c807SRodney W. Grimes 	setvar(*ap, stackblock(), 0);
1384b88c807SRodney W. Grimes 	while (*++ap != NULL)
1394b88c807SRodney W. Grimes 		setvar(*ap, nullstr, 0);
1404b88c807SRodney W. Grimes 	return status;
1414b88c807SRodney W. Grimes }
1424b88c807SRodney W. Grimes 
1434b88c807SRodney W. Grimes 
1444b88c807SRodney W. Grimes 
1454b88c807SRodney W. Grimes umaskcmd(argc, argv)  char **argv; {
1464b88c807SRodney W. Grimes 	int mask;
1474b88c807SRodney W. Grimes 	char *p;
1484b88c807SRodney W. Grimes 	int i;
1494b88c807SRodney W. Grimes 
1504b88c807SRodney W. Grimes 	if ((p = argv[1]) == NULL) {
1514b88c807SRodney W. Grimes 		INTOFF;
1524b88c807SRodney W. Grimes 		mask = umask(0);
1534b88c807SRodney W. Grimes 		umask(mask);
1544b88c807SRodney W. Grimes 		INTON;
1554b88c807SRodney W. Grimes 		out1fmt("%.4o\n", mask);	/* %#o might be better */
1564b88c807SRodney W. Grimes 	} else {
1574b88c807SRodney W. Grimes 		mask = 0;
1584b88c807SRodney W. Grimes 		do {
1594b88c807SRodney W. Grimes 			if ((unsigned)(i = *p - '0') >= 8)
1604b88c807SRodney W. Grimes 				error("Illegal number: %s", argv[1]);
1614b88c807SRodney W. Grimes 			mask = (mask << 3) + i;
1624b88c807SRodney W. Grimes 		} while (*++p != '\0');
1634b88c807SRodney W. Grimes 		umask(mask);
1644b88c807SRodney W. Grimes 	}
1654b88c807SRodney W. Grimes 	return 0;
1664b88c807SRodney W. Grimes }
167