/**********************************************************
 * Copyright 2008-2009 VMware, Inc.  All rights reserved.
 *
 * Permission is hereby granted, free of charge, to any person
 * obtaining a copy of this software and associated documentation
 * files (the "Software"), to deal in the Software without
 * restriction, including without limitation the rights to use, copy,
 * modify, merge, publish, distribute, sublicense, and/or sell copies
 * of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be
 * included in all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 * SOFTWARE.
 *
 **********************************************************/

#include "svga_cmd.h"

#include "pipe/p_inlines.h"
#include "util/u_prim.h"
#include "util/u_time.h"
#include "indices/u_indices.h"

#include "svga_hw_reg.h"
#include "svga_context.h"
#include "svga_screen.h"
#include "svga_winsys.h"
#include "svga_draw.h"
#include "svga_state.h"
#include "svga_swtnl.h"
#include "svga_debug.h"



static enum pipe_error
retry_draw_range_elements( struct svga_context *svga,
                           struct pipe_buffer *index_buffer,
                           unsigned index_size,
                           unsigned min_index,
                           unsigned max_index,
                           unsigned prim, 
                           unsigned start, 
                           unsigned count,
                           boolean do_retry )
{
   enum pipe_error ret = 0;

   svga_hwtnl_set_unfilled( svga->hwtnl,
                            svga->curr.rast->hw_unfilled );

   svga_hwtnl_set_flatshade( svga->hwtnl,
                             svga->curr.rast->templ.flatshade,
                             svga->curr.rast->templ.flatshade_first );


   ret = svga_update_state( svga, SVGA_STATE_HW_DRAW );
   if (ret)
      goto retry;

   ret = svga_hwtnl_draw_range_elements( svga->hwtnl,
                                         index_buffer, index_size,
                                         min_index, max_index,
                                         prim, start, count, 0 );
   if (ret)
      goto retry;

   if (svga->curr.any_user_vertex_buffers) {
      ret = svga_hwtnl_flush( svga->hwtnl );
      if (ret)
         goto retry;
   }

   return PIPE_OK;

retry:
   svga_context_flush( svga, NULL );

   if (do_retry)
   {
      return retry_draw_range_elements( svga,
                                        index_buffer, index_size,
                                        min_index, max_index,
                                        prim, start, count,
                                        FALSE );
   }

   return ret;
}


static enum pipe_error
retry_draw_arrays( struct svga_context *svga,
                   unsigned prim, 
                   unsigned start, 
                   unsigned count,
                   boolean do_retry )
{
   enum pipe_error ret;

   svga_hwtnl_set_unfilled( svga->hwtnl,
                            svga->curr.rast->hw_unfilled );

   svga_hwtnl_set_flatshade( svga->hwtnl,
                             svga->curr.rast->templ.flatshade,
                             svga->curr.rast->templ.flatshade_first );

   ret = svga_update_state( svga, SVGA_STATE_HW_DRAW );
   if (ret)
      goto retry;

   ret = svga_hwtnl_draw_arrays( svga->hwtnl, prim,
                                 start, count );
   if (ret)
      goto retry;

   if (svga->curr.any_user_vertex_buffers) {
      ret = svga_hwtnl_flush( svga->hwtnl );
      if (ret)
         goto retry;
   }

   return 0;

retry:
   if (ret == PIPE_ERROR_OUT_OF_MEMORY && do_retry) 
   {
      svga_context_flush( svga, NULL );

      return retry_draw_arrays( svga,
                                prim,
                                start,
                                count,
                                FALSE );
   }

   return ret;
}





static boolean
svga_draw_range_elements( struct pipe_context *pipe,
                          struct pipe_buffer *index_buffer,
                          unsigned index_size,
                          unsigned min_index,
                          unsigned max_index,
                          unsigned prim, unsigned start, unsigned count)
{
   struct svga_context *svga = svga_context( pipe );
   unsigned reduced_prim = u_reduced_prim(prim);
   enum pipe_error ret = 0;

   if (!u_trim_pipe_prim( prim, &count ))
      return TRUE;

   /*
    * Mark currently bound target surfaces as dirty
    * doesn't really matter if it is done before drawing.
    *
    * TODO If we ever normaly return something other then
    * true we should not mark it as dirty then.
    */
   svga_mark_surfaces_dirty(svga_context(pipe));

   if (svga->curr.reduced_prim != reduced_prim) {
      svga->curr.reduced_prim = reduced_prim;
      svga->dirty |= SVGA_NEW_REDUCED_PRIMITIVE;
   }
   
   svga_update_state_retry( svga, SVGA_STATE_NEED_SWTNL );

#ifdef DEBUG
   if (svga->curr.vs->base.id == svga->debug.disable_shader ||
       svga->curr.fs->base.id == svga->debug.disable_shader)
      return 0;
#endif

   if (svga->state.sw.need_swtnl)
   {
      ret = svga_swtnl_draw_range_elements( svga, 
                                            index_buffer, 
                                            index_size,
                                            min_index, max_index,
                                            prim,
                                            start, count );
   }
   else {
      if (index_buffer) {
         ret = retry_draw_range_elements( svga,
                                          index_buffer,
                                          index_size,
                                          min_index,
                                          max_index,
                                          prim,
                                          start,
                                          count,
                                          TRUE );
      }
      else {
         ret = retry_draw_arrays( svga, 
                                  prim, 
                                  start, 
                                  count,
                                  TRUE );
      }
   }

   if (SVGA_DEBUG & DEBUG_FLUSH) {
      static unsigned id;
      debug_printf("%s %d\n", __FUNCTION__, id++);
      if (id > 1300)
         util_time_sleep( 2000 );

      svga_hwtnl_flush_retry( svga );
      svga_context_flush(svga, NULL);
   }

   return ret == PIPE_OK;
}


static boolean 
svga_draw_elements( struct pipe_context *pipe,
                    struct pipe_buffer *index_buffer,
                    unsigned index_size,
                    unsigned prim, unsigned start, unsigned count)
{
   return svga_draw_range_elements( pipe, index_buffer,
                                    index_size,
                                    0, 0xffffffff,
                                    prim, start, count );
}

static boolean 
svga_draw_arrays( struct pipe_context *pipe,
                  unsigned prim, unsigned start, unsigned count)
{
   return svga_draw_range_elements(pipe, NULL, 0, 
                                   start, start + count - 1, 
                                   prim, 
                                   start, count);
}


void svga_init_draw_functions( struct svga_context *svga )
{
   svga->pipe.draw_arrays = svga_draw_arrays;
   svga->pipe.draw_elements = svga_draw_elements;
   svga->pipe.draw_range_elements = svga_draw_range_elements;
}
