37 tchar *dumphist[] =	{ S_history /* "history" */, S_h /* "-h" */, 0, 0 };
38 tchar *loadhist[] =	{ S_source /* "source" */, S_h /* "-h" */,
47 bool	fast;  variable
149 #if !defined(TEXT_DOMAIN)	/* Should be defined by cc -D */  in main()
167 	loginsh = **v == '-';  in main()
201 		fast++;			/* No home -> can't read scripts */  in main()
203 		if (strlen_(cp) >= BUFSIZ - 10) {  in main()
205 			fast++;  in main()
226 			set(S_user, strtots((tchar *)0, pw->pw_name));  in main()
227 			local_setenv(S_USER, strtots((tchar *)0, pw->pw_name));  in main()
235 	 * Re-initialize path if set in environment  in main()
250 	 * If the parent is non-interruptible our hand must be forced  in main()
273 	 * Note that processing of -v/-x is actually delayed till after  in main()
276 	c--, v++;  in main()
277 	while (c > 0 && (cp = v[0])[0] == '-' && *++cp != '\0' && !batch) {  in main()
280 		case 'b':		/* -b	Next arg is input file */  in main()
284 		case 'c':		/* -c	Command input from arg */  in main()
287 			c--, v++;  in main()
294 		case 'e':		/* -e	Exit on any error */  in main()
298 		case 'f':		/* -f	Fast start */  in main()
299 			fast++;  in main()
302 		case 'i':		/* -i	Interactive, even if !intty */  in main()
307 		case 'n':		/* -n	Don't execute */  in main()
311 		case 'q':		/* -q	(Undoc'd) ... die on quit */  in main()
315 		case 's':		/* -s	Read from std input */  in main()
319 		case 't':		/* -t	Read one line from input */  in main()
325 		case 'T':		/* -T	trace switch on */  in main()
330 		case 'v':		/* -v	Echo hist expanded input */  in main()
334 		case 'x':		/* -x	Echo just before execution */  in main()
338 		case 'V':		/* -V	Echo hist expanded input */  in main()
342 		case 'X':		/* -X	Echo just before execution */  in main()
347 		v++, c--;  in main()
354 	 * Unless prevented by -c, -i, -s, or -t, if there  in main()
356 	 * of a shell file from which to read commands.  in main()
374 		c--, v++;  in main()
384 	 * If we are explicitly told (via -i, or -) or we are a login  in main()
385 	 * shell (arg0 starts with -) or the input and output are both  in main()
415 	opgrp = tpgrp = -1;  in main()
417 		**av = '-';  in main()
451 				f = -1;  in main()
454 			    tpgrp != -1) {  in main()
471 				tpgrp = -1;  in main()
488 	 * the shell start-up scripts.  in main()
492 	if (!fast && reenter == 0) {  in main()
508 		/* Will have value("home") here because set fast if don't */  in main()
513 		if (!fast && !arginp && !onelflg && !havhash)  in main()
535 		if (!fast && !arginp && !onelflg && !havhash2)  in main()
540 	 * Now are ready for the -v and -x flags  in main()
556 	 * Mop-up.  in main()
622 	int unit = dmove(open_(ep, 0), -1);  in srccat()
641 	int unit = dmove(open_(ep, 0), -1);  in srccat_inlogin()
657 	int oSHIN = -1, oldintty = intty;  in srcunit()
725 		process(0);		/* 0 -> blow away on errors */  in srcunit()
769 	if (!fast) {  in rechist()
775 		if (fp == -1)  in rechist()
884 	 * Note that if one does "onintr -" then we shan't be interruptible  in pintr1()
911  * If an end-of-file occurs, we return.
951 			 * point that we clean up any left-over open  in process()
953 			 * of pre-defined files.  Thus routines don't  in process()
965 			chkstop--;  in process()
972 			 * then we are going to read fresh stuff.  in process()
1065 	if (*t && eq(*t, S_h /* "-h" */)) {  in dosource()
1072 	u = dmove(open_(f, 0), -1);  in dosource()
1104 	vp = v->vec;  in mailchk()
1106 	intvl = (cnt && number(*vp)) ? (--cnt, getn(*vp++)) : MAILINTVL;  in mailchk()
1144 	(void) strcpy_(home, strtots(home_ts, pp->pw_dir));  in gethdir()
1199 	while (*v && num--)  in strblktotsblk()
1243  *	 file in a form of #! /bin/csh -b.)
1290 	int script_fd = -1;  in initdesc_x()
1314 			script_fd = -1;  in initdesc_x()
1447 		for (i = max_fd-1; i >= 3; i--)  in unsetfd()