12 void (*statfn[])(int) =
28 fd = open("/proc/apm", OREAD);
33 if(ntok >= 7 && atoi(tok[6]) != -1)
34 Bprint(&bout, "battery =%d 100\n", atoi(tok[6]));
43 fd = open("/proc/loadavg", OREAD);
50 Bprint(&bout, "load =%d 1000\n", (int)(atof(tok[0])*1000));
62 fd = open("/proc/meminfo", OREAD);
68 for(i=0; i<nline; i++){
74 if(strcmp(tok[0], "Mem:") == 0)
75 Bprint(&bout, "mem =%lld %lld\n", used/1024, tot/1024);
76 else if(strcmp(tok[0], "Swap:") == 0)
77 Bprint(&bout, "swap =%lld %lld\n", used/1024, tot/1024);
78 else if(strcmp(tok[0], "MemTotal:") == 0)
79 mtot = atoll(tok[1]); /* kb */
80 else if(strcmp(tok[0], "MemFree:") == 0){
81 mfree = atoll(tok[1]);
84 Bprint(&bout, "mem =%lld %lld\n", mtot-mfree, mtot);
93 vlong totb, totp, tote, totin, totou, totinb, totoub, b, p, e, in, ou, inb, oub;
98 fd = open("/proc/net/dev", OREAD);
111 for(i=0; i<nline; i++){
112 if((q = strchr(line[i], ':')) != nil)
117 if(strncmp(tok[0], "eth", 3) != 0)
125 e = atoll(tok[3])+atoll(tok[11]);
135 Bprint(&bout, "etherb %lld %d\n", totb, n*1000000);
136 Bprint(&bout, "ether %lld %d\n", totp, n*1000);
137 Bprint(&bout, "ethererr %lld %d\n", tote, n*1000);
138 Bprint(&bout, "etherin %lld %d\n", totin, n*1000);
139 Bprint(&bout, "etherout %lld %d\n", totou, n*1000);
140 Bprint(&bout, "etherinb %lld %d\n", totinb, n*1000);
141 Bprint(&bout, "etheroutb %lld %d\n", totoub, n*1000);
151 fd = open("/proc/stat", OREAD);
156 for(i=0; i<nline; i++){
160 if(strcmp(tok[0], "cpu") == 0 && ntok >= 5){
161 Bprint(&bout, "user %lld 100\n", atoll(tok[1]));
162 Bprint(&bout, "sys %lld 100\n", atoll(tok[3]));
163 Bprint(&bout, "cpu %lld 100\n", atoll(tok[1])+atoll(tok[3]));
164 Bprint(&bout, "idle %lld\n", atoll(tok[4]));
167 if(strcmp(tok[0], "page") == 0 && ntok >= 3){
168 Bprint(&bout, "pagein %lld 500\n", atoll(tok[1]));
169 Bprint(&bout, "pageout %lld 500\n", atoll(tok[2]));
170 Bprint(&bout, "page %lld 1000\n", atoll(tok[1])+atoll(tok[2]));
172 if(strcmp(tok[0], "swap") == 0 && ntok >= 3){
173 Bprint(&bout, "swapin %lld 500\n", atoll(tok[1]));
174 Bprint(&bout, "swapout %lld 500\n", atoll(tok[2]));
175 Bprint(&bout, "swap %lld 1000\n", atoll(tok[1])+atoll(tok[2]));
178 if(strcmp(tok[0], "intr") == 0)
179 Bprint(&bout, "interrupt %lld 1000\n", atoll(tok[1]));
180 if(strcmp(tok[0], "ctxt") == 0)
181 Bprint(&bout, "context %lld 1000\n", atoll(tok[1]));
182 if(strcmp(tok[0], "processes") == 0)
183 Bprint(&bout, "fork %lld 1000\n", atoll(tok[1]));