summaryrefslogtreecommitdiff
path: root/support/dktools/dk4fne08.c
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2020-10-12 03:04:00 +0000
committerNorbert Preining <norbert@preining.info>2020-10-12 03:04:00 +0000
commit0ce40abb18ec02ec6fd6bcc5f21612c88daa7578 (patch)
tree416289fe1448873fd8ca33051f50ad85bffa8aaa /support/dktools/dk4fne08.c
parentfdb18507cd80dc17f5a5256153d34668b4f4e61c (diff)
CTAN sync 202010120303
Diffstat (limited to 'support/dktools/dk4fne08.c')
-rw-r--r--support/dktools/dk4fne08.c189
1 files changed, 0 insertions, 189 deletions
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 <windows.h>
-#define WINDOWS_H_INCLUDED 1
-#endif
-#endif
-
-#if DK4_HAVE_ASSERT_H
-#ifndef ASSERT_H_INCLUDED
-#include <assert.h>
-#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
-}
-