From 9a868aaf60aca4092f204c3c7cecb7a484cf7ef6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jean-S=C3=A9bastien=20P=C3=A9dron?=
 <jean-sebastien@rabbitmq.com>
Date: Fri, 29 Apr 2016 16:13:21 +0200
Subject: [PATCH] rabbit_ct_helpers: Add a function to compute the testcase
 number

---
 deps/rabbit_common/src/rabbit_ct_helpers.erl | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/deps/rabbit_common/src/rabbit_ct_helpers.erl b/deps/rabbit_common/src/rabbit_ct_helpers.erl
index f58a580fee..cdb44d4200 100644
--- a/deps/rabbit_common/src/rabbit_ct_helpers.erl
+++ b/deps/rabbit_common/src/rabbit_ct_helpers.erl
@@ -28,6 +28,7 @@
     stop_long_running_testsuite_monitor/1,
     config_to_testcase_name/2,
     testcases/1,
+    testcase_number/3,
     testcase_started/2, testcase_finished/2,
     make_verbosity/0,
     run_cmd/1, run_cmd_and_capture_output/1,
@@ -330,6 +331,18 @@ testcases1(_, [], [], Testcases) ->
 testcases1(_, [], _, Testcases) ->
     Testcases.
 
+testcase_number(Config, TestSuite, TestName) ->
+    Testcase = config_to_testcase_name(Config, TestName),
+    Testcases = testcases(TestSuite),
+    testcase_number1(Testcases, Testcase, 0).
+
+testcase_number1([Testcase | _], Testcase, N) ->
+    N;
+testcase_number1([_ | Rest], Testcase, N) ->
+    testcase_number1(Rest, Testcase, N + 1);
+testcase_number1([], _, N) ->
+    N.
+
 %% -------------------------------------------------------------------
 %% Helpers for helpers.
 %% -------------------------------------------------------------------