rom/exec/restoretaskstorage.c

   1 /*
   2     Copyright © 2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <exec/nodes.h>
   7 #include <exec/lists.h>
   8 #include <clib/macros.h>
   9
  10 #include "exec_intern.h"
  11 #include "taskstorage.h"
  12
  13 #define DEBUG 0
  14 #include <aros/debug.h>
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19 #include <proto/exec.h>
  20
  21         AROS_LH1(void, RestoreTaskStorage,
  22
  23 /*  LOCATION */
  24         AROS_LHA(APTR, id, A0),
  25         struct ExecBase *, SysBase, 183, Exec)
  26
  27 /*  FUNCTION
  28         This function restores the current state of the task storage slots.
  29
  30     INPUTS
  31         id - ID returned from SaveTaskStorage() referring to the state.
  32
  33     RESULT
  34         None.
  35
  36     NOTES
  37
  38     EXAMPLE
  39
  40     BUGS
  41
  42     SEE ALSO
  43         SaveTaskStorage()
  44
  45     INTERNALS
  46
  47 ******************************************************************************/
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51     struct ETask *et = GetETask(FindTask(NULL));
  52     IPTR *tsrestore = id;
  53
  54     if (!et)
  55         return;
  56
  57     /* Be sure no other tasks access the information when it is in an
  58        inconsistent state
  59     */
  60     Forbid();
  61
  62     if (et->et_TaskStorage) {
  63         IPTR slots = et->et_TaskStorage[__TS_FIRSTSLOT];
  64         FreeMem(et->et_TaskStorage, slots * sizeof(IPTR));
  65     }
  66
  67     /* Restore content of TaskStorage */
  68     et->et_TaskStorage = tsrestore;
  69
  70     Permit();
  71
  72     AROS_LIBFUNC_EXIT
  73 }