1 f0f4401f 2004-04-23 devnull #include <u.h>
2 f0f4401f 2004-04-23 devnull #include <kvm.h>
3 f0f4401f 2004-04-23 devnull #include <nlist.h>
4 f0f4401f 2004-04-23 devnull #include <sys/types.h>
5 f0f4401f 2004-04-23 devnull #include <sys/protosw.h>
6 f0f4401f 2004-04-23 devnull #include <sys/socket.h>
7 f0f4401f 2004-04-23 devnull #include <sys/sysctl.h>
8 f0f4401f 2004-04-23 devnull #include <sys/time.h>
9 f0f4401f 2004-04-23 devnull #include <sys/dkstat.h>
10 f0f4401f 2004-04-23 devnull #include <net/if.h>
11 f0f4401f 2004-04-23 devnull #include <net/if_var.h>
12 f0f4401f 2004-04-23 devnull #include <net/if_dl.h>
13 f0f4401f 2004-04-23 devnull #include <net/if_types.h>
14 f0f4401f 2004-04-23 devnull #include <machine/apm_bios.h>
15 f0f4401f 2004-04-23 devnull #include <sys/ioctl.h>
16 f0f4401f 2004-04-23 devnull #include <limits.h>
17 f0f4401f 2004-04-23 devnull #include <libc.h>
18 f0f4401f 2004-04-23 devnull #include <bio.h>
19 f0f4401f 2004-04-23 devnull #include "dat.h"
21 f0f4401f 2004-04-23 devnull void xapm(int);
22 f0f4401f 2004-04-23 devnull void xloadavg(int);
23 f0f4401f 2004-04-23 devnull void xcpu(int);
24 f0f4401f 2004-04-23 devnull void xswap(int);
25 f0f4401f 2004-04-23 devnull void xsysctl(int);
26 f0f4401f 2004-04-23 devnull void xnet(int);
27 f0f4401f 2004-04-23 devnull void xkvm(int);
29 f0f4401f 2004-04-23 devnull void (*statfn[])(int) =
33 f0f4401f 2004-04-23 devnull xloadavg,
41 f0f4401f 2004-04-23 devnull static kvm_t *kvm;
43 f0f4401f 2004-04-23 devnull static struct nlist nl[] = {
44 f0f4401f 2004-04-23 devnull { "_ifnet" },
45 f0f4401f 2004-04-23 devnull { "_cp_time" },
50 f0f4401f 2004-04-23 devnull kvminit(void)
52 f0f4401f 2004-04-23 devnull char buf[_POSIX2_LINE_MAX];
56 f0f4401f 2004-04-23 devnull kvm = kvm_openfiles(nil, nil, nil, OREAD, buf);
57 f0f4401f 2004-04-23 devnull if(kvm == nil)
59 f0f4401f 2004-04-23 devnull if(kvm_nlist(kvm, nl) < 0 || nl[0].n_type == 0){
60 f0f4401f 2004-04-23 devnull kvm = nil;
66 f0f4401f 2004-04-23 devnull xkvm(int first)
68 f0f4401f 2004-04-23 devnull if(first)
69 f0f4401f 2004-04-23 devnull kvminit();
73 f0f4401f 2004-04-23 devnull kread(ulong addr, char *buf, int size)
75 f0f4401f 2004-04-23 devnull if(kvm_read(kvm, addr, buf, size) != size){
76 f0f4401f 2004-04-23 devnull memset(buf, 0, size);
77 f0f4401f 2004-04-23 devnull return -1;
79 f0f4401f 2004-04-23 devnull return size;
83 f0f4401f 2004-04-23 devnull xnet(int first)
85 f0f4401f 2004-04-23 devnull ulong out, in, outb, inb, err;
86 f0f4401f 2004-04-23 devnull static ulong ifnetaddr;
87 f0f4401f 2004-04-23 devnull ulong addr;
88 f0f4401f 2004-04-23 devnull struct ifnet ifnet;
89 f0f4401f 2004-04-23 devnull struct ifnethead ifnethead;
90 f0f4401f 2004-04-23 devnull char name[16];
93 f0f4401f 2004-04-23 devnull if(first)
96 f0f4401f 2004-04-23 devnull if(ifnetaddr == 0){
97 f0f4401f 2004-04-23 devnull ifnetaddr = nl[0].n_value;
98 f0f4401f 2004-04-23 devnull if(ifnetaddr == 0)
102 f0f4401f 2004-04-23 devnull if(kread(ifnetaddr, (char*)&ifnethead, sizeof ifnethead) < 0)
105 f0f4401f 2004-04-23 devnull out = in = outb = inb = err = 0;
106 f0f4401f 2004-04-23 devnull addr = (ulong)TAILQ_FIRST(&ifnethead);
107 f0f4401f 2004-04-23 devnull while(addr){
108 f0f4401f 2004-04-23 devnull if(kread(addr, (char*)&ifnet, sizeof ifnet) < 0
109 f0f4401f 2004-04-23 devnull || kread((ulong)ifnet.if_name, name, 16) < 0)
111 f0f4401f 2004-04-23 devnull name[15] = 0;
112 f0f4401f 2004-04-23 devnull addr = (ulong)TAILQ_NEXT(&ifnet, if_link);
113 f0f4401f 2004-04-23 devnull out += ifnet.if_opackets;
114 f0f4401f 2004-04-23 devnull in += ifnet.if_ipackets;
115 f0f4401f 2004-04-23 devnull outb += ifnet.if_obytes;
116 f0f4401f 2004-04-23 devnull inb += ifnet.if_ibytes;
117 f0f4401f 2004-04-23 devnull err += ifnet.if_oerrors+ifnet.if_ierrors;
119 f0f4401f 2004-04-23 devnull Bprint(&bout, "etherin %lud 1000\n", in);
120 f0f4401f 2004-04-23 devnull Bprint(&bout, "etherout %lud 1000\n", out);
121 f0f4401f 2004-04-23 devnull Bprint(&bout, "etherinb %lud 1000000\n", inb);
122 f0f4401f 2004-04-23 devnull Bprint(&bout, "etheroutb %lud 1000000\n", outb);
123 f0f4401f 2004-04-23 devnull Bprint(&bout, "ethererr %lud 1000\n", err);
124 f0f4401f 2004-04-23 devnull Bprint(&bout, "ether %lud 1000\n", in+out);
125 f0f4401f 2004-04-23 devnull Bprint(&bout, "etherb %lud 1000000\n", inb+outb);
129 f0f4401f 2004-04-23 devnull xapm(int first)
131 f0f4401f 2004-04-23 devnull static int fd;
132 f0f4401f 2004-04-23 devnull struct apm_info ai;
134 f0f4401f 2004-04-23 devnull if(first){
135 f0f4401f 2004-04-23 devnull fd = open("/dev/apm", OREAD);
139 f0f4401f 2004-04-23 devnull if(ioctl(fd, APMIO_GETINFO, &ai) < 0)
142 f0f4401f 2004-04-23 devnull if(ai.ai_batt_life <= 100)
143 f0f4401f 2004-04-23 devnull Bprint(&bout, "battery =%d 100\n", ai.ai_batt_life);
147 f0f4401f 2004-04-23 devnull rsys(char *name, char *buf, int len)
149 f0f4401f 2004-04-23 devnull size_t l;
151 f0f4401f 2004-04-23 devnull l = len;
152 f0f4401f 2004-04-23 devnull if(sysctlbyname(name, buf, &l, nil, 0) < 0)
153 f0f4401f 2004-04-23 devnull return -1;
154 f0f4401f 2004-04-23 devnull buf[l] = 0;
155 f0f4401f 2004-04-23 devnull return l;
159 f0f4401f 2004-04-23 devnull isys(char *name)
161 f0f4401f 2004-04-23 devnull ulong u;
162 f0f4401f 2004-04-23 devnull size_t l;
164 f0f4401f 2004-04-23 devnull l = sizeof u;
165 f0f4401f 2004-04-23 devnull if(sysctlbyname(name, &u, &l, nil, 0) < 0)
166 f0f4401f 2004-04-23 devnull return -1;
167 f0f4401f 2004-04-23 devnull return u;
171 f0f4401f 2004-04-23 devnull xsysctl(int first)
173 f0f4401f 2004-04-23 devnull static int pgsize;
175 f0f4401f 2004-04-23 devnull if(first){
176 f0f4401f 2004-04-23 devnull pgsize = isys("vm.stats.vm.v_page_size");
177 f0f4401f 2004-04-23 devnull if(pgsize == 0)
178 f0f4401f 2004-04-23 devnull pgsize = 4096;
181 f0f4401f 2004-04-23 devnull Bprint(&bout, "mem =%lld %lld\n",
182 f0f4401f 2004-04-23 devnull isys("vm.stats.vm.v_active_count")*pgsize,
183 f0f4401f 2004-04-23 devnull isys("vm.stats.vm.v_page_count")*pgsize);
184 f0f4401f 2004-04-23 devnull Bprint(&bout, "context %lld 1000\n", isys("vm.stats.sys.v_swtch"));
185 f0f4401f 2004-04-23 devnull Bprint(&bout, "syscall %lld 1000\n", isys("vm.stats.sys.v_syscall"));
186 f0f4401f 2004-04-23 devnull Bprint(&bout, "intr %lld 1000\n", isys("vm.stats.sys.v_intr")+isys("vm.stats.sys.v_trap"));
187 f0f4401f 2004-04-23 devnull Bprint(&bout, "fault %lld 1000\n", isys("vm.stats.vm.v_vm_faults"));
188 f0f4401f 2004-04-23 devnull Bprint(&bout, "fork %lld 1000\n", isys("vm.stats.vm.v_forks")
189 f0f4401f 2004-04-23 devnull +isys("vm.stats.vm.v_rforks")
190 f0f4401f 2004-04-23 devnull +isys("vm.stats.vm.v_vforks"));
194 f0f4401f 2004-04-23 devnull xcpu(int first)
196 f0f4401f 2004-04-23 devnull static int stathz;
197 f0f4401f 2004-04-23 devnull ulong x[20];
198 f0f4401f 2004-04-23 devnull struct clockinfo *ci;
201 f0f4401f 2004-04-23 devnull if(first){
202 f0f4401f 2004-04-23 devnull if(rsys("kern.clockrate", (char*)&x, sizeof x) < sizeof ci)
203 f0f4401f 2004-04-23 devnull stathz = 128;
205 f0f4401f 2004-04-23 devnull ci = (struct clockinfo*)x;
206 f0f4401f 2004-04-23 devnull stathz = ci->stathz;
211 f0f4401f 2004-04-23 devnull if((n=rsys("kern.cp_time", (char*)x, sizeof x)) < 5*sizeof(ulong))
214 f0f4401f 2004-04-23 devnull Bprint(&bout, "user %lud %d\n", x[CP_USER]+x[CP_NICE], stathz);
215 f0f4401f 2004-04-23 devnull Bprint(&bout, "sys %lud %d\n", x[CP_SYS], stathz);
216 f0f4401f 2004-04-23 devnull Bprint(&bout, "cpu %lud %d\n", x[CP_USER]+x[CP_NICE]+x[CP_SYS], stathz);
217 f0f4401f 2004-04-23 devnull Bprint(&bout, "idle %lud %d\n", x[CP_IDLE], stathz);
221 f0f4401f 2004-04-23 devnull xloadavg(int first)
223 f0f4401f 2004-04-23 devnull double l[3];
225 f0f4401f 2004-04-23 devnull if(first)
228 f0f4401f 2004-04-23 devnull if(getloadavg(l, 3) < 0)
230 f0f4401f 2004-04-23 devnull Bprint(&bout, "load =%d 1000\n", (int)(l[0]*1000.0));
234 f0f4401f 2004-04-23 devnull xswap(int first)
236 f0f4401f 2004-04-23 devnull static struct kvm_swap s;
237 f0f4401f 2004-04-23 devnull static ulong pgin, pgout;
238 f0f4401f 2004-04-23 devnull int i, o;
239 f0f4401f 2004-04-23 devnull static int pgsize;
241 f0f4401f 2004-04-23 devnull if(first){
242 f0f4401f 2004-04-23 devnull pgsize = getpagesize();
243 f0f4401f 2004-04-23 devnull if(pgsize == 0)
244 f0f4401f 2004-04-23 devnull pgsize = 4096;
248 f0f4401f 2004-04-23 devnull if(kvm == nil)
251 f0f4401f 2004-04-23 devnull i = isys("vm.stats.vm.v_swappgsin");
252 f0f4401f 2004-04-23 devnull o = isys("vm.stats.vm.v_swappgsout");
253 f0f4401f 2004-04-23 devnull if(i != pgin || o != pgout){
254 f0f4401f 2004-04-23 devnull pgin = i;
255 f0f4401f 2004-04-23 devnull pgout = o;
256 f0f4401f 2004-04-23 devnull kvm_getswapinfo(kvm, &s, 1, 0);
260 f0f4401f 2004-04-23 devnull Bprint(&bout, "swap =%lld %lld\n", s.ksw_used*(vlong)pgsize, s.ksw_total*(vlong)pgsize);