tests/test/script/builtin/rmdir.testscript


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

# file      : tests/test/script/builtin/rmdir.testscript
# license   : MIT; see accompanying LICENSE file

.include ../common.testscript

: dir
:
{
  : test-scope
  :
  : Removing scope directory fails.
  :
  $c <<EOI && $b
  rmdir ./ 2>"rmdir: '$~' contains test working directory '$~'" == 1
  EOI

  : outside-scope
  :
  : Need to use a path that unlikely exists (not to remove something useful).
  :
  {
    : fail
    :
    : Removing directory outside the testscript working directory fails.
    :
    $c <<EOI && $b
    rmdir ../../a/b/c 2>>/~%EOE% == 1
    %rmdir: '.+/dir/outside-scope/fail/a/b/c/' is out of working directory '.+/dir/outside-scope/fail/test'%
    EOE
    EOI

    : force
    :
    : Removing path outside the testscript working directory succeeds with -f
    : option.
    :
    $c <'rmdir -f ../../a/b/c' && $b
  }
}