4 * Copyright (C) 2008-2009, 2011 Marc-Etienne Vargenau, Alcatel-Lucent
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.
24 * Standard Alcatel-Lucent disclaimer for contributing to open source
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
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
46 * WikicreoleTablePlugin
47 * A PhpWiki plugin that allows insertion of tables using the Wikicreole
51 class WikiPlugin_WikicreoleTable
56 return _("WikicreoleTable");
59 function getDescription()
61 return _("Layout tables using the Wikicreole syntax.");
64 function getDefaultArguments()
69 function handle_plugin_args_cruft($argstr, $args)
74 function run($dbi, $argstr, &$request, $basepage)
76 include_once 'lib/InlineParser.php';
80 $lines = preg_split('/\s*?\n\s*/', $argstr);
82 foreach ($lines as $line) {
87 // If line ends with a '|', remove it
88 if ($line[strlen($line) - 1] == '|') {
89 $line = substr($line, 0, -1);
91 if ($line[0] == '|') {
92 $table[] = $this->_parse_row($line);
96 $nbrows = sizeof($table);
97 // If table is empty, do not generate table markup
102 // Number of columns is the number of cells in the longer row
104 for ($i = 0; $i < $nbrows; $i++) {
105 $nbcols = max($nbcols, sizeof($table[$i]));
108 for ($i = 0; $i < $nbrows; $i++) {
109 for ($j = 0; $j < $nbcols; $j++) {
110 if (!isset($table[$i][$j])) {
112 } elseif (preg_match('/@@/', $table[$i][$j])) {
113 $table[$i][$j] = $this->_compute_tablecell($table, $i, $j, $nbrows, $nbcols);
118 $htmltable = HTML::table(array('class' => "bordered"));
119 foreach ($table as $row) {
120 $htmlrow = HTML::tr();
121 foreach ($row as $cell) {
122 if ($cell && $cell[0] == '=') {
123 $cell = trim(substr($cell, 1));
124 $htmlrow->pushContent(HTML::th(TransformInline($cell, 2.0, $basepage)));
126 if (is_numeric($cell)) {
127 $htmlrow->pushContent(HTML::td(array('style' => "text-align:right"), $cell));
129 $htmlrow->pushContent(HTML::td(TransformInline($cell, 2.0, $basepage)));
133 $htmltable->pushContent($htmlrow);
138 function _parse_row($line)
140 $brkt_link = "\\[ .*? [^]\s] .*? \\]";
141 $cell_content = "(?: [^[] | " . ESCAPE_CHAR . "\\[ | $brkt_link )*?";
143 preg_match_all("/(\\|+) \s* ($cell_content) \s* (?=\\||\$)/x",
144 $line, $matches, PREG_SET_ORDER);
148 foreach ($matches as $m) {
156 * Compute cell in spreadsheet table
157 * $table: two-dimensional table
158 * $i and $j: indexes of cell to compute
159 * $imax and $jmax: table dimensions
161 function _compute_tablecell($table, $i, $j, $imax, $jmax)
164 // What is implemented:
165 // @@=SUM(R)@@ : sum of cells in current row
166 // @@=SUM(C)@@ : sum of cells in current column
167 // @@=AVERAGE(R)@@ : average of cells in current row
168 // @@=AVERAGE(C)@@ : average of cells in current column
169 // @@=MAX(R)@@ : maximum value of cells in current row
170 // @@=MAX(C)@@ : maximum value of cells in current column
171 // @@=MIN(R)@@ : minimum value of cells in current row
172 // @@=MIN(C)@@ : minimum value of cells in current column
173 // @@=COUNT(R)@@ : number of cells in current row
174 // (numeric or not, excluding headers and current cell)
175 // @@=COUNT(C)@@ : number of cells in current column
176 // (numeric or not, excluding headers and current cell)
182 if (strpos($table[$i][$j], "@@=SUM(C)@@") !== false) {
183 for ($index = 0; $index < $imax; $index++) {
184 if (is_numeric($table[$index][$j])) {
185 $result += $table[$index][$j];
188 return str_replace("@@=SUM(C)@@", $result, $table[$i][$j]);
190 } elseif (strpos($table[$i][$j], "@@=SUM(R)@@") !== false) {
191 for ($index = 0; $index < $jmax; $index++) {
192 if (is_numeric($table[$i][$index])) {
193 $result += $table[$i][$index];
196 return str_replace("@@=SUM(R)@@", $result, $table[$i][$j]);
198 } elseif (strpos($table[$i][$j], "@@=AVERAGE(C)@@") !== false) {
199 for ($index = 0; $index < $imax; $index++) {
200 if (is_numeric($table[$index][$j])) {
201 $result += $table[$index][$j];
205 $result = $result / $counter;
206 return str_replace("@@=AVERAGE(C)@@", $result, $table[$i][$j]);
208 } elseif (strpos($table[$i][$j], "@@=AVERAGE(R)@@") !== false) {
209 for ($index = 0; $index < $jmax; $index++) {
210 if (is_numeric($table[$i][$index])) {
211 $result += $table[$i][$index];
215 $result = $result / $counter;
216 return str_replace("@@=AVERAGE(R)@@", $result, $table[$i][$j]);
218 } elseif (strpos($table[$i][$j], "@@=MAX(C)@@") !== false) {
219 for ($index = 0; $index < $imax; $index++) {
220 if (is_numeric($table[$index][$j])) {
223 $result = $table[$index][$j];
225 $result = max($result, $table[$index][$j]);
232 return str_replace("@@=MAX(C)@@", $result, $table[$i][$j]);
234 } elseif (strpos($table[$i][$j], "@@=MAX(R)@@") !== false) {
235 for ($index = 0; $index < $jmax; $index++) {
236 if (is_numeric($table[$i][$index])) {
239 $result = $table[$i][$index];
241 $result = max($result, $table[$i][$index]);
248 return str_replace("@@=MAX(R)@@", $result, $table[$i][$j]);
250 } elseif (strpos($table[$i][$j], "@@=MIN(C)@@") !== false) {
251 for ($index = 0; $index < $imax; $index++) {
252 if (is_numeric($table[$index][$j])) {
255 $result = $table[$index][$j];
257 $result = min($result, $table[$index][$j]);
264 return str_replace("@@=MIN(C)@@", $result, $table[$i][$j]);
266 } elseif (strpos($table[$i][$j], "@@=MIN(R)@@") !== false) {
267 for ($index = 0; $index < $jmax; $index++) {
268 if (is_numeric($table[$i][$index])) {
271 $result = $table[$i][$index];
273 $result = min($result, $table[$i][$index]);
280 return str_replace("@@=MIN(R)@@", $result, $table[$i][$j]);
282 } elseif (strpos($table[$i][$j], "@@=COUNT(C)@@") !== false) {
283 for ($index = 0; $index < $imax; $index++) {
285 if (!string_starts_with(trim($table[$index][$j]), "=")) {
289 $result = $counter - 1; // exclude self
290 return str_replace("@@=COUNT(C)@@", $result, $table[$i][$j]);
292 } elseif (strpos($table[$i][$j], "@@=COUNT(R)@@") !== false) {
293 for ($index = 0; $index < $jmax; $index++) {
295 if (!string_starts_with(trim($table[$i][$index]), "=")) {
299 $result = $counter - 1; // exclude self
300 return str_replace("@@=COUNT(R)@@", $result, $table[$i][$j]);
303 return $table[$i][$j];
312 // c-hanging-comment-ender-p: nil
313 // indent-tabs-mode: nil