T::is($cache->set($k, $v = '0'), TRUE, 'setting a key to zero returns true'); T::cmp_ok($cache->get($k), '===', $v, 'after setting the key to 0, get returns zero value'); T::cmp_ok($cache->get(array($k)), '===', array($k => $v), 'multi-get returns the key with zero value'); T::ok($cache->set($k, 1, $ttl = 3600 * 24 * 30), 'setting with a huge timeout'); T::cmp_ok(strval($cache->get($k)), '===', '1', 'get returns correct value'); $incr = 1000000; T::ok($cache->increment($k, $incr), 'incrementing with a large number'); T::cmp_ok(strval($cache->get($k)), '===', strval($incr + 1), 'get returns correct value'); T::ok($cache->decrement($k, $incr), 'decrementing with a large number'); T::cmp_ok(intval($cache->get($k)), '===', 1, 'get returns correct value'); $huge_number = 9223372036854775806; if (!is_int($huge_number)) { $huge_number = 2147483646; } T::Debug("testing with {$huge_number}"); T::ok($cache->set($k, $v = $huge_number), 'setting a huge number'); T::cmp_ok(strval($cache->get($k)), '===', strval($v), 'get returns correct value'); $v = $v + 1; T::cmp_ok(strval($cache->increment($k, 1)), '===', strval($v), 'increment a huge number by 1'); T::cmp_ok(strval($cache->get($k)), '===', strval($v), 'get returns correct value'); $cache->set($k, $v); $v = $v - 1; T::cmp_ok(strval($cache->decrement($k, 1)), '===', strval($v), 'decrement a huge number by 1'); T::cmp_ok(strval($cache->get($k)), '===', strval($v), 'get returns correct value'); $k = 'wukka/cache/test/' . microtime(TRUE) . '/' . mt_rand(1, 10000); $v = '我能吞下玻璃而不傷身體'; T::ok($cache->set($k, $v), 'setting a string with utf-8 chars in it'); T::cmp_ok(strval($cache->get($k)), '===', $v, 'get returns correct value'); T::ok($cache->delete($k), 'deleting the key'); T::cmp_ok($cache->get($k), '===', NULL, 'after deleting, get returns NULL');
T::ok(Transaction::rollback(), 'rolled back the transaction at the global level'); T::ok($rs = $dbmain->execute("select id from {$table}"), 'selected all rows from the table'); $ct = $rs->affected(); T::is($ct, 2, '2 rows in the table, new rows rolled back'); $rs = $conn1->execute("select id from {$table}"); T::is($rs, FALSE, 'after rolling back, new queries fail on rolled back db object'); $dbmain->execute("drop table {$table}"); $db = $newconn(); $raw = file_get_contents(__DIR__ . '/sample/i_can_eat_glass.txt'); $lines = explode("\n", $raw); $lines = array_slice($lines, 0, 10) + array_slice($lines, 100, 10) + array_slice($lines, 200, 10) + array_slice($lines, 200, 10); $raw = implode("\n", $lines); $sql = "CREATE TEMPORARY TABLE t1utf8 (`i` INT UNSIGNED NOT NULL PRIMARY KEY, `line` VARCHAR(5000) ) ENGINE=InnoDB DEFAULT CHARACTER SET utf8"; $db->execute($sql); foreach ($lines as $i => $line) { //$lines[ $i ] = $line = mb_convert_encoding($line, 'UTF-8', 'auto'); $db->execute('INSERT INTO t1utf8 (`i`, `line`) VALUES (%i, %s)', $i, $line); } $rs = $db->execute('SELECT * FROM t1utf8'); $readlines = array(); while ($row = $rs->fetch()) { $readlines[$row['i']] = $row['line']; } $rs->free(); T::cmp_ok($readlines, '===', $lines, 'inserted all the rows and read them back, worked as expected'); //T::debug( $readlines ); $rs = $db->execute('SELECT %s AS `d`', $raw); $row = $rs->fetch(); $rs->free(); T::cmp_ok($row['d'], '===', $raw, 'passed a huge chunk of utf-8 data to db and asked for it back. got what I sent.'); //T::debug( $row['d'] );