ARB prog parser: Delete the old parser
[profile/ivi/mesa.git] / src / gallium / drivers / r300 / r300_screen.c
1 /*
2  * Copyright 2008 Corbin Simpson <MostAwesomeDude@gmail.com>
3  *
4  * Permission is hereby granted, free of charge, to any person obtaining a
5  * copy of this software and associated documentation files (the "Software"),
6  * to deal in the Software without restriction, including without limitation
7  * on the rights to use, copy, modify, merge, publish, distribute, sub
8  * license, and/or sell copies of the Software, and to permit persons to whom
9  * the Software is furnished to do so, subject to the following conditions:
10  *
11  * The above copyright notice and this permission notice (including the next
12  * paragraph) shall be included in all copies or substantial portions of the
13  * Software.
14  *
15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17  * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
18  * THE AUTHOR(S) AND/OR THEIR SUPPLIERS BE LIABLE FOR ANY CLAIM,
19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
21  * USE OR OTHER DEALINGS IN THE SOFTWARE. */
22
23 #include "r300_screen.h"
24
25 /* Return the identifier behind whom the brave coders responsible for this
26  * amalgamation of code, sweat, and duct tape, routinely obscure their names.
27  *
28  * ...I should have just put "Corbin Simpson", but I'm not that cool.
29  *
30  * (Or egotistical. Yet.) */
31 static const char* r300_get_vendor(struct pipe_screen* pscreen)
32 {
33     return "X.Org R300 Project";
34 }
35
36 static const char* chip_families[] = {
37     "R300",
38     "R350",
39     "R360",
40     "RV350",
41     "RV370",
42     "RV380",
43     "R420",
44     "R423",
45     "R430",
46     "R480",
47     "R481",
48     "RV410",
49     "RS400",
50     "RC410",
51     "RS480",
52     "RS482",
53     "RS600",
54     "RS690",
55     "RS740",
56     "RV515",
57     "R520",
58     "RV530",
59     "R580",
60     "RV560",
61     "RV570"
62 };
63
64 static const char* r300_get_name(struct pipe_screen* pscreen)
65 {
66     struct r300_screen* r300screen = r300_screen(pscreen);
67
68     return chip_families[r300screen->caps->family];
69 }
70
71 static int r300_get_param(struct pipe_screen* pscreen, int param)
72 {
73     struct r300_screen* r300screen = r300_screen(pscreen);
74
75     switch (param) {
76         /* XXX cases marked "IN THEORY" are possible on the hardware,
77          * but haven't been implemented yet. */
78         case PIPE_CAP_MAX_TEXTURE_IMAGE_UNITS:
79             /* XXX I'm told this goes up to 16 */
80             return 8;
81         case PIPE_CAP_NPOT_TEXTURES:
82             /* IN THEORY */
83             return 0;
84         case PIPE_CAP_TWO_SIDED_STENCIL:
85             if (r300screen->caps->is_r500) {
86                 return 1;
87             } else {
88                 return 0;
89             }
90         case PIPE_CAP_GLSL:
91             if (r300screen->caps->is_r500) {
92                 return 1;
93             } else {
94                 return 0;
95             }
96         case PIPE_CAP_S3TC:
97             return 1;
98         case PIPE_CAP_ANISOTROPIC_FILTER:
99             return 1;
100         case PIPE_CAP_POINT_SPRITE:
101             /* IN THEORY */
102             return 0;
103         case PIPE_CAP_MAX_RENDER_TARGETS:
104             return 4;
105         case PIPE_CAP_OCCLUSION_QUERY:
106             /* IN THEORY */
107             return 0;
108         case PIPE_CAP_TEXTURE_SHADOW_MAP:
109             /* IN THEORY */
110             return 0;
111         case PIPE_CAP_MAX_TEXTURE_2D_LEVELS:
112             if (r300screen->caps->is_r500) {
113                 /* 13 == 4096x4096 */
114                 return 13;
115             } else {
116                 /* 12 == 2048x2048 */
117                 return 12;
118             }
119         case PIPE_CAP_MAX_TEXTURE_3D_LEVELS:
120             /* So, technically, the limit is the same as above, but some math
121              * shows why this is silly. Assuming RGBA, 4cpp, we can see that
122              * 4096*4096*4096 = 64.0 GiB exactly, so it's not exactly
123              * practical. However, if at some point a game really wants this,
124              * then we can remove or raise this limit. */
125             if (r300screen->caps->is_r500) {
126                 /* 9 == 256x256x256 */
127                 return 9;
128             } else {
129                 /* 8 == 128*128*128 */
130                 return 8;
131             }
132         case PIPE_CAP_MAX_TEXTURE_CUBE_LEVELS:
133             if (r300screen->caps->is_r500) {
134                 /* 13 == 4096x4096 */
135                 return 13;
136             } else {
137                 /* 12 == 2048x2048 */
138                 return 12;
139             }
140         case PIPE_CAP_TEXTURE_MIRROR_CLAMP:
141             return 1;
142         case PIPE_CAP_TEXTURE_MIRROR_REPEAT:
143             return 1;
144         case PIPE_CAP_MAX_VERTEX_TEXTURE_UNITS:
145             /* XXX guessing (what a terrible guess) */
146             return 2;
147         case PIPE_CAP_TGSI_CONT_SUPPORTED:
148             /* XXX */
149             return 0;
150         default:
151             debug_printf("r300: Implementation error: Bad param %d\n",
152                 param);
153             return 0;
154     }
155 }
156
157 static float r300_get_paramf(struct pipe_screen* pscreen, int param)
158 {
159     struct r300_screen* r300screen = r300_screen(pscreen);
160
161     switch (param) {
162         case PIPE_CAP_MAX_LINE_WIDTH:
163         case PIPE_CAP_MAX_LINE_WIDTH_AA:
164         case PIPE_CAP_MAX_POINT_WIDTH:
165         case PIPE_CAP_MAX_POINT_WIDTH_AA:
166             /* The maximum dimensions of the colorbuffer are our practical
167              * rendering limits. 2048 pixels should be enough for anybody. */
168             if (r300screen->caps->is_r500) {
169                 return 4096.0f;
170             } else {
171                 return 2048.0f;
172             }
173         case PIPE_CAP_MAX_TEXTURE_ANISOTROPY:
174             return 16.0f;
175         case PIPE_CAP_MAX_TEXTURE_LOD_BIAS:
176             return 16.0f;
177         default:
178             debug_printf("r300: Implementation error: Bad paramf %d\n",
179                 param);
180             return 0.0f;
181     }
182 }
183
184 static boolean check_tex_2d_format(enum pipe_format format, uint32_t usage,
185                                    boolean is_r500)
186 {
187     switch (format) {
188         /* Supported formats. */
189         /* Colorbuffer */
190         case PIPE_FORMAT_A4R4G4B4_UNORM:
191         case PIPE_FORMAT_R5G6B5_UNORM:
192         case PIPE_FORMAT_A1R5G5B5_UNORM:
193             return usage &
194                 (PIPE_TEXTURE_USAGE_RENDER_TARGET |
195                  PIPE_TEXTURE_USAGE_DISPLAY_TARGET |
196                  PIPE_TEXTURE_USAGE_PRIMARY);
197
198         /* Texture */
199         case PIPE_FORMAT_A8R8G8B8_SRGB:
200         case PIPE_FORMAT_R8G8B8A8_SRGB:
201         case PIPE_FORMAT_DXT1_RGB:
202         case PIPE_FORMAT_DXT1_RGBA:
203         case PIPE_FORMAT_DXT3_RGBA:
204         case PIPE_FORMAT_DXT5_RGBA:
205         case PIPE_FORMAT_YCBCR:
206             return usage & PIPE_TEXTURE_USAGE_SAMPLER;
207
208         /* Colorbuffer or texture */
209         case PIPE_FORMAT_A8R8G8B8_UNORM:
210         case PIPE_FORMAT_R8G8B8A8_UNORM:
211         case PIPE_FORMAT_I8_UNORM:
212             return usage &
213                 (PIPE_TEXTURE_USAGE_RENDER_TARGET |
214                  PIPE_TEXTURE_USAGE_DISPLAY_TARGET |
215                  PIPE_TEXTURE_USAGE_PRIMARY |
216                  PIPE_TEXTURE_USAGE_SAMPLER);
217
218         /* Z buffer */
219         case PIPE_FORMAT_Z16_UNORM:
220             return usage & PIPE_TEXTURE_USAGE_DEPTH_STENCIL;
221
222         /* Z buffer with stencil or texture */
223         case PIPE_FORMAT_Z24S8_UNORM:
224             return usage &
225                 (PIPE_TEXTURE_USAGE_DEPTH_STENCIL |
226                  PIPE_TEXTURE_USAGE_SAMPLER);
227
228         /* Definitely unsupported formats. */
229         /* Non-usable Z buffer/stencil formats. */
230         case PIPE_FORMAT_Z24X8_UNORM:
231         case PIPE_FORMAT_S8Z24_UNORM:
232         case PIPE_FORMAT_X8Z24_UNORM:
233             debug_printf("r300: Note: Got unsupported format: %s in %s\n",
234                 pf_name(format), __FUNCTION__);
235             return FALSE;
236
237         /* XXX These don't even exist
238         case PIPE_FORMAT_A32R32G32B32:
239         case PIPE_FORMAT_A16R16G16B16: */
240         /* XXX Insert YUV422 packed VYUY and YVYU here */
241         /* XXX What the deuce is UV88? (r3xx accel page 14)
242             debug_printf("r300: Warning: Got unimplemented format: %s in %s\n",
243                 pf_name(format), __FUNCTION__);
244             return FALSE; */
245
246         /* XXX Supported yet unimplemented r5xx formats: */
247         /* XXX Again, what is UV1010 this time? (r5xx accel page 148) */
248         /* XXX Even more that don't exist
249         case PIPE_FORMAT_A10R10G10B10_UNORM:
250         case PIPE_FORMAT_A2R10G10B10_UNORM:
251         case PIPE_FORMAT_I10_UNORM:
252             debug_printf(
253                 "r300: Warning: Got unimplemented r500 format: %s in %s\n",
254                 pf_name(format), __FUNCTION__);
255             return FALSE; */
256
257         default:
258             /* Unknown format... */
259             debug_printf("r300: Warning: Got unknown format: %s in %s\n",
260                 pf_name(format), __FUNCTION__);
261             break;
262     }
263
264     return FALSE;
265 }
266
267 /* XXX moar targets */
268 static boolean r300_is_format_supported(struct pipe_screen* pscreen,
269                                         enum pipe_format format,
270                                         enum pipe_texture_target target,
271                                         unsigned tex_usage,
272                                         unsigned geom_flags)
273 {
274     switch (target) {
275         case PIPE_TEXTURE_2D:
276             return check_tex_2d_format(format, tex_usage,
277                 r300_screen(pscreen)->caps->is_r500);
278         case PIPE_TEXTURE_1D:
279         case PIPE_TEXTURE_3D:
280         case PIPE_TEXTURE_CUBE:
281             debug_printf("r300: Implementation error: Unsupported format "
282                     "target: %d\n", target);
283             break;
284         default:
285             debug_printf("r300: Fatal: This is not a format target: %d\n",
286                 target);
287             assert(0);
288             break;
289     }
290
291     return FALSE;
292 }
293
294 static struct pipe_transfer*
295 r300_get_tex_transfer(struct pipe_screen *screen,
296                       struct pipe_texture *texture,
297                       unsigned face, unsigned level, unsigned zslice,
298                       enum pipe_transfer_usage usage, unsigned x, unsigned y,
299                       unsigned w, unsigned h)
300 {
301     struct r300_texture *tex = (struct r300_texture *)texture;
302     struct r300_transfer *trans;
303     unsigned offset;  /* in bytes */
304
305     /* XXX Add support for these things */
306     if (texture->target == PIPE_TEXTURE_CUBE) {
307         debug_printf("PIPE_TEXTURE_CUBE is not yet supported.\n");
308         /* offset = tex->image_offset[level][face]; */
309     }
310     else if (texture->target == PIPE_TEXTURE_3D) {
311         debug_printf("PIPE_TEXTURE_3D is not yet supported.\n");
312         /* offset = tex->image_offset[level][zslice]; */
313     }
314     else {
315         offset = tex->offset[level];
316         assert(face == 0);
317         assert(zslice == 0);
318     }
319
320     trans = CALLOC_STRUCT(r300_transfer);
321     if (trans) {
322         pipe_texture_reference(&trans->transfer.texture, texture);
323         trans->transfer.format = trans->transfer.format;
324         trans->transfer.width = w;
325         trans->transfer.height = h;
326         trans->transfer.block = texture->block;
327         trans->transfer.nblocksx = texture->nblocksx[level];
328         trans->transfer.nblocksy = texture->nblocksy[level];
329         trans->transfer.stride = tex->stride;
330         trans->transfer.usage = usage;
331         trans->offset = offset;
332     }
333     return &trans->transfer;
334 }
335
336 static void
337 r300_tex_transfer_destroy(struct pipe_transfer *trans)
338 {
339    pipe_texture_reference(&trans->texture, NULL);
340    FREE(trans);
341 }
342
343 static void* r300_transfer_map(struct pipe_screen* screen,
344                               struct pipe_transfer* transfer)
345 {
346     struct r300_texture* tex = (struct r300_texture*)transfer->texture;
347     char* map;
348     unsigned flags = 0;
349
350     if (transfer->usage != PIPE_TRANSFER_WRITE) {
351         flags |= PIPE_BUFFER_USAGE_CPU_READ;
352     }
353     if (transfer->usage != PIPE_TRANSFER_READ) {
354         flags |= PIPE_BUFFER_USAGE_CPU_WRITE;
355     }
356     
357     map = pipe_buffer_map(screen, tex->buffer, flags);
358
359     if (!map) {
360         return NULL;
361     }
362
363     return map + r300_transfer(transfer)->offset +
364         transfer->y / transfer->block.height * transfer->stride +
365         transfer->x / transfer->block.width * transfer->block.size;
366 }
367
368 static void r300_transfer_unmap(struct pipe_screen* screen,
369                                 struct pipe_transfer* transfer)
370 {
371     struct r300_texture* tex = (struct r300_texture*)transfer->texture;
372     pipe_buffer_unmap(screen, tex->buffer);
373 }
374
375 static void r300_destroy_screen(struct pipe_screen* pscreen)
376 {
377     struct r300_screen* r300screen = r300_screen(pscreen);
378
379     FREE(r300screen->caps);
380     FREE(r300screen);
381 }
382
383 struct pipe_screen* r300_create_screen(struct r300_winsys* r300_winsys)
384 {
385     struct r300_screen* r300screen = CALLOC_STRUCT(r300_screen);
386     struct r300_capabilities* caps = CALLOC_STRUCT(r300_capabilities);
387
388     if (!r300screen || !caps)
389         return NULL;
390
391     caps->pci_id = r300_winsys->pci_id;
392
393     r300_parse_chipset(caps);
394
395     r300screen->caps = caps;
396     r300screen->screen.winsys = (struct pipe_winsys*)r300_winsys;
397     r300screen->screen.destroy = r300_destroy_screen;
398     r300screen->screen.get_name = r300_get_name;
399     r300screen->screen.get_vendor = r300_get_vendor;
400     r300screen->screen.get_param = r300_get_param;
401     r300screen->screen.get_paramf = r300_get_paramf;
402     r300screen->screen.is_format_supported = r300_is_format_supported;
403     r300screen->screen.get_tex_transfer = r300_get_tex_transfer;
404     r300screen->screen.tex_transfer_destroy = r300_tex_transfer_destroy;
405     r300screen->screen.transfer_map = r300_transfer_map;
406     r300screen->screen.transfer_unmap = r300_transfer_unmap;
407
408     r300_init_screen_texture_functions(&r300screen->screen);
409     u_simple_screen_init(&r300screen->screen);
410
411     return &r300screen->screen;
412 }