slstatus.c

   1 /* See LICENSE file for copyright and license details. */
   2
   3 #include <alsa/asoundlib.h>
   4 #include <err.h>
   5 #include <fcntl.h>
   6 #include <ifaddrs.h>
   7 #include <limits.h>
   8 #include <linux/wireless.h>
   9 #include <netdb.h>
  10 #include <pwd.h>
  11 #include <signal.h>
  12 #include <stdarg.h>
  13 #include <stdio.h>
  14 #include <stdlib.h>
  15 #include <string.h>
  16 #include <sys/ioctl.h>
  17 #include <sys/stat.h>
  18 #include <sys/statvfs.h>
  19 #include <sys/socket.h>
  20 #include <sys/sysinfo.h>
  21 #include <sys/types.h>
  22 #include <time.h>
  23 #include <unistd.h>
  24 #include <X11/Xlib.h>
  25
  26 #undef strlcat
  27 #undef strlcpy
  28
  29 #include "extern/arg.h"
  30 #include "extern/strlcat.h"
  31 #include "extern/strlcpy.h"
  32 #include "extern/concat.h"
  33
  34 struct arg {
  35         char *(*func)();
  36         const char *fmt;
  37         const char *args;
  38 };
  39
  40 static char *smprintf(const char *fmt, ...);
  41 static char *battery_perc(const char *bat);
  42 static char *battery_state(const char *bat);
  43 static char *cpu_perc(void);
  44 static char *datetime(const char *fmt);
  45 static char *disk_free(const char *mnt);
  46 static char *disk_perc(const char *mnt);
  47 static char *disk_total(const char *mnt);
  48 static char *disk_used(const char *mnt);
  49 static char *entropy(void);
  50 static char *gid(void);
  51 static char *hostname(void);
  52 static char *ip(const char *iface);
  53 static char *load_avg(void);
  54 static char *ram_free(void);
  55 static char *ram_perc(void);
  56 static char *ram_used(void);
  57 static char *ram_total(void);
  58 static char *run_command(const char *cmd);
  59 static char *temp(const char *file);
  60 static char *uid(void);
  61 static char *uptime(void);
  62 static char *username(void);
  63 static char *vol_perc(const char *card);
  64 static char *wifi_perc(const char *iface);
  65 static char *wifi_essid(const char *iface);
  66 static void set_status(const char *str);
  67 static void sighandler(const int signo);
  68 static void usage(void);
  69
  70 char *argv0;
  71 char concat[];
  72 static unsigned short int delay;
  73 static unsigned short int done;
  74 static unsigned short int dflag, oflag;
  75 static Display *dpy;
  76
  77 #include "config.h"
  78
  79 static char *
  80 smprintf(const char *fmt, ...)
  81 {
  82         va_list ap;
  83         char *ret;
  84         int len;
  85
  86         va_start(ap, fmt);
  87         len = vsnprintf(NULL, 0, fmt, ap);
  88         va_end(ap);
  89
  90         ret = malloc(++len);
  91         if (ret == NULL) {
  92                 err(1, "malloc");
  93         }
  94
  95         va_start(ap, fmt);
  96         vsnprintf(ret, len, fmt, ap);
  97         va_end(ap);
  98
  99         return ret;
 100 }
 101
 102 static char *
 103 battery_perc(const char *bat)
 104 {
 105         int perc;
 106         FILE *fp;
 107
 108         ccat(3, "/sys/class/power_supply/", bat, "/capacity");
 109         fp = fopen(concat, "r");
 110         if (fp == NULL) {
 111                 warn("Failed to open file %s", concat);
 112                 return smprintf(UNKNOWN_STR);
 113         }
 114         fscanf(fp, "%i", &perc);
 115         fclose(fp);
 116
 117         return smprintf("%d%%", perc);
 118 }
 119
 120 static char *
 121 battery_state(const char *bat)
 122 {
 123         char state[12];
 124         FILE *fp;
 125
 126         ccat(3, "/sys/class/power_supply/", bat, "/status");
 127         fp = fopen(concat, "r");
 128         if (fp == NULL) {
 129                 warn("Failed to open file %s", concat);
 130                 return smprintf(UNKNOWN_STR);
 131         }
 132         fscanf(fp, "%12s", state);
 133         fclose(fp);
 134
 135         if (strcmp(state, "Charging") == 0) {
 136                 return smprintf("+");
 137         } else if (strcmp(state, "Discharging") == 0) {
 138                 return smprintf("-");
 139         } else if (strcmp(state, "Full") == 0) {
 140                 return smprintf("=");
 141         } else {
 142                 return smprintf("?");
 143         }
 144 }
 145
 146 static char *
 147 cpu_perc(void)
 148 {
 149         int perc;
 150         long double a[4], b[4];
 151         FILE *fp;
 152
 153         fp = fopen("/proc/stat", "r");
 154         if (fp == NULL) {
 155                 warn("Failed to open file /proc/stat");
 156                 return smprintf(UNKNOWN_STR);
 157         }
 158         fscanf(fp, "%*s %Lf %Lf %Lf %Lf", &a[0], &a[1], &a[2], &a[3]);
 159         fclose(fp);
 160
 161         delay = (UPDATE_INTERVAL - (UPDATE_INTERVAL - 1));
 162         sleep(delay);
 163
 164         fp = fopen("/proc/stat", "r");
 165         if (fp == NULL) {
 166                 warn("Failed to open file /proc/stat");
 167                 return smprintf(UNKNOWN_STR);
 168         }
 169         fscanf(fp, "%*s %Lf %Lf %Lf %Lf", &b[0], &b[1], &b[2], &b[3]);
 170         fclose(fp);
 171
 172         perc = 100 * ((b[0]+b[1]+b[2]) - (a[0]+a[1]+a[2])) / ((b[0]+b[1]+b[2]+b[3]) - (a[0]+a[1]+a[2]+a[3]));
 173         return smprintf("%d%%", perc);
 174 }
 175
 176 static char *
 177 datetime(const char *fmt)
 178 {
 179         time_t t;
 180         char str[80];
 181
 182         t = time(NULL);
 183         if (strftime(str, sizeof(str), fmt, localtime(&t)) == 0) {
 184                 return smprintf(UNKNOWN_STR);
 185         }
 186
 187         return smprintf("%s", str);
 188 }
 189
 190 static char *
 191 disk_free(const char *mnt)
 192 {
 193         struct statvfs fs;
 194
 195         if (statvfs(mnt, &fs) < 0) {
 196                 warn("Failed to get filesystem info");
 197                 return smprintf(UNKNOWN_STR);
 198         }
 199
 200         return smprintf("%f", (float)fs.f_bsize * (float)fs.f_bfree / 1024 / 1024 / 1024);
 201 }
 202
 203 static char *
 204 disk_perc(const char *mnt)
 205 {
 206         int perc;
 207         struct statvfs fs;
 208
 209         if (statvfs(mnt, &fs) < 0) {
 210                 warn("Failed to get filesystem info");
 211                 return smprintf(UNKNOWN_STR);
 212         }
 213
 214         perc = 100 * (1.0f - ((float)fs.f_bfree / (float)fs.f_blocks));
 215
 216         return smprintf("%d%%", perc);
 217 }
 218
 219 static char *
 220 disk_total(const char *mnt)
 221 {
 222         struct statvfs fs;
 223
 224         if (statvfs(mnt, &fs) < 0) {
 225                 warn("Failed to get filesystem info");
 226                 return smprintf(UNKNOWN_STR);
 227         }
 228
 229         return smprintf("%f", (float)fs.f_bsize * (float)fs.f_blocks / 1024 / 1024 / 1024);
 230 }
 231
 232 static char *
 233 disk_used(const char *mnt)
 234 {
 235         struct statvfs fs;
 236
 237         if (statvfs(mnt, &fs) < 0) {
 238                 warn("Failed to get filesystem info");
 239                 return smprintf(UNKNOWN_STR);
 240         }
 241
 242         return smprintf("%f", (float)fs.f_bsize * ((float)fs.f_blocks - (float)fs.f_bfree) / 1024 / 1024 / 1024);
 243 }
 244
 245 static char *
 246 entropy(void)
 247 {
 248         int num;
 249         FILE *fp;
 250
 251         fp= fopen("/proc/sys/kernel/random/entropy_avail", "r");
 252         if (fp == NULL) {
 253                 warn("Failed to open file /proc/sys/kernel/random/entropy_avail");
 254                 return smprintf(UNKNOWN_STR);
 255         }
 256         fscanf(fp, "%d", &num);
 257         fclose(fp);
 258
 259         return smprintf("%d", num);
 260 }
 261
 262 static char *
 263 gid(void)
 264 {
 265         return smprintf("%d", getgid());
 266 }
 267
 268 static char *
 269 hostname(void)
 270 {
 271         char buf[HOST_NAME_MAX];
 272         FILE *fp;
 273
 274         fp = fopen("/proc/sys/kernel/hostname", "r");
 275         if (fp == NULL) {
 276                 warn("Failed to open file /proc/sys/kernel/hostname");
 277                 return smprintf(UNKNOWN_STR);
 278         }
 279         fgets(buf, sizeof(buf), fp);
 280         buf[strlen(buf)-1] = '\0';
 281         fclose(fp);
 282
 283         return smprintf("%s", buf);
 284 }
 285
 286 static char *
 287 ip(const char *iface)
 288 {
 289         struct ifaddrs *ifaddr, *ifa;
 290         int s;
 291         char host[NI_MAXHOST];
 292
 293         if (getifaddrs(&ifaddr) == -1) {
 294                 warn("Failed to get IP address for interface %s", iface);
 295                 return smprintf(UNKNOWN_STR);
 296         }
 297
 298         for (ifa = ifaddr; ifa != NULL; ifa = ifa->ifa_next) {
 299                 if (ifa->ifa_addr == NULL) {
 300                         continue;
 301                 }
 302                 s = getnameinfo(ifa->ifa_addr, sizeof(struct sockaddr_in), host, NI_MAXHOST, NULL, 0, NI_NUMERICHOST);
 303                 if ((strcmp(ifa->ifa_name, iface) == 0) && (ifa->ifa_addr->sa_family == AF_INET)) {
 304                         if (s != 0) {
 305                                 warnx("Failed to get IP address for interface %s", iface);
 306                                 return smprintf(UNKNOWN_STR);
 307                         }
 308                         return smprintf("%s", host);
 309                 }
 310         }
 311
 312         freeifaddrs(ifaddr);
 313
 314         return smprintf(UNKNOWN_STR);
 315 }
 316
 317 static char *
 318 load_avg(void)
 319 {
 320         double avgs[3];
 321
 322         if (getloadavg(avgs, 3) < 0) {
 323                 warnx("Failed to get the load avg");
 324                 return smprintf(UNKNOWN_STR);
 325         }
 326
 327         return smprintf("%.2f %.2f %.2f", avgs[0], avgs[1], avgs[2]);
 328 }
 329
 330 static char *
 331 ram_free(void)
 332 {
 333         long free;
 334         FILE *fp;
 335
 336         fp = fopen("/proc/meminfo", "r");
 337         if (fp == NULL) {
 338                 warn("Failed to open file /proc/meminfo");
 339                 return smprintf(UNKNOWN_STR);
 340         }
 341         fscanf(fp, "MemFree: %ld kB\n", &free);
 342         fclose(fp);
 343
 344         return smprintf("%f", (float)free / 1024 / 1024);
 345 }
 346
 347 static char *
 348 ram_perc(void)
 349 {
 350         long total, free, buffers, cached;
 351         FILE *fp;
 352
 353         fp = fopen("/proc/meminfo", "r");
 354         if (fp == NULL) {
 355                 warn("Failed to open file /proc/meminfo");
 356                 return smprintf(UNKNOWN_STR);
 357         }
 358         fscanf(fp, "MemTotal: %ld kB\n", &total);
 359         fscanf(fp, "MemFree: %ld kB\n", &free);
 360         fscanf(fp, "MemAvailable: %ld kB\nBuffers: %ld kB\n", &buffers, &buffers);
 361         fscanf(fp, "Cached: %ld kB\n", &cached);
 362         fclose(fp);
 363
 364         return smprintf("%d%%", 100 * ((total - free) - (buffers + cached)) / total);
 365 }
 366
 367 static char *
 368 ram_total(void)
 369 {
 370         long total;
 371         FILE *fp;
 372
 373         fp = fopen("/proc/meminfo", "r");
 374         if (fp == NULL) {
 375                 warn("Failed to open file /proc/meminfo");
 376                 return smprintf(UNKNOWN_STR);
 377         }
 378         fscanf(fp, "MemTotal: %ld kB\n", &total);
 379         fclose(fp);
 380
 381         return smprintf("%f", (float)total / 1024 / 1024);
 382 }
 383
 384 static char *
 385 ram_used(void)
 386 {
 387         long free, total, buffers, cached;
 388         FILE *fp;
 389
 390         fp = fopen("/proc/meminfo", "r");
 391         if (fp == NULL) {
 392                 warn("Failed to open file /proc/meminfo");
 393                 return smprintf(UNKNOWN_STR);
 394         }
 395         fscanf(fp, "MemTotal: %ld kB\n", &total);
 396         fscanf(fp, "MemFree: %ld kB\n", &free);
 397         fscanf(fp, "MemAvailable: %ld kB\nBuffers: %ld kB\n", &buffers, &buffers);
 398         fscanf(fp, "Cached: %ld kB\n", &cached);
 399         fclose(fp);
 400
 401         return smprintf("%f", (float)(total - free - buffers - cached) / 1024 / 1024);
 402 }
 403
 404 static char *
 405 run_command(const char *cmd)
 406 {
 407         FILE *fp;
 408         char buf[64] = "n/a";
 409
 410         fp = popen(cmd, "r");
 411         if (fp == NULL) {
 412                 warn("Failed to get command output for %s", cmd);
 413                 return smprintf(UNKNOWN_STR);
 414         }
 415         fgets(buf, sizeof(buf), fp);
 416         buf[sizeof(buf)-1] = '\0';
 417         pclose(fp);
 418
 419         return smprintf("%s", buf);
 420 }
 421
 422 static char *
 423 temp(const char *file)
 424 {
 425         int temp;
 426         FILE *fp;
 427
 428         fp = fopen(file, "r");
 429         if (fp == NULL) {
 430                 warn("Failed to open file %s", file);
 431                 return smprintf(UNKNOWN_STR);
 432         }
 433         fscanf(fp, "%d", &temp);
 434         fclose(fp);
 435
 436         return smprintf("%d°C", temp / 1000);
 437 }
 438
 439 static char *
 440 uptime(void)
 441 {
 442         struct sysinfo info;
 443         int h = 0;
 444         int m = 0;
 445
 446         sysinfo(&info);
 447         h = info.uptime / 3600;
 448         m = (info.uptime - h * 3600 ) / 60;
 449
 450         return smprintf("%dh %dm", h, m);
 451 }
 452
 453 static char *
 454 username(void)
 455 {
 456         uid_t uid = geteuid();
 457         struct passwd *pw = getpwuid(uid);
 458
 459         if (pw == NULL) {
 460                 warn("Failed to get username");
 461                 return smprintf(UNKNOWN_STR);
 462         }
 463
 464         return smprintf("%s", pw->pw_name);
 465 }
 466
 467 static char *
 468 uid(void)
 469 {
 470         return smprintf("%d", geteuid());
 471 }
 472
 473
 474 static char *
 475 vol_perc(const char *card)
 476 {
 477         long int vol, max, min;
 478         snd_mixer_t *handle;
 479         snd_mixer_elem_t *elem;
 480         snd_mixer_selem_id_t *s_elem;
 481
 482         snd_mixer_open(&handle, 0);
 483         snd_mixer_attach(handle, card);
 484         snd_mixer_selem_register(handle, NULL, NULL);
 485         snd_mixer_load(handle);
 486         snd_mixer_selem_id_malloc(&s_elem);
 487         snd_mixer_selem_id_set_name(s_elem, "Master");
 488         elem = snd_mixer_find_selem(handle, s_elem);
 489
 490         if (elem == NULL) {
 491                 snd_mixer_selem_id_free(s_elem);
 492                 snd_mixer_close(handle);
 493                 warn("Failed to get volume percentage for %s", card);
 494                 return smprintf(UNKNOWN_STR);
 495         }
 496
 497         snd_mixer_handle_events(handle);
 498         snd_mixer_selem_get_playback_volume_range(elem, &min, &max);
 499         snd_mixer_selem_get_playback_volume(elem, 0, &vol);
 500
 501         snd_mixer_selem_id_free(s_elem);
 502         snd_mixer_close(handle);
 503
 504         if (max == 0)
 505                 return smprintf("%d%%", 0);
 506         else
 507                 return smprintf("%d%%", ((uint_fast16_t)(vol * 100) / max));
 508 }
 509
 510 static char *
 511 wifi_perc(const char *iface)
 512 {
 513         int perc;
 514         char buf[255];
 515         char *datastart;
 516         char status[5];
 517         FILE *fp;
 518
 519         ccat(3, "/sys/class/net/", iface, "/operstate");
 520         fp = fopen(concat, "r");
 521         if (fp == NULL) {
 522                 warn("Failed to open file %s", concat);
 523                 return smprintf(UNKNOWN_STR);
 524         }
 525         fgets(status, 5, fp);
 526         fclose(fp);
 527         if(strcmp(status, "up\n") != 0) {
 528                 return smprintf(UNKNOWN_STR);
 529         }
 530
 531         fp = fopen("/proc/net/wireless", "r");
 532         if (fp == NULL) {
 533                 warn("Failed to open file /proc/net/wireless");
 534                 return smprintf(UNKNOWN_STR);
 535         }
 536         ccat(2, iface, ":");
 537         fgets(buf, sizeof(buf), fp);
 538         fgets(buf, sizeof(buf), fp);
 539         fgets(buf, sizeof(buf), fp);
 540         fclose(fp);
 541
 542         datastart = strstr(buf, concat);
 543         if (datastart != NULL) {
 544                 datastart = strstr(buf, ":");
 545                 sscanf(datastart + 1, " %*d   %d  %*d  %*d                %*d      %*d          %*d              %*d      %*d            %*d", &perc);
 546         }
 547
 548         return smprintf("%d%%", perc);
 549 }
 550
 551 static char *
 552 wifi_essid(const char *iface)
 553 {
 554         char id[IW_ESSID_MAX_SIZE+1];
 555         int sockfd = socket(AF_INET, SOCK_DGRAM, 0);
 556         struct iwreq wreq;
 557
 558         memset(&wreq, 0, sizeof(struct iwreq));
 559         wreq.u.essid.length = IW_ESSID_MAX_SIZE+1;
 560         sprintf(wreq.ifr_name, iface);
 561         if (sockfd == -1) {
 562                 warn("Failed to get ESSID for interface %s", iface);
 563                 return smprintf(UNKNOWN_STR);
 564         }
 565         wreq.u.essid.pointer = id;
 566         if (ioctl(sockfd,SIOCGIWESSID, &wreq) == -1) {
 567                 warn("Failed to get ESSID for interface %s", iface);
 568                 return smprintf(UNKNOWN_STR);
 569         }
 570
 571         close(sockfd);
 572
 573         if (strcmp((char *)wreq.u.essid.pointer, "") == 0)
 574                 return smprintf(UNKNOWN_STR);
 575         else
 576                 return smprintf("%s", (char *)wreq.u.essid.pointer);
 577 }
 578
 579 static void
 580 set_status(const char *str)
 581 {
 582         XStoreName(dpy, DefaultRootWindow(dpy), str);
 583         XSync(dpy, False);
 584 }
 585
 586 static void
 587 sighandler(const int signo)
 588 {
 589         if (signo == SIGTERM || signo == SIGINT) {
 590                 done = 1;
 591         }
 592 }
 593
 594 static void
 595 usage(void)
 596 {
 597         fprintf(stderr, "usage: %s [-dhov]\n", argv0);
 598         exit(1);
 599 }
 600
 601 int
 602 main(int argc, char *argv[])
 603 {
 604         unsigned short int i;
 605         char status_string[4096];
 606         char *res, *element;
 607         struct arg argument;
 608         struct sigaction act;
 609
 610         ARGBEGIN {
 611                 case 'd':
 612                         dflag = 1;
 613                         break;
 614                 case 'o':
 615                         oflag = 1;
 616                         break;
 617                 case 'v':
 618                         printf("slstatus %s (C) 2016 slstatus engineers\n", VERSION);
 619                         return 0;
 620                 default:
 621                         usage();
 622         } ARGEND
 623
 624         if (dflag && oflag) {
 625                 usage();
 626         }
 627         if (dflag) {
 628                 (void)daemon(1, 1);
 629         }
 630
 631         memset(&act, 0, sizeof(act));
 632         act.sa_handler = sighandler;
 633         sigaction(SIGINT,  &act, 0);
 634         sigaction(SIGTERM, &act, 0);
 635
 636         if (!oflag) {
 637                 dpy = XOpenDisplay(NULL);
 638         }
 639
 640         while (!done) {
 641                 status_string[0] = '\0';
 642
 643                 for (i = 0; i < sizeof(args) / sizeof(args[0]); ++i) {
 644                         argument = args[i];
 645                         if (argument.args == NULL) {
 646                                 res = argument.func();
 647                         } else {
 648                                 res = argument.func(argument.args);
 649                         }
 650                         element = smprintf(argument.fmt, res);
 651                         if (element == NULL) {
 652                                 element = smprintf(UNKNOWN_STR);
 653                                 warnx("Failed to format output");
 654                         }
 655                         strlcat(status_string, element, sizeof(status_string));
 656                         free(res);
 657                         free(element);
 658                 }
 659
 660                 if (!oflag) {
 661                         set_status(status_string);
 662                 } else {
 663                         printf("%s\n", status_string);
 664                 }
 665
 666                 /*
 667                  * subtract delay time spend in function
 668                  * calls from the actual global delay time
 669                  */
 670                 sleep(UPDATE_INTERVAL - delay);
 671                 delay = 0;
 672         }
 673
 674         if (!oflag) {
 675                 set_status(NULL);
 676                 XCloseDisplay(dpy);
 677         }
 678
 679         return 0;
 680 }