[unix-history] / usr / src / bin / csh / init.c

/*
 * Copyright (c) 1980 Regents of the University of California.
 * All rights reserved.  The Berkeley Software License Agreement
 * specifies the terms and conditions for redistribution.
 */

#ifndef lint
static char *sccsid = "@(#)init.c	5.2 (Berkeley) %G%";
#endif

#include "sh.local.h"

/*
 * C shell
 */

extern	int doalias();
extern	int dobg();
extern	int dobreak();
extern	int dochngd();
extern	int docontin();
extern	int dodirs();
extern	int doecho();
extern	int doelse();
extern	int doend();
extern	int doendif();
extern	int doendsw();
extern	int doeval();
extern	int doexit();
extern	int dofg();
extern	int doforeach();
extern	int doglob();
extern	int dogoto();
extern	int dohash();
extern	int dohist();
extern	int doif();
extern	int dojobs();
extern	int dokill();
extern	int dolet();
extern	int dolimit();
extern	int dologin();
extern	int dologout();
#ifdef NEWGRP
extern	int donewgrp();
#endif
extern	int donice();
extern	int donotify();
extern	int donohup();
extern	int doonintr();
extern	int dopopd();
extern	int dopushd();
extern	int dorepeat();
extern	int doset();
extern	int dosetenv();
extern	int dosource();
extern	int dostop();
extern	int dosuspend();
extern	int doswbrk();
extern	int doswitch();
extern	int dotime();
extern	int dounlimit();
extern	int doumask();
extern	int dowait();
extern	int dowhile();
extern	int dozip();
extern	int execash();
extern	int goodbye();
#ifdef VFORK
extern	int hashstat();
#endif
extern	int shift();
extern	int showall();
extern	int unalias();
extern	int dounhash();
extern	int unset();
extern	int dounsetenv();

#define	INF	1000

struct	biltins {
	char	*bname;
	int	(*bfunct)();
	short	minargs, maxargs;
} bfunc[] = {
	"@",		dolet,		0,	INF,
	"alias",	doalias,	0,	INF,
	"alloc",	showall,	0,	1,
	"bg",		dobg,		0,	INF,
	"break",	dobreak,	0,	0,
	"breaksw",	doswbrk,	0,	0,
#ifdef IIASA
	"bye",		goodbye,	0,	0,
#endif
	"case",		dozip,		0,	1,
	"cd",		dochngd,	0,	1,
	"chdir",	dochngd,	0,	1,
	"continue",	docontin,	0,	0,
	"default",	dozip,		0,	0,
	"dirs",		dodirs,		0,	1,
	"echo",		doecho,		0,	INF,
	"else",		doelse,		0,	INF,
	"end",		doend,		0,	0,
	"endif",	dozip,		0,	0,
	"endsw",	dozip,		0,	0,
	"eval",		doeval,		0,	INF,
	"exec",		execash,	1,	INF,
	"exit",		doexit,		0,	INF,
	"fg",		dofg,		0,	INF,
	"foreach",	doforeach,	3,	INF,
#ifdef IIASA
	"gd",		dopushd,	0,	1,
#endif
	"glob",		doglob,		0,	INF,
	"goto",		dogoto,		1,	1,
#ifdef VFORK
	"hashstat",	hashstat,	0,	0,
#endif
	"history",	dohist,		0,	2,
	"if",		doif,		1,	INF,
	"jobs",		dojobs,		0,	1,
	"kill",		dokill,		1,	INF,
	"limit",	dolimit,	0,	3,
	"login",	dologin,	0,	1,
	"logout",	dologout,	0,	0,
#ifdef NEWGRP
	"newgrp",	donewgrp,	1,	1,
#endif
	"nice",		donice,		0,	INF,
	"nohup",	donohup,	0,	INF,
	"notify",	donotify,	0,	INF,
	"onintr",	doonintr,	0,	2,
	"popd",		dopopd,		0,	1,
	"pushd",	dopushd,	0,	1,
#ifdef IIASA
	"rd",		dopopd,		0,	1,
#endif
	"rehash",	dohash,		0,	0,
	"repeat",	dorepeat,	2,	INF,
	"set",		doset,		0,	INF,
	"setenv",	dosetenv,	0,	2,
	"shift",	shift,		0,	1,
	"source",	dosource,	1,	2,
	"stop",		dostop,		1,	INF,
	"suspend",	dosuspend,	0,	0,
	"switch",	doswitch,	1,	INF,
	"time",		dotime,		0,	INF,
	"umask",	doumask,	0,	1,
	"unalias",	unalias,	1,	INF,
	"unhash",	dounhash,	0,	0,
	"unlimit",	dounlimit,	0,	INF,
	"unset",	unset,		1,	INF,
	"unsetenv",	dounsetenv,	1,	INF,
	"wait",		dowait,		0,	0,
	"while",	dowhile,	1,	INF,
};
int nbfunc = sizeof bfunc / sizeof *bfunc;

#define	ZBREAK		0
#define	ZBRKSW		1
#define	ZCASE		2
#define	ZDEFAULT 	3
#define	ZELSE		4
#define	ZEND		5
#define	ZENDIF		6
#define	ZENDSW		7
#define	ZEXIT		8
#define	ZFOREACH	9
#define	ZGOTO		10
#define	ZIF		11
#define	ZLABEL		12
#define	ZLET		13
#define	ZSET		14
#define	ZSWITCH		15
#define	ZTEST		16
#define	ZTHEN		17
#define	ZWHILE		18

struct srch {
	char	*s_name;
	short	s_value;
} srchn[] = {
	"@",		ZLET,
	"break",	ZBREAK,
	"breaksw",	ZBRKSW,
	"case",		ZCASE,
	"default", 	ZDEFAULT,
	"else",		ZELSE,
	"end",		ZEND,
	"endif",	ZENDIF,
	"endsw",	ZENDSW,
	"exit",		ZEXIT,
	"foreach", 	ZFOREACH,
	"goto",		ZGOTO,
	"if",		ZIF,
	"label",	ZLABEL,
	"set",		ZSET,
	"switch",	ZSWITCH,
	"while",	ZWHILE,
};
int nsrchn = sizeof srchn / sizeof *srchn;

struct	mesg {
	char	*iname;
	char	*pname;
} mesg[] = {
	0,	0,
	"HUP",	"Hangup",
	"INT",	"Interrupt",	
	"QUIT",	"Quit",
	"ILL",	"Illegal instruction",
	"TRAP",	"Trace/BPT trap",
	"IOT",	"IOT trap",
	"EMT",	"EMT trap",
	"FPE",	"Floating exception",
	"KILL",	"Killed",
	"BUS",	"Bus error",
	"SEGV",	"Segmentation fault",
	"SYS",	"Bad system call",
	"PIPE",	"Broken pipe",
	"ALRM",	"Alarm clock",
	"TERM",	"Terminated",
	"URG",	"Urgent I/O condition",
	"STOP",	"Stopped (signal)",
	"TSTP",	"Stopped",
	"CONT",	"Continued",
	"CHLD",	"Child exited",
	"TTIN", "Stopped (tty input)",
	"TTOU", "Stopped (tty output)",
	"IO",	"I/O possible",
	"XCPU",	"Cputime limit exceeded",
	"XFSZ", "Filesize limit exceeded",
	"VTALRM","Virtual timer expired",
	"PROF",	"Profiling timer expired",
	"WINCH","Window size changed",
	0,	"Signal 29",
	"USR1",	"User defined signal 1",
	"USR2",	"User defined signal 2",
	0,	"Signal 32"
};
Commit	Line	Data
b79f4fa9 DF	1	/*
b79f4fa9 DF	2	* Copyright (c) 1980 Regents of the University of California.
094e80ed	3	* All rights reserved. The Berkeley Software License Agreement
b79f4fa9 DF	4	* specifies the terms and conditions for redistribution.
	5	*/
	6
35371dec	7	#ifndef lint
094e80ed EW	8	static char *sccsid = "@(#)init.c 5.2 (Berkeley) %G%";
094e80ed EW	9	#endif
90503b97 BJ	10
	11	#include "sh.local.h"
	12
	13	/*
	14	* C shell
	15	*/
	16
	17	extern int doalias();
	18	extern int dobg();
	19	extern int dobreak();
	20	extern int dochngd();
	21	extern int docontin();
	22	extern int dodirs();
	23	extern int doecho();
	24	extern int doelse();
	25	extern int doend();
	26	extern int doendif();
	27	extern int doendsw();
	28	extern int doeval();
	29	extern int doexit();
	30	extern int dofg();
	31	extern int doforeach();
	32	extern int doglob();
	33	extern int dogoto();
	34	extern int dohash();
	35	extern int dohist();
	36	extern int doif();
	37	extern int dojobs();
	38	extern int dokill();
	39	extern int dolet();
	40	extern int dolimit();
	41	extern int dologin();
	42	extern int dologout();
6ca601c1	43	#ifdef NEWGRP
90503b97	44	extern int donewgrp();
6ca601c1	45	#endif
90503b97 BJ	46	extern int donice();
	47	extern int donotify();
	48	extern int donohup();
	49	extern int doonintr();
	50	extern int dopopd();
	51	extern int dopushd();
	52	extern int dorepeat();
	53	extern int doset();
	54	extern int dosetenv();
	55	extern int dosource();
	56	extern int dostop();
	57	extern int dosuspend();
	58	extern int doswbrk();
	59	extern int doswitch();
	60	extern int dotime();
	61	extern int dounlimit();
	62	extern int doumask();
	63	extern int dowait();
	64	extern int dowhile();
	65	extern int dozip();
	66	extern int execash();
	67	extern int goodbye();
	68	#ifdef VFORK
	69	extern int hashstat();
	70	#endif
	71	extern int shift();
	72	extern int showall();
	73	extern int unalias();
	74	extern int dounhash();
	75	extern int unset();
	76	extern int dounsetenv();
	77
	78	#define INF 1000
	79
	80	struct biltins {
	81	char *bname;
	82	int (*bfunct)();
	83	short minargs, maxargs;
	84	} bfunc[] = {
	85	"@", dolet, 0, INF,
	86	"alias", doalias, 0, INF,
90503b97	87	"alloc", showall, 0, 1,
90503b97 BJ	88	"bg", dobg, 0, INF,
	89	"break", dobreak, 0, 0,
	90	"breaksw", doswbrk, 0, 0,
	91	#ifdef IIASA
	92	"bye", goodbye, 0, 0,
	93	#endif
	94	"case", dozip, 0, 1,
	95	"cd", dochngd, 0, 1,
	96	"chdir", dochngd, 0, 1,
	97	"continue", docontin, 0, 0,
	98	"default", dozip, 0, 0,
	99	"dirs", dodirs, 0, 1,
	100	"echo", doecho, 0, INF,
	101	"else", doelse, 0, INF,
	102	"end", doend, 0, 0,
	103	"endif", dozip, 0, 0,
	104	"endsw", dozip, 0, 0,
	105	"eval", doeval, 0, INF,
	106	"exec", execash, 1, INF,
	107	"exit", doexit, 0, INF,
	108	"fg", dofg, 0, INF,
	109	"foreach", doforeach, 3, INF,
	110	#ifdef IIASA
	111	"gd", dopushd, 0, 1,
	112	#endif
	113	"glob", doglob, 0, INF,
	114	"goto", dogoto, 1, 1,
	115	#ifdef VFORK
	116	"hashstat", hashstat, 0, 0,
	117	#endif
	118	"history", dohist, 0, 2,
	119	"if", doif, 1, INF,
	120	"jobs", dojobs, 0, 1,
	121	"kill", dokill, 1, INF,
	122	"limit", dolimit, 0, 3,
	123	"login", dologin, 0, 1,
	124	"logout", dologout, 0, 0,
6ca601c1	125	#ifdef NEWGRP
90503b97	126	"newgrp", donewgrp, 1, 1,
6ca601c1	127	#endif
90503b97 BJ	128	"nice", donice, 0, INF,
	129	"nohup", donohup, 0, INF,
	130	"notify", donotify, 0, INF,
	131	"onintr", doonintr, 0, 2,
	132	"popd", dopopd, 0, 1,
	133	"pushd", dopushd, 0, 1,
	134	#ifdef IIASA
	135	"rd", dopopd, 0, 1,
	136	#endif
	137	"rehash", dohash, 0, 0,
	138	"repeat", dorepeat, 2, INF,
	139	"set", doset, 0, INF,
c349da0d	140	"setenv", dosetenv, 0, 2,
90503b97	141	"shift", shift, 0, 1,
3d48fab8	142	"source", dosource, 1, 2,
90503b97 BJ	143	"stop", dostop, 1, INF,
	144	"suspend", dosuspend, 0, 0,
	145	"switch", doswitch, 1, INF,
	146	"time", dotime, 0, INF,
	147	"umask", doumask, 0, 1,
	148	"unalias", unalias, 1, INF,
	149	"unhash", dounhash, 0, 0,
	150	"unlimit", dounlimit, 0, INF,
	151	"unset", unset, 1, INF,
	152	"unsetenv", dounsetenv, 1, INF,
	153	"wait", dowait, 0, 0,
	154	"while", dowhile, 1, INF,
90503b97	155	};
35371dec	156	int nbfunc = sizeof bfunc / sizeof *bfunc;
90503b97 BJ	157
	158	#define ZBREAK 0
	159	#define ZBRKSW 1
	160	#define ZCASE 2
	161	#define ZDEFAULT 3
	162	#define ZELSE 4
	163	#define ZEND 5
	164	#define ZENDIF 6
	165	#define ZENDSW 7
	166	#define ZEXIT 8
	167	#define ZFOREACH 9
	168	#define ZGOTO 10
	169	#define ZIF 11
	170	#define ZLABEL 12
	171	#define ZLET 13
	172	#define ZSET 14
	173	#define ZSWITCH 15
	174	#define ZTEST 16
	175	#define ZTHEN 17
	176	#define ZWHILE 18
	177
	178	struct srch {
	179	char *s_name;
	180	short s_value;
	181	} srchn[] = {
	182	"@", ZLET,
	183	"break", ZBREAK,
	184	"breaksw", ZBRKSW,
	185	"case", ZCASE,
	186	"default", ZDEFAULT,
	187	"else", ZELSE,
	188	"end", ZEND,
	189	"endif", ZENDIF,
	190	"endsw", ZENDSW,
	191	"exit", ZEXIT,
	192	"foreach", ZFOREACH,
	193	"goto", ZGOTO,
	194	"if", ZIF,
	195	"label", ZLABEL,
	196	"set", ZSET,
	197	"switch", ZSWITCH,
	198	"while", ZWHILE,
90503b97	199	};
35371dec	200	int nsrchn = sizeof srchn / sizeof *srchn;
90503b97 BJ	201
	202	struct mesg {
	203	char *iname;
	204	char *pname;
	205	} mesg[] = {
	206	0, 0,
	207	"HUP", "Hangup",
	208	"INT", "Interrupt",
	209	"QUIT", "Quit",
	210	"ILL", "Illegal instruction",
	211	"TRAP", "Trace/BPT trap",
	212	"IOT", "IOT trap",
	213	"EMT", "EMT trap",
	214	"FPE", "Floating exception",
	215	"KILL", "Killed",
	216	"BUS", "Bus error",
	217	"SEGV", "Segmentation fault",
	218	"SYS", "Bad system call",
	219	"PIPE", "Broken pipe",
	220	"ALRM", "Alarm clock",
	221	"TERM", "Terminated",
35371dec	222	"URG", "Urgent I/O condition",
90503b97 BJ	223	"STOP", "Stopped (signal)",
	224	"TSTP", "Stopped",
	225	"CONT", "Continued",
	226	"CHLD", "Child exited",
	227	"TTIN", "Stopped (tty input)",
	228	"TTOU", "Stopped (tty output)",
35371dec	229	"IO", "I/O possible",
90503b97 BJ	230	"XCPU", "Cputime limit exceeded",
90503b97 BJ	231	"XFSZ", "Filesize limit exceeded",
35371dec EW	232	"VTALRM","Virtual timer expired",
35371dec EW	233	"PROF", "Profiling timer expired",
c65b8cef	234	"WINCH","Window size changed",
90503b97	235	0, "Signal 29",
2ec6024a KM	236	"USR1", "User defined signal 1",
2ec6024a KM	237	"USR2", "User defined signal 2",
90503b97 BJ	238	0, "Signal 32"
90503b97 BJ	239	};