2 * Generates a status line for use with wmii or other minimal window managers
5 * Copyright (c) 2008-2009 Michael Stapelberg and contributors
8 * Redistribution and use in source and binary forms, with or without modification,
9 * are permitted provided that the following conditions are met:
11 * * Redistributions of source code must retain the above copyright notice, this
12 * list of conditions and the following disclaimer.
14 * * Redistributions in binary form must reproduce the above copyright notice, this
15 * list of conditions and the following disclaimer in the documentation and/or other
16 * materials provided with the distribution.
18 * * Neither the name of Michael Stapelberg nor the names of contributors
19 * may be used to endorse or promote products derived from this software without
20 * specific prior written permission.
22 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY
23 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
25 * SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
27 * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
28 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
30 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH
34 #include <sys/types.h>
47 #include <sys/ioctl.h>
48 #include <sys/socket.h>
49 #include <netinet/in.h>
50 #include <arpa/inet.h>
58 #include <linux/ethtool.h>
59 #include <linux/sockios.h>
61 /* TODO: correctly check for *BSD */
62 #include <sys/param.h>
63 #include <sys/sysctl.h>
64 #include <sys/resource.h>
67 #include "wmiistatus.h"
69 #define BAR "^fg(#333333)^p(5;-2)^ro(2)^p()^fg()^p(5)"
73 SIMPLEQ_ENTRY(battery) batteries;
76 SIMPLEQ_HEAD(battery_head, battery) batteries;
78 /* socket file descriptor for general purposes */
79 static int general_socket;
81 static const char *wlan_interface;
82 static const char *eth_interface;
83 static char *wmii_path;
84 static const char *time_format;
85 static const char *battery_path;
86 static bool use_colors;
87 static bool get_ethspeed;
88 static const char *wmii_normcolors = "#222222 #333333";
89 static char order[MAX_ORDER][2];
90 static const char **run_watches;
91 static unsigned int num_run_watches;
92 static unsigned int interval = 1;
95 * This function just concats two strings in place, it should only be used
96 * for concatting order to the name of a file or concatting color codes.
97 * Otherwise, the buffer size would have to be increased.
100 static char *concat(const char *str1, const char *str2) {
101 static char concatbuf[32];
102 (void)snprintf(concatbuf, sizeof(concatbuf), "%s%s", str1, str2);
107 * Returns the correct color format for dzen (^fg(color)) or wmii (color <normcolors>)
110 static char *color(const char *colorstr) {
111 static char colorbuf[32];
113 (void)snprintf(colorbuf, sizeof(colorbuf), "^fg(%s)", colorstr);
115 (void)snprintf(colorbuf, sizeof(colorbuf), "%s %s ", colorstr, wmii_normcolors);
121 * Cleans wmii's /rbar directory by deleting all regular files
124 static void cleanup_rbar_dir() {
130 char pathbuf[strlen(wmii_path)+256+1];
132 if ((dir = opendir(wmii_path)) == NULL)
135 while ((ent = readdir(dir)) != NULL) {
136 if (ent->d_type == DT_REG) {
137 (void)snprintf(pathbuf, sizeof(pathbuf), "%s%s", wmii_path, ent->d_name);
138 if (unlink(pathbuf) == -1)
147 * Creates the specified file in wmii's /rbar directory with
148 * correct modes and initializes colors if colormode is enabled
151 static void create_file(const char *name) {
155 char pathbuf[strlen(wmii_path)+256+1];
157 int flags = O_CREAT | O_WRONLY;
160 (void)snprintf(pathbuf, sizeof(pathbuf), "%s%s", wmii_path, name);
162 /* Overwrite file's contents if it exists */
163 if (stat(pathbuf, &statbuf) >= 0)
166 if ((fd = open(pathbuf, flags, S_IRUSR | S_IWUSR)) < 0)
169 char *tmp = color("#888888");
170 if (write(fd, tmp, strlen(tmp)) != (ssize_t)strlen(tmp))
177 * Waits until wmii_path/rbar exists (= the filesystem gets mounted),
178 * cleans up all files and creates the needed files
181 static void setup(void) {
187 /* Wait until wmii_path/rbar exists */
188 for (; stat(wmii_path, &statbuf) < 0; sleep(interval));
193 create_file(concat(order[ORDER_WLAN],"wlan"));
195 create_file(concat(order[ORDER_ETH],"eth"));
197 create_file(concat(order[ORDER_BATTERY],"battery"));
198 create_file(concat(order[ORDER_LOAD],"load"));
200 create_file(concat(order[ORDER_TIME],"time"));
201 for (i = 0; i < num_run_watches; i += 2) {
202 snprintf(pathbuf, sizeof(pathbuf), "%s%s", order[ORDER_RUN], run_watches[i]);
203 create_file(pathbuf);
208 * Writes the given message in the corresponding file in wmii's /rbar directory
211 static void write_to_statusbar(const char *name, const char *message, bool final_entry) {
214 (void)printf("%s^p(6)\n", message);
218 (void)printf("%s" BAR, message);
222 char pathbuf[strlen(wmii_path)+256+1];
225 (void)snprintf(pathbuf, sizeof(pathbuf), "%s%s", wmii_path, name);
226 if ((fd = open(pathbuf, O_RDWR)) == -1) {
227 /* Try to re-setup stuff and just continue */
231 if (write(fd, message, strlen(message)) != (ssize_t)strlen(message))
237 * Writes an errormessage to statusbar
240 static void write_error_to_statusbar(const char *message) {
242 create_file("error");
243 write_to_statusbar("error", message, true);
247 * Write errormessage to statusbar and exit
250 void die(const char *fmt, ...) {
251 if (wmii_path != NULL) {
255 (void)vsnprintf(buffer, sizeof(buffer), fmt, ap);
258 write_error_to_statusbar(buffer);
264 * Skip the given character for exactly 'amount' times, returns
265 * a pointer to the first non-'character' character in 'input'.
268 static char *skip_character(char *input, char character, int amount) {
270 size_t len = strlen(input);
273 for (walk = input; ((size_t)(walk - input) < len) && (blanks < amount); walk++)
274 if (*walk == character)
277 return (walk == input ? walk : walk-1);
281 * Get battery information from /sys. Note that it uses the design capacity to
282 * calculate the percentage, not the last full capacity, so you can see how
283 * worn off your battery is.
286 static char *get_battery_info(const char *path) {
288 static char part[512];
291 int full_design = -1,
294 charging_status_t status = CS_DISCHARGING;
296 if ((fd = open(path, O_RDONLY)) == -1)
297 return "No battery found";
299 memset(part, 0, sizeof(part));
300 (void)read(fd, buf, sizeof(buf));
301 for (walk = buf, last = buf; (walk-buf) < 1024; walk++)
303 if (BEGINS_WITH(last, "POWER_SUPPLY_ENERGY_FULL_DESIGN") ||
304 BEGINS_WITH(last, "POWER_SUPPLY_CHARGE_FULL_DESIGN"))
305 full_design = atoi(walk+1);
306 else if (BEGINS_WITH(last, "POWER_SUPPLY_ENERGY_NOW") ||
307 BEGINS_WITH(last, "POWER_SUPPLY_CHARGE_NOW"))
308 remaining = atoi(walk+1);
309 else if (BEGINS_WITH(last, "POWER_SUPPLY_CURRENT_NOW"))
310 present_rate = atoi(walk+1);
311 else if (BEGINS_WITH(last, "POWER_SUPPLY_STATUS=Charging"))
312 status = CS_CHARGING;
313 else if (BEGINS_WITH(last, "POWER_SUPPLY_STATUS=Full"))
315 } else if (*walk == '\n')
319 if ((full_design == 1) || (remaining == -1))
322 if (present_rate > 0) {
323 float remaining_time;
324 int seconds, hours, minutes;
325 if (status == CS_CHARGING)
326 remaining_time = ((float)full_design - (float)remaining) / (float)present_rate;
327 else if (status == CS_DISCHARGING)
328 remaining_time = ((float)remaining / (float)present_rate);
329 else remaining_time = 0;
331 seconds = (int)(remaining_time * 3600.0);
332 hours = seconds / 3600;
333 seconds -= (hours * 3600);
334 minutes = seconds / 60;
335 seconds -= (minutes * 60);
337 (void)snprintf(part, sizeof(part), "%s %.02f%% %02d:%02d:%02d",
338 (status == CS_CHARGING ? "CHR" :
339 (status == CS_DISCHARGING ? "BAT" : "FULL")),
340 (((float)remaining / (float)full_design) * 100),
341 hours, minutes, seconds);
343 (void)snprintf(part, sizeof(part), "%s %.02f%%",
344 (status == CS_CHARGING ? "CHR" :
345 (status == CS_DISCHARGING ? "BAT" : "FULL")),
346 (((float)remaining / (float)full_design) * 100));
352 * Return the IP address for the given interface or "no IP" if the
353 * interface is up and running but hasn't got an IP address yet
356 static const char *get_ip_address(const char *interface) {
357 static char part[512];
359 struct sockaddr_in addr;
360 socklen_t len = sizeof(struct sockaddr_in);
361 memset(part, 0, sizeof(part));
363 (void)strcpy(ifr.ifr_name, interface);
364 ifr.ifr_addr.sa_family = AF_INET;
365 if (ioctl(general_socket, SIOCGIFADDR, &ifr) < 0)
368 memcpy(&addr, &ifr.ifr_addr, len);
369 (void)inet_ntop(AF_INET, &addr.sin_addr.s_addr, part, len);
370 if (strlen(part) == 0)
371 (void)snprintf(part, sizeof(part), "no IP");
377 * Just parses /proc/net/wireless looking for lines beginning with
378 * wlan_interface, extracting the quality of the link and adding the
379 * current IP address of wlan_interface.
382 static char *get_wireless_info() {
384 static char part[512];
387 memset(buf, 0, sizeof(buf));
388 memset(part, 0, sizeof(part));
390 if ((fd = open("/proc/net/wireless", O_RDONLY)) == -1)
391 die("Could not open /proc/net/wireless\n");
392 (void)read(fd, buf, sizeof(buf));
395 interfaces = skip_character(buf, '\n', 1) + 1;
396 while ((interfaces = skip_character(interfaces, '\n', 1)+1) < buf+strlen(buf)) {
397 while (isspace((int)*interfaces))
399 if (!BEGINS_WITH(interfaces, wlan_interface))
402 if (sscanf(interfaces, "%*[^:]: 0000 %d", &quality) != 1)
404 if ((quality == UCHAR_MAX) || (quality == 0)) {
406 (void)snprintf(part, sizeof(part), "%sW: down", color("#FF0000"));
407 else (void)snprintf(part, sizeof(part), "W: down");
408 } else (void)snprintf(part, sizeof(part), "%sW: (%03d%%) %s",
409 color("#00FF00"), quality, get_ip_address(wlan_interface));
417 * Combines ethernet IP addresses and speed (if requested) for displaying
420 static char *get_eth_info() {
421 static char part[512];
422 const char *ip_address = get_ip_address(eth_interface);
427 /* This code path requires root privileges */
429 struct ethtool_cmd ecmd;
431 ecmd.cmd = ETHTOOL_GSET;
432 (void)memset(&ifr, 0, sizeof(ifr));
433 ifr.ifr_data = (caddr_t)&ecmd;
434 (void)strcpy(ifr.ifr_name, eth_interface);
435 if (ioctl(general_socket, SIOCETHTOOL, &ifr) == 0)
436 ethspeed = (ecmd.speed == USHRT_MAX ? 0 : ecmd.speed);
437 else get_ethspeed = false;
441 if (ip_address == NULL)
442 (void)snprintf(part, sizeof(part), "E: down");
445 (void)snprintf(part, sizeof(part), "E: %s (%d Mbit/s)", ip_address, ethspeed);
446 else (void)snprintf(part, sizeof(part), "E: %s", ip_address);
453 * Checks if the PID in path is still valid by checking:
454 * (Linux) if /proc/<pid> exists
455 * (NetBSD) if sysctl returns process infos for this pid
458 static bool process_runs(const char *path) {
460 static glob_t globbuf;
462 memset(pidbuf, 0, sizeof(pidbuf));
464 if (glob(path, GLOB_NOCHECK | GLOB_TILDE, NULL, &globbuf) < 0)
465 die("glob() failed\n");
466 fd = open((globbuf.gl_pathc > 0 ? globbuf.gl_pathv[0] : path), O_RDONLY);
470 (void)read(fd, pidbuf, sizeof(pidbuf));
476 (void)snprintf(procbuf, sizeof(procbuf), "/proc/%ld", strtol(pidbuf, NULL, 10));
477 return (stat(procbuf, &statbuf) >= 0);
479 /* TODO: correctly check for NetBSD. Evaluate if this runs on OpenBSD/FreeBSD */
480 struct kinfo_proc info;
481 size_t length = sizeof(struct kinfo_proc);
482 int mib[4] = { CTL_KERN, KERN_PROC, KERN_PROC_PID, strtol(pidbuf, NULL, 10) };
483 if (sysctl(mib, 4, &info, &length, NULL, 0) < 0)
485 return (length != 0);
490 * Reads the configuration from the given file
493 static int load_configuration(const char *configfile) {
494 #define OPT(x) else if (strcasecmp(dest_name, x) == 0)
496 /* check if the file exists */
498 if (stat(configfile, &buf) < 0)
502 FILE *handle = fopen(configfile, "r");
504 die("Could not open configfile\n");
505 char dest_name[512], dest_value[512], whole_buffer[1026];
507 while (!feof(handle)) {
509 if ((ret = fgets(whole_buffer, 1024, handle)) == whole_buffer) {
510 /* sscanf implicitly strips whitespace */
511 if (sscanf(whole_buffer, "%s %[^\n]", dest_name, dest_value) < 1)
513 } else if (ret != NULL)
514 die("Could not read line in configuration file\n");
516 /* skip comments and empty lines */
517 if (dest_name[0] == '#' || strlen(dest_name) < 3)
521 wlan_interface = strdup(dest_value);
523 eth_interface = strdup(dest_value);
525 time_format = strdup(dest_value);
526 OPT("battery_path") {
527 struct battery *new = calloc(1, sizeof(struct battery));
529 die("Could not allocate memory\n");
530 new->path = strdup(dest_value);
531 SIMPLEQ_INSERT_TAIL(&batteries, new, batteries);
537 wmii_normcolors = strdup(dest_value);
539 interval = atoi(dest_value);
543 static glob_t globbuf;
545 if (glob(dest_value, GLOB_NOCHECK | GLOB_TILDE, NULL, &globbuf) < 0)
546 die("glob() failed\n");
547 wmii_path = strdup(globbuf.gl_pathc > 0 ? globbuf.gl_pathv[0] : dest_value);
550 if ((stat(wmii_path, &stbuf)) == -1) {
551 fprintf(stderr, "Warning: wmii_path contains an invalid path\n");
553 wmii_path = strdup(dest_value);
555 if (wmii_path[strlen(wmii_path)-1] != '/')
556 die("wmii_path is not terminated by /\n");
561 char *name = strdup(dest_value);
566 num_run_watches += 2;
567 run_watches = realloc(run_watches, sizeof(char*) * num_run_watches);
568 run_watches[num_run_watches-2] = name;
569 run_watches[num_run_watches-1] = path;
573 #define SET_ORDER(opt, idx) { if (strcasecmp(token, opt) == 0) sprintf(order[idx], "%d", c++); }
576 walk = token = dest_value;
577 while (*walk != '\0') {
578 while ((*walk != ',') && (*walk != '\0'))
581 SET_ORDER("run", ORDER_RUN);
582 SET_ORDER("wlan", ORDER_WLAN);
583 SET_ORDER("eth", ORDER_ETH);
584 SET_ORDER("battery", ORDER_BATTERY);
585 SET_ORDER("load", ORDER_LOAD);
586 SET_ORDER("time", ORDER_TIME);
588 while (isspace((int)(*token)))
595 die("Unknown configfile option: %s\n", dest_name);
601 if (wmii_path == NULL)
608 int main(int argc, char *argv[]) {
613 char *configfile = PREFIX "/etc/wmiistatus.conf";
614 int o, option_index = 0;
615 struct option long_options[] = {
616 {"config", required_argument, 0, 'c'},
617 {"help", no_argument, 0, 'h'},
621 SIMPLEQ_INIT(&batteries);
623 while ((o = getopt_long(argc, argv, "c:h", long_options, &option_index)) != -1)
626 else if ((char)o == 'h') {
627 printf("wmiistatus (c) 2008-2009 Michael Stapelberg\n"
628 "Syntax: %s [-c <configfile>]\n", argv[0]);
632 if (load_configuration(configfile) < 0)
637 if ((general_socket = socket(AF_INET, SOCK_DGRAM, 0)) == -1)
638 die("Could not create socket\n");
641 for (i = 0; i < num_run_watches; i += 2) {
642 bool running = process_runs(run_watches[i+1]);
644 snprintf(part, sizeof(part), "%s%s: %s",
645 (running ? color("#00FF00") : color("#FF0000")),
647 (running ? "yes" : "no"));
648 else snprintf(part, sizeof(part), "%s: %s", run_watches[i], (running ? "yes" : "no"));
649 snprintf(pathbuf, sizeof(pathbuf), "%s%s", order[ORDER_RUN], run_watches[i]);
650 write_to_statusbar(pathbuf, part, false);
654 write_to_statusbar(concat(order[ORDER_WLAN], "wlan"), get_wireless_info(), false);
656 write_to_statusbar(concat(order[ORDER_ETH], "eth"), get_eth_info(), false);
657 struct battery *current_battery;
658 SIMPLEQ_FOREACH(current_battery, &batteries, batteries) {
659 write_to_statusbar(concat(order[ORDER_BATTERY], "battery"), get_battery_info(current_battery->path), false);
665 if ((load_avg = open("/proc/loadavg", O_RDONLY)) == -1)
666 die("Could not open /proc/loadavg\n");
667 (void)read(load_avg, part, sizeof(part));
668 (void)close(load_avg);
669 *skip_character(part, ' ', 3) = '\0';
671 /* TODO: correctly check for NetBSD, check if it works the same on *BSD */
673 size_t length = sizeof(struct loadavg);
674 int mib[2] = { CTL_VM, VM_LOADAVG };
675 if (sysctl(mib, 2, &load, &length, NULL, 0) < 0)
676 die("Could not sysctl({ CTL_VM, VM_LOADAVG })\n");
677 double scale = load.fscale;
678 (void)snprintf(part, sizeof(part), "%.02f %.02f %.02f",
679 (double)load.ldavg[0] / scale,
680 (double)load.ldavg[1] / scale,
681 (double)load.ldavg[2] / scale);
683 write_to_statusbar(concat(order[ORDER_LOAD], "load"), part, !time_format);
686 /* Get date & time */
687 time_t current_time = time(NULL);
688 struct tm *current_tm = localtime(¤t_time);
689 (void)strftime(part, sizeof(part), time_format, current_tm);
690 write_to_statusbar(concat(order[ORDER_TIME], "time"), part, true);