From: Reini U. <ru...@x-...> - 2004-11-28 19:35:11
|
Charles Corrigan schrieb: > A very simple plugin that I built follows. I use it while debugging > lib/WikiGroup.php. > > No parameters used. Activate by placing "<?plugin GroupInfo ?>" in a page. But you know of _AuthInfo, do you? This displays Auth and Group info in more detail and much more. I might add it as "_GroupInfo" for consistency. > <?php > /** > Copyright 1999, 2000, 2001, 2002 $ThePhpWikiProgrammingTeam > > This file is part of PhpWiki. > > PhpWiki is free software; you can redistribute it and/or modify > it under the terms of the GNU General Public License as published by > the Free Software Foundation; either version 2 of the License, or > (at your option) any later version. > > PhpWiki is distributed in the hope that it will be useful, > but WITHOUT ANY WARRANTY; without even the implied warranty of > MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the > GNU General Public License for more details. > > You should have received a copy of the GNU General Public License > along with PhpWiki; if not, write to the Free Software > Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA > */ > > class WikiPlugin_DebugGroupInfo > extends WikiPlugin > { > function getName () { > return _("DebugGroupInfo"); > } > > function getDescription () { > return sprintf(_("Show Group Information")); > } > > function getVersion() { > return preg_replace("/[Revision: $]/", '', > "\$Revision: 0.1 $"); > } > > function getDefaultArguments() { > return array(); > } > > function run($dbi, $argstr, &$request, $basepage) { > $args = $this->getArgs($argstr, $request); > extract($args); > > $output = HTML(HTML::h1("Group Info")); > > $group = WikiGroup::getGroup(); > $allGroups = $group->getAllGroupsIn(); > > foreach($allGroups as $g) { > $members = $group->getMembersOf($g); > $output->pushContent(HTML::h3($g . " - members: " . > sizeof($members) . " - isMember: " . ($group->isMember($g) ? "yes" : "no") > )); > foreach($members as $m) { > $output->pushContent($m); > $output->pushContent(HTML::br()); > } > } > $output->pushContent(HTML::p("--- the end ---")); > > return $output; > } > }; > ?> -- Reini Urban http://xarch.tu-graz.ac.at/home/rurban/ |