Revert "Uhh..ansohus"
[monky] / src / freebsd.c
1 /* -*- mode: c; c-basic-offset: 4; tab-width: 4; indent-tabs-mode: t -*-
2  *
3  * Conky, a system monitor, based on torsmo
4  *
5  * Any original torsmo code is licensed under the BSD license
6  *
7  * All code written since the fork of torsmo is licensed under the GPL
8  *
9  * Please see COPYING for details
10  *
11  * Copyright (c) 2005-2009 Brenden Matthews, Philip Kovacs, et. al.
12  *      (see AUTHORS)
13  * All rights reserved.
14  *
15  * This program is free software: you can redistribute it and/or modify
16  * it under the terms of the GNU General Public License as published by
17  * the Free Software Foundation, either version 3 of the License, or
18  * (at your option) any later version.
19  *
20  * This program is distributed in the hope that it will be useful,
21  * but WITHOUT ANY WARRANTY; without even the implied warranty of
22  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
23  * GNU General Public License for more details.
24  * You should have received a copy of the GNU General Public License
25  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
26  *
27  * vim: ts=4 sw=4 noet ai cindent syntax=c
28  *
29  */
30
31 #include <sys/ioctl.h>
32 #include <sys/dkstat.h>
33 #include <sys/param.h>
34 #include <sys/resource.h>
35 #include <sys/socket.h>
36 #include <sys/stat.h>
37 #include <sys/sysctl.h>
38 #include <sys/time.h>
39 #include <sys/types.h>
40 #include <sys/user.h>
41
42 #include <net/if.h>
43 #include <net/if_mib.h>
44 #include <net/if_media.h>
45 #include <net/if_var.h>
46
47 #include <devstat.h>
48 #include <ifaddrs.h>
49 #include <limits.h>
50 #include <unistd.h>
51
52 #include <dev/wi/if_wavelan_ieee.h>
53 #include <dev/acpica/acpiio.h>
54
55 #include "conky.h"
56 #include "freebsd.h"
57 #include "logging.h"
58 #include "top.h"
59 #include "diskio.h"
60
61 #define GETSYSCTL(name, var)    getsysctl(name, &(var), sizeof(var))
62 #define KELVTOC(x)                              ((x - 2732) / 10.0)
63 #define MAXSHOWDEVS                             16
64
65 #if 0
66 #define FREEBSD_DEBUG
67 #endif
68
69 __attribute__((gnu_inline)) inline void
70 proc_find_top(struct process **cpu, struct process **mem);
71
72 static short cpu_setup = 0;
73
74 static int getsysctl(const char *name, void *ptr, size_t len)
75 {
76         size_t nlen = len;
77
78         if (sysctlbyname(name, ptr, &nlen, NULL, 0) == -1) {
79                 return -1;
80         }
81
82         if (nlen != len && errno == ENOMEM) {
83                 return -1;
84         }
85
86         return 0;
87 }
88
89 struct ifmibdata *data = NULL;
90 size_t len = 0;
91
92 static int swapmode(unsigned long *retavail, unsigned long *retfree)
93 {
94         int n;
95         unsigned long pagesize = getpagesize();
96         struct kvm_swap swapary[1];
97
98         *retavail = 0;
99         *retfree = 0;
100
101 #define CONVERT(v)      ((quad_t)(v) * (pagesize / 1024))
102
103         n = kvm_getswapinfo(kd, swapary, 1, 0);
104         if (n < 0 || swapary[0].ksw_total == 0) {
105                 return 0;
106         }
107
108         *retavail = CONVERT(swapary[0].ksw_total);
109         *retfree = CONVERT(swapary[0].ksw_total - swapary[0].ksw_used);
110
111         n = (int) ((double) swapary[0].ksw_used * 100.0 /
112                 (double) swapary[0].ksw_total);
113
114         return n;
115 }
116
117 void prepare_update(void)
118 {
119 }
120
121 void update_uptime(void)
122 {
123         int mib[2] = { CTL_KERN, KERN_BOOTTIME };
124         struct timeval boottime;
125         time_t now;
126         size_t size = sizeof(boottime);
127
128         if ((sysctl(mib, 2, &boottime, &size, NULL, 0) != -1)
129                         && (boottime.tv_sec != 0)) {
130                 time(&now);
131                 info.uptime = now - boottime.tv_sec;
132         } else {
133                 fprintf(stderr, "Could not get uptime\n");
134                 info.uptime = 0;
135         }
136 }
137
138 int check_mount(char *s)
139 {
140         struct statfs *mntbuf;
141         int i, mntsize;
142
143         mntsize = getmntinfo(&mntbuf, MNT_NOWAIT);
144         for (i = mntsize - 1; i >= 0; i--) {
145                 if (strcmp(mntbuf[i].f_mntonname, s) == 0) {
146                         return 1;
147                 }
148         }
149
150         return 0;
151 }
152
153 void update_meminfo(void)
154 {
155         u_int total_pages, inactive_pages, free_pages;
156         unsigned long swap_avail, swap_free;
157
158         int pagesize = getpagesize();
159
160         if (GETSYSCTL("vm.stats.vm.v_page_count", total_pages)) {
161                 fprintf(stderr, "Cannot read sysctl \"vm.stats.vm.v_page_count\"\n");
162         }
163
164         if (GETSYSCTL("vm.stats.vm.v_free_count", free_pages)) {
165                 fprintf(stderr, "Cannot read sysctl \"vm.stats.vm.v_free_count\"\n");
166         }
167
168         if (GETSYSCTL("vm.stats.vm.v_inactive_count", inactive_pages)) {
169                 fprintf(stderr, "Cannot read sysctl \"vm.stats.vm.v_inactive_count\"\n");
170         }
171
172         info.memmax = total_pages * (pagesize >> 10);
173         info.mem = (total_pages - free_pages - inactive_pages) * (pagesize >> 10);
174         info.memeasyfree = info.memfree = info.memmax - info.mem;
175
176         if ((swapmode(&swap_avail, &swap_free)) >= 0) {
177                 info.swapmax = swap_avail;
178                 info.swap = (swap_avail - swap_free);
179                 info.swapfree = swap_free;
180         } else {
181                 info.swapmax = 0;
182                 info.swap = 0;
183                 info.swapfree = 0;
184         }
185 }
186
187 void update_net_stats(void)
188 {
189         struct net_stat *ns;
190         double delta;
191         long long r, t, last_recv, last_trans;
192         struct ifaddrs *ifap, *ifa;
193         struct if_data *ifd;
194
195         /* get delta */
196         delta = current_update_time - last_update_time;
197         if (delta <= 0.0001) {
198                 return;
199         }
200
201         if (getifaddrs(&ifap) < 0) {
202                 return;
203         }
204
205         for (ifa = ifap; ifa; ifa = ifa->ifa_next) {
206                 ns = get_net_stat((const char *) ifa->ifa_name, NULL, NULL);
207
208                 if (ifa->ifa_flags & IFF_UP) {
209                         struct ifaddrs *iftmp;
210
211                         ns->up = 1;
212                         last_recv = ns->recv;
213                         last_trans = ns->trans;
214
215                         if (ifa->ifa_addr->sa_family != AF_LINK) {
216                                 continue;
217                         }
218
219                         for (iftmp = ifa->ifa_next;
220                                         iftmp != NULL && strcmp(ifa->ifa_name, iftmp->ifa_name) == 0;
221                                         iftmp = iftmp->ifa_next) {
222                                 if (iftmp->ifa_addr->sa_family == AF_INET) {
223                                         memcpy(&(ns->addr), iftmp->ifa_addr,
224                                                 iftmp->ifa_addr->sa_len);
225                                 }
226                         }
227
228                         ifd = (struct if_data *) ifa->ifa_data;
229                         r = ifd->ifi_ibytes;
230                         t = ifd->ifi_obytes;
231
232                         if (r < ns->last_read_recv) {
233                                 ns->recv += ((long long) 4294967295U - ns->last_read_recv) + r;
234                         } else {
235                                 ns->recv += (r - ns->last_read_recv);
236                         }
237
238                         ns->last_read_recv = r;
239
240                         if (t < ns->last_read_trans) {
241                                 ns->trans += ((long long) 4294967295U -
242                                         ns->last_read_trans) + t;
243                         } else {
244                                 ns->trans += (t - ns->last_read_trans);
245                         }
246
247                         ns->last_read_trans = t;
248
249                         /* calculate speeds */
250                         ns->recv_speed = (ns->recv - last_recv) / delta;
251                         ns->trans_speed = (ns->trans - last_trans) / delta;
252                 } else {
253                         ns->up = 0;
254                 }
255         }
256
257         freeifaddrs(ifap);
258 }
259
260 void update_total_processes(void)
261 {
262         int n_processes;
263
264         kvm_getprocs(kd, KERN_PROC_ALL, 0, &n_processes);
265
266         info.procs = n_processes;
267 }
268
269 void update_running_processes(void)
270 {
271         struct kinfo_proc *p;
272         int n_processes;
273         int i, cnt = 0;
274
275         p = kvm_getprocs(kd, KERN_PROC_ALL, 0, &n_processes);
276         for (i = 0; i < n_processes; i++) {
277 #if (__FreeBSD__ < 5) && (__FreeBSD_kernel__ < 5)
278                 if (p[i].kp_proc.p_stat == SRUN) {
279 #else
280                 if (p[i].ki_stat == SRUN) {
281 #endif
282                         cnt++;
283                 }
284         }
285
286         info.run_procs = cnt;
287 }
288
289 struct cpu_load_struct {
290         unsigned long load[5];
291 };
292
293 struct cpu_load_struct fresh = { {0, 0, 0, 0, 0} };
294 long cpu_used, oldtotal, oldused;
295
296 void get_cpu_count(void)
297 {
298         /* int cpu_count = 0; */
299
300         /* XXX: FreeBSD doesn't allow to get per CPU load stats on SMP machines.
301          * It's possible to get a CPU count, but as we fulfill only
302          * info.cpu_usage[0], it's better to report there's only one CPU.
303          * It should fix some bugs (e.g. cpugraph) */
304 #if 0
305         if (GETSYSCTL("hw.ncpu", cpu_count) == 0) {
306                 info.cpu_count = cpu_count;
307         }
308 #endif
309         info.cpu_count = 1;
310
311         info.cpu_usage = malloc(info.cpu_count * sizeof(float));
312         if (info.cpu_usage == NULL) {
313                 CRIT_ERR(NULL, NULL, "malloc");
314         }
315 }
316
317 /* XXX: SMP support */
318 void update_cpu_usage(void)
319 {
320         long used, total;
321         long cp_time[CPUSTATES];
322         size_t cp_len = sizeof(cp_time);
323
324         /* add check for !info.cpu_usage since that mem is freed on a SIGUSR1 */
325         if ((cpu_setup == 0) || (!info.cpu_usage)) {
326                 get_cpu_count();
327                 cpu_setup = 1;
328         }
329
330         if (sysctlbyname("kern.cp_time", &cp_time, &cp_len, NULL, 0) < 0) {
331                 fprintf(stderr, "Cannot get kern.cp_time");
332         }
333
334         fresh.load[0] = cp_time[CP_USER];
335         fresh.load[1] = cp_time[CP_NICE];
336         fresh.load[2] = cp_time[CP_SYS];
337         fresh.load[3] = cp_time[CP_IDLE];
338         fresh.load[4] = cp_time[CP_IDLE];
339
340         used = fresh.load[0] + fresh.load[1] + fresh.load[2];
341         total = fresh.load[0] + fresh.load[1] + fresh.load[2] + fresh.load[3];
342
343         if ((total - oldtotal) != 0) {
344                 info.cpu_usage[0] = ((double) (used - oldused)) /
345                         (double) (total - oldtotal);
346         } else {
347                 info.cpu_usage[0] = 0;
348         }
349
350         oldused = used;
351         oldtotal = total;
352 }
353
354 void update_load_average(void)
355 {
356         double v[3];
357
358         getloadavg(v, 3);
359
360         info.loadavg[0] = (double) v[0];
361         info.loadavg[1] = (double) v[1];
362         info.loadavg[2] = (double) v[2];
363 }
364
365 double get_acpi_temperature(int fd)
366 {
367         int temp;
368         (void)fd;
369
370         if (GETSYSCTL("hw.acpi.thermal.tz0.temperature", temp)) {
371                 fprintf(stderr,
372                         "Cannot read sysctl \"hw.acpi.thermal.tz0.temperature\"\n");
373                 return 0.0;
374         }
375
376         return KELVTOC(temp);
377 }
378
379 static void get_battery_stats(int *battime, int *batcapacity, int *batstate, int *ac) {
380         if (battime && GETSYSCTL("hw.acpi.battery.time", *battime)) {
381                 fprintf(stderr, "Cannot read sysctl \"hw.acpi.battery.time\"\n");
382         }
383         if (batcapacity && GETSYSCTL("hw.acpi.battery.life", *batcapacity)) {
384                 fprintf(stderr, "Cannot read sysctl \"hw.acpi.battery.life\"\n");
385         }
386         if (batstate && GETSYSCTL("hw.acpi.battery.state", *batstate)) {
387                 fprintf(stderr, "Cannot read sysctl \"hw.acpi.battery.state\"\n");
388         }
389         if (ac && GETSYSCTL("hw.acpi.acline", *ac)) {
390                 fprintf(stderr, "Cannot read sysctl \"hw.acpi.acline\"\n");
391         }
392 }
393
394 void get_battery_stuff(char *buf, unsigned int n, const char *bat, int item)
395 {
396         int battime, batcapacity, batstate, ac;
397         (void)bat;
398
399         get_battery_stats(&battime, &batcapacity, &batstate, &ac);
400
401         if (batstate != 1 && batstate != 2 && batstate != 0 && batstate != 7)
402                 fprintf(stderr, "Unknown battery state %d!\n", batstate);
403         else if (batstate != 1 && ac == 0)
404                 fprintf(stderr, "Battery charging while not on AC!\n");
405         else if (batstate == 1 && ac == 1)
406                 fprintf(stderr, "Battery discharing while on AC!\n");
407
408         switch (item) {
409                 case BATTERY_TIME:
410                         if (batstate == 1 && battime != -1)
411                                 snprintf(buf, n, "%d:%2.2d", battime / 60, battime % 60);
412                         break;
413                 case BATTERY_STATUS:
414                         if (batstate == 1) // Discharging
415                                 snprintf(buf, n, "remaining %d%%", batcapacity);
416                         else
417                                 snprintf(buf, n, batstate == 2 ? "charging (%d%%)" :
418                                                 (batstate == 7 ? "absent/on AC" : "charged (%d%%)"),
419                                                 batcapacity);
420                         break;
421                 default:
422                         fprintf(stderr, "Unknown requested battery stat %d\n", item);
423         }
424 }
425
426 static int check_bat(const char *bat)
427 {
428         int batnum, numbatts;
429         char *endptr;
430         if (GETSYSCTL("hw.acpi.battery.units", numbatts)) {
431                 fprintf(stderr, "Cannot read sysctl \"hw.acpi.battery.units\"\n");
432                 return -1;
433         }
434         if (numbatts <= 0) {
435                 fprintf(stderr, "No battery unit detected\n");
436                 return -1;
437         }
438         if (!bat || (batnum = strtol(bat, &endptr, 10)) < 0 ||
439                         bat == endptr || batnum > numbatts) {
440                 fprintf(stderr, "Wrong battery unit %s requested\n", bat ? bat : "");
441                 return -1;
442         }
443         return batnum;
444 }
445
446 int get_battery_perct(const char *bat)
447 {
448         union acpi_battery_ioctl_arg battio;
449         int batnum, acpifd;
450         int designcap, lastfulcap, batperct;
451
452         if ((battio.unit = batnum = check_bat(bat)) < 0)
453                 return 0;
454         if ((acpifd = open("/dev/acpi", O_RDONLY)) < 0) {
455                 fprintf(stderr, "Can't open ACPI device\n");
456                 return 0;
457         }
458         if (ioctl(acpifd, ACPIIO_BATT_GET_BIF, &battio) == -1) {
459                 fprintf(stderr, "Unable to get info for battery unit %d\n", batnum);
460                 return 0;
461         }
462         close(acpifd);
463         designcap = battio.bif.dcap;
464         lastfulcap = battio.bif.lfcap;
465         batperct = (designcap > 0 && lastfulcap > 0) ?
466                 (int) (((float) lastfulcap / designcap) * 100) : 0;
467         return batperct > 100 ? 100 : batperct;
468 }
469
470 int get_battery_perct_bar(const char *bar)
471 {
472         int batperct = get_battery_perct(bar);
473         return (int)(batperct * 2.56 - 1);
474 }
475
476 int open_acpi_temperature(const char *name)
477 {
478         (void)name;
479         /* Not applicable for FreeBSD. */
480         return 0;
481 }
482
483 void get_acpi_ac_adapter(char *p_client_buffer, size_t client_buffer_size)
484 {
485         int state;
486
487         if (!p_client_buffer || client_buffer_size <= 0) {
488                 return;
489         }
490
491         if (GETSYSCTL("hw.acpi.acline", state)) {
492                 fprintf(stderr, "Cannot read sysctl \"hw.acpi.acline\"\n");
493                 return;
494         }
495
496         if (state) {
497                 strncpy(p_client_buffer, "Running on AC Power", client_buffer_size);
498         } else {
499                 strncpy(p_client_buffer, "Running on battery", client_buffer_size);
500         }
501 }
502
503 void get_acpi_fan(char *p_client_buffer, size_t client_buffer_size)
504 {
505         /* not implemented */
506         if (p_client_buffer && client_buffer_size > 0) {
507                 memset(p_client_buffer, 0, client_buffer_size);
508         }
509 }
510
511 void get_adt746x_cpu(char *p_client_buffer, size_t client_buffer_size)
512 {
513         /* not implemented */
514         if (p_client_buffer && client_buffer_size > 0) {
515                 memset(p_client_buffer, 0, client_buffer_size);
516         }
517 }
518
519 void get_adt746x_fan(char *p_client_buffer, size_t client_buffer_size)
520 {
521         /* not implemented */
522         if (p_client_buffer && client_buffer_size > 0) {
523                 memset(p_client_buffer, 0, client_buffer_size);
524         }
525 }
526
527 /* rdtsc() and get_freq_dynamic() copied from linux.c */
528
529 #if  defined(__i386) || defined(__x86_64)
530 __attribute__((gnu_inline)) inline unsigned long long int rdtsc(void)
531 {
532         unsigned long long int x;
533
534         __asm__ volatile(".byte 0x0f, 0x31":"=A" (x));
535         return x;
536 }
537 #endif
538
539 /* return system frequency in MHz (use divisor=1) or GHz (use divisor=1000) */
540 void get_freq_dynamic(char *p_client_buffer, size_t client_buffer_size,
541                 const char *p_format, int divisor)
542 {
543 #if  defined(__i386) || defined(__x86_64)
544         struct timezone tz;
545         struct timeval tvstart, tvstop;
546         unsigned long long cycles[2];   /* gotta be 64 bit */
547         unsigned int microseconds;      /* total time taken */
548
549         memset(&tz, 0, sizeof(tz));
550
551         /* get this function in cached memory */
552         gettimeofday(&tvstart, &tz);
553         cycles[0] = rdtsc();
554         gettimeofday(&tvstart, &tz);
555
556         /* we don't trust that this is any specific length of time */
557         usleep(100);
558         cycles[1] = rdtsc();
559         gettimeofday(&tvstop, &tz);
560         microseconds = ((tvstop.tv_sec - tvstart.tv_sec) * 1000000) +
561                 (tvstop.tv_usec - tvstart.tv_usec);
562
563         snprintf(p_client_buffer, client_buffer_size, p_format,
564                 (float) ((cycles[1] - cycles[0]) / microseconds) / divisor);
565 #else
566         get_freq(p_client_buffer, client_buffer_size, p_format, divisor, 1);
567 #endif
568 }
569
570 /* void */
571 char get_freq(char *p_client_buffer, size_t client_buffer_size, const char *p_format,
572                 int divisor, unsigned int cpu)
573 {
574         int freq;
575         char *freq_sysctl;
576
577         freq_sysctl = (char *) calloc(16, sizeof(char));
578         if (freq_sysctl == NULL) {
579                 exit(-1);
580         }
581
582         snprintf(freq_sysctl, 16, "dev.cpu.%d.freq", (cpu - 1));
583
584         if (!p_client_buffer || client_buffer_size <= 0 || !p_format
585                         || divisor <= 0) {
586                 return 0;
587         }
588
589         if (GETSYSCTL(freq_sysctl, freq) == 0) {
590                 snprintf(p_client_buffer, client_buffer_size, p_format,
591                         (float) freq / divisor);
592         } else {
593                 snprintf(p_client_buffer, client_buffer_size, p_format, 0.0f);
594         }
595
596         free(freq_sysctl);
597         return 1;
598 }
599
600 void update_top(void)
601 {
602         proc_find_top(info.cpu, info.memu);
603 }
604
605 #if 0
606 void update_wifi_stats(void)
607 {
608         struct ifreq ifr;               /* interface stats */
609         struct wi_req wireq;
610         struct net_stat *ns;
611         struct ifaddrs *ifap, *ifa;
612         struct ifmediareq ifmr;
613         int s;
614
615         /* Get iface table */
616         if (getifaddrs(&ifap) < 0) {
617                 return;
618         }
619
620         for (ifa = ifap; ifa; ifa = ifa->ifa_next) {
621                 ns = get_net_stat((const char *) ifa->ifa_name, NULL, NULL);
622
623                 s = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
624
625                 /* Get media type */
626                 bzero(&ifmr, sizeof(ifmr));
627                 strlcpy(ifmr.ifm_name, ifa->ifa_name, IFNAMSIZ);
628                 if (ioctl(s, SIOCGIFMEDIA, (caddr_t) &ifmr) < 0) {
629                         close(s);
630                         return;
631                 }
632
633                 /* We can monitor only wireless interfaces
634                  * which are not in hostap mode */
635                 if ((ifmr.ifm_active & IFM_IEEE80211)
636                                 && !(ifmr.ifm_active & IFM_IEEE80211_HOSTAP)) {
637                         /* Get wi status */
638                         bzero(&ifr, sizeof(ifr));
639                         strlcpy(ifr.ifr_name, ifa->ifa_name, IFNAMSIZ);
640                         wireq.wi_type = WI_RID_COMMS_QUALITY;
641                         wireq.wi_len = WI_MAX_DATALEN;
642                         ifr.ifr_data = (void *) &wireq;
643
644                         if (ioctl(s, SIOCGWAVELAN, (caddr_t) &ifr) < 0) {
645                                 perror("ioctl (getting wi status)");
646                                 exit(1);
647                         }
648
649                         /* wi_val[0] = quality
650                          * wi_val[1] = signal
651                          * wi_val[2] = noise */
652                         ns->linkstatus = (int) wireq.wi_val[1];
653                 }
654 cleanup:
655                 close(s);
656         }
657 }
658 #endif
659
660 void update_diskio(void)
661 {
662         int devs_count, num_selected, num_selections, dn;
663         struct device_selection *dev_select = NULL;
664         long select_generation;
665         static struct statinfo statinfo_cur;
666         char device_name[text_buffer_size];
667         struct diskio_stat *cur;
668         unsigned int reads, writes;
669         unsigned int total_reads = 0, total_writes = 0;
670
671
672         memset(&statinfo_cur, 0, sizeof(statinfo_cur));
673         statinfo_cur.dinfo = (struct devinfo *)calloc(1, sizeof(struct devinfo));
674         stats.current = stats.current_read = stats.current_write = 0;
675
676         if (devstat_getdevs(NULL, &statinfo_cur) < 0) {
677                 free(statinfo_cur.dinfo);
678                 return;
679         }
680
681         devs_count = statinfo_cur.dinfo->numdevs;
682         if (devstat_selectdevs(&dev_select, &num_selected, &num_selections,
683                         &select_generation, statinfo_cur.dinfo->generation,
684                         statinfo_cur.dinfo->devices, devs_count, NULL, 0, NULL, 0,
685                         DS_SELECT_ONLY, MAXSHOWDEVS, 1) >= 0) {
686                 for (dn = 0; dn < devs_count; dn++) {
687                         int di;
688                         struct devstat *dev;
689
690                         di = dev_select[dn].position;
691                         dev = &statinfo_cur.dinfo->devices[di];
692                         snprintf(device_name, text_buffer_size, "%s%d",
693                                         dev_select[dn].device_name, dev_select[dn].unit_number);
694
695                         total_reads += (reads = dev->bytes[DEVSTAT_READ] / 512);
696                         total_writes += (writes = dev->bytes[DEVSTAT_WRITE] / 512);
697                         for (cur = stats.next; cur; cur = cur->next) {
698                                 if (cur->dev && !strcmp(device_name, cur->dev)) {
699                                         update_diskio_values(cur, reads, writes);
700                                         break;
701                                 }
702                         }
703                 }
704                 update_diskio_values(&stats, total_reads, total_writes);
705
706                 free(dev_select);
707         }
708
709         free(statinfo_cur.dinfo);
710 }
711
712 /* While topless is obviously better, top is also not bad. */
713
714 int comparecpu(const void *a, const void *b)
715 {
716         if (((const struct process *)a)->amount > ((const struct process *)b)->amount) {
717                 return -1;
718         } else if (((const struct process *)a)->amount < ((const struct process *)b)->amount) {
719                 return 1;
720         } else {
721                 return 0;
722         }
723 }
724
725 int comparemem(const void *a, const void *b)
726 {
727         if (((const struct process *)a)->totalmem > ((const struct process *)b)->totalmem) {
728                 return -1;
729         } else if (((const struct process *)a)->totalmem < ((const struct process *)b)->totalmem) {
730                 return 1;
731         } else {
732                 return 0;
733         }
734 }
735
736 __attribute__((gnu_inline)) inline void
737 proc_find_top(struct process **cpu, struct process **mem)
738 {
739         struct kinfo_proc *p;
740         int n_processes;
741         int i, j = 0;
742         struct process *processes;
743
744         int total_pages;
745
746         /* we get total pages count again to be sure it is up to date */
747         if (GETSYSCTL("vm.stats.vm.v_page_count", total_pages) != 0) {
748                 CRIT_ERR(NULL, NULL, "Cannot read sysctl \"vm.stats.vm.v_page_count\"");
749         }
750
751         p = kvm_getprocs(kd, KERN_PROC_PROC, 0, &n_processes);
752         processes = malloc(n_processes * sizeof(struct process));
753
754         for (i = 0; i < n_processes; i++) {
755                 if (!((p[i].ki_flag & P_SYSTEM)) && p[i].ki_comm != NULL) {
756                         processes[j].pid = p[i].ki_pid;
757                         processes[j].name = strndup(p[i].ki_comm, text_buffer_size);
758                         processes[j].amount = 100.0 * p[i].ki_pctcpu / FSCALE;
759                         processes[j].totalmem = (float) (p[i].ki_rssize /
760                                 (float) total_pages) * 100.0;
761                         processes[j].vsize = p[i].ki_size;
762                         processes[j].rss = (p[i].ki_rssize * getpagesize());
763                         j++;
764                 }
765         }
766
767         qsort(processes, j - 1, sizeof(struct process), comparemem);
768         for (i = 0; i < 10 && i < n_processes; i++) {
769                 struct process *tmp, *ttmp;
770
771                 tmp = malloc(sizeof(struct process));
772                 tmp->pid = processes[i].pid;
773                 tmp->amount = processes[i].amount;
774                 tmp->totalmem = processes[i].totalmem;
775                 tmp->name = strndup(processes[i].name, text_buffer_size);
776                 tmp->rss = processes[i].rss;
777                 tmp->vsize = processes[i].vsize;
778
779                 ttmp = mem[i];
780                 mem[i] = tmp;
781                 if (ttmp != NULL) {
782                         free(ttmp->name);
783                         free(ttmp);
784                 }
785         }
786
787         qsort(processes, j - 1, sizeof(struct process), comparecpu);
788         for (i = 0; i < 10 && i < n_processes; i++) {
789                 struct process *tmp, *ttmp;
790
791                 tmp = malloc(sizeof(struct process));
792                 tmp->pid = processes[i].pid;
793                 tmp->amount = processes[i].amount;
794                 tmp->totalmem = processes[i].totalmem;
795                 tmp->name = strndup(processes[i].name, text_buffer_size);
796                 tmp->rss = processes[i].rss;
797                 tmp->vsize = processes[i].vsize;
798
799                 ttmp = cpu[i];
800                 cpu[i] = tmp;
801                 if (ttmp != NULL) {
802                         free(ttmp->name);
803                         free(ttmp);
804                 }
805         }
806
807 #if defined(FREEBSD_DEBUG)
808         printf("=====\nmem\n");
809         for (i = 0; i < 10; i++) {
810                 printf("%d: %s(%d) %.2f %ld %ld\n", i, mem[i]->name,
811                                 mem[i]->pid, mem[i]->totalmem, mem[i]->vsize, mem[i]->rss);
812         }
813 #endif
814
815         for (i = 0; i < j; i++) {
816                 free(processes[i].name);
817         }
818         free(processes);
819 }
820
821 #if     defined(i386) || defined(__i386__)
822 #define APMDEV          "/dev/apm"
823 #define APM_UNKNOWN     255
824
825 int apm_getinfo(int fd, apm_info_t aip)
826 {
827         if (ioctl(fd, APMIO_GETINFO, aip) == -1) {
828                 return -1;
829         }
830
831         return 0;
832 }
833
834 char *get_apm_adapter(void)
835 {
836         int fd;
837         struct apm_info a_info;
838         char *out;
839
840         out = (char *) calloc(16, sizeof(char));
841
842         fd = open(APMDEV, O_RDONLY);
843         if (fd < 0) {
844                 strncpy(out, "ERR", 16);
845                 return out;
846         }
847
848         if (apm_getinfo(fd, &a_info) != 0) {
849                 close(fd);
850                 strncpy(out, "ERR", 16);
851                 return out;
852         }
853         close(fd);
854
855         switch (a_info.ai_acline) {
856                 case 0:
857                         strncpy(out, "off-line", 16);
858                         return out;
859                         break;
860                 case 1:
861                         if (a_info.ai_batt_stat == 3) {
862                                 strncpy(out, "charging", 16);
863                                 return out;
864                         } else {
865                                 strncpy(out, "on-line", 16);
866                                 return out;
867                         }
868                         break;
869                 default:
870                         strncpy(out, "unknown", 16);
871                         return out;
872                         break;
873         }
874 }
875
876 char *get_apm_battery_life(void)
877 {
878         int fd;
879         u_int batt_life;
880         struct apm_info a_info;
881         char *out;
882
883         out = (char *) calloc(16, sizeof(char));
884
885         fd = open(APMDEV, O_RDONLY);
886         if (fd < 0) {
887                 strncpy(out, "ERR", 16);
888                 return out;
889         }
890
891         if (apm_getinfo(fd, &a_info) != 0) {
892                 close(fd);
893                 strncpy(out, "ERR", 16);
894                 return out;
895         }
896         close(fd);
897
898         batt_life = a_info.ai_batt_life;
899         if (batt_life == APM_UNKNOWN) {
900                 strncpy(out, "unknown", 16);
901         } else if (batt_life <= 100) {
902                 snprintf(out, 16, "%d%%", batt_life);
903                 return out;
904         } else {
905                 strncpy(out, "ERR", 16);
906         }
907
908         return out;
909 }
910
911 char *get_apm_battery_time(void)
912 {
913         int fd;
914         int batt_time;
915         int h, m, s;
916         struct apm_info a_info;
917         char *out;
918
919         out = (char *) calloc(16, sizeof(char));
920
921         fd = open(APMDEV, O_RDONLY);
922         if (fd < 0) {
923                 strncpy(out, "ERR", 16);
924                 return out;
925         }
926
927         if (apm_getinfo(fd, &a_info) != 0) {
928                 close(fd);
929                 strncpy(out, "ERR", 16);
930                 return out;
931         }
932         close(fd);
933
934         batt_time = a_info.ai_batt_time;
935
936         if (batt_time == -1) {
937                 strncpy(out, "unknown", 16);
938         } else {
939                 h = batt_time;
940                 s = h % 60;
941                 h /= 60;
942                 m = h % 60;
943                 h /= 60;
944                 snprintf(out, 16, "%2d:%02d:%02d", h, m, s);
945         }
946
947         return out;
948 }
949
950 #endif
951
952 void get_battery_short_status(char *buffer, unsigned int n, const char *bat)
953 {
954         get_battery_stuff(buffer, n, bat, BATTERY_STATUS);
955         if (0 == strncmp("charging", buffer, 8)) {
956                 buffer[0] = 'C';
957                 memmove(buffer + 1, buffer + 8, n - 8);
958         } else if (0 == strncmp("discharging", buffer, 11)) {
959                 buffer[0] = 'D';
960                 memmove(buffer + 1, buffer + 11, n - 11);
961         } else if (0 == strncmp("absent/on AC", buffer, 12)) {
962                 buffer[0] = 'A';
963                 memmove(buffer + 1, buffer + 12, n - 12);
964         }
965 }
966
967 void update_entropy(void)
968 {
969         /* Not applicable for FreeBSD as it uses the yarrow prng. */
970 }
971
972 /* empty stub so conky links */
973 void free_all_processes(void)
974 {
975 }