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