r200_context.c revision 391892b0d8d46c4f0e43799fac61dd8246e4e023 
1/*
2Copyright (C) The Weather Channel, Inc.  2002.  All Rights Reserved.
3
4The Weather Channel (TM) funded Tungsten Graphics to develop the
5initial release of the Radeon 8500 driver under the XFree86 license.
6This notice must be preserved.
7
8Permission is hereby granted, free of charge, to any person obtaining
9a copy of this software and associated documentation files (the
10"Software"), to deal in the Software without restriction, including
11without limitation the rights to use, copy, modify, merge, publish,
12distribute, sublicense, and/or sell copies of the Software, and to
13permit persons to whom the Software is furnished to do so, subject to
14the following conditions:
15
16The above copyright notice and this permission notice (including the
17next paragraph) shall be included in all copies or substantial
18portions of the Software.
19
20THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
21EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
22MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
23IN NO EVENT SHALL THE COPYRIGHT OWNER(S) AND/OR ITS SUPPLIERS BE
24LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
25OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
26WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27
28**************************************************************************/
29
30/*
31 * Authors:
32 *   Keith Whitwell <keith@tungstengraphics.com>
33 */
34
35#include "main/glheader.h"
36#include "main/api_arrayelt.h"
37#include "main/context.h"
38#include "main/simple_list.h"
39#include "main/imports.h"
40#include "main/extensions.h"
41
42#include "swrast/swrast.h"
43#include "swrast_setup/swrast_setup.h"
44#include "vbo/vbo.h"
45
46#include "tnl/tnl.h"
47#include "tnl/t_pipeline.h"
48
49#include "drivers/common/driverfuncs.h"
50
51#include "r200_context.h"
52#include "r200_ioctl.h"
53#include "r200_state.h"
54#include "r200_pixel.h"
55#include "r200_tex.h"
56#include "r200_swtcl.h"
57#include "r200_tcl.h"
58#include "r200_vertprog.h"
59#include "radeon_queryobj.h"
60#include "r200_blit.h"
61
62#include "radeon_span.h"
63
64#define need_GL_ARB_occlusion_query
65#define need_GL_ARB_vertex_program
66#define need_GL_ATI_fragment_shader
67#define need_GL_EXT_blend_minmax
68#define need_GL_EXT_fog_coord
69#define need_GL_EXT_secondary_color
70#define need_GL_EXT_blend_equation_separate
71#define need_GL_EXT_blend_func_separate
72#define need_GL_NV_vertex_program
73#define need_GL_ARB_point_parameters
74#define need_GL_EXT_framebuffer_object
75#include "main/remap_helper.h"
76
77#define DRIVER_DATE	"20060602"
78
79#include "utils.h"
80#include "xmlpool.h" /* for symbolic values of enum-type options */
81
82/* Return various strings for glGetString().
83 */
84static const GLubyte *r200GetString( GLcontext *ctx, GLenum name )
85{
86   r200ContextPtr rmesa = R200_CONTEXT(ctx);
87   static char buffer[128];
88   unsigned   offset;
89   GLuint agp_mode = (rmesa->radeon.radeonScreen->card_type == RADEON_CARD_PCI)? 0 :
90      rmesa->radeon.radeonScreen->AGPMode;
91
92   switch ( name ) {
93   case GL_VENDOR:
94      return (GLubyte *)"Tungsten Graphics, Inc.";
95
96   case GL_RENDERER:
97      offset = driGetRendererString( buffer, "R200", DRIVER_DATE,
98				     agp_mode );
99
100      sprintf( & buffer[ offset ], " %sTCL",
101	       !(rmesa->radeon.TclFallback & R200_TCL_FALLBACK_TCL_DISABLE)
102	       ? "" : "NO-" );
103
104      return (GLubyte *)buffer;
105
106   default:
107      return NULL;
108   }
109}
110
111
112/* Extension strings exported by the R200 driver.
113 */
114static const struct dri_extension card_extensions[] =
115{
116    { "GL_ARB_multitexture",               NULL },
117    { "GL_ARB_occlusion_query",		   GL_ARB_occlusion_query_functions},
118    { "GL_ARB_texture_border_clamp",       NULL },
119    { "GL_ARB_texture_env_add",            NULL },
120    { "GL_ARB_texture_env_combine",        NULL },
121    { "GL_ARB_texture_env_dot3",           NULL },
122    { "GL_ARB_texture_env_crossbar",       NULL },
123    { "GL_ARB_texture_mirrored_repeat",    NULL },
124    { "GL_EXT_blend_minmax",               GL_EXT_blend_minmax_functions },
125    { "GL_EXT_blend_subtract",             NULL },
126    { "GL_EXT_fog_coord",                  GL_EXT_fog_coord_functions },
127    { "GL_EXT_packed_depth_stencil",	   NULL},
128    { "GL_EXT_secondary_color",            GL_EXT_secondary_color_functions },
129    { "GL_EXT_stencil_wrap",               NULL },
130    { "GL_EXT_texture_edge_clamp",         NULL },
131    { "GL_EXT_texture_env_combine",        NULL },
132    { "GL_EXT_texture_env_dot3",           NULL },
133    { "GL_EXT_texture_filter_anisotropic", NULL },
134    { "GL_EXT_texture_lod_bias",           NULL },
135    { "GL_EXT_texture_mirror_clamp",       NULL },
136    { "GL_EXT_texture_rectangle",          NULL },
137    { "GL_ATI_texture_env_combine3",       NULL },
138    { "GL_ATI_texture_mirror_once",        NULL },
139    { "GL_MESA_pack_invert",               NULL },
140    { "GL_NV_blend_square",                NULL },
141    { "GL_SGIS_generate_mipmap",           NULL },
142    { NULL,                                NULL }
143};
144
145static const struct dri_extension blend_extensions[] = {
146    { "GL_EXT_blend_equation_separate",    GL_EXT_blend_equation_separate_functions },
147    { "GL_EXT_blend_func_separate",        GL_EXT_blend_func_separate_functions },
148    { NULL,                                NULL }
149};
150
151static const struct dri_extension ARB_vp_extension[] = {
152    { "GL_ARB_vertex_program",             GL_ARB_vertex_program_functions }
153};
154
155static const struct dri_extension NV_vp_extension[] = {
156    { "GL_NV_vertex_program",              GL_NV_vertex_program_functions }
157};
158
159static const struct dri_extension ATI_fs_extension[] = {
160    { "GL_ATI_fragment_shader",            GL_ATI_fragment_shader_functions }
161};
162
163static const struct dri_extension point_extensions[] = {
164    { "GL_ARB_point_sprite",               NULL },
165    { "GL_ARB_point_parameters",           GL_ARB_point_parameters_functions },
166    { NULL,                                NULL }
167};
168
169static const struct dri_extension mm_extensions[] = {
170  { "GL_EXT_framebuffer_object", GL_EXT_framebuffer_object_functions },
171  { NULL, NULL }
172};
173
174extern const struct tnl_pipeline_stage _r200_render_stage;
175extern const struct tnl_pipeline_stage _r200_tcl_stage;
176
177static const struct tnl_pipeline_stage *r200_pipeline[] = {
178
179   /* Try and go straight to t&l
180    */
181   &_r200_tcl_stage,
182
183   /* Catch any t&l fallbacks
184    */
185   &_tnl_vertex_transform_stage,
186   &_tnl_normal_transform_stage,
187   &_tnl_lighting_stage,
188   &_tnl_fog_coordinate_stage,
189   &_tnl_texgen_stage,
190   &_tnl_texture_transform_stage,
191   &_tnl_point_attenuation_stage,
192   &_tnl_vertex_program_stage,
193   /* Try again to go to tcl?
194    *     - no good for asymmetric-twoside (do with multipass)
195    *     - no good for asymmetric-unfilled (do with multipass)
196    *     - good for material
197    *     - good for texgen
198    *     - need to manipulate a bit of state
199    *
200    * - worth it/not worth it?
201    */
202
203   /* Else do them here.
204    */
205/*    &_r200_render_stage,  */ /* FIXME: bugs with ut2003 */
206   &_tnl_render_stage,		/* FALLBACK:  */
207   NULL,
208};
209
210
211
212/* Initialize the driver's misc functions.
213 */
214static void r200InitDriverFuncs( struct dd_function_table *functions )
215{
216    functions->GetBufferSize		= NULL; /* OBSOLETE */
217    functions->GetString		= r200GetString;
218}
219
220
221static void r200_get_lock(radeonContextPtr radeon)
222{
223   r200ContextPtr rmesa = (r200ContextPtr)radeon;
224   drm_radeon_sarea_t *sarea = radeon->sarea;
225
226   R200_STATECHANGE( rmesa, ctx );
227   if (rmesa->radeon.sarea->tiling_enabled) {
228      rmesa->hw.ctx.cmd[CTX_RB3D_COLORPITCH] |= R200_COLOR_TILE_ENABLE;
229   }
230   else rmesa->hw.ctx.cmd[CTX_RB3D_COLORPITCH] &= ~R200_COLOR_TILE_ENABLE;
231
232   if ( sarea->ctx_owner != rmesa->radeon.dri.hwContext ) {
233      sarea->ctx_owner = rmesa->radeon.dri.hwContext;
234      if (!radeon->radeonScreen->kernel_mm)
235         radeon_bo_legacy_texture_age(radeon->radeonScreen->bom);
236   }
237
238}
239
240static void r200_vtbl_emit_cs_header(struct radeon_cs *cs, radeonContextPtr rmesa)
241{
242}
243
244static void r200_emit_query_finish(radeonContextPtr radeon)
245{
246   BATCH_LOCALS(radeon);
247   struct radeon_query_object *query = radeon->query.current;
248
249   BEGIN_BATCH_NO_AUTOSTATE(4);
250   OUT_BATCH(CP_PACKET0(RADEON_RB3D_ZPASS_ADDR, 0));
251   OUT_BATCH_RELOC(0, query->bo, query->curr_offset, 0, RADEON_GEM_DOMAIN_GTT, 0);
252   END_BATCH();
253   query->curr_offset += sizeof(uint32_t);
254   assert(query->curr_offset < RADEON_QUERY_PAGE_SIZE);
255   query->emitted_begin = GL_FALSE;
256}
257
258static void r200_init_vtbl(radeonContextPtr radeon)
259{
260   radeon->vtbl.get_lock = r200_get_lock;
261   radeon->vtbl.update_viewport_offset = r200UpdateViewportOffset;
262   radeon->vtbl.emit_cs_header = r200_vtbl_emit_cs_header;
263   radeon->vtbl.swtcl_flush = r200_swtcl_flush;
264   radeon->vtbl.fallback = r200Fallback;
265   radeon->vtbl.update_scissor = r200_vtbl_update_scissor;
266   radeon->vtbl.emit_query_finish = r200_emit_query_finish;
267   radeon->vtbl.blit = r200_blit;
268}
269
270
271/* Create the device specific rendering context.
272 */
273GLboolean r200CreateContext( const __GLcontextModes *glVisual,
274			     __DRIcontext *driContextPriv,
275			     void *sharedContextPrivate)
276{
277   __DRIscreen *sPriv = driContextPriv->driScreenPriv;
278   radeonScreenPtr screen = (radeonScreenPtr)(sPriv->private);
279   struct dd_function_table functions;
280   r200ContextPtr rmesa;
281   GLcontext *ctx;
282   int i;
283   int tcl_mode;
284
285   assert(glVisual);
286   assert(driContextPriv);
287   assert(screen);
288
289   /* Allocate the R200 context */
290   rmesa = (r200ContextPtr) CALLOC( sizeof(*rmesa) );
291   if ( !rmesa )
292      return GL_FALSE;
293
294   rmesa->radeon.radeonScreen = screen;
295   r200_init_vtbl(&rmesa->radeon);
296   /* init exp fog table data */
297   r200InitStaticFogData();
298
299   /* Parse configuration files.
300    * Do this here so that initialMaxAnisotropy is set before we create
301    * the default textures.
302    */
303   driParseConfigFiles (&rmesa->radeon.optionCache, &screen->optionCache,
304			screen->driScreen->myNum, "r200");
305   rmesa->radeon.initialMaxAnisotropy = driQueryOptionf(&rmesa->radeon.optionCache,
306							"def_max_anisotropy");
307
308   if ( sPriv->drm_version.major == 1
309       && driQueryOptionb( &rmesa->radeon.optionCache, "hyperz" ) ) {
310      if ( sPriv->drm_version.minor < 13 )
311	 fprintf( stderr, "DRM version 1.%d too old to support HyperZ, "
312			  "disabling.\n", sPriv->drm_version.minor );
313      else
314	 rmesa->using_hyperz = GL_TRUE;
315   }
316
317   if ( sPriv->drm_version.minor >= 15 )
318      rmesa->texmicrotile = GL_TRUE;
319
320   /* Init default driver functions then plug in our R200-specific functions
321    * (the texture functions are especially important)
322    */
323   _mesa_init_driver_functions(&functions);
324   r200InitDriverFuncs(&functions);
325   r200InitIoctlFuncs(&functions);
326   r200InitStateFuncs(&functions);
327   r200InitTextureFuncs(&rmesa->radeon, &functions);
328   r200InitShaderFuncs(&functions);
329   radeonInitQueryObjFunctions(&functions);
330
331   if (!radeonInitContext(&rmesa->radeon, &functions,
332			  glVisual, driContextPriv,
333			  sharedContextPrivate)) {
334     FREE(rmesa);
335     return GL_FALSE;
336   }
337
338   rmesa->radeon.swtcl.RenderIndex = ~0;
339   rmesa->radeon.hw.all_dirty = 1;
340
341   /* Set the maximum texture size small enough that we can guarentee that
342    * all texture units can bind a maximal texture and have all of them in
343    * texturable memory at once. Depending on the allow_large_textures driconf
344    * setting allow larger textures.
345    */
346
347   ctx = rmesa->radeon.glCtx;
348   ctx->Const.MaxTextureUnits = driQueryOptioni (&rmesa->radeon.optionCache,
349						 "texture_units");
350   ctx->Const.MaxTextureImageUnits = ctx->Const.MaxTextureUnits;
351   ctx->Const.MaxTextureCoordUnits = ctx->Const.MaxTextureUnits;
352
353   i = driQueryOptioni( &rmesa->radeon.optionCache, "allow_large_textures");
354
355   /* FIXME: When no memory manager is available we should set this
356    * to some reasonable value based on texture memory pool size */
357   ctx->Const.MaxTextureLevels = 12;
358   ctx->Const.Max3DTextureLevels = 9;
359   ctx->Const.MaxCubeTextureLevels = 12;
360   ctx->Const.MaxTextureRectSize = 2048;
361
362   ctx->Const.MaxTextureMaxAnisotropy = 16.0;
363
364   /* No wide AA points.
365    */
366   ctx->Const.MinPointSize = 1.0;
367   ctx->Const.MinPointSizeAA = 1.0;
368   ctx->Const.MaxPointSizeAA = 1.0;
369   ctx->Const.PointSizeGranularity = 0.0625;
370   if (rmesa->radeon.radeonScreen->drmSupportsPointSprites)
371      ctx->Const.MaxPointSize = 2047.0;
372   else
373      ctx->Const.MaxPointSize = 1.0;
374
375   /* mesa initialization problem - _mesa_init_point was already called */
376   ctx->Point.MaxSize = ctx->Const.MaxPointSize;
377
378   ctx->Const.MinLineWidth = 1.0;
379   ctx->Const.MinLineWidthAA = 1.0;
380   ctx->Const.MaxLineWidth = 10.0;
381   ctx->Const.MaxLineWidthAA = 10.0;
382   ctx->Const.LineWidthGranularity = 0.0625;
383
384   ctx->Const.VertexProgram.MaxNativeInstructions = R200_VSF_MAX_INST;
385   ctx->Const.VertexProgram.MaxNativeAttribs = 12;
386   ctx->Const.VertexProgram.MaxNativeTemps = R200_VSF_MAX_TEMPS;
387   ctx->Const.VertexProgram.MaxNativeParameters = R200_VSF_MAX_PARAM;
388   ctx->Const.VertexProgram.MaxNativeAddressRegs = 1;
389
390   ctx->Const.MaxDrawBuffers = 1;
391
392   _mesa_set_mvp_with_dp4( ctx, GL_TRUE );
393
394   /* Initialize the software rasterizer and helper modules.
395    */
396   _swrast_CreateContext( ctx );
397   _vbo_CreateContext( ctx );
398   _tnl_CreateContext( ctx );
399   _swsetup_CreateContext( ctx );
400   _ae_create_context( ctx );
401
402   /* Install the customized pipeline:
403    */
404   _tnl_destroy_pipeline( ctx );
405   _tnl_install_pipeline( ctx, r200_pipeline );
406
407   /* Try and keep materials and vertices separate:
408    */
409/*    _tnl_isolate_materials( ctx, GL_TRUE ); */
410
411
412   /* Configure swrast and TNL to match hardware characteristics:
413    */
414   _swrast_allow_pixel_fog( ctx, GL_FALSE );
415   _swrast_allow_vertex_fog( ctx, GL_TRUE );
416   _tnl_allow_pixel_fog( ctx, GL_FALSE );
417   _tnl_allow_vertex_fog( ctx, GL_TRUE );
418
419
420   for ( i = 0 ; i < R200_MAX_TEXTURE_UNITS ; i++ ) {
421      _math_matrix_ctr( &rmesa->TexGenMatrix[i] );
422      _math_matrix_set_identity( &rmesa->TexGenMatrix[i] );
423   }
424   _math_matrix_ctr( &rmesa->tmpmat );
425   _math_matrix_set_identity( &rmesa->tmpmat );
426
427   driInitExtensions( ctx, card_extensions, GL_TRUE );
428
429   if (rmesa->radeon.radeonScreen->kernel_mm)
430     driInitExtensions(ctx, mm_extensions, GL_FALSE);
431   if (!(rmesa->radeon.radeonScreen->chip_flags & R200_CHIPSET_YCBCR_BROKEN)) {
432     /* yuv textures don't work with some chips - R200 / rv280 okay so far
433	others get the bit ordering right but don't actually do YUV-RGB conversion */
434      _mesa_enable_extension( ctx, "GL_MESA_ycbcr_texture" );
435   }
436   if (rmesa->radeon.glCtx->Mesa_DXTn) {
437      _mesa_enable_extension( ctx, "GL_EXT_texture_compression_s3tc" );
438      _mesa_enable_extension( ctx, "GL_S3_s3tc" );
439   }
440   else if (driQueryOptionb (&rmesa->radeon.optionCache, "force_s3tc_enable")) {
441      _mesa_enable_extension( ctx, "GL_EXT_texture_compression_s3tc" );
442   }
443
444   if (rmesa->radeon.radeonScreen->drmSupportsCubeMapsR200)
445      _mesa_enable_extension( ctx, "GL_ARB_texture_cube_map" );
446   if (rmesa->radeon.radeonScreen->drmSupportsBlendColor) {
447       driInitExtensions( ctx, blend_extensions, GL_FALSE );
448   }
449   if(rmesa->radeon.radeonScreen->drmSupportsVertexProgram)
450      driInitSingleExtension( ctx, ARB_vp_extension );
451   if(driQueryOptionb(&rmesa->radeon.optionCache, "nv_vertex_program"))
452      driInitSingleExtension( ctx, NV_vp_extension );
453
454   if ((ctx->Const.MaxTextureUnits == 6) && rmesa->radeon.radeonScreen->drmSupportsFragShader)
455      driInitSingleExtension( ctx, ATI_fs_extension );
456   if (rmesa->radeon.radeonScreen->drmSupportsPointSprites)
457      driInitExtensions( ctx, point_extensions, GL_FALSE );
458
459   if (!rmesa->radeon.radeonScreen->kernel_mm)
460      _mesa_disable_extension(ctx, "GL_ARB_occlusion_query");
461#if 0
462   r200InitDriverFuncs( ctx );
463   r200InitIoctlFuncs( ctx );
464   r200InitStateFuncs( ctx );
465   r200InitTextureFuncs( ctx );
466#endif
467   /* plug in a few more device driver functions */
468   /* XXX these should really go right after _mesa_init_driver_functions() */
469   radeon_fbo_init(&rmesa->radeon);
470   radeonInitSpanFuncs( ctx );
471   r200InitPixelFuncs( ctx );
472   r200InitTnlFuncs( ctx );
473   r200InitState( rmesa );
474   r200InitSwtcl( ctx );
475
476   rmesa->prefer_gart_client_texturing =
477      (getenv("R200_GART_CLIENT_TEXTURES") != 0);
478
479   tcl_mode = driQueryOptioni(&rmesa->radeon.optionCache, "tcl_mode");
480   if (driQueryOptionb(&rmesa->radeon.optionCache, "no_rast")) {
481      fprintf(stderr, "disabling 3D acceleration\n");
482      FALLBACK(rmesa, R200_FALLBACK_DISABLE, 1);
483   }
484   else if (tcl_mode == DRI_CONF_TCL_SW || getenv("R200_NO_TCL") ||
485	    !(rmesa->radeon.radeonScreen->chip_flags & RADEON_CHIPSET_TCL)) {
486      if (rmesa->radeon.radeonScreen->chip_flags & RADEON_CHIPSET_TCL) {
487	 rmesa->radeon.radeonScreen->chip_flags &= ~RADEON_CHIPSET_TCL;
488	 fprintf(stderr, "Disabling HW TCL support\n");
489      }
490      TCL_FALLBACK(rmesa->radeon.glCtx, R200_TCL_FALLBACK_TCL_DISABLE, 1);
491   }
492
493   return GL_TRUE;
494}
495
496
497void r200DestroyContext( __DRIcontext *driContextPriv )
498{
499	int i;
500	r200ContextPtr rmesa = (r200ContextPtr)driContextPriv->driverPrivate;
501	if (rmesa)
502	{
503		for ( i = 0 ; i < R200_MAX_TEXTURE_UNITS ; i++ ) {
504			_math_matrix_dtr( &rmesa->TexGenMatrix[i] );
505		}
506	}
507	radeonDestroyContext(driContextPriv);
508}
509