t/201-config-parser: test more directives, test error handling
This commit is contained in:
parent
40c624e1c4
commit
587b92b7a3
|
@ -34,9 +34,9 @@ sub parser_calls {
|
|||
my @lines = split("\n", $stdout);
|
||||
@lines = grep { not /^# / } @lines;
|
||||
|
||||
## The criteria management calls are irrelevant and not what we want to test
|
||||
## in the first place.
|
||||
#@lines = grep { !(/cmd_criteria_init()/ || /cmd_criteria_match_windows/) } @lines;
|
||||
# The criteria management calls are irrelevant and not what we want to test
|
||||
# in the first place.
|
||||
@lines = grep { !(/cfg_criteria_init/ || /cfg_criteria_pop_state/) } @lines;
|
||||
return join("\n", @lines) . "\n";
|
||||
}
|
||||
|
||||
|
@ -49,14 +49,18 @@ EOT
|
|||
|
||||
my $expected = <<'EOT';
|
||||
cfg_enter_mode(meh)
|
||||
cfg_mode_binding(bindsym, Mod1,Shift, x, resize grow)
|
||||
cfg_mode_binding(bindcode, Mod1, 44, resize shrink)
|
||||
cfg_mode_binding(bindsym, Mod1,Shift, x, (null), resize grow)
|
||||
cfg_mode_binding(bindcode, Mod1, 44, (null), resize shrink)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'single number (move workspace 3) ok');
|
||||
|
||||
################################################################################
|
||||
# exec and exec_always
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
exec geeqie
|
||||
exec --no-startup-id /tmp/foo.sh
|
||||
|
@ -73,7 +77,457 @@ EOT
|
|||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'single number (move workspace 3) ok');
|
||||
'exec okay');
|
||||
|
||||
################################################################################
|
||||
# for_window
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
for_window [class="^Chrome"] floating enable
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_criteria_add(class, ^Chrome)
|
||||
cfg_for_window(floating enable)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'for_window okay');
|
||||
|
||||
################################################################################
|
||||
# assign
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
assign [class="^Chrome"] 4
|
||||
assign [class="^Chrome"] named workspace
|
||||
assign [class="^Chrome"] "quoted named workspace"
|
||||
assign [class="^Chrome"] → "quoted named workspace"
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_criteria_add(class, ^Chrome)
|
||||
cfg_assign(4)
|
||||
cfg_criteria_add(class, ^Chrome)
|
||||
cfg_assign(named workspace)
|
||||
cfg_criteria_add(class, ^Chrome)
|
||||
cfg_assign(quoted named workspace)
|
||||
cfg_criteria_add(class, ^Chrome)
|
||||
cfg_assign(quoted named workspace)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'for_window okay');
|
||||
|
||||
################################################################################
|
||||
# floating_minimum_size / floating_maximum_size
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
floating_minimum_size 80x55
|
||||
floating_minimum_size 80 x 55
|
||||
floating_maximum_size 73 x 10
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_floating_minimum_size(80, 55)
|
||||
cfg_floating_minimum_size(80, 55)
|
||||
cfg_floating_maximum_size(73, 10)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'floating_minimum_size ok');
|
||||
|
||||
################################################################################
|
||||
# floating_modifier
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
floating_modifier Mod1
|
||||
floating_modifier mOd1
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_floating_modifier(Mod1)
|
||||
cfg_floating_modifier(Mod1)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'floating_modifier ok');
|
||||
|
||||
################################################################################
|
||||
# default_orientation
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
default_orientation horizontal
|
||||
default_orientation vertical
|
||||
default_orientation auto
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_default_orientation(horizontal)
|
||||
cfg_default_orientation(vertical)
|
||||
cfg_default_orientation(auto)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'default_orientation ok');
|
||||
|
||||
################################################################################
|
||||
# workspace_layout
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
workspace_layout default
|
||||
workspace_layout stacked
|
||||
workspace_layout stacking
|
||||
workspace_layout tabbed
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_workspace_layout(default)
|
||||
cfg_workspace_layout(stacked)
|
||||
cfg_workspace_layout(stacking)
|
||||
cfg_workspace_layout(tabbed)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'workspace_layout ok');
|
||||
|
||||
################################################################################
|
||||
# new_window
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
new_window 1pixel
|
||||
new_window normal
|
||||
new_window none
|
||||
new_float 1pixel
|
||||
new_float normal
|
||||
new_float none
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_new_window(new_window, 1pixel, -1)
|
||||
cfg_new_window(new_window, normal, 2)
|
||||
cfg_new_window(new_window, none, -1)
|
||||
cfg_new_window(new_float, 1pixel, -1)
|
||||
cfg_new_window(new_float, normal, 2)
|
||||
cfg_new_window(new_float, none, -1)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'new_window ok');
|
||||
|
||||
################################################################################
|
||||
# hide_edge_borders
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
hide_edge_borders none
|
||||
hide_edge_borders vertical
|
||||
hide_edge_borders horizontal
|
||||
hide_edge_borders both
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_hide_edge_borders(none)
|
||||
cfg_hide_edge_borders(vertical)
|
||||
cfg_hide_edge_borders(horizontal)
|
||||
cfg_hide_edge_borders(both)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'hide_edge_borders ok');
|
||||
|
||||
################################################################################
|
||||
# focus_follows_mouse
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
focus_follows_mouse yes
|
||||
focus_follows_mouse no
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_focus_follows_mouse(yes)
|
||||
cfg_focus_follows_mouse(no)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'focus_follows_mouse ok');
|
||||
|
||||
################################################################################
|
||||
# force_display_urgency_hint
|
||||
################################################################################
|
||||
|
||||
is(parser_calls('force_display_urgency_hint 300'),
|
||||
"cfg_force_display_urgency_hint(300)\n",
|
||||
'force_display_urgency_hint ok');
|
||||
|
||||
is(parser_calls('force_display_urgency_hint 500 ms'),
|
||||
"cfg_force_display_urgency_hint(500)\n",
|
||||
'force_display_urgency_hint ok');
|
||||
|
||||
is(parser_calls('force_display_urgency_hint 700ms'),
|
||||
"cfg_force_display_urgency_hint(700)\n",
|
||||
'force_display_urgency_hint ok');
|
||||
|
||||
$config = <<'EOT';
|
||||
force_display_urgency_hint 300
|
||||
force_display_urgency_hint 500 ms
|
||||
force_display_urgency_hint 700ms
|
||||
force_display_urgency_hint 700
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_force_display_urgency_hint(300)
|
||||
cfg_force_display_urgency_hint(500)
|
||||
cfg_force_display_urgency_hint(700)
|
||||
cfg_force_display_urgency_hint(700)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'force_display_urgency_hint ok');
|
||||
|
||||
################################################################################
|
||||
# workspace
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
workspace 3 output VGA-1
|
||||
workspace "4: output" output VGA-2
|
||||
workspace bleh output LVDS1/I_1
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_workspace(3, VGA-1)
|
||||
cfg_workspace(4: output, VGA-2)
|
||||
cfg_workspace(bleh, LVDS1/I_1)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'workspace ok');
|
||||
|
||||
################################################################################
|
||||
# ipc-socket
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
ipc-socket /tmp/i3.sock
|
||||
ipc_socket ~/.i3/i3.sock
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_ipc_socket(/tmp/i3.sock)
|
||||
cfg_ipc_socket(~/.i3/i3.sock)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'ipc-socket ok');
|
||||
|
||||
################################################################################
|
||||
# colors
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
client.focused #4c7899 #285577 #ffffff #2e9ef4
|
||||
client.focused_inactive #333333 #5f676a #ffffff #484e50
|
||||
client.unfocused #333333 #222222 #888888 #292d2e
|
||||
client.urgent #2f343a #900000 #ffffff #900000
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_color(client.focused, #4c7899, #285577, #ffffff, #2e9ef4)
|
||||
cfg_color(client.focused_inactive, #333333, #5f676a, #ffffff, #484e50)
|
||||
cfg_color(client.unfocused, #333333, #222222, #888888, #292d2e)
|
||||
cfg_color(client.urgent, #2f343a, #900000, #ffffff, #900000)
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'colors ok');
|
||||
|
||||
################################################################################
|
||||
# Error message with 2+2 lines of context
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
# i3 config file (v4)
|
||||
|
||||
font foobar
|
||||
|
||||
unknown qux
|
||||
|
||||
# yay
|
||||
# this should not show up
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_font(foobar)
|
||||
ERROR: CONFIG: Expected one of these tokens: <end>, '#', 'set', 'bindsym', 'bindcode', 'bar', 'font', 'mode', 'floating_minimum_size', 'floating_maximum_size', 'floating_modifier', 'default_orientation', 'workspace_layout', 'new_window', 'new_float', 'hide_edge_borders', 'for_window', 'assign', 'focus_follows_mouse', 'force_focus_wrapping', 'force_xinerama', 'force-xinerama', 'workspace_auto_back_and_forth', 'fake_outputs', 'fake-outputs', 'force_display_urgency_hint', 'workspace', 'ipc_socket', 'ipc-socket', 'restart_state', 'popup_during_fullscreen', 'exec_always', 'exec', 'client.background', 'client.focused_inactive', 'client.focused', 'client.unfocused', 'client.urgent'
|
||||
ERROR: CONFIG: (in file <stdin>)
|
||||
ERROR: CONFIG: Line 3: font foobar
|
||||
ERROR: CONFIG: Line 4:
|
||||
ERROR: CONFIG: Line 5: unknown qux
|
||||
ERROR: CONFIG: ^^^^^^^^^^^
|
||||
ERROR: CONFIG: Line 6:
|
||||
ERROR: CONFIG: Line 7: # yay
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'error message (2+2 context) ok');
|
||||
|
||||
################################################################################
|
||||
# Error message with 0+0 lines of context
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
unknown qux
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
ERROR: CONFIG: Expected one of these tokens: <end>, '#', 'set', 'bindsym', 'bindcode', 'bar', 'font', 'mode', 'floating_minimum_size', 'floating_maximum_size', 'floating_modifier', 'default_orientation', 'workspace_layout', 'new_window', 'new_float', 'hide_edge_borders', 'for_window', 'assign', 'focus_follows_mouse', 'force_focus_wrapping', 'force_xinerama', 'force-xinerama', 'workspace_auto_back_and_forth', 'fake_outputs', 'fake-outputs', 'force_display_urgency_hint', 'workspace', 'ipc_socket', 'ipc-socket', 'restart_state', 'popup_during_fullscreen', 'exec_always', 'exec', 'client.background', 'client.focused_inactive', 'client.focused', 'client.unfocused', 'client.urgent'
|
||||
ERROR: CONFIG: (in file <stdin>)
|
||||
ERROR: CONFIG: Line 1: unknown qux
|
||||
ERROR: CONFIG: ^^^^^^^^^^^
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'error message (0+0 context) ok');
|
||||
|
||||
################################################################################
|
||||
# Error message with 1+0 lines of context
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
# context before
|
||||
unknown qux
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
ERROR: CONFIG: Expected one of these tokens: <end>, '#', 'set', 'bindsym', 'bindcode', 'bar', 'font', 'mode', 'floating_minimum_size', 'floating_maximum_size', 'floating_modifier', 'default_orientation', 'workspace_layout', 'new_window', 'new_float', 'hide_edge_borders', 'for_window', 'assign', 'focus_follows_mouse', 'force_focus_wrapping', 'force_xinerama', 'force-xinerama', 'workspace_auto_back_and_forth', 'fake_outputs', 'fake-outputs', 'force_display_urgency_hint', 'workspace', 'ipc_socket', 'ipc-socket', 'restart_state', 'popup_during_fullscreen', 'exec_always', 'exec', 'client.background', 'client.focused_inactive', 'client.focused', 'client.unfocused', 'client.urgent'
|
||||
ERROR: CONFIG: (in file <stdin>)
|
||||
ERROR: CONFIG: Line 1: # context before
|
||||
ERROR: CONFIG: Line 2: unknown qux
|
||||
ERROR: CONFIG: ^^^^^^^^^^^
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'error message (1+0 context) ok');
|
||||
|
||||
################################################################################
|
||||
# Error message with 0+1 lines of context
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
unknown qux
|
||||
# context after
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
ERROR: CONFIG: Expected one of these tokens: <end>, '#', 'set', 'bindsym', 'bindcode', 'bar', 'font', 'mode', 'floating_minimum_size', 'floating_maximum_size', 'floating_modifier', 'default_orientation', 'workspace_layout', 'new_window', 'new_float', 'hide_edge_borders', 'for_window', 'assign', 'focus_follows_mouse', 'force_focus_wrapping', 'force_xinerama', 'force-xinerama', 'workspace_auto_back_and_forth', 'fake_outputs', 'fake-outputs', 'force_display_urgency_hint', 'workspace', 'ipc_socket', 'ipc-socket', 'restart_state', 'popup_during_fullscreen', 'exec_always', 'exec', 'client.background', 'client.focused_inactive', 'client.focused', 'client.unfocused', 'client.urgent'
|
||||
ERROR: CONFIG: (in file <stdin>)
|
||||
ERROR: CONFIG: Line 1: unknown qux
|
||||
ERROR: CONFIG: ^^^^^^^^^^^
|
||||
ERROR: CONFIG: Line 2: # context after
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'error message (0+1 context) ok');
|
||||
|
||||
################################################################################
|
||||
# Error message with 0+2 lines of context
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
unknown qux
|
||||
# context after
|
||||
# context 2 after
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
ERROR: CONFIG: Expected one of these tokens: <end>, '#', 'set', 'bindsym', 'bindcode', 'bar', 'font', 'mode', 'floating_minimum_size', 'floating_maximum_size', 'floating_modifier', 'default_orientation', 'workspace_layout', 'new_window', 'new_float', 'hide_edge_borders', 'for_window', 'assign', 'focus_follows_mouse', 'force_focus_wrapping', 'force_xinerama', 'force-xinerama', 'workspace_auto_back_and_forth', 'fake_outputs', 'fake-outputs', 'force_display_urgency_hint', 'workspace', 'ipc_socket', 'ipc-socket', 'restart_state', 'popup_during_fullscreen', 'exec_always', 'exec', 'client.background', 'client.focused_inactive', 'client.focused', 'client.unfocused', 'client.urgent'
|
||||
ERROR: CONFIG: (in file <stdin>)
|
||||
ERROR: CONFIG: Line 1: unknown qux
|
||||
ERROR: CONFIG: ^^^^^^^^^^^
|
||||
ERROR: CONFIG: Line 2: # context after
|
||||
ERROR: CONFIG: Line 3: # context 2 after
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'error message (0+2 context) ok');
|
||||
|
||||
################################################################################
|
||||
# Error message within mode blocks
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
mode "yo" {
|
||||
bindsym x resize shrink left
|
||||
unknown qux
|
||||
}
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_enter_mode(yo)
|
||||
cfg_mode_binding(bindsym, (null), x, (null), resize shrink left)
|
||||
ERROR: CONFIG: Expected one of these tokens: <end>, '#', 'set', 'bindsym', 'bindcode', '}'
|
||||
ERROR: CONFIG: (in file <stdin>)
|
||||
ERROR: CONFIG: Line 1: mode "yo" {
|
||||
ERROR: CONFIG: Line 2: bindsym x resize shrink left
|
||||
ERROR: CONFIG: Line 3: unknown qux
|
||||
ERROR: CONFIG: ^^^^^^^^^^^
|
||||
ERROR: CONFIG: Line 4: }
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'error message (mode block) ok');
|
||||
|
||||
################################################################################
|
||||
# Error message within bar blocks
|
||||
################################################################################
|
||||
|
||||
$config = <<'EOT';
|
||||
bar {
|
||||
output LVDS-1
|
||||
unknown qux
|
||||
}
|
||||
EOT
|
||||
|
||||
$expected = <<'EOT';
|
||||
cfg_bar_output(LVDS-1)
|
||||
ERROR: CONFIG: Expected one of these tokens: <end>, '#', 'set', 'i3bar_command', 'status_command', 'socket_path', 'mode', 'modifier', 'position', 'output', 'tray_output', 'font', 'workspace_buttons', 'verbose', 'colors', '}'
|
||||
ERROR: CONFIG: (in file <stdin>)
|
||||
ERROR: CONFIG: Line 1: bar {
|
||||
ERROR: CONFIG: Line 2: output LVDS-1
|
||||
ERROR: CONFIG: Line 3: unknown qux
|
||||
ERROR: CONFIG: ^^^^^^^^^^^
|
||||
ERROR: CONFIG: Line 4: }
|
||||
EOT
|
||||
|
||||
is(parser_calls($config),
|
||||
$expected,
|
||||
'error message (bar block) ok');
|
||||
|
||||
done_testing;
|
||||
|
|
Loading…
Reference in New Issue