From d0fef127af16c8976d6b23e3131f1aadc8a8f31e Mon Sep 17 00:00:00 2001
From: Chris Forbes <chrisf@ijw.co.nz>
Date: Fri, 12 Mar 2010 23:40:14 +1300
Subject: [PATCH] added PHP master server

---
 web/master/create.php | 14 ++++++++++++++
 web/master/list.php   | 26 ++++++++++++++++++++++++++
 web/master/ping.php   | 30 ++++++++++++++++++++++++++++++
 3 files changed, 70 insertions(+)
 create mode 100644 web/master/create.php
 create mode 100644 web/master/list.php
 create mode 100644 web/master/ping.php

diff --git a/web/master/create.php b/web/master/create.php
new file mode 100644
index 0000000000..fb5f2abbec
--- /dev/null
+++ b/web/master/create.php
@@ -0,0 +1,14 @@
+<?php
+
+	if ($db = sqlite_open('openra.db', 0666, $e))
+	{
+		echo 'sqlite_open ok.';
+		sqlite_query( $db, 'CREATE TABLE servers (name varchar(255), address varchar(255), players integer, state integer, ts integer)' );
+		sqlite_close( $db );
+	}
+	else
+	{
+		echo $e;
+	}
+	
+?>
\ No newline at end of file
diff --git a/web/master/list.php b/web/master/list.php
new file mode 100644
index 0000000000..e635fb6447
--- /dev/null
+++ b/web/master/list.php
@@ -0,0 +1,26 @@
+<?php
+	header( 'Content-type: text/plain' );
+
+	if (!($db = sqlite_open( 'openra.db', 0666, $e )))
+	{
+		echo 'Database error: ', $e;
+		return;
+	}
+	
+	$stale = 60 * 5;
+	$result = sqlite_query( $db, 'SELECT * FROM servers WHERE (' . time() . ' - ts < ' . $stale . ')' );
+	
+	$rows = sqlite_fetch_all( $result, SQLITE_ASSOC );
+	
+	$n = 0;
+	foreach( $rows as $a ) {
+		echo "Game@" . $n++ . ":\n";
+		echo "\tName: " . $a['name'] . "\n";
+		echo "\tAddress: " . $a['address'] . "\n";
+		echo "\tState: " . $a['state'] . "\n";
+		echo "\tPlayers: " . $a['players'] . "\n";
+		echo "\tTTL: " . ($stale - (time() - $a['ts'])) . "\n";
+	}
+	
+	sqlite_close( $db );
+?>
\ No newline at end of file
diff --git a/web/master/ping.php b/web/master/ping.php
new file mode 100644
index 0000000000..17c6e77403
--- /dev/null
+++ b/web/master/ping.php
@@ -0,0 +1,30 @@
+<?php
+
+	if (!($db = sqlite_open( 'openra.db', 0666, $e )))
+	{
+		echo 'Database error: ', $e;
+		return;
+	}
+	
+	$addr = $_SERVER['REMOTE_ADDR'] . ':' . $_REQUEST['port'];
+	$prune = 'DELETE FROM servers WHERE address = \'' . sqlite_escape_string( $addr ) . '\'';
+	echo $prune . "\n\n";
+	
+	sqlite_exec( $db, $prune );
+
+	$q =  'INSERT INTO servers VALUES ('.
+		'\'' . sqlite_escape_string( $_REQUEST['name'] ) . '\', '.
+		'\'' . sqlite_escape_string( $addr ) . '\', '.
+		sqlite_escape_string( $_REQUEST['players'] ) . ', '.
+		sqlite_escape_string( $_REQUEST['state'] ) . ', '.
+		time() . ')';
+		
+	echo $q;	
+	
+	if (!sqlite_exec( $db, $q ))
+	{
+		echo 'Error in query:' . sqlite_error_string( sqlite_last_error() );
+	}
+	
+	sqlite_close( $db );
+?>
\ No newline at end of file