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
58
59
60
61
62
63
64
65
66
67
68
69
70
|
package os
import "core:strings"
import "core:mem"
read_dir :: proc(fd: Handle, n: int, allocator := context.allocator) -> (fi: []File_Info, err: Errno) {
dirp: Dir;
dirp, err = _fdopendir(fd);
if err != ERROR_NONE {
return;
}
defer _closedir(dirp);
dirpath: string;
dirpath, err = absolute_path_from_handle(fd);
if err != ERROR_NONE {
return;
}
defer delete(dirpath);
n := n;
size := n;
if n <= 0 {
n = -1;
size = 100;
}
dfi := make([dynamic]File_Info, 0, size, allocator);
for {
entry: Dirent;
end_of_stream: bool;
entry, err, end_of_stream = _readdir(dirp);
if err != ERROR_NONE {
for fi_ in dfi {
file_info_delete(fi_, allocator);
}
delete(dfi);
return;
} else if end_of_stream {
break;
}
fi_: File_Info;
filename := cast(string)(transmute(cstring)mem.Raw_Cstring{ data = &entry.name[0] });
if filename == "." || filename == ".." {
continue;
}
fullpath := strings.join( []string{ dirpath, filename }, "/", context.temp_allocator);
defer delete(fullpath, context.temp_allocator);
fi_, err = stat(fullpath, allocator);
if err != ERROR_NONE {
for fi__ in dfi {
file_info_delete(fi__, allocator);
}
delete(dfi);
return;
}
append(&dfi, fi_);
}
return dfi[:], ERROR_NONE;
}
|
