]> granicus.if.org Git - php/commitdiff
WS
authorArd Biesheuvel <abies@php.net>
Wed, 3 Sep 2003 17:15:40 +0000 (17:15 +0000)
committerArd Biesheuvel <abies@php.net>
Wed, 3 Sep 2003 17:15:40 +0000 (17:15 +0000)
ext/interbase/tests/006.phpt

index cfbb83a0eddd4057c980df8dd67ad5be465c9383..2e6512192f5e02cff66c3077bff73b8e71e6375a 100644 (file)
@@ -7,217 +7,217 @@ InterBase: binding (may take a while)
 --FILE--
 <?php
 
-    require("interbase.inc");
-    
-    ibase_connect($test_base);
+       require("interbase.inc");
+       
+       ibase_connect($test_base);
+       
+       ibase_query(
+               "create table test6 (
+                       iter            integer,
+                       v_char          char(1000),
+                       v_date      timestamp,
+                       v_decimal   decimal(12,3),
+                       v_double        double precision,
+                       v_float     float,
+                       v_integer   integer,
+                       v_numeric   numeric(4,2),
+                       v_smallint  smallint,
+                       v_varchar   varchar(10000)
+                       )");
+       ibase_query(
+               "create procedure add1 (arg integer)
+               returns (result integer)
+               as 
+               begin
+                       result = arg +1;
+               end");
+       ibase_commit();
 
-    ibase_query(
-       "create table test6 (
-            iter               integer,
-            v_char             char(1000),
-            v_date      timestamp,
-            v_decimal   decimal(12,3),
-            v_double   double precision,
-            v_float     float,
-               v_integer   integer,
-               v_numeric   numeric(4,2),
-            v_smallint  smallint,
-            v_varchar   varchar(10000)
-            )");
-    ibase_query(
-       "create procedure add1 (arg integer)
-       returns (result integer)
-       as 
-       begin
-               result = arg +1;
-       end");
-    ibase_commit();
+       /* if timefmt not supported, hide error */
+       @ibase_timefmt("%m/%d/%Y %H:%M:%S");
 
-    /* if timefmt not supported, hide error */
-    @ibase_timefmt("%m/%d/%Y %H:%M:%S");
+       echo "insert\n";
 
-    echo "insert\n";
-    
-    for($iter = 0; $iter < 3; $iter++){
-       /* prepare data  */
-       $v_char = rand_str(1000);
-       $v_date = rand_datetime();
-       $v_decimal = rand_number(12,3);
-       $v_double  = rand_number(20);
-       $v_float   = rand_number(7);
-       $v_integer = rand_number(9,0);
-       $v_numeric = rand_number(4,2);
-       $v_smallint = rand_number(5) % 32767;
-       $v_varchar = rand_str(10000);
+       for($iter = 0; $iter < 3; $iter++){
+               /* prepare data  */
+               $v_char = rand_str(1000);
+               $v_date = rand_datetime();
+               $v_decimal = rand_number(12,3);
+               $v_double  = rand_number(20);
+               $v_float   = rand_number(7);
+               $v_integer = rand_number(9,0);
+               $v_numeric = rand_number(4,2);
+               $v_smallint = rand_number(5) % 32767;
+               $v_varchar = rand_str(10000);
 
-           ibase_query("insert into test6
-               (iter,v_char,v_date,v_decimal,v_double,v_float,
-               v_integer,v_numeric,v_smallint,v_varchar)
-               values (?,?,?,?,?,?,?,?,?,?)",
-               $iter, $v_char, $v_date, $v_decimal, $v_double, $v_float,
-               $v_integer, $v_numeric, $v_smallint, $v_varchar);
-       $sel = ibase_query("select * from test6 where iter = $iter");
+               ibase_query("insert into test6
+                       (iter,v_char,v_date,v_decimal,v_double,v_float,
+                       v_integer,v_numeric,v_smallint,v_varchar)
+                       values (?,?,?,?,?,?,?,?,?,?)",
+                       $iter, $v_char, $v_date, $v_decimal, $v_double, $v_float,
+                       $v_integer, $v_numeric, $v_smallint, $v_varchar);
+               $sel = ibase_query("select * from test6 where iter = $iter");
 
-       $row = ibase_fetch_object($sel);
-       if(substr($row->V_CHAR,0,strlen($v_char)) != $v_char){
-               echo " CHAR fail:\n";
-            echo " in:  $v_char\n";
-            echo " out: $row->V_CHAR\n";
-        }
-        if($row->V_DATE != $v_date){
-            echo " DATE fail\n";
-            echo " in:  $v_date\n";
-            echo " out: $row->V_DATE\n";
-        }
-        if($row->V_DECIMAL != $v_decimal){
-            echo " DECIMAL fail\n";
-            echo " in:  $v_decimal\n";
-            echo " out: $row->V_DECIMAL\n";
-        }
-        if(abs($row->V_DOUBLE - $v_double) > abs($v_double / 1E15)){
-            echo " DOUBLE fail\n";
-            echo " in:  $v_double\n";
-            echo " out: $row->V_DOUBLE\n";
-        }
-        if(abs($row->V_FLOAT - $v_float) > abs($v_float / 1E7)){
-            echo " FLOAT fail\n";
-            echo " in:  $v_float\n";
-            echo " out: $row->V_FLOAT\n";
-        }
-        if($row->V_INTEGER != $v_integer){
-            echo " INTEGER fail\n";
-            echo " in:  $v_integer\n";
-            echo " out: $row->V_INTEGER\n";
-        }
-        if ($row->V_NUMERIC != $v_numeric){
-            echo " NUMERIC fail\n";
-            echo " in:  $v_numeric\n";
-            echo " out: $row->V_NUMERIC\n";
-        }
-        if ($row->V_SMALLINT != $v_smallint){
-            echo " SMALLINT fail\n";
-            echo " in:  $v_smallint\n";
-            echo " out: $row->V_SMALLINT\n";
-        }
-       if ($row->V_VARCHAR != $v_varchar){
-               echo " VARCHAR fail:\n";
-            echo " in:  $v_varchar\n";
-            echo " out: $row->V_VARCHAR\n";
-        }
-        ibase_free_result($sel);
-    }/* for($iter)*/
+               $row = ibase_fetch_object($sel);
+               if(substr($row->V_CHAR,0,strlen($v_char)) != $v_char){
+                       echo " CHAR fail:\n";
+                       echo " in:  $v_char\n";
+                       echo " out: $row->V_CHAR\n";
+               }
+               if($row->V_DATE != $v_date){
+                       echo " DATE fail\n";
+                       echo " in:  $v_date\n";
+                       echo " out: $row->V_DATE\n";
+               }
+               if($row->V_DECIMAL != $v_decimal){
+                       echo " DECIMAL fail\n";
+                       echo " in:  $v_decimal\n";
+                       echo " out: $row->V_DECIMAL\n";
+               }
+               if(abs($row->V_DOUBLE - $v_double) > abs($v_double / 1E15)){
+                       echo " DOUBLE fail\n";
+                       echo " in:  $v_double\n";
+                       echo " out: $row->V_DOUBLE\n";
+               }
+               if(abs($row->V_FLOAT - $v_float) > abs($v_float / 1E7)){
+                       echo " FLOAT fail\n";
+                       echo " in:  $v_float\n";
+                       echo " out: $row->V_FLOAT\n";
+               }
+               if($row->V_INTEGER != $v_integer){
+                       echo " INTEGER fail\n";
+                       echo " in:  $v_integer\n";
+                       echo " out: $row->V_INTEGER\n";
+               }
+               if ($row->V_NUMERIC != $v_numeric){
+                       echo " NUMERIC fail\n";
+                       echo " in:  $v_numeric\n";
+                       echo " out: $row->V_NUMERIC\n";
+               }
+               if ($row->V_SMALLINT != $v_smallint){
+                       echo " SMALLINT fail\n";
+                       echo " in:  $v_smallint\n";
+                       echo " out: $row->V_SMALLINT\n";
+               }
+               if ($row->V_VARCHAR != $v_varchar){
+                       echo " VARCHAR fail:\n";
+                       echo " in:  $v_varchar\n";
+                       echo " out: $row->V_VARCHAR\n";
+               }
+               ibase_free_result($sel);
+       }/* for($iter)*/
 
-    echo "select\n";
-    for($iter = 0; $iter < 3; $iter++){
-       /* prepare data  */
-       $v_char = rand_str(1000);
-       $v_date = rand_datetime();
-       $v_decimal = rand_number(12,3);
-       $v_double  = rand_number(20);
-       $v_float   = rand_number(7);
-       $v_integer = rand_number(9,0);
-       $v_numeric = rand_number(4,2);
-       $v_smallint = rand_number(5) % 32767;
-       $v_varchar = rand_str(10000);
+       echo "select\n";
+       for($iter = 0; $iter < 3; $iter++){
+               /* prepare data  */
+               $v_char = rand_str(1000);
+               $v_date = rand_datetime();
+               $v_decimal = rand_number(12,3);
+               $v_double  = rand_number(20);
+               $v_float   = rand_number(7);
+               $v_integer = rand_number(9,0);
+               $v_numeric = rand_number(4,2);
+               $v_smallint = rand_number(5) % 32767;
+               $v_varchar = rand_str(10000);
 
-        /* clear table*/
-           ibase_query("delete from test6");
+               /* clear table*/
+               ibase_query("delete from test6");
 
-        /* make one record */
+               /* make one record */
                ibase_query("insert into test6
-               (iter, v_char,v_date,v_decimal,
-               v_integer,v_numeric,v_smallint,v_varchar)
-               values (666, '$v_char','$v_date',$v_decimal, $v_integer,
-            $v_numeric, $v_smallint, '$v_varchar')");
-            
-        /* test all types */
-       if(!($sel = ibase_query(
-               "select iter from test6 where v_char = ?", $v_char)))
-               echo "CHAR fail\n";
-       ibase_free_result($sel);
-           if(!($sel = ibase_query(
-               "select iter from test6 where v_date = ?", $v_date)))
-               echo "DATE fail\n";
-       ibase_free_result($sel);
-           if(!($sel = ibase_query(
-               "select iter from test6 where v_decimal = ?", $v_decimal)))
-               echo "DECIMAL fail\n";
-       ibase_free_result($sel);
-           if(!($sel = ibase_query(
-               "select iter from test6 where v_integer = ?", $v_integer)))
-               echo "INTEGER fail\n";
-       ibase_free_result($sel);
-           if(!($sel = ibase_query(
-               "select iter from test6 where v_numeric = ?", $v_numeric)))
-               echo "NUMERIC fail\n";
-       ibase_free_result($sel);
-           if(!($sel = ibase_query(
-               "select iter from test6 where v_smallint = ?", $v_smallint)))
-               echo "SMALLINT fail\n";
-       ibase_free_result($sel);
-           if(!($sel = ibase_query(
-               "select iter from test6 where v_varchar = ?", $v_varchar)))
-               echo "VARCHAR fail\n";
-       ibase_free_result($sel);
+                       (iter, v_char,v_date,v_decimal,
+                       v_integer,v_numeric,v_smallint,v_varchar)
+                       values (666, '$v_char','$v_date',$v_decimal, $v_integer,
+                       $v_numeric, $v_smallint, '$v_varchar')");
+
+               /* test all types */
+               if(!($sel = ibase_query(
+                       "select iter from test6 where v_char = ?", $v_char)))
+                       echo "CHAR fail\n";
+               ibase_free_result($sel);
+               if(!($sel = ibase_query(
+                       "select iter from test6 where v_date = ?", $v_date)))
+                       echo "DATE fail\n";
+               ibase_free_result($sel);
+               if(!($sel = ibase_query(
+                       "select iter from test6 where v_decimal = ?", $v_decimal)))
+                       echo "DECIMAL fail\n";
+               ibase_free_result($sel);
+               if(!($sel = ibase_query(
+                       "select iter from test6 where v_integer = ?", $v_integer)))
+                       echo "INTEGER fail\n";
+               ibase_free_result($sel);
+               if(!($sel = ibase_query(
+                       "select iter from test6 where v_numeric = ?", $v_numeric)))
+                       echo "NUMERIC fail\n";
+               ibase_free_result($sel);
+               if(!($sel = ibase_query(
+                       "select iter from test6 where v_smallint = ?", $v_smallint)))
+                       echo "SMALLINT fail\n";
+               ibase_free_result($sel);
+               if(!($sel = ibase_query(
+                       "select iter from test6 where v_varchar = ?", $v_varchar)))
+                       echo "VARCHAR fail\n";
+               ibase_free_result($sel);
         
-    }/*for iter*/
+       }/*for iter*/
 
-    echo "prepare and exec insert\n";
+       echo "prepare and exec insert\n";
 
     /* prepare table */
        ibase_query("delete from test6");
 
-    /* prepare query */
-    $query = ibase_prepare(
-       "insert into test6 (v_integer) values (?)");
+       /* prepare query */
+       $query = ibase_prepare(
+               "insert into test6 (v_integer) values (?)");
 
-    for($i = 0; $i < 10; $i++)
+       for($i = 0; $i < 10; $i++)
                ibase_execute($query, $i);
-        
-    out_table("test6");
-    
-    ibase_free_query($query);
 
-    
-    echo "prepare and exec select\n";
+       out_table("test6");
+
+       ibase_free_query($query);
+
+
+       echo "prepare and exec select\n";
+
+       /* prepare query */
+       $query = ibase_prepare("select * from test6
+               where v_integer between ? and ?");
 
-    /* prepare query */
-    $query = ibase_prepare("select * from test6
-       where v_integer between ? and ?");
+       $low_border = 2;
+       $high_border = 6;
 
-    $low_border = 2;
-    $high_border = 6;
+       $res = ibase_execute($query, $low_border, $high_border);
+       out_result($res, "test6");
+       ibase_free_result($res);
 
-    $res = ibase_execute($query, $low_border, $high_border);
-    out_result($res, "test6");
-    ibase_free_result($res);
+       $low_border = 0;
+       $high_border = 4;
+       $res = ibase_execute($query, $low_border, $high_border);
+       out_result($res, "test6");
+       ibase_free_result($res);
 
-    $low_border = 0;
-    $high_border = 4;
-    $res = ibase_execute($query, $low_border, $high_border);
-    out_result($res, "test6");
-    ibase_free_result($res);
+       $res = ibase_execute($query, "5", 7.5);
+       out_result($res, "test6");
+       ibase_free_result($res);
 
-    $res = ibase_execute($query, "5", 7.5);
-    out_result($res, "test6");
-    ibase_free_result($res);
+       ibase_free_query($query);
 
-    ibase_free_query($query);
-    
-    /* test execute procedure */
-    $query = ibase_prepare("execute procedure add1(?)");
-    $res = array();
-    for ($i = 0; $i < 10; $i++) {
-       $res[] = ibase_execute($query,$i);
-    }
-    ibase_free_query($query);
+       /* test execute procedure */
+       $query = ibase_prepare("execute procedure add1(?)");
+       $res = array();
+       for ($i = 0; $i < 10; $i++) {
+               $res[] = ibase_execute($query,$i);
+       }
+       ibase_free_query($query);
        foreach ($res as $r) {
-       out_result($r, "proc add1");
-           ibase_free_result($r);
-    }
+               out_result($r, "proc add1");
+               ibase_free_result($r);
+       }
 
-    ibase_close();
-    echo "end of test\n";
+       ibase_close();
+       echo "end of test\n";
 ?>
 --EXPECT--
 insert