1 f0f4401f 2004-04-23 devnull /*
  2 f0f4401f 2004-04-23 devnull  * No idea whether this will work.  It does compile.
  3 f0f4401f 2004-04-23 devnull  */
  4 f0f4401f 2004-04-23 devnull 
  5 f0f4401f 2004-04-23 devnull #include <u.h>
  6 f0f4401f 2004-04-23 devnull #include <kvm.h>
  7 f0f4401f 2004-04-23 devnull #include <nlist.h>
  8 f0f4401f 2004-04-23 devnull #include <sys/types.h>
  9 f0f4401f 2004-04-23 devnull #include <sys/protosw.h>
 10 f0f4401f 2004-04-23 devnull #include <sys/socket.h>
 11 f0f4401f 2004-04-23 devnull #include <sys/sysctl.h>
 12 f0f4401f 2004-04-23 devnull #include <sys/time.h>
 13 f0f4401f 2004-04-23 devnull #include <sys/dkstat.h>
 14 f0f4401f 2004-04-23 devnull #include <net/if.h>
 15 f0f4401f 2004-04-23 devnull #include <net/if_var.h>
 16 f0f4401f 2004-04-23 devnull #include <net/if_dl.h>
 17 f0f4401f 2004-04-23 devnull #include <net/if_types.h>
 18 f0f4401f 2004-04-23 devnull #include <sys/ioctl.h>
 19 f0f4401f 2004-04-23 devnull #include <limits.h>
 20 f0f4401f 2004-04-23 devnull #include <libc.h>
 21 f0f4401f 2004-04-23 devnull #include <bio.h>
 22 f0f4401f 2004-04-23 devnull #include "dat.h"
 23 f0f4401f 2004-04-23 devnull 
 24 f0f4401f 2004-04-23 devnull void xloadavg(int);
 25 f0f4401f 2004-04-23 devnull void xcpu(int);
 26 f0f4401f 2004-04-23 devnull void xswap(int);
 27 f0f4401f 2004-04-23 devnull void xsysctl(int);
 28 f0f4401f 2004-04-23 devnull void xnet(int);
 29 f0f4401f 2004-04-23 devnull void xkvm(int);
 30 f0f4401f 2004-04-23 devnull 
 31 f0f4401f 2004-04-23 devnull void (*statfn[])(int) =
 32 f0f4401f 2004-04-23 devnull {
 33 f0f4401f 2004-04-23 devnull 	xkvm,
 34 f0f4401f 2004-04-23 devnull 	xloadavg,
 35 f0f4401f 2004-04-23 devnull 	xswap,
 36 f0f4401f 2004-04-23 devnull 	xcpu,
 37 f0f4401f 2004-04-23 devnull 	xsysctl,
 38 f0f4401f 2004-04-23 devnull 	xnet,
 39 f0f4401f 2004-04-23 devnull 	0
 40 f0f4401f 2004-04-23 devnull };
 41 f0f4401f 2004-04-23 devnull 
 42 f0f4401f 2004-04-23 devnull static kvm_t *kvm;
 43 f0f4401f 2004-04-23 devnull 
 44 f0f4401f 2004-04-23 devnull static struct nlist nl[] = {
 45 f0f4401f 2004-04-23 devnull 	{ "_ifnet" },
 46 f0f4401f 2004-04-23 devnull 	{ "_cp_time" },
 47 f0f4401f 2004-04-23 devnull 	{ "" },
 48 f0f4401f 2004-04-23 devnull };
 49 f0f4401f 2004-04-23 devnull 
 50 f0f4401f 2004-04-23 devnull void
 51 f0f4401f 2004-04-23 devnull kvminit(void)
 52 f0f4401f 2004-04-23 devnull {
 53 f0f4401f 2004-04-23 devnull 	char buf[_POSIX2_LINE_MAX];
 54 f0f4401f 2004-04-23 devnull 
 55 f0f4401f 2004-04-23 devnull 	if(kvm)
 56 f0f4401f 2004-04-23 devnull 		return;
 57 f0f4401f 2004-04-23 devnull 	kvm = kvm_openfiles(nil, nil, nil, OREAD, buf);
 58 f0f4401f 2004-04-23 devnull 	if(kvm == nil)
 59 f0f4401f 2004-04-23 devnull 		return;
 60 f0f4401f 2004-04-23 devnull 	if(kvm_nlist(kvm, nl) < 0 || nl[0].n_type == 0){
 61 f0f4401f 2004-04-23 devnull 		kvm = nil;
 62 f0f4401f 2004-04-23 devnull 		return;
 63 f0f4401f 2004-04-23 devnull 	}
 64 f0f4401f 2004-04-23 devnull }
 65 f0f4401f 2004-04-23 devnull 
 66 f0f4401f 2004-04-23 devnull void
 67 f0f4401f 2004-04-23 devnull xkvm(int first)
 68 f0f4401f 2004-04-23 devnull {
 69 f0f4401f 2004-04-23 devnull 	if(first)
 70 f0f4401f 2004-04-23 devnull 		kvminit();
 71 f0f4401f 2004-04-23 devnull }
 72 f0f4401f 2004-04-23 devnull 
 73 f0f4401f 2004-04-23 devnull int
 74 f0f4401f 2004-04-23 devnull kread(ulong addr, char *buf, int size)
 75 f0f4401f 2004-04-23 devnull {
 76 f0f4401f 2004-04-23 devnull 	if(kvm_read(kvm, addr, buf, size) != size){
 77 f0f4401f 2004-04-23 devnull 		memset(buf, 0, size);
 78 f0f4401f 2004-04-23 devnull 		return -1;
 79 f0f4401f 2004-04-23 devnull 	}
 80 f0f4401f 2004-04-23 devnull 	return size;
 81 f0f4401f 2004-04-23 devnull }
 82 f0f4401f 2004-04-23 devnull 
 83 f0f4401f 2004-04-23 devnull void
 84 f0f4401f 2004-04-23 devnull xnet(int first)
 85 f0f4401f 2004-04-23 devnull {
 86 f0f4401f 2004-04-23 devnull 	ulong out, in, outb, inb, err;
 87 f0f4401f 2004-04-23 devnull 	static ulong ifnetaddr;
 88 f0f4401f 2004-04-23 devnull 	ulong addr;
 89 f0f4401f 2004-04-23 devnull 	struct ifnet ifnet;
 90 f0f4401f 2004-04-23 devnull 	struct ifnethead ifnethead;
 91 f0f4401f 2004-04-23 devnull 	char name[16];
 92 f0f4401f 2004-04-23 devnull 
 93 f0f4401f 2004-04-23 devnull 	if(first)
 94 f0f4401f 2004-04-23 devnull 		return;
 95 f0f4401f 2004-04-23 devnull 
 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)
 99 f0f4401f 2004-04-23 devnull 			return;
100 f0f4401f 2004-04-23 devnull 	}
101 f0f4401f 2004-04-23 devnull 
102 f0f4401f 2004-04-23 devnull 	if(kread(ifnetaddr, (char*)&ifnethead, sizeof ifnethead) < 0)
103 f0f4401f 2004-04-23 devnull 		return;
104 f0f4401f 2004-04-23 devnull 
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)
110 f0f4401f 2004-04-23 devnull 			return;
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;
118 f0f4401f 2004-04-23 devnull 	}
119 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "etherin %lud\n", in);
120 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "etherout %lud\n", out);
121 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "etherinb %lud\n", inb);
122 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "etheroutb %lud\n", outb);
123 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "ethererr %lud\n", err);
124 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "ether %lud\n", in+out);
125 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "etherb %lud\n", inb+outb);
126 f0f4401f 2004-04-23 devnull }
127 f0f4401f 2004-04-23 devnull 
128 f0f4401f 2004-04-23 devnull 
129 f0f4401f 2004-04-23 devnull int
130 f0f4401f 2004-04-23 devnull rsys(char *name, char *buf, int len)
131 f0f4401f 2004-04-23 devnull {
132 f0f4401f 2004-04-23 devnull 	size_t l;
133 f0f4401f 2004-04-23 devnull 
134 f0f4401f 2004-04-23 devnull 	l = len;
135 f0f4401f 2004-04-23 devnull 	if(sysctlbyname(name, buf, &l, nil, 0) < 0)
136 f0f4401f 2004-04-23 devnull 		return -1;
137 f0f4401f 2004-04-23 devnull 	buf[l] = 0;
138 f0f4401f 2004-04-23 devnull 	return l;
139 f0f4401f 2004-04-23 devnull }
140 f0f4401f 2004-04-23 devnull 
141 f0f4401f 2004-04-23 devnull vlong
142 f0f4401f 2004-04-23 devnull isys(char *name)
143 f0f4401f 2004-04-23 devnull {
144 f0f4401f 2004-04-23 devnull 	ulong u;
145 f0f4401f 2004-04-23 devnull 	size_t l;
146 f0f4401f 2004-04-23 devnull 
147 f0f4401f 2004-04-23 devnull 	l = sizeof u;
148 f0f4401f 2004-04-23 devnull 	if(sysctlbyname(name, &u, &l, nil, 0) < 0)
149 f0f4401f 2004-04-23 devnull 		return 0;
150 f0f4401f 2004-04-23 devnull 	return u;
151 f0f4401f 2004-04-23 devnull }
152 f0f4401f 2004-04-23 devnull 
153 f0f4401f 2004-04-23 devnull void
154 f0f4401f 2004-04-23 devnull xsysctl(int first)
155 f0f4401f 2004-04-23 devnull {
156 f0f4401f 2004-04-23 devnull 	static int pgsize;
157 f0f4401f 2004-04-23 devnull 	vlong t;
158 f0f4401f 2004-04-23 devnull 
159 f0f4401f 2004-04-23 devnull 	if(first){
160 f0f4401f 2004-04-23 devnull 		pgsize = isys("vm.stats.vm.v_page_size");
161 f0f4401f 2004-04-23 devnull 		if(pgsize == 0)
162 f0f4401f 2004-04-23 devnull 			pgsize = 4096;
163 f0f4401f 2004-04-23 devnull 	}
164 f0f4401f 2004-04-23 devnull 	if((t = isys("vm.stats.vm.v_page_count")) != 0)
165 f0f4401f 2004-04-23 devnull 		Bprint(&bout, "mem %lld %lld\n", 
166 f0f4401f 2004-04-23 devnull 			isys("vm.stats.vm.v_active_count")*pgsize, 
167 f0f4401f 2004-04-23 devnull 			t*pgsize);
168 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "context %lld 1000\n", isys("vm.stats.sys.v_swtch"));
169 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "syscall %lld 1000\n", isys("vm.stats.sys.v_syscall"));
170 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "intr %lld 1000\n", isys("vm.stats.sys.v_intr")+isys("vm.stats.sys.v_trap"));
171 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "fault %lld 1000\n", isys("vm.stats.vm.v_vm_faults"));
172 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "fork %lld 1000\n", isys("vm.stats.vm.v_forks")
173 f0f4401f 2004-04-23 devnull 		+isys("vm.stats.vm.v_rforks")
174 f0f4401f 2004-04-23 devnull 		+isys("vm.stats.vm.v_vforks"));
175 f0f4401f 2004-04-23 devnull }
176 f0f4401f 2004-04-23 devnull 
177 f0f4401f 2004-04-23 devnull void
178 f0f4401f 2004-04-23 devnull xcpu(int first)
179 f0f4401f 2004-04-23 devnull {
180 f0f4401f 2004-04-23 devnull #if 0
181 f0f4401f 2004-04-23 devnull 	static int stathz;
182 f0f4401f 2004-04-23 devnull 	ulong x[20];
183 f0f4401f 2004-04-23 devnull 	struct clockinfo *ci;
184 f0f4401f 2004-04-23 devnull 	int n;
185 f0f4401f 2004-04-23 devnull 
186 f0f4401f 2004-04-23 devnull 	if(first){
187 f0f4401f 2004-04-23 devnull 		if(rsys("kern.clockrate", (char*)&x, sizeof x) < sizeof ci)
188 f0f4401f 2004-04-23 devnull 			stathz = 128;
189 f0f4401f 2004-04-23 devnull 		else{
190 f0f4401f 2004-04-23 devnull 			ci = (struct clockinfo*)x;
191 f0f4401f 2004-04-23 devnull 			stathz = ci->stathz;
192 f0f4401f 2004-04-23 devnull 		}
193 f0f4401f 2004-04-23 devnull 		return;
194 f0f4401f 2004-04-23 devnull 	}
195 f0f4401f 2004-04-23 devnull 
196 f0f4401f 2004-04-23 devnull 	if((n=rsys("kern.cp_time", (char*)x, sizeof x)) < 5*sizeof(ulong))
197 f0f4401f 2004-04-23 devnull 		return;
198 f0f4401f 2004-04-23 devnull 
199 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "user %lud %d\n", x[CP_USER]+x[CP_NICE], stathz);
200 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "sys %lud %d\n", x[CP_SYS], stathz);
201 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "cpu %lud %d\n", x[CP_USER]+x[CP_NICE]+x[CP_SYS], stathz);
202 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "idle %lud %d\n", x[CP_IDLE], stathz);
203 f0f4401f 2004-04-23 devnull #endif
204 f0f4401f 2004-04-23 devnull }
205 f0f4401f 2004-04-23 devnull 
206 f0f4401f 2004-04-23 devnull void
207 f0f4401f 2004-04-23 devnull xloadavg(int first)
208 f0f4401f 2004-04-23 devnull {
209 f0f4401f 2004-04-23 devnull 	double l[3];
210 f0f4401f 2004-04-23 devnull 
211 f0f4401f 2004-04-23 devnull 	if(first)
212 f0f4401f 2004-04-23 devnull 		return;
213 f0f4401f 2004-04-23 devnull 
214 f0f4401f 2004-04-23 devnull 	if(getloadavg(l, 3) < 0)
215 f0f4401f 2004-04-23 devnull 		return;
216 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "load %d 1000\n", (int)(l[0]*1000.0));
217 f0f4401f 2004-04-23 devnull }
218 f0f4401f 2004-04-23 devnull 
219 f0f4401f 2004-04-23 devnull void
220 f0f4401f 2004-04-23 devnull xswap(int first)
221 f0f4401f 2004-04-23 devnull {
222 f0f4401f 2004-04-23 devnull #if 0
223 f0f4401f 2004-04-23 devnull 	static struct kvm_swap s;
224 f0f4401f 2004-04-23 devnull 	static ulong pgin, pgout;
225 f0f4401f 2004-04-23 devnull 	int i, o;
226 f0f4401f 2004-04-23 devnull 	static int pgsize;
227 f0f4401f 2004-04-23 devnull 
228 f0f4401f 2004-04-23 devnull 	if(first){
229 f0f4401f 2004-04-23 devnull 		pgsize = getpagesize();
230 f0f4401f 2004-04-23 devnull 		if(pgsize == 0)
231 f0f4401f 2004-04-23 devnull 			pgsize = 4096;
232 f0f4401f 2004-04-23 devnull 		return;
233 f0f4401f 2004-04-23 devnull 	}
234 f0f4401f 2004-04-23 devnull 
235 f0f4401f 2004-04-23 devnull 	if(kvm == nil)
236 f0f4401f 2004-04-23 devnull 		return;
237 f0f4401f 2004-04-23 devnull 
238 f0f4401f 2004-04-23 devnull 	i = isys("vm.stats.vm.v_swappgsin");
239 f0f4401f 2004-04-23 devnull 	o = isys("vm.stats.vm.v_swappgsout");
240 f0f4401f 2004-04-23 devnull 	if(i != pgin || o != pgout){
241 f0f4401f 2004-04-23 devnull 		pgin = i;
242 f0f4401f 2004-04-23 devnull 		pgout = o;
243 f0f4401f 2004-04-23 devnull 		kvm_getswapinfo(kvm, &s, 1, 0);
244 f0f4401f 2004-04-23 devnull 	}
245 f0f4401f 2004-04-23 devnull 
246 f0f4401f 2004-04-23 devnull 
247 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "swap %lld %lld\n", s.ksw_used*(vlong)pgsize, s.ksw_total*(vlong)pgsize);
248 f0f4401f 2004-04-23 devnull #endif
249 f0f4401f 2004-04-23 devnull }
250 f0f4401f 2004-04-23 devnull