4 * Copyright 2004 $ThePhpWikiProgrammingTeam
6 * This file is part of PhpWiki.
8 * PhpWiki is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
13 * PhpWiki is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License along
19 * with PhpWiki; if not, write to the Free Software Foundation, Inc.,
20 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
23 require_once 'lib/Template.php';
25 * Used to debug auth problems and settings.
26 * This plugin is only testing purposes.
27 * if DEBUG is false, only admin can call it, which is of no real use.
29 * Warning! This may display db and user passwords in cleartext.
31 class WikiPlugin__AuthInfo
39 function getDescription()
41 return _("Display general and user specific auth information.");
44 function getDefaultArguments()
46 return array('userid' => '');
49 function run($dbi, $argstr, &$request, $basepage)
51 $args = $this->getArgs($argstr, $request);
53 if (empty($userid) or $userid == $request->_user->UserName()) {
54 $user = $request->_user;
55 $userid = $user->UserName();
57 $user = WikiUser($userid);
59 if (!$user->isAdmin() and !(DEBUG && _DEBUG_LOGIN)) {
60 $request->_notAuthorized(WIKIAUTH_ADMIN);
61 $this->disabled("! user->isAdmin");
64 $html = HTML(HTML::h3(fmt("General Auth Settings")));
65 $table = HTML::table(array('border' => 1,
68 $table->pushContent($this->_showhash("AUTH DEFINES",
69 $this->_buildConstHash(
70 array("ENABLE_USER_NEW", "ALLOW_ANON_USER",
71 "ALLOW_ANON_EDIT", "ALLOW_BOGO_LOGIN",
72 "REQUIRE_SIGNIN_BEFORE_EDIT", "ALLOW_USER_PASSWORDS",
73 "PASSWORD_LENGTH_MINIMUM", "USE_DB_SESSION"))));
74 if ((defined('ALLOW_LDAP_LOGIN') && ALLOW_LDAP_LOGIN) or in_array("LDAP", $GLOBALS['USER_AUTH_ORDER']))
75 $table->pushContent($this->_showhash("LDAP DEFINES",
76 $this->_buildConstHash(array("LDAP_AUTH_HOST", "LDAP_BASE_DN"))));
77 if ((defined('ALLOW_IMAP_LOGIN') && ALLOW_IMAP_LOGIN) or in_array("IMAP", $GLOBALS['USER_AUTH_ORDER']))
78 $table->pushContent($this->_showhash("IMAP DEFINES", array("IMAP_AUTH_HOST" => IMAP_AUTH_HOST)));
79 if (defined('AUTH_USER_FILE') or in_array("File", $GLOBALS['USER_AUTH_ORDER']))
80 $table->pushContent($this->_showhash("AUTH_USER_FILE",
81 $this->_buildConstHash(array("AUTH_USER_FILE",
82 "AUTH_USER_FILE_STORABLE"))));
83 if (defined('GROUP_METHOD'))
84 $table->pushContent($this->_showhash("GROUP_METHOD",
85 $this->_buildConstHash(array("GROUP_METHOD", "AUTH_GROUP_FILE", "GROUP_LDAP_QUERY"))));
86 $table->pushContent($this->_showhash("\$USER_AUTH_ORDER[]", $GLOBALS['USER_AUTH_ORDER']));
87 $table->pushContent($this->_showhash("USER_AUTH_POLICY", array("USER_AUTH_POLICY" => USER_AUTH_POLICY)));
88 $DBParams = $GLOBALS['DBParams'];
89 $DBParams['dsn'] = class_exists('WikiDB_SQL') ? WikiDB_SQL::view_dsn($DBParams['dsn']) : '';
90 $table->pushContent($this->_showhash("\$DBParams[]", $DBParams));
91 $DBAuthParams = $GLOBALS['DBAuthParams'];
92 if (isset($DBAuthParams['auth_dsn']) and class_exists('WikiDB_SQL'))
93 $DBAuthParams['auth_dsn'] = WikiDB_SQL::view_dsn($DBAuthParams['auth_dsn']);
95 $DBAuthParams['auth_dsn'] = '';
96 unset($DBAuthParams['dummy']);
97 $table->pushContent($this->_showhash("\$DBAuthParams[]", $DBAuthParams));
98 $html->pushContent($table);
99 $html->pushContent(HTML(HTML::h3(fmt("Personal Auth Settings for '%s'", $userid))));
101 $html->pushContent(HTML::p(fmt("No userid")));
103 $table = HTML::table(array('border' => 1,
105 'cellspacing' => 0));
106 //$table->pushContent(HTML::tr(HTML::td(array('colspan' => 2))));
107 $userdata = obj2hash($user, array('_dbi', '_request', 'password', 'passwd'));
108 if (isa($user, "_FilePassUser")) {
109 foreach ($userdata['_file']->users as $u => $p) {
110 $userdata['_file']->users[$u] = "<hidden>";
113 $table->pushContent($this->_showhash("User: Object of " . get_class($user), $userdata));
114 if (ENABLE_USER_NEW) {
115 $group = &$request->getGroup();
116 $groups = $group->getAllGroupsIn();
117 $groupdata = obj2hash($group, array('_dbi', '_request', 'password', 'passwd'));
118 unset($groupdata['request']);
119 $table->pushContent($this->_showhash("Group: Object of " . get_class($group), $groupdata));
120 $groups = $group->getAllGroupsIn();
121 $groupdata = array('getAllGroupsIn' => $groups);
122 foreach ($groups as $g) {
123 $groupdata["getMembersOf($g)"] = $group->getMembersOf($g);
124 $groupdata["isMember($g)"] = $group->isMember($g);
126 $table->pushContent($this->_showhash("Group Methods: ", $groupdata));
128 $html->pushContent($table);
133 function _showhash($heading, $hash, $depth = 0)
135 static $seen = array();
136 static $maxdepth = 0;
139 if ($maxdepth > 35) return $heading;
142 $rows[] = HTML::tr(array('bgcolor' => '#ffcccc',
143 'style' => 'color:#000000'),
144 HTML::td(array('colspan' => 2,
145 'style' => 'color:#000000'),
147 if (is_object($hash))
148 $hash = obj2hash($hash);
151 foreach ($hash as $key => $val) {
152 if (is_object($val)) {
153 $heading = "Object of " . get_class($val);
154 if ($depth > 3) $val = $heading;
155 elseif ($heading == "Object of wikidb_sql") $val = $heading; elseif (substr($heading, 0, 13) == "Object of db_") $val = $heading; elseif (!isset($seen[$heading])) {
156 //if (empty($seen[$heading])) $seen[$heading] = 1;
157 $val = HTML::table(array('border' => 1,
160 $this->_showhash($heading, obj2hash($val), $depth + 1));
164 } elseif (is_array($val)) {
165 $heading = $key . "[]";
166 if ($depth > 3) $val = $heading;
167 elseif (!isset($seen[$heading])) {
168 //if (empty($seen[$heading])) $seen[$heading] = 1;
169 $val = HTML::table(array('border' => 1,
172 $this->_showhash($heading, $val, $depth + 1));
177 $rows[] = HTML::tr(HTML::td(array('align' => 'right',
178 'bgcolor' => '#cccccc',
179 'style' => 'color:#000000'),
180 HTML(HTML::raw(' '), $key,
181 HTML::raw(' '))),
182 HTML::td(array('bgcolor' => '#ffffff',
183 'style' => 'color:#000000'),
184 $val ? $val : HTML::raw(' '))
186 //if (empty($seen[$key])) $seen[$key] = 1;
192 function _buildConstHash($constants)
195 foreach ($constants as $c) {
196 $hash[$c] = defined($c) ? constant($c) : '<empty>';
197 if ($hash[$c] === false) $hash[$c] = 'false';
198 elseif ($hash[$c] === true) $hash[$c] = 'true';
210 // c-hanging-comment-ender-p: nil
211 // indent-tabs-mode: nil