compiler/stdc/__optionallibs.c

   1 /*
   2     Copyright © 2013-2018, The AROS Development Team. All rights reserved.
   3 */
   4
   5 #include <proto/exec.h>
   6
   7 #define __NOBLIBBASE__
   8
   9 #include <proto/locale.h>
  10 #include <proto/intuition.h>
  11
  12 #include "__stdc_intbase.h"
  13 #include "__optionallibs.h"
  14
  15 /* Internal function __libfindandopen will only open a library when it is
  16    already in the list of open libraries
  17 */
  18 static struct Library *__libfindandopen(const char *libname, int version)
  19 {
  20     struct Node *found;
  21
  22     Forbid();
  23     found = FindName(&SysBase->LibList, libname);
  24     Permit();
  25
  26     return (found != NULL) ? OpenLibrary(libname, version) : NULL;
  27 }
  28
  29 int __locale_available(struct StdCIntBase *StdCBase)
  30 {
  31     if (StdCBase->StdCLocaleBase == NULL)
  32         StdCBase->StdCLocaleBase = (struct LocaleBase *)__libfindandopen("locale.library", 0);
  33
  34     return StdCBase->StdCLocaleBase != NULL;
  35 }
  36
  37 int __intuition_available(struct StdCIntBase *StdCBase)
  38 {
  39     if (StdCBase->StdCIntuitionBase == NULL)
  40         StdCBase->StdCIntuitionBase = (struct IntuitionBase *)__libfindandopen("intuition.library", 0);
  41
  42     return StdCBase->StdCIntuitionBase != NULL;
  43 }