rom/exec/attemptsemaphoreshared.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Try to lock a semaphore shared.
   6     Lang: english
   7 */
   8 #include "exec_intern.h"
   9 #include "semaphores.h"
  10 #include <exec/semaphores.h>
  11 #include <proto/exec.h>
  12
  13 #define CHECK_INITSEM 1
  14
  15 /*****************************************************************************
  16
  17     NAME */
  18
  19         AROS_LH1(ULONG, AttemptSemaphoreShared,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(struct SignalSemaphore *, sigSem, A0),
  23
  24 /*  LOCATION */
  25         struct ExecBase *, SysBase, 120, Exec)
  26
  27 /*  FUNCTION
  28         Tries to get a shared lock on a signal semaphore. If the lock cannot
  29         be obtained false is returned. There may be more than one shared lock
  30         at a time but an exclusive lock prevents all other locks. The lock
  31         must be released with ReleaseSemaphore().
  32
  33     INPUTS
  34         sigSem - pointer to semaphore structure
  35
  36     RESULT
  37         True if the semaphore could be obtained, false otherwise.
  38
  39     NOTES
  40
  41     EXAMPLE
  42
  43     BUGS
  44
  45     SEE ALSO
  46         ReleaseSemaphore()
  47
  48     INTERNALS
  49
  50 *****************************************************************************/
  51 {
  52     AROS_LIBFUNC_INIT
  53     AROS_LIBBASE_EXT_DECL(struct ExecBase *,SysBase)
  54
  55     struct Task *me = FindTask(NULL);
  56     ULONG retval = TRUE;
  57
  58 #if CHECK_INITSEM
  59     if (sigSem->ss_Link.ln_Type != NT_SIGNALSEM)
  60     {
  61         kprintf("\n\nAttemptSemaphoreShared called on an unintialized semaphore!!! "
  62                 "sem = %x  task = %x (%s)\n\n", sigSem, me, me->tc_Node.ln_Name);
  63     }
  64 #endif
  65
  66     /* Protect the semaphore structure */
  67     Forbid();
  68
  69     /* Increment the queue count. This will need SMP protection */
  70     sigSem->ss_QueueCount++;
  71
  72     if( sigSem->ss_QueueCount == 0 )
  73     {
  74         /* The semaphore wasn't owned. We can now own it */
  75         sigSem->ss_Owner = NULL;
  76         sigSem->ss_NestCount++;
  77     }
  78     else if( ( sigSem->ss_Owner == me ) || ( sigSem->ss_Owner == NULL ) )
  79     {
  80         /* The semaphore was owned by me or is shared, just increase the nest count */
  81         sigSem->ss_NestCount++;
  82     }
  83     else
  84     {
  85         /* We can't get ownership, just return it. */
  86         sigSem->ss_QueueCount--;
  87         retval = FALSE;
  88     }
  89
  90     /* All done. */
  91     Permit();
  92
  93     return retval;
  94
  95     AROS_LIBFUNC_EXIT
  96 } /* AttemptSemaphoreShared */