src/gallium/drivers/r300/r300_emit.c

   1 /*
   2  * Copyright 2008 Corbin Simpson <MostAwesomeDude@gmail.com>
   3  *
   4  * Permission is hereby granted, free of charge, to any person obtaining a
   5  * copy of this software and associated documentation files (the "Software"),
   6  * to deal in the Software without restriction, including without limitation
   7  * on the rights to use, copy, modify, merge, publish, distribute, sub
   8  * license, and/or sell copies of the Software, and to permit persons to whom
   9  * the Software is furnished to do so, subject to the following conditions:
  10  *
  11  * The above copyright notice and this permission notice (including the next
  12  * paragraph) shall be included in all copies or substantial portions of the
  13  * Software.
  14  *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
  18  * THE AUTHOR(S) AND/OR THEIR SUPPLIERS BE LIABLE FOR ANY CLAIM,
  19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
  20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
  21  * USE OR OTHER DEALINGS IN THE SOFTWARE. */
  22
  23 /* r300_emit: Functions for emitting state. */
  24
  25 #include "r300_emit.h"
  26
  27 #include "r300_fs.h"
  28 #include "r300_vs.h"
  29
  30 void r300_emit_blend_state(struct r300_context* r300,
  31                            struct r300_blend_state* blend)
  32 {
  33     CS_LOCALS(r300);
  34     BEGIN_CS(7);
  35     OUT_CS_REG_SEQ(R300_RB3D_CBLEND, 2);
  36     OUT_CS(blend->blend_control);
  37     OUT_CS(blend->alpha_blend_control);
  38     OUT_CS_REG(R300_RB3D_ROPCNTL, blend->rop);
  39     OUT_CS_REG(R300_RB3D_DITHER_CTL, blend->dither);
  40     END_CS;
  41 }
  42
  43 void r300_emit_blend_color_state(struct r300_context* r300,
  44                                  struct r300_blend_color_state* bc)
  45 {
  46     struct r300_screen* r300screen = r300_screen(r300->context.screen);
  47     CS_LOCALS(r300);
  48
  49     if (r300screen->caps->is_r500) {
  50         BEGIN_CS(3);
  51         OUT_CS_REG_SEQ(R500_RB3D_CONSTANT_COLOR_AR, 2);
  52         OUT_CS(bc->blend_color_red_alpha);
  53         OUT_CS(bc->blend_color_green_blue);
  54         END_CS;
  55     } else {
  56         BEGIN_CS(2);
  57         OUT_CS_REG(R300_RB3D_BLEND_COLOR, bc->blend_color);
  58         END_CS;
  59     }
  60 }
  61
  62 void r300_emit_clip_state(struct r300_context* r300,
  63                           struct pipe_clip_state* clip)
  64 {
  65     int i;
  66     struct r300_screen* r300screen = r300_screen(r300->context.screen);
  67     CS_LOCALS(r300);
  68
  69     if (r300screen->caps->has_tcl) {
  70         BEGIN_CS(5 + (6 * 4));
  71         OUT_CS_REG(R300_VAP_PVS_VECTOR_INDX_REG,
  72                 (r300screen->caps->is_r500 ?
  73                  R500_PVS_UCP_START : R300_PVS_UCP_START));
  74         OUT_CS_ONE_REG(R300_VAP_PVS_UPLOAD_DATA, 6 * 4);
  75         for (i = 0; i < 6; i++) {
  76             OUT_CS_32F(clip->ucp[i][0]);
  77             OUT_CS_32F(clip->ucp[i][1]);
  78             OUT_CS_32F(clip->ucp[i][2]);
  79             OUT_CS_32F(clip->ucp[i][3]);
  80         }
  81         OUT_CS_REG(R300_VAP_CLIP_CNTL, ((1 << clip->nr) - 1) |
  82                 R300_PS_UCP_MODE_CLIP_AS_TRIFAN);
  83         END_CS;
  84     } else {
  85         BEGIN_CS(2);
  86         OUT_CS_REG(R300_VAP_CLIP_CNTL, R300_CLIP_DISABLE);
  87         END_CS;
  88     }
  89
  90 }
  91
  92 void r300_emit_dsa_state(struct r300_context* r300,
  93                            struct r300_dsa_state* dsa)
  94 {
  95     struct r300_screen* r300screen = r300_screen(r300->context.screen);
  96     CS_LOCALS(r300);
  97
  98     BEGIN_CS(r300screen->caps->is_r500 ? 8 : 8);
  99     OUT_CS_REG(R300_FG_ALPHA_FUNC, dsa->alpha_function);
 100     /* XXX figure out the r300 counterpart for this */
 101     if (r300screen->caps->is_r500) {
 102         /* OUT_CS_REG(R500_FG_ALPHA_VALUE, dsa->alpha_reference); */
 103     }
 104     OUT_CS_REG_SEQ(R300_ZB_CNTL, 3);
 105     OUT_CS(dsa->z_buffer_control);
 106     OUT_CS(dsa->z_stencil_control);
 107     OUT_CS(dsa->stencil_ref_mask);
 108     OUT_CS_REG(R300_ZB_ZTOP, dsa->z_buffer_top);
 109     if (r300screen->caps->is_r500) {
 110         /* OUT_CS_REG(R500_ZB_STENCILREFMASK_BF, dsa->stencil_ref_bf); */
 111     }
 112     END_CS;
 113 }
 114
 115 static const float * get_shader_constant(
 116     struct r300_context * r300,
 117     struct rc_constant * constant,
 118     struct r300_constant_buffer * externals)
 119 {
 120     static const float zero[4] = { 0.0, 0.0, 0.0, 0.0 };
 121     switch(constant->Type) {
 122         case RC_CONSTANT_EXTERNAL:
 123             return externals->constants[constant->u.External];
 124
 125         case RC_CONSTANT_IMMEDIATE:
 126             return constant->u.Immediate;
 127
 128         default:
 129             debug_printf("r300: Implementation error: Unhandled constant type %i\n",
 130                 constant->Type);
 131             return zero;
 132     }
 133 }
 134
 135 /* Convert a normal single-precision float into the 7.16 format
 136  * used by the R300 fragment shader.
 137  */
 138 static uint32_t pack_float24(float f)
 139 {
 140     union {
 141         float fl;
 142         uint32_t u;
 143     } u;
 144     float mantissa;
 145     int exponent;
 146     uint32_t float24 = 0;
 147
 148     if (f == 0.0)
 149         return 0;
 150
 151     u.fl = f;
 152
 153     mantissa = frexpf(f, &exponent);
 154
 155     /* Handle -ve */
 156     if (mantissa < 0) {
 157         float24 |= (1 << 23);
 158         mantissa = mantissa * -1.0;
 159     }
 160     /* Handle exponent, bias of 63 */
 161     exponent += 62;
 162     float24 |= (exponent << 16);
 163     /* Kill 7 LSB of mantissa */
 164     float24 |= (u.u & 0x7FFFFF) >> 7;
 165
 166     return float24;
 167 }
 168
 169 void r300_emit_fragment_program_code(struct r300_context* r300,
 170                                      struct rX00_fragment_program_code* generic_code,
 171                                      struct r300_constant_buffer* externals)
 172 {
 173     struct r300_fragment_program_code * code = &generic_code->code.r300;
 174     struct rc_constant_list * constants = &generic_code->constants;
 175     int i;
 176     CS_LOCALS(r300);
 177
 178     BEGIN_CS(15 +
 179              code->alu.length * 4 +
 180              (code->tex.length ? (1 + code->tex.length) : 0) +
 181              (constants->Count ? (1 + constants->Count * 4) : 0));
 182
 183     OUT_CS_REG(R300_US_CONFIG, code->config);
 184     OUT_CS_REG(R300_US_PIXSIZE, code->pixsize);
 185     OUT_CS_REG(R300_US_CODE_OFFSET, code->code_offset);
 186
 187     OUT_CS_REG_SEQ(R300_US_CODE_ADDR_0, 4);
 188     for(i = 0; i < 4; ++i)
 189         OUT_CS(code->code_addr[i]);
 190
 191     OUT_CS_REG_SEQ(R300_US_ALU_RGB_INST_0, code->alu.length);
 192     for (i = 0; i < code->alu.length; i++)
 193         OUT_CS(code->alu.inst[i].rgb_inst);
 194
 195     OUT_CS_REG_SEQ(R300_US_ALU_RGB_ADDR_0, code->alu.length);
 196     for (i = 0; i < code->alu.length; i++)
 197         OUT_CS(code->alu.inst[i].rgb_addr);
 198
 199     OUT_CS_REG_SEQ(R300_US_ALU_ALPHA_INST_0, code->alu.length);
 200     for (i = 0; i < code->alu.length; i++)
 201         OUT_CS(code->alu.inst[i].alpha_inst);
 202
 203     OUT_CS_REG_SEQ(R300_US_ALU_ALPHA_ADDR_0, code->alu.length);
 204     for (i = 0; i < code->alu.length; i++)
 205         OUT_CS(code->alu.inst[i].alpha_addr);
 206
 207     if (code->tex.length) {
 208         OUT_CS_REG_SEQ(R300_US_TEX_INST_0, code->tex.length);
 209         for(i = 0; i < code->tex.length; ++i)
 210             OUT_CS(code->tex.inst[i]);
 211     }
 212
 213     if (constants->Count) {
 214         OUT_CS_ONE_REG(R300_PFS_PARAM_0_X, constants->Count * 4);
 215         for(i = 0; i < constants->Count; ++i) {
 216             const float * data = get_shader_constant(r300, &constants->Constants[i], externals);
 217             OUT_CS(pack_float24(data[0]));
 218             OUT_CS(pack_float24(data[1]));
 219             OUT_CS(pack_float24(data[2]));
 220             OUT_CS(pack_float24(data[3]));
 221         }
 222     }
 223
 224     END_CS;
 225 }
 226
 227 void r500_emit_fragment_program_code(struct r300_context* r300,
 228                                      struct rX00_fragment_program_code* generic_code,
 229                                      struct r300_constant_buffer* externals)
 230 {
 231     struct r500_fragment_program_code * code = &generic_code->code.r500;
 232     struct rc_constant_list * constants = &generic_code->constants;
 233     int i;
 234     CS_LOCALS(r300);
 235
 236     BEGIN_CS(13 +
 237              ((code->inst_end + 1) * 6) +
 238              (constants->Count ? (3 + (constants->Count * 4)) : 0));
 239     OUT_CS_REG(R500_US_CONFIG, 0);
 240     OUT_CS_REG(R500_US_PIXSIZE, code->max_temp_idx);
 241     OUT_CS_REG(R500_US_CODE_RANGE,
 242                R500_US_CODE_RANGE_ADDR(0) | R500_US_CODE_RANGE_SIZE(code->inst_end));
 243     OUT_CS_REG(R500_US_CODE_OFFSET, 0);
 244     OUT_CS_REG(R500_US_CODE_ADDR,
 245                R500_US_CODE_START_ADDR(0) | R500_US_CODE_END_ADDR(code->inst_end));
 246
 247     OUT_CS_REG(R500_GA_US_VECTOR_INDEX, R500_GA_US_VECTOR_INDEX_TYPE_INSTR);
 248     OUT_CS_ONE_REG(R500_GA_US_VECTOR_DATA, (code->inst_end + 1) * 6);
 249     for (i = 0; i <= code->inst_end; i++) {
 250         OUT_CS(code->inst[i].inst0);
 251         OUT_CS(code->inst[i].inst1);
 252         OUT_CS(code->inst[i].inst2);
 253         OUT_CS(code->inst[i].inst3);
 254         OUT_CS(code->inst[i].inst4);
 255         OUT_CS(code->inst[i].inst5);
 256     }
 257
 258     if (constants->Count) {
 259         OUT_CS_REG(R500_GA_US_VECTOR_INDEX, R500_GA_US_VECTOR_INDEX_TYPE_CONST);
 260         OUT_CS_ONE_REG(R500_GA_US_VECTOR_DATA, constants->Count * 4);
 261         for (i = 0; i < constants->Count; i++) {
 262             const float * data = get_shader_constant(r300, &constants->Constants[i], externals);
 263             OUT_CS_32F(data[0]);
 264             OUT_CS_32F(data[1]);
 265             OUT_CS_32F(data[2]);
 266             OUT_CS_32F(data[3]);
 267         }
 268     }
 269
 270     END_CS;
 271 }
 272
 273 void r300_emit_fb_state(struct r300_context* r300,
 274                         struct pipe_framebuffer_state* fb)
 275 {
 276     struct r300_texture* tex;
 277     unsigned pixpitch;
 278     int i;
 279     CS_LOCALS(r300);
 280
 281     BEGIN_CS((8 * fb->nr_cbufs) + (fb->zsbuf ? 8 : 0) + 4);
 282     for (i = 0; i < fb->nr_cbufs; i++) {
 283         tex = (struct r300_texture*)fb->cbufs[i]->texture;
 284         assert(tex && tex->buffer && "cbuf is marked, but NULL!");
 285         pixpitch = tex->stride / tex->tex.block.size;
 286
 287         OUT_CS_REG_SEQ(R300_RB3D_COLOROFFSET0 + (4 * i), 1);
 288         OUT_CS_RELOC(tex->buffer, 0, 0, RADEON_GEM_DOMAIN_VRAM, 0);
 289
 290         OUT_CS_REG(R300_RB3D_COLORPITCH0 + (4 * i), pixpitch |
 291             r300_translate_colorformat(tex->tex.format));
 292
 293         OUT_CS_REG(R300_US_OUT_FMT_0 + (4 * i),
 294             r300_translate_out_fmt(fb->cbufs[i]->format));
 295     }
 296
 297     if (fb->zsbuf) {
 298         tex = (struct r300_texture*)fb->zsbuf->texture;
 299         assert(tex && tex->buffer && "zsbuf is marked, but NULL!");
 300         pixpitch = tex->stride / tex->tex.block.size;
 301
 302         OUT_CS_REG_SEQ(R300_ZB_DEPTHOFFSET, 1);
 303         OUT_CS_RELOC(tex->buffer, 0, 0, RADEON_GEM_DOMAIN_VRAM, 0);
 304
 305         OUT_CS_REG(R300_ZB_FORMAT, r300_translate_zsformat(tex->tex.format));
 306
 307         OUT_CS_REG(R300_ZB_DEPTHPITCH, pixpitch);
 308     }
 309
 310     OUT_CS_REG(R300_RB3D_DSTCACHE_CTLSTAT,
 311         R300_RB3D_DSTCACHE_CTLSTAT_DC_FREE_FREE_3D_TAGS |
 312         R300_RB3D_DSTCACHE_CTLSTAT_DC_FLUSH_FLUSH_DIRTY_3D);
 313     OUT_CS_REG(R300_ZB_ZCACHE_CTLSTAT,
 314         R300_ZB_ZCACHE_CTLSTAT_ZC_FLUSH_FLUSH_AND_FREE |
 315         R300_ZB_ZCACHE_CTLSTAT_ZC_FREE_FREE);
 316     END_CS;
 317 }
 318
 319 void r300_emit_rs_state(struct r300_context* r300, struct r300_rs_state* rs)
 320 {
 321     CS_LOCALS(r300);
 322
 323     BEGIN_CS(20);
 324     OUT_CS_REG(R300_VAP_CNTL_STATUS, rs->vap_control_status);
 325     OUT_CS_REG(R300_GA_POINT_SIZE, rs->point_size);
 326     OUT_CS_REG_SEQ(R300_GA_POINT_MINMAX, 2);
 327     OUT_CS(rs->point_minmax);
 328     OUT_CS(rs->line_control);
 329     OUT_CS_REG_SEQ(R300_SU_POLY_OFFSET_FRONT_SCALE, 6);
 330     OUT_CS(rs->depth_scale_front);
 331     OUT_CS(rs->depth_offset_front);
 332     OUT_CS(rs->depth_scale_back);
 333     OUT_CS(rs->depth_offset_back);
 334     OUT_CS(rs->polygon_offset_enable);
 335     OUT_CS(rs->cull_mode);
 336     OUT_CS_REG(R300_GA_LINE_STIPPLE_CONFIG, rs->line_stipple_config);
 337     OUT_CS_REG(R300_GA_LINE_STIPPLE_VALUE, rs->line_stipple_value);
 338     OUT_CS_REG(R300_GA_COLOR_CONTROL, rs->color_control);
 339     END_CS;
 340 }
 341
 342 void r300_emit_rs_block_state(struct r300_context* r300,
 343                               struct r300_rs_block* rs)
 344 {
 345     int i;
 346     struct r300_screen* r300screen = r300_screen(r300->context.screen);
 347     CS_LOCALS(r300);
 348
 349     BEGIN_CS(21);
 350     if (r300screen->caps->is_r500) {
 351         OUT_CS_REG_SEQ(R500_RS_IP_0, 8);
 352     } else {
 353         OUT_CS_REG_SEQ(R300_RS_IP_0, 8);
 354     }
 355     for (i = 0; i < 8; i++) {
 356         OUT_CS(rs->ip[i]);
 357         /* debug_printf("ip %d: 0x%08x\n", i, rs->ip[i]); */
 358     }
 359
 360     OUT_CS_REG_SEQ(R300_RS_COUNT, 2);
 361     OUT_CS(rs->count);
 362     OUT_CS(rs->inst_count);
 363
 364     if (r300screen->caps->is_r500) {
 365         OUT_CS_REG_SEQ(R500_RS_INST_0, 8);
 366     } else {
 367         OUT_CS_REG_SEQ(R300_RS_INST_0, 8);
 368     }
 369     for (i = 0; i < 8; i++) {
 370         OUT_CS(rs->inst[i]);
 371         /* debug_printf("inst %d: 0x%08x\n", i, rs->inst[i]); */
 372     }
 373
 374     /* debug_printf("count: 0x%08x inst_count: 0x%08x\n", rs->count,
 375      *        rs->inst_count); */
 376
 377     END_CS;
 378 }
 379
 380 void r300_emit_scissor_state(struct r300_context* r300,
 381                              struct r300_scissor_state* scissor)
 382 {
 383     CS_LOCALS(r300);
 384
 385     BEGIN_CS(3);
 386     OUT_CS_REG_SEQ(R300_SC_SCISSORS_TL, 2);
 387     OUT_CS(scissor->scissor_top_left);
 388     OUT_CS(scissor->scissor_bottom_right);
 389     END_CS;
 390 }
 391
 392 void r300_emit_texture(struct r300_context* r300,
 393                        struct r300_sampler_state* sampler,
 394                        struct r300_texture* tex,
 395                        unsigned offset)
 396 {
 397     CS_LOCALS(r300);
 398
 399     BEGIN_CS(16);
 400     OUT_CS_REG(R300_TX_FILTER0_0 + (offset * 4), sampler->filter0);
 401     OUT_CS_REG(R300_TX_FILTER1_0 + (offset * 4), sampler->filter1);
 402     OUT_CS_REG(R300_TX_BORDER_COLOR_0 + (offset * 4), sampler->border_color);
 403
 404     OUT_CS_REG(R300_TX_FORMAT0_0 + (offset * 4), tex->state.format0);
 405     OUT_CS_REG(R300_TX_FORMAT1_0 + (offset * 4), tex->state.format1);
 406     OUT_CS_REG(R300_TX_FORMAT2_0 + (offset * 4), tex->state.format2);
 407     OUT_CS_REG_SEQ(R300_TX_OFFSET_0 + (offset * 4), 1);
 408     OUT_CS_RELOC(tex->buffer, 0,
 409             RADEON_GEM_DOMAIN_GTT | RADEON_GEM_DOMAIN_VRAM, 0, 0);
 410     END_CS;
 411 }
 412
 413 void r300_emit_vertex_buffer(struct r300_context* r300)
 414 {
 415     CS_LOCALS(r300);
 416
 417     debug_printf("r300: Preparing vertex buffer %p for render, "
 418             "vertex size %d\n", r300->vbo,
 419             r300->vertex_info.vinfo.size);
 420     /* Set the pointer to our vertex buffer. The emitted values are this:
 421      * PACKET3 [3D_LOAD_VBPNTR]
 422      * COUNT   [1]
 423      * FORMAT  [size | stride << 8]
 424      * OFFSET  [offset into BO]
 425      * VBPNTR  [relocated BO]
 426      */
 427     BEGIN_CS(7);
 428     OUT_CS_PKT3(R300_PACKET3_3D_LOAD_VBPNTR, 3);
 429     OUT_CS(1);
 430     OUT_CS(r300->vertex_info.vinfo.size |
 431             (r300->vertex_info.vinfo.size << 8));
 432     OUT_CS(r300->vbo_offset);
 433     OUT_CS_RELOC(r300->vbo, 0, RADEON_GEM_DOMAIN_GTT, 0, 0);
 434     END_CS;
 435 }
 436
 437 void r300_emit_vertex_format_state(struct r300_context* r300)
 438 {
 439     int i;
 440     CS_LOCALS(r300);
 441
 442     BEGIN_CS(26);
 443     OUT_CS_REG(R300_VAP_VTX_SIZE, r300->vertex_info.vinfo.size);
 444
 445     OUT_CS_REG_SEQ(R300_VAP_VTX_STATE_CNTL, 2);
 446     OUT_CS(r300->vertex_info.vinfo.hwfmt[0]);
 447     OUT_CS(r300->vertex_info.vinfo.hwfmt[1]);
 448     OUT_CS_REG_SEQ(R300_VAP_OUTPUT_VTX_FMT_0, 2);
 449     OUT_CS(r300->vertex_info.vinfo.hwfmt[2]);
 450     OUT_CS(r300->vertex_info.vinfo.hwfmt[3]);
 451     /* for (i = 0; i < 4; i++) {
 452      *    debug_printf("hwfmt%d: 0x%08x\n", i,
 453      *            r300->vertex_info.vinfo.hwfmt[i]);
 454      * } */
 455
 456     OUT_CS_REG_SEQ(R300_VAP_PROG_STREAM_CNTL_0, 8);
 457     for (i = 0; i < 8; i++) {
 458         OUT_CS(r300->vertex_info.vap_prog_stream_cntl[i]);
 459         /* debug_printf("prog_stream_cntl%d: 0x%08x\n", i,
 460          *        r300->vertex_info.vap_prog_stream_cntl[i]); */
 461     }
 462     OUT_CS_REG_SEQ(R300_VAP_PROG_STREAM_CNTL_EXT_0, 8);
 463     for (i = 0; i < 8; i++) {
 464         OUT_CS(r300->vertex_info.vap_prog_stream_cntl_ext[i]);
 465         /* debug_printf("prog_stream_cntl_ext%d: 0x%08x\n", i,
 466          *        r300->vertex_info.vap_prog_stream_cntl_ext[i]); */
 467     }
 468     END_CS;
 469 }
 470
 471 void r300_emit_vertex_program_code(struct r300_context* r300,
 472                                    struct r300_vertex_program_code* code,
 473                                    struct r300_constant_buffer* constants)
 474 {
 475     int i;
 476     struct r300_screen* r300screen = r300_screen(r300->context.screen);
 477     unsigned instruction_count = code->length / 4;
 478     CS_LOCALS(r300);
 479
 480     if (!r300screen->caps->has_tcl) {
 481         debug_printf("r300: Implementation error: emit_vertex_shader called,"
 482                 " but has_tcl is FALSE!\n");
 483         return;
 484     }
 485
 486     if (code->constants.Count) {
 487         BEGIN_CS(14 + code->length + (code->constants.Count * 4));
 488     } else {
 489         BEGIN_CS(11 + code->length);
 490     }
 491
 492     /* R300_VAP_PVS_CODE_CNTL_0
 493      * R300_VAP_PVS_CONST_CNTL
 494      * R300_VAP_PVS_CODE_CNTL_1
 495      * See the r5xx docs for instructions on how to use these.
 496      * XXX these could be optimized to select better values... */
 497     OUT_CS_REG_SEQ(R300_VAP_PVS_CODE_CNTL_0, 3);
 498     OUT_CS(R300_PVS_FIRST_INST(0) |
 499             R300_PVS_XYZW_VALID_INST(instruction_count - 1) |
 500             R300_PVS_LAST_INST(instruction_count - 1));
 501     OUT_CS(R300_PVS_MAX_CONST_ADDR(code->constants.Count - 1));
 502     OUT_CS(instruction_count - 1);
 503
 504     OUT_CS_REG(R300_VAP_PVS_VECTOR_INDX_REG, 0);
 505     OUT_CS_ONE_REG(R300_VAP_PVS_UPLOAD_DATA, code->length);
 506     for (i = 0; i < code->length; i++)
 507         OUT_CS(code->body.d[i]);
 508
 509     if (code->constants.Count) {
 510         OUT_CS_REG(R300_VAP_PVS_VECTOR_INDX_REG,
 511                 (r300screen->caps->is_r500 ?
 512                  R500_PVS_CONST_START : R300_PVS_CONST_START));
 513         OUT_CS_ONE_REG(R300_VAP_PVS_UPLOAD_DATA, code->constants.Count * 4);
 514         for (i = 0; i < code->constants.Count; i++) {
 515             const float * data = get_shader_constant(r300, &code->constants.Constants[i], constants);
 516             OUT_CS_32F(data[0]);
 517             OUT_CS_32F(data[1]);
 518             OUT_CS_32F(data[2]);
 519             OUT_CS_32F(data[3]);
 520         }
 521     }
 522
 523     OUT_CS_REG(R300_VAP_CNTL, R300_PVS_NUM_SLOTS(10) |
 524             R300_PVS_NUM_CNTLRS(5) |
 525             R300_PVS_NUM_FPUS(r300screen->caps->num_vert_fpus) |
 526             R300_PVS_VF_MAX_VTX_NUM(12));
 527     OUT_CS_REG(R300_VAP_PVS_STATE_FLUSH_REG, 0x0);
 528     END_CS;
 529 }
 530
 531 void r300_emit_vertex_shader(struct r300_context* r300,
 532                              struct r300_vertex_shader* vs)
 533 {
 534     r300_emit_vertex_program_code(r300, &vs->code, &r300->shader_constants[PIPE_SHADER_VERTEX]);
 535 }
 536
 537 void r300_emit_viewport_state(struct r300_context* r300,
 538                               struct r300_viewport_state* viewport)
 539 {
 540     CS_LOCALS(r300);
 541
 542     BEGIN_CS(9);
 543     OUT_CS_REG_SEQ(R300_SE_VPORT_XSCALE, 6);
 544     OUT_CS_32F(viewport->xscale);
 545     OUT_CS_32F(viewport->xoffset);
 546     OUT_CS_32F(viewport->yscale);
 547     OUT_CS_32F(viewport->yoffset);
 548     OUT_CS_32F(viewport->zscale);
 549     OUT_CS_32F(viewport->zoffset);
 550
 551     if (r300->rs_state->enable_vte) {
 552         OUT_CS_REG(R300_VAP_VTE_CNTL, viewport->vte_control);
 553     } else {
 554         OUT_CS_REG(R300_VAP_VTE_CNTL, 0);
 555     }
 556     END_CS;
 557 }
 558
 559 void r300_flush_textures(struct r300_context* r300)
 560 {
 561     CS_LOCALS(r300);
 562
 563     BEGIN_CS(4);
 564     OUT_CS_REG(R300_TX_INVALTAGS, 0);
 565     OUT_CS_REG(R300_TX_ENABLE, (1 << r300->texture_count) - 1);
 566     END_CS;
 567 }
 568
 569 /* Emit all dirty state. */
 570 void r300_emit_dirty_state(struct r300_context* r300)
 571 {
 572     struct r300_screen* r300screen = r300_screen(r300->context.screen);
 573     struct r300_texture* tex;
 574     int i, dirty_tex = 0;
 575     boolean invalid = FALSE;
 576
 577     if (!(r300->dirty_state)) {
 578         return;
 579     }
 580
 581     r300_update_derived_state(r300);
 582
 583     /* XXX check size */
 584 validate:
 585     /* Color buffers... */
 586     for (i = 0; i < r300->framebuffer_state.nr_cbufs; i++) {
 587         tex = (struct r300_texture*)r300->framebuffer_state.cbufs[i]->texture;
 588         assert(tex && tex->buffer && "cbuf is marked, but NULL!");
 589         if (!r300->winsys->add_buffer(r300->winsys, tex->buffer,
 590                     0, RADEON_GEM_DOMAIN_VRAM)) {
 591             r300->context.flush(&r300->context, 0, NULL);
 592             goto validate;
 593         }
 594     }
 595     /* ...depth buffer... */
 596     if (r300->framebuffer_state.zsbuf) {
 597         tex = (struct r300_texture*)r300->framebuffer_state.zsbuf->texture;
 598         assert(tex && tex->buffer && "zsbuf is marked, but NULL!");
 599         if (!r300->winsys->add_buffer(r300->winsys, tex->buffer,
 600                     0, RADEON_GEM_DOMAIN_VRAM)) {
 601             r300->context.flush(&r300->context, 0, NULL);
 602             goto validate;
 603         }
 604     }
 605     /* ...textures... */
 606     for (i = 0; i < r300->texture_count; i++) {
 607         tex = r300->textures[i];
 608         assert(tex && tex->buffer && "texture is marked, but NULL!");
 609         if (!r300->winsys->add_buffer(r300->winsys, tex->buffer,
 610                     RADEON_GEM_DOMAIN_GTT | RADEON_GEM_DOMAIN_VRAM, 0)) {
 611             r300->context.flush(&r300->context, 0, NULL);
 612             goto validate;
 613         }
 614     }
 615     /* ...and vertex buffer. */
 616     if (r300->vbo) {
 617         if (!r300->winsys->add_buffer(r300->winsys, r300->vbo,
 618                     RADEON_GEM_DOMAIN_GTT, 0)) {
 619             r300->context.flush(&r300->context, 0, NULL);
 620             goto validate;
 621         }
 622     } else {
 623         debug_printf("No VBO while emitting dirty state!\n");
 624     }
 625     if (!r300->winsys->validate(r300->winsys)) {
 626         r300->context.flush(&r300->context, 0, NULL);
 627         if (invalid) {
 628             /* Well, hell. */
 629             debug_printf("r300: Stuck in validation loop, gonna quit now.");
 630             exit(1);
 631         }
 632         invalid = TRUE;
 633         goto validate;
 634     }
 635
 636     if (r300->dirty_state & R300_NEW_BLEND) {
 637         r300_emit_blend_state(r300, r300->blend_state);
 638         r300->dirty_state &= ~R300_NEW_BLEND;
 639     }
 640
 641     if (r300->dirty_state & R300_NEW_BLEND_COLOR) {
 642         r300_emit_blend_color_state(r300, r300->blend_color_state);
 643         r300->dirty_state &= ~R300_NEW_BLEND_COLOR;
 644     }
 645
 646     if (r300->dirty_state & R300_NEW_CLIP) {
 647         r300_emit_clip_state(r300, &r300->clip_state);
 648         r300->dirty_state &= ~R300_NEW_CLIP;
 649     }
 650
 651     if (r300->dirty_state & R300_NEW_DSA) {
 652         r300_emit_dsa_state(r300, r300->dsa_state);
 653         r300->dirty_state &= ~R300_NEW_DSA;
 654     }
 655
 656     if (r300->dirty_state & R300_NEW_FRAGMENT_SHADER) {
 657         if (r300screen->caps->is_r500) {
 658             r500_emit_fragment_program_code(r300, &r300->fs->code, &r300->shader_constants[PIPE_SHADER_FRAGMENT]);
 659         } else {
 660             r300_emit_fragment_program_code(r300, &r300->fs->code, &r300->shader_constants[PIPE_SHADER_FRAGMENT]);
 661         }
 662         r300->dirty_state &= ~R300_NEW_FRAGMENT_SHADER;
 663     }
 664
 665     if (r300->dirty_state & R300_NEW_FRAMEBUFFERS) {
 666         r300_emit_fb_state(r300, &r300->framebuffer_state);
 667         r300->dirty_state &= ~R300_NEW_FRAMEBUFFERS;
 668     }
 669
 670     if (r300->dirty_state & R300_NEW_RASTERIZER) {
 671         r300_emit_rs_state(r300, r300->rs_state);
 672         r300->dirty_state &= ~R300_NEW_RASTERIZER;
 673     }
 674
 675     if (r300->dirty_state & R300_NEW_RS_BLOCK) {
 676         r300_emit_rs_block_state(r300, r300->rs_block);
 677         r300->dirty_state &= ~R300_NEW_RS_BLOCK;
 678     }
 679
 680     if (r300->dirty_state & R300_NEW_SCISSOR) {
 681         r300_emit_scissor_state(r300, r300->scissor_state);
 682         r300->dirty_state &= ~R300_NEW_SCISSOR;
 683     }
 684
 685     /* Samplers and textures are tracked separately but emitted together. */
 686     if (r300->dirty_state &
 687             (R300_ANY_NEW_SAMPLERS | R300_ANY_NEW_TEXTURES)) {
 688         for (i = 0; i < MIN2(r300->sampler_count, r300->texture_count); i++) {
 689             if (r300->dirty_state &
 690                     ((R300_NEW_SAMPLER << i) | (R300_NEW_TEXTURE << i))) {
 691                 r300_emit_texture(r300,
 692                         r300->sampler_states[i],
 693                         r300->textures[i],
 694                         i);
 695                 r300->dirty_state &=
 696                     ~((R300_NEW_SAMPLER << i) | (R300_NEW_TEXTURE << i));
 697                 dirty_tex++;
 698             }
 699         }
 700         r300->dirty_state &= ~(R300_ANY_NEW_SAMPLERS | R300_ANY_NEW_TEXTURES);
 701     }
 702
 703     if (r300->dirty_state & R300_NEW_VIEWPORT) {
 704         r300_emit_viewport_state(r300, r300->viewport_state);
 705         r300->dirty_state &= ~R300_NEW_VIEWPORT;
 706     }
 707
 708     if (dirty_tex) {
 709         r300_flush_textures(r300);
 710     }
 711
 712     if (r300->dirty_state & R300_NEW_VERTEX_FORMAT) {
 713         r300_emit_vertex_format_state(r300);
 714         r300->dirty_state &= ~R300_NEW_VERTEX_FORMAT;
 715     }
 716
 717     if (r300->dirty_state & R300_NEW_VERTEX_SHADER) {
 718         r300_emit_vertex_shader(r300, r300->vs);
 719         r300->dirty_state &= ~R300_NEW_VERTEX_SHADER;
 720     }
 721
 722     /* XXX
 723     assert(r300->dirty_state == 0);
 724     */
 725
 726     /* Finally, emit the VBO. */
 727     r300_emit_vertex_buffer(r300);
 728
 729     r300->dirty_hw++;
 730 }