harn-vm 0.10.180

Async bytecode virtual machine for the Harn programming language
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

//! `find` deletes through `-delete` and `-exec rm`, so its starting points
//! face the same escape and project-wipe floor as `rm -rf` targets.

use super::*;

#[test]
fn floor_blocks_find_deleting_outside_the_workspace_or_the_whole_root() {
    for cmd in [
        "find / -delete",
        "find /etc -name '*.bak' -delete",
        "find ~ -type f -delete",
        "find .. -delete",
        "find -L /var/data -exec rm -rf {} +",
        "find / -execdir rm {} \\;",
        "find /tmp/other -ok rm {} \\;",
        "find /var/data -exec sudo rm -f {} +",
        "sudo find / -delete",
        "find . -delete",
        "find -delete",
        "find . -mindepth 1 -delete",
        "find ./ -exec rm -rf {} +",
        "find . -exec rm -rf {} \\; -name '*.tmp'",
        "find . -false -o -delete",
        "find . -name keep -o -delete",
        "find . ! -name keep -delete",
        "find . -true -delete",
        "find . -printf '%p\\n' -delete",
        "find . -fprint /dev/null -delete",
        "find . -prune -delete",
        "find . -printf -name -delete",
        "find . -fprintf /dev/null -name -delete",
        "find -O3 / -name '*.bak' -delete",
        "find -D tree / -name '*.bak' -delete",
        "find -H -L /etc -delete",
        "find -files0-from list.txt -name x -delete",
    ] {
        assert!(
            is_cat_root(cmd),
            "expected catastrophic (find delete): {cmd}"
        );
    }
}

#[test]
fn floor_allows_scoped_and_read_only_finds() {
    for cmd in [
        "find . -name '*.o' -delete",
        "find build -delete",
        "find /home/dev/project/build -delete",
        "find src -type f -exec rm {} +",
        "find / -name passwd",
        "find / -maxdepth 1 -print",
        "find / -exec grep -l secret {} +",
    ] {
        assert!(!is_cat_root(cmd), "should NOT be catastrophic: {cmd}");
    }
}