rom/task/LockTaskList.c

   1 /*
   2     Copyright © 2015, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #define DEBUG 0
   7
   8 #include <aros/debug.h>
   9 #include <exec/types.h>
  10 #include <aros/libcall.h>
  11 #include <proto/utility.h>
  12 #include <resources/task.h>
  13
  14 #include <resources/task.h>
  15
  16 #include "taskres_intern.h"
  17
  18 /*****************************************************************************
  19
  20     NAME */
  21 #include <proto/task.h>
  22
  23         AROS_LH1(struct TaskList *, LockTaskList,
  24
  25 /*  SYNOPSIS */
  26         AROS_LHA(ULONG, flags, D1),
  27
  28 /*  LOCATION */
  29         struct TaskResBase *, TaskResBase, 1, Task)
  30
  31 /*  FUNCTION
  32
  33     INPUTS
  34         flags -
  35
  36     RESULT
  37         Handle to the task list. This is not a direct pointer
  38         to the first list element but to a pseudo element instead.
  39
  40     NOTES
  41
  42     EXAMPLE
  43
  44     BUGS
  45
  46     SEE ALSO
  47         UnLockTaskList(), NextTaskEntry().
  48
  49     INTERNALS
  50
  51 *****************************************************************************/
  52 {
  53     AROS_LIBFUNC_INIT
  54
  55     struct TaskListPrivate *taskList = NULL;
  56
  57     D(bug("[TaskRes] LockTaskList: flags = $%lx\n", flags));
  58
  59     if ((taskList = AllocMem(sizeof(struct TaskListPrivate), MEMF_CLEAR)) != NULL)
  60     {
  61         taskList->tlp_Tasks = &TaskResBase->trb_TaskList;
  62         taskList->tlp_Next = (struct TaskListEntry *)GetHead(taskList->tlp_Tasks);
  63         AddTail(&TaskResBase->trb_LockedLists, &taskList->tlp_Node);
  64     }
  65
  66     return (struct TaskList *)taskList;
  67
  68     AROS_LIBFUNC_EXIT
  69 } /* LockTaskList */