Return to main.c CVS log

Up to [Research Unix] / researchv9 / jtools / src / pi

researchv9-SUN3(old)

#include "master.pri"
#include "rt.h"
#include "format.pri"
#include <CC/stdio.h>
#include <signal.h>
SRCFILE("main.c")

void ErrExit(char *e)
{
	fprintf(stderr, "%s\n", e);
	exit(1);
}

char *getenv(char*), *Getwd();
char *CD;
char *DEVKMEM = "/dev/kmem";
char *PADSTERM;
char *TAPTO;
char *UNIX = "/vmunix";
char *PATH;

void PadsRemInit();
char *PadsTermInit(char*);

void LoadTerm(char **av)
{
	if (av[0] && !strcmp(av[0],"-R")) {
		PadsRemInit();
		return;
	}
	if (av[0] && !strcmp(av[0],"-r") && av[1])
		ErrExit(PadsTermInit(av[1]));
	if( PadsInit(PADSTERM) )
		ErrExit("cannot load terminal");
}

void mainbatch(char **av)
{
	char *core = "core", *aout = "a.out";
	if( *av ) core = *av++;
	if( *av ) aout = *av++;
	new BatchMaster(core, aout);
	exit(0);
}

void mainpi(char **av)
{
	if(av[0] && !strcmp(av[0],"-t") ) {
		mainbatch(av+1);
		av += 2;
	}
	LoadTerm(av);
	extern char *TapTo;
	TapTo = TAPTO;
	NewHelp();
	NewWd();
	new HostMaster();
	PadsServe();
}

void mainrtpi(char **av)
{
	LoadTerm(av);
	extern char *TapTo;
	TapTo = TAPTO;
	NewHelp();
	NewWd();
	new RtConnections;
	PadsServe();
}

void main(int, char **av)
{
	char *e;
	if( e = getenv("PADSTERM") ) PADSTERM = e;
	if( e = getenv("UNIX") ) UNIX = e;
	if( e = getenv("DEVKMEM") ) DEVKMEM = e;
	if( e = getenv("PATH") ) PATH = e;
	CD = sf( "builtin cd %s;", Getwd() );
	::signal(SIGCHLD, SIG_IGN);

	char *base = basename(*av++);
	if( !strcmp(base,"rtpi") )
		mainrtpi(av);
	else
		mainpi(av);
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.