|  | /* Copyright (C) 2002-2016 Free Software Foundation, Inc. | 
|  | This file is part of the GNU C Library. | 
|  | Contributed by Roland McGrath <roland@redhat.com>, 2002. | 
|  |  | 
|  | The GNU C Library is free software; you can redistribute it and/or | 
|  | modify it under the terms of the GNU Lesser General Public | 
|  | License as published by the Free Software Foundation; either | 
|  | version 2.1 of the License, or (at your option) any later version. | 
|  |  | 
|  | The GNU C Library is distributed in the hope that it will be useful, | 
|  | but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|  | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU | 
|  | Lesser General Public License for more details. | 
|  |  | 
|  | You should have received a copy of the GNU Lesser General Public | 
|  | License along with the GNU C Library; if not, see | 
|  | <http://www.gnu.org/licenses/>.  */ | 
|  |  | 
|  | #include <errno.h> | 
|  | #include <pthread.h> | 
|  | #include <stdio.h> | 
|  | #include <stdlib.h> | 
|  | #include <unistd.h> | 
|  | #include <sys/wait.h> | 
|  |  | 
|  |  | 
|  | static pid_t initial_pid; | 
|  |  | 
|  |  | 
|  | static void * | 
|  | tf (void *arg) | 
|  | { | 
|  | if (getppid () != initial_pid) | 
|  | { | 
|  | printf ("getppid in thread returned %ld, expected %ld\n", | 
|  | (long int) getppid (), (long int) initial_pid); | 
|  | return (void *) -1; | 
|  | } | 
|  |  | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  |  | 
|  | int | 
|  | main (void) | 
|  | { | 
|  | initial_pid = getpid (); | 
|  |  | 
|  | pid_t child = fork (); | 
|  | if (child == 0) | 
|  | { | 
|  | if (getppid () != initial_pid) | 
|  | { | 
|  | printf ("first getppid returned %ld, expected %ld\n", | 
|  | (long int) getppid (), (long int) initial_pid); | 
|  | exit (1); | 
|  | } | 
|  |  | 
|  | pthread_t th; | 
|  | if (pthread_create (&th, NULL, tf, NULL) != 0) | 
|  | { | 
|  | puts ("pthread_create failed"); | 
|  | exit (1); | 
|  | } | 
|  |  | 
|  | void *result; | 
|  | if (pthread_join (th, &result) != 0) | 
|  | { | 
|  | puts ("pthread_join failed"); | 
|  | exit  (1); | 
|  | } | 
|  |  | 
|  | exit (result == NULL ? 0 : 1); | 
|  | } | 
|  | else if (child == -1) | 
|  | { | 
|  | puts ("initial fork failed"); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | int status; | 
|  | if (TEMP_FAILURE_RETRY (waitpid (child, &status, 0)) != child) | 
|  | { | 
|  | printf ("waitpid failed: %m\n"); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | return status; | 
|  | } |