summaryrefslogtreecommitdiff
path: root/support/dktools/dk4appfs03.ctr
blob: 781397d481c238d85527e8ed4a4a375cdfa20e0f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
%%	options

copyright owner	=	Dirk Krause
copyright year	=	2015-xxxx
SPDX-License-Identifier:	BSD-3-Clause



%%	module

#ifndef DK4APP_H_INCLUDED
#include "dk4app.h"
#endif

#ifndef DK4FS_H_INCLUDED
#include "dk4fs.h"
#endif

#ifndef DK4CONST_H_INCLUDED
#include "dk4const.h"
#endif

#if DK4_HAVE_ASSERT_H
#ifndef	ASSERT_H_INCLUDED
#include <assert.h>
#define	ASSERT_H_INCLUDED 1
#endif
#endif


$!trace-include



static
int
dk4app_search_i_data_file(
  dkChar	*dptr,
  size_t	 szdptr,
  dk4_app_t	*app,
  const dkChar	*shortname,
  int		 maxpass,
  int		 compressed,
  dk4_er_t	*erp
)
{
  int		 back = 0;
  int		 nPasses;
  int		 i;
#if	DK4_USE_ASSERT
  assert(NULL != dptr);
  assert(NULL != szdptr);
  assert(NULL != shortname);
  assert(NULL != app);
#endif
  if ((NULL != dptr) && (0 < szdptr) && (NULL != app) && (NULL != shortname)) {
    nPasses = maxpass;
    for (i = 0; ((0 == back) && (i <= nPasses)); i++) {
      back = dk4app_search_one_data_file(
        dptr, szdptr, app, shortname, maxpass--, compressed, erp
      );
    }
  } else {
    dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
  }
  return back;
}



int
dk4app_search_data_file(
  dkChar	*dptr,
  size_t	 szdptr,
  dk4_app_t	*app,
  const dkChar	*shortname,
  int		 maxpass,
  int		 compressed,
  dk4_er_t	*erp
)
{
  const dkChar		*msg[5];
  int			 do_log	=	0;
  int			 back	=	0;
  $? "+ dk4app_search_data_file"
#if	DK4_USE_ASSERT
  assert(NULL != dptr);
  assert(NULL != szdptr);
  assert(NULL != shortname);
  assert(NULL != app);
#endif
  if (NULL != app) {
    if ((NULL != app->msg_debug) && (39 < app->sz_msg_debug)) {
      do_log = dk4app_log_do(app, DK4_LL_DEBUG);
    }
  }
  if (0 != do_log) {		$? ". with log"
    $? ". debug texts found"
    msg[0] = (app->msg_debug)[32];
    msg[1] = shortname;
    msg[2] = (app->msg_debug)[35];
    if (0 != compressed) {
#if DK4_HAVE_ZLIB_H
#if DK4_HAVE_BZLIB_H
      msg[2] = (app->msg_debug)[39];
#else
      msg[2] = (app->msg_debug)[37];
#endif
#else
#if DK4_HAVE_BZLIB_H
      msg[2] = (app->msg_debug)[38];
#else
      msg[2] = (app->msg_debug)[34];
#endif
#endif
    } else {
      msg[2] = (app->msg_debug)[35];
    }
    dk4app_log_msg(app, DK4_LL_DEBUG, msg, 3);
    back = dk4app_search_i_data_file(
      dptr, szdptr, app, shortname, maxpass, compressed, erp
    );				$? ". search done %d", back
    if (0 != back) {				$? ". log success"
      msg[0] = (app->msg_debug)[21];
      msg[1] = shortname;
      msg[2] = (app->msg_debug)[23];
      msg[3] = dptr;
      msg[4] = NULL;
      dk4app_log_msg(app, DK4_LL_DEBUG, msg, 4);
    } else {					$? ". log failure"
      msg[0] = (app->msg_debug)[21];
      msg[1] = shortname;
      msg[2] = (app->msg_debug)[22];
      msg[3] = NULL;
      dk4app_log_msg(app, DK4_LL_DEBUG, msg, 3);
    }
  } else {			$? ". no log"
    back = dk4app_search_i_data_file(
      dptr, szdptr, app, shortname, maxpass, compressed, erp
    );
  } $? "- dk4app_search_data_file %d", back
  return back;
}