File: cas.phpt

package info (click to toggle)
php-memcached 3.1.3%2B2.2.0-1
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 1,432 kB
  • sloc: ansic: 9,903; xml: 1,262; php: 321; pascal: 87; sh: 12; makefile: 5
file content (55 lines) | stat: -rw-r--r-- 1,148 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
--TEST--
Memcached fetch cas & set cas
--SKIPIF--
<?php if (!extension_loaded("memcached")) print "skip"; ?>
--FILE--
<?php
include dirname (__FILE__) . '/config.inc';
$m = memc_get_instance ();

$m->delete('cas_test');
$cas_token = null;

$m->set('cas_test', 10);
$v = $m->get('cas_test', null, $cas_token);

if (is_null($cas_token)) {
	echo "Null cas token for key: cas_test value: 10\n";
	return;
}

$v = $m->cas($cas_token, 'cas_test', 11);
if (!$v) {
	echo "Error setting key: cas_test value: 11 with CAS: $cas_token\n";
	return;
}

$v = $m->get('cas_test');

if ($v !== 11) {
	echo "Wanted cas_test to be 11, value is: ";
	var_dump($v);
}

$v = $m->get('cas_test', null, 2);
if ($v != 11) {
	echo "Failed to get the value with \$cas_token passed by value (2)\n";
	return;
}

$v = $m->get('cas_test', null, null);
if ($v != 11) {
	echo "Failed to get the value with \$cas_token passed by value (null)\n";
	return;
}

$v = $m->get('cas_test', null, $data = array(2, 4));
if ($v != 11 || $data !== array(2, 4)) {
	echo "Failed to get the value with \$cas_token passed by value (\$data = array(2, 4))\n";
	return;
}

echo "OK\n";
?>
--EXPECT--
OK