arch/i386-darwin/exec/preparecontext.c

   1 /*
   2  Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3  $Id$
   4
   5  Desc: i386unix version of PrepareContext().
   6  Lang: english
   7  */
   8
   9 #include <exec/types.h>
  10 #include <exec/execbase.h>
  11 #include <exec/memory.h>
  12 #include <utility/tagitem.h>
  13 #include <proto/kernel.h>
  14 #include <aros/kernel.h>
  15 #include "etask.h"
  16 #include "exec_util.h"
  17
  18 #include <aros/libcall.h>
  19 #include <proto/arossupport.h>
  20
  21 #ifdef SIZEOF_ALL_REGISTERS
  22  #warning SIZEOF_ALL_REGISTERS already defined!
  23 #endif
  24 #undef SIZEOF_ALL_REGISTERS
  25
  26 /* bit awkward, until I can include sigcore.h */
  27 #define SIZEOF_ALL_REGISTERS    568
  28
  29 AROS_LH4(BOOL, PrepareContext,
  30                  AROS_LHA(struct Task *, task, A0),
  31                  AROS_LHA(APTR, entryPoint, A1),
  32                  AROS_LHA(APTR, fallBack, A2),
  33                  AROS_LHA(struct TagItem *, tagList, A3),
  34                  struct ExecBase *, SysBase, 6, Exec)
  35 {
  36   AROS_LIBFUNC_INIT
  37
  38   kprintf("[PrepareContext] preparing task \"%s\" entry: %p fallback: %p\n",task->tc_Node.ln_Name,entryPoint,fallBack);
  39
  40   if (!(task->tc_Flags & TF_ETASK) )
  41           return FALSE;
  42
  43   GetIntETask (task)->iet_Context = AllocTaskMem (task
  44                                                                                                   , SIZEOF_ALL_REGISTERS
  45                                                                                                   , MEMF_PUBLIC|MEMF_CLEAR
  46                                                                                                   );
  47
  48   if (!GetIntETask (task)->iet_Context)
  49           return FALSE;
  50
  51
  52   KRNWireImpl(PrepareContext);
  53
  54   CALLHOOKPKT(krnPrepareContextImpl,task,TAGLIST(TAG_USER,entryPoint,TAG_USER+1,fallBack,TAG_USER+2,tagList,TAG_DONE));
  55
  56   return TRUE;
  57
  58   AROS_LIBFUNC_EXIT
  59 }