NetBSD/tests/fs/kernfs/t_basic.c

/*	$NetBSD: t_basic.c,v 1.1 2010/03/31 19:14:30 pooka Exp $	*/

#include <sys/types.h>
#include <sys/mount.h>
#include <sys/module.h>
#include <sys/dirent.h>
#include <sys/sysctl.h>

#include <atf-c.h>
#include <err.h>
#include <errno.h>
#include <fcntl.h>
#include <stdio.h>
#include <unistd.h>
#include <string.h>
#include <stdlib.h>

#include <rump/rump.h>
#include <rump/rump_syscalls.h>

#include <miscfs/kernfs/kernfs.h>

#define USE_ATF
#include "../../h_macros.h"

#ifdef USE_ATF
ATF_TC(getdents);
ATF_TC_HEAD(getdents, tc)
{

	atf_tc_set_md_var(tc, "descr", "kernfs directory contains files");
}
#else
#define atf_tc_fail(...) errx(1, __VA_ARGS__)
#endif

#ifdef MODDIR
/*
 * Try to load kernfs module (only on archs where ABIs match).
 * This is slightly ... inconvenient currently.  Let's try to improve
 * it in the future.
 *
 * steps:
 *   1) copy it into our working directory
 *   2) rename symbols
 *   3) lock & load
 */
static int
loadmodule(void)
{
	modctl_load_t ml;
	int error;

	if (system("cp " MODDIR MODBASE " .") == -1) {
		warn("failed to copy %s into pwd", MODDIR MODBASE);
		return errno;
	}
	if (chmod(MODBASE, 0666) == -1) {
		warn("chmod %s", MODBASE);
		return errno;
	}
	if (system("make -f /usr/src/sys/rump/Makefile.rump RUMP_SYMREN="
	    MODBASE) == -1) {
		warn("objcopy failed");
		return errno;
	}

	if ((error = rump_pub_etfs_register(MODBASE, MODBASE, RUMP_ETFS_REG))) {
		warn("rump etfs");
		return error;
	}

	memset(&ml, 0, sizeof(ml));
	ml.ml_filename = MODBASE;
	if (rump_sys_modctl(MODCTL_LOAD, &ml) == -1) {
		warn("module load");
		return errno;
	}

	return 0;
}
#endif

static void
mountkernfs(void)
{

	rump_init();

#ifdef MODDIR
	if (loadmodule() != 0) {
		/* failed?  fallback to dlopen() .... some day */
		atf_tc_fail("could not load kernfs");
	}
#endif

	if (rump_sys_mkdir("/kern", 0777) == -1)
		atf_tc_fail_errno("mkdir /kern");
	if (rump_sys_mount(MOUNT_KERNFS, "/kern", 0, NULL, 0) == -1)
		atf_tc_fail_errno("could not mount kernfs");
}

#ifdef USE_ATF
ATF_TC_BODY(getdents, tc)
#else
int main(int argc, char *argv[])
#endif
{
	struct dirent *dent;
	char buf[8192];
	int dfd;

	mountkernfs();

	if ((dfd = rump_sys_open("/kern", O_RDONLY)) == -1)
		atf_tc_fail_errno("can't open directory");
	if (rump_sys_getdents(dfd, buf, sizeof(buf)) == -1)
		atf_tc_fail_errno("getdents");

	/*
	 * Check that we get the first three values (., .., boottime).
	 * Make more complete by autogenerating list from kernfs_vnops.c?
	 */
	dent = (void *)buf;
	ATF_REQUIRE_STREQ(dent->d_name, ".");
	dent = _DIRENT_NEXT(dent);
	ATF_REQUIRE_STREQ(dent->d_name, "..");
	dent = _DIRENT_NEXT(dent);
	ATF_REQUIRE_STREQ(dent->d_name, "boottime");

	/* done */
}

#ifdef USE_ATF
ATF_TC(hostname);
ATF_TC_HEAD(hostname, tc)
{

	atf_tc_set_md_var(tc, "descr", "/kern/hostname changes hostname");
}

static char *
getthehost(void)
{
	static char buf[8192];
	int mib[2];
	size_t blen;

	mib[0] = CTL_KERN;
	mib[1] = KERN_HOSTNAME;
	blen = sizeof(buf);
	if (rump_sys___sysctl(mib, 2, buf, &blen, NULL, 0) == -1)
		atf_tc_fail_errno("sysctl gethostname");

	return buf;
}

#define NEWHOSTNAME "turboton roos-berg"
ATF_TC_BODY(hostname, tc)
{
	char buf[8192];
	char *shost, *p;
	int fd;

	mountkernfs();
	if ((fd = rump_sys_open("/kern/hostname", O_RDWR)) == -1)
		atf_tc_fail_errno("open hostname");

	/* check initial match */
	shost = getthehost();
	buf[0] = '\0';
	if (rump_sys_read(fd, buf, sizeof(buf)) == -1)
		atf_tc_fail_errno("read hostname");
	p = strchr(buf, '\n');
	if (p)
		 *p = '\0';
	ATF_REQUIRE_STREQ_MSG(buf, shost, "initial hostname mismatch");

	/* check changing hostname works */
	if (rump_sys_pwrite(fd, NEWHOSTNAME, strlen(NEWHOSTNAME), 0)
	    != strlen(NEWHOSTNAME)) {
		atf_tc_fail_errno("write new hostname");
	}

	shost = getthehost();
	ATF_REQUIRE_STREQ_MSG(NEWHOSTNAME, shost, "modified hostname mismatch");

	/* done */
}

ATF_TP_ADD_TCS(tp)
{
	ATF_TP_ADD_TC(tp, hostname);
	ATF_TP_ADD_TC(tp, getdents);

	return atf_no_error();
}
#endif