1990/1227/ss/faultsparc.c (diff list | history)

ss/faultsparc.c on 1990/1223
1990/1223		#include "u.h" #include "lib.h" #include "mem.h" #include "dat.h" #include "fns.h" #include "ureg.h" #include "errno.h" void
1990/1226		faultsparc(Ureg *ur)
1990/1223		{ ulong addr, badvaddr; int user, read, insyscall;
1990/1226		ulong tbr;
1990/1223
1990/1227		tbr = (ur->tbr&0xFFF)>>4;
1990/1226		addr = ur->pc; /* assume instr. exception */
1990/1227		if(tbr == 9) /* data access exception */
1990/1226		addr = getw2(SEVAR);
1990/1227		else if(tbr != 1){ /* should be instruction access exception */
1990/1226		trap(ur);
1990/1227		return;
1990/1226		} spllo();
1990/1227		print("fault: %s pc=0x%lux addr %lux\n", excname(tbr), ur->pc, addr);
1990/1223		if(u == 0){ dumpregs(ur); panic("fault u==0 pc=%lux", ur->pc); }
1990/1226		if(getw2(SER) & 0x8000) read = 0; else read = 1;
1990/1223		insyscall = u->p->insyscall; u->p->insyscall = 1;
1990/1226		/* addr &= VAMASK; /**/
1990/1223		badvaddr = addr; addr &= ~(BY2PG-1);
1990/1226		user = !(ur->psr&PSRSUPER);
1990/1223		if(fault(addr, read) < 0){ if(user){ pprint("user %s error addr=0x%lux\n", read? "read" : "write", badvaddr);
1990/1226		pprint("psr=0x%lux pc=0x%lux sp=0x%lux\n", ur->psr, ur->pc, ur->sp);
1990/1223		pexit("Suicide", 0); } u->p->state = MMUing; dumpregs(ur); panic("fault: 0x%lux", badvaddr); exit(); } u->p->insyscall = insyscall;
1990/1226		} /* * called in sysfile.c */ void evenaddr(ulong addr) { if(addr & 3){ panic("evenaddr"); postnote(u->p, 1, "sys: odd address", NDebug); error(Ebadarg); }
1990/1223		}