git.sur5r.net Git - i3/i3status/blob - wmiistatus.c

   1 /*
   2  * Generates a status line for use with wmii or other minimal window managers
   3  *
   4  *
   5  * Copyright (c) 2008 Michael Stapelberg and contributors
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without modification,
   9  * are permitted provided that the following conditions are met:
  10  *
  11  * * Redistributions of source code must retain the above copyright notice, this
  12  *   list of conditions and the following disclaimer.
  13  *
  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.
  17  *
  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.
  21  *
  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
  31  * DAMAGE.
  32  *
  33  */
  34 #include <sys/types.h>
  35 #include <sys/stat.h>
  36 #include <fcntl.h>
  37 #include <string.h>
  38 #include <stdio.h>
  39 #include <time.h>
  40 #include <stdbool.h>
  41 #include <stdarg.h>
  42 #include <unistd.h>
  43 #include <stdlib.h>
  44 #include <ctype.h>
  45 #include <net/if.h>
  46 #include <sys/ioctl.h>
  47 #include <sys/socket.h>
  48 #include <netinet/in.h>
  49 #include <arpa/inet.h>
  50 #include <glob.h>
  51 #include <dirent.h>
  52 #include <getopt.h>
  53 #include <linux/ethtool.h>
  54 #include <linux/sockios.h>
  55
  56
  57 #define _IS_WMIISTATUS_C
  58 #include "wmiistatus.h"
  59 #undef _IS_WMIISTATUS_C
  60 #include "config.h"
  61
  62 /*
  63  * This function just concats two strings in place, it should only be used
  64  * for concatting order to the name of a file or concatting color codes.
  65  * Otherwise, the buffer size would have to be increased.
  66  *
  67  */
  68 static char *concat(const char *str1, const char *str2) {
  69         static char concatbuf[32];
  70         (void)snprintf(concatbuf, sizeof(concatbuf), "%s%s", str1, str2);
  71         return concatbuf;
  72 }
  73
  74 /*
  75  * Cleans wmii's /rbar directory by deleting all regular files
  76  *
  77  */
  78 static void cleanup_rbar_dir() {
  79         struct dirent *ent;
  80         DIR *dir;
  81         char pathbuf[strlen(wmii_path)+256+1];
  82
  83         if ((dir = opendir(wmii_path)) == NULL)
  84                 exit(EXIT_FAILURE);
  85
  86         while ((ent = readdir(dir)) != NULL) {
  87                 if (ent->d_type == DT_REG) {
  88                         (void)snprintf(pathbuf, sizeof(pathbuf), "%s%s", wmii_path, ent->d_name);
  89                         if (unlink(pathbuf) == -1)
  90                                 exit(EXIT_FAILURE);
  91                 }
  92         }
  93
  94         (void)closedir(dir);
  95 }
  96
  97 /*
  98  * Creates the specified file in wmii's /rbar directory with
  99  * correct modes and initializes colors if colormode is enabled
 100  * '
 101  */
 102 static void create_file(const char *name) {
 103         char pathbuf[strlen(wmii_path)+256+1];
 104         int fd;
 105
 106         (void)snprintf(pathbuf, sizeof(pathbuf), "%s%s", wmii_path, name);
 107         if ((fd = open(pathbuf, O_CREAT | O_WRONLY | O_TRUNC, S_IRUSR | S_IWUSR)) < 0)
 108                 exit(EXIT_FAILURE);
 109         if (use_colors) {
 110                 char *tmp = concat("#888888 ", wmii_normcolors);
 111                 if (write(fd, tmp, strlen(tmp)) != (ssize_t)strlen(tmp))
 112                         exit(EXIT_FAILURE);
 113         }
 114         (void)close(fd);
 115 }
 116
 117 /*
 118  * Writes the given message in the corresponding file in wmii's /rbar directory
 119  *
 120  */
 121 static void write_to_statusbar(const char *name, const char *message) {
 122         char pathbuf[strlen(wmii_path)+256+1];
 123         int fd;
 124
 125         (void)snprintf(pathbuf, sizeof(pathbuf), "%s%s", wmii_path, name);
 126         if ((fd = open(pathbuf, O_RDWR)) == -1)
 127                 exit(EXIT_FAILURE);
 128         if (write(fd, message, strlen(message)) != (ssize_t)strlen(message))
 129                 exit(EXIT_FAILURE);
 130         (void)close(fd);
 131 }
 132
 133 /*
 134  * Writes an errormessage to statusbar
 135  *
 136  */
 137 static void write_error_to_statusbar(const char *message) {
 138         cleanup_rbar_dir();
 139         create_file("error");
 140         write_to_statusbar("error", message);
 141 }
 142
 143 /*
 144  * Write errormessage to statusbar and exit
 145  *
 146  */
 147 void die(const char *fmt, ...) {
 148         char buffer[512];
 149         va_list ap;
 150         va_start(ap, fmt);
 151         (void)vsnprintf(buffer, sizeof(buffer), fmt, ap);
 152         va_end(ap);
 153
 154         write_error_to_statusbar(buffer);
 155         exit(EXIT_FAILURE);
 156 }
 157
 158 static char *skip_character(char *input, char character, int amount) {
 159         char *walk;
 160         size_t len = strlen(input);
 161         int blanks = 0;
 162
 163         for (walk = input; ((size_t)(walk - input) < len) && (blanks < amount); walk++)
 164                 if (*walk == character)
 165                         blanks++;
 166
 167         return (walk == input ? walk : walk-1);
 168 }
 169
 170 /*
 171  * Get battery information from /sys. Note that it uses the design capacity to calculate the percentage,
 172  * not the full capacity.
 173  *
 174  */
 175 static char *get_battery_info() {
 176         char buf[1024];
 177         static char part[512];
 178         char *walk, *last;
 179         int fd;
 180         int full_design = -1,
 181             remaining = -1,
 182             present_rate = -1;
 183         charging_status_t status = CS_DISCHARGING;
 184
 185         if ((fd = open(battery_path, O_RDONLY)) == -1)
 186                 die("Could not open %s", battery_path);
 187
 188         memset(part, 0, sizeof(part));
 189         (void)read(fd, buf, sizeof(buf));
 190         for (walk = buf, last = buf; (walk-buf) < 1024; walk++)
 191                 if (*walk == '=') {
 192                         if (BEGINS_WITH(last, "POWER_SUPPLY_ENERGY_FULL_DESIGN"))
 193                                 full_design = atoi(walk+1);
 194                         else if (BEGINS_WITH(last, "POWER_SUPPLY_ENERGY_NOW"))
 195                                 remaining = atoi(walk+1);
 196                         else if (BEGINS_WITH(last, "POWER_SUPPLY_CURRENT_NOW"))
 197                                 present_rate = atoi(walk+1);
 198                         else if (BEGINS_WITH(last, "POWER_SUPPLY_STATUS=Charging"))
 199                                 status = CS_CHARGING;
 200                         else if (BEGINS_WITH(last, "POWER_SUPPLY_STATUS=Full"))
 201                                 status = CS_FULL;
 202                 } else if (*walk == '\n')
 203                         last = walk+1;
 204         (void)close(fd);
 205
 206         if ((full_design != -1) && (remaining != -1) && (present_rate != -1)) {
 207                 float remaining_time, perc;
 208                 int seconds, hours, minutes;
 209                 if (status == CS_CHARGING)
 210                         remaining_time = ((float)full_design - (float)remaining) / (float)present_rate;
 211                 else if (status == CS_DISCHARGING)
 212                         remaining_time = ((float)remaining / (float)present_rate);
 213                 else {
 214                         (void)snprintf(part, sizeof(part), "FULL");
 215                         return part;
 216                 }
 217                 perc = ((float)remaining / (float)full_design);
 218
 219                 seconds = (int)(remaining_time * 3600.0);
 220                 hours = seconds / 3600;
 221                 seconds -= (hours * 3600);
 222                 minutes = seconds / 60;
 223                 seconds -= (minutes * 60);
 224
 225                 (void)snprintf(part, sizeof(part), "%s %.02f%% %02d:%02d:%02d",
 226                         (status == CS_CHARGING? "CHR" : "BAT"),
 227                         (perc * 100), hours, minutes, seconds);
 228         }
 229         return part;
 230 }
 231
 232 /*
 233  * Just parses /proc/net/wireless
 234  *
 235  */
 236 static char *get_wireless_info() {
 237         char buf[1024];
 238         static char part[512];
 239         char *interfaces;
 240         int fd;
 241         memset(buf, 0, sizeof(buf));
 242         memset(part, 0, sizeof(part));
 243
 244         if ((fd = open("/proc/net/wireless", O_RDONLY)) == -1)
 245                 die("Could not open /proc/net/wireless");
 246         (void)read(fd, buf, sizeof(buf));
 247         (void)close(fd);
 248
 249         interfaces = skip_character(buf, '\n', 2) + 1;
 250         while (interfaces < buf+strlen(buf)) {
 251                 while (isspace((int)*interfaces))
 252                         interfaces++;
 253                 if (strncmp(interfaces, wlan_interface, strlen(wlan_interface)) == 0) {
 254                         int quality;
 255                         /* Skip status field (0000) */
 256                         interfaces += strlen(wlan_interface) + 2;
 257                         interfaces = skip_character(interfaces, ' ', 1);
 258                         while (isspace((int)*interfaces))
 259                                 interfaces++;
 260                         quality = atoi(interfaces);
 261                         /* For some reason, I get 255 sometimes */
 262                         if ((quality == 255) || (quality == 0)) {
 263                         if (use_colors)
 264                                 (void)snprintf(part, sizeof(part), "%s%s", concat("#FF0000 ", wmii_normcolors), " W: down");
 265                         else (void)snprintf(part, sizeof(part), "W: down");
 266
 267                         } else {
 268                                 const char *ip_address;
 269                                 (void)snprintf(part, sizeof(part), "W: (%02d%%) ", quality);
 270                                 ip_address = get_ip_address(wlan_interface);
 271                                 strcpy(part+strlen(part), ip_address);
 272                         }
 273
 274                         return part;
 275                 }
 276                 interfaces = skip_character(interfaces, '\n', 1) + 1;
 277         }
 278
 279         return part;
 280 }
 281
 282 static const char *get_ip_address(const char *interface) {
 283         static char part[512];
 284         struct ifreq ifr;
 285         int fd;
 286         memset(part, 0, sizeof(part));
 287
 288         fd = socket(AF_INET, SOCK_DGRAM, 0);
 289
 290         strcpy(ifr.ifr_name, interface);
 291         if (ioctl(fd, SIOCGIFFLAGS, &ifr) < 0)
 292                 die("Could not get interface flags (SIOCGIFFLAGS)");
 293
 294         if (!(ifr.ifr_flags & IFF_UP) ||
 295             !(ifr.ifr_flags & IFF_RUNNING)) {
 296                 close(fd);
 297                 return NULL;
 298         }
 299
 300         strcpy(ifr.ifr_name, interface);
 301         ifr.ifr_addr.sa_family = AF_INET;
 302         if (ioctl(fd, SIOCGIFADDR, &ifr) == 0) {
 303                 struct sockaddr_in addr;
 304                 memcpy(&addr, &ifr.ifr_addr, sizeof(struct sockaddr_in));
 305                 (void)inet_ntop(AF_INET, &addr.sin_addr.s_addr, part, (socklen_t)sizeof(struct sockaddr_in));
 306                 if (strlen(part) == 0)
 307                         snprintf(part, sizeof(part), "no IP");
 308         }
 309
 310         (void)close(fd);
 311         return part;
 312 }
 313
 314 static char *get_eth_info() {
 315         static char part[512];
 316         const char *ip_address = get_ip_address(eth_interface);
 317         int ethspeed = 0;
 318
 319         if (get_ethspeed) {
 320                 struct ifreq ifr;
 321                 struct ethtool_cmd ecmd;
 322                 int fd, err;
 323
 324                 if ((fd = socket(AF_INET, SOCK_DGRAM, 0)) < 0)
 325                         write_error_to_statusbar("Could not open socket");
 326
 327                 ecmd.cmd = ETHTOOL_GSET;
 328                 (void)memset(&ifr, 0, sizeof(ifr));
 329                 ifr.ifr_data = (caddr_t)&ecmd;
 330                 (void)strcpy(ifr.ifr_name, eth_interface);
 331                 if ((err = ioctl(fd, SIOCETHTOOL, &ifr)) == 0)
 332                         ethspeed = ecmd.speed;
 333                 else write_error_to_statusbar("Could not get interface speed. Insufficient privileges?");
 334
 335                 (void)close(fd);
 336         }
 337
 338         if (ip_address == NULL)
 339                 (void)snprintf(part, sizeof(part), "E: down");
 340         else {
 341                 if (get_ethspeed)
 342                         (void)snprintf(part, sizeof(part), "E: %s (%d Mbit/s)", ip_address, ethspeed);
 343                 else (void)snprintf(part, sizeof(part), "E: %s", ip_address);
 344         }
 345
 346         return part;
 347 }
 348
 349 /*
 350  * Checks if the PID in path is still valid by checking if /proc/<pid> exists
 351  *
 352  */
 353 static bool process_runs(const char *path) {
 354         char pidbuf[512],
 355              procbuf[512],
 356              *walk;
 357         ssize_t n;
 358         static glob_t globbuf;
 359         struct stat statbuf;
 360         const char *real_path;
 361         int fd;
 362
 363         if (glob(path, GLOB_NOCHECK | GLOB_TILDE, NULL, &globbuf) < 0)
 364                 die("glob() failed");
 365         real_path = (globbuf.gl_pathc > 0 ? globbuf.gl_pathv[0] : path);
 366         fd = open(real_path, O_RDONLY);
 367         globfree(&globbuf);
 368         if (fd < 0)
 369                 return false;
 370         if ((n = read(fd, pidbuf, sizeof(pidbuf))) > 0)
 371                 pidbuf[n] = '\0';
 372         (void)close(fd);
 373         for (walk = pidbuf; *walk != '\0'; walk++)
 374                 if (!isdigit((int)(*walk))) {
 375                         *walk = '\0';
 376                         break;
 377                 }
 378         (void)snprintf(procbuf, sizeof(procbuf), "/proc/%s", pidbuf);
 379         return (stat(procbuf, &statbuf) >= 0);
 380 }
 381
 382 int main(int argc, char *argv[]) {
 383         char part[512],
 384              pathbuf[512],
 385              *end;
 386         unsigned int i;
 387         int load_avg;
 388
 389         char *configfile = PREFIX "/etc/wmiistatus.conf";
 390         int o, option_index = 0;
 391         struct option long_options[] = {
 392                 {"config", required_argument, 0, 'c'},
 393                 {0, 0, 0, 0}
 394         };
 395
 396         while ((o = getopt_long(argc, argv, "c:", long_options, &option_index)) != -1)
 397                 if ((char)o == 'c')
 398                         configfile = optarg;
 399
 400         load_configuration(configfile);
 401         cleanup_rbar_dir();
 402         if (wlan_interface)
 403                 create_file(concat(order[ORDER_WLAN],"wlan"));
 404         if (eth_interface)
 405                 create_file(concat(order[ORDER_ETH],"eth"));
 406         if (battery_path)
 407                 create_file(concat(order[ORDER_BATTERY],"battery"));
 408         create_file(concat(order[ORDER_LOAD],"load"));
 409         if (time_format)
 410                 create_file(concat(order[ORDER_TIME],"time"));
 411         for (i = 0; i < num_run_watches; i += 2) {
 412                 snprintf(pathbuf, sizeof(pathbuf), "%s%s", order[ORDER_RUN], run_watches[i]);
 413                 create_file(pathbuf);
 414         }
 415
 416         while (1) {
 417                 for (i = 0; i < num_run_watches; i += 2) {
 418                         bool running = process_runs(run_watches[i+1]);
 419                         if (use_colors)
 420                                 snprintf(part, sizeof(part), "%s %s: %s",
 421                                         (running ?
 422                                                 concat("#00FF00 ", wmii_normcolors) :
 423                                                 concat("#FF0000 ", wmii_normcolors)),
 424                                         run_watches[i],
 425                                         (running ? "yes" : "no"));
 426                         else snprintf(part, sizeof(part), "%s: %s", run_watches[i], (running ? "yes" : "no"));
 427                         snprintf(pathbuf, sizeof(pathbuf), "%s%s", order[ORDER_RUN], run_watches[i]);
 428                         write_to_statusbar(pathbuf, part);
 429                 }
 430
 431                 if (wlan_interface)
 432                         write_to_statusbar(concat(order[ORDER_WLAN], "wlan"), get_wireless_info());
 433                 if (eth_interface)
 434                         write_to_statusbar(concat(order[ORDER_ETH], "eth"), get_eth_info());
 435                 if (battery_path)
 436                         write_to_statusbar(concat(order[ORDER_BATTERY], "battery"), get_battery_info());
 437
 438                 /* Get load */
 439                 if ((load_avg = open("/proc/loadavg", O_RDONLY)) == -1)
 440                         die("Could not open /proc/loadavg");
 441                 (void)read(load_avg, part, sizeof(part));
 442                 (void)close(load_avg);
 443                 end = skip_character(part, ' ', 3);
 444                 *end = '\0';
 445                 write_to_statusbar(concat(order[ORDER_LOAD], "load"), part);
 446
 447                 if (time_format) {
 448                         /* Get date & time */
 449                         time_t current_time = time(NULL);
 450                         struct tm *current_tm = localtime(&current_time);
 451                         (void)strftime(part, sizeof(part), time_format, current_tm);
 452                         write_to_statusbar(concat(order[ORDER_TIME], "time"), part);
 453                 }
 454
 455                 sleep(interval);
 456         }
 457 }