src/mesa/drivers/dri/r200/r200_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  */
  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  */
  84 static 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  */
 114 static 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
 145 static 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
 151 static const struct dri_extension ARB_vp_extension[] = {
 152     { "GL_ARB_vertex_program",             GL_ARB_vertex_program_functions }
 153 };
 154
 155 static const struct dri_extension NV_vp_extension[] = {
 156     { "GL_NV_vertex_program",              GL_NV_vertex_program_functions }
 157 };
 158
 159 static const struct dri_extension ATI_fs_extension[] = {
 160     { "GL_ATI_fragment_shader",            GL_ATI_fragment_shader_functions }
 161 };
 162
 163 static 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
 169 static const struct dri_extension mm_extensions[] = {
 170   { "GL_EXT_framebuffer_object", GL_EXT_framebuffer_object_functions },
 171   { NULL, NULL }
 172 };
 173
 174 extern const struct tnl_pipeline_stage _r200_render_stage;
 175 extern const struct tnl_pipeline_stage _r200_tcl_stage;
 176
 177 static 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  */
 214 static void r200InitDriverFuncs( struct dd_function_table *functions )
 215 {
 216     functions->GetBufferSize            = NULL; /* OBSOLETE */
 217     functions->GetString                = r200GetString;
 218 }
 219
 220
 221 static 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
 240 static void r200_vtbl_emit_cs_header(struct radeon_cs *cs, radeonContextPtr rmesa)
 241 {
 242 }
 243
 244 static 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
 258 static 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  */
 273 GLboolean 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    ctx->Const.MaxCombinedTextureImageUnits = ctx->Const.MaxTextureUnits;
 354
 355    i = driQueryOptioni( &rmesa->radeon.optionCache, "allow_large_textures");
 356
 357    /* FIXME: When no memory manager is available we should set this
 358     * to some reasonable value based on texture memory pool size */
 359    ctx->Const.MaxTextureLevels = 12;
 360    ctx->Const.Max3DTextureLevels = 9;
 361    ctx->Const.MaxCubeTextureLevels = 12;
 362    ctx->Const.MaxTextureRectSize = 2048;
 363    ctx->Const.MaxRenderbufferSize = 2048;
 364
 365    ctx->Const.MaxTextureMaxAnisotropy = 16.0;
 366
 367    /* No wide AA points.
 368     */
 369    ctx->Const.MinPointSize = 1.0;
 370    ctx->Const.MinPointSizeAA = 1.0;
 371    ctx->Const.MaxPointSizeAA = 1.0;
 372    ctx->Const.PointSizeGranularity = 0.0625;
 373    if (rmesa->radeon.radeonScreen->drmSupportsPointSprites)
 374       ctx->Const.MaxPointSize = 2047.0;
 375    else
 376       ctx->Const.MaxPointSize = 1.0;
 377
 378    /* mesa initialization problem - _mesa_init_point was already called */
 379    ctx->Point.MaxSize = ctx->Const.MaxPointSize;
 380
 381    ctx->Const.MinLineWidth = 1.0;
 382    ctx->Const.MinLineWidthAA = 1.0;
 383    ctx->Const.MaxLineWidth = 10.0;
 384    ctx->Const.MaxLineWidthAA = 10.0;
 385    ctx->Const.LineWidthGranularity = 0.0625;
 386
 387    ctx->Const.VertexProgram.MaxNativeInstructions = R200_VSF_MAX_INST;
 388    ctx->Const.VertexProgram.MaxNativeAttribs = 12;
 389    ctx->Const.VertexProgram.MaxNativeTemps = R200_VSF_MAX_TEMPS;
 390    ctx->Const.VertexProgram.MaxNativeParameters = R200_VSF_MAX_PARAM;
 391    ctx->Const.VertexProgram.MaxNativeAddressRegs = 1;
 392
 393    ctx->Const.MaxDrawBuffers = 1;
 394    ctx->Const.MaxColorAttachments = 1;
 395
 396    _mesa_set_mvp_with_dp4( ctx, GL_TRUE );
 397
 398    /* Initialize the software rasterizer and helper modules.
 399     */
 400    _swrast_CreateContext( ctx );
 401    _vbo_CreateContext( ctx );
 402    _tnl_CreateContext( ctx );
 403    _swsetup_CreateContext( ctx );
 404    _ae_create_context( ctx );
 405
 406    /* Install the customized pipeline:
 407     */
 408    _tnl_destroy_pipeline( ctx );
 409    _tnl_install_pipeline( ctx, r200_pipeline );
 410
 411    /* Try and keep materials and vertices separate:
 412     */
 413 /*    _tnl_isolate_materials( ctx, GL_TRUE ); */
 414
 415
 416    /* Configure swrast and TNL to match hardware characteristics:
 417     */
 418    _swrast_allow_pixel_fog( ctx, GL_FALSE );
 419    _swrast_allow_vertex_fog( ctx, GL_TRUE );
 420    _tnl_allow_pixel_fog( ctx, GL_FALSE );
 421    _tnl_allow_vertex_fog( ctx, GL_TRUE );
 422
 423
 424    for ( i = 0 ; i < R200_MAX_TEXTURE_UNITS ; i++ ) {
 425       _math_matrix_ctr( &rmesa->TexGenMatrix[i] );
 426       _math_matrix_set_identity( &rmesa->TexGenMatrix[i] );
 427    }
 428    _math_matrix_ctr( &rmesa->tmpmat );
 429    _math_matrix_set_identity( &rmesa->tmpmat );
 430
 431    driInitExtensions( ctx, card_extensions, GL_TRUE );
 432
 433    if (rmesa->radeon.radeonScreen->kernel_mm)
 434      driInitExtensions(ctx, mm_extensions, GL_FALSE);
 435    if (!(rmesa->radeon.radeonScreen->chip_flags & R200_CHIPSET_YCBCR_BROKEN)) {
 436      /* yuv textures don't work with some chips - R200 / rv280 okay so far
 437         others get the bit ordering right but don't actually do YUV-RGB conversion */
 438       _mesa_enable_extension( ctx, "GL_MESA_ycbcr_texture" );
 439    }
 440    if (rmesa->radeon.glCtx->Mesa_DXTn) {
 441       _mesa_enable_extension( ctx, "GL_EXT_texture_compression_s3tc" );
 442       _mesa_enable_extension( ctx, "GL_S3_s3tc" );
 443    }
 444    else if (driQueryOptionb (&rmesa->radeon.optionCache, "force_s3tc_enable")) {
 445       _mesa_enable_extension( ctx, "GL_EXT_texture_compression_s3tc" );
 446    }
 447
 448    if (rmesa->radeon.radeonScreen->drmSupportsCubeMapsR200)
 449       _mesa_enable_extension( ctx, "GL_ARB_texture_cube_map" );
 450    if (rmesa->radeon.radeonScreen->drmSupportsBlendColor) {
 451        driInitExtensions( ctx, blend_extensions, GL_FALSE );
 452    }
 453    if(rmesa->radeon.radeonScreen->drmSupportsVertexProgram)
 454       driInitSingleExtension( ctx, ARB_vp_extension );
 455    if(driQueryOptionb(&rmesa->radeon.optionCache, "nv_vertex_program"))
 456       driInitSingleExtension( ctx, NV_vp_extension );
 457
 458    if ((ctx->Const.MaxTextureUnits == 6) && rmesa->radeon.radeonScreen->drmSupportsFragShader)
 459       driInitSingleExtension( ctx, ATI_fs_extension );
 460    if (rmesa->radeon.radeonScreen->drmSupportsPointSprites)
 461       driInitExtensions( ctx, point_extensions, GL_FALSE );
 462
 463    if (!rmesa->radeon.radeonScreen->kernel_mm)
 464       _mesa_disable_extension(ctx, "GL_ARB_occlusion_query");
 465 #if 0
 466    r200InitDriverFuncs( ctx );
 467    r200InitIoctlFuncs( ctx );
 468    r200InitStateFuncs( ctx );
 469    r200InitTextureFuncs( ctx );
 470 #endif
 471    /* plug in a few more device driver functions */
 472    /* XXX these should really go right after _mesa_init_driver_functions() */
 473    radeon_fbo_init(&rmesa->radeon);
 474    radeonInitSpanFuncs( ctx );
 475    r200InitPixelFuncs( ctx );
 476    r200InitTnlFuncs( ctx );
 477    r200InitState( rmesa );
 478    r200InitSwtcl( ctx );
 479
 480    rmesa->prefer_gart_client_texturing =
 481       (getenv("R200_GART_CLIENT_TEXTURES") != 0);
 482
 483    tcl_mode = driQueryOptioni(&rmesa->radeon.optionCache, "tcl_mode");
 484    if (driQueryOptionb(&rmesa->radeon.optionCache, "no_rast")) {
 485       fprintf(stderr, "disabling 3D acceleration\n");
 486       FALLBACK(rmesa, R200_FALLBACK_DISABLE, 1);
 487    }
 488    else if (tcl_mode == DRI_CONF_TCL_SW || getenv("R200_NO_TCL") ||
 489             !(rmesa->radeon.radeonScreen->chip_flags & RADEON_CHIPSET_TCL)) {
 490       if (rmesa->radeon.radeonScreen->chip_flags & RADEON_CHIPSET_TCL) {
 491          rmesa->radeon.radeonScreen->chip_flags &= ~RADEON_CHIPSET_TCL;
 492          fprintf(stderr, "Disabling HW TCL support\n");
 493       }
 494       TCL_FALLBACK(rmesa->radeon.glCtx, R200_TCL_FALLBACK_TCL_DISABLE, 1);
 495    }
 496
 497    return GL_TRUE;
 498 }
 499
 500
 501 void r200DestroyContext( __DRIcontext *driContextPriv )
 502 {
 503         int i;
 504         r200ContextPtr rmesa = (r200ContextPtr)driContextPriv->driverPrivate;
 505         if (rmesa)
 506         {
 507                 for ( i = 0 ; i < R200_MAX_TEXTURE_UNITS ; i++ ) {
 508                         _math_matrix_dtr( &rmesa->TexGenMatrix[i] );
 509                 }
 510         }
 511         radeonDestroyContext(driContextPriv);
 512 }