Return to interbase.inc CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / php / ext / interbase / tests

Annotation of embedaddon/php/ext/interbase/tests/interbase.inc, revision 1.1.1.2

1.1.1.2 ! misho       1: <?php /* $Id$ */
1.1       misho       2: 
                      3: srand((double)microtime()*1000000);
                      4: 
                      5: $user = 'SYSDBA';
                      6: $password = 'masterkey';
                      7: ini_set('ibase.default_user',$user);
                      8: ini_set('ibase.default_password',$password);
                      9: 
                     10: /* we need just the generated name, not the file itself */
                     11: unlink($test_base = tempnam('/tmp',"php_ibase_test"));
                     12: 
                     13: function init_db()
                     14: {
                     15:        global $test_base, $user, $password;
                     16: 
                     17:        $test_db = ibase_query(IBASE_CREATE, 
                     18:                sprintf("CREATE SCHEMA '%s' USER '%s' PASSWORD '%s' DEFAULT CHARACTER SET %s",$test_base,
                     19:                $user, $password, ($charset = ini_get('ibase.default_charset')) ? $charset : 'NONE'));
                     20:        $tr = ibase_trans($test_db);
                     21:        ibase_query($tr,"create table test1 (i integer, c varchar(100))");
                     22:        ibase_commit_ret($tr);
                     23:        ibase_query($tr,"insert into test1(i, c) values(1, 'test table not created with isql')");
                     24:        ibase_commit($tr);
                     25:        ibase_close($test_db);
                     26: }
                     27: 
                     28: function cleanup_db()
                     29: {
                     30:        global $test_base;
                     31:     
                     32:        $r = ibase_connect($test_base);
                     33:        ibase_drop_db($r);
                     34: }
                     35: 
                     36: register_shutdown_function('cleanup_db');
                     37: init_db();
                     38: 
                     39: function out_table($table_name)
                     40: {
                     41:        echo "--- $table_name ---\n";
                     42:        $res = ibase_query("select * from $table_name");
                     43:        while ($r = ibase_fetch_row($res)) {
                     44:                echo join("\t",$r)."\t\n";
                     45:        }
                     46:        ibase_free_result($res);
                     47:        echo "---\n";
                     48: }
                     49: 
                     50: function out_result($result, $table_name = "")
                     51: {
                     52:        echo "--- $table_name ---\n";
                     53:        while ($r = ibase_fetch_row($result)) {
                     54:                echo join("\t",$r)."\t\n";
                     55:        }
                     56:        echo "---\n";
                     57: }
                     58: 
                     59: function out_result_trap_error($result, $table_name = "")
                     60: {
                     61:    echo "--- $table_name ---\n";
                     62:    while ($r = @ibase_fetch_row($result)) {
                     63:                echo join("\t",$r)."\t\n";
                     64:    }
                     65:    echo "errmsg [" . ibase_errmsg() . "]\t\n";
                     66:    echo "---\n";
                     67: }
                     68: 
                     69: /* M/D/Y H:M:S */
                     70: function rand_datetime()
                     71: {
                     72:     return sprintf("%02d/%02d/%4d %02d:%02d:%02d",
                     73:                rand()%12+1, rand()%28+1, rand()%100+1910,
                     74:                rand()%24,   rand()%60,  rand()%60);
                     75: }
                     76: 
                     77: /* random binary string  */
                     78: function rand_binstr($max_len)
                     79: {
                     80:     $len = rand() % $max_len;
                     81:     $s = "";
                     82:     while($len--) {
                     83:         $s .= sprintf("%c", rand() % 256);
                     84:     }
                     85:     return $s;
                     86: }
                     87: 
                     88: function rand_str($max_len)
                     89: {
                     90:     $len = rand() % $max_len;
                     91:     $s = "";
                     92:     while ($len--) {
                     93:         $s .= sprintf("%c", rand() % 26 + 65);
                     94:     }
                     95:     return $s;
                     96: }
                     97: 
                     98: function rand_number($len , $prec = -1, $sign = 1)
                     99: {
                    100:     if ($prec == -1) {
                    101:         $n = substr(rand() . rand(), 0, rand() % $len + 1);
                    102:         if (strlen($n) < $len) {
                    103:                $n .= "." . substr(rand(), 0, rand() % ($len - strlen($n)) + 1);
                    104:         }
                    105:     } else if ($prec == 0) {
                    106:         $n = substr(rand() . rand(), 0, rand() % $len + 1);
                    107:     } else if (($prec - $len) == 0) {
                    108:         $n = substr(rand() . rand(), 0, 1);
                    109:         $n .= "." . substr(rand(), 0, $prec);
                    110:     } else {
                    111:         $n = substr(rand() . rand(), 0, rand() % ($len - $prec) + 1);
                    112:         $n .= "." . substr(rand(), 0, $prec);
                    113:     }
                    114:     if ($sign && (rand() % 3 == 0)) {
                    115:         $n = "-" .$n;
                    116:     }
                    117:     return $n;
                    118: }
                    119: 
                    120: ?>