// SPDX-License-Identifier: GPL-2.0
#include "ui/browser.h"
#include "ui/keysyms.h"
#include "ui/ui.h"
#include "ui/util.h"
#include "ui/libslang.h"
#include "util/header.h"
#include "util/session.h"

#include <sys/ttydefaults.h>

static void ui_browser__argv_write(struct ui_browser *browser,
       void *entry, int row)
{
 char **arg = entry;
 char *str = *arg;
 char empty[] = " ";
 bool current_entry = ui_browser__is_current_entry(browser, row);
 unsigned long offset = (unsigned long)browser->priv;

 if (offset >= strlen(str))
  str = empty;
 else
  str = str + offset;

 ui_browser__set_color(browser, current_entry ? HE_COLORSET_SELECTED :
             HE_COLORSET_NORMAL);

 ui_browser__write_nstring(browser, str, browser->width);
}

static int list_menu__run(struct ui_browser *menu)
{
 int key;
 unsigned long offset;
 static const char help[] =
 "h/?/F1        Show this window\n"
 "UP/DOWN/PGUP\n"
 "PGDN/SPACE\n"
 "LEFT/RIGHT    Navigate\n"
 "q/ESC/CTRL+C  Exit browser";

 if (ui_browser__show(menu, "Header information", "Press 'q' to exit") < 0)
  return -1;

 while (1) {
  key = ui_browser__run(menu, 0);

  switch (key) {
  case K_RIGHT:
   offset = (unsigned long)menu->priv;
   offset += 10;
   menu->priv = (void *)offset;
   continue;
  case K_LEFT:
   offset = (unsigned long)menu->priv;
   if (offset >= 10)
    offset -= 10;
   menu->priv = (void *)offset;
   continue;
  case K_F1:
  case 'h':
  case '?':
   ui_browser__help_window(menu, help);
   continue;
  case K_ESC:
  case 'q':
  case CTRL('c'):
   key = -1;
   break;
  default:
   ui_browser__warn_unhandled_hotkey(menu, key, 0, ", use 'h'/'?'/F1 to see actions");
   continue;
  }

  break;
 }

 ui_browser__hide(menu);
 return key;
}

static int ui__list_menu(int argc, char * const argv[])
{
 struct ui_browser menu = {
  .entries    = (void *)argv,
  .refresh    = ui_browser__argv_refresh,
  .seek     = ui_browser__argv_seek,
  .write     = ui_browser__argv_write,
  .nr_entries = argc,
 };

 return list_menu__run(&menu);
}

int tui__header_window(struct perf_session *session)
{
 int i, argc = 0;
 char **argv;
 char *ptr, *pos;
 size_t size;
 FILE *fp = open_memstream(&ptr, &size);

 perf_header__fprintf_info(session, fp, true);
 fclose(fp);

 for (pos = ptr, argc = 0; (pos = strchr(pos, '\n')) != NULL; pos++)
  argc++;

 argv = calloc(argc + 1, sizeof(*argv));
 if (argv == NULL)
  goto out;

 argv[0] = pos = ptr;
 for (i = 1; (pos = strchr(pos, '\n')) != NULL; i++) {
  *pos++ = '\0';
  argv[i] = pos;
 }

 BUG_ON(i != argc + 1);

 ui__list_menu(argc, argv);

out:
 free(argv);
 free(ptr);
 return 0;
}