1 f0f4401f 2004-04-23 devnull #include <u.h>
  2 fe8c925e 2005-07-21 devnull #include <sys/types.h>
  3 fe8c925e 2005-07-21 devnull #include <sys/param.h>
  4 0c292663 2015-06-03 rsc #include <sys/sched.h>
  5 fe8c925e 2005-07-21 devnull #include <sys/socket.h>
  6 009b0cb5 2015-12-08 rsc #include <ifaddrs.h>
  7 fe8c925e 2005-07-21 devnull #include <sys/sysctl.h>
  8 fe8c925e 2005-07-21 devnull #include <sys/time.h>
  9 fe8c925e 2005-07-21 devnull #include <net/if.h>
 10 fe8c925e 2005-07-21 devnull #include <machine/apmvar.h>
 11 fe8c925e 2005-07-21 devnull #include <sys/ioctl.h>
 12 fe8c925e 2005-07-21 devnull #include <uvm/uvm_param.h>
 13 fe8c925e 2005-07-21 devnull #include <uvm/uvm_extern.h>
 14 fe8c925e 2005-07-21 devnull #include <limits.h>
 15 f0f4401f 2004-04-23 devnull #include <libc.h>
 16 f0f4401f 2004-04-23 devnull #include <bio.h>
 17 f0f4401f 2004-04-23 devnull #include "dat.h"
 18 f0f4401f 2004-04-23 devnull 
 19 fe8c925e 2005-07-21 devnull void xapm(int);
 20 fe8c925e 2005-07-21 devnull void xloadavg(int);
 21 fe8c925e 2005-07-21 devnull void xcpu(int);
 22 fe8c925e 2005-07-21 devnull void xswap(int);
 23 fe8c925e 2005-07-21 devnull void xsysctl(int);
 24 fe8c925e 2005-07-21 devnull void xnet(int);
 25 fe8c925e 2005-07-21 devnull 
 26 fe8c925e 2005-07-21 devnull void (*statfn[])(int) =
 27 f0f4401f 2004-04-23 devnull {
 28 fe8c925e 2005-07-21 devnull 	xapm,
 29 fe8c925e 2005-07-21 devnull 	xloadavg,
 30 fe8c925e 2005-07-21 devnull 	xcpu,
 31 fe8c925e 2005-07-21 devnull 	xsysctl,
 32 fe8c925e 2005-07-21 devnull 	xnet,
 33 f0f4401f 2004-04-23 devnull 	0
 34 f0f4401f 2004-04-23 devnull };
 35 f0f4401f 2004-04-23 devnull 
 36 fe8c925e 2005-07-21 devnull void
 37 fe8c925e 2005-07-21 devnull xloadavg(int first)
 38 fe8c925e 2005-07-21 devnull {
 39 fe8c925e 2005-07-21 devnull 	double l[3];
 40 fe8c925e 2005-07-21 devnull 
 41 fe8c925e 2005-07-21 devnull 	if(first)
 42 fe8c925e 2005-07-21 devnull 		return;
 43 fe8c925e 2005-07-21 devnull 
 44 fe8c925e 2005-07-21 devnull 	if(getloadavg(l, 3) < 0)
 45 fe8c925e 2005-07-21 devnull 		return;
 46 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "load =%d 1000\n", (int)(l[0]*1000.0));
 47 fe8c925e 2005-07-21 devnull }
 48 fe8c925e 2005-07-21 devnull 
 49 fe8c925e 2005-07-21 devnull void
 50 fe8c925e 2005-07-21 devnull xapm(int first)
 51 fe8c925e 2005-07-21 devnull {
 52 fe8c925e 2005-07-21 devnull 	static int fd;
 53 fe8c925e 2005-07-21 devnull 	struct apm_power_info ai;
 54 fe8c925e 2005-07-21 devnull 
 55 fe8c925e 2005-07-21 devnull 	if(first){
 56 fe8c925e 2005-07-21 devnull 		fd = open("/dev/apm", OREAD);
 57 fe8c925e 2005-07-21 devnull 		return;
 58 fe8c925e 2005-07-21 devnull 	}
 59 fe8c925e 2005-07-21 devnull 
 60 fe8c925e 2005-07-21 devnull 	if(ioctl(fd, APM_IOC_GETPOWER, &ai) < 0)
 61 fe8c925e 2005-07-21 devnull 		return;
 62 fe8c925e 2005-07-21 devnull 
 63 fe8c925e 2005-07-21 devnull 	if(ai.battery_life <= 100)
 64 fe8c925e 2005-07-21 devnull 		Bprint(&bout, "battery =%d 100\n", ai.battery_life);
 65 fe8c925e 2005-07-21 devnull }
 66 fe8c925e 2005-07-21 devnull 
 67 fe8c925e 2005-07-21 devnull void
 68 fe8c925e 2005-07-21 devnull xnet(int first)
 69 fe8c925e 2005-07-21 devnull {
 70 fe8c925e 2005-07-21 devnull 	ulong out, in, outb, inb, err;
 71 009b0cb5 2015-12-08 rsc 	struct ifaddrs *ifa, *ifap;
 72 009b0cb5 2015-12-08 rsc 	struct if_data *ifd = NULL;
 73 fe8c925e 2005-07-21 devnull 
 74 009b0cb5 2015-12-08 rsc 	if (first)
 75 fe8c925e 2005-07-21 devnull 		return;
 76 fe8c925e 2005-07-21 devnull 
 77 009b0cb5 2015-12-08 rsc 	out = in = outb = inb = err = 0;
 78 fe8c925e 2005-07-21 devnull 
 79 009b0cb5 2015-12-08 rsc 	if (getifaddrs(&ifap) == -1)
 80 fe8c925e 2005-07-21 devnull 		return;
 81 fe8c925e 2005-07-21 devnull 
 82 009b0cb5 2015-12-08 rsc 	for (ifa = ifap; ifa != NULL; ifa = ifa->ifa_next) {
 83 009b0cb5 2015-12-08 rsc 		if (ifa->ifa_addr == NULL ||
 84 009b0cb5 2015-12-08 rsc 		    ifa->ifa_addr->sa_family != AF_LINK)
 85 009b0cb5 2015-12-08 rsc 			continue;
 86 009b0cb5 2015-12-08 rsc 
 87 009b0cb5 2015-12-08 rsc 		ifd = ifa->ifa_data;
 88 009b0cb5 2015-12-08 rsc 
 89 009b0cb5 2015-12-08 rsc 		if (ifd != NULL) {
 90 009b0cb5 2015-12-08 rsc 			out += ifd->ifi_opackets;
 91 009b0cb5 2015-12-08 rsc 			in += ifd->ifi_ipackets;
 92 009b0cb5 2015-12-08 rsc 			outb += ifd->ifi_obytes;
 93 009b0cb5 2015-12-08 rsc 			inb += ifd->ifi_ibytes;
 94 009b0cb5 2015-12-08 rsc 			err += ifd->ifi_ierrors;
 95 009b0cb5 2015-12-08 rsc 		}
 96 fe8c925e 2005-07-21 devnull 	}
 97 009b0cb5 2015-12-08 rsc 
 98 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "etherin %lud 1000\n", in);
 99 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "etherout %lud 1000\n", out);
100 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "etherinb %lud 1000000\n", inb);
101 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "etheroutb %lud 1000000\n", outb);
102 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "ethererr %lud 1000\n", err);
103 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "ether %lud 1000\n", in+out);
104 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "etherb %lud 1000000\n", inb+outb);
105 009b0cb5 2015-12-08 rsc 
106 009b0cb5 2015-12-08 rsc 	freeifaddrs(ifap);
107 fe8c925e 2005-07-21 devnull }
108 fe8c925e 2005-07-21 devnull 
109 fe8c925e 2005-07-21 devnull void
110 fe8c925e 2005-07-21 devnull xcpu(int first)
111 fe8c925e 2005-07-21 devnull {
112 fe8c925e 2005-07-21 devnull 	static int stathz;
113 fe8c925e 2005-07-21 devnull 	ulong x[20];
114 fe8c925e 2005-07-21 devnull 	struct clockinfo *ci;
115 fe8c925e 2005-07-21 devnull 	int mib[2];
116 edd308cf 2007-03-26 devnull 	size_t l;
117 fe8c925e 2005-07-21 devnull 
118 fe8c925e 2005-07-21 devnull 	if(first){
119 fe8c925e 2005-07-21 devnull 		mib[0] = CTL_KERN;
120 fe8c925e 2005-07-21 devnull 		mib[1] = KERN_CLOCKRATE;
121 fe8c925e 2005-07-21 devnull 		l = sizeof(x);
122 fe8c925e 2005-07-21 devnull 		sysctl(mib, 2, (char *)&x, &l, nil, 0);
123 fe8c925e 2005-07-21 devnull 		x[l] = 0;
124 fe8c925e 2005-07-21 devnull 		if (l < sizeof(ci))
125 fe8c925e 2005-07-21 devnull 			stathz = 128;
126 fe8c925e 2005-07-21 devnull 		else{
127 fe8c925e 2005-07-21 devnull 			ci = (struct clockinfo*)x;
128 fe8c925e 2005-07-21 devnull 			stathz = ci->stathz;
129 fe8c925e 2005-07-21 devnull 		}
130 fe8c925e 2005-07-21 devnull 		return;
131 fe8c925e 2005-07-21 devnull 	}
132 fe8c925e 2005-07-21 devnull 
133 fe8c925e 2005-07-21 devnull 	mib[0] = CTL_KERN;
134 fe8c925e 2005-07-21 devnull 	mib[1] = KERN_CPTIME;
135 fe8c925e 2005-07-21 devnull 	l = sizeof(x);
136 fe8c925e 2005-07-21 devnull 	sysctl(mib, 2, (char *)&x, &l, nil, 0);
137 fe8c925e 2005-07-21 devnull 	if (l < 5*sizeof(ulong))
138 fe8c925e 2005-07-21 devnull 		return;
139 fe8c925e 2005-07-21 devnull 	x[l] = 0;
140 fe8c925e 2005-07-21 devnull 
141 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "user %lud %d\n", x[CP_USER]+x[CP_NICE], stathz);
142 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "sys %lud %d\n", x[CP_SYS], stathz);
143 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "cpu %lud %d\n", x[CP_USER]+x[CP_NICE]+x[CP_SYS], stathz);
144 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "idle %lud %d\n", x[CP_IDLE], stathz);
145 fe8c925e 2005-07-21 devnull }
146 fe8c925e 2005-07-21 devnull 
147 fe8c925e 2005-07-21 devnull void
148 fe8c925e 2005-07-21 devnull xsysctl(int first)
149 fe8c925e 2005-07-21 devnull {
150 fe8c925e 2005-07-21 devnull 	struct uvmexp vm;
151 fe8c925e 2005-07-21 devnull 	static int pgsize;
152 fe8c925e 2005-07-21 devnull 	int mib[2];
153 fe8c925e 2005-07-21 devnull 	size_t l;
154 fe8c925e 2005-07-21 devnull 
155 fe8c925e 2005-07-21 devnull 	l = sizeof(vm);
156 fe8c925e 2005-07-21 devnull 	mib[0] = CTL_VM;
157 fe8c925e 2005-07-21 devnull 	mib[1] = VM_UVMEXP;
158 fe8c925e 2005-07-21 devnull 	sysctl(mib, 2, &vm, &l, nil, 0);
159 fe8c925e 2005-07-21 devnull 	if (l < sizeof(vm))
160 fe8c925e 2005-07-21 devnull 		return;
161 fe8c925e 2005-07-21 devnull 
162 fe8c925e 2005-07-21 devnull 	if (first)
163 fe8c925e 2005-07-21 devnull 		pgsize = vm.pagesize;
164 fe8c925e 2005-07-21 devnull 
165 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "mem =%lud %lud\n", vm.active*pgsize, vm.npages*pgsize);
166 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "context %lud 1000\n", vm.swtch);
167 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "syscall %lud 1000\n", vm.syscalls);
168 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "intr %lud 1000\n", vm.intrs+vm.traps);
169 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "fault %lud 1000\n", vm.faults);
170 fe8c925e 2005-07-21 devnull 
171 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "fork %ud 1000\n", vm.forks);
172 fe8c925e 2005-07-21 devnull 	Bprint(&bout, "swap =%lud %lud\n", vm.swpginuse*pgsize, vm.swpages*pgsize);
173 cbeb0b26 2006-04-01 devnull }