[unix-history] / usr / src / cmd / learn / mem.c

# include "stdio.h"
# include "lrnref"
# define SAME 0

struct keys {
	char *k_wd;
	int k_val;
} keybuff[] = {
	{"ready",	READY},
	{"answer",	READY},
	{"#print",	PRINT},
	{"#copyin",	COPYIN},
	{"#uncopyin",	UNCOPIN},
	{"#copyout",	COPYOUT},
	{"#uncopyout",	UNCOPOUT},
	{"#pipe",	PIPE},
	{"#unpipe",	UNPIPE},
	{"#succeed",	SUCCEED},
	{"#fail",	FAIL},
	{"bye",		BYE},
	{"chdir",	CHDIR},
	{"cd",		CHDIR},
	{"learn",	LEARN},
	{"#log",	LOG},
	{"yes",		YES},
	{"no",		NO},
	{"#mv",		MV},
	{"#user",	USER},
	{"#next",	NEXT},
	{"skip",	SKIP},
	{"#where",	WHERE},
	{"#match",	MATCH},
	{"#bad",	BAD},
	{"#create",	CREATE},
	{"#cmp",	CMP},
	{"#goto",	GOTO},
	{"#once",	ONCE},
	{"#",		NOP},
	{NULL,		0}
};

int *action(s)
char *s;
{
	struct keys *kp;
	for (kp=keybuff; kp->k_wd; kp++)
		if (strcmp(kp->k_wd, s) == SAME)
			return(&(kp->k_val));
	return(NULL);
}

# define NW 100
# define NWCH 800
struct whichdid {
	char *w_less;
	int w_seq;
} which[NW];
int nwh = 0;
char whbuff[NWCH];
char *whcp = whbuff;

setdid(lesson, sequence)
char *lesson;
{
	struct whichdid *pw;
	for(pw=which; pw < which+nwh; pw++)
		if (strcmp(pw->w_less, lesson) == SAME)
			{
			pw->w_seq = sequence;
			return;
			}
	pw=which+nwh++;
	if (nwh >= NW) {
		fprintf(stderr, "nwh>=NW\n");
		wrapup(1);
	}
	pw->w_seq = sequence;
	pw->w_less = whcp;
	while (*whcp++ = *lesson++);
	if (whcp >= whbuff + NWCH) {
		fprintf(stderr, "lesson name too long\n");
		wrapup(1);
	}
}

already(lesson, sequence)
char *lesson;
{
	struct whichdid *pw;
	for (pw=which; pw < which+nwh; pw++)
		if (strcmp(pw->w_less, lesson) == SAME)
			return(1);
	return(0);
}
Commit	Line	Data
bbddffb1 TL	1	# include "stdio.h"
	2	# include "lrnref"
	3	# define SAME 0
	4
	5	struct keys {
	6	char *k_wd;
	7	int k_val;
	8	} keybuff[] = {
	9	{"ready", READY},
	10	{"answer", READY},
	11	{"#print", PRINT},
	12	{"#copyin", COPYIN},
	13	{"#uncopyin", UNCOPIN},
	14	{"#copyout", COPYOUT},
	15	{"#uncopyout", UNCOPOUT},
	16	{"#pipe", PIPE},
	17	{"#unpipe", UNPIPE},
	18	{"#succeed", SUCCEED},
	19	{"#fail", FAIL},
	20	{"bye", BYE},
	21	{"chdir", CHDIR},
	22	{"cd", CHDIR},
	23	{"learn", LEARN},
	24	{"#log", LOG},
	25	{"yes", YES},
	26	{"no", NO},
	27	{"#mv", MV},
	28	{"#user", USER},
	29	{"#next", NEXT},
	30	{"skip", SKIP},
	31	{"#where", WHERE},
	32	{"#match", MATCH},
	33	{"#bad", BAD},
	34	{"#create", CREATE},
	35	{"#cmp", CMP},
	36	{"#goto", GOTO},
	37	{"#once", ONCE},
	38	{"#", NOP},
	39	{NULL, 0}
	40	};
	41
	42	int *action(s)
	43	char *s;
	44	{
	45	struct keys *kp;
	46	for (kp=keybuff; kp->k_wd; kp++)
	47	if (strcmp(kp->k_wd, s) == SAME)
	48	return(&(kp->k_val));
	49	return(NULL);
	50	}
	51
	52	# define NW 100
	53	# define NWCH 800
	54	struct whichdid {
	55	char *w_less;
	56	int w_seq;
	57	} which[NW];
	58	int nwh = 0;
	59	char whbuff[NWCH];
	60	char *whcp = whbuff;
	61
	62	setdid(lesson, sequence)
	63	char *lesson;
	64	{
65	struct whichdid *pw;
66	for(pw=which; pw < which+nwh; pw++)
67	if (strcmp(pw->w_less, lesson) == SAME)
68	{
69	pw->w_seq = sequence;
70	return;
71	}
72	pw=which+nwh++;
73	if (nwh >= NW) {
74	fprintf(stderr, "nwh>=NW\n");
75	wrapup(1);
76	}
77	pw->w_seq = sequence;
78	pw->w_less = whcp;
79	while (whcp++ = lesson++);
80	if (whcp >= whbuff + NWCH) {
81	fprintf(stderr, "lesson name too long\n");
82	wrapup(1);
83	}
84	}
85
86	already(lesson, sequence)
87	char *lesson;
88	{
89	struct whichdid *pw;
90	for (pw=which; pw < which+nwh; pw++)
91	if (strcmp(pw->w_less, lesson) == SAME)
92	return(1);
93	return(0);
94	}