summaryrefslogtreecommitdiffhomepage
path: root/src/internal/ntux_memfn_impl.c
blob: 263e16df0a857f5e73c28ecb5f9b88f810c71338 (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
/***********************************************************/
/*  ntux: native translation und extension                 */
/*  Copyright (C) 2016--2021  SysDeer Technologies, LLC    */
/*  Released under GPLv2 and GPLv3; see COPYING.NTUX.      */
/***********************************************************/

#include <psxxfi/xfi_base.h>
#include <psxxfi/xfi_acl.h>

#include <ntapi/nt_memory.h>
#include <ntapi/nt_file.h>
#include <ntapi/nt_process.h>

#include <stddef.h>

#include "ntux_memfn_impl.h"
#include "ntux_driver_impl.h"

void * ntux_calloc(size_t n, size_t size)
{
	struct ntux_memory_block block;

	if (!n || (size > (size_t)(-1) / n))
		return 0;

	size *= n;
	size += 0xf;
	size &= ~(size_t)0xf;

	block.addr = 0;
	block.size = size + sizeof(block);

	if (__xfi_allocate_virtual_memory(
			NT_CURRENT_PROCESS_HANDLE,
			&block.addr,
			0,
			&block.size,
			NT_MEM_COMMIT,
			NT_PAGE_READWRITE))
		return 0;

	block.used  = size;
	block.avail = block.size - block.used;

	return (char *)block.addr + offsetof(struct ntux_memory_block,buffer);
}

void * ntux_balloc(
	struct ntux_memory_block * cache,
	struct ntux_memory_block * block,
	size_t n, size_t size)
{
	char * baddr;
	void * addr = 0;

	if (!n || (size > (size_t)(-1) / n))
		return 0;

	if (!cache || !cache->addr)
		addr = ntux_calloc(n,size);

	size *= n;
	size += 0xf;
	size &= ~(size_t)0xf;

	if (size < block->avail)
		addr = ntux_calloc(n,size);

	/* newly allocated block? */
	if (addr) {
		baddr  = addr;
		baddr -= offsetof(struct ntux_memory_block,buffer);

		__xfi_memcpy(
			(uintptr_t *)block,
			(uintptr_t *)baddr,
			sizeof(*block));

		return addr;
	}

	/* cache */
	addr = &block->buffer[block->used / sizeof(size_t)];
	block->used  += size;
	block->avail -= size;
	return addr;
}

void ntux_free(void * addr)
{
	struct ntux_memory_block block;

	block.addr = addr;
	block.size = 0;

	__xfi_free_virtual_memory(
		NT_CURRENT_PROCESS_HANDLE,
		&block.addr,
		&block.size,
		NT_MEM_RELEASE);
}