diff --git a/tests/util/ktutil/dataset1/a b/tests/util/ktutil/dataset1/a
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/tests/util/ktutil/dataset1/a
diff --git a/tests/util/ktutil/dataset1/b/q b/tests/util/ktutil/dataset1/b/q
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/tests/util/ktutil/dataset1/b/q
diff --git a/tests/util/ktutil/dataset1/b/t b/tests/util/ktutil/dataset1/b/t
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/tests/util/ktutil/dataset1/b/t
diff --git a/tests/util/ktutil/dataset1/b/w b/tests/util/ktutil/dataset1/b/w
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/tests/util/ktutil/dataset1/b/w
diff --git a/tests/util/ktutil/dataset1/f b/tests/util/ktutil/dataset1/f
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/tests/util/ktutil/dataset1/f
diff --git a/tests/util/ktutil/dataset1/y b/tests/util/ktutil/dataset1/y
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/tests/util/ktutil/dataset1/y
diff --git a/tests/util/ktutil/testCopy.php b/tests/util/ktutil/testCopy.php
new file mode 100644
index 0000000..beafa71
--- /dev/null
+++ b/tests/util/ktutil/testCopy.php
@@ -0,0 +1,13 @@
+<?php
+
+require_once("../../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . "/util/ktutil.inc");
+
+$sSrc = KT_DIR . '/tests/util/ktutil/dataset1';
+
+$name = tempnam('/tmp', 'copydirectory');
+unlink($name);
+print $name;
+KTUtil::copyDirectory($sSrc, $name);
+
+?>
diff --git a/tests/util/ktutil/testMove.php b/tests/util/ktutil/testMove.php
new file mode 100644
index 0000000..9fba238
--- /dev/null
+++ b/tests/util/ktutil/testMove.php
@@ -0,0 +1,19 @@
+<?php
+
+require_once("../../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . "/util/ktutil.inc");
+
+$sSrc = KT_DIR . '/tests/util/ktutil/dataset1';
+
+$name = tempnam('/tmp', 'movedirectory');
+unlink($name);
+print "copying to $name first\n";
+KTUtil::copyDirectory($sSrc, $name);
+
+$sSrc = $name;
+$name = tempnam('/tmp', 'movedirectory');
+unlink($name);
+print "moving to $name\n";
+KTUtil::moveDirectory($sSrc, $name);
+
+?>