sh.c

/* \file sh.c
 *
 * A simple shell
 */

#include <signal.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

#include "cmd.h"
#include "error.h"
#include "eval.h"
#include "input.h"
#include "lexer.h"
#include "mem.h"
#include "output.h"
#include "parser.h"
#include "redir.h"
#include "sh.h"
#include "trap.h"
#include "var.h"

int rootpid;

int main(int argc, char **argv)
{
	int fd, exception;
	struct stackmark mark;
	struct jmploc jmploc;

	if (argc > 1) {
		if (strcmp(argv[1], "-c") == 0) {
			if (argc > 2)
				setinputstring(argv[2], 0);
			else
				die("-c requires an argument");
		} else {
			fd = setinputfile(argv[1], INPUT_NOFILE_OK);
			if (fd < 0)
				sdie(127, "%s:", argv[1]);
		}
	}

	INTOFF;
	if ((exception = setjmp(jmploc.loc))) {
		/* reset the shell */
		unwindredir();
		unwindloops();
		closescript();
		yytoken = TNL;
		popstackmark(&mark);
		if (exception == EXINT)
			fputc('\n', stderr);
	} else {
		pushstackmark(&mark);
		rootpid = getpid();
		initvar();
		signal_init();
	}
	handler = &jmploc;
	FORCEINTON;

	return repl();
}

int repl(void)
{
	int status = 0;
	struct cmd *cmd;
	struct stackmark mark;

	pushstackmark(&mark);

	for (; (cmd = parseline()) != CEOF; popstackmark(&mark))
		if (cmd)
			status = eval(cmd);

	return status;
}

int source_builtin(struct cexec *cmd)
{
	int status;

	if (cmd->argc < 2) {
		perrorf("%s: not enough arguments", cmd->argv[0]);
		return 1;
	}

	setinputfile(cmd->argv[1], INPUT_PUSH_FILE);
	status = repl();
	popfile();
	return status;
}