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