flenser/src/menu.cc

/*
 * File: menu.cc
 *
 * Copyright (C) 2005-2007 Jorge Arellano Cid <jcid@dillo.org>
 * Copyright (C) 2024 Rodrigo Arias Mallo <rodarima@gmail.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 */

/**
 * @file
 * Functions for menus
 */

#include <FL/Fl.H>
#include <FL/Fl_Menu_Item.H>

#include <unistd.h>
#include <errno.h>
#include "lout/misc.hh"    /* SimpleVector */
#include "msg.hh"
#include "menu.hh"
#include "actions.hh"
#include "uicmd.hh"
#include "history.hh"
#include "html.hh"
#include "ui.hh" // for (UI *)
#include "keys.hh"
#include "timeout.hh"

/*
 * Local data types
 */

typedef struct {
   const char *title;
   const Fl_Menu_Item *picked;
   const Fl_Menu_Item *menu;
} Menu_popup_data_t;

/*
 * Local data
 */

// (This data can be encapsulated inside a class for each popup, but
//  as popups are modal, there's no need).
static std::unique_ptr< DilloUrl > popup_url;
// Weak reference to the popup's bw
static BrowserWindow *popup_bw = NULL;
static void *popup_form = NULL;
// Where to place the popup
static int popup_x, popup_y;
// History popup direction (-1 = back, 1 = forward).
static int history_direction = -1;
// History popup, list of URL-indexes.
static int *history_list = NULL;


//--------------------------------------------------------------------------
static void Menu_nop_cb(Fl_Widget*, void*)
{
}

/**
 * Static function for File menu callbacks.
 */
static void filemenu_cb(Fl_Widget*, void *data)
{
   if (strcmp((char*)data, "nw") == 0) {
      a_UIcmd_open_url_nw(popup_bw, NULL);
   } else if (strcmp((char*)data, "nt") == 0) {
      a_UIcmd_open_url_nt(popup_bw, NULL, 1);
   } else if (strcmp((char*)data, "of") == 0) {
      a_UIcmd_open_file(popup_bw);
   } else if (strcmp((char*)data, "ou") == 0) {
      a_UIcmd_focus_location(popup_bw);
   } else if (strcmp((char*)data, "cw") == 0) {
      Timeout::add(0.0, [=]{ a_UIcmd_close_bw( popup_bw ); } );
   } else if (strcmp((char*)data, "ed") == 0) {
      Timeout::add(0.0, [=]{ a_UIcmd_close_all_bw( nullptr ); } );
   }
}


static void Menu_copy_urlstr_cb(Fl_Widget*, void *user_data)
{
   if (user_data) {
      DilloUrl *url = (DilloUrl *)user_data ;
      a_UIcmd_copy_urlstr(popup_bw, URL_STR(url));
   }
}

/**
 * Open URL
 */
static void Menu_open_url_cb(Fl_Widget*, void *user_data)
{
   DilloUrl *url = (DilloUrl *)user_data;
   _MSG("Open URL cb: click! :-)\n");
   a_UIcmd_open_url(popup_bw, url);
}

/**
 * Open URL in new window
 */
static void Menu_open_url_nw_cb(Fl_Widget*, void *user_data)
{
   DilloUrl *url = (DilloUrl *)user_data;
   _MSG("Open URL in new window cb: click! :-)\n");
   a_UIcmd_open_url_nw(popup_bw, url);
}

/**
 * Open URL in new Tab
 */
static void Menu_open_url_nt_cb(Fl_Widget*, void *user_data)
{
   DilloUrl *url = (DilloUrl *)user_data;
   int focus = prefs.focus_new_tab ? 1 : 0;
   if (Fl::event_state(FL_SHIFT)) focus = !focus;
   a_UIcmd_open_url_nt(popup_bw, url, focus);
}

/**
 * Add bookmark
 */
static void Menu_add_bookmark_cb(Fl_Widget*, void *user_data)
{
   DilloUrl *url = (DilloUrl *)user_data;
   a_UIcmd_add_bookmark(popup_bw, url);
}

/**
 * Find text
 */
static void Menu_find_text_cb(Fl_Widget*, void*)
{
   ((UI *)popup_bw->ui)->findbar_toggle(1);
}

/**
 * Save link
 */
static void Menu_save_link_cb(Fl_Widget*, void *user_data)
{
   DilloUrl *url = (DilloUrl *)user_data;
   a_UIcmd_save_link(popup_bw, url);
}

/**
 * Save current page
 */
static void Menu_save_page_cb(Fl_Widget*, void*)
{
   a_UIcmd_save(popup_bw);
}

/**
 * View current page source
 */
static void Menu_view_page_source_cb(Fl_Widget*, void *user_data)
{
   DilloUrl *url = (DilloUrl *)user_data;
   a_UIcmd_view_page_source(popup_bw, url);
}

/**
 * View current page's bugs
 */
static void Menu_view_page_bugs_cb(Fl_Widget*, void*)
{
   a_UIcmd_view_page_bugs(popup_bw);
}

/**
 * Load images on current page that match URL pattern
 */
static void Menu_load_images_cb(Fl_Widget*, void *user_data)
{
   DilloUrl *page_url = (DilloUrl *) user_data;
   void *doc = a_Bw_get_url_doc(popup_bw, page_url);

   if (doc)
      a_Html_load_images(doc, popup_url.get());
}

/**
 * Submit form
 */
static void Menu_form_submit_cb(Fl_Widget*, void*)
{
   void *doc = a_Bw_get_url_doc(popup_bw, popup_url.get());

   if (doc)
      a_Html_form_submit(doc, popup_form);
}

/**
 * Reset form
 */
static void Menu_form_reset_cb(Fl_Widget*, void*)
{
   void *doc = a_Bw_get_url_doc(popup_bw, popup_url.get());

   if (doc)
      a_Html_form_reset(doc, popup_form);
}

/**
 * Toggle display of 'hidden' form controls.
 */
static void Menu_form_hiddens_cb(Fl_Widget*, void *user_data)
{
   bool visible = *((bool *) user_data);
   void *doc = a_Bw_get_url_doc(popup_bw, popup_url.get());

   if (doc)
      a_Html_form_display_hiddens(doc, popup_form, !visible);
}

static void Menu_stylesheet_cb(Fl_Widget*, void *vUrl)
{
   int mb = Fl::event_button();
   const DilloUrl *url = (const DilloUrl *) vUrl;

   if (mb == 1) {
      a_UIcmd_open_url(popup_bw, url);
   } else if (mb == 2) {
      if (prefs.middle_click_opens_new_tab) {
         int focus = prefs.focus_new_tab ? 1 : 0;
         if (Fl::event_state(FL_SHIFT)) focus = !focus;
         a_UIcmd_open_url_nt(popup_bw, url, focus);
      } else {
         a_UIcmd_open_url_nw(popup_bw, url);
      }
   }
}

static void Menu_bugmeter_validate(const char *validator_url)
{
   if (popup_url &&
       dStrAsciiCasecmp(URL_SCHEME(popup_url), "dpi")) {
      const char *popup_str = URL_STR(popup_url.get()),
                 *ptr = strrchr(popup_str, '#');
      char *no_fragment = ptr ? dStrndup(popup_str, ptr - popup_str)
                              : dStrdup(popup_str);
      auto encoded = a_Url_encode_hex_str(no_fragment);
      Dstr *dstr = dStr_sized_new(128);

      dStr_sprintf(dstr, validator_url, encoded.value().c_str());
      a_UIcmd_open_urlstr(popup_bw, dstr->str);
      dStr_free(dstr, 1);
      dFree(no_fragment);
   }
}

/**
 * Validate URL with the W3C Nu validator (for HTML 5)
 */
static void Menu_bugmeter_validate_w3c_nu_cb(Fl_Widget*, void*)
{
   Menu_bugmeter_validate(
         "https://validator.w3.org/nu/"
         "?useragent=Validator.nu%%2FLV+https%%3A%%2F%%2Fvalidator.w3.org%%2Fservices"
         "&acceptlanguage="
         "&doc=%s");
}

/**
 * Validate URL with the W3C legacy validator (HTML 4.01 and older)
 */
static void Menu_bugmeter_validate_w3c_cb(Fl_Widget*, void*)
{
   Menu_bugmeter_validate(
         "https://validator.w3.org/check?uri=%s"
         "&charset=%%28detect+automatically%%29"
         "&doctype=Inline&group=0"
         "&user-agent=W3C_Validator%%2F1.3+");
}

/**
 * Show info page for the bug meter
 */
static void Menu_bugmeter_about_cb(Fl_Widget*, void*)
{
   a_UIcmd_open_urlstr(popup_bw, "https://dillo-browser.github.io/old/help/bug_meter.html");
}

/**
 * Navigation History callback.
 * Go to selected URL.
 */
static void Menu_history_cb(Fl_Widget*, void *data)
{
   int mb = Fl::event_button();
   int offset = history_direction * VOIDP2INT(data);
   const DilloUrl *url = a_History_get_url(history_list[VOIDP2INT(data)-1]);

   if (mb == 1) {
      a_UIcmd_nav_jump(popup_bw, offset, 0);
   } else if (mb == 2) {
      // Middle button, open in a new window/tab
      if (prefs.middle_click_opens_new_tab) {
         int focus = prefs.focus_new_tab ? 1 : 0;
         if (Fl::event_state(FL_SHIFT)) focus = !focus;
         a_UIcmd_open_url_nt(popup_bw, url, focus);
      } else {
         a_UIcmd_open_url_nw(popup_bw, url);
      }
   }
}

/*
 * Menus are popped-up from this timeout callback so the events
 * associated with the button are gone when it pops. This way we
 * avoid a segfault when a new page replaces the page that issued
 * the popup menu.
 */
static void Menu_simple_popup_cb(void *data)
{
   const Fl_Menu_Item *m;

   ((UI*)popup_bw->ui)->window()->cursor(FL_CURSOR_DEFAULT);

   m = ((Fl_Menu_Item *)data)->popup(popup_x, popup_y);

   if (m && m->callback())
      m->do_callback((Fl_Widget *)data);
   Timeout::remove();
}

static void Menu_popup_cb(void *data)
{
   const Fl_Menu_Item *picked;
   Menu_popup_data_t *d = (Menu_popup_data_t *)data;

   ((UI*)popup_bw->ui)->window()->cursor(FL_CURSOR_DEFAULT);

   picked = d->menu->popup(popup_x, popup_y, d->title, d->picked);
   if (picked) {
      d->picked = picked;
      if (picked->callback())
         picked->do_callback((Fl_Widget *)(d->menu));
   }
   Timeout::remove();
}

/**
 * Page popup menu (construction & popup)
 */
void a_Menu_page_popup(BrowserWindow *bw, const DilloUrl *url,
                       bool has_bugs, std::vector< std::unique_ptr< DilloUrl > > *cssUrls)
{
   int j = 0;

   static Fl_Menu_Item *stylesheets = NULL;
   static Fl_Menu_Item pm[] = {
      {"View page source", 0, Menu_view_page_source_cb,0,0,0,0,0,0},
      {"View page bugs", 0, Menu_view_page_bugs_cb,0,0,0,0,0,0},
      {"View stylesheets", 0, Menu_nop_cb,0,FL_SUBMENU_POINTER|FL_MENU_DIVIDER,
       0,0,0,0},
      {"Bookmark this page", 0,Menu_add_bookmark_cb,0,FL_MENU_DIVIDER,0,0,0,0},
      {"Find text", 0, Menu_find_text_cb,0,0,0,0,0,0},
      {"Save page as...", 0, Menu_save_page_cb,0,0,0,0,0,0},
      {0,0,0,0,0,0,0,0,0}
   };
   static Menu_popup_data_t page_data = {"Page menu", NULL, pm};

   popup_x = Fl::event_x();
   popup_y = Fl::event_y();
   popup_bw = bw;
   popup_url = a_Url_dup(url);

   has_bugs == TRUE ? pm[1].activate() : pm[1].deactivate();

   if (dStrAsciiCasecmp(URL_SCHEME(url), "dpi") == 0 &&
       strncmp(URL_PATH(url), "/vsource/", 9) == 0)
      pm[0].deactivate();
   else {
      pm[0].activate();
      pm[0].user_data(popup_url.get());
   }

   if (stylesheets) {
      while (stylesheets[j].text) {
         dFree((char *) stylesheets[j].label());
         delete reinterpret_cast< DilloUrl * >( stylesheets[j].user_data() );
         j++;
      }
      delete [] stylesheets;
      stylesheets = NULL;
   }

   if (cssUrls && cssUrls->size () > 0) {
      stylesheets = new Fl_Menu_Item[cssUrls->size() + 1];
      memset(stylesheets, '\0', (cssUrls->size() + 1) * sizeof(Fl_Menu_Item));

      for (j = 0; j < cssUrls->size(); j++) {
         DilloUrl *url = cssUrls->at(j).get();
         const char *url_str = URL_STR(url);
         const uint_t head_length = 30, tail_length = 40,
                      url_len = strlen(url_str);
         char *label;

         if (url_len > head_length + tail_length + 3) {
            /* trim long URLs when making the label */
            char *url_head = dStrndup(url_str, head_length);
            const char *url_tail = url_str + (url_len - tail_length);
            label = dStrconcat(url_head, "...", url_tail, NULL);
            dFree(url_head);
         } else {
            label = dStrdup(url_str);
         }

         stylesheets[j].label(FL_NORMAL_LABEL, label);
         stylesheets[j].callback(Menu_stylesheet_cb, a_Url_dup(url).release());
      }

      pm[2].user_data(stylesheets);
      pm[2].activate();
   } else {
      pm[2].deactivate();
   }
   pm[3].user_data(popup_url.get());

   Timeout::add(0.0, [&]{ Menu_popup_cb( &page_data ); } );
}

static Fl_Menu_Item link_menu_[] = {
   {"Open link in new tab", 0, Menu_open_url_nt_cb,0,0,0,0,0,0},
   {"Open link in new window", 0, Menu_open_url_nw_cb,0,FL_MENU_DIVIDER,0,0,
    0,0},
   {"Bookmark this link", 0, Menu_add_bookmark_cb,0,0,0,0,0,0},
   {"Copy link location", 0, Menu_copy_urlstr_cb,0,FL_MENU_DIVIDER,0,0,0,0},
   {"Save link as...", 0, Menu_save_link_cb,0,FL_MENU_DIVIDER,0,0,0,0},
   {0,0,0,0,0,0,0,0,0}
};

/* As we can only provide a pointer to the link menu items, we need to
 * create an auxiliary structure to hold the current URL and the program
 * that should run on each item. */
struct link_menu_item {
   const DilloUrl *url;
   const DilloUrl *origin;
   Action *action;
};

/**
 * Open URL following a custom action
 */
static void Menu_open_url_action_cb(Fl_Widget*, void *user_data)
{
   /* Don't use popup_url because it is used for the image URL when coming from
    * the image menu. We should get rid of the global variables and pass them
    * via the user_data. */

   struct link_menu_item *mitem = (struct link_menu_item *) user_data;
   const DilloUrl *url = mitem->url;
   const DilloUrl *origin = mitem->origin;
   Action *action = mitem->action;

   /* Set the environment variables */
   setenv("url", URL_STR(url), 1);
   setenv("origin", URL_STR(origin), 1);

   if (fork() == 0) {
      /* Child */
      errno = 0;
      int ret = system(action->cmd);
      if (ret == -1) {
         MSG("Cannot run '%s': %s\n", action->cmd, strerror(errno));
         exit(1);
      } else if (ret != 0) {
         MSG("Command exited with '%d': %s\n", ret, action->cmd);
         exit(1);
      } else {
         /* All good, terminate the child */
         exit(0);
      }
   }
}

static Fl_Menu_Item *get_link_menu(void)
{
   static Fl_Menu_Item *link_menu = NULL;
   static struct link_menu_item *link_menu_item = NULL;

   /* Already initialized */
   if (link_menu != NULL)
      return link_menu;

   Dlist *actions = a_Actions_link_get();
   int nactions = dList_length(actions);

   /* Count static menu entries */
   int nstatic = 0;
   while (link_menu_[nstatic].text)
      nstatic++;

   int ntotal = nstatic + nactions;
   link_menu = (Fl_Menu_Item *) calloc(ntotal + 1, sizeof(Fl_Menu_Item));
   link_menu_item = (struct link_menu_item *) calloc(nactions, sizeof(struct link_menu_item));

   /* Just copy the static entries */
   for (int i = 0; i < nstatic; i++) {
      memcpy(&link_menu[i], &link_menu_[i], sizeof(Fl_Menu_Item));
   }

   /* And append the dynamic ones */
   for (int i = 0; i < nactions; i++) {
      Action *action = (Action *) dList_nth_data(actions, i);
      struct link_menu_item *mitem = &link_menu_item[i];
      mitem->url = NULL; /* Not known yet */
      mitem->action = action;

      Fl_Menu_Item *item = &link_menu[nstatic + i];
      item->text = action->label;
      item->callback_ = Menu_open_url_action_cb;
      item->user_data_ = mitem;
   }

   return link_menu;
}

static void Menu_set_link_menu_user_data(const DilloUrl *url, const DilloUrl *page_url)
{
   Fl_Menu_Item *link_menu = get_link_menu();
   for (int i = 0; link_menu[i].label(); i++) {
      if (link_menu[i].callback_ == Menu_open_url_action_cb) {
         struct link_menu_item *mitem = (struct link_menu_item *) link_menu[i].user_data_;
         /* Set the url and origin */
         mitem->url = url;
         mitem->origin = page_url;
      } else {
         link_menu[i].user_data_ = (void *) url;
      }
   }
}

/**
 * Link popup menu (construction & popup)
 */
void a_Menu_link_popup(BrowserWindow *bw, const DilloUrl *url, const DilloUrl *page_url)
{
   static Menu_popup_data_t link_data = {"Link menu", NULL, NULL};

   popup_x = Fl::event_x();
   popup_y = Fl::event_y();
   popup_bw = bw;
   popup_url = a_Url_dup(url);

   Fl_Menu_Item *link_menu = get_link_menu();
   link_data.menu = link_menu;

   Menu_set_link_menu_user_data(popup_url.get(), page_url);

   Timeout::add(0.0, [&]{ Menu_popup_cb( &link_data ); } );
}

/**
 * Image popup menu (construction & popup)
 */
void a_Menu_image_popup(BrowserWindow *bw, const DilloUrl *url,
                        bool loaded_img, DilloUrl *page_url,
                        DilloUrl *link_url)
{
   static DilloUrl *popup_page_url = NULL;
   static DilloUrl *popup_link_url = NULL;
   static Fl_Menu_Item pm[] = {
      {"Isolate image", 0, Menu_open_url_cb,0,0,0,0,0,0},
      {"Open image in new tab", 0, Menu_open_url_nt_cb,0,0,0,0,0,0},
      {"Open image in new window", 0, Menu_open_url_nw_cb, 0, FL_MENU_DIVIDER,
       0,0,0,0},
      {"Load image", 0, Menu_load_images_cb,0,0,0,0,0,0},
      {"Bookmark this image", 0, Menu_add_bookmark_cb,0,0,0,0,0,0},
      {"Copy image location", 0,Menu_copy_urlstr_cb,0,FL_MENU_DIVIDER,0,0,0,0},
      {"Save image as...", 0, Menu_save_link_cb, 0, FL_MENU_DIVIDER,0,0,0,0},
      {"Link menu", 0, Menu_nop_cb, get_link_menu(), FL_SUBMENU_POINTER,0,0,0,0},
      {0,0,0,0,0,0,0,0,0}
   };
   static Menu_popup_data_t image_data = {"Image menu", NULL, pm};

   popup_x = Fl::event_x();
   popup_y = Fl::event_y();
   popup_bw = bw;
   popup_url = a_Url_dup(url);
   delete popup_page_url;
   popup_page_url = a_Url_dup(page_url).release();
   delete popup_link_url;
   popup_link_url = a_Url_dup(link_url).release();


   pm[0].user_data(popup_url.get());
   pm[1].user_data(popup_url.get());
   pm[2].user_data(popup_url.get());

   if (loaded_img) {
      pm[3].deactivate();
   } else {
      pm[3].activate();
      pm[3].user_data(popup_page_url);
   }

   pm[4].user_data(popup_url.get());
   pm[5].user_data(popup_url.get());
   pm[6].user_data(popup_url.get());

   if (link_url) {
      pm[7].activate();
      Menu_set_link_menu_user_data(popup_link_url, popup_page_url);
   } else {
      pm[7].deactivate();
   }

   Timeout::add(0.0, [&]{ Menu_popup_cb( &image_data ); } );
}

/**
 * Form popup menu (construction & popup)
 */
void a_Menu_form_popup(BrowserWindow *bw, const DilloUrl *page_url,
                       void *formptr, bool hidvis)
{
   static bool hiddens_visible;
   static Fl_Menu_Item pm[] = {
      {"Submit form", 0, Menu_form_submit_cb,0,0,0,0,0,0},
      {"Reset form", 0, Menu_form_reset_cb,0,0,0,0,0,0},
      {0, 0, Menu_form_hiddens_cb, &hiddens_visible, 0,0,0,0,0},
      {0,0,0,0,0,0,0,0,0}
   };
   static Menu_popup_data_t form_data = {"Form menu", NULL, pm};

   popup_x = Fl::event_x();
   popup_y = Fl::event_y();
   popup_bw = bw;
   popup_url = a_Url_dup(page_url);
   popup_form = formptr;

   hiddens_visible = hidvis;
   pm[2].label(hiddens_visible ? "Hide hiddens": "Show hiddens");

   Timeout::add(0.0, [&]{ Menu_popup_cb( &form_data ); } );
}

/**
 * File popup menu (construction & popup)
 */
void a_Menu_file_popup(BrowserWindow *bw, void *v_wid)
{
   Fl_Widget *wid = (Fl_Widget*)v_wid;

   static Fl_Menu_Item pm[] = {
      {"New tab", Keys::getShortcut(KEYS_NEW_TAB), filemenu_cb,
       (void*)"nt",0,0,0,0,0},
      {"New window", Keys::getShortcut(KEYS_NEW_WINDOW), filemenu_cb,
       (void*)"nw", FL_MENU_DIVIDER,0,0,0,0},
      {"Open file...", Keys::getShortcut(KEYS_OPEN), filemenu_cb,
       (void*)"of",0,0,0,0,0},
      {"Open URL...", Keys::getShortcut(KEYS_GOTO), filemenu_cb,
       (void*)"ou",0,0,0,0,0},
      {"Close", Keys::getShortcut(KEYS_CLOSE_TAB), filemenu_cb,
       (void*)"cw", FL_MENU_DIVIDER,0,0,0,0},
      {"Exit Dillo", Keys::getShortcut(KEYS_CLOSE_ALL), filemenu_cb,
       (void*)"ed",0,0,0,0,0},
      {0,0,0,0,0,0,0,0,0}
   };

   popup_bw = bw;
   popup_x = wid->x();
   popup_y = wid->y() + wid->h();
   popup_url.reset();

   //pm->label(wid->visible() ? NULL : "File");
   Timeout::add(0.0, [=]{ Menu_simple_popup_cb( pm ); } );
}

/**
 * Bugmeter popup menu (construction & popup)
 */
void a_Menu_bugmeter_popup(BrowserWindow *bw, const DilloUrl *url)
{
   static Fl_Menu_Item pm[] = {
      {"Validate URL with W3C Nu validator (HTML5 only)", 0,
         Menu_bugmeter_validate_w3c_nu_cb,0,0,0,0,0,0},
      {"Validate URL with W3C validator (HTML 4.01 and older)", 0,
         Menu_bugmeter_validate_w3c_cb,0,FL_MENU_DIVIDER,0,0,0,0},
      {"About bug meter", 0,
         Menu_bugmeter_about_cb,0,0,0,0,0,0},
      {0,0,0,0,0,0,0,0,0}
   };

   popup_x = Fl::event_x();
   popup_y = Fl::event_y();
   popup_bw = bw;
   popup_url = a_Url_dup(url);

   Timeout::add(0.0, [=]{ Menu_simple_popup_cb( pm ); } );
}

/**
 * Navigation History popup menu (construction & popup).
 *
 * direction: {backward = -1, forward = 1}
 */
void a_Menu_history_popup(BrowserWindow *bw, int x, int y, int direction)
{
   static Fl_Menu_Item *pm = 0;
   int i, n;

   popup_bw = bw;
   popup_x = x;
   popup_y = y;
   history_direction = direction;

   // TODO: hook popdown event with delete or similar.
   if (pm)
      delete [] pm;
   if (history_list)
      dFree(history_list);

   // Get a list of URLs for this popup
   history_list = a_UIcmd_get_history(bw, direction);

   for (n = 0; history_list[n] != -1; n++)
      ;

   pm = new Fl_Menu_Item[n + 1];
   memset(pm, '\0', (n + 1) * sizeof(Fl_Menu_Item));

   for (i = 0; i < n; i++) {
      pm[i].label(FL_NORMAL_LABEL, a_History_get_title(history_list[i], 1));
      pm[i].callback(Menu_history_cb, INT2VOIDP(i+1));
   }
   Timeout::add(0.0, [=]{ Menu_simple_popup_cb( pm ); } );
}

/**
 * Toggle use of remote stylesheets
 */
static void Menu_remote_css_cb(Fl_Widget *wid, void*)
{
   Fl_Menu_Item *item = (Fl_Menu_Item*) wid;

   item->flags ^= FL_MENU_VALUE;
   prefs.load_stylesheets = item->flags & FL_MENU_VALUE ? 1 : 0;
   a_UIcmd_repush(popup_bw);
}

/**
 * Toggle use of embedded CSS style
 */
static void Menu_embedded_css_cb(Fl_Widget *wid, void*)
{
   Fl_Menu_Item *item = (Fl_Menu_Item*) wid;

   item->flags ^= FL_MENU_VALUE;
   prefs.parse_embedded_css = item->flags & FL_MENU_VALUE ? 1 : 0;
   a_UIcmd_repush(popup_bw);
}


/**
 * Toggle use of force https mode
 */
static void Menu_force_https_cb(Fl_Widget *wid, void*)
{
   Fl_Menu_Item *item = (Fl_Menu_Item*) wid;

   item->flags ^= FL_MENU_VALUE;
   prefs.http_force_https = item->flags & FL_MENU_VALUE ? 1 : 0;
   a_UIcmd_repush(popup_bw);
}

static void Menu_panel_change_cb(Fl_Widget*, void *user_data)
{
   UI *ui = (UI*)popup_bw->ui;

   if (VOIDP2INT(user_data) == 10) /* small icons */
      ui->change_panel(ui->get_panelsize(), !ui->get_smallicons());
   else
      ui->change_panel(VOIDP2INT(user_data), ui->get_smallicons());
}

/**
 * Toggle loading of images -- and load them if enabling.
 */
static void Menu_imgload_toggle_cb(Fl_Widget *wid, void*)
{
   Fl_Menu_Item *item = (Fl_Menu_Item*) wid;

   item->flags ^= FL_MENU_VALUE;

   if ((prefs.load_images = item->flags & FL_MENU_VALUE ? 1 : 0)) {
      void *doc = a_Bw_get_current_doc(popup_bw);

      if (doc) {
         DilloUrl *pattern = NULL;
         a_Html_load_images(doc, pattern);
      }
   }
}

/**
 * Toggle loading of background images.
 */
static void Menu_bgimg_load_toggle_cb(Fl_Widget *wid, void*)
{
   Fl_Menu_Item *item = (Fl_Menu_Item*) wid;

   item->flags ^= FL_MENU_VALUE;
   prefs.load_background_images = item->flags & FL_MENU_VALUE ? 1 : 0;
   a_UIcmd_repush(popup_bw);
}

/**
 * Tools popup menu (construction & popup).
 */
void a_Menu_tools_popup(BrowserWindow *bw, int x, int y)
{
   const Fl_Menu_Item *item;
   UI *ui = (UI*)bw->ui;

   static Fl_Menu_Item pm[] = {
      {"Use remote CSS", 0, Menu_remote_css_cb, 0, FL_MENU_TOGGLE,0,0,0,0},
      {"Use embedded CSS", 0, Menu_embedded_css_cb, 0,
       FL_MENU_TOGGLE|FL_MENU_DIVIDER,0,0,0,0},
      {"Load images", 0, Menu_imgload_toggle_cb, 0,
       FL_MENU_TOGGLE,0,0,0,0},
      {"Load background images", 0, Menu_bgimg_load_toggle_cb, 0,
       FL_MENU_TOGGLE|FL_MENU_DIVIDER,0,0,0,0},
      {"Force HTTPS", 0, Menu_force_https_cb, 0,
       FL_MENU_TOGGLE|FL_MENU_DIVIDER,0,0,0,0},
      {"Panel size", 0, Menu_nop_cb, (void*)"Submenu1", FL_SUBMENU,0,0,0,0},
         {"tiny",  0,Menu_panel_change_cb,(void*)0,FL_MENU_RADIO,0,0,0,0},
         {"small", 0,Menu_panel_change_cb,(void*)1,FL_MENU_RADIO,0,0,0,0},
         {"medium",0,Menu_panel_change_cb,(void*)2,
           FL_MENU_RADIO|FL_MENU_DIVIDER,0,0,0,0},
         {"small icons", 0,Menu_panel_change_cb,(void*)10,
           FL_MENU_TOGGLE,0,0,0,0},
         {0,0,0,0,0,0,0,0,0},
      {0,0,0,0,0,0,0,0,0}
   };

   popup_bw = bw;
   int cur_panelsize = ui->get_panelsize();
   int cur_smallicons = ui->get_smallicons();

   if (prefs.load_stylesheets)
      pm[0].set();
   if (prefs.parse_embedded_css)
      pm[1].set();
   if (prefs.load_images)
      pm[2].set();
   if (prefs.load_background_images)
      pm[3].set();
   if (prefs.http_force_https)
      pm[4].set();
   pm[6+cur_panelsize].setonly();
   cur_smallicons ? pm[9].set() : pm[9].clear();

   item = pm->popup(x, y);
   if (item) {
      ((Fl_Widget *)item)->do_callback();
   }
}