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 6f6012e1 2005-11-07 devnull #if __FreeBSD_version < 600000
 15 f0f4401f 2004-04-23 devnull #include <machine/apm_bios.h>
 16 6f6012e1 2005-11-07 devnull #endif
 17 f0f4401f 2004-04-23 devnull #include <sys/ioctl.h>
 18 f0f4401f 2004-04-23 devnull #include <limits.h>
 19 f0f4401f 2004-04-23 devnull #include <libc.h>
 20 f0f4401f 2004-04-23 devnull #include <bio.h>
 21 da8a485f 2018-01-23 0intro #include <ifaddrs.h>
 22 f0f4401f 2004-04-23 devnull #include "dat.h"
 23 f0f4401f 2004-04-23 devnull 
 24 f0f4401f 2004-04-23 devnull void xapm(int);
 25 f0f4401f 2004-04-23 devnull void xloadavg(int);
 26 f0f4401f 2004-04-23 devnull void xcpu(int);
 27 f0f4401f 2004-04-23 devnull void xswap(int);
 28 f0f4401f 2004-04-23 devnull void xsysctl(int);
 29 f0f4401f 2004-04-23 devnull void xnet(int);
 30 f0f4401f 2004-04-23 devnull void xkvm(int);
 31 f0f4401f 2004-04-23 devnull 
 32 f0f4401f 2004-04-23 devnull void (*statfn[])(int) =
 33 f0f4401f 2004-04-23 devnull {
 34 f0f4401f 2004-04-23 devnull 	xkvm,
 35 f0f4401f 2004-04-23 devnull 	xapm,
 36 f0f4401f 2004-04-23 devnull 	xloadavg,
 37 f0f4401f 2004-04-23 devnull 	xswap,
 38 f0f4401f 2004-04-23 devnull 	xcpu,
 39 f0f4401f 2004-04-23 devnull 	xsysctl,
 40 f0f4401f 2004-04-23 devnull 	xnet,
 41 f0f4401f 2004-04-23 devnull 	0
 42 f0f4401f 2004-04-23 devnull };
 43 f0f4401f 2004-04-23 devnull 
 44 f0f4401f 2004-04-23 devnull static kvm_t *kvm;
 45 f0f4401f 2004-04-23 devnull 
 46 f0f4401f 2004-04-23 devnull static struct nlist nl[] = {
 47 f0f4401f 2004-04-23 devnull 	{ "_cp_time" },
 48 cbeb0b26 2006-04-01 devnull 	{ "" }
 49 f0f4401f 2004-04-23 devnull };
 50 f0f4401f 2004-04-23 devnull 
 51 f0f4401f 2004-04-23 devnull void
 52 f0f4401f 2004-04-23 devnull kvminit(void)
 53 f0f4401f 2004-04-23 devnull {
 54 f0f4401f 2004-04-23 devnull 	char buf[_POSIX2_LINE_MAX];
 55 f0f4401f 2004-04-23 devnull 
 56 f0f4401f 2004-04-23 devnull 	if(kvm)
 57 f0f4401f 2004-04-23 devnull 		return;
 58 f0f4401f 2004-04-23 devnull 	kvm = kvm_openfiles(nil, nil, nil, OREAD, buf);
 59 f0f4401f 2004-04-23 devnull 	if(kvm == nil)
 60 f0f4401f 2004-04-23 devnull 		return;
 61 f0f4401f 2004-04-23 devnull 	if(kvm_nlist(kvm, nl) < 0 || nl[0].n_type == 0){
 62 f0f4401f 2004-04-23 devnull 		kvm = nil;
 63 f0f4401f 2004-04-23 devnull 		return;
 64 f0f4401f 2004-04-23 devnull 	}
 65 f0f4401f 2004-04-23 devnull }
 66 f0f4401f 2004-04-23 devnull 
 67 f0f4401f 2004-04-23 devnull void
 68 f0f4401f 2004-04-23 devnull xkvm(int first)
 69 f0f4401f 2004-04-23 devnull {
 70 f0f4401f 2004-04-23 devnull 	if(first)
 71 f0f4401f 2004-04-23 devnull 		kvminit();
 72 f0f4401f 2004-04-23 devnull }
 73 f0f4401f 2004-04-23 devnull 
 74 f0f4401f 2004-04-23 devnull int
 75 f0f4401f 2004-04-23 devnull kread(ulong addr, char *buf, int size)
 76 f0f4401f 2004-04-23 devnull {
 77 f0f4401f 2004-04-23 devnull 	if(kvm_read(kvm, addr, buf, size) != size){
 78 f0f4401f 2004-04-23 devnull 		memset(buf, 0, size);
 79 f0f4401f 2004-04-23 devnull 		return -1;
 80 f0f4401f 2004-04-23 devnull 	}
 81 f0f4401f 2004-04-23 devnull 	return size;
 82 f0f4401f 2004-04-23 devnull }
 83 f0f4401f 2004-04-23 devnull 
 84 f0f4401f 2004-04-23 devnull void
 85 f0f4401f 2004-04-23 devnull xnet(int first)
 86 f0f4401f 2004-04-23 devnull {
 87 da8a485f 2018-01-23 0intro 	struct ifaddrs *ifap, *ifa;
 88 f0f4401f 2004-04-23 devnull 	ulong out, in, outb, inb, err;
 89 f0f4401f 2004-04-23 devnull 
 90 f0f4401f 2004-04-23 devnull 	if(first)
 91 f0f4401f 2004-04-23 devnull 		return;
 92 f0f4401f 2004-04-23 devnull 
 93 da8a485f 2018-01-23 0intro 	if (getifaddrs(&ifap) != 0)
 94 f0f4401f 2004-04-23 devnull 		return;
 95 f0f4401f 2004-04-23 devnull 
 96 f0f4401f 2004-04-23 devnull 	out = in = outb = inb = err = 0;
 97 da8a485f 2018-01-23 0intro #define	IFA_STAT(s)	(((struct if_data *)ifa->ifa_data)->ifi_ ## s)
 98 da8a485f 2018-01-23 0intro 	for (ifa = ifap; ifa; ifa = ifa->ifa_next) {
 99 da8a485f 2018-01-23 0intro 		if (ifa->ifa_addr->sa_family != AF_LINK)
100 da8a485f 2018-01-23 0intro 			continue;
101 da8a485f 2018-01-23 0intro 		out += IFA_STAT(opackets);
102 da8a485f 2018-01-23 0intro 		in += IFA_STAT(ipackets);
103 da8a485f 2018-01-23 0intro 		outb += IFA_STAT(obytes);
104 da8a485f 2018-01-23 0intro 		inb += IFA_STAT(ibytes);
105 da8a485f 2018-01-23 0intro 		err += IFA_STAT(oerrors) + IFA_STAT(ierrors);
106 f0f4401f 2004-04-23 devnull 	}
107 da8a485f 2018-01-23 0intro 	freeifaddrs(ifap);
108 da8a485f 2018-01-23 0intro 
109 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "etherin %lud 1000\n", in);
110 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "etherout %lud 1000\n", out);
111 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "etherinb %lud 1000000\n", inb);
112 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "etheroutb %lud 1000000\n", outb);
113 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "ethererr %lud 1000\n", err);
114 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "ether %lud 1000\n", in+out);
115 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "etherb %lud 1000000\n", inb+outb);
116 8a830ad0 2005-01-07 devnull }
117 8a830ad0 2005-01-07 devnull 
118 8a830ad0 2005-01-07 devnull #if __FreeBSD_version >= 500000
119 8a830ad0 2005-01-07 devnull int
120 8a830ad0 2005-01-07 devnull xacpi(int first)
121 8a830ad0 2005-01-07 devnull {
122 8a830ad0 2005-01-07 devnull 	int rv;
123 6f6012e1 2005-11-07 devnull 	int val;
124 c704a4a2 2005-12-30 devnull 	size_t len;
125 8a830ad0 2005-01-07 devnull 
126 8a830ad0 2005-01-07 devnull 	len = sizeof(val);
127 8a830ad0 2005-01-07 devnull 	rv = sysctlbyname("hw.acpi.battery.life", &val, &len, nil, 0);
128 8a830ad0 2005-01-07 devnull 	if(rv != 0)
129 8a830ad0 2005-01-07 devnull 		return -1;
130 8a830ad0 2005-01-07 devnull 	Bprint(&bout, "battery =%d 100\n", val);
131 8a830ad0 2005-01-07 devnull 	return 0;
132 f0f4401f 2004-04-23 devnull }
133 8a830ad0 2005-01-07 devnull #else
134 8a830ad0 2005-01-07 devnull int
135 8a830ad0 2005-01-07 devnull xacpi(int first)
136 8a830ad0 2005-01-07 devnull {
137 8a830ad0 2005-01-07 devnull 	return -1;
138 8a830ad0 2005-01-07 devnull }
139 8a830ad0 2005-01-07 devnull #endif
140 f0f4401f 2004-04-23 devnull 
141 6f6012e1 2005-11-07 devnull #if __FreeBSD_version < 600000
142 f0f4401f 2004-04-23 devnull void
143 f0f4401f 2004-04-23 devnull xapm(int first)
144 f0f4401f 2004-04-23 devnull {
145 f0f4401f 2004-04-23 devnull 	static int fd;
146 f0f4401f 2004-04-23 devnull 	struct apm_info ai;
147 f0f4401f 2004-04-23 devnull 
148 f0f4401f 2004-04-23 devnull 	if(first){
149 8a830ad0 2005-01-07 devnull 		xacpi(first);
150 f0f4401f 2004-04-23 devnull 		fd = open("/dev/apm", OREAD);
151 f0f4401f 2004-04-23 devnull 		return;
152 f0f4401f 2004-04-23 devnull 	}
153 f0f4401f 2004-04-23 devnull 
154 8a830ad0 2005-01-07 devnull 	if(xacpi(0) >= 0)
155 8a830ad0 2005-01-07 devnull 		return;
156 8a830ad0 2005-01-07 devnull 
157 f0f4401f 2004-04-23 devnull 	if(ioctl(fd, APMIO_GETINFO, &ai) < 0)
158 f0f4401f 2004-04-23 devnull 		return;
159 f0f4401f 2004-04-23 devnull 
160 f0f4401f 2004-04-23 devnull 	if(ai.ai_batt_life <= 100)
161 f0f4401f 2004-04-23 devnull 		Bprint(&bout, "battery =%d 100\n", ai.ai_batt_life);
162 f0f4401f 2004-04-23 devnull }
163 6f6012e1 2005-11-07 devnull #else
164 6f6012e1 2005-11-07 devnull void
165 6f6012e1 2005-11-07 devnull xapm(int first)
166 6f6012e1 2005-11-07 devnull {
167 7ae652a9 2005-11-27 devnull 	xacpi(first);
168 6f6012e1 2005-11-07 devnull }
169 6f6012e1 2005-11-07 devnull #endif
170 f0f4401f 2004-04-23 devnull 
171 f0f4401f 2004-04-23 devnull int
172 f0f4401f 2004-04-23 devnull rsys(char *name, char *buf, int len)
173 f0f4401f 2004-04-23 devnull {
174 f0f4401f 2004-04-23 devnull 	size_t l;
175 f0f4401f 2004-04-23 devnull 
176 f0f4401f 2004-04-23 devnull 	l = len;
177 f0f4401f 2004-04-23 devnull 	if(sysctlbyname(name, buf, &l, nil, 0) < 0)
178 f0f4401f 2004-04-23 devnull 		return -1;
179 f0f4401f 2004-04-23 devnull 	buf[l] = 0;
180 f0f4401f 2004-04-23 devnull 	return l;
181 f0f4401f 2004-04-23 devnull }
182 f0f4401f 2004-04-23 devnull 
183 f0f4401f 2004-04-23 devnull vlong
184 f0f4401f 2004-04-23 devnull isys(char *name)
185 f0f4401f 2004-04-23 devnull {
186 f0f4401f 2004-04-23 devnull 	ulong u;
187 f0f4401f 2004-04-23 devnull 	size_t l;
188 f0f4401f 2004-04-23 devnull 
189 f0f4401f 2004-04-23 devnull 	l = sizeof u;
190 f0f4401f 2004-04-23 devnull 	if(sysctlbyname(name, &u, &l, nil, 0) < 0)
191 f0f4401f 2004-04-23 devnull 		return -1;
192 f0f4401f 2004-04-23 devnull 	return u;
193 f0f4401f 2004-04-23 devnull }
194 f0f4401f 2004-04-23 devnull 
195 f0f4401f 2004-04-23 devnull void
196 f0f4401f 2004-04-23 devnull xsysctl(int first)
197 f0f4401f 2004-04-23 devnull {
198 f0f4401f 2004-04-23 devnull 	static int pgsize;
199 f0f4401f 2004-04-23 devnull 
200 f0f4401f 2004-04-23 devnull 	if(first){
201 f0f4401f 2004-04-23 devnull 		pgsize = isys("vm.stats.vm.v_page_size");
202 f0f4401f 2004-04-23 devnull 		if(pgsize == 0)
203 f0f4401f 2004-04-23 devnull 			pgsize = 4096;
204 f0f4401f 2004-04-23 devnull 	}
205 f0f4401f 2004-04-23 devnull 
206 fa325e9b 2020-01-10 cross 	Bprint(&bout, "mem =%lld %lld\n",
207 fa325e9b 2020-01-10 cross 		isys("vm.stats.vm.v_active_count")*pgsize,
208 f0f4401f 2004-04-23 devnull 		isys("vm.stats.vm.v_page_count")*pgsize);
209 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "context %lld 1000\n", isys("vm.stats.sys.v_swtch"));
210 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "syscall %lld 1000\n", isys("vm.stats.sys.v_syscall"));
211 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "intr %lld 1000\n", isys("vm.stats.sys.v_intr")+isys("vm.stats.sys.v_trap"));
212 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "fault %lld 1000\n", isys("vm.stats.vm.v_vm_faults"));
213 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "fork %lld 1000\n", isys("vm.stats.vm.v_forks")
214 f0f4401f 2004-04-23 devnull 		+isys("vm.stats.vm.v_rforks")
215 f0f4401f 2004-04-23 devnull 		+isys("vm.stats.vm.v_vforks"));
216 f0f4401f 2004-04-23 devnull }
217 f0f4401f 2004-04-23 devnull 
218 f0f4401f 2004-04-23 devnull void
219 f0f4401f 2004-04-23 devnull xcpu(int first)
220 f0f4401f 2004-04-23 devnull {
221 f0f4401f 2004-04-23 devnull 	static int stathz;
222 77ac3583 2009-06-09 rsc 	union {
223 77ac3583 2009-06-09 rsc 		ulong x[20];
224 77ac3583 2009-06-09 rsc 		struct clockinfo ci;
225 77ac3583 2009-06-09 rsc 	} u;
226 f0f4401f 2004-04-23 devnull 	int n;
227 f0f4401f 2004-04-23 devnull 
228 f0f4401f 2004-04-23 devnull 	if(first){
229 77ac3583 2009-06-09 rsc 		if(rsys("kern.clockrate", (char*)u.x, sizeof u.x) < sizeof u.ci)
230 f0f4401f 2004-04-23 devnull 			stathz = 128;
231 77ac3583 2009-06-09 rsc 		else
232 77ac3583 2009-06-09 rsc 			stathz = u.ci.stathz;
233 f0f4401f 2004-04-23 devnull 		return;
234 f0f4401f 2004-04-23 devnull 	}
235 f0f4401f 2004-04-23 devnull 
236 77ac3583 2009-06-09 rsc 	if((n=rsys("kern.cp_time", (char*)u.x, sizeof u.x)) < 5*sizeof(ulong))
237 f0f4401f 2004-04-23 devnull 		return;
238 f0f4401f 2004-04-23 devnull 
239 77ac3583 2009-06-09 rsc 	Bprint(&bout, "user %lud %d\n", u.x[CP_USER]+u.x[CP_NICE], stathz);
240 77ac3583 2009-06-09 rsc 	Bprint(&bout, "sys %lud %d\n", u.x[CP_SYS], stathz);
241 77ac3583 2009-06-09 rsc 	Bprint(&bout, "cpu %lud %d\n", u.x[CP_USER]+u.x[CP_NICE]+u.x[CP_SYS], stathz);
242 77ac3583 2009-06-09 rsc 	Bprint(&bout, "idle %lud %d\n", u.x[CP_IDLE], stathz);
243 f0f4401f 2004-04-23 devnull }
244 f0f4401f 2004-04-23 devnull 
245 f0f4401f 2004-04-23 devnull void
246 f0f4401f 2004-04-23 devnull xloadavg(int first)
247 f0f4401f 2004-04-23 devnull {
248 f0f4401f 2004-04-23 devnull 	double l[3];
249 f0f4401f 2004-04-23 devnull 
250 f0f4401f 2004-04-23 devnull 	if(first)
251 f0f4401f 2004-04-23 devnull 		return;
252 f0f4401f 2004-04-23 devnull 
253 f0f4401f 2004-04-23 devnull 	if(getloadavg(l, 3) < 0)
254 f0f4401f 2004-04-23 devnull 		return;
255 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "load =%d 1000\n", (int)(l[0]*1000.0));
256 f0f4401f 2004-04-23 devnull }
257 f0f4401f 2004-04-23 devnull 
258 f0f4401f 2004-04-23 devnull void
259 f0f4401f 2004-04-23 devnull xswap(int first)
260 f0f4401f 2004-04-23 devnull {
261 f0f4401f 2004-04-23 devnull 	static struct kvm_swap s;
262 f0f4401f 2004-04-23 devnull 	static ulong pgin, pgout;
263 f0f4401f 2004-04-23 devnull 	int i, o;
264 f0f4401f 2004-04-23 devnull 	static int pgsize;
265 f0f4401f 2004-04-23 devnull 
266 f0f4401f 2004-04-23 devnull 	if(first){
267 f0f4401f 2004-04-23 devnull 		pgsize = getpagesize();
268 f0f4401f 2004-04-23 devnull 		if(pgsize == 0)
269 f0f4401f 2004-04-23 devnull 			pgsize = 4096;
270 f0f4401f 2004-04-23 devnull 		return;
271 f0f4401f 2004-04-23 devnull 	}
272 f0f4401f 2004-04-23 devnull 
273 f0f4401f 2004-04-23 devnull 	if(kvm == nil)
274 f0f4401f 2004-04-23 devnull 		return;
275 f0f4401f 2004-04-23 devnull 
276 f0f4401f 2004-04-23 devnull 	i = isys("vm.stats.vm.v_swappgsin");
277 f0f4401f 2004-04-23 devnull 	o = isys("vm.stats.vm.v_swappgsout");
278 f0f4401f 2004-04-23 devnull 	if(i != pgin || o != pgout){
279 f0f4401f 2004-04-23 devnull 		pgin = i;
280 f0f4401f 2004-04-23 devnull 		pgout = o;
281 f0f4401f 2004-04-23 devnull 		kvm_getswapinfo(kvm, &s, 1, 0);
282 f0f4401f 2004-04-23 devnull 	}
283 f0f4401f 2004-04-23 devnull 
284 f0f4401f 2004-04-23 devnull 
285 f0f4401f 2004-04-23 devnull 	Bprint(&bout, "swap =%lld %lld\n", s.ksw_used*(vlong)pgsize, s.ksw_total*(vlong)pgsize);
286 f0f4401f 2004-04-23 devnull }