r300_state.c revision 6abe6145fb3b642fc2ae1d6ad2cc9de045efe0cb
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#include "draw/draw_context.h"
25
26#include "util/u_math.h"
27#include "util/u_memory.h"
28#include "util/u_pack_color.h"
29
30#include "tgsi/tgsi_parse.h"
31
32#include "pipe/p_config.h"
33
34#include "r300_context.h"
35#include "r300_reg.h"
36#include "r300_screen.h"
37#include "r300_state_inlines.h"
38#include "r300_fs.h"
39#include "r300_vs.h"
40
41#include "radeon_winsys.h"
42
43/* r300_state: Functions used to intialize state context by translating
44 * Gallium state objects into semi-native r300 state objects. */
45
46#define UPDATE_STATE(cso, atom) \
47    if (cso != atom.state) { \
48        atom.state = cso;    \
49        atom.dirty = TRUE;   \
50    }
51
52static boolean blend_discard_if_src_alpha_0(unsigned srcRGB, unsigned srcA,
53                                            unsigned dstRGB, unsigned dstA)
54{
55    /* If the blend equation is ADD or REVERSE_SUBTRACT,
56     * SRC_ALPHA == 0, and the following state is set, the colorbuffer
57     * will not be changed.
58     * Notice that the dst factors are the src factors inverted. */
59    return (srcRGB == PIPE_BLENDFACTOR_SRC_ALPHA ||
60            srcRGB == PIPE_BLENDFACTOR_SRC_ALPHA_SATURATE ||
61            srcRGB == PIPE_BLENDFACTOR_ZERO) &&
62           (srcA == PIPE_BLENDFACTOR_SRC_COLOR ||
63            srcA == PIPE_BLENDFACTOR_SRC_ALPHA ||
64            srcA == PIPE_BLENDFACTOR_SRC_ALPHA_SATURATE ||
65            srcA == PIPE_BLENDFACTOR_ZERO) &&
66           (dstRGB == PIPE_BLENDFACTOR_INV_SRC_ALPHA ||
67            dstRGB == PIPE_BLENDFACTOR_ONE) &&
68           (dstA == PIPE_BLENDFACTOR_INV_SRC_COLOR ||
69            dstA == PIPE_BLENDFACTOR_INV_SRC_ALPHA ||
70            dstA == PIPE_BLENDFACTOR_ONE);
71}
72
73static boolean blend_discard_if_src_alpha_1(unsigned srcRGB, unsigned srcA,
74                                            unsigned dstRGB, unsigned dstA)
75{
76    /* If the blend equation is ADD or REVERSE_SUBTRACT,
77     * SRC_ALPHA == 1, and the following state is set, the colorbuffer
78     * will not be changed.
79     * Notice that the dst factors are the src factors inverted. */
80    return (srcRGB == PIPE_BLENDFACTOR_INV_SRC_ALPHA ||
81            srcRGB == PIPE_BLENDFACTOR_ZERO) &&
82           (srcA == PIPE_BLENDFACTOR_INV_SRC_COLOR ||
83            srcA == PIPE_BLENDFACTOR_INV_SRC_ALPHA ||
84            srcA == PIPE_BLENDFACTOR_ZERO) &&
85           (dstRGB == PIPE_BLENDFACTOR_SRC_ALPHA ||
86            dstRGB == PIPE_BLENDFACTOR_ONE) &&
87           (dstA == PIPE_BLENDFACTOR_SRC_COLOR ||
88            dstA == PIPE_BLENDFACTOR_SRC_ALPHA ||
89            dstA == PIPE_BLENDFACTOR_ONE);
90}
91
92static boolean blend_discard_if_src_color_0(unsigned srcRGB, unsigned srcA,
93                                            unsigned dstRGB, unsigned dstA)
94{
95    /* If the blend equation is ADD or REVERSE_SUBTRACT,
96     * SRC_COLOR == (0,0,0), and the following state is set, the colorbuffer
97     * will not be changed.
98     * Notice that the dst factors are the src factors inverted. */
99    return (srcRGB == PIPE_BLENDFACTOR_SRC_COLOR ||
100            srcRGB == PIPE_BLENDFACTOR_ZERO) &&
101           (srcA == PIPE_BLENDFACTOR_ZERO) &&
102           (dstRGB == PIPE_BLENDFACTOR_INV_SRC_COLOR ||
103            dstRGB == PIPE_BLENDFACTOR_ONE) &&
104           (dstA == PIPE_BLENDFACTOR_ONE);
105}
106
107static boolean blend_discard_if_src_color_1(unsigned srcRGB, unsigned srcA,
108                                            unsigned dstRGB, unsigned dstA)
109{
110    /* If the blend equation is ADD or REVERSE_SUBTRACT,
111     * SRC_COLOR == (1,1,1), and the following state is set, the colorbuffer
112     * will not be changed.
113     * Notice that the dst factors are the src factors inverted. */
114    return (srcRGB == PIPE_BLENDFACTOR_INV_SRC_COLOR ||
115            srcRGB == PIPE_BLENDFACTOR_ZERO) &&
116           (srcA == PIPE_BLENDFACTOR_ZERO) &&
117           (dstRGB == PIPE_BLENDFACTOR_SRC_COLOR ||
118            dstRGB == PIPE_BLENDFACTOR_ONE) &&
119           (dstA == PIPE_BLENDFACTOR_ONE);
120}
121
122static boolean blend_discard_if_src_alpha_color_0(unsigned srcRGB, unsigned srcA,
123                                                  unsigned dstRGB, unsigned dstA)
124{
125    /* If the blend equation is ADD or REVERSE_SUBTRACT,
126     * SRC_ALPHA_COLOR == (0,0,0,0), and the following state is set,
127     * the colorbuffer will not be changed.
128     * Notice that the dst factors are the src factors inverted. */
129    return (srcRGB == PIPE_BLENDFACTOR_SRC_COLOR ||
130            srcRGB == PIPE_BLENDFACTOR_SRC_ALPHA ||
131            srcRGB == PIPE_BLENDFACTOR_SRC_ALPHA_SATURATE ||
132            srcRGB == PIPE_BLENDFACTOR_ZERO) &&
133           (srcA == PIPE_BLENDFACTOR_SRC_COLOR ||
134            srcA == PIPE_BLENDFACTOR_SRC_ALPHA ||
135            srcA == PIPE_BLENDFACTOR_SRC_ALPHA_SATURATE ||
136            srcA == PIPE_BLENDFACTOR_ZERO) &&
137           (dstRGB == PIPE_BLENDFACTOR_INV_SRC_COLOR ||
138            dstRGB == PIPE_BLENDFACTOR_INV_SRC_ALPHA ||
139            dstRGB == PIPE_BLENDFACTOR_ONE) &&
140           (dstA == PIPE_BLENDFACTOR_INV_SRC_COLOR ||
141            dstA == PIPE_BLENDFACTOR_INV_SRC_ALPHA ||
142            dstA == PIPE_BLENDFACTOR_ONE);
143}
144
145static boolean blend_discard_if_src_alpha_color_1(unsigned srcRGB, unsigned srcA,
146                                                  unsigned dstRGB, unsigned dstA)
147{
148    /* If the blend equation is ADD or REVERSE_SUBTRACT,
149     * SRC_ALPHA_COLOR == (1,1,1,1), and the following state is set,
150     * the colorbuffer will not be changed.
151     * Notice that the dst factors are the src factors inverted. */
152    return (srcRGB == PIPE_BLENDFACTOR_INV_SRC_COLOR ||
153            srcRGB == PIPE_BLENDFACTOR_INV_SRC_ALPHA ||
154            srcRGB == PIPE_BLENDFACTOR_ZERO) &&
155           (srcA == PIPE_BLENDFACTOR_INV_SRC_COLOR ||
156            srcA == PIPE_BLENDFACTOR_INV_SRC_ALPHA ||
157            srcA == PIPE_BLENDFACTOR_ZERO) &&
158           (dstRGB == PIPE_BLENDFACTOR_SRC_COLOR ||
159            dstRGB == PIPE_BLENDFACTOR_SRC_ALPHA ||
160            dstRGB == PIPE_BLENDFACTOR_ONE) &&
161           (dstA == PIPE_BLENDFACTOR_SRC_COLOR ||
162            dstA == PIPE_BLENDFACTOR_SRC_ALPHA ||
163            dstA == PIPE_BLENDFACTOR_ONE);
164}
165
166static unsigned bgra_cmask(unsigned mask)
167{
168    /* Gallium uses RGBA color ordering while R300 expects BGRA. */
169
170    return ((mask & PIPE_MASK_R) << 2) |
171           ((mask & PIPE_MASK_B) >> 2) |
172           (mask & (PIPE_MASK_G | PIPE_MASK_A));
173}
174
175/* Create a new blend state based on the CSO blend state.
176 *
177 * This encompasses alpha blending, logic/raster ops, and blend dithering. */
178static void* r300_create_blend_state(struct pipe_context* pipe,
179                                     const struct pipe_blend_state* state)
180{
181    struct r300_screen* r300screen = r300_screen(pipe->screen);
182    struct r300_blend_state* blend = CALLOC_STRUCT(r300_blend_state);
183
184    if (state->rt[0].blend_enable)
185    {
186        unsigned eqRGB = state->rt[0].rgb_func;
187        unsigned srcRGB = state->rt[0].rgb_src_factor;
188        unsigned dstRGB = state->rt[0].rgb_dst_factor;
189
190        unsigned eqA = state->rt[0].alpha_func;
191        unsigned srcA = state->rt[0].alpha_src_factor;
192        unsigned dstA = state->rt[0].alpha_dst_factor;
193
194        /* despite the name, ALPHA_BLEND_ENABLE has nothing to do with alpha,
195         * this is just the crappy D3D naming */
196        blend->blend_control = R300_ALPHA_BLEND_ENABLE |
197            r300_translate_blend_function(eqRGB) |
198            ( r300_translate_blend_factor(srcRGB) << R300_SRC_BLEND_SHIFT) |
199            ( r300_translate_blend_factor(dstRGB) << R300_DST_BLEND_SHIFT);
200
201        /* Optimization: some operations do not require the destination color.
202         *
203         * When SRC_ALPHA_SATURATE is used, colorbuffer reads must be enabled,
204         * otherwise blending gives incorrect results. It seems to be
205         * a hardware bug. */
206        if (eqRGB == PIPE_BLEND_MIN || eqA == PIPE_BLEND_MIN ||
207            eqRGB == PIPE_BLEND_MAX || eqA == PIPE_BLEND_MAX ||
208            dstRGB != PIPE_BLENDFACTOR_ZERO ||
209            dstA != PIPE_BLENDFACTOR_ZERO ||
210            srcRGB == PIPE_BLENDFACTOR_DST_COLOR ||
211            srcRGB == PIPE_BLENDFACTOR_DST_ALPHA ||
212            srcRGB == PIPE_BLENDFACTOR_INV_DST_COLOR ||
213            srcRGB == PIPE_BLENDFACTOR_INV_DST_ALPHA ||
214            srcA == PIPE_BLENDFACTOR_DST_COLOR ||
215            srcA == PIPE_BLENDFACTOR_DST_ALPHA ||
216            srcA == PIPE_BLENDFACTOR_INV_DST_COLOR ||
217            srcA == PIPE_BLENDFACTOR_INV_DST_ALPHA ||
218            srcRGB == PIPE_BLENDFACTOR_SRC_ALPHA_SATURATE) {
219            /* Enable reading from the colorbuffer. */
220            blend->blend_control |= R300_READ_ENABLE;
221
222            if (r300_screen(r300_context(pipe)->context.screen)->caps->is_r500) {
223                /* Optimization: Depending on incoming pixels, we can
224                 * conditionally disable the reading in hardware... */
225                if (eqRGB != PIPE_BLEND_MIN && eqA != PIPE_BLEND_MIN &&
226                    eqRGB != PIPE_BLEND_MAX && eqA != PIPE_BLEND_MAX) {
227                    /* Disable reading if SRC_ALPHA == 0. */
228                    if ((dstRGB == PIPE_BLENDFACTOR_SRC_ALPHA ||
229                         dstRGB == PIPE_BLENDFACTOR_ZERO) &&
230                        (dstA == PIPE_BLENDFACTOR_SRC_COLOR ||
231                         dstA == PIPE_BLENDFACTOR_SRC_ALPHA ||
232                         dstA == PIPE_BLENDFACTOR_ZERO)) {
233                         blend->blend_control |= R500_SRC_ALPHA_0_NO_READ;
234                    }
235
236                    /* Disable reading if SRC_ALPHA == 1. */
237                    if ((dstRGB == PIPE_BLENDFACTOR_INV_SRC_ALPHA ||
238                         dstRGB == PIPE_BLENDFACTOR_ZERO) &&
239                        (dstA == PIPE_BLENDFACTOR_INV_SRC_COLOR ||
240                         dstA == PIPE_BLENDFACTOR_INV_SRC_ALPHA ||
241                         dstA == PIPE_BLENDFACTOR_ZERO)) {
242                         blend->blend_control |= R500_SRC_ALPHA_1_NO_READ;
243                    }
244                }
245            }
246        }
247
248        /* Optimization: discard pixels which don't change the colorbuffer.
249         *
250         * The code below is non-trivial and some math is involved.
251         *
252         * Discarding pixels must be disabled when FP16 AA is enabled.
253         * This is a hardware bug. Also, this implementation wouldn't work
254         * with FP blending enabled and equation clamping disabled.
255         *
256         * Equations other than ADD are rarely used and therefore won't be
257         * optimized. */
258        if ((eqRGB == PIPE_BLEND_ADD || eqRGB == PIPE_BLEND_REVERSE_SUBTRACT) &&
259            (eqA == PIPE_BLEND_ADD || eqA == PIPE_BLEND_REVERSE_SUBTRACT)) {
260            /* ADD: X+Y
261             * REVERSE_SUBTRACT: Y-X
262             *
263             * The idea is:
264             * If X = src*srcFactor = 0 and Y = dst*dstFactor = 1,
265             * then CB will not be changed.
266             *
267             * Given the srcFactor and dstFactor variables, we can derive
268             * what src and dst should be equal to and discard appropriate
269             * pixels.
270             */
271            if (blend_discard_if_src_alpha_0(srcRGB, srcA, dstRGB, dstA)) {
272                blend->blend_control |= R300_DISCARD_SRC_PIXELS_SRC_ALPHA_0;
273            } else if (blend_discard_if_src_alpha_1(srcRGB, srcA,
274                                                    dstRGB, dstA)) {
275                blend->blend_control |= R300_DISCARD_SRC_PIXELS_SRC_ALPHA_1;
276            } else if (blend_discard_if_src_color_0(srcRGB, srcA,
277                                                    dstRGB, dstA)) {
278                blend->blend_control |= R300_DISCARD_SRC_PIXELS_SRC_COLOR_0;
279            } else if (blend_discard_if_src_color_1(srcRGB, srcA,
280                                                    dstRGB, dstA)) {
281                blend->blend_control |= R300_DISCARD_SRC_PIXELS_SRC_COLOR_1;
282            } else if (blend_discard_if_src_alpha_color_0(srcRGB, srcA,
283                                                          dstRGB, dstA)) {
284                blend->blend_control |=
285                    R300_DISCARD_SRC_PIXELS_SRC_ALPHA_COLOR_0;
286            } else if (blend_discard_if_src_alpha_color_1(srcRGB, srcA,
287                                                          dstRGB, dstA)) {
288                blend->blend_control |=
289                    R300_DISCARD_SRC_PIXELS_SRC_ALPHA_COLOR_1;
290            }
291        }
292
293        /* separate alpha */
294        if (srcA != srcRGB || dstA != dstRGB || eqA != eqRGB) {
295            blend->blend_control |= R300_SEPARATE_ALPHA_ENABLE;
296            blend->alpha_blend_control =
297                r300_translate_blend_function(eqA) |
298                (r300_translate_blend_factor(srcA) << R300_SRC_BLEND_SHIFT) |
299                (r300_translate_blend_factor(dstA) << R300_DST_BLEND_SHIFT);
300        }
301    }
302
303    /* PIPE_LOGICOP_* don't need to be translated, fortunately. */
304    if (state->logicop_enable) {
305        blend->rop = R300_RB3D_ROPCNTL_ROP_ENABLE |
306                (state->logicop_func) << R300_RB3D_ROPCNTL_ROP_SHIFT;
307    }
308
309    /* Color channel masks for all MRTs. */
310    blend->color_channel_mask = bgra_cmask(state->rt[0].colormask);
311    if (r300screen->caps->is_r500 && state->independent_blend_enable) {
312        if (state->rt[1].blend_enable) {
313            blend->color_channel_mask |= bgra_cmask(state->rt[1].colormask) << 4;
314        }
315        if (state->rt[2].blend_enable) {
316            blend->color_channel_mask |= bgra_cmask(state->rt[2].colormask) << 8;
317        }
318        if (state->rt[3].blend_enable) {
319            blend->color_channel_mask |= bgra_cmask(state->rt[3].colormask) << 12;
320        }
321    }
322
323    if (state->dither) {
324        blend->dither = R300_RB3D_DITHER_CTL_DITHER_MODE_LUT |
325                R300_RB3D_DITHER_CTL_ALPHA_DITHER_MODE_LUT;
326    }
327
328    return (void*)blend;
329}
330
331/* Bind blend state. */
332static void r300_bind_blend_state(struct pipe_context* pipe,
333                                  void* state)
334{
335    struct r300_context* r300 = r300_context(pipe);
336
337    UPDATE_STATE(state, r300->blend_state);
338}
339
340/* Free blend state. */
341static void r300_delete_blend_state(struct pipe_context* pipe,
342                                    void* state)
343{
344    FREE(state);
345}
346
347/* Convert float to 10bit integer */
348static unsigned float_to_fixed10(float f)
349{
350    return CLAMP((unsigned)(f * 1023.9f), 0, 1023);
351}
352
353/* Set blend color.
354 * Setup both R300 and R500 registers, figure out later which one to write. */
355static void r300_set_blend_color(struct pipe_context* pipe,
356                                 const struct pipe_blend_color* color)
357{
358    struct r300_context* r300 = r300_context(pipe);
359    struct r300_screen* r300screen = r300_screen(pipe->screen);
360    struct r300_blend_color_state* state =
361        (struct r300_blend_color_state*)r300->blend_color_state.state;
362    union util_color uc;
363
364    util_pack_color(color->color, PIPE_FORMAT_B8G8R8A8_UNORM, &uc);
365    state->blend_color = uc.ui;
366
367    /* XXX if FP16 blending is enabled, we should use the FP16 format */
368    state->blend_color_red_alpha =
369        float_to_fixed10(color->color[0]) |
370        (float_to_fixed10(color->color[3]) << 16);
371    state->blend_color_green_blue =
372        float_to_fixed10(color->color[2]) |
373        (float_to_fixed10(color->color[1]) << 16);
374
375    r300->blend_color_state.size = r300screen->caps->is_r500 ? 3 : 2;
376    r300->blend_color_state.dirty = TRUE;
377}
378
379static void r300_set_clip_state(struct pipe_context* pipe,
380                                const struct pipe_clip_state* state)
381{
382    struct r300_context* r300 = r300_context(pipe);
383
384    r300->clip = *state;
385
386    if (r300_screen(pipe->screen)->caps->has_tcl) {
387        memcpy(r300->clip_state.state, state, sizeof(struct pipe_clip_state));
388        r300->clip_state.size = 29;
389    } else {
390        draw_flush(r300->draw);
391        draw_set_clip_state(r300->draw, state);
392        r300->clip_state.size = 2;
393    }
394
395    r300->clip_state.dirty = TRUE;
396}
397
398/* Create a new depth, stencil, and alpha state based on the CSO dsa state.
399 *
400 * This contains the depth buffer, stencil buffer, alpha test, and such.
401 * On the Radeon, depth and stencil buffer setup are intertwined, which is
402 * the reason for some of the strange-looking assignments across registers. */
403static void*
404        r300_create_dsa_state(struct pipe_context* pipe,
405                              const struct pipe_depth_stencil_alpha_state* state)
406{
407    struct r300_capabilities *caps =
408        r300_screen(r300_context(pipe)->context.screen)->caps;
409    struct r300_dsa_state* dsa = CALLOC_STRUCT(r300_dsa_state);
410
411    /* Depth test setup. */
412    if (state->depth.enabled) {
413        dsa->z_buffer_control |= R300_Z_ENABLE;
414
415        if (state->depth.writemask) {
416            dsa->z_buffer_control |= R300_Z_WRITE_ENABLE;
417        }
418
419        dsa->z_stencil_control |=
420            (r300_translate_depth_stencil_function(state->depth.func) <<
421                R300_Z_FUNC_SHIFT);
422    }
423
424    /* Stencil buffer setup. */
425    if (state->stencil[0].enabled) {
426        dsa->z_buffer_control |= R300_STENCIL_ENABLE;
427        dsa->z_stencil_control |=
428            (r300_translate_depth_stencil_function(state->stencil[0].func) <<
429                R300_S_FRONT_FUNC_SHIFT) |
430            (r300_translate_stencil_op(state->stencil[0].fail_op) <<
431                R300_S_FRONT_SFAIL_OP_SHIFT) |
432            (r300_translate_stencil_op(state->stencil[0].zpass_op) <<
433                R300_S_FRONT_ZPASS_OP_SHIFT) |
434            (r300_translate_stencil_op(state->stencil[0].zfail_op) <<
435                R300_S_FRONT_ZFAIL_OP_SHIFT);
436
437        dsa->stencil_ref_mask =
438                (state->stencil[0].valuemask << R300_STENCILMASK_SHIFT) |
439                (state->stencil[0].writemask << R300_STENCILWRITEMASK_SHIFT);
440
441        if (state->stencil[1].enabled) {
442            dsa->z_buffer_control |= R300_STENCIL_FRONT_BACK;
443            dsa->z_stencil_control |=
444            (r300_translate_depth_stencil_function(state->stencil[1].func) <<
445                R300_S_BACK_FUNC_SHIFT) |
446            (r300_translate_stencil_op(state->stencil[1].fail_op) <<
447                R300_S_BACK_SFAIL_OP_SHIFT) |
448            (r300_translate_stencil_op(state->stencil[1].zpass_op) <<
449                R300_S_BACK_ZPASS_OP_SHIFT) |
450            (r300_translate_stencil_op(state->stencil[1].zfail_op) <<
451                R300_S_BACK_ZFAIL_OP_SHIFT);
452
453            if (caps->is_r500)
454            {
455                dsa->z_buffer_control |= R500_STENCIL_REFMASK_FRONT_BACK;
456                dsa->stencil_ref_bf =
457                    (state->stencil[1].valuemask <<
458                    R300_STENCILMASK_SHIFT) |
459                    (state->stencil[1].writemask <<
460                    R300_STENCILWRITEMASK_SHIFT);
461            }
462        }
463    }
464
465    /* Alpha test setup. */
466    if (state->alpha.enabled) {
467        dsa->alpha_function =
468            r300_translate_alpha_function(state->alpha.func) |
469            R300_FG_ALPHA_FUNC_ENABLE;
470
471        /* We could use 10bit alpha ref but who needs that? */
472        dsa->alpha_function |= float_to_ubyte(state->alpha.ref_value);
473
474        if (caps->is_r500)
475            dsa->alpha_function |= R500_FG_ALPHA_FUNC_8BIT;
476    }
477
478    return (void*)dsa;
479}
480
481/* Bind DSA state. */
482static void r300_bind_dsa_state(struct pipe_context* pipe,
483                                void* state)
484{
485    struct r300_context* r300 = r300_context(pipe);
486
487    UPDATE_STATE(state, r300->dsa_state);
488}
489
490/* Free DSA state. */
491static void r300_delete_dsa_state(struct pipe_context* pipe,
492                                  void* state)
493{
494    FREE(state);
495}
496
497static void r300_set_stencil_ref(struct pipe_context* pipe,
498                                 const struct pipe_stencil_ref* sr)
499{
500    struct r300_context* r300 = r300_context(pipe);
501    r300->stencil_ref = *sr;
502    r300->dsa_state.dirty = TRUE;
503}
504
505/* This switcheroo is needed just because of goddamned MACRO_SWITCH. */
506static void r300_fb_update_tiling_flags(struct r300_context *r300,
507                               const struct pipe_framebuffer_state *old_state,
508                               const struct pipe_framebuffer_state *new_state)
509{
510    struct r300_texture *tex;
511    unsigned i, j, level;
512
513    /* Reset tiling flags for old surfaces to default values. */
514    for (i = 0; i < old_state->nr_cbufs; i++) {
515        for (j = 0; j < new_state->nr_cbufs; j++) {
516            if (old_state->cbufs[i]->texture == new_state->cbufs[j]->texture) {
517                break;
518            }
519        }
520        /* If not binding the surface again... */
521        if (j != new_state->nr_cbufs) {
522            continue;
523        }
524
525        tex = (struct r300_texture*)old_state->cbufs[i]->texture;
526
527        if (tex) {
528            r300->winsys->buffer_set_tiling(r300->winsys, tex->buffer,
529                                            tex->pitch[0],
530                                            tex->microtile != 0,
531                                            tex->macrotile != 0);
532        }
533    }
534    if (old_state->zsbuf &&
535        (!new_state->zsbuf ||
536         old_state->zsbuf->texture != new_state->zsbuf->texture)) {
537        tex = (struct r300_texture*)old_state->zsbuf->texture;
538
539        if (tex) {
540            r300->winsys->buffer_set_tiling(r300->winsys, tex->buffer,
541                                            tex->pitch[0],
542                                            tex->microtile != 0,
543                                            tex->macrotile != 0);
544        }
545    }
546
547    /* Set tiling flags for new surfaces. */
548    for (i = 0; i < new_state->nr_cbufs; i++) {
549        tex = (struct r300_texture*)new_state->cbufs[i]->texture;
550        level = new_state->cbufs[i]->level;
551
552        r300->winsys->buffer_set_tiling(r300->winsys, tex->buffer,
553                                        tex->pitch[level],
554                                        tex->microtile != 0,
555                                        tex->mip_macrotile[level] != 0);
556    }
557    if (new_state->zsbuf) {
558        tex = (struct r300_texture*)new_state->zsbuf->texture;
559        level = new_state->zsbuf->level;
560
561        r300->winsys->buffer_set_tiling(r300->winsys, tex->buffer,
562                                        tex->pitch[level],
563                                        tex->microtile != 0,
564                                        tex->mip_macrotile[level] != 0);
565    }
566}
567
568static void
569    r300_set_framebuffer_state(struct pipe_context* pipe,
570                               const struct pipe_framebuffer_state* state)
571{
572    struct r300_context* r300 = r300_context(pipe);
573    struct r300_screen* r300screen = r300_screen(pipe->screen);
574    struct pipe_framebuffer_state *old_state = r300->fb_state.state;
575    unsigned max_width, max_height;
576    uint32_t zbuffer_bpp = 0;
577
578
579    if (state->nr_cbufs > 4) {
580        debug_printf("r300: Implementation error: Too many MRTs in %s, "
581            "refusing to bind framebuffer state!\n", __FUNCTION__);
582        return;
583    }
584
585    if (r300screen->caps->is_r500) {
586        max_width = max_height = 4096;
587    } else if (r300screen->caps->is_r400) {
588        max_width = max_height = 4021;
589    } else {
590        max_width = max_height = 2560;
591    }
592
593    if (state->width > max_width || state->height > max_height) {
594        debug_printf("r300: Implementation error: Render targets are too "
595        "big in %s, refusing to bind framebuffer state!\n", __FUNCTION__);
596        return;
597    }
598
599    if (r300->draw) {
600        draw_flush(r300->draw);
601    }
602
603    r300->fb_state.dirty = TRUE;
604
605    /* If nr_cbufs is changed from zero to non-zero or vice versa... */
606    if (!!old_state->nr_cbufs != !!state->nr_cbufs) {
607        r300->blend_state.dirty = TRUE;
608    }
609    /* If zsbuf is set from NULL to non-NULL or vice versa.. */
610    if (!!old_state->zsbuf != !!state->zsbuf) {
611        r300->dsa_state.dirty = TRUE;
612    }
613    if (!r300->scissor_enabled) {
614        r300->scissor_state.dirty = TRUE;
615    }
616
617    memcpy(r300->fb_state.state, state, sizeof(struct pipe_framebuffer_state));
618
619    r300->fb_state.size = (10 * state->nr_cbufs) + (2 * (4 - state->nr_cbufs)) +
620                          (state->zsbuf ? 10 : 0) + 8;
621
622    r300_fb_update_tiling_flags(r300, r300->fb_state.state, state);
623
624
625    /* Polygon offset depends on the zbuffer bit depth. */
626    if (state->zsbuf && r300->polygon_offset_enabled) {
627        switch (util_format_get_blocksize(state->zsbuf->texture->format)) {
628            case 2:
629                zbuffer_bpp = 16;
630                break;
631            case 4:
632                zbuffer_bpp = 24;
633                break;
634        }
635
636        if (r300->zbuffer_bpp != zbuffer_bpp) {
637            r300->zbuffer_bpp = zbuffer_bpp;
638            r300->rs_state.dirty = TRUE;
639        }
640    }
641}
642
643/* Create fragment shader state. */
644static void* r300_create_fs_state(struct pipe_context* pipe,
645                                  const struct pipe_shader_state* shader)
646{
647    struct r300_fragment_shader* fs = NULL;
648
649    fs = (struct r300_fragment_shader*)CALLOC_STRUCT(r300_fragment_shader);
650
651    /* Copy state directly into shader. */
652    fs->state = *shader;
653    fs->state.tokens = tgsi_dup_tokens(shader->tokens);
654
655    tgsi_scan_shader(shader->tokens, &fs->info);
656    r300_shader_read_fs_inputs(&fs->info, &fs->inputs);
657
658    return (void*)fs;
659}
660
661/* Bind fragment shader state. */
662static void r300_bind_fs_state(struct pipe_context* pipe, void* shader)
663{
664    struct r300_context* r300 = r300_context(pipe);
665    struct r300_fragment_shader* fs = (struct r300_fragment_shader*)shader;
666
667    if (fs == NULL) {
668        r300->fs = NULL;
669        return;
670    }
671
672    r300->fs = fs;
673    r300_pick_fragment_shader(r300);
674
675    r300->rs_block_state.dirty = TRUE; /* Will be updated before the emission. */
676
677    if (r300->vs_state.state && r300_vertex_shader_setup_wpos(r300)) {
678        r300->vap_output_state.dirty = TRUE;
679    }
680
681    r300->dirty_state |= R300_NEW_FRAGMENT_SHADER | R300_NEW_FRAGMENT_SHADER_CONSTANTS;
682}
683
684/* Delete fragment shader state. */
685static void r300_delete_fs_state(struct pipe_context* pipe, void* shader)
686{
687    struct r300_fragment_shader* fs = (struct r300_fragment_shader*)shader;
688    struct r300_fragment_shader_code *tmp, *ptr = fs->first;
689
690    while (ptr) {
691        tmp = ptr;
692        ptr = ptr->next;
693        rc_constants_destroy(&tmp->code.constants);
694        FREE(tmp);
695    }
696    FREE((void*)fs->state.tokens);
697    FREE(shader);
698}
699
700static void r300_set_polygon_stipple(struct pipe_context* pipe,
701                                     const struct pipe_poly_stipple* state)
702{
703    /* XXX no idea how to set this up, but not terribly important */
704}
705
706/* Create a new rasterizer state based on the CSO rasterizer state.
707 *
708 * This is a very large chunk of state, and covers most of the graphics
709 * backend (GB), geometry assembly (GA), and setup unit (SU) blocks.
710 *
711 * In a not entirely unironic sidenote, this state has nearly nothing to do
712 * with the actual block on the Radeon called the rasterizer (RS). */
713static void* r300_create_rs_state(struct pipe_context* pipe,
714                                  const struct pipe_rasterizer_state* state)
715{
716    struct r300_screen* r300screen = r300_screen(pipe->screen);
717    struct r300_rs_state* rs = CALLOC_STRUCT(r300_rs_state);
718
719    /* Copy rasterizer state for Draw. */
720    rs->rs = *state;
721
722#ifdef PIPE_ARCH_LITTLE_ENDIAN
723    rs->vap_control_status = R300_VC_NO_SWAP;
724#else
725    rs->vap_control_status = R300_VC_32BIT_SWAP;
726#endif
727
728    /* If no TCL engine is present, turn off the HW TCL. */
729    if (!r300screen->caps->has_tcl) {
730        rs->vap_control_status |= R300_VAP_TCL_BYPASS;
731    }
732
733    rs->point_size = pack_float_16_6x(state->point_size) |
734        (pack_float_16_6x(state->point_size) << R300_POINTSIZE_X_SHIFT);
735
736    rs->line_control = pack_float_16_6x(state->line_width) |
737        R300_GA_LINE_CNTL_END_TYPE_COMP;
738
739    /* Enable polygon mode */
740    if (state->fill_cw != PIPE_POLYGON_MODE_FILL ||
741        state->fill_ccw != PIPE_POLYGON_MODE_FILL) {
742        rs->polygon_mode = R300_GA_POLY_MODE_DUAL;
743    }
744
745    /* Radeons don't think in "CW/CCW", they think in "front/back". */
746    if (state->front_winding == PIPE_WINDING_CW) {
747        rs->cull_mode = R300_FRONT_FACE_CW;
748
749        /* Polygon offset */
750        if (state->offset_cw) {
751            rs->polygon_offset_enable |= R300_FRONT_ENABLE;
752        }
753        if (state->offset_ccw) {
754            rs->polygon_offset_enable |= R300_BACK_ENABLE;
755        }
756
757        /* Polygon mode */
758        if (rs->polygon_mode) {
759            rs->polygon_mode |=
760                r300_translate_polygon_mode_front(state->fill_cw);
761            rs->polygon_mode |=
762                r300_translate_polygon_mode_back(state->fill_ccw);
763        }
764    } else {
765        rs->cull_mode = R300_FRONT_FACE_CCW;
766
767        /* Polygon offset */
768        if (state->offset_ccw) {
769            rs->polygon_offset_enable |= R300_FRONT_ENABLE;
770        }
771        if (state->offset_cw) {
772            rs->polygon_offset_enable |= R300_BACK_ENABLE;
773        }
774
775        /* Polygon mode */
776        if (rs->polygon_mode) {
777            rs->polygon_mode |=
778                r300_translate_polygon_mode_front(state->fill_ccw);
779            rs->polygon_mode |=
780                r300_translate_polygon_mode_back(state->fill_cw);
781        }
782    }
783    if (state->front_winding & state->cull_mode) {
784        rs->cull_mode |= R300_CULL_FRONT;
785    }
786    if (~(state->front_winding) & state->cull_mode) {
787        rs->cull_mode |= R300_CULL_BACK;
788    }
789
790    if (rs->polygon_offset_enable) {
791        rs->depth_offset = state->offset_units;
792        rs->depth_scale = state->offset_scale;
793    }
794
795    if (state->line_stipple_enable) {
796        rs->line_stipple_config =
797            R300_GA_LINE_STIPPLE_CONFIG_LINE_RESET_LINE |
798            (fui((float)state->line_stipple_factor) &
799                R300_GA_LINE_STIPPLE_CONFIG_STIPPLE_SCALE_MASK);
800        /* XXX this might need to be scaled up */
801        rs->line_stipple_value = state->line_stipple_pattern;
802    }
803
804    if (state->flatshade) {
805        rs->color_control = R300_SHADE_MODEL_FLAT;
806    } else {
807        rs->color_control = R300_SHADE_MODEL_SMOOTH;
808    }
809
810    return (void*)rs;
811}
812
813/* Bind rasterizer state. */
814static void r300_bind_rs_state(struct pipe_context* pipe, void* state)
815{
816    struct r300_context* r300 = r300_context(pipe);
817    struct r300_rs_state* rs = (struct r300_rs_state*)state;
818    boolean scissor_was_enabled = r300->scissor_enabled;
819
820    if (r300->draw) {
821        draw_flush(r300->draw);
822        draw_set_rasterizer_state(r300->draw, &rs->rs);
823    }
824
825    if (rs) {
826        r300->polygon_offset_enabled = rs->rs.offset_cw || rs->rs.offset_ccw;
827        r300->scissor_enabled = rs->rs.scissor;
828    } else {
829        r300->polygon_offset_enabled = FALSE;
830        r300->scissor_enabled = FALSE;
831    }
832
833    UPDATE_STATE(state, r300->rs_state);
834    r300->rs_state.size = 17 + (r300->polygon_offset_enabled ? 5 : 0);
835
836    if (scissor_was_enabled != r300->scissor_enabled) {
837        r300->scissor_state.dirty = TRUE;
838    }
839}
840
841/* Free rasterizer state. */
842static void r300_delete_rs_state(struct pipe_context* pipe, void* state)
843{
844    FREE(state);
845}
846
847static void*
848        r300_create_sampler_state(struct pipe_context* pipe,
849                                  const struct pipe_sampler_state* state)
850{
851    struct r300_context* r300 = r300_context(pipe);
852    struct r300_sampler_state* sampler = CALLOC_STRUCT(r300_sampler_state);
853    int lod_bias;
854    union util_color uc;
855
856    sampler->state = *state;
857
858    sampler->filter0 |=
859        (r300_translate_wrap(state->wrap_s) << R300_TX_WRAP_S_SHIFT) |
860        (r300_translate_wrap(state->wrap_t) << R300_TX_WRAP_T_SHIFT) |
861        (r300_translate_wrap(state->wrap_r) << R300_TX_WRAP_R_SHIFT);
862
863    sampler->filter0 |= r300_translate_tex_filters(state->min_img_filter,
864                                                   state->mag_img_filter,
865                                                   state->min_mip_filter,
866                                                   state->max_anisotropy > 0);
867
868    /* Unfortunately, r300-r500 don't support floating-point mipmap lods. */
869    /* We must pass these to the merge function to clamp them properly. */
870    sampler->min_lod = MAX2((unsigned)state->min_lod, 0);
871    sampler->max_lod = MAX2((unsigned)ceilf(state->max_lod), 0);
872
873    lod_bias = CLAMP((int)(state->lod_bias * 32), -(1 << 9), (1 << 9) - 1);
874
875    sampler->filter1 |= lod_bias << R300_LOD_BIAS_SHIFT;
876
877    sampler->filter1 |= r300_anisotropy(state->max_anisotropy);
878
879    util_pack_color(state->border_color, PIPE_FORMAT_B8G8R8A8_UNORM, &uc);
880    sampler->border_color = uc.ui;
881
882    /* R500-specific fixups and optimizations */
883    if (r300_screen(r300->context.screen)->caps->is_r500) {
884        sampler->filter1 |= R500_BORDER_FIX;
885    }
886
887    return (void*)sampler;
888}
889
890static void r300_bind_sampler_states(struct pipe_context* pipe,
891                                     unsigned count,
892                                     void** states)
893{
894    struct r300_context* r300 = r300_context(pipe);
895    struct r300_textures_state* state =
896        (struct r300_textures_state*)r300->textures_state.state;
897
898    if (count > 8) {
899        return;
900    }
901
902    memcpy(state->sampler_states, states, sizeof(void*) * count);
903    state->sampler_count = count;
904
905    r300->textures_state.dirty = TRUE;
906
907    /* Pick a fragment shader based on the texture compare state. */
908    if (r300->fs && count) {
909        if (r300_pick_fragment_shader(r300)) {
910            r300->dirty_state |= R300_NEW_FRAGMENT_SHADER |
911                                 R300_NEW_FRAGMENT_SHADER_CONSTANTS;
912        }
913    }
914}
915
916static void r300_lacks_vertex_textures(struct pipe_context* pipe,
917                                       unsigned count,
918                                       void** states)
919{
920}
921
922static void r300_delete_sampler_state(struct pipe_context* pipe, void* state)
923{
924    FREE(state);
925}
926
927static void r300_set_sampler_textures(struct pipe_context* pipe,
928                                      unsigned count,
929                                      struct pipe_texture** texture)
930{
931    struct r300_context* r300 = r300_context(pipe);
932    struct r300_textures_state* state =
933        (struct r300_textures_state*)r300->textures_state.state;
934    unsigned i;
935    boolean is_r500 = r300_screen(r300->context.screen)->caps->is_r500;
936    boolean dirty_tex = FALSE;
937
938    /* XXX magic num */
939    if (count > 8) {
940        return;
941    }
942
943    for (i = 0; i < count; i++) {
944        if (state->textures[i] != (struct r300_texture*)texture[i]) {
945            pipe_texture_reference((struct pipe_texture**)&state->textures[i],
946                                   texture[i]);
947            dirty_tex = TRUE;
948
949            /* R300-specific - set the texrect factor in the fragment shader */
950            if (!is_r500 && state->textures[i]->is_npot) {
951                /* XXX It would be nice to re-emit just 1 constant,
952                 * XXX not all of them */
953                r300->dirty_state |= R300_NEW_FRAGMENT_SHADER_CONSTANTS;
954            }
955        }
956    }
957
958    for (i = count; i < 8; i++) {
959        if (state->textures[i]) {
960            pipe_texture_reference((struct pipe_texture**)&state->textures[i],
961                NULL);
962        }
963    }
964
965    state->texture_count = count;
966
967    r300->textures_state.dirty = TRUE;
968
969    if (dirty_tex) {
970        r300->texture_cache_inval.dirty = TRUE;
971    }
972}
973
974static void r300_set_scissor_state(struct pipe_context* pipe,
975                                   const struct pipe_scissor_state* state)
976{
977    struct r300_context* r300 = r300_context(pipe);
978
979    memcpy(r300->scissor_state.state, state,
980        sizeof(struct pipe_scissor_state));
981
982    if (r300->scissor_enabled) {
983        r300->scissor_state.dirty = TRUE;
984    }
985}
986
987static void r300_set_viewport_state(struct pipe_context* pipe,
988                                    const struct pipe_viewport_state* state)
989{
990    struct r300_context* r300 = r300_context(pipe);
991    struct r300_viewport_state* viewport =
992        (struct r300_viewport_state*)r300->viewport_state.state;
993
994    r300->viewport = *state;
995
996    /* Do the transform in HW. */
997    viewport->vte_control = R300_VTX_W0_FMT;
998
999    if (state->scale[0] != 1.0f) {
1000        viewport->xscale = state->scale[0];
1001        viewport->vte_control |= R300_VPORT_X_SCALE_ENA;
1002    }
1003    if (state->scale[1] != 1.0f) {
1004        viewport->yscale = state->scale[1];
1005        viewport->vte_control |= R300_VPORT_Y_SCALE_ENA;
1006    }
1007    if (state->scale[2] != 1.0f) {
1008        viewport->zscale = state->scale[2];
1009        viewport->vte_control |= R300_VPORT_Z_SCALE_ENA;
1010    }
1011    if (state->translate[0] != 0.0f) {
1012        viewport->xoffset = state->translate[0];
1013        viewport->vte_control |= R300_VPORT_X_OFFSET_ENA;
1014    }
1015    if (state->translate[1] != 0.0f) {
1016        viewport->yoffset = state->translate[1];
1017        viewport->vte_control |= R300_VPORT_Y_OFFSET_ENA;
1018    }
1019    if (state->translate[2] != 0.0f) {
1020        viewport->zoffset = state->translate[2];
1021        viewport->vte_control |= R300_VPORT_Z_OFFSET_ENA;
1022    }
1023
1024    r300->viewport_state.dirty = TRUE;
1025    if (r300->fs && r300->fs->inputs.wpos != ATTR_UNUSED) {
1026        r300->dirty_state |= R300_NEW_FRAGMENT_SHADER_CONSTANTS;
1027    }
1028}
1029
1030static void r300_set_vertex_buffers(struct pipe_context* pipe,
1031                                    unsigned count,
1032                                    const struct pipe_vertex_buffer* buffers)
1033{
1034    struct r300_context* r300 = r300_context(pipe);
1035    unsigned i, max_index = ~0;
1036
1037    memcpy(r300->vertex_buffer, buffers,
1038        sizeof(struct pipe_vertex_buffer) * count);
1039
1040    for (i = 0; i < count; i++) {
1041        max_index = MIN2(buffers[i].max_index, max_index);
1042    }
1043
1044    r300->vertex_buffer_count = count;
1045    r300->vertex_buffer_max_index = max_index;
1046
1047    if (r300->draw) {
1048        draw_flush(r300->draw);
1049        draw_set_vertex_buffers(r300->draw, count, buffers);
1050    } else {
1051        r300->vertex_stream_state.dirty = TRUE;
1052    }
1053}
1054
1055static boolean r300_validate_aos(struct r300_context *r300)
1056{
1057    struct pipe_vertex_buffer *vbuf = r300->vertex_buffer;
1058    struct pipe_vertex_element *velem = r300->vertex_element;
1059    int i;
1060
1061    /* Check if formats and strides are aligned to the size of DWORD. */
1062    for (i = 0; i < r300->vertex_element_count; i++) {
1063        if (vbuf[velem[i].vertex_buffer_index].stride % 4 != 0 ||
1064            util_format_get_blocksize(velem[i].src_format) % 4 != 0) {
1065            return FALSE;
1066        }
1067    }
1068    return TRUE;
1069}
1070
1071static void r300_set_vertex_elements(struct pipe_context* pipe,
1072                                    unsigned count,
1073                                    const struct pipe_vertex_element* elements)
1074{
1075    struct r300_context* r300 = r300_context(pipe);
1076
1077    memcpy(r300->vertex_element,
1078           elements,
1079           sizeof(struct pipe_vertex_element) * count);
1080    r300->vertex_element_count = count;
1081
1082    if (r300->draw) {
1083        draw_flush(r300->draw);
1084        draw_set_vertex_elements(r300->draw, count, elements);
1085    }
1086
1087    if (!r300_validate_aos(r300)) {
1088        /* XXX We should fallback using draw. */
1089        assert(0);
1090        abort();
1091    }
1092}
1093
1094static void* r300_create_vs_state(struct pipe_context* pipe,
1095                                  const struct pipe_shader_state* shader)
1096{
1097    struct r300_context* r300 = r300_context(pipe);
1098
1099    struct r300_vertex_shader* vs = CALLOC_STRUCT(r300_vertex_shader);
1100    r300_vertex_shader_common_init(vs, shader);
1101
1102    if (r300_screen(pipe->screen)->caps->has_tcl) {
1103        r300_translate_vertex_shader(r300, vs);
1104    } else {
1105        vs->draw_vs = draw_create_vertex_shader(r300->draw, shader);
1106    }
1107
1108    return vs;
1109}
1110
1111static void r300_bind_vs_state(struct pipe_context* pipe, void* shader)
1112{
1113    struct r300_context* r300 = r300_context(pipe);
1114    struct r300_vertex_shader* vs = (struct r300_vertex_shader*)shader;
1115
1116    if (vs == NULL) {
1117        r300->vs_state.state = NULL;
1118        return;
1119    }
1120    if (vs == r300->vs_state.state) {
1121        return;
1122    }
1123    r300->vs_state.state = vs;
1124
1125    // VS output mapping for HWTCL or stream mapping for SWTCL to the RS block
1126    if (r300->fs) {
1127        r300_vertex_shader_setup_wpos(r300);
1128    }
1129    memcpy(r300->vap_output_state.state, &vs->vap_out,
1130           sizeof(struct r300_vap_output_state));
1131    r300->vap_output_state.dirty = TRUE;
1132
1133    /* The majority of the RS block bits is dependent on the vertex shader. */
1134    r300->rs_block_state.dirty = TRUE; /* Will be updated before the emission. */
1135
1136    if (r300_screen(pipe->screen)->caps->has_tcl) {
1137        r300->vs_state.dirty = TRUE;
1138        r300->vs_state.size = vs->code.length + 9;
1139
1140        r300->pvs_flush.dirty = TRUE;
1141
1142        r300->dirty_state |= R300_NEW_VERTEX_SHADER_CONSTANTS;
1143    } else {
1144        draw_flush(r300->draw);
1145        draw_bind_vertex_shader(r300->draw,
1146                (struct draw_vertex_shader*)vs->draw_vs);
1147    }
1148}
1149
1150static void r300_delete_vs_state(struct pipe_context* pipe, void* shader)
1151{
1152    struct r300_context* r300 = r300_context(pipe);
1153    struct r300_vertex_shader* vs = (struct r300_vertex_shader*)shader;
1154
1155    if (r300_screen(pipe->screen)->caps->has_tcl) {
1156        rc_constants_destroy(&vs->code.constants);
1157    } else {
1158        draw_delete_vertex_shader(r300->draw,
1159                (struct draw_vertex_shader*)vs->draw_vs);
1160    }
1161
1162    FREE((void*)vs->state.tokens);
1163    FREE(shader);
1164}
1165
1166static void r300_set_constant_buffer(struct pipe_context *pipe,
1167                                     uint shader, uint index,
1168                                     struct pipe_buffer *buf)
1169{
1170    struct r300_context* r300 = r300_context(pipe);
1171    struct r300_screen *r300screen = r300_screen(pipe->screen);
1172    void *mapped;
1173    int max_size = 0;
1174
1175    if (buf == NULL || buf->size == 0 ||
1176        (mapped = pipe_buffer_map(pipe->screen, buf, PIPE_BUFFER_USAGE_CPU_READ)) == NULL)
1177    {
1178        r300->shader_constants[shader].count = 0;
1179        return;
1180    }
1181
1182    assert((buf->size % 4 * sizeof(float)) == 0);
1183
1184    /* Check the size of the constant buffer. */
1185    switch (shader) {
1186        case PIPE_SHADER_VERTEX:
1187            max_size = 256;
1188            break;
1189        case PIPE_SHADER_FRAGMENT:
1190            if (r300screen->caps->is_r500) {
1191                max_size = 256;
1192            /* XXX Implement emission of r400's extended constant buffer. */
1193            /*} else if (r300screen->caps->is_r400) {
1194                max_size = 64;*/
1195            } else {
1196                max_size = 32;
1197            }
1198            break;
1199        default:
1200            assert(0);
1201    }
1202
1203    /* XXX Subtract immediates and RC_STATE_* variables. */
1204    if (buf->size > (sizeof(float) * 4 * max_size)) {
1205        debug_printf("r300: Max size of the constant buffer is "
1206                      "%i*4 floats.\n", max_size);
1207        abort();
1208    }
1209
1210    memcpy(r300->shader_constants[shader].constants, mapped, buf->size);
1211    r300->shader_constants[shader].count = buf->size / (4 * sizeof(float));
1212    pipe_buffer_unmap(pipe->screen, buf);
1213
1214    if (shader == PIPE_SHADER_VERTEX) {
1215        if (r300screen->caps->has_tcl) {
1216            r300->dirty_state |= R300_NEW_VERTEX_SHADER_CONSTANTS;
1217            r300->pvs_flush.dirty = TRUE;
1218        }
1219    }
1220    else if (shader == PIPE_SHADER_FRAGMENT)
1221        r300->dirty_state |= R300_NEW_FRAGMENT_SHADER_CONSTANTS;
1222}
1223
1224void r300_init_state_functions(struct r300_context* r300)
1225{
1226    r300->context.create_blend_state = r300_create_blend_state;
1227    r300->context.bind_blend_state = r300_bind_blend_state;
1228    r300->context.delete_blend_state = r300_delete_blend_state;
1229
1230    r300->context.set_blend_color = r300_set_blend_color;
1231
1232    r300->context.set_clip_state = r300_set_clip_state;
1233
1234    r300->context.set_constant_buffer = r300_set_constant_buffer;
1235
1236    r300->context.create_depth_stencil_alpha_state = r300_create_dsa_state;
1237    r300->context.bind_depth_stencil_alpha_state = r300_bind_dsa_state;
1238    r300->context.delete_depth_stencil_alpha_state = r300_delete_dsa_state;
1239
1240    r300->context.set_stencil_ref = r300_set_stencil_ref;
1241
1242    r300->context.set_framebuffer_state = r300_set_framebuffer_state;
1243
1244    r300->context.create_fs_state = r300_create_fs_state;
1245    r300->context.bind_fs_state = r300_bind_fs_state;
1246    r300->context.delete_fs_state = r300_delete_fs_state;
1247
1248    r300->context.set_polygon_stipple = r300_set_polygon_stipple;
1249
1250    r300->context.create_rasterizer_state = r300_create_rs_state;
1251    r300->context.bind_rasterizer_state = r300_bind_rs_state;
1252    r300->context.delete_rasterizer_state = r300_delete_rs_state;
1253
1254    r300->context.create_sampler_state = r300_create_sampler_state;
1255    r300->context.bind_fragment_sampler_states = r300_bind_sampler_states;
1256    r300->context.bind_vertex_sampler_states = r300_lacks_vertex_textures;
1257    r300->context.delete_sampler_state = r300_delete_sampler_state;
1258
1259    r300->context.set_fragment_sampler_textures = r300_set_sampler_textures;
1260
1261    r300->context.set_scissor_state = r300_set_scissor_state;
1262
1263    r300->context.set_viewport_state = r300_set_viewport_state;
1264
1265    r300->context.set_vertex_buffers = r300_set_vertex_buffers;
1266    r300->context.set_vertex_elements = r300_set_vertex_elements;
1267
1268    r300->context.create_vs_state = r300_create_vs_state;
1269    r300->context.bind_vs_state = r300_bind_vs_state;
1270    r300->context.delete_vs_state = r300_delete_vs_state;
1271}
1272