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