1991/1106/ss/main.c (diff list | history)

ss/main.c on 1990/1223
1990/1223		#include "u.h" #include "lib.h" #include "mem.h" #include "dat.h" #include "fns.h" #include "io.h" #include "ureg.h" #include "init.h" #include <libg.h> #include <gnot.h> char user[NAMELEN];
1991/0110		uchar *intrreg;
1990/1223		void main(void) { int a; u = 0; memset(&edata, 0, (char*)&end-(char*)&edata); machinit(); confinit();
1990/1226		mmuinit();
1991/0604		screeninit();
1990/1226		printinit();
1991/0112		print("sparc plan 9\n");
1990/1226		trapinit();
1990/1223		kmapinit();
1991/0604		ioinit();
1990/1226		cacheinit();
1991/0110		intrinit();
1990/1223		procinit0();
1991/0706		initseg(); grpinit();
1990/1223		chaninit(); alarminit(); chandevreset(); streaminit(); /* serviceinit(); /**/ /* filsysinit(); /**/ pageinit(); userinit();
1990/1227		clockinit();
1990/1223		schedinit(); } void
1991/0110		intrinit(void) { KMap *k; k = kmappa(INTRREG, PTEIO); intrreg = (uchar*)k->va; } void
1991/0926		systemreset(void)
1990/1223		{ delay(100);
1990/1226		putb2(ENAB, ENABRESET);
1990/1223		} void machinit(void) { int n; n = m->machno; memset(m, 0, sizeof(Mach)); m->machno = n; m->mmask = 1<<m->machno; m->fpstate = FPinit; } void
1991/0604		ioinit(void) { KMap *k;
1991/0608		/* tell scc driver it's address */
1991/0604		k = kmappa(KMDUART, PTEIO|PTENOCACHE); sccsetup((void*)(k->va));
1991/0608		/* scc port 0 is the keyboard */ sccspecial(0, 0, &kbdq, 2400);
1991/0604		kbdq.putc = kbdstate;
1991/0608		/* scc port 1 is the mouse */ sccspecial(1, 0, &mouseq, 2400);
1991/0604		} void
1990/1223		init0(void) { Chan *c; u->nerrlab = 0; m->proc = u->p; u->p->state = Running; u->p->mach = m; spllo(); chandevinit(); u->slash = (*devtab[0].attach)(0); u->dot = clone(u->slash, 0);
1990/1226
1991/0926		if(!waserror()){
1991/1102		ksetterm("sun %s");
1991/0927		ksetenv("cputype", "sparc");
1991/0926		poperror(); }
1991/0711		touser(USTKTOP-(1+MAXSYSARG)*BY2WD);
1990/1223		} FPsave initfp; void userinit(void) { Proc *p;
1991/0706		Segment *s;
1990/1223		User *up; KMap *k; p = newproc(); p->pgrp = newpgrp();
1991/0706		p->egrp = newegrp(); p->fgrp = newfgrp();
1990/1223		strcpy(p->text, "*init*");
1991/1105		strcpy(p->user, "bootes");
1991/01151		savefpregs(&initfp);
1990/1223		p->fpstate = FPinit; /* * Kernel Stack */
1991/0110		p->sched.pc = (((ulong)init0) - 8); /* 8 because of RETURN in gotolabel */
1991/0711		p->sched.sp = USERADDR+BY2PG-(1+MAXSYSARG)*BY2WD;
1990/1223		p->upage = newpage(0, 0, USERADDR|(p->pid&0xFFFF)); /* * User */ k = kmap(p->upage); up = (User*)VA(k); up->p = p; kunmap(k); /* * User Stack */
1991/0706		s = newseg(SG_STACK, USTKTOP-BY2PG, 1); p->seg[SSEG] = s;
1990/1223		/* * Text */
1991/0706		s = newseg(SG_TEXT, UTZERO, 1); p->seg[TSEG] = s; segpage(s, newpage(1, 0, UTZERO)); k = kmap(s->map[0]->pages[0]);
1991/0318		memmove((ulong*)VA(k), initcode, sizeof initcode);
1990/1223		kunmap(k); ready(p); } void exit(void) { int i; u = 0;
1991/0608		spllo(); print("cpu %d exiting\n", m->machno); while(consactive()) for(i=0; i<1000; i++) ;
1990/1223		splhi();
1991/0926		systemreset();
1990/1223		} Conf conf; void confinit(void) { int mul;
1990/1226
1990/1223		conf.nmach = 1; if(conf.nmach > MAXMACH) panic("confinit");
1991/0111		conf.npage0 = (4*1024*1024)/BY2PG; /* BUG */
1991/0115		conf.npage1 = (4*1024*1024)/BY2PG; /* BUG */
1990/1223		conf.base0 = 0;
1991/0112		conf.base1 = 32*1024*1024;
1990/1223		conf.npage = conf.npage0+conf.npage1;
1990/1226		conf.maxialloc = 4*1024*1024; /* BUG */
1991/0111		mul = 1; if(conf.npage1 > 0) mul = 2;
1990/1223		conf.nproc = 50*mul; conf.npgrp = 12*mul;
1991/0706		conf.nseg = conf.nproc*4; conf.npagetab = conf.nseg*2; conf.nswap = 4096; conf.nimage = 50;
1990/1223		conf.nalarm = 1000; conf.nchan = 200*mul; conf.nenv = 100*mul; conf.nenvchar = 8000*mul; conf.npgenv = 200*mul; conf.nmtab = 50*mul; conf.nmount = 80*mul; conf.nmntdev = 10*mul;
1991/0117		conf.nmntbuf = conf.nmntdev+3;
1990/1223		conf.nmnthdr = 2*conf.nmntdev; conf.nstream = 40 + 32*mul; conf.nqueue = 5 * conf.nstream; conf.nblock = 24 * conf.nstream; conf.nsrv = 16*mul; /* was 32 */ conf.nbitmap = 300*mul; conf.nbitbyte = 300*1024*mul; conf.nfont = 10*mul;
1990/1231		conf.nnoifc = 1; conf.nnoconv = 32;
1990/1223		conf.nurp = 32; conf.nasync = 1; conf.npipe = conf.nstream/2; conf.nservice = 3*mul; /* was conf.nproc/5 */ conf.nfsyschan = 31 + conf.nchan/20; conf.copymode = 0; /* copy on write */
1991/0926		conf.ipif = 8; conf.ip = 64; conf.arp = 32; conf.frag = 32;
1991/0608		conf.cntrlp = 0;
1990/1231		} /* * set up the lance */ void lancesetup(Lance *lp) { KMap *k; ushort *sp; uchar *cp;
1991/0108		ulong pa, pte, va; int i, j;
1990/1231
1991/0109		k = kmappa(ETHER, PTEIO);
1990/1231		lp->rdp = (void*)(k->va+0); lp->rap = (void*)(k->va+2);
1991/0109		k = kmappa(EEPROM, PTEIO);
1990/1231		cp = (uchar*)(k->va+0x7da); for(i=0; i<6; i++) lp->ea[i] = *cp++; kunmap(k);
1991/1030		lp->lognrrb = 7;
1991/0109		lp->logntrb = 5;
1990/1231		lp->nrrb = 1<<lp->lognrrb; lp->ntrb = 1<<lp->logntrb; lp->sep = 1;
1991/0109		lp->busctl = BSWP | ACON | BCON;
1990/1231		/*
1991/0108		* Allocate area for lance init block and descriptor rings
1990/1231		*/ pa = (ulong)ialloc(BY2PG, 1)&~KZERO; /* one whole page */
1991/0108		/* map at LANCESEGM */
1991/0109		k = kmappa(pa, PTEMAINMEM);
1990/1231		lp->lanceram = (ushort*)k->va; lp->lm = (Lancemem*)k->va; /*
1991/0108		* Allocate space in host memory for the io buffers. * Allocate a block and kmap it page by page. kmap's are initially * in reverse order so rearrange them.
1990/1231		*/
1991/0108		i = (lp->nrrb+lp->ntrb)*sizeof(Etherpkt);
1990/1231		i = (i+(BY2PG-1))/BY2PG; pa = (ulong)ialloc(i*BY2PG, 1)&~KZERO;
1991/0108		va = 0; for(j=i-1; j>=0; j--){
1991/0109		k = kmappa(pa+j*BY2PG, PTEMAINMEM);
1991/0108		if(va){ if(va != k->va+BY2PG) panic("lancesetup va unordered"); va = k->va; } } /* * k->va is the base of the region */
1990/1231		lp->lrp = (Etherpkt*)k->va; lp->rp = (Etherpkt*)k->va;
1991/0108		lp->ltp = lp->lrp+lp->nrrb; lp->tp = lp->rp+lp->nrrb;
1991/0604		} void firmware(void) {
1991/0926		systemreset();
1990/1223		}