]> CyberLeo.Net >> Repos - SourceForge/phpwiki.git/blob - lib/plugin/WikicreoleTable.php
rcs_id no longer makes sense with Subversion global version number
[SourceForge/phpwiki.git] / lib / plugin / WikicreoleTable.php
1 <?php // -*-php-*-
2 // rcs_id('$Id$');
3 /*
4  * Copyright (C) 2008-2009 Marc-Etienne Vargenau, Alcatel-Lucent
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  * Standard Alcatel-Lucent disclaimer for contributing to open source
25  *
26  * "The WikicreoleTablePlugin ("Contribution") has not been tested and/or
27  * validated for release as or in products, combinations with products or
28  * other commercial use. Any use of the Contribution is entirely made at
29  * the user's own responsibility and the user can not rely on any features,
30  * functionalities or performances Alcatel-Lucent has attributed to the
31  * Contribution.
32  *
33  * THE CONTRIBUTION BY ALCATEL-LUCENT IS PROVIDED AS IS, WITHOUT WARRANTY
34  * OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE
35  * WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, COMPLIANCE,
36  * NON-INTERFERENCE AND/OR INTERWORKING WITH THE SOFTWARE TO WHICH THE
37  * CONTRIBUTION HAS BEEN MADE, TITLE AND NON-INFRINGEMENT. IN NO EVENT SHALL
38  * ALCATEL-LUCENT BE LIABLE FOR ANY DAMAGES OR OTHER LIABLITY, WHETHER IN
39  * CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
40  * CONTRIBUTION OR THE USE OR OTHER DEALINGS IN THE CONTRIBUTION, WHETHER
41  * TOGETHER WITH THE SOFTWARE TO WHICH THE CONTRIBUTION RELATES OR ON A STAND
42  * ALONE BASIS."
43  */
44
45 /**
46  * WikicreoleTablePlugin
47  * A PhpWiki plugin that allows insertion of tables using the Wikicreole
48  * syntax.
49  */
50
51 class WikiPlugin_WikicreoleTable
52 extends WikiPlugin
53 {
54     function getName() {
55         return _("WikicreoleTable");
56     }
57
58     function getDescription() {
59       return _("Layout tables using the Wikicreole syntax.");
60     }
61
62     function getDefaultArguments() {
63         return array();
64     }
65
66     function handle_plugin_args_cruft($argstr, $args) {
67         return;
68     }
69
70     function run($dbi, $argstr, &$request, $basepage) {
71         global $WikiTheme;
72         include_once('lib/InlineParser.php');
73
74         $table = array();
75
76         $lines = preg_split('/\s*?\n\s*/', $argstr);
77
78         foreach ($lines as $line) {
79             if (!$line) {
80                 continue;
81             }
82             $line = trim($line);
83             // If line ends with a '|', remove it
84             if ($line[strlen($line)-1] == '|') {
85                 $line = substr($line, 0, -1);
86             }
87             if ($line[0] != '|') {
88                 // trigger_error(sprintf(_("Line %s does not begin with a '|'."), $line), E_USER_WARNING);
89             } else {
90                 $table[] = $this->_parse_row($line, $basepage);
91             }
92         }
93
94         $nbrows = sizeof($table);
95         // If table is empty, do not generate table markup
96         if ($nbrows == 0) {
97             return HTML::raw('');
98         }
99         $nbcols = sizeof($table[0]);
100
101         for ($i=0; $i<$nbrows; $i++) {
102             for ($j=0; $j<$nbcols; $j++) {
103                 if (preg_match('/@@/', $table[$i][$j])) {
104                     $table[$i][$j] = compute_tablecell($table, $i, $j, $nbrows, $nbcols);
105                 }
106             }
107         }
108
109         $htmltable = HTML::table(array('class' => "bordered"));
110         foreach ($table as $row) {
111             $htmlrow = HTML::tr();
112             foreach ($row as $cell) {
113                 if ($cell && $cell[0] == '=') {
114                     $cell = trim(substr($cell, 1));
115                     $htmlrow->pushContent(HTML::th(TransformInline($cell, 2.0, $basepage)));
116                 } else {
117                     if (is_numeric($cell)) {
118                         $htmlrow->pushContent(HTML::td(array('style' => "text-align:right"), $cell));
119                     } else {
120                         $htmlrow->pushContent(HTML::td(TransformInline($cell, 2.0, $basepage)));
121                     }
122                 }
123             }
124             $htmltable->pushContent($htmlrow);
125         }
126         return $htmltable;
127     }
128
129     function _parse_row ($line, $basepage) {
130         $brkt_link = "\\[ .*? [^]\s] .*? \\]";
131         $cell_content  = "(?: [^[] | ".ESCAPE_CHAR."\\[ | $brkt_link )*?";
132
133         preg_match_all("/(\\|+) \s* ($cell_content) \s* (?=\\||\$)/x",
134                        $line, $matches, PREG_SET_ORDER);
135
136         $row = array();
137
138         foreach ($matches as $m) {
139             $cell = $m[2];
140             $row[]= $cell;
141         }
142         return $row;
143     }
144
145 }
146
147 // For emacs users
148 // Local Variables:
149 // mode: php
150 // tab-width: 8
151 // c-basic-offset: 4
152 // c-hanging-comment-ender-p: nil
153 // indent-tabs-mode: nil
154 // End:
155 ?>