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