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