1 <?php
2 /*
3  * DokuWiki wolframalpha plugin
4  * 2011 Zahno Silvan
5  * Usage:
6  *
7  * {{wolfram>widget_id}}
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the LGNU Lesser General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * LGNU Lesser General Public License for more details.
18  *
19  * You should have received a copy of the LGNU Lesser General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
22  */
23 
24 
25 if(!defined('DOKU_INC')) define('DOKU_INC',realpath(dirname(__FILE__).'/../../').'/');
26 if(!defined('DOKU_PLUGIN')) define('DOKU_PLUGIN',DOKU_INC.'lib/plugins/');
27 require_once(DOKU_PLUGIN.'syntax.php');
28 
29 /**
30  * All DokuWiki plugins to extend the parser/rendering mechanism
31  * need to inherit from this class
32  */
33 class syntax_plugin_wolfram extends DokuWiki_Syntax_Plugin {
34 
35     /**
36      * return some info
37      */
38     function getInfo(){
39         return array(
40             'author' => 'Zahno Silvan',
41             'email'  => 'zaswiki@gmail.com',
42             'date'   => '2011-10-22',
43             'name'   => 'Wolfram Alpha Plugin',
44             'desc'   => 'Add Wolfram Alpha Widgets to your Wikipage',
45             'url'    => 'http://zawiki.zapto.org/doku.php/tschinz:dw_wolfram',
46         );
47     }
48 
49     /**
50      * What kind of syntax are we?
51      */
52     function getType(){
53         return 'substition';
54     }
55 
56     /**
57      * Where to sort in?
58      */
59     function getSort(){
60         return 299;
61     }
62 
63 
64     /**
65      * Connect pattern to lexer
66      */
67     function connectTo($mode) {
68       $this->Lexer->addSpecialPattern('\{\{wolfram>.*?\}\}',$mode,'plugin_wolfram');
69     }
70 
71     /**
72      * Handle the match
73      */
74     function handle($match, $state, $pos, &$handler){
75         switch ($state) {
76           case DOKU_LEXER_ENTER :
77             break;
78           case DOKU_LEXER_MATCHED :
79             break;
80           case DOKU_LEXER_UNMATCHED :
81             break;
82           case DOKU_LEXER_EXIT :
83             break;
84           case DOKU_LEXER_SPECIAL :
85             return $match;
86             break;
87         }
88         return array();
89     }
90 
91     /**
92      * Create output
93      */
94     function render($mode, &$renderer, $data) {
95         if($mode == 'xhtml'){
96 			// strip {{wolfram> from start
97 			$data = substr($data,10);
98             // strip }} from end
99 			$data = substr($data,0,-2);
100 			$pluginid = $data;
101 
102 			if (empty($pluginid))
103 			{
104 				$renderer->doc .= 'No plugin id value given';
105 				return true;
106 			}
107 
108 
109 			$renderer->doc .= '<script type="text/javascript" id="WolframAlphaScript'.$pluginid.'" src="http://www.wolframalpha.com/widget/widget.jsp?id='.$pluginid.'"></script>';
110 
111             return true;
112         }
113         return false;
114     }
115 }
116