Current Path : /home/usr.opt/mysql57/mysql-test/suite/memcached/t/ |
FreeBSD hs32.drive.ne.jp 9.1-RELEASE FreeBSD 9.1-RELEASE #1: Wed Jan 14 12:18:08 JST 2015 root@hs32.drive.ne.jp:/sys/amd64/compile/hs32 amd64 |
Current File : //home/usr.opt/mysql57/mysql-test/suite/memcached/t/memc218_decr.test |
source include/not_valgrind.inc; source include/have_memcached_plugin.inc; source include/not_windows.inc; source include/have_innodb.inc; --disable_query_log CALL mtr.add_suppression("daemon-memcached-w-batch-size': unsigned"); CALL mtr.add_suppression("Could not obtain server's UPN to be used as target service name"); CALL mtr.add_suppression("InnoDB: Warning: MySQL is trying to drop"); --enable_query_log --enable_connect_log SET @tx_isolation= @@global.tx_isolation; SET GLOBAL TRANSACTION ISOLATION LEVEL READ UNCOMMITTED; # Create the memcached tables --disable_query_log source include/memcache_config.inc; --enable_query_log INSERT INTO cache_policies VALUES("cache_policy", "innodb_only", "innodb_only", "innodb_only", "innodb_only"); INSERT INTO config_options VALUES("separator", "|"); # describe table for memcache INSERT INTO containers VALUES ("desc_t1", "test", "t1", "c1", "c2", "c3", "c4", "c5", "PRIMARY"); USE test; --disable_warnings DROP TABLE IF EXISTS t1; --enable_warnings CREATE TABLE t1 (c1 VARCHAR(255), c2 VARCHAR(1024), c3 INT, c4 BIGINT UNSIGNED, c5 INT, primary key(c1)) ENGINE = INNODB; INSERT INTO t1 VALUES ('1', '10', 0, 0, 0); INSERT INTO t1 VALUES ('2', '20', 0, 0, 0); INSERT INTO t1 VALUES ('3', 'Berlin', 0, 0 ,0); INSERT INTO t1 VALUES ('4', '40', 0, 0, 0); # Tables must exist before plugin can be started! INSTALL PLUGIN daemon_memcached SONAME 'libmemcached.so'; # The following select is writing all to memcache otherwisw memcache is empty. --sorted_result SELECT c1,c2 FROM t1; SELECT SLEEP(1); perl; use DBI; use Cache::Memcached; my $memd = new Cache::Memcached { 'servers' => [ "127.0.0.1:11218" ], 'connect_timeout' => 20, 'select_timeout' =>20 }; print "Here the memcached results:\n"; $val = $memd->get("1"); if ($val) { print "$val\n"; } $val = $memd->get("2"); if ($val) { print "$val\n"; } $val = $memd->get("3"); if ($val) { print "$val\n"; } $val = $memd->get("4"); if ($val) { print "$val\n"; } print "Here the memcached results after decr 4|40:\n"; $val = $memd->decr("4"); if ($val) { print "$val\n"; } $val = $memd->decr("4","20"); if ($val) { print "$val\n"; } $val = $memd->get("4"); if ($val) { print "$val\n"; } $val = $memd->decr("3"); if ($val) { print "$val\n"; } $val = $memd->decr("3","Bern"); if ($val) { print "$val\n"; } $val = $memd->decr("8","1"); if ($val) { print "$val\n"; } $memd->disconnect_all; EOF --sorted_result SELECT c1,c2 FROM t1; DROP TABLE IF EXISTS t1; UNINSTALL PLUGIN daemon_memcached; DROP DATABASE innodb_memcache; SET @@global.tx_isolation= @tx_isolation;