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