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         The will remmeber 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         -
  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 }