]> git.sur5r.net Git - i3/i3/blob - testcases/t/164-kill-win-vs-client.t
bce6b23b1e7e60d2a15c551d514e4bb939ec2aa6
[i3/i3] / testcases / t / 164-kill-win-vs-client.t
1 #!perl
2 # vim:ts=4:sw=4:expandtab
3 #
4 # Tests if WM_STATE is WM_STATE_NORMAL when mapped and WM_STATE_WITHDRAWN when
5 # unmapped.
6 #
7 use i3test;
8
9 sub two_windows {
10     my $tmp = fresh_workspace;
11
12     ok(@{get_ws_content($tmp)} == 0, 'no containers yet');
13
14     my $first = open_window;
15     my $second = open_window;
16
17     is($x->input_focus, $second->id, 'second window focused');
18     ok(@{get_ws_content($tmp)} == 2, 'two containers opened');
19
20     return $tmp;
21 }
22
23 ##############################################################
24 # 1: open two windows (in the same client), kill one and see if
25 # the other one is still there
26 ##############################################################
27
28 my $tmp = two_windows;
29
30 cmd 'kill';
31 sync_with_i3;
32
33 ok(@{get_ws_content($tmp)} == 1, 'one container left after killing');
34
35 ##############################################################
36 # 2: same test case as test 1, but with the explicit variant
37 # 'kill window'
38 ##############################################################
39
40 $tmp = two_windows;
41
42 cmd 'kill window';
43 sync_with_i3;
44
45 ok(@{get_ws_content($tmp)} == 1, 'one container left after killing');
46
47 ##############################################################
48 # 3: open two windows (in the same client), use 'kill client'
49 # and check if both are gone
50 ##############################################################
51
52 $tmp = two_windows;
53
54 cmd 'kill client';
55 # We need to re-establish the X11 connection which we just killed :).
56 $x = i3test::X11->new;
57 sync_with_i3(no_cache => 1);
58
59 ok(@{get_ws_content($tmp)} == 0, 'no containers left after killing');
60
61 done_testing;