1990/0504/power/main.c (diff list | history)

1990/0430/sys/src/9/power/main.c:12,30 – 1990/0504/sys/src/9/power/main.c:12,50 (short | long | prev | next)
1990/0424		*/ int _argc; char **_argv; char **_env;
1990/0504		/* * arguments passed to initcode */
1990/0427		char argbuf[512]; int argsize;
1990/0424
1990/0504		/* * environment passed to any kernel started by this kernel */ char envbuf[64]; char *env[2]; /* * configuration file read by boot program */ char confbuf[4*1024]; /* * system name */ char sysname[64];
1990/0227		void main(void) {
1990/0424		int i;
1990/0504		icflush(0, 64*1024);
1990/0227		active.exiting = 0; active.machs = 1;
1990/0424		arginit();
1990/0227		machinit(); confinit();
1990/0504		arginit();
1990/0227		lockinit(); printinit(); tlbinit();
1990/0430/sys/src/9/power/main.c:43,92 – 1990/0504/sys/src/9/power/main.c:63,69
1990/0227		schedinit(); }
1990/0427		/* * copy arguments into a temporary buffer. we do this because the arguments * are in memory that may be allocated to processes or kernel buffers. */
1990/0227		void
1990/0424		arginit(void) {
1990/0427		int i, n; int nbytes; int ssize; char *p; char **argv; char *charp;
1990/0424
1990/0427		/* * trim arguments to make them fit in the buffer */ for(nbytes = i = 0; i < _argc; i++){ n = strlen(_argv[i]) + 1; ssize = BY2WD*(i+2) + ((nbytes+n+(BY2WD-1)) & ~(BY2WD-1)); if(ssize > sizeof(argbuf)) break; nbytes += n; } _argc = i; ssize = BY2WD*(i+1) + ((nbytes+(BY2WD-1)) & ~(BY2WD-1));
1990/0424
1990/0427		/* * copy arguments into the buffer */ argv = (char**)(argbuf + sizeof(argbuf) - ssize); charp = (char*)(argbuf + sizeof(argbuf) - nbytes); for(i=0; i<_argc; i++){ argv[i] = charp; n = strlen(_argv[i]) + 1; memcpy(charp, _argv[i], n); charp += n;
1990/0424		}
1990/0427		_argv = argv;                  argsize = ssize;
1990/0424		}                  void
1990/0227		machinit(void) { int n;
1990/0430/sys/src/9/power/main.c:413,430 – 1990/0504/sys/src/9/power/main.c:390,541
1990/0227		where->next = old->next; }
1990/0504		typedef struct Conftab { char *sym; ulong *x; } Conftab; #include "conf.h"
1990/0227		Conf conf;
1990/0504		ulong confeval(char *exp) { char *op; Conftab *ct; /* crunch leading white */ while(*exp==' ' || *exp=='\t') exp++; op = strchr(exp, '+'); if(op != 0){ *op++ = 0; return confeval(exp) + confeval(op); } op = strchr(exp, '*'); if(op != 0){ *op++ = 0; return confeval(exp) * confeval(op); } if(*exp >= '0' && *exp <= '9') return strtoul(exp, 0, 0); /* crunch trailing white */ op = strchr(exp, ' '); if(op) *op = 0; op = strchr(exp, '\t'); if(op) *op = 0; /* lookup in symbol table */ for(ct = conftab; ct->sym; ct++) if(strcmp(exp, ct->sym) == 0) return *(ct->x); return 0; } /* * each line of the configuration is of the form `param = expression'. */
1990/0227		void confinit(void)
1990/0504		confset(char *sym)
1990/0227		{
1990/0430		long x, i, j, *l, *e;
1990/0504		char *val, *p; Conftab *ct; ulong x;
1990/0227
1990/0424		#include "conf.h"
1990/0504		/* * parse line */
1990/0424
1990/0227		if(conf.nmach > MAXMACH) panic("confinit");
1990/0504		/* comment */ if(p = strchr(sym, '#')) *p = 0;
1990/0227
1990/0504		/* skip white */ for(p = sym; *p==' ' || *p=='\t'; p++) ; sym = p; /* skip sym */ for(; *p && *p!=' ' && *p!='\t' && *p!='='; p++) ; if(*p) *p++ = 0; /* skip white */ for(; *p==' ' || *p=='\t' || *p=='='; p++) ; val = p; /* * lookup value */ for(ct = conftab; ct->sym; ct++) if(strcmp(sym, ct->sym) == 0){ *(ct->x) = confeval(val); return; } if(strcmp(sym, "sysname")==0){ p = strchr(val, ' '); if(p) *p = 0; strcpy(sysname, val); } } /* * read the ascii configuration left by the boot kernel */ void confread(void) { char *line; char *end; /* * process configuration file */ line = confbuf; while(end = strchr(line, '\n')){ *end = 0; confset(line); line = end+1; } } void confprint(void) { Conftab *ct; /* * lookup value */ for(ct = conftab; ct->sym; ct++) print("%s == %d\n", ct->sym, *ct->x); } void confinit(void) { long x, i, j, *l; /* * copy configuration down from high memory */ strcpy(confbuf, (char *)(0x80000000 + 4*1024*1024 - 4*1024)); /* * size memory */
1990/0227		x = 0x12345678;
1990/0322		for(i=4; i<128; i+=4){
1990/0227		l = (long*)(KSEG1|(i*1024L*1024L));
1990/0430/sys/src/9/power/main.c:436,449 – 1990/0504/sys/src/9/power/main.c:547,642
1990/0227		x += 0x3141526; } conf.npage = i*1024/4;
1990/0504		/* * set minimal default values */ conf.nmach = 1; conf.nmod = 2000; conf.nalarm = 1000; conf.norig = 9; conf.nchan = 64; conf.nenv = 4; conf.nenvchar = 1000; conf.npgenv = 400; conf.nmtab = 4; conf.nmount = 4; conf.nmntdev = 4; conf.nmntbuf = 4; conf.nmnthdr = 4; conf.nstream = 4; conf.nsrv = 0; conf.nproc = 4; conf.npgrp = 4;
1990/0424		conf.npte = 4 * conf.npage;
1990/0227		conf.nqueue = 5 * conf.nstream; conf.nblock = 16 * conf.nstream;
1990/0430
1990/0504		confread(); if(conf.nmach > MAXMACH) panic("confinit"); } /* * copy arguments passed by the boot kernel (or ROM) into a temporary buffer. * we do this because the arguments are in memory that may be allocated * to processes or kernel buffers. */ #define SYSENV "netaddr=" void arginit(void) { int i, n; int nbytes; int ssize; char *p; char **argv; char *charp;
1990/0430		/* * zero memory from bss up
1990/0504		* get the system name from the environment
1990/0430		*/ e = (long *)(i*1024*1024); for(l = &end; l < e; l++) *l = 0;
1990/0504		if(*sysname == 0){ for(argv = _env; *argv; argv++){ if(strncmp(*argv, SYSENV, sizeof(SYSENV)-1)==0){ strcpy(sysname, (*argv) + sizeof(SYSENV)-1); break; } } } strcpy(envbuf, SYSENV); strcat(envbuf, sysname); env[0] = envbuf; env[1] = 0; /* * trim arguments to make them fit in the buffer (argv[0] is sysname) */ nbytes = 0; _argv[0] = sysname; for(i = 0; i < _argc; i++){ n = strlen(_argv[i]) + 1; ssize = BY2WD*(i+2) + ((nbytes+n+(BY2WD-1)) & ~(BY2WD-1)); if(ssize > sizeof(argbuf)) break; nbytes += n; } _argc = i; ssize = BY2WD*(i+1) + ((nbytes+(BY2WD-1)) & ~(BY2WD-1)); /* * copy arguments into the buffer */ argv = (char**)(argbuf + sizeof(argbuf) - ssize); charp = (char*)(argbuf + sizeof(argbuf) - nbytes); for(i=0; i<_argc; i++){ argv[i] = charp; n = strlen(_argv[i]) + 1; memcpy(charp, _argv[i], n); charp += n; } _argv = argv; argsize = ssize;
1990/0227		}