test::assert_value(count($v), 2);
test::assert_value($v[0]['id'], 2);
test::assert_value($v[1]['id'], 7);
$v = $p->get_list('list', array('type' => 'text', 'section' => 'songs'));
test::assert_value(count($v), 0);
$p->delete('list', array('section' => 'blogs'));
$v = $p->get_list('list');
test::assert_value(count($v), 5, 'Deleting');
$v = $p->get_list('list', array('section' => 'blogs'));
test::assert_value(count($v), 0);
$p->delete('list', array('type' => 'text'));
$v = $p->get_list('list');
test::assert_value(count($v), 4);
$v = $p->get_list('list', array('type' => 'text'));
test::assert_value(count($v), 0);
$p->clear('list');
$p->insert('list', array('id' => 1, 'type' => 'image'));
$p->insert('list', array('id' => 2, 'type' => 'text', 'section' => 'blogs'));
$p->insert('list', array('id' => 3, 'type' => 'video'));
$p->insert('list', array('id' => 4, 'type' => 'video'));
$p->insert('list', array('id' => 5, 'type' => 'image'));
$p->insert('list', array('id' => 6, 'type' => 'text', 'section' => 'jokes'));
$p->insert('list', array('id' => 7, 'type' => 'text', 'section' => 'blogs'));
$v = $p->get_list('list');
test::assert_value(count($v), 7, 'Truncating');
$p->truncate('list', 5, 1);
$v = $p->get_list('list');
test::assert_value(count($v), 5);
test::assert_value($v[0]['id'], 2);
test::assert_value($v[4]['id'], 6);
test::summary();
$ts = time();
$data = array('name' => 'Test', 'time' => $ts);
$p = new mock_peer();
$id = $p->insert($data);
test::assert_true($id > 0, 'Insert tests');
$v = $p->get_by_id($id);
test::assert_value($v['id'], $id);
test::assert_value($v['time'], $ts);
test::assert_value($v['name'], 'Test');
test::assert_value(count($v), 3);
$id1 = $p->insert($data);
$id2 = $p->insert($data);
$id3 = $p->insert($data);
test::assert_value($id1, $id2 - 1);
test::assert_value($id1, $id3 - 2);
$id = $p->insert($data);
$p->delete($id);
$v = $p->get_by_id($id);
test::assert_null($v, 'Delete tests');
$id = $p->insert($data);
$p->update($id, array('name' => 'Test updated'));
$v = $p->get_by_id($id);
test::assert_value($v['name'], 'Test updated', 'Update tests');
test::assert_value($v['id'], $id);
test::assert_value($v['time'], $ts);
test::assert_value(count($v), 3);
$p->update($id, array('country' => 'Ukraine'));
$v = $p->get_by_id($id);
test::assert_value($v['country'], 'Ukraine');
test::assert_value(count($v), 4);
test::summary();
test::assert_value($v, -3);
$v = $r->inc('test', 10);
$v = $r->dec('test', 2);
test::assert_value($v, 5);
# Lists
$r->delete('test');
$r->append('test', 'a');
$r->append('test', 'b');
$r->append('test', 'c');
$v = $r->get_list('test', 3);
test::assert_value($v, array('a', 'b', 'c'), 'Lists');
$r->append('test', 'd');
$v = $r->get_list('test', 4);
test::assert_value($v, array('a', 'b', 'c', 'd'));
$v = $r->get_list('test', 5);
test::assert_value($v, array('a', 'b', 'c', 'd'));
$v = $r->get_list('test', 2);
test::assert_value($v, array('a', 'b'));
$v = $r->get_list('test', 2, 1);
test::assert_value($v, array('b', 'c'));
$v = $r->get_list('test', 10, 1);
test::assert_value($v, array('b', 'c', 'd'));
$v = $r->get_list_length('test');
test::assert_value($v, 4);
$r->delete('test1');
$v = $r->get_list_length('test1');
test::assert_value($v, 0);
$v = $r->append('test1', 1);
$v = $r->get_list_length('test1');
test::assert_value($v, 1);
test::summary();
require_once dirname(__FILE__) . '/../lib/redis.php';
require_once dirname(__FILE__) . '/../lib/redis.pool.php';
require_once dirname(__FILE__) . '/../lib/redis_set.peer.php';
require_once dirname(__FILE__) . '/test.lib.php';
# Config
redis_pool::add_servers(array('master' => array('127.0.0.1', 6379)));
class mock_set_peer extends redis_set_peer
{
}
# Tests
$p = new mock_set_peer();
$p->clear('some_set');
$p->add('some_set', 1);
$p->add('some_set', 2);
test::assert_true($p->is_member('some_set', 1), 'Adding/removing');
test::assert_true($p->is_member('some_set', 2));
test::assert_false($p->is_member('some_set', 3));
test::assert_value($p->get_count('some_set'), 2);
$set = $p->get_all('some_set');
test::assert_value(count($set), 2);
test::assert_true(in_array(2, $set));
test::assert_true(in_array(1, $set));
$p->remove('some_set', 2);
test::assert_value($p->get_count('some_set'), 1);
test::assert_false($p->is_member('some_set', 2));
test::assert_true($p->is_member('some_set', 1));
$r = $p->add('some_set', 3);
test::assert_true($r);
$r = $p->add('some_set', 3);
test::assert_false($r);
test::summary();
