tpvxxx001: test $xavi(...)

Depends on functionality added at kamailio/kamailio/#2337

units/tpvxxx0001/README.md

@@ -0,0 +1,7 @@
+# pv - $xavi(...) Tests #
+
+Summary: pv - $xavi() tests
+
+Following tests are done:
+
+  * run kamailio with kamailio-tpvxxx0001.cfg and test if $xavi in config

units/tpvxxx0001/kamailio-tpvxxx0001.cfg

@@ -0,0 +1,40 @@
+#!KAMAILIO
+
+children=1
+
+loadmodule "kex.so"
+loadmodule "jsonrpcs.so"
+loadmodule "tm.so"
+loadmodule "tmx.so"
+loadmodule "sl.so"
+loadmodule "rr.so"
+loadmodule "pv.so"
+loadmodule "textops.so"
+loadmodule "xlog.so"
+
+modparam("jsonrpcs", "pretty_format", 1)
+
+request_route {
+    if (!is_method("MESSAGE")) exit;
+
+    pv_unset("$xavi(FOO)");
+    $(xavi(FOO=>val)) = "testME";
+    pv_xavi_print();
+    if($xavi(fOo=>VAl) == "testME") {
+        xlog("test$var(t): OK\n");
+    } else {
+        xlog("test$var(t): $(xavi(FOO=>val[*]))\n");
+    }
+    $var(t) = $var(t) + 1;
+
+    xavi_rm("foo");
+    pv_xavi_print();
+    if(!pv_isset("$xavi(FOO=>val)")) {
+        xlog("test$var(t): OK\n");
+    } else {
+        xlog("test$var(t): $(xavi(FOO=>val[*]))\n");
+    }
+    $var(t) = $var(t) + 1;
+
+    send_reply("200", "OK");
+}

units/tpvxxx0001/tpvxxx0001.sh

@@ -0,0 +1,25 @@
+#!/bin/bash
+
+. ../../etc/config
+. ../../libs/utils
+
+LOG=/tmp/kamailio-tpvxxx0001.log
+
+echo "--- start kamailio -f ./kamailio-tpvxxx0001.cfg"
+${KAMBIN} -P ${KAMPID} -w ${KAMRUN} -Y ${KAMRUN} \
+	-f ./kamailio-tpvxxx0001.cfg -a no -ddd -E 2>&1 | tee ${LOG} &
+sleep 1
+sipsak -M -s sip:[email protected]
+sleep 1
+kill_pidfile ${KAMPID}
+sleep 1
+echo
+echo "--- grep output"
+echo
+for i in 0 1; do
+	if ! grep -q "test${i}: OK" ${LOG}; then
+		echo "test${i} failed"
+		exit 1
+	fi
+done
+exit 0