%% options copyright owner = Dirk Krause copyright year = 2015-xxxx license = bsd %% header /** @file Delete directory specified by char name. CRT on Windows: Optional. */ #ifndef DK4CONF_H_INCLUDED #include "dk4conf.h" #endif #ifndef DK4TYPES_H_INCLUDED #include "dk4types.h" #endif #ifndef DK4ERROR_H_INCLUDED #include "dk4error.h" #endif #ifdef __cplusplus extern "C" { #endif /** Remove empty directory. @param fn File name. @param erp Error report, may be NULL. @return 1 on success, 0 on error. Error codes: - DK4_E_INVALID_ARGUMENTS
if fn is NULL, - DK4_E_RMDIR_FAILED
with errno value in iDetails1 if the rmdir() function failed, - DK4_E_REMOVE_DIRECTORY_FAILED
with GetLastError() value in lDetails1 if the RemoveDirectory() function failed on Windows. */ int dk4delete_directory_c8(const char *fn, dk4_er_t *erp); #ifdef __cplusplus } #endif %% module #include "dk4conf.h" #if DK4_ON_WINDOWS #ifndef WINDOWS_H_INCLUDED #include #define WINDOWS_H_INCLUDED 1 #endif #endif #include "dk4deldir08.h" #if DK4_HAVE_UNISTD_H #include #endif #if DK4_HAVE_IO_H #include #endif #if DK4_HAVE_DIRECT_H #include #endif #if DK4_HAVE_ERRNO_H #include #endif $!trace-include int dk4delete_directory_c8(const char *fn, dk4_er_t *erp) { int back = 0; $? "+ dk4delete_directory_c8 \"%!8s\"", TR_8STR(fn) if (NULL != fn) { $? ". fn ok" #if DK4_ON_WINDOWS /* +++ Windows */ #if DK4_WIN_AVOID_CRT || DK4_WIN_DENY_CRT if (RemoveDirectoryA(fn)) { back = 1; } else { dk4error_set_ldetails( erp, DK4_E_REMOVE_DIRECTORY_FAILED, (long)((unsigned long)GetLastError()) ); } #else if (RemoveDirectoryA(fn)) { back = 1; } else { if (NULL != erp) { errno = 0; if (0 == _rmdir(fn)) { back = 1; } else { dk4error_set_idetails(erp, DK4_E_RMDIR_FAILED, errno); } } } #endif /* --- Windows */ #else /* +++ non-Windows */ errno = 0; if (0 == rmdir(fn)) { back = 1; } else { dk4error_set_idetails(erp, DK4_E_RMDIR_FAILED, errno); } /* --- non-Windows */ #endif } else { $? "! fn" dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } $? "- dk4delete_directory_c8 %d", back return back; }