2 rcs_id('$Id: AsciiSVG.php,v 1.1 2007-01-21 23:14:55 rurban Exp $');
4 Copyright 2007 $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 * Interface to http://www1.chapman.edu/~jipsen/svg/asciisvg.html
25 * Requires ENABLE_XHTML_XML = true
26 * Syntax: http://www1.chapman.edu/~jipsen/svg/asciisvgcommands.html
28 class WikiPlugin_AsciiSVG
35 function getDescription() {
36 return _("Render inline ASCII SVG");
39 function getVersion() {
40 return preg_replace("/[Revision: $]/", '',
44 function getDefaultArguments() {
45 return array('width' => 200,
49 function handle_plugin_args_cruft(&$argstr, &$args) {
50 $this->source = $argstr;
53 function run($dbi, $argstr, &$request, $basepage) {
55 $args = $this->getArgs($argstr, $request);
56 if (empty($this->source))
59 if (empty($WikiTheme->_asciiSVG)) {
60 $js = JavaScript('', array
61 ('src' => $WikiTheme->_findData('asciiSVG.js')));
62 if (empty($WikiTheme->_headers_printed))
63 $WikiTheme->addMoreHeaders($js);
65 $html->pushContent($js);
66 $WikiTheme->_asciiSVG = 1; // prevent duplicates
68 // we need script='data' and not script="data"
69 $embed = new AsciiSVG_HTML("embed",
70 array('width' => $args['width'],
71 'height' => $args['height'],
73 'script' => $this->source));
74 $html->pushContent($embed);
79 class AsciiSVG_HTML extends HtmlElement {
81 $start = "<" . $this->_tag;
83 foreach ($this->_attr as $attr => $val) {
89 $qval = str_replace("\"", '"', $this->_quote((string)$val));
90 if ($attr == 'script')
91 $start .= " $attr='$qval'";
93 $start .= " $attr=\"$qval\"";
100 // $Log: not supported by cvs2svn $
106 // c-hanging-comment-ender-p: nil
107 // indent-tabs-mode: nil