commit 55bfb03ed50a461cc2e3a2acb13792975fa6556d
parent 29f14014a9b225500be873eb92938e47d4866e86
Author: dankert <devnull@localhost>
Date: Tue, 21 Apr 2009 00:01:15 +0200
Einfacher Client für API-Aufrufe.
Diffstat:
| doc/api/client.php | | | 147 | +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
1 file changed, 147 insertions(+), 0 deletions(-)
diff --git a/doc/api/client.php b/doc/api/client.php
@@ -0,0 +1,146 @@
+<html>
+<head>
+<title>OpenRat API-Client</title>
+</head>
+<body>
+<h1>OpenRat API-Client</h1>
+<h2>Request</h2>
+<form action="<?php echo $_SERVER['SCRIPT_NAME'] ?>">
+<table>
+<tr>
+<th>Parameter</th><th>Value</th>
+</tr>
+<?php for( $i=1; $i<=10; $i++ ) { ?>
+<tr>
+<td><input name="param<?php echo $i ?>" value="<?php echo $_REQUEST['param'.$i] ?>"></td>
+<td><input name="value<?php echo $i ?>" value="<?php echo htmlentities($_REQUEST['value'.$i]) ?>" size="50"></td>
+<!--
+<td><textarea rows="3" cols="50" name="value<?php echo $i ?>"><?php echo htmlentities($_REQUEST['value'.$i]) ?></textarea></td>
+ -->
+</tr>
+<?php } ?>
+</table><br>
+<select name="type">
+<?php foreach( array('text/html','application/json','application/xml') as $type ) { ?>
+<option value="<?php echo $type ?>" <?php echo ($_REQUEST['type']==$type)?'selected':'' ?>><?php echo $type ?></option>
+<?php } ?>
+</select><input type="submit">
+</form>
+<hr>
+<h2>Response</h2>
+<strong>
+<?php if ( !empty($_REQUEST['param1']) ) {
+
+ $error = '';
+ $status = '';
+
+ $errno = 0;
+ $errstr = '';
+
+ $host = $_SERVER['SERVER_ADDR'];
+ $port = $_SERVER['SERVER_PORT'];
+ $path = substr($_SERVER['SCRIPT_NAME'],0,-15).'/do.php';
+ $method = 'GET';
+
+ // Die Funktion fsockopen() erwartet eine Protokollangabe (bei TCP optional, bei SSL notwendig).
+ if ( $port == '443' )
+ $prx_proto = 'ssl://'; // SSL
+ else
+ $prx_proto = 'tcp://'; // Default
+
+ $fp = fsockopen ($prx_proto.$host,$port, $errno, $errstr, 30);
+
+ if ( !$fp || !is_resource($fp) )
+ {
+ echo "Connection refused: '".$prx_proto.$host.':'.$port." - $errstr ($errno)";
+ }
+ else
+ {
+ $lb = "\r\n";
+ $http_get = $path;
+
+ $parameterString = '';
+
+ for( $i = 1;$i<=10;$i++)
+ {
+ if (!empty($_REQUEST['param'.$i]))
+ {
+ if ( strlen($parameterString) > 0)
+ $parameterString .= '&';
+ elseif ( $withPraefixQuestionMark )
+ $parameterString .= '?';
+
+ $parameterString .= urlencode($_REQUEST['param'.$i]) . '=' .urlencode($_REQUEST['value'.$i]);
+ }
+ }
+
+ if ( $method == 'GET')
+ if ( !empty($parameterString) )
+ $http_get .= '?'.$parameterString;
+
+ if ( $method == 'POST' )
+ {
+ $header[] = 'Content-Type: application/x-www-form-urlencoded';
+ $header[] = 'Content-Length: '.strlen($parameterString);
+ }
+
+ $header[] = 'Host: '.$host;
+ $header[] = 'Accept: '.$_REQUEST['type'];
+ $request_header = array( $method.' '.$http_get.' HTTP/1.0') + $header;
+ $http_request = implode($lb,$request_header).$lb.$lb;
+
+ if ( $method == 'POST' )
+ $http_request .= $parameterString;
+
+ if (!is_resource($fp)) {
+ $error = 'Connection lost after connect: '.$prx_proto.$host.':'.$port;
+ return false;
+ }
+ fputs($fp, $http_request); // Die HTTP-Anfrage zum Server senden.
+
+ // Jetzt erfolgt das Auslesen der HTTP-Antwort.
+ $isHeader = true;
+
+ // RFC 1945 (Section 6.1) schreibt als Statuszeile folgendes Format vor
+ // "HTTP/" 1*DIGIT "." 1*DIGIT SP 3DIGIT SP
+ if (!is_resource($fp)) {
+ echo 'Connection lost during transfer: '.$host.':'.$port;
+ }
+ elseif (!feof($fp)) {
+ $line = fgets($fp,1028);
+ $status = substr($line,9,3);
+ }
+ else
+ {
+ echo 'Unexpected EOF while reading HTTP-Response';
+ }
+
+ while (!feof($fp)) {
+ $line = fgets($fp,1028);
+ if ( $isHeader && trim($line)=='' ) // Leerzeile nach Header.
+ {
+ $isHeader = false;
+ }
+ elseif( $isHeader )
+ {
+ list($headerName,$headerValue) = explode(': ',$line) + array(1=>'');
+ $responseHeader[$headerName] = trim($headerValue);
+ }
+ else
+ {
+ $body .= $line;
+ }
+ }
+ fclose($fp); // Verbindung brav schlie�en.
+ $response = $body;
+
+ // 301 Moved Permanently
+ // 302 Moved Temporarily
+ echo '<span style="background-color:'.($status=='200'?'green':'red').'">HTTP-Status '.$status.'</span>';
+ }
+ ?>
+ </strong>
+<pre><?php echo htmlentities($response) ?></pre>
+<?php } ?>
+</body>
+</html>+
\ No newline at end of file
