25 lines
511 B
HolyC
25 lines
511 B
HolyC
|
// Copies all source files uncompressed into the home directory
|
|||
|
|
|||
|
CDirEntry *start_entry = FilesFind(
|
|||
|
"/*.Z;!/Home/*",
|
|||
|
FUF_RECURSE | FUF_JUST_FILES
|
|||
|
);
|
|||
|
|
|||
|
CDirEntry *entry = start_entry;
|
|||
|
|
|||
|
do {
|
|||
|
|
|||
|
Print("%s", entry->full_name);
|
|||
|
|
|||
|
U8 *new_name = MAlloc(StrLen(entry->full_name) * 2);
|
|||
|
StrPrint(new_name, "/Home/Src%s", entry->full_name + 2);
|
|||
|
new_name[StrLen(new_name) - 2] = NULL;
|
|||
|
|
|||
|
Print(" -> %s\n", new_name);
|
|||
|
|
|||
|
Copy(entry->full_name, new_name);
|
|||
|
|
|||
|
} while (entry = entry->next);
|
|||
|
|
|||
|
DirTreeDel(start_entry);
|