From 0ce40abb18ec02ec6fd6bcc5f21612c88daa7578 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 12 Oct 2020 03:04:00 +0000 Subject: CTAN sync 202010120303 --- support/dktools/dk4fne08.c | 189 --------------------------------------------- 1 file changed, 189 deletions(-) delete mode 100644 support/dktools/dk4fne08.c (limited to 'support/dktools/dk4fne08.c') diff --git a/support/dktools/dk4fne08.c b/support/dktools/dk4fne08.c deleted file mode 100644 index 9e6cf514c4..0000000000 --- a/support/dktools/dk4fne08.c +++ /dev/null @@ -1,189 +0,0 @@ -/* -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: dk4fne08.ctr -*/ - -/** @file dk4fne08.c The dk4fne08 module. -*/ - - -#line 76 "dk4fne08.ctr" - - -#include "dk4conf.h" - -#if DK4_ON_WINDOWS -#ifndef WINDOWS_H_INCLUDED -#include -#define WINDOWS_H_INCLUDED 1 -#endif -#endif - -#if DK4_HAVE_ASSERT_H -#ifndef ASSERT_H_INCLUDED -#include -#define ASSERT_H_INCLUDED 1 -#endif -#endif - -#include "dk4fne08.h" -#include "dk4str8.h" -#include "dk4mem.h" -#include "dk4unused.h" -#include "dk4getcwd8.h" - - - - - -#line 103 "dk4fne08.ctr" - - - -#if DK4_ON_WINDOWS -/** Constant texts used by the module. -*/ -static const char * const dk4fne_c8_kw[] = { -/* 0 */ -".", - -/* 1 */ -"..", - -NULL - - -#line 114 "dk4fne08.ctr" -}; -#endif - - - -#if DK4_ON_WINDOWS -static -int -dk4fne_c8_fill_directory(dk4_dir_c8_t *ptr, const char *fn, dk4_er_t *erp) -{ - WIN32_FIND_DATAA ffdata; - char *nn; - HANDLE ffres; - int back = 0; -#if DK4_USE_ASSERT - assert(NULL != ptr); - assert(NULL != fn); -#endif - ffres = FindFirstFileA(fn, &ffdata); - if (INVALID_HANDLE_VALUE != ffres) { - back = 1; - do { - if (0 != dk4str8_cmp(dk4fne_c8_kw[0], ffdata.cFileName)) { - if (0 != dk4str8_cmp(dk4fne_c8_kw[1], ffdata.cFileName)) { - nn = dk4str8_dup(ffdata.cFileName, erp); - if (NULL != nn) { - if (0 != (FILE_ATTRIBUTE_DIRECTORY & (ffdata.dwFileAttributes))) { - if (0 == dk4sto_add(ptr->s_dir, (void *)nn, erp)) { - back = 0; - dk4mem_free(nn); - } - } else { - if (0 == dk4sto_add(ptr->s_file, (void *)nn, erp)) { - back = 0; - dk4mem_free(nn); - } - } - } else { - back = 0; - } - } - } - } while (FindNextFileA(ffres, &ffdata)); - FindClose(ffres); - } else { - /* ERROR: FindFirstFile failed */ - dk4error_set_ldetails( - erp, DK4_E_FINDFIRSTFILE_FAILED, - (long)((unsigned long)GetLastError()) - ); - } - return back; -} -#endif - - - -dk4_dir_c8_t * -dk4fne_open_c8( -#if DK4_ON_WINDOWS - const char *fn, -#else - const char * DK4_ARG_UNUSED(fn), -#endif - dk4_er_t *erp -) -{ -#if DK4_ON_WINDOWS - dk4_dir_c8_t *back = NULL; - char *p1 = NULL; - int ok = 0; -#if DK4_USE_ASSERT - assert(NULL != fn); -#endif - if (NULL != fn) { - - back = dk4mem_new(dk4_dir_c8_t, 1, erp); - if (NULL != back) { - back->path = NULL; - back->s_dir = NULL; - back->i_dir = NULL; - back->s_file = NULL; - back->i_file = NULL; - back->path = dk4str8_dup(fn, erp); - if (NULL != back->path) { - p1 = dk4str8_rchr(back->path, '\\'); - if (NULL != p1) { - *p1 = '\0'; - } else { - dk4mem_free(back->path); - back->path = NULL; - back->path = dk4getcwd_c8_dup(erp); - } - back->s_dir = dk4sto_open(erp); - if (NULL != back->s_dir) { - dk4sto_set_comp(back->s_dir, dk4dir_c8_compare, 0); - back->i_dir = dk4sto_it_open(back->s_dir, erp); - if (NULL != back->i_dir) { - back->s_file = dk4sto_open(erp); - if (NULL != back->s_file) { - dk4sto_set_comp(back->s_file, dk4dir_c8_compare, 0); - back->i_file = dk4sto_it_open(back->s_file, erp); - if (NULL != back->i_file) { - ok = dk4fne_c8_fill_directory(back, fn, erp); - } - } - } - } - } - if (0 == ok) { - dk4dir_c8_close(back); - back = NULL; - } - } - } else { - dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); - } - return back; -#else - DK4_UNUSED_ARG(fn) - dk4error_set_simple_error_code(erp, DK4_E_NOT_SUPPORTED); - return 0; -#endif -} - -- cgit v1.2.3