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
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
|
/* OpenCL runtime/device driver library: custom buffer allocator
Copyright (c) 2011 Tampere University of Technology
2023 Pekka Jääskeläinen / Intel Finland Oy
Permission is hereby granted, free of charge, to any person obtaining a copy
of this software and associated documentation files (the "Software"), to
deal in the Software without restriction, including without limitation the
rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
sell copies of the Software, and to permit persons to whom the Software is
furnished to do so, subject to the following conditions:
The above copyright notice and this permission notice shall be included in
all copies or substantial portions of the Software.
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
IN THE SOFTWARE.
*/
/**
* This file implements a customized memory allocator for OpenCL buffers.
*
* @see bufalloc.c
* @file bufalloc.h
*/
#ifndef POCL_BUFALLOC_H
#define POCL_BUFALLOC_H
#ifdef __cplusplus
extern "C" {
#endif
#include <stddef.h>
#ifndef __TCE_STANDALONE__
#include "pocl_threads.h"
typedef pocl_lock_t ba_lock_t;
#define BA_LOCK(LOCK) POCL_LOCK(LOCK)
#define BA_UNLOCK(LOCK) POCL_UNLOCK(LOCK)
#define BA_INIT_LOCK(LOCK) POCL_INIT_LOCK(LOCK)
/* The qualifier to add in case using non-default
address space. */
#ifndef AS_QUALIFIER
#define AS_QUALIFIER
#endif
#else
/* TCE standalone mode. */
#include "tce-sync.h"
#include "dthread.h"
#ifdef NO_LOCKING
typedef int ba_lock_t;
#define BA_LOCK(LOCK)
#define BA_UNLOCK(LOCK)
#define BA_INIT_LOCK(LOCK)
#else
typedef tce_sm_lock ba_lock_t;
#define BA_LOCK(LOCK) tce_sync_spin_lock (&LOCK)
#define BA_UNLOCK(LOCK) tce_sync_unlock (&LOCK)
#define BA_INIT_LOCK(LOCK) LOCK = 0
#endif
#ifndef AS_QUALIFIER
#define AS_QUALIFIER
#endif
#endif
/* The number of chunks in a region should be scaled to an approximate
maximum number of kernel buffer arguments. Running out of chunk
data structures might leave region space unused due to that only. */
#ifndef MAX_CHUNKS_IN_REGION
#define MAX_CHUNKS_IN_REGION 1024
#endif
/* address-space agnostic memory address */
typedef size_t memory_address_t;
/* the different strategies for how to allocate buffers from a memory region */
enum allocation_strategy
{
BALLOCS_WASTEFUL, /* try to fit to the end of the region first
(consumes the whole region quicker) */
BALLOCS_TIGHT /* try to reuse old freed chunks first
(for the case when the region grows dynamically e.g. towards stack)
*/
};
#ifdef __TCE_STANDALONE__
typedef AS_QUALIFIER volatile struct chunk_info chunk_info_t;
typedef AS_QUALIFIER volatile struct memory_region memory_region_t;
#else
typedef AS_QUALIFIER struct chunk_info chunk_info_t;
typedef AS_QUALIFIER struct memory_region memory_region_t;
#endif
/* Info of a single "chunk" inside a memory region. Chunk is a piece
of memory that has been allocated to a buffer (but might have been
unallocated). Initially there's only one special chunk representing
the whole region as one unallocated chunk. */
struct chunk_info
{
memory_address_t start_address;
int is_allocated;
size_t size; /* size in bytes */
chunk_info_t* next;
chunk_info_t* prev;
chunk_info_t* children;
chunk_info_t* parent;
memory_region_t* parent_region;
};
/* Represents a single continuous region of memory from which smaller
"chunks" are allocated. Note: this doesn't include the memory space
itself. */
struct memory_region
{
/* TODO: Enable dynamic number of chunks for host-side allocation. */
chunk_info_t all_chunks[MAX_CHUNKS_IN_REGION];
chunk_info_t *chunks;
chunk_info_t *free_chunks; /* A pointer to a head of a linked list of
chunk_info records that can be used for
new allocations. This enables allocating
the chunk infos statically at compile time,
or dynamically. In the dynamic case, the
client of the bufalloc should first ensure
there is at least one free chunk info before
trying the allocation. If not, create one. */
chunk_info_t *last_chunk; /* The last chunk in the region (a "sentinel"). In case
the last chunk is allocated, the region
is completely full. New chunks should be inserted
before this chunk. */
memory_region_t *next;
memory_region_t *prev;
enum allocation_strategy strategy;
unsigned short alignment; /* alignment of the returned chunks in a 2's exponent byte count */
ba_lock_t lock;
};
POCL_EXPORT
chunk_info_t *pocl_alloc_buffer_from_region (memory_region_t *region,
size_t size);
POCL_EXPORT
void *pocl_bufalloc (memory_region_t *region, size_t size);
POCL_EXPORT
chunk_info_t *pocl_alloc_buffer(memory_region_t *regions, size_t size);
POCL_EXPORT
memory_region_t *pocl_free_buffer (memory_region_t *regions, memory_address_t addr);
POCL_EXPORT
void pocl_free_chunk (chunk_info_t *chunk);
/**
* Initializes a memory allocation region (address space) with default
* attributes.
*
* @param start The starting address.
* @param size Size of the address space.
*/
POCL_EXPORT
void pocl_init_mem_region (
memory_region_t *region, memory_address_t start, size_t size);
chunk_info_t *create_sub_chunk (chunk_info_t *parent, size_t offset, size_t size);
void
print_chunk (chunk_info_t *chunk);
void
print_chunks (chunk_info_t *first);
#ifdef __cplusplus
}
#endif
#endif
|
