diff options
Diffstat (limited to 'devel-utf8/tests/it_dbi.t')
| -rwxr-xr-x | devel-utf8/tests/it_dbi.t | 254 |
1 files changed, 0 insertions, 254 deletions
diff --git a/devel-utf8/tests/it_dbi.t b/devel-utf8/tests/it_dbi.t deleted file mode 100755 index 4a58188..0000000 --- a/devel-utf8/tests/it_dbi.t +++ /dev/null @@ -1,254 +0,0 @@ -#!/www/server/bin/php -qC -<?php - -# Tests for it_dbi.class - -# Initialize DB -$db = array('db' => "lib_search_ch", 'safety' => 0); -$dbi = new it_dbi($db); -$dbi->query('create temporary table it_dbi_test ( - ID int not null auto_increment, - x int, - foo varchar(42), - primary key(ID) -);'); - -$record = new it_dbi($db + array('table' => "it_dbi_test")); - -$record->insert(array('x' => 42, 'foo' => null)); -$record->insert(array('foo' => "bar")); -$record->insert(array('x' => 64738, 'foo' => "q'uux")); - -is( - $record->ID, - 3, - "auto_increment" -); - -$record->read(1); -is( - array($record->_key, $record->x, $record->foo), - array(1, 42, null), - "read" -); - -is( - $record->select(), - 3, - "select without parameters select all" -); - -is( - $record->select(array('foo <>' => ""), "LIMIT 1"), - 1, - "select with multiple parameters (LIMIT part)" -); -is( - $record->foo, - "bar", - "select with multiple parameters (foo part)" -); -is( - $record->select(array('ID IN' => array(2,3))), - 2, - "select with IN" -); -is( - $record->select(array('ID NI' => array(2,3))), - 2, - "select with NI" -); -is( - $record->select(array('ID NOT IN' => array(2,3))), - 1, - "select with NOT IN" -); -is( - $record->select(array('ID IN' => array())), - 0, - "select with empty IN" -); -is( - $record->select(array('ID NOT IN' => array())), - 3, - "select with empty NOT IN" -); - -it_dbi::createclass(array('table' => "it_dbi_test", 'forcecreate' => true)); - -$record = new it_dbi_test; -is( - $record->x, - null, - "constructor of created class without argument" -); - -$record = new it_dbi_test(2); -is( - $record->ID, - 2, - "constructor of created class with id parameter" -); - -$record = new it_dbi_test(array('x >' => 0), "ORDER BY x DESC"); -is( - $record->x, - 64738, - "constructor of created class with multiple select parameters" -); - -$record = new it_dbi_test(array('foo' => 'bar')); -is( - $record->ID, - 2, - "constructor of created class with single array parameter" -); - -$record = new it_dbi($db + array('table' => "it_dbi_test")); -is( - $record->x, - null, - "constructor without parameters" -); - -$record = new it_dbi($db + array('table' => "it_dbi_test"), array('x >' => 0), "ORDER BY x DESC"); -is( - $record->x, - 64738, - "constructor with multiple select parameters" -); - -$record->select(array('x' => 64738)); -is( - array($record->_key, $record->x, $record->foo), - array(3, 64738, "q'uux"), - "select" -); - -$record->update(array('x' => 17)); -is( - array($record->_key, $record->x, $record->foo), - array(3, 17, "q'uux"), - "update" -); - -is( - $record->update(array('x' => 18), array('x' => 17)), - 1, - "return affected rows", -); - -is( - $record->update(array('x' => 18), array('x' => 17)), - 0, - "return zero affected rows", -); - -$record->update(array('-x' => 'RAND() * 10')); -isnt( - array($record->_key, $record->x, $record->foo), - array(3, 17, "q'uux"), - "update with function" -); - -$rand = $record->x; -is ( - $record->_set(array('x' => $rand, 'foo' => "bar")), - "SET `foo`='bar'", - 'update: _set optimization' -); - -$record->update(array('foo' => "bar")); -$record->select(array('foo' => "bar")); -$record->iterate(); -is( - array($record->_key, $record->x, $record->foo), - array(2, null, "bar"), - "iterate record 2" -); -$record->update(array('foo' => "qux")); -$record->iterate(); -is( - array($record->_key, $record->x, $record->foo), - array(3, $rand, "bar"), - "iterate record 3" -); -$record->update(array('foo' => "quux")); - -$record->read(2); -is( - array($record->_key, isset($record->x), $record->foo), - array(2, false, "qux"), - "iterate update record 2" -); - -$record->read(3); -is( - array($record->_key, $record->x, $record->foo), - array(3, $rand, "quux"), - "iterate update record 3" -); - -is( - gettype($record->_key) . "/" . gettype($record->x) . "/" . gettype($record->_data['x']) . "/" . gettype($record->foo), - "integer/integer/integer/string", - "automatic type detection" -); - -$count = 0; -foreach (new it_dbi_test as $id => $record) -{ - $count++; - is($record->_key, $id, "Iterator id $id"); -} -is($count, 3, "Iterator without select"); - -$count = 0; -foreach (new it_dbi_test(array('foo <>' => "")) as $id => $record) -{ - $count++; - is($record->_key, $id, "Iterator id $id"); -} -is($count, 2, "Iterator with select"); - -$count = 0; -foreach ($record as $dummy_rec) - $count++; -is($count, 2, "Iterator reused"); - -# Test field localization feature - -$dbi->query('create temporary table it_dbi_testlocalized ( - ID int not null auto_increment, - foobar_de varchar(42), - foobar_fr varchar(42), - primary key(ID) -);'); - -$record = new it_dbi($db + array('table' => "it_dbi_testlocalized")); -$record->insert(array('foobar_de' => "deutsch", 'foobar_fr' => "franz")); -$record->insert(array('foobar_de' => "deutsch2", 'foobar_fr' => "franz2")); - -T_set_language('de'); -$record->select(array()); -$record->iterate(); -is( - array($record->_key, $record->foobar), - array(1, "deutsch"), - "localized field foobar_de" -); -$record->iterate(); -is( - array($record->_key, $record->foobar), - array(2, "deutsch2"), - "localized field foobar_de iterate" -); - -T_set_language('fr'); -$record->read(1); -is( - array($record->_key, $record->foobar), - array(1, "franz"), - "localized field foobar_fr" -); - |