rom/exec/savetaskstorage.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
   9 #include "exec_intern.h"
  10 #include "taskstorage.h"
  11
  12 #define DEBUG 0
  13 #include <aros/debug.h>
  14
  15 /*****************************************************************************
  16
  17     NAME */
  18 #include <proto/exec.h>
  19
  20         AROS_LH0(APTR, SaveTaskStorage,
  21
  22 /*  LOCATION */
  23         struct ExecBase *, SysBase, 182, Exec)
  24
  25 /*  FUNCTION
  26         The will remember the current state of the task storage slots
  27
  28     INPUTS
  29         None.
  30
  31     RESULT
  32         An id will be returned whit which the current state can be restored
  33         using RestoreTaskStorageSlots().
  34         NULL is returned when not enough memory was available.
  35
  36     NOTES
  37
  38     EXAMPLE
  39
  40     BUGS
  41
  42     SEE ALSO
  43         RestoreTaskStorage()
  44
  45     INTERNALS
  46
  47 ******************************************************************************/
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51     struct ETask *et = GetETask(FindTask(NULL));
  52     IPTR *taskstorage, *tsout;
  53     IPTR slots;
  54
  55     if (!et || et->et_TaskStorage == NULL)
  56         return NULL;
  57
  58     taskstorage = et->et_TaskStorage;
  59     slots = taskstorage[__TS_FIRSTSLOT];
  60
  61     /* NOTE: Saved task storage *must not* be passed around
  62      *       to another task! This is why it is not MEMF_PUBLIC.
  63      */
  64     tsout = AllocMem(slots * sizeof(tsout[0]), MEMF_ANY);
  65     if (tsout) {
  66         CopyMemQuick(taskstorage, tsout, slots * sizeof(tsout[0]));
  67     }
  68
  69     D(bug("SaveTaskStorage: taskstorage=%x, size=%d, tsout=%x\n",
  70           taskstorage, size, tsout
  71     ));
  72
  73     return tsout;
  74
  75     AROS_LIBFUNC_EXIT
  76 }