C:\xampp\php\pear\adodb\server.php


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
<?php

/** 
 * @version V4.93 10 Oct 2006 (c) 2000-2012 John Lim (jlim#natsoft.com). All rights reserved.
 * Released under both BSD license and Lesser GPL library license. 
  Whenever there is any discrepancy between the two licenses, 
  the BSD license will take precedence. 
 */
 
/* Documentation on usage is at http://php.weblogs.com/adodb_csv
 *
 * Legal query string parameters:
 * 
 * sql = holds sql string
 * nrows = number of rows to return 
 * offset = skip offset rows of data
 * fetch = $ADODB_FETCH_MODE
 * 
 * example:
 *
 * http://localhost/php/server.php?select+*+from+table&nrows=10&offset=2
 */


/* 
 * Define the IP address you want to accept requests from 
 * as a security measure. If blank we accept anyone promisciously!
 */
$ACCEPTIP '127.0.0.1';

/*
 * Connection parameters
 */
$driver 'mysql';
$host 'localhost'// DSN for odbc
$uid 'root';
$pwd 'garbase-it-is';
$database 'test';

/*============================ DO NOT MODIFY BELOW HERE =================================*/
// $sep must match csv2rs() in adodb.inc.php
$sep ' :::: ';

include(
'./adodb.inc.php');
include_once(
ADODB_DIR.'/adodb-csvlib.inc.php');

function 
err($s)
{
    die(
'**** '.$s.' ');
}

// undo stupid magic quotes
function undomq(&$m
{
    if (
get_magic_quotes_gpc()) {
        
// undo the damage
        
$m str_replace('\\\\','\\',$m);
        
$m str_replace('\"','"',$m);
        
$m str_replace('\\\'','\'',$m);
        
    }
    return 
$m;
}

///////////////////////////////////////// DEFINITIONS


$remote $_SERVER["REMOTE_ADDR"]; 
 

if (!empty(
$ACCEPTIP))
 if (
$remote != '127.0.0.1' && $remote != $ACCEPTIP
     
err("Unauthorised client: '$remote'");
    
    
if (empty(
$_REQUEST['sql'])) err('No SQL');


$conn ADONewConnection($driver);

if (!
$conn->Connect($host,$uid,$pwd,$database)) err($conn->ErrorNo(). $sep $conn->ErrorMsg());
$sql undomq($_REQUEST['sql']);

if (isset(
$_REQUEST['fetch']))
    
$ADODB_FETCH_MODE $_REQUEST['fetch'];
    
if (isset(
$_REQUEST['nrows'])) {
    
$nrows $_REQUEST['nrows'];
    
$offset = isset($_REQUEST['offset']) ? $_REQUEST['offset'] : -1;
    
$rs $conn->SelectLimit($sql,$nrows,$offset);
} else 
    
$rs $conn->Execute($sql);
if (
$rs){ 
    
//$rs->timeToLive = 1;
    
echo _rs2serialize($rs,$conn,$sql);
    
$rs->Close();
} else
    
err($conn->ErrorNo(). $sep .$conn->ErrorMsg());

?>
x

Windows NT KPTV 6.2 build 9200 (Windows Server 2012 Datacenter Edition) i586