Initial Spring 2016 commit.

userland/testbin/frack/ops.c

@@ -0,0 +1,315 @@
+/*
+ * Copyright (c) 2013
+ *	The President and Fellows of Harvard College.
+ *      Written by David A. Holland.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE UNIVERSITY AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE UNIVERSITY OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#include <stdint.h>
+#include <unistd.h>
+#include <assert.h>
+#include <err.h>
+
+#include "pool.h"
+#include "data.h"
+#include "do.h"
+#include "check.h"
+#include "ops.h"
+#include "main.h"
+
+struct file {
+	unsigned name;
+	unsigned testcode;
+	unsigned seq;
+	int handle;
+};
+
+struct dir {
+	unsigned name;
+	int handle;
+};
+
+static int checkmode;
+
+void
+setcheckmode(int mode)
+{
+	checkmode = mode;
+	if (checkmode) {
+		check_setup();
+	}
+}
+
+////////////////////////////////////////////////////////////
+// open directories
+
+#define MAXDIRS 32
+DECLPOOL(dir, MAXDIRS);
+
+struct dir *
+op_opendir(unsigned name)
+{
+	struct dir *ret;
+
+	ret = POOLALLOC(dir);
+	ret->name = name;
+	if (checkmode) {
+		ret->handle = -1;
+	}
+	else {
+		ret->handle = do_opendir(name);
+	}
+	return ret;
+}
+
+void
+op_closedir(struct dir *d)
+{
+	if (checkmode) {
+		/* nothing */
+		(void)d;
+	}
+	else {
+		do_closedir(d->handle, d->name);
+	}
+	POOLFREE(dir, d);
+}
+
+////////////////////////////////////////////////////////////
+// files
+
+#define MAXFILES 32
+DECLPOOL(file, MAXFILES);
+
+struct file *
+op_open(unsigned testcode, unsigned name, unsigned openflags)
+{
+	struct file *ret;
+	int dotrunc;
+
+	if (openflags == O_TRUNC) {
+		openflags = 0;
+		dotrunc = 1;
+	}
+	else {
+		dotrunc = 0;
+	}
+
+	assert(openflags == 0 || openflags == (O_CREAT|O_EXCL));
+
+	ret = POOLALLOC(file);
+	ret->name = name;
+	ret->testcode = testcode;
+	ret->seq = 0;
+	if (checkmode) {
+		if (openflags) {
+			ret->handle = check_createfile(name);
+		}
+		else {
+			ret->handle = check_openfile(name);
+		}
+	}
+	else {
+		if (openflags) {
+			assert(dotrunc == 0);
+			ret->handle = do_createfile(name);
+		}
+		else {
+			/*
+			 * XXX: as of 2013 OS/161 doesn't provide a
+			 * truncate call - neither truncate() nor
+			 * ftruncate()! You can only O_TRUNC. Oops...
+			 */
+			ret->handle = do_openfile(name, dotrunc);
+			dotrunc = 0;
+		}
+	}
+	if (dotrunc) {
+		op_truncate(ret, 0);
+	}
+	return ret;
+}
+
+void
+op_close(struct file *f)
+{
+	if (checkmode) {
+		check_closefile(f->handle, f->name);
+	}
+	else {
+		do_closefile(f->handle, f->name);
+	}
+	POOLFREE(file, f);
+}
+
+void
+op_write(struct file *f, off_t pos, off_t len)
+{
+	off_t amount;
+
+	while (len > 0) {
+		amount = len;
+		if (amount > DATA_MAXSIZE) {
+			amount = DATA_MAXSIZE;
+		}
+
+		if (checkmode) {
+			check_write(f->handle, f->name, f->testcode, f->seq,
+				    pos, amount);
+		}
+		else {
+			do_write(f->handle, f->name, f->testcode, f->seq,
+				 pos, amount);
+		}
+		f->seq++;
+		pos += amount;
+		len -= amount;
+	}
+}
+
+void
+op_truncate(struct file *f, off_t len)
+{
+	if (checkmode) {
+		check_truncate(f->handle, f->name, len);
+	}
+	else {
+		do_truncate(f->handle, f->name, len);
+	}
+}
+
+////////////////////////////////////////////////////////////
+// dirops
+
+void
+op_mkdir(unsigned name)
+{
+	if (checkmode) {
+		check_mkdir(name);
+	}
+	else {
+		do_mkdir(name);
+	}
+}
+
+void
+op_rmdir(unsigned name)
+{
+	if (checkmode) {
+		check_rmdir(name);
+	}
+	else {
+		do_rmdir(name);
+	}
+}
+
+void
+op_unlink(unsigned name)
+{
+	if (checkmode) {
+		check_unlink(name);
+	}
+	else {
+		do_unlink(name);
+	}
+}
+
+void
+op_link(unsigned from, unsigned to)
+{
+	if (checkmode) {
+		check_link(from, to);
+	}
+	else {
+		do_link(from, to);
+	}
+}
+
+void
+op_rename(unsigned from, unsigned to)
+{
+	if (checkmode) {
+		check_rename(from, to);
+	}
+	else {
+		do_rename(from, to);
+	}
+}
+
+void
+op_renamexd(unsigned fromdir, unsigned from, unsigned todir, unsigned to)
+{
+	if (checkmode) {
+		check_renamexd(fromdir, from, todir, to);
+	}
+	else {
+		do_renamexd(fromdir, from, todir, to);
+	}
+}
+
+void
+op_chdir(unsigned name)
+{
+	if (checkmode) {
+		check_chdir(name);
+	}
+	else {
+		do_chdir(name);
+	}
+}
+
+void
+op_chdirup(void)
+{
+	if (checkmode) {
+		check_chdirup();
+	}
+	else {
+		do_chdirup();
+	}
+}
+
+////////////////////////////////////////////////////////////
+// other
+
+void
+op_sync(void)
+{
+	if (checkmode) {
+		check_sync();
+	}
+	else {
+		do_sync();
+	}
+}
+
+void
+complete(void)
+{
+	if (checkmode) {
+		checkfs();
+	}
+}