lib/PagePerm.php

   1 <?php // -*-php-*-
   2 rcs_id('$Id$');
   3 /*
   4  Copyright 2004,2007 $ThePhpWikiProgrammingTeam
   5  Copyright 2009 Marc-Etienne Vargenau, Alcatel-Lucent
   6
   7  This file is part of PhpWiki.
   8
   9  PhpWiki is free software; you can redistribute it and/or modify
  10  it under the terms of the GNU General Public License as published by
  11  the Free Software Foundation; either version 2 of the License, or
  12  (at your option) any later version.
  13
  14  PhpWiki is distributed in the hope that it will be useful,
  15  but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  GNU General Public License for more details.
  18
  19  You should have received a copy of the GNU General Public License
  20  along with PhpWiki; if not, write to the Free Software
  21  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  22  */
  23
  24 /**
  25    Permissions per page and action based on current user,
  26    ownership and group membership implemented with ACL's (Access Control Lists),
  27    opposed to the simplier unix-like ugo:rwx system.
  28    The previous system was only based on action and current user. (lib/main.php)
  29
  30    Permissions may be inherited from its parent pages, a optional the
  31    optional master page ("."), and predefined default permissions, if "."
  32    is not defined.
  33    Pagenames starting with "." have special default permissions.
  34    For Authentication see WikiUserNew.php, WikiGroup.php and main.php
  35    Page Permissions are in PhpWiki since v1.3.9 and enabled since v1.4.0
  36
  37    This file might replace the following functions from main.php:
  38      Request::_notAuthorized($require_level)
  39        display the denied message and optionally a login form
  40        to gain higher privileges
  41      Request::getActionDescription($action)
  42        helper to localize the _notAuthorized message per action,
  43        when login is tried.
  44      Request::getDisallowedActionDescription($action)
  45        helper to localize the _notAuthorized message per action,
  46        when it aborts
  47      Request::requiredAuthority($action)
  48        returns the needed user level
  49        has a hook for plugins on POST
  50      Request::requiredAuthorityForAction($action)
  51        just returns the level per action, will be replaced with the
  52        action + page pair
  53
  54      The defined main.php actions map to simplier access types:
  55        browse => view
  56        edit   => edit
  57        create => edit or create
  58        remove => remove
  59        rename => change
  60        store prefs => change
  61        list in PageList => list
  62 */
  63
  64 /* Symbolic special ACL groups. Untranslated to be stored in page metadata*/
  65 define('ACL_EVERY',        '_EVERY');
  66 define('ACL_ANONYMOUS',    '_ANONYMOUS');
  67 define('ACL_BOGOUSER',     '_BOGOUSER');
  68 define('ACL_HASHOMEPAGE',  '_HASHOMEPAGE');
  69 define('ACL_SIGNED',       '_SIGNED');
  70 define('ACL_AUTHENTICATED','_AUTHENTICATED');
  71 define('ACL_ADMIN',        '_ADMIN');
  72 define('ACL_OWNER',        '_OWNER');
  73 define('ACL_CREATOR',      '_CREATOR');
  74
  75 // Return an page permissions array for this page.
  76 // To provide ui helpers to view and change page permissions:
  77 //   <tr><th>Group</th><th>Access</th><th>Allow or Forbid</th></tr>
  78 //   <tr><td>$group</td><td>_($access)</td><td> [ ] </td></tr>
  79 function pagePermissions($pagename) {
  80     global $request;
  81     $page = $request->getPage($pagename);
  82     // Page not found (new page); returned inherited permissions, to be displayed in gray
  83     if (! $page->exists() ) {
  84         if ($pagename == '.') // stop recursion
  85             return array('default', new PagePermission());
  86         else {
  87             return array('inherited', pagePermissions(getParentPage($pagename)));
  88         }
  89     } elseif ($perm = getPagePermissions($page)) {
  90         return array('page', $perm);
  91     // or no permissions defined; returned inherited permissions, to be displayed in gray
  92     } elseif ($pagename == '.') { // stop recursion in pathological case.
  93         // "." defined, without any acl
  94         return array('default', new PagePermission());
  95     } else {
  96         return array('inherited', pagePermissions(getParentPage($pagename)));
  97     }
  98 }
  99
 100 function pagePermissionsSimpleFormat($perm_tree, $owner, $group=false) {
 101     list($type,$perm) = pagePermissionsAcl($perm_tree[0], $perm_tree);
 102     /*
 103     $type = $perm_tree[0];
 104     $perm = pagePermissionsAcl($perm_tree);
 105     if (is_object($perm_tree[1]))
 106         $perm = $perm_tree[1];
 107     elseif (is_array($perm_tree[1])) {
 108         $perm_tree = pagePermissionsSimpleFormat($perm_tree[1],$owner,$group);
 109         if (isa($perm_tree[1],'pagepermission'))
 110             $perm = $perm_tree[1];
 111         elseif (isa($perm_tree,'htmlelement'))
 112             return $perm_tree;
 113     }
 114     */
 115     if ($type == 'page')
 116         return HTML::tt(HTML::strong($perm->asRwxString($owner, $group)));
 117     elseif ($type == 'default')
 118         return HTML::tt($perm->asRwxString($owner, $group));
 119     elseif ($type == 'inherited') {
 120         return HTML::tt(array('class'=>'inherited', 'style'=>'color:#aaa;'),
 121                         $perm->asRwxString($owner, $group));
 122     }
 123 }
 124
 125 function pagePermissionsAcl($type,$perm_tree) {
 126     $perm = $perm_tree[1];
 127     while (!is_object($perm)) {
 128         $perm_tree = pagePermissionsAcl($type, $perm);
 129         $perm = $perm_tree[1];
 130     }
 131     return array($type,$perm);
 132 }
 133
 134 // view => who
 135 // edit => who
 136 function pagePermissionsAclFormat($perm_tree, $editable=false) {
 137     list($type,$perm) = pagePermissionsAcl($perm_tree[0], $perm_tree);
 138     if ($editable)
 139         return $perm->asEditableTable($type);
 140     else
 141         return $perm->asTable($type);
 142 }
 143
 144 /**
 145  * Check the permissions for the current action.
 146  * Walk down the inheritance tree. Collect all permissions until
 147  * the minimum required level is gained, which is not
 148  * overruled by more specific forbid rules.
 149  * Todo: cache result per access and page in session?
 150  */
 151 function requiredAuthorityForPage ($action) {
 152     global $request;
 153     $auth = _requiredAuthorityForPagename(action2access($action),
 154                                           $request->getArg('pagename'));
 155     assert($auth !== -1);
 156     if ($auth)
 157         return $request->_user->_level;
 158     else
 159         return WIKIAUTH_UNOBTAINABLE;
 160 }
 161
 162 // Translate action or plugin to the simplier access types:
 163 function action2access ($action) {
 164     global $request;
 165     switch ($action) {
 166     case 'browse':
 167     case 'viewsource':
 168     case 'diff':
 169     case 'select':
 170     case 'search':
 171     case 'pdf':
 172     case 'captcha':
 173     case 'zip':
 174         return 'view';
 175
 176     case 'dumpserial':
 177         if (INSECURE_ACTIONS_LOCALHOST_ONLY and is_localhost())
 178             return 'dump';
 179         else
 180             return 'view';
 181
 182     // performance and security relevant
 183     case 'xmlrpc':
 184     case 'soap':
 185     case 'ziphtml':
 186     case 'dumphtml':
 187         return 'dump';
 188
 189     // invent a new access-perm massedit? or switch back to change, or keep it at edit?
 190     case _("PhpWikiAdministration")."/"._("Rename"):
 191     case _("PhpWikiAdministration")."/"._("Replace"):
 192     case 'replace':
 193     case 'rename':
 194     case 'revert':
 195     case 'edit':
 196         return 'edit';
 197     case 'create':
 198         $page = $request->getPage();
 199         if (!$page->exists())
 200             return 'create';
 201         else
 202             return 'view';
 203         break;
 204     case 'upload':
 205     case 'loadfile':
 206         // probably create/edit but we cannot check all page permissions, can we?
 207     case 'remove':
 208     case 'purge':
 209     case 'lock':
 210     case 'unlock':
 211     case 'upgrade':
 212     case 'chown':
 213     case 'setacl':
 214         return 'change';
 215     default:
 216         //Todo: Plugins should be able to override its access type
 217         if (isWikiWord($action))
 218             return 'view';
 219         else
 220             return 'change';
 221         break;
 222     }
 223 }
 224
 225 // Recursive helper to do the real work.
 226 // Using a simple perm cache for page-access pairs.
 227 // Maybe page-(current+edit+change?)action pairs will help
 228 function _requiredAuthorityForPagename($access, $pagename) {
 229     static $permcache = array();
 230
 231     if (array_key_exists($pagename, $permcache)
 232         and array_key_exists($access, $permcache[$pagename]))
 233         return $permcache[$pagename][$access];
 234
 235     global $request;
 236     $page = $request->getPage($pagename);
 237     // Page not found; check against default permissions
 238     if (! $page->exists() ) {
 239         $perm = new PagePermission();
 240         $result = ($perm->isAuthorized($access, $request->_user) === true);
 241         $permcache[$pagename][$access] = $result;
 242         return $result;
 243     }
 244     // no ACL defined; check for special dotfile or walk down
 245     if (! ($perm = getPagePermissions($page))) {
 246         if ($pagename == '.') {
 247             $perm = new PagePermission();
 248             if ($perm->isAuthorized('change', $request->_user)) {
 249                 // warn the user to set ACL of ".", if he has permissions to do so.
 250                 trigger_error(". (dotpage == rootpage for inheriting pageperm ACLs) exists without any ACL!\n".
 251                               "Please do ?action=setacl&pagename=.", E_USER_WARNING);
 252             }
 253             $result = ($perm->isAuthorized($access, $request->_user) === true);
 254             $permcache[$pagename][$access] = $result;
 255             return $result;
 256         } elseif ($pagename[0] == '.') {
 257             $perm = new PagePermission(PagePermission::dotPerms());
 258             $result = ($perm->isAuthorized($access, $request->_user) === true);
 259             $permcache[$pagename][$access] = $result;
 260             return $result;
 261         }
 262         return _requiredAuthorityForPagename($access, getParentPage($pagename));
 263     }
 264     // ACL defined; check if isAuthorized returns true or false or undecided
 265     $authorized = $perm->isAuthorized($access, $request->_user);
 266     if ($authorized !== -1) { // interestingly true is also -1
 267         $permcache[$pagename][$access] = $authorized;
 268         return $authorized;
 269     } elseif ($pagename == '.') {
 270         return false;
 271     } else {
 272         return _requiredAuthorityForPagename($access, getParentPage($pagename));
 273     }
 274 }
 275
 276 /**
 277  * @param  string $pagename   page from which the parent page is searched.
 278  * @return string parent      pagename or the (possibly pseudo) dot-pagename.
 279  */
 280 function getParentPage($pagename) {
 281     if (isSubPage($pagename)) {
 282         return subPageSlice($pagename, 0);
 283     } else {
 284         return '.';
 285     }
 286 }
 287
 288 // Read the ACL from the page
 289 // Done: Not existing pages should NOT be queried.
 290 // Check the parent page instead and don't take the default ACL's
 291 function getPagePermissions ($page) {
 292     if ($hash = $page->get('perm'))  // hash => object
 293         return new PagePermission(unserialize($hash));
 294     else
 295         return false;
 296 }
 297
 298 // Store the ACL in the page
 299 function setPagePermissions ($page,$perm) {
 300     $perm->store($page);
 301 }
 302
 303 function getAccessDescription($access) {
 304     static $accessDescriptions;
 305     if (! $accessDescriptions) {
 306         $accessDescriptions = array(
 307                                     'list'     => _("List this page and all subpages"),
 308                                     'view'     => _("View this page and all subpages"),
 309                                     'edit'     => _("Edit this page and all subpages"),
 310                                     'create'   => _("Create a new (sub)page"),
 311                                     'dump'     => _("Download page contents"),
 312                                     'change'   => _("Change page attributes"),
 313                                     'remove'   => _("Remove this page"),
 314                                     'purge'    => _("Purge this page"),
 315                                     );
 316     }
 317     if (in_array($access, array_keys($accessDescriptions)))
 318         return $accessDescriptions[$access];
 319     else
 320         return $access;
 321 }
 322
 323 // from php.net docs
 324 function array_diff_assoc_recursive($array1, $array2) {
 325     foreach ($array1 as $key => $value) {
 326          if (is_array($value)) {
 327              if (!is_array($array2[$key])) {
 328                  $difference[$key] = $value;
 329              } else {
 330                  $new_diff = array_diff_assoc_recursive($value, $array2[$key]);
 331                  if ($new_diff != false) {
 332                      $difference[$key] = $new_diff;
 333                  }
 334              }
 335          } elseif(!isset($array2[$key]) || $array2[$key] != $value) {
 336              $difference[$key] = $value;
 337          }
 338     }
 339     return !isset($difference) ? 0 : $difference;
 340 }
 341
 342 /**
 343  * The ACL object per page. It is stored in a page, but can also
 344  * be merged with ACL's from other pages or taken from the master (pseudo) dot-file.
 345  *
 346  * A hash of "access" => "requires" pairs.
 347  *   "access"   is a shortcut for common actions, which map to main.php actions
 348  *   "requires" required username or groupname or any special group => true or false
 349  *
 350  * Define any special rules here, like don't list dot-pages.
 351  */
 352 class PagePermission {
 353     var $perm;
 354
 355     function PagePermission($hash = array()) {
 356         $this->_group = &$GLOBALS['request']->getGroup();
 357         if (is_array($hash) and !empty($hash)) {
 358             $accessTypes = $this->accessTypes();
 359             foreach ($hash as $access => $requires) {
 360                 if (in_array($access, $accessTypes))
 361                     $this->perm[$access] = $requires;
 362                 else
 363                     trigger_error(sprintf(_("Unsupported ACL access type %s ignored."), $access),
 364                                   E_USER_WARNING);
 365             }
 366         } else {
 367             // set default permissions, the so called dot-file acl's
 368             $this->perm = $this->defaultPerms();
 369         }
 370         return $this;
 371     }
 372
 373     /**
 374      * The workhorse to check the user against the current ACL pairs.
 375      * Must translate the various special groups to the actual users settings
 376      * (userid, group membership).
 377      */
 378     function isAuthorized($access, $user) {
 379         if (!empty($this->perm{$access})) {
 380             $allow = -1;
 381             foreach ($this->perm[$access] as $group => $bool) {
 382                 if ($this->isMember($user, $group)) {
 383                     return $bool;
 384                 } elseif ($allow == -1) { // not a member and undecided: check other groups
 385                     $allow = !$bool;
 386                 }
 387             }
 388         }
 389         return $allow; // undecided
 390     }
 391
 392     /**
 393      * Translate the various special groups to the actual users settings
 394      * (userid, group membership).
 395      */
 396     function isMember($user, $group) {
 397         global $request;
 398         if ($group === ACL_EVERY) return true;
 399         if (!isset($this->_group)) $member =& $request->getGroup();
 400         else $member =& $this->_group;
 401         //$user = & $request->_user;
 402         if ($group === ACL_ADMIN)   // WIKI_ADMIN or member of _("Administrators")
 403             return $user->isAdmin() or
 404                    ($user->isAuthenticated() and
 405                    $member->isMember(GROUP_ADMIN));
 406         if ($group === ACL_ANONYMOUS)
 407             return ! $user->isSignedIn();
 408         if ($group === ACL_BOGOUSER)
 409             if (ENABLE_USER_NEW)
 410                 return isa($user,'_BogoUser') or
 411                       (isWikiWord($user->_userid) and $user->_level >= WIKIAUTH_BOGO);
 412             else return isWikiWord($user->UserName());
 413         if ($group === ACL_HASHOMEPAGE)
 414             return $user->hasHomePage();
 415         if ($group === ACL_SIGNED)
 416             return $user->isSignedIn();
 417         if ($group === ACL_AUTHENTICATED)
 418             return $user->isAuthenticated();
 419         if ($group === ACL_OWNER) {
 420             if (!$user->isAuthenticated()) return false;
 421             $page = $request->getPage();
 422             $owner = $page->getOwner();
 423             return ($owner === $user->UserName()
 424                     or $member->isMember($owner));
 425         }
 426         if ($group === ACL_CREATOR) {
 427             if (!$user->isAuthenticated()) return false;
 428             $page = $request->getPage();
 429             $creator = $page->getCreator();
 430             return ($creator === $user->UserName()
 431                     or $member->isMember($creator));
 432         }
 433         /* Or named groups or usernames.
 434            Note: We don't seperate groups and users here.
 435            Users overrides groups with the same name.
 436         */
 437         return $user->UserName() === $group or
 438                $member->isMember($group);
 439     }
 440
 441     /**
 442      * returns hash of default permissions.
 443      * check if the page '.' exists and returns this instead.
 444      */
 445     function defaultPerms() {
 446         //Todo: check for the existance of '.' and take this instead.
 447         //Todo: honor more config.ini auth settings here
 448         $perm = array('view'   => array(ACL_EVERY => true),
 449                       'edit'   => array(ACL_EVERY => true),
 450                       'create' => array(ACL_EVERY => true),
 451                       'list'   => array(ACL_EVERY => true),
 452                       'remove' => array(ACL_ADMIN => true,
 453                                         ACL_OWNER => true),
 454                       'purge'  => array(ACL_ADMIN => true,
 455                                         ACL_OWNER => true),
 456                       'dump'   => array(ACL_ADMIN => true,
 457                                         ACL_OWNER => true),
 458                       'change' => array(ACL_ADMIN => true,
 459                                         ACL_OWNER => true));
 460         if (ZIPDUMP_AUTH)
 461             $perm['dump'] = array(ACL_ADMIN => true,
 462                                   ACL_OWNER => true);
 463         elseif (INSECURE_ACTIONS_LOCALHOST_ONLY) {
 464             if (is_localhost())
 465                 $perm['dump'] = array(ACL_EVERY => true);
 466             else
 467                 $perm['dump'] = array(ACL_ADMIN => true);
 468         }
 469         else
 470             $perm['dump'] = array(ACL_EVERY => true);
 471         if (defined('REQUIRE_SIGNIN_BEFORE_EDIT') && REQUIRE_SIGNIN_BEFORE_EDIT)
 472             $perm['edit'] = array(ACL_SIGNED => true);
 473         // view:
 474         if (!ALLOW_ANON_USER) {
 475             if (!ALLOW_USER_PASSWORDS)
 476                 $perm['view'] = array(ACL_SIGNED => true);
 477             else
 478                 $perm['view'] = array(ACL_AUTHENTICATED => true);
 479             $perm['view'][ACL_BOGOUSER] = ALLOW_BOGO_LOGIN ? true : false;
 480         }
 481         // edit:
 482         if (!ALLOW_ANON_EDIT) {
 483             if (!ALLOW_USER_PASSWORDS)
 484                 $perm['edit'] = array(ACL_SIGNED => true);
 485             else
 486                 $perm['edit'] = array(ACL_AUTHENTICATED => true);
 487             $perm['edit'][ACL_BOGOUSER] = ALLOW_BOGO_LOGIN ? true : false;
 488             $perm['create'] = $perm['edit'];
 489         }
 490         return $perm;
 491     }
 492
 493     /**
 494      * FIXME: check valid groups and access
 495      */
 496     function sanify() {
 497         foreach ($this->perm as $access => $groups) {
 498             foreach ($groups as $group => $bool) {
 499                 $this->perm[$access][$group] = (boolean) $bool;
 500             }
 501         }
 502     }
 503
 504     /**
 505      * do a recursive comparison
 506      */
 507     function equal($otherperm) {
 508         $diff = array_diff_assoc_recursive($this->perm, $otherperm);
 509         return empty($diff);
 510     }
 511
 512     /**
 513      * returns list of all supported access types.
 514      */
 515     function accessTypes() {
 516         return array_keys(PagePermission::defaultPerms());
 517     }
 518
 519     /**
 520      * special permissions for dot-files, beginning with '.'
 521      * maybe also for '_' files?
 522      */
 523     function dotPerms() {
 524         $def = array(ACL_ADMIN => true,
 525                      ACL_OWNER => true);
 526         $perm = array();
 527         foreach (PagePermission::accessTypes() as $access) {
 528             $perm[$access] = $def;
 529         }
 530         return $perm;
 531     }
 532
 533     /**
 534      *  dead code. not needed inside the object. see getPagePermissions($page)
 535      */
 536     function retrieve($page) {
 537         $hash = $page->get('perm');
 538         if ($hash)  // hash => object
 539             $perm = new PagePermission(unserialize($hash));
 540         else
 541             $perm = new PagePermission();
 542         $perm->sanify();
 543         return $perm;
 544     }
 545
 546     function store($page) {
 547         // object => hash
 548         $this->sanify();
 549         return $page->set('perm',serialize($this->perm));
 550     }
 551
 552     function groupName ($group) {
 553         if ($group[0] == '_') return constant("GROUP".$group);
 554         else return $group;
 555     }
 556
 557     /* type: page, default, inherited */
 558     function asTable($type) {
 559         $table = HTML::table();
 560         foreach ($this->perm as $access => $perms) {
 561             $td = HTML::table(array('class' => 'cal'));
 562             foreach ($perms as $group => $bool) {
 563                 $td->pushContent(HTML::tr(HTML::td(array('align'=>'right'),$group),
 564                                                    HTML::td($bool ? '[X]' : '[ ]')));
 565             }
 566             $table->pushContent(HTML::tr(array('valign' => 'top'),
 567                                          HTML::td($access),HTML::td($td)));
 568         }
 569         if ($type == 'default')
 570             $table->setAttr('style','border: dotted thin black; background-color:#eee;');
 571         elseif ($type == 'inherited')
 572             $table->setAttr('style','border: dotted thin black; background-color:#ddd;');
 573         elseif ($type == 'page')
 574             $table->setAttr('style','border: solid thin black; font-weight: bold;');
 575         return $table;
 576     }
 577
 578     /* type: page, default, inherited */
 579     function asEditableTable($type) {
 580         global $WikiTheme;
 581         if (!isset($this->_group)) {
 582             $this->_group =& $GLOBALS['request']->getGroup();
 583         }
 584         $table = HTML::table();
 585         $table->pushContent(HTML::tr(
 586                                      HTML::th(array('align' => 'left'),
 587                                               _("Access")),
 588                                      HTML::th(array('align'=>'right'),
 589                                               _("Group/User")),
 590                                      HTML::th(_("Grant")),
 591                                      HTML::th(_("Del/+")),
 592                                      HTML::th(_("Description"))));
 593
 594         $allGroups = $this->_group->_specialGroups();
 595         foreach ($this->_group->getAllGroupsIn() as $group) {
 596             if (!in_array($group,$this->_group->specialGroups()))
 597                 $allGroups[] = $group;
 598         }
 599         //array_unique(array_merge($this->_group->getAllGroupsIn(),
 600         $deletesrc = $WikiTheme->_findData('images/delete.png');
 601         $addsrc = $WikiTheme->_findData('images/add.png');
 602         $nbsp = HTML::raw('&nbsp;');
 603         foreach ($this->perm as $access => $groups) {
 604             //$permlist = HTML::table(array('class' => 'cal'));
 605             $first_only = true;
 606             $newperm = HTML::input(array('type' => 'checkbox',
 607                                          'name' => "acl[_new_perm][$access]",
 608                                          'value' => 1));
 609             $addbutton = HTML::input(array('type' => 'checkbox',
 610                                            'name' => "acl[_add_group][$access]",
 611                                            //'src'  => $addsrc,
 612                                            //'alt'   => "Add",
 613                                            'title' => _("Add this ACL"),
 614                                            'value' => 1));
 615             $newgroup = HTML::select(array('name' => "acl[_new_group][$access]",
 616                                            'style'=> 'text-align: right;',
 617                                            'size' => 1));
 618             foreach ($allGroups as $groupname) {
 619                 if (!isset($groups[$groupname]))
 620                     $newgroup->pushContent(HTML::option(array('value' => $groupname),
 621                                                         $this->groupName($groupname)));
 622             }
 623             if (empty($groups)) {
 624                 $addbutton->setAttr('checked','checked');
 625                 $newperm->setAttr('checked','checked');
 626                 $table->pushContent(
 627                     HTML::tr(array('valign' => 'top'),
 628                              HTML::td(HTML::strong($access.":")),
 629                              HTML::td($newgroup),
 630                              HTML::td($nbsp,$newperm),
 631                              HTML::td($nbsp,$addbutton),
 632                              HTML::td(HTML::em(getAccessDescription($access)))));
 633             }
 634             foreach ($groups as $group => $bool) {
 635                 $checkbox = HTML::input(array('type' => 'checkbox',
 636                                               'name' => "acl[$access][$group]",
 637                                               'title' => _("Allow / Deny"),
 638                                               'value' => 1));
 639                 if ($bool) $checkbox->setAttr('checked','checked');
 640                 $checkbox = HTML(HTML::input(array('type' => 'hidden',
 641                                                    'name' => "acl[$access][$group]",
 642                                                    'value' => 0)),
 643                                  $checkbox);
 644                 $deletebutton = HTML::input(array('type' => 'checkbox',
 645                                                   'name' => "acl[_del_group][$access][$group]",
 646                                                   'style' => 'background: #aaa url('.$deletesrc.')',
 647                                                   //'src'  => $deletesrc,
 648                                                   //'alt'   => "Del",
 649                                                   'title' => _("Delete this ACL"),
 650                                                   'value' => 1));
 651                 if ($first_only) {
 652                     $table->pushContent(
 653                         HTML::tr(
 654                                  HTML::td(HTML::strong($access.":")),
 655                                  HTML::td(array('class' => 'cal-today','align'=>'right'),
 656                                           HTML::strong($this->groupName($group))),
 657                                  HTML::td(array('align'=>'center'),$nbsp,$checkbox),
 658                                  HTML::td(array('align'=>'right','style' => 'background: #aaa url('.$deletesrc.') no-repeat'),$deletebutton),
 659                                  HTML::td(HTML::em(getAccessDescription($access)))));
 660                     $first_only = false;
 661                 } else {
 662                     $table->pushContent(
 663                         HTML::tr(
 664                                  HTML::td(),
 665                                  HTML::td(array('class' => 'cal-today','align'=>'right'),
 666                                           HTML::strong($this->groupName($group))),
 667                                  HTML::td(array('align'=>'center'),$nbsp,$checkbox),
 668                                  HTML::td(array('align'=>'right','style' => 'background: #aaa url('.$deletesrc.') no-repeat'),$deletebutton),
 669                                  HTML::td()));
 670                 }
 671             }
 672             if (!empty($groups))
 673                 $table->pushContent(
 674                     HTML::tr(array('valign' => 'top'),
 675                              HTML::td(array('align'=>'right'),_("add ")),
 676                              HTML::td($newgroup),
 677                              HTML::td(array('align'=>'center'),$nbsp,$newperm),
 678                              HTML::td(array('align'=>'right','style' => 'background: #ccc url('.$addsrc.') no-repeat'),$addbutton),
 679                              HTML::td(HTML::small(_("Check to add this ACL")))));
 680         }
 681         if ($type == 'default')
 682             $table->setAttr('style','border: dotted thin black; background-color:#eee;');
 683         elseif ($type == 'inherited')
 684             $table->setAttr('style','border: dotted thin black; background-color:#ddd;');
 685         elseif ($type == 'page')
 686             $table->setAttr('style','border: solid thin black; font-weight: bold;');
 687         return $table;
 688     }
 689
 690     // Print ACL as lines of [+-]user[,group,...]:access[,access...]
 691     // Seperate acl's by "; " or whitespace
 692     // See http://opag.ca/wiki/HelpOnAccessControlLists
 693     // As used by WikiAdminSetAclSimple
 694     function asAclLines() {
 695         $s = ''; $line = '';
 696         $this->sanify();
 697         foreach ($this->perm as $access => $groups) {
 698             // unify groups for same access+bool
 699             //    view:CREATOR,-OWNER,
 700             $line = $access.':';
 701             foreach ($groups as $group => $bool) {
 702                 $line .= ($bool?'':'-').$group.",";
 703             }
 704             if (substr($line,-1) == ',')
 705                 $s .= substr($line,0,-1)."; ";
 706         }
 707         if (substr($s,-2) == '; ')
 708             $s = substr($s,0,-2);
 709         return $s;
 710     }
 711
 712     // Print ACL as group followed by actions allowed for the group
 713     function asAclGroupLines() {
 714
 715         $s = '';
 716         $perm =& $this->perm;
 717         $actions = array("view", "edit", "create", "list", "remove", "purge", "dump", "change");
 718         $groups = array(ACL_EVERY, ACL_ANONYMOUS, ACL_BOGOUSER, ACL_HASHOMEPAGE, ACL_SIGNED, ACL_AUTHENTICATED, ACL_ADMIN, ACL_OWNER, ACL_CREATOR);
 719
 720         foreach ($groups as $group) {
 721             $none = true;
 722             foreach ($actions as $action) {
 723                 if (isset($perm[$action][$group])) {
 724                     if ($none) {
 725                         $none = false;
 726                         $s .= "$group:";
 727                     }
 728                     $s .= " $action";
 729                 }
 730             }
 731             if (!($none)) {
 732                 $s .= "; ";
 733             }
 734         }
 735         return $s;
 736     }
 737
 738     // This is just a bad hack for testing.
 739     // Simplify the ACL to a unix-like "rwx------+" string
 740     // See getfacl(8)
 741     function asRwxString($owner,$group=false) {
 742         global $request;
 743         // simplify object => rwxrw---x+ string as in cygwin (+ denotes additional ACLs)
 744         $perm =& $this->perm;
 745         // get effective user and group
 746         $s = '---------+';
 747         if (isset($perm['view'][$owner]) or
 748             (isset($perm['view'][ACL_AUTHENTICATED]) and $request->_user->isAuthenticated()))
 749             $s[0] = 'r';
 750         if (isset($perm['edit'][$owner]) or
 751             (isset($perm['edit'][ACL_AUTHENTICATED]) and $request->_user->isAuthenticated()))
 752             $s[1] = 'w';
 753         if (isset($perm['change'][$owner]) or
 754             (isset($perm['change'][ACL_AUTHENTICATED]) and $request->_user->isAuthenticated()))
 755             $s[2] = 'x';
 756         if (!empty($group)) {
 757             if (isset($perm['view'][$group]) or
 758                 (isset($perm['view'][ACL_AUTHENTICATED]) and $request->_user->isAuthenticated()))
 759                 $s[3] = 'r';
 760             if (isset($perm['edit'][$group]) or
 761                 (isset($perm['edit'][ACL_AUTHENTICATED]) and $request->_user->isAuthenticated()))
 762                 $s[4] = 'w';
 763             if (isset($perm['change'][$group]) or
 764                 (isset($perm['change'][ACL_AUTHENTICATED]) and $request->_user->isAuthenticated()))
 765                 $s[5] = 'x';
 766         }
 767         if (isset($perm['view'][ACL_EVERY]) or
 768             (isset($perm['view'][ACL_AUTHENTICATED]) and $request->_user->isAuthenticated()))
 769             $s[6] = 'r';
 770         if (isset($perm['edit'][ACL_EVERY]) or
 771             (isset($perm['edit'][ACL_AUTHENTICATED]) and $request->_user->isAuthenticated()))
 772             $s[7] = 'w';
 773         if (isset($perm['change'][ACL_EVERY]) or
 774             (isset($perm['change'][ACL_AUTHENTICATED]) and $request->_user->isAuthenticated()))
 775             $s[8] = 'x';
 776         return $s;
 777     }
 778 }
 779
 780 // Local Variables:
 781 // mode: php
 782 // tab-width: 8
 783 // c-basic-offset: 4
 784 // c-hanging-comment-ender-p: nil
 785 // indent-tabs-mode: nil
 786 // End:
 787 ?>