system/classes/xmlrpcutils.php

<?php
namespace Habari;
class XMLRPCUtils
{

  public static function encode_arg( $params, $arg )
  {
    switch ( true ) {
      case is_array( $arg ):
        $data = $params->addchild( 'value' )->addchild( 'array' )->addchild( 'data' );
        foreach ( $arg as $element ) {
          self::encode_arg( $data, $element );
        }
        break;
      case ( $arg instanceof XMLRPCDate ):
        $params->addchild( 'value' )->addchild( 'dateTime.iso8601', date( 'c', $arg->date ) );
        break;
      case ( $arg instanceof XMLRPCBinary ):
        $params->addchild( 'value' )->addchild( 'base64', base64_encode( $arg->data ) );
        break;
      case ( $arg instanceof XMLRPCStruct ):
        $struct = $params->addchild( 'value' )->addchild( 'struct' );
        $object_vars = $arg->get_fields();
        foreach ( $object_vars as $field ) {
          $member = $struct->addchild( 'member' );
          $member->addchild( 'name', $field );
          self::encode_arg( $member, $arg->$field );
        }
        break;
      case is_object( $arg ):
        $struct = $params->addchild( 'value' )->addchild( 'struct' );
        $object_vars = get_object_vars( $arg );
        foreach ( $object_vars as $key=>$value ) {
          $member = $struct->addchild( 'member' );
          $member->addchild( 'name', $key );
          self::encode_arg( $member, $value );
        }
        break;
      case is_integer( $arg ):
        $params->addchild( 'value' )->addchild( 'i4', $arg );
        break;
      case is_bool( $arg ):
        $params->addchild( 'value' )->addchild( 'boolean', $arg ? '1' : '0' );
        break;
      case is_string( $arg ):
        $params->addchild( 'value' )->addchild( 'string', $arg );
        break;
      case is_float( $arg ):
        $params->addchild( 'value' )->addchild( 'double', $arg );
        break;
    }
  }
  
  public static function decode_args( $value )
  {
    if ( count( $value->children() ) ) {
      $value = $value->xpath( '*' );
      $value = $value[0];
    }
    switch ( $value->getName() ) {
      case 'data':
      case 'array':
        $result_array = array();
        foreach ( $value->xpath( '//data/value' ) as $array_value ) {
          $result_array[] = self::decode_args( $array_value );
        }
        return $result_array;
        break;
      case 'struct':
        $result_struct = new XMLRPCStruct();
        foreach ( $value->xpath( '//member' ) as $struct_value ) {
          $property_name = (string) $struct_value->name;
          $children = $struct_value->value->children();
          if ( count( $children ) > 0 ) {
            $result_struct->$property_name = self::decode_args( $children[0] );
          }
          else {
            $result_struct->$property_name = (string) $struct_value->value;
          }
        }
        return $result_struct;
        break;
      case 'string':
        return (string) $value;
      case 'i4':
      case 'integer':
        return (int) $value;
      case 'double':
        return (double) $value;
      case 'boolean':
        return ( (int) $value == 1 ) ? true : false;
      case 'dateTime.iso8601':
        return strtotime( (string) $value );
      default:
        return (string) $value;
    }
  }

}

?>