src/mesa/drivers/dri/r200/r200_context.c

   1 /* $XFree86: xc/lib/GL/mesa/src/drv/r200/r200_context.c,v 1.3 2003/05/06 23:52:08 daenzer Exp $ */
   2 /*
   3 Copyright (C) The Weather Channel, Inc.  2002.  All Rights Reserved.
   4
   5 The Weather Channel (TM) funded Tungsten Graphics to develop the
   6 initial release of the Radeon 8500 driver under the XFree86 license.
   7 This notice must be preserved.
   8
   9 Permission is hereby granted, free of charge, to any person obtaining
  10 a copy of this software and associated documentation files (the
  11 "Software"), to deal in the Software without restriction, including
  12 without limitation the rights to use, copy, modify, merge, publish,
  13 distribute, sublicense, and/or sell copies of the Software, and to
  14 permit persons to whom the Software is furnished to do so, subject to
  15 the following conditions:
  16
  17 The above copyright notice and this permission notice (including the
  18 next paragraph) shall be included in all copies or substantial
  19 portions of the Software.
  20
  21 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  22 EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  23 MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
  24 IN NO EVENT SHALL THE COPYRIGHT OWNER(S) AND/OR ITS SUPPLIERS BE
  25 LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  26 OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  27 WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  28
  29 **************************************************************************/
  30
  31 /*
  32  * Authors:
  33  *   Keith Whitwell <keith@tungstengraphics.com>
  34  */
  35
  36 #include "glheader.h"
  37 #include "api_arrayelt.h"
  38 #include "context.h"
  39 #include "simple_list.h"
  40 #include "imports.h"
  41 #include "matrix.h"
  42 #include "extensions.h"
  43 #include "framebuffer.h"
  44 #include "state.h"
  45
  46 #include "swrast/swrast.h"
  47 #include "swrast_setup/swrast_setup.h"
  48 #include "array_cache/acache.h"
  49
  50 #include "tnl/tnl.h"
  51 #include "tnl/t_pipeline.h"
  52
  53 #include "drivers/common/driverfuncs.h"
  54
  55 #include "r200_context.h"
  56 #include "r200_ioctl.h"
  57 #include "r200_state.h"
  58 #include "r200_span.h"
  59 #include "r200_pixel.h"
  60 #include "r200_tex.h"
  61 #include "r200_swtcl.h"
  62 #include "r200_tcl.h"
  63 #include "r200_vtxfmt.h"
  64 #include "r200_maos.h"
  65 #include "r200_vertprog.h"
  66
  67 #define need_GL_ARB_multisample
  68 #define need_GL_ARB_texture_compression
  69 #define need_GL_ARB_vertex_buffer_object
  70 #define need_GL_ARB_vertex_program
  71 #define need_GL_ATI_fragment_shader
  72 #define need_GL_EXT_blend_minmax
  73 #define need_GL_EXT_fog_coord
  74 #define need_GL_EXT_secondary_color
  75 #define need_GL_EXT_blend_equation_separate
  76 #define need_GL_EXT_blend_func_separate
  77 #define need_GL_NV_vertex_program
  78 #include "extension_helper.h"
  79
  80 #define DRIVER_DATE     "20060602"
  81
  82 #include "vblank.h"
  83 #include "utils.h"
  84 #include "xmlpool.h" /* for symbolic values of enum-type options */
  85 #ifndef R200_DEBUG
  86 int R200_DEBUG = (0);
  87 #endif
  88
  89
  90 /* Return the width and height of the given buffer.
  91  */
  92 static void r200GetBufferSize( GLframebuffer *buffer,
  93                                GLuint *width, GLuint *height )
  94 {
  95    GET_CURRENT_CONTEXT(ctx);
  96    r200ContextPtr rmesa = R200_CONTEXT(ctx);
  97
  98    LOCK_HARDWARE( rmesa );
  99    *width  = rmesa->dri.drawable->w;
 100    *height = rmesa->dri.drawable->h;
 101    UNLOCK_HARDWARE( rmesa );
 102 }
 103
 104 /* Return various strings for glGetString().
 105  */
 106 static const GLubyte *r200GetString( GLcontext *ctx, GLenum name )
 107 {
 108    r200ContextPtr rmesa = R200_CONTEXT(ctx);
 109    static char buffer[128];
 110    unsigned   offset;
 111    GLuint agp_mode = (rmesa->r200Screen->card_type == RADEON_CARD_PCI)? 0 :
 112       rmesa->r200Screen->AGPMode;
 113
 114    switch ( name ) {
 115    case GL_VENDOR:
 116       return (GLubyte *)"Tungsten Graphics, Inc.";
 117
 118    case GL_RENDERER:
 119       offset = driGetRendererString( buffer, "R200", DRIVER_DATE,
 120                                      agp_mode );
 121
 122       sprintf( & buffer[ offset ], " %sTCL",
 123                !(rmesa->TclFallback & R200_TCL_FALLBACK_TCL_DISABLE)
 124                ? "" : "NO-" );
 125
 126       return (GLubyte *)buffer;
 127
 128    default:
 129       return NULL;
 130    }
 131 }
 132
 133
 134 /* Extension strings exported by the R200 driver.
 135  */
 136 const struct dri_extension card_extensions[] =
 137 {
 138     { "GL_ARB_multisample",                GL_ARB_multisample_functions },
 139     { "GL_ARB_multitexture",               NULL },
 140     { "GL_ARB_texture_border_clamp",       NULL },
 141     { "GL_ARB_texture_compression",        GL_ARB_texture_compression_functions },
 142     { "GL_ARB_texture_env_add",            NULL },
 143     { "GL_ARB_texture_env_combine",        NULL },
 144     { "GL_ARB_texture_env_dot3",           NULL },
 145     { "GL_ARB_texture_env_crossbar",       NULL },
 146     { "GL_ARB_texture_mirrored_repeat",    NULL },
 147     { "GL_ARB_vertex_buffer_object",       GL_ARB_vertex_buffer_object_functions },
 148     { "GL_EXT_blend_minmax",               GL_EXT_blend_minmax_functions },
 149     { "GL_EXT_blend_subtract",             NULL },
 150     { "GL_EXT_fog_coord",                  GL_EXT_fog_coord_functions },
 151     { "GL_EXT_secondary_color",            GL_EXT_secondary_color_functions },
 152     { "GL_EXT_stencil_wrap",               NULL },
 153     { "GL_EXT_texture_edge_clamp",         NULL },
 154     { "GL_EXT_texture_env_combine",        NULL },
 155     { "GL_EXT_texture_env_dot3",           NULL },
 156     { "GL_EXT_texture_filter_anisotropic", NULL },
 157     { "GL_EXT_texture_lod_bias",           NULL },
 158     { "GL_EXT_texture_mirror_clamp",       NULL },
 159     { "GL_EXT_texture_rectangle",          NULL },
 160     { "GL_ATI_texture_env_combine3",       NULL },
 161     { "GL_ATI_texture_mirror_once",        NULL },
 162     { "GL_MESA_pack_invert",               NULL },
 163     { "GL_NV_blend_square",                NULL },
 164     { "GL_SGIS_generate_mipmap",           NULL },
 165     { NULL,                                NULL }
 166 };
 167
 168 const struct dri_extension blend_extensions[] = {
 169     { "GL_EXT_blend_equation_separate",    GL_EXT_blend_equation_separate_functions },
 170     { "GL_EXT_blend_func_separate",        GL_EXT_blend_func_separate_functions },
 171     { NULL,                                NULL }
 172 };
 173
 174 const struct dri_extension ARB_vp_extension[] = {
 175     { "GL_ARB_vertex_program",             GL_ARB_vertex_program_functions }
 176 };
 177
 178 const struct dri_extension NV_vp_extension[] = {
 179     { "GL_NV_vertex_program",              GL_NV_vertex_program_functions }
 180 };
 181
 182 const struct dri_extension ATI_fs_extension[] = {
 183     { "GL_ATI_fragment_shader",            GL_ATI_fragment_shader_functions }
 184 };
 185
 186 extern const struct tnl_pipeline_stage _r200_render_stage;
 187 extern const struct tnl_pipeline_stage _r200_tcl_stage;
 188
 189 static const struct tnl_pipeline_stage *r200_pipeline[] = {
 190
 191    /* Try and go straight to t&l
 192     */
 193    &_r200_tcl_stage,
 194
 195    /* Catch any t&l fallbacks
 196     */
 197    &_tnl_vertex_transform_stage,
 198    &_tnl_normal_transform_stage,
 199    &_tnl_lighting_stage,
 200    &_tnl_fog_coordinate_stage,
 201    &_tnl_texgen_stage,
 202    &_tnl_texture_transform_stage,
 203    &_tnl_arb_vertex_program_stage,
 204    &_tnl_vertex_program_stage,
 205
 206    /* Try again to go to tcl?
 207     *     - no good for asymmetric-twoside (do with multipass)
 208     *     - no good for asymmetric-unfilled (do with multipass)
 209     *     - good for material
 210     *     - good for texgen
 211     *     - need to manipulate a bit of state
 212     *
 213     * - worth it/not worth it?
 214     */
 215
 216    /* Else do them here.
 217     */
 218 /*    &_r200_render_stage,  */ /* FIXME: bugs with ut2003 */
 219    &_tnl_render_stage,          /* FALLBACK:  */
 220    NULL,
 221 };
 222
 223
 224
 225 /* Initialize the driver's misc functions.
 226  */
 227 static void r200InitDriverFuncs( struct dd_function_table *functions )
 228 {
 229     functions->GetBufferSize            = r200GetBufferSize;
 230     functions->ResizeBuffers            = _mesa_resize_framebuffer;
 231     functions->GetString                = r200GetString;
 232
 233     functions->Error                    = NULL;
 234     functions->DrawPixels               = NULL;
 235     functions->Bitmap                   = NULL;
 236 }
 237
 238 static const struct dri_debug_control debug_control[] =
 239 {
 240     { "fall",  DEBUG_FALLBACKS },
 241     { "tex",   DEBUG_TEXTURE },
 242     { "ioctl", DEBUG_IOCTL },
 243     { "prim",  DEBUG_PRIMS },
 244     { "vert",  DEBUG_VERTS },
 245     { "state", DEBUG_STATE },
 246     { "code",  DEBUG_CODEGEN },
 247     { "vfmt",  DEBUG_VFMT },
 248     { "vtxf",  DEBUG_VFMT },
 249     { "verb",  DEBUG_VERBOSE },
 250     { "dri",   DEBUG_DRI },
 251     { "dma",   DEBUG_DMA },
 252     { "san",   DEBUG_SANITY },
 253     { "sync",  DEBUG_SYNC },
 254     { "pix",   DEBUG_PIXEL },
 255     { "mem",   DEBUG_MEMORY },
 256     { NULL,    0 }
 257 };
 258
 259
 260 /* Create the device specific rendering context.
 261  */
 262 GLboolean r200CreateContext( const __GLcontextModes *glVisual,
 263                              __DRIcontextPrivate *driContextPriv,
 264                              void *sharedContextPrivate)
 265 {
 266    __DRIscreenPrivate *sPriv = driContextPriv->driScreenPriv;
 267    radeonScreenPtr screen = (radeonScreenPtr)(sPriv->private);
 268    struct dd_function_table functions;
 269    r200ContextPtr rmesa;
 270    GLcontext *ctx, *shareCtx;
 271    int i;
 272    int tcl_mode, fthrottle_mode;
 273
 274    assert(glVisual);
 275    assert(driContextPriv);
 276    assert(screen);
 277
 278    /* Allocate the R200 context */
 279    rmesa = (r200ContextPtr) CALLOC( sizeof(*rmesa) );
 280    if ( !rmesa )
 281       return GL_FALSE;
 282
 283    /* init exp fog table data */
 284    r200InitStaticFogData();
 285
 286    /* Parse configuration files.
 287     * Do this here so that initialMaxAnisotropy is set before we create
 288     * the default textures.
 289     */
 290    driParseConfigFiles (&rmesa->optionCache, &screen->optionCache,
 291                         screen->driScreen->myNum, "r200");
 292    rmesa->initialMaxAnisotropy = driQueryOptionf(&rmesa->optionCache,
 293                                                  "def_max_anisotropy");
 294
 295    if ( driQueryOptionb( &rmesa->optionCache, "hyperz" ) ) {
 296       if ( sPriv->drmMinor < 13 )
 297          fprintf( stderr, "DRM version 1.%d too old to support HyperZ, "
 298                           "disabling.\n",sPriv->drmMinor );
 299       else
 300          rmesa->using_hyperz = GL_TRUE;
 301    }
 302
 303    if ( sPriv->drmMinor >= 15 )
 304       rmesa->texmicrotile = GL_TRUE;
 305
 306    /* Init default driver functions then plug in our R200-specific functions
 307     * (the texture functions are especially important)
 308     */
 309    _mesa_init_driver_functions(&functions);
 310    r200InitDriverFuncs(&functions);
 311    r200InitIoctlFuncs(&functions);
 312    r200InitStateFuncs(&functions);
 313    r200InitTextureFuncs(&functions);
 314    r200InitShaderFuncs(&functions);
 315
 316    /* Allocate and initialize the Mesa context */
 317    if (sharedContextPrivate)
 318       shareCtx = ((r200ContextPtr) sharedContextPrivate)->glCtx;
 319    else
 320       shareCtx = NULL;
 321    rmesa->glCtx = _mesa_create_context(glVisual, shareCtx,
 322                                        &functions, (void *) rmesa);
 323    if (!rmesa->glCtx) {
 324       FREE(rmesa);
 325       return GL_FALSE;
 326    }
 327    driContextPriv->driverPrivate = rmesa;
 328
 329    /* Init r200 context data */
 330    rmesa->dri.context = driContextPriv;
 331    rmesa->dri.screen = sPriv;
 332    rmesa->dri.drawable = NULL; /* Set by XMesaMakeCurrent */
 333    rmesa->dri.hwContext = driContextPriv->hHWContext;
 334    rmesa->dri.hwLock = &sPriv->pSAREA->lock;
 335    rmesa->dri.fd = sPriv->fd;
 336    rmesa->dri.drmMinor = sPriv->drmMinor;
 337
 338    rmesa->r200Screen = screen;
 339    rmesa->sarea = (drm_radeon_sarea_t *)((GLubyte *)sPriv->pSAREA +
 340                                        screen->sarea_priv_offset);
 341
 342
 343    rmesa->dma.buf0_address = rmesa->r200Screen->buffers->list[0].address;
 344
 345    (void) memset( rmesa->texture_heaps, 0, sizeof( rmesa->texture_heaps ) );
 346    make_empty_list( & rmesa->swapped );
 347
 348    rmesa->nr_heaps = 1 /* screen->numTexHeaps */ ;
 349    assert(rmesa->nr_heaps < RADEON_NR_TEX_HEAPS);
 350    for ( i = 0 ; i < rmesa->nr_heaps ; i++ ) {
 351       rmesa->texture_heaps[i] = driCreateTextureHeap( i, rmesa,
 352             screen->texSize[i],
 353             12,
 354             RADEON_NR_TEX_REGIONS,
 355             (drmTextureRegionPtr)rmesa->sarea->tex_list[i],
 356             & rmesa->sarea->tex_age[i],
 357             & rmesa->swapped,
 358             sizeof( r200TexObj ),
 359             (destroy_texture_object_t *) r200DestroyTexObj );
 360    }
 361    rmesa->texture_depth = driQueryOptioni (&rmesa->optionCache,
 362                                            "texture_depth");
 363    if (rmesa->texture_depth == DRI_CONF_TEXTURE_DEPTH_FB)
 364       rmesa->texture_depth = ( screen->cpp == 4 ) ?
 365          DRI_CONF_TEXTURE_DEPTH_32 : DRI_CONF_TEXTURE_DEPTH_16;
 366
 367    rmesa->swtcl.RenderIndex = ~0;
 368    rmesa->hw.all_dirty = 1;
 369
 370    /* Set the maximum texture size small enough that we can guarentee that
 371     * all texture units can bind a maximal texture and have all of them in
 372     * texturable memory at once. Depending on the allow_large_textures driconf
 373     * setting allow larger textures.
 374     */
 375
 376    ctx = rmesa->glCtx;
 377    ctx->Const.MaxTextureUnits = driQueryOptioni (&rmesa->optionCache,
 378                                                  "texture_units");
 379    ctx->Const.MaxTextureImageUnits = ctx->Const.MaxTextureUnits;
 380    ctx->Const.MaxTextureCoordUnits = ctx->Const.MaxTextureUnits;
 381
 382    i = driQueryOptioni( &rmesa->optionCache, "allow_large_textures");
 383
 384    driCalculateMaxTextureLevels( rmesa->texture_heaps,
 385                                  rmesa->nr_heaps,
 386                                  & ctx->Const,
 387                                  4,
 388                                  11, /* max 2D texture size is 2048x2048 */
 389 #if ENABLE_HW_3D_TEXTURE
 390                                  8,  /* max 3D texture size is 256^3 */
 391 #else
 392                                  0,  /* 3D textures unsupported */
 393 #endif
 394                                  11, /* max cube texture size is 2048x2048 */
 395                                  11, /* max texture rectangle size is 2048x2048 */
 396                                  12,
 397                                  GL_FALSE,
 398                                  i );
 399
 400    ctx->Const.MaxTextureMaxAnisotropy = 16.0;
 401
 402    /* No wide AA points.
 403     */
 404    ctx->Const.MinPointSize = 1.0;
 405    ctx->Const.MinPointSizeAA = 1.0;
 406    ctx->Const.MaxPointSizeAA = 1.0;
 407    ctx->Const.PointSizeGranularity = 0.0625;
 408    if (rmesa->r200Screen->drmSupportsPointSprites)
 409       ctx->Const.MaxPointSize = 2047.0;
 410    else
 411       ctx->Const.MaxPointSize = 1.0;
 412
 413    /* mesa initialization problem - _mesa_init_point was already called */
 414    ctx->Point.MaxSize = ctx->Const.MaxPointSize;
 415
 416    ctx->Const.MinLineWidth = 1.0;
 417    ctx->Const.MinLineWidthAA = 1.0;
 418    ctx->Const.MaxLineWidth = 10.0;
 419    ctx->Const.MaxLineWidthAA = 10.0;
 420    ctx->Const.LineWidthGranularity = 0.0625;
 421
 422    ctx->Const.VertexProgram.MaxNativeInstructions = R200_VSF_MAX_INST;
 423    ctx->Const.VertexProgram.MaxNativeAttribs = 12;
 424    ctx->Const.VertexProgram.MaxNativeTemps = R200_VSF_MAX_TEMPS;
 425    ctx->Const.VertexProgram.MaxNativeParameters = R200_VSF_MAX_PARAM;
 426    ctx->Const.VertexProgram.MaxNativeAddressRegs = 1;
 427
 428    /* Initialize the software rasterizer and helper modules.
 429     */
 430    _swrast_CreateContext( ctx );
 431    _ac_CreateContext( ctx );
 432    _tnl_CreateContext( ctx );
 433    _swsetup_CreateContext( ctx );
 434    _ae_create_context( ctx );
 435
 436    /* Install the customized pipeline:
 437     */
 438    _tnl_destroy_pipeline( ctx );
 439    _tnl_install_pipeline( ctx, r200_pipeline );
 440    ctx->Driver.FlushVertices = r200FlushVertices;
 441
 442    /* Try and keep materials and vertices separate:
 443     */
 444    _tnl_isolate_materials( ctx, GL_TRUE );
 445
 446
 447    /* Configure swrast and TNL to match hardware characteristics:
 448     */
 449    _swrast_allow_pixel_fog( ctx, GL_FALSE );
 450    _swrast_allow_vertex_fog( ctx, GL_TRUE );
 451    _tnl_allow_pixel_fog( ctx, GL_FALSE );
 452    _tnl_allow_vertex_fog( ctx, GL_TRUE );
 453
 454
 455    for ( i = 0 ; i < R200_MAX_TEXTURE_UNITS ; i++ ) {
 456       _math_matrix_ctr( &rmesa->TexGenMatrix[i] );
 457       _math_matrix_set_identity( &rmesa->TexGenMatrix[i] );
 458    }
 459    _math_matrix_ctr( &rmesa->tmpmat );
 460    _math_matrix_set_identity( &rmesa->tmpmat );
 461
 462    driInitExtensions( ctx, card_extensions, GL_TRUE );
 463    if (!(rmesa->r200Screen->chip_flags & R200_CHIPSET_YCBCR_BROKEN)) {
 464      /* yuv textures don't work with some chips - R200 / rv280 okay so far
 465         others get the bit ordering right but don't actually do YUV-RGB conversion */
 466       _mesa_enable_extension( ctx, "GL_MESA_ycbcr_texture" );
 467    }
 468    if (rmesa->glCtx->Mesa_DXTn) {
 469       _mesa_enable_extension( ctx, "GL_EXT_texture_compression_s3tc" );
 470       _mesa_enable_extension( ctx, "GL_S3_s3tc" );
 471    }
 472    else if (driQueryOptionb (&rmesa->optionCache, "force_s3tc_enable")) {
 473       _mesa_enable_extension( ctx, "GL_EXT_texture_compression_s3tc" );
 474    }
 475
 476    if (rmesa->r200Screen->drmSupportsCubeMapsR200)
 477       _mesa_enable_extension( ctx, "GL_ARB_texture_cube_map" );
 478    if (rmesa->r200Screen->drmSupportsBlendColor) {
 479        driInitExtensions( ctx, blend_extensions, GL_FALSE );
 480    }
 481    if(rmesa->r200Screen->drmSupportsVertexProgram)
 482       driInitSingleExtension( ctx, ARB_vp_extension );
 483    if(driQueryOptionb(&rmesa->optionCache, "nv_vertex_program"))
 484       driInitSingleExtension( ctx, NV_vp_extension );
 485
 486    if ((ctx->Const.MaxTextureUnits == 6) && rmesa->r200Screen->drmSupportsFragShader)
 487       driInitSingleExtension( ctx, ATI_fs_extension );
 488 #if 0
 489    r200InitDriverFuncs( ctx );
 490    r200InitIoctlFuncs( ctx );
 491    r200InitStateFuncs( ctx );
 492    r200InitTextureFuncs( ctx );
 493 #endif
 494    /* plug in a few more device driver functions */
 495    /* XXX these should really go right after _mesa_init_driver_functions() */
 496    r200InitPixelFuncs( ctx );
 497    r200InitSpanFuncs( ctx );
 498    r200InitTnlFuncs( ctx );
 499    r200InitState( rmesa );
 500    r200InitSwtcl( ctx );
 501
 502    fthrottle_mode = driQueryOptioni(&rmesa->optionCache, "fthrottle_mode");
 503    rmesa->iw.irq_seq = -1;
 504    rmesa->irqsEmitted = 0;
 505    rmesa->do_irqs = (fthrottle_mode == DRI_CONF_FTHROTTLE_IRQS &&
 506                      rmesa->r200Screen->irq);
 507
 508    rmesa->do_usleeps = (fthrottle_mode == DRI_CONF_FTHROTTLE_USLEEPS);
 509
 510    if (!rmesa->do_irqs)
 511       fprintf(stderr,
 512               "IRQ's not enabled, falling back to %s: %d %d\n",
 513               rmesa->do_usleeps ? "usleeps" : "busy waits",
 514               fthrottle_mode,
 515               rmesa->r200Screen->irq);
 516
 517    rmesa->vblank_flags = (rmesa->r200Screen->irq != 0)
 518        ? driGetDefaultVBlankFlags(&rmesa->optionCache) : VBLANK_FLAG_NO_IRQ;
 519
 520    rmesa->prefer_gart_client_texturing =
 521       (getenv("R200_GART_CLIENT_TEXTURES") != 0);
 522
 523    (*dri_interface->getUST)( & rmesa->swap_ust );
 524
 525
 526 #if DO_DEBUG
 527    R200_DEBUG  = driParseDebugString( getenv( "R200_DEBUG" ),
 528                                       debug_control );
 529    R200_DEBUG |= driParseDebugString( getenv( "RADEON_DEBUG" ),
 530                                       debug_control );
 531 #endif
 532
 533    tcl_mode = driQueryOptioni(&rmesa->optionCache, "tcl_mode");
 534    if (driQueryOptionb(&rmesa->optionCache, "no_rast")) {
 535       fprintf(stderr, "disabling 3D acceleration\n");
 536       FALLBACK(rmesa, R200_FALLBACK_DISABLE, 1);
 537    }
 538    else if (tcl_mode == DRI_CONF_TCL_SW || getenv("R200_NO_TCL") ||
 539             !(rmesa->r200Screen->chip_flags & RADEON_CHIPSET_TCL)) {
 540       if (rmesa->r200Screen->chip_flags & RADEON_CHIPSET_TCL) {
 541          rmesa->r200Screen->chip_flags &= ~RADEON_CHIPSET_TCL;
 542          fprintf(stderr, "Disabling HW TCL support\n");
 543       }
 544       TCL_FALLBACK(rmesa->glCtx, R200_TCL_FALLBACK_TCL_DISABLE, 1);
 545    }
 546
 547    if (rmesa->r200Screen->chip_flags & RADEON_CHIPSET_TCL) {
 548       if (tcl_mode >= DRI_CONF_TCL_VTXFMT)
 549          r200VtxfmtInit( ctx, tcl_mode >= DRI_CONF_TCL_CODEGEN );
 550
 551       _tnl_need_dlist_norm_lengths( ctx, GL_FALSE );
 552    }
 553    return GL_TRUE;
 554 }
 555
 556
 557 /* Destroy the device specific context.
 558  */
 559 /* Destroy the Mesa and driver specific context data.
 560  */
 561 void r200DestroyContext( __DRIcontextPrivate *driContextPriv )
 562 {
 563    GET_CURRENT_CONTEXT(ctx);
 564    r200ContextPtr rmesa = (r200ContextPtr) driContextPriv->driverPrivate;
 565    r200ContextPtr current = ctx ? R200_CONTEXT(ctx) : NULL;
 566
 567    /* check if we're deleting the currently bound context */
 568    if (rmesa == current) {
 569       R200_FIREVERTICES( rmesa );
 570       _mesa_make_current(NULL, NULL, NULL);
 571    }
 572
 573    /* Free r200 context resources */
 574    assert(rmesa); /* should never be null */
 575    if ( rmesa ) {
 576       GLboolean   release_texture_heaps;
 577
 578
 579       release_texture_heaps = (rmesa->glCtx->Shared->RefCount == 1);
 580       _swsetup_DestroyContext( rmesa->glCtx );
 581       _tnl_DestroyContext( rmesa->glCtx );
 582       _ac_DestroyContext( rmesa->glCtx );
 583       _swrast_DestroyContext( rmesa->glCtx );
 584
 585       r200DestroySwtcl( rmesa->glCtx );
 586       r200ReleaseArrays( rmesa->glCtx, ~0 );
 587
 588       if (rmesa->dma.current.buf) {
 589          r200ReleaseDmaRegion( rmesa, &rmesa->dma.current, __FUNCTION__ );
 590          r200FlushCmdBuf( rmesa, __FUNCTION__ );
 591       }
 592
 593       if (!(rmesa->TclFallback & R200_TCL_FALLBACK_TCL_DISABLE)) {
 594          int tcl_mode = driQueryOptioni(&rmesa->optionCache, "tcl_mode");
 595          if (tcl_mode >= DRI_CONF_TCL_VTXFMT)
 596             r200VtxfmtDestroy( rmesa->glCtx );
 597       }
 598
 599       if (rmesa->state.scissor.pClipRects) {
 600          FREE(rmesa->state.scissor.pClipRects);
 601          rmesa->state.scissor.pClipRects = NULL;
 602       }
 603
 604       if ( release_texture_heaps ) {
 605          /* This share group is about to go away, free our private
 606           * texture object data.
 607           */
 608          int i;
 609
 610          for ( i = 0 ; i < rmesa->nr_heaps ; i++ ) {
 611             driDestroyTextureHeap( rmesa->texture_heaps[ i ] );
 612             rmesa->texture_heaps[ i ] = NULL;
 613          }
 614
 615          assert( is_empty_list( & rmesa->swapped ) );
 616       }
 617
 618       /* free the Mesa context */
 619       rmesa->glCtx->DriverCtx = NULL;
 620       _mesa_destroy_context( rmesa->glCtx );
 621
 622       /* free the option cache */
 623       driDestroyOptionCache (&rmesa->optionCache);
 624
 625       FREE( rmesa );
 626    }
 627 }
 628
 629
 630
 631
 632 void
 633 r200SwapBuffers( __DRIdrawablePrivate *dPriv )
 634 {
 635    if (dPriv->driContextPriv && dPriv->driContextPriv->driverPrivate) {
 636       r200ContextPtr rmesa;
 637       GLcontext *ctx;
 638       rmesa = (r200ContextPtr) dPriv->driContextPriv->driverPrivate;
 639       ctx = rmesa->glCtx;
 640       if (ctx->Visual.doubleBufferMode) {
 641          _mesa_notifySwapBuffers( ctx );  /* flush pending rendering comands */
 642          if ( rmesa->doPageFlip ) {
 643             r200PageFlip( dPriv );
 644          }
 645          else {
 646              r200CopyBuffer( dPriv, NULL );
 647          }
 648       }
 649    }
 650    else {
 651       /* XXX this shouldn't be an error but we can't handle it for now */
 652       _mesa_problem(NULL, "%s: drawable has no context!", __FUNCTION__);
 653    }
 654 }
 655
 656 void
 657 r200CopySubBuffer( __DRIdrawablePrivate *dPriv,
 658                    int x, int y, int w, int h )
 659 {
 660    if (dPriv->driContextPriv && dPriv->driContextPriv->driverPrivate) {
 661       r200ContextPtr rmesa;
 662       GLcontext *ctx;
 663       rmesa = (r200ContextPtr) dPriv->driContextPriv->driverPrivate;
 664       ctx = rmesa->glCtx;
 665       if (ctx->Visual.doubleBufferMode) {
 666          drm_clip_rect_t rect;
 667          rect.x1 = x + dPriv->x;
 668          rect.y1 = (dPriv->h - y - h) + dPriv->y;
 669          rect.x2 = rect.x1 + w;
 670          rect.y2 = rect.y1 + h;
 671          _mesa_notifySwapBuffers( ctx );  /* flush pending rendering comands */
 672          r200CopyBuffer( dPriv, &rect );
 673       }
 674    }
 675    else {
 676       /* XXX this shouldn't be an error but we can't handle it for now */
 677       _mesa_problem(NULL, "%s: drawable has no context!", __FUNCTION__);
 678    }
 679 }
 680
 681 /* Force the context `c' to be the current context and associate with it
 682  * buffer `b'.
 683  */
 684 GLboolean
 685 r200MakeCurrent( __DRIcontextPrivate *driContextPriv,
 686                    __DRIdrawablePrivate *driDrawPriv,
 687                    __DRIdrawablePrivate *driReadPriv )
 688 {
 689    if ( driContextPriv ) {
 690       r200ContextPtr newCtx =
 691          (r200ContextPtr) driContextPriv->driverPrivate;
 692
 693       if (R200_DEBUG & DEBUG_DRI)
 694          fprintf(stderr, "%s ctx %p\n", __FUNCTION__, (void *)newCtx->glCtx);
 695
 696       if ( newCtx->dri.drawable != driDrawPriv ) {
 697          driDrawableInitVBlank( driDrawPriv, newCtx->vblank_flags );
 698          newCtx->dri.drawable = driDrawPriv;
 699          r200UpdateWindow( newCtx->glCtx );
 700          r200UpdateViewportOffset( newCtx->glCtx );
 701       }
 702
 703       _mesa_make_current( newCtx->glCtx,
 704                           (GLframebuffer *) driDrawPriv->driverPrivate,
 705                           (GLframebuffer *) driReadPriv->driverPrivate );
 706
 707       if (newCtx->vb.enabled)
 708          r200VtxfmtMakeCurrent( newCtx->glCtx );
 709
 710       _mesa_update_state( newCtx->glCtx );
 711       r200ValidateState( newCtx->glCtx );
 712
 713    } else {
 714       if (R200_DEBUG & DEBUG_DRI)
 715          fprintf(stderr, "%s ctx is null\n", __FUNCTION__);
 716       _mesa_make_current( NULL, NULL, NULL );
 717    }
 718
 719    if (R200_DEBUG & DEBUG_DRI)
 720       fprintf(stderr, "End %s\n", __FUNCTION__);
 721    return GL_TRUE;
 722 }
 723
 724 /* Force the context `c' to be unbound from its buffer.
 725  */
 726 GLboolean
 727 r200UnbindContext( __DRIcontextPrivate *driContextPriv )
 728 {
 729    r200ContextPtr rmesa = (r200ContextPtr) driContextPriv->driverPrivate;
 730
 731    if (R200_DEBUG & DEBUG_DRI)
 732       fprintf(stderr, "%s ctx %p\n", __FUNCTION__, (void *)rmesa->glCtx);
 733
 734    r200VtxfmtUnbindContext( rmesa->glCtx );
 735    return GL_TRUE;
 736 }