| 1 | 1420 | Luisehahne | <?php
 | 
      
        | 2 |  |  | /**
 | 
      
        | 3 |  |  |  *
 | 
      
        | 4 |  |  |  * @category        module
 | 
      
        | 5 |  |  |  * @package         droplets
 | 
      
        | 6 |  |  |  * @author          Ruud Eisinga (Ruud) John (PCWacht)
 | 
      
        | 7 |  |  |  * @author          WebsiteBaker Project
 | 
      
        | 8 |  |  |  * @copyright       2004-2009, Ryan Djurovich
 | 
      
        | 9 |  |  |  * @copyright       2009-2011, Website Baker Org. e.V.
 | 
      
        | 10 |  |  |  * @link			http://www.websitebaker2.org/
 | 
      
        | 11 |  |  |  * @license         http://www.gnu.org/licenses/gpl.html
 | 
      
        | 12 |  |  |  * @platform        WebsiteBaker 2.8.x
 | 
      
        | 13 |  |  |  * @requirements    PHP 5.2.2 and higher
 | 
      
        | 14 |  |  |  * @version         $Id$
 | 
      
        | 15 |  |  |  * @filesource		$HeadURL$
 | 
      
        | 16 |  |  |  * @lastmodified    $Date$
 | 
      
        | 17 |  |  |  *
 | 
      
        | 18 |  |  |  *	droplets are small codeblocks that are called from anywhere in the template.
 | 
      
        | 19 |  |  |  * 	To call a droplet just use [[dropletname]]. optional parameters for a droplet can be used like [[dropletname?parameter=value¶meter2=value]]\
 | 
      
        | 20 |  |  |  *
 | 
      
        | 21 |  |  |  *  1.0.2, bugfix, Reused the evalDroplet function so the extracted parameters will be only available within the scope of the eval and cleared when ready.
 | 
      
        | 22 |  |  |  *  1.0.3, optimize, reduce memory consumption, increase speed, remove CSS, enable nested droplets
 | 
      
        | 23 |  |  |  *
 | 
      
        | 24 |  |  |  */
 | 
      
        | 25 | 1503 | Luisehahne | /* -------------------------------------------------------- */
 | 
      
        | 26 |  |  | // Must include code to stop this file being accessed directly
 | 
      
        | 27 |  |  | if(!defined('WB_PATH')) {
 | 
      
        | 28 | 1420 | Luisehahne | 
 | 
      
        | 29 | 1503 | Luisehahne | 	require_once(dirname(dirname(dirname(__FILE__))).'/framework/globalExceptionHandler.php');
 | 
      
        | 30 |  |  | 	throw new IllegalFileException();
 | 
      
        | 31 |  |  | }
 | 
      
        | 32 |  |  | /* -------------------------------------------------------- */
 | 
      
        | 33 | 1723 | Luisehahne |     require_once(WB_PATH.'/framework/class.admin.php');
 | 
      
        | 34 | 1420 | Luisehahne | 	function do_eval($_x_codedata, $_x_varlist, &$wb_page_data)
 | 
      
        | 35 |  |  | 	{
 | 
      
        | 36 |  |  | 		extract($_x_varlist, EXTR_SKIP);
 | 
      
        | 37 |  |  | 		return(eval($_x_codedata));
 | 
      
        | 38 |  |  | 	}
 | 
      
        | 39 |  |  | 
 | 
      
        | 40 |  |  | 	function processDroplets( &$wb_page_data ) {
 | 
      
        | 41 |  |  | // collect all droplets from document
 | 
      
        | 42 |  |  | 		$droplet_tags = array();
 | 
      
        | 43 |  |  | 		$droplet_replacements = array();
 | 
      
        | 44 |  |  | 		if( preg_match_all( '/\[\[(.*?)\]\]/', $wb_page_data, $found_droplets ) )
 | 
      
        | 45 |  |  | 		{
 | 
      
        | 46 |  |  | 			foreach( $found_droplets[1] as $droplet )
 | 
      
        | 47 |  |  | 			{
 | 
      
        | 48 |  |  | 				if(array_key_exists( '[['.$droplet.']]', $droplet_tags) == false)
 | 
      
        | 49 |  |  | 				{
 | 
      
        | 50 |  |  | // go in if same droplet with same arguments is not processed already
 | 
      
        | 51 |  |  | 					$varlist = array();
 | 
      
        | 52 |  |  | // split each droplet command into droplet_name and request_string
 | 
      
        | 53 |  |  | 					$tmp = preg_split('/\?/', $droplet, 2);
 | 
      
        | 54 |  |  | 					$droplet_name = $tmp[0];
 | 
      
        | 55 |  |  | 					$request_string = (isset($tmp[1]) ? $tmp[1] : '');
 | 
      
        | 56 |  |  | 					if( $request_string != '' )
 | 
      
        | 57 |  |  | 					{
 | 
      
        | 58 |  |  | // make sure we can parse the arguments correctly
 | 
      
        | 59 |  |  | 						$request_string = html_entity_decode($request_string, ENT_COMPAT,DEFAULT_CHARSET);
 | 
      
        | 60 |  |  | // create array of arguments from query_string
 | 
      
        | 61 |  |  | 						$argv = preg_split( '/&(?!amp;)/', $request_string );
 | 
      
        | 62 |  |  | 						foreach ($argv as $argument)
 | 
      
        | 63 |  |  | 						{
 | 
      
        | 64 |  |  | // split argument in pair of varname, value
 | 
      
        | 65 |  |  | 							list( $variable, $value ) = explode('=', $argument,2);
 | 
      
        | 66 |  |  | 							if( !empty($value) )
 | 
      
        | 67 |  |  | 							{
 | 
      
        | 68 |  |  | // re-encode the value and push the var into varlist
 | 
      
        | 69 |  |  | 								$varlist[$variable] = htmlentities($value, ENT_COMPAT,DEFAULT_CHARSET);
 | 
      
        | 70 |  |  | 							}
 | 
      
        | 71 |  |  | 						}
 | 
      
        | 72 |  |  | 					}
 | 
      
        | 73 |  |  | 					else
 | 
      
        | 74 |  |  | 					{
 | 
      
        | 75 |  |  | // no arguments given, so
 | 
      
        | 76 |  |  | 						$droplet_name = $droplet;
 | 
      
        | 77 |  |  | 					}
 | 
      
        | 78 |  |  | // request the droplet code from database
 | 
      
        | 79 |  |  | 					$sql = 'SELECT `code` FROM `'.TABLE_PREFIX.'mod_droplets` WHERE `name` LIKE "'.$droplet_name.'" AND `active` = 1';
 | 
      
        | 80 |  |  | 					$codedata = $GLOBALS['database']->get_one($sql);
 | 
      
        | 81 |  |  | 					if (!is_null($codedata))
 | 
      
        | 82 |  |  | 					{
 | 
      
        | 83 |  |  | 						$newvalue = do_eval($codedata, $varlist, $wb_page_data);
 | 
      
        | 84 |  |  | // check returnvalue (must be a string of 1 char at least or (bool)true
 | 
      
        | 85 |  |  | 						if ($newvalue == '' && $newvalue !== true)
 | 
      
        | 86 |  |  | 						{
 | 
      
        | 87 |  |  | 							if(DEBUG === true)
 | 
      
        | 88 |  |  | 							{
 | 
      
        | 89 |  |  | 								$newvalue = '<span class="mod_droplets_err">Error in: '.$droplet.', no valid returnvalue.</span>';
 | 
      
        | 90 |  |  | 							}
 | 
      
        | 91 |  |  | 							else
 | 
      
        | 92 |  |  | 							{
 | 
      
        | 93 |  |  | 								$newvalue = true;
 | 
      
        | 94 |  |  | 							}
 | 
      
        | 95 |  |  | 						}
 | 
      
        | 96 |  |  | 						if ($newvalue === true) { $newvalue = ""; }
 | 
      
        | 97 |  |  | // remove any defined CSS section from code. For valid XHTML a CSS-section is allowed inside <head>...</head> only!
 | 
      
        | 98 |  |  | 						$newvalue = preg_replace('/<style.*>.*<\/style>/siU', '', $newvalue);
 | 
      
        | 99 |  |  | // push droplet-tag and it's replacement into Search/Replace array after executing only
 | 
      
        | 100 |  |  | 						$droplet_tags[]         = '[['.$droplet.']]';
 | 
      
        | 101 |  |  | 						$droplet_replacements[] = $newvalue;
 | 
      
        | 102 |  |  | 					}
 | 
      
        | 103 |  |  | 				}
 | 
      
        | 104 |  |  | 			}	// End foreach( $found_droplets[1] as $droplet )
 | 
      
        | 105 |  |  | // replace each Droplet-Tag with coresponding $newvalue
 | 
      
        | 106 |  |  | 			$wb_page_data = str_replace($droplet_tags, $droplet_replacements, $wb_page_data);
 | 
      
        | 107 |  |  | 		}
 | 
      
        | 108 |  |  | // returns TRUE if droplets found in content, FALSE if not
 | 
      
        | 109 |  |  | 		return( count($droplet_tags)!=0 );
 | 
      
        | 110 |  |  | 	}
 | 
      
        | 111 |  |  | 
 | 
      
        | 112 |  |  | 	function evalDroplets( &$wb_page_data, $max_loops = 3 ) {
 | 
      
        | 113 |  |  | 		$max_loops = ((int)$max_loops = 0 ? 3 : (int)$max_loops);
 | 
      
        | 114 |  |  | 		while( (processDroplets($wb_page_data) == true) && ($max_loops > 0))
 | 
      
        | 115 | 1723 | Luisehahne | 		{
 | 
      
        | 116 | 1420 | Luisehahne | 			$max_loops--;
 | 
      
        | 117 |  |  | 		}
 | 
      
        | 118 |  |  | 		return $wb_page_data;
 | 
      
        | 119 |  |  | 	}
 |