/* */
/* */
/* */
-/* (C) 2002 Ullrich von Bassewitz */
-/* Wacholderweg 14 */
-/* D-70597 Stuttgart */
-/* EMail: uz@musoftware.de */
+/* (C) 2002-2009, Ullrich von Bassewitz */
+/* Roemerstrasse 52 */
+/* D-70794 Filderstadt */
+/* EMail: uz@cc65.org */
/* */
/* */
/* This software is provided 'as-is', without any expressed or implied */
-#include <stdio.h>
-#include <string.h>
-#include <modload.h>
#include <tgi.h>
#include <tgi/tgi-kernel.h>
-static unsigned char ReadInputBlock (struct mod_ctrl* C, void* Buf, unsigned Size)
-{
- return (fread (Buf, 1, Size, C->callerdata) != Size);
-}
+/*****************************************************************************/
+/* Code */
+/*****************************************************************************/
/* No driver for this mode */
tgi_error = TGI_ERR_NO_DRIVER;
} else {
- /* Laod the driver */
+ /* Load the driver */
tgi_load_driver (name);
}
}
-void __fastcall__ tgi_load_driver (const char* name)
-/* Install the given driver. This function is identical to tgi_load with the
- * only difference that the name of the driver is specified explicitly. You
- * should NOT use this function in most cases, use tgi_load() instead.
- */
-{
- static const unsigned char marker[4] = { 0x74, 0x67, 0x69, 0x00 };
-
- static struct mod_ctrl ctrl = {
- ReadInputBlock /* read_block */
- };
- unsigned Res;
-
- /* Check if we do already have a driver loaded. If so, remove it. */
- if (tgi_drv != 0) {
- tgi_unload ();
- }
-
- /* Now open the file */
- ctrl.callerdata = fopen (name, "r");
- if (ctrl.callerdata == 0) {
- tgi_error = TGI_ERR_CANNOT_LOAD;
- return;
- }
-
- /* Load the module */
- Res = mod_load (&ctrl);
-
- /* Close the input file */
- fclose (ctrl.callerdata);
-
- /* Check the return code */
- if (Res == MLOAD_OK) {
-
- /* Get a pointer to the loaded driver */
- tgi_drv = (tgi_drv_header*) ctrl.module;
-
- /* Check the header */
- if (memcmp (tgi_drv, marker, sizeof (marker)) != 0) {
- /* Invalid driver */
- mod_free (tgi_drv);
- tgi_drv = 0;
- tgi_error = TGI_ERR_INV_DRIVER;
- } else {
- /* Driver is ok do setup */
- tgi_setup ();
- }
-
- } else {
-
- /* Error loading the driver */
- tgi_error = TGI_ERR_CANNOT_LOAD;
-
- }
-}