<?PHP
$DB_HOST = '10.0.0.2';
$DB_USER = 'root';
$DB_PASSWORD = 'pcmicie';
$DB_NAME = 'land_register';

$REGISTRATION_SERVER_KEY = '1234';

$ENABLE_LOG = 1;

$now = time();

/*
 * Copyright (c) Contributors, Pseudospace Virtual Worlds (http://www.pseudospace.net)
 * See CONTRIBUTORS.TXT for a full list of copyright holders.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *     * Redistributions of source code must retain the above copyright
 *       notice, this list of conditions and the following disclaimer.
 *     * Redistributions in binary form must reproduce the above copyright
 *       notice, this list of conditions and the following disclaimer in the
 *       documentation and/or other materials provided with the distribution.
 *     * Neither the name of the OpenSim Project nor the
 *       names of its contributors may be used to endorse or promote products
 *       derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY
 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED. IN NO EVENT SHALL THE CONTRIBUTORS BE LIABLE FOR ANY
 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */


//
// Search DB
//
mysql_connect ($DB_HOST, $DB_USER, $DB_PASSWORD);
mysql_select_db ($DB_NAME);


//File log function for testing:
function logToFile($filename, $msg)
{ 
	global $ENABLE_LOG;

	if($ENABLE_LOG == 1)
	{
		// open file
		$fd = fopen($filename, "a");
	
		// write string
		fwrite($fd, $msg . "\n");
	
		// close file
		fclose($fd);
	}
}


//Handles registration of each region
$xmlrpc_server = xmlrpc_server_create();

xmlrpc_server_register_method($xmlrpc_server, "RegisterRegion",  register);

function register($method_name, $params, $app_data)
{
	global $REGISTRATION_SERVER_KEY;
	$req = $params[0];
        
        logToFile("log", "Registering Region:" . $req['name'] . " on server " . $req['server'] . " with ID " . $req['uuid'] );
	
	if($req['key'] == $REGISTRATION_SERVER_KEY)
	{
		$exists = mysql_result(mysql_query("select count(regions.uuid) as region_count from regions where regions.uuid = '". $req['uuid'] ."';"), 0, "region_count");
	
		if($exists == 0)
		{
			mysql_query("insert into regions(uuid, server, name, estate_owner) values('" . $req['uuid'] . "', '" . $req['server'] ."', \"" . $req['name'] . "\", \"". $req['master']  ."\");");
			logToFile("log", "Region registration success. - Record inserted.");
		}

		if($exists == 1)
		{
			mysql_query("update regions set server = '". $req['server']  ."', name = \"". $req['name']  ."\", estate_owner = \"". $req['master']  ."\" where uuid = '". $req['uuid']  ."';");
			logToFile("log", "Region registration success. - Record updated.");
		}	

		if($exists > 1)
		{
			//mysql_query("delete");
			//mysql_query("insert");
			logToFile("log", "Multiple entries found.");
		}	

		$response_xml = xmlrpc_encode(array(
	                'success'         => True,
	                'errorMessage' => "",
	                'data' => $data
	        ));

	        print $response_xml;
	}
	else
	{
		logToFile("log", "Registering Region: Request denied!  Invalid key.");
		print "Access Denied.";
	}
}


//Handles registration of each parcel.
xmlrpc_server_register_method($xmlrpc_server, "RegisterNewParcel",  NewParcel);

function NewParcel($method_name, $params, $app_data)
{
	global $REGISTRATION_SERVER_KEY;
        $req = $params[0];

        logToFile("log", "Registering New Parcel:" . $req['uuid'] . " on server " . $req['sim'] . " size: " . $req['size'] . " prims: " . $req['prims'] );

        if($req['key'] == $REGISTRATION_SERVER_KEY)
        {
	        $exists = mysql_result(mysql_query("select count(land.uuid) as land_count from land where land.uuid = '". $req['uuid'] ."';"), 0, "land_count");

	        if($exists == 0)
	        {
	                mysql_query("insert into land(uuid, localID, region, name, size, prims, owner, claimed) values('" . $req['uuid'] . "', ". $req['localID']  .", '" . $req['sim'] ."', \"" . $req['name'] . "\", ". $req['size'] .", ". $req['prims'] .", '". $req['owner']  ."', ". $req['claimed']  .");");
	                logToFile("log", "Parcel registration success. - Record inserted.");
	        }

	        if($exists == 1)
	        {
	                mysql_query("update land set uuid = '". $req['uuid']  ."', localID = ". $req['localID'] .", region = '". $req['sim'] ."', name = \"". $req['name']  ."\", size = ". $req['size']  .", prims = ". $req['size']  .", owner = '". $req['owner']  ."', claimed = ". $req['claimed']  ." where uuid = '". $req['uuid']  ."';");
	                logToFile("log", "Parcel registration success. - Record updated.");
	        }

	        if($exists > 1)
	        {
	                //mysql_query("delete");
	                //mysql_query("insert");
	                logToFile("log", "Parcel reg: Multiple entries found.");
	        }

	        $response_xml = xmlrpc_encode(array(
	                'success'         => True,
	                'errorMessage' => "",
	                'data' => $data
	        ));

	        print $response_xml;
	}
        else
        {
                logToFile("log", "Registering Parcel: Request denied!  Invalid key.");
                print "Access Denied.";
        }

}


//Handles removal of parcels

xmlrpc_server_register_method($xmlrpc_server, "DeleteParcel",  DeleteParcel);

function DeleteParcel($method_name, $params, $app_data)
{
        global $REGISTRATION_SERVER_KEY;
        $req = $params[0];

        logToFile("log", "Deleting parcel:" . $req['uuid']);

        if($req['key'] == $REGISTRATION_SERVER_KEY)
        {
        	mysql_query("delete from land where uuid = '" . $req['uuid'] . "';");

	        $response_xml = xmlrpc_encode(array(
	                'success'         => True,
	                'errorMessage' => "",
	                'data' => $data
		        ));

        	print $response_xml;
	}
        else
        {
                logToFile("log", "Delete Parcel: Request denied!  Invalid key.");
                print "Access Denied.";
        }
	
}


$request_xml = $HTTP_RAW_POST_DATA;
xmlrpc_server_call_method($xmlrpc_server, $request_xml, '');
xmlrpc_server_destroy($xmlrpc_server);
?>