2 rcs_id('$Id: WikiAdminRename.php,v 1.8 2004-03-01 13:48:46 rurban Exp $');
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
19 along with PhpWiki; if not, write to the Free Software
20 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
24 * Usage: <?plugin WikiAdminRename ?> or called via WikiAdminSelect
25 * Author: Reini Urban <rurban@x-ray.at>
28 * Currently we must be Admin.
29 * Future versions will support PagePermissions.
30 * requires PHP 4.2 so far.
32 require_once('lib/PageList.php');
33 require_once('lib/plugin/WikiAdminSelect.php');
35 class WikiPlugin_WikiAdminRename
36 extends WikiPlugin_WikiAdminSelect
39 return _("WikiAdminRename");
42 function getDescription() {
43 return _("Rename selected pages.");
46 function getVersion() {
47 return preg_replace("/[Revision: $]/", '',
51 function getDefaultArguments() {
53 /* Pages to exclude in listing */
55 /* Columns to include in listing */
56 'info' => 'pagename,mtime',
58 'sortby' => 'pagename',
64 function renameHelper($name, $from, $to) {
65 return str_replace($from,$to,$name);
68 function renamePages(&$dbi, &$request, $pages, $from, $to, $updatelinks=false) {
71 foreach ($pages as $name) {
72 if ( ($newname = $this->renameHelper($name,$from,$to)) and
74 $dbi->renamePage($name,$newname,$updatelinks) ) {
75 /* not yet implemented for all backends */
76 $ul->pushContent(HTML::li(fmt("Renamed page '%s' to '%s'.",$name,WikiLink($newname))));
79 $ul->pushContent(HTML::li(fmt("Couldn't rename page '%s' to '%s'.", $name, $newname)));
85 HTML::p(fmt("%s pages have been permanently renamed.",$count)));
88 HTML::p(fmt("No pages renamed.")));
92 function run($dbi, $argstr, &$request, $basepage) {
93 if ($request->getArg('action') != 'browse')
94 return $this->disabled("(action != 'browse')");
96 $args = $this->getArgs($argstr, $request);
98 if (!empty($args['exclude']))
99 $exclude = explodePageList($args['exclude']);
103 $p = $request->getArg('p');
104 $post_args = $request->getArg('admin_rename');
105 $next_action = 'select';
107 if ($p && !$request->isPost())
109 if ($p && $request->isPost() && $request->_user->isAdmin()
110 && !empty($post_args['rename']) && empty($post_args['cancel'])) {
111 // FIXME: error message if not admin.
112 if ($post_args['action'] == 'verify') {
114 return $this->renamePages($dbi, $request, array_keys($p),
115 $post_args['from'], $post_args['to'], !empty($post_args['updatelinks']));
117 if ($post_args['action'] == 'select') {
118 if (!empty($post_args['from']))
119 $next_action = 'verify';
120 foreach ($p as $name => $c) {
125 if ($next_action == 'select' and empty($pages)) {
126 // List all pages to select from.
127 $pages = $this->collectPages($pages, $dbi, $args['sortby'], $args['limit']);
129 if ($next_action == 'verify') {
130 $args['info'] = "checkbox,pagename,renamed_pagename";
132 $pagelist = new PageList_Selectable($args['info'], $exclude);
133 $pagelist->addPageList($pages);
136 if ($next_action == 'verify') {
137 $button_label = _("Yes");
138 $header->pushContent(
139 HTML::p(HTML::strong(
140 _("Are you sure you want to permanently rename the selected files?"))));
141 $header = $this->renameForm($header, $post_args);
144 $button_label = _("Rename selected pages");
145 $header->pushContent(HTML::p(_("Select the pages to rename:")));
146 $header = $this->renameForm($header, $post_args);
150 $buttons = HTML::p(Button('submit:admin_rename[rename]', $button_label, 'wikiadmin'),
151 Button('submit:admin_rename[cancel]', _("Cancel"), 'button'));
153 return HTML::form(array('action' => $request->getPostURL(),
156 $pagelist->getContent(),
157 HiddenInputs($request->getArgs(),
159 array('admin_rename')),
160 HiddenInputs(array('admin_rename[action]' => $next_action,
161 'require_authority_for_post' => WIKIAUTH_ADMIN)),
165 function renameForm(&$header, $post_args) {
166 $header->pushContent(_("Rename")." "._("from").': ');
167 $header->pushContent(HTML::input(array('name' => 'admin_rename[from]',
168 'value' => $post_args['from'])));
169 $header->pushContent(' '._("to").': ');
170 $header->pushContent(HTML::input(array('name' => 'admin_rename[to]',
171 'value' => $post_args['to'])));
172 $header->pushContent(' '._("(no regex, case-sensitive)"));
173 if (1) { // not yet tested
174 $header->pushContent(HTML::br());
175 $header->pushContent(_("Change pagename in all linked pages also?"));
176 $checkbox = HTML::input(array('type' => 'checkbox',
177 'name' => 'admin_rename[updatelinks]',
179 if (!empty($post_args['updatelinks']))
180 $checkbox->setAttr('checked','checked');
181 $header->pushContent($checkbox);
183 $header->pushContent(HTML::p());
189 // $Log: not supported by cvs2svn $
190 // Revision 1.7 2004/02/22 23:20:33 rurban
191 // fixed DumpHtmlToDir,
192 // enhanced sortby handling in PageList
193 // new button_heading th style (enabled),
194 // added sortby and limit support to the db backends and plugins
195 // for paging support (<<prev, next>> links on long lists)
197 // Revision 1.6 2004/02/17 12:11:36 rurban
198 // added missing 4th basepage arg at plugin->run() to almost all plugins. This caused no harm so far, because it was silently dropped on normal usage. However on plugin internal ->run invocations it failed. (InterWikiSearch, IncludeSiteMap, ...)
200 // Revision 1.5 2004/02/15 21:34:37 rurban
201 // PageList enhanced and improved.
202 // fixed new WikiAdmin... plugins
203 // editpage, Theme with exp. htmlarea framework
204 // (htmlarea yet committed, this is really questionable)
205 // WikiUser... code with better session handling for prefs
206 // enhanced UserPreferences (again)
207 // RecentChanges for show_deleted: how should pages be deleted then?
209 // Revision 1.4 2004/02/12 17:05:39 rurban
211 // added "Change pagename in all linked pages also"
213 // added javascript toggle for Select
214 // WikiAdminSearchReplace:
215 // fixed another typo
217 // Revision 1.3 2004/02/12 13:05:50 rurban
218 // Rename functional for PearDB backend
219 // some other minor changes
220 // SiteMap comes with a not yet functional feature request: includepages (tbd)
222 // Revision 1.2 2004/02/12 11:45:11 rurban
223 // only WikiDB method missing
225 // Revision 1.1 2004/02/11 20:00:16 rurban
226 // WikiAdmin... series overhaul. Rename misses the db backend methods yet. Chmod + Chwon still missing.
233 // c-hanging-comment-ender-p: nil
234 // indent-tabs-mode: nil