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