4
* @version V4.92a 29 Aug 2006 (c) 2000-2006 John Lim (jlim#natsoft.com.my). All rights reserved.
5
* Released under both BSD license and Lesser GPL library license.
6
Whenever there is any discrepancy between the two licenses,
7
the BSD license will take precedence.
10
/* Documentation on usage is at http://php.weblogs.com/adodb_csv
12
* Legal query string parameters:
14
* sql = holds sql string
15
* nrows = number of rows to return
16
* offset = skip offset rows of data
17
* fetch = $ADODB_FETCH_MODE
21
* http://localhost/php/server.php?select+*+from+table&nrows=10&offset=2
26
* Define the IP address you want to accept requests from
27
* as a security measure. If blank we accept anyone promisciously!
29
$ACCEPTIP = '127.0.0.1';
32
* Connection parameters
35
$host = 'localhost'; // DSN for odbc
37
$pwd = 'garbase-it-is';
40
/*============================ DO NOT MODIFY BELOW HERE =================================*/
41
// $sep must match csv2rs() in adodb.inc.php
44
include('./adodb.inc.php');
45
include_once(ADODB_DIR.'/adodb-csvlib.inc.php');
52
// undo stupid magic quotes
55
if (get_magic_quotes_gpc()) {
57
$m = str_replace('\\\\','\\',$m);
58
$m = str_replace('\"','"',$m);
59
$m = str_replace('\\\'','\'',$m);
65
///////////////////////////////////////// DEFINITIONS
68
$remote = $_SERVER["REMOTE_ADDR"];
71
if (!empty($ACCEPTIP))
72
if ($remote != '127.0.0.1' && $remote != $ACCEPTIP)
73
err("Unauthorised client: '$remote'");
76
if (empty($_REQUEST['sql'])) err('No SQL');
79
$conn = &ADONewConnection($driver);
81
if (!$conn->Connect($host,$uid,$pwd,$database)) err($conn->ErrorNo(). $sep . $conn->ErrorMsg());
82
$sql = undomq($_REQUEST['sql']);
84
if (isset($_REQUEST['fetch']))
85
$ADODB_FETCH_MODE = $_REQUEST['fetch'];
87
if (isset($_REQUEST['nrows'])) {
88
$nrows = $_REQUEST['nrows'];
89
$offset = isset($_REQUEST['offset']) ? $_REQUEST['offset'] : -1;
90
$rs = $conn->SelectLimit($sql,$nrows,$offset);
92
$rs = $conn->Execute($sql);
94
//$rs->timeToLive = 1;
95
echo _rs2serialize($rs,$conn,$sql);
98
err($conn->ErrorNo(). $sep .$conn->ErrorMsg());
b'\\ No newline at end of file'