1*b315a0a8SYosh #![expect(unsafe_op_in_unsafe_fn, reason = "old code, not worth updating yet")]
2*b315a0a8SYosh
3*b315a0a8SYosh use std::{env, process};
4*b315a0a8SYosh use test_programs::preview1::{assert_errno, open_scratch_directory};
5*b315a0a8SYosh
test_remove_nonempty_directory(dir_fd: wasip1::Fd)6*b315a0a8SYosh unsafe fn test_remove_nonempty_directory(dir_fd: wasip1::Fd) {
7*b315a0a8SYosh // Create a directory in the scratch directory.
8*b315a0a8SYosh wasip1::path_create_directory(dir_fd, "dir").expect("creating a directory");
9*b315a0a8SYosh
10*b315a0a8SYosh // Create a directory in the directory we just created.
11*b315a0a8SYosh wasip1::path_create_directory(dir_fd, "dir/nested").expect("creating a subdirectory");
12*b315a0a8SYosh
13*b315a0a8SYosh // Test that attempting to unlink the first directory returns the expected error code.
14*b315a0a8SYosh assert_errno!(
15*b315a0a8SYosh wasip1::path_remove_directory(dir_fd, "dir")
16*b315a0a8SYosh .expect_err("remove_directory on a directory should return ENOTEMPTY"),
17*b315a0a8SYosh wasip1::ERRNO_NOTEMPTY
18*b315a0a8SYosh );
19*b315a0a8SYosh
20*b315a0a8SYosh // Removing the directories.
21*b315a0a8SYosh wasip1::path_remove_directory(dir_fd, "dir/nested")
22*b315a0a8SYosh .expect("remove_directory on a nested directory should succeed");
23*b315a0a8SYosh wasip1::path_remove_directory(dir_fd, "dir").expect("removing a directory");
24*b315a0a8SYosh }
25*b315a0a8SYosh
main()26*b315a0a8SYosh fn main() {
27*b315a0a8SYosh let mut args = env::args();
28*b315a0a8SYosh let prog = args.next().unwrap();
29*b315a0a8SYosh let arg = if let Some(arg) = args.next() {
30*b315a0a8SYosh arg
31*b315a0a8SYosh } else {
32*b315a0a8SYosh eprintln!("usage: {prog} <scratch directory>");
33*b315a0a8SYosh process::exit(1);
34*b315a0a8SYosh };
35*b315a0a8SYosh
36*b315a0a8SYosh // Open scratch directory
37*b315a0a8SYosh let dir_fd = match open_scratch_directory(&arg) {
38*b315a0a8SYosh Ok(dir_fd) => dir_fd,
39*b315a0a8SYosh Err(err) => {
40*b315a0a8SYosh eprintln!("{err}");
41*b315a0a8SYosh process::exit(1)
42*b315a0a8SYosh }
43*b315a0a8SYosh };
44*b315a0a8SYosh
45*b315a0a8SYosh // Run the tests.
46*b315a0a8SYosh unsafe { test_remove_nonempty_directory(dir_fd) }
47*b315a0a8SYosh }
48