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
|
/****************************************************************
* *
* Copyright (c) 2008-2021 Fidelity National Information *
* Services, Inc. and/or its subsidiaries. All rights reserved. *
* *
* This source code contains the intellectual property *
* of its copyright holder(s), and is made available *
* under a license. If you do not know the terms of *
* the license, please stop and do not read further. *
* *
****************************************************************/
#include "mdef.h"
#include <dlfcn.h>
#include "gtm_string.h"
#include "gtm_stdio.h"
#include "gtm_limits.h"
#include "real_len.h" /* for COPY_DLERR_MSG */
#include "lv_val.h" /* needed for "fgncal.h" */
#include "fgncal.h" /* needed for COPY_DLLERR_MSG() */
#include "gtm_zlib.h"
#include "gtmmsg.h"
#include "send_msg.h"
#include "restrict.h" /* Needed for restrictions */
#include "have_crit.h" /* Needed for defer interrupts */
error_def(ERR_DLLNOOPEN);
error_def(ERR_DLLNORTN);
error_def(ERR_RESTRICTEDOP);
error_def(ERR_TEXT);
GBLREF char gtm_dist[GTM_PATH_MAX];
GBLREF boolean_t gtm_dist_ok_to_use;
void gtm_zlib_init(void)
{
char err_msg[MAX_ERRSTR_LEN];
#ifdef _AIX
char aix_err_msg[MAX_ERRSTR_LEN];
#endif
void_ptr_t handle;
char_ptr_t err_str;
char *zlib_fname[] = {
ZLIB_CMP_FNAME,
ZLIB_UNCMP_FNAME,
};
void **zlib_fptr[] = {
(void **)&zlib_compress_fnptr,
(void **)&zlib_uncompress_fnptr,
};
int findx;
void *fptr;
char librarypath[GTM_PATH_MAX], *lpath = NULL;
intrpt_state_t prev_intrpt_state;
assert(gtm_zlib_cmp_level);
#ifdef _AIX
if (RESTRICTED(library_load_path))
{
lpath = librarypath;
assert(gtm_dist_ok_to_use);
SNPRINTF(librarypath, GTM_PATH_MAX, GTM_PLUGIN_FMT_SHORT ZLIB_AIXLIBNAME, gtm_dist);
} else
lpath = ZLIB_AIXLIBNAME;
/* Attempt to load the AIX packaged zlib first */
DEFER_INTERRUPTS(INTRPT_IN_FUNC_WITH_MALLOC, prev_intrpt_state);
handle = dlopen( lpath, ZLIB_LIBFLAGS | RTLD_MEMBER);
ENABLE_INTERRUPTS(INTRPT_IN_FUNC_WITH_MALLOC, prev_intrpt_state);
if (NULL == handle)
{
COPY_DLLERR_MSG(err_str, aix_err_msg);
#endif
if (RESTRICTED(library_load_path))
{
lpath = librarypath;
SNPRINTF(librarypath, GTM_PATH_MAX, GTM_PLUGIN_FMT_SHORT ZLIB_LIBNAME, gtm_dist);
} else
lpath = ZLIB_LIBNAME;
DEFER_INTERRUPTS(INTRPT_IN_FUNC_WITH_MALLOC, prev_intrpt_state);
handle = dlopen(lpath, ZLIB_LIBFLAGS);
ENABLE_INTERRUPTS(INTRPT_IN_FUNC_WITH_MALLOC, prev_intrpt_state);
if (NULL == handle)
{
if (RESTRICTED(library_load_path))
{
SNPRINTF(err_msg, MAX_ERRSTR_LEN, "dlopen(%s)", lpath);
gtm_putmsg_csa(CSA_ARG(NULL) VARLSTCNT(3) ERR_RESTRICTEDOP, 1, err_msg);
send_msg_csa(CSA_ARG(NULL) VARLSTCNT(3) ERR_RESTRICTEDOP, 1, err_msg);
gtm_zlib_cmp_level = ZLIB_CMPLVL_NONE; /* dont use compression */
return;
}
COPY_DLLERR_MSG(err_str, err_msg);
# ifdef _AIX
gtm_putmsg_csa(CSA_ARG(NULL) VARLSTCNT(12) ERR_DLLNOOPEN, 2, LEN_AND_STR(lpath),
ERR_TEXT, 2, LEN_AND_STR(err_msg),
ERR_TEXT, 2, LEN_AND_STR(aix_err_msg));
# else
gtm_putmsg_csa(CSA_ARG(NULL) VARLSTCNT(8) ERR_DLLNOOPEN, 2, LEN_AND_STR(lpath),
ERR_TEXT, 2, LEN_AND_STR(err_msg));
# endif
gtm_zlib_cmp_level = ZLIB_CMPLVL_NONE; /* dont use compression */
return;
}
#ifdef _AIX
}
#endif
for (findx = 0; findx < ZLIB_NUM_DLSYMS; ++findx)
{
fptr = (void *)dlsym(handle, zlib_fname[findx]);
if (NULL == fptr)
{
COPY_DLLERR_MSG(err_str, err_msg);
gtm_putmsg_csa(CSA_ARG(NULL) VARLSTCNT(8) ERR_DLLNORTN, 2, LEN_AND_STR(zlib_fname[findx]),
ERR_TEXT, 2, LEN_AND_STR(err_msg));
gtm_zlib_cmp_level = ZLIB_CMPLVL_NONE; /* dont use compression */
return;
}
*zlib_fptr[findx] = fptr;
}
return;
}
|
