File: test-gravity.lua

package info (click to toggle)
awesome 4.3-8.1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 6,468 kB
  • sloc: ansic: 14,508; sh: 526; makefile: 46
file content (64 lines) | stat: -rw-r--r-- 1,730 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
-- Test if client's c:swap() corrupts the Lua stack

local runner = require("_runner")
local spawn = require("awful.spawn")

local todo = 2
local had_error = false

local function wait_a_bit(count)
    if todo == 0 or count == 5 then
        return true
    end
end
runner.run_steps({
    function()
        local err = spawn.with_line_callback(
            { os.getenv("build_dir") ..  "/test-gravity" },
            {
                exit = function(what, code)
                    assert(what == "exit", what)
                    assert(code == 0, "Exit code was " .. code)
                    todo = todo - 1
                end,
                stderr = function(line)
                    had_error = true
                    print("Read on stderr: " .. line)
                end,
                stdout = function(line)
                    if line == "SUCCESS" then
                        todo = todo - 1
                    elseif line:sub(1, 5) ~= "LOG: " then
                        had_error = true
                        print("Read on stdout: " .. line)
                    end
                end
            })
        assert(type(err) ~= "string", err)
        return true
    end,
    -- Buy the external program some time to finish
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    wait_a_bit,
    function()
        if todo == 0 then
            assert(not had_error, "Some error occurred, see above")
            return true
        end
    end
})

-- vim: filetype=lua:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:textwidth=80