FEATURE: touch command

add touch command with test file and docs

docs/ascii-protocol/ch10-command-item-attribute.md

@@ -59,3 +59,23 @@ setattr <key> <name>=<value> [<name>=<value> ...]\r\n
 | "ATTR_ERROR not found"                  | 인자로 지정한 attribute가 존재하지 않거나 해당 item 유형에서 지원되지 않는 attribute임.
 | "ATTR_ERROR bad value"                  | 해당 attribute에 대해 새로 변경하고자 하는 value가 allowed value가 아님.
 | "CLIENT_ERROR bad command line format"  | protocol syntax 틀림
+
+
+## touch (Key의 expire time 변경)
+
+key에 해당하는 item 을 fetch 하지 않고 expire time을 재설정하는 명령은 아래와 같다. 이 명령은 모든 item 타입에 대해 적용이 가능하다.
+
+```
+touch <key> <exptime> [noreply]\r\n
+```
+
+- \<key\> - 대상 item의 key string
+- \<exptime\> - 재설정할 expire time 값
+
+이 명령의 response string과 그 의미는 아래와 같다.
+
+| Response String                         | 설명                     |
+|-----------------------------------------|------------------------ |
+| "TOUCHED"                               | 성공
+| "NOT_FOUND"                             | key miss
+| "CLIENT_ERROR bad value"                | exptime 값이 올바르지 않은 경우

memcached.c

@@ -13085,6 +13085,53 @@ static void process_setattr_command(conn *c, token_t *tokens, const size_t ntoke
     }
 }
 
+static void process_touch_command(conn *c, token_t *tokens, const size_t ntokens)
+{
+    assert(c != NULL);
+    assert(c->ewouldblock == false);
+    char *key = tokens[KEY_TOKEN].value;
+    size_t nkey = tokens[KEY_TOKEN].length;
+
+    if (nkey > KEY_MAX_LENGTH) {
+        out_string(c, "CLIENT_ERROR bad command line format");
+        return;
+    }
+
+    ENGINE_ERROR_CODE ret;
+    item_attr attr_data;
+    ENGINE_ITEM_ATTR attr_id = ATTR_EXPIRETIME;
+    int64_t exptime;
+
+    set_noreply_maybe(c, tokens, ntokens);
+
+    if (! safe_strtoll(tokens[KEY_TOKEN+1].value, &exptime)) {
+        ret = ENGINE_EBADVALUE;
+    } else {
+        attr_data.exptime = realtime(exptime);
+        ret = mc_engine.v1->setattr(mc_engine.v0, c, key, nkey,
+                                    &attr_id, 1, &attr_data, 0);
+        CONN_CHECK_AND_SET_EWOULDBLOCK(ret, c);
+        if (settings.detail_enabled) {
+            stats_prefix_record_setattr(key, nkey);
+        }
+    }
+
+    switch (ret) {
+    case ENGINE_SUCCESS:
+        STATS_HITS(c, setattr, key, nkey);
+        out_string(c, "TOUCHED");
+        break;
+    case ENGINE_KEY_ENOENT:
+        STATS_MISSES(c, setattr, key, nkey);
+        out_string(c, "NOT_FOUND");
+        break;
+    default:
+        STATS_CMD_NOKEY(c, setattr);
+        if (ret == ENGINE_EBADVALUE) out_string(c, "CLIENT_ERROR bad value");
+        else handle_unexpected_errorcode_ascii(c, __func__, ret);
+    }
+}
+
 static void process_command_ascii(conn *c, char *command, int cmdlen)
 {
     /* One more token is reserved in tokens strucure
@@ -13206,6 +13253,10 @@ static void process_command_ascii(conn *c, char *command, int cmdlen)
     {
         process_config_command(c, tokens, ntokens);
     }
+    else if ((ntokens >= 4 && ntokens <= 5) && (strcmp(tokens[COMMAND_TOKEN].value, "touch") == 0))
+    {
+        process_touch_command(c, tokens, ntokens);
+    }
 #ifdef ENABLE_ZK_INTEGRATION
     else if ((ntokens >= 3) && (strcmp(tokens[COMMAND_TOKEN].value, "zkensemble") == 0))
     {

t/tlist/engine_default_b.txt

@@ -102,3 +102,4 @@
 ./t/nested_prefix.t
 ./t/keyscan.t
 ./t/prefixscan.t
+./t/touch.t

t/tlist/engine_default_s.txt

@@ -95,3 +95,4 @@
 ./t/nested_prefix.t
 ./t/keyscan.t
 ./t/prefixscan.t
+./t/touch.t

t/touch.t

@@ -0,0 +1,100 @@
+#!/usr/bin/perl
+
+use strict;
+use Test::More tests => 22;
+use FindBin qw($Bin);
+use lib "$Bin/lib";
+use MemcachedTest;
+
+my $engine = shift;
+my $server = get_memcached($engine);
+my $sock = $server->sock;
+
+my $cmd;
+my $val;
+my $rst;
+my $expire;
+my $msg;
+
+# Initialize
+$cmd = "set key 0 0 5"; $val = "datum"; $rst = "STORED";
+mem_cmd_is($sock, $cmd, $val, $rst);
+$cmd = "lop create lkey 0 0 1 error"; $rst = "CREATED";
+mem_cmd_is($sock, $cmd, "", $rst);
+$cmd = "sop create skey 0 0 1 error"; $rst = "CREATED";
+mem_cmd_is($sock, $cmd, "", $rst);
+$cmd = "mop create mkey 0 0 1 error"; $rst = "CREATED";
+mem_cmd_is($sock, $cmd, "", $rst);
+$cmd = "bop create bkey 0 0 1 error"; $rst = "CREATED";
+mem_cmd_is($sock, $cmd, "", $rst);
+
+# Success Cases
+# key value
+$cmd = "touch key 1"; $rst = "TOUCHED";
+mem_cmd_is($sock, $cmd, "", $rst);
+$cmd = "getattr key expiretime";
+$rst = "ATTR expiretime=1\n"
+     . "END";
+$msg = "success touch at key value type";
+mem_cmd_is($sock, $cmd, "", $rst, $msg);
+# list
+$cmd = "touch lkey 1"; $rst = "TOUCHED";
+mem_cmd_is($sock, $cmd, "", $rst);
+$cmd = "getattr lkey expiretime";
+$rst = "ATTR expiretime=1\n"
+     . "END";
+$msg = "success touch at list collection";
+mem_cmd_is($sock, $cmd, "", $rst, $msg);
+# set
+$cmd = "touch skey 1"; $rst = "TOUCHED";
+mem_cmd_is($sock, $cmd, "", $rst);
+$cmd = "getattr skey expiretime";
+$rst = "ATTR expiretime=1\n"
+     . "END";
+$msg = "success touch at set collection";
+mem_cmd_is($sock, $cmd, "", $rst, $msg);
+# map
+$cmd = "touch mkey 1"; $rst = "TOUCHED";
+mem_cmd_is($sock, $cmd, "", $rst);
+$cmd = "getattr mkey expiretime";
+$rst = "ATTR expiretime=1\n"
+     . "END";
+$msg = "success touch at map collection";
+mem_cmd_is($sock, $cmd, "", $rst, $msg);
+#btree
+$cmd = "touch bkey 1"; $rst = "TOUCHED";
+mem_cmd_is($sock, $cmd, "", $rst);
+$cmd = "getattr bkey expiretime";
+$rst = "ATTR expiretime=1\n"
+     . "END";
+$msg = "success touch at btree collection";
+mem_cmd_is($sock, $cmd, "", $rst, $msg);
+# set with unix time
+$cmd = "set key 0 0 5"; $val = "datum"; $rst = "STORED";
+mem_cmd_is($sock, $cmd, $val, $rst);
+$expire = time() + 1;
+$cmd = "touch key $expire"; $rst = "TOUCHED";
+mem_cmd_is($sock, $cmd, "", $rst);
+$cmd = "getattr key expiretime";
+$rst = "ATTR expiretime=1\n"
+     . "END";
+$msg = "success touch with unix time";
+mem_cmd_is($sock, $cmd, "", $rst, $msg);
+
+# Fail Cases
+# not exist key
+$cmd = "touch key 1"; $rst = "NOT_FOUND"; $msg = "failed with not exist key which is already expired";
+sleep(1.2);
+mem_cmd_is($sock, $cmd, "", $rst, $msg);
+# bad value
+$cmd = "set key 0 0 5"; $val = "datum"; $rst = "STORED";
+mem_cmd_is($sock, $cmd, $val, $rst);
+$cmd = "touch key str"; $rst = "CLIENT_ERROR bad value"; $msg = "failed with bad value at exptime";
+mem_cmd_is($sock, $cmd, "", $rst, $msg);
+
+# Finalize
+$cmd = "delete key"; $rst = "DELETED";
+mem_cmd_is($sock, $cmd, "", $rst);
+
+# after test
+release_memcached($engine, $server);