arch/all-pc/hpet/allochpetunit.c

   1 #include <proto/exec.h>
   2
   3 #include "hpet_intern.h"
   4
   5 /*****************************************************************************
   6
   7     NAME */
   8 #include <proto/hpet.h>
   9
  10         AROS_LH1(ULONG, AllocHPETUnit,
  11
  12 /*  SYNOPSIS */
  13         AROS_LHA(const char *, user, A0),
  14
  15 /*  LOCATION */
  16         struct HPETBase *, base, 2, Hpet)
  17
  18 /*  FUNCTION
  19         Allocate a free HPET timer for use.
  20
  21     INPUTS
  22         user - a string specifying the name of current user. Can not be NULL.
  23
  24     RESULT
  25         A number of HPET timer unit allocated for exclusive use, or -1 if
  26         there was no free HPET.
  27
  28     NOTES
  29
  30     EXAMPLE
  31
  32     BUGS
  33
  34     SEE ALSO
  35
  36     INTERNALS
  37
  38 ******************************************************************************/
  39 {
  40     AROS_LIBFUNC_INIT
  41
  42     ULONG i;
  43
  44     ObtainSemaphore(&base->lock);
  45
  46     for (i = 0; i < base->unitCnt; i++)
  47     {
  48         if (!base->units[i].Owner)
  49         {
  50             base->units[i].Owner = user;
  51
  52             ReleaseSemaphore(&base->lock);
  53             return i;
  54         }
  55     }
  56
  57     ReleaseSemaphore(&base->lock);
  58     return -1;
  59
  60     AROS_LIBFUNC_EXIT
  61 }