Commit | Line | Data |
---|---|---|
1fc22eb4 JD |
1 | /* |
2 | * Copyright (C) 2011 Julien Desfossez | |
3 | * | |
4 | * This program is free software; you can redistribute it and/or modify | |
5 | * it under the terms of the GNU General Public License Version 2 as | |
6 | * published by the Free Software Foundation; | |
7 | * | |
8 | * This program is distributed in the hope that it will be useful, | |
9 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
10 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
11 | * GNU General Public License for more details. | |
12 | * | |
13 | * You should have received a copy of the GNU General Public License | |
14 | * along with this program; if not, write to the Free Software | |
15 | * Foundation, Inc., 59 Temple Place - Suite 330, Boston, | |
16 | * MA 02111-1307, USA. | |
17 | */ | |
18 | ||
19 | #include <stdio.h> | |
20 | #include <stdlib.h> | |
21 | #include <signal.h> | |
22 | #include <string.h> | |
23 | #include <ncurses.h> | |
24 | #include <panel.h> | |
25 | #include <pthread.h> | |
26 | #include <semaphore.h> | |
27 | ||
28 | #include "cursesdisplay.h" | |
29 | #include "lttngtoptypes.h" | |
30 | #include "common.h" | |
31 | ||
32 | #define DEFAULT_DELAY 15 | |
33 | #define MAX_LINE_LENGTH 50 | |
34 | #define MAX_LOG_LINES 4 | |
35 | ||
36 | /* to prevent concurrent updates of the different windows */ | |
37 | sem_t update_display_sem; | |
38 | ||
39 | char *termtype; | |
40 | WINDOW *footer, *header, *center, *status; | |
41 | WINDOW *perf_panel_window = NULL; | |
42 | PANEL *perf_panel, *main_panel; | |
43 | ||
44 | int perf_panel_visible = 0; | |
45 | int perf_line_selected = 0; | |
46 | ||
47 | int last_display_index, currently_displayed_index; | |
48 | ||
49 | struct processtop *selected_process = NULL; | |
50 | int selected_tid; | |
51 | char *selected_comm; | |
52 | int selected_ret; | |
53 | ||
54 | int selected_line = 0; /* select bar position */ | |
55 | int selected_in_list = 0; /* selection relative to the whole list */ | |
56 | int list_offset = 0; /* first index in the list to display (scroll) */ | |
57 | int nb_log_lines = 0; | |
58 | char log_lines[MAX_LINE_LENGTH * MAX_LOG_LINES + MAX_LOG_LINES]; | |
59 | ||
60 | int max_elements = 80; | |
61 | ||
62 | int toggle_threads = -1; | |
63 | int toggle_pause = -1; | |
64 | int toggle_tree = -1; | |
65 | ||
66 | int max_center_lines; | |
67 | ||
68 | pthread_t keyboard_thread; | |
69 | ||
70 | void reset_ncurses() | |
71 | { | |
72 | curs_set(1); | |
73 | endwin(); | |
74 | exit(0); | |
75 | } | |
76 | ||
77 | static void handle_sigterm(int signal) | |
78 | { | |
79 | reset_ncurses(); | |
80 | } | |
81 | ||
82 | void init_screen() | |
83 | { | |
84 | initscr(); | |
85 | noecho(); | |
86 | halfdelay(DEFAULT_DELAY); | |
87 | nonl(); | |
88 | intrflush(stdscr, false); | |
89 | keypad(stdscr, true); | |
90 | curs_set(0); | |
91 | ||
92 | if (has_colors()) { | |
93 | start_color(); | |
94 | init_pair(1, COLOR_RED, COLOR_BLACK); /* - */ | |
95 | init_pair(2, COLOR_GREEN, COLOR_BLACK); /* + */ | |
96 | init_pair(3, COLOR_BLACK, COLOR_WHITE); /* keys */ | |
97 | init_pair(4, COLOR_WHITE, COLOR_GREEN); /* keys activated */ | |
98 | init_pair(5, COLOR_WHITE, COLOR_BLUE); /* select line */ | |
99 | } | |
100 | termtype = getenv("TERM"); | |
101 | if (!strcmp(termtype, "xterm") || !strcmp(termtype, "xterm-color") || | |
102 | !strcmp(termtype, "vt220")) { | |
103 | define_key("\033[H", KEY_HOME); | |
104 | define_key("\033[F", KEY_END); | |
105 | define_key("\033OP", KEY_F(1)); | |
106 | define_key("\033OQ", KEY_F(2)); | |
107 | define_key("\033OR", KEY_F(3)); | |
108 | define_key("\033OS", KEY_F(4)); | |
109 | define_key("\0330U", KEY_F(6)); | |
110 | define_key("\033[11~", KEY_F(1)); | |
111 | define_key("\033[12~", KEY_F(2)); | |
112 | define_key("\033[13~", KEY_F(3)); | |
113 | define_key("\033[14~", KEY_F(4)); | |
114 | define_key("\033[16~", KEY_F(6)); | |
115 | define_key("\033[17;2~", KEY_F(18)); | |
116 | } | |
117 | signal(SIGTERM, handle_sigterm); | |
118 | mousemask(BUTTON1_CLICKED, NULL); | |
119 | refresh(); | |
120 | } | |
121 | ||
122 | WINDOW *create_window(int height, int width, int startx, int starty) | |
123 | { | |
124 | WINDOW *win; | |
125 | win = newwin(height, width, startx, starty); | |
126 | box(win, 0 , 0); | |
127 | wrefresh(win); | |
128 | return win; | |
129 | } | |
130 | ||
131 | WINDOW *create_window_no_border(int height, int width, int startx, int starty) | |
132 | { | |
133 | WINDOW *win; | |
134 | win = newwin(height, width, startx, starty); | |
135 | wrefresh(win); | |
136 | return win; | |
137 | } | |
138 | ||
139 | void print_digit(WINDOW *win, int digit) | |
140 | { | |
141 | if (digit < 0) { | |
142 | wattron(win, COLOR_PAIR(1)); | |
143 | wprintw(win, "%d", digit); | |
144 | wattroff(win, COLOR_PAIR(1)); | |
145 | } else if (digit > 0) { | |
146 | wattron(win, COLOR_PAIR(2)); | |
147 | wprintw(win, "+%d", digit); | |
148 | wattroff(win, COLOR_PAIR(2)); | |
149 | } else { | |
150 | wprintw(win, "0"); | |
151 | } | |
152 | } | |
153 | ||
154 | void print_digits(WINDOW *win, int first, int second) | |
155 | { | |
156 | wprintw(win, "("); | |
157 | print_digit(win, first); | |
158 | wprintw(win, ", "); | |
159 | print_digit(win, second); | |
160 | wprintw(win, ")"); | |
161 | } | |
162 | ||
163 | void print_headers(int line, char *desc, int value, int first, int second) | |
164 | { | |
165 | wattron(header, A_BOLD); | |
166 | mvwprintw(header, line, 4, "%s", desc); | |
167 | wattroff(header, A_BOLD); | |
168 | mvwprintw(header, line, 16, "N/A", value); | |
169 | wmove(header, line, 24); | |
170 | print_digits(header, first, second); | |
171 | wmove(header, line, 40); | |
172 | } | |
173 | ||
174 | void set_window_title(WINDOW *win, char *title) | |
175 | { | |
176 | wattron(win, A_BOLD); | |
177 | mvwprintw(win, 0, 1, title); | |
178 | wattroff(win, A_BOLD); | |
179 | } | |
180 | ||
181 | void print_log(char *str) | |
182 | { | |
183 | int i; | |
184 | int current_line = 1; | |
185 | int current_char = 1; | |
186 | char *tmp, *tmp2; | |
187 | /* rotate the line buffer */ | |
188 | if (nb_log_lines >= MAX_LOG_LINES) { | |
189 | tmp = strndup(log_lines, MAX_LINE_LENGTH * MAX_LOG_LINES + MAX_LOG_LINES); | |
190 | tmp2 = strchr(tmp, '\n'); | |
191 | memset(log_lines, '\0', strlen(log_lines)); | |
192 | strncat(log_lines, tmp2 + 1, strlen(tmp2) - 1); | |
193 | log_lines[strlen(log_lines)] = '\n'; | |
194 | log_lines[strlen(log_lines)] = '\0'; | |
195 | free(tmp); | |
196 | } | |
197 | nb_log_lines++; | |
198 | ||
199 | strncat(log_lines, str, MAX_LINE_LENGTH - 1); | |
200 | ||
201 | if (nb_log_lines < MAX_LOG_LINES) | |
202 | log_lines[strlen(log_lines)] = '\n'; | |
203 | log_lines[strlen(log_lines)] = '\0'; | |
204 | ||
205 | werase(status); | |
206 | box(status, 0 , 0); | |
207 | set_window_title(status, "Status"); | |
208 | for (i = 0; i < strlen(log_lines); i++) { | |
209 | if (log_lines[i] == '\n') { | |
210 | wmove(status, ++current_line, 1); | |
211 | current_char = 1; | |
212 | } else { | |
213 | mvwprintw(status, current_line, current_char++, "%c", log_lines[i]); | |
214 | } | |
215 | } | |
216 | wrefresh(status); | |
217 | } | |
218 | ||
219 | void print_key(WINDOW *win, char *key, char *desc, int toggle) | |
220 | { | |
221 | int pair; | |
222 | if (toggle > 0) | |
223 | pair = 4; | |
224 | else | |
225 | pair = 3; | |
226 | wattron(win, COLOR_PAIR(pair)); | |
227 | wprintw(footer, "%s", key); | |
228 | wattroff(win, COLOR_PAIR(pair)); | |
229 | wprintw(footer, ":%s", desc); | |
230 | } | |
231 | ||
232 | void update_footer() | |
233 | { | |
234 | sem_wait(&update_display_sem); | |
235 | werase(footer); | |
236 | wmove(footer, 1, 1); | |
237 | print_key(footer, "F2", "CPUtop ", current_view == cpu); | |
238 | print_key(footer, "F3", "PerfTop ", current_view == perf); | |
239 | print_key(footer, "F6", "IOTop ", current_view == iostream); | |
240 | print_key(footer, "Enter", "Details ", current_view == process_details); | |
241 | print_key(footer, "q", "Quit | ", 0); | |
242 | print_key(footer, "P", "Perf Pref ", 0); | |
243 | print_key(footer, "p", "Pause ", toggle_pause); | |
244 | ||
245 | wrefresh(footer); | |
246 | sem_post(&update_display_sem); | |
247 | } | |
248 | ||
249 | void basic_header() | |
250 | { | |
251 | werase(header); | |
252 | box(header, 0 , 0); | |
253 | set_window_title(header, "Statistics for interval [gathering data...["); | |
254 | wattron(header, A_BOLD); | |
255 | mvwprintw(header, 1, 4, "CPUs"); | |
256 | mvwprintw(header, 2, 4, "Processes"); | |
257 | mvwprintw(header, 3, 4, "Threads"); | |
258 | mvwprintw(header, 4, 4, "Files"); | |
259 | mvwprintw(header, 5, 4, "Network"); | |
260 | mvwprintw(header, 6, 4, "IO"); | |
261 | wattroff(header, A_BOLD); | |
262 | wrefresh(header); | |
263 | } | |
264 | ||
265 | void update_header() | |
266 | { | |
267 | werase(header); | |
268 | box(header, 0 , 0); | |
269 | set_window_title(header, "Statistics for interval "); | |
270 | wattron(header, A_BOLD); | |
271 | /* | |
272 | wprintw(header, "[%lu.%lu, %lu.%lu[", | |
273 | data->start.tv_sec, data->start.tv_nsec, | |
274 | data->end.tv_sec, data->end.tv_nsec); | |
275 | */ | |
276 | wprintw(header, "[%lu, %lu[", | |
277 | data->start, | |
278 | data->end); | |
279 | mvwprintw(header, 1, 4, "CPUs"); | |
280 | wattroff(header, A_BOLD); | |
281 | wprintw(header, "\t%d\t(max/cpu : %0.2f%)", data->cpu_table->len, | |
282 | 100.0/data->cpu_table->len); | |
283 | print_headers(2, "Processes", data->nbproc, data->nbnewproc, | |
284 | -1*(data->nbdeadproc)); | |
285 | print_headers(3, "Threads", data->nbthreads, data->nbnewthreads, | |
286 | -1*(data->nbdeadthreads)); | |
287 | print_headers(4, "Files", data->nbfiles, data->nbnewfiles, | |
288 | -1*(data->nbclosedfiles)); | |
289 | mvwprintw(header, 4, 43, "N/A kbytes/sec"); | |
290 | print_headers(5, "Network", 114, 0, 0); | |
291 | mvwprintw(header, 5, 43, "N/A Mbytes/sec"); | |
292 | wrefresh(header); | |
293 | } | |
294 | ||
295 | gint sort_by_cpu_desc(gconstpointer p1, gconstpointer p2) | |
296 | { | |
297 | struct processtop *n1 = *(struct processtop **)p1; | |
298 | struct processtop *n2 = *(struct processtop **)p2; | |
299 | unsigned long totaln1 = n1->totalcpunsec; | |
300 | unsigned long totaln2 = n2->totalcpunsec; | |
301 | ||
302 | if (totaln1 < totaln2) | |
303 | return 1; | |
304 | if (totaln1 == totaln2) | |
305 | return 0; | |
306 | return -1; | |
307 | } | |
308 | ||
309 | gint sort_by_cpu_group_by_threads_desc(gconstpointer p1, gconstpointer p2) | |
310 | { | |
311 | struct processtop *n1 = *(struct processtop **)p1; | |
312 | struct processtop *n2 = *(struct processtop **)p2; | |
313 | unsigned long totaln1 = n1->threadstotalcpunsec; | |
314 | unsigned long totaln2 = n2->threadstotalcpunsec; | |
315 | ||
316 | if (totaln1 < totaln2) | |
317 | return 1; | |
318 | if (totaln1 == totaln2) | |
319 | return 0; | |
320 | return -1; | |
321 | } | |
322 | ||
323 | void update_cputop_display() | |
324 | { | |
325 | int i; | |
326 | int header_offset = 2; | |
327 | struct processtop *tmp; | |
328 | unsigned long elapsed; | |
329 | double maxcputime; | |
330 | int nblinedisplayed = 0; | |
331 | int current_line = 0; | |
332 | ||
333 | elapsed = data->end - data->start; | |
334 | maxcputime = elapsed * data->cpu_table->len / 100.0; | |
335 | ||
336 | g_ptr_array_sort(data->process_table, sort_by_cpu_desc); | |
337 | ||
338 | set_window_title(center, "CPU Top"); | |
339 | wattron(center, A_BOLD); | |
340 | mvwprintw(center, 1, 1, "CPU(%)"); | |
341 | mvwprintw(center, 1, 12, "TGID"); | |
342 | mvwprintw(center, 1, 22, "PID"); | |
343 | mvwprintw(center, 1, 32, "NAME"); | |
344 | wattroff(center, A_BOLD); | |
345 | ||
346 | max_center_lines = LINES - 7 - 7 - 1 - header_offset; | |
347 | ||
348 | /* iterate the process (thread) list */ | |
349 | for (i = list_offset; i < data->process_table->len && | |
350 | nblinedisplayed < max_center_lines; i++) { | |
351 | tmp = g_ptr_array_index(data->process_table, i); | |
352 | ||
353 | if (current_line == selected_line) { | |
354 | selected_process = tmp; | |
355 | selected_tid = tmp->tid; | |
356 | selected_comm = tmp->comm; | |
357 | wattron(center, COLOR_PAIR(5)); | |
358 | mvwhline(center, current_line + header_offset, 1, ' ', COLS-3); | |
359 | } | |
360 | /* CPU(%) */ | |
361 | mvwprintw(center, current_line + header_offset, 1, "%1.2f", | |
362 | tmp->totalcpunsec / maxcputime); | |
363 | /* TGID */ | |
364 | mvwprintw(center, current_line + header_offset, 12, "%d", tmp->pid); | |
365 | /* PID */ | |
366 | mvwprintw(center, current_line + header_offset, 22, "%d", tmp->tid); | |
367 | /* NAME */ | |
368 | mvwprintw(center, current_line + header_offset, 32, "%s", tmp->comm); | |
369 | wattroff(center, COLOR_PAIR(5)); | |
370 | nblinedisplayed++; | |
371 | current_line++; | |
372 | } | |
373 | } | |
374 | ||
375 | gint sort_perf(gconstpointer p1, gconstpointer p2, gpointer key) | |
376 | { | |
377 | struct processtop *n1 = *(struct processtop **) p1; | |
378 | struct processtop *n2 = *(struct processtop **) p2; | |
379 | ||
380 | struct perfcounter *tmp1, *tmp2; | |
381 | unsigned long totaln2 = 0; | |
382 | unsigned long totaln1 = 0; | |
383 | ||
384 | if (!key) | |
385 | return 0; | |
386 | ||
387 | tmp1 = g_hash_table_lookup(n1->perf, key); | |
388 | if (!tmp1) | |
389 | totaln1 = 0; | |
390 | else | |
391 | totaln1 = tmp1->count; | |
392 | ||
393 | tmp2 = g_hash_table_lookup(n2->perf, key); | |
394 | if (!tmp2) | |
395 | totaln2 = 0; | |
396 | else | |
397 | totaln2 = tmp2->count; | |
398 | ||
399 | if (totaln1 < totaln2) | |
400 | return 1; | |
401 | if (totaln1 == totaln2) { | |
402 | totaln1 = n1->tid; | |
403 | totaln2 = n2->tid; | |
404 | if (totaln1 < totaln2) | |
405 | return 1; | |
406 | return -1; | |
407 | } | |
408 | return -1; | |
409 | } | |
410 | ||
411 | void print_key_title(char *key, int line) | |
412 | { | |
413 | wattron(center, A_BOLD); | |
414 | mvwprintw(center, line, 1, "%s\t", key); | |
415 | wattroff(center, A_BOLD); | |
416 | } | |
417 | ||
418 | void update_process_details() | |
419 | { | |
420 | unsigned long elapsed; | |
421 | double maxcputime; | |
422 | struct processtop *tmp = find_process_tid(data, selected_tid, selected_comm); | |
423 | ||
424 | set_window_title(center, "Process details"); | |
425 | ||
426 | ||
427 | elapsed = data->end - data->start; | |
428 | maxcputime = elapsed * data->cpu_table->len / 100.0; | |
429 | ||
430 | print_key_title("Name", 1); | |
431 | wprintw(center, "%s", selected_comm); | |
432 | print_key_title("TID", 2); | |
433 | wprintw(center, "%d", selected_tid); | |
434 | if (!tmp) { | |
435 | print_key_title("Does not exit at this time", 3); | |
436 | return; | |
437 | } | |
438 | ||
439 | print_key_title("PID", 3); | |
440 | wprintw(center, "%d", tmp->pid); | |
441 | print_key_title("PPID", 4); | |
442 | wprintw(center, "%d", tmp->ppid); | |
443 | print_key_title("CPU", 5); | |
444 | wprintw(center, "%1.2f %%", tmp->totalcpunsec/maxcputime); | |
445 | } | |
446 | ||
447 | void update_perf() | |
448 | { | |
bb053abb | 449 | int i; |
1fc22eb4 JD |
450 | int nblinedisplayed = 0; |
451 | int current_line = 0; | |
452 | struct processtop *tmp; | |
453 | int header_offset = 2; | |
454 | int perf_row = 40; | |
455 | struct perfcounter *perfn1, *perfn2; | |
1fc22eb4 JD |
456 | char *perf_key = NULL; |
457 | int value; | |
85db4618 JD |
458 | GHashTableIter iter; |
459 | gpointer key; | |
1fc22eb4 JD |
460 | |
461 | set_window_title(center, "Perf Top"); | |
462 | wattron(center, A_BOLD); | |
463 | mvwprintw(center, 1, 1, "PID"); | |
464 | mvwprintw(center, 1, 11, "TID"); | |
465 | mvwprintw(center, 1, 22, "NAME"); | |
466 | ||
467 | perf_row = 40; | |
85db4618 JD |
468 | g_hash_table_iter_init(&iter, data->perf_list); |
469 | while (g_hash_table_iter_next (&iter, &key, (gpointer) &perfn1)) { | |
1fc22eb4 | 470 | if (perfn1->visible) { |
85db4618 | 471 | /* + 6 to strip the "_perf_" prefix */ |
1fc22eb4 | 472 | mvwprintw(center, 1, perf_row, "%s", |
85db4618 | 473 | (char *) key + 6); |
1fc22eb4 JD |
474 | perf_row += 20; |
475 | } | |
476 | if (perfn1->sort) { | |
85db4618 | 477 | perf_key = (char *) key; |
1fc22eb4 | 478 | } |
1fc22eb4 | 479 | } |
85db4618 | 480 | |
1fc22eb4 JD |
481 | wattroff(center, A_BOLD); |
482 | ||
483 | g_ptr_array_sort_with_data(data->process_table, sort_perf, perf_key); | |
85db4618 | 484 | |
1fc22eb4 JD |
485 | for (i = 0; i < data->process_table->len && |
486 | nblinedisplayed < max_center_lines; i++) { | |
1fc22eb4 JD |
487 | tmp = g_ptr_array_index(data->process_table, i); |
488 | ||
489 | if (current_line == selected_line) { | |
490 | selected_process = tmp; | |
491 | wattron(center, COLOR_PAIR(5)); | |
492 | mvwhline(center, current_line + header_offset, 1, ' ', COLS-3); | |
493 | } | |
494 | ||
495 | mvwprintw(center, current_line + header_offset, 1, "%d", tmp->pid); | |
496 | mvwprintw(center, current_line + header_offset, 11, "%d", tmp->tid); | |
497 | mvwprintw(center, current_line + header_offset, 22, "%s", tmp->comm); | |
498 | ||
85db4618 | 499 | g_hash_table_iter_init(&iter, data->perf_list); |
1fc22eb4 JD |
500 | |
501 | perf_row = 40; | |
85db4618 | 502 | while (g_hash_table_iter_next (&iter, &key, (gpointer) &perfn1)) { |
1fc22eb4 | 503 | if (perfn1->visible) { |
85db4618 | 504 | perfn2 = g_hash_table_lookup(tmp->perf, (char *) key); |
1fc22eb4 JD |
505 | if (perfn2) |
506 | value = perfn2->count; | |
507 | else | |
508 | value = 0; | |
509 | mvwprintw(center, current_line + header_offset, perf_row, "%d", value); | |
510 | perf_row += 20; | |
511 | } | |
1fc22eb4 JD |
512 | } |
513 | ||
514 | wattroff(center, COLOR_PAIR(5)); | |
515 | nblinedisplayed++; | |
516 | current_line++; | |
517 | } | |
518 | } | |
519 | ||
520 | void update_fileio() | |
521 | { | |
522 | int i; | |
523 | int offset; | |
524 | ||
525 | set_window_title(center, "IO Top"); | |
526 | wattron(center, A_BOLD); | |
527 | mvwprintw(center, 1, 10, "READ"); | |
528 | mvwprintw(center, 2, 1, "bytes"); | |
529 | mvwprintw(center, 2, 15, "bytes/sec"); | |
530 | ||
531 | mvwprintw(center, 1, 39, "WRITE"); | |
532 | mvwprintw(center, 2, 33, "bytes"); | |
533 | mvwprintw(center, 2, 45, "bytes/sec"); | |
534 | ||
535 | if (toggle_threads > 0) { | |
536 | mvwprintw(center, 1, 60, "TGID"); | |
537 | mvwprintw(center, 1, 70, "PID"); | |
538 | offset = 8; | |
539 | } else { | |
540 | mvwprintw(center, 1, 60, "PID(TGID)"); | |
541 | offset = 0; | |
542 | } | |
543 | mvwprintw(center, 1, 72 + offset, "NAME"); | |
544 | wattroff(center, A_BOLD); | |
545 | ||
546 | for (i = 3; i < LINES - 3 - 8 - 1; i++) { | |
547 | mvwprintw(center, i, 1, "%d", i*1000); | |
548 | mvwprintw(center, i, 15, "%dk", i); | |
549 | mvwprintw(center, i, 28, "| %d", i*2000); | |
550 | mvwprintw(center, i, 45, "%dk", i*2); | |
551 | if (toggle_threads > 0) { | |
552 | mvwprintw(center, i, 57, "| %d", i); | |
553 | mvwprintw(center, i, 70, "%d", i); | |
554 | } else { | |
555 | mvwprintw(center, i, 57, "| %d", i); | |
556 | } | |
557 | mvwprintw(center, i, 72 + offset, "process_%d", i); | |
558 | } | |
559 | } | |
560 | ||
561 | gint sort_by_ret_desc(gconstpointer p1, gconstpointer p2) | |
562 | { | |
563 | struct processtop *n1 = *(struct processtop **)p1; | |
564 | struct processtop *n2 = *(struct processtop **)p2; | |
565 | unsigned long totaln1 = n1->iostream->ret_total; | |
566 | unsigned long totaln2 = n2->iostream->ret_total; | |
567 | ||
568 | if (totaln1 < totaln2) | |
569 | return 1; | |
570 | if (totaln1 == totaln2) | |
571 | return 0; | |
572 | return -1; | |
573 | } | |
574 | ||
575 | void update_iostream() | |
576 | { | |
577 | int i; | |
578 | int header_offset = 2; | |
579 | struct processtop *tmp; | |
580 | int nblinedisplayed = 0; | |
581 | int current_line = 0; | |
582 | ||
583 | set_window_title(center, "IO Top"); | |
584 | wattron(center, A_BOLD); | |
585 | mvwprintw(center, 1, 1, "READ (B/s)"); | |
586 | mvwprintw(center, 1, 20, "WRITE (B/s)"); | |
587 | ||
588 | mvwprintw(center, 1, 40, "TOTAL STREAM"); | |
589 | ||
590 | mvwprintw(center, 1, 60, "TGID"); | |
591 | mvwprintw(center, 1, 80, "PID"); | |
592 | ||
593 | mvwprintw(center, 1, 92, "NAME"); | |
594 | wattroff(center, A_BOLD); | |
595 | ||
596 | g_ptr_array_sort(data->process_table, sort_by_ret_desc); | |
597 | ||
598 | for (i = list_offset; i < data->process_table->len && | |
599 | nblinedisplayed < max_center_lines; i++) { | |
600 | tmp = g_ptr_array_index(data->process_table, i); | |
601 | ||
602 | if (current_line == selected_line) { | |
603 | selected_process = tmp; | |
604 | selected_tid = tmp->tid; | |
605 | selected_comm = tmp->comm; | |
606 | wattron(center, COLOR_PAIR(5)); | |
607 | mvwhline(center, current_line + header_offset, 1, ' ', COLS-3); | |
608 | } | |
609 | /* READ (bytes/sec) */ | |
610 | mvwprintw(center, current_line + header_offset, 1, "%lu", | |
611 | tmp->iostream->ret_read); | |
612 | ||
613 | /* WRITE (bytes/sec) */ | |
614 | mvwprintw(center, current_line + header_offset, 20, "%lu", | |
615 | tmp->iostream->ret_write); | |
616 | ||
617 | /* TOTAL STREAM */ | |
618 | if(tmp->iostream->ret_total >= 1000000) | |
619 | mvwprintw(center, current_line + header_offset, 40, "%lu MB", | |
620 | tmp->iostream->ret_total/1000000); | |
621 | else if(tmp->iostream->ret_total >=1000) | |
622 | mvwprintw(center, current_line + header_offset, 40, "%lu KB", | |
623 | tmp->iostream->ret_total/1000); | |
624 | else | |
625 | mvwprintw(center, current_line + header_offset, 40, "%lu B", | |
626 | tmp->iostream->ret_total); | |
627 | /* TGID */ | |
628 | mvwprintw(center, current_line + header_offset, 60, "%d", tmp->pid); | |
629 | /* PID */ | |
630 | mvwprintw(center, current_line + header_offset, 80, "%d", tmp->tid); | |
631 | /* NAME */ | |
632 | mvwprintw(center, current_line + header_offset, 92, "%s", tmp->comm); | |
633 | wattroff(center, COLOR_PAIR(5)); | |
634 | nblinedisplayed++; | |
635 | current_line++; | |
636 | } | |
637 | } | |
638 | ||
639 | void update_current_view() | |
640 | { | |
641 | sem_wait(&update_display_sem); | |
642 | if (!data) | |
643 | return; | |
644 | update_header(); | |
645 | ||
646 | werase(center); | |
647 | box(center, 0, 0); | |
648 | switch (current_view) { | |
649 | case cpu: | |
650 | update_cputop_display(); | |
651 | break; | |
652 | case perf: | |
653 | update_perf(); | |
654 | break; | |
655 | case process_details: | |
656 | update_process_details(); | |
657 | break; | |
658 | case fileio: | |
659 | update_fileio(); | |
660 | break; | |
661 | case iostream: | |
662 | update_iostream(); | |
663 | break; | |
664 | case tree: | |
665 | update_cputop_display(); | |
666 | break; | |
667 | default: | |
668 | break; | |
669 | } | |
670 | update_panels(); | |
671 | doupdate(); | |
672 | sem_post(&update_display_sem); | |
673 | } | |
674 | ||
675 | void setup_perf_panel() | |
676 | { | |
677 | int size; | |
678 | if (!data) | |
679 | return; | |
680 | if (perf_panel_window) { | |
681 | del_panel(perf_panel); | |
682 | delwin(perf_panel_window); | |
683 | } | |
684 | size = g_hash_table_size(data->perf_list); | |
685 | perf_panel_window = create_window(size + 2, 30, 10, 10); | |
686 | perf_panel = new_panel(perf_panel_window); | |
687 | perf_panel_visible = 0; | |
688 | hide_panel(perf_panel); | |
689 | } | |
690 | ||
691 | void update_perf_panel(int line_selected, int toggle_view, int toggle_sort) | |
692 | { | |
693 | int i; | |
694 | struct perfcounter *perf; | |
695 | GList *perflist; | |
696 | ||
697 | if (!data) | |
698 | return; | |
699 | ||
700 | werase(perf_panel_window); | |
701 | box(perf_panel_window, 0 , 0); | |
702 | set_window_title(perf_panel_window, "Perf Preferences "); | |
703 | wattron(perf_panel_window, A_BOLD); | |
704 | mvwprintw(perf_panel_window, g_hash_table_size(data->perf_list) + 1, 1, " 's' to sort"); | |
705 | wattroff(perf_panel_window, A_BOLD); | |
706 | ||
707 | if (toggle_sort == 1) { | |
708 | i = 0; | |
709 | perflist = g_list_first(g_hash_table_get_keys(data->perf_list)); | |
710 | while (perflist) { | |
711 | perf = g_hash_table_lookup(data->perf_list, perflist->data); | |
712 | if (i != line_selected) | |
713 | perf->sort = 0; | |
714 | else | |
715 | perf->sort = 1; | |
716 | i++; | |
717 | perflist = g_list_next(perflist); | |
718 | } | |
719 | update_current_view(); | |
720 | } | |
721 | ||
722 | i = 0; | |
723 | perflist = g_list_first(g_hash_table_get_keys(data->perf_list)); | |
724 | while (perflist) { | |
725 | perf = g_hash_table_lookup(data->perf_list, perflist->data); | |
726 | if (i == line_selected && toggle_view == 1) { | |
727 | perf->visible = perf->visible == 1 ? 0:1; | |
728 | update_current_view(); | |
729 | } | |
730 | if (i == line_selected) { | |
731 | wattron(perf_panel_window, COLOR_PAIR(5)); | |
732 | mvwhline(perf_panel_window, i + 1, 1, ' ', 30 - 2); | |
733 | } | |
734 | if (perf->sort == 1) | |
735 | wattron(perf_panel_window, A_BOLD); | |
736 | mvwprintw(perf_panel_window, i + 1, 1, "[%c] %s", | |
737 | perf->visible == 1 ? 'x' : ' ', | |
738 | (char *) perflist->data + 6); | |
739 | wattroff(perf_panel_window, A_BOLD); | |
740 | wattroff(perf_panel_window, COLOR_PAIR(5)); | |
741 | i++; | |
742 | perflist = g_list_next(perflist); | |
743 | } | |
744 | update_panels(); | |
745 | doupdate(); | |
746 | } | |
747 | ||
748 | ||
749 | void toggle_perf_panel(void) | |
750 | { | |
751 | if (perf_panel_visible) { | |
752 | hide_panel(perf_panel); | |
753 | perf_panel_visible = 0; | |
754 | } else { | |
755 | setup_perf_panel(); | |
756 | update_perf_panel(perf_line_selected, 0, 0); | |
757 | show_panel(perf_panel); | |
758 | perf_panel_visible = 1; | |
759 | } | |
760 | update_panels(); | |
761 | doupdate(); | |
762 | } | |
763 | ||
764 | void display(unsigned int index) | |
765 | { | |
766 | last_display_index = index; | |
767 | currently_displayed_index = index; | |
768 | data = g_ptr_array_index(copies, index); | |
769 | if (!data) | |
770 | return; | |
771 | max_elements = data->process_table->len; | |
772 | update_current_view(); | |
773 | update_footer(); | |
774 | update_panels(); | |
775 | doupdate(); | |
776 | } | |
777 | ||
778 | void pause_display() | |
779 | { | |
780 | toggle_pause = 1; | |
781 | print_log("Pause"); | |
782 | sem_wait(&pause_sem); | |
783 | } | |
784 | ||
785 | void resume_display() | |
786 | { | |
787 | toggle_pause = -1; | |
788 | print_log("Resume"); | |
789 | sem_post(&pause_sem); | |
790 | } | |
791 | ||
792 | void *handle_keyboard(void *p) | |
793 | { | |
794 | int ch; | |
795 | while((ch = getch())) { | |
796 | switch(ch) { | |
797 | /* Move the cursor and scroll */ | |
798 | case KEY_DOWN: | |
799 | if (perf_panel_visible) { | |
800 | if (perf_line_selected < g_hash_table_size(data->perf_list) - 1) | |
801 | perf_line_selected++; | |
802 | update_perf_panel(perf_line_selected, 0, 0); | |
803 | } else { | |
804 | if (selected_line < (max_center_lines - 1) && | |
805 | selected_line < max_elements - 1) { | |
806 | selected_line++; | |
807 | selected_in_list++; | |
808 | } else if (selected_in_list < (max_elements - 1) | |
809 | && (list_offset < (max_elements - max_center_lines))) { | |
810 | selected_in_list++; | |
811 | list_offset++; | |
812 | } | |
813 | update_current_view(); | |
814 | } | |
815 | break; | |
816 | case KEY_NPAGE: | |
817 | if ((selected_line + 10 < max_center_lines - 1) && | |
818 | ((selected_line + 10) < max_elements - 1)) { | |
819 | selected_line += 10; | |
820 | selected_in_list += 10; | |
821 | } else if (max_elements > max_center_lines) { | |
822 | selected_line = max_center_lines - 1; | |
823 | if (selected_in_list + 10 < max_elements - 1) { | |
824 | selected_in_list += 10; | |
825 | list_offset += (selected_in_list - max_center_lines + 1); | |
826 | } | |
827 | } else if (selected_line + 10 > max_elements) { | |
828 | selected_line = max_elements - 1; | |
829 | } | |
830 | update_current_view(); | |
831 | break; | |
832 | case KEY_UP: | |
833 | if (perf_panel_visible) { | |
834 | if (perf_line_selected > 0) | |
835 | perf_line_selected--; | |
836 | update_perf_panel(perf_line_selected, 0, 0); | |
837 | } else { | |
838 | if (selected_line > 0) { | |
839 | selected_line--; | |
840 | selected_in_list--; | |
841 | } else if (selected_in_list > 0 && list_offset > 0) { | |
842 | selected_in_list--; | |
843 | list_offset--; | |
844 | } | |
845 | update_current_view(); | |
846 | } | |
847 | break; | |
848 | case KEY_PPAGE: | |
849 | if (selected_line - 10 > 0) | |
850 | selected_line -= 10; | |
851 | else | |
852 | selected_line = 0; | |
853 | update_current_view(); | |
854 | break; | |
855 | ||
856 | /* Navigate the history with arrows */ | |
857 | case KEY_LEFT: | |
858 | if (currently_displayed_index > 0) { | |
859 | currently_displayed_index--; | |
860 | print_log("Going back in time"); | |
861 | } else { | |
862 | print_log("Cannot rewind, last data is already displayed"); | |
863 | } | |
864 | data = g_ptr_array_index(copies, currently_displayed_index); | |
865 | max_elements = data->process_table->len; | |
866 | ||
867 | /* we force to pause the display when moving in time */ | |
868 | if (toggle_pause < 0) | |
869 | pause_display(); | |
870 | ||
871 | update_current_view(); | |
872 | update_footer(); | |
873 | break; | |
874 | case KEY_RIGHT: | |
875 | if (currently_displayed_index < last_display_index) { | |
876 | currently_displayed_index++; | |
877 | print_log("Going forward in time"); | |
878 | data = g_ptr_array_index(copies, currently_displayed_index); | |
879 | max_elements = data->process_table->len; | |
880 | update_current_view(); | |
881 | update_footer(); | |
882 | } else { | |
883 | print_log("Manually moving forward"); | |
884 | sem_post(&timer); | |
885 | /* we force to resume the refresh when moving forward */ | |
886 | if (toggle_pause > 0) | |
887 | resume_display(); | |
888 | } | |
889 | ||
890 | break; | |
891 | case ' ': | |
892 | if (perf_panel_visible) | |
893 | update_perf_panel(perf_line_selected, 1, 0); | |
894 | break; | |
895 | case 's': | |
896 | if (perf_panel_visible) | |
897 | update_perf_panel(perf_line_selected, 0, 1); | |
898 | break; | |
899 | ||
900 | case 13: /* FIXME : KEY_ENTER ?? */ | |
901 | if (current_view == cpu) { | |
902 | current_view = process_details; | |
903 | } | |
904 | update_current_view(); | |
905 | break; | |
906 | ||
907 | case KEY_F(1): | |
908 | toggle_tree *= -1; | |
909 | current_view = cpu; | |
910 | update_current_view(); | |
911 | break; | |
912 | case KEY_F(2): | |
913 | current_view = cpu; | |
914 | update_current_view(); | |
915 | break; | |
916 | case KEY_F(3): | |
917 | current_view = perf; | |
918 | toggle_tree = -1; | |
919 | update_current_view(); | |
920 | break; | |
921 | case KEY_F(4): | |
922 | current_view = fileio; | |
923 | toggle_tree = -1; | |
924 | update_current_view(); | |
925 | break; | |
926 | case KEY_F(5): | |
927 | current_view = netio; | |
928 | toggle_tree = -1; | |
929 | update_current_view(); | |
930 | break; | |
931 | case KEY_F(6): | |
932 | current_view = iostream; | |
933 | toggle_tree = -1; | |
934 | update_current_view(); | |
935 | break; | |
936 | case KEY_F(10): | |
937 | case 'q': | |
938 | reset_ncurses(); | |
939 | break; | |
940 | case 't': | |
941 | toggle_threads *= -1; | |
942 | update_current_view(); | |
943 | break; | |
944 | case 'p': | |
945 | if (toggle_pause < 0) { | |
946 | pause_display(); | |
947 | } else { | |
948 | resume_display(); | |
949 | } | |
950 | break; | |
951 | case 'P': | |
952 | toggle_perf_panel(); | |
953 | break; | |
954 | default: | |
955 | /* | |
956 | * commented because it makes the list refresh in different order | |
957 | * if we sort and there are equal values | |
958 | if (data) | |
959 | update_current_view(); | |
960 | */ | |
961 | break; | |
962 | } | |
963 | update_footer(); | |
964 | } | |
965 | return NULL; | |
966 | } | |
967 | ||
968 | void init_ncurses() | |
969 | { | |
970 | sem_init(&update_display_sem, 0, 1); | |
971 | init_screen(); | |
972 | ||
973 | header = create_window(7, COLS - 1, 0, 0); | |
974 | center = create_window(LINES - 7 - 7, COLS - 1, 7, 0); | |
975 | status = create_window(MAX_LOG_LINES + 2, COLS - 1, LINES - 7, 0); | |
976 | footer = create_window(1, COLS - 1, LINES - 1, 0); | |
977 | ||
978 | print_log("Starting display"); | |
979 | ||
980 | main_panel = new_panel(center); | |
981 | setup_perf_panel(); | |
982 | ||
983 | current_view = cpu; | |
984 | ||
985 | basic_header(); | |
986 | update_footer(); | |
987 | ||
988 | pthread_create(&keyboard_thread, NULL, handle_keyboard, (void *)NULL); | |
989 | } | |
990 |