[project @ 2004-11-07 19:19:11 by rjw]

Initial import.

svn path=/import/nstheme/; revision=2436

1 files changed, 272 insertions, 0 deletions

diff --git a/riscos/menus.c b/riscos/menus.c
new file mode 100644
index 0000000..f1711a3
--- /dev/null
+++ b/riscos/menus.c
@@ -0,0 +1,272 @@
+/*
+ * This file is part of NetSurf, http://netsurf.sourceforge.net/
+ * Licensed under the GNU General Public License,
+ *		  http://www.opensource.org/licenses/gpl-license
+ * Copyright 2003 Phil Mellor <monkeyson@users.sourceforge.net>
+ * Copyright 2004 James Bursa <bursa@users.sourceforge.net>
+ * Copyright 2003 John M Bell <jmb202@ecs.soton.ac.uk>
+ * Copyright 2004 Richard Wilson <not_ginger_matt@users.sourceforge.net>
+ */
+
+/** \file
+ * Menu creation and handling (implementation).
+ */
+
+#include <stdlib.h>
+#include <string.h>
+#include "oslib/os.h"
+#include "oslib/osgbpb.h"
+#include "oslib/wimp.h"
+#include "nstheme/desktop/gui.h"
+#include "nstheme/riscos/gui.h"
+#include "nstheme/riscos/help.h"
+#include "nstheme/riscos/options.h"
+#include "nstheme/riscos/wimp.h"
+#include "nstheme/utils/log.h"
+#include "nstheme/utils/messages.h"
+#include "nstheme/utils/utils.h"
+
+
+static void translate_menu(wimp_menu *menu);
+
+
+wimp_menu *current_menu;
+wimp_i menu_icon;
+
+/*	Default menu item flags
+*/
+#define COLOUR_FLAGS (wimp_ICON_TEXT | wimp_ICON_FILLED | \
+		(wimp_COLOUR_BLACK << wimp_ICON_FG_COLOUR_SHIFT))
+#define DEFAULT_FLAGS (wimp_ICON_TEXT | wimp_ICON_FILLED | \
+		(wimp_COLOUR_BLACK << wimp_ICON_FG_COLOUR_SHIFT) | \
+		(wimp_COLOUR_WHITE << wimp_ICON_BG_COLOUR_SHIFT))
+
+
+/*	Iconbar menu
+*/
+static wimp_MENU(4) ibar_menu = {
+  { "NSTheme" }, 7,2,7,0, 200, 44, 0,
+  {
+    { 0,	      wimp_NO_SUB_MENU, DEFAULT_FLAGS, { "Info" } },
+    { 0,	      wimp_NO_SUB_MENU, DEFAULT_FLAGS, { "AppHelp" } },
+    { wimp_MENU_LAST, wimp_NO_SUB_MENU, DEFAULT_FLAGS, { "Quit" } }
+  }
+};
+int iconbar_menu_height = 3 * 44;
+wimp_menu *iconbar_menu = (wimp_menu *)&ibar_menu;
+
+
+/*	Colour menu
+*/
+static wimp_MENU(16) col_menu = {
+  { "Colour" }, 7,2,7,0, 200, 44, 0,
+  {
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_WHITE << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_VERY_LIGHT_GREY << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_LIGHT_GREY << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_MID_LIGHT_GREY << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_MID_DARK_GREY << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_DARK_GREY << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_VERY_DARK_GREY << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_BLACK << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_DARK_BLUE << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_YELLOW << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_LIGHT_GREEN << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_RED << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_CREAM << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_DARK_GREEN << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { 0,	      wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_ORANGE << wimp_ICON_BG_COLOUR_SHIFT), { "" } },
+    { wimp_MENU_LAST, wimp_NO_SUB_MENU, COLOUR_FLAGS |
+			(wimp_COLOUR_LIGHT_BLUE << wimp_ICON_BG_COLOUR_SHIFT), { "" } }
+  }
+};
+wimp_menu *colour_menu = (wimp_menu *)&col_menu;
+
+/*	Main browser menu
+*/
+static wimp_MENU(3) menu = {
+  { "NSTheme" }, 7,2,7,0, 200, 44, 0,
+  {
+    { wimp_MENU_GIVE_WARNING, wimp_NO_SUB_MENU, DEFAULT_FLAGS, { "SaveAs" } },
+    { wimp_MENU_GIVE_WARNING, wimp_NO_SUB_MENU, DEFAULT_FLAGS, { "Export" } },
+    { wimp_MENU_LAST,         wimp_NO_SUB_MENU, DEFAULT_FLAGS, { "AppHelp" } }
+  }
+};
+wimp_menu *main_menu = (wimp_menu *) &menu;
+
+
+/**
+ * Create menu structures.
+ */
+
+void ro_gui_menus_init(void)
+{
+	translate_menu(iconbar_menu);
+	translate_menu(main_menu);
+	translate_menu(colour_menu);
+
+	iconbar_menu->entries[0].sub_menu = (wimp_menu *)dialog_info;
+	main_menu->entries[0].sub_menu = (wimp_menu *)dialog_saveas;
+	main_menu->entries[1].sub_menu = (wimp_menu *)dialog_saveas;
+}
+
+
+/**
+ * Replace text in a menu with message values.
+ */
+
+void translate_menu(wimp_menu *menu)
+{
+	unsigned int i = 0;
+	const char *indirected_text;
+
+	/*	We can't just blindly set something as indirected as if we use
+		the fallback messages text (ie the pointer we gave), we overwrite
+		this data when setting the pointer to the indirected text we
+		already had.
+	*/
+	indirected_text = messages_get(menu->title_data.text);
+	if (indirected_text != menu->title_data.text) {
+		menu->title_data.indirected_text.text = indirected_text;
+		menu->entries[0].menu_flags |= wimp_MENU_TITLE_INDIRECTED;
+
+	}
+
+	/* items */
+	do {
+		indirected_text = messages_get(menu->entries[i].data.text);
+		if (indirected_text != menu->entries[i].data.text) {
+			menu->entries[i].icon_flags |= wimp_ICON_INDIRECTED;
+			menu->entries[i].data.indirected_text.text = indirected_text;
+			menu->entries[i].data.indirected_text.validation = 0;
+			menu->entries[i].data.indirected_text.size = strlen(indirected_text) + 1;
+		}
+		i++;
+	} while ((menu->entries[i - 1].menu_flags & wimp_MENU_LAST) == 0);
+}
+
+
+/**
+ * Display a menu.
+ */
+
+void ro_gui_create_menu(wimp_menu *menu, int x, int y) {
+	os_error *error;
+	current_menu = menu;
+	int colour;
+	
+	if (menu == colour_menu) {
+		colour = ro_gui_get_icon_background_colour(dialog_main, menu_icon - 1);
+		for (int i = 0; i < 16; i++) {
+			if (i == colour) {
+				colour_menu->entries[i].menu_flags |= wimp_MENU_TICKED;
+			} else {
+				colour_menu->entries[i].menu_flags &= ~wimp_MENU_TICKED;
+			}
+		}  
+	} else if (menu == main_menu) {
+		if (theme_sprites) {
+			main_menu->entries[1].icon_flags &= ~wimp_ICON_SHADED;
+		} else {
+			main_menu->entries[1].icon_flags |= wimp_ICON_SHADED;
+		} 
+	}
+
+	error = xwimp_create_menu(menu, x - 64, y);
+	if (error) {
+		LOG(("xwimp_create_menu: 0x%x: %s",
+				error->errnum, error->errmess));
+		warn_user("MenuError", error->errmess);
+	}
+}
+
+
+/**
+ * Display a pop-up menu next to the specified icon.
+ */
+
+void ro_gui_popup_menu(wimp_menu *menu, wimp_w w, wimp_i i) {
+	wimp_window_state state;
+	wimp_icon_state icon_state;
+	state.w = w;
+	icon_state.w = w;
+	icon_state.i = i;
+	wimp_get_window_state(&state);
+	wimp_get_icon_state(&icon_state);
+	menu_icon = i;
+	ro_gui_create_menu(menu,
+			state.visible.x0 + icon_state.icon.extent.x1 + 64,
+			state.visible.y1 + icon_state.icon.extent.y1);
+}
+
+
+/**
+ * Handle menu selection.
+ */
+
+void ro_gui_menu_selection(wimp_selection *selection) {
+	wimp_pointer pointer;
+
+	wimp_get_pointer_info(&pointer);
+
+	if (current_menu == iconbar_menu) {
+		switch (selection->items[0]) {
+			case 0: /* Info */
+				ro_gui_create_menu((wimp_menu *) dialog_info,
+						pointer.pos.x, pointer.pos.y);
+				break;
+			case 1: /* Help */
+				xos_cli("Filer_Run <NSTheme$Dir>.!Help");
+				break;
+			case 2: /* Quit */
+				application_quit = true;
+				break;
+		}
+
+	} else if (current_menu == main_menu) {
+		switch (selection->items[0]) {
+			case 2:	/* Help */
+				xos_cli("Filer_Run <NSTheme$Dir>.!Help");
+				break;
+		}
+	} else if (current_menu == colour_menu) {
+		ro_gui_set_icon_background_colour(dialog_main, menu_icon - 1,
+				selection->items[0]);
+	}
+
+	if (pointer.buttons == wimp_CLICK_ADJUST) {
+		ro_gui_create_menu(current_menu, 0, 0);
+	}
+
+}
+
+/**
+ * Handle Message_MenuWarning.
+ */
+
+void ro_gui_menu_warning(wimp_message_menu_warning *warning) {
+	if (current_menu != main_menu) return;
+	switch (warning->selection.items[0]) {
+	  	case 0:
+	  		ro_gui_save_open(1, warning->pos.x, warning->pos.y);
+	  		break;
+	  	case 1:
+	  		ro_gui_save_open(2, warning->pos.x, warning->pos.y);
+	  		break;
+	}	
+}