compiler/libinit/libinit.c

   1 /*
   2     Copyright © 1995-2010, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: libinit library - functions calling when opening/closing libs
   6 */
   7
   8 #include <exec/types.h>
   9 #include <aros/symbolsets.h>
  10
  11 typedef int (*libfunc)(APTR libbase);
  12 typedef int (*opendevfunc)
  13 (
  14     void *libbase,
  15     void *ioreq,
  16     ULONG unitnum,
  17     ULONG flags
  18 );
  19 typedef int (*closedevfunc)
  20 (
  21     void *libbase,
  22     void *ioreq
  23 );
  24
  25 int set_call_libfuncs
  26 (
  27     const void * const set[],
  28     int order,
  29     int test_fail,
  30     APTR libbase
  31 )
  32 {
  33     int pos, (*func)(APTR);
  34
  35     if (!set)
  36             return TRUE;
  37
  38     ForeachElementInSet(set, order, pos, func)
  39     {
  40         if (test_fail)
  41         {
  42             if (!(*func)(libbase))
  43                 return FALSE;
  44         }
  45         else
  46         {
  47             (void)(*func)(libbase);
  48         }
  49     }
  50
  51     return TRUE;
  52 }
  53
  54 int set_call_devfuncs
  55 (
  56     const void * const set[],
  57     int order,
  58     int test_fail,
  59     void *libbase,
  60     void *ioreq,
  61     IPTR unitnum,
  62     ULONG flags
  63 )
  64 {
  65     int pos;
  66
  67     if (!set)
  68             return TRUE;
  69
  70     if (order>=0)
  71     {
  72         int (*func)(APTR, APTR, IPTR, ULONG);
  73
  74         ForeachElementInSet(set, order, pos, func)
  75         {
  76             if (test_fail)
  77             {
  78                 if (!(*func)(libbase, ioreq, unitnum, flags))
  79                     return FALSE;
  80             }
  81             else
  82             {
  83                 (void)(*func)(libbase, ioreq, unitnum, flags);
  84             }
  85         }
  86     }
  87     else
  88     {
  89         int (*func)(APTR, APTR);
  90
  91         ForeachElementInSet(set, order, pos, func)
  92         {
  93             if (test_fail)
  94             {
  95                 if (!(*func)(libbase, ioreq))
  96                     return FALSE;
  97             }
  98             else
  99             {
 100                 (void)(*func)(libbase, ioreq);
 101             }
 102         }
 103     }
 104
 105     return TRUE;
 106 }