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         /* FIXME: needs improvement */
 276         memset(&hostname[strlen(hostname)], '\0',
 277                 sizeof(hostname) - strlen(hostname));
 278         fclose(fp);
 279
 280         return smprintf("%s", hostname);
 281 }
 282
 283 static char *
 284 ip(const char *interface)
 285 {
 286         struct ifaddrs *ifaddr, *ifa;
 287         int s;
 288         char host[NI_MAXHOST];
 289
 290         if (getifaddrs(&ifaddr) == -1) {
 291                 warn("Error getting IP address");
 292                 return smprintf(UNKNOWN_STR);
 293         }
 294
 295         for (ifa = ifaddr; ifa != NULL; ifa = ifa->ifa_next) {
 296                 if (ifa->ifa_addr == NULL)
 297                         continue;
 298
 299                 s = getnameinfo(ifa->ifa_addr, sizeof(struct sockaddr_in), host, NI_MAXHOST,
 300                                                                 NULL, 0, NI_NUMERICHOST);
 301
 302                 if ((strcmp(ifa->ifa_name, interface) == 0) && (ifa->ifa_addr->sa_family == AF_INET)) {
 303                         if (s != 0) {
 304                                 warnx("Error getting IP address.");
 305                                 return smprintf(UNKNOWN_STR);
 306                         }
 307                         return smprintf("%s", host);
 308                 }
 309         }
 310
 311         freeifaddrs(ifaddr);
 312
 313         return smprintf(UNKNOWN_STR);
 314 }
 315
 316 static char *
 317 load_avg(void)
 318 {
 319         double avgs[3];
 320
 321         if (getloadavg(avgs, 3) < 0) {
 322                 warnx("Error getting load avg.");
 323                 return smprintf(UNKNOWN_STR);
 324         }
 325
 326         return smprintf("%.2f %.2f %.2f", avgs[0], avgs[1], avgs[2]);
 327 }
 328
 329 static char *
 330 ram_free(void)
 331 {
 332         long free;
 333         FILE *fp = fopen("/proc/meminfo", "r");
 334
 335         if (fp == NULL) {
 336                 warn("Error opening meminfo file");
 337                 return smprintf(UNKNOWN_STR);
 338         }
 339
 340         fscanf(fp, "MemFree: %ld kB\n", &free);
 341         fclose(fp);
 342
 343         return smprintf("%f", (float)free / 1024 / 1024);
 344 }
 345
 346 static char *
 347 ram_perc(void)
 348 {
 349         int perc;
 350         long total, free, buffers, cached;
 351         FILE *fp = fopen("/proc/meminfo", "r");
 352
 353         if (fp == NULL) {
 354                 warn("Error opening meminfo file");
 355                 return smprintf(UNKNOWN_STR);
 356         }
 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
 363         fclose(fp);
 364         perc = 100 * ((total - free) - (buffers + cached)) / total;
 365
 366         return smprintf("%d%%", perc);
 367 }
 368
 369 static char *
 370 ram_total(void)
 371 {
 372         long total;
 373         FILE *fp = fopen("/proc/meminfo", "r");
 374
 375         if (fp == NULL) {
 376                 warn("Error opening meminfo file");
 377                 return smprintf(UNKNOWN_STR);
 378         }
 379
 380         fscanf(fp, "MemTotal: %ld kB\n", &total);
 381         fclose(fp);
 382
 383         return smprintf("%f", (float)total / 1024 / 1024);
 384 }
 385
 386 static char *
 387 ram_used(void)
 388 {
 389         long free, total, buffers, cached, used;
 390         FILE *fp = fopen("/proc/meminfo", "r");
 391
 392         if (fp == NULL) {
 393                 warn("Error opening meminfo file");
 394                 return smprintf(UNKNOWN_STR);
 395         }
 396
 397         fscanf(fp, "MemTotal: %ld kB\n", &total);
 398         fscanf(fp, "MemFree: %ld kB\n", &free);
 399         fscanf(fp, "MemAvailable: %ld kB\nBuffers: %ld kB\n", &buffers, &buffers);
 400         fscanf(fp, "Cached: %ld kB\n", &cached);
 401
 402         fclose(fp);
 403         used = total - free - buffers - cached;
 404
 405         return smprintf("%f", (float)used / 1024 / 1024);
 406 }
 407
 408 static char *
 409 run_command(const char* command)
 410 {
 411         int good;
 412         FILE *fp = popen(command, "r");
 413         char buffer[64] = "";
 414
 415         if (fp == NULL) {
 416                 warn("Could not get command output for: %s", command);
 417                 return smprintf(UNKNOWN_STR);
 418         }
 419
 420         fgets(buffer, sizeof(buffer)-1, fp);
 421         pclose(fp);
 422         for (int i = 0 ; i != sizeof(buffer); i++) {
 423                 if (buffer[i] == '\0') {
 424                         good = 1;
 425                         break;
 426                 }
 427         }
 428         if (good)
 429                 buffer[strlen(buffer)-1] = '\0';
 430
 431         return smprintf("%s", buffer);
 432 }
 433
 434 static char *
 435 temp(const char *file)
 436 {
 437         int temperature;
 438         FILE *fp = fopen(file, "r");
 439
 440         if (fp == NULL) {
 441                 warn("Could not open temperature file");
 442                 return smprintf(UNKNOWN_STR);
 443         }
 444
 445         fscanf(fp, "%d", &temperature);
 446         fclose(fp);
 447
 448         return smprintf("%d°C", temperature / 1000);
 449 }
 450
 451 static char *
 452 uptime(void)
 453 {
 454         struct sysinfo info;
 455         int hours = 0;
 456         int minutes = 0;
 457
 458         sysinfo(&info);
 459         hours = info.uptime / 3600;
 460         minutes = (info.uptime - hours * 3600 ) / 60;
 461
 462         return smprintf("%dh %dm", hours, minutes);
 463 }
 464
 465 static char *
 466 username(void)
 467 {
 468         uid_t uid = geteuid();
 469         struct passwd *pw = getpwuid(uid);
 470
 471         if (pw == NULL) {
 472                 warn("Could not get username");
 473                 return smprintf(UNKNOWN_STR);
 474         }
 475
 476         return smprintf("%s", pw->pw_name);
 477 }
 478
 479 static char *
 480 uid(void)
 481 {
 482         return smprintf("%d", geteuid());
 483 }
 484
 485
 486 static char *
 487 vol_perc(const char *soundcard)
 488 {
 489         long int vol, max, min;
 490         snd_mixer_t *handle;
 491         snd_mixer_elem_t *elem;
 492         snd_mixer_selem_id_t *s_elem;
 493
 494         snd_mixer_open(&handle, 0);
 495         snd_mixer_attach(handle, soundcard);
 496         snd_mixer_selem_register(handle, NULL, NULL);
 497         snd_mixer_load(handle);
 498         snd_mixer_selem_id_malloc(&s_elem);
 499         snd_mixer_selem_id_set_name(s_elem, "Master");
 500         elem = snd_mixer_find_selem(handle, s_elem);
 501
 502         if (elem == NULL) {
 503                 snd_mixer_selem_id_free(s_elem);
 504                 snd_mixer_close(handle);
 505                 warn("Failed to get volume percentage for: %s", soundcard);
 506                 return smprintf(UNKNOWN_STR);
 507         }
 508
 509         snd_mixer_handle_events(handle);
 510         snd_mixer_selem_get_playback_volume_range(elem, &min, &max);
 511         snd_mixer_selem_get_playback_volume(elem, 0, &vol);
 512
 513         snd_mixer_selem_id_free(s_elem);
 514         snd_mixer_close(handle);
 515
 516         return smprintf("%d%%", ((uint_fast16_t)(vol * 100) / max));
 517 }
 518
 519 static char *
 520 wifi_perc(const char *wificard)
 521 {
 522         int strength;
 523         char buf[255];
 524         char *datastart;
 525         char status[5];
 526         FILE *fp;
 527
 528         ccat(3, "/sys/class/net/", wificard, "/operstate");
 529
 530         fp = fopen(concat, "r");
 531
 532         if (fp == NULL) {
 533                 warn("Error opening wifi operstate file");
 534                 return smprintf(UNKNOWN_STR);
 535         }
 536
 537         fgets(status, 5, fp);
 538         fclose(fp);
 539         if(strcmp(status, "up\n") != 0)
 540                 return smprintf(UNKNOWN_STR);
 541
 542         fp = fopen("/proc/net/wireless", "r");
 543         if (fp == NULL) {
 544                 warn("Error opening wireless file");
 545                 return smprintf(UNKNOWN_STR);
 546         }
 547
 548         ccat(2, wificard, ":");
 549         fgets(buf, sizeof(buf), fp);
 550         fgets(buf, sizeof(buf), fp);
 551         fgets(buf, sizeof(buf), fp);
 552
 553         datastart = strstr(buf, concat);
 554         if (datastart != NULL) {
 555                 datastart = strstr(buf, ":");
 556                 sscanf(datastart + 1, " %*d   %d  %*d  %*d                %*d      %*d          %*d              %*d      %*d            %*d", &strength);
 557         }
 558
 559         fclose(fp);
 560
 561         return smprintf("%d%%", strength);
 562 }
 563
 564 static char *
 565 wifi_essid(const char *wificard)
 566 {
 567         char id[IW_ESSID_MAX_SIZE+1];
 568         int sockfd = socket(AF_INET, SOCK_DGRAM, 0);
 569         struct iwreq wreq;
 570
 571         memset(&wreq, 0, sizeof(struct iwreq));
 572         wreq.u.essid.length = IW_ESSID_MAX_SIZE+1;
 573         sprintf(wreq.ifr_name, wificard);
 574         if (sockfd == -1) {
 575                 warn("Cannot open socket for interface: %s", wificard);
 576                 return smprintf(UNKNOWN_STR);
 577         }
 578         wreq.u.essid.pointer = id;
 579         if (ioctl(sockfd,SIOCGIWESSID, &wreq) == -1) {
 580                 warn("Get ESSID ioctl failed for interface %s", wificard);
 581                 return smprintf(UNKNOWN_STR);
 582         }
 583
 584         close(sockfd);
 585
 586         if (strcmp((char *)wreq.u.essid.pointer, "") == 0)
 587                 return smprintf(UNKNOWN_STR);
 588         else
 589                 return smprintf("%s", (char *)wreq.u.essid.pointer);
 590 }
 591
 592 static void
 593 sighandler(const int signo)
 594 {
 595         if (signo == SIGTERM || signo == SIGINT)
 596                 done = 1;
 597 }
 598
 599 int
 600 main(void)
 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         memset(&act, 0, sizeof(act));
 609         act.sa_handler = sighandler;
 610         sigaction(SIGINT,  &act, 0);
 611         sigaction(SIGTERM, &act, 0);
 612
 613         dpy = XOpenDisplay(NULL);
 614
 615         while (!done) {
 616                 status_string[0] = '\0';
 617                 for (i = 0; i < sizeof(args) / sizeof(args[0]); ++i) {
 618                         argument = args[i];
 619                         if (argument.args == NULL)
 620                                 res = argument.func();
 621                         else
 622                                 res = argument.func(argument.args);
 623                         element = smprintf(argument.format, res);
 624                         if (element == NULL) {
 625                                 element = smprintf(UNKNOWN_STR);
 626                                 warnx("Failed to format output.");
 627                         }
 628                         strlcat(status_string, element, sizeof(status_string));
 629                         free(res);
 630                         free(element);
 631                 }
 632                 XStoreName(dpy, DefaultRootWindow(dpy), status_string);
 633                 XSync(dpy, False);
 634                 /*
 635                  * subtract delay time spend in function
 636                  * calls from the actual global delay time
 637                  */
 638                 sleep(UPDATE_INTERVAL - delay);
 639                 delay = 0;
 640         }
 641
 642         XStoreName(dpy, DefaultRootWindow(dpy), NULL);
 643         XSync(dpy, False);
 644
 645         XCloseDisplay(dpy);
 646
 647         return 0;
 648 }