Archipelago » qemu

 gmon.out

 testsig

 hello

 sha1.test.c

 sha1.c

 op.c

 test-i386

 sha1

 testclone

 interp.h

 interploop.c

 .gdb_history

 cachegrind.out

 interp.c

 interp

 testthread

 test-i386.s

 test-i386.ref

 sha1-i386

 runcom

 debug.com

 test-i386.out

 speed.txt

 test-i386.ref.P3

 pi_10.com

 test-i386.ref.P4

 ldso.c

 test_path

TESTS+=sha1 test_path

test_path: test_path.c

	$(CC) $(CFLAGS) $(LDFLAGS) -o $@ $<

	./$@ || { rm $@; exit 1; }

#include <string.h>

#undef __syscall_return

#define __syscall_return(type, res) \

do { \

	return (type) (res); \

} while (0)

/* Test path override code */

#define _GNU_SOURCE

#include "../path.c"

#include <stdarg.h>

#include <sys/stat.h>

#include <fcntl.h>

/* Any log message kills the test. */

void gemu_log(const char *fmt, ...)

{

    va_list ap;

    fprintf(stderr, "FATAL: ");

    va_start(ap, fmt);

    vfprintf(stderr, fmt, ap);

    va_end(ap);

    exit(1);

}

#define NO_CHANGE(_path)						\

	do {								\

	    if (strcmp(path(_path), _path) != 0) return __LINE__;	\

	} while(0)

#define CHANGE_TO(_path, _newpath)					\

	do {								\

	    if (strcmp(path(_path), _newpath) != 0) return __LINE__;	\

	} while(0)

static void cleanup(void)

{

    unlink("/tmp/qemu-test_path/DIR1/DIR2/FILE");

    unlink("/tmp/qemu-test_path/DIR1/DIR2/FILE2");

    unlink("/tmp/qemu-test_path/DIR1/DIR2/FILE3");

    unlink("/tmp/qemu-test_path/DIR1/DIR2/FILE4");

    unlink("/tmp/qemu-test_path/DIR1/DIR2/FILE5");

    rmdir("/tmp/qemu-test_path/DIR1/DIR2");

    rmdir("/tmp/qemu-test_path/DIR1/DIR3");

    rmdir("/tmp/qemu-test_path/DIR1");

    rmdir("/tmp/qemu-test_path");

}

static unsigned int do_test(void)

{

    if (mkdir("/tmp/qemu-test_path", 0700) != 0)

	return __LINE__;

    if (mkdir("/tmp/qemu-test_path/DIR1", 0700) != 0)

	return __LINE__;

    if (mkdir("/tmp/qemu-test_path/DIR1/DIR2", 0700) != 0)

	return __LINE__;

    if (mkdir("/tmp/qemu-test_path/DIR1/DIR3", 0700) != 0)

	return __LINE__;

    if (close(creat("/tmp/qemu-test_path/DIR1/DIR2/FILE", 0600)) != 0)

	return __LINE__;

    if (close(creat("/tmp/qemu-test_path/DIR1/DIR2/FILE2", 0600)) != 0)

	return __LINE__;

    if (close(creat("/tmp/qemu-test_path/DIR1/DIR2/FILE3", 0600)) != 0)

	return __LINE__;

    if (close(creat("/tmp/qemu-test_path/DIR1/DIR2/FILE4", 0600)) != 0)

	return __LINE__;

    if (close(creat("/tmp/qemu-test_path/DIR1/DIR2/FILE5", 0600)) != 0)

	return __LINE__;

    init_paths("/tmp/qemu-test_path");

    NO_CHANGE("/tmp");

    NO_CHANGE("/tmp/");

    NO_CHANGE("/tmp/qemu-test_path");

    NO_CHANGE("/tmp/qemu-test_path/");

    NO_CHANGE("/tmp/qemu-test_path/D");

    NO_CHANGE("/tmp/qemu-test_path/DI");

    NO_CHANGE("/tmp/qemu-test_path/DIR");

    NO_CHANGE("/tmp/qemu-test_path/DIR1");

    NO_CHANGE("/tmp/qemu-test_path/DIR1/");

    NO_CHANGE("/D");

    NO_CHANGE("/DI");

    NO_CHANGE("/DIR");

    NO_CHANGE("/DIR2");

    NO_CHANGE("/DIR1.");

    CHANGE_TO("/DIR1", "/tmp/qemu-test_path/DIR1");

    CHANGE_TO("/DIR1/", "/tmp/qemu-test_path/DIR1");

    NO_CHANGE("/DIR1/D");

    NO_CHANGE("/DIR1/DI");

    NO_CHANGE("/DIR1/DIR");

    NO_CHANGE("/DIR1/DIR1");

    CHANGE_TO("/DIR1/DIR2", "/tmp/qemu-test_path/DIR1/DIR2");

    CHANGE_TO("/DIR1/DIR2/", "/tmp/qemu-test_path/DIR1/DIR2");

    CHANGE_TO("/DIR1/DIR3", "/tmp/qemu-test_path/DIR1/DIR3");

    CHANGE_TO("/DIR1/DIR3/", "/tmp/qemu-test_path/DIR1/DIR3");

    NO_CHANGE("/DIR1/DIR2/F");

    NO_CHANGE("/DIR1/DIR2/FI");

    NO_CHANGE("/DIR1/DIR2/FIL");

    NO_CHANGE("/DIR1/DIR2/FIL.");

    CHANGE_TO("/DIR1/DIR2/FILE", "/tmp/qemu-test_path/DIR1/DIR2/FILE");

    CHANGE_TO("/DIR1/DIR2/FILE2", "/tmp/qemu-test_path/DIR1/DIR2/FILE2");

    CHANGE_TO("/DIR1/DIR2/FILE3", "/tmp/qemu-test_path/DIR1/DIR2/FILE3");

    CHANGE_TO("/DIR1/DIR2/FILE4", "/tmp/qemu-test_path/DIR1/DIR2/FILE4");

    CHANGE_TO("/DIR1/DIR2/FILE5", "/tmp/qemu-test_path/DIR1/DIR2/FILE5");

    NO_CHANGE("/DIR1/DIR2/FILE6");

    NO_CHANGE("/DIR1/DIR2/FILE/X");

    CHANGE_TO("/DIR1/../DIR1", "/tmp/qemu-test_path/DIR1");

    CHANGE_TO("/DIR1/../DIR1/", "/tmp/qemu-test_path/DIR1");

    CHANGE_TO("/../DIR1", "/tmp/qemu-test_path/DIR1");

    CHANGE_TO("/../DIR1/", "/tmp/qemu-test_path/DIR1");

    CHANGE_TO("/DIR1/DIR2/../DIR2", "/tmp/qemu-test_path/DIR1/DIR2");

    CHANGE_TO("/DIR1/DIR2/../DIR2/../../DIR1/DIR2/FILE", "/tmp/qemu-test_path/DIR1/DIR2/FILE");

    CHANGE_TO("/DIR1/DIR2/../DIR2/FILE", "/tmp/qemu-test_path/DIR1/DIR2/FILE");

    NO_CHANGE("/DIR1/DIR2/../DIR1");

    NO_CHANGE("/DIR1/DIR2/../FILE");

    CHANGE_TO("/./DIR1/DIR2/FILE", "/tmp/qemu-test_path/DIR1/DIR2/FILE");

    CHANGE_TO("/././DIR1/DIR2/FILE", "/tmp/qemu-test_path/DIR1/DIR2/FILE");

    CHANGE_TO("/DIR1/./DIR2/FILE", "/tmp/qemu-test_path/DIR1/DIR2/FILE");

    CHANGE_TO("/DIR1/././DIR2/FILE", "/tmp/qemu-test_path/DIR1/DIR2/FILE");

    CHANGE_TO("/DIR1/DIR2/./FILE", "/tmp/qemu-test_path/DIR1/DIR2/FILE");

    CHANGE_TO("/DIR1/DIR2/././FILE", "/tmp/qemu-test_path/DIR1/DIR2/FILE");

    CHANGE_TO("/./DIR1/./DIR2/./FILE", "/tmp/qemu-test_path/DIR1/DIR2/FILE");

    return 0;

}

int main(int argc, char *argv[])

{

    int ret;

    ret = do_test();

    cleanup();

    if (ret) {

	fprintf(stderr, "test_path: failed on line %i\n", ret);

	return 1;

    }

    return 0;

}

#include <string.h>

#include <string.h>