From a3bb079bab6c97221a44eef0dcfcf36c10a96154 Mon Sep 17 00:00:00 2001
From: nbm <nbm@c91229c3-7414-0410-bfa2-8a42b809f60b>
Date: Sun, 31 Jul 2005 08:41:47 +0000
Subject: [PATCH] Tests for the new permissions system.

---
 tests/permissions/copyPermissionObject.php              | 14 ++++++++++++++
 tests/permissions/findRootObjectForPermissionObject.php | 14 ++++++++++++++
 tests/permissions/inheritPermissionObject.php           | 37 +++++++++++++++++++++++++++++++++++++
 tests/permissions/permissionassignment.php              | 21 +++++++++++++++++++++
 tests/permissions/permissiondescriptors.php             | 13 +++++++++++++
 tests/permissions/permissionobjects.php                 | 12 ++++++++++++
 tests/permissions/permissions.php                       | 12 ++++++++++++
 tests/permissions/permissionutil.php                    | 23 +++++++++++++++++++++++
 tests/permissions/restart.php                           | 17 +++++++++++++++++
 tests/permissions/setPermissionObject.php               | 10 ++++++++++
 tests/permissions/testPermissionLookup.php              | 17 +++++++++++++++++
 tests/permissions/updatePermissionLookup.php            | 22 ++++++++++++++++++++++
 12 files changed, 212 insertions(+), 0 deletions(-)
 create mode 100644 tests/permissions/copyPermissionObject.php
 create mode 100644 tests/permissions/findRootObjectForPermissionObject.php
 create mode 100644 tests/permissions/inheritPermissionObject.php
 create mode 100644 tests/permissions/permissionassignment.php
 create mode 100644 tests/permissions/permissiondescriptors.php
 create mode 100644 tests/permissions/permissionobjects.php
 create mode 100644 tests/permissions/permissions.php
 create mode 100644 tests/permissions/permissionutil.php
 create mode 100644 tests/permissions/restart.php
 create mode 100644 tests/permissions/setPermissionObject.php
 create mode 100644 tests/permissions/testPermissionLookup.php
 create mode 100644 tests/permissions/updatePermissionLookup.php

diff --git a/tests/permissions/copyPermissionObject.php b/tests/permissions/copyPermissionObject.php
new file mode 100644
index 0000000..77e521a
--- /dev/null
+++ b/tests/permissions/copyPermissionObject.php
@@ -0,0 +1,14 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . '/foldermanagement/Folder.inc');
+require_once(KT_LIB_DIR . '/permissions/permissionutil.inc.php');
+
+error_reporting(E_ALL);
+
+$oFolder = Folder::get(19);
+var_dump($oFolder->getPermissionObjectID());
+KTPermissionUtil::copyPermissionObject($oFolder);
+var_dump($oFolder->getPermissionObjectID());
+
+?>
diff --git a/tests/permissions/findRootObjectForPermissionObject.php b/tests/permissions/findRootObjectForPermissionObject.php
new file mode 100644
index 0000000..1c9cd36
--- /dev/null
+++ b/tests/permissions/findRootObjectForPermissionObject.php
@@ -0,0 +1,14 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . '/foldermanagement/Folder.inc');
+require_once(KT_LIB_DIR . '/permissions/permissionutil.inc.php');
+
+error_reporting(E_ALL);
+
+$oFolder =& Folder::get(2);
+$oPO = KTPermissionObject::get($oFolder->getPermissionObjectID());
+$res = KTPermissionUtil::findRootObjectForPermissionObject($oPO);
+var_dump($res);
+
+?>
diff --git a/tests/permissions/inheritPermissionObject.php b/tests/permissions/inheritPermissionObject.php
new file mode 100644
index 0000000..035a571
--- /dev/null
+++ b/tests/permissions/inheritPermissionObject.php
@@ -0,0 +1,37 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . '/foldermanagement/Folder.inc');
+require_once(KT_LIB_DIR . '/permissions/permissionutil.inc.php');
+
+error_reporting(E_ALL);
+
+$oFolder = Folder::get(19);
+var_dump($oFolder->getPermissionObjectID());
+$oFolder = Folder::get(20);
+var_dump($oFolder->getPermissionObjectID());
+$oFolder = Folder::get(21);
+var_dump($oFolder->getPermissionObjectID());
+$oFolder = Folder::get(22);
+var_dump($oFolder->getPermissionObjectID());
+$oDocument = Document::get(123);
+var_dump($oDocument->getPermissionObjectID());
+
+$oFolder = Folder::get(19);
+$res = KTPermissionUtil::inheritPermissionObject($oFolder);
+if (PEAR::isError($res)) {
+    var_dump($res);
+}
+
+$oFolder = Folder::get(19);
+var_dump($oFolder->getPermissionObjectID());
+$oFolder = Folder::get(20);
+var_dump($oFolder->getPermissionObjectID());
+$oFolder = Folder::get(21);
+var_dump($oFolder->getPermissionObjectID());
+$oFolder = Folder::get(22);
+var_dump($oFolder->getPermissionObjectID());
+$oDocument = Document::get(123);
+var_dump($oDocument->getPermissionObjectID());
+
+?>
diff --git a/tests/permissions/permissionassignment.php b/tests/permissions/permissionassignment.php
new file mode 100644
index 0000000..b223ad4
--- /dev/null
+++ b/tests/permissions/permissionassignment.php
@@ -0,0 +1,21 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . "/permissions/permissionobject.inc.php");
+require_once(KT_LIB_DIR . "/permissions/permissionassignment.inc.php");
+require_once(KT_LIB_DIR . "/permissions/permission.inc.php");
+require_once(KT_LIB_DIR . "/permissions/permissionutil.inc.php");
+
+error_reporting(E_ALL);
+
+$oPermissionObject = KTPermissionObject::get(22);
+$oPermission = KTPermission::getByName('ktcore.permissions.read');
+/*$oPermissionAssignment = KTPermissionAssignment::createFromArray(array(
+    'permissionid' => $oPermission->getId(),
+    'permissionobjectid' => $oPermissionObject->getId(),
+));*/
+// $oPermissionAssignment = KTPermissionAssignment::getByPermissionAndObject($oPermission, $oPermissionObject);
+$aAllowed = array("group" => array(1,2,3,4));
+KTPermissionUtil::setPermissionForID($oPermission, $oPermissionObject, $aAllowed);
+
+?>
diff --git a/tests/permissions/permissiondescriptors.php b/tests/permissions/permissiondescriptors.php
new file mode 100644
index 0000000..1072bc1
--- /dev/null
+++ b/tests/permissions/permissiondescriptors.php
@@ -0,0 +1,13 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . "/permissions/permissiondescriptor.inc.php");
+
+error_reporting(E_ALL);
+
+$res = KTPermissionDescriptor::createFromArray(array(
+    "descriptortext" => "asdf",
+));
+var_dump($res);
+
+?>
diff --git a/tests/permissions/permissionobjects.php b/tests/permissions/permissionobjects.php
new file mode 100644
index 0000000..71befcf
--- /dev/null
+++ b/tests/permissions/permissionobjects.php
@@ -0,0 +1,12 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . "/permissions/permissionobject.inc.php");
+
+error_reporting(E_ALL);
+
+$res = KTPermissionObject::createFromArray(array(
+));
+var_dump($res);
+
+?>
diff --git a/tests/permissions/permissions.php b/tests/permissions/permissions.php
new file mode 100644
index 0000000..827c2a5
--- /dev/null
+++ b/tests/permissions/permissions.php
@@ -0,0 +1,12 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . "/permissions/permission.inc.php");
+
+error_reporting(E_ALL);
+
+// var_dump(KTHelpReplacement::get(1));
+$res = KTPermission::createFromArray(array(
+));
+
+?>
diff --git a/tests/permissions/permissionutil.php b/tests/permissions/permissionutil.php
new file mode 100644
index 0000000..015e705
--- /dev/null
+++ b/tests/permissions/permissionutil.php
@@ -0,0 +1,23 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . "/permissions/permissionutil.inc.php");
+
+error_reporting(E_ALL);
+
+$aAllowed = array(
+    "group" => array(1, 2, 3, 4),
+    "user" => array(1, 2, 3, 4),
+    "role" => array(1, 2, 3, 4),
+);
+
+var_dump(KTPermissionUtil::generateDescriptor($aAllowed));
+
+$aAllowed = array(
+    "role" => array(4, 3, 2, 1),
+    "group" => array(1, 3, 2, 4),
+    "user" => array(2, 3, 1, 4),
+);
+var_dump(KTPermissionUtil::generateDescriptor($aAllowed));
+
+?>
diff --git a/tests/permissions/restart.php b/tests/permissions/restart.php
new file mode 100644
index 0000000..7aedced
--- /dev/null
+++ b/tests/permissions/restart.php
@@ -0,0 +1,17 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . '/upgrades/UpgradeFunctions.inc.php');
+
+error_reporting(E_ALL);
+
+DBUtil::runQuery("UPDATE folders SET permission_object_id = NULL");
+DBUtil::runQuery("UPDATE documents SET permission_object_id = NULL");
+DBUtil::runQuery("UPDATE documents SET permission_object_id = NULL");
+DBUtil::runQuery("UPDATE folders SET permission_object_id = NULL");
+DBUtil::runQuery("TRUNCATE permission_assignments");
+DBUtil::runQuery("TRUNCATE permission_descriptors");
+DBUtil::runQuery("TRUNCATE permission_objects");
+DBUtil::runQuery("TRUNCATE permission_descriptor_groups");
+
+?>
diff --git a/tests/permissions/setPermissionObject.php b/tests/permissions/setPermissionObject.php
new file mode 100644
index 0000000..b178f65
--- /dev/null
+++ b/tests/permissions/setPermissionObject.php
@@ -0,0 +1,10 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . '/upgrades/UpgradeFunctions.inc.php');
+
+error_reporting(E_ALL);
+
+UpgradeFunctions::setPermissionObject();
+
+?>
diff --git a/tests/permissions/testPermissionLookup.php b/tests/permissions/testPermissionLookup.php
new file mode 100644
index 0000000..aa161db
--- /dev/null
+++ b/tests/permissions/testPermissionLookup.php
@@ -0,0 +1,17 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . '/foldermanagement/Folder.inc');
+require_once(KT_LIB_DIR . '/users/User.inc');
+require_once(KT_LIB_DIR . '/permissions/permission.inc.php');
+require_once(KT_LIB_DIR . '/permissions/permissionutil.inc.php');
+
+error_reporting(E_ALL);
+
+$oFolder = Folder::get(2);
+$oUser = User::get(4);
+$oPermission = KTPermission::getByName('ktcore.permissions.read');
+$res = KTPermissionUtil::userHasPermissionOnItem($oUser, $oPermission, $oFolder);
+var_dump($res);
+
+?>
diff --git a/tests/permissions/updatePermissionLookup.php b/tests/permissions/updatePermissionLookup.php
new file mode 100644
index 0000000..2b15487
--- /dev/null
+++ b/tests/permissions/updatePermissionLookup.php
@@ -0,0 +1,22 @@
+<?php
+
+require_once("../../config/dmsDefaults.php");
+require_once(KT_LIB_DIR . '/foldermanagement/Folder.inc');
+require_once(KT_LIB_DIR . '/permissions/permissionutil.inc.php');
+
+error_reporting(E_ALL);
+
+/*
+$aFolders =& Folder::getList();
+foreach ($aFolders as $oFolder) {
+    KTPermissionUtil::updatePermissionLookup($oFolder);
+}
+$aDocuments =& Document::getList('permission_object_id IS NOT NULL');
+foreach ($aDocuments as $oDocument) {
+    KTPermissionUtil::updatePermissionLookup($oDocument);
+}
+*/
+$oFolder = Folder::get(18);
+KTPermissionUtil::updatePermissionLookup($oFolder);
+
+?>
--
libgit2 0.21.4