<?php// $Id: discuss.php,v 1.5 2006/08/21 14:02:48 ggiunta Exp $	include("xmlrpc.inc");	include("xmlrpcs.inc");	$addcomment_sig=array(array($xmlrpcInt, $xmlrpcString, $xmlrpcString, $xmlrpcString));	$addcomment_doc='Adds a comment to an item. The first parameteris the item ID, the second the name of the commenter, and the thirdis the comment itself. Returns the number of comments against thatID.';	function addcomment($m)	{		global $xmlrpcerruser;		$err="";		// since validation has already been carried out for us,		// we know we got exactly 3 string values		$n = php_xmlrpc_decode($m);		$msgID = $n[0];		$name  = $n[1];		$comment = $n[2];		$dbh=dba_open("/tmp/comments.db", "c", "db2");		if($dbh)		{			$countID="${msgID}_count";			if(dba_exists($countID, $dbh))			{				$count=dba_fetch($countID, $dbh);			}			else			{				$count=0;			}			// add the new comment in			dba_insert($msgID . "_comment_${count}", $comment, $dbh);			dba_insert($msgID . "_name_${count}", $name, $dbh);			$count++;			dba_replace($countID, $count, $dbh);			dba_close($dbh);		}		else		{			$err="Unable to open comments database.";		}		// if we generated an error, create an error return response		if($err)		{			return new xmlrpcresp(0, $xmlrpcerruser, $err);		}		else		{			// otherwise, we create the right response			// with the state name			return new xmlrpcresp(new xmlrpcval($count, "int"));		}	}	$getcomments_sig=array(array($xmlrpcArray, $xmlrpcString));	$getcomments_doc='Returns an array of comments for a given ID, whichis the sole argument. Each array item is a struct containing nameand comment text.';	function getcomments($m)	{		global $xmlrpcerruser;		$err="";		$ra=array();		// get the first param		if(XMLRPC_EPI_ENABLED == '1')		{			$msgID=xmlrpc_decode($m->getParam(0));		}		else		{			$msgID=php_xmlrpc_decode($m->getParam(0));		}		$dbh=dba_open("/tmp/comments.db", "r", "db2");		if($dbh)		{			$countID="${msgID}_count";			if(dba_exists($countID, $dbh))			{				$count=dba_fetch($countID, $dbh);				for($i=0; $i<$count; $i++)				{					$name=dba_fetch("${msgID}_name_${i}", $dbh);					$comment=dba_fetch("${msgID}_comment_${i}", $dbh);					// push a new struct onto the return array					$ra[] = array(						"name" => $name,						"comment" => $comment						);				}			}		}		// if we generated an error, create an error return response		if($err)		{			return new xmlrpcresp(0, $xmlrpcerruser, $err);		}		else		{			// otherwise, we create the right response			// with the state name			return new xmlrpcresp(php_xmlrpc_encode($ra));		}	}	$s = new xmlrpc_server(array(		"discuss.addComment" => array(			"function" => "addcomment",			"signature" => $addcomment_sig,			"docstring" => $addcomment_doc		),		"discuss.getComments" => array(			"function" => "getcomments",			"signature" => $getcomments_sig,			"docstring" => $getcomments_doc		)	));?>