lib/WikiDB/adodb/tests/test-php5.php

   1 <?php
   2 /*
   3   V4.81 3 May 2006  (c) 2000-2012 John Lim (jlim#natsoft.com). All rights reserved.
   4   Released under both BSD license and Lesser GPL library license.
   5   Whenever there is any discrepancy between the two licenses,
   6   the BSD license will take precedence.
   7   Set tabs to 8.
   8  */
   9
  10
  11 error_reporting(E_ALL);
  12
  13 $path = dirname(__FILE__);
  14
  15 include("$path/../adodb-exceptions.inc.php");
  16 include("$path/../adodb.inc.php");
  17
  18 echo "<h3>PHP ".PHP_VERSION."</h3>\n";
  19 try {
  20
  21 $dbt = 'oci8po';
  22
  23 try {
  24 switch($dbt) {
  25 case 'oci8po':
  26         $db = NewADOConnection("oci8po");
  27
  28         $db->Connect('localhost','scott','natsoft','sherkhan');
  29         break;
  30 default:
  31 case 'mysql':
  32         $db = NewADOConnection("mysql");
  33         $db->Connect('localhost','root','','northwind');
  34         break;
  35
  36 case 'mysqli':
  37         $db = NewADOConnection("mysqli://root:@localhost/northwind");
  38         //$db->Connect('localhost','root','','test');
  39         break;
  40 }
  41 } catch (exception $e){
  42         echo "Connect Failed";
  43         adodb_pr($e);
  44         die();
  45 }
  46
  47 $db->debug=1;
  48
  49 $cnt = $db->GetOne("select count(*) from adoxyz where ?<id and id<?",array(10,20));
  50 $stmt = $db->Prepare("select * from adoxyz where ?<id and id<?");
  51 if (!$stmt) echo $db->ErrorMsg(),"\n";
  52 $rs = $db->Execute($stmt,array(10,20));
  53
  54 echo  "<hr /> Foreach Iterator Test (rand=".rand().")<hr />";
  55 $i = 0;
  56 foreach($rs as $v) {
  57         $i += 1;
  58         echo "rec $i: "; $s1 = adodb_pr($v,true); $s2 = adodb_pr($rs->fields,true);
  59         if ($s1 != $s2 && !empty($v)) {adodb_pr($s1); adodb_pr($s2);}
  60         else echo "passed<br>";
  61         flush();
  62 }
  63
  64 $rs = new ADORecordSet_empty();
  65 foreach($rs as $v) {
  66         echo "<p>empty ";var_dump($v);
  67 }
  68
  69
  70 if ($i != $cnt) die("actual cnt is $i, cnt should be $cnt\n");
  71 else echo "Count $i is correct<br>";
  72
  73 $rs = $db->Execute("select bad from badder");
  74
  75 } catch (exception $e) {
  76         adodb_pr($e);
  77         echo "<h3>adodb_backtrace:</h3>\n";
  78         $e = adodb_backtrace($e->gettrace());
  79 }
  80
  81 $rs = $db->Execute("select distinct id, firstname,lastname from adoxyz order by id");
  82 echo "Result=\n",$rs,"</p>";
  83
  84 echo "<h3>Active Record</h3>";
  85
  86         include_once("../adodb-active-record.inc.php");
  87         ADOdb_Active_Record::SetDatabaseAdapter($db);
  88
  89 try {
  90         class City extends ADOdb_Active_Record{};
  91         $a = new City();
  92
  93 } catch(exception $e){
  94         echo $e->getMessage();
  95 }
  96
  97 try {
  98
  99         $a = new City();
 100
 101         echo "<p>Successfully created City()<br>";
 102         #var_dump($a->GetPrimaryKeys());
 103         $a->city = 'Kuala Lumpur';
 104         $a->Save();
 105         $a->Update();
 106         #$a->SetPrimaryKeys(array('city'));
 107         $a->country = "M'sia";
 108         $a->save();
 109         $a->Delete();
 110 } catch(exception $e){
 111         echo $e->getMessage();
 112 }
 113
 114 //include_once("test-active-record.php");
 115 ?>