/* Copyright (C) 2015-2020, Dirk Krause SPDX-License-Identifier: BSD-3-Clause */ /* WARNING: This file was generated by the dkct program (see http://dktools.sourceforge.net/ for details). Changes you make here will be lost if dkct is run again! You should modify the original source and run dkct on it. Original source: dk4file8.ctr */ /** @file dk4file8.c The dk4file8 module. */ #line 103 "dk4file8.ctr" #include "dk4conf.h" #include "dk4types.h" #if DK4_ON_WINDOWS #ifndef WINDOWS_H_INCLUDED #include #define WINDOWS_H_INCLUDED 1 #endif #else #ifndef DK4STAT8_H_INCLUDED #include "dk4stat8.h" #endif #ifndef DK4STAT_H_INCLUDED #include "dk4stat.h" #endif #endif #include "dk4file8.h" #if DK4_HAVE_ASSERT_H #ifndef ASSERT_H_INCLUDED #include #define ASSERT_H_INCLUDED 1 #endif #endif #line 132 "dk4file8.ctr" int dk4file_c8_exists(const char *fn, dk4_er_t *erp) { #if DK4_ON_WINDOWS DWORD dwattr; HANDLE ha; WIN32_FIND_DATAA ffdata; #else dk4_stat_t stb; dk4_stat_t lstb; #endif int back = 0; #if DK4_USE_ASSERT assert(NULL != fn); #endif if (NULL != fn) { #if DK4_ON_WINDOWS dwattr = GetFileAttributesA(fn); if (INVALID_FILE_ATTRIBUTES != dwattr) { back = 1; } else { ha = FindFirstFileA(fn, &ffdata); if (INVALID_HANDLE_VALUE != ha) { back = 1; FindClose(ha); } else { dk4error_set_simple_error_code(erp, DK4_E_NOT_FOUND); } } #else if (0 != dk4stat_c8(&stb, fn, NULL)) { back = 1; } else { if (0 != dk4stat_l_c8(&lstb, fn, NULL)) { back = 1; } else { dk4error_set_simple_error_code(erp, DK4_E_NOT_FOUND); } } #endif } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } return back; } int dk4file_c8_is_regular(const char *fn, dk4_er_t *erp) { #if DK4_ON_WINDOWS DWORD dwattr; HANDLE ha; WIN32_FIND_DATAA ffdata; #else dk4_stat_t stb; #endif int back = 0; #line 195 "dk4file8.ctr" #if DK4_USE_ASSERT assert(NULL != fn); #endif if (NULL != fn) { #line 199 "dk4file8.ctr" #if DK4_ON_WINDOWS dwattr = GetFileAttributesA(fn); if (INVALID_FILE_ATTRIBUTES != dwattr) { if ((DWORD)0UL == (FILE_ATTRIBUTE_DIRECTORY & dwattr)) { if ((DWORD)0UL == (FILE_ATTRIBUTE_DEVICE & dwattr)) { back = 1; } } } else { ha = FindFirstFileA(fn, &ffdata); if (INVALID_HANDLE_VALUE != ha) { dwattr = ffdata.dwFileAttributes; if ((DWORD)0UL == (FILE_ATTRIBUTE_DIRECTORY & dwattr)) { if ((DWORD)0UL == (FILE_ATTRIBUTE_DEVICE & dwattr)) { back = 1; } } FindClose(ha); } else { dk4error_set_simple_error_code(erp, DK4_E_NOT_FOUND); } } #else #line 223 "dk4file8.ctr" if (0 != dk4stat_c8(&stb, fn, NULL)) { #line 224 "dk4file8.ctr" if (0 != dk4stat_is_regular(&stb, erp)) { #line 225 "dk4file8.ctr" back = 1; } #if TRACE_DEBUG else { #line 229 "dk4file8.ctr" } #endif } else { #line 232 "dk4file8.ctr" dk4error_set_simple_error_code(erp, DK4_E_NOT_FOUND); } #endif } else { #line 236 "dk4file8.ctr" dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } #line 239 "dk4file8.ctr" return back; } int dk4file_c8_is_directory(const char *fn, dk4_er_t *erp) { #if DK4_ON_WINDOWS DWORD dwattr; HANDLE ha; WIN32_FIND_DATAA ffdata; #else dk4_stat_t stb; #endif int back = 0; #line 256 "dk4file8.ctr" #if DK4_USE_ASSERT assert(NULL != fn); #endif if (NULL != fn) { #if DK4_ON_WINDOWS dwattr = GetFileAttributesA(fn); if (INVALID_FILE_ATTRIBUTES != dwattr) { if ((DWORD)0UL != (FILE_ATTRIBUTE_DIRECTORY & dwattr)) { back = 1; } } else { ha = FindFirstFileA(fn, &ffdata); if (INVALID_HANDLE_VALUE != ha) { dwattr = ffdata.dwFileAttributes; if ((DWORD)0UL!=(FILE_ATTRIBUTE_DIRECTORY & dwattr)) { back = 1; } FindClose(ha); } else { dk4error_set_simple_error_code(erp, DK4_E_NOT_FOUND); } } #else if (0 != dk4stat_c8(&stb, fn, NULL)) { if (0 != dk4stat_is_directory(&stb, erp)) { back = 1; } } else { dk4error_set_simple_error_code(erp, DK4_E_NOT_FOUND); } #endif } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } #line 292 "dk4file8.ctr" return back; }