46 lines
1.3 KiB
C
46 lines
1.3 KiB
C
#include "tlibc/filesystem.h"
|
|
#include "internal.h"
|
|
|
|
bool dir_exists(cstr path){
|
|
if(path[0]=='.'){
|
|
if(path[1]==0 || (path[1]==path_sep && path[1]==0))
|
|
return true; // dir . or ./ always exists
|
|
// else if(path[1]=='.' && path[2]==path_sep)
|
|
//TODO path_resolve because windows doesnt recognize .\ pattern
|
|
}
|
|
#if TLIBC_FS_USE_WINDOWS_H
|
|
DWORD dwAttrib = GetFileAttributes(path);
|
|
return (bool)(
|
|
(dwAttrib != INVALID_FILE_ATTRIBUTES) && // file exists
|
|
(dwAttrib & FILE_ATTRIBUTE_DIRECTORY)); // file is a directory
|
|
#else
|
|
struct stat stats;
|
|
i32 rez=stat(path, &stats);
|
|
return (bool)(
|
|
(rez!=-1) && // file exists
|
|
(S_ISDIR(stats.st_mode))); // file is a directory
|
|
#endif
|
|
}
|
|
|
|
Result(bool) dir_create(cstr path){
|
|
Deferral(4);
|
|
if (dir_exists(path)){
|
|
Return RESULT_VALUE(i, false);
|
|
}
|
|
|
|
char* parentDir= str_copy(path_dirname(str_from_cstr((void*)path))).data;
|
|
Defer(free(parentDir));
|
|
try_void(dir_create(parentDir));
|
|
|
|
#if TLIBC_FS_USE_WINDOWS_H
|
|
if(!CreateDirectory(path, NULL))
|
|
#else
|
|
if(mkdir(path, 0777) == -1)
|
|
#endif
|
|
{
|
|
Return RESULT_ERROR_FMT("Can't create dicectory '%s': %s", path, strerror(errno));
|
|
}
|
|
|
|
Return RESULT_VALUE(i, true);
|
|
}
|