src/gallium/drivers/r300/r300_emit.c

   1 /*
   2  * Copyright 2008 Corbin Simpson <MostAwesomeDude@gmail.com>
   3  * Copyright 2009 Marek Olšák <maraeo@gmail.com>
   4  *
   5  * Permission is hereby granted, free of charge, to any person obtaining a
   6  * copy of this software and associated documentation files (the "Software"),
   7  * to deal in the Software without restriction, including without limitation
   8  * on the rights to use, copy, modify, merge, publish, distribute, sub
   9  * license, and/or sell copies of the Software, and to permit persons to whom
  10  * the Software is furnished to do so, subject to the following conditions:
  11  *
  12  * The above copyright notice and this permission notice (including the next
  13  * paragraph) shall be included in all copies or substantial portions of the
  14  * Software.
  15  *
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  18  * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
  19  * THE AUTHOR(S) AND/OR THEIR SUPPLIERS BE LIABLE FOR ANY CLAIM,
  20  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
  21  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
  22  * USE OR OTHER DEALINGS IN THE SOFTWARE. */
  23
  24 /* r300_emit: Functions for emitting state. */
  25
  26 #include "util/u_format.h"
  27 #include "util/u_math.h"
  28 #include "util/u_simple_list.h"
  29
  30 #include "r300_context.h"
  31 #include "r300_cs.h"
  32 #include "r300_emit.h"
  33 #include "r300_fs.h"
  34 #include "r300_screen.h"
  35 #include "r300_screen_buffer.h"
  36 #include "r300_vs.h"
  37
  38 void r300_emit_blend_state(struct r300_context* r300,
  39                            unsigned size, void* state)
  40 {
  41     struct r300_blend_state* blend = (struct r300_blend_state*)state;
  42     struct pipe_framebuffer_state* fb =
  43         (struct pipe_framebuffer_state*)r300->fb_state.state;
  44     CS_LOCALS(r300);
  45
  46     if (fb->nr_cbufs) {
  47         WRITE_CS_TABLE(blend->cb, size);
  48     } else {
  49         WRITE_CS_TABLE(blend->cb_no_readwrite, size);
  50     }
  51 }
  52
  53 void r300_emit_blend_color_state(struct r300_context* r300,
  54                                  unsigned size, void* state)
  55 {
  56     struct r300_blend_color_state* bc = (struct r300_blend_color_state*)state;
  57     CS_LOCALS(r300);
  58
  59     WRITE_CS_TABLE(bc->cb, size);
  60 }
  61
  62 void r300_emit_clip_state(struct r300_context* r300,
  63                           unsigned size, void* state)
  64 {
  65     struct r300_clip_state* clip = (struct r300_clip_state*)state;
  66     CS_LOCALS(r300);
  67
  68     WRITE_CS_TABLE(clip->cb, size);
  69 }
  70
  71 void r300_emit_dsa_state(struct r300_context* r300, unsigned size, void* state)
  72 {
  73     struct r300_dsa_state* dsa = (struct r300_dsa_state*)state;
  74     struct pipe_framebuffer_state* fb =
  75         (struct pipe_framebuffer_state*)r300->fb_state.state;
  76     CS_LOCALS(r300);
  77
  78     if (fb->zsbuf) {
  79         WRITE_CS_TABLE(&dsa->cb_begin, size);
  80     } else {
  81         WRITE_CS_TABLE(dsa->cb_no_readwrite, size);
  82     }
  83 }
  84
  85 static const float * get_rc_constant_state(
  86     struct r300_context * r300,
  87     struct rc_constant * constant)
  88 {
  89     struct r300_textures_state* texstate = r300->textures_state.state;
  90     static float vec[4] = { 0.0, 0.0, 0.0, 1.0 };
  91     struct pipe_resource *tex;
  92
  93     assert(constant->Type == RC_CONSTANT_STATE);
  94
  95     switch (constant->u.State[0]) {
  96         /* Factor for converting rectangle coords to
  97          * normalized coords. Should only show up on non-r500. */
  98         case RC_STATE_R300_TEXRECT_FACTOR:
  99             tex = texstate->sampler_views[constant->u.State[1]]->base.texture;
 100             vec[0] = 1.0 / tex->width0;
 101             vec[1] = 1.0 / tex->height0;
 102             break;
 103
 104         case RC_STATE_R300_VIEWPORT_SCALE:
 105             vec[0] = r300->viewport.scale[0];
 106             vec[1] = r300->viewport.scale[1];
 107             vec[2] = r300->viewport.scale[2];
 108             break;
 109
 110         case RC_STATE_R300_VIEWPORT_OFFSET:
 111             vec[0] = r300->viewport.translate[0];
 112             vec[1] = r300->viewport.translate[1];
 113             vec[2] = r300->viewport.translate[2];
 114             break;
 115
 116         default:
 117             fprintf(stderr, "r300: Implementation error: "
 118                 "Unknown RC_CONSTANT type %d\n", constant->u.State[0]);
 119     }
 120
 121     /* This should either be (0, 0, 0, 1), which should be a relatively safe
 122      * RGBA or STRQ value, or it could be one of the RC_CONSTANT_STATE
 123      * state factors. */
 124     return vec;
 125 }
 126
 127 /* Convert a normal single-precision float into the 7.16 format
 128  * used by the R300 fragment shader.
 129  */
 130 uint32_t pack_float24(float f)
 131 {
 132     union {
 133         float fl;
 134         uint32_t u;
 135     } u;
 136     float mantissa;
 137     int exponent;
 138     uint32_t float24 = 0;
 139
 140     if (f == 0.0)
 141         return 0;
 142
 143     u.fl = f;
 144
 145     mantissa = frexpf(f, &exponent);
 146
 147     /* Handle -ve */
 148     if (mantissa < 0) {
 149         float24 |= (1 << 23);
 150         mantissa = mantissa * -1.0;
 151     }
 152     /* Handle exponent, bias of 63 */
 153     exponent += 62;
 154     float24 |= (exponent << 16);
 155     /* Kill 7 LSB of mantissa */
 156     float24 |= (u.u & 0x7FFFFF) >> 7;
 157
 158     return float24;
 159 }
 160
 161 void r300_emit_fs(struct r300_context* r300, unsigned size, void *state)
 162 {
 163     struct r300_fragment_shader *fs = r300_fs(r300);
 164     CS_LOCALS(r300);
 165
 166     WRITE_CS_TABLE(fs->shader->cb_code, fs->shader->cb_code_size);
 167 }
 168
 169 void r300_emit_fs_constants(struct r300_context* r300, unsigned size, void *state)
 170 {
 171     struct r300_fragment_shader *fs = r300_fs(r300);
 172     struct r300_constant_buffer *buf = (struct r300_constant_buffer*)state;
 173     unsigned count = fs->shader->externals_count * 4;
 174     CS_LOCALS(r300);
 175
 176     if (count == 0)
 177         return;
 178
 179     BEGIN_CS(size);
 180     OUT_CS_REG_SEQ(R300_PFS_PARAM_0_X, count);
 181     OUT_CS_TABLE(buf->constants, count);
 182     END_CS;
 183 }
 184
 185 void r300_emit_fs_rc_constant_state(struct r300_context* r300, unsigned size, void *state)
 186 {
 187     struct r300_fragment_shader *fs = r300_fs(r300);
 188     struct rc_constant_list *constants = &fs->shader->code.constants;
 189     unsigned i;
 190     unsigned count = fs->shader->rc_state_count;
 191     unsigned first = fs->shader->externals_count;
 192     unsigned end = constants->Count;
 193     uint32_t cdata[4];
 194     unsigned j;
 195     CS_LOCALS(r300);
 196
 197     if (count == 0)
 198         return;
 199
 200     BEGIN_CS(size);
 201     for(i = first; i < end; ++i) {
 202         if (constants->Constants[i].Type == RC_CONSTANT_STATE) {
 203             const float *data =
 204                     get_rc_constant_state(r300, &constants->Constants[i]);
 205
 206             for (j = 0; j < 4; j++)
 207                 cdata[j] = pack_float24(data[j]);
 208
 209             OUT_CS_REG_SEQ(R300_PFS_PARAM_0_X + i * 16, 4);
 210             OUT_CS_TABLE(cdata, 4);
 211         }
 212     }
 213     END_CS;
 214 }
 215
 216 void r500_emit_fs(struct r300_context* r300, unsigned size, void *state)
 217 {
 218     struct r300_fragment_shader *fs = r300_fs(r300);
 219     CS_LOCALS(r300);
 220
 221     WRITE_CS_TABLE(fs->shader->cb_code, fs->shader->cb_code_size);
 222 }
 223
 224 void r500_emit_fs_constants(struct r300_context* r300, unsigned size, void *state)
 225 {
 226     struct r300_fragment_shader *fs = r300_fs(r300);
 227     struct r300_constant_buffer *buf = (struct r300_constant_buffer*)state;
 228     unsigned count = fs->shader->externals_count * 4;
 229     CS_LOCALS(r300);
 230
 231     if (count == 0)
 232         return;
 233
 234     BEGIN_CS(size);
 235     OUT_CS_REG(R500_GA_US_VECTOR_INDEX, R500_GA_US_VECTOR_INDEX_TYPE_CONST);
 236     OUT_CS_ONE_REG(R500_GA_US_VECTOR_DATA, count);
 237     OUT_CS_TABLE(buf->constants, count);
 238     END_CS;
 239 }
 240
 241 void r500_emit_fs_rc_constant_state(struct r300_context* r300, unsigned size, void *state)
 242 {
 243     struct r300_fragment_shader *fs = r300_fs(r300);
 244     struct rc_constant_list *constants = &fs->shader->code.constants;
 245     unsigned i;
 246     unsigned count = fs->shader->rc_state_count;
 247     unsigned first = fs->shader->externals_count;
 248     unsigned end = constants->Count;
 249     CS_LOCALS(r300);
 250
 251     if (count == 0)
 252         return;
 253
 254     BEGIN_CS(size);
 255     for(i = first; i < end; ++i) {
 256         if (constants->Constants[i].Type == RC_CONSTANT_STATE) {
 257             const float *data =
 258                     get_rc_constant_state(r300, &constants->Constants[i]);
 259
 260             OUT_CS_REG(R500_GA_US_VECTOR_INDEX,
 261                        R500_GA_US_VECTOR_INDEX_TYPE_CONST |
 262                        (i & R500_GA_US_VECTOR_INDEX_MASK));
 263             OUT_CS_ONE_REG(R500_GA_US_VECTOR_DATA, 4);
 264             OUT_CS_TABLE(data, 4);
 265         }
 266     }
 267     END_CS;
 268 }
 269
 270 void r300_emit_gpu_flush(struct r300_context *r300, unsigned size, void *state)
 271 {
 272     struct r300_gpu_flush *gpuflush = (struct r300_gpu_flush*)state;
 273     struct pipe_framebuffer_state* fb =
 274             (struct pipe_framebuffer_state*)r300->fb_state.state;
 275     CS_LOCALS(r300);
 276
 277     BEGIN_CS(size);
 278
 279     /* Set up scissors.
 280      * By writing to the SC registers, SC & US assert idle. */
 281     OUT_CS_REG_SEQ(R300_SC_SCISSORS_TL, 2);
 282     if (r300->screen->caps.is_r500) {
 283         OUT_CS(0);
 284         OUT_CS(((fb->width  - 1) << R300_SCISSORS_X_SHIFT) |
 285                ((fb->height - 1) << R300_SCISSORS_Y_SHIFT));
 286     } else {
 287         OUT_CS((1440 << R300_SCISSORS_X_SHIFT) |
 288                (1440 << R300_SCISSORS_Y_SHIFT));
 289         OUT_CS(((fb->width  + 1440-1) << R300_SCISSORS_X_SHIFT) |
 290                ((fb->height + 1440-1) << R300_SCISSORS_Y_SHIFT));
 291     }
 292
 293     /* Flush CB & ZB caches and wait until the 3D engine is idle and clean. */
 294     OUT_CS_TABLE(gpuflush->cb_flush_clean, 6);
 295     END_CS;
 296 }
 297
 298 void r300_emit_aa_state(struct r300_context *r300, unsigned size, void *state)
 299 {
 300     struct r300_aa_state *aa = (struct r300_aa_state*)state;
 301     CS_LOCALS(r300);
 302
 303     BEGIN_CS(size);
 304     OUT_CS_REG(R300_GB_AA_CONFIG, aa->aa_config);
 305
 306     if (aa->dest) {
 307         OUT_CS_REG_SEQ(R300_RB3D_AARESOLVE_OFFSET, 1);
 308         OUT_CS_RELOC(aa->dest->buffer, aa->dest->offset, 0, aa->dest->domain, 0);
 309
 310         OUT_CS_REG_SEQ(R300_RB3D_AARESOLVE_PITCH, 1);
 311         OUT_CS_RELOC(aa->dest->buffer, aa->dest->pitch, 0, aa->dest->domain, 0);
 312     }
 313
 314     OUT_CS_REG(R300_RB3D_AARESOLVE_CTL, aa->aaresolve_ctl);
 315     END_CS;
 316 }
 317
 318 void r300_emit_fb_state(struct r300_context* r300, unsigned size, void* state)
 319 {
 320     struct pipe_framebuffer_state* fb = (struct pipe_framebuffer_state*)state;
 321     struct r300_surface* surf;
 322     unsigned i;
 323     CS_LOCALS(r300);
 324
 325     BEGIN_CS(size);
 326
 327     /* NUM_MULTIWRITES replicates COLOR[0] to all colorbuffers, which is not
 328      * what we usually want. */
 329     if (r300->screen->caps.is_r500) {
 330         OUT_CS_REG(R300_RB3D_CCTL,
 331             R300_RB3D_CCTL_INDEPENDENT_COLORFORMAT_ENABLE_ENABLE);
 332     } else {
 333         OUT_CS_REG(R300_RB3D_CCTL, 0);
 334     }
 335
 336     /* Set up colorbuffers. */
 337     for (i = 0; i < fb->nr_cbufs; i++) {
 338         surf = r300_surface(fb->cbufs[i]);
 339
 340         OUT_CS_REG_SEQ(R300_RB3D_COLOROFFSET0 + (4 * i), 1);
 341         OUT_CS_RELOC(surf->buffer, surf->offset, 0, surf->domain, 0);
 342
 343         OUT_CS_REG_SEQ(R300_RB3D_COLORPITCH0 + (4 * i), 1);
 344         OUT_CS_RELOC(surf->buffer, surf->pitch, 0, surf->domain, 0);
 345     }
 346
 347     /* Set up a zbuffer. */
 348     if (fb->zsbuf) {
 349         surf = r300_surface(fb->zsbuf);
 350
 351         OUT_CS_REG(R300_ZB_FORMAT, surf->format);
 352         OUT_CS_REG(R300_ZB_BW_CNTL, 0);
 353
 354         OUT_CS_REG_SEQ(R300_ZB_DEPTHOFFSET, 1);
 355         OUT_CS_RELOC(surf->buffer, surf->offset, 0, surf->domain, 0);
 356
 357         OUT_CS_REG_SEQ(R300_ZB_DEPTHPITCH, 1);
 358         OUT_CS_RELOC(surf->buffer, surf->pitch, 0, surf->domain, 0);
 359
 360         OUT_CS_REG(R300_ZB_DEPTHCLEARVALUE, 0);
 361
 362         /* HiZ RAM. */
 363         if (r300->screen->caps.has_hiz) {
 364             OUT_CS_REG(R300_ZB_HIZ_OFFSET, 0);
 365             OUT_CS_REG(R300_ZB_HIZ_PITCH, 0);
 366         }
 367
 368         /* Z Mask RAM. (compressed zbuffer) */
 369         OUT_CS_REG(R300_ZB_ZMASK_OFFSET, 0);
 370         OUT_CS_REG(R300_ZB_ZMASK_PITCH, 0);
 371     }
 372
 373     /* Colorbuffer format in the US block.
 374      * (must be written after unpipelined regs) */
 375     OUT_CS_REG_SEQ(R300_US_OUT_FMT_0, 4);
 376     for (i = 0; i < fb->nr_cbufs; i++) {
 377         OUT_CS(r300_surface(fb->cbufs[i])->format);
 378     }
 379     for (; i < 4; i++) {
 380         OUT_CS(R300_US_OUT_FMT_UNUSED);
 381     }
 382     END_CS;
 383 }
 384
 385 void r300_emit_query_start(struct r300_context *r300, unsigned size, void*state)
 386 {
 387     struct r300_query *query = r300->query_current;
 388     CS_LOCALS(r300);
 389
 390     if (!query)
 391         return;
 392
 393     BEGIN_CS(size);
 394     if (r300->screen->caps.family == CHIP_FAMILY_RV530) {
 395         OUT_CS_REG(RV530_FG_ZBREG_DEST, RV530_FG_ZBREG_DEST_PIPE_SELECT_ALL);
 396     } else {
 397         OUT_CS_REG(R300_SU_REG_DEST, R300_RASTER_PIPE_SELECT_ALL);
 398     }
 399     OUT_CS_REG(R300_ZB_ZPASS_DATA, 0);
 400     END_CS;
 401     query->begin_emitted = TRUE;
 402     query->flushed = FALSE;
 403 }
 404
 405 static void r300_emit_query_end_frag_pipes(struct r300_context *r300,
 406                                            struct r300_query *query)
 407 {
 408     struct r300_capabilities* caps = &r300->screen->caps;
 409     struct r300_winsys_buffer *buf = r300->query_current->buffer;
 410     CS_LOCALS(r300);
 411
 412     assert(caps->num_frag_pipes);
 413
 414     BEGIN_CS(6 * caps->num_frag_pipes + 2);
 415     /* I'm not so sure I like this switch, but it's hard to be elegant
 416      * when there's so many special cases...
 417      *
 418      * So here's the basic idea. For each pipe, enable writes to it only,
 419      * then put out the relocation for ZPASS_ADDR, taking into account a
 420      * 4-byte offset for each pipe. RV380 and older are special; they have
 421      * only two pipes, and the second pipe's enable is on bit 3, not bit 1,
 422      * so there's a chipset cap for that. */
 423     switch (caps->num_frag_pipes) {
 424         case 4:
 425             /* pipe 3 only */
 426             OUT_CS_REG(R300_SU_REG_DEST, 1 << 3);
 427             OUT_CS_REG_SEQ(R300_ZB_ZPASS_ADDR, 1);
 428             OUT_CS_RELOC(buf, (query->num_results + 3) * 4,
 429                     0, query->domain, 0);
 430         case 3:
 431             /* pipe 2 only */
 432             OUT_CS_REG(R300_SU_REG_DEST, 1 << 2);
 433             OUT_CS_REG_SEQ(R300_ZB_ZPASS_ADDR, 1);
 434             OUT_CS_RELOC(buf, (query->num_results + 2) * 4,
 435                     0, query->domain, 0);
 436         case 2:
 437             /* pipe 1 only */
 438             /* As mentioned above, accomodate RV380 and older. */
 439             OUT_CS_REG(R300_SU_REG_DEST,
 440                     1 << (caps->high_second_pipe ? 3 : 1));
 441             OUT_CS_REG_SEQ(R300_ZB_ZPASS_ADDR, 1);
 442             OUT_CS_RELOC(buf, (query->num_results + 1) * 4,
 443                     0, query->domain, 0);
 444         case 1:
 445             /* pipe 0 only */
 446             OUT_CS_REG(R300_SU_REG_DEST, 1 << 0);
 447             OUT_CS_REG_SEQ(R300_ZB_ZPASS_ADDR, 1);
 448             OUT_CS_RELOC(buf, (query->num_results + 0) * 4,
 449                     0, query->domain, 0);
 450             break;
 451         default:
 452             fprintf(stderr, "r300: Implementation error: Chipset reports %d"
 453                     " pixel pipes!\n", caps->num_frag_pipes);
 454             abort();
 455     }
 456
 457     /* And, finally, reset it to normal... */
 458     OUT_CS_REG(R300_SU_REG_DEST, 0xF);
 459     END_CS;
 460 }
 461
 462 static void rv530_emit_query_end_single_z(struct r300_context *r300,
 463                                           struct r300_query *query)
 464 {
 465     struct r300_winsys_buffer *buf = r300->query_current->buffer;
 466     CS_LOCALS(r300);
 467
 468     BEGIN_CS(8);
 469     OUT_CS_REG(RV530_FG_ZBREG_DEST, RV530_FG_ZBREG_DEST_PIPE_SELECT_0);
 470     OUT_CS_REG_SEQ(R300_ZB_ZPASS_ADDR, 1);
 471     OUT_CS_RELOC(buf, query->num_results * 4, 0, query->domain, 0);
 472     OUT_CS_REG(RV530_FG_ZBREG_DEST, RV530_FG_ZBREG_DEST_PIPE_SELECT_ALL);
 473     END_CS;
 474 }
 475
 476 static void rv530_emit_query_end_double_z(struct r300_context *r300,
 477                                           struct r300_query *query)
 478 {
 479     struct r300_winsys_buffer *buf = r300->query_current->buffer;
 480     CS_LOCALS(r300);
 481
 482     BEGIN_CS(14);
 483     OUT_CS_REG(RV530_FG_ZBREG_DEST, RV530_FG_ZBREG_DEST_PIPE_SELECT_0);
 484     OUT_CS_REG_SEQ(R300_ZB_ZPASS_ADDR, 1);
 485     OUT_CS_RELOC(buf, (query->num_results + 0) * 4, 0, query->domain, 0);
 486     OUT_CS_REG(RV530_FG_ZBREG_DEST, RV530_FG_ZBREG_DEST_PIPE_SELECT_1);
 487     OUT_CS_REG_SEQ(R300_ZB_ZPASS_ADDR, 1);
 488     OUT_CS_RELOC(buf, (query->num_results + 1) * 4, 0, query->domain, 0);
 489     OUT_CS_REG(RV530_FG_ZBREG_DEST, RV530_FG_ZBREG_DEST_PIPE_SELECT_ALL);
 490     END_CS;
 491 }
 492
 493 void r300_emit_query_end(struct r300_context* r300)
 494 {
 495     struct r300_capabilities *caps = &r300->screen->caps;
 496     struct r300_query *query = r300->query_current;
 497
 498     if (!query)
 499         return;
 500
 501     if (query->begin_emitted == FALSE)
 502         return;
 503
 504     if (caps->family == CHIP_FAMILY_RV530) {
 505         if (caps->num_z_pipes == 2)
 506             rv530_emit_query_end_double_z(r300, query);
 507         else
 508             rv530_emit_query_end_single_z(r300, query);
 509     } else
 510         r300_emit_query_end_frag_pipes(r300, query);
 511
 512     query->begin_emitted = FALSE;
 513     query->num_results += query->num_pipes;
 514
 515     /* XXX grab all the results and reset the counter. */
 516     if (query->num_results >= query->buffer_size / 4 - 4) {
 517         query->num_results = (query->buffer_size / 4) / 2;
 518         fprintf(stderr, "r300: Rewinding OQBO...\n");
 519     }
 520 }
 521
 522 void r300_emit_rs_state(struct r300_context* r300, unsigned size, void* state)
 523 {
 524     struct r300_rs_state* rs = state;
 525     struct pipe_framebuffer_state* fb = r300->fb_state.state;
 526     float scale, offset;
 527     unsigned mspos0, mspos1;
 528     CS_LOCALS(r300);
 529
 530     BEGIN_CS(size);
 531     OUT_CS_REG(R300_VAP_CNTL_STATUS, rs->vap_control_status);
 532
 533     /* Multisampling. Depends on framebuffer sample count. */
 534     if (r300->rws->get_value(r300->rws, R300_VID_DRM_2_3_0)) {
 535         if (fb->nr_cbufs && fb->cbufs[0]->texture->nr_samples > 1) {
 536             /* Subsample placement. These may not be optimal. */
 537             switch (fb->cbufs[0]->texture->nr_samples) {
 538                 case 2:
 539                     mspos0 = 0x33996633;
 540                     mspos1 = 0x6666663;
 541                     break;
 542                 case 3:
 543                     mspos0 = 0x33936933;
 544                     mspos1 = 0x6666663;
 545                     break;
 546                 case 4:
 547                     mspos0 = 0x33939933;
 548                     mspos1 = 0x3966663;
 549                     break;
 550                 case 6:
 551                     mspos0 = 0x22a2aa22;
 552                     mspos1 = 0x2a65672;
 553                     break;
 554                 default:
 555                     debug_printf("r300: Bad number of multisamples!\n");
 556                     mspos0 = rs->multisample_position_0;
 557                     mspos1 = rs->multisample_position_1;
 558                     break;
 559             }
 560
 561             OUT_CS_REG_SEQ(R300_GB_MSPOS0, 2);
 562             OUT_CS(mspos0);
 563             OUT_CS(mspos1);
 564         } else {
 565             OUT_CS_REG_SEQ(R300_GB_MSPOS0, 2);
 566             OUT_CS(rs->multisample_position_0);
 567             OUT_CS(rs->multisample_position_1);
 568         }
 569     }
 570
 571     OUT_CS_REG(R300_GA_POINT_SIZE, rs->point_size);
 572     OUT_CS_REG_SEQ(R300_GA_POINT_MINMAX, 2);
 573     OUT_CS(rs->point_minmax);
 574     OUT_CS(rs->line_control);
 575
 576     if (rs->polygon_offset_enable) {
 577         scale = rs->depth_scale * 12;
 578         offset = rs->depth_offset;
 579
 580         switch (r300->zbuffer_bpp) {
 581             case 16:
 582                 offset *= 4;
 583                 break;
 584             case 24:
 585                 offset *= 2;
 586                 break;
 587         }
 588
 589         OUT_CS_REG_SEQ(R300_SU_POLY_OFFSET_FRONT_SCALE, 4);
 590         OUT_CS_32F(scale);
 591         OUT_CS_32F(offset);
 592         OUT_CS_32F(scale);
 593         OUT_CS_32F(offset);
 594     }
 595
 596     OUT_CS_REG_SEQ(R300_SU_POLY_OFFSET_ENABLE, 2);
 597     OUT_CS(rs->polygon_offset_enable);
 598     OUT_CS(rs->cull_mode);
 599     OUT_CS_REG(R300_GA_LINE_STIPPLE_CONFIG, rs->line_stipple_config);
 600     OUT_CS_REG(R300_GA_LINE_STIPPLE_VALUE, rs->line_stipple_value);
 601     OUT_CS_REG(R300_GA_POLY_MODE, rs->polygon_mode);
 602     OUT_CS_REG(R300_SC_CLIP_RULE, rs->clip_rule);
 603     OUT_CS_REG(R300_GB_ENABLE, rs->stuffing_enable);
 604     OUT_CS_REG_SEQ(R300_GA_POINT_S0, 4);
 605     OUT_CS_32F(rs->point_texcoord_left);
 606     OUT_CS_32F(rs->point_texcoord_bottom);
 607     OUT_CS_32F(rs->point_texcoord_right);
 608     OUT_CS_32F(rs->point_texcoord_top);
 609     END_CS;
 610 }
 611
 612 void r300_emit_rs_block_state(struct r300_context* r300,
 613                               unsigned size, void* state)
 614 {
 615     struct r300_rs_block* rs = (struct r300_rs_block*)state;
 616     unsigned i;
 617     /* It's the same for both INST and IP tables */
 618     unsigned count = (rs->inst_count & R300_RS_INST_COUNT_MASK) + 1;
 619     CS_LOCALS(r300);
 620
 621     if (SCREEN_DBG_ON(r300->screen, DBG_DRAW)) {
 622         r500_dump_rs_block(rs);
 623     }
 624
 625     DBG(r300, DBG_DRAW, "r300: RS emit:\n");
 626
 627     BEGIN_CS(size);
 628     OUT_CS_REG_SEQ(R300_VAP_VTX_STATE_CNTL, 2);
 629     OUT_CS(rs->vap_vtx_state_cntl);
 630     OUT_CS(rs->vap_vsm_vtx_assm);
 631     OUT_CS_REG_SEQ(R300_VAP_OUTPUT_VTX_FMT_0, 2);
 632     OUT_CS(rs->vap_out_vtx_fmt[0]);
 633     OUT_CS(rs->vap_out_vtx_fmt[1]);
 634
 635     if (r300->screen->caps.is_r500) {
 636         OUT_CS_REG_SEQ(R500_RS_IP_0, count);
 637     } else {
 638         OUT_CS_REG_SEQ(R300_RS_IP_0, count);
 639     }
 640     OUT_CS_TABLE(rs->ip, count);
 641     for (i = 0; i < count; i++) {
 642         DBG(r300, DBG_DRAW, "    : ip %d: 0x%08x\n", i, rs->ip[i]);
 643     }
 644
 645     OUT_CS_REG_SEQ(R300_RS_COUNT, 2);
 646     OUT_CS(rs->count);
 647     OUT_CS(rs->inst_count);
 648
 649     if (r300->screen->caps.is_r500) {
 650         OUT_CS_REG_SEQ(R500_RS_INST_0, count);
 651     } else {
 652         OUT_CS_REG_SEQ(R300_RS_INST_0, count);
 653     }
 654     OUT_CS_TABLE(rs->inst, count);
 655     for (i = 0; i < count; i++) {
 656         DBG(r300, DBG_DRAW, "    : inst %d: 0x%08x\n", i, rs->inst[i]);
 657     }
 658
 659     DBG(r300, DBG_DRAW, "    : count: 0x%08x inst_count: 0x%08x\n",
 660         rs->count, rs->inst_count);
 661
 662     END_CS;
 663 }
 664
 665 void r300_emit_scissor_state(struct r300_context* r300,
 666                              unsigned size, void* state)
 667 {
 668     struct pipe_scissor_state* scissor = (struct pipe_scissor_state*)state;
 669     CS_LOCALS(r300);
 670
 671     BEGIN_CS(size);
 672     OUT_CS_REG_SEQ(R300_SC_CLIPRECT_TL_0, 2);
 673     if (r300->screen->caps.is_r500) {
 674         OUT_CS((scissor->minx << R300_CLIPRECT_X_SHIFT) |
 675                (scissor->miny << R300_CLIPRECT_Y_SHIFT));
 676         OUT_CS(((scissor->maxx - 1) << R300_CLIPRECT_X_SHIFT) |
 677                ((scissor->maxy - 1) << R300_CLIPRECT_Y_SHIFT));
 678     } else {
 679         OUT_CS(((scissor->minx + 1440) << R300_CLIPRECT_X_SHIFT) |
 680                ((scissor->miny + 1440) << R300_CLIPRECT_Y_SHIFT));
 681         OUT_CS(((scissor->maxx + 1440-1) << R300_CLIPRECT_X_SHIFT) |
 682                ((scissor->maxy + 1440-1) << R300_CLIPRECT_Y_SHIFT));
 683     }
 684     END_CS;
 685 }
 686
 687 void r300_emit_textures_state(struct r300_context *r300,
 688                               unsigned size, void *state)
 689 {
 690     struct r300_textures_state *allstate = (struct r300_textures_state*)state;
 691     struct r300_texture_sampler_state *texstate;
 692     struct r300_texture *tex;
 693     unsigned i;
 694     CS_LOCALS(r300);
 695
 696     BEGIN_CS(size);
 697     OUT_CS_REG(R300_TX_ENABLE, allstate->tx_enable);
 698
 699     for (i = 0; i < allstate->count; i++) {
 700         if ((1 << i) & allstate->tx_enable) {
 701             texstate = &allstate->regs[i];
 702             tex = r300_texture(allstate->sampler_views[i]->base.texture);
 703
 704             OUT_CS_REG(R300_TX_FILTER0_0 + (i * 4), texstate->filter0);
 705             OUT_CS_REG(R300_TX_FILTER1_0 + (i * 4), texstate->filter1);
 706             OUT_CS_REG(R300_TX_BORDER_COLOR_0 + (i * 4),
 707                        texstate->border_color);
 708
 709             OUT_CS_REG(R300_TX_FORMAT0_0 + (i * 4), texstate->format.format0);
 710             OUT_CS_REG(R300_TX_FORMAT1_0 + (i * 4), texstate->format.format1);
 711             OUT_CS_REG(R300_TX_FORMAT2_0 + (i * 4), texstate->format.format2);
 712
 713             OUT_CS_REG_SEQ(R300_TX_OFFSET_0 + (i * 4), 1);
 714             OUT_CS_TEX_RELOC(tex, texstate->format.tile_config, tex->domain,
 715                              0, 0);
 716         }
 717     }
 718     END_CS;
 719 }
 720
 721 void r300_emit_aos(struct r300_context* r300, int offset, boolean indexed)
 722 {
 723     struct pipe_vertex_buffer *vb1, *vb2, *vbuf = r300->vertex_buffer;
 724     struct pipe_vertex_element *velem = r300->velems->velem;
 725     struct r300_buffer *buf;
 726     int i;
 727     unsigned *hw_format_size = r300->velems->hw_format_size;
 728     unsigned size1, size2, aos_count = r300->velems->count;
 729     unsigned packet_size = (aos_count * 3 + 1) / 2;
 730     CS_LOCALS(r300);
 731
 732     BEGIN_CS(2 + packet_size + aos_count * 2);
 733     OUT_CS_PKT3(R300_PACKET3_3D_LOAD_VBPNTR, packet_size);
 734     OUT_CS(aos_count | (!indexed ? R300_VC_FORCE_PREFETCH : 0));
 735
 736     for (i = 0; i < aos_count - 1; i += 2) {
 737         vb1 = &vbuf[velem[i].vertex_buffer_index];
 738         vb2 = &vbuf[velem[i+1].vertex_buffer_index];
 739         size1 = hw_format_size[i];
 740         size2 = hw_format_size[i+1];
 741
 742         OUT_CS(R300_VBPNTR_SIZE0(size1) | R300_VBPNTR_STRIDE0(vb1->stride) |
 743                R300_VBPNTR_SIZE1(size2) | R300_VBPNTR_STRIDE1(vb2->stride));
 744         OUT_CS(vb1->buffer_offset + velem[i].src_offset   + offset * vb1->stride);
 745         OUT_CS(vb2->buffer_offset + velem[i+1].src_offset + offset * vb2->stride);
 746     }
 747
 748     if (aos_count & 1) {
 749         vb1 = &vbuf[velem[i].vertex_buffer_index];
 750         size1 = hw_format_size[i];
 751
 752         OUT_CS(R300_VBPNTR_SIZE0(size1) | R300_VBPNTR_STRIDE0(vb1->stride));
 753         OUT_CS(vb1->buffer_offset + velem[i].src_offset + offset * vb1->stride);
 754     }
 755
 756     for (i = 0; i < aos_count; i++) {
 757         buf = r300_buffer(vbuf[velem[i].vertex_buffer_index].buffer);
 758         OUT_CS_BUF_RELOC_NO_OFFSET(&buf->b.b, buf->domain, 0, 0);
 759     }
 760     END_CS;
 761 }
 762
 763 void r300_emit_aos_swtcl(struct r300_context *r300, boolean indexed)
 764 {
 765     CS_LOCALS(r300);
 766
 767     DBG(r300, DBG_DRAW, "r300: Preparing vertex buffer %p for render, "
 768             "vertex size %d\n", r300->vbo,
 769             r300->vertex_info.size);
 770     /* Set the pointer to our vertex buffer. The emitted values are this:
 771      * PACKET3 [3D_LOAD_VBPNTR]
 772      * COUNT   [1]
 773      * FORMAT  [size | stride << 8]
 774      * OFFSET  [offset into BO]
 775      * VBPNTR  [relocated BO]
 776      */
 777     BEGIN_CS(7);
 778     OUT_CS_PKT3(R300_PACKET3_3D_LOAD_VBPNTR, 3);
 779     OUT_CS(1 | (!indexed ? R300_VC_FORCE_PREFETCH : 0));
 780     OUT_CS(r300->vertex_info.size |
 781             (r300->vertex_info.size << 8));
 782     OUT_CS(r300->vbo_offset);
 783     OUT_CS_BUF_RELOC(r300->vbo, 0, r300_buffer(r300->vbo)->domain, 0, 0);
 784     END_CS;
 785 }
 786
 787 void r300_emit_vertex_stream_state(struct r300_context* r300,
 788                                    unsigned size, void* state)
 789 {
 790     struct r300_vertex_stream_state *streams =
 791         (struct r300_vertex_stream_state*)state;
 792     unsigned i;
 793     CS_LOCALS(r300);
 794
 795     DBG(r300, DBG_DRAW, "r300: PSC emit:\n");
 796
 797     BEGIN_CS(size);
 798     OUT_CS_REG_SEQ(R300_VAP_PROG_STREAM_CNTL_0, streams->count);
 799     OUT_CS_TABLE(streams->vap_prog_stream_cntl, streams->count);
 800     for (i = 0; i < streams->count; i++) {
 801         DBG(r300, DBG_DRAW, "    : prog_stream_cntl%d: 0x%08x\n", i,
 802                streams->vap_prog_stream_cntl[i]);
 803     }
 804     OUT_CS_REG_SEQ(R300_VAP_PROG_STREAM_CNTL_EXT_0, streams->count);
 805     OUT_CS_TABLE(streams->vap_prog_stream_cntl_ext, streams->count);
 806     for (i = 0; i < streams->count; i++) {
 807         DBG(r300, DBG_DRAW, "    : prog_stream_cntl_ext%d: 0x%08x\n", i,
 808                streams->vap_prog_stream_cntl_ext[i]);
 809     }
 810     END_CS;
 811 }
 812
 813 void r300_emit_pvs_flush(struct r300_context* r300, unsigned size, void* state)
 814 {
 815     CS_LOCALS(r300);
 816
 817     BEGIN_CS(size);
 818     OUT_CS_REG(R300_VAP_PVS_STATE_FLUSH_REG, 0x0);
 819     END_CS;
 820 }
 821
 822 void r300_emit_vs_state(struct r300_context* r300, unsigned size, void* state)
 823 {
 824     struct r300_vertex_shader* vs = (struct r300_vertex_shader*)state;
 825     struct r300_vertex_program_code* code = &vs->code;
 826     struct r300_screen* r300screen = r300->screen;
 827     unsigned instruction_count = code->length / 4;
 828     unsigned i;
 829
 830     unsigned vtx_mem_size = r300screen->caps.is_r500 ? 128 : 72;
 831     unsigned input_count = MAX2(util_bitcount(code->InputsRead), 1);
 832     unsigned output_count = MAX2(util_bitcount(code->OutputsWritten), 1);
 833     unsigned temp_count = MAX2(code->num_temporaries, 1);
 834
 835     unsigned pvs_num_slots = MIN3(vtx_mem_size / input_count,
 836                                   vtx_mem_size / output_count, 10);
 837     unsigned pvs_num_controllers = MIN2(vtx_mem_size / temp_count, 6);
 838
 839     unsigned imm_first = vs->externals_count;
 840     unsigned imm_end = vs->code.constants.Count;
 841     unsigned imm_count = vs->immediates_count;
 842
 843     CS_LOCALS(r300);
 844
 845     BEGIN_CS(size);
 846     /* Amount of time to wait for vertex fetches in PVS */
 847     OUT_CS_REG(VAP_PVS_VTX_TIMEOUT_REG, 0xffff);
 848
 849     OUT_CS_REG_SEQ(R300_VAP_GB_VERT_CLIP_ADJ, 4);
 850     OUT_CS_32F(1.0);
 851     OUT_CS_32F(1.0);
 852     OUT_CS_32F(1.0);
 853     OUT_CS_32F(1.0);
 854
 855     OUT_CS_REG(R300_VAP_PSC_SGN_NORM_CNTL, R300_SGN_NORM_NO_ZERO);
 856
 857     /* R300_VAP_PVS_CODE_CNTL_0
 858      * R300_VAP_PVS_CONST_CNTL
 859      * R300_VAP_PVS_CODE_CNTL_1
 860      * See the r5xx docs for instructions on how to use these. */
 861     OUT_CS_REG_SEQ(R300_VAP_PVS_CODE_CNTL_0, 3);
 862     OUT_CS(R300_PVS_FIRST_INST(0) |
 863             R300_PVS_XYZW_VALID_INST(instruction_count - 1) |
 864             R300_PVS_LAST_INST(instruction_count - 1));
 865     OUT_CS(R300_PVS_MAX_CONST_ADDR(code->constants.Count - 1));
 866     OUT_CS(instruction_count - 1);
 867
 868     OUT_CS_REG(R300_VAP_PVS_VECTOR_INDX_REG, 0);
 869     OUT_CS_ONE_REG(R300_VAP_PVS_UPLOAD_DATA, code->length);
 870     OUT_CS_TABLE(code->body.d, code->length);
 871
 872     OUT_CS_REG(R300_VAP_CNTL, R300_PVS_NUM_SLOTS(pvs_num_slots) |
 873             R300_PVS_NUM_CNTLRS(pvs_num_controllers) |
 874             R300_PVS_NUM_FPUS(r300screen->caps.num_vert_fpus) |
 875             R300_PVS_VF_MAX_VTX_NUM(12) |
 876             (r300screen->caps.is_r500 ? R500_TCL_STATE_OPTIMIZATION : 0));
 877
 878     /* Emit immediates. */
 879     if (imm_count) {
 880         OUT_CS_REG(R300_VAP_PVS_VECTOR_INDX_REG,
 881                    (r300->screen->caps.is_r500 ?
 882                    R500_PVS_CONST_START : R300_PVS_CONST_START) +
 883                    imm_first);
 884         OUT_CS_ONE_REG(R300_VAP_PVS_UPLOAD_DATA, imm_count * 4);
 885         for (i = imm_first; i < imm_end; i++) {
 886             const float *data = vs->code.constants.Constants[i].u.Immediate;
 887             OUT_CS_TABLE(data, 4);
 888         }
 889     }
 890     END_CS;
 891 }
 892
 893 void r300_emit_vs_constants(struct r300_context* r300,
 894                             unsigned size, void *state)
 895 {
 896     unsigned count =
 897         ((struct r300_vertex_shader*)r300->vs_state.state)->externals_count;
 898     struct r300_constant_buffer *buf = (struct r300_constant_buffer*)state;
 899     CS_LOCALS(r300);
 900
 901     if (!count)
 902         return;
 903
 904     BEGIN_CS(size);
 905     OUT_CS_REG(R300_VAP_PVS_VECTOR_INDX_REG,
 906                (r300->screen->caps.is_r500 ?
 907                R500_PVS_CONST_START : R300_PVS_CONST_START));
 908     OUT_CS_ONE_REG(R300_VAP_PVS_UPLOAD_DATA, count * 4);
 909     OUT_CS_TABLE(buf->constants, count * 4);
 910     END_CS;
 911 }
 912
 913 void r300_emit_viewport_state(struct r300_context* r300,
 914                               unsigned size, void* state)
 915 {
 916     struct r300_viewport_state* viewport = (struct r300_viewport_state*)state;
 917     CS_LOCALS(r300);
 918
 919     BEGIN_CS(size);
 920     OUT_CS_REG_SEQ(R300_SE_VPORT_XSCALE, 6);
 921     OUT_CS_TABLE(&viewport->xscale, 6);
 922     OUT_CS_REG(R300_VAP_VTE_CNTL, viewport->vte_control);
 923     END_CS;
 924 }
 925
 926 void r300_emit_ztop_state(struct r300_context* r300,
 927                           unsigned size, void* state)
 928 {
 929     struct r300_ztop_state* ztop = (struct r300_ztop_state*)state;
 930     CS_LOCALS(r300);
 931
 932     BEGIN_CS(size);
 933     OUT_CS_REG(R300_ZB_ZTOP, ztop->z_buffer_top);
 934     END_CS;
 935 }
 936
 937 void r300_emit_texture_cache_inval(struct r300_context* r300, unsigned size, void* state)
 938 {
 939     CS_LOCALS(r300);
 940
 941     BEGIN_CS(size);
 942     OUT_CS_REG(R300_TX_INVALTAGS, 0);
 943     END_CS;
 944 }
 945
 946 void r300_emit_buffer_validate(struct r300_context *r300,
 947                                boolean do_validate_vertex_buffers,
 948                                struct pipe_resource *index_buffer)
 949 {
 950     struct pipe_framebuffer_state* fb =
 951         (struct pipe_framebuffer_state*)r300->fb_state.state;
 952     struct r300_textures_state *texstate =
 953         (struct r300_textures_state*)r300->textures_state.state;
 954     struct r300_texture* tex;
 955     struct pipe_vertex_buffer *vbuf = r300->vertex_buffer;
 956     struct pipe_vertex_element *velem = r300->velems->velem;
 957     struct pipe_resource *pbuf;
 958     unsigned i;
 959     boolean invalid = FALSE;
 960
 961     /* upload buffers first */
 962     if (r300->screen->caps.has_tcl && r300->any_user_vbs) {
 963         r300_upload_user_buffers(r300);
 964         r300->any_user_vbs = false;
 965     }
 966
 967     /* Clean out BOs. */
 968     r300->rws->reset_bos(r300->rws);
 969
 970 validate:
 971     /* Color buffers... */
 972     for (i = 0; i < fb->nr_cbufs; i++) {
 973         tex = r300_texture(fb->cbufs[i]->texture);
 974         assert(tex && tex->buffer && "cbuf is marked, but NULL!");
 975         if (!r300_add_texture(r300->rws, tex, 0, tex->domain)) {
 976             r300->context.flush(&r300->context, 0, NULL);
 977             goto validate;
 978         }
 979     }
 980     /* ...depth buffer... */
 981     if (fb->zsbuf) {
 982         tex = r300_texture(fb->zsbuf->texture);
 983         assert(tex && tex->buffer && "zsbuf is marked, but NULL!");
 984         if (!r300_add_texture(r300->rws, tex,
 985                               0, tex->domain)) {
 986             r300->context.flush(&r300->context, 0, NULL);
 987             goto validate;
 988         }
 989     }
 990     /* ...textures... */
 991     for (i = 0; i < texstate->count; i++) {
 992         if (!(texstate->tx_enable & (1 << i))) {
 993             continue;
 994         }
 995
 996         tex = r300_texture(texstate->sampler_views[i]->base.texture);
 997         if (!r300_add_texture(r300->rws, tex, tex->domain, 0)) {
 998             r300->context.flush(&r300->context, 0, NULL);
 999             goto validate;
1000         }
1001     }
1002     /* ...occlusion query buffer... */
1003     if (r300->query_current) {
1004         if (!r300->rws->add_buffer(r300->rws, r300->query_current->buffer,
1005                                    0, r300->query_current->domain)) {
1006             r300->context.flush(&r300->context, 0, NULL);
1007             goto validate;
1008         }
1009     }
1010     /* ...vertex buffer for SWTCL path... */
1011     if (r300->vbo) {
1012         if (!r300_add_buffer(r300->rws, r300->vbo,
1013                              r300_buffer(r300->vbo)->domain, 0)) {
1014             r300->context.flush(&r300->context, 0, NULL);
1015             goto validate;
1016         }
1017     }
1018     /* ...vertex buffers for HWTCL path... */
1019     if (do_validate_vertex_buffers) {
1020         for (i = 0; i < r300->velems->count; i++) {
1021             pbuf = vbuf[velem[i].vertex_buffer_index].buffer;
1022
1023             if (!r300_add_buffer(r300->rws, pbuf,
1024                                  r300_buffer(pbuf)->domain, 0)) {
1025                 r300->context.flush(&r300->context, 0, NULL);
1026                 goto validate;
1027             }
1028         }
1029     }
1030     /* ...and index buffer for HWTCL path. */
1031     if (index_buffer) {
1032         if (!r300_add_buffer(r300->rws, index_buffer,
1033                              r300_buffer(index_buffer)->domain, 0)) {
1034             r300->context.flush(&r300->context, 0, NULL);
1035             goto validate;
1036         }
1037     }
1038     if (!r300->rws->validate(r300->rws)) {
1039         r300->context.flush(&r300->context, 0, NULL);
1040         if (invalid) {
1041             /* Well, hell. */
1042             fprintf(stderr, "r300: Stuck in validation loop, gonna quit now.\n");
1043             abort();
1044         }
1045         invalid = TRUE;
1046         goto validate;
1047     }
1048 }
1049
1050 unsigned r300_get_num_dirty_dwords(struct r300_context *r300)
1051 {
1052     struct r300_atom* atom;
1053     unsigned dwords = 0;
1054
1055     foreach(atom, &r300->atom_list) {
1056         if (atom->dirty) {
1057             dwords += atom->size;
1058         }
1059     }
1060
1061     /* let's reserve some more, just in case */
1062     dwords += 32;
1063
1064     return dwords;
1065 }
1066
1067 /* Emit all dirty state. */
1068 void r300_emit_dirty_state(struct r300_context* r300)
1069 {
1070     struct r300_atom* atom;
1071
1072     foreach(atom, &r300->atom_list) {
1073         if (atom->dirty) {
1074             atom->emit(r300, atom->size, atom->state);
1075             if (SCREEN_DBG_ON(r300->screen, DBG_STATS)) {
1076                 atom->counter++;
1077             }
1078             atom->dirty = FALSE;
1079         }
1080     }
1081
1082     r300->dirty_hw++;
1083 }