From: Roan Kattouw <catrope@users.mediawiki.org>
Date: Tue, 16 Jun 2009 22:56:06 +0000 (+0000)
Subject: Adding wfParsePHP() to GlobalFunctions.php for use in the LocalisationUpdate extensio... 
X-Git-Tag: 1.31.0-rc.0~41339
X-Git-Url: http://git.cyclocoop.org/%7B%24www_url%7Dadmin/password.php?a=commitdiff_plain;h=f6ed098d04cbbfc678eafcd09a9586aa683c54c8;p=lhc%2Fweb%2Fwiklou.git

Adding wfParsePHP() to GlobalFunctions.php for use in the LocalisationUpdate extension (will update tomorrow).
---

diff --git a/includes/GlobalFunctions.php b/includes/GlobalFunctions.php
index 0505f0ebf1..427543f44d 100644
--- a/includes/GlobalFunctions.php
+++ b/includes/GlobalFunctions.php
@@ -3156,3 +3156,143 @@ function wfObjectToArray( $object, $recursive = true ) {
 	
 	return $array;
 }
+
+/**
+ * Safe equivalent of eval() that parses a statement of the form
+ * $varname = array( 'constant' => 'constant', ... ); or
+ * $varname = 'constant'; or
+ * $varname = 123;
+ * and refuses to execute anything.
+ *
+ * @return True on success ($varname set globally), false on failue
+ */
+function wfParsePHP( $php ) {
+	$tokens = token_get_all( "<?php $php" );
+	array_shift( $tokens ); // Discard <?php token
+	$token = array_shift( $tokens ); // $varname token
+	if ( @$token[0] == T_WHITESPACE )
+		$varToken = array_shift( $tokens ); // discard whitespace
+	if ( @$token[0] != T_VARIABLE )
+		return false;
+	$varname = substr( $token[1], 1 ); // discard leading $
+	
+	$token = array_shift( $tokens );
+	if ( @$token[0] == T_WHITESPACE )
+		$token = array_shift( $tokens ); // discard whitespace
+	if ( $token[0] != '=' )
+		return false;
+	
+	$isGood = true;
+	$varvalue = wfParsePHP_recursive( $tokens, $isGood );
+	if ( $isGood )
+		$GLOBALS[$varname] = $varvalue;
+	return $isGood;
+}
+
+function wfParsePHP_recursive( &$tokens, &$isGood ) {
+	$isGood = true;
+	$varvalue = null;
+	$token = array_shift( $tokens );
+	if ( @$token[0] == T_WHITESPACE )
+		$token = array_shift( $tokens ); // discard whitespace
+	if ( @$token[0] == T_ARRAY )
+		$vartype = 'array';
+	else if ( @$token[0] == T_CONSTANT_ENCAPSED_STRING )
+		$vartype = 'string';
+	else if ( @$token[0] == T_LNUMBER )
+		$vartype = 'integer';
+	else if ( @$token[0] == T_DNUMBER )
+		$vartype = 'float';
+	else if ( @$token[0] == T_STRING )
+		$vartype = 'other';
+	else
+		return $isGood = false;
+	
+	switch ( $vartype ) {
+		case 'string':
+			$varvalue = stripslashes( substr( $token[1], 1, -1 ) );
+		break;
+		case 'integer':
+			$base = 10;
+			if ( $token[1][0] == '0' ) {
+				if ( $token[1][1] == 'x' )
+					$base = 16;
+				else
+					$base = 8;
+			}
+			$varvalue = intval( $token[1], $base );
+		break;
+		case 'float':
+			$varvalue = (float)$token[1];
+		break;
+		case 'other':
+			if ( strcasecmp( $token[1], 'true' ) == 0 )
+				$varvalue = true;
+			else if ( strcasecmp( $token[1], 'false' ) == 0 )
+				$varvalue = false;
+			else if ( strcasecmp( $token[1], 'null' ) == 0 )
+				$varvalue = null;
+			else
+				return $isGood = false;
+		break;
+		case 'array':
+			$varvalue = array();
+			$token = array_shift( $tokens );
+			if ( @$token[0] == T_WHITESPACE )
+				$token = array_shift( $tokens ); // discard whitespace
+			if ( @$token != '(' )
+				return $isGood = false;
+			
+			$first = true;
+			while( true ) {
+				$token = array_shift( $tokens );
+				//if(!$first) { var_dump($token);var_dump($tokens);die(); }
+				if ( @$token[0] == T_WHITESPACE )
+					$token = array_shift( $tokens ); // discard whitespace
+				array_unshift( $tokens, $token );
+				//if(!$first) { var_dump($token);var_dump($tokens);die(); }
+				$recGood = true;
+				$key = null;
+				$val = wfParsePHP_recursive( $tokens, $recGood );
+				if ( !$recGood )
+					return $isGood = false;
+				//var_dump($key);var_dump($tokens);die();
+				$token = array_shift( $tokens );
+				if ( @$token[0] == T_WHITESPACE )
+					$token = array_shift( $tokens ); // discard whitespace
+				if ( @$token[0] == T_DOUBLE_ARROW ) {
+					$key = $val;
+					//die("2");
+					$token = array_shift( $tokens ); // discard =>
+					if ( @$token[0] == T_WHITESPACE )
+						$token = array_shift( $tokens );
+					//die("3");
+					array_unshift( $tokens, $token );
+					//var_dump($tokens);die();
+					$val = wfParsePHP_recursive( $tokens, $recGood );
+					//var_dump($val);var_dump($tokens);die();
+					if ( !$recGood )
+						return $isGood = false;
+					$token = array_shift( $tokens );
+				}
+				
+				if ( is_null( $key ) )
+					$varvalue[] = $val;
+				else
+					$varvalue[$key] = $val;
+				
+				if ( @$token[0] == T_WHITESPACE )
+					$token = array_shift( $tokens ); // discard whitespace
+				//var_dump($token);var_dump($tokens);die();
+				if ( $token == ')' )
+					break;
+				else if ( $token != ',' )
+					return $isGood = false;
+				$first = false;
+			}
+		break;
+		default:
+			return $isGood = false;
+	}
+	return $varvalue;
+}