/** @property string $password password of the local user */
protected $password = null;
-
+
/** @property bool $simple true if simple auth used */
protected $simple;
$response = $this->zend_server->handle();
/*
- $grrr = ob_get_clean();
- error_log($grrr);
+ error_log(ob_get_clean());
error_log($response);
*/
// session cleanup
}
/**
- * Set up zend serice class
+ * Set up zend service class
* @return void
*/
protected function init_zend_server() {
$this->session_cleanup($ex);
// now let the plugin send the exception to client
- $this->send_headers();
- echo $this->zend_server->fault($ex);
+ $this->send_error($ex);
// not much else we can do now, add some logging later
exit(1);
}
+ /**
+ * Send the error information to the WS client
+ * formatted as XML document.
+ * @param exception $ex
+ * @return void
+ */
+ protected function send_error($ex=null) {
+ $this->send_headers();
+ echo $this->zend_server->fault($ex);
+ }
+
/**
* Future hook needed for emulated sessions.
* @param exception $exception null means normal termination, $exception received when WS call failed
--- /dev/null
+<?php
+
+$webservice_soap_capabilities = array(
+
+ 'webservice/soap:use' => array(
+ 'captype' => 'read', // in fact this may be considered read and write at the same time
+ 'contextlevel' => CONTEXT_COURSE, // the context level should be probably CONTEXT_MODULE
+ 'legacy' => array(
+ ),
+ ),
+
+);
+++ /dev/null
-<?php
-/**
- * Moodle - Modular Object-Oriented Dynamic Learning Environment
- * http://moodle.com
- *
- * LICENSE
- *
- * 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; either version 2 of the License, or
- * (at your option) any later version.
- *
- * 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:
- *
- * http://www.gnu.org/copyleft/gpl.html
- *
- * @category Moodle
- * @package webservice
- * @copyright Copyright (c) 1999 onwards Martin Dougiamas http://dougiamas.com
- * @license http://www.gnu.org/copyleft/gpl.html GNU GPL License
- */
-
-
-/*
- * SOAP server class
- */
-
-require_once($CFG->dirroot.'/webservice/lib.php');
-
-final class soap_server extends webservice_server {
-
- public function __construct() {
- $this->set_protocolname("Soap");
- $this->set_protocolid("soap");
- }
-
-
- /**
- * Run Zend SOAP server
- * @global <type> $CFG
- * @global <type> $USER
- */
- public function run() {
- $enable = $this->get_enable();
- if (empty($enable)) {
- die;
- }
- global $CFG, $DB;
- //include_once "Zend/Loader/Autoloader.php";
- //Zend_Loader_Autoloader::autoload('Zend_Loader');
-
- include_once "Zend/Soap/Server.php";
- include_once "Zend/Soap/AutoDiscover.php";
-
- // retrieve the token from the url
- // if the token doesn't exist, set a class containing only get_token()
- $token = optional_param('token',null,PARAM_ALPHANUM);
-
-
- ///this is a hack, because there is a bug in Zend framework (http://framework.zend.com/issues/browse/ZF-5736)
- if (empty($token)) {
- $relativepath = get_file_argument();
- $args = explode('/', trim($relativepath, '/'));
- if (count($args) == 2) {
- $token = (integer)$args[0];
- $classpath = $args[1];
- }
- }
-
- if (empty($token)) {
-
- if(isset($_GET['wsdl'])) {
- $autodiscover = new Zend_Soap_AutoDiscover();
- /*
- $autodiscover->setComplexTypeStrategy('Zend_Soap_Wsdl_Strategy_ArrayOfTypeComplex');
- $autodiscover->setOperationBodyStyle(
- array('use' => 'literal',
- 'namespace' => $CFG->wwwroot)
- );
-
- $autodiscover->setBindingStyle(
- array('style' => 'rpc')
- );
-*/
- $autodiscover->setClass('ws_authentication');
- $autodiscover->handle();
- } else {
- $soap = new Zend_Soap_Server($CFG->wwwroot."/webservice/soap/server.php?wsdl=true"); // this current file here
-
- $soap->registerFaultException('moodle_exception');
-
- $soap->setClass('ws_authentication');
- $soap->handle();
- }
- } else { // if token exist, do the authentication here
- /// TODO: following function will need to be modified
- $user = webservice_lib::mock_check_token($token);
- // varlog($user);
- if (empty($user)) {
- throw new moodle_exception('wrongidentification');
- } else {
- /// TODO: probably change this
- global $USER;
- $USER = $user;
- }
-
- //load the service functions that the user can access
- $sql = 'SELECT f.id, f.classname, f.classpath, f.methodname FROM {external_functions} f, {external_services} s, {external_services_functions} sf, {external_services_users} su
- WHERE s.enabled = 1 AND f.id = sf.id AND sf.externalserviceid = su.externalserviceid AND s.id = su.externalserviceid AND su.userid = ?';
- $functions = $DB->get_records_sql($sql,array($USER->id));
- $classlist = array(); //key is the classname, value is the class path
- foreach($functions as $function) {
- $classlist[$function->classname] = $function->classpath;
- }
- //varlog('List of services that '.$USER->username.' can access:');
- //varlog($classlist);
-
- /// run the server
- if(isset($_GET['wsdl'])) {
- $autodiscover = new Zend_Soap_AutoDiscover();
-
- //this is a hack, because there is a bug in Zend framework (http://framework.zend.com/issues/browse/ZF-5736)
- $autodiscover->setUri($CFG->wwwroot."/webservice/soap/server.php/".$token);
-
- //we loading all class contaning the requested function
- foreach ($classlist as $classname => $classpath) {
- require_once($CFG->dirroot."/".$classpath);
- $autodiscover->setClass($classname);
- }
-
- //$autodiscover->setClass($classpath."_external");
- $autodiscover->handle();
- } else {
- $soap = new Zend_Soap_Server($CFG->wwwroot."/webservice/soap/server.php?token=".$token."&wsdl"); // this current file here
- foreach ($classlist as $classname => $classpath) {
- require_once($CFG->dirroot."/".$classpath);
- $soap->setClass($classname);
- }
- $soap->registerFaultException('moodle_exception');
- $soap->handle();
- }
- }
- }
-
-}
-
-
-?>
--- /dev/null
+<?php
+
+// This file is part of Moodle - http://moodle.org/
+//
+// Moodle 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, either version 3 of the License, or
+// (at your option) any later version.
+//
+// Moodle 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 Moodle. If not, see <http://www.gnu.org/licenses/>.
+
+/**
+ * SOAP web service implementation classes and methods.
+ *
+ * @package webservice
+ * @copyright 2009 Moodle Pty Ltd (http://moodle.com)
+ * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+
+require_once("$CFG->dirroot/webservice/lib.php");
+
+/**
+ * SOAP service server implementation.
+ * @author Petr Skoda (skodak)
+ */
+class webservice_soap_server extends webservice_zend_server {
+ /**
+ * Contructor
+ * @param bool $simple use simple authentication
+ */
+ public function __construct($simple) {
+ // must not cache wsdl - the list of functions is created on the fly
+ ini_set('soap.wsdl_cache_enabled', '0');
+ require_once 'Zend/Soap/Server.php';
+ require_once 'Zend/Soap/AutoDiscover.php';
+
+ if (optional_param('wsdl', 0, PARAM_BOOL)) {
+ parent::__construct($simple, 'Zend_Soap_AutoDiscover');
+ } else {
+ parent::__construct($simple, 'Zend_Soap_Server');
+ }
+ $this->wsname = 'soap';
+ }
+
+ /**
+ * Set up zend service class
+ * @return void
+ */
+ protected function init_zend_server() {
+ global $CFG;
+
+ parent::init_zend_server();
+
+ if ($this->simple) {
+ $username = optional_param('wsusername', '', PARAM_RAW);
+ $password = optional_param('wspassword', '', PARAM_RAW);
+ // aparently some clients and zend soap server does not work well with "&" in urls :-(
+ //TODO: report error if slasharguments disabled
+ $url = $CFG->wwwroot.'/webservice/soap/simpleserver.php/'.urlencode($username).'/'.urlencode($password);
+ // the Zend server is using this uri directly in xml - weird :-(
+ $this->zend_server->setUri(htmlentities($url));
+ } else {
+ die('TODO: not implemented yet');
+ }
+
+ if (!optional_param('wsdl', 0, PARAM_BOOL)) {
+ $this->zend_server->setReturnResponse(true);
+ //TODO: the error handling in Zend Soap server is useless, XML-RPC is much, much better :-(
+ $this->zend_server->registerFaultException('moodle_exception');
+ }
+ }
+
+ /**
+ * This method parses the $_REQUEST superglobal and looks for
+ * the following information:
+ * 1/ user authentication - username+password or token (wsusername, wspassword and wstoken parameters)
+ *
+ * @return void
+ */
+ protected function parse_request() {
+ parent::parse_request();
+
+ if (!$this->username or !$this->password) {
+ //note: this is the workaround for the trouble with & in soap urls
+ $authdata = get_file_argument();
+ $authdata = explode('/', trim($authdata, '/'));
+ if (count($authdata) == 2) {
+ list($this->username, $this->password) = $authdata;
+ }
+ }
+ }
+
+ /**
+ * Send the error information to the WS client
+ * formatted as XML document.
+ * @param exception $ex
+ * @return void
+ */
+ protected function send_error($ex=null) {
+ // Zend Soap server fault handling is incomplete compared to XML-RPC :-(
+ // we can not use: echo $this->zend_server->fault($ex);
+ //TODO: send some better response in XML
+ if ($ex) {
+ $info = $ex->getMessage();
+ if (debugging() and isset($ex->debuginfo)) {
+ $info .= ' - '.$ex->debuginfo;
+ }
+ } else {
+ $info = 'Unknown error';
+ }
+
+ $xml = '<?xml version="1.0" encoding="UTF-8"?>
+<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/">
+<SOAP-ENV:Body><SOAP-ENV:Fault>
+<faultcode>MOODLE:error</faultcode>
+<faultstring>'.$info.'</faultstring>
+</SOAP-ENV:Fault></SOAP-ENV:Body></SOAP-ENV:Envelope>';
+
+ $this->send_headers();
+ header('Content-Type: application/xml');
+ header('Content-Disposition: inline; filename="response.xml"');
+
+ echo $xml;
+ }
+}
+
+/**
+ * SOAP test client class
+ */
+class webservice_soap_test_client implements webservice_test_client_interface {
+ /**
+ * Execute test client WS request
+ * @param string $serverurl
+ * @param string $function
+ * @param array $params
+ * @return mixed
+ */
+ public function simpletest($serverurl, $function, $params) {
+ //zend expects 0 based array with numeric indexes
+ $params = array_values($params);
+ require_once 'Zend/Soap/Client.php';
+ $client = new Zend_Soap_Client($serverurl.'&wsdl=1');
+ return $client->__call($function, $params);
+ }
+}
<?php
+
+// This file is part of Moodle - http://moodle.org/
+//
+// Moodle 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, either version 3 of the License, or
+// (at your option) any later version.
+//
+// Moodle 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 Moodle. If not, see <http://www.gnu.org/licenses/>.
+
/**
- * Moodle - Modular Object-Oriented Dynamic Learning Environment
- * http://moodle.com
- *
- * LICENSE
- *
- * 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; either version 2 of the License, or
- * (at your option) any later version.
+ * SOAP web service entry point. The authentication is done via tokens.
*
- * 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:
- *
- * http://www.gnu.org/copyleft/gpl.html
- *
- * @category Moodle
* @package webservice
- * @copyright Copyright (c) 1999 onwards Martin Dougiamas http://dougiamas.com
- * @license http://www.gnu.org/copyleft/gpl.html GNU GPL License
+ * @copyright 2009 Moodle Pty Ltd (http://moodle.com)
+ * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/
+define('NO_MOODLE_COOKIES', true);
-/*
- * SOAP server
- */
-require_once(dirname(__FILE__) . '/../../config.php');
-require_once('lib.php');
-ini_set("soap.wsdl_cache_enabled", "0"); //must not cache wsdl
-if (empty($CFG->enablewebservices)) {
+require('../../config.php');
+require_once("$CFG->dirroot/webservice/soap/locallib.php");
+
+if (!webservice_protocol_is_enabled('soap')) {
die;
}
-$server = new soap_server();
+$server = new webservice_soap_server(true);
$server->run();
+die;
-?>
\ No newline at end of file
--- /dev/null
+<?php
+
+// This file is part of Moodle - http://moodle.org/
+//
+// Moodle 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, either version 3 of the License, or
+// (at your option) any later version.
+//
+// Moodle 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 Moodle. If not, see <http://www.gnu.org/licenses/>.
+
+/**
+ * XML-RPC web service entry point. The authentication is done via tokens.
+ *
+ * @package webservice
+ * @copyright 2009 Moodle Pty Ltd (http://moodle.com)
+ * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
+ */
+
+define('NO_MOODLE_COOKIES', true);
+
+require('../../config.php');
+require_once("$CFG->dirroot/webservice/soap/locallib.php");
+
+//ob_start();
+
+//TODO: for now disable all mess in xml
+/*
+ini_set('display_errors', '0');
+ini_set('log_errors', '1');
+$CFG->debugdisplay = false;
+*/
+if (!webservice_protocol_is_enabled('soap')) {
+ die;
+}
+
+$server = new webservice_soap_server(true);
+$server->run();
+die;
+
+
+++ /dev/null
-<?php
-/**
- * Moodle - Modular Object-Oriented Dynamic Learning Environment
- * http://moodle.com
- *
- * LICENSE
- *
- * 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; either version 2 of the License, or
- * (at your option) any later version.
- *
- * 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:
- *
- * http://www.gnu.org/copyleft/gpl.html
- *
- * @category Moodle
- * @package webservice
- * @copyright Copyright (c) 1999 onwards Martin Dougiamas http://dougiamas.com
- * @license http://www.gnu.org/copyleft/gpl.html GNU GPL License
- */
-
-
-/*
- * Zend Soap sclient
- */
-
-require_once('../../../../config.php');
-require_once('../../lib.php');
-
-
-ini_set("soap.wsdl_cache_enabled", "0");
-include_once "Zend/Soap/Client.php";
-
-$PAGE->set_course($COURSE);
-$PAGE->set_url('webservice/soap/testclient/zend/zend_soap_client.php');
-$PAGE->set_generaltype("form");
-
-///Display Moodle page header
-$PAGE->set_title('Soap test client');
-$PAGE->set_heading('Soap test client');
-echo $OUTPUT->header();
-//print_header('Soap test client', 'Soap test client'.":", true);
-
-/// check that webservices are enable into your Moodle
-/// WARNING: it makes sens here only because this client runs on the same machine as the
-/// server, if you change the WSDL url, please comment the following if statement
-if (!webservice_lib::display_webservices_availability("soap")) {
- echo "<br/><br/>";
- echo "Please fix the previous problem(s), the testing session has been interupted.";
- echo $OUTPUT->footer();
- // print_footer();
- exit();
-}
-
-/// Following some code in order to print the authentication WSDL into the end of the source code page
-/*
- $client = new Zend_Http_Client($CFG->wwwroot."/webservice/soap/server.php?wsdl", array(
- 'maxredirects' => 0,
- 'timeout' => 30));
- $response = $client->request();
- $wsdl = $response->getBody();
- print $wsdl;
- exit();
-*/
-
-
-/// authenticate => get a conversation token from the server
-/// You need a wsuser/wspassword user in the remote Moodle
-$client = new Zend_Soap_Client($CFG->wwwroot."/webservice/soap/server.php?wsdl=true");
-try {
-
- $params = new stdClass();
- $params->username = 'wsuser';
- $params->password = 'wspassword';
- $token = $client->get_token($params);
-
- print "<pre>\n";
- print "<br><br><strong>Token: </strong>".$token;
- print "</pre>";
-} catch (exception $exception) {
- print "<br><br><strong>An exception occured during authentication: \n</strong>";
- print "<pre>\n";
- print $exception;
- print "</pre>";
- printLastRequestResponse($client);
-}
-
-/// Following some code in order to print the WSDL into the end of the source code page
-/// Change the classpath to get specific service
-/**
- $client = new Zend_Http_Client($CFG->wwwroot."/webservice/soap/server.php?token=".$token."&classpath=user&wsdl", array(
- 'maxredirects' => 0,
- 'timeout' => 30));
- $response = $client->request();
- $wsdl = $response->getBody();
- print $wsdl;
- exit();
- **/
-
-
-/// build the Zend SOAP client from the remote WSDL
-$client = new Zend_Soap_Client($CFG->wwwroot."/webservice/soap/server.php?token=".$token."&wsdl=true");
-print "<br><br><strong>You are accessing the WSDL: </strong>";
-print "<br><br>".$CFG->wwwroot."/webservice/soap/server.php?token=".$token."&classpath=user&wsdl<br>";
-
-/// Get any user with string "admin"
-//print "<br><br><strong>Get users:</strong>";
-//print "<pre>\n";
-//try {
-// $params = new stdClass();
-// $params->search = "admin";
-// var_dump($client->get_users($params));
-//} catch (exception $exception) {
-// print $exception;
-// print "<br><br><strong>An exception occured: \n</strong>";
-// printLastRequestResponse($client);
-//}
-//print "</pre>";
-
-/// Create a user with "mockuser66" username
-print "<br><br><strong>Create user:</strong>";
-print "<pre>\n";
-try {
- $user = array();
- $user['password'] = "password6";
- $user['email'] = "mockuser6@mockuser6.com";
- $user['username'] = "mockuser66";
- $user['firstname'] = "firstname6";
- $user['lastname'] = "lastname6";
- $params = new stdClass();
- $params->users = array($user);
- $userlist = array();
- $userlist[] = $user;
- var_dump($client->create_users($userlist));
-} catch (exception $exception) {
- print $exception;
- print "<br><br><strong>An exception occured: \n</strong>";
- //printLastRequestResponse($client);
-}
-print "</pre>";
-
-///// Update this user
-//print "<br><br><strong>Update user:</strong>";
-//print "<pre>\n";
-//try {
-// $usertoupdate = new stdClass();
-// $usertoupdate->email = "mockuser6@mockuser6.com";
-// $usertoupdate->username = "mockuser66";
-// $usertoupdate->newusername = 'mockuser6b';
-// $usertoupdate->firstname = "firstname6b";
-// $params = new stdClass();
-// $params->users = array($usertoupdate);
-// var_dump($client->update_users($params));
-//} catch (exception $exception) {
-// print $exception;
-// print "<br><br><strong>An exception occured: \n</strong>";
-// printLastRequestResponse($client);
-//}
-//print "</pre>";
-//
-///// Delete this user
-//print "<br><br><strong>Delete user:</strong>";
-//print "<pre>\n";
-//try {
-// $params = new stdClass();
-// $params->usernames = array("mockuser6b");
-// var_dump($client->delete_users($params));
-//} catch (exception $exception) {
-// print $exception;
-// print "<br><br><strong>An exception occured: \n</strong>";
-// printLastRequestResponse($client);
-//}
-//print "</pre>";
-
-/// Display Moodle page footer
-echo $OUTPUT->footer();
-//print_footer();
-
-
-/**
- * Display the last request
- * @param <type> $client
- */
-function printLastRequestResponse($client) {
- print "<pre>\n";
- print "Request :\n".htmlspecialchars($client->__getLastRequest()) ."\n";
- print "Response:\n".htmlspecialchars($client->__getLastResponse())."\n";
- print "</pre>";
-}
-
-?>
\ No newline at end of file
--- /dev/null
+<?php
+
+$plugin->version = 2009101900;
}
/**
- * Set up zend serice class
+ * Set up zend service class
* @return void
*/
protected function init_zend_server() {