/**

  * $Id$

  *

  * The PC side of the video support (responsible for actually displaying / 

  * rendering frames)

  *

  * Copyright (c) 2005 Nathan Keynes.

  *

  * This program is free software; you can redistribute it and/or modify

  * it under the terms of the GNU General Public License as published by

  * the Free Software Foundation; either version 2 of the License, or

  * (at your option) any later version.

  *

  * This program is distributed in the hope that it will be useful,

  * but WITHOUT ANY WARRANTY; without even the implied warranty of

  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

  * GNU General Public License for more details.

  */

 #include <gdk/gdkx.h>

 #include <gdk/gdkkeysyms.h>

 #include <stdint.h>

 #include "dream.h"

 #include "display.h"

 #include "dckeysyms.h"

 #include "drivers/video_glx.h"

 #include "drivers/video_gl.h"

 #include "pvr2/pvr2.h"

 #include "gtkui/gtkui.h"

 GtkWidget *gtk_video_win = NULL;

 int video_width = 640;

 int video_height = 480;

 gboolean video_gtk_init();

 void video_gtk_shutdown();

 gboolean video_gtk_display_blank( uint32_t colour );

 uint16_t video_gtk_resolve_keysym( const gchar *keysym );

 uint16_t video_gtk_keycode_to_dckeysym(uint16_t keycode);

 struct display_driver display_gtk_driver = { "gtk", video_gtk_init, video_gtk_shutdown,

 					     video_gtk_resolve_keysym,

 					     video_gtk_keycode_to_dckeysym,

 					     NULL,

 					     NULL, NULL, NULL, NULL, NULL, 

 					     video_gtk_display_blank, NULL };

 uint16_t video_gtk_resolve_keysym( const gchar *keysym )

 {

     int val = gdk_keyval_from_name( keysym );

     if( val == GDK_VoidSymbol )

 	return 0;

     return (uint16_t)val;

 }

 gboolean video_gtk_expose_callback(GtkWidget *widget, GdkEventExpose *event, gpointer data )

 {

     render_buffer_t buffer = pvr2_get_front_buffer();

     if( buffer == NULL ) {

 	display_gtk_driver.display_blank(pvr2_get_border_colour());

     } else {

 	display_gtk_driver.display_render_buffer(buffer);

     }

     return TRUE;

 }

 gboolean video_gtk_resize_callback(GtkWidget *widget, GdkEventConfigure *event, gpointer data )

 {

     video_width = event->width;

     video_height = event->height;

     video_gtk_expose_callback(widget, NULL, data);

     return TRUE;

 }

 uint16_t video_gtk_keycode_to_dckeysym(uint16_t keycode)

 {

     if( keycode >= 'a' && keycode <= 'z' ) {

 	return (keycode - 'a') + DCKB_A;

     } else if( keycode >= '1' && keycode <= '9' ) {

 	return (keycode - '1') + DCKB_1;

     }

     switch(keycode) {

     case GDK_0:         return DCKB_0;

     case GDK_Return:    return DCKB_ENTER;

     case GDK_Escape:    return DCKB_ESCAPE;

     case GDK_BackSpace: return DCKB_BACKSPACE;

     case GDK_Tab:       return DCKB_TAB;

     case GDK_space:     return DCKB_SPACE;

     case GDK_minus:     return DCKB_MINUS;

     case GDK_equal:     return DCKB_EQUAL;

     case GDK_bracketleft: return DCKB_LBRACKET;

     case GDK_bracketright: return DCKB_RBRACKET;

     case GDK_semicolon: return DCKB_SEMICOLON;

     case GDK_apostrophe:return DCKB_QUOTE;

     case GDK_grave : return DCKB_BACKQUOTE;

     case GDK_comma:     return DCKB_COMMA;

     case GDK_period:    return DCKB_PERIOD;

     case GDK_slash:     return DCKB_SLASH; 

     case GDK_Caps_Lock: return DCKB_CAPSLOCK;

     case GDK_F1:        return DCKB_F1;

     case GDK_F2:        return DCKB_F2;

     case GDK_F3:        return DCKB_F3;

     case GDK_F4:        return DCKB_F4;

     case GDK_F5:        return DCKB_F5;

     case GDK_F6:        return DCKB_F6;

     case GDK_F7:        return DCKB_F7;

     case GDK_F8:        return DCKB_F8;

     case GDK_F9:        return DCKB_F9;

     case GDK_F10:       return DCKB_F10;

     case GDK_F11:       return DCKB_F11;

     case GDK_F12:       return DCKB_F12;

     case GDK_Scroll_Lock: return DCKB_SCROLLLOCK;

     case GDK_Pause:     return DCKB_PAUSE;

     case GDK_Insert:    return DCKB_INSERT;

     case GDK_Home:      return DCKB_HOME;

     case GDK_Page_Up:   return DCKB_PAGEUP;

     case GDK_Delete:    return DCKB_DELETE;

     case GDK_End:       return DCKB_END;

     case GDK_Page_Down: return DCKB_PAGEDOWN;

     case GDK_Right:     return DCKB_RIGHT;

     case GDK_Left:      return DCKB_LEFT;

     case GDK_Down:      return DCKB_DOWN;

     case GDK_Up:        return DCKB_UP;

     case GDK_Num_Lock:  return DCKB_NUMLOCK;

     case GDK_KP_Divide: return DCKB_KP_SLASH;

     case GDK_KP_Multiply: return DCKB_KP_STAR;

     case GDK_KP_Subtract: return DCKB_KP_MINUS;

     case GDK_KP_Add:    return DCKB_KP_PLUS;

     case GDK_KP_Enter:  return DCKB_KP_ENTER;

     case GDK_KP_End:    return DCKB_KP_1;

     case GDK_KP_Down:   return DCKB_KP_2;

     case GDK_KP_Page_Down: return DCKB_KP_3;

     case GDK_KP_Left:   return DCKB_KP_4;

     case GDK_KP_Begin:  return DCKB_KP_5;

     case GDK_KP_Right:  return DCKB_KP_6;

     case GDK_KP_Home:   return DCKB_KP_7;

     case GDK_KP_Up:     return DCKB_KP_8;

     case GDK_KP_Page_Up:return DCKB_KP_9;

     case GDK_KP_Insert: return DCKB_KP_0;

     case GDK_KP_Delete: return DCKB_KP_PERIOD;

     case GDK_backslash: return DCKB_BACKSLASH;

     case GDK_Control_L: return DCKB_CONTROL_L;

     case GDK_Shift_L:   return DCKB_SHIFT_L;

     case GDK_Alt_L:     return DCKB_ALT_L;

     case GDK_Meta_L:    return DCKB_S1;

     case GDK_Control_R: return DCKB_CONTROL_R;

     case GDK_Shift_R:   return DCKB_SHIFT_R;

     case GDK_Alt_R:     return DCKB_ALT_R;

     case GDK_Meta_R:    return DCKB_S2;

     }

     return DCKB_NONE;

 }

 gboolean video_gtk_init()

 {

     gtk_video_win = gtk_gui_get_renderarea();

     if( gtk_video_win == NULL ) {

 	return FALSE;

     }

     g_signal_connect( gtk_video_win, "expose_event",

 		      G_CALLBACK(video_gtk_expose_callback), NULL );

     g_signal_connect( gtk_video_win, "configure_event",

 		      G_CALLBACK(video_gtk_resize_callback), NULL );

     video_width = gtk_video_win->allocation.width;

     video_height = gtk_video_win->allocation.height;

     Display *display = gdk_x11_display_get_xdisplay( gtk_widget_get_display(GTK_WIDGET(gtk_video_win)));

     Window window = GDK_WINDOW_XWINDOW( GTK_WIDGET(gtk_video_win)->window );

 #ifdef HAVE_LIBOSMESA

     video_gdk_init_driver( &display_gtk_driver );

 #else

     if( ! video_glx_init_context( display, window ) ||

         ! video_glx_init_driver( &display_gtk_driver ) ) {

         return FALSE;

     }

 #endif

 #ifdef HAVE_LINUX_JOYSTICK

     linux_joystick_init();

 #endif

     return TRUE;

 }

 gboolean video_gtk_display_blank( uint32_t colour )

 {

     GdkGC *gc = gdk_gc_new(gtk_video_win->window);

     GdkColor color = {0, ((colour>>16)&0xFF)*257, ((colour>>8)&0xFF)*257, ((colour)&0xFF)*257 };

     GdkColormap *cmap = gdk_colormap_get_system();

     gdk_colormap_alloc_color( cmap, &color, TRUE, TRUE );

     gdk_gc_set_foreground( gc, &color );

     gdk_gc_set_background( gc, &color );

     gdk_draw_rectangle( gtk_video_win->window, gc, TRUE, 0, 0, video_width, video_height );

     gdk_gc_destroy(gc);

     gdk_colormap_free_colors( cmap, &color, 1 );

 }

 XVisualInfo *video_gtk_get_visual()

 {

 #ifdef HAVE_LIBOSMESA

     return NULL;

 #else

     return video_glx_get_visual();

 #endif

 }

 void video_gtk_shutdown()

 {

     if( gtk_video_win != NULL ) {

 #ifdef HAVE_LIBOSMESA

         video_gdk_shutdown();

 #else

 	video_glx_shutdown();

 #endif

     }

 #ifdef HAVE_LINUX_JOYSTICK

     linux_joystick_shutdown();

 #endif

 }