/* See LICENSE file for copyright and license details. */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <X11/Xlib.h>
#include <X11/Xutil.h>
#include "application.h"
#include "window.h"
#include "color.h"

static void
cherry_window_draw(CherryWidget *widget)
{
	CherryWindow *window = (CherryWindow *) widget;
	CherryApplication *app = cherry_application_get_running_app();

	XSizeHints hints;
	cherry_window_get_position(window, &hints.x, &hints.y);
	cherry_window_get_dimension(window, &hints.width, &hints.height);
	hints.flags  = PPosition|PSize;

	int border_width = 5;

	XSetWindowAttributes attributes;
/*	attributes.background_pixel = XWhitePixel(app->display, app->screen); */
	attributes.background_pixel = RGB(100, 10, 10);

	window->window_handler = XCreateWindow(app->display,
	                                       XRootWindow(app->display, app->screen),
	                                       hints.x,     hints.y,
	                                       hints.width, hints.height,
	                                       border_width,
	                                       app->depth,
	                                       InputOutput,
	                                       app->visual,
	                                       CWBackPixel,
	                                       &attributes);

	char window_name[] = "";
	char icon_name[]   = "";

	/* window manager properties (yes, use of StdProp is obsolete) */
	XSetStandardProperties(app->display,
	                       window->window_handler,
	                       window->title,
	                       icon_name,
	                       None, NULL, 0,
	                       &hints);

	/* allow receiving mouse events */
	XSelectInput(app->display,
	             window->window_handler,
	             ButtonPressMask | KeyPressMask | ExposureMask);

	Atom wmDelete = XInternAtom(app->display, "WM_DELETE_WINDOW", True);
	XSetWMProtocols(app->display, window->window_handler, &wmDelete, 1);

	Atom wmDispose = XInternAtom(app->display, "CHERRY_DISPOSE_ON_EXIT", True);
	XSetWMProtocols(app->display, window->window_handler, &wmDelete, 1);

	window->gc = XCreateGC(app->display, window->window_handler, 0, 0);

	XSetBackground(app->display, window->gc, WhitePixel(app->display, app->screen));
	XSetForeground(app->display, window->gc, BlackPixel(app->display, app->screen));
/*	XSetForeground(app->display, window->gc, RGB(255,0,127)); */

	clist_add(&(app->windows), window);
	XSaveContext(app->display, window->window_handler, app->context, (XPointer) window);

//	cherry_widget_draw(
}

CherryWindow *
cherry_window_new(void)
{
	CherryWindow *window = malloc(sizeof(*window));
	window->base     = cherry_widget_new();
	window->title    = NULL;
	window->listener = NULL;
	window->draw     = cherry_window_draw;

	int offset = 10;
	int x, y, width, height;

	cherry_widget_get_position((CherryWidget *) window, &x, &y);
	cherry_widget_set_position((CherryWidget *) window, x + offset, y + offset);

	cherry_widget_get_dimension((CherryWidget *) window, &width, &height);
	cherry_widget_set_dimension((CherryWidget *) window, width + offset, height + offset);


	return window;
}

void
cherry_window_dispose_on_exit(CherryWindow *w)
{
	CherryApplication *app = cherry_application_get_running_app();

	XEvent evt;
	evt.xclient.type = ClientMessage;
	evt.xclient.serial = 0;
	evt.xclient.send_event = 1;
	evt.xclient.message_type = XInternAtom(app->display, "WM_PROTOCOLS", 0);
	evt.xclient.format = 32;
	evt.xclient.window = w->window_handler;
	evt.xclient.data.l[0] = XInternAtom(app->display, "CHERRY_DISPOSE_ON_EXIT", 0);

	XSendEvent(app->display, w->window_handler, 0, NoEventMask, &evt);
}

char *
cherry_window_get_title(CherryWindow *w)
{
	char *wnd_name;
	CherryApplication *app = cherry_application_get_running_app();
	XFetchName(app->display, w->window_handler, &wnd_name);

	return wnd_name;
}

void
cherry_window_set_title(CherryWindow *w, char *title)
{
	w->title = strdup(title);

	CherryApplication *app = cherry_application_get_running_app();
	XStoreName(app->display, w->window_handler, w->title);
}

void
cherry_window_get_dimension(CherryWindow *window, int *width, int *height)
{
	CherryWidget *widget = (CherryWidget *) window;
	cherry_widget_get_dimension(widget, width, height);
}

void
cherry_window_set_dimension(CherryWindow *window, int width, int height)
{
	CherryWidget *widget = (CherryWidget *) window;
	cherry_widget_set_dimension(widget, width, height);

	if (cherry_widget_is_visible(widget)) {
		int x, y;
		CherryApplication *app = cherry_application_get_running_app();
		XMoveResizeWindow(app->display, window->window_handler,
		                  x, y,
		                  width, height);
	}
}

void
cherry_window_get_position(CherryWindow *window, int *x, int *y)
{
	CherryWidget *widget = (CherryWidget *) window;
	cherry_widget_get_position(widget, x, y);
}

void
cherry_window_set_position(CherryWindow *window, int x, int y)
{
	CherryWidget *widget = (CherryWidget *) window;
	cherry_widget_set_position(widget, x, y);

}

void
cherry_window_set_visible(CherryWindow *window, int visible)
{
	CherryApplication *app = cherry_application_get_running_app();

	window->draw((CherryWidget *) window);
	if (visible) {
		XMapRaised(app->display, window->window_handler);
	}
}

void
cherry_window_set_listener(CherryWindow *w,
                           int (*listener)(struct CherryWindow *, CherryEvent))
{
	w->listener = listener;
}