strip off +x bits on non-executable/script files
[platform/upstream/binutils.git] / gdb / testsuite / gdb.base / testenv.c
1 /* This testcase is part of GDB, the GNU debugger.
2
3    Copyright 2011-2013 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 /*
19     This source is used to check that GDB correctly
20     passes on environment variables down to inferior.
21     One of the tests checks that 'unset' variables also are removed from
22     inferior environment list.  */
23
24 #include <stdio.h>
25
26 int main (int argc, char **argv, char **envp)
27
28 {
29     int i, j;
30
31     j = 0;
32     for (i = 0; envp[i]; i++)
33       {
34         if (strncmp ("TEST_GDB", envp[i], 8) == 0)
35           {
36             printf ("%s\n", envp[i]);
37             j++;
38           }
39       }
40     printf ("Program found %d variables starting with TEST_GDB\n", j);
41     return 0; /* set breakpoint here.  */
42 }
43