]> CyberLeo.Net >> Repos - SourceForge/phpwiki.git/blob - lib/plugin/EditMetaData.php
Update: Omit page cache object ('_cached_html') from metadata display.
[SourceForge/phpwiki.git] / lib / plugin / EditMetaData.php
1 <?php // -*-php-*-
2 rcs_id('$Id: EditMetaData.php,v 1.8 2003-11-27 17:05:41 carstenklapp Exp $');
3 /**
4  Copyright 1999, 2000, 2001, 2002 $ThePhpWikiProgrammingTeam
5
6  This file is part of PhpWiki.
7
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.
12
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.
17
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
21  */
22
23 /**
24  * Plugin EditMetaData
25  *
26  * This plugin shows the current page-level metadata and gives an
27  * entry box for adding a new field or changing an existing one. (A
28  * field can be deleted by specifying a blank value.) Certain fields,
29  * such as 'hits' cannot be changed.
30  *
31  * If there is a reason to do so, I will add support for revision-
32  * level metadata as well.
33  *
34  * Access by restricted to ADMIN_USER
35  *
36  * Written by MichaelVanDam, to test out some ideas about
37  * PagePermissions and PageTypes.
38  *
39  * Array support added by ReiniUrban.
40  */
41 class WikiPlugin_EditMetaData
42 extends WikiPlugin
43 {
44     function getName () {
45         return _("EditMetaData");
46     }
47
48     function getDescription () {
49         return sprintf(_("Edit metadata for %s"), '[pagename]');
50     }
51
52     function getVersion() {
53         return preg_replace("/[Revision: $]/", '',
54                             "\$Revision: 1.8 $");
55     }
56
57     // Arguments:
58     //
59     //  page - page whose metadata is editted
60
61
62     function getDefaultArguments() {
63         return array('page'       => '[pagename]'
64                     );
65     }
66
67
68     function run($dbi, $argstr, $request) {
69         $this->_args = $this->getArgs($argstr, $request);
70         extract($this->_args);
71         if (!$page)
72             return '';
73
74         $hidden_pagemeta = array ('_cached_html');
75         $readonly_pagemeta = array ('hits');
76         $dbi = $request->getDbh();
77         $p = $dbi->getPage($page);
78         $pagemeta = $p->getMetaData();
79
80         // Look at arguments to see if submit was entered. If so,
81         // process this request before displaying.
82         //
83
84         if ($request->getArg('metaedit')) {
85
86             $metafield = trim($request->getArg('metafield'));
87             $metavalue = trim($request->getArg('metavalue'));
88
89             if (!in_array($metafield, $readonly_pagemeta)) {
90                 if (preg_match('/^(.*?)\[(.*?)\]$/', $metafield, $matches)) {
91                     list(,$array_field, $array_key) = $matches;
92                     $array_value = $pagemeta[$array_field];
93                     $array_value[$array_key] = $metavalue;
94                     $p->set($array_field, $array_value);
95                 } else {
96                     $p->set($metafield, $metavalue);
97                 }
98             }
99
100             $url = $request->getURLtoSelf('', array('metaedit', 'metafield',
101                                                     'metavalue'));
102             $request->redirect($url);
103
104             // The rest of the output will not be seen due to the
105             // redirect.
106
107         }
108
109         // Now we show the meta data and provide entry box for new data.
110
111         $html = HTML();
112
113         $html->pushContent(fmt("Existing page-level metadata for %s:",
114                                $page));
115         $dl = HTML::dl();
116
117         foreach ($pagemeta as $key => $val) {
118             if (is_string($val) and (substr($val,0,2) == 'a:')) {
119                 $dl->pushContent(HTML::dt("\n$key => $val\n",
120                                           $dl1 = HTML::dl()));
121                 foreach (unserialize($val) as $akey => $aval) {
122                     $dl1->pushContent(HTML::dt(HTML::strong("$key" . '['
123                                                             . $akey
124                                                             . "] => $aval\n"))
125                                       );
126                 }
127                 $dl->pushContent($dl1);
128             } elseif (is_array($val)) {
129                 $dl->pushContent(HTML::dt("\n$key:\n", $dl1 = HTML::dl()));
130                 foreach ($val as $akey => $aval) {
131                     $dl1->pushContent(HTML::dt(HTML::strong("$key" . '['
132                                                             . $akey
133                                                             . "] => $aval\n"))
134                                       );
135                 }
136                 $dl->pushContent($dl1);
137             } elseif (in_array($key,$hidden_pagemeta)) {
138                 ;
139             } elseif (in_array($key,$readonly_pagemeta)) {
140                 $dl->pushContent(HTML::dt(array('style' => 'background: #dddddd'),
141                                           "$key => $val\n"));
142             } else {
143                 $dl->pushContent(HTML::dt(HTML::strong("$key => $val\n")));
144             }
145         }
146         $html->pushContent($dl);
147
148         if ($request->_user->isAdmin()) {
149             $action = $request->getPostURL();
150             $hiddenfield = HiddenInputs($request->getArgs());
151             $instructions = _("Add or change a page-level metadata 'key=>value' pair. Note that you can remove a key by leaving value-box empty.");
152             $keyfield = HTML::input(array('name' => 'metafield'), '');
153             $valfield = HTML::input(array('name' => 'metavalue'), '');
154             $button = Button('submit:metaedit', _("Submit"), false);
155             $form = HTML::form(array('action' => $action,
156                                      'method' => 'post',
157                                      'accept-charset' => CHARSET),
158                                $hiddenfield,
159                                $instructions, HTML::br(),
160                                $keyfield, ' => ', $valfield,
161                                HTML::raw('&nbsp;'), $button
162                                );
163
164             $html->pushContent(HTML::br(), $form);
165         } else {
166             $html->pushContent(HTML::em(_("Requires WikiAdmin privileges to edit.")));
167         }
168         return $html;
169     }
170 };
171
172 // $Log: not supported by cvs2svn $
173 // Revision 1.7  2003/11/22 17:41:42  carstenklapp
174 // Minor internal change: Removed redundant call to gettext within
175 // fmt(). (locale make: EditMetaData.php:113: warning: keyword nested in
176 // keyword arg)
177 //
178 // Revision 1.6  2003/02/26 01:56:52  dairiki
179 // Tuning/fixing of POST action URLs and hidden inputs.
180 //
181 // Revision 1.5  2003/02/21 04:17:13  dairiki
182 // Delete now irrelevant comment.
183 //
184 // Revision 1.4  2003/01/18 21:41:01  carstenklapp
185 // Code cleanup:
186 // Reformatting & tabs to spaces;
187 // Added copyleft, getVersion, getDescription, rcs_id.
188 //
189
190 // For emacs users
191 // Local Variables:
192 // mode: php
193 // tab-width: 8
194 // c-basic-offset: 4
195 // c-hanging-comment-ender-p: nil
196 // indent-tabs-mode: nil
197 // End:
198 ?>