#include <sys/cdefs.h>
__RCSID("$NetBSD: t_stat.c,v 1.4 2012/03/17 08:37:08 jruoho Exp $");
#include <sys/stat.h>
#include <sys/socket.h>
#include <sys/types.h>
#include <arpa/inet.h>
#include <errno.h>
#include <fcntl.h>
#include <fts.h>
#include <limits.h>
#include <string.h>
#include <unistd.h>
#include <stdio.h>
#include <netinet/in.h>
#include <darwintest.h>
static const char *path = "/tmp/stat";
T_DECL(stat_chflags, "Test chflags(2) with stat(2)")
{
struct stat sa, sb;
int fd;
(void)memset(&sa, 0, sizeof(struct stat));
(void)memset(&sb, 0, sizeof(struct stat));
unlink(path);
T_ASSERT_POSIX_SUCCESS((fd = open(path, O_RDONLY | O_CREAT)), NULL);
T_ASSERT_POSIX_ZERO(stat(path, &sa), NULL);
T_ASSERT_POSIX_ZERO(chflags(path, UF_NODUMP), NULL);
T_ASSERT_POSIX_ZERO(stat(path, &sb), NULL);
T_EXPECT_NE(sa.st_flags, sb.st_flags | UF_NODUMP, "stat(2) detects chflags(2)");
T_ASSERT_POSIX_ZERO(close(fd), NULL);
T_ASSERT_POSIX_ZERO(unlink(path), NULL);
}
T_DECL(stat_dir, "Test stat(2) with directories")
{
const short depth = 2;
struct stat sa, sb;
char *args[] = {"/System", NULL};
FTSENT *ftse;
FTS *fts;
int ops;
ops = FTS_NOCHDIR;
ops |= FTS_PHYSICAL;
T_ASSERT_NOTNULL(fts = fts_open(args, ops, NULL), NULL);
while ((ftse = fts_read(fts)) != NULL) {
if (ftse->fts_level < 1)
continue;
if (ftse->fts_level > depth) {
(void)fts_set(fts, ftse, FTS_SKIP);
continue;
}
switch(ftse->fts_info) {
case FTS_DP:
(void)memset(&sa, 0, sizeof(struct stat));
(void)memset(&sb, 0, sizeof(struct stat));
T_ASSERT_POSIX_ZERO(stat(ftse->fts_parent->fts_path,&sa), NULL);
T_ASSERT_POSIX_ZERO(chdir(ftse->fts_path), NULL);
T_ASSERT_POSIX_ZERO(stat(".", &sb), NULL);
T_EXPECT_EQ(sa.st_dev, sb.st_dev, "stat(2) should return consistent device");
T_EXPECT_EQ(sa.st_ino, sb.st_ino, "stat(2) should return consistent inode");
T_EXPECT_EQ(sb.st_ino, ftse->fts_statp->st_ino, "stat(2) and fts(3) should not differ");
break;
default:
break;
}
}
(void)fts_close(fts);
}
#if 0 // TODO: port me
ATF_TC(stat_err);
ATF_TC_HEAD(stat_err, tc)
{
atf_tc_set_md_var(tc, "descr", "Test errors from the stat(2) family");
}
T_DECL(stat_err, "")
{
char buf[NAME_MAX + 1];
struct stat st;
(void)memset(buf, 'x', sizeof(buf));
errno = 0;
ATF_REQUIRE_ERRNO(EBADF, fstat(-1, &st) == -1);
errno = 0;
ATF_REQUIRE_ERRNO(ENAMETOOLONG, stat(buf, &st) == -1);
errno = 0;
ATF_REQUIRE_ERRNO(ENAMETOOLONG, lstat(buf, &st) == -1);
errno = 0;
ATF_REQUIRE_ERRNO(EFAULT, stat((void *)-1, &st) == -1);
errno = 0;
ATF_REQUIRE_ERRNO(EFAULT, lstat((void *)-1, &st) == -1);
errno = 0;
ATF_REQUIRE_ERRNO(EFAULT, stat("/etc/passwd", (void *)-1) == -1);
errno = 0;
ATF_REQUIRE_ERRNO(EFAULT, lstat("/etc/passwd", (void *)-1) == -1);
errno = 0;
ATF_REQUIRE_ERRNO(ENOENT, stat("/a/b/c/d/e/f/g/h/i/j/k", &st) == -1);
errno = 0;
ATF_REQUIRE_ERRNO(ENOENT, lstat("/a/b/c/d/e/f/g/h/i/j/k", &st) == -1);
}
ATF_TC_WITH_CLEANUP(stat_mtime);
ATF_TC_HEAD(stat_mtime, tc)
{
atf_tc_set_md_var(tc, "descr", "Test modification times with stat(2)");
}
T_DECL(stat_mtime, "")
{
struct stat sa, sb;
int fd[3];
size_t i;
for (i = 0; i < __arraycount(fd); i++) {
(void)memset(&sa, 0, sizeof(struct stat));
(void)memset(&sb, 0, sizeof(struct stat));
fd[i] = open(path, O_WRONLY | O_CREAT);
T_ASSERT_POSIX_SUCCESS(fd[i], NULL);
T_ASSERT_EQ(write(fd[i], "X", 1), 1, NULL);
T_ASSERT_POSIX_ZERO(stat(path, &sa), NULL);
(void)sleep(1);
T_ASSERT_EQ(write(fd[i], "X", 1), 1, NULL);
T_ASSERT_POSIX_ZERO(stat(path, &sb), NULL);
T_ASSERT_POSIX_ZERO(close(fd[i]), NULL);
T_ASSERT_POSIX_ZERO(unlink(path), NULL);
if (sa.st_mtime == sb.st_mtime)
atf_tc_fail("mtimes did not change");
}
}
ATF_TC_CLEANUP(stat_mtime, tc)
{
(void)unlink(path);
}
ATF_TC_WITH_CLEANUP(stat_perm);
ATF_TC_HEAD(stat_perm, tc)
{
atf_tc_set_md_var(tc, "descr", "Test permissions with stat(2)");
atf_tc_set_md_var(tc, "require.user", "root");
}
T_DECL(stat_perm, "")
{
struct stat sa, sb;
gid_t gid;
uid_t uid;
int fd;
(void)memset(&sa, 0, sizeof(struct stat));
(void)memset(&sb, 0, sizeof(struct stat));
uid = getuid();
gid = getgid();
fd = open(path, O_RDONLY | O_CREAT);
T_ASSERT_POSIX_SUCCESS(fd, NULL);
T_ASSERT_POSIX_ZERO(fstat(fd, &sa), NULL);
T_ASSERT_POSIX_ZERO(stat(path, &sb), NULL);
if (gid != sa.st_gid || sa.st_gid != sb.st_gid)
atf_tc_fail("invalid GID");
if (uid != sa.st_uid || sa.st_uid != sb.st_uid)
atf_tc_fail("invalid UID");
T_ASSERT_POSIX_ZERO(close(fd), NULL);
T_ASSERT_POSIX_ZERO(unlink(path), NULL);
}
ATF_TC_CLEANUP(stat_perm, tc)
{
(void)unlink(path);
}
ATF_TC_WITH_CLEANUP(stat_size);
ATF_TC_HEAD(stat_size, tc)
{
atf_tc_set_md_var(tc, "descr", "Test file sizes with stat(2)");
}
T_DECL(stat_size, "")
{
struct stat sa, sb, sc;
const size_t n = 10;
size_t i;
int fd;
fd = open(path, O_WRONLY | O_CREAT);
ATF_REQUIRE(fd >= 0);
for (i = 0; i < n; i++) {
(void)memset(&sa, 0, sizeof(struct stat));
(void)memset(&sb, 0, sizeof(struct stat));
(void)memset(&sc, 0, sizeof(struct stat));
T_ASSERT_POSIX_ZERO(fstat(fd, &sa), NULL);
T_ASSERT_EQ(write(fd, "X", 1), 1, NULL);
T_ASSERT_POSIX_ZERO(fstat(fd, &sb), NULL);
T_ASSERT_POSIX_ZERO(stat(path, &sc), NULL);
if (sa.st_size + 1 != sb.st_size)
atf_tc_fail("invalid file size");
if (sb.st_size != sc.st_size)
atf_tc_fail("stat(2) and fstat(2) mismatch");
}
T_ASSERT_POSIX_ZERO(close(fd), NULL);
T_ASSERT_POSIX_ZERO(unlink(path), NULL);
}
ATF_TC_CLEANUP(stat_size, tc)
{
(void)unlink(path);
}
ATF_TC(stat_socket);
ATF_TC_HEAD(stat_socket, tc)
{
atf_tc_set_md_var(tc, "descr", "Test fstat(2) with "
"a socket (PR kern/46077)");
}
T_DECL(stat_socket, "")
{
struct sockaddr_in addr;
struct stat st;
uint32_t iaddr;
int fd, flags;
(void)memset(&st, 0, sizeof(struct stat));
(void)memset(&addr, 0, sizeof(struct sockaddr_in));
fd = socket(AF_INET, SOCK_STREAM, 0);
ATF_REQUIRE(fd >= 0);
flags = fcntl(fd, F_GETFL);
T_ASSERT_POSIX_SUCCESS(flags, NULL);
T_ASSERT_POSIX_SUCCESS(fcntl(fd, F_SETFL, flags | O_NONBLOCK), NULL);
T_ASSERT_EQ(inet_pton(AF_INET, "127.0.0.1", &iaddr), 1, NULL);
addr.sin_port = htons(42);
addr.sin_family = AF_INET;
addr.sin_addr.s_addr = iaddr;
errno = 0;
ATF_REQUIRE_ERRNO(EINPROGRESS,
connect(fd, (struct sockaddr *)&addr,
sizeof(struct sockaddr_in)) == -1);
errno = 0;
if (fstat(fd, &st) != 0 || errno != 0)
atf_tc_fail("fstat(2) failed for a EINPROGRESS socket");
(void)close(fd);
}
ATF_TC_WITH_CLEANUP(stat_symlink);
ATF_TC_HEAD(stat_symlink, tc)
{
atf_tc_set_md_var(tc, "descr", "Test symbolic links with stat(2)");
}
T_DECL(stat_symlink, "")
{
const char *pathlink = "pathlink";
struct stat sa, sb;
int fd;
(void)memset(&sa, 0, sizeof(struct stat));
(void)memset(&sb, 0, sizeof(struct stat));
fd = open(path, O_WRONLY | O_CREAT);
ATF_REQUIRE(fd >= 0);
T_ASSERT_POSIX_ZERO(symlink(path, pathlink), NULL);
T_ASSERT_POSIX_ZERO(stat(pathlink, &sa), NULL);
T_ASSERT_POSIX_ZERO(lstat(pathlink, &sb), NULL);
if (S_ISLNK(sa.st_mode) != 0)
atf_tc_fail("stat(2) detected symbolic link");
if (S_ISLNK(sb.st_mode) == 0)
atf_tc_fail("lstat(2) did not detect symbolic link");
if (sa.st_mode == sb.st_mode)
atf_tc_fail("inconsistencies between stat(2) and lstat(2)");
T_ASSERT_POSIX_ZERO(unlink(path), NULL);
T_ASSERT_POSIX_ZERO(unlink(pathlink), NULL);
}
ATF_TC_CLEANUP(stat_symlink, tc)
{
(void)unlink(path);
}
#endif