Xinqi Bao's Git

bc48365b2aeb0c2b540d157665a2e16b304af433
[slstatus.git] / slstatus.c
1 /* See LICENSE file for copyright and license details. */
2
3 #include <alsa/asoundlib.h>
4 #include <arpa/inet.h>
5 #include <fcntl.h>
6 #include <ifaddrs.h>
7 #include <limits.h>
8 #include <linux/wireless.h>
9 #include <locale.h>
10 #include <netdb.h>
11 #include <pwd.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
32 typedef char *(*op_fun)();
33 struct arg {
34 op_fun func;
35 const char *format;
36 const char *args;
37 };
38
39 static void setstatus(const char *);
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 Display *dpy;
67
68 #include "config.h"
69
70 static void
71 setstatus(const char *str)
72 {
73 /* set WM_NAME via X11 */
74 XStoreName(dpy, DefaultRootWindow(dpy), str);
75 XSync(dpy, False);
76 }
77
78 static char *
79 smprintf(const char *fmt, ...)
80 {
81 va_list ap;
82 char *ret;
83 int len;
84
85 va_start(ap, fmt);
86 len = vsnprintf(NULL, 0, fmt, ap);
87 va_end(ap);
88
89 ret = malloc(++len);
90 if (ret == NULL) {
91 perror("malloc");
92 exit(1);
93 }
94
95 va_start(ap, fmt);
96 vsnprintf(ret, len, fmt, ap);
97 va_end(ap);
98
99 return ret;
100 }
101
102 static char *
103 battery_perc(const char *battery)
104 {
105 int now, full, perc;
106 char batterynowfile[64];
107 char batteryfullfile[64];
108 FILE *fp;
109
110 strlcpy(batterynowfile, BATTERY_PATH, sizeof(batterynowfile));
111 strlcat(batterynowfile, battery, sizeof(batterynowfile));
112 strlcat(batterynowfile, "/", sizeof(batterynowfile));
113 strlcat(batterynowfile, BATTERY_NOW, sizeof(batterynowfile));
114
115 strlcpy(batteryfullfile, BATTERY_PATH, sizeof(batteryfullfile));
116 strlcat(batteryfullfile, battery, sizeof(batteryfullfile));
117 strlcat(batteryfullfile, "/", sizeof(batteryfullfile));
118 strlcat(batteryfullfile, BATTERY_FULL, sizeof(batteryfullfile));
119
120 if (!(fp = fopen(batterynowfile, "r"))) {
121 fprintf(stderr, "Error opening battery file: %s.\n", batterynowfile);
122 return smprintf(UNKNOWN_STR);
123 }
124
125 fscanf(fp, "%i", &now);
126 fclose(fp);
127
128 if (!(fp = fopen(batteryfullfile, "r"))) {
129 fprintf(stderr, "Error opening battery file.\n");
130 return smprintf(UNKNOWN_STR);
131 }
132
133 fscanf(fp, "%i", &full);
134 fclose(fp);
135
136 perc = now / (full / 100);
137
138 return smprintf("%d%%", perc);
139 }
140
141 static char *
142 cpu_perc(void)
143 {
144 int perc;
145 long double a[4], b[4];
146 FILE *fp;
147
148 if (!(fp = fopen("/proc/stat","r"))) {
149 fprintf(stderr, "Error opening stat file.\n");
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 /* wait a second (for avg values) */
157 sleep(1);
158
159 if (!(fp = fopen("/proc/stat","r"))) {
160 fprintf(stderr, "Error opening stat file.\n");
161 return smprintf(UNKNOWN_STR);
162 }
163
164 fscanf(fp, "%*s %Lf %Lf %Lf %Lf", &b[0], &b[1], &b[2], &b[3]);
165 fclose(fp);
166 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]));
167 return smprintf("%d%%", perc);
168 }
169
170 static char *
171 datetime(const char *timeformat)
172 {
173 time_t t;
174 char timestr[80];
175
176 t = time(NULL);
177 if (strftime(timestr, sizeof(timestr), timeformat, localtime(&t)) == 0)
178 return smprintf(UNKNOWN_STR);
179
180 return smprintf("%s", timestr);
181 }
182
183 static char *
184 disk_free(const char *mountpoint)
185 {
186 struct statvfs fs;
187
188 if (statvfs(mountpoint, &fs) < 0) {
189 fprintf(stderr, "Could not get filesystem info.\n");
190 return smprintf(UNKNOWN_STR);
191 }
192 return smprintf("%f", (float)fs.f_bsize * (float)fs.f_bfree / 1024 / 1024 / 1024);
193 }
194
195 static char *
196 disk_perc(const char *mountpoint)
197 {
198 int perc = 0;
199 struct statvfs fs;
200
201 if (statvfs(mountpoint, &fs) < 0) {
202 fprintf(stderr, "Could not get filesystem info.\n");
203 return smprintf(UNKNOWN_STR);
204 }
205
206 perc = 100 * (1.0f - ((float)fs.f_bfree / (float)fs.f_blocks));
207 return smprintf("%d%%", perc);
208 }
209
210 static char *
211 disk_total(const char *mountpoint)
212 {
213 struct statvfs fs;
214
215 if (statvfs(mountpoint, &fs) < 0) {
216 fprintf(stderr, "Could not get filesystem info.\n");
217 return smprintf(UNKNOWN_STR);
218 }
219
220 return smprintf("%f", (float)fs.f_bsize * (float)fs.f_blocks / 1024 / 1024 / 1024);
221 }
222
223 static char *
224 disk_used(const char *mountpoint)
225 {
226 struct statvfs fs;
227
228 if (statvfs(mountpoint, &fs) < 0) {
229 fprintf(stderr, "Could not get filesystem info.\n");
230 return smprintf(UNKNOWN_STR);
231 }
232
233 return smprintf("%f", (float)fs.f_bsize * ((float)fs.f_blocks - (float)fs.f_bfree) / 1024 / 1024 / 1024);
234 }
235
236 static char *
237 entropy(void)
238 {
239 int entropy = 0;
240 FILE *fp;
241
242 if (!(fp = fopen("/proc/sys/kernel/random/entropy_avail", "r"))) {
243 fprintf(stderr, "Could not open entropy file.\n");
244 return smprintf(UNKNOWN_STR);
245 }
246
247 fscanf(fp, "%d", &entropy);
248 fclose(fp);
249 return smprintf("%d", entropy);
250 }
251
252 static char *
253 gid(void)
254 {
255 gid_t gid = getgid();
256 return smprintf("%d", gid);
257 }
258
259 static char *
260 hostname(void)
261 {
262 char hostname[HOST_NAME_MAX];
263 FILE *fp;
264
265 if (!(fp = fopen("/proc/sys/kernel/hostname", "r"))) {
266 fprintf(stderr, "Could not open hostname file.\n");
267 return smprintf(UNKNOWN_STR);
268 }
269
270 fscanf(fp, "%s\n", hostname);
271 fclose(fp);
272 return smprintf("%s", hostname);
273 }
274
275 static char *
276 ip(const char *interface)
277 {
278 struct ifaddrs *ifaddr, *ifa;
279 int s;
280 char host[NI_MAXHOST];
281
282 if (getifaddrs(&ifaddr) == -1) {
283 fprintf(stderr, "Error getting IP address.\n");
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, NULL, 0, NI_NUMERICHOST);
293
294 if ((strcmp(ifa->ifa_name, interface) == 0) && (ifa->ifa_addr->sa_family == AF_INET)) {
295 if (s != 0) {
296 fprintf(stderr, "Error getting IP address.\n");
297 return smprintf(UNKNOWN_STR);
298 }
299 return smprintf("%s", host);
300 }
301 }
302
303 /* free the address */
304 freeifaddrs(ifaddr);
305
306 return smprintf(UNKNOWN_STR);
307 }
308
309 static char *
310 load_avg(void)
311 {
312 double avgs[3];
313
314 if (getloadavg(avgs, 3) < 0) {
315 fprintf(stderr, "Error getting load avg.\n");
316 return smprintf(UNKNOWN_STR);
317 }
318
319 return smprintf("%.2f %.2f %.2f", avgs[0], avgs[1], avgs[2]);
320 }
321
322 static char *
323 ram_free(void)
324 {
325 long free;
326 FILE *fp;
327
328 if (!(fp = fopen("/proc/meminfo", "r"))) {
329 fprintf(stderr, "Error opening meminfo file.\n");
330 return smprintf(UNKNOWN_STR);
331 }
332
333 fscanf(fp, "MemFree: %ld kB\n", &free);
334 fclose(fp);
335 return smprintf("%f", (float)free / 1024 / 1024);
336 }
337
338 static char *
339 ram_perc(void)
340 {
341 int perc;
342 long total, free, buffers, cached;
343 FILE *fp;
344
345 if (!(fp = fopen("/proc/meminfo", "r"))) {
346 fprintf(stderr, "Error opening meminfo file.\n");
347 return smprintf(UNKNOWN_STR);
348 }
349
350 fscanf(fp, "MemTotal: %ld kB\n", &total);
351 fscanf(fp, "MemFree: %ld kB\n", &free);
352 fscanf(fp, "MemAvailable: %ld kB\nBuffers: %ld kB\n", &buffers, &buffers);
353 fscanf(fp, "Cached: %ld kB\n", &cached);
354
355 fclose(fp);
356 perc = 100 * ((total - free) - (buffers + cached)) / total;
357 return smprintf("%d%%", perc);
358 }
359
360 static char *
361 ram_total(void)
362 {
363 long total;
364 FILE *fp;
365
366 if (!(fp = fopen("/proc/meminfo", "r"))) {
367 fprintf(stderr, "Error opening meminfo file.\n");
368 return smprintf(UNKNOWN_STR);
369 }
370
371 fscanf(fp, "MemTotal: %ld kB\n", &total);
372 fclose(fp);
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;
381
382 if (!(fp = fopen("/proc/meminfo", "r"))) {
383 fprintf(stderr, "Error opening meminfo file.\n");
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 return smprintf("%f", (float)used / 1024 / 1024);
395 }
396
397 static char *
398 run_command(const char* command)
399 {
400 int good;
401 FILE *fp;
402 char buffer[64];
403
404 if (!(fp = popen(command, "r"))) {
405 fprintf(stderr, "Could not get command output for: %s.\n", command);
406 return smprintf(UNKNOWN_STR);
407 }
408
409 fgets(buffer, sizeof(buffer) - 1, fp);
410 pclose(fp);
411 for (int i = 0 ; i != sizeof(buffer); i++) {
412 if (buffer[i] == '\0') {
413 good = 1;
414 break;
415 }
416 }
417 if (good)
418 buffer[strlen(buffer) - 1] = '\0';
419 return smprintf("%s", buffer);
420 }
421
422 static char *
423 temp(const char *file)
424 {
425 int temperature;
426 FILE *fp;
427
428 if (!(fp = fopen(file, "r"))) {
429 fprintf(stderr, "Could not open temperature file.\n");
430 return smprintf(UNKNOWN_STR);
431 }
432
433 fscanf(fp, "%d", &temperature);
434 fclose(fp);
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 register struct passwd *pw;
456 register uid_t uid;
457
458 uid = geteuid();
459 pw = getpwuid(uid);
460
461 if (pw)
462 return smprintf("%s", pw->pw_name);
463 else {
464 fprintf(stderr, "Could not get username.\n");
465 return smprintf(UNKNOWN_STR);
466 }
467
468 return smprintf(UNKNOWN_STR);
469 }
470
471 static char *
472 uid(void)
473 {
474 register uid_t uid;
475
476 uid = geteuid();
477
478 if (uid)
479 return smprintf("%d", uid);
480 else {
481 fprintf(stderr, "Could not get uid.\n");
482 return smprintf(UNKNOWN_STR);
483 }
484
485 return smprintf(UNKNOWN_STR);
486 }
487
488
489 static char *
490 vol_perc(const char *soundcard)
491 {
492 int mute = 0;
493 long vol = 0, max = 0, min = 0;
494 snd_mixer_t *handle;
495 snd_mixer_elem_t *pcm_mixer, *mas_mixer;
496 snd_mixer_selem_id_t *vol_info, *mute_info;
497
498 snd_mixer_open(&handle, 0);
499 snd_mixer_attach(handle, soundcard);
500 snd_mixer_selem_register(handle, NULL, NULL);
501 snd_mixer_load(handle);
502
503 snd_mixer_selem_id_malloc(&vol_info);
504 snd_mixer_selem_id_malloc(&mute_info);
505 if (vol_info == NULL || mute_info == NULL) {
506 fprintf(stderr, "Could not get alsa volume.\n");
507 return smprintf(UNKNOWN_STR);
508 }
509 snd_mixer_selem_id_set_name(vol_info, ALSA_CHANNEL);
510 snd_mixer_selem_id_set_name(mute_info, ALSA_CHANNEL);
511 pcm_mixer = snd_mixer_find_selem(handle, vol_info);
512 mas_mixer = snd_mixer_find_selem(handle, mute_info);
513
514 snd_mixer_selem_get_playback_volume_range((snd_mixer_elem_t *)pcm_mixer, &min, &max);
515 snd_mixer_selem_get_playback_volume((snd_mixer_elem_t *)pcm_mixer, SND_MIXER_SCHN_MONO, &vol);
516 snd_mixer_selem_get_playback_switch(mas_mixer, SND_MIXER_SCHN_MONO, &mute);
517
518 if (vol_info)
519 snd_mixer_selem_id_free(vol_info);
520 if (mute_info)
521 snd_mixer_selem_id_free(mute_info);
522 if (handle)
523 snd_mixer_close(handle);
524
525 if (!mute)
526 return smprintf("mute");
527 else
528 return smprintf("%d%%", (vol * 100) / max);
529 }
530
531 static char *
532 wifi_perc(const char *wificard)
533 {
534 int bufsize = 255;
535 int strength;
536 char buf[bufsize];
537 char *datastart;
538 char path[64];
539 char status[5];
540 char needle[sizeof wificard + 1];
541 FILE *fp;
542
543 memset(path, 0, sizeof path);
544 strlcat(path, "/sys/class/net/", sizeof(path));
545 strlcat(path, wificard, sizeof(path));
546 strlcat(path, "/operstate", sizeof(path));
547
548 if(!(fp = fopen(path, "r"))) {
549 fprintf(stderr, "Error opening wifi operstate file.\n");
550 return smprintf(UNKNOWN_STR);
551 }
552
553 fgets(status, 5, fp);
554 fclose(fp);
555 if(strcmp(status, "up\n") != 0)
556 return smprintf(UNKNOWN_STR);
557
558 if (!(fp = fopen("/proc/net/wireless", "r"))) {
559 fprintf(stderr, "Error opening wireless file.\n");
560 return smprintf(UNKNOWN_STR);
561 }
562
563 strlcpy(needle, wificard, sizeof(needle));
564 strlcat(needle, ":", sizeof(needle));
565 fgets(buf, bufsize, fp);
566 fgets(buf, bufsize, fp);
567 fgets(buf, bufsize, fp);
568 if ((datastart = strstr(buf, needle)) != NULL) {
569 datastart = strstr(buf, ":");
570 sscanf(datastart + 1, " %*d %d %*d %*d %*d %*d %*d %*d %*d %*d", &strength);
571 }
572
573 fclose(fp);
574 return smprintf("%d%%", strength);
575 }
576
577 static char *
578 wifi_essid(const char *wificard)
579 {
580 char id[IW_ESSID_MAX_SIZE+1];
581 int sockfd;
582 struct iwreq wreq;
583
584 memset(&wreq, 0, sizeof(struct iwreq));
585 wreq.u.essid.length = IW_ESSID_MAX_SIZE+1;
586 sprintf(wreq.ifr_name, wificard);
587 if((sockfd = socket(AF_INET, SOCK_DGRAM, 0)) == -1) {
588 fprintf(stderr, "Cannot open socket for interface: %s\n", wificard);
589 return smprintf(UNKNOWN_STR);
590 }
591 wreq.u.essid.pointer = id;
592 if (ioctl(sockfd,SIOCGIWESSID, &wreq) == -1) {
593 fprintf(stderr, "Get ESSID ioctl failed for interface %s\n", wificard);
594 return smprintf(UNKNOWN_STR);
595 }
596
597 if (strcmp((char *)wreq.u.essid.pointer, "") == 0)
598 return smprintf(UNKNOWN_STR);
599 else
600 return smprintf("%s", (char *)wreq.u.essid.pointer);
601 }
602
603 int
604 main(void)
605 {
606 size_t i;
607 char status_string[4096];
608 char *res, *element;
609 struct arg argument;
610
611 if (!(dpy = XOpenDisplay(0x0))) {
612 fprintf(stderr, "Cannot open display!\n");
613 exit(1);
614 }
615
616 for (;;) {
617 memset(status_string, 0, sizeof(status_string));
618 for (i = 0; i < sizeof(args) / sizeof(args[0]); ++i) {
619 argument = args[i];
620 if (argument.args == NULL)
621 res = argument.func();
622 else
623 res = argument.func(argument.args);
624 element = smprintf(argument.format, res);
625 if (element == NULL) {
626 element = smprintf(UNKNOWN_STR);
627 fprintf(stderr, "Failed to format output.\n");
628 }
629 strlcat(status_string, element, sizeof(status_string));
630 free(res);
631 free(element);
632 }
633
634 setstatus(status_string);
635 sleep(UPDATE_INTERVAL -1);
636 }
637
638 XCloseDisplay(dpy);
639 return 0;
640 }