test/misc/hostlib.c

   1 /*
   2     Copyright © 1995-2014, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <proto/exec.h>
   7 #include <proto/hostlib.h>
   8 #include <proto/dos.h>
   9 #include <stdio.h>
  10
  11 APTR HostLibBase;
  12
  13 int (*SDL_Init) (ULONG flags);
  14 void * (*SDL_SetVideoMode) (int width, int height, int bpp, ULONG flags);
  15 void (*SDL_Quit) (void);
  16
  17 int main(int argc, char **argv) {
  18     void *handle;
  19     char *err;
  20
  21     if ((HostLibBase = OpenResource("hostlib.resource")) == NULL) {
  22         fprintf(stderr, "can't open hostlib.resource\n");
  23         return 1;
  24     }
  25
  26     if ((handle = HostLib_Open("libSDL.so", &err)) == NULL) {
  27         fprintf(stderr, "can't open sdl: %s\n", err);
  28         return 1;
  29     }
  30
  31     SDL_Init = HostLib_GetPointer(handle, "SDL_Init", NULL);
  32     SDL_SetVideoMode = HostLib_GetPointer(handle, "SDL_SetVideoMode", NULL);
  33     SDL_Quit = HostLib_GetPointer(handle, "SDL_Quit", NULL);
  34
  35     SDL_Init(0x20);
  36     SDL_SetVideoMode(640, 480, 16, 0);
  37
  38     Delay(250);
  39
  40     SDL_Quit();
  41
  42     HostLib_Close(handle, NULL);
  43
  44     return 0;
  45 }