move frontends into sub directory

1 files changed, 326 insertions, 0 deletions

diff --git a/frontends/amiga/libs.c b/frontends/amiga/libs.c
new file mode 100644
index 000000000..993cd3ad0
--- /dev/null
+++ b/frontends/amiga/libs.c
@@ -0,0 +1,326 @@
+/*
+ * Copyright 2014 Chris Young <chris@unsatisfactorysoftware.co.uk>
+ *
+ * This file is part of NetSurf, http://www.netsurf-browser.org/
+ *
+ * NetSurf 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; version 2 of the License.
+ *
+ * NetSurf is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#include "amiga/os3support.h"
+
+#include "amiga/libs.h"
+#include "amiga/misc.h"
+#include "utils/utils.h"
+#include "utils/log.h"
+
+#include <proto/exec.h>
+#include <proto/intuition.h>
+#include <proto/utility.h>
+
+#include <graphics/gfxbase.h> /* Needed for v54 version check */
+
+#ifndef __amigaos4__
+/* OS3 needs these for the XXXX_GetClass() functions */
+#include <proto/arexx.h>
+#include <proto/bevel.h>
+#include <proto/bitmap.h>
+#include <proto/button.h>
+#include <proto/chooser.h>
+#include <proto/checkbox.h>
+#include <proto/clicktab.h>
+#include <proto/fuelgauge.h>
+#include <proto/getfile.h>
+#include <proto/getfont.h>
+#include <proto/getscreenmode.h>
+#include <proto/integer.h>
+#include <proto/label.h>
+#include <proto/layout.h>
+#include <proto/listbrowser.h>
+#include <proto/radiobutton.h>
+#include <proto/scroller.h>
+#include <proto/space.h>
+#include <proto/speedbar.h>
+#include <proto/string.h>
+#include <proto/window.h>
+#endif
+
+#ifdef __amigaos4__
+#define AMINS_LIB_OPEN(LIB, LIBVER, PREFIX, INTERFACE, INTVER, FAIL)	\
+	LOG("Opening %s v%d", LIB, LIBVER); \
+	if((PREFIX##Base = (struct PREFIX##Base *)OpenLibrary(LIB, LIBVER))) {	\
+		I##PREFIX = (struct PREFIX##IFace *)GetInterface((struct Library *)PREFIX##Base, INTERFACE, INTVER, NULL);	\
+		if(I##PREFIX == NULL) {	\
+			LOG("Failed to get %s interface v%d of %s", INTERFACE, INTVER, LIB);	\
+		}	\
+	} else {	\
+		LOG("Failed to open %s v%d", LIB, LIBVER);	\
+		if(FAIL == true) {	\
+			STRPTR error = ASPrintf("Unable to open %s v%ld (fatal error)", LIB, LIBVER);	\
+			ami_misc_fatal_error(error);	\
+			FreeVec(error);	\
+			return false;	\
+		}	\
+	}
+
+#define AMINS_LIB_CLOSE(PREFIX)	\
+	if(I##PREFIX) DropInterface((struct Interface *)I##PREFIX);	\
+	if(PREFIX##Base) CloseLibrary((struct Library *)PREFIX##Base);
+
+#define AMINS_LIB_STRUCT(PREFIX)	\
+	struct PREFIX##Base *PREFIX##Base = NULL;	\
+	struct PREFIX##IFace *I##PREFIX = NULL;
+
+#define AMINS_CLASS_OPEN(CLASS, CLASSVER, PREFIX, CLASSGET, NEEDINTERFACE)	\
+	LOG("Opening %s v%d", CLASS, CLASSVER); \
+	if((PREFIX##Base = OpenClass(CLASS, CLASSVER, &PREFIX##Class))) {	\
+		if(NEEDINTERFACE == true) {	\
+			LOG("        + interface");	\
+			I##PREFIX = (struct PREFIX##IFace *)GetInterface((struct Library *)PREFIX##Base, "main", 1, NULL);	\
+			if(I##PREFIX == NULL) {	\
+				LOG("Failed to get main interface v1 of %s", CLASS);	\
+			}	\
+		}	\
+	}	\
+	if(PREFIX##Class == NULL) {	\
+		STRPTR error = ASPrintf("Unable to open %s v%d (fatal error)", CLASS, CLASSVER);	\
+		ami_misc_fatal_error(error);	\
+		FreeVec(error);	\
+		return false;	\
+	}
+
+#define AMINS_CLASS_CLOSE(PREFIX)	\
+	if(I##PREFIX) DropInterface((struct Interface *)I##PREFIX);	\
+	if(PREFIX##Base) CloseClass(PREFIX##Base);
+
+#define AMINS_CLASS_STRUCT(PREFIX)	\
+	struct ClassLibrary *PREFIX##Base = NULL;	\
+	struct PREFIX##IFace *I##PREFIX = NULL;	\
+	Class *PREFIX##Class = NULL;
+
+#else
+#define AMINS_LIB_OPEN(LIB, LIBVER, PREFIX, INTERFACE, INTVER, FAIL)	\
+	LOG("Opening %s v%d", LIB, LIBVER); \
+	if((PREFIX##Base = (struct PREFIX##Base *)OpenLibrary(LIB, LIBVER))) {	\
+	} else {	\
+		LOG("Failed to open %s v%d", LIB, LIBVER);	\
+		if(FAIL == true) {	\
+			STRPTR error = ASPrintf("Unable to open %s v%d (fatal error)", LIB, LIBVER);	\
+			ami_misc_fatal_error(error);	\
+			FreeVec(error);	\
+			return false;	\
+		}	\
+	}
+
+#define AMINS_LIB_CLOSE(PREFIX)	\
+	if(PREFIX##Base) CloseLibrary((struct Library *)PREFIX##Base);
+
+#define AMINS_LIB_STRUCT(PREFIX)	\
+	struct PREFIX##Base *PREFIX##Base = NULL;
+
+#define AMINS_CLASS_OPEN(CLASS, CLASSVER, PREFIX, CLASSGET, NEEDINTERFACE)	\
+	LOG("Opening %s v%d", CLASS, CLASSVER); \
+	if((PREFIX##Base = OpenLibrary(CLASS, CLASSVER))) {	\
+		PREFIX##Class = CLASSGET##_GetClass();	\
+	}	\
+	if(PREFIX##Class == NULL) {	\
+		STRPTR error = ASPrintf("Unable to open %s v%d (fatal error)", CLASS, CLASSVER);	\
+		ami_misc_fatal_error(error);	\
+		FreeVec(error);	\
+		return false;	\
+	}
+
+#define AMINS_CLASS_CLOSE(PREFIX)	\
+	if(PREFIX##Base) CloseLibrary(PREFIX##Base);
+
+#define AMINS_CLASS_STRUCT(PREFIX)	\
+	struct Library *PREFIX##Base = NULL;	\
+	Class *PREFIX##Class = NULL;
+
+#endif
+
+#define GraphicsBase GfxBase /* graphics.library is a bit weird */
+
+#ifdef __amigaos4__
+AMINS_LIB_STRUCT(Application);
+#else
+AMINS_LIB_STRUCT(Utility)
+#endif
+AMINS_LIB_STRUCT(Asl);
+AMINS_LIB_STRUCT(DataTypes);
+AMINS_LIB_STRUCT(Diskfont);
+AMINS_LIB_STRUCT(Graphics);
+AMINS_LIB_STRUCT(GadTools);
+AMINS_LIB_STRUCT(Icon);
+AMINS_LIB_STRUCT(IFFParse);
+AMINS_LIB_STRUCT(Intuition);
+AMINS_LIB_STRUCT(Keymap);
+AMINS_LIB_STRUCT(Layers);
+AMINS_LIB_STRUCT(Locale);
+AMINS_LIB_STRUCT(P96);
+AMINS_LIB_STRUCT(Workbench);
+
+AMINS_LIB_STRUCT(GuiGFX);
+
+AMINS_CLASS_STRUCT(ARexx);
+AMINS_CLASS_STRUCT(Bevel);
+AMINS_CLASS_STRUCT(BitMap);
+AMINS_CLASS_STRUCT(Button);
+AMINS_CLASS_STRUCT(Chooser);
+AMINS_CLASS_STRUCT(CheckBox);
+AMINS_CLASS_STRUCT(ClickTab);
+AMINS_CLASS_STRUCT(FuelGauge);
+AMINS_CLASS_STRUCT(GetFile);
+AMINS_CLASS_STRUCT(GetFont);
+AMINS_CLASS_STRUCT(GetScreenMode);
+AMINS_CLASS_STRUCT(Integer);
+AMINS_CLASS_STRUCT(Label);
+AMINS_CLASS_STRUCT(Layout);
+AMINS_CLASS_STRUCT(ListBrowser);
+AMINS_CLASS_STRUCT(RadioButton);
+#ifndef __amigaos4__
+AMINS_CLASS_STRUCT(Page);
+#endif
+AMINS_CLASS_STRUCT(Scroller);
+AMINS_CLASS_STRUCT(Space);
+AMINS_CLASS_STRUCT(SpeedBar);
+AMINS_CLASS_STRUCT(String);
+AMINS_CLASS_STRUCT(Window);
+
+
+bool ami_libs_open(void)
+{
+#ifdef __amigaos4__
+	/* Libraries only needed on OS4 */
+	AMINS_LIB_OPEN("application.library",  53, Application, "application", 2, false)
+#else
+	/* Libraries we get automatically on OS4 but not OS3 */
+	AMINS_LIB_OPEN("utility.library",      37, Utility,     "main",        1, true)
+#endif
+	/* Standard libraries for both versions */
+	AMINS_LIB_OPEN("asl.library",          37, Asl,         "main",        1, true)
+	AMINS_LIB_OPEN("datatypes.library",    39, DataTypes,   "main",        1, true)
+	AMINS_LIB_OPEN("diskfont.library",     40, Diskfont,    "main",        1, true)
+	AMINS_LIB_OPEN("gadtools.library",     37, GadTools,    "main",        1, true)
+	AMINS_LIB_OPEN("graphics.library",     40, Graphics,    "main",        1, true)
+	AMINS_LIB_OPEN("icon.library",         44, Icon,        "main",        1, true)
+	AMINS_LIB_OPEN("iffparse.library",     37, IFFParse,    "main",        1, true)
+	AMINS_LIB_OPEN("intuition.library",    40, Intuition,   "main",        1, true)
+	AMINS_LIB_OPEN("keymap.library",       37, Keymap,      "main",        1, true)
+	AMINS_LIB_OPEN("layers.library",       37, Layers,      "main",        1, true)
+	AMINS_LIB_OPEN("locale.library",       38, Locale,      "main",        1, true)
+	AMINS_LIB_OPEN("workbench.library",    37, Workbench,   "main",        1, true)
+
+	/* This is down here as we need to check the graphics.library version
+	 * before opening.  If it is sufficiently new enough we can avoid using P96.
+	 */
+	if(GfxBase->LibNode.lib_Version < 54)
+		AMINS_LIB_OPEN("Picasso96API.library",  0, P96,         "main",        1, false)
+
+	/* Non-OS provided libraries */
+	AMINS_LIB_OPEN("guigfx.library",    9, GuiGFX,   "main",        1, true)
+
+	/* NB: timer.device is opened in schedule.c (ultimately by the scheduler process).
+	 * The library base and interface are obtained there, rather than here, due to
+	 * the additional complexities of opening devices, which aren't important here
+	 * (as we only need the library interface), but are important for the scheduler
+	 * (as it also uses the device interface).  We trust that the scheduler has
+	 * initialised before any other code requires the timer's library interface,
+	 * to avoid opening it twice.
+	 */
+
+	/* BOOPSI classes.
+	 * Opened using class functions rather than the old-fashioned method.
+	 * We get the class pointer once and used our stored copy.
+	 * On OS4 these must be opened *after* intuition.library.
+	 * NB: the last argument should be "true" only if the class also has
+	 * library functions we use.
+	 */
+	AMINS_CLASS_OPEN("arexx.class",                  44, ARexx,         AREXX,         false)
+	AMINS_CLASS_OPEN("images/bevel.image",           44, Bevel,         BEVEL,         false)
+	AMINS_CLASS_OPEN("images/bitmap.image",          44, BitMap,        BITMAP,        false)
+	AMINS_CLASS_OPEN("gadgets/button.gadget",        44, Button,        BUTTON,        false)
+	AMINS_CLASS_OPEN("gadgets/checkbox.gadget",      44, CheckBox,      CHECKBOX,      false)
+	AMINS_CLASS_OPEN("gadgets/chooser.gadget",       44, Chooser,       CHOOSER,       true)
+	AMINS_CLASS_OPEN("gadgets/clicktab.gadget",      44, ClickTab,      CLICKTAB,      true)
+	AMINS_CLASS_OPEN("gadgets/fuelgauge.gadget",     44, FuelGauge,     FUELGAUGE,     false)
+	AMINS_CLASS_OPEN("gadgets/getfile.gadget",       44, GetFile,       GETFILE,       false)
+	AMINS_CLASS_OPEN("gadgets/getfont.gadget",       44, GetFont,       GETFONT,       false)
+	AMINS_CLASS_OPEN("gadgets/getscreenmode.gadget", 44, GetScreenMode, GETSCREENMODE, false)
+	AMINS_CLASS_OPEN("gadgets/integer.gadget",       44, Integer,       INTEGER,       false)
+	AMINS_CLASS_OPEN("images/label.image",           44, Label,         LABEL,         false)
+	AMINS_CLASS_OPEN("gadgets/layout.gadget",        44, Layout,        LAYOUT,        true)
+	AMINS_CLASS_OPEN("gadgets/listbrowser.gadget",   44, ListBrowser,   LISTBROWSER,   true)
+	AMINS_CLASS_OPEN("gadgets/radiobutton.gadget",   44, RadioButton,   RADIOBUTTON,   false)
+	AMINS_CLASS_OPEN("gadgets/scroller.gadget",      44, Scroller,      SCROLLER,      false)
+	AMINS_CLASS_OPEN("gadgets/space.gadget",         44, Space,         SPACE,         false)
+	AMINS_CLASS_OPEN("gadgets/speedbar.gadget",      44, SpeedBar,      SPEEDBAR,      true)
+	AMINS_CLASS_OPEN("gadgets/string.gadget",        44, String,        STRING,        false)
+	AMINS_CLASS_OPEN("window.class",                 44, Window,        WINDOW,        false)
+
+#ifndef __amigaos4__
+	PageClass = PAGE_GetClass();
+#endif
+
+	return true;
+}
+
+void ami_libs_close(void)
+{
+	/* BOOPSI Classes.
+	 * On OS4 these must be closed *before* intuition.library
+	 */
+	AMINS_CLASS_CLOSE(ARexx)
+	AMINS_CLASS_CLOSE(Bevel)
+	AMINS_CLASS_CLOSE(BitMap)
+	AMINS_CLASS_CLOSE(Button)
+	AMINS_CLASS_CLOSE(CheckBox)
+	AMINS_CLASS_CLOSE(Chooser)
+	AMINS_CLASS_CLOSE(ClickTab)
+	AMINS_CLASS_CLOSE(FuelGauge)
+	AMINS_CLASS_CLOSE(GetFile)
+	AMINS_CLASS_CLOSE(GetFont)
+	AMINS_CLASS_CLOSE(GetScreenMode)
+	AMINS_CLASS_CLOSE(Integer)
+	AMINS_CLASS_CLOSE(Label)
+	AMINS_CLASS_CLOSE(Layout)
+	AMINS_CLASS_CLOSE(ListBrowser)
+	AMINS_CLASS_CLOSE(RadioButton)
+	AMINS_CLASS_CLOSE(Scroller)
+	AMINS_CLASS_CLOSE(Space)
+	AMINS_CLASS_CLOSE(SpeedBar)
+	AMINS_CLASS_CLOSE(String)
+	AMINS_CLASS_CLOSE(Window)
+
+	/* Libraries */
+	AMINS_LIB_CLOSE(GuiGFX)
+
+	AMINS_LIB_CLOSE(Asl)
+	AMINS_LIB_CLOSE(DataTypes)
+	AMINS_LIB_CLOSE(Diskfont)
+	AMINS_LIB_CLOSE(GadTools)
+	AMINS_LIB_CLOSE(Graphics)
+	AMINS_LIB_CLOSE(Icon)
+	AMINS_LIB_CLOSE(IFFParse)
+	AMINS_LIB_CLOSE(Intuition)
+	AMINS_LIB_CLOSE(Keymap)
+	AMINS_LIB_CLOSE(Layers)
+	AMINS_LIB_CLOSE(Locale)
+	AMINS_LIB_CLOSE(P96)
+	AMINS_LIB_CLOSE(Workbench)
+#ifdef __amigaos4__
+	AMINS_LIB_CLOSE(Application)
+#else
+	AMINS_LIB_CLOSE(Utility)
+#endif
+}
+