rom/intuition/findmonitor.c

   1 #include <proto/intuition.h>
   2
   3 #include "intuition_intern.h"
   4 #include "monitorclass_private.h"
   5
   6 /*
   7  * Private internal function.
   8  * Find a monitorclass object corresponsing to a given monitor ID.
   9  */
  10 OOP_Object *FindMonitor(ULONG id, struct IntuitionBase *IntuitionBase)
  11 {
  12     struct MinNode *n;
  13     OOP_Object *ret = NULL;
  14
  15     ObtainSemaphoreShared(&GetPrivIBase(IntuitionBase)->MonitorListSem);
  16
  17     for (n = GetPrivIBase(IntuitionBase)->MonitorList.mlh_Head; n->mln_Succ; n = n->mln_Succ)
  18     {
  19         if (DoMethod((Object *)n, MM_CheckID, id))
  20         {
  21             ret = (OOP_Object *)n;
  22             break;
  23         }
  24     }
  25
  26     ReleaseSemaphore(&GetPrivIBase(IntuitionBase)->MonitorListSem);
  27
  28     return ret;
  29 }