glibc/io/tst-faccessat.c

214 lines
4.5 KiB
C

/* Test for faccessat function. */
#include <dirent.h>
#include <fcntl.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <sys/stat.h>
static void prepare (void);
#define PREPARE(argc, argv) prepare ()
static int do_test (void);
#define TEST_FUNCTION do_test ()
#include "../test-skeleton.c"
static int dir_fd;
static void
prepare (void)
{
size_t test_dir_len = strlen (test_dir);
static const char dir_name[] = "/tst-faccessat.XXXXXX";
size_t dirbuflen = test_dir_len + sizeof (dir_name);
char *dirbuf = malloc (dirbuflen);
if (dirbuf == NULL)
{
puts ("out of memory");
exit (1);
}
snprintf (dirbuf, dirbuflen, "%s%s", test_dir, dir_name);
if (mkdtemp (dirbuf) == NULL)
{
puts ("cannot create temporary directory");
exit (1);
}
add_temp_file (dirbuf);
dir_fd = open (dirbuf, O_RDONLY | O_DIRECTORY);
if (dir_fd == -1)
{
puts ("cannot open directory");
exit (1);
}
}
static int
do_test (void)
{
/* fdopendir takes over the descriptor, make a copy. */
int dupfd = dup (dir_fd);
if (dupfd == -1)
{
puts ("dup failed");
return 1;
}
if (lseek (dupfd, 0, SEEK_SET) != 0)
{
puts ("1st lseek failed");
return 1;
}
/* The directory should be empty save the . and .. files. */
DIR *dir = fdopendir (dupfd);
if (dir == NULL)
{
puts ("fdopendir failed");
return 1;
}
struct dirent64 *d;
while ((d = readdir64 (dir)) != NULL)
if (strcmp (d->d_name, ".") != 0 && strcmp (d->d_name, "..") != 0)
{
printf ("temp directory contains file \"%s\"\n", d->d_name);
return 1;
}
closedir (dir);
/* Try to create a file. */
int fd = openat (dir_fd, "some-file", O_CREAT|O_RDWR|O_EXCL, 0666);
if (fd == -1)
{
if (errno == ENOSYS)
{
puts ("*at functions not supported");
return 0;
}
puts ("file creation failed");
return 1;
}
write (fd, "hello", 5);
puts ("file created");
/* Before closing the file, try using this file descriptor to open
another file. This must fail. */
if (faccessat (fd, "should-not-work", F_OK, AT_EACCESS) != -1)
{
puts ("faccessat using descriptor for normal file worked");
return 1;
}
if (errno != ENOTDIR)
{
puts ("\
error for faccessat using descriptor for normal file not ENOTDIR ");
return 1;
}
close (fd);
int result = 0;
if (faccessat (dir_fd, "some-file", F_OK, AT_EACCESS))
{
printf ("faccessat F_OK: %m\n");
result = 1;
}
if (faccessat (dir_fd, "some-file", W_OK, AT_EACCESS))
{
printf ("faccessat W_OK: %m\n");
result = 1;
}
errno = 0;
if (faccessat (dir_fd, "some-file", X_OK, AT_EACCESS) == 0
|| errno != EACCES)
{
printf ("faccessat X_OK on nonexecutable: %m\n");
result = 1;
}
if (fchmodat (dir_fd, "some-file", 0400, 0) != 0)
{
printf ("fchownat failed: %m\n");
return 1;
}
if (faccessat (dir_fd, "some-file", R_OK, AT_EACCESS))
{
printf ("faccessat R_OK: %m\n");
result = 1;
}
errno = 0;
if (faccessat (dir_fd, "some-file", W_OK, AT_EACCESS) == 0
? (geteuid () != 0) : (errno != EACCES))
{
printf ("faccessat W_OK on unwritable file: %m\n");
result = 1;
}
/* Create a file descriptor which is closed again right away. */
int dir_fd2 = dup (dir_fd);
if (dir_fd2 == -1)
{
puts ("dup failed");
return 1;
}
close (dir_fd2);
/* With the file descriptor closed the next call must fail. */
if (faccessat (dir_fd2, "some-file", F_OK, AT_EACCESS) != -1)
{
puts ("faccessat using closed descriptor succeeded");
return 1;
}
if (errno != EBADF)
{
puts ("faccessat using closed descriptor did not set EBADF");
return 1;
}
/* Same with a non-existing file. */
if (faccessat (dir_fd2, "non-existing-file", F_OK, AT_EACCESS) != -1)
{
puts ("2nd faccessat using closed descriptor succeeded");
return 1;
}
if (errno != EBADF)
{
puts ("2nd faccessat using closed descriptor did not set EBADF");
return 1;
}
if (unlinkat (dir_fd, "some-file", 0) != 0)
{
puts ("unlinkat failed");
result = 1;
}
close (dir_fd);
fd = faccessat (-1, "some-file", F_OK, AT_EACCESS);
if (fd != -1)
{
puts ("faccessat using -1 descriptor succeeded");
return 1;
}
if (errno != EBADF)
{
puts ("faccessat using -1 descriptor did not set EBADF");
return 1;
}
return result;
}