/* $Id: keyboard.c,v 1.6 2010/07/25 16:40:52 khorben Exp $ */
/* Copyright (c) 2010 Pierre Pronchery <khorben@defora.org> */
/* This file is part of DeforaOS Desktop Keyboard */
/* 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, version 3 of the License.
 *
 * 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.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>. */



#include <stdlib.h>
#include <string.h>
#include <gtk/gtk.h>
#define XK_LATIN1
#define XK_MISCELLANY
#include <X11/keysymdef.h>
#include "callbacks.h"
#include "keyboard.h"


/* Keyboard */
/* private */
/* types */
typedef struct _KeyboardKey
{
	unsigned int keysym;
	char const * label;
} KeyboardKey;

struct _Keyboard
{
	KeyboardKey * layout[4];

	GtkWidget * window;
};


/* variables */
static KeyboardKey _1234567890[] =
{
	{ XK_Escape, "Esc" },
	{ XK_1, "1" },
	{ XK_2, "2" },
	{ XK_3, "3" },
	{ XK_4, "4" },
	{ XK_5, "5" },
	{ XK_6, "6" },
	{ XK_7, "7" },
	{ XK_8, "8" },
	{ XK_9, "9" },
	{ XK_0, "0" },
	{ XK_BackSpace, "\xe2\x8c\xab" },
	{ 0, NULL }
};

static KeyboardKey _qwertyuiop[] =
{
	{ XK_Tab, "Tab" },
	{ XK_Q, "Q" },
	{ XK_W, "W" },
	{ XK_E, "E" },
	{ XK_R, "R" },
	{ XK_T, "T" },
	{ XK_Y, "Y" },
	{ XK_U, "U" },
	{ XK_I, "I" },
	{ XK_O, "O" },
	{ XK_P, "P" },
	{ XK_Return, "Ret" },
	{ 0, NULL }
};
static KeyboardKey _asdfghjkl[] =
{
	{ XK_Caps_Lock, "Caps" },
	{ XK_A, "A" },
	{ XK_S, "S" },
	{ XK_D, "D" },
	{ XK_F, "F" },
	{ XK_G, "G" },
	{ XK_H, "H" },
	{ XK_J, "J" },
	{ XK_K, "K" },
	{ XK_L, "L" },
	{ XK_colon, ":" },
	{ XK_at, "@" },
	{ 0, NULL }
};
static KeyboardKey _zxcvbnm[] =
{
	{ XK_Shift_L, "\xe2\x87\xa7" },
	{ XK_Z, "Z" },
	{ XK_X, "X" },
	{ XK_C, "C" },
	{ XK_V, "V" },
	{ XK_B, "B" },
	{ XK_N, "N" },
	{ XK_M, "M" },
	{ XK_space, " " },
	{ XK_period, "." },
	{ XK_minus, "-" },
	{ XK_slash, "/" },
	{ 0, NULL }
};


/* public */
/* functions */
/* keyboard_new */
Keyboard * keyboard_new(KeyboardPrefs * prefs)
{
	Keyboard * keyboard;
	GdkScreen * screen;
	GdkRectangle rect;
	gint height;
	PangoFontDescription * bold;
	GtkWidget * vbox;
	GtkWidget * hbox;
	GtkWidget * widget;
	GtkWidget * label;
	size_t i;
	size_t j;

	if((keyboard = malloc(sizeof(*keyboard))) == NULL)
		return NULL;
	keyboard->layout[0] = _1234567890;
	keyboard->layout[1] = _qwertyuiop;
	keyboard->layout[2] = _asdfghjkl;
	keyboard->layout[3] = _zxcvbnm;
	/* window */
	keyboard->window = gtk_window_new(GTK_WINDOW_POPUP);
	gtk_window_set_accept_focus(GTK_WINDOW(keyboard->window), FALSE);
	gtk_window_set_focus_on_map(GTK_WINDOW(keyboard->window), FALSE);
	screen = gdk_screen_get_default();
	if(prefs != NULL && prefs->monitor > 0
			&& prefs->monitor < gdk_screen_get_n_monitors(screen))
		gdk_screen_get_monitor_geometry(screen, prefs->monitor, &rect);
	else
		gdk_screen_get_monitor_geometry(screen, 0, &rect);
	height = rect.width / 8;
	gtk_widget_set_size_request(keyboard->window, rect.width, height);
	gtk_window_move(GTK_WINDOW(keyboard->window), rect.x,
			rect.y + rect.height - height);
	g_signal_connect_swapped(G_OBJECT(keyboard->window), "delete-event",
			G_CALLBACK(on_keyboard_delete_event), keyboard);
	/* layouts */
	bold = pango_font_description_new();
	pango_font_description_set_weight(bold, PANGO_WEIGHT_BOLD);
	vbox = gtk_vbox_new(TRUE, 4);
	for(i = 0; i < 4; i++)
	{
		hbox = gtk_hbox_new(TRUE, 4);
		for(j = 0; keyboard->layout[i][j].label != NULL; j++)
		{
			widget = gtk_button_new();
			label = gtk_label_new(keyboard->layout[i][j].label);
			gtk_widget_modify_font(label, bold);
			gtk_container_add(GTK_CONTAINER(widget), label);
			g_object_set_data(G_OBJECT(widget), "keysym",
					&keyboard->layout[i][j].keysym);
			g_signal_connect_swapped(G_OBJECT(widget), "clicked",
					G_CALLBACK(on_keyboard_key_clicked),
					keyboard);
			gtk_box_pack_start(GTK_BOX(hbox), widget, TRUE, TRUE,
					0);
		}
		gtk_box_pack_start(GTK_BOX(vbox), hbox, TRUE, TRUE, 0);
	}
	gtk_container_add(GTK_CONTAINER(keyboard->window), vbox);
	gtk_widget_show_all(keyboard->window);
	pango_font_description_free(bold);
	return keyboard;
}


/* keyboard_delete */
void keyboard_delete(Keyboard * keyboard)
{
	gtk_widget_destroy(keyboard->window);
	free(keyboard);
}


/* useful */
/* keyboard_show */
void keyboard_show(Keyboard * keyboard, gboolean show)
{
	if(show == TRUE)
		gtk_widget_show(keyboard->window);
	else
		gtk_widget_hide(keyboard->window);
}