Fix glActiveStencilFaceEXT dispatch problem (bug 10523).
[mesa.git] / src / mesa / drivers / dri / r300 / r300_context.c
1 /*
2 Copyright (C) The Weather Channel, Inc. 2002. All Rights Reserved.
3
4 The Weather Channel (TM) funded Tungsten Graphics to develop the
5 initial release of the Radeon 8500 driver under the XFree86 license.
6 This notice must be preserved.
7
8 Permission is hereby granted, free of charge, to any person obtaining
9 a copy of this software and associated documentation files (the
10 "Software"), to deal in the Software without restriction, including
11 without limitation the rights to use, copy, modify, merge, publish,
12 distribute, sublicense, and/or sell copies of the Software, and to
13 permit persons to whom the Software is furnished to do so, subject to
14 the following conditions:
15
16 The above copyright notice and this permission notice (including the
17 next paragraph) shall be included in all copies or substantial
18 portions of the Software.
19
20 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
21 EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
22 MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
23 IN NO EVENT SHALL THE COPYRIGHT OWNER(S) AND/OR ITS SUPPLIERS BE
24 LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
25 OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
26 WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27
28 **************************************************************************/
29
30 /*
31 * Authors:
32 * Keith Whitwell <keith@tungstengraphics.com>
33 * Nicolai Haehnle <prefect_@gmx.net>
34 */
35 #include "glheader.h"
36 #include "api_arrayelt.h"
37 #include "context.h"
38 #include "simple_list.h"
39 #include "imports.h"
40 #include "matrix.h"
41 #include "extensions.h"
42 #include "state.h"
43 #include "bufferobj.h"
44
45 #include "swrast/swrast.h"
46 #include "swrast_setup/swrast_setup.h"
47 #include "vbo/vbo.h"
48
49 #include "tnl/tnl.h"
50 #include "tnl/t_pipeline.h"
51 #include "tnl/t_vp_build.h"
52
53 #include "drivers/common/driverfuncs.h"
54
55 #include "radeon_ioctl.h"
56 #include "radeon_span.h"
57 #include "r300_context.h"
58 #include "r300_cmdbuf.h"
59 #include "r300_state.h"
60 #include "r300_ioctl.h"
61 #include "r300_tex.h"
62 #include "r300_maos.h"
63
64 #ifdef USER_BUFFERS
65 #include "radeon_mm.h"
66 #endif
67
68 #include "vblank.h"
69 #include "utils.h"
70 #include "xmlpool.h" /* for symbolic values of enum-type options */
71
72 /* hw_tcl_on derives from future_hw_tcl_on when its safe to change it. */
73 int future_hw_tcl_on=1;
74 int hw_tcl_on=1;
75
76 #define need_GL_EXT_stencil_two_side
77 #define need_GL_ARB_multisample
78 #define need_GL_ARB_texture_compression
79 #define need_GL_ARB_vertex_buffer_object
80 #define need_GL_ARB_vertex_program
81 #define need_GL_EXT_blend_minmax
82 //#define need_GL_EXT_fog_coord
83 #define need_GL_EXT_secondary_color
84 #define need_GL_EXT_blend_equation_separate
85 #define need_GL_EXT_blend_func_separate
86 #define need_GL_EXT_gpu_program_parameters
87 #define need_GL_NV_vertex_program
88 #include "extension_helper.h"
89
90 const struct dri_extension card_extensions[] = {
91 {"GL_ARB_multisample", GL_ARB_multisample_functions},
92 {"GL_ARB_multitexture", NULL},
93 {"GL_ARB_texture_border_clamp", NULL},
94 {"GL_ARB_texture_compression", GL_ARB_texture_compression_functions},
95 {"GL_ARB_texture_cube_map", NULL},
96 {"GL_ARB_texture_env_add", NULL},
97 {"GL_ARB_texture_env_combine", NULL},
98 {"GL_ARB_texture_env_crossbar", NULL},
99 {"GL_ARB_texture_env_dot3", NULL},
100 {"GL_ARB_texture_mirrored_repeat", NULL},
101 {"GL_ARB_vertex_buffer_object", GL_ARB_vertex_buffer_object_functions},
102 {"GL_ARB_vertex_program", GL_ARB_vertex_program_functions},
103 {"GL_ARB_fragment_program", NULL},
104 {"GL_EXT_blend_equation_separate", GL_EXT_blend_equation_separate_functions},
105 {"GL_EXT_blend_func_separate", GL_EXT_blend_func_separate_functions},
106 {"GL_EXT_blend_minmax", GL_EXT_blend_minmax_functions},
107 {"GL_EXT_blend_subtract", NULL},
108 // {"GL_EXT_fog_coord", GL_EXT_fog_coord_functions },
109 {"GL_EXT_gpu_program_parameters", GL_EXT_gpu_program_parameters_functions},
110 {"GL_EXT_secondary_color", GL_EXT_secondary_color_functions},
111 {"GL_EXT_stencil_wrap", NULL},
112 {"GL_EXT_texture_edge_clamp", NULL},
113 {"GL_EXT_texture_env_combine", NULL},
114 {"GL_EXT_texture_env_dot3", NULL},
115 {"GL_EXT_texture_filter_anisotropic", NULL},
116 {"GL_EXT_texture_lod_bias", NULL},
117 {"GL_EXT_texture_mirror_clamp", NULL},
118 {"GL_EXT_texture_rectangle", NULL},
119 {"GL_ATI_texture_env_combine3", NULL},
120 {"GL_ATI_texture_mirror_once", NULL},
121 {"GL_MESA_pack_invert", NULL},
122 {"GL_MESA_ycbcr_texture", NULL},
123 {"GL_MESAX_texture_float", NULL},
124 {"GL_NV_blend_square", NULL},
125 {"GL_NV_vertex_program", GL_NV_vertex_program_functions},
126 {"GL_SGIS_generate_mipmap", NULL},
127 {"GL_EXT_stencil_two_side", GL_EXT_stencil_two_side_functions},
128 {NULL, NULL}
129 };
130
131 extern struct tnl_pipeline_stage _r300_render_stage;
132 extern const struct tnl_pipeline_stage _r300_tcl_stage;
133
134 static const struct tnl_pipeline_stage *r300_pipeline[] = {
135
136 /* Try and go straight to t&l
137 */
138 &_r300_tcl_stage,
139
140 /* Catch any t&l fallbacks
141 */
142 &_tnl_vertex_transform_stage,
143 &_tnl_normal_transform_stage,
144 &_tnl_lighting_stage,
145 &_tnl_fog_coordinate_stage,
146 &_tnl_texgen_stage,
147 &_tnl_texture_transform_stage,
148 &_tnl_vertex_program_stage,
149
150 /* Try again to go to tcl?
151 * - no good for asymmetric-twoside (do with multipass)
152 * - no good for asymmetric-unfilled (do with multipass)
153 * - good for material
154 * - good for texgen
155 * - need to manipulate a bit of state
156 *
157 * - worth it/not worth it?
158 */
159
160 /* Else do them here.
161 */
162 &_r300_render_stage,
163 &_tnl_render_stage, /* FALLBACK */
164 0,
165 };
166
167
168 /* Create the device specific rendering context.
169 */
170 GLboolean r300CreateContext(const __GLcontextModes * glVisual,
171 __DRIcontextPrivate * driContextPriv,
172 void *sharedContextPrivate)
173 {
174 __DRIscreenPrivate *sPriv = driContextPriv->driScreenPriv;
175 radeonScreenPtr screen = (radeonScreenPtr) (sPriv->private);
176 struct dd_function_table functions;
177 r300ContextPtr r300;
178 GLcontext *ctx;
179 int tcl_mode, i;
180
181 assert(glVisual);
182 assert(driContextPriv);
183 assert(screen);
184
185 /* Allocate the R300 context */
186 r300 = (r300ContextPtr)CALLOC(sizeof(*r300));
187 if (!r300)
188 return GL_FALSE;
189
190 /* Parse configuration files.
191 * Do this here so that initialMaxAnisotropy is set before we create
192 * the default textures.
193 */
194 driParseConfigFiles(&r300->radeon.optionCache, &screen->optionCache,
195 screen->driScreen->myNum, "r300");
196 r300->initialMaxAnisotropy = driQueryOptionf(&r300->radeon.optionCache,
197 "def_max_anisotropy");
198
199 //r300->texmicrotile = GL_TRUE;
200
201 /* Init default driver functions then plug in our R300-specific functions
202 * (the texture functions are especially important)
203 */
204 _mesa_init_driver_functions(&functions);
205 r300InitIoctlFuncs(&functions);
206 r300InitStateFuncs(&functions);
207 r300InitTextureFuncs(&functions);
208 r300InitShaderFuncs(&functions);
209
210 #ifdef USER_BUFFERS
211 radeon_mm_init(r300);
212 #endif
213 #ifdef HW_VBOS
214 if (hw_tcl_on) {
215 r300_init_vbo_funcs(&functions);
216 }
217 #endif
218 if (!radeonInitContext(&r300->radeon, &functions,
219 glVisual, driContextPriv, sharedContextPrivate)) {
220 FREE(r300);
221 return GL_FALSE;
222 }
223
224 /* Init r300 context data */
225 r300->dma.buf0_address = r300->radeon.radeonScreen->buffers->list[0].address;
226
227 (void)memset(r300->texture_heaps, 0, sizeof(r300->texture_heaps));
228 make_empty_list(&r300->swapped);
229
230 r300->nr_heaps = 1 /* screen->numTexHeaps */ ;
231 assert(r300->nr_heaps < RADEON_NR_TEX_HEAPS);
232 for (i = 0; i < r300->nr_heaps; i++) {
233 r300->texture_heaps[i] = driCreateTextureHeap(i, r300,
234 screen->
235 texSize[i], 12,
236 RADEON_NR_TEX_REGIONS,
237 (drmTextureRegionPtr)
238 r300->radeon.sarea->
239 tex_list[i],
240 &r300->radeon.sarea->
241 tex_age[i],
242 &r300->swapped,
243 sizeof
244 (r300TexObj),
245 (destroy_texture_object_t
246 *)
247 r300DestroyTexObj);
248 }
249 r300->texture_depth = driQueryOptioni(&r300->radeon.optionCache,
250 "texture_depth");
251 if (r300->texture_depth == DRI_CONF_TEXTURE_DEPTH_FB)
252 r300->texture_depth = (screen->cpp == 4) ?
253 DRI_CONF_TEXTURE_DEPTH_32 : DRI_CONF_TEXTURE_DEPTH_16;
254
255 /* Set the maximum texture size small enough that we can guarentee that
256 * all texture units can bind a maximal texture and have them both in
257 * texturable memory at once.
258 */
259
260 ctx = r300->radeon.glCtx;
261
262 ctx->Const.MaxTextureImageUnits = driQueryOptioni(&r300->radeon.optionCache,
263 "texture_image_units");
264 ctx->Const.MaxTextureCoordUnits = driQueryOptioni(&r300->radeon.optionCache,
265 "texture_coord_units");
266 ctx->Const.MaxTextureUnits = MIN2(ctx->Const.MaxTextureImageUnits,
267 ctx->Const.MaxTextureCoordUnits);
268 ctx->Const.MaxTextureMaxAnisotropy = 16.0;
269
270 ctx->Const.MinPointSize = 1.0;
271 ctx->Const.MinPointSizeAA = 1.0;
272 ctx->Const.MaxPointSize = R300_POINTSIZE_MAX;
273 ctx->Const.MaxPointSizeAA = R300_POINTSIZE_MAX;
274
275 ctx->Const.MinLineWidth = 1.0;
276 ctx->Const.MinLineWidthAA = 1.0;
277 ctx->Const.MaxLineWidth = R300_LINESIZE_MAX;
278 ctx->Const.MaxLineWidthAA = R300_LINESIZE_MAX;
279
280 #ifdef USER_BUFFERS
281 /* Needs further modifications */
282 #if 0
283 ctx->Const.MaxArrayLockSize = (/*512*/RADEON_BUFFER_SIZE*16*1024) / (4*4);
284 #endif
285 #endif
286
287 /* Initialize the software rasterizer and helper modules.
288 */
289 _swrast_CreateContext(ctx);
290 _vbo_CreateContext(ctx);
291 _tnl_CreateContext(ctx);
292 _swsetup_CreateContext(ctx);
293 _swsetup_Wakeup(ctx);
294 _ae_create_context(ctx);
295
296 /* Install the customized pipeline:
297 */
298 _tnl_destroy_pipeline(ctx);
299 _tnl_install_pipeline(ctx, r300_pipeline);
300
301 /* Try and keep materials and vertices separate:
302 */
303 /* _tnl_isolate_materials(ctx, GL_TRUE); */
304
305 /* Configure swrast and TNL to match hardware characteristics:
306 */
307 _swrast_allow_pixel_fog(ctx, GL_FALSE);
308 _swrast_allow_vertex_fog(ctx, GL_TRUE);
309 _tnl_allow_pixel_fog(ctx, GL_FALSE);
310 _tnl_allow_vertex_fog(ctx, GL_TRUE);
311
312 /* currently bogus data */
313 ctx->Const.VertexProgram.MaxInstructions=VSF_MAX_FRAGMENT_LENGTH/4;
314 ctx->Const.VertexProgram.MaxNativeInstructions=VSF_MAX_FRAGMENT_LENGTH/4;
315 ctx->Const.VertexProgram.MaxNativeAttribs=16; /* r420 */
316 ctx->Const.VertexProgram.MaxTemps=32;
317 ctx->Const.VertexProgram.MaxNativeTemps=/*VSF_MAX_FRAGMENT_TEMPS*/32;
318 ctx->Const.VertexProgram.MaxNativeParameters=256; /* r420 */
319 ctx->Const.VertexProgram.MaxNativeAddressRegs=1;
320
321 ctx->Const.FragmentProgram.MaxNativeTemps = PFS_NUM_TEMP_REGS;
322 ctx->Const.FragmentProgram.MaxNativeAttribs = 11; /* copy i915... */
323 ctx->Const.FragmentProgram.MaxNativeParameters = PFS_NUM_CONST_REGS;
324 ctx->Const.FragmentProgram.MaxNativeAluInstructions = PFS_MAX_ALU_INST;
325 ctx->Const.FragmentProgram.MaxNativeTexInstructions = PFS_MAX_TEX_INST;
326 ctx->Const.FragmentProgram.MaxNativeInstructions = PFS_MAX_ALU_INST+PFS_MAX_TEX_INST;
327 ctx->Const.FragmentProgram.MaxNativeTexIndirections = PFS_MAX_TEX_INDIRECT;
328 ctx->Const.FragmentProgram.MaxNativeAddressRegs = 0; /* and these are?? */
329 _tnl_ProgramCacheInit(ctx);
330 ctx->FragmentProgram._MaintainTexEnvProgram = GL_TRUE;
331
332 driInitExtensions(ctx, card_extensions, GL_TRUE);
333
334 if (driQueryOptionb(&r300->radeon.optionCache, "disable_stencil_two_side"))
335 _mesa_disable_extension(ctx, "GL_EXT_stencil_two_side");
336
337 if (r300->radeon.glCtx->Mesa_DXTn && !driQueryOptionb (&r300->radeon.optionCache, "disable_s3tc")) {
338 _mesa_enable_extension( ctx, "GL_EXT_texture_compression_s3tc" );
339 _mesa_enable_extension( ctx, "GL_S3_s3tc" );
340 }
341 else if (driQueryOptionb (&r300->radeon.optionCache, "force_s3tc_enable")) {
342 _mesa_enable_extension( ctx, "GL_EXT_texture_compression_s3tc" );
343 }
344
345 r300->disable_lowimpact_fallback = driQueryOptionb(&r300->radeon.optionCache, "disable_lowimpact_fallback");
346
347 radeonInitSpanFuncs(ctx);
348 r300InitCmdBuf(r300);
349 r300InitState(r300);
350
351 #ifdef RADEON_VTXFMT_A
352 radeon_init_vtxfmt_a(r300);
353 #endif
354
355 #if 0
356 /* plug in a few more device driver functions */
357 /* XXX these should really go right after _mesa_init_driver_functions() */
358 r300InitPixelFuncs(ctx);
359 r300InitSwtcl(ctx);
360 #endif
361 TNL_CONTEXT(ctx)->Driver.RunPipeline = _tnl_run_pipeline;
362
363 tcl_mode = driQueryOptioni(&r300->radeon.optionCache, "tcl_mode");
364 if (driQueryOptionb(&r300->radeon.optionCache, "no_rast")) {
365 fprintf(stderr, "disabling 3D acceleration\n");
366 #if R200_MERGED
367 FALLBACK(&r300->radeon, RADEON_FALLBACK_DISABLE, 1);
368 #endif
369 }
370 if (tcl_mode == DRI_CONF_TCL_SW ||
371 !(r300->radeon.radeonScreen->chip_flags & RADEON_CHIPSET_TCL)) {
372 if (r300->radeon.radeonScreen->chip_flags & RADEON_CHIPSET_TCL) {
373 r300->radeon.radeonScreen->chip_flags &= ~RADEON_CHIPSET_TCL;
374 fprintf(stderr, "Disabling HW TCL support\n");
375 }
376 TCL_FALLBACK(r300->radeon.glCtx, RADEON_TCL_FALLBACK_TCL_DISABLE, 1);
377 }
378
379 return GL_TRUE;
380 }
381
382 static void r300FreeGartAllocations(r300ContextPtr r300)
383 {
384 int i, ret, tries=0, done_age, in_use=0;
385 drm_radeon_mem_free_t memfree;
386
387 memfree.region = RADEON_MEM_REGION_GART;
388
389 #ifdef USER_BUFFERS
390 for (i = r300->rmm->u_last; i > 0; i--) {
391 if (r300->rmm->u_list[i].ptr == NULL) {
392 continue;
393 }
394
395 /* check whether this buffer is still in use */
396 if (r300->rmm->u_list[i].pending) {
397 in_use++;
398 }
399 }
400 /* Cannot flush/lock if no context exists. */
401 if (in_use)
402 r300FlushCmdBuf(r300, __FUNCTION__);
403
404 done_age = radeonGetAge((radeonContextPtr)r300);
405
406 for (i = r300->rmm->u_last; i > 0; i--) {
407 if (r300->rmm->u_list[i].ptr == NULL) {
408 continue;
409 }
410
411 /* check whether this buffer is still in use */
412 if (!r300->rmm->u_list[i].pending) {
413 continue;
414 }
415
416 assert(r300->rmm->u_list[i].h_pending == 0);
417
418 tries = 0;
419 while(r300->rmm->u_list[i].age > done_age && tries++ < 1000) {
420 usleep(10);
421 done_age = radeonGetAge((radeonContextPtr)r300);
422 }
423 if (tries >= 1000) {
424 WARN_ONCE("Failed to idle region!");
425 }
426
427 memfree.region_offset = (char *)r300->rmm->u_list[i].ptr -
428 (char *)r300->radeon.radeonScreen->gartTextures.map;
429
430 ret = drmCommandWrite(r300->radeon.radeonScreen->driScreen->fd,
431 DRM_RADEON_FREE, &memfree, sizeof(memfree));
432 if (ret) {
433 fprintf(stderr, "Failed to free at %p\nret = %s\n",
434 r300->rmm->u_list[i].ptr, strerror(-ret));
435 } else {
436 if (i == r300->rmm->u_last)
437 r300->rmm->u_last--;
438
439 r300->rmm->u_list[i].pending = 0;
440 r300->rmm->u_list[i].ptr = NULL;
441 if (r300->rmm->u_list[i].fb) {
442 LOCK_HARDWARE(&(r300->radeon));
443 ret = mmFreeMem(r300->rmm->u_list[i].fb);
444 UNLOCK_HARDWARE(&(r300->radeon));
445 if (ret) fprintf(stderr, "failed to free!\n");
446 r300->rmm->u_list[i].fb = NULL;
447 }
448 r300->rmm->u_list[i].ref_count = 0;
449 }
450 }
451 r300->rmm->u_head = i;
452 #endif /* USER_BUFFERS */
453 }
454
455 /* Destroy the device specific context.
456 */
457 void r300DestroyContext(__DRIcontextPrivate * driContextPriv)
458 {
459 GET_CURRENT_CONTEXT(ctx);
460 r300ContextPtr r300 = (r300ContextPtr) driContextPriv->driverPrivate;
461 radeonContextPtr radeon = (radeonContextPtr) r300;
462 radeonContextPtr current = ctx ? RADEON_CONTEXT(ctx) : NULL;
463
464 if (RADEON_DEBUG & DEBUG_DRI) {
465 fprintf(stderr, "Destroying context !\n");
466 }
467
468 /* check if we're deleting the currently bound context */
469 if (&r300->radeon == current) {
470 radeonFlush(r300->radeon.glCtx);
471 _mesa_make_current(NULL, NULL, NULL);
472 }
473
474 /* Free r300 context resources */
475 assert(r300); /* should never be null */
476
477 if (r300) {
478 GLboolean release_texture_heaps;
479
480 release_texture_heaps = (r300->radeon.glCtx->Shared->RefCount == 1);
481 _swsetup_DestroyContext(r300->radeon.glCtx);
482 _tnl_ProgramCacheDestroy(r300->radeon.glCtx);
483 _tnl_DestroyContext(r300->radeon.glCtx);
484 _vbo_DestroyContext(r300->radeon.glCtx);
485 _swrast_DestroyContext(r300->radeon.glCtx);
486
487 if (r300->dma.current.buf) {
488 r300ReleaseDmaRegion(r300, &r300->dma.current, __FUNCTION__ );
489 #ifndef USER_BUFFERS
490 r300FlushCmdBuf(r300, __FUNCTION__);
491 #endif
492 }
493 r300FreeGartAllocations(r300);
494 r300DestroyCmdBuf(r300);
495
496 if (radeon->state.scissor.pClipRects) {
497 FREE(radeon->state.scissor.pClipRects);
498 radeon->state.scissor.pClipRects = NULL;
499 }
500
501 if (release_texture_heaps) {
502 /* This share group is about to go away, free our private
503 * texture object data.
504 */
505 int i;
506
507 for (i = 0; i < r300->nr_heaps; i++) {
508 driDestroyTextureHeap(r300->texture_heaps[i]);
509 r300->texture_heaps[i] = NULL;
510 }
511
512 assert(is_empty_list(&r300->swapped));
513 }
514
515 radeonCleanupContext(&r300->radeon);
516
517 #ifdef USER_BUFFERS
518 /* the memory manager might be accessed when Mesa frees the shared
519 * state, so don't destroy it earlier
520 */
521 radeon_mm_destroy(r300);
522 #endif
523
524 /* free the option cache */
525 driDestroyOptionCache(&r300->radeon.optionCache);
526
527 FREE(r300);
528 }
529 }