From a7fd2eb5945e64a2898e0fede6075d379194e71a Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Mon, 19 May 2014 11:39:15 +0200
Subject: Cluster test: failure detection initial tests.

---
 tests/cluster/tests/01-faildet.tcl          | 31 +++++++++++++++++++++++++++++
 tests/cluster/tests/includes/init-tests.tcl |  1 +
 2 files changed, 32 insertions(+)
 create mode 100644 tests/cluster/tests/01-faildet.tcl

diff --git a/tests/cluster/tests/01-faildet.tcl b/tests/cluster/tests/01-faildet.tcl
new file mode 100644
index 000000000..883548caf
--- /dev/null
+++ b/tests/cluster/tests/01-faildet.tcl
@@ -0,0 +1,31 @@
+# Check the basic monitoring and failover capabilities.
+
+source "../tests/includes/init-tests.tcl"
+
+proc create_cluster {masters slaves} {
+    cluster_allocate_slots $masters
+    if {$slaves} {
+        cluster_allocate_slaves $masters $slaves
+    }
+    assert_cluster_state ok
+}
+
+test "Create a 5 nodes cluster" {
+    create_cluster 5 0
+}
+
+test "Killing one master node" {
+    kill_instance redis 0
+}
+
+test "Cluster should be down now" {
+    assert_cluster_state fail
+}
+
+test "Restarting master node" {
+    restart_instance redis 0
+}
+
+test "Cluster should be up again" {
+    assert_cluster_state ok
+}
diff --git a/tests/cluster/tests/includes/init-tests.tcl b/tests/cluster/tests/includes/init-tests.tcl
index 849dba23d..9f34be181 100644
--- a/tests/cluster/tests/includes/init-tests.tcl
+++ b/tests/cluster/tests/includes/init-tests.tcl
@@ -23,6 +23,7 @@ test "Cluster nodes hard reset" {
     foreach_redis_id id {
         R $id flushall
         R $id cluster reset hard
+        R $id config set cluster-node-timeout 3000
     }
 }
 
-- 
cgit v1.2.1