657 lines · c
1// SPDX-License-Identifier: GPL-2.0-or-later2/*3 * tui.c ncurses text user interface for TMON program4 *5 * Copyright (C) 2013 Intel Corporation. All rights reserved.6 *7 * Author: Jacob Pan <jacob.jun.pan@linux.intel.com>8 */9 10#include <unistd.h>11#include <stdio.h>12#include <stdlib.h>13#include <string.h>14#include <stdint.h>15#include <ncurses.h>16#include <time.h>17#include <syslog.h>18#include <panel.h>19#include <pthread.h>20#include <signal.h>21 22#include "tmon.h"23 24#define min(x, y) ({ \25 typeof(x) _min1 = (x); \26 typeof(y) _min2 = (y); \27 (void) (&_min1 == &_min2); \28 _min1 < _min2 ? _min1 : _min2; })29 30#define max(x, y) ({ \31 typeof(x) _max1 = (x); \32 typeof(y) _max2 = (y); \33 (void) (&_max1 == &_max2); \34 _max1 > _max2 ? _max1 : _max2; })35 36static PANEL *data_panel;37static PANEL *dialogue_panel;38static PANEL *top;39 40static WINDOW *title_bar_window;41static WINDOW *tz_sensor_window;42static WINDOW *cooling_device_window;43static WINDOW *control_window;44static WINDOW *status_bar_window;45static WINDOW *thermal_data_window;46static WINDOW *dialogue_window;47 48char status_bar_slots[10][40];49static void draw_hbar(WINDOW *win, int y, int start, int len,50 unsigned long pattern, bool end);51 52static int maxx, maxy;53static int maxwidth = 200;54 55#define TITLE_BAR_HIGHT 156#define SENSOR_WIN_HIGHT 4 /* one row for tz name, one for trip points */57 58 59/* daemon mode flag (set by startup parameter -d) */60static int tui_disabled;61 62static void close_panel(PANEL *p)63{64 if (p) {65 del_panel(p);66 p = NULL;67 }68}69 70static void close_window(WINDOW *win)71{72 if (win) {73 delwin(win);74 win = NULL;75 }76}77 78void close_windows(void)79{80 if (tui_disabled)81 return;82 /* must delete panels before their attached windows */83 if (dialogue_window)84 close_panel(dialogue_panel);85 if (cooling_device_window)86 close_panel(data_panel);87 88 close_window(title_bar_window);89 close_window(tz_sensor_window);90 close_window(status_bar_window);91 close_window(cooling_device_window);92 close_window(control_window);93 close_window(thermal_data_window);94 close_window(dialogue_window);95 96}97 98void write_status_bar(int x, char *line)99{100 mvwprintw(status_bar_window, 0, x, "%s", line);101 wrefresh(status_bar_window);102}103 104/* wrap at 5 */105#define DIAG_DEV_ROWS 5106/*107 * list cooling devices + "set temp" entry; wraps after 5 rows, if they fit108 */109static int diag_dev_rows(void)110{111 int entries = ptdata.nr_cooling_dev + 1;112 int rows = max(DIAG_DEV_ROWS, (entries + 1) / 2);113 return min(rows, entries);114}115 116void setup_windows(void)117{118 int y_begin = 1;119 120 if (tui_disabled)121 return;122 123 getmaxyx(stdscr, maxy, maxx);124 resizeterm(maxy, maxx);125 126 title_bar_window = subwin(stdscr, TITLE_BAR_HIGHT, maxx, 0, 0);127 y_begin += TITLE_BAR_HIGHT;128 129 tz_sensor_window = subwin(stdscr, SENSOR_WIN_HIGHT, maxx, y_begin, 0);130 y_begin += SENSOR_WIN_HIGHT;131 132 cooling_device_window = subwin(stdscr, ptdata.nr_cooling_dev + 3, maxx,133 y_begin, 0);134 y_begin += ptdata.nr_cooling_dev + 3; /* 2 lines for border */135 /* two lines to show borders, one line per tz show trip point position136 * and value.137 * dialogue window is a pop-up, when needed it lays on top of cdev win138 */139 140 dialogue_window = subwin(stdscr, diag_dev_rows() + 5, maxx-50,141 DIAG_Y, DIAG_X);142 143 thermal_data_window = subwin(stdscr, ptdata.nr_tz_sensor *144 NR_LINES_TZDATA + 3, maxx, y_begin, 0);145 y_begin += ptdata.nr_tz_sensor * NR_LINES_TZDATA + 3;146 control_window = subwin(stdscr, 4, maxx, y_begin, 0);147 148 scrollok(cooling_device_window, TRUE);149 maxwidth = maxx - 18;150 status_bar_window = subwin(stdscr, 1, maxx, maxy-1, 0);151 152 strcpy(status_bar_slots[0], " Ctrl-c - Quit ");153 strcpy(status_bar_slots[1], " TAB - Tuning ");154 wmove(status_bar_window, 1, 30);155 156 /* prepare panels for dialogue, if panel already created then we must157 * be doing resizing, so just replace windows with new ones, old ones158 * should have been deleted by close_window159 */160 data_panel = new_panel(cooling_device_window);161 if (!data_panel)162 syslog(LOG_DEBUG, "No data panel\n");163 else {164 if (dialogue_window) {165 dialogue_panel = new_panel(dialogue_window);166 if (!dialogue_panel)167 syslog(LOG_DEBUG, "No dialogue panel\n");168 else {169 /* Set up the user pointer to the next panel*/170 set_panel_userptr(data_panel, dialogue_panel);171 set_panel_userptr(dialogue_panel, data_panel);172 top = data_panel;173 }174 } else175 syslog(LOG_INFO, "no dialogue win, term too small\n");176 }177 doupdate();178 werase(stdscr);179 refresh();180}181 182void resize_handler(int sig)183{184 /* start over when term gets resized, but first we clean up */185 close_windows();186 endwin();187 refresh();188 clear();189 getmaxyx(stdscr, maxy, maxx); /* get the new screen size */190 setup_windows();191 /* rate limit */192 sleep(1);193 syslog(LOG_DEBUG, "SIG %d, term resized to %d x %d\n",194 sig, maxy, maxx);195 signal(SIGWINCH, resize_handler);196}197 198const char cdev_title[] = " COOLING DEVICES ";199void show_cooling_device(void)200{201 int i, j, x, y = 0;202 203 if (tui_disabled || !cooling_device_window)204 return;205 206 werase(cooling_device_window);207 wattron(cooling_device_window, A_BOLD);208 mvwprintw(cooling_device_window, 1, 1,209 "ID Cooling Dev Cur Max Thermal Zone Binding");210 wattroff(cooling_device_window, A_BOLD);211 for (j = 0; j < ptdata.nr_cooling_dev; j++) {212 /* draw cooling device list on the left in the order of213 * cooling device instances. skip unused idr.214 */215 mvwprintw(cooling_device_window, j + 2, 1,216 "%02d %12.12s%6lu %6lu",217 ptdata.cdi[j].instance,218 ptdata.cdi[j].type,219 ptdata.cdi[j].cur_state,220 ptdata.cdi[j].max_state);221 }222 223 /* show cdev binding, y is the global cooling device instance */224 for (i = 0; i < ptdata.nr_tz_sensor; i++) {225 int tz_inst = ptdata.tzi[i].instance;226 for (j = 0; j < ptdata.nr_cooling_dev; j++) {227 int cdev_inst;228 y = j;229 x = tz_inst * TZONE_RECORD_SIZE + TZ_LEFT_ALIGN;230 231 draw_hbar(cooling_device_window, y+2, x,232 TZONE_RECORD_SIZE-1, ACS_VLINE, false);233 234 /* draw a column of spaces to separate thermal zones */235 mvwprintw(cooling_device_window, y+2, x-1, " ");236 if (ptdata.tzi[i].cdev_binding) {237 cdev_inst = ptdata.cdi[j].instance;238 unsigned long trip_binding =239 ptdata.tzi[i].trip_binding[cdev_inst];240 int k = 0; /* per zone trip point id that241 * binded to this cdev, one to242 * many possible based on the243 * binding bitmask.244 */245 syslog(LOG_DEBUG,246 "bind tz%d cdev%d tp%lx %d cdev%lx\n",247 i, j, trip_binding, y,248 ptdata.tzi[i].cdev_binding);249 /* draw each trip binding for the cdev */250 while (trip_binding >>= 1) {251 k++;252 if (!(trip_binding & 1))253 continue;254 /* draw '*' to show binding */255 mvwprintw(cooling_device_window,256 y + 2,257 x + ptdata.tzi[i].nr_trip_pts -258 k - 1, "*");259 }260 }261 }262 }263 /* draw border after data so that border will not be messed up264 * even there is not enough space for all the data to be shown265 */266 wborder(cooling_device_window, 0, 0, 0, 0, 0, 0, 0, 0);267 wattron(cooling_device_window, A_BOLD);268 mvwprintw(cooling_device_window, 0, maxx/2 - sizeof(cdev_title),269 cdev_title);270 wattroff(cooling_device_window, A_BOLD);271 272 wrefresh(cooling_device_window);273}274 275const char DIAG_TITLE[] = "[ TUNABLES ]";276void show_dialogue(void)277{278 int j, x = 0, y = 0;279 int rows, cols;280 WINDOW *w = dialogue_window;281 282 if (tui_disabled || !w)283 return;284 285 getmaxyx(w, rows, cols);286 287 /* Silence compiler 'unused' warnings */288 (void)cols;289 290 werase(w);291 box(w, 0, 0);292 mvwprintw(w, 0, maxx/4, DIAG_TITLE);293 /* list all the available tunables */294 for (j = 0; j <= ptdata.nr_cooling_dev; j++) {295 y = j % diag_dev_rows();296 if (y == 0 && j != 0)297 x += 20;298 if (j == ptdata.nr_cooling_dev)299 /* save last choice for target temp */300 mvwprintw(w, y+1, x+1, "%C-%.12s", 'A'+j, "Set Temp");301 else302 mvwprintw(w, y+1, x+1, "%C-%.10s-%2d", 'A'+j,303 ptdata.cdi[j].type, ptdata.cdi[j].instance);304 }305 wattron(w, A_BOLD);306 mvwprintw(w, diag_dev_rows()+1, 1, "Enter Choice [A-Z]?");307 wattroff(w, A_BOLD);308 /* print legend at the bottom line */309 mvwprintw(w, rows - 2, 1,310 "Legend: A=Active, P=Passive, C=Critical");311 312 wrefresh(dialogue_window);313}314 315void write_dialogue_win(char *buf, int y, int x)316{317 WINDOW *w = dialogue_window;318 319 mvwprintw(w, y, x, "%s", buf);320}321 322const char control_title[] = " CONTROLS ";323void show_control_w(void)324{325 unsigned long state;326 327 get_ctrl_state(&state);328 329 if (tui_disabled || !control_window)330 return;331 332 werase(control_window);333 mvwprintw(control_window, 1, 1,334 "PID gain: kp=%2.2f ki=%2.2f kd=%2.2f Output %2.2f",335 p_param.kp, p_param.ki, p_param.kd, p_param.y_k);336 337 mvwprintw(control_window, 2, 1,338 "Target Temp: %2.1fC, Zone: %d, Control Device: %.12s",339 p_param.t_target, target_thermal_zone, ctrl_cdev);340 341 /* draw border last such that everything is within boundary */342 wborder(control_window, 0, 0, 0, 0, 0, 0, 0, 0);343 wattron(control_window, A_BOLD);344 mvwprintw(control_window, 0, maxx/2 - sizeof(control_title),345 control_title);346 wattroff(control_window, A_BOLD);347 348 wrefresh(control_window);349}350 351void initialize_curses(void)352{353 if (tui_disabled)354 return;355 356 initscr();357 start_color();358 keypad(stdscr, TRUE); /* enable keyboard mapping */359 nonl(); /* tell curses not to do NL->CR/NL on output */360 cbreak(); /* take input chars one at a time */361 noecho(); /* dont echo input */362 curs_set(0); /* turn off cursor */363 use_default_colors();364 365 init_pair(PT_COLOR_DEFAULT, COLOR_WHITE, COLOR_BLACK);366 init_pair(PT_COLOR_HEADER_BAR, COLOR_BLACK, COLOR_WHITE);367 init_pair(PT_COLOR_ERROR, COLOR_BLACK, COLOR_RED);368 init_pair(PT_COLOR_RED, COLOR_WHITE, COLOR_RED);369 init_pair(PT_COLOR_YELLOW, COLOR_WHITE, COLOR_YELLOW);370 init_pair(PT_COLOR_GREEN, COLOR_WHITE, COLOR_GREEN);371 init_pair(PT_COLOR_BLUE, COLOR_WHITE, COLOR_BLUE);372 init_pair(PT_COLOR_BRIGHT, COLOR_WHITE, COLOR_BLACK);373 374}375 376void show_title_bar(void)377{378 int i;379 int x = 0;380 381 if (tui_disabled || !title_bar_window)382 return;383 384 wattrset(title_bar_window, COLOR_PAIR(PT_COLOR_HEADER_BAR));385 wbkgd(title_bar_window, COLOR_PAIR(PT_COLOR_HEADER_BAR));386 werase(title_bar_window);387 388 mvwprintw(title_bar_window, 0, 0,389 " TMON v%s", VERSION);390 391 wrefresh(title_bar_window);392 393 werase(status_bar_window);394 395 for (i = 0; i < 10; i++) {396 if (strlen(status_bar_slots[i]) == 0)397 continue;398 wattron(status_bar_window, A_REVERSE);399 mvwprintw(status_bar_window, 0, x, "%s", status_bar_slots[i]);400 wattroff(status_bar_window, A_REVERSE);401 x += strlen(status_bar_slots[i]) + 1;402 }403 wrefresh(status_bar_window);404}405 406static void handle_input_val(int ch)407{408 char buf[32];409 int val;410 char path[256];411 WINDOW *w = dialogue_window;412 413 echo();414 keypad(w, TRUE);415 wgetnstr(w, buf, 31);416 val = atoi(buf);417 418 if (ch == ptdata.nr_cooling_dev) {419 snprintf(buf, 31, "Invalid Temp %d! %d-%d", val,420 MIN_CTRL_TEMP, MAX_CTRL_TEMP);421 if (val < MIN_CTRL_TEMP || val > MAX_CTRL_TEMP)422 write_status_bar(40, buf);423 else {424 p_param.t_target = val;425 snprintf(buf, 31, "Set New Target Temp %d", val);426 write_status_bar(40, buf);427 }428 } else {429 snprintf(path, 256, "%s/%s%d", THERMAL_SYSFS,430 CDEV, ptdata.cdi[ch].instance);431 sysfs_set_ulong(path, "cur_state", val);432 }433 noecho();434 dialogue_on = 0;435 show_data_w();436 show_control_w();437 438 top = (PANEL *)panel_userptr(top);439 top_panel(top);440}441 442static void handle_input_choice(int ch)443{444 char buf[48];445 int base = 0;446 int cdev_id = 0;447 448 if ((ch >= 'A' && ch <= 'A' + ptdata.nr_cooling_dev) ||449 (ch >= 'a' && ch <= 'a' + ptdata.nr_cooling_dev)) {450 base = (ch < 'a') ? 'A' : 'a';451 cdev_id = ch - base;452 if (ptdata.nr_cooling_dev == cdev_id)453 snprintf(buf, sizeof(buf), "New Target Temp:");454 else455 snprintf(buf, sizeof(buf), "New Value for %.10s-%2d: ",456 ptdata.cdi[cdev_id].type,457 ptdata.cdi[cdev_id].instance);458 write_dialogue_win(buf, diag_dev_rows() + 2, 2);459 handle_input_val(cdev_id);460 } else {461 snprintf(buf, sizeof(buf), "Invalid selection %d", ch);462 write_dialogue_win(buf, 8, 2);463 }464}465 466void *handle_tui_events(void *arg)467{468 int ch;469 470 keypad(cooling_device_window, TRUE);471 while ((ch = wgetch(cooling_device_window)) != EOF) {472 if (tmon_exit)473 break;474 /* when term size is too small, no dialogue panels are set.475 * we need to filter out such cases.476 */477 if (!data_panel || !dialogue_panel ||478 !cooling_device_window ||479 !dialogue_window) {480 481 continue;482 }483 pthread_mutex_lock(&input_lock);484 if (dialogue_on) {485 handle_input_choice(ch);486 /* top panel filter */487 if (ch == 'q' || ch == 'Q')488 ch = 0;489 }490 switch (ch) {491 case KEY_LEFT:492 box(cooling_device_window, 10, 0);493 break;494 case 9: /* TAB */495 top = (PANEL *)panel_userptr(top);496 top_panel(top);497 if (top == dialogue_panel) {498 dialogue_on = 1;499 show_dialogue();500 } else {501 dialogue_on = 0;502 /* force refresh */503 show_data_w();504 show_control_w();505 }506 break;507 case 'q':508 case 'Q':509 tmon_exit = 1;510 break;511 }512 update_panels();513 doupdate();514 pthread_mutex_unlock(&input_lock);515 }516 517 if (arg)518 *(int *)arg = 0; /* make gcc happy */519 520 return NULL;521}522 523/* draw a horizontal bar in given pattern */524static void draw_hbar(WINDOW *win, int y, int start, int len, unsigned long ptn,525 bool end)526{527 mvwaddch(win, y, start, ptn);528 whline(win, ptn, len);529 if (end)530 mvwaddch(win, y, MAX_DISP_TEMP+TDATA_LEFT, ']');531}532 533static char trip_type_to_char(int type)534{535 switch (type) {536 case THERMAL_TRIP_CRITICAL: return 'C';537 case THERMAL_TRIP_HOT: return 'H';538 case THERMAL_TRIP_PASSIVE: return 'P';539 case THERMAL_TRIP_ACTIVE: return 'A';540 default:541 return '?';542 }543}544 545/* fill a string with trip point type and value in one line546 * e.g. P(56) C(106)547 * maintain the distance one degree per char548 */549static void draw_tp_line(int tz, int y)550{551 int j;552 int x;553 554 for (j = 0; j < ptdata.tzi[tz].nr_trip_pts; j++) {555 x = ptdata.tzi[tz].tp[j].temp / 1000;556 mvwprintw(thermal_data_window, y + 0, x + TDATA_LEFT,557 "%c%d", trip_type_to_char(ptdata.tzi[tz].tp[j].type),558 x);559 syslog(LOG_INFO, "%s:tz %d tp %d temp = %lu\n", __func__,560 tz, j, ptdata.tzi[tz].tp[j].temp);561 }562}563 564const char data_win_title[] = " THERMAL DATA ";565void show_data_w(void)566{567 int i;568 569 570 if (tui_disabled || !thermal_data_window)571 return;572 573 werase(thermal_data_window);574 wattron(thermal_data_window, A_BOLD);575 mvwprintw(thermal_data_window, 0, maxx/2 - sizeof(data_win_title),576 data_win_title);577 wattroff(thermal_data_window, A_BOLD);578 /* draw a line as ruler */579 for (i = 10; i < MAX_DISP_TEMP; i += 10)580 mvwprintw(thermal_data_window, 1, i+TDATA_LEFT, "%2d", i);581 582 for (i = 0; i < ptdata.nr_tz_sensor; i++) {583 int temp = trec[cur_thermal_record].temp[i] / 1000;584 int y = 0;585 586 y = i * NR_LINES_TZDATA + 2;587 /* y at tz temp data line */588 mvwprintw(thermal_data_window, y, 1, "%6.6s%2d:[%3d][",589 ptdata.tzi[i].type,590 ptdata.tzi[i].instance, temp);591 draw_hbar(thermal_data_window, y, TDATA_LEFT, temp, ACS_RARROW,592 true);593 draw_tp_line(i, y);594 }595 wborder(thermal_data_window, 0, 0, 0, 0, 0, 0, 0, 0);596 wrefresh(thermal_data_window);597}598 599const char tz_title[] = "THERMAL ZONES(SENSORS)";600 601void show_sensors_w(void)602{603 int i, j;604 char buffer[512];605 606 if (tui_disabled || !tz_sensor_window)607 return;608 609 werase(tz_sensor_window);610 611 memset(buffer, 0, sizeof(buffer));612 wattron(tz_sensor_window, A_BOLD);613 mvwprintw(tz_sensor_window, 1, 1, "Thermal Zones:");614 wattroff(tz_sensor_window, A_BOLD);615 616 mvwprintw(tz_sensor_window, 1, TZ_LEFT_ALIGN, "%s", buffer);617 /* fill trip points for each tzone */618 wattron(tz_sensor_window, A_BOLD);619 mvwprintw(tz_sensor_window, 2, 1, "Trip Points:");620 wattroff(tz_sensor_window, A_BOLD);621 622 /* draw trip point from low to high for each tz */623 for (i = 0; i < ptdata.nr_tz_sensor; i++) {624 int inst = ptdata.tzi[i].instance;625 626 mvwprintw(tz_sensor_window, 1,627 TZ_LEFT_ALIGN+TZONE_RECORD_SIZE * inst, "%.9s%02d",628 ptdata.tzi[i].type, ptdata.tzi[i].instance);629 for (j = ptdata.tzi[i].nr_trip_pts - 1; j >= 0; j--) {630 /* loop through all trip points */631 char type;632 int tp_pos;633 /* reverse the order here since trips are sorted634 * in ascending order in terms of temperature.635 */636 tp_pos = ptdata.tzi[i].nr_trip_pts - j - 1;637 638 type = trip_type_to_char(ptdata.tzi[i].tp[j].type);639 mvwaddch(tz_sensor_window, 2,640 inst * TZONE_RECORD_SIZE + TZ_LEFT_ALIGN +641 tp_pos, type);642 syslog(LOG_DEBUG, "draw tz %d tp %d ch:%c\n",643 inst, j, type);644 }645 }646 wborder(tz_sensor_window, 0, 0, 0, 0, 0, 0, 0, 0);647 wattron(tz_sensor_window, A_BOLD);648 mvwprintw(tz_sensor_window, 0, maxx/2 - sizeof(tz_title), tz_title);649 wattroff(tz_sensor_window, A_BOLD);650 wrefresh(tz_sensor_window);651}652 653void disable_tui(void)654{655 tui_disabled = 1;656}657