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
54 function getDescription()
56 return _("Layout tables using the Wikicreole syntax.");
59 function getDefaultArguments()
64 function handle_plugin_args_cruft($argstr, $args)
69 function run($dbi, $argstr, &$request, $basepage)
71 include_once 'lib/InlineParser.php';
75 $lines = preg_split('/\s*?\n\s*/', $argstr);
77 foreach ($lines as $line) {
82 // If line ends with a '|', remove it
83 if ($line[strlen($line) - 1] == '|') {
84 $line = substr($line, 0, -1);
86 if ($line[0] == '|') {
87 $table[] = $this->parse_row($line);
91 $nb_rows = sizeof($table);
92 // If table is empty, do not generate table markup
97 // Number of columns is the number of cells in the longer row
99 for ($i = 0; $i < $nb_rows; $i++) {
100 $nb_cols = max($nb_cols, sizeof($table[$i]));
103 for ($i = 0; $i < $nb_rows; $i++) {
104 for ($j = 0; $j < $nb_cols; $j++) {
105 if (!isset($table[$i][$j])) {
107 } elseif (preg_match('/@@/', $table[$i][$j])) {
108 $table[$i][$j] = $this->compute_table_cell($table, $i, $j, $nb_rows, $nb_cols);
113 $html_table = HTML::table(array('class' => "bordered"));
114 foreach ($table as $row) {
115 $html_row = HTML::tr();
116 foreach ($row as $cell) {
117 if ($cell && $cell[0] == '=') {
118 $cell = trim(substr($cell, 1));
119 $html_row->pushContent(HTML::th(TransformInline($cell, 2.0, $basepage)));
121 if (is_numeric($cell)) {
122 $html_row->pushContent(HTML::td(array('style' => "text-align:right"), $cell));
124 $html_row->pushContent(HTML::td(TransformInline($cell, 2.0, $basepage)));
128 $html_table->pushContent($html_row);
133 private function parse_row($line)
135 $bracket_link = "\\[ .*? [^]\s] .*? \\]";
136 $cell_content = "(?: [^[] | " . ESCAPE_CHAR . "\\[ | $bracket_link )*?";
138 preg_match_all("/(\\|+) \s* ($cell_content) \s* (?=\\||\$)/x",
139 $line, $matches, PREG_SET_ORDER);
143 foreach ($matches as $m) {
151 * Compute cell in spreadsheet table
152 * $table: two-dimensional table
153 * $i and $j: indexes of cell to compute
154 * $imax and $jmax: table dimensions
156 private function compute_table_cell($table, $i, $j, $imax, $jmax)
159 // What is implemented:
160 // @@=SUM(R)@@ : sum of cells in current row
161 // @@=SUM(C)@@ : sum of cells in current column
162 // @@=AVERAGE(R)@@ : average of cells in current row
163 // @@=AVERAGE(C)@@ : average of cells in current column
164 // @@=MAX(R)@@ : maximum value of cells in current row
165 // @@=MAX(C)@@ : maximum value of cells in current column
166 // @@=MIN(R)@@ : minimum value of cells in current row
167 // @@=MIN(C)@@ : minimum value of cells in current column
168 // @@=COUNT(R)@@ : number of cells in current row
169 // (numeric or not, excluding headers and current cell)
170 // @@=COUNT(C)@@ : number of cells in current column
171 // (numeric or not, excluding headers and current cell)
177 if (strpos($table[$i][$j], "@@=SUM(C)@@") !== false) {
178 for ($index = 0; $index < $imax; $index++) {
179 if (is_numeric($table[$index][$j])) {
180 $result += $table[$index][$j];
183 return str_replace("@@=SUM(C)@@", $result, $table[$i][$j]);
185 } elseif (strpos($table[$i][$j], "@@=SUM(R)@@") !== false) {
186 for ($index = 0; $index < $jmax; $index++) {
187 if (is_numeric($table[$i][$index])) {
188 $result += $table[$i][$index];
191 return str_replace("@@=SUM(R)@@", $result, $table[$i][$j]);
193 } elseif (strpos($table[$i][$j], "@@=AVERAGE(C)@@") !== false) {
194 for ($index = 0; $index < $imax; $index++) {
195 if (is_numeric($table[$index][$j])) {
196 $result += $table[$index][$j];
200 $result = $result / $counter;
201 return str_replace("@@=AVERAGE(C)@@", $result, $table[$i][$j]);
203 } elseif (strpos($table[$i][$j], "@@=AVERAGE(R)@@") !== false) {
204 for ($index = 0; $index < $jmax; $index++) {
205 if (is_numeric($table[$i][$index])) {
206 $result += $table[$i][$index];
210 $result = $result / $counter;
211 return str_replace("@@=AVERAGE(R)@@", $result, $table[$i][$j]);
213 } elseif (strpos($table[$i][$j], "@@=MAX(C)@@") !== false) {
214 for ($index = 0; $index < $imax; $index++) {
215 if (is_numeric($table[$index][$j])) {
218 $result = $table[$index][$j];
220 $result = max($result, $table[$index][$j]);
227 return str_replace("@@=MAX(C)@@", $result, $table[$i][$j]);
229 } elseif (strpos($table[$i][$j], "@@=MAX(R)@@") !== false) {
230 for ($index = 0; $index < $jmax; $index++) {
231 if (is_numeric($table[$i][$index])) {
234 $result = $table[$i][$index];
236 $result = max($result, $table[$i][$index]);
243 return str_replace("@@=MAX(R)@@", $result, $table[$i][$j]);
245 } elseif (strpos($table[$i][$j], "@@=MIN(C)@@") !== false) {
246 for ($index = 0; $index < $imax; $index++) {
247 if (is_numeric($table[$index][$j])) {
250 $result = $table[$index][$j];
252 $result = min($result, $table[$index][$j]);
259 return str_replace("@@=MIN(C)@@", $result, $table[$i][$j]);
261 } elseif (strpos($table[$i][$j], "@@=MIN(R)@@") !== false) {
262 for ($index = 0; $index < $jmax; $index++) {
263 if (is_numeric($table[$i][$index])) {
266 $result = $table[$i][$index];
268 $result = min($result, $table[$i][$index]);
275 return str_replace("@@=MIN(R)@@", $result, $table[$i][$j]);
277 } elseif (strpos($table[$i][$j], "@@=COUNT(C)@@") !== false) {
278 for ($index = 0; $index < $imax; $index++) {
280 if (!string_starts_with(trim($table[$index][$j]), "=")) {
284 $result = $counter - 1; // exclude self
285 return str_replace("@@=COUNT(C)@@", $result, $table[$i][$j]);
287 } elseif (strpos($table[$i][$j], "@@=COUNT(R)@@") !== false) {
288 for ($index = 0; $index < $jmax; $index++) {
290 if (!string_starts_with(trim($table[$i][$index]), "=")) {
294 $result = $counter - 1; // exclude self
295 return str_replace("@@=COUNT(R)@@", $result, $table[$i][$j]);
298 return $table[$i][$j];
307 // c-hanging-comment-ender-p: nil
308 // indent-tabs-mode: nil