static void
mathtrap(Ureg *, ulong)
{
int s;
if((up->fpstate & FPillegal) != 0){
postnote(up, 1, "sys: floating point in note handler", NDebug);
return;
}
switch(up->fpstate){
case FPinit:
s = splhi();
fpinit();
up->fpstate = FPactive;
splx(s);
break;
case FPinactive:
s = splhi();
fprestore(&up->fpsave);
up->fpstate = FPactive;
splx(s);
break;
case FPactive:
postnote(up, 1, "sys: floating point error", NDebug);
break;
}
}
/*
* math coprocessor emulation fault
*/
static void
mathemu(Ureg *ureg, void*)
{
if(up->fpstate & FPillegal){
/* someone did floating point in a note handler */
postnote(up, 1, "sys: floating point in note handler", NDebug);
return;
}
switch(up->fpstate){
case FPinit:
fpinit();
up->fpstate = FPactive;
break;
case FPinactive:
/*
* Before restoring the state, check for any pending
* exceptions, there's no way to restore the state without
* generating an unmasked exception.
* More attention should probably be paid here to the
* exception masks and error summary.
*/
if((up->fpsave.status & ~up->fpsave.control) & 0x07F){
mathnote();
break;
}
fprestore(&up->fpsave);
up->fpstate = FPactive;
break;
case FPactive:
panic("math emu pid %ld %s pc 0x%lux",
up->pid, up->text, ureg->pc);
break;
}
}
void
userinit(void)
{
Proc *p;
Osenv *o;
p = newproc();
o = p->env;
o->fgrp = newfgrp(nil);
o->pgrp = newpgrp();
kstrdup(&o->user, eve);
strcpy(p->text,"interp");
p->fpstate = FPINIT;
fpinit();
/*
* Kernel Stack
*/
p->sched.pc = (ulong)init0;
p->sched.sp = (ulong)p->kstack+KSTACK-8;
p->sched.sp &= ~7; /* SP must be 8-byte aligned */
ready(p);
}
int main(int argc, char **argv)
{
graph_t *prev = NULL;
Gvc = gvNEWcontext(Info, gvUsername());
gvParseArgs(Gvc, argc, argv);
#ifndef WIN32
signal(SIGUSR1, gvToggle);
signal(SIGINT, intr);
#ifndef NO_FPERR
fpinit();
signal(SIGFPE, fperr);
#endif
#endif
if (MemTest) {
while (1) {
/* Create a test graph */
G = create_test_graph();
/* Perform layout and cleanup */
gvLayoutJobs(Gvc, G); /* take layout engine from command line */
gvFreeLayout(Gvc, G);
/* Delete graph */
agclose(G);
}
} else {
while ((G = gvNextInputGraph(Gvc))) {
if (prev) {
gvFreeLayout(Gvc, prev);
agclose(prev);
}
gvLayoutJobs(Gvc, G); /* take layout engine from command line */
gvRenderJobs(Gvc, G);
prev = G;
}
}
return (gvFreeContext(Gvc));
}
void ep_kernel(void *li)
{
fpinit();
KeMain(li);
}
