From 2555b2f4bd0499fe16f50d004d3596132e8a33ba Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Tue, 29 Apr 2014 10:42:32 +0200
Subject: Cluster test: check that every node has a different ID.

---
 tests/cluster/tests/00-base.tcl | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/tests/cluster/tests/00-base.tcl b/tests/cluster/tests/00-base.tcl
index e3b88e3e8..cf2a7644d 100644
--- a/tests/cluster/tests/00-base.tcl
+++ b/tests/cluster/tests/00-base.tcl
@@ -8,9 +8,23 @@ if {$::simulate_error} {
     }
 }
 
-test "Cluster nodes are reachable." {
+test "Cluster nodes are reachable" {
     foreach_redis_id id {
         # Every node should just know itself.
         assert {[R $id ping] eq {PONG}}
     }
 }
+
+test "Different nodes have different IDs" {
+    set ids {}
+    set numnodes 0
+    foreach_redis_id id {
+        incr numnodes
+        # Every node should just know itself.
+        set nodeid [dict get [get_myself $id] id]
+        assert {$nodeid ne {}}
+        lappend ids $nodeid
+    }
+    set numids [llength [lsort -unique $ids]]
+    assert {$numids == $numnodes}
+}
-- 
cgit v1.2.1