#include <bcm_host.h>
#include <iostream>
#include <bcm_host.h>
#include <GLES/gl.h>
#include <EGL/egl.h>
#include <EGL/eglext.h>
#include "Font.h"

namespace Renderer
{
	EGLDisplay display;
	EGLSurface surface;
	EGLContext context;
	EGLConfig config;

	static EGL_DISPMANX_WINDOW_T nativewindow;

	unsigned int display_width = 0;
	unsigned int display_height = 0;

	bool createSurface() //unsigned int display_width, unsigned int display_height)
	{
		std::cout << "Creating surface...\n";


		DISPMANX_ELEMENT_HANDLE_T dispman_element;
		DISPMANX_DISPLAY_HANDLE_T dispman_display;
		DISPMANX_UPDATE_HANDLE_T dispman_update;
		VC_RECT_T dst_rect;
		VC_RECT_T src_rect;



		display = eglGetDisplay(EGL_DEFAULT_DISPLAY);
		if(display == EGL_NO_DISPLAY)
		{
			std::cerr << "Error getting display!\n";
			return false;
		}

		bool result = eglInitialize(display, NULL, NULL);
		if(result == EGL_FALSE)
		{
			std::cerr << "Error initializing display!\n";
			return false;
		}

		result = eglBindAPI(EGL_OPENGL_ES_API);
		if(result == EGL_FALSE)
		{
			std::cerr << "Error binding API!\n";
			return false;
		}


		static const EGLint config_attributes[] =
		{
			EGL_RED_SIZE, 8,
			EGL_GREEN_SIZE, 8,
			EGL_BLUE_SIZE, 8,
			EGL_ALPHA_SIZE, 8,
			EGL_SURFACE_TYPE, EGL_WINDOW_BIT,
			EGL_NONE
		};

		GLint numConfigs;
		result = eglChooseConfig(display, config_attributes, &config, 1, &numConfigs);

		if(result == EGL_FALSE)
		{
			std::cerr << "Error choosing config!\n";
			return false;
		}
		std::cout << "numConfigs: " << numConfigs << "\n";


		context = eglCreateContext(display, config, EGL_NO_CONTEXT, NULL);
		if(context == EGL_NO_CONTEXT)
		{
			std::cout << "Error: " << eglGetError() << "\n";

			std::cerr << "Error getting context!\n";
			return false;
		}




		if(!display_width || !display_height)
		{
			bool success = graphics_get_display_size(0, &display_width, &display_height); //0 = LCD

			if(success < 0)
			{
				std::cerr << "Error getting display size!\n";
				return false;
			}
		}

		std::cout << "Display size is " << display_width << "x" << display_height << "\n";


		dst_rect.x = 0; dst_rect.y = 0;
		dst_rect.width = display_width; dst_rect.height = display_height;

		src_rect.x = 0; src_rect.y = 0;
		src_rect.width = display_width << 16; src_rect.height = display_height << 16;

		dispman_display = vc_dispmanx_display_open(0); //0 = LCD
		dispman_update = vc_dispmanx_update_start(0);

		dispman_element = vc_dispmanx_element_add(dispman_update, dispman_display, 0 /*layer*/, &dst_rect, 0 /*src*/, &src_rect, DISPMANX_PROTECTION_NONE, 0 /*alpha*/, 0 /*clamp*/, DISPMANX_NO_ROTATE /*transform*/);

		nativewindow.element = dispman_element;
		nativewindow.width = display_width; nativewindow.height = display_height;
		vc_dispmanx_update_submit_sync(dispman_update);




		surface = eglCreateWindowSurface(display, config, &nativewindow, NULL);
		if(surface == EGL_NO_SURFACE)
		{
			std::cerr << "Error creating window surface!\n";
			return false;
		}

		result = eglMakeCurrent(display, surface, surface, context);
		if(result == EGL_FALSE)
		{
			std::cerr << "Error with eglMakeCurrent!\n";
			return false;
		}


		std::cout << "success!\n";

		return true;
	}

	void swapBuffers()
	{
		eglSwapBuffers(display, surface);
		glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
	}

	void destroySurface()
	{
		eglSwapBuffers(display, surface);
		eglMakeCurrent(display, EGL_NO_SURFACE, EGL_NO_SURFACE, EGL_NO_CONTEXT);
		eglDestroySurface(display, surface);
		eglDestroyContext(display, context);
		eglTerminate(display);
	}

	bool init(int w, int h)
	{
		bcm_host_init();

		if(w)
			display_width = w;
		if(h)
			display_height = h;

		bool createdSurface = createSurface();

		if(!createdSurface)
			return false;

		Font::initLibrary();

		glViewport(0, 0, display_width, display_height);
		glOrthof(0, display_width, display_height, 0, -1.0, 1.0);
		glClearColor(1.0f, 1.0f, 1.0f, 1.0f);

		return true;
	}

	void unloadFonts();
	void deinit()
	{
		unloadFonts();
		destroySurface();
		bcm_host_deinit();
	}
};