BSC_Tests: Add TC_paging_counter to test paging related counters

Change-Id: I48057cb4eeb96637a663940cf4de4df1a9f2e85d
diff --git a/bsc/BSC_Tests.ttcn b/bsc/BSC_Tests.ttcn
index b70c63a..a161c39 100644
--- a/bsc/BSC_Tests.ttcn
+++ b/bsc/BSC_Tests.ttcn
@@ -901,6 +901,45 @@
 	}
 }
 
+/* Verify PCH load */
+testcase TC_paging_counter() runs on test_CT {
+	var BSSMAP_FIELD_CellIdentificationList cid_list;
+	timer T := 4.0;
+	var integer i;
+	var integer paging_attempted_bsc;
+	var integer paging_attempted_bts[NUM_BTS];
+	var integer paging_expired_bts[NUM_BTS];
+	cid_list := valueof(ts_BSSMAP_CIL_noCell);
+
+	f_init();
+
+	/* read counters before paging */
+	paging_attempted_bsc := f_ctrl_get_ratectr_abs(IPA_CTRL, "bsc", 0, "paging:attempted");
+	for (i := 0; i < NUM_BTS; i := i+1) {
+		paging_attempted_bts[i] := f_ctrl_get_ratectr_abs(IPA_CTRL, "bts", i, "paging:attempted");
+		paging_expired_bts[i] := f_ctrl_get_ratectr_abs(IPA_CTRL, "bts", i, "paging:expired");
+	}
+
+	f_pageing_helper('001230000000001'H, cid_list, c_BtsId_all);
+
+	/* expect the attempted pages on BSC and each BTSs to have incremented by one */
+	f_ctrl_get_exp_ratectr_abs(IPA_CTRL, "bsc", 0, "paging:attempted", paging_attempted_bsc+1);
+	for (i := 0; i < NUM_BTS; i := i+1) {
+		f_ctrl_get_exp_ratectr_abs(IPA_CTRL, "bts", i, "paging:attempted",
+						paging_attempted_bts[i]+1);
+	}
+
+	/* assume that 12s later the paging on all BTSs have expired and hence incremented by 1 */
+	f_sleep(12.0);
+	for (i := 0; i < NUM_BTS; i := i+1) {
+		f_ctrl_get_exp_ratectr_abs(IPA_CTRL, "bts", i, "paging:expired",
+						paging_expired_bts[i]+1);
+	}
+	setverdict(pass);
+
+}
+
+
 /* Verify paging stops after A-RESET */
 testcase TC_paging_imsi_a_reset() runs on test_CT {
 	var BSSMAP_FIELD_CellIdentificationList cid_list;
diff --git a/bsc/osmo-bsc.cfg b/bsc/osmo-bsc.cfg
index ac1553e..9b45904 100644
--- a/bsc/osmo-bsc.cfg
+++ b/bsc/osmo-bsc.cfg
@@ -86,6 +86,7 @@
  handover maximum distance 9999
  dyn_ts_allow_tch_f 1
  periodic location update 30
+ timer t3113 10
  bts 0
   type sysmobts
   band DCS1800