/**************************************************************************
 *
 * Copyright 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, sub license, 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 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 NON-INFRINGEMENT. IN NO EVENT SHALL
 * THE COPYRIGHT HOLDERS, AUTHORS AND/OR ITS SUPPLIERS 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.
 *
 * The above copyright notice and this permission notice (including the
 * next paragraph) shall be included in all copies or substantial portions
 * of the Software.
 *
 *
 **************************************************************************/

/**
 * @file
 * GDI software rasterizer support.
 *
 * @author Jose Fonseca <jfonseca@vmware.com>
 */

#include "pipe/p_format.h"
#include "pipe/p_context.h"
#include "util/u_inlines.h"
#include "util/u_format.h"
#include "util/u_math.h"
#include "util/u_memory.h"
#include "state_tracker/sw_winsys.h"
#include <kos32sys.h>
#include "kos_sw_winsys.h"


struct kos_sw_displaytarget
{
   enum pipe_format format;
   unsigned width;
   unsigned height;
   unsigned stride;

   unsigned size;

   void *data;

//   BITMAPINFO bmi;
};


/** Cast wrapper */
static INLINE struct kos_sw_displaytarget *
kos_sw_displaytarget( struct sw_displaytarget *buf )
{
   return (struct kos_sw_displaytarget *)buf;
}


static boolean
kos_sw_is_displaytarget_format_supported( struct sw_winsys *ws,
                                                unsigned tex_usage,
                                                enum pipe_format format )
{
   switch(format) {
   case PIPE_FORMAT_B8G8R8X8_UNORM:
   case PIPE_FORMAT_B8G8R8A8_UNORM:
      return TRUE;

   /* TODO: Support other formats possible with BMPs, as described in
    * http://msdn.microsoft.com/en-us/library/dd183376(VS.85).aspx */

   default:
      return FALSE;
   }
}


static void *
kos_sw_displaytarget_map(struct sw_winsys *ws,
                               struct sw_displaytarget *dt,
                               unsigned flags )
{
   struct kos_sw_displaytarget *gdt = kos_sw_displaytarget(dt);

   return gdt->data;
}


static void
kos_sw_displaytarget_unmap(struct sw_winsys *ws,
                                 struct sw_displaytarget *dt )
{

}


static void
kos_sw_displaytarget_destroy(struct sw_winsys *winsys,
                                   struct sw_displaytarget *dt)
{
   struct kos_sw_displaytarget *gdt = kos_sw_displaytarget(dt);

   user_free(gdt->data);
   FREE(gdt);
}


static struct sw_displaytarget *
kos_sw_displaytarget_create(struct sw_winsys *winsys,
                                  unsigned tex_usage,
                                  enum pipe_format format,
                                  unsigned width, unsigned height,
                                  unsigned alignment,
                                  unsigned *stride)
{
   struct kos_sw_displaytarget *gdt;
   unsigned cpp;
   unsigned bpp;

   gdt = CALLOC_STRUCT(kos_sw_displaytarget);
   if(!gdt)
      goto no_gdt;

   gdt->format = format;
   gdt->width = width;
   gdt->height = height;

   bpp = util_format_get_blocksizebits(format);
   cpp = util_format_get_blocksize(format);

   gdt->stride = align(width * cpp, alignment);
   gdt->size = gdt->stride * height;

   gdt->data = user_alloc(gdt->size);
   if(!gdt->data)
      goto no_data;

   *stride = gdt->stride;
   return (struct sw_displaytarget *)gdt;

no_data:
   FREE(gdt);
no_gdt:
   return NULL;
}


static struct sw_displaytarget *
kos_sw_displaytarget_from_handle(struct sw_winsys *winsys,
                                 const struct pipe_resource *templet,
                                 struct winsys_handle *whandle,
                                 unsigned *stride)
{
   assert(0);
   return NULL;
}


static boolean
kos_sw_displaytarget_get_handle(struct sw_winsys *winsys,
                                struct sw_displaytarget *dt,
                                struct winsys_handle *whandle)
{
   assert(0);
   return FALSE;
}


void
kos_sw_display( struct sw_winsys *winsys,
                struct sw_displaytarget *dt)
{
    struct kos_sw_displaytarget *gdt = kos_sw_displaytarget(dt);

	struct blit_call bc;
	int ret;

	bc.dstx     = 0;
	bc.dsty     = 24;
	bc.w        = gdt->width;
	bc.h        = gdt->height;
	bc.srcx     = 0;
	bc.srcy     = 0;
	bc.srcw     = gdt->width;
	bc.srch     = gdt->height;
	bc.stride   = gdt->stride;
	bc.bitmap   = gdt->data;

	__asm__ __volatile__(
    "int $0x40":"=a"(ret):"a"(73), "b"(0x00),
	"c"(&bc):"memory");

	return ret;

}

static void
kos_sw_displaytarget_display(struct sw_winsys *winsys,
                             struct sw_displaytarget *dt,
                             void *context_private)
{
    /* nasty:
     */
//    HDC hDC = (HDC)context_private;

    kos_sw_display(winsys, dt);
}


static void
kos_sw_destroy(struct sw_winsys *winsys)
{
   FREE(winsys);
}

struct sw_winsys *
kos_create_sw_winsys(void)
{
   static struct sw_winsys *winsys;

   winsys = CALLOC_STRUCT(sw_winsys);
   if(!winsys)
      return NULL;

   winsys->destroy = kos_sw_destroy;
   winsys->is_displaytarget_format_supported = kos_sw_is_displaytarget_format_supported;
   winsys->displaytarget_create = kos_sw_displaytarget_create;
   winsys->displaytarget_from_handle = kos_sw_displaytarget_from_handle;
   winsys->displaytarget_get_handle = kos_sw_displaytarget_get_handle;
   winsys->displaytarget_map = kos_sw_displaytarget_map;
   winsys->displaytarget_unmap = kos_sw_displaytarget_unmap;
   winsys->displaytarget_display = kos_sw_displaytarget_display;
   winsys->displaytarget_destroy = kos_sw_displaytarget_destroy;

   return winsys;
}