tlibc/src/filesystem/file.c

114 lines
3.1 KiB
C

#include "tlibc/filesystem.h"
#include "internal.h"
bool file_exists(cstr path){
if(path[0]=='.'){
if(path[1]==0 || (path[1]==path_sep && path[2]==0))
return false; // . or ./ is not a file
// 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 not directory
#else
struct stat stats;
i32 rez=stat(path, &stats);
return (bool)(
(rez!=-1) && // file exists
!(S_ISDIR(stats.st_mode))); // file is not directory
#endif
}
Result(FILE*) file_open(cstr file_name, cstr fopen_mode){
FILE* f = fopen(file_name, fopen_mode);
if(f == NULL){
return RESULT_ERROR_FMT(
"Can't open (%s) file '%s': %s",
fopen_mode, file_name, strerror(errno));
}
return RESULT_VALUE(p, f);
}
Result(FILE*) file_openOrCreateReadWrite(cstr file_name){
FILE* f = fopen(file_name, "rb+");
if(f == NULL){
f = fopen(file_name, "wb+");
if(f == NULL){
return RESULT_ERROR_FMT(
"Can't create (%s) file: %s",
file_name, strerror(errno));
}
}
return RESULT_VALUE(p, f);
}
Result(i64) file_getSize(FILE* f){
i64 r = IFWIN(_ftelli64, ftello64)(f);
if(r < 0){
return RESULT_ERROR_ERRNO();
}
return RESULT_VALUE(i, r);
}
Result(void) file_seek(FILE* f, i64 offset, SeekOrigin origin){
if(IFWIN(_fseeki64, fseeko64)(f, offset, (int)origin) != 0){
return RESULT_ERROR_FMT(
"Can't seek (offset: " IFWIN("%lli", "%li") ", origin: %i) in file: %s",
offset, origin, strerror(errno));
}
return RESULT_VOID;
}
Result(void) file_writeStructs(FILE* f, const void* src, u64 struct_size, u64 count){
u64 r = fwrite(src, struct_size, count, f);
if(r != count){
return RESULT_ERROR_ERRNO();
}
return RESULT_VOID;
}
Result(void) file_writeByte(FILE* f, u8 b){
if(fputc(b, f) != 0){
return RESULT_ERROR_ERRNO();
}
return RESULT_VOID;
}
Result(bool) file_readByte(FILE* f, u8* out_byte){
int r = fgetc(f);
if(ferror(f)){
return RESULT_ERROR_ERRNO();
}
if(feof(f)){
return RESULT_VALUE(u, false);
}
*out_byte = r;
return RESULT_VALUE(u, true);
}
Result(u64) file_readStructs(FILE* f, void* dst, u64 struct_size, u64 max_count){
u64 r = fread(dst, struct_size, max_count, f);
if(ferror(f)){
return RESULT_ERROR_ERRNO();
}
return RESULT_VALUE(u, r);
}
Result(void) file_readStructsExactly(FILE* f, void* dst, u64 struct_size, u64 exact_count){
u64 r = fread(dst, struct_size, exact_count, f);
if(ferror(f)){
return RESULT_ERROR_ERRNO();
}
if(r != exact_count){
return RESULT_ERROR_FMT(
"read " IFWIN("%llu", "%lu") " structures out of " IFWIN("%llu", "%lu"),
r, exact_count);
}
return RESULT_VOID;
}