workbench/libs/openurl/library/libinit-aros.c

   1 #include "lib.h"
   2 #include <aros/symbolsets.h>
   3
   4 struct Library * OpenURLBase;
   5
   6 struct RxsLib          *RexxSysBase = NULL;
   7 struct SignalSemaphore lib_sem;
   8 struct SignalSemaphore lib_prefsSem;
   9 struct SignalSemaphore lib_memSem;
  10
  11 APTR                   lib_pool = NULL;
  12 ULONG                  lib_use = 0;
  13 ULONG                  lib_flags = 0;
  14 struct URL_Prefs       *lib_prefs = NULL;
  15
  16 /****************************************************************************/
  17
  18 int LibInit(struct Library *base)
  19 {
  20     BOOL success = FALSE;
  21
  22     // Init global library base
  23     OpenURLBase = base;
  24
  25     InitSemaphore(&lib_sem);
  26     InitSemaphore(&lib_prefsSem);
  27     InitSemaphore(&lib_memSem);
  28
  29     // protect access to initBase()
  30     ObtainSemaphore(&lib_sem);
  31
  32     success = initBase();
  33
  34     // unprotect initBase()
  35     ReleaseSemaphore(&lib_sem);
  36
  37     return success;
  38 }
  39
  40 /****************************************************************************/
  41
  42 int LibExpunge(struct Library *base)
  43 {
  44     // free all our private data and stuff.
  45     ObtainSemaphore(&lib_sem);
  46
  47     freeBase();
  48
  49     // unprotect
  50     ReleaseSemaphore(&lib_sem);
  51
  52     OpenURLBase = NULL;
  53
  54     return TRUE;
  55 }
  56
  57 /****************************************************************************/
  58
  59 ADD2INITLIB(LibInit, 0);
  60 ADD2EXPUNGELIB(LibExpunge, 0);
  61
  62 /***********************************************************************/