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
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
|
#!/usr/bin/env dub
/++dub.sdl:
name "gen_phobos_sources"
+/
// Written in the D programming language.
import std.stdio;
import std.file;
import std.path;
import std.range;
import std.string;
import std.algorithm;
string[] filterList = [
"./Makefile.in", "./Makefile.am",
"./index.dd",
"./libgphobos.spec.in", "./drtstuff.spec",
"./LICENSE_1_0.txt", "./MERGE",
"./std/experimental/note.md"
];
struct Files
{
string[] baseList;
string[][string] sysList;
}
void main(string[] args)
{
Files[string] fileMap;
foreach (entry; "."
.dirEntries(SpanMode.depth)
.filter!(a => !filterList.canFind(a)))
{
if (entry.isFile)
{
auto ext = entry.extension.empty ? "" : entry.extension[1 .. $];
if (!(ext in fileMap))
fileMap[ext] = Files.init;
string sentry = entry[2 .. $];
if (entry.name.startsWith("./std/c/"))
{
if (entry.dirName == "./std/c")
{
fileMap[ext].sysList["stdc"] ~= sentry;
}
else
{
auto components = entry.pathSplitter;
components.popFrontN(3);
fileMap[ext].sysList[components.front] ~= sentry;
}
}
else
fileMap[ext].baseList ~= sentry;
}
}
writeln("if ENABLE_LIBDRUNTIME_ONLY");
foreach (extEntry; fileMap.byKeyValue.array.sort!"a.key < b.key")
{
auto ext = extEntry.key;
auto value = extEntry.value;
writeList("PHOBOS_" ~ ext.toUpper() ~ "SOURCES", [],
!value.baseList.empty);
foreach (entry; value.sysList.byKeyValue.array.sort!"a.key < b.key")
{
string name = "PHOBOS_" ~ ext.toUpper() ~ "SOURCES_"
~ entry.key.toUpper();
writeList(name, [], !entry.value.empty);
}
}
writeln();
writeln("else");
foreach (extEntry; fileMap.byKeyValue.array.sort!"a.key < b.key")
{
auto ext = extEntry.key;
auto value = extEntry.value;
writeList("PHOBOS_" ~ ext.toUpper() ~ "SOURCES", value.baseList);
foreach (entry; value.sysList.byKeyValue.array.sort!"a.key < b.key")
{
string name = "PHOBOS_" ~ ext.toUpper() ~ "SOURCES_"
~ entry.key.toUpper();
writeList(name, entry.value);
}
}
writeln();
writeln("endif");
}
void writeList(string name, string[] values, bool force = false)
{
if (!force && values.empty)
return;
values = sort(values).array();
writeln();
writef("%s =", name);
size_t line = name.length + 3;
foreach (entry; values)
{
if (line + entry.length > 70)
{
line = 0;
writeln(` \`);
write('\t');
}
else
write(" ");
write(entry);
line += entry.length + 1;
}
writeln();
}
|
