home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / misc / emu / AROSdev.lha / AROS / rom / exec / obtainsemaphorelist.c < prev    next >
Encoding:
C/C++ Source or Header  |  1997-01-09  |  1.9 KB  |  89 lines

  1. /*
  2.     (C) 1995-96 AROS - The Amiga Replacement OS
  3.     $Id: obtainsemaphorelist.c,v 1.7 1997/01/01 03:46:12 ldp Exp $
  4.     $Log: obtainsemaphorelist.c,v $
  5.     Revision 1.7  1997/01/01 03:46:12  ldp
  6.     Committed Amiga native (support) code
  7.  
  8.     Changed clib to proto
  9.  
  10.     Revision 1.6  1996/12/10 13:51:49  aros
  11.     Moved all #include's in the first column so makedepend can see it.
  12.  
  13.     Revision 1.5  1996/10/24 15:50:52  aros
  14.     Use the official AROS macros over the __AROS versions.
  15.  
  16.     Revision 1.4  1996/08/13 13:56:04  digulla
  17.     Replaced AROS_LA by AROS_LHA
  18.     Replaced some AROS_LH*I by AROS_LH*
  19.     Sorted and added includes
  20.  
  21.     Revision 1.3  1996/08/01 17:41:14  digulla
  22.     Added standard header for all files
  23.  
  24.     Desc:
  25.     Lang: english
  26. */
  27. #include "exec_intern.h"
  28. #include "semaphores.h"
  29. #include <exec/semaphores.h>
  30. #include <proto/exec.h>
  31.  
  32. /*****************************************************************************
  33.  
  34.     NAME */
  35.  
  36.     AROS_LH1(void, ObtainSemaphoreList,
  37.  
  38. /*  SYNOPSIS */
  39.     AROS_LHA(struct List *, sigSem, A0),
  40.  
  41. /*  LOCATION */
  42.     struct ExecBase *, SysBase, 97, Exec)
  43.  
  44. /*  FUNCTION
  45.     This function obtains all semaphores in the list at once.
  46.     Note that this doesn't include arbitration for the list as
  47.     a whole - you will have to arbitrate for the whole list yourself.
  48.  
  49.     INPUTS
  50.     sigSem - pointer to list full of semaphores
  51.  
  52.     RESULT
  53.  
  54.     NOTES
  55.  
  56.     EXAMPLE
  57.  
  58.     BUGS
  59.  
  60.     SEE ALSO
  61.  
  62.     INTERNALS
  63.  
  64.     HISTORY
  65.  
  66. *****************************************************************************/
  67. {
  68.     AROS_LIBFUNC_INIT
  69.     struct Node *n;
  70.  
  71.     /*
  72.     There's no arbitration needed - the first semaphore in the list
  73.     list arbitrates for the full list.
  74.     Get first element in the list.
  75.     */
  76.     n=sigSem->lh_Head;
  77.  
  78.     /* And follow it. */
  79.     while(n->ln_Succ!=NULL)
  80.     {
  81.     /* Free the semaphore */
  82.     ReleaseSemaphore((struct SignalSemaphore *)n);
  83.  
  84.     /* Get next element */
  85.     n=n->ln_Succ;
  86.     }
  87.     AROS_LIBFUNC_EXIT
  88. } /* ReleaseSemaphoreList */
  89.