[svn-commits] mnicholson: testsuite/asterisk/trunk r454 - in /asterisk/trunk/tests: ./ mana...
SVN commits to the Digium repositories
svn-commits at lists.digium.com
Thu Jul 1 10:54:47 CDT 2010
Author: mnicholson
Date: Thu Jul 1 10:54:43 2010
New Revision: 454
URL: http://svnview.digium.com/svn/testsuite?view=rev&rev=454
Log:
Added manager/response-time test
Added:
asterisk/trunk/tests/manager/
asterisk/trunk/tests/manager/response-time/
asterisk/trunk/tests/manager/response-time/run-test (with props)
asterisk/trunk/tests/manager/response-time/test-config.yaml (with props)
asterisk/trunk/tests/manager/response-time/test.lua (with props)
Modified:
asterisk/trunk/tests/tests.yaml
Added: asterisk/trunk/tests/manager/response-time/run-test
URL: http://svnview.digium.com/svn/testsuite/asterisk/trunk/tests/manager/response-time/run-test?view=auto&rev=454
==============================================================================
--- asterisk/trunk/tests/manager/response-time/run-test (added)
+++ asterisk/trunk/tests/manager/response-time/run-test Thu Jul 1 10:54:43 2010
@@ -1,0 +1,3 @@
+#!/bin/bash -e
+. lib/sh/lua.sh
+asttest -a / -s `dirname $0` $@
Propchange: asterisk/trunk/tests/manager/response-time/run-test
------------------------------------------------------------------------------
svn:eol-style = native
Propchange: asterisk/trunk/tests/manager/response-time/run-test
------------------------------------------------------------------------------
svn:executable = *
Propchange: asterisk/trunk/tests/manager/response-time/run-test
------------------------------------------------------------------------------
svn:keywords = Author Date Id Revision
Propchange: asterisk/trunk/tests/manager/response-time/run-test
------------------------------------------------------------------------------
svn:mime-type = text/plain
Added: asterisk/trunk/tests/manager/response-time/test-config.yaml
URL: http://svnview.digium.com/svn/testsuite/asterisk/trunk/tests/manager/response-time/test-config.yaml?view=auto&rev=454
==============================================================================
--- asterisk/trunk/tests/manager/response-time/test-config.yaml (added)
+++ asterisk/trunk/tests/manager/response-time/test-config.yaml Thu Jul 1 10:54:43 2010
@@ -1,0 +1,14 @@
+testinfo:
+ summary: 'Test the expected response time for manager actions.'
+ description: |
+ "This test ensures that the manager responds within a reasonable
+ ammount of time for actions."
+ issues:
+ -jira: AST-359
+
+properties:
+ minversion: '1.4'
+ dependencies:
+ - app : 'bash'
+ - app : 'asttest'
+
Propchange: asterisk/trunk/tests/manager/response-time/test-config.yaml
------------------------------------------------------------------------------
svn:eol-style = native
Propchange: asterisk/trunk/tests/manager/response-time/test-config.yaml
------------------------------------------------------------------------------
svn:keywords = Author Date Id Revision
Propchange: asterisk/trunk/tests/manager/response-time/test-config.yaml
------------------------------------------------------------------------------
svn:mime-type = text/plain
Added: asterisk/trunk/tests/manager/response-time/test.lua
URL: http://svnview.digium.com/svn/testsuite/asterisk/trunk/tests/manager/response-time/test.lua?view=auto&rev=454
==============================================================================
--- asterisk/trunk/tests/manager/response-time/test.lua (added)
+++ asterisk/trunk/tests/manager/response-time/test.lua Thu Jul 1 10:54:43 2010
@@ -1,0 +1,102 @@
+function check(msg, r, err)
+ if not r then
+ error(msg .. ": " .. tostring(err))
+ end
+ return r
+end
+
+function timed_action(m, a, r)
+ local start = posix.gettimeofday()
+ local res, err = m(a)
+ local stop = posix.gettimeofday()
+
+ if a["Action"] ~= "Logoff" and not res then
+ error(string.format("Error sending action '%s': %s", a["Action"], tostring(err)))
+ end
+
+ if r then
+ r(res, err)
+ end
+
+ -- return the total number of usecs
+ return (stop.tv_sec - start.tv_sec) * 1000000 + (stop.tv_usec - start.tv_usec)
+end
+
+function test_action(results, m, a, r)
+ for i=1,10 do
+ table.insert(results, {timed_action(m, a, r), a["Action"]})
+ end
+end
+
+function mean(results)
+ if #results == 0 then
+ return 0
+ end
+
+ local total = 0
+ for _, val in ipairs(results) do
+ total = total + val[1]
+ end
+ return total / #results
+end
+
+function print_results(results)
+ for _, val in ipairs(times) do
+ print(val[2] .. ": " .. val[1])
+ end
+end
+
+action = ast.manager.action
+
+print("starting asterisk")
+asterisk = ast.new()
+asterisk:generate_manager_conf()
+asterisk:spawn()
+
+m = check("error connecting to asterisk", asterisk:manager_connect())
+
+print("testing login")
+times = {}
+table.insert(times, {timed_action(m, action.login(), function(res, err)
+ if res["Response"] ~= "Success" then
+ error("error authenticating: " .. res["Message"])
+ end
+end), "Login"})
+
+print("testing ping")
+test_action(times, m, action.ping())
+
+print("testing logoff")
+table.insert(times, {timed_action(m, action.logoff()), "Logoff"})
+
+avg = mean(times)
+print("average time per response was " .. avg .. " usecs")
+
+-- there is a problem if the average time is greater than 5000 usecs 5000 was
+-- chosen after running this test multiple times on my system while compiling
+-- asterisk with make -j4. During this an previous runs the average time never
+-- went over 3000. During failed runs, the average time is around 35000; so
+-- 5000 should prevent any false positives while still detecting failures.
+-- Really average times should be less than 500, but system load cause them to
+-- spike.
+expected_avg = 5000
+if avg > expected_avg then
+ print("average time greater than " .. expected_avg .. " usec")
+ print("recorded time per action:")
+ print_results(times)
+ fail("manager took too long to respond; average time was " .. avg .. " usecs")
+end
+
+-- there is also a problem if any of the individual times were over 5000
+-- once again, individual times should really be less than 250 usec, but system
+-- load can cause this to spike.
+individual_time = 5000
+for _, val in ipairs(times) do
+ if val[1] > individual_time then
+ print(string.format("time for action '%s' was greater than %s usecs", val[2], individual_time))
+ print("all times:")
+ print_results(times)
+ fail(string.format("action '%s' took longer than %s usecs", val[2], individual_time))
+ end
+end
+
Propchange: asterisk/trunk/tests/manager/response-time/test.lua
------------------------------------------------------------------------------
svn:eol-style = native
Propchange: asterisk/trunk/tests/manager/response-time/test.lua
------------------------------------------------------------------------------
svn:keywords = Author Date Id Revision
Propchange: asterisk/trunk/tests/manager/response-time/test.lua
------------------------------------------------------------------------------
svn:mime-type = text/plain
Modified: asterisk/trunk/tests/tests.yaml
URL: http://svnview.digium.com/svn/testsuite/asterisk/trunk/tests/tests.yaml?view=diff&rev=454&r1=453&r2=454
==============================================================================
--- asterisk/trunk/tests/tests.yaml (original)
+++ asterisk/trunk/tests/tests.yaml Thu Jul 1 10:54:43 2010
@@ -30,3 +30,4 @@
- test: 'queues/macro_gosub_test'
- test: 'queues/ringinuse_and_pause'
- test: 'queues/wrapup_time'
+ - test: 'manager/response-time'
More information about the svn-commits
mailing list