plan 9 kernel history: overview | file list | diff list

1991/0720/pc/trap.c (diff list | history)

1991/0719/sys/src/9/pc/trap.c:5,111991/0720/sys/src/9/pc/trap.c:5,15 (short | long | prev | next)
1991/0613    
#include	"fns.h" 
#include	"io.h" 
1991/0703    
#include	"ureg.h" 
1991/0720    
#include	"errno.h" 
1991/0613    
 
1991/0720    
void	noted(Ureg*, ulong); 
void	notify(Ureg*); 
 
1991/0613    
/* 
1991/0709    
 *  8259 interrupt controllers 
 */ 
1991/0719/sys/src/9/pc/trap.c:155,1791991/0720/sys/src/9/pc/trap.c:159,369
1991/0718    
		ur->si, ur->di, ur->bp, ur->ds); 
} 
 
1991/0720    
void 
dumpstack(void) 
{ 
} 
 
void 
execpc(ulong entry) 
{ 
	((Ureg*)UREGADDR)->pc = entry; 
} 
 
1991/0718    
/* 
1991/0710    
 *  system calls 
 */ 
1991/0720    
#undef	CHDIR	/* BUG */ 
#include "/sys/src/libc/9syscall/sys.h" 
 
typedef long Syscall(ulong*); 
Syscall	sysr1, sysfork, sysexec, sysgetpid, syssleep, sysexits, sysdeath, syswait; 
Syscall	sysopen, sysclose, sysread, syswrite, sysseek, syserrstr, sysaccess, sysstat, sysfstat; 
Syscall sysdup, syschdir, sysforkpgrp, sysbind, sysmount, syspipe, syscreate; 
Syscall	sysbrk_, sysremove, syswstat, sysfwstat, sysnotify, sysnoted, sysalarm; 
 
Syscall *systab[]={ 
	sysr1, 
	syserrstr, 
	sysbind, 
	syschdir, 
	sysclose, 
	sysdup, 
	sysalarm, 
	sysexec, 
	sysexits, 
	sysfork, 
	sysforkpgrp, 
	sysfstat, 
	sysdeath, 
	sysmount, 
	sysopen, 
	sysread, 
	sysseek, 
	syssleep, 
	sysstat, 
	syswait, 
	syswrite, 
	syspipe, 
	syscreate, 
	sysdeath, 
	sysbrk_, 
	sysremove, 
	syswstat, 
	sysfwstat, 
	sysnotify, 
	sysnoted, 
	sysdeath,	/* sysfilsys */ 
}; 
 
1991/0710    
long 
syscall(Ureg *ur) 
{ 
1991/0720    
	ulong	ax; 
	ulong	sp; 
	long	ret; 
	int	i; 
	static int times; 
ulong	*z; 
 
1991/0718    
	u->p->insyscall = 1; 
	u->p->pc = ur->pc; 
1991/0720    
	if((ur->cs)&0xffff == KESEL) 
		panic("recursive system call"); 
	u->p->insyscall = 0; 
1991/0718    
 
1991/0710    
	panic("syscall"); 
1991/0720    
	/* 
	 *  do something about floating point!!! 
	 */ 
 
	ax = ur->ax; 
	sp = ur->usp; 
	u->nerrlab = 0; 
	ret = -1; 
z = (ulong *)sp; 
print("syscall %lux %lux %lux %lux\n", *z, *(z+1), *(z+2), *(z+3)); 
dumpregs(ur); 
if(++times==3) 
	panic("3rd time in syscall"); 
	if(!waserror()){ 
		if(ax >= sizeof systab/BY2WD){ 
			pprint("bad sys call number %d pc %lux\n", ax, ur->pc); 
			postnote(u->p, 1, "sys: bad sys call", NDebug); 
			error(Ebadarg); 
		} 
		if(sp<(USTKTOP-BY2PG) || sp>(USTKTOP-(1+MAXSYSARG)*BY2WD)) 
			validaddr(sp, (1+MAXSYSARG)*BY2WD, 0); 
		ret = (*systab[ax])((ulong*)(sp+BY2WD)); 
		poperror(); 
	} 
print("return from syscall\n"); 
	if(u->nerrlab){ 
		print("bad errstack [%d]: %d extra\n", ax, u->nerrlab); 
		for(i = 0; i < NERR; i++) 
			print("sp=%lux pc=%lux\n", u->errlab[i].sp, u->errlab[i].pc); 
		panic("error stack"); 
	} 
	u->p->insyscall = 0; 
	if(ax == NOTED){ 
		noted(ur, *(ulong*)(sp+BY2WD)); 
		ret = -1; 
	} else if(u->nnote){ 
		ur->ax = ret; 
		notify(ur); 
	} 
	return ret; 
1991/0710    
} 
 
1991/0720    
/* 
 *  Call user, if necessary, with note. 
 *  Pass user the Ureg struct and the note on his stack. 
 */ 
1991/0710    
void 
1991/0711    
dumpstack(void) 
1991/0720    
notify(Ureg *ur) 
1991/0710    
{ 
1991/0720    
	ulong sp; 
 
	lock(&u->p->debug); 
	if(u->nnote==0){ 
		unlock(&u->p->debug); 
		return; 
	} 
	if(u->note[0].flag!=NUser && (u->notified || u->notify==0)){ 
		if(u->note[0].flag == NDebug) 
			pprint("suicide: %s\n", u->note[0].msg); 
    Die: 
		unlock(&u->p->debug); 
		pexit(u->note[0].msg, u->note[0].flag!=NDebug); 
	} 
	if(!u->notified){ 
		if(!u->notify) 
			goto Die; 
		u->svcs = ur->cs; 
		u->svss = ur->ss; 
		u->svflags = ur->flags; 
		sp = ur->usp; 
		sp -= sizeof(Ureg); 
		u->ureg = (void*)sp; 
		memmove((Ureg*)sp, ur, sizeof(Ureg)); 
		sp -= ERRLEN; 
		memmove((char*)sp, u->note[0].msg, ERRLEN); 
		sp -= 3*BY2WD; 
		*(ulong*)(sp+2*BY2WD) = sp+3*BY2WD;	/* arg 2 is string */ 
		*(ulong*)(sp+1*BY2WD) = (ulong)u->ureg;	/* arg 1 is ureg* */ 
		*(ulong*)(sp+0*BY2WD) = 0;		/* arg 0 is pc */ 
		ur->usp = sp; 
		ur->pc = (ulong)u->notify; 
		u->notified = 1; 
		u->nnote--; 
		memmove(&u->lastnote, &u->note[0], sizeof(Note)); 
		memmove(&u->note[0], &u->note[1], u->nnote*sizeof(Note)); 
	} 
	unlock(&u->p->debug); 
1991/0710    
} 
 
1991/0720    
/* 
 *   Return user to state before notify() 
 */ 
1991/0710    
void 
1991/0711    
execpc(ulong entry) 
1991/0720    
noted(Ureg *ur, ulong arg0) 
1991/0710    
{ 
1991/0711    
	((Ureg*)UREGADDR)->pc = entry; 
1991/0720    
	Ureg *nur; 
 
	nur = u->ureg; 
	validaddr(nur->pc, 1, 0); 
	validaddr(nur->usp, BY2WD, 0); 
	if(nur->cs!=u->svcs || nur->ss!=u->svss 
	|| (nur->flags&0xff)!=(u->svflags&0xff)){ 
		pprint("bad noted ureg cs %ux ss %ux flags %ux\n", nur->cs, nur->ss, 
			nur->flags); 
		pexit("Suicide", 0); 
	} 
	lock(&u->p->debug); 
	if(!u->notified){ 
		unlock(&u->p->debug); 
		return; 
	} 
	u->notified = 0; 
	nur->flags = (u->svflags&0xffffff00) | (ur->flags&0xff); 
	memmove(ur, u->ureg, sizeof(Ureg)); 
	ur->ax = -1;	/* return error from the interrupted call */ 
	switch(arg0){ 
	case NCONT: 
		splhi(); 
		unlock(&u->p->debug); 
		rfnote(ur); 
		break; 
		/* never returns */ 
 
	default: 
		pprint("unknown noted arg 0x%lux\n", arg0); 
		u->lastnote.flag = NDebug; 
		/* fall through */ 
		 
	case NDFLT: 
		if(u->lastnote.flag == NDebug) 
			pprint("suicide: %s\n", u->lastnote.msg); 
		unlock(&u->p->debug); 
		pexit(u->lastnote.msg, u->lastnote.flag!=NDebug); 
	} 
1991/0614    
} 


source code copyright © 1990-2005 Lucent Technologies; see license
Plan 9 distribution
comments to russ cox (rsc@swtch.com)