compiler/posixc/getppid.c

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