patched xmlrpc.inc.php to enable i8 support

git-svn-id: http://wtorrent-project.googlecode.com/svn/trunk@101 5a4c1571-8183-a91d-cfd1-48c08a65d015

wtorrent/lib/xmlrpc/xmlrpc.inc.php

@@ -50,6 +50,8 @@
 	// Milosch: 2005/08/07 - explicitly request these via $GLOBALS where used.
 	$GLOBALS['xmlrpcI4']='i4';
 	$GLOBALS['xmlrpcInt']='int';
+	$GLOBALS['xmlrpcI8']='i8';
+	$GLOBALS['xmlrpcApache']='ex.i8';
 	$GLOBALS['xmlrpcBoolean']='boolean';
 	$GLOBALS['xmlrpcDouble']='double';
 	$GLOBALS['xmlrpcString']='string';
@@ -62,6 +64,8 @@
 	$GLOBALS['xmlrpcTypes']=array(
 		$GLOBALS['xmlrpcI4']       => 1,
 		$GLOBALS['xmlrpcInt']      => 1,
+		$GLOBALS['xmlrpcI8']       => 1,
+		$GLOBALS['xmlrpcApache']   => 1,
 		$GLOBALS['xmlrpcBoolean']  => 1,
 		$GLOBALS['xmlrpcString']   => 1,
 		$GLOBALS['xmlrpcDouble']   => 1,
@@ -75,6 +79,8 @@
 		'VALUE' => array('MEMBER', 'DATA', 'PARAM', 'FAULT'),
 		'BOOLEAN' => array('VALUE'),
 		'I4' => array('VALUE'),
+		'I8' => array('VALUE'),
+		'EX.I8' => array('VALUE'),
 		'INT' => array('VALUE'),
 		'STRING' => array('VALUE'),
 		'DOUBLE' => array('VALUE'),
@@ -433,6 +439,8 @@ function xmlrpc_se($parser, $name, $attrs, $accept_single_vals=false)
 					$GLOBALS['_xh']['php_class']=null;
 					break;
 				case 'I4':
+				case 'I8':
+				case 'EX.I8':
 				case 'INT':
 				case 'STRING':
 				case 'BOOLEAN':
@@ -600,6 +608,8 @@ function xmlrpc_ee($parser, $name, $rebuild_xmlrpcvals = true)
 					break;
 				case 'BOOLEAN':
 				case 'I4':
+				case 'I8':
+				case 'EX.I8':
 				case 'INT':
 				case 'STRING':
 				case 'DOUBLE':
@@ -2728,6 +2738,8 @@ function xmlrpcval($val=-1, $type='')
 						$this->me['string']=$val;
 						break;
 					case 'i4':
+					case 'i8':
+					case 'ex.i8':
 					case 'int':
 					case 'double':
 					case 'string':
@@ -2944,6 +2956,8 @@ function serializedata($typ, $val, $charset_encoding='')
 							break;
 						case $GLOBALS['xmlrpcInt']:
 						case $GLOBALS['xmlrpcI4']:
+						case $GLOBALS['xmlrpcI8']:
+						case $GLOBALS['xmlrpcApache']:
 							$rs.="<${typ}>".(int)$val."</${typ}>";
 							break;
 						case $GLOBALS['xmlrpcDouble']:
@@ -3159,7 +3173,7 @@ function scalartyp()
 		{
 			reset($this->me);
 			list($a,)=each($this->me);
-			if($a==$GLOBALS['xmlrpcI4'])
+			if($a==$GLOBALS['xmlrpcI4'] || $a==$GLOBALS['xmlrpcI8'] || $a==$GLOBALS['xmlrpcApache'])
 			{
 				$a=$GLOBALS['xmlrpcInt'];
 			}