1 files changed, 121 insertions, 0 deletions
diff --git a/test/helpers.lua b/test/helpers.lua
new file mode 100644
index 0000000000..3f7a9c2b74
--- /dev/null
+++ b/test/helpers.lua
@@ -0,0 +1,121 @@
+local assert = require('luassert')
+local lfs = require('lfs')
+
+local check_logs_useless_lines = {
+  ['Warning: noted but unhandled ioctl']=1,
+  ['could cause spurious value errors to appear']=2,
+  ['See README_MISSING_SYSCALL_OR_IOCTL for guidance']=3,
+}
+
+local eq = function(exp, act)
+  return assert.are.same(exp, act)
+end
+local neq = function(exp, act)
+  return assert.are_not.same(exp, act)
+end
+local ok = function(res)
+  return assert.is_true(res)
+end
+
+local function check_logs()
+  local log_dir = os.getenv('LOG_DIR')
+  local runtime_errors = 0
+  if log_dir and lfs.attributes(log_dir, 'mode') == 'directory' then
+    for tail in lfs.dir(log_dir) do
+      if tail:sub(1, 30) == 'valgrind-' or tail:find('san%.') then
+        local file = log_dir .. '/' .. tail
+        local fd = io.open(file)
+        local start_msg = ('='):rep(20) .. ' File ' .. file .. ' ' .. ('='):rep(20)
+        local lines = {}
+        local warning_line = 0
+        for line in fd:lines() do
+          local cur_warning_line = check_logs_useless_lines[line]
+          if cur_warning_line == warning_line + 1 then
+            warning_line = cur_warning_line
+          else
+            lines[#lines + 1] = line
+          end
+        end
+        fd:close()
+        os.remove(file)
+        if #lines > 0 then
+          -- local out = os.getenv('TRAVIS_CI_BUILD') and io.stdout or io.stderr
+          local out = io.stdout
+          out:write(start_msg .. '\n')
+          out:write('= ' .. table.concat(lines, '\n= ') .. '\n')
+          out:write(select(1, start_msg:gsub('.', '=')) .. '\n')
+          runtime_errors = runtime_errors + 1
+        end
+      end
+    end
+  end
+  assert(0 == runtime_errors)
+end
+
+-- Tries to get platform name from $SYSTEM_NAME, uname; fallback is "Windows".
+local uname = (function()
+  local platform = nil
+  return (function()
+    if platform then
+      return platform
+    end
+
+    platform = os.getenv("SYSTEM_NAME")
+    if platform then
+      return platform
+    end
+
+    local status, f = pcall(io.popen, "uname -s")
+    if status then
+      platform = f:read("*l")
+      f:close()
+    else
+      platform = 'Windows'
+    end
+    return platform
+  end)
+end)()
+
+local function tmpname()
+  local fname = os.tmpname()
+  if uname() == 'Windows' and fname:sub(1, 2) == '\\s' then
+    -- In Windows tmpname() returns a filename starting with
+    -- special sequence \s, prepend $TEMP path
+    local tmpdir = os.getenv('TEMP')
+    return tmpdir..fname
+  elseif fname:match('^/tmp') and uname() == 'Darwin' then
+    -- In OS X /tmp links to /private/tmp
+    return '/private'..fname
+  else
+    return fname
+  end
+end
+
+local function map(func, tab)
+  local rettab = {}
+  for k, v in pairs(tab) do
+    rettab[k] = func(v)
+  end
+  return rettab
+end
+
+local function filter(filter_func, tab)
+  local rettab = {}
+  for _, entry in pairs(tab) do
+    if filter_func(entry) then
+      table.insert(rettab, entry)
+    end
+  end
+  return rettab
+end
+
+return {
+  eq = eq,
+  neq = neq,
+  ok = ok,
+  check_logs = check_logs,
+  uname = uname,
+  tmpname = tmpname,
+  map = map,
+  filter = filter,
+}