git.sur5r.net Git - i3/i3/blob - testcases/t/171-config-migrate.t

   1 #!perl
   2 # vim:ts=4:sw=4:expandtab
   3 #
   4 # Tests if i3-migrate-config-to-v4 correctly migrates all config file
   5 # directives and commands
   6 #
   7 use i3test i3_autostart => 0;
   8 use Cwd qw(abs_path);
   9 use File::Temp qw(tempfile tempdir);
  10 use v5.10;
  11
  12 # reads in a whole file
  13 sub slurp {
  14     open my $fh, '<', shift;
  15     local $/;
  16     <$fh>;
  17 }
  18
  19 sub migrate_config {
  20     my ($config) = @_;
  21
  22     my ($fh, $tmpfile) = tempfile('/tmp/i3-migrate-cfg.XXXXXX', UNLINK => 1);
  23     print $fh $config;
  24     close($fh);
  25
  26     my $cmd = "sh -c 'exec " . abs_path("../i3-migrate-config-to-v4") . " --v3 <$tmpfile'";
  27     return [ split /\n/, qx($cmd) ];
  28 }
  29
  30 sub line_exists {
  31     my ($lines, $pattern) = @_;
  32
  33     for my $line (@$lines) {
  34         return 1 if $line =~ $pattern;
  35     }
  36
  37     return 0
  38 }
  39
  40 #####################################################################
  41 # check that some directives remain untouched
  42 #####################################################################
  43
  44 my $input = <<EOT;
  45     font -misc-fixed-medium-r-normal--13-120-75-75-C-70-iso10646-1
  46 EOT
  47
  48 my $output = migrate_config($input);
  49 ok(line_exists($output, qr|font -misc-fixed-medium-r-normal--13-120-75-75-C-70-iso10646-1|), 'font directive unchanged');
  50
  51 $input = <<EOT;
  52     floating_Modifier Mod1
  53     focus_follows_mouse true
  54     ipc-socket /tmp/i3-ipc.sock
  55     ipc_socket /tmp/i3-ipc.sock
  56     exec /usr/bin/i3
  57     set stuff Mod1
  58     assign "XTerm" → 3
  59     assign "XTerm" → ~5
  60     client.focused #2F343A #900000 #FFFFFF
  61     client.focused_inactive #FF0000 #FF0000 #FF0000
  62     client.unfocused #00FF00 #00FF00 #00FF00
  63     client.urgent #0000FF #0000FF #0000FF
  64     client.background #000000
  65 EOT
  66
  67 $output = migrate_config($input);
  68 ok(line_exists($output, qr|^floating_Modifier Mod1$|), 'floating_modifier unchanged');
  69 ok(line_exists($output, qr|^focus_follows_mouse true$|), 'focus_follows_mouse unchanged');
  70 ok(line_exists($output, qr|^ipc-socket /tmp/i3-ipc.sock$|), 'ipc-socket unchanged');
  71 ok(line_exists($output, qr|^ipc_socket /tmp/i3-ipc.sock$|), 'ipc_socket unchanged');
  72 ok(line_exists($output, qr|^exec /usr/bin/i3|), 'exec unchanged');
  73 ok(line_exists($output, qr|^set stuff Mod1|), 'set unchanged');
  74 ok(line_exists($output, qr|^assign "XTerm" → 3|), 'assign unchanged');
  75 ok(line_exists($output, qr|^assign "XTerm" → ~5|), 'assign unchanged');
  76 ok(line_exists($output, qr|^client\.focused #2F343A #900000 #FFFFFF$|), 'client.focused unchanged');
  77 ok(line_exists($output, qr|^client\.focused_inactive #FF0000 #FF0000 #FF0000$|), 'client.focused_inactive unchanged');
  78 ok(line_exists($output, qr|^client\.unfocused #00FF00 #00FF00 #00FF00$|), 'client.unfocused unchanged');
  79 ok(line_exists($output, qr|^client\.urgent #0000FF #0000FF #0000FF$|), 'client.urgent unchanged');
  80 ok(line_exists($output, qr|^client\.background #000000$|), 'client.background unchanged');
  81
  82 #####################################################################
  83 # check whether the bar colors get removed properly
  84 #####################################################################
  85
  86 $input = <<EOT;
  87     bar.focused #FFFF00 #FFFF00 #FFFF00
  88     bar.unfocused #FFFF00 #FFFF00 #FFFF00
  89     bar.urgent #FFFF00 #FFFF00 #FFFF00
  90 EOT
  91
  92 $output = migrate_config($input);
  93 ok(!line_exists($output, qr|^bar\.|), 'no bar. lines');
  94 ok(line_exists($output, qr|^#.*REMOVED bar|), 'note bar. removed');
  95
  96
  97 #####################################################################
  98 # check whether the other directives get converted correctly
  99 #####################################################################
 100
 101 $input = <<EOT;
 102     new_container stacking
 103     workspace_bar no
 104     new_window bb
 105 EOT
 106
 107 $output = migrate_config($input);
 108 ok(line_exists($output, qr|^workspace_layout stacking$|), 'new_container changed');
 109 ok(line_exists($output, qr|REMOVED workspace_bar|), 'workspace_bar removed');
 110 ok(!line_exists($output, qr|^workspace_bar|), 'no workspace_bar in the output');
 111 ok(line_exists($output, qr|^new_window none$|), 'new_window changed');
 112
 113 #####################################################################
 114 # check whether new_window's parameters get changed correctly
 115 #####################################################################
 116
 117 $input = <<EOT;
 118     new_window bb
 119     new_window bn
 120     new_window bp
 121 EOT
 122 $output = migrate_config($input);
 123 like($output->[0], qr|^new_window none$|, 'new_window bb changed');
 124 like($output->[1], qr|^new_window normal$|, 'new_window bn changed');
 125 like($output->[2], qr|^new_window 1pixel$|, 'new_window bp changed');
 126
 127 #####################################################################
 128 # check that some commands remain untouched
 129 #####################################################################
 130
 131 $input = <<EOT;
 132     bindsym Mod1+s exec /usr/bin/urxvt
 133     bindsym Mod1+s mark foo
 134     bindsym Mod1+s restart
 135     bindsym Mod1+s reload
 136     bindsym Mod1+s exit
 137     bindsym Mod1+s stack-limit cols 2
 138     bindsym Mod1+s stack-limit rows 3
 139     bind Mod1+c exec /usr/bin/urxvt
 140     mode "asdf" {
 141         bind 36 mode default
 142     }
 143 EOT
 144
 145 $output = migrate_config($input);
 146 ok(line_exists($output, qr|^bindsym Mod1\+s exec /usr/bin/urxvt$|), 'exec unchanged');
 147 ok(line_exists($output, qr|^bindsym Mod1\+s mark foo$|), 'mark unchanged');
 148 ok(line_exists($output, qr|^bindsym Mod1\+s restart$|), 'restart unchanged');
 149 ok(line_exists($output, qr|^bindsym Mod1\+s reload$|), 'reload unchanged');
 150 ok(line_exists($output, qr|^bindsym Mod1\+s exit$|), 'exit unchanged');
 151 ok(line_exists($output, qr|^bindsym Mod1\+s stack-limit cols 2$|), 'stack-limit unchanged');
 152 ok(line_exists($output, qr|^bindsym Mod1\+s stack-limit rows 3$|), 'stack-limit unchanged');
 153 ok(line_exists($output, qr|^bindcode Mod1\+c exec /usr/bin/urxvt$|), 'bind changed to bindcode');
 154 ok(line_exists($output, qr|^mode "asdf" {$|), 'mode asdf unchanged');
 155 ok(line_exists($output, qr|^bindcode 36 mode \"default\"$|), 'mode default unchanged');
 156 ok(line_exists($output, qr|^}$|), 'closing mode bracket still there');
 157
 158 #####################################################################
 159 # check the simple command replacements
 160 #####################################################################
 161
 162 $input = <<EOT;
 163     bindsym Mod1+s s
 164     bindsym Mod1+s d
 165     bindsym Mod1+s T
 166
 167     bindsym Mod1+s f
 168     bindsym Mod1+s fg
 169
 170     bindsym Mod1+s t
 171
 172     bindsym Mod1+s h
 173     bindsym Mod1+s j
 174     bindsym Mod1+s k
 175     bindsym Mod1+s l
 176
 177     bindsym Mod1+s mh
 178     bindsym Mod1+s mj
 179     bindsym Mod1+s mk
 180     bindsym Mod1+s ml
 181
 182     bindsym Mod1+s bn
 183     bindsym Mod1+s bp
 184     bindsym Mod1+s bb
 185     bindsym Mod1+s bt
 186
 187     bindsym Mod1+j wch
 188     bindsym Mod1+j wcml
 189
 190     bindsym Mod1+k kill
 191
 192     bindsym Mod1+n nw
 193     bindsym Mod1+p pw
 194 EOT
 195
 196 $output = migrate_config($input);
 197 ok(line_exists($output, qr|^bindsym Mod1\+s layout stacking$|), 's replaced');
 198 ok(line_exists($output, qr|^bindsym Mod1\+s layout toggle split$|), 'd replaced');
 199 ok(line_exists($output, qr|^bindsym Mod1\+s layout tabbed$|), 'T replaced');
 200 ok(line_exists($output, qr|^bindsym Mod1\+s fullscreen$|), 'f replaced');
 201 ok(line_exists($output, qr|^bindsym Mod1\+s fullscreen global$|), 'fg replaced');
 202 ok(line_exists($output, qr|^bindsym Mod1\+s floating toggle$|), 't replaced');
 203 ok(line_exists($output, qr|^bindsym Mod1\+s focus left$|), 'h replaced');
 204 ok(line_exists($output, qr|^bindsym Mod1\+s focus down$|), 'j replaced');
 205 ok(line_exists($output, qr|^bindsym Mod1\+s focus up$|), 'k replaced');
 206 ok(line_exists($output, qr|^bindsym Mod1\+s focus right$|), 'l replaced');
 207 ok(line_exists($output, qr|^bindsym Mod1\+s move left$|), 'mh replaced');
 208 ok(line_exists($output, qr|^bindsym Mod1\+s move down$|), 'mj replaced');
 209 ok(line_exists($output, qr|^bindsym Mod1\+s move up$|), 'mk replaced');
 210 ok(line_exists($output, qr|^bindsym Mod1\+s move right$|), 'ml replaced');
 211 ok(line_exists($output, qr|^bindsym Mod1\+s border normal$|), 'bn replaced');
 212 ok(line_exists($output, qr|^bindsym Mod1\+s border 1pixel$|), 'bp replaced');
 213 ok(line_exists($output, qr|^bindsym Mod1\+s border none$|), 'bb replaced');
 214 ok(line_exists($output, qr|^bindsym Mod1\+s border toggle$|), 'bt replaced');
 215 ok(line_exists($output, qr|^bindsym Mod1\+j focus parent; focus left$|), 'with container replaced with focus parent; focus left');
 216 ok(line_exists($output, qr|^bindsym Mod1\+j focus parent; move right$|), 'with container replaced with focus parent; move right');
 217 ok(line_exists($output, qr|^bindsym Mod1\+k kill$|), 'kill unchanged');
 218 ok(line_exists($output, qr|^bindsym Mod1\+n workspace next$|), 'nw replaced');
 219 ok(line_exists($output, qr|^bindsym Mod1\+p workspace prev$|), 'pw replaced');
 220
 221 #####################################################################
 222 # check more advanced replacements
 223 #####################################################################
 224
 225 $input = <<EOT;
 226     bindsym Mod1+s goto foo
 227 EOT
 228
 229 $output = migrate_config($input);
 230 ok(line_exists($output, qr|^bindsym Mod1\+s \[con_mark="foo"\] focus$|), 'goto replaced');
 231
 232 #####################################################################
 233 # check whether focus's parameters get changed correctly
 234 #####################################################################
 235
 236 $input = <<EOT;
 237 bindsym Mod1+f focus 3
 238 bindsym Mod1+f focus floating
 239 bindsym Mod1+f focus tiling
 240 bindsym Mod1+f focus ft
 241 EOT
 242
 243 $output = migrate_config($input);
 244 like($output->[0], qr|^#.*focus.*obsolete.*focus 3$|, 'focus [number] gone');
 245 like($output->[1], qr|^bindsym Mod1\+f focus floating$|, 'focus floating unchanged');
 246 like($output->[2], qr|^bindsym Mod1\+f focus tiling$|, 'focus tiling unchanged');
 247 like($output->[3], qr|^bindsym Mod1\+f focus mode_toggle$|, 'focus ft changed');
 248
 249 #####################################################################
 250 # check whether resize's parameters get changed correctly
 251 #####################################################################
 252
 253 $input = <<EOT;
 254 bindsym Mod1+f resize left +10
 255 bindsym Mod1+f resize top -20
 256 bindsym Mod1+f resize right -20
 257 bindsym Mod1+f resize bottom +23
 258 bindsym Mod1+f resize          left    \t +10
 259 EOT
 260
 261 $output = migrate_config($input);
 262 like($output->[0], qr|^bindsym Mod1\+f resize grow left 10 px$|, 'resize left changed');
 263 like($output->[1], qr|^bindsym Mod1\+f resize shrink up 20 px$|, 'resize top changed');
 264 like($output->[2], qr|^bindsym Mod1\+f resize shrink right 20 px$|, 'resize right changed');
 265 like($output->[3], qr|^bindsym Mod1\+f resize grow down 23 px$|, 'resize bottom changed');
 266
 267 #####################################################################
 268 # also resizing, but with indention this time
 269 #####################################################################
 270
 271 like($output->[4], qr|^bindsym Mod1\+f resize grow left 10 px$|, 'resize left changed');
 272
 273 #####################################################################
 274 # check whether jump's parameters get changed correctly
 275 #####################################################################
 276
 277 $input = <<EOT;
 278 bindsym Mod1+f jump 3
 279 bindsym Mod1+f jump 3 4 5
 280 bindsym Mod1+f jump "XTerm"
 281 bindsym Mod1+f jump "XTerm/irssi"
 282 EOT
 283
 284 $output = migrate_config($input);
 285 like($output->[0], qr|^#.*obsolete.*jump 3$|, 'jump to workspace removed');
 286 like($output->[1], qr|^#.*obsolete.*jump 3 4 5$|, 'jump to workspace + col/row removed');
 287 like($output->[2], qr|^bindsym Mod1\+f \[class="XTerm"\] focus$|, 'jump changed');
 288 like($output->[3], qr|^bindsym Mod1\+f \[class="XTerm" title="irssi"\] focus$|, 'jump changed');
 289
 290 #####################################################################
 291 # check whether workspace commands are handled correctly
 292 #####################################################################
 293
 294 $output = migrate_config('workspace 3 output VGA-1');
 295 ok(line_exists($output, qr|^workspace 3 output VGA-1$|), 'workspace assignment unchanged');
 296
 297 $output = migrate_config('workspace 3 work');
 298 ok(!line_exists($output, qr|^workspace|), 'workspace name not present');
 299 ok(line_exists($output, qr|#.*workspace name.*bindings|), 'note present');
 300
 301 $input = <<EOT;
 302     workspace 3 work
 303     bindsym Mod1+3 3
 304 EOT
 305 $output = migrate_config($input);
 306 ok(!line_exists($output, qr|^workspace|), 'workspace name not present');
 307 ok(line_exists($output, qr|^bindsym Mod1\+3 workspace work|), 'named workspace in bindings');
 308
 309 # The same, but in reverse order
 310 $input = <<EOT;
 311     bindsym Mod1+3 3
 312     workspace 3 work
 313 EOT
 314 $output = migrate_config($input);
 315 ok(!line_exists($output, qr|^workspace|), 'workspace name not present');
 316 ok(line_exists($output, qr|^bindsym Mod1\+3 workspace work|), 'named workspace in bindings');
 317
 318 $output = migrate_config('bindsym Mod1+3 3');
 319 ok(line_exists($output, qr|^bindsym Mod1\+3 workspace 3|), 'workspace changed');
 320
 321 $output = migrate_config('bindsym Mod1+3 m3');
 322 ok(line_exists($output, qr|^bindsym Mod1\+3 move container to workspace 3|), 'move workspace changed');
 323
 324 $input = <<EOT;
 325     workspace 3 work
 326     bindsym Mod1+3 m3
 327 EOT
 328 $output = migrate_config($input);
 329 ok(!line_exists($output, qr|^workspace|), 'workspace name not present');
 330 ok(line_exists($output, qr|^bindsym Mod1\+3 move container to workspace work|), 'move to named workspace in bindings');
 331
 332 #####################################################################
 333 # check whether an i3bar call is added if the workspace bar bar was enabled
 334 #####################################################################
 335
 336 $output = migrate_config('');
 337 ok(line_exists($output, qr|bar {|), 'i3bar added');
 338
 339 $output = migrate_config('workspace_bar enable');
 340 ok(line_exists($output, qr|bar {|), 'i3bar added');
 341
 342 $output = migrate_config('workspace_bar no');
 343 ok(!line_exists($output, qr|bar {|), 'no i3bar added');
 344
 345 #####################################################################
 346 # check whether the mode command gets quotes
 347 #####################################################################
 348
 349 $output = migrate_config('bindsym Mod1+m mode foobar');
 350 ok(line_exists($output, qr|^bindsym Mod1\+m mode "foobar"|), 'mode got quotes');
 351
 352 done_testing();