rom/exec/findtaskbypid.c

   1 #include <exec/execbase.h>
   2 #include <exec/tasks.h>
   3
   4 /*****************************************************************************
   5
   6     NAME */
   7 #include <proto/exec.h>
   8
   9         AROS_LH1(struct Task *, FindTaskByPID,
  10
  11 /*  SYNOPSIS */
  12         AROS_LHA(ULONG, id, D0),
  13
  14 /*  LOCATION */
  15         struct ExecBase *, SysBase, 166, Exec)
  16
  17 /*  FUNCTION
  18         Scan through the task lists searching for the task whose
  19         et_UniqueID field matches.
  20
  21     INPUTS
  22         id      -   The task ID to match.
  23
  24     RESULT
  25         Address of the Task control structure that matches, or
  26         NULL otherwise.
  27
  28     NOTES
  29         This function is source-compatible with MorphOS.
  30
  31     EXAMPLE
  32
  33     BUGS
  34
  35     SEE ALSO
  36
  37     INTERNALS
  38
  39 ******************************************************************************/
  40 {
  41     AROS_LIBFUNC_INIT
  42
  43     struct Task *t;
  44     struct ETask *et;
  45
  46     /*
  47         First up, check ThisTask. It could be NULL because of exec_init.c
  48     */
  49     if (SysBase->ThisTask != NULL)
  50     {
  51         et = GetETask(SysBase->ThisTask);
  52         if (et != NULL && et->et_UniqueID == id)
  53             return SysBase->ThisTask;
  54     }
  55
  56     /*  Next, go through the ready list */
  57     ForeachNode(&SysBase->TaskReady, t)
  58     {
  59         et = GetETask(t);
  60         if (et != NULL && et->et_UniqueID == id)
  61             return t;
  62     }
  63
  64     /* Finally, go through the wait list */
  65     ForeachNode(&SysBase->TaskWait, t)
  66     {
  67         et = GetETask(t);
  68         if (et != NULL && et->et_UniqueID == id)
  69             return t;
  70     }
  71
  72     return NULL;
  73
  74     AROS_LIBFUNC_EXIT
  75 }