procps/powertop.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * A mini 'powertop' utility:
   4  *   Analyze power consumption on Intel-based laptops.
   5  * Based on powertop 1.11.
   6  *
   7  * Copyright (C) 2010 Marek Polacek <mmpolacek@gmail.com>
   8  *
   9  * Licensed under GPLv2, see file LICENSE in this source tree.
  10  */
  11
  12 //applet:IF_POWERTOP(APPLET(powertop, _BB_DIR_BIN, _BB_SUID_DROP))
  13
  14 //kbuild:lib-$(CONFIG_POWERTOP) += powertop.o
  15
  16 //config:config POWERTOP
  17 //config:       bool "powertop"
  18 //config:       default y
  19 //config:       help
  20 //config:         Analyze power consumption on Intel-based laptops
  21
  22 // XXX This should be configurable
  23 #define ENABLE_FEATURE_POWERTOP_PROCIRQ 1
  24
  25 #include "libbb.h"
  26
  27
  28 //#define debug(fmt, ...) fprintf(stderr, fmt, ## __VA_ARGS__)
  29 #define debug(fmt, ...) ((void)0)
  30
  31
  32 #define BLOATY_HPET_IRQ_NUM_DETECTION 0
  33 #define MAX_CSTATE_COUNT   8
  34 #define IRQCOUNT           40
  35
  36
  37 #define DEFAULT_SLEEP      10
  38 #define DEFAULT_SLEEP_STR "10"
  39
  40 /* Frequency of the ACPI timer */
  41 #define FREQ_ACPI          3579.545
  42 #define FREQ_ACPI_1000     3579545
  43
  44 /* Max filename length of entry in /sys/devices subsystem */
  45 #define BIG_SYSNAME_LEN    16
  46
  47 typedef unsigned long long ullong;
  48
  49 struct line {
  50         char *string;
  51         int count;
  52         /*int disk_count;*/
  53 };
  54
  55 #if ENABLE_FEATURE_POWERTOP_PROCIRQ
  56 struct irqdata {
  57         smallint active;
  58         int number;
  59         ullong count;
  60         char irq_desc[32];
  61 };
  62 #endif
  63
  64 struct globals {
  65         struct line *lines; /* the most often used member */
  66         int lines_cnt;
  67         int lines_cumulative_count;
  68         int maxcstate;
  69         unsigned total_cpus;
  70         smallint cant_enable_timer_stats;
  71 #if ENABLE_FEATURE_POWERTOP_PROCIRQ
  72 # if BLOATY_HPET_IRQ_NUM_DETECTION
  73         smallint scanned_timer_list;
  74         int percpu_hpet_start;
  75         int percpu_hpet_end;
  76 # endif
  77         int interrupt_0;
  78         int total_interrupt;
  79         struct irqdata interrupts[IRQCOUNT];
  80 #endif
  81         ullong start_usage[MAX_CSTATE_COUNT];
  82         ullong last_usage[MAX_CSTATE_COUNT];
  83         ullong start_duration[MAX_CSTATE_COUNT];
  84         ullong last_duration[MAX_CSTATE_COUNT];
  85 #if ENABLE_FEATURE_USE_TERMIOS
  86         struct termios init_settings;
  87 #endif
  88 };
  89 #define G (*ptr_to_globals)
  90 #define INIT_G() do { \
  91         SET_PTR_TO_GLOBALS(xzalloc(sizeof(G))); \
  92 } while (0)
  93
  94 #if ENABLE_FEATURE_USE_TERMIOS
  95 static void reset_term(void)
  96 {
  97         tcsetattr_stdin_TCSANOW(&G.init_settings);
  98 }
  99
 100 static void sig_handler(int signo UNUSED_PARAM)
 101 {
 102         reset_term();
 103         _exit(EXIT_FAILURE);
 104 }
 105 #endif
 106
 107 static int write_str_to_file(const char *fname, const char *str)
 108 {
 109         FILE *fp = fopen_for_write(fname);
 110         if (!fp)
 111                 return 1;
 112         fputs(str, fp);
 113         fclose(fp);
 114         return 0;
 115 }
 116
 117 /* Make it more readable */
 118 #define start_timer() write_str_to_file("/proc/timer_stats", "1\n")
 119 #define stop_timer()  write_str_to_file("/proc/timer_stats", "0\n")
 120
 121 static NOINLINE void clear_lines(void)
 122 {
 123         int i;
 124         if (G.lines) {
 125                 for (i = 0; i < G.lines_cnt; i++)
 126                         free(G.lines[i].string);
 127                 free(G.lines);
 128                 G.lines_cnt = 0;
 129                 G.lines = NULL;
 130         }
 131 }
 132
 133 static void update_lines_cumulative_count(void)
 134 {
 135         int i;
 136         for (i = 0; i < G.lines_cnt; i++)
 137                 G.lines_cumulative_count += G.lines[i].count;
 138 }
 139
 140 static int line_compare(const void *p1, const void *p2)
 141 {
 142         const struct line *a = p1;
 143         const struct line *b = p2;
 144         return (b->count /*+ 50 * b->disk_count*/) - (a->count /*+ 50 * a->disk_count*/);
 145 }
 146
 147 static void sort_lines(void)
 148 {
 149         qsort(G.lines, G.lines_cnt, sizeof(G.lines[0]), line_compare);
 150 }
 151
 152 /* Save C-state usage and duration. Also update maxcstate. */
 153 static void read_cstate_counts(ullong *usage, ullong *duration)
 154 {
 155         DIR *dir;
 156         struct dirent *d;
 157
 158         dir = opendir("/proc/acpi/processor");
 159         if (!dir)
 160                 return;
 161
 162         while ((d = readdir(dir)) != NULL) {
 163                 FILE *fp;
 164                 char buf[192];
 165                 int level;
 166                 int len;
 167
 168                 len = strlen(d->d_name); /* "CPUnn" */
 169                 if (len < 3 || len > BIG_SYSNAME_LEN)
 170                         continue;
 171
 172                 sprintf(buf, "%s/%s/power", "/proc/acpi/processor", d->d_name);
 173                 fp = fopen_for_read(buf);
 174                 if (!fp)
 175                         continue;
 176
 177 // Example file contents:
 178 // active state:            C0
 179 // max_cstate:              C8
 180 // maximum allowed latency: 2000000000 usec
 181 // states:
 182 //     C1:                  type[C1] promotion[--] demotion[--] latency[001] usage[00006173] duration[00000000000000000000]
 183 //     C2:                  type[C2] promotion[--] demotion[--] latency[001] usage[00085191] duration[00000000000083024907]
 184 //     C3:                  type[C3] promotion[--] demotion[--] latency[017] usage[01017622] duration[00000000017921327182]
 185                 level = 0;
 186                 while (fgets(buf, sizeof(buf), fp)) {
 187                         char *p = strstr(buf, "age[");
 188                         if (!p)
 189                                 continue;
 190                         p += 4;
 191                         usage[level] += bb_strtoull(p, NULL, 10) + 1;
 192                         p = strstr(buf, "ation[");
 193                         if (!p)
 194                                 continue;
 195                         p += 6;
 196                         duration[level] += bb_strtoull(p, NULL, 10);
 197
 198                         if (level >= MAX_CSTATE_COUNT-1)
 199                                 break;
 200                         level++;
 201                         if (level > G.maxcstate)  /* update maxcstate */
 202                                 G.maxcstate = level;
 203                 }
 204                 fclose(fp);
 205         }
 206         closedir(dir);
 207 }
 208
 209 /* Add line and/or update count */
 210 static void save_line(const char *string, int count)
 211 {
 212         int i;
 213         for (i = 0; i < G.lines_cnt; i++) {
 214                 if (strcmp(string, G.lines[i].string) == 0) {
 215                         /* It's already there, only update count */
 216                         G.lines[i].count += count;
 217                         return;
 218                 }
 219         }
 220
 221         /* Add new line */
 222         G.lines = xrealloc_vector(G.lines, 4, G.lines_cnt);
 223         G.lines[G.lines_cnt].string = xstrdup(string);
 224         G.lines[G.lines_cnt].count = count;
 225         /*G.lines[G.lines_cnt].disk_count = 0;*/
 226         G.lines_cnt++;
 227 }
 228
 229 #if ENABLE_FEATURE_POWERTOP_PROCIRQ
 230 static int is_hpet_irq(const char *name)
 231 {
 232         char *p;
 233 # if BLOATY_HPET_IRQ_NUM_DETECTION
 234         long hpet_chan;
 235
 236         /* Learn the range of existing hpet timers. This is done once */
 237         if (!G.scanned_timer_list) {
 238                 FILE *fp;
 239                 char buf[80];
 240
 241                 G.scanned_timer_list = true;
 242                 fp = fopen_for_read("/proc/timer_list");
 243                 if (!fp)
 244                         return 0;
 245
 246                 while (fgets(buf, sizeof(buf), fp)) {
 247                         p = strstr(buf, "Clock Event Device: hpet");
 248                         if (!p)
 249                                 continue;
 250                         p += sizeof("Clock Event Device: hpet")-1;
 251                         if (!isdigit(*p))
 252                                 continue;
 253                         hpet_chan = xatoi_positive(p);
 254                         if (hpet_chan < G.percpu_hpet_start)
 255                                 G.percpu_hpet_start = hpet_chan;
 256                         if (hpet_chan > G.percpu_hpet_end)
 257                                 G.percpu_hpet_end = hpet_chan;
 258                 }
 259                 fclose(fp);
 260         }
 261 # endif
 262 //TODO: optimize
 263         p = strstr(name, "hpet");
 264         if (!p)
 265                 return 0;
 266         p += 4;
 267         if (!isdigit(*p))
 268                 return 0;
 269 # if BLOATY_HPET_IRQ_NUM_DETECTION
 270         hpet_chan = xatoi_positive(p);
 271         if (hpet_chan < G.percpu_hpet_start || hpet_chan > G.percpu_hpet_end)
 272                 return 0;
 273 # endif
 274         return 1;
 275 }
 276
 277 /* Save new IRQ count, return delta from old one */
 278 static int save_irq_count(int irq, ullong count)
 279 {
 280         int unused = IRQCOUNT;
 281         int i;
 282         for (i = 0; i < IRQCOUNT; i++) {
 283                 if (G.interrupts[i].active && G.interrupts[i].number == irq) {
 284                         ullong old = G.interrupts[i].count;
 285                         G.interrupts[i].count = count;
 286                         return count - old;
 287                 }
 288                 if (!G.interrupts[i].active && unused > i)
 289                         unused = i;
 290         }
 291         if (unused < IRQCOUNT) {
 292                 G.interrupts[unused].active = 1;
 293                 G.interrupts[unused].count = count;
 294                 G.interrupts[unused].number = irq;
 295         }
 296         return count;
 297 }
 298
 299 /* Read /proc/interrupts, save IRQ counts and IRQ description */
 300 static void process_irq_counts(void)
 301 {
 302         FILE *fp;
 303         char buf[128];
 304
 305         /* Reset values */
 306         G.interrupt_0 = 0;
 307         G.total_interrupt = 0;
 308
 309         fp = xfopen_for_read("/proc/interrupts");
 310         while (fgets(buf, sizeof(buf), fp)) {
 311                 char irq_desc[sizeof("   <kernel IPI> : ") + sizeof(buf)];
 312                 char *p;
 313                 const char *name;
 314                 int nr;
 315                 ullong count;
 316                 ullong delta;
 317
 318                 p = strchr(buf, ':');
 319                 if (!p)
 320                         continue;
 321                 /*  0:  143646045  153901007   IO-APIC-edge      timer
 322                  *   ^
 323                  */
 324                 *p = '\0';
 325                 /* Deal with non-maskable interrupts -- make up fake numbers */
 326                 nr = index_in_strings("NMI\0RES\nCAL\0TLB\0TRM\0THR\0SPU\0", buf);
 327                 if (nr != -1) {
 328                         nr += 20000;
 329                 } else {
 330                         /* bb_strtou doesn't eat leading spaces, using strtoul */
 331                         nr = strtoul(buf, NULL, 10);
 332                 }
 333                 *p = ':';
 334
 335                 if (nr == -1)
 336                         continue;
 337
 338                 p++;
 339                 /*  0:  143646045  153901007   IO-APIC-edge      timer
 340                  *    ^
 341                  */
 342                 /* Sum counts for this IRQ */
 343                 count = 0;
 344                 while (1) {
 345                         char *tmp;
 346                         p = skip_whitespace(p);
 347                         if (!isdigit(*p))
 348                                 break;
 349                         count += bb_strtoull(p, &tmp, 10);
 350                         p = tmp;
 351                 }
 352                 /*   0:  143646045  153901007   IO-APIC-edge      timer
 353                  * NMI:          1          2   Non-maskable interrupts
 354                  *                              ^
 355                  */
 356                 if (nr < 20000) {
 357                         /* Skip to the interrupt name, e.g. 'timer' */
 358                         p = strchr(p, ' ');
 359                         if (!p)
 360                                 continue;
 361                         p = skip_whitespace(p);
 362                 }
 363
 364                 name = p;
 365                 strchrnul(name, '\n')[0] = '\0';
 366                 /* Save description of the interrupt */
 367                 if (nr >= 20000)
 368                         sprintf(irq_desc, "   <kernel IPI> : %s", name);
 369                 else
 370                         sprintf(irq_desc, "    <interrupt> : %s", name);
 371
 372                 delta = save_irq_count(nr, count);
 373
 374                 /* Skip per CPU timer interrupts */
 375                 if (is_hpet_irq(name))
 376                         continue;
 377
 378                 if (nr != 0 && delta != 0)
 379                         save_line(irq_desc, delta);
 380
 381                 if (nr == 0)
 382                         G.interrupt_0 = delta;
 383                 else
 384                         G.total_interrupt += delta;
 385         }
 386
 387         fclose(fp);
 388 }
 389 #else /* !ENABLE_FEATURE_POWERTOP_PROCIRQ */
 390 # define process_irq_counts()  ((void)0)
 391 #endif
 392
 393 static NOINLINE int process_timer_stats(void)
 394 {
 395         char buf[128];
 396         char line[15 + 3 + 128];
 397         int n;
 398         ullong totalticks;
 399         FILE *fp;
 400
 401         buf[0] = '\0';
 402         totalticks = 0;
 403
 404         fp = NULL;
 405         if (!G.cant_enable_timer_stats)
 406                 fp = fopen_for_read("/proc/timer_stats");
 407         if (fp) {
 408 // Example file contents:
 409 // Timer Stats Version: v0.2
 410 // Sample period: 1.329 s
 411 //    76,     0 swapper          hrtimer_start_range_ns (tick_sched_timer)
 412 //    88,     0 swapper          hrtimer_start_range_ns (tick_sched_timer)
 413 //    24,  3787 firefox          hrtimer_start_range_ns (hrtimer_wakeup)
 414 //   46D,  1136 kondemand/1      do_dbs_timer (delayed_work_timer_fn)
 415 // ...
 416 //     1,  1656 Xorg             hrtimer_start_range_ns (hrtimer_wakeup)
 417 //     1,  2159 udisks-daemon    hrtimer_start_range_ns (hrtimer_wakeup)
 418 // 331 total events, 249.059 events/sec
 419                 while (fgets(buf, sizeof(buf), fp)) {
 420                         const char *count, *process, *func;
 421                         char *p;
 422                         int idx;
 423
 424                         count = skip_whitespace(buf);
 425                         if (strcmp(strchrnul(count, ' '), " total events") == 0)
 426                                 break;
 427                         p = strchr(count, ',');
 428                         if (!p)
 429                                 continue;
 430                         *p++ = '\0';
 431                         if (strchr(count, 'D'))
 432                                 continue; /* deferred */
 433                         p = skip_whitespace(p); /* points to pid now */
 434                         process = NULL;
 435  get_func_name:
 436                         p = strchr(p, ' ');
 437                         if (!p)
 438                                 continue;
 439                         *p++ = '\0';
 440                         p = skip_whitespace(p);
 441                         if (process == NULL) {
 442                                 process = p;
 443                                 goto get_func_name;
 444                         }
 445                         func = p;
 446
 447                         //if (strcmp(process, "swapper") == 0
 448                         // && strcmp(func, "hrtimer_start_range_ns (tick_sched_timer)\n") == 0
 449                         //) {
 450                         //      process = "[kernel scheduler]";
 451                         //      func = "Load balancing tick";
 452                         //}
 453
 454                         if (strncmp(func, "tick_nohz_", 10) == 0)
 455                                 continue;
 456                         if (strncmp(func, "tick_setup_sched_timer", 20) == 0)
 457                                 continue;
 458                         //if (strcmp(process, "powertop") == 0)
 459                         //      continue;
 460
 461                         idx = index_in_strings("insmod\0modprobe\0swapper\0", process);
 462                         if (idx != -1) {
 463                                 process = idx < 2 ? "[kernel module]" : "<kernel core>";
 464                         }
 465
 466                         strchrnul(p, '\n')[0] = '\0';
 467
 468                         // 46D\01136\0kondemand/1\0do_dbs_timer (delayed_work_timer_fn)
 469                         // ^          ^            ^
 470                         // count      process      func
 471
 472                         //if (strchr(process, '['))
 473                                 sprintf(line, "%15.15s : %s", process, func);
 474                         //else
 475                         //      sprintf(line, "%s", process);
 476                         save_line(line, bb_strtoull(count, NULL, 10));
 477                 }
 478                 fclose(fp);
 479         }
 480
 481         n = 0;
 482 #if ENABLE_FEATURE_POWERTOP_PROCIRQ
 483         if (strstr(buf, " total events")) {
 484                 n = bb_strtoull(buf, NULL, 10) / G.total_cpus;
 485                 if (n > 0 && n < G.interrupt_0) {
 486                         sprintf(line, "    <interrupt> : %s", "extra timer interrupt");
 487                         save_line(line, G.interrupt_0 - n);
 488                 }
 489         }
 490 #endif
 491         return n;
 492 }
 493
 494 #ifdef __i386__
 495 /*
 496  * Get information about CPU using CPUID opcode.
 497  */
 498 static void cpuid(unsigned int *eax, unsigned int *ebx, unsigned int *ecx,
 499                                   unsigned int *edx)
 500 {
 501         /* EAX value specifies what information to return */
 502         __asm__(
 503                 "       pushl %%ebx\n"     /* Save EBX */
 504                 "       cpuid\n"
 505                 "       movl %%ebx, %1\n"  /* Save content of EBX */
 506                 "       popl %%ebx\n"      /* Restore EBX */
 507                 : "=a"(*eax), /* Output */
 508                   "=r"(*ebx),
 509                   "=c"(*ecx),
 510                   "=d"(*edx)
 511                 : "0"(*eax),  /* Input */
 512                   "1"(*ebx),
 513                   "2"(*ecx),
 514                   "3"(*edx)
 515                 /* No clobbered registers */
 516         );
 517 }
 518 #endif
 519
 520 #ifdef __i386__
 521 static NOINLINE void print_intel_cstates(void)
 522 {
 523         int bios_table[8] = { 0 };
 524         int nbios = 0;
 525         DIR *cpudir;
 526         struct dirent *d;
 527         int i;
 528         unsigned eax, ebx, ecx, edx;
 529
 530         cpudir = opendir("/sys/devices/system/cpu");
 531         if (!cpudir)
 532                 return;
 533
 534         /* Loop over cpuN entries */
 535         while ((d = readdir(cpudir)) != NULL) {
 536                 DIR *dir;
 537                 int len;
 538                 char fname[sizeof("/sys/devices/system/cpu//cpuidle//desc") + 2*BIG_SYSNAME_LEN];
 539
 540                 len = strlen(d->d_name);
 541                 if (len < 3 || len > BIG_SYSNAME_LEN)
 542                         continue;
 543
 544                 if (!isdigit(d->d_name[3]))
 545                         continue;
 546
 547                 len = sprintf(fname, "%s/%s/cpuidle", "/sys/devices/system/cpu", d->d_name);
 548                 dir = opendir(fname);
 549                 if (!dir)
 550                         continue;
 551
 552                 /*
 553                  * Every C-state has its own stateN directory, that
 554                  * contains a 'time' and a 'usage' file.
 555                  */
 556                 while ((d = readdir(dir)) != NULL) {
 557                         FILE *fp;
 558                         char buf[64];
 559                         int n;
 560
 561                         n = strlen(d->d_name);
 562                         if (n < 3 || n > BIG_SYSNAME_LEN)
 563                                 continue;
 564
 565                         sprintf(fname + len, "/%s/desc", d->d_name);
 566                         fp = fopen_for_read(fname);
 567                         if (fp) {
 568                                 char *p = fgets(buf, sizeof(buf), fp);
 569                                 fclose(fp);
 570                                 if (!p)
 571                                         break;
 572                                 p = strstr(p, "MWAIT ");
 573                                 if (p) {
 574                                         int pos;
 575                                         p += sizeof("MWAIT ") - 1;
 576                                         pos = (bb_strtoull(p, NULL, 16) >> 4) + 1;
 577                                         if (pos >= ARRAY_SIZE(bios_table))
 578                                                 continue;
 579                                         bios_table[pos]++;
 580                                         nbios++;
 581                                 }
 582                         }
 583                 }
 584                 closedir(dir);
 585         }
 586         closedir(cpudir);
 587
 588         if (!nbios)
 589                 return;
 590
 591         eax = 5;
 592         ebx = ecx = edx = 0;
 593         cpuid(&eax, &ebx, &ecx, &edx);
 594         if (!edx || !(ecx & 1))
 595                 return;
 596
 597         printf("Your CPU supports the following C-states: ");
 598         i = 0;
 599         while (edx) {
 600                 if (edx & 7)
 601                         printf("C%u ", i);
 602                 edx >>= 4;
 603                 i++;
 604         }
 605         bb_putchar('\n');
 606
 607         /* Print BIOS C-States */
 608         printf("Your BIOS reports the following C-states: ");
 609         for (i = 0; i < ARRAY_SIZE(bios_table); i++)
 610                 if (bios_table[i])
 611                         printf("C%u ", i);
 612
 613         bb_putchar('\n');
 614 }
 615 #else
 616 # define print_intel_cstates() ((void)0)
 617 #endif
 618
 619 static void show_timerstats(void)
 620 {
 621         unsigned lines;
 622
 623         /* Get terminal height */
 624         get_terminal_width_height(STDOUT_FILENO, NULL, &lines);
 625
 626         /* We don't have whole terminal just for timerstats */
 627         lines -= 12;
 628
 629         if (!G.cant_enable_timer_stats) {
 630                 int i, n = 0;
 631                 char strbuf6[6];
 632
 633                 strbuf6[5] = '\0';
 634                 puts("\nTop causes for wakeups:");
 635                 for (i = 0; i < G.lines_cnt; i++) {
 636                         if ((G.lines[i].count > 0 /*|| G.lines[i].disk_count > 0*/)
 637                          && n++ < lines
 638                         ) {
 639                                 /* NB: upstream powertop prints "(wakeups/sec)",
 640                                  * we print just "(wakeup counts)".
 641                                  */
 642                                 /*char c = ' ';
 643                                 if (G.lines[i].disk_count)
 644                                         c = 'D';*/
 645                                 smart_ulltoa5(G.lines[i].count, strbuf6, " KMGTPEZY");
 646                                 printf(/*" %5.1f%% (%s)%c  %s\n"*/
 647                                         " %5.1f%% (%s)   %s\n",
 648                                         G.lines[i].count * 100.0 / G.lines_cumulative_count,
 649                                         strbuf6, /*c,*/
 650                                         G.lines[i].string);
 651                         }
 652                 }
 653         } else {
 654                 bb_putchar('\n');
 655                 bb_error_msg("no stats available; run as root or"
 656                                 " enable the cpufreq_stats module");
 657         }
 658 }
 659
 660 // Example display from powertop version 1.11
 661 // Cn                Avg residency       P-states (frequencies)
 662 // C0 (cpu running)        ( 0.5%)         2.00 Ghz     0.0%
 663 // polling           0.0ms ( 0.0%)         1.67 Ghz     0.0%
 664 // C1 mwait          0.0ms ( 0.0%)         1333 Mhz     0.1%
 665 // C2 mwait          0.1ms ( 0.1%)         1000 Mhz    99.9%
 666 // C3 mwait         12.1ms (99.4%)
 667 //
 668 // Wakeups-from-idle per second : 93.6     interval: 15.0s
 669 // no ACPI power usage estimate available
 670 //
 671 // Top causes for wakeups:
 672 //   32.4% ( 26.7)       <interrupt> : extra timer interrupt
 673 //   29.0% ( 23.9)     <kernel core> : hrtimer_start_range_ns (tick_sched_timer)
 674 //    9.0% (  7.5)     <kernel core> : hrtimer_start (tick_sched_timer)
 675 //    6.5% (  5.3)       <interrupt> : ata_piix
 676 //    5.0% (  4.1)             inetd : hrtimer_start_range_ns (hrtimer_wakeup)
 677
 678 //usage:#define powertop_trivial_usage
 679 //usage:       ""
 680 //usage:#define powertop_full_usage "\n\n"
 681 //usage:       "Analyze power consumption on Intel-based laptops\n"
 682
 683 int powertop_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
 684 int powertop_main(int UNUSED_PARAM argc, char UNUSED_PARAM **argv)
 685 {
 686         ullong cur_usage[MAX_CSTATE_COUNT];
 687         ullong cur_duration[MAX_CSTATE_COUNT];
 688         char cstate_lines[MAX_CSTATE_COUNT + 2][64];
 689 #if ENABLE_FEATURE_USE_TERMIOS
 690         struct termios new_settings;
 691         struct pollfd pfd[1];
 692
 693         pfd[0].fd = 0;
 694         pfd[0].events = POLLIN;
 695 #endif
 696
 697         INIT_G();
 698
 699 #if ENABLE_FEATURE_POWERTOP_PROCIRQ && BLOATY_HPET_IRQ_NUM_DETECTION
 700         G.percpu_hpet_start = INT_MAX;
 701         G.percpu_hpet_end = INT_MIN;
 702 #endif
 703
 704         /* Print warning when we don't have superuser privileges */
 705         if (geteuid() != 0)
 706                 bb_error_msg("run as root to collect enough information");
 707
 708         /* Get number of CPUs */
 709         G.total_cpus = get_cpu_count();
 710
 711         printf("Collecting data for "DEFAULT_SLEEP_STR" seconds\n");
 712
 713 #if ENABLE_FEATURE_USE_TERMIOS
 714         tcgetattr(0, (void *)&G.init_settings);
 715         memcpy(&new_settings, &G.init_settings, sizeof(new_settings));
 716         /* Turn on unbuffered input, turn off echoing */
 717         new_settings.c_lflag &= ~(ISIG | ICANON | ECHO | ECHONL);
 718         /* So we don't forget to reset term settings */
 719         atexit(reset_term);
 720         bb_signals(BB_FATAL_SIGS, sig_handler);
 721         tcsetattr_stdin_TCSANOW(&new_settings);
 722 #endif
 723
 724         /* Collect initial data */
 725         process_irq_counts();
 726
 727         /* Read initial usage and duration */
 728         read_cstate_counts(G.start_usage, G.start_duration);
 729
 730         /* Copy them to "last" */
 731         memcpy(G.last_usage, G.start_usage, sizeof(G.last_usage));
 732         memcpy(G.last_duration, G.start_duration, sizeof(G.last_duration));
 733
 734         /* Display C-states */
 735         print_intel_cstates();
 736
 737         G.cant_enable_timer_stats |= stop_timer(); /* 1 on error */
 738
 739         /* The main loop */
 740         for (;;) {
 741                 //double maxsleep = 0.0;
 742                 ullong totalticks, totalevents;
 743                 int i;
 744
 745                 G.cant_enable_timer_stats |= start_timer(); /* 1 on error */
 746 #if !ENABLE_FEATURE_USE_TERMIOS
 747                 sleep(DEFAULT_SLEEP);
 748 #else
 749                 if (safe_poll(pfd, 1, DEFAULT_SLEEP * 1000) > 0) {
 750                         unsigned char c;
 751                         if (safe_read(STDIN_FILENO, &c, 1) != 1)
 752                                 break; /* EOF/error */
 753                         if (c == G.init_settings.c_cc[VINTR])
 754                                 break; /* ^C */
 755                         if ((c | 0x20) == 'q')
 756                                 break;
 757                 }
 758 #endif
 759                 G.cant_enable_timer_stats |= stop_timer(); /* 1 on error */
 760
 761                 clear_lines();
 762                 process_irq_counts();
 763
 764                 /* Clear the stats */
 765                 memset(cur_duration, 0, sizeof(cur_duration));
 766                 memset(cur_usage, 0, sizeof(cur_usage));
 767
 768                 /* Read them */
 769                 read_cstate_counts(cur_usage, cur_duration);
 770
 771                 /* Count totalticks and totalevents */
 772                 totalticks = totalevents = 0;
 773                 for (i = 0; i < MAX_CSTATE_COUNT; i++) {
 774                         if (cur_usage[i] != 0) {
 775                                 totalticks += cur_duration[i] - G.last_duration[i];
 776                                 totalevents += cur_usage[i] - G.last_usage[i];
 777                         }
 778                 }
 779
 780                 /* Clear the screen */
 781                 printf("\033[H\033[J");
 782
 783                 /* Clear C-state lines */
 784                 memset(&cstate_lines, 0, sizeof(cstate_lines));
 785
 786                 if (totalevents == 0 && G.maxcstate <= 1) {
 787                         /* This should not happen */
 788                         strcpy(cstate_lines[0], "C-state information is not available\n");
 789                 } else {
 790                         double percentage;
 791                         unsigned newticks;
 792
 793                         newticks = G.total_cpus * DEFAULT_SLEEP * FREQ_ACPI_1000 - totalticks;
 794                         /* Handle rounding errors: do not display negative values */
 795                         if ((int)newticks < 0)
 796                                 newticks = 0;
 797
 798                         sprintf(cstate_lines[0], "Cn\t\t  Avg residency\n");
 799                         percentage = newticks * 100.0 / (G.total_cpus * DEFAULT_SLEEP * FREQ_ACPI_1000);
 800                         sprintf(cstate_lines[1], "C0 (cpu running)        (%4.1f%%)\n", percentage);
 801
 802                         /* Compute values for individual C-states */
 803                         for (i = 0; i < MAX_CSTATE_COUNT; i++) {
 804                                 if (cur_usage[i] != 0) {
 805                                         double slept;
 806                                         slept = (cur_duration[i] - G.last_duration[i])
 807                                                 / (cur_usage[i] - G.last_usage[i] + 0.1) / FREQ_ACPI;
 808                                         percentage = (cur_duration[i] - G.last_duration[i]) * 100
 809                                                 / (G.total_cpus * DEFAULT_SLEEP * FREQ_ACPI_1000);
 810                                         sprintf(cstate_lines[i + 2], "C%u\t\t%5.1fms (%4.1f%%)\n",
 811                                                 i + 1, slept, percentage);
 812                                         //if (maxsleep < slept)
 813                                         //      maxsleep = slept;
 814                                 }
 815                         }
 816                 }
 817
 818                 for (i = 0; i < MAX_CSTATE_COUNT + 2; i++)
 819                         if (cstate_lines[i][0])
 820                                 fputs(cstate_lines[i], stdout);
 821
 822                 i = process_timer_stats();
 823 #if ENABLE_FEATURE_POWERTOP_PROCIRQ
 824                 if (totalevents == 0) {
 825                         /* No C-state info available, use timerstats */
 826                         totalevents = i * G.total_cpus + G.total_interrupt;
 827                         if (i < 0)
 828                                 totalevents += G.interrupt_0 - i;
 829                 }
 830 #endif
 831                 /* Upstream powertop prints wakeups per sec per CPU,
 832                  * we print just raw wakeup counts.
 833                  */
 834 //TODO: show real seconds (think about manual refresh)
 835                 printf("\nWakeups-from-idle in %u seconds: %llu\n",
 836                         DEFAULT_SLEEP,
 837                         totalevents
 838                 );
 839
 840                 update_lines_cumulative_count();
 841                 sort_lines();
 842                 show_timerstats();
 843                 fflush(stdout);
 844
 845                 /* Clear the stats */
 846                 memset(cur_duration, 0, sizeof(cur_duration));
 847                 memset(cur_usage, 0, sizeof(cur_usage));
 848
 849                 /* Get new values */
 850                 read_cstate_counts(cur_usage, cur_duration);
 851
 852                 /* Save them */
 853                 memcpy(G.last_usage, cur_usage, sizeof(G.last_usage));
 854                 memcpy(G.last_duration, cur_duration, sizeof(G.last_duration));
 855         } /* for (;;) */
 856
 857         bb_putchar('\n');
 858
 859         return EXIT_SUCCESS;
 860 }