arch/all-hosted/hostlib/getinterface.c

   1 #include <proto/exec.h>
   2
   3 #include "hostinterface.h"
   4 #include "hostlib_intern.h"
   5
   6 /*****************************************************************************
   7
   8     NAME */
   9 #include <proto/hostlib.h>
  10
  11         AROS_LH3(APTR *, HostLib_GetInterface,
  12
  13 /*  SYNOPSIS */
  14         AROS_LHA(void *, handle, A0),
  15         AROS_LHA(const char **, symtable, A1),
  16         AROS_LHA(ULONG *, unresolved, A2),
  17
  18 /*  LOCATION */
  19         struct HostLibBase *, HostLibBase, 5, HostLib)
  20
  21 /*  FUNCTION
  22         Resolve array of symbols in the host operating system library.
  23         The result is a pointer to a dynamically allocated array of
  24         symbol values.
  25
  26     INPUTS
  27         handle     - An opaque library handle provided by HostLib_Open()
  28         symbable   - A pointer to a NULL-terminated array of symbol names
  29         unresolved - An optional location where count of unresolved symbols
  30                      will be placed. Can be set to NULL to ignore it.
  31
  32     RESULT
  33         A pointer to a dynamically allocated array of symbol values or NULL if
  34         empty symbol table was given.
  35
  36     NOTES
  37         Note that the resulting array will always have as many entries as there
  38         are in symbol names array. It some symbols (or even all of them) fail
  39         to resolve, correspondind entries will be set to NULL. You may supply
  40         a valid unresolved pointer if you want to get unresolved symbols count.
  41
  42         Even incomplete interface needs to be freed using HostLib_DropInterface().
  43
  44         Resulting values are valid as long as the library is open. For portability
  45         sake it's advised to free interfaces before closing corresponding libraries.
  46
  47         This function appeared in v2 of hostlib.resource.
  48
  49     EXAMPLE
  50
  51     BUGS
  52
  53     SEE ALSO
  54         HostLib_GetPointer()
  55
  56     INTERNALS
  57
  58 *****************************************************************************/
  59 {
  60     AROS_LIBFUNC_INIT
  61
  62     const char **c;
  63     ULONG cnt = 0;
  64     APTR *iface = NULL;
  65
  66     for (c = symtable; *c; c++)
  67         cnt++;
  68
  69     if (cnt)
  70     {
  71         iface = AllocVec(cnt * sizeof(APTR), MEMF_ANY);
  72         if (iface)
  73         {
  74             ULONG bad = 0;
  75             ULONG i;
  76
  77             HOSTLIB_LOCK();
  78
  79             for (i = 0; i < cnt; i++)
  80             {
  81                 iface[i] = HostLibBase->HostIFace->hostlib_GetPointer(handle, symtable[i], NULL);
  82                 AROS_HOST_BARRIER
  83
  84                 if (!iface[i])
  85                     bad++;
  86             }
  87
  88             HOSTLIB_UNLOCK();
  89
  90             if (unresolved)
  91                 *unresolved = bad;
  92         }
  93     }
  94
  95     return iface;
  96
  97     AROS_LIBFUNC_EXIT
  98 }