/*
 * Copyright 2008 Vincent Sanders <vince@simtec.co.uk>
 *
 * This file is part of NetSurf, http://www.netsurf-browser.org/
 *
 * NetSurf 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 2 of the License.
 *
 * NetSurf 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 <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <sys/ioctl.h>
#include <unistd.h>
#include <string.h>

#include <SDL/SDL.h>

#include "css/css.h"
#include "desktop/gui.h"
#include "desktop/options.h"
#include "utils/messages.h"
#include "desktop/history_core.h"
#include "desktop/textinput.h"

#include "framebuffer/fb_gui.h"
#include "framebuffer/fb_tk.h"
#include "framebuffer/fb_plotters.h"
#include "framebuffer/fb_frontend.h"
#include "framebuffer/fb_cursor.h"
#include "framebuffer/fb_options.h"

#include "utils/log.h"

static SDL_Surface *sdl_screen;

static void
set_palette(framebuffer_t *fb)
{
        SDL_Color colors[256];
        int loop;
        for(loop=0; loop < 256; loop++){
                colors[loop].r = loop;
                colors[loop].g = loop;
                colors[loop].b = loop;
                fb->palette[loop] = loop << 16 | loop << 8 | loop;
        }

        /* Set palette */
        SDL_SetColors(sdl_screen, colors, 0, 256);

}

framebuffer_t *fb_os_init(int argc, char** argv)
{
        framebuffer_t *newfb;
        int fb_width;
        int fb_height;
        int fb_depth;


        if ((option_window_width != 0) && (option_window_height != 0)) {
                fb_width = option_window_width;
                fb_height = option_window_height;                
        } else {
                fb_width = 800;
                fb_height = 600;
        }

        fb_depth = option_fb_depth;
        if ((fb_depth != 32) && (fb_depth != 16) && (fb_depth != 8))
                fb_depth = 16; /* sanity checked depth in bpp */

        newfb = calloc(1, sizeof(framebuffer_t));
        if (newfb == NULL)
                return NULL;

        if ( SDL_Init(SDL_INIT_VIDEO) < 0 ) {
                fprintf(stderr, "Unable to init SDL: %s\n", SDL_GetError());
                return NULL;
        }
        atexit(SDL_Quit);

        newfb->width = fb_width;
        newfb->height = fb_height;
        newfb->bpp = fb_depth;

        sdl_screen = SDL_SetVideoMode(newfb->width, 
                                      newfb->height, 
                                      newfb->bpp, 
                                      SDL_SWSURFACE);

        if ( sdl_screen == NULL ) {
                fprintf(stderr, 
                        "Unable to set video: %s\n", SDL_GetError());
                free(newfb);
                return NULL;
        }

        if (newfb->bpp == 8)
                set_palette(newfb);

        newfb->ptr = sdl_screen->pixels;
        newfb->linelen = sdl_screen->pitch;

        SDL_ShowCursor(SDL_DISABLE);

        return newfb;
}

void fb_os_quit(framebuffer_t *fb)
{
}

void fb_os_input(fbtk_widget_t *root, bool active) 
{
        int got_event;
        SDL_Event event;
        int nskey;

        if (active)
                got_event = SDL_PollEvent(&event);
        else
                got_event = SDL_WaitEvent(&event);

        /* Do nothing if there was no event */
        if (got_event == 0)
	        return;

        switch (event.type) {
        case SDL_KEYDOWN:

                switch (event.key.keysym.sym) {
                case SDLK_PAGEDOWN:
                        nskey = KEY_PAGE_DOWN;
                        break;
                    
                case SDLK_PAGEUP:
                        nskey = KEY_PAGE_UP;
                        break;

                case SDLK_LEFT:
                        nskey = KEY_LEFT;
                        break;

                case SDLK_RIGHT:
                        nskey = KEY_RIGHT;
                        break;

                case SDLK_DOWN:
                        nskey = KEY_DOWN;
                        break;

                case SDLK_UP:
                        nskey = KEY_UP;
                        break;

                default:
                        nskey = event.key.keysym.sym;
                        break;
                }
                fbtk_input(root, nskey);

                break;

        case SDL_MOUSEMOTION:
                fbtk_move_pointer(root, event.motion.x, event.motion.y, false);
                break;

        case SDL_MOUSEBUTTONDOWN:
                switch (event.button.button) {

                case SDL_BUTTON_LEFT:
                        fbtk_click(root, BROWSER_MOUSE_PRESS_1);
                        break;

                case SDL_BUTTON_RIGHT:
                        fbtk_click(root, BROWSER_MOUSE_PRESS_2);
                        break;

                case SDL_BUTTON_WHEELUP:
                        fbtk_input(root, KEY_UP);
                        break;

                case SDL_BUTTON_WHEELDOWN:
                        fbtk_input(root, KEY_DOWN);
                        break;

                }
                break;

        case SDL_MOUSEBUTTONUP:
                switch (event.button.button) {

                case SDL_BUTTON_LEFT:
                        fbtk_click(root, BROWSER_MOUSE_CLICK_1);
                        break;

                case SDL_BUTTON_RIGHT:
                        fbtk_click(root, BROWSER_MOUSE_CLICK_2);
                        break;

                }
                break;

        case SDL_QUIT:
                netsurf_quit = true;
                break;
        }

}

void
fb_os_option_override(void)
{
}

/* called by generic code to inform os code of screen update */
void
fb_os_redraw(struct bbox_s *box)
{
        /*LOG(("%d,%d-%d,%d %d,%d", box->x0, box->y0, 
             box->x1, box->y1 , 
             box->x1 - box->x0, box->y1 - box->y0));*/
        /*
        if ((box->y1 - box->y0) < 0) {
                LOG(("WTF happened"));
                return;
        }
        */
        SDL_UpdateRect(sdl_screen, 
                       box->x0, 
                       box->y0, 
                       box->x1 - box->x0, 
                       box->y1 - box->y0);
}

/*
 * Local Variables:
 * c-basic-offset:8
 * End:
 */