[Phpgroupware-cvs] [18473] more old nextgen stuff - dropping

[Dave Hall]

Revision: 18473
          
http://svn.sv.gnu.org/viewvc/?view=rev&root=phpgroupware&revision=18473
Author:   skwashd
Date:     2008-02-06 02:51:29 +0000 (Wed, 06 Feb 2008)

Log Message:
-----------
more old nextgen stuff - dropping

Removed Paths:
-------------
    trunk/admin/acl2_tester.php

Deleted: trunk/admin/acl2_tester.php
===================================================================
--- trunk/admin/acl2_tester.php 2008-02-06 02:50:38 UTC (rev 18472)
+++ trunk/admin/acl2_tester.php 2008-02-06 02:51:29 UTC (rev 18473)
@@ -1,113 +0,0 @@
-<?php
-       $GLOBALS['phpgw_info']['flags']['currentapp'] = 'admin';
-       include('../header.inc.php');
-       include(PHPGW_API_INC . '/class.acl2.inc.php');
-       //$sec = New acl(array('account_id'=>1));
-       $sec = New acl2(1,'##DEFAULT##');
-//echo 'phpgw:<pre>'; print_r($GLOBALS['phpgw']); echo '</pre>';
-       $sec->get_memberships();
-//echo 'memberships_sql: '.$sec->memberships_sql.'<br>';
-//echo 'memberships:<pre>'; print_r($sec->memberships); echo '</pre>';
-       function ttt($location, $rights)
-       {
-               GLOBAL $sec;
-               if ($sec->check($location, $rights))
-               {
-                       echo $rights.' is valid<br>';
-               }
-               else
-               {
-                       echo $rights.' is invalid<br>';
-               }
-       }
-
-       echo 'This test is going to delete all your phpgw_acl2 records to 
ensure that the tests run as expected.<br>';
-       $GLOBALS['phpgw']->db->query('DELETE FROM 
phpgw_acl2',__LINE__,__FILE__);
-       echo 'Action: DELETE FROM phpgw_acl2<br><br>';
-       echo 'Running checks on .one.two.three after changing directly granted 
rights as well as ones it will inherit from<br>';
-       
-       echo '<br>1: check rights for .one.two which will get inherited by 
.one.two.three<br>';
-       ttt('.one.two', 1);
-       ttt('.one.two', 2);
-       ttt('.one.two', 4);
-       ttt('.one.two', 8);
-       echo 'You can see that no rights are set, so none will be 
inherited<br>';
-
-       echo '<br>2: checking .one.two.three<br>';
-       ttt('.one.two.three', 1);
-       ttt('.one.two.three', 2);
-       ttt('.one.two.three', 4);
-       ttt('.one.two.three', 8);
-       echo 'You can see that no rights are set directly as well<br>';
-
-       echo '<br>3: add rights 4 to .one.two.three<br>';
-       echo 'Action: $acl2->add(\'.one.two.three\',4,0);<br>';
-       $sec->add('.one.two.three',4,0);
-       ttt('.one.two.three', 1);
-       ttt('.one.two.three', 2);
-       ttt('.one.two.three', 4);
-       ttt('.one.two.three', 8);
-       
-       echo '<br>4: add rights 8 to .one.two.three<br>';
-       echo 'Action: $acl2->add(\'.one.two.three\',8,0);<br>';
-       $sec->add('.one.two.three',8,0);
-       ttt('.one.two.three', 1);
-       ttt('.one.two.three', 2);
-       ttt('.one.two.three', 4);
-       ttt('.one.two.three', 8);
-
-       echo '<br>5: remove rights 4 from .one.two.three<br>';
-       echo 'Action: $acl2->remove(\'.one.two.three\',4,0);<br>';
-       $sec->remove('.one.two.three',4,0);
-       ttt('.one.two.three', 1);
-       ttt('.one.two.three', 2);
-       ttt('.one.two.three', 4);
-       ttt('.one.two.three', 8);
-
-       echo '<br>5: set rights to 2 on .one.two.three<br>';
-       echo 'Action: $acl2->set(\'.one.two.three\', 2,0);<br>';
-       $sec->set('.one.two.three', 2,0);
-       ttt('.one.two.three', 1);
-       ttt('.one.two.three', 2);
-       ttt('.one.two.three', 4);
-       ttt('.one.two.three', 8);
-
-       echo '<br>Now to see inheritance in action...<br>';
-       echo '6: add rights 8 to .one.two<br>';
-       echo 'Action: $acl2->add(\'.one.two\',8,0);<br>';
-       $sec->add('.one.two',8,0);
-       ttt('.one.two.three', 1);
-       ttt('.one.two.three', 2);
-       ttt('.one.two.three', 4);
-       ttt('.one.two.three', 8);
-       echo 'You can see here that it has inherited rights 8 from 
.one.two<br>';
-
-       echo '<br>7: add rights 4 to .one.two<br>';
-       echo 'Action: $acl2->add(\'.one.two\',4,0);<br>';
-       $sec->add('.one.two',4,0);
-       ttt('.one.two.three', 1);
-       ttt('.one.two.three', 2);
-       ttt('.one.two.three', 4);
-       ttt('.one.two.three', 8);
-       echo 'You can see here that it has also inherited rights 4 from 
.one.two<br>';
-
-       echo '<br>Now to see inherited rights masks in action...<br>';
-       echo '8: add rights mask for 8 to .one.two<br>';
-       echo 'Action: $acl2->add(\'.one.two\',8,1);<br>';
-       $sec->add('.one.two',8,1);
-       ttt('.one.two.three', 1);
-       ttt('.one.two.three', 2);
-       ttt('.one.two.three', 4);
-       ttt('.one.two.three', 8);
-       echo 'You can see here that it no longer inherited rights 8 from 
.one.two<br>';
-       
-       echo '<br>It will help to see the rights for .one.two at this point to 
clearly see the rights mask doing its work<br>';
-       echo '9: display rights for .one.two<br>';
-       ttt('.one.two', 1);
-       ttt('.one.two', 2);
-       ttt('.one.two', 4);
-       ttt('.one.two', 8);
-       echo 'You can see here that it has rights for 4 and 8, and yet above 
you saw that .one.two.three did not inherited rights 4 from it<br>';
-
-       //echo 'rights_cache:<pre>'; print_r($sec->rights_cache); echo '</pre>';
-?>