gdb/testsuite/gdb.base/fork-running-state.c

   1 /* This testcase is part of GDB, the GNU debugger.
   2
   3    Copyright 2015-2017 Free Software Foundation, Inc.
   4
   5    This program is free software; you can redistribute it and/or modify
   6    it under the terms of the GNU General Public License as published by
   7    the Free Software Foundation; either version 3 of the License, or
   8    (at your option) any later version.
   9
  10    This program is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13    GNU General Public License for more details.
  14
  15    You should have received a copy of the GNU General Public License
  16    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  17
  18 #include <unistd.h>
  19 #include <stdio.h>
  20 #include <sys/types.h>
  21 #include <sys/wait.h>
  22
  23 int save_parent;
  24
  25 /* The fork child.  Just runs forever.  */
  26
  27 static int
  28 fork_child (void)
  29 {
  30   while (1)
  31     {
  32       sleep (1);
  33
  34       /* Exit if GDB kills the parent.  */
  35       if (getppid () != save_parent)
  36         break;
  37       if (kill (getppid (), 0) != 0)
  38         break;
  39     }
  40
  41   return 0;
  42 }
  43
  44 /* The fork parent.  Just runs forever waiting for the child to
  45    exit.  */
  46
  47 static int
  48 fork_parent (void)
  49 {
  50   if (wait (NULL) == -1)
  51     {
  52       perror ("wait");
  53       return 1;
  54     }
  55
  56   return 0;
  57 }
  58
  59 int
  60 main (void)
  61 {
  62   pid_t pid;
  63
  64   save_parent = getpid ();
  65
  66   /* Don't run forever.  */
  67   alarm (180);
  68
  69   /* The parent and child should basically run forever without
  70      tripping on any debug event.  We want to check that GDB updates
  71      the parent and child running states correctly right after the
  72      fork.  */
  73   pid = fork ();
  74   if (pid > 0)
  75     return fork_parent ();
  76   else if (pid == 0)
  77     return fork_child ();
  78   else
  79     {
  80       perror ("fork");
  81       return 1;
  82     }
  83 }