rom/exec/freetaskstorageslot.c

   1 /*
   2     Copyright © 2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include "exec_intern.h"
   7 #include "taskstorage.h"
   8
   9 /*****************************************************************************
  10
  11     NAME */
  12 #include <proto/exec.h>
  13
  14         AROS_LH1(void, FreeTaskStorageSlot,
  15
  16 /*  LOCATION */
  17         AROS_LHA(LONG, slot, D0),
  18         struct ExecBase *, SysBase, 181, Exec)
  19
  20 /*  FUNCTION
  21         This function will free a slot in taskstorage
  22
  23     INPUTS
  24         slot - The slot to free.
  25
  26     RESULT
  27         None.
  28
  29     NOTES
  30         Currently no checks are performed to determine if one is the owner
  31         of the slot. This may be added in the future, so one should
  32         deallocate a slot from the same task that allocated the slot.
  33
  34     EXAMPLE
  35
  36     BUGS
  37
  38     SEE ALSO
  39         AllocTaskStorageSlot()
  40
  41     INTERNALS
  42
  43 ******************************************************************************/
  44 {
  45     AROS_LIBFUNC_INIT
  46
  47     struct TaskStorageFreeSlot *tsfs =
  48         AllocMem(sizeof(struct TaskStorageFreeSlot), MEMF_PUBLIC|MEMF_CLEAR);
  49
  50     if (tsfs == NULL)
  51     {
  52         /* Don't do anything, we'll just lose the freed slot */
  53         return;
  54     }
  55
  56     tsfs->FreeSlot = slot;
  57
  58     Forbid();
  59     AddHead((struct List *)&PrivExecBase(SysBase)->TaskStorageSlots, (struct Node *)tsfs);
  60     Permit();
  61
  62     AROS_LIBFUNC_EXIT
  63 }