mesa: Add "shader/" path to #include statements in shader parser/lexer sources
[mesa.git] / src / gallium / drivers / llvmpipe / lp_tex_cache.c
1 /**************************************************************************
2 *
3 * Copyright 2007 Tungsten Graphics, Inc., Cedar Park, Texas.
4 * All Rights Reserved.
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the
8 * "Software"), to deal in the Software without restriction, including
9 * without limitation the rights to use, copy, modify, merge, publish,
10 * distribute, sub license, and/or sell copies of the Software, and to
11 * permit persons to whom the Software is furnished to do so, subject to
12 * the following conditions:
13 *
14 * The above copyright notice and this permission notice (including the
15 * next paragraph) shall be included in all copies or substantial portions
16 * of the Software.
17 *
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
19 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
20 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
21 * IN NO EVENT SHALL TUNGSTEN GRAPHICS AND/OR ITS SUPPLIERS BE LIABLE FOR
22 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
23 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
24 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
25 *
26 **************************************************************************/
27
28 /**
29 * Texture tile caching.
30 *
31 * Author:
32 * Brian Paul
33 */
34
35 #include "pipe/p_inlines.h"
36 #include "util/u_memory.h"
37 #include "util/u_tile.h"
38 #include "util/u_format.h"
39 #include "util/u_math.h"
40 #include "lp_context.h"
41 #include "lp_surface.h"
42 #include "lp_texture.h"
43 #include "lp_tex_cache.h"
44
45
46
47 /**
48 * Return the position in the cache for the tile that contains win pos (x,y).
49 * We currently use a direct mapped cache so this is like a hack key.
50 * At some point we should investige something more sophisticated, like
51 * a LRU replacement policy.
52 */
53 #define CACHE_POS(x, y) \
54 (((x) + (y) * 5) % NUM_ENTRIES)
55
56
57
58 /**
59 * Is the tile at (x,y) in cleared state?
60 */
61 static INLINE uint
62 is_clear_flag_set(const uint *bitvec, union tex_tile_address addr)
63 {
64 int pos, bit;
65 pos = addr.bits.y * (MAX_TEX_WIDTH / TEX_TILE_SIZE) + addr.bits.x;
66 assert(pos / 32 < (MAX_TEX_WIDTH / TEX_TILE_SIZE) * (MAX_TEX_HEIGHT / TEX_TILE_SIZE) / 32);
67 bit = bitvec[pos / 32] & (1 << (pos & 31));
68 return bit;
69 }
70
71
72 /**
73 * Mark the tile at (x,y) as not cleared.
74 */
75 static INLINE void
76 clear_clear_flag(uint *bitvec, union tex_tile_address addr)
77 {
78 int pos;
79 pos = addr.bits.y * (MAX_TEX_WIDTH / TEX_TILE_SIZE) + addr.bits.x;
80 assert(pos / 32 < (MAX_TEX_WIDTH / TEX_TILE_SIZE) * (MAX_TEX_HEIGHT / TEX_TILE_SIZE) / 32);
81 bitvec[pos / 32] &= ~(1 << (pos & 31));
82 }
83
84
85 struct llvmpipe_tex_tile_cache *
86 lp_create_tex_tile_cache( struct pipe_screen *screen )
87 {
88 struct llvmpipe_tex_tile_cache *tc;
89 uint pos;
90
91 tc = CALLOC_STRUCT( llvmpipe_tex_tile_cache );
92 if (tc) {
93 tc->screen = screen;
94 for (pos = 0; pos < NUM_ENTRIES; pos++) {
95 tc->entries[pos].addr.bits.invalid = 1;
96 }
97 tc->last_tile = &tc->entries[0]; /* any tile */
98 }
99 return tc;
100 }
101
102
103 void
104 lp_destroy_tex_tile_cache(struct llvmpipe_tex_tile_cache *tc)
105 {
106 struct pipe_screen *screen;
107 uint pos;
108
109 for (pos = 0; pos < NUM_ENTRIES; pos++) {
110 /*assert(tc->entries[pos].x < 0);*/
111 }
112 if (tc->transfer) {
113 screen = tc->transfer->texture->screen;
114 screen->tex_transfer_destroy(tc->transfer);
115 }
116 if (tc->tex_trans) {
117 screen = tc->tex_trans->texture->screen;
118 screen->tex_transfer_destroy(tc->tex_trans);
119 }
120
121 FREE( tc );
122 }
123
124
125 void
126 lp_tex_tile_cache_map_transfers(struct llvmpipe_tex_tile_cache *tc)
127 {
128 if (tc->transfer && !tc->transfer_map)
129 tc->transfer_map = tc->screen->transfer_map(tc->screen, tc->transfer);
130
131 if (tc->tex_trans && !tc->tex_trans_map)
132 tc->tex_trans_map = tc->screen->transfer_map(tc->screen, tc->tex_trans);
133 }
134
135
136 void
137 lp_tex_tile_cache_unmap_transfers(struct llvmpipe_tex_tile_cache *tc)
138 {
139 if (tc->transfer_map) {
140 tc->screen->transfer_unmap(tc->screen, tc->transfer);
141 tc->transfer_map = NULL;
142 }
143
144 if (tc->tex_trans_map) {
145 tc->screen->transfer_unmap(tc->screen, tc->tex_trans);
146 tc->tex_trans_map = NULL;
147 }
148 }
149
150 void
151 lp_tex_tile_cache_validate_texture(struct llvmpipe_tex_tile_cache *tc)
152 {
153 if (tc->texture) {
154 struct llvmpipe_texture *lpt = llvmpipe_texture(tc->texture);
155 if (lpt->timestamp != tc->timestamp) {
156 /* texture was modified, invalidate all cached tiles */
157 uint i;
158 for (i = 0; i < NUM_ENTRIES; i++) {
159 tc->entries[i].addr.bits.invalid = 1;
160 }
161
162 tc->timestamp = lpt->timestamp;
163 }
164 }
165 }
166
167 /**
168 * Specify the texture to cache.
169 */
170 void
171 lp_tex_tile_cache_set_texture(struct llvmpipe_tex_tile_cache *tc,
172 struct pipe_texture *texture)
173 {
174 uint i;
175
176 assert(!tc->transfer);
177
178 if (tc->texture != texture) {
179 pipe_texture_reference(&tc->texture, texture);
180
181 if (tc->tex_trans) {
182 struct pipe_screen *screen = tc->tex_trans->texture->screen;
183
184 if (tc->tex_trans_map) {
185 screen->transfer_unmap(screen, tc->tex_trans);
186 tc->tex_trans_map = NULL;
187 }
188
189 screen->tex_transfer_destroy(tc->tex_trans);
190 tc->tex_trans = NULL;
191 }
192
193 /* mark as entries as invalid/empty */
194 /* XXX we should try to avoid this when the teximage hasn't changed */
195 for (i = 0; i < NUM_ENTRIES; i++) {
196 tc->entries[i].addr.bits.invalid = 1;
197 }
198
199 tc->tex_face = -1; /* any invalid value here */
200 }
201 }
202
203
204 /**
205 * Given the texture face, level, zslice, x and y values, compute
206 * the cache entry position/index where we'd hope to find the
207 * cached texture tile.
208 * This is basically a direct-map cache.
209 * XXX There's probably lots of ways in which we can improve this.
210 */
211 static INLINE uint
212 tex_cache_pos( union tex_tile_address addr )
213 {
214 uint entry = (addr.bits.x +
215 addr.bits.y * 9 +
216 addr.bits.z * 3 +
217 addr.bits.face +
218 addr.bits.level * 7);
219
220 return entry % NUM_ENTRIES;
221 }
222
223 /**
224 * Similar to lp_get_cached_tile() but for textures.
225 * Tiles are read-only and indexed with more params.
226 */
227 const struct llvmpipe_cached_tex_tile *
228 lp_find_cached_tex_tile(struct llvmpipe_tex_tile_cache *tc,
229 union tex_tile_address addr )
230 {
231 struct pipe_screen *screen = tc->screen;
232 struct llvmpipe_cached_tex_tile *tile;
233
234 tile = tc->entries + tex_cache_pos( addr );
235
236 if (addr.value != tile->addr.value) {
237
238 /* cache miss. Most misses are because we've invaldiated the
239 * texture cache previously -- most commonly on binding a new
240 * texture. Currently we effectively flush the cache on texture
241 * bind.
242 */
243 #if 0
244 _debug_printf("miss at %u: x=%d y=%d z=%d face=%d level=%d\n"
245 " tile %u: x=%d y=%d z=%d face=%d level=%d\n",
246 pos, x/TEX_TILE_SIZE, y/TEX_TILE_SIZE, z, face, level,
247 pos, tile->addr.bits.x, tile->addr.bits.y, tile->z, tile->face, tile->level);
248 #endif
249
250 /* check if we need to get a new transfer */
251 if (!tc->tex_trans ||
252 tc->tex_face != addr.bits.face ||
253 tc->tex_level != addr.bits.level ||
254 tc->tex_z != addr.bits.z) {
255 /* get new transfer (view into texture) */
256
257 if (tc->tex_trans) {
258 if (tc->tex_trans_map) {
259 tc->screen->transfer_unmap(tc->screen, tc->tex_trans);
260 tc->tex_trans_map = NULL;
261 }
262
263 screen->tex_transfer_destroy(tc->tex_trans);
264 tc->tex_trans = NULL;
265 }
266
267 tc->tex_trans =
268 screen->get_tex_transfer(screen, tc->texture,
269 addr.bits.face,
270 addr.bits.level,
271 addr.bits.z,
272 PIPE_TRANSFER_READ, 0, 0,
273 u_minify(tc->texture->width0, addr.bits.level),
274 u_minify(tc->texture->height0, addr.bits.level));
275
276 tc->tex_trans_map = screen->transfer_map(screen, tc->tex_trans);
277
278 tc->tex_face = addr.bits.face;
279 tc->tex_level = addr.bits.level;
280 tc->tex_z = addr.bits.z;
281 }
282
283 {
284 unsigned x = addr.bits.x * TEX_TILE_SIZE;
285 unsigned y = addr.bits.y * TEX_TILE_SIZE;
286 unsigned w = TEX_TILE_SIZE;
287 unsigned h = TEX_TILE_SIZE;
288
289 if (pipe_clip_tile(x, y, &w, &h, tc->tex_trans)) {
290 assert(0);
291 }
292
293 util_format_read_4ub(tc->tex_trans->texture->format,
294 (uint8_t *)tile->color, sizeof tile->color[0],
295 tc->tex_trans_map, tc->tex_trans->stride,
296 x, y, w, h);
297 }
298
299 tile->addr = addr;
300 }
301
302 tc->last_tile = tile;
303 return tile;
304 }