Return to sampleload.c CVS log

Up to [Research Unix] / researchv9 / jerq / src / sysmon

Annotation of researchv9/jerq/src/sysmon/sampleload.c, revision 1.1.1.1

1.1       root        1: #include <stdio.h>
                      2: #include <errno.h>
                      3: #include <nlist.h>
                      4: #include "defs.h"
                      5: #include "load.h"
                      6: 
                      7: /* globals */
                      8: struct nlist nl[] ={
                      9:     {"_intrtime",0},
                     10:     {"_cp_time",0},
                     11:     {"_avenrun",0},
                     12:     { 0,0 },
                     13: };
                     14: char *sys = "/unix";
                     15: char *core = "/dev/kmem";
                     16: int mem;
                     17: 
                     18: /* imported */
                     19: extern int errno;
                     20: extern long lseek();
                     21: extern long time();
                     22: 
                     23: /* initialize */
                     24: initload()
                     25: {
                     26:     nlist(sys, nl);
                     27: 
                     28:     mem = open(core, 0);
                     29:     if (mem<0) {
                     30:        printf("can't open %s\n", core);
                     31:        printf("errno = %d\n", errno);
                     32:        exit(1);
                     33:     }
                     34: 
                     35: }
                     36: 
                     37: /* generate the current information */
                     38: genload()
                     39: {
                     40:     char buf[16];
                     41:     double fabs();
                     42: 
                     43:     lseek(mem, (long)nl[1].n_value, 0);
                     44:     read(mem, (char *)load.l_cp, sizeof(load.l_cp));
                     45:     lseek(mem, (long)nl[2].n_value, 0);
                     46:     read(mem, (char *)&(load.l_runq), sizeof(load.l_runq));
                     47:     load.l_time = time ((long *)0);
                     48: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.