src/gallium/drivers/llvmpipe/lp_setup.c

   1 /**************************************************************************
   2  *
   3  * Copyright 2007 Tungsten Graphics, Inc., Cedar Park, Texas.
   4  * All Rights Reserved.
   5  *
   6  * Permission is hereby granted, free of charge, to any person obtaining a
   7  * copy of this software and associated documentation files (the
   8  * "Software"), to deal in the Software without restriction, including
   9  * without limitation the rights to use, copy, modify, merge, publish,
  10  * distribute, sub license, and/or sell copies of the Software, and to
  11  * permit persons to whom the Software is furnished to do so, subject to
  12  * the following conditions:
  13  *
  14  * The above copyright notice and this permission notice (including the
  15  * next paragraph) shall be included in all copies or substantial portions
  16  * of the Software.
  17  *
  18  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  19  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  20  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
  21  * IN NO EVENT SHALL TUNGSTEN GRAPHICS AND/OR ITS SUPPLIERS BE LIABLE FOR
  22  * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
  23  * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
  24  * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  25  *
  26  **************************************************************************/
  27
  28 /**
  29  * Tiling engine.
  30  *
  31  * Builds per-tile display lists and executes them on calls to
  32  * lp_setup_flush().
  33  */
  34
  35 #include "pipe/p_defines.h"
  36 #include "pipe/p_inlines.h"
  37 #include "util/u_memory.h"
  38 #include "util/u_pack_color.h"
  39 #include "util/u_surface.h"
  40 #include "lp_scene.h"
  41 #include "lp_scene_queue.h"
  42 #include "lp_buffer.h"
  43 #include "lp_texture.h"
  44 #include "lp_debug.h"
  45 #include "lp_fence.h"
  46 #include "lp_rast.h"
  47 #include "lp_setup_context.h"
  48
  49 #include "draw/draw_context.h"
  50 #include "draw/draw_vbuf.h"
  51
  52
  53 static void set_scene_state( struct setup_context *, unsigned );
  54
  55
  56 struct lp_scene *
  57 lp_setup_get_current_scene(struct setup_context *setup)
  58 {
  59    if (!setup->scene) {
  60       /* wait for a free/empty bin */
  61       setup->scene = lp_scene_dequeue(setup->empty_scenes);
  62       if(0)lp_scene_reset( setup->scene ); /* XXX temporary? */
  63
  64       lp_scene_set_framebuffer_size(setup->scene,
  65                                     setup->fb.width,
  66                                     setup->fb.height);
  67    }
  68    return setup->scene;
  69 }
  70
  71
  72 static void
  73 first_triangle( struct setup_context *setup,
  74                 const float (*v0)[4],
  75                 const float (*v1)[4],
  76                 const float (*v2)[4])
  77 {
  78    set_scene_state( setup, SETUP_ACTIVE );
  79    lp_setup_choose_triangle( setup );
  80    setup->triangle( setup, v0, v1, v2 );
  81 }
  82
  83 static void
  84 first_line( struct setup_context *setup,
  85             const float (*v0)[4],
  86             const float (*v1)[4])
  87 {
  88    set_scene_state( setup, SETUP_ACTIVE );
  89    lp_setup_choose_line( setup );
  90    setup->line( setup, v0, v1 );
  91 }
  92
  93 static void
  94 first_point( struct setup_context *setup,
  95              const float (*v0)[4])
  96 {
  97    set_scene_state( setup, SETUP_ACTIVE );
  98    lp_setup_choose_point( setup );
  99    setup->point( setup, v0 );
 100 }
 101
 102 static void reset_context( struct setup_context *setup )
 103 {
 104    LP_DBG(DEBUG_SETUP, "%s\n", __FUNCTION__);
 105
 106    /* Reset derived state */
 107    setup->constants.stored_size = 0;
 108    setup->constants.stored_data = NULL;
 109    setup->fs.stored = NULL;
 110    setup->dirty = ~0;
 111
 112    /* no current bin */
 113    setup->scene = NULL;
 114
 115    /* Reset some state:
 116     */
 117    setup->clear.flags = 0;
 118
 119    /* Have an explicit "start-binning" call and get rid of this
 120     * pointer twiddling?
 121     */
 122    setup->line = first_line;
 123    setup->point = first_point;
 124    setup->triangle = first_triangle;
 125 }
 126
 127
 128 /** Rasterize all scene's bins */
 129 static void
 130 lp_setup_rasterize_scene( struct setup_context *setup,
 131                          boolean write_depth )
 132 {
 133    struct lp_scene *scene = lp_setup_get_current_scene(setup);
 134
 135    lp_rasterize_scene(setup->rast,
 136                       scene,
 137                       &setup->fb,
 138                       write_depth);
 139
 140    reset_context( setup );
 141
 142    LP_DBG(DEBUG_SETUP, "%s done \n", __FUNCTION__);
 143 }
 144
 145
 146
 147 static void
 148 begin_binning( struct setup_context *setup )
 149 {
 150    struct lp_scene *scene = lp_setup_get_current_scene(setup);
 151
 152    LP_DBG(DEBUG_SETUP, "%s color: %s depth: %s\n", __FUNCTION__,
 153           (setup->clear.flags & PIPE_CLEAR_COLOR) ? "clear": "load",
 154           (setup->clear.flags & PIPE_CLEAR_DEPTHSTENCIL) ? "clear": "load");
 155
 156    if (setup->fb.nr_cbufs) {
 157       if (setup->clear.flags & PIPE_CLEAR_COLOR)
 158          lp_scene_bin_everywhere( scene,
 159                                   lp_rast_clear_color,
 160                                   setup->clear.color );
 161       else
 162          lp_scene_bin_everywhere( scene,
 163                                   lp_rast_load_color,
 164                                   lp_rast_arg_null() );
 165    }
 166
 167    if (setup->fb.zsbuf) {
 168       if (setup->clear.flags & PIPE_CLEAR_DEPTHSTENCIL)
 169          lp_scene_bin_everywhere( scene,
 170                                   lp_rast_clear_zstencil,
 171                                   setup->clear.zstencil );
 172       else
 173          lp_scene_bin_everywhere( scene,
 174                                   lp_rast_load_zstencil,
 175                                   lp_rast_arg_null() );
 176    }
 177
 178    LP_DBG(DEBUG_SETUP, "%s done\n", __FUNCTION__);
 179 }
 180
 181
 182 /* This basically bins and then flushes any outstanding full-screen
 183  * clears.
 184  *
 185  * TODO: fast path for fullscreen clears and no triangles.
 186  */
 187 static void
 188 execute_clears( struct setup_context *setup )
 189 {
 190    LP_DBG(DEBUG_SETUP, "%s\n", __FUNCTION__);
 191
 192    begin_binning( setup );
 193    lp_setup_rasterize_scene( setup, TRUE );
 194 }
 195
 196
 197 static void
 198 set_scene_state( struct setup_context *setup,
 199            unsigned new_state )
 200 {
 201    unsigned old_state = setup->state;
 202
 203    if (old_state == new_state)
 204       return;
 205
 206    LP_DBG(DEBUG_SETUP, "%s old %d new %d\n", __FUNCTION__, old_state, new_state);
 207
 208    switch (new_state) {
 209    case SETUP_ACTIVE:
 210       begin_binning( setup );
 211       break;
 212
 213    case SETUP_CLEARED:
 214       if (old_state == SETUP_ACTIVE) {
 215          assert(0);
 216          return;
 217       }
 218       break;
 219
 220    case SETUP_FLUSHED:
 221       if (old_state == SETUP_CLEARED)
 222          execute_clears( setup );
 223       else
 224          lp_setup_rasterize_scene( setup, TRUE );
 225       break;
 226    }
 227
 228    setup->state = new_state;
 229 }
 230
 231
 232 void
 233 lp_setup_flush( struct setup_context *setup,
 234                 unsigned flags )
 235 {
 236    LP_DBG(DEBUG_SETUP, "%s\n", __FUNCTION__);
 237
 238    set_scene_state( setup, SETUP_FLUSHED );
 239 }
 240
 241
 242 void
 243 lp_setup_bind_framebuffer( struct setup_context *setup,
 244                            const struct pipe_framebuffer_state *fb )
 245 {
 246    struct lp_scene *scene = lp_setup_get_current_scene(setup);
 247
 248    LP_DBG(DEBUG_SETUP, "%s\n", __FUNCTION__);
 249
 250    set_scene_state( setup, SETUP_FLUSHED );
 251
 252    /* re-get scene pointer, may have a new scene after flushing */
 253    scene = lp_setup_get_current_scene(setup);
 254
 255    util_copy_framebuffer_state(&setup->fb, fb);
 256
 257    lp_scene_set_framebuffer_size(scene, setup->fb.width, setup->fb.height);
 258 }
 259
 260
 261 void
 262 lp_setup_clear( struct setup_context *setup,
 263                 const float *color,
 264                 double depth,
 265                 unsigned stencil,
 266                 unsigned flags )
 267 {
 268    struct lp_scene *scene = lp_setup_get_current_scene(setup);
 269    unsigned i;
 270
 271    LP_DBG(DEBUG_SETUP, "%s state %d\n", __FUNCTION__, setup->state);
 272
 273
 274    if (flags & PIPE_CLEAR_COLOR) {
 275       for (i = 0; i < 4; ++i)
 276          setup->clear.color.clear_color[i] = float_to_ubyte(color[i]);
 277    }
 278
 279    if (flags & PIPE_CLEAR_DEPTHSTENCIL) {
 280       setup->clear.zstencil.clear_zstencil =
 281          util_pack_z_stencil(setup->fb.zsbuf->format,
 282                              depth,
 283                              stencil);
 284    }
 285
 286    if (setup->state == SETUP_ACTIVE) {
 287       /* Add the clear to existing scene.  In the unusual case where
 288        * both color and depth-stencil are being cleared when there's
 289        * already been some rendering, we could discard the currently
 290        * binned scene and start again, but I don't see that as being
 291        * a common usage.
 292        */
 293       if (flags & PIPE_CLEAR_COLOR)
 294          lp_scene_bin_everywhere( scene,
 295                                   lp_rast_clear_color,
 296                                   setup->clear.color );
 297
 298       if (setup->clear.flags & PIPE_CLEAR_DEPTHSTENCIL)
 299          lp_scene_bin_everywhere( scene,
 300                                   lp_rast_clear_zstencil,
 301                                   setup->clear.zstencil );
 302    }
 303    else {
 304       /* Put ourselves into the 'pre-clear' state, specifically to try
 305        * and accumulate multiple clears to color and depth_stencil
 306        * buffers which the app or state-tracker might issue
 307        * separately.
 308        */
 309       set_scene_state( setup, SETUP_CLEARED );
 310
 311       setup->clear.flags |= flags;
 312    }
 313 }
 314
 315
 316 /**
 317  * Emit a fence.
 318  */
 319 struct pipe_fence_handle *
 320 lp_setup_fence( struct setup_context *setup )
 321 {
 322    struct lp_scene *scene = lp_setup_get_current_scene(setup);
 323    const unsigned rank = lp_scene_get_num_bins( scene ); /* xxx */
 324    struct lp_fence *fence = lp_fence_create(rank);
 325
 326    LP_DBG(DEBUG_SETUP, "%s rank %u\n", __FUNCTION__, rank);
 327
 328    set_scene_state( setup, SETUP_ACTIVE );
 329
 330    /* insert the fence into all command bins */
 331    lp_scene_bin_everywhere( scene,
 332                             lp_rast_fence,
 333                             lp_rast_arg_fence(fence) );
 334
 335    return (struct pipe_fence_handle *) fence;
 336 }
 337
 338
 339 void
 340 lp_setup_set_triangle_state( struct setup_context *setup,
 341                              unsigned cull_mode,
 342                              boolean ccw_is_frontface,
 343                              boolean scissor )
 344 {
 345    LP_DBG(DEBUG_SETUP, "%s\n", __FUNCTION__);
 346
 347    setup->ccw_is_frontface = ccw_is_frontface;
 348    setup->cullmode = cull_mode;
 349    setup->triangle = first_triangle;
 350    setup->scissor_test = scissor;
 351 }
 352
 353
 354
 355 void
 356 lp_setup_set_fs_inputs( struct setup_context *setup,
 357                         const struct lp_shader_input *input,
 358                         unsigned nr )
 359 {
 360    LP_DBG(DEBUG_SETUP, "%s %p %u\n", __FUNCTION__, (void *) input, nr);
 361
 362    memcpy( setup->fs.input, input, nr * sizeof input[0] );
 363    setup->fs.nr_inputs = nr;
 364 }
 365
 366 void
 367 lp_setup_set_fs_functions( struct setup_context *setup,
 368                            lp_jit_frag_func jit_function0,
 369                            lp_jit_frag_func jit_function1,
 370                            boolean opaque )
 371 {
 372    LP_DBG(DEBUG_SETUP, "%s %p\n", __FUNCTION__, (void *) jit_function0);
 373    /* FIXME: reference count */
 374
 375    setup->fs.current.jit_function[0] = jit_function0;
 376    setup->fs.current.jit_function[1] = jit_function1;
 377    setup->fs.current.opaque = opaque;
 378    setup->dirty |= LP_SETUP_NEW_FS;
 379 }
 380
 381 void
 382 lp_setup_set_fs_constants(struct setup_context *setup,
 383                           struct pipe_buffer *buffer)
 384 {
 385    LP_DBG(DEBUG_SETUP, "%s %p\n", __FUNCTION__, (void *) buffer);
 386
 387    pipe_buffer_reference(&setup->constants.current, buffer);
 388
 389    setup->dirty |= LP_SETUP_NEW_CONSTANTS;
 390 }
 391
 392
 393 void
 394 lp_setup_set_alpha_ref_value( struct setup_context *setup,
 395                               float alpha_ref_value )
 396 {
 397    LP_DBG(DEBUG_SETUP, "%s %f\n", __FUNCTION__, alpha_ref_value);
 398
 399    if(setup->fs.current.jit_context.alpha_ref_value != alpha_ref_value) {
 400       setup->fs.current.jit_context.alpha_ref_value = alpha_ref_value;
 401       setup->dirty |= LP_SETUP_NEW_FS;
 402    }
 403 }
 404
 405 void
 406 lp_setup_set_blend_color( struct setup_context *setup,
 407                           const struct pipe_blend_color *blend_color )
 408 {
 409    LP_DBG(DEBUG_SETUP, "%s\n", __FUNCTION__);
 410
 411    assert(blend_color);
 412
 413    if(memcmp(&setup->blend_color.current, blend_color, sizeof *blend_color) != 0) {
 414       memcpy(&setup->blend_color.current, blend_color, sizeof *blend_color);
 415       setup->dirty |= LP_SETUP_NEW_BLEND_COLOR;
 416    }
 417 }
 418
 419
 420 void
 421 lp_setup_set_scissor( struct setup_context *setup,
 422                       const struct pipe_scissor_state *scissor )
 423 {
 424    LP_DBG(DEBUG_SETUP, "%s\n", __FUNCTION__);
 425
 426    assert(scissor);
 427
 428    if (memcmp(&setup->scissor.current, scissor, sizeof(*scissor)) != 0) {
 429       setup->scissor.current = *scissor; /* struct copy */
 430       setup->dirty |= LP_SETUP_NEW_SCISSOR;
 431    }
 432 }
 433
 434
 435 void
 436 lp_setup_set_flatshade_first( struct setup_context *setup,
 437                               boolean flatshade_first )
 438 {
 439    setup->flatshade_first = flatshade_first;
 440 }
 441
 442
 443 void
 444 lp_setup_set_vertex_info( struct setup_context *setup,
 445                           struct vertex_info *vertex_info )
 446 {
 447    /* XXX: just silently holding onto the pointer:
 448     */
 449    setup->vertex_info = vertex_info;
 450 }
 451
 452
 453 /**
 454  * Called during state validation when LP_NEW_TEXTURE is set.
 455  */
 456 void
 457 lp_setup_set_sampler_textures( struct setup_context *setup,
 458                                unsigned num, struct pipe_texture **texture)
 459 {
 460    unsigned i;
 461
 462    LP_DBG(DEBUG_SETUP, "%s\n", __FUNCTION__);
 463
 464    assert(num <= PIPE_MAX_SAMPLERS);
 465
 466    for (i = 0; i < PIPE_MAX_SAMPLERS; i++) {
 467       struct pipe_texture *tex = i < num ? texture[i] : NULL;
 468
 469       if(tex) {
 470          struct llvmpipe_texture *lp_tex = llvmpipe_texture(tex);
 471          struct lp_jit_texture *jit_tex;
 472          jit_tex = &setup->fs.current.jit_context.textures[i];
 473          jit_tex->width = tex->width0;
 474          jit_tex->height = tex->height0;
 475          jit_tex->stride = lp_tex->stride[0];
 476          if(!lp_tex->dt)
 477             jit_tex->data = lp_tex->data;
 478          else
 479             /* FIXME: map the rendertarget */
 480             assert(0);
 481
 482          /* the scene references this texture */
 483          {
 484             struct lp_scene *scene = lp_setup_get_current_scene(setup);
 485             lp_scene_texture_reference(scene, tex);
 486          }
 487       }
 488    }
 489
 490    setup->dirty |= LP_SETUP_NEW_FS;
 491 }
 492
 493
 494 /**
 495  * Is the given texture referenced by any scene?
 496  * Note: we have to check all scenes including any scenes currently
 497  * being rendered and the current scene being built.
 498  */
 499 boolean
 500 lp_setup_is_texture_referenced( const struct setup_context *setup,
 501                                 const struct pipe_texture *texture )
 502 {
 503    unsigned i;
 504
 505    /* check the render targets */
 506    for (i = 0; i < setup->fb.nr_cbufs; i++) {
 507       if (setup->fb.cbufs[i]->texture == texture)
 508          return PIPE_REFERENCED_FOR_READ | PIPE_REFERENCED_FOR_WRITE;
 509    }
 510    if (setup->fb.zsbuf && setup->fb.zsbuf->texture == texture) {
 511       return PIPE_REFERENCED_FOR_READ | PIPE_REFERENCED_FOR_WRITE;
 512    }
 513
 514    /* check textures referenced by the scene */
 515    for (i = 0; i < Elements(setup->scenes); i++) {
 516       if (lp_scene_is_textured_referenced(setup->scenes[i], texture)) {
 517          return PIPE_REFERENCED_FOR_READ;
 518       }
 519    }
 520
 521    return PIPE_UNREFERENCED;
 522 }
 523
 524
 525 /**
 526  * Called by vbuf code when we're about to draw something.
 527  */
 528 void
 529 lp_setup_update_state( struct setup_context *setup )
 530 {
 531    struct lp_scene *scene = lp_setup_get_current_scene(setup);
 532
 533    LP_DBG(DEBUG_SETUP, "%s\n", __FUNCTION__);
 534
 535    assert(setup->fs.current.jit_function);
 536
 537    if(setup->dirty & LP_SETUP_NEW_BLEND_COLOR) {
 538       uint8_t *stored;
 539       unsigned i, j;
 540
 541       stored = lp_scene_alloc_aligned(scene, 4 * 16, 16);
 542
 543       /* smear each blend color component across 16 ubyte elements */
 544       for (i = 0; i < 4; ++i) {
 545          uint8_t c = float_to_ubyte(setup->blend_color.current.color[i]);
 546          for (j = 0; j < 16; ++j)
 547             stored[i*16 + j] = c;
 548       }
 549
 550       setup->blend_color.stored = stored;
 551
 552       setup->fs.current.jit_context.blend_color = setup->blend_color.stored;
 553       setup->dirty |= LP_SETUP_NEW_FS;
 554    }
 555
 556    if (setup->dirty & LP_SETUP_NEW_SCISSOR) {
 557       float *stored;
 558
 559       stored = lp_scene_alloc_aligned(scene, 4 * sizeof(int32_t), 16);
 560
 561       stored[0] = (float) setup->scissor.current.minx;
 562       stored[1] = (float) setup->scissor.current.miny;
 563       stored[2] = (float) setup->scissor.current.maxx;
 564       stored[3] = (float) setup->scissor.current.maxy;
 565
 566       setup->scissor.stored = stored;
 567
 568       setup->fs.current.jit_context.scissor_xmin = stored[0];
 569       setup->fs.current.jit_context.scissor_ymin = stored[1];
 570       setup->fs.current.jit_context.scissor_xmax = stored[2];
 571       setup->fs.current.jit_context.scissor_ymax = stored[3];
 572
 573       setup->dirty |= LP_SETUP_NEW_FS;
 574    }
 575
 576    if(setup->dirty & LP_SETUP_NEW_CONSTANTS) {
 577       struct pipe_buffer *buffer = setup->constants.current;
 578
 579       if(buffer) {
 580          unsigned current_size = buffer->size;
 581          const void *current_data = llvmpipe_buffer(buffer)->data;
 582
 583          /* TODO: copy only the actually used constants? */
 584
 585          if(setup->constants.stored_size != current_size ||
 586             !setup->constants.stored_data ||
 587             memcmp(setup->constants.stored_data,
 588                    current_data,
 589                    current_size) != 0) {
 590             void *stored;
 591
 592             stored = lp_scene_alloc(scene, current_size);
 593             if(stored) {
 594                memcpy(stored,
 595                       current_data,
 596                       current_size);
 597                setup->constants.stored_size = current_size;
 598                setup->constants.stored_data = stored;
 599             }
 600          }
 601       }
 602       else {
 603          setup->constants.stored_size = 0;
 604          setup->constants.stored_data = NULL;
 605       }
 606
 607       setup->fs.current.jit_context.constants = setup->constants.stored_data;
 608       setup->dirty |= LP_SETUP_NEW_FS;
 609    }
 610
 611
 612    if(setup->dirty & LP_SETUP_NEW_FS) {
 613       if(!setup->fs.stored ||
 614          memcmp(setup->fs.stored,
 615                 &setup->fs.current,
 616                 sizeof setup->fs.current) != 0) {
 617          /* The fs state that's been stored in the scene is different from
 618           * the new, current state.  So allocate a new lp_rast_state object
 619           * and append it to the bin's setup data buffer.
 620           */
 621          struct lp_rast_state *stored =
 622             (struct lp_rast_state *) lp_scene_alloc(scene, sizeof *stored);
 623          if(stored) {
 624             memcpy(stored,
 625                    &setup->fs.current,
 626                    sizeof setup->fs.current);
 627             setup->fs.stored = stored;
 628
 629             /* put the state-set command into all bins */
 630             lp_scene_bin_state_command( scene,
 631                                         lp_rast_set_state,
 632                                         lp_rast_arg_state(setup->fs.stored) );
 633          }
 634       }
 635    }
 636
 637    setup->dirty = 0;
 638
 639    assert(setup->fs.stored);
 640 }
 641
 642
 643
 644 /* Only caller is lp_setup_vbuf_destroy()
 645  */
 646 void
 647 lp_setup_destroy( struct setup_context *setup )
 648 {
 649    reset_context( setup );
 650
 651    pipe_buffer_reference(&setup->constants.current, NULL);
 652
 653    /* free the scenes in the 'empty' queue */
 654    while (lp_scene_queue_count(setup->empty_scenes) > 0) {
 655       struct lp_scene *scene = lp_scene_dequeue(setup->empty_scenes);
 656       if (!scene)
 657          break;
 658       lp_scene_destroy(scene);
 659    }
 660
 661    lp_rast_destroy( setup->rast );
 662
 663    FREE( setup );
 664 }
 665
 666
 667 /**
 668  * Create a new primitive tiling engine.  Plug it into the backend of
 669  * the draw module.  Currently also creates a rasterizer to use with
 670  * it.
 671  */
 672 struct setup_context *
 673 lp_setup_create( struct pipe_screen *screen,
 674                  struct draw_context *draw )
 675 {
 676    unsigned i;
 677    struct setup_context *setup = CALLOC_STRUCT(setup_context);
 678
 679    if (!setup)
 680       return NULL;
 681
 682    lp_setup_init_vbuf(setup);
 683
 684    setup->empty_scenes = lp_scene_queue_create();
 685    if (!setup->empty_scenes)
 686       goto fail;
 687
 688    setup->rast = lp_rast_create( screen, setup->empty_scenes );
 689    if (!setup->rast)
 690       goto fail;
 691
 692    setup->vbuf = draw_vbuf_stage(draw, &setup->base);
 693    if (!setup->vbuf)
 694       goto fail;
 695
 696    draw_set_rasterize_stage(draw, setup->vbuf);
 697    draw_set_render(draw, &setup->base);
 698
 699    /* create some empty scenes */
 700    for (i = 0; i < MAX_SCENES; i++) {
 701       setup->scenes[i] = lp_scene_create();
 702       lp_scene_enqueue(setup->empty_scenes, setup->scenes[i]);
 703    }
 704
 705    setup->triangle = first_triangle;
 706    setup->line     = first_line;
 707    setup->point    = first_point;
 708
 709    setup->dirty = ~0;
 710
 711    return setup;
 712
 713 fail:
 714    if (setup->rast)
 715       lp_rast_destroy( setup->rast );
 716
 717    if (setup->vbuf)
 718       ;
 719
 720    if (setup->empty_scenes)
 721       lp_scene_queue_destroy(setup->empty_scenes);
 722
 723    FREE(setup);
 724    return NULL;
 725 }
 726