%% options copyright owner = Dirk Krause copyright year = 2015-xxxx license = bsd %% header /** @file Remove file specified by char text. 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 one file. @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_NOT_SUPPORTED
if no system function was found to delete files, - DK4_E_UNLINK_FAILED
with errno value in idetails if the unlink operation failed, - DK4_E_DELETE_FILE_FAILED
with GetLastError() value in lDetails1 if the DeleteFile() function failed on Windows. */ int dk4delete_file_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 "dk4delfile08.h" #include #if DK4_HAVE_ERRNO_H #ifndef ERRNO_H_INCLUDED #include #define ERRNO_H_INCLUDED 1 #endif #endif #if DK4_HAVE_IO_H #ifndef IO_H_INCLUDED #include #define IO_H_INCLUDED 1 #endif #endif #if DK4_HAVE_UNISTD_H #ifndef UNISTD_H_INCLUDED #include #define UNISTD_H_INCLUDED 1 #endif #endif int dk4delete_file_c8(const char *fn, dk4_er_t *erp) { int back = 0; if (NULL != fn) { #if DK4_ON_WINDOWS /* +++ Windows */ #if DK4_WIN_AVOID_CRT || DK4_WIN_DENY_CRT if (DeleteFileA(fn)) { back = 1; } else { dk4error_set_ldetails( erp, DK4_E_DELETE_FILE_FAILED, (long)((unsigned long)GetLastError()) ); } #else if (DeleteFileA(fn)) { back = 1; } else { if (NULL != erp) { errno = 0; if (0 == _unlink(fn)) { back = 1; } else { dk4error_set_idetails(erp, DK4_E_UNLINK_FAILED, errno); } } } #endif /* --- Windows */ #else /* +++ non-Windows */ #if DK4_HAVE_UNLINK errno = 0; if (0 == unlink(fn)) { back = 1; } else { dk4error_set_idetails(erp, DK4_E_UNLINK_FAILED, errno); } #else #if DK4_HAVE__UNLINK errno = 0; if (0 == _unlink(fn)) { back = 1; } else { dk4error_set_idetails(erp, DK4_E_UNLINK_FAILED, errno); } #else dk4error_set_simple_error_code(erp, DK4_E_NOT_SUPPORTED); #endif #endif /* --- non-Windows */ #endif } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } return back; }