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
|
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#define _GNU_SOURCE /* See feature_test_macros(7) */
#include <dlfcn.h>
#include "wrappedlibs.h"
#include "debug.h"
#include "wrapper.h"
#include "bridge.h"
#include "librarian/library_private.h"
#include "x64emu.h"
#include "emu/x64emu_private.h"
#include "callback.h"
#include "librarian.h"
#include "box64context.h"
#include "emu/x64emu_private.h"
#include "myalign.h"
const char* lzmaName = "liblzma.so.5";
#define LIBNAME lzma
#include "generated/wrappedlzmatypes.h"
#include "wrappercallback.h"
typedef struct lzma_allocator_s {
void *(*alloc)(void *opaque, size_t nmemb, size_t size);
void (*free)(void *opaque, void *ptr);
void *opaque;
} lzma_allocator_t;
#define SUPER() \
GO(0) \
GO(1) \
GO(2) \
GO(3) \
GO(4)
// alloc ...
#define GO(A) \
static uintptr_t my_alloc_fct_##A = 0; \
static void* my_alloc_##A(void* opaque, size_t items, size_t size) \
{ \
return (void*)RunFunction(my_context, my_alloc_fct_##A, 3, opaque, items, size);\
}
SUPER()
#undef GO
static void* find_alloc_Fct(void* fct)
{
if(!fct) return fct;
if(GetNativeFnc((uintptr_t)fct)) return GetNativeFnc((uintptr_t)fct);
#define GO(A) if(my_alloc_fct_##A == (uintptr_t)fct) return my_alloc_##A;
SUPER()
#undef GO
#define GO(A) if(my_alloc_fct_##A == 0) {my_alloc_fct_##A = (uintptr_t)fct; return my_alloc_##A; }
SUPER()
#undef GO
printf_log(LOG_NONE, "Warning, no more slot for zlib alloc callback\n");
return NULL;
}
// free ...
#define GO(A) \
static uintptr_t my_free_fct_##A = 0; \
static void my_free_##A(void* opaque, void* address) \
{ \
RunFunction(my_context, my_free_fct_##A, 2, opaque, address); \
}
SUPER()
#undef GO
static void* find_free_Fct(void* fct)
{
if(!fct) return fct;
if(GetNativeFnc((uintptr_t)fct)) return GetNativeFnc((uintptr_t)fct);
#define GO(A) if(my_free_fct_##A == (uintptr_t)fct) return my_free_##A;
SUPER()
#undef GO
#define GO(A) if(my_free_fct_##A == 0) {my_free_fct_##A = (uintptr_t)fct; return my_free_##A; }
SUPER()
#undef GO
printf_log(LOG_NONE, "Warning, no more slot for zlib free callback\n");
return NULL;
}
#undef SUPER
static void wrap_alloc_struct(lzma_allocator_t* dst, lzma_allocator_t* src)
{
if(!src)
return;
dst->opaque = src->opaque;
dst->alloc = find_alloc_Fct(src->alloc);
dst->free = find_free_Fct(src->free);
}
EXPORT int my_lzma_index_buffer_decode(x64emu_t* emu, void* i, void* memlimit, lzma_allocator_t* alloc, void* in_, void* in_pos, size_t in_size)
{
lzma_allocator_t allocator = {0};
wrap_alloc_struct(&allocator, alloc);
return my->lzma_index_buffer_decode(i, memlimit, alloc?&allocator:NULL, in_, in_pos, in_size);
}
EXPORT void my_lzma_index_end(x64emu_t* emu, void* i, lzma_allocator_t* alloc)
{
lzma_allocator_t allocator = {0};
wrap_alloc_struct(&allocator, alloc);
return my->lzma_index_end(i,alloc?&allocator:NULL);
}
EXPORT int my_lzma_stream_buffer_decode(x64emu_t* emu, void* memlimit, uint32_t flags, lzma_allocator_t* alloc, void* in_, void* in_pos, size_t in_size, void* out_, void* out_pos, size_t out_size)
{
lzma_allocator_t allocator = {0};
wrap_alloc_struct(&allocator, alloc);
return my->lzma_stream_buffer_decode(memlimit, flags, alloc?&allocator:NULL, in_, in_pos, in_size, out_, out_pos, out_size);
}
#define CUSTOM_INIT \
getMy(lib);
#define CUSTOM_FINI \
freeMy();
#include "wrappedlib_init.h"
|