psmile_pids.c

Go to the documentation of this file.

#include <sys/types.h>
#include <unistd.h>


/* --------------------------------------------------------------------- */
/* Copyright 2006-2010, CERFACS, Toulouse, France.  */
/* All rights reserved. Use is subject to OASIS4 license terms. */
/* ---------------------------------------------------------------------

//BOP
 
! !ROUTINE: psmile_pids
 
  !INTERFACE:
*/
void psmile_pids_(mypid, myppid)
/*

  !FILES USED:
 
   sys/types.h
   unistd.h
 
  !DESCRIPTION:
 
    C routine to get current process pid and current process parent's pid
 
  !REVISION HISTORY:
 
    Date      Programmer   Description
  ----------  ----------   -----------
  02.06.09    J. Latour    created

//EOP

 ----------------------------------------------------------------------
  $Id: psmile_pids.c                                  latour $
  $Author: latour $
 ---------------------------------------------------------------------- */

  int *mypid;
  int *myppid;
{

  pid_t locpid;
  pid_t locppid;

  locpid=getpid();
  locppid=getppid();

  *mypid = (int)locpid;
  *myppid = (int)locppid;
}