Home | History | Annotate | Line # | Download | only in gdb.base
      1      1.1  christos /* This testcase is part of GDB, the GNU debugger.
      2      1.1  christos 
      3  1.1.1.4  christos    Copyright 2017-2024 Free Software Foundation, Inc.
      4      1.1  christos 
      5      1.1  christos    This program is free software; you can redistribute it and/or modify
      6      1.1  christos    it under the terms of the GNU General Public License as published by
      7      1.1  christos    the Free Software Foundation; either version 3 of the License, or
      8      1.1  christos    (at your option) any later version.
      9      1.1  christos 
     10      1.1  christos    This program is distributed in the hope that it will be useful,
     11      1.1  christos    but WITHOUT ANY WARRANTY; without even the implied warranty of
     12      1.1  christos    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     13      1.1  christos    GNU General Public License for more details.
     14      1.1  christos 
     15      1.1  christos    You should have received a copy of the GNU General Public License
     16      1.1  christos    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
     17      1.1  christos 
     18      1.1  christos #include <stdio.h>
     19      1.1  christos #include <stdlib.h>
     20      1.1  christos 
     21      1.1  christos /* Wrapper around getenv for GDB.  */
     22      1.1  christos 
     23      1.1  christos static const char *
     24      1.1  christos my_getenv (const char *name)
     25      1.1  christos {
     26      1.1  christos   return getenv (name);
     27      1.1  christos }
     28      1.1  christos 
     29      1.1  christos int
     30      1.1  christos main (int argc, char *argv[])
     31      1.1  christos {
     32      1.1  christos   /* Call malloc to ensure it is linked in.  */
     33  1.1.1.3  christos   char *tmp = (char *) malloc (1);
     34  1.1.1.2  christos   /* Similarly call my_getenv instead of getenv directly to make sure
     35  1.1.1.2  christos      the former isn't optimized out.  my_getenv is called by GDB.  */
     36  1.1.1.2  christos   const char *myvar = my_getenv ("GDB_TEST_VAR");
     37      1.1  christos 
     38      1.1  christos   if (myvar != NULL)
     39      1.1  christos     printf ("It worked!  myvar = '%s'\n", myvar);
     40      1.1  christos   else
     41      1.1  christos     printf ("It failed.");
     42      1.1  christos 
     43      1.1  christos   free (tmp);
     44      1.1  christos   return 0;	/* break-here */
     45      1.1  christos }
     46