static void do_service(config_t *cpe, config_t *config, struct rs_config *rs_config)
{
struct rs_start *rs_start = &rs_config->rs_start;
config_t *cp;
/* At this point we expect one sublist that contains the varios
* resource allocations
*/
if (!(cpe->flags & CFG_SUBLIST))
{
fatal("do_service: expected list at %s:%d",
cpe->file, cpe->line);
}
if (cpe->next != NULL)
{
cpe= cpe->next;
fatal("do_service: expected end of list at %s:%d",
cpe->file, cpe->line);
}
cpe= cpe->list;
/* Process the list */
for (cp= cpe; cp; cp= cp->next)
{
if (!(cp->flags & CFG_SUBLIST))
{
fatal("do_service: expected list at %s:%d",
cp->file, cp->line);
}
cpe= cp->list;
if ((cpe->flags & CFG_STRING) || (cpe->flags & CFG_SUBLIST))
{
fatal("do_service: expected word at %s:%d",
cpe->file, cpe->line);
}
if (strcmp(cpe->word, KW_CLASS) == 0)
{
do_class(cpe->next, config, rs_config);
continue;
}
if (strcmp(cpe->word, KW_UID) == 0)
{
do_uid(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_SIGMGR) == 0)
{
do_sigmgr(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_TYPE) == 0)
{
do_type(cpe->next, rs_config);
continue;
}
if (strcmp(cpe->word, KW_DESCR) == 0)
{
do_descr(cpe->next, rs_config);
continue;
}
if (strcmp(cpe->word, KW_SCHEDULER) == 0)
{
do_scheduler(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_PRIORITY) == 0)
{
do_priority(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_QUANTUM) == 0)
{
do_quantum(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_CPU) == 0)
{
do_cpu(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_IRQ) == 0)
{
do_irq(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_IO) == 0)
{
do_io(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_PCI) == 0)
{
do_pci(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_SYSTEM) == 0)
{
do_system(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_IPC) == 0)
{
do_ipc(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_VM) == 0)
{
do_vm(cpe->next, rs_start);
continue;
}
if (strcmp(cpe->word, KW_CONTROL) == 0)
{
do_control(cpe->next, rs_start);
continue;
}
}
}
int main(int argc, char *argv[])
{
int i;
int cpuflg = 0, dpyflg = 0, raflg = 0, memflg = 0;
int doathenaV = 0;
int dosyspV = 0;
int dolocalV = 0;
int dobosN = 0;
int dobosV = 0;
int dosysnam = 0;
int dosyscompatnam = 0;
int verbose = 0;
FILE *f;
char *progname, *cp;
progname = argv[0];
cp = strrchr(progname, '/');
if (cp != NULL)
progname = cp+1;
while ((i = getopt(argc, argv, "cdrMALPNESCv")) != EOF)
{
switch (i)
{
case 'c':
cpuflg = 1;
break;
case 'd':
dpyflg = 1;
break;
case 'r':
raflg = 1;
break;
case 'M':
memflg = 1;
break;
case 'A':
doathenaV = 1;
break;
case 'L':
dolocalV = 1;
break;
case 'P':
dosyspV = 1;
break;
case 'N':
dobosN = 1;
break;
case 'E':
dobosV = 1;
break;
case 'S':
dosysnam = 1;
break;
case 'C':
dosyscompatnam = 1;
break;
case 'v':
verbose++;
break;
default:
usage(progname);
}
}
if (argv[optind] != NULL)
usage(progname);
if (!(cpuflg || dpyflg || raflg || memflg || doathenaV || dolocalV ||
dosyspV || dobosN || dobosV || dosysnam || dosyscompatnam))
{
do_machtype();
exit(0);
}
/* Print out version of Athena machtype compiled against */
if (doathenaV)
{
if (verbose)
fputs("Machtype version: ", stdout);
printf("%s.%s\n", ATHMAJV, ATHMINV);
}
/* Print out version of attached packs */
if (dosyspV)
{
char buf[256], *rvd_version, *p;
if ((f = fopen("/srvd/.rvdinfo","r")) == NULL)
puts("Syspack information unavailable.");
else
{
fgets(buf, sizeof(buf), f);
fclose(f);
/* If it is verbose, give the whole line, else just the vers # */
if (verbose)
fputs(buf, stdout);
else
{
p = strchr(buf,' '); /* skip "Athena" */
p = strchr(p+1,' '); /* skip "RVD" */
p = strchr(p+1,' '); /* Skip machtype */
p = strchr(p+1,' '); /* skip "version" */
rvd_version = p+1;
p = strchr(rvd_version,' ');
*p = '\0';
puts(rvd_version);
}
}
}
/* Print out local version from /etc/athena/version */
if (dolocalV)
{
char buf[256], *loc_version, *p;
if ((f = fopen("/etc/athena/version","r")) == NULL)
puts("Local version information unavailable.");
else
{
while (fgets(buf, sizeof(buf), f) != NULL)
;
fclose(f);
if (verbose)
fputs(buf, stdout);
else
{
p = strchr(buf,' '); /* skip "Athena" */
p = strchr(p+1,' '); /* skip "Workstation/Server" */
p = strchr(p+1,' '); /* Skip machtype */
p = strchr(p+1,' '); /* skip "version" */
loc_version = p+1;
p = strchr(loc_version,' ');
*p = '\0';
puts(loc_version);
}
}
}
/* Print out vendor OS name */
if (dobosN)
{
if (verbose)
puts(OSNAME " " OSVERS);
else
puts(OSNAME);
}
/* Print out vendor OS version */
if (dobosV)
puts(OSVERS);
/* Print out Athena System name */
if (dosysnam)
puts(ATHSYS);
/* Print out compatible Athena System names */
if (dosyscompatnam)
puts(ATHSYSCOMPAT);
if (cpuflg)
do_cpu(verbose);
if (dpyflg)
do_dpy(verbose);
if (raflg)
do_disk(verbose);
if (memflg)
do_memory(verbose);
exit(0);
}
