slstatus.c

   1 /* See LICENSE file for copyright and license details. */
   2
   3 #include <alsa/asoundlib.h>
   4 #include <fcntl.h>
   5 #include <ifaddrs.h>
   6 #include <limits.h>
   7 #include <linux/wireless.h>
   8 #include <netdb.h>
   9 #include <pwd.h>
  10 #include <stdarg.h>
  11 #include <stdio.h>
  12 #include <stdlib.h>
  13 #include <string.h>
  14 #include <sys/ioctl.h>
  15 #include <sys/stat.h>
  16 #include <sys/statvfs.h>
  17 #include <sys/socket.h>
  18 #include <sys/sysinfo.h>
  19 #include <sys/types.h>
  20 #include <time.h>
  21 #include <unistd.h>
  22 #include <X11/Xlib.h>
  23
  24 #undef strlcat
  25 #undef strlcpy
  26
  27 #include "strlcat.h"
  28 #include "strlcpy.h"
  29 #include "concat.h"
  30
  31 char concat[];
  32
  33 struct arg {
  34         char *(*func)();
  35         const char *format;
  36         const char *args;
  37 };
  38
  39 static char *smprintf(const char *, ...);
  40 static char *battery_perc(const char *);
  41 static char *cpu_perc(void);
  42 static char *datetime(const char *);
  43 static char *disk_free(const char *);
  44 static char *disk_perc(const char *);
  45 static char *disk_total(const char *);
  46 static char *disk_used(const char *);
  47 static char *entropy(void);
  48 static char *gid(void);
  49 static char *hostname(void);
  50 static char *ip(const char *);
  51 static char *load_avg(void);
  52 static char *ram_free(void);
  53 static char *ram_perc(void);
  54 static char *ram_used(void);
  55 static char *ram_total(void);
  56 static char *run_command(const char *);
  57 static char *temp(const char *);
  58 static char *uid(void);
  59 static char *uptime(void);
  60 static char *username(void);
  61 static char *vol_perc(const char *);
  62 static char *wifi_perc(const char *);
  63 static char *wifi_essid(const char *);
  64
  65 static Display *dpy;
  66
  67 #include "config.h"
  68
  69 static char *
  70 smprintf(const char *fmt, ...)
  71 {
  72         va_list ap;
  73         char *ret;
  74         int len;
  75
  76         va_start(ap, fmt);
  77         len = vsnprintf(NULL, 0, fmt, ap);
  78         va_end(ap);
  79
  80         ret = malloc(++len);
  81         if (ret == NULL) {
  82                 perror("malloc");
  83                 exit(1);
  84         }
  85
  86         va_start(ap, fmt);
  87         vsnprintf(ret, len, fmt, ap);
  88         va_end(ap);
  89
  90         return ret;
  91 }
  92
  93 static char *
  94 battery_perc(const char *battery)
  95 {
  96         int now, full, perc;
  97         FILE *fp;
  98
  99         ccat(4, BATTERY_PATH, battery, "/", BATTERY_NOW);
 100
 101         fp = fopen(concat, "r");
 102         if (fp == NULL) {
 103                 fprintf(stderr, "Error opening battery file: %s: %s\n",
 104                                                 concat,
 105                                                 strerror(errno));
 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                 fprintf(stderr, "Error opening battery file: %s: %s\n",
 117                                                 concat,
 118                                                 strerror(errno));
 119                 return smprintf(UNKNOWN_STR);
 120         }
 121
 122         fscanf(fp, "%i", &full);
 123         fclose(fp);
 124
 125         perc = now / (full / 100);
 126
 127         return smprintf("%d%%", perc);
 128 }
 129
 130 static char *
 131 cpu_perc(void)
 132 {
 133         int perc;
 134         long double a[4], b[4];
 135         FILE *fp = fopen("/proc/stat","r");
 136
 137         if (fp == NULL) {
 138                 fprintf(stderr, "Error opening stat file: %s\n",
 139                                                 strerror(errno));
 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         sleep(1);
 147
 148         fp = fopen("/proc/stat","r");
 149         if (fp == NULL) {
 150                 fprintf(stderr, "Error opening stat file: %s\n",
 151                                                 strerror(errno));
 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         return smprintf("%d%%", perc);
 159 }
 160
 161 static char *
 162 datetime(const char *timeformat)
 163 {
 164         time_t t;
 165         char timestr[80];
 166
 167         t = time(NULL);
 168         if (strftime(timestr, sizeof(timestr), timeformat, localtime(&t)) == 0)
 169                 return smprintf(UNKNOWN_STR);
 170
 171         return smprintf("%s", timestr);
 172 }
 173
 174 static char *
 175 disk_free(const char *mountpoint)
 176 {
 177         struct statvfs fs;
 178
 179         if (statvfs(mountpoint, &fs) < 0) {
 180                 fprintf(stderr, "Could not get filesystem info: %s\n",
 181                                                 strerror(errno));
 182                 return smprintf(UNKNOWN_STR);
 183         }
 184         return smprintf("%f", (float)fs.f_bsize * (float)fs.f_bfree / 1024 / 1024 / 1024);
 185 }
 186
 187 static char *
 188 disk_perc(const char *mountpoint)
 189 {
 190         int perc = 0;
 191         struct statvfs fs;
 192
 193         if (statvfs(mountpoint, &fs) < 0) {
 194                 fprintf(stderr, "Could not get filesystem info: %s\n",
 195                                                 strerror(errno));
 196                 return smprintf(UNKNOWN_STR);
 197         }
 198
 199         perc = 100 * (1.0f - ((float)fs.f_bfree / (float)fs.f_blocks));
 200         return smprintf("%d%%", perc);
 201 }
 202
 203 static char *
 204 disk_total(const char *mountpoint)
 205 {
 206         struct statvfs fs;
 207
 208         if (statvfs(mountpoint, &fs) < 0) {
 209                 fprintf(stderr, "Could not get filesystem info: %s\n",
 210                                                 strerror(errno));
 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                 fprintf(stderr, "Could not get filesystem info: %s\n",
 224                                                 strerror(errno));
 225                 return smprintf(UNKNOWN_STR);
 226         }
 227
 228         return smprintf("%f", (float)fs.f_bsize * ((float)fs.f_blocks - (float)fs.f_bfree) / 1024 / 1024 / 1024);
 229 }
 230
 231 static char *
 232 entropy(void)
 233 {
 234         int entropy = 0;
 235         FILE *fp = fopen("/proc/sys/kernel/random/entropy_avail", "r");
 236
 237         if (fp == NULL) {
 238                 fprintf(stderr, "Could not open entropy file: %s\n",
 239                                                 strerror(errno));
 240                 return smprintf(UNKNOWN_STR);
 241         }
 242
 243         fscanf(fp, "%d", &entropy);
 244         fclose(fp);
 245         return smprintf("%d", entropy);
 246 }
 247
 248 static char *
 249 gid(void)
 250 {
 251         return smprintf("%d", getgid());
 252 }
 253
 254 static char *
 255 hostname(void)
 256 {
 257         char hostname[HOST_NAME_MAX];
 258         FILE *fp = fopen("/proc/sys/kernel/hostname", "r");
 259
 260         if (fp == NULL) {
 261                 fprintf(stderr, "Could not open hostname file: %s\n",
 262                                                 strerror(errno));
 263                 return smprintf(UNKNOWN_STR);
 264         }
 265
 266         fgets(hostname, sizeof(hostname), fp);
 267         /* FIXME: needs improvement */
 268         memset(&hostname[strlen(hostname)-1], '\0',
 269                 sizeof(hostname) - strlen(hostname));
 270         fclose(fp);
 271         return smprintf("%s", hostname);
 272 }
 273
 274 static char *
 275 ip(const char *interface)
 276 {
 277         struct ifaddrs *ifaddr, *ifa;
 278         int s;
 279         char host[NI_MAXHOST];
 280
 281         if (getifaddrs(&ifaddr) == -1) {
 282                 fprintf(stderr, "Error getting IP address: %s\n",
 283                                                 strerror(errno));
 284                 return smprintf(UNKNOWN_STR);
 285         }
 286
 287         /* get the ip address */
 288         for (ifa = ifaddr; ifa != NULL; ifa = ifa->ifa_next) {
 289                 if (ifa->ifa_addr == NULL)
 290                         continue;
 291
 292                 s = getnameinfo(ifa->ifa_addr, sizeof(struct sockaddr_in), host, NI_MAXHOST,
 293                                                                 NULL, 0, NI_NUMERICHOST);
 294
 295                 if ((strcmp(ifa->ifa_name, interface) == 0) && (ifa->ifa_addr->sa_family == AF_INET)) {
 296                         if (s != 0) {
 297                                 fprintf(stderr, "Error getting IP address.\n");
 298                                 return smprintf(UNKNOWN_STR);
 299                         }
 300                         return smprintf("%s", host);
 301                 }
 302         }
 303
 304         /* free the address */
 305         freeifaddrs(ifaddr);
 306
 307         return smprintf(UNKNOWN_STR);
 308 }
 309
 310 static char *
 311 load_avg(void)
 312 {
 313         double avgs[3];
 314
 315         if (getloadavg(avgs, 3) < 0) {
 316                 fprintf(stderr, "Error getting load avg.\n");
 317                 return smprintf(UNKNOWN_STR);
 318         }
 319
 320         return smprintf("%.2f %.2f %.2f", avgs[0], avgs[1], avgs[2]);
 321 }
 322
 323 static char *
 324 ram_free(void)
 325 {
 326         long free;
 327         FILE *fp = fopen("/proc/meminfo", "r");
 328
 329         if (fp == NULL) {
 330                 fprintf(stderr, "Error opening meminfo file: %s\n",
 331                                                 strerror(errno));
 332                 return smprintf(UNKNOWN_STR);
 333         }
 334
 335         fscanf(fp, "MemFree: %ld kB\n", &free);
 336         fclose(fp);
 337         return smprintf("%f", (float)free / 1024 / 1024);
 338 }
 339
 340 static char *
 341 ram_perc(void)
 342 {
 343         int perc;
 344         long total, free, buffers, cached;
 345         FILE *fp = fopen("/proc/meminfo", "r");
 346
 347         if (fp == NULL) {
 348                 fprintf(stderr, "Error opening meminfo file: %s\n",
 349                                                 strerror(errno));
 350                 return smprintf(UNKNOWN_STR);
 351         }
 352
 353         fscanf(fp, "MemTotal: %ld kB\n", &total);
 354         fscanf(fp, "MemFree: %ld kB\n", &free);
 355         fscanf(fp, "MemAvailable: %ld kB\nBuffers: %ld kB\n", &buffers, &buffers);
 356         fscanf(fp, "Cached: %ld kB\n", &cached);
 357
 358         fclose(fp);
 359         perc = 100 * ((total - free) - (buffers + cached)) / total;
 360         return smprintf("%d%%", perc);
 361 }
 362
 363 static char *
 364 ram_total(void)
 365 {
 366         long total;
 367         FILE *fp = fopen("/proc/meminfo", "r");
 368
 369         if (fp == NULL) {
 370                 fprintf(stderr, "Error opening meminfo file: %s\n",
 371                                                 strerror(errno));
 372                 return smprintf(UNKNOWN_STR);
 373         }
 374
 375         fscanf(fp, "MemTotal: %ld kB\n", &total);
 376         fclose(fp);
 377         return smprintf("%f", (float)total / 1024 / 1024);
 378 }
 379
 380 static char *
 381 ram_used(void)
 382 {
 383         long free, total, buffers, cached, used;
 384         FILE *fp = fopen("/proc/meminfo", "r");
 385
 386         if (fp == NULL) {
 387                 fprintf(stderr, "Error opening meminfo file: %s\n",
 388                                                 strerror(errno));
 389                 return smprintf(UNKNOWN_STR);
 390         }
 391
 392         fscanf(fp, "MemTotal: %ld kB\n", &total);
 393         fscanf(fp, "MemFree: %ld kB\n", &free);
 394         fscanf(fp, "MemAvailable: %ld kB\nBuffers: %ld kB\n", &buffers, &buffers);
 395         fscanf(fp, "Cached: %ld kB\n", &cached);
 396
 397         fclose(fp);
 398         used = total - free - buffers - cached;
 399         return smprintf("%f", (float)used / 1024 / 1024);
 400 }
 401
 402 static char *
 403 run_command(const char* command)
 404 {
 405         int good;
 406         FILE *fp = popen(command, "r");
 407         char buffer[64];
 408
 409         if (fp == NULL) {
 410                 fprintf(stderr, "Could not get command output for: %s: %s\n",
 411                                                 command, strerror(errno));
 412                 return smprintf(UNKNOWN_STR);
 413         }
 414
 415         fgets(buffer, sizeof(buffer)-1, fp);
 416         pclose(fp);
 417         for (int i = 0 ; i != sizeof(buffer); i++) {
 418                 if (buffer[i] == '\0') {
 419                         good = 1;
 420                         break;
 421                 }
 422         }
 423         if (good)
 424                 buffer[strlen(buffer)-1] = '\0';
 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                 fprintf(stderr, "Could not open temperature file: %s\n",
 436                                                         strerror(errno));
 437                 return smprintf(UNKNOWN_STR);
 438         }
 439
 440         fscanf(fp, "%d", &temperature);
 441         fclose(fp);
 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                 return smprintf("%s", pw->pw_name);
 467
 468         fprintf(stderr, "Could not get username: %s\n",
 469                                         strerror(errno));
 470         return smprintf(UNKNOWN_STR);
 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 *snd_card)
 482 { /* thanks to botika for this function */
 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, "default");
 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, snd_card);
 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                 perror("alsa error");
 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", (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                 fprintf(stderr, "Error opening wifi operstate file: %s\n",
 528                                                         strerror(errno));
 529                 return smprintf(UNKNOWN_STR);
 530         }
 531
 532         fgets(status, 5, fp);
 533         fclose(fp);
 534         if(strcmp(status, "up\n") != 0)
 535                 return smprintf(UNKNOWN_STR);
 536
 537         fp = fopen("/proc/net/wireless", "r");
 538         if (fp == NULL) {
 539                 fprintf(stderr, "Error opening wireless file: %s\n",
 540                                                 strerror(errno));
 541                 return smprintf(UNKNOWN_STR);
 542         }
 543
 544         ccat(2, wificard, ":");
 545         fgets(buf, sizeof(buf), fp);
 546         fgets(buf, sizeof(buf), fp);
 547         fgets(buf, sizeof(buf), fp);
 548
 549         datastart = strstr(buf, concat);
 550         if (datastart != NULL) {
 551                 datastart = strstr(buf, ":");
 552                 sscanf(datastart + 1, " %*d   %d  %*d  %*d                %*d      %*d          %*d              %*d      %*d            %*d", &strength);
 553         }
 554
 555         fclose(fp);
 556         return smprintf("%d%%", strength);
 557 }
 558
 559 static char *
 560 wifi_essid(const char *wificard)
 561 {
 562         char id[IW_ESSID_MAX_SIZE+1];
 563         int sockfd = socket(AF_INET, SOCK_DGRAM, 0);
 564         struct iwreq wreq;
 565
 566         memset(&wreq, 0, sizeof(struct iwreq));
 567         wreq.u.essid.length = IW_ESSID_MAX_SIZE+1;
 568         sprintf(wreq.ifr_name, wificard);
 569         if(sockfd == -1) {
 570                 fprintf(stderr, "Cannot open socket for interface: %s: %s\n",
 571                                                 wificard, strerror(errno));
 572                 return smprintf(UNKNOWN_STR);
 573         }
 574         wreq.u.essid.pointer = id;
 575         if (ioctl(sockfd,SIOCGIWESSID, &wreq) == -1) {
 576                 fprintf(stderr, "Get ESSID ioctl failed for interface %s: %s\n",
 577                                                 wificard, strerror(errno));
 578                 return smprintf(UNKNOWN_STR);
 579         }
 580
 581         if (strcmp((char *)wreq.u.essid.pointer, "") == 0)
 582                 return smprintf(UNKNOWN_STR);
 583         else
 584                 return smprintf("%s", (char *)wreq.u.essid.pointer);
 585 }
 586
 587 int
 588 main(void)
 589 {
 590         size_t i;
 591         char status_string[4096];
 592         char *res, *element;
 593         struct arg argument;
 594
 595         dpy = XOpenDisplay(NULL);
 596
 597         for (;;) {
 598                 memset(status_string, 0, sizeof(status_string));
 599                 for (i = 0; i < sizeof(args) / sizeof(args[0]); ++i) {
 600                         argument = args[i];
 601                         if (argument.args == NULL)
 602                                 res = argument.func();
 603                         else
 604                                 res = argument.func(argument.args);
 605                         element = smprintf(argument.format, res);
 606                         if (element == NULL) {
 607                                 element = smprintf(UNKNOWN_STR);
 608                                 fprintf(stderr, "Failed to format output.\n");
 609                         }
 610                         strlcat(status_string, element, sizeof(status_string));
 611                         free(res);
 612                         free(element);
 613                 }
 614                 XStoreName(dpy, DefaultRootWindow(dpy), status_string);
 615                 XSync(dpy, False);
 616         }
 617         XCloseDisplay(dpy);
 618
 619         return 0;
 620 }