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