rom/task/UnLockTaskList.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(void, UnLockTaskList,
  24
  25 /*  SYNOPSIS */
  26         AROS_LHA(ULONG, flags, D1),
  27
  28 /*  LOCATION */
  29         struct TaskResBase *, TaskResBase, 2, Task)
  30
  31 /*  FUNCTION
  32         Frees a lock on the task lists given by LockTaskList().
  33
  34     INPUTS
  35         flags - the same value as given to LockTaskList().
  36
  37     RESULT
  38
  39     NOTES
  40
  41     EXAMPLE
  42
  43     BUGS
  44
  45     SEE ALSO
  46         LockTaskList(), NextTaskEntry()
  47
  48     INTERNALS
  49
  50 *****************************************************************************/
  51 {
  52     AROS_LIBFUNC_INIT
  53
  54     struct TaskListPrivate *taskList, *tltmp;
  55     struct Task *thisTask = FindTask(NULL);
  56
  57     D(bug("[TaskRes] UnLockTaskList: flags = $%lx\n", flags));
  58
  59     ReleaseSemaphore(&TaskResBase->trb_Sem);
  60
  61     ForeachNodeSafe(&TaskResBase->trb_LockedLists, taskList, tltmp)
  62     {
  63         if (((struct Task *)taskList->tlp_Node.ln_Name == thisTask) &&
  64             (taskList->tlp_Flags == flags))
  65         {
  66             D(bug("[TaskRes] UnLockTaskList: Releasing TaskList @ 0x%p\n", taskList));
  67             Remove(&taskList->tlp_Node);
  68             FreeMem(taskList, sizeof(struct TaskListPrivate));
  69             break;
  70         }
  71     }
  72
  73     /* If we are the last lock holder, do housecleaning */
  74     if (IsListEmpty(&TaskResBase->trb_LockedLists))
  75     {
  76         struct TaskListEntry *taskEntry, *tetmp;
  77
  78         ForeachNodeSafe(&TaskResBase->trb_TaskList, taskEntry, tetmp)
  79         {
  80             if (taskEntry->tle_Task == NULL)
  81             {
  82                 D(bug("[TaskRes] RemTask: destroying old taskentry @ 0x%p\n", taskEntry));
  83                 Remove(&taskEntry->tle_Node);
  84                 FreeMem(taskEntry, sizeof(struct TaskListEntry));
  85             }
  86         }
  87         ForeachNodeSafe(&TaskResBase->trb_NewTasks, taskEntry, tetmp)
  88         {
  89             Remove(&taskEntry->tle_Node);
  90             AddTail(&TaskResBase->trb_TaskList, &taskEntry->tle_Node);
  91         }
  92     }
  93     AROS_LIBFUNC_EXIT
  94 } /* UnLockTaskList */