#include <err.h>
#include <fcntl.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>

#define UV_SHOULD_SUCCEED(A, B) do {					\
	if (A) {							\
		err(1, "%s:%d - %s", __FILE__, __LINE__, B);		\
	}								\
} while (0)

#define NUM_PERMS 16
static char uv_dir[] = "/tmp/uvdir.XXXXXX"; /* test directory */

const char* perms[] = {"", "r", "w", "x", "c", "rw", "rx", "rc",
                       "wx", "wc","xc", "rwx", "rwc", "rxc", "wxc", "rwxc"};
const char* filenames[] = {"f", "fr", "fw", "fx", "fc", "frw", "frx", "frc",
			   "fwx", "fwc", "fxc", "frwx",
			   "frwc", "frxc", "fwxc", "frwxc"};
const char* header = "unveil:access\n";

int
main(void)
{
	FILE *log = stdout;
	int i;

	UV_SHOULD_SUCCEED((mkdtemp(uv_dir) == NULL), "mkdtmp");
	UV_SHOULD_SUCCEED((unveil("/", "rwxc") == -1), "unveil");
	UV_SHOULD_SUCCEED((chdir(uv_dir) == -1), "chdir");

	fwrite(header, strlen(header), 1, log);
	for (i = 0; i < NUM_PERMS; i++) {
		const char *perm = perms[i];
		const char *filename = filenames[i];
		int fd;
		UV_SHOULD_SUCCEED(((fd = open(filename, O_WRONLY|O_CREAT, 0700)) == -1), "open");
		UV_SHOULD_SUCCEED((close(fd) == -1), "close");
		UV_SHOULD_SUCCEED((unveil(filename, perm) == -1), "unveil");
		UV_SHOULD_SUCCEED((fwrite(perm, 1, strlen(perm), log) != strlen(perm)), "fwrite");
		UV_SHOULD_SUCCEED((fwrite(":", 1, 1, log) != 1), "fwrite");
		if (access(filename, R_OK) == 0)
			UV_SHOULD_SUCCEED((fwrite("R", 1, 1, log) != 1), "fwrite");
		if (access(filename, W_OK) == 0)
			UV_SHOULD_SUCCEED((fwrite("W", 1, 1, log) != 1), "fwrite");
		if (access(filename, X_OK) == 0)
			UV_SHOULD_SUCCEED((fwrite("X", 1, 1, log) != 1), "fwrite");
		if (access(filename, F_OK) == 0)
			UV_SHOULD_SUCCEED((fwrite("F", 1, 1, log) != 1), "fwrite");
		UV_SHOULD_SUCCEED((fwrite("\n", 1, 1, log) != 1), "fwrite");
	}

	return 0;
}