1 /* 2 * (C) 2010,2011 Thomas Renninger <trenn@suse.de>, Novell Inc. 3 * 4 * Licensed under the terms of the GNU GPL License version 2. 5 * 6 * Output format inspired by Len Brown's <lenb@kernel.org> turbostat tool. 7 * 8 */ 9 10 11 #include <stdio.h> 12 #include <unistd.h> 13 #include <stdlib.h> 14 #include <string.h> 15 #include <time.h> 16 #include <signal.h> 17 #include <sys/types.h> 18 #include <sys/wait.h> 19 #include <libgen.h> 20 21 #include "idle_monitor/cpupower-monitor.h" 22 #include "idle_monitor/idle_monitors.h" 23 #include "helpers/helpers.h" 24 25 /* Define pointers to all monitors. */ 26 #define DEF(x) & x ## _monitor , 27 struct cpuidle_monitor *all_monitors[] = { 28 #include "idle_monitors.def" 29 0 30 }; 31 32 static struct cpuidle_monitor *monitors[MONITORS_MAX]; 33 static unsigned int avail_monitors; 34 35 static char *progname; 36 37 enum operation_mode_e { list = 1, show, show_all }; 38 static int mode; 39 static int interval = 1; 40 static char *show_monitors_param; 41 static struct cpupower_topology cpu_top; 42 static unsigned int wake_cpus; 43 44 /* ToDo: Document this in the manpage */ 45 static char range_abbr[RANGE_MAX] = { 'T', 'C', 'P', 'M', }; 46 47 static void print_wrong_arg_exit(void) 48 { 49 printf(_("invalid or unknown argument\n")); 50 exit(EXIT_FAILURE); 51 } 52 53 long long timespec_diff_us(struct timespec start, struct timespec end) 54 { 55 struct timespec temp; 56 if ((end.tv_nsec - start.tv_nsec) < 0) { 57 temp.tv_sec = end.tv_sec - start.tv_sec - 1; 58 temp.tv_nsec = 1000000000 + end.tv_nsec - start.tv_nsec; 59 } else { 60 temp.tv_sec = end.tv_sec - start.tv_sec; 61 temp.tv_nsec = end.tv_nsec - start.tv_nsec; 62 } 63 return (temp.tv_sec * 1000000) + (temp.tv_nsec / 1000); 64 } 65 66 void print_n_spaces(int n) 67 { 68 int x; 69 for (x = 0; x < n; x++) 70 printf(" "); 71 } 72 73 /*s is filled with left and right spaces 74 *to make its length atleast n+1 75 */ 76 int fill_string_with_spaces(char *s, int n) 77 { 78 char *temp; 79 int len = strlen(s); 80 81 if (len >= n) 82 return -1; 83 84 temp = malloc(sizeof(char) * (n+1)); 85 for (; len < n; len++) 86 s[len] = ' '; 87 s[len] = '\0'; 88 snprintf(temp, n+1, " %s", s); 89 strcpy(s, temp); 90 free(temp); 91 return 0; 92 } 93 94 #define MAX_COL_WIDTH 6 95 void print_header(int topology_depth) 96 { 97 int unsigned mon; 98 int state, need_len; 99 cstate_t s; 100 char buf[128] = ""; 101 102 fill_string_with_spaces(buf, topology_depth * 5 - 1); 103 printf("%s|", buf); 104 105 for (mon = 0; mon < avail_monitors; mon++) { 106 need_len = monitors[mon]->hw_states_num * (MAX_COL_WIDTH + 1) 107 - 1; 108 if (mon != 0) 109 printf("||"); 110 sprintf(buf, "%s", monitors[mon]->name); 111 fill_string_with_spaces(buf, need_len); 112 printf("%s", buf); 113 } 114 printf("\n"); 115 116 if (topology_depth > 2) 117 printf(" PKG|"); 118 if (topology_depth > 1) 119 printf("CORE|"); 120 if (topology_depth > 0) 121 printf(" CPU|"); 122 123 for (mon = 0; mon < avail_monitors; mon++) { 124 if (mon != 0) 125 printf("||"); 126 for (state = 0; state < monitors[mon]->hw_states_num; state++) { 127 if (state != 0) 128 printf("|"); 129 s = monitors[mon]->hw_states[state]; 130 sprintf(buf, "%s", s.name); 131 fill_string_with_spaces(buf, MAX_COL_WIDTH); 132 printf("%s", buf); 133 } 134 printf(" "); 135 } 136 printf("\n"); 137 } 138 139 140 void print_results(int topology_depth, int cpu) 141 { 142 unsigned int mon; 143 int state, ret; 144 double percent; 145 unsigned long long result; 146 cstate_t s; 147 148 /* Be careful CPUs may got resorted for pkg value do not just use cpu */ 149 if (!bitmask_isbitset(cpus_chosen, cpu_top.core_info[cpu].cpu)) 150 return; 151 if (!cpu_top.core_info[cpu].is_online && 152 cpu_top.core_info[cpu].pkg == -1) 153 return; 154 155 if (topology_depth > 2) 156 printf("%4d|", cpu_top.core_info[cpu].pkg); 157 if (topology_depth > 1) 158 printf("%4d|", cpu_top.core_info[cpu].core); 159 if (topology_depth > 0) 160 printf("%4d|", cpu_top.core_info[cpu].cpu); 161 162 for (mon = 0; mon < avail_monitors; mon++) { 163 if (mon != 0) 164 printf("||"); 165 166 for (state = 0; state < monitors[mon]->hw_states_num; state++) { 167 if (state != 0) 168 printf("|"); 169 170 s = monitors[mon]->hw_states[state]; 171 172 if (s.get_count_percent) { 173 ret = s.get_count_percent(s.id, &percent, 174 cpu_top.core_info[cpu].cpu); 175 if (ret) 176 printf("******"); 177 else if (percent >= 100.0) 178 printf("%6.1f", percent); 179 else 180 printf("%6.2f", percent); 181 } else if (s.get_count) { 182 ret = s.get_count(s.id, &result, 183 cpu_top.core_info[cpu].cpu); 184 if (ret) 185 printf("******"); 186 else 187 printf("%6llu", result); 188 } else { 189 printf(_("Monitor %s, Counter %s has no count " 190 "function. Implementation error\n"), 191 monitors[mon]->name, s.name); 192 exit(EXIT_FAILURE); 193 } 194 } 195 } 196 /* 197 * The monitor could still provide useful data, for example 198 * AMD HW counters partly sit in PCI config space. 199 * It's up to the monitor plug-in to check .is_online, this one 200 * is just for additional info. 201 */ 202 if (!cpu_top.core_info[cpu].is_online && 203 cpu_top.core_info[cpu].pkg != -1) { 204 printf(_(" *is offline\n")); 205 return; 206 } else 207 printf("\n"); 208 } 209 210 211 /* param: string passed by -m param (The list of monitors to show) 212 * 213 * Monitors must have been registered already, matching monitors 214 * are picked out and available monitors array is overridden 215 * with matching ones 216 * 217 * Monitors get sorted in the same order the user passes them 218 */ 219 220 static void parse_monitor_param(char *param) 221 { 222 unsigned int num; 223 int mon, hits = 0; 224 char *tmp = param, *token; 225 struct cpuidle_monitor *tmp_mons[MONITORS_MAX]; 226 227 228 for (mon = 0; mon < MONITORS_MAX; mon++, tmp = NULL) { 229 token = strtok(tmp, ","); 230 if (token == NULL) 231 break; 232 if (strlen(token) >= MONITOR_NAME_LEN) { 233 printf(_("%s: max monitor name length" 234 " (%d) exceeded\n"), token, MONITOR_NAME_LEN); 235 continue; 236 } 237 238 for (num = 0; num < avail_monitors; num++) { 239 if (!strcmp(monitors[num]->name, token)) { 240 dprint("Found requested monitor: %s\n", token); 241 tmp_mons[hits] = monitors[num]; 242 hits++; 243 } 244 } 245 } 246 if (hits == 0) { 247 printf(_("No matching monitor found in %s, " 248 "try -l option\n"), param); 249 exit(EXIT_FAILURE); 250 } 251 /* Override detected/registerd monitors array with requested one */ 252 memcpy(monitors, tmp_mons, 253 sizeof(struct cpuidle_monitor *) * MONITORS_MAX); 254 avail_monitors = hits; 255 } 256 257 void list_monitors(void) 258 { 259 unsigned int mon; 260 int state; 261 cstate_t s; 262 263 for (mon = 0; mon < avail_monitors; mon++) { 264 printf(_("Monitor \"%s\" (%d states) - Might overflow after %u " 265 "s\n"), 266 monitors[mon]->name, monitors[mon]->hw_states_num, 267 monitors[mon]->overflow_s); 268 269 for (state = 0; state < monitors[mon]->hw_states_num; state++) { 270 s = monitors[mon]->hw_states[state]; 271 /* 272 * ToDo show more state capabilities: 273 * percent, time (granlarity) 274 */ 275 printf("%s\t[%c] -> %s\n", s.name, range_abbr[s.range], 276 gettext(s.desc)); 277 } 278 } 279 } 280 281 int fork_it(char **argv) 282 { 283 int status; 284 unsigned int num; 285 unsigned long long timediff; 286 pid_t child_pid; 287 struct timespec start, end; 288 289 child_pid = fork(); 290 clock_gettime(CLOCK_REALTIME, &start); 291 292 for (num = 0; num < avail_monitors; num++) 293 monitors[num]->start(); 294 295 if (!child_pid) { 296 /* child */ 297 execvp(argv[0], argv); 298 } else { 299 /* parent */ 300 if (child_pid == -1) { 301 perror("fork"); 302 exit(1); 303 } 304 305 signal(SIGINT, SIG_IGN); 306 signal(SIGQUIT, SIG_IGN); 307 if (waitpid(child_pid, &status, 0) == -1) { 308 perror("wait"); 309 exit(1); 310 } 311 } 312 clock_gettime(CLOCK_REALTIME, &end); 313 for (num = 0; num < avail_monitors; num++) 314 monitors[num]->stop(); 315 316 timediff = timespec_diff_us(start, end); 317 if (WIFEXITED(status)) 318 printf(_("%s took %.5f seconds and exited with status %d\n"), 319 argv[0], timediff / (1000.0 * 1000), 320 WEXITSTATUS(status)); 321 return 0; 322 } 323 324 int do_interval_measure(int i) 325 { 326 unsigned int num; 327 int cpu; 328 329 if (wake_cpus) 330 for (cpu = 0; cpu < cpu_count; cpu++) 331 bind_cpu(cpu); 332 333 for (num = 0; num < avail_monitors; num++) { 334 dprint("HW C-state residency monitor: %s - States: %d\n", 335 monitors[num]->name, monitors[num]->hw_states_num); 336 monitors[num]->start(); 337 } 338 339 sleep(i); 340 341 if (wake_cpus) 342 for (cpu = 0; cpu < cpu_count; cpu++) 343 bind_cpu(cpu); 344 345 for (num = 0; num < avail_monitors; num++) 346 monitors[num]->stop(); 347 348 349 return 0; 350 } 351 352 static void cmdline(int argc, char *argv[]) 353 { 354 int opt; 355 progname = basename(argv[0]); 356 357 while ((opt = getopt(argc, argv, "+lci:m:")) != -1) { 358 switch (opt) { 359 case 'l': 360 if (mode) 361 print_wrong_arg_exit(); 362 mode = list; 363 break; 364 case 'i': 365 /* only allow -i with -m or no option */ 366 if (mode && mode != show) 367 print_wrong_arg_exit(); 368 interval = atoi(optarg); 369 break; 370 case 'm': 371 if (mode) 372 print_wrong_arg_exit(); 373 mode = show; 374 show_monitors_param = optarg; 375 break; 376 case 'c': 377 wake_cpus = 1; 378 break; 379 default: 380 print_wrong_arg_exit(); 381 } 382 } 383 if (!mode) 384 mode = show_all; 385 } 386 387 int cmd_monitor(int argc, char **argv) 388 { 389 unsigned int num; 390 struct cpuidle_monitor *test_mon; 391 int cpu; 392 393 cmdline(argc, argv); 394 cpu_count = get_cpu_topology(&cpu_top); 395 if (cpu_count < 0) { 396 printf(_("Cannot read number of available processors\n")); 397 return EXIT_FAILURE; 398 } 399 400 if (!cpu_top.core_info[0].is_online) 401 printf("WARNING: at least one cpu is offline\n"); 402 403 /* Default is: monitor all CPUs */ 404 if (bitmask_isallclear(cpus_chosen)) 405 bitmask_setall(cpus_chosen); 406 407 dprint("System has up to %d CPU cores\n", cpu_count); 408 409 for (num = 0; all_monitors[num]; num++) { 410 dprint("Try to register: %s\n", all_monitors[num]->name); 411 test_mon = all_monitors[num]->do_register(); 412 if (test_mon) { 413 if (test_mon->needs_root && !run_as_root) { 414 fprintf(stderr, _("Available monitor %s needs " 415 "root access\n"), test_mon->name); 416 continue; 417 } 418 monitors[avail_monitors] = test_mon; 419 dprint("%s registered\n", all_monitors[num]->name); 420 avail_monitors++; 421 } 422 } 423 424 if (avail_monitors == 0) { 425 printf(_("No HW Cstate monitors found\n")); 426 return 1; 427 } 428 429 if (mode == list) { 430 list_monitors(); 431 exit(EXIT_SUCCESS); 432 } 433 434 if (mode == show) 435 parse_monitor_param(show_monitors_param); 436 437 dprint("Packages: %d - Cores: %d - CPUs: %d\n", 438 cpu_top.pkgs, cpu_top.cores, cpu_count); 439 440 /* 441 * if any params left, it must be a command to fork 442 */ 443 if (argc - optind) 444 fork_it(argv + optind); 445 else 446 do_interval_measure(interval); 447 448 /* ToDo: Topology parsing needs fixing first to do 449 this more generically */ 450 if (cpu_top.pkgs > 1) 451 print_header(3); 452 else 453 print_header(1); 454 455 for (cpu = 0; cpu < cpu_count; cpu++) { 456 if (cpu_top.pkgs > 1) 457 print_results(3, cpu); 458 else 459 print_results(1, cpu); 460 } 461 462 for (num = 0; num < avail_monitors; num++) 463 monitors[num]->unregister(); 464 465 cpu_topology_release(cpu_top); 466 return 0; 467 } 468