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.check_blit = r200_check_blit;
 268    radeon->vtbl.blit = r200_blit;
 269 }
 270
 271
 272 /* Create the device specific rendering context.
 273  */
 274 GLboolean r200CreateContext( const __GLcontextModes *glVisual,
 275                              __DRIcontext *driContextPriv,
 276                              void *sharedContextPrivate)
 277 {
 278    __DRIscreen *sPriv = driContextPriv->driScreenPriv;
 279    radeonScreenPtr screen = (radeonScreenPtr)(sPriv->private);
 280    struct dd_function_table functions;
 281    r200ContextPtr rmesa;
 282    GLcontext *ctx;
 283    int i;
 284    int tcl_mode;
 285
 286    assert(glVisual);
 287    assert(driContextPriv);
 288    assert(screen);
 289
 290    /* Allocate the R200 context */
 291    rmesa = (r200ContextPtr) CALLOC( sizeof(*rmesa) );
 292    if ( !rmesa )
 293       return GL_FALSE;
 294
 295    rmesa->radeon.radeonScreen = screen;
 296    r200_init_vtbl(&rmesa->radeon);
 297    /* init exp fog table data */
 298    r200InitStaticFogData();
 299
 300    /* Parse configuration files.
 301     * Do this here so that initialMaxAnisotropy is set before we create
 302     * the default textures.
 303     */
 304    driParseConfigFiles (&rmesa->radeon.optionCache, &screen->optionCache,
 305                         screen->driScreen->myNum, "r200");
 306    rmesa->radeon.initialMaxAnisotropy = driQueryOptionf(&rmesa->radeon.optionCache,
 307                                                         "def_max_anisotropy");
 308
 309    if ( sPriv->drm_version.major == 1
 310        && driQueryOptionb( &rmesa->radeon.optionCache, "hyperz" ) ) {
 311       if ( sPriv->drm_version.minor < 13 )
 312          fprintf( stderr, "DRM version 1.%d too old to support HyperZ, "
 313                           "disabling.\n", sPriv->drm_version.minor );
 314       else
 315          rmesa->using_hyperz = GL_TRUE;
 316    }
 317
 318    if ( sPriv->drm_version.minor >= 15 )
 319       rmesa->texmicrotile = GL_TRUE;
 320
 321    /* Init default driver functions then plug in our R200-specific functions
 322     * (the texture functions are especially important)
 323     */
 324    _mesa_init_driver_functions(&functions);
 325    r200InitDriverFuncs(&functions);
 326    r200InitIoctlFuncs(&functions);
 327    r200InitStateFuncs(&functions);
 328    r200InitTextureFuncs(&rmesa->radeon, &functions);
 329    r200InitShaderFuncs(&functions);
 330    radeonInitQueryObjFunctions(&functions);
 331
 332    if (!radeonInitContext(&rmesa->radeon, &functions,
 333                           glVisual, driContextPriv,
 334                           sharedContextPrivate)) {
 335      FREE(rmesa);
 336      return GL_FALSE;
 337    }
 338
 339    rmesa->radeon.swtcl.RenderIndex = ~0;
 340    rmesa->radeon.hw.all_dirty = 1;
 341
 342    /* Set the maximum texture size small enough that we can guarentee that
 343     * all texture units can bind a maximal texture and have all of them in
 344     * texturable memory at once. Depending on the allow_large_textures driconf
 345     * setting allow larger textures.
 346     */
 347
 348    ctx = rmesa->radeon.glCtx;
 349    ctx->Const.MaxTextureUnits = driQueryOptioni (&rmesa->radeon.optionCache,
 350                                                  "texture_units");
 351    ctx->Const.MaxTextureImageUnits = ctx->Const.MaxTextureUnits;
 352    ctx->Const.MaxTextureCoordUnits = ctx->Const.MaxTextureUnits;
 353
 354    ctx->Const.MaxCombinedTextureImageUnits = ctx->Const.MaxTextureUnits;
 355
 356    i = driQueryOptioni( &rmesa->radeon.optionCache, "allow_large_textures");
 357
 358    /* FIXME: When no memory manager is available we should set this
 359     * to some reasonable value based on texture memory pool size */
 360    ctx->Const.MaxTextureLevels = 12;
 361    ctx->Const.Max3DTextureLevels = 9;
 362    ctx->Const.MaxCubeTextureLevels = 12;
 363    ctx->Const.MaxTextureRectSize = 2048;
 364    ctx->Const.MaxRenderbufferSize = 2048;
 365
 366    ctx->Const.MaxTextureMaxAnisotropy = 16.0;
 367
 368    /* No wide AA points.
 369     */
 370    ctx->Const.MinPointSize = 1.0;
 371    ctx->Const.MinPointSizeAA = 1.0;
 372    ctx->Const.MaxPointSizeAA = 1.0;
 373    ctx->Const.PointSizeGranularity = 0.0625;
 374    if (rmesa->radeon.radeonScreen->drmSupportsPointSprites)
 375       ctx->Const.MaxPointSize = 2047.0;
 376    else
 377       ctx->Const.MaxPointSize = 1.0;
 378
 379    /* mesa initialization problem - _mesa_init_point was already called */
 380    ctx->Point.MaxSize = ctx->Const.MaxPointSize;
 381
 382    ctx->Const.MinLineWidth = 1.0;
 383    ctx->Const.MinLineWidthAA = 1.0;
 384    ctx->Const.MaxLineWidth = 10.0;
 385    ctx->Const.MaxLineWidthAA = 10.0;
 386    ctx->Const.LineWidthGranularity = 0.0625;
 387
 388    ctx->Const.VertexProgram.MaxNativeInstructions = R200_VSF_MAX_INST;
 389    ctx->Const.VertexProgram.MaxNativeAttribs = 12;
 390    ctx->Const.VertexProgram.MaxNativeTemps = R200_VSF_MAX_TEMPS;
 391    ctx->Const.VertexProgram.MaxNativeParameters = R200_VSF_MAX_PARAM;
 392    ctx->Const.VertexProgram.MaxNativeAddressRegs = 1;
 393
 394    ctx->Const.MaxDrawBuffers = 1;
 395    ctx->Const.MaxColorAttachments = 1;
 396
 397    _mesa_set_mvp_with_dp4( ctx, GL_TRUE );
 398
 399    /* Initialize the software rasterizer and helper modules.
 400     */
 401    _swrast_CreateContext( ctx );
 402    _vbo_CreateContext( ctx );
 403    _tnl_CreateContext( ctx );
 404    _swsetup_CreateContext( ctx );
 405    _ae_create_context( ctx );
 406
 407    /* Install the customized pipeline:
 408     */
 409    _tnl_destroy_pipeline( ctx );
 410    _tnl_install_pipeline( ctx, r200_pipeline );
 411
 412    /* Try and keep materials and vertices separate:
 413     */
 414 /*    _tnl_isolate_materials( ctx, GL_TRUE ); */
 415
 416
 417    /* Configure swrast and TNL to match hardware characteristics:
 418     */
 419    _swrast_allow_pixel_fog( ctx, GL_FALSE );
 420    _swrast_allow_vertex_fog( ctx, GL_TRUE );
 421    _tnl_allow_pixel_fog( ctx, GL_FALSE );
 422    _tnl_allow_vertex_fog( ctx, GL_TRUE );
 423
 424
 425    for ( i = 0 ; i < R200_MAX_TEXTURE_UNITS ; i++ ) {
 426       _math_matrix_ctr( &rmesa->TexGenMatrix[i] );
 427       _math_matrix_set_identity( &rmesa->TexGenMatrix[i] );
 428    }
 429    _math_matrix_ctr( &rmesa->tmpmat );
 430    _math_matrix_set_identity( &rmesa->tmpmat );
 431
 432    driInitExtensions( ctx, card_extensions, GL_TRUE );
 433
 434    if (rmesa->radeon.radeonScreen->kernel_mm)
 435      driInitExtensions(ctx, mm_extensions, GL_FALSE);
 436    if (!(rmesa->radeon.radeonScreen->chip_flags & R200_CHIPSET_YCBCR_BROKEN)) {
 437      /* yuv textures don't work with some chips - R200 / rv280 okay so far
 438         others get the bit ordering right but don't actually do YUV-RGB conversion */
 439       _mesa_enable_extension( ctx, "GL_MESA_ycbcr_texture" );
 440    }
 441    if (rmesa->radeon.glCtx->Mesa_DXTn) {
 442       _mesa_enable_extension( ctx, "GL_EXT_texture_compression_s3tc" );
 443       _mesa_enable_extension( ctx, "GL_S3_s3tc" );
 444    }
 445    else if (driQueryOptionb (&rmesa->radeon.optionCache, "force_s3tc_enable")) {
 446       _mesa_enable_extension( ctx, "GL_EXT_texture_compression_s3tc" );
 447    }
 448
 449    if (rmesa->radeon.radeonScreen->drmSupportsCubeMapsR200)
 450       _mesa_enable_extension( ctx, "GL_ARB_texture_cube_map" );
 451    if (rmesa->radeon.radeonScreen->drmSupportsBlendColor) {
 452        driInitExtensions( ctx, blend_extensions, GL_FALSE );
 453    }
 454    if(rmesa->radeon.radeonScreen->drmSupportsVertexProgram)
 455       driInitSingleExtension( ctx, ARB_vp_extension );
 456    if(driQueryOptionb(&rmesa->radeon.optionCache, "nv_vertex_program"))
 457       driInitSingleExtension( ctx, NV_vp_extension );
 458
 459    if ((ctx->Const.MaxTextureUnits == 6) && rmesa->radeon.radeonScreen->drmSupportsFragShader)
 460       driInitSingleExtension( ctx, ATI_fs_extension );
 461    if (rmesa->radeon.radeonScreen->drmSupportsPointSprites)
 462       driInitExtensions( ctx, point_extensions, GL_FALSE );
 463
 464    if (!rmesa->radeon.radeonScreen->kernel_mm)
 465       _mesa_disable_extension(ctx, "GL_ARB_occlusion_query");
 466 #if 0
 467    r200InitDriverFuncs( ctx );
 468    r200InitIoctlFuncs( ctx );
 469    r200InitStateFuncs( ctx );
 470    r200InitTextureFuncs( ctx );
 471 #endif
 472    /* plug in a few more device driver functions */
 473    /* XXX these should really go right after _mesa_init_driver_functions() */
 474    radeon_fbo_init(&rmesa->radeon);
 475    radeonInitSpanFuncs( ctx );
 476    r200InitPixelFuncs( ctx );
 477    r200InitTnlFuncs( ctx );
 478    r200InitState( rmesa );
 479    r200InitSwtcl( ctx );
 480
 481    rmesa->prefer_gart_client_texturing =
 482       (getenv("R200_GART_CLIENT_TEXTURES") != 0);
 483
 484    tcl_mode = driQueryOptioni(&rmesa->radeon.optionCache, "tcl_mode");
 485    if (driQueryOptionb(&rmesa->radeon.optionCache, "no_rast")) {
 486       fprintf(stderr, "disabling 3D acceleration\n");
 487       FALLBACK(rmesa, R200_FALLBACK_DISABLE, 1);
 488    }
 489    else if (tcl_mode == DRI_CONF_TCL_SW || getenv("R200_NO_TCL") ||
 490             !(rmesa->radeon.radeonScreen->chip_flags & RADEON_CHIPSET_TCL)) {
 491       if (rmesa->radeon.radeonScreen->chip_flags & RADEON_CHIPSET_TCL) {
 492          rmesa->radeon.radeonScreen->chip_flags &= ~RADEON_CHIPSET_TCL;
 493          fprintf(stderr, "Disabling HW TCL support\n");
 494       }
 495       TCL_FALLBACK(rmesa->radeon.glCtx, R200_TCL_FALLBACK_TCL_DISABLE, 1);
 496    }
 497
 498    return GL_TRUE;
 499 }
 500
 501
 502 void r200DestroyContext( __DRIcontext *driContextPriv )
 503 {
 504         int i;
 505         r200ContextPtr rmesa = (r200ContextPtr)driContextPriv->driverPrivate;
 506         if (rmesa)
 507         {
 508                 for ( i = 0 ; i < R200_MAX_TEXTURE_UNITS ; i++ ) {
 509                         _math_matrix_dtr( &rmesa->TexGenMatrix[i] );
 510                 }
 511         }
 512         radeonDestroyContext(driContextPriv);
 513 }