(root)/
m4-1.4.19/
tests/
test-access.c
       1  /* Tests of access.
       2     Copyright (C) 2019-2021 Free Software Foundation, Inc.
       3  
       4     This program is free software: you can redistribute it and/or modify
       5     it under the terms of the GNU General Public License as published by
       6     the Free Software Foundation; either version 3 of the License, or
       7     (at your option) any later version.
       8  
       9     This program is distributed in the hope that it will be useful,
      10     but WITHOUT ANY WARRANTY; without even the implied warranty of
      11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
      12     GNU General Public License for more details.
      13  
      14     You should have received a copy of the GNU General Public License
      15     along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
      16  
      17  #include <config.h>
      18  
      19  #include <unistd.h>
      20  
      21  #include "signature.h"
      22  SIGNATURE_CHECK (access, int, (const char *, int));
      23  
      24  #include <errno.h>
      25  #include <fcntl.h>
      26  #include <sys/stat.h>
      27  #include "root-uid.h"
      28  #include "macros.h"
      29  
      30  /* mingw and MSVC 9 lack geteuid, so setup a dummy value.  */
      31  #if !HAVE_GETEUID
      32  # define geteuid() ROOT_UID
      33  #endif
      34  
      35  #define BASE "test-access.t"
      36  
      37  int
      38  main ()
      39  {
      40    /* Remove anything from prior partial run.  */
      41    unlink (BASE "f");
      42    unlink (BASE "f1");
      43    chmod (BASE "f2", 0600);
      44    unlink (BASE "f2");
      45  
      46    {
      47      errno = 0;
      48      ASSERT (access (BASE "f", R_OK) == -1);
      49      ASSERT (errno == ENOENT);
      50  
      51      errno = 0;
      52      ASSERT (access (BASE "f", W_OK) == -1);
      53      ASSERT (errno == ENOENT);
      54  
      55      errno = 0;
      56      ASSERT (access (BASE "f", X_OK) == -1);
      57      ASSERT (errno == ENOENT);
      58    }
      59    {
      60      ASSERT (close (creat (BASE "f1", 0700)) == 0);
      61  
      62      ASSERT (access (BASE "f1", R_OK) == 0);
      63      ASSERT (access (BASE "f1", W_OK) == 0);
      64      ASSERT (access (BASE "f1", X_OK) == 0);
      65    }
      66    {
      67      ASSERT (close (creat (BASE "f2", 0600)) == 0);
      68      ASSERT (chmod (BASE "f2", 0400) == 0);
      69  
      70      ASSERT (access (BASE "f2", R_OK) == 0);
      71  
      72      if (geteuid () != ROOT_UID)
      73        {
      74          errno = 0;
      75          ASSERT (access (BASE "f2", W_OK) == -1);
      76          ASSERT (errno == EACCES);
      77        }
      78  
      79  #if defined _WIN32 && !defined __CYGWIN__
      80      /* X_OK works like R_OK.  */
      81      ASSERT (access (BASE "f2", X_OK) == 0);
      82  #else
      83      errno = 0;
      84      ASSERT (access (BASE "f2", X_OK) == -1);
      85      ASSERT (errno == EACCES);
      86  #endif
      87    }
      88  
      89    /* Cleanup.  */
      90    ASSERT (unlink (BASE "f1") == 0);
      91    ASSERT (chmod (BASE "f2", 0600) == 0);
      92    ASSERT (unlink (BASE "f2") == 0);
      93  
      94    return 0;
      95  }