src/cursesdisplay.c

   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 along
  14  * with this program; if not, write to the Free Software Foundation, Inc.,
  15  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  16  */
  17
  18 #include <stdio.h>
  19 #include <stdlib.h>
  20 #include <signal.h>
  21 #include <string.h>
  22 #include <ncurses.h>
  23 #include <panel.h>
  24 #include <pthread.h>
  25 #include <semaphore.h>
  26
  27 #include "cursesdisplay.h"
  28 #include "lttngtoptypes.h"
  29 #include "iostreamtop.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, "%d", 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",
 214                                         log_lines[i]);
 215                 }
 216         }
 217         wrefresh(status);
 218 }
 219
 220 void print_key(WINDOW *win, char *key, char *desc, int toggle)
 221 {
 222         int pair;
 223         if (toggle > 0)
 224                 pair = 4;
 225         else
 226                 pair = 3;
 227         wattron(win, COLOR_PAIR(pair));
 228         wprintw(footer, "%s", key);
 229         wattroff(win, COLOR_PAIR(pair));
 230         wprintw(footer, ":%s", desc);
 231 }
 232
 233 void update_footer()
 234 {
 235         sem_wait(&update_display_sem);
 236         werase(footer);
 237         wmove(footer, 1, 1);
 238         print_key(footer, "F2", "CPUtop  ", current_view == cpu);
 239         print_key(footer, "F3", "PerfTop  ", current_view == perf);
 240         print_key(footer, "F4", "IOTop  ", current_view == iostream);
 241         print_key(footer, "Enter", "Details  ", current_view == process_details);
 242         print_key(footer, "q", "Quit | ", 0);
 243         print_key(footer, "P", "Perf Pref  ", 0);
 244         print_key(footer, "p", "Pause  ", toggle_pause);
 245
 246         wrefresh(footer);
 247         sem_post(&update_display_sem);
 248 }
 249
 250 void basic_header()
 251 {
 252         werase(header);
 253         box(header, 0 , 0);
 254         set_window_title(header, "Statistics for interval [gathering data...[");
 255         wattron(header, A_BOLD);
 256         mvwprintw(header, 1, 4, "CPUs");
 257         mvwprintw(header, 2, 4, "Threads");
 258         mvwprintw(header, 3, 4, "Files");
 259         mvwprintw(header, 4, 4, "Network");
 260         wattroff(header, A_BOLD);
 261         wrefresh(header);
 262 }
 263
 264 void update_header()
 265 {
 266         werase(header);
 267         box(header, 0 , 0);
 268         set_window_title(header, "Statistics for interval ");
 269         wattron(header, A_BOLD);
 270         /*
 271         wprintw(header, "[%lu.%lu, %lu.%lu[",
 272                         data->start.tv_sec, data->start.tv_nsec,
 273                         data->end.tv_sec, data->end.tv_nsec);
 274                         */
 275         wprintw(header, "[%lu, %lu[",
 276             data->start,
 277             data->end);
 278         mvwprintw(header, 1, 4, "CPUs");
 279         wattroff(header, A_BOLD);
 280         wprintw(header, "\t%d\t(max/cpu : %0.2f%)", data->cpu_table->len,
 281                         100.0/data->cpu_table->len);
 282         print_headers(2, "Threads", data->nbthreads, data->nbnewthreads,
 283                         -1*(data->nbdeadthreads));
 284         print_headers(3, "Files", data->nbfiles, data->nbnewfiles,
 285                         -1*(data->nbclosedfiles));
 286         mvwprintw(header, 3, 43, "N/A kbytes/sec");
 287         print_headers(4, "Network", 0, 0, 0);
 288         mvwprintw(header, 4, 43, "N/A Mbytes/sec");
 289         wrefresh(header);
 290 }
 291
 292 gint sort_by_cpu_desc(gconstpointer p1, gconstpointer p2)
 293 {
 294         struct processtop *n1 = *(struct processtop **)p1;
 295         struct processtop *n2 = *(struct processtop **)p2;
 296         unsigned long totaln1 = n1->totalcpunsec;
 297         unsigned long totaln2 = n2->totalcpunsec;
 298
 299         if (totaln1 < totaln2)
 300                 return 1;
 301         if (totaln1 == totaln2)
 302                 return 0;
 303         return -1;
 304 }
 305
 306 gint sort_by_cpu_group_by_threads_desc(gconstpointer p1, gconstpointer p2)
 307 {
 308         struct processtop *n1 = *(struct processtop **)p1;
 309         struct processtop *n2 = *(struct processtop **)p2;
 310         unsigned long totaln1 = n1->threadstotalcpunsec;
 311         unsigned long totaln2 = n2->threadstotalcpunsec;
 312
 313         if (totaln1 < totaln2)
 314                 return 1;
 315         if (totaln1 == totaln2)
 316                 return 0;
 317         return -1;
 318 }
 319
 320 void update_cputop_display()
 321 {
 322         int i;
 323         int header_offset = 2;
 324         struct processtop *tmp;
 325         unsigned long elapsed;
 326         double maxcputime;
 327         int nblinedisplayed = 0;
 328         int current_line = 0;
 329
 330         elapsed = data->end - data->start;
 331         maxcputime = elapsed * data->cpu_table->len / 100.0;
 332
 333         g_ptr_array_sort(data->process_table, sort_by_cpu_desc);
 334
 335         set_window_title(center, "CPU Top");
 336         wattron(center, A_BOLD);
 337         mvwprintw(center, 1, 1, "CPU(%)");
 338         mvwprintw(center, 1, 12, "TGID");
 339         mvwprintw(center, 1, 22, "PID");
 340         mvwprintw(center, 1, 32, "NAME");
 341         wattroff(center, A_BOLD);
 342
 343         max_center_lines = LINES - 7 - 7 - 1 - header_offset;
 344
 345         /* iterate the process (thread) list */
 346         for (i = list_offset; i < data->process_table->len &&
 347                         nblinedisplayed < max_center_lines; i++) {
 348                 tmp = g_ptr_array_index(data->process_table, i);
 349
 350                 if (current_line == selected_line) {
 351                         selected_process = tmp;
 352                         selected_tid = tmp->tid;
 353                         selected_comm = tmp->comm;
 354                         wattron(center, COLOR_PAIR(5));
 355                         mvwhline(center, current_line + header_offset, 1, ' ', COLS-3);
 356                 }
 357                 /* CPU(%) */
 358                 mvwprintw(center, current_line + header_offset, 1, "%1.2f",
 359                                 tmp->totalcpunsec / maxcputime);
 360                 /* TGID */
 361                 mvwprintw(center, current_line + header_offset, 12, "%d", tmp->pid);
 362                 /* PID */
 363                 mvwprintw(center, current_line + header_offset, 22, "%d", tmp->tid);
 364                 /* NAME */
 365                 mvwprintw(center, current_line + header_offset, 32, "%s", tmp->comm);
 366                 wattroff(center, COLOR_PAIR(5));
 367                 nblinedisplayed++;
 368                 current_line++;
 369         }
 370 }
 371
 372 gint sort_perf(gconstpointer p1, gconstpointer p2, gpointer key)
 373 {
 374         struct processtop *n1 = *(struct processtop **) p1;
 375         struct processtop *n2 = *(struct processtop **) p2;
 376
 377         struct perfcounter *tmp1, *tmp2;
 378         unsigned long totaln2 = 0;
 379         unsigned long totaln1 = 0;
 380
 381         if (!key)
 382                 return 0;
 383
 384         tmp1 = g_hash_table_lookup(n1->perf, key);
 385         if (!tmp1)
 386                 totaln1 = 0;
 387         else
 388                 totaln1 = tmp1->count;
 389
 390         tmp2 = g_hash_table_lookup(n2->perf, key);
 391         if (!tmp2)
 392                 totaln2 = 0;
 393         else
 394                 totaln2 = tmp2->count;
 395
 396         if (totaln1 < totaln2)
 397                 return 1;
 398         if (totaln1 == totaln2) {
 399                 totaln1 = n1->tid;
 400                 totaln2 = n2->tid;
 401                 if (totaln1 < totaln2)
 402                         return 1;
 403                 return -1;
 404         }
 405         return -1;
 406 }
 407
 408 void print_key_title(char *key, int line)
 409 {
 410         wattron(center, A_BOLD);
 411         mvwprintw(center, line, 1, "%s\t", key);
 412         wattroff(center, A_BOLD);
 413 }
 414
 415 void update_process_details()
 416 {
 417         unsigned long elapsed;
 418         double maxcputime;
 419         struct processtop *tmp = find_process_tid(data, selected_tid, selected_comm);
 420         struct files *file_tmp;
 421         int i, j = 0;
 422
 423         set_window_title(center, "Process details");
 424
 425
 426         elapsed = data->end - data->start;
 427         maxcputime = elapsed * data->cpu_table->len / 100.0;
 428
 429         print_key_title("Name", 1);
 430         wprintw(center, "%s", selected_comm);
 431         print_key_title("TID", 2);
 432         wprintw(center, "%d", selected_tid);
 433         if (!tmp) {
 434                 print_key_title("Does not exit at this time", 3);
 435                 return;
 436         }
 437
 438         print_key_title("PID", 3);
 439         wprintw(center, "%d", tmp->pid);
 440         print_key_title("PPID", 4);
 441         wprintw(center, "%d", tmp->ppid);
 442         print_key_title("CPU", 5);
 443         wprintw(center, "%1.2f %%", tmp->totalcpunsec/maxcputime);
 444
 445         print_key_title("READ B/s", 6);
 446         wprintw(center, "%d", tmp->fileread);
 447
 448         print_key_title("WRITE B/s", 7);
 449         wprintw(center, "%d", tmp->filewrite);
 450
 451         wattron(center, A_BOLD);
 452         mvwprintw(center, 8, 1, "FD");
 453         mvwprintw(center, 8, 12, "READ");
 454         mvwprintw(center, 8, 22, "WRITE");
 455         mvwprintw(center, 8, 32, "FILENAME");
 456         wattroff(center, A_BOLD);
 457
 458         for (i = 0; i < tmp->process_files_table->len; i++) {
 459                 file_tmp = get_file(tmp, i);
 460                 if (file_tmp != NULL) {
 461                         mvwprintw(center, 9 + j, 1, "%d", i);
 462                         mvwprintw(center, 9 + j, 12, "%d", file_tmp->read);
 463                         mvwprintw(center, 9 + j, 22, "%d", file_tmp->write);
 464                         mvwprintw(center, 9 + j, 32, "%s", file_tmp->name);
 465                         j++;
 466                 }
 467         }
 468 }
 469
 470 void update_perf()
 471 {
 472         int i;
 473         int nblinedisplayed = 0;
 474         int current_line = 0;
 475         struct processtop *tmp;
 476         int header_offset = 2;
 477         int perf_row = 40;
 478         struct perfcounter *perfn1, *perfn2;
 479         char *perf_key = NULL;
 480         int value;
 481         GHashTableIter iter;
 482         gpointer key;
 483
 484         set_window_title(center, "Perf Top");
 485         wattron(center, A_BOLD);
 486         mvwprintw(center, 1, 1, "PID");
 487         mvwprintw(center, 1, 11, "TID");
 488         mvwprintw(center, 1, 22, "NAME");
 489
 490         perf_row = 40;
 491         g_hash_table_iter_init(&iter, data->perf_list);
 492         while (g_hash_table_iter_next (&iter, &key, (gpointer) &perfn1)) {
 493                 if (perfn1->visible) {
 494                         /* + 5 to strip the "perf_" prefix */
 495                         mvwprintw(center, 1, perf_row, "%s",
 496                                         (char *) key + 5);
 497                         perf_row += 20;
 498                 }
 499                 if (perfn1->sort) {
 500                         perf_key = (char *) key;
 501                 }
 502         }
 503
 504         wattroff(center, A_BOLD);
 505
 506         g_ptr_array_sort_with_data(data->process_table, sort_perf, perf_key);
 507
 508         for (i = 0; i < data->process_table->len &&
 509                         nblinedisplayed < max_center_lines; i++) {
 510                 tmp = g_ptr_array_index(data->process_table, i);
 511
 512                 if (current_line == selected_line) {
 513                         selected_process = tmp;
 514                         wattron(center, COLOR_PAIR(5));
 515                         mvwhline(center, current_line + header_offset, 1, ' ', COLS-3);
 516                 }
 517
 518                 mvwprintw(center, current_line + header_offset, 1, "%d", tmp->pid);
 519                 mvwprintw(center, current_line + header_offset, 11, "%d", tmp->tid);
 520                 mvwprintw(center, current_line + header_offset, 22, "%s", tmp->comm);
 521
 522                 g_hash_table_iter_init(&iter, data->perf_list);
 523
 524                 perf_row = 40;
 525                 while (g_hash_table_iter_next (&iter, &key, (gpointer) &perfn1)) {
 526                         if (perfn1->visible) {
 527                                 perfn2 = g_hash_table_lookup(tmp->perf, (char *) key);
 528                                 if (perfn2)
 529                                         value = perfn2->count;
 530                                 else
 531                                         value = 0;
 532                                 mvwprintw(center, current_line + header_offset,
 533                                                 perf_row, "%d", value);
 534                                 perf_row += 20;
 535                         }
 536                 }
 537
 538                 wattroff(center, COLOR_PAIR(5));
 539                 nblinedisplayed++;
 540                 current_line++;
 541         }
 542 }
 543
 544 gint sort_by_ret_desc(gconstpointer p1, gconstpointer p2)
 545 {
 546         struct processtop *n1 = *(struct processtop **)p1;
 547         struct processtop *n2 = *(struct processtop **)p2;
 548
 549         unsigned long totaln1 = n1->totalfileread + n1->totalfilewrite;
 550         unsigned long totaln2 = n2->totalfileread + n2->totalfilewrite;
 551
 552         if (totaln1 < totaln2)
 553                 return 1;
 554         if (totaln1 == totaln2)
 555                 return 0;
 556         return -1;
 557 }
 558
 559 void update_iostream()
 560 {
 561         int i;
 562         int header_offset = 2;
 563         struct processtop *tmp;
 564         int nblinedisplayed = 0;
 565         int current_line = 0;
 566         int total = 0;
 567
 568         set_window_title(center, "IO Top");
 569         wattron(center, A_BOLD);
 570         mvwprintw(center, 1, 1, "READ (B/s)");
 571         mvwprintw(center, 1, 20, "WRITE (B/s)");
 572
 573         mvwprintw(center, 1, 40, "TOTAL STREAM");
 574
 575         mvwprintw(center, 1, 60, "TGID");
 576         mvwprintw(center, 1, 80, "PID");
 577
 578         mvwprintw(center, 1, 92, "NAME");
 579         wattroff(center, A_BOLD);
 580
 581         g_ptr_array_sort(data->process_table, sort_by_ret_desc);
 582
 583         for (i = list_offset; i < data->process_table->len &&
 584                         nblinedisplayed < max_center_lines; i++) {
 585                 tmp = g_ptr_array_index(data->process_table, i);
 586
 587                 if (current_line == selected_line) {
 588                         selected_process = tmp;
 589                         selected_tid = tmp->tid;
 590                         selected_comm = tmp->comm;
 591                         wattron(center, COLOR_PAIR(5));
 592                         mvwhline(center, current_line + header_offset, 1, ' ', COLS-3);
 593                 }
 594
 595                 /* READ (bytes/sec) */
 596                 mvwprintw(center, current_line + header_offset, 1, "%lu",
 597                         tmp->fileread);
 598
 599                 /* WRITE (bytes/sec) */
 600                 mvwprintw(center, current_line + header_offset, 20, "%lu",
 601                         tmp->filewrite);
 602
 603                 /* TOTAL STREAM */
 604                 total = tmp->totalfileread + tmp->totalfilewrite;
 605
 606                 if (total >= 1000000)
 607                         mvwprintw(center, current_line + header_offset, 40, "%lu MB",
 608                                         total/1000000);
 609                 else if (total >= 1000)
 610                         mvwprintw(center, current_line + header_offset, 40, "%lu KB",
 611                                         total/1000);
 612                 else
 613                         mvwprintw(center, current_line + header_offset, 40, "%lu B",
 614                                         total);
 615
 616                 /* TGID */
 617                 mvwprintw(center, current_line + header_offset, 60, "%d", tmp->pid);
 618                 /* PID */
 619                 mvwprintw(center, current_line + header_offset, 80, "%d", tmp->tid);
 620                 /* NAME */
 621                 mvwprintw(center, current_line + header_offset, 92, "%s", tmp->comm);
 622                 wattroff(center, COLOR_PAIR(5));
 623                 nblinedisplayed++;
 624                 current_line++;
 625         }
 626 }
 627
 628 void update_current_view()
 629 {
 630         sem_wait(&update_display_sem);
 631         if (!data)
 632                 return;
 633         update_header();
 634
 635         werase(center);
 636         box(center, 0, 0);
 637         switch (current_view) {
 638         case cpu:
 639                 update_cputop_display();
 640                 break;
 641         case perf:
 642                 update_perf();
 643                 break;
 644         case process_details:
 645                 update_process_details();
 646                 break;
 647         case iostream:
 648                 update_iostream();
 649                 break;
 650         case tree:
 651                 update_cputop_display();
 652                 break;
 653         default:
 654                 break;
 655         }
 656         update_panels();
 657         doupdate();
 658         sem_post(&update_display_sem);
 659 }
 660
 661 void setup_perf_panel()
 662 {
 663         int size;
 664         if (!data)
 665                 return;
 666         if (perf_panel_window) {
 667                 del_panel(perf_panel);
 668                 delwin(perf_panel_window);
 669         }
 670         size = g_hash_table_size(data->perf_list);
 671         perf_panel_window = create_window(size + 2, 30, 10, 10);
 672         perf_panel = new_panel(perf_panel_window);
 673         perf_panel_visible = 0;
 674         hide_panel(perf_panel);
 675 }
 676
 677 void update_perf_panel(int line_selected, int toggle_view, int toggle_sort)
 678 {
 679         int i;
 680         struct perfcounter *perf;
 681         GList *perflist;
 682
 683         if (!data)
 684                 return;
 685
 686         werase(perf_panel_window);
 687         box(perf_panel_window, 0 , 0);
 688         set_window_title(perf_panel_window, "Perf Preferences ");
 689         wattron(perf_panel_window, A_BOLD);
 690         mvwprintw(perf_panel_window, g_hash_table_size(data->perf_list) + 1, 1,
 691                         " 's' to sort");
 692         wattroff(perf_panel_window, A_BOLD);
 693
 694         if (toggle_sort == 1) {
 695                 i = 0;
 696                 perflist = g_list_first(g_hash_table_get_keys(data->perf_list));
 697                 while (perflist) {
 698                         perf = g_hash_table_lookup(data->perf_list, perflist->data);
 699                         if (i != line_selected)
 700                                 perf->sort = 0;
 701                         else
 702                                 perf->sort = 1;
 703                         i++;
 704                         perflist = g_list_next(perflist);
 705                 }
 706                 update_current_view();
 707         }
 708
 709         i = 0;
 710         perflist = g_list_first(g_hash_table_get_keys(data->perf_list));
 711         while (perflist) {
 712                 perf = g_hash_table_lookup(data->perf_list, perflist->data);
 713                 if (i == line_selected && toggle_view == 1) {
 714                         perf->visible = perf->visible == 1 ? 0:1;
 715                         update_current_view();
 716                 }
 717                 if (i == line_selected) {
 718                         wattron(perf_panel_window, COLOR_PAIR(5));
 719                         mvwhline(perf_panel_window, i + 1, 1, ' ', 30 - 2);
 720                 }
 721                 if (perf->sort == 1)
 722                         wattron(perf_panel_window, A_BOLD);
 723                 mvwprintw(perf_panel_window, i + 1, 1, "[%c] %s",
 724                                 perf->visible == 1 ? 'x' : ' ',
 725                                 (char *) perflist->data + 6);
 726                 wattroff(perf_panel_window, A_BOLD);
 727                 wattroff(perf_panel_window, COLOR_PAIR(5));
 728                 i++;
 729                 perflist = g_list_next(perflist);
 730         }
 731         update_panels();
 732         doupdate();
 733 }
 734
 735
 736 void toggle_perf_panel(void)
 737 {
 738         if (perf_panel_visible) {
 739                 hide_panel(perf_panel);
 740                 perf_panel_visible = 0;
 741         } else {
 742                 setup_perf_panel();
 743                 update_perf_panel(perf_line_selected, 0, 0);
 744                 show_panel(perf_panel);
 745                 perf_panel_visible = 1;
 746         }
 747         update_panels();
 748         doupdate();
 749 }
 750
 751 void display(unsigned int index)
 752 {
 753         last_display_index = index;
 754         currently_displayed_index = index;
 755         data = g_ptr_array_index(copies, index);
 756         if (!data)
 757                 return;
 758         max_elements = data->process_table->len;
 759         update_current_view();
 760         update_footer();
 761         update_panels();
 762         doupdate();
 763 }
 764
 765 void pause_display()
 766 {
 767         toggle_pause = 1;
 768         print_log("Pause");
 769         sem_wait(&pause_sem);
 770 }
 771
 772 void resume_display()
 773 {
 774         toggle_pause = -1;
 775         print_log("Resume");
 776         sem_post(&pause_sem);
 777 }
 778
 779 void *handle_keyboard(void *p)
 780 {
 781         int ch;
 782         while((ch = getch())) {
 783                 switch(ch) {
 784                 /* Move the cursor and scroll */
 785                 case KEY_DOWN:
 786                         if (perf_panel_visible) {
 787                                 if (perf_line_selected < g_hash_table_size(data->perf_list) - 1)
 788                                         perf_line_selected++;
 789                                 update_perf_panel(perf_line_selected, 0, 0);
 790                         } else {
 791                                 if (selected_line < (max_center_lines - 1) &&
 792                                                 selected_line < max_elements - 1) {
 793                                         selected_line++;
 794                                         selected_in_list++;
 795                                 } else if (selected_in_list < (max_elements - 1)
 796                                                 && (list_offset < (max_elements - max_center_lines))) {
 797                                         selected_in_list++;
 798                                         list_offset++;
 799                                 }
 800                                 update_current_view();
 801                         }
 802                         break;
 803                 case KEY_NPAGE:
 804                         if ((selected_line + 10 < max_center_lines - 1) &&
 805                                         ((selected_line + 10) < max_elements - 1)) {
 806                                 selected_line += 10;
 807                                 selected_in_list += 10;
 808                         } else if (max_elements > max_center_lines) {
 809                                 selected_line = max_center_lines - 1;
 810                                 if (selected_in_list + 10 < max_elements - 1) {
 811                                         selected_in_list += 10;
 812                                         list_offset += (selected_in_list - max_center_lines + 1);
 813                                 }
 814                         } else if (selected_line + 10 > max_elements) {
 815                                 selected_line = max_elements - 1;
 816                         }
 817                         update_current_view();
 818                         break;
 819                 case KEY_UP:
 820                         if (perf_panel_visible) {
 821                                 if (perf_line_selected > 0)
 822                                         perf_line_selected--;
 823                                 update_perf_panel(perf_line_selected, 0, 0);
 824                         } else {
 825                                 if (selected_line > 0) {
 826                                         selected_line--;
 827                                         selected_in_list--;
 828                                 } else if (selected_in_list > 0 && list_offset > 0) {
 829                                         selected_in_list--;
 830                                         list_offset--;
 831                                 }
 832                                 update_current_view();
 833                         }
 834                         break;
 835                 case KEY_PPAGE:
 836                         if (selected_line - 10 > 0)
 837                                 selected_line -= 10;
 838                         else
 839                                 selected_line = 0;
 840                         update_current_view();
 841                         break;
 842
 843                 /* Navigate the history with arrows */
 844                 case KEY_LEFT:
 845                         if (currently_displayed_index > 0) {
 846                                 currently_displayed_index--;
 847                                 print_log("Going back in time");
 848                         } else {
 849                                 print_log("Cannot rewind, last data is already displayed");
 850                         }
 851                         data = g_ptr_array_index(copies, currently_displayed_index);
 852                         max_elements = data->process_table->len;
 853
 854                         /* we force to pause the display when moving in time */
 855                         if (toggle_pause < 0)
 856                                 pause_display();
 857
 858                         update_current_view();
 859                         update_footer();
 860                         break;
 861                 case KEY_RIGHT:
 862                         if (currently_displayed_index < last_display_index) {
 863                                 currently_displayed_index++;
 864                                 print_log("Going forward in time");
 865                                 data = g_ptr_array_index(copies, currently_displayed_index);
 866                                 max_elements = data->process_table->len;
 867                                 update_current_view();
 868                                 update_footer();
 869                         } else {
 870                                 print_log("Manually moving forward");
 871                                 sem_post(&timer);
 872                                 /* we force to resume the refresh when moving forward */
 873                                 if (toggle_pause > 0)
 874                                         resume_display();
 875                         }
 876
 877                         break;
 878                 case ' ':
 879                         if (perf_panel_visible)
 880                                 update_perf_panel(perf_line_selected, 1, 0);
 881                         break;
 882                 case 's':
 883                         if (perf_panel_visible)
 884                                 update_perf_panel(perf_line_selected, 0, 1);
 885                         break;
 886
 887                 case 13: /* FIXME : KEY_ENTER ?? */
 888                         if (current_view == cpu) {
 889                                 current_view = process_details;
 890                         }
 891                         update_current_view();
 892                         break;
 893
 894                 case KEY_F(1):
 895                         toggle_tree *= -1;
 896                         current_view = cpu;
 897                         update_current_view();
 898                         break;
 899                 case KEY_F(2):
 900                         current_view = cpu;
 901                         update_current_view();
 902                         break;
 903                 case KEY_F(3):
 904                         current_view = perf;
 905                         toggle_tree = -1;
 906                         update_current_view();
 907                         break;
 908                 case KEY_F(4):
 909                         current_view = iostream;
 910                         toggle_tree = -1;
 911                         update_current_view();
 912                         break;
 913                 case KEY_F(10):
 914                 case 'q':
 915                         reset_ncurses();
 916                         break;
 917                 case 't':
 918                         toggle_threads *= -1;
 919                         update_current_view();
 920                         break;
 921                 case 'p':
 922                         if (toggle_pause < 0) {
 923                                 pause_display();
 924                         } else {
 925                                 resume_display();
 926                         }
 927                         break;
 928                 case 'P':
 929                         toggle_perf_panel();
 930                         break;
 931                 default:
 932                         if (data)
 933                                 update_current_view();
 934                         break;
 935                 }
 936                 update_footer();
 937         }
 938         return NULL;
 939 }
 940
 941 void init_ncurses()
 942 {
 943         sem_init(&update_display_sem, 0, 1);
 944         init_screen();
 945
 946         header = create_window(6, COLS - 1, 0, 0);
 947         center = create_window(LINES - 7 - 7, COLS - 1, 6, 0);
 948         status = create_window(MAX_LOG_LINES + 2, COLS - 1, LINES - 7, 0);
 949         footer = create_window(1, COLS - 1, LINES - 1, 0);
 950
 951         print_log("Starting display");
 952
 953         main_panel = new_panel(center);
 954         setup_perf_panel();
 955
 956         current_view = cpu;
 957
 958         basic_header();
 959         update_footer();
 960
 961         pthread_create(&keyboard_thread, NULL, handle_keyboard, (void *)NULL);
 962 }
 963