/**

 * $Id$

 *

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

 * rendering frames)

 *

 * Copyright (c) 2008 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 <stdlib.h>

#include <string.h>

#include "lxdream.h"

#include "display.h"

#include "dckeysyms.h"

#include "cocoaui/cocoaui.h"

#include "drivers/video_nsgl.h"

#include "drivers/video_gl.h"

#include "pvr2/pvr2.h"

#import <AppKit/AppKit.h>

#include "mac_keymap.h"

#define MOUSE_X_SCALE 5

#define MOUSE_Y_SCALE 5

static gboolean video_osx_init();

static void video_osx_shutdown();

static void video_osx_display_blank( uint32_t colour );

static uint16_t video_osx_resolve_keysym( const gchar *keysym );

static uint16_t video_osx_keycode_to_dckeysym(uint16_t keycode);

static gchar *video_osx_keycode_to_keysym(uint16_t keycode);

struct display_driver display_osx_driver = { 

        "osx",

        N_("OS X Cocoa GUI-based OpenGL driver"),

        video_osx_init, video_osx_shutdown,

        video_osx_resolve_keysym,

        video_osx_keycode_to_dckeysym,

        video_osx_keycode_to_keysym,

        NULL, NULL, NULL, NULL, NULL, 

        video_osx_display_blank, NULL };

static NSView *video_view = NULL;

int video_width = 640;

int video_height = 480;

#define MAX_MASK_KEYCODE 128

@interface LxdreamOSXView : LxdreamVideoView

{

    int buttonMask;

    int flagsMask[MAX_MASK_KEYCODE];

}

@end

@implementation LxdreamVideoView

- (void)setIsGrabbed: (BOOL)grabbed

{

    isGrabbed = grabbed;

}

- (void) setDelegate: (id)other

{

    delegate = other;

}

- (id)delegate 

{

    return delegate;

}

@end

@implementation LxdreamOSXView

//--------------------------------------------------------------------

- (id)initWithFrame: (NSRect)contentRect

{

    if( [super initWithFrame: contentRect] != nil ) {

        int i;

        isGrabbed = NO;

        buttonMask = 0;

        for( i=0; i<MAX_MASK_KEYCODE; i++ ) {

            flagsMask[i] = 0;

        }

        return self;

    }

    return nil;

}

- (void)requestGrab

{

    if( delegate && [delegate respondsToSelector: @selector(viewRequestedGrab:)] )

        [delegate performSelector: @selector(viewRequestedGrab:) withObject: self];

}

- (void)requestUngrab

{

    if( delegate && [delegate respondsToSelector: @selector(viewRequestedUngrab:)] )

        [delegate performSelector: @selector(viewRequestedUngrab:) withObject: self];

}

- (BOOL)isOpaque

{

    return YES;

}

- (BOOL)acceptsFirstResponder

{

    return YES;

}

- (BOOL)isFlipped

{

    return YES;

}

//--------------------------------------------------------------------

- (void)drawRect: (NSRect) rect

{

    NSSize size = [self frame].size;

    if( video_width != size.width || video_height != size.height ) {

        video_width = size.width;

        video_height = size.height;

        video_nsgl_update();

    }

    pvr2_redraw_display();

}

- (void)keyDown: (NSEvent *) event

{

    if( ![event isARepeat] ) {

        input_event_keydown( NULL, [event keyCode]+1, 1 );

    }

}

- (void)keyUp: (NSEvent *) event

{

    input_event_keyup( NULL, [event keyCode]+1, 1 );

}

- (void)flagsChanged: (NSEvent *) event

{

    int keycode = [event keyCode];

    if( ([event modifierFlags] & NSControlKeyMask) && ([event modifierFlags] & NSAlternateKeyMask) ) {

        [self requestUngrab];

    }

    if( flagsMask[keycode] == 0 ) {

        input_event_keydown( NULL, keycode+1, 1 );

        flagsMask[keycode] = 1;

    } else {

        input_event_keyup( NULL, keycode+1, 1 );

        flagsMask[keycode] = 0;

    }

}

- (void)mouseDown: (NSEvent *) event

{

    if( isGrabbed ) { 

        buttonMask |= 1;

        input_event_mouse( buttonMask, 0, 0 );

    } else {

        [self requestGrab];

    }

}

- (void)mouseUp: (NSEvent *)event

{

    buttonMask &= ~1;

    input_event_mouse( buttonMask, 0, 0 );

}

- (void)rightMouseDown: (NSEvent *) event

{

    buttonMask |= 2;

    input_event_mouse( buttonMask, 0, 0 );

}

- (void)rightMouseUp: (NSEvent *)event

{

    buttonMask &= ~2;

    input_event_mouse( buttonMask, 0, 0 );

}

- (void)otherMouseDown: (NSEvent *) event

{

    buttonMask |= (1<< [event buttonNumber] );

    input_event_mouse( buttonMask, 0, 0 );

}

- (void)otherMouseUp: (NSEvent *) event

{

    buttonMask &= ~(1<< [event buttonNumber] );

    input_event_mouse( buttonMask, 0, 0 );

}

- (void)mouseMoved: (NSEvent *) event

{

    if( isGrabbed ) {

        input_event_mouse( buttonMask, [event deltaX] * MOUSE_X_SCALE, [event deltaY] * MOUSE_Y_SCALE );

    }

}

- (void)mouseDragged: (NSEvent *) event

{

    if( isGrabbed ) {

        input_event_mouse( buttonMask, [event deltaX] * MOUSE_X_SCALE, [event deltaY] * MOUSE_Y_SCALE );

    }

}

- (void)rightMouseDragged: (NSEvent *) event

{

    if( isGrabbed ) {

        input_event_mouse( buttonMask, [event deltaX] * MOUSE_X_SCALE, [event deltaY] * MOUSE_Y_SCALE );

    }

}

- (void)otherMouseDragged: (NSEvent *) event

{

    if( isGrabbed ) {

        input_event_mouse( buttonMask, [event deltaX] * MOUSE_X_SCALE, [event deltaY] * MOUSE_Y_SCALE );

    }

}

@end

NSView *video_osx_create_drawable()

{

    NSRect contentRect = {{0,0},{640,480}};

    video_view = [[LxdreamOSXView alloc] initWithFrame: contentRect];

    [video_view setAutoresizingMask: (NSViewWidthSizable|NSViewHeightSizable)];

    return video_view;

}

static gboolean video_osx_init()

{

    if( video_view == NULL ) {

        return FALSE;

    }

    if( !video_nsgl_init_driver(video_view, &display_osx_driver) ) {

        return FALSE;

    }

    pvr2_setup_gl_context();

    return TRUE;

}

static void video_osx_shutdown()

{

}

static void video_osx_display_blank( uint32_t colour )

{

}

static int mac_keymap_cmp(const void *a, const void *b)

{

    const gchar *key = a;

    const struct mac_keymap_struct *kb = b;

    return strcasecmp(key, kb->name);

}

static uint16_t video_osx_resolve_keysym( const gchar *keysym )

{

    struct mac_keymap_struct *result = bsearch( keysym, mac_keysyms, mac_keysym_count, sizeof(struct mac_keymap_struct), mac_keymap_cmp );

    if( result == NULL ) {

        return 0;

    } else {

        return result->keycode + 1;

    }

}

static uint16_t video_osx_keycode_to_dckeysym(uint16_t keycode)

{

    if( keycode < 1 || keycode > 128 ) {

        return DCKB_NONE;

    } else {

        return mac_keycode_to_dckeysym[keycode-1];

    }

}

static gchar *video_osx_keycode_to_keysym(uint16_t keycode)

{

    if( keycode < 1 || keycode > 128 ) {

        return NULL;

    } else {

        return g_strdup(mac_keysyms_by_keycode[keycode-1]);

    }

}