glibc/login/tst-updwtmpx.c

113 lines
4.0 KiB
C

/* Basic test coverage for updwtmpx.
Copyright (C) 2019-2022 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public License as
published by the Free Software Foundation; either version 2.1 of the
License, or (at your option) any later version.
The GNU C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; see the file COPYING.LIB. If
not, see <https://www.gnu.org/licenses/>. */
/* This program runs a series of tests. Each one calls updwtmpx
twice, to write two records, optionally with misalignment in the
file, and reads back the results. */
#include <errno.h>
#include <stdlib.h>
#include <support/check.h>
#include <support/descriptors.h>
#include <support/support.h>
#include <support/temp_file.h>
#include <support/test-driver.h>
#include <support/xunistd.h>
#include <unistd.h>
#include <utmpx.h>
static int
do_test (void)
{
/* Two entries filled with an arbitrary bit pattern. */
struct utmpx entries[2];
unsigned char pad;
{
unsigned char *p = (unsigned char *) &entries[0];
for (size_t i = 0; i < sizeof (entries); ++i)
{
p[i] = i;
}
/* Make sure that the first and second entry and the padding are
different. */
p[sizeof (struct utmpx)] = p[0] + 1;
pad = p[0] + 2;
}
char *path;
int fd = create_temp_file ("tst-updwtmpx-", &path);
/* Used to check that updwtmpx does not leave an open file
descriptor around. */
struct support_descriptors *descriptors = support_descriptors_list ();
/* updwtmpx is expected to remove misalignment. Optionally insert
one byte of misalignment at the start and in the middle (after
the first entry). */
for (int misaligned_start = 0; misaligned_start < 2; ++misaligned_start)
for (int misaligned_middle = 0; misaligned_middle < 2; ++misaligned_middle)
{
if (test_verbose > 0)
printf ("info: misaligned_start=%d misaligned_middle=%d\n",
misaligned_start, misaligned_middle);
xftruncate (fd, 0);
TEST_COMPARE (pwrite64 (fd, &pad, misaligned_start, 0),
misaligned_start);
/* Write first entry and check it. */
errno = 0;
updwtmpx (path, &entries[0]);
TEST_COMPARE (errno, 0);
support_descriptors_check (descriptors);
TEST_COMPARE (xlseek (fd, 0, SEEK_END), sizeof (struct utmpx));
struct utmpx buffer;
TEST_COMPARE (pread64 (fd, &buffer, sizeof (buffer), 0),
sizeof (buffer));
TEST_COMPARE_BLOB (&entries[0], sizeof (entries[0]),
&buffer, sizeof (buffer));
/* Middle mis-alignmet. */
TEST_COMPARE (pwrite64 (fd, &pad, misaligned_middle,
sizeof (struct utmpx)), misaligned_middle);
/* Write second entry and check both entries. */
errno = 0;
updwtmpx (path, &entries[1]);
TEST_COMPARE (errno, 0);
support_descriptors_check (descriptors);
TEST_COMPARE (xlseek (fd, 0, SEEK_END), 2 * sizeof (struct utmpx));
TEST_COMPARE (pread64 (fd, &buffer, sizeof (buffer), 0),
sizeof (buffer));
TEST_COMPARE_BLOB (&entries[0], sizeof (entries[0]),
&buffer, sizeof (buffer));
TEST_COMPARE (pread64 (fd, &buffer, sizeof (buffer), sizeof (buffer)),
sizeof (buffer));
TEST_COMPARE_BLOB (&entries[1], sizeof (entries[1]),
&buffer, sizeof (buffer));
}
support_descriptors_free (descriptors);
free (path);
xclose (fd);
return 0;
}
#include <support/test-driver.c>