Blame gnulib-tests/test-environ.c

Packit Service fdd496
/* Test of environ variable.
Packit Service fdd496
   Copyright (C) 2008-2017 Free Software Foundation, Inc.
Packit Service fdd496
Packit Service fdd496
   This program is free software: you can redistribute it and/or modify
Packit Service fdd496
   it under the terms of the GNU General Public License as published by
Packit Service fdd496
   the Free Software Foundation; either version 3 of the License, or
Packit Service fdd496
   (at your option) any later version.
Packit Service fdd496
Packit Service fdd496
   This program is distributed in the hope that it will be useful,
Packit Service fdd496
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit Service fdd496
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit Service fdd496
   GNU General Public License for more details.
Packit Service fdd496
Packit Service fdd496
   You should have received a copy of the GNU General Public License
Packit Service fdd496
   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
Packit Service fdd496
Packit Service fdd496
/* Written by Bruno Haible <bruno@clisp.org>, 2008.  */
Packit Service fdd496
Packit Service fdd496
#include <config.h>
Packit Service fdd496
Packit Service fdd496
#include <unistd.h>
Packit Service fdd496
Packit Service fdd496
#include <string.h>
Packit Service fdd496
Packit Service fdd496
int
Packit Service fdd496
main ()
Packit Service fdd496
{
Packit Service fdd496
  /* The environment variables that are set even in the weirdest situations
Packit Service fdd496
     are HOME and PATH.
Packit Service fdd496
     POSIX says that HOME is initialized by the system, and that PATH may be
Packit Service fdd496
     unset.  But in practice it's more frequent to see HOME unset and PATH
Packit Service fdd496
     set.  So we test the presence of PATH.  */
Packit Service fdd496
  char **remaining_variables = environ;
Packit Service fdd496
  char *string;
Packit Service fdd496
Packit Service fdd496
  for (; (string = *remaining_variables) != NULL; remaining_variables++)
Packit Service fdd496
    {
Packit Service fdd496
      if (strncmp (string, "PATH=", 5) == 0)
Packit Service fdd496
        /* Found the PATH environment variable.  */
Packit Service fdd496
        return 0;
Packit Service fdd496
    }
Packit Service fdd496
  /* Failed to find the PATH environment variable.  */
Packit Service fdd496
  return 1;
Packit Service fdd496
}