• wsdl
• nusoap docs
• client
• test

DOWNLOAD

ISTRUZIONI:

• Estrarre il pacchetto (htdocs del vostro webserver)
• configurare il file config/config.php

	define('DB_HOST', '');//esempio localhost
	define('DB_USER', '');//esempio wscrud
	define('DB_NAME', '');//esempio wscrud
	define('DB_PWD', '');//esempio wscrud
	define('WSDL', '');//esempio http://maxb.net/scripts/wscrud/?wsdl

• creare il database e importare il dump presente in config/db.sql

LIBRERIE DA SCARICARE A PARTE:

1. adodb_lite
2. simpletest
3. nusoap

Una volta scaricate ed estratte le librerie dovranno essere inserite nella directory libs come nell’immagine.

Non sono un grande esperto di servizi. Mi è capitato di farne e di usufruirne.

Questa volta ho deciso di estrapolare dall’ultimo lavoro una sorta di scheletro.

Il servizio spiegato:

Inclusioni di librerie:

require_once(dirname(__FILE__) . '/libs/adodb_lite/adodb.inc.php');
require_once(dirname(__FILE__) . '/libs/nusoap-0.7.3/lib/nusoap.php');

require_once(dirname(__FILE__) . '/config/config.php');

require_once(dirname(__FILE__) . '/includes/exception.php');
require_once(dirname(__FILE__) . '/includes/application.php');
require_once(dirname(__FILE__) . '/includes/conn.php');
require_once(dirname(__FILE__) . '/includes/db.php');

Inizializzazione server (vedere il config per capire le costanti):

$server = new nusoap_server();
$server->configureWSDL(APP_NAME_SPACE,APP_TARGET_NAME_SPACE);
$server->wsdl->schemaTargetNamespace = APP_TARGET_NAME_SPACE;

Tipi complessi registrati:

$server->wsdl->addComplexType(
	'record',
	'complexType',
	'struct',
	'all',
	'',
	array(
		'id' => array('name'=>'id','type'=>'xsd:int'),
		'text' => array('name'=>'text','type'=>'xsd:string'),
	)
);

$server->wsdl->addComplexType(
	'array_of_record',
	'complexType',
	'array',
	'',
	'SOAP-ENC:Array',
	array(),
	array(array('ref'=>'SOAP-ENC:arrayType','wsdl:arrayType'=>'tns:record[]')),
	'tns:record'
);

I metodi esposti:

$server->register(
	'put_record',
	array('text'=>'xsd:string'),
	array('id'=>'xsd:int'),
	APP_URN,
       APP_URN . '#put_record',
       'rpc',
       'encoded',
	''
);

function put_record($text){
	try{
		$app = new MyApplication();
		return $app->dao->put_record($text);
	}catch(Exception $e){
		return new soap_fault($e->getCode(), 'server', $e->getMessage());
	}
}

$server->register(
	'search_record',
	array(
		'id'=>'xsd:int',
		'text'=>'xsd:string',
	),
	array('return'=>'tns:array_of_record'),
	APP_URN,
    APP_URN . '#search_record',
    'rpc',
    'encoded',
	''
);

function search_record($id, $text){
	try{
		$app = new MyApplication();
		return $app->dao->search_record($id, $text);
	}catch(Exception $e){
		return new soap_fault($e->getCode(), 'server', $e->getMessage());
	}
}

$server->register(
	'get_record',
	array('id'=>'xsd:int'),
	array('return'=>'tns:record'),
	APP_URN,
    APP_URN . '#get_record',
    'rpc',
    'encoded',
	''
);

function get_record($id){
	try{
		$app = new MyApplication();
		return $app->dao->get_record($id);
	}catch(Exception $e){
		return new soap_fault($e->getCode(), 'server', $e->getMessage());
	}
}

$server->register(
	'delete_record',
	array('id'=>'xsd:int'),
	array('return'=>'xsd:boolean'),
	APP_URN,
    APP_URN . '#delete_record',
    'rpc',
    'encoded',
	''
);

function delete_record($id){
	try{
		$app = new MyApplication();
		return $app->dao->delete_record($id);
	}catch(Exception $e){
		return new soap_fault($e->getCode(), 'server', $e->getMessage());
	}
}

$server->register(
	'update_record',
	array('id'=>'xsd:int', 'text' => 'xsd:string'),
	array('return'=>'xsd:boolean'),
	APP_URN,
    APP_URN . '#update_record',
    'rpc',
    'encoded',
	''
);

function update_record($id, $text){
	try{
		$app = new MyApplication();
		return $app->dao->update_record($id, $text);
	}catch(Exception $e){
		return new soap_fault($e->getCode(), 'server', $e->getMessage());
	}
}

L’output del “server”:

$HTTP_RAW_POST_DATA = isset($HTTP_RAW_POST_DATA) ? $HTTP_RAW_POST_DATA : file_get_contents("php://input");
$server->service($HTTP_RAW_POST_DATA);

Attenzione a quel file_get_contents(“php://input”);
Ho sclerato parecchio per far girare questo servizio sul mio hosting.

IL CLIENT

L’esempio del client VERAMENTE basico senza librerie senza divisioni.
GREZZO. Anche l’html. Giusto il form e il meta per la codifica di invio dei dati.

require_once(dirname(__FILE__) . '/../config/config.php');
error_reporting(E_ALL);
function get_client(){
	require_once(dirname(__FILE__) . '/../libs/nusoap-0.7.3/lib/nusoap.php');
	$url = WSDL;
	$client = new nusoap_client( $url, true );
	return $client;
}

$client = get_client();
$args = array();
$records = $client->call( 'search_record', $args );

if(isset($_POST['save'])){
	$_POST['text'] = stripslashes($_POST['text']);
	$client = get_client();
	if($_POST['id'] == 0){
		$args = array( 'text' => $_POST['text']);
		$result = $client->call( 'put_record', $args );
	}else{
		$args = array( 'id' => $_POST['id'], 'text' => $_POST['text']);
		$result = $client->call( 'update_record', $args );
	}
	header('Location:?do=index');
}
$do = isset($_GET['do']) ? $_GET['do'] : false;
$data = array('id' => 0, 'text' => '');
switch($do){
	case 'edit':
		$client = get_client();
		$args = array( 'id' => $_GET['id']);
		$data = $client->call( 'get_record', $args );
	break;
	case 'delete':
		$client = get_client();
		$args = array(  'id' => $_GET['id']);
		$result = $client->call( 'delete_record', $args );
		header('Location:?do=index');
	break;
}

<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
<form method="post" action="#">
<p><textarea name="text" id="text"><?php echo $data['text']?></textarea></p>
<p>
<input type="hidden" name="id" id="id" value="<?php echo $data['id'] ?>" />
<input type="submit" name="save" id="save" value="save" />
</p>
</form>
<table>
<thead>
<tr>
	<th>ID</th>
	<th>TEXT</th>
	<th>ACTIONS</th>
<tr>
</thead>
<?php if(isset($records[0])){ ?>
<tbody>
<?php foreach($records as $k => $v){ ?>
<tr>
	<td><?php echo $v['id']?></td>
	<td><?php echo $v['text']?></td>
	<td>
		<a href="?do=edit&amp;amp;id=<?php echo $v['id']?>">edit</a>
		<a href="?do=delete&amp;amp;id=<?php echo $v['id']?>">del</a>
	</td>
<tr>
<?php } ?>
</tbody>
<?php } ?>
<table>

All’interno della directory client troverete due client nativi (estensione soap del php5) : client2.php e client3.php.
Su questo hosting non girano.
Provateli se volete. client3.php usa il metodo “ufficiale” per chiamare i metodi remoti. NON FUNZIONA!

set_include_path(dirname(__FILE__) .'/lib/PEAR-1.7.2/:'.get_include_path());

require_once(dirname(__FILE__) . '/lib/PEAR-1.7.2/PEAR.php');
require_once(dirname(__FILE__) . '/lib/Log-1.11.3/Log.php');
require_once(dirname(__FILE__) . '/lib/Mail-1.2.0b1/Mail.php');

$env = 1;
switch($env){
	case 0://development
		define('MASK_ERROR', PEAR_LOG_DEBUG);
	break;
	case 1://production
		define('MASK_ERROR', PEAR_LOG_ERR);
	break;
}
define('APPLICATION_NAME', 'mylog');
define('MAIL_MASK_ERROR', PEAR_LOG_EMERG);
define('MAIL_WEBMASTER', 'MAILTO');
define('MAIL_FROM', 'MAILFROM');
define('LOG_FILE', dirname(__FILE__) . '/logs/'.APPLICATION_NAME.'.txt');
define('LOG_SIZE_ROTATION',1000000);

class MyPearLogComposite{

	public $logger;

	public function __construct(){
		$this->_check_rotate();
		$conf = array('mode' => 0600, 'timeFormat' => '%X %x');
		$file = &Log::singleton('file', LOG_FILE, APPLICATION_NAME , $conf);
		$mask = Log::MAX(MASK_ERROR);
		$file->setMask($mask);
		$conf = array('from' => MAIL_FROM,'subject' => APPLICATION_NAME . ' Important log events');
		$mail = &Log::singleton('mail', MAIL_WEBMASTER, APPLICATION_NAME, $conf);
		$mask = Log::MAX(MAIL_MASK_ERROR);
		$mail->setMask($mask);
		$this->logger = &Log::singleton('composite');
		$this->logger->addChild($file);
		$this->logger->addChild($mail);
	}
	private function _check_rotate(){
		$size = @filesize(LOG_FILE);
		if($size > LOG_SIZE_ROTATION)
        	$this->_rotate();

	}
	private function _rotate(){
		$file = LOG_FILE . '.' . date('Y-m-d');
        rename(LOG_FILE, $file);
	}
}

$log = new MyPearLogComposite();

$log->logger->log('log something');
$log->logger->log('log log');
$log->logger->log('log error', PEAR_LOG_ERR);
$log->logger->log('emergency', PEAR_LOG_EMERG);

//in development
//log file:
/*
12:32:30 24/04/2009 mylog [info] log something
12:32:30 24/04/2009 mylog [info] log log
12:32:30 24/04/2009 mylog [error] log error
12:32:30 24/04/2009 mylog [emergency] emergency
*/
//mail:
/*
To: MAILTO
Subject: mylog Important log events
From: MAILFROM
User-Agent: PEAR Log Package
Apr 24 12:40:25 mylog [emergency] emergency
*/

//in production
//log file:
/*
12:42:25 04/24/09 mylog [error] log error
12:42:25 04/24/09 mylog [emergency] emergency
*/
//mail:
/*
To: MAILTO
Subject: mylog Important log events
From: MAILFROM
User-Agent: PEAR Log Package
Apr 24 12:42:25 mylog [emergency] emergency
*/

Ecco come nel mio wiki aziendale riesco a prendere il feed di dilbert (la mia vignetta quotidiana di dilbert era ferma al 10 Maggio!):

* chiaramente questo proxy è implementato per trasmettere feed xml. non altro.

header('Pragma: public');
header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");                  // Date in the past
header('Last-Modified: '.gmdate('D, d M Y H:i:s') . ' GMT');
header('Cache-Control: no-store, no-cache, must-revalidate');     // HTTP/1.1
header('Cache-Control: pre-check=0, post-check=0, max-age=0');    // HTTP/1.1

header ("content-type: text/xml");

$params = array (
    'http' => array (
        'proxy' => 'tcp://proxy.azienda.it:80', // This needs to be the server and the port of the NTLM Authentication Proxy Server.
        'request_fulluri' => true,
        'header' => 'Cache-Control: no-store, no-cache, must-revalidate',
    )
);

$ctx = stream_context_create($params);
if(isset($_REQUEST['url'])){
    $url = $_REQUEST['url'];
    echo file_get_contents($url, false, $ctx);
}else{
    echo '<?xml version="1.0" encoding="UTF-8"?><nodata>1</nodata>';
}

exit ();

http://www.codinghorror.com/blog/archives/001119.html

The TIOBE community index I linked above? It’s written in PHP. Wikipedia, which is likely to be on the first page of anything you search for these days? Written in PHP. Digg, the social bookmarking service so wildly popular that a front page link can crush the beefiest of webservers? Written in PHP. WordPress, arguably the most popular blogging solution available at the moment? Written in PHP. YouTube, the most widely known video sharing site on the internet? Written in PHP. Facebook, the current billion-dollar zombie-poking social networking darling of venture capitalists everywhere? Written in PHP. (Update: While YouTube was originally written in PHP, it migrated to Python fairly early on, per Matt Cutts and Guido van Rossum.)

Notice a pattern here?

Some of the largest sites on the internet — sites you probably interact with on a daily basis — are written in PHP. If PHP sucks so profoundly, why is it powering so much of the internet?

The only conclusion I can draw is that building a compelling application is far more important than choice of language. While PHP wouldn’t be my choice, and if pressed, I might argue that it should never be the choice for any rational human being sitting in front of a computer, I can’t argue with the results.