compiler/clib/getppid.c

   1 /*
   2     Copyright © 2004, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <unistd.h>
   7 #include <sys/types.h>
   8
   9 #include <exec/tasks.h>
  10 #include <proto/exec.h>
  11
  12 #include <assert.h>
  13
  14 #include "__vfork.h"
  15 #include "__arosc_privdata.h"
  16
  17 /*****************************************************************************
  18
  19     NAME */
  20
  21         pid_t getppid(
  22
  23 /*  SYNOPSIS */
  24         void)
  25
  26 /*  FUNCTION
  27
  28     INPUTS
  29
  30     RESULT
  31
  32     NOTES
  33
  34     EXAMPLE
  35
  36     BUGS
  37
  38     SEE ALSO
  39
  40     INTERNALS
  41
  42 ******************************************************************************/
  43 {
  44   struct Task *ParentTask;
  45   struct ETask *eThisTask;
  46   struct ETask *et;
  47
  48   if(__get_arosc_privdata()->acpd_flags & PRETEND_CHILD)
  49   {
  50     struct vfork_data *udata = __get_arosc_privdata()->acpd_vfork_data;
  51     eThisTask = GetETask(udata->child);
  52   }
  53   else
  54     eThisTask = GetETask(FindTask(NULL));
  55   assert(eThisTask);
  56   ParentTask = (struct Task *)eThisTask->et_Parent;
  57   if(!ParentTask)
  58     return (pid_t) 1;
  59   et = GetETask(ParentTask);
  60   assert(et);
  61   return (pid_t) et->et_UniqueID;
  62 }
  63