524011bfa6
bugged (r2297 was repeating new and old header). By the way, I've also removed the replacement keywords. We were using them because it was a common usage with CVS but it is advised not to use them with Subversion. Personnaly, it is a problem when I search differences between 2 Piwigo installations outside Subversion. git-svn-id: http://piwigo.org/svn/trunk@2299 68402e56-0260-453c-a942-63ccdbb3a9ee
619 lines
18 KiB
PHP
619 lines
18 KiB
PHP
<?php
|
|
// +-----------------------------------------------------------------------+
|
|
// | Piwigo - a PHP based picture gallery |
|
|
// +-----------------------------------------------------------------------+
|
|
// | Copyright(C) 2008 Piwigo Team http://piwigo.org |
|
|
// | Copyright(C) 2003-2008 PhpWebGallery Team http://phpwebgallery.net |
|
|
// | Copyright(C) 2002-2003 Pierrick LE GALL http://le-gall.net/pierrick |
|
|
// +-----------------------------------------------------------------------+
|
|
// | This program is free software; you can redistribute it and/or modify |
|
|
// | it under the terms of the GNU General Public License as published by |
|
|
// | the Free Software Foundation |
|
|
// | |
|
|
// | This program is distributed in the hope that it will be useful, but |
|
|
// | WITHOUT ANY WARRANTY; without even the implied warranty of |
|
|
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
|
|
// | General Public License for more details. |
|
|
// | |
|
|
// | You should have received a copy of the GNU General Public License |
|
|
// | along with this program; if not, write to the Free Software |
|
|
// | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, |
|
|
// | USA. |
|
|
// +-----------------------------------------------------------------------+
|
|
|
|
/**** WEB SERVICE CORE CLASSES************************************************
|
|
* PwgServer - main object - the link between web service methods, request
|
|
* handler and response encoder
|
|
* PwgRequestHandler - base class for handlers
|
|
* PwgResponseEncoder - base class for response encoders
|
|
* PwgError, PwgNamedArray, PwgNamedStruct - can be used by web service functions
|
|
* as return values
|
|
*/
|
|
|
|
|
|
define( 'WS_PARAM_ACCEPT_ARRAY', 0x010000 );
|
|
define( 'WS_PARAM_FORCE_ARRAY', 0x030000 );
|
|
define( 'WS_PARAM_OPTIONAL', 0x040000 );
|
|
|
|
define( 'WS_ERR_INVALID_METHOD', 1001 );
|
|
define( 'WS_ERR_MISSING_PARAM', 1002 );
|
|
define( 'WS_ERR_INVALID_PARAM', 1003 );
|
|
|
|
define( 'WS_XML_ATTRIBUTES', 'attributes_xml_');
|
|
define( 'WS_XML_CONTENT', 'content_xml_');
|
|
|
|
/**
|
|
* PwgError object can be returned from any web service function implementation.
|
|
*/
|
|
class PwgError
|
|
{
|
|
var $_code;
|
|
var $_codeText;
|
|
|
|
function PwgError($code, $codeText)
|
|
{
|
|
$this->_code = $code;
|
|
$this->_codeText = $codeText;
|
|
}
|
|
|
|
function code() { return $this->_code; }
|
|
function message() { return $this->_codeText; }
|
|
}
|
|
|
|
/**
|
|
* Simple wrapper around an array (keys are consecutive integers starting at 0).
|
|
* Provides naming clues for xml output (xml attributes vs. xml child elements?)
|
|
* Usually returned by web service function implementation.
|
|
*/
|
|
class PwgNamedArray
|
|
{
|
|
/*private*/ var $_content;
|
|
/*private*/ var $_itemName;
|
|
/*private*/ var $_xmlAttributes;
|
|
|
|
/**
|
|
* Constructs a named array
|
|
* @param arr array (keys must be consecutive integers starting at 0)
|
|
* @param itemName string xml element name for values of arr (e.g. image)
|
|
* @param xmlAttributes array of sub-item attributes that will be encoded as
|
|
* xml attributes instead of xml child elements
|
|
*/
|
|
function PwgNamedArray(&$arr, $itemName, $xmlAttributes=array() )
|
|
{
|
|
$this->_content = $arr;
|
|
$this->_itemName = $itemName;
|
|
$this->_xmlAttributes = array_flip($xmlAttributes);
|
|
}
|
|
}
|
|
/**
|
|
* Simple wrapper around a "struct" (php array whose keys are not consecutive
|
|
* integers starting at 0). Provides naming clues for xml output (what is xml
|
|
* attributes and what is element)
|
|
*/
|
|
class PwgNamedStruct
|
|
{
|
|
/*private*/ var $_content;
|
|
/*private*/ var $_name;
|
|
/*private*/ var $_xmlAttributes;
|
|
|
|
/**
|
|
* Constructs a named struct (usually returned by web service function
|
|
* implementation)
|
|
* @param name string - containing xml element name
|
|
* @param content array - the actual content (php array)
|
|
* @param xmlAttributes array - name of the keys in $content that will be
|
|
* encoded as xml attributes (if null - automatically prefer xml attributes
|
|
* whenever possible)
|
|
*/
|
|
function PwgNamedStruct($name, $content, $xmlAttributes=null, $xmlElements=null )
|
|
{
|
|
$this->_name = $name;
|
|
$this->_content = $content;
|
|
if ( isset($xmlAttributes) )
|
|
{
|
|
$this->_xmlAttributes = array_flip($xmlAttributes);
|
|
}
|
|
else
|
|
{
|
|
$this->_xmlAttributes = array();
|
|
foreach ($this->_content as $key=>$value)
|
|
{
|
|
if (!empty($key) and (is_scalar($value) or is_null($value)) )
|
|
{
|
|
if ( empty($xmlElements) or !in_array($key,$xmlElements) )
|
|
{
|
|
$this->_xmlAttributes[$key]=1;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Replace array_walk_recursive()
|
|
*
|
|
* @category PHP
|
|
* @package PHP_Compat
|
|
* @link http://php.net/function.array_walk_recursive
|
|
* @author Tom Buskens <ortega@php.net>
|
|
* @author Aidan Lister <aidan@php.net>
|
|
* @version $Revision$
|
|
* @since PHP 5
|
|
* @require PHP 4.0.6 (is_callable)
|
|
*/
|
|
if (!function_exists('array_walk_recursive')) {
|
|
function array_walk_recursive(&$input, $funcname)
|
|
{
|
|
if (!is_callable($funcname)) {
|
|
if (is_array($funcname)) {
|
|
$funcname = $funcname[0] . '::' . $funcname[1];
|
|
}
|
|
user_error('array_walk_recursive() Not a valid callback ' . $user_func,
|
|
E_USER_WARNING);
|
|
return;
|
|
}
|
|
|
|
if (!is_array($input)) {
|
|
user_error('array_walk_recursive() The argument should be an array',
|
|
E_USER_WARNING);
|
|
return;
|
|
}
|
|
|
|
$args = func_get_args();
|
|
|
|
foreach ($input as $key => $item) {
|
|
if (is_array($item)) {
|
|
array_walk_recursive($item, $funcname, $args);
|
|
$input[$key] = $item;
|
|
} else {
|
|
$args[0] = &$item;
|
|
$args[1] = &$key;
|
|
call_user_func_array($funcname, $args);
|
|
$input[$key] = $item;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Abstract base class for request handlers.
|
|
*/
|
|
class PwgRequestHandler
|
|
{
|
|
/** Virtual abstract method. Decodes the request (GET or POST) handles the
|
|
* method invocation as well as response sending.
|
|
*/
|
|
function handleRequest(&$server) { assert(false); }
|
|
}
|
|
|
|
/**
|
|
*
|
|
* Base class for web service response encoder.
|
|
*/
|
|
class PwgResponseEncoder
|
|
{
|
|
/** encodes the web service response to the appropriate output format
|
|
* @param response mixed the unencoded result of a service method call
|
|
*/
|
|
function encodeResponse($response) { assert(false); }
|
|
|
|
/** default "Content-Type" http header for this kind of response format
|
|
*/
|
|
function getContentType() { assert(false); }
|
|
|
|
/**
|
|
* returns true if the parameter is a 'struct' (php array type whose keys are
|
|
* NOT consecutive integers starting with 0)
|
|
*/
|
|
function is_struct(&$data)
|
|
{
|
|
if (is_array($data) )
|
|
{
|
|
if (range(0, count($data) - 1) !== array_keys($data) )
|
|
{ # string keys, unordered, non-incremental keys, .. - whatever, make object
|
|
return true;
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
/**
|
|
* removes all XML formatting from $response (named array, named structs, etc)
|
|
* usually called by every response encoder, except rest xml.
|
|
*/
|
|
function flattenResponse(&$response)
|
|
{
|
|
PwgResponseEncoder::_mergeAttributesAndContent($response);
|
|
PwgResponseEncoder::_removeNamedArray($response);
|
|
PwgResponseEncoder::_removeNamedStruct($response);
|
|
if (is_array($response))
|
|
{ // need to call 2 times (first time might add new arrays)
|
|
array_walk_recursive($response, array('PwgResponseEncoder', '_remove_named_callback') );
|
|
array_walk_recursive($response, array('PwgResponseEncoder', '_remove_named_callback') );
|
|
}
|
|
//print_r($response);
|
|
PwgResponseEncoder::_mergeAttributesAndContent($response);
|
|
}
|
|
|
|
/*private*/ function _remove_named_callback(&$value, $key)
|
|
{
|
|
do
|
|
{
|
|
$changed = 0;
|
|
$changed += PwgResponseEncoder::_removeNamedArray($value);
|
|
$changed += PwgResponseEncoder::_removeNamedStruct($value);
|
|
// print_r('walk '.$key."<br/>\n");
|
|
}
|
|
while ($changed);
|
|
}
|
|
|
|
/*private*/ function _mergeAttributesAndContent(&$value)
|
|
{
|
|
if ( !is_array($value) )
|
|
return;
|
|
/* $first_key = '';
|
|
if (count($value)) { $ak = array_keys($value); $first_key = $ak[0]; }
|
|
|
|
print_r( '_mergeAttributesAndContent is_struct='.PwgResponseEncoder::is_struct($value)
|
|
.' count='.count($value)
|
|
.' first_key='.$first_key
|
|
."<br/>\n"
|
|
);*/
|
|
$ret = 0;
|
|
if (PwgResponseEncoder::is_struct($value))
|
|
{
|
|
if ( isset($value[WS_XML_ATTRIBUTES]) )
|
|
{
|
|
$value = array_merge( $value, $value[WS_XML_ATTRIBUTES] );
|
|
unset( $value[WS_XML_ATTRIBUTES] );
|
|
$ret=1;
|
|
}
|
|
if ( isset($value[WS_XML_CONTENT]) )
|
|
{
|
|
$cont_processed = 0;
|
|
if ( count($value)==1 )
|
|
{
|
|
$value = $value[WS_XML_CONTENT];
|
|
$cont_processed=1;
|
|
}
|
|
else
|
|
{
|
|
if (PwgResponseEncoder::is_struct($value[WS_XML_CONTENT]))
|
|
{
|
|
$value = array_merge( $value, $value[WS_XML_CONTENT] );
|
|
unset( $value[WS_XML_CONTENT] );
|
|
$cont_processed=1;
|
|
}
|
|
}
|
|
$ret += $cont_processed;
|
|
if (!$cont_processed)
|
|
{
|
|
$value['_content'] = $value[WS_XML_CONTENT];
|
|
unset( $value[WS_XML_CONTENT] );
|
|
$ret++;
|
|
}
|
|
}
|
|
}
|
|
|
|
foreach ($value as $key=>$v)
|
|
{
|
|
if ( PwgResponseEncoder::_mergeAttributesAndContent($v) )
|
|
{
|
|
$value[$key]=$v;
|
|
$ret++;
|
|
}
|
|
}
|
|
return $ret;
|
|
}
|
|
|
|
/*private*/ function _removeNamedArray(&$value)
|
|
{
|
|
if ( strtolower( get_class($value) ) =='pwgnamedarray')
|
|
{
|
|
$value = $value->_content;
|
|
return 1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
/*private*/ function _removeNamedStruct(&$value)
|
|
{
|
|
if ( strtolower( get_class($value) ) =='pwgnamedstruct')
|
|
{
|
|
if ( isset($value->_content['']) )
|
|
{
|
|
$unknown = $value->_content[''];
|
|
unset( $value->_content[''] );
|
|
$value->_content[$value->_name] = $unknown;
|
|
}
|
|
$value = $value->_content;
|
|
return 1;
|
|
}
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
|
|
|
|
class PwgServer
|
|
{
|
|
var $_requestHandler;
|
|
var $_requestFormat;
|
|
var $_responseEncoder;
|
|
var $_responseFormat;
|
|
|
|
var $_methods;
|
|
var $_methodSignatures;
|
|
|
|
function PwgServer()
|
|
{
|
|
$methods = array();
|
|
}
|
|
|
|
/**
|
|
* Initializes the request handler.
|
|
*/
|
|
function setHandler($requestFormat, &$requestHandler)
|
|
{
|
|
$this->_requestHandler = &$requestHandler;
|
|
$this->_requestFormat = $requestFormat;
|
|
}
|
|
|
|
/**
|
|
* Initializes the request handler.
|
|
*/
|
|
function setEncoder($responseFormat, &$encoder)
|
|
{
|
|
$this->_responseEncoder = &$encoder;
|
|
$this->_responseFormat = $responseFormat;
|
|
}
|
|
|
|
/**
|
|
* Runs the web service call (handler and response encoder should have been
|
|
* created)
|
|
*/
|
|
function run()
|
|
{
|
|
if ( is_null($this->_responseEncoder) )
|
|
{
|
|
set_status_header(500);
|
|
@header("Content-Type: text/plain");
|
|
echo ("Cannot process your request. Unknown response format.
|
|
Request format: ".@$this->_requestFormat." handler:".$this->_requestHandler."
|
|
Response format: ".@$this->_responseFormat." encoder:".$this->_responseEncoder."
|
|
");
|
|
var_export($this);
|
|
die(0);
|
|
}
|
|
|
|
if ( is_null($this->_requestHandler) )
|
|
{
|
|
$this->sendResponse(
|
|
new PwgError(500, 'Unknown request format')
|
|
);
|
|
return;
|
|
}
|
|
|
|
$this->addMethod('reflection.getMethodList',
|
|
array('PwgServer', 'ws_getMethodList'),
|
|
null, '' );
|
|
$this->addMethod('reflection.getMethodDetails',
|
|
array('PwgServer', 'ws_getMethodDetails'),
|
|
array('methodName'),'');
|
|
|
|
trigger_action('ws_add_methods', array(&$this) );
|
|
uksort( $this->_methods, 'strnatcmp' );
|
|
$this->_requestHandler->handleRequest($this);
|
|
}
|
|
|
|
/**
|
|
* Encodes a response and sends it back to the browser.
|
|
*/
|
|
function sendResponse($response)
|
|
{
|
|
$encodedResponse = $this->_responseEncoder->encodeResponse($response);
|
|
$contentType = $this->_responseEncoder->getContentType();
|
|
|
|
@header('Content-Type: '.$contentType);
|
|
print_r($encodedResponse);
|
|
}
|
|
|
|
/**
|
|
* Registers a web service method.
|
|
* @param methodName string - the name of the method as seen externally
|
|
* @param callback mixed - php method to be invoked internally
|
|
* @param params array - map of allowed parameter names with optional default
|
|
* values and parameter flags. Example of $params:
|
|
* array( 'param1' => array('default'=>523, 'flags'=>WS_PARAM_FORCE_ARRAY) ) .
|
|
* Possible parameter flags are:
|
|
* WS_PARAM_ALLOW_ARRAY - this parameter can be an array
|
|
* WS_PARAM_FORCE_ARRAY - if this parameter is scalar, force it to an array
|
|
* before invoking the method
|
|
* @param description string - a description of the method.
|
|
*/
|
|
function addMethod($methodName, $callback, $params=array(), $description, $include_file='')
|
|
{
|
|
$this->_methods[$methodName] = $callback;
|
|
$this->_methodDescriptions[$methodName] = $description;
|
|
|
|
if (!is_array($params))
|
|
{
|
|
$params = array();
|
|
}
|
|
|
|
if ( range(0, count($params) - 1) === array_keys($params) )
|
|
{
|
|
$params = array_flip($params);
|
|
}
|
|
|
|
foreach( $params as $param=>$options)
|
|
{
|
|
if ( !is_array($options) )
|
|
{
|
|
$params[$param] = array('flags'=>0);
|
|
}
|
|
else
|
|
{
|
|
$flags = isset($options['flags']) ? $options['flags'] : 0;
|
|
if ( array_key_exists('default', $options) )
|
|
{
|
|
$flags |= WS_PARAM_OPTIONAL;
|
|
}
|
|
if ( $flags & WS_PARAM_FORCE_ARRAY )
|
|
{
|
|
$flags |= WS_PARAM_ACCEPT_ARRAY;
|
|
}
|
|
$options['flags'] = $flags;
|
|
$params[$param] = $options;
|
|
}
|
|
}
|
|
$this->_methodSignatures[$methodName] = $params;
|
|
}
|
|
|
|
function hasMethod($methodName)
|
|
{
|
|
return isset($this->_methods[$methodName]);
|
|
}
|
|
|
|
function getMethodDescription($methodName)
|
|
{
|
|
$desc = @$this->_methodDescriptions[$methodName];
|
|
return isset($desc) ? $desc : '';
|
|
}
|
|
|
|
function getMethodSignature($methodName)
|
|
{
|
|
$signature = @$this->_methodSignatures[$methodName];
|
|
return isset($signature) ? $signature : array();
|
|
}
|
|
|
|
/*static*/ function isPost()
|
|
{
|
|
return isset($HTTP_RAW_POST_DATA) or !empty($_POST);
|
|
}
|
|
|
|
/*static*/ function makeArrayParam(&$param)
|
|
{
|
|
if ( $param==null )
|
|
{
|
|
$param = array();
|
|
}
|
|
else
|
|
{
|
|
if (! is_array($param) )
|
|
{
|
|
$param = array($param);
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Invokes a registered method. Returns the return of the method (or
|
|
* a PwgError object if the method is not found)
|
|
* @param methodName string the name of the method to invoke
|
|
* @param params array array of parameters to pass to the invoked method
|
|
*/
|
|
function invoke($methodName, $params)
|
|
{
|
|
$callback = @$this->_methods[$methodName];
|
|
|
|
if ( $callback==null )
|
|
{
|
|
return new PwgError(WS_ERR_INVALID_METHOD, 'Method name "'.$methodName.'" is not valid');
|
|
}
|
|
|
|
// parameter check and data coercion !
|
|
$signature = @$this->_methodSignatures[$methodName];
|
|
$missing_params = array();
|
|
foreach($signature as $name=>$options)
|
|
{
|
|
$flags = $options['flags'];
|
|
if ( !array_key_exists($name, $params) )
|
|
{// parameter not provided in the request
|
|
if ( !($flags&WS_PARAM_OPTIONAL) )
|
|
{
|
|
$missing_params[] = $name;
|
|
}
|
|
else if ( array_key_exists('default',$options) )
|
|
{
|
|
$params[$name] = $options['default'];
|
|
if ( ($flags&WS_PARAM_FORCE_ARRAY) )
|
|
{
|
|
$this->makeArrayParam( $params[$name] );
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{// parameter provided - do some basic checks
|
|
$the_param = $params[$name];
|
|
if ( is_array($the_param) and ($flags&WS_PARAM_ACCEPT_ARRAY)==0 )
|
|
{
|
|
return new PwgError(WS_ERR_INVALID_PARAM, $name.' must be scalar' );
|
|
}
|
|
if ( ($flags&WS_PARAM_FORCE_ARRAY) )
|
|
{
|
|
$this->makeArrayParam( $the_param );
|
|
}
|
|
if ( isset($options['maxValue']) and $the_param>$options['maxValue'])
|
|
{
|
|
$the_param = $options['maxValue'];
|
|
}
|
|
$params[$name] = $the_param;
|
|
}
|
|
}
|
|
if (count($missing_params))
|
|
{
|
|
return new PwgError(WS_ERR_MISSING_PARAM, 'Missing parameters: '.implode(',',$missing_params));
|
|
}
|
|
$result = trigger_event('ws_invoke_allowed', true, $methodName, $params);
|
|
if ( strtolower( get_class($result) )!='pwgerror')
|
|
{
|
|
$result = call_user_func_array($callback, array($params, &$this) );
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* WS reflection method implementation: lists all available methods
|
|
*/
|
|
/*static*/ function ws_getMethodList($params, &$service)
|
|
{
|
|
return array('methods' => new PwgNamedArray( array_keys($service->_methods),'method' ) );
|
|
}
|
|
|
|
/**
|
|
* WS reflection method implementation: gets information about a given method
|
|
*/
|
|
/*static*/ function ws_getMethodDetails($params, &$service)
|
|
{
|
|
$methodName = $params['methodName'];
|
|
if (!$service->hasMethod($methodName))
|
|
{
|
|
return new PwgError(WS_ERR_INVALID_PARAM,
|
|
'Requested method does not exist');
|
|
}
|
|
$res = array(
|
|
'name' => $methodName,
|
|
'description' => $service->getMethodDescription($methodName),
|
|
'params' => array(),
|
|
);
|
|
$signature = $service->getMethodSignature($methodName);
|
|
foreach ($signature as $name => $options)
|
|
{
|
|
$param_data = array(
|
|
'name' => $name,
|
|
'optional' => ($options['flags']&WS_PARAM_OPTIONAL)?true:false,
|
|
'acceptArray' => ($options['flags']&WS_PARAM_ACCEPT_ARRAY)?true:false,
|
|
);
|
|
if (isset($options['default']))
|
|
{
|
|
$param_data['defaultValue'] = $options['default'];
|
|
}
|
|
$res['params'][] = $param_data;
|
|
}
|
|
return $res;
|
|
}
|
|
}
|
|
?>
|