source: trunk/src/gl/gl_window.cc @ 310

// Copyright (C) 2012-2013 Kornel Kisielewicz
// This file is part of NV Libraries.
// For conditions of distribution and use, see copyright notice in nv.hh

#include "nv/gl/gl_window.hh"

#include "nv/logging.hh"
#include "nv/lib/gl.hh"
#include "nv/lib/sdl.hh"

using namespace nv;

static bool sdl_key_event_to_io_event( const SDL_KeyboardEvent& ke, io_event& kevent )
{
        kevent.type        = EV_KEY;
        kevent.key.pressed = ( ke.state != SDL_RELEASED );
        kevent.key.ascii   = 0;
        kevent.key.code    = KEY_NONE;

#if NV_SDL_VERSION == NV_SDL_20
        uint32 ucode = ke.keysym.sym;
#else
        uint32 ucode = ke.keysym.unicode;
#endif

        // if result is a typable char place it into the structure
        if (ucode >= 32 && ucode < 128 )
        {
                kevent.key.ascii = static_cast<char8>( ucode );
#if NV_SDL_VERSION == NV_SDL_20
                if (ucode >= 'a' && ucode <= 'z')
                {
                        int shifted = !!(ke.keysym.mod & KMOD_SHIFT);
                        int capslock = !!(ke.keysym.mod & KMOD_CAPS);
                        if ((shifted ^ capslock) != 0) {
                                kevent.key.ascii = (char8)SDL_toupper(ucode);
                        }
                }
#endif
        }

        // Get the Key value from the SDL Keyboard event
        int result = ke.keysym.sym;

        // Check the control and shift states
        kevent.key.alt     = (ke.keysym.mod & KMOD_ALT ) != 0;
        kevent.key.control = (ke.keysym.mod & KMOD_CTRL ) != 0;
        kevent.key.shift   = (ke.keysym.mod & KMOD_SHIFT ) != 0;

        // if result is a typable char from the directly transformable ranges
        if ( ( result >= KEY_A && result <= KEY_Z ) || 
                ( result >= KEY_0 && result <= KEY_9 ) ||
                result == ' ' )
        {
                kevent.key.code = static_cast<key_code>(result);
        }

        // if result is a typable char from the a..z range
        if ( result >= KEY_A + 32 && result <= KEY_Z + 32 )
        {
                kevent.key.code = static_cast<key_code>(result - 32);
        }

        if ( result >= SDLK_F1 && result <= SDLK_F12 )
        {
                kevent.key.code = static_cast<key_code>(result - SDLK_F1 + KEY_F1 );
        }

        // other recognized codes
        switch ( result ) 
        {
        case SDLK_BACKSPACE    : kevent.key.code = KEY_BACK; break;
        case SDLK_TAB          : kevent.key.code = KEY_TAB; break;
        case SDLK_RETURN       : kevent.key.code = KEY_ENTER; break;
        case SDLK_PAGEUP       : kevent.key.code = KEY_PGUP; break;
        case SDLK_PAGEDOWN     : kevent.key.code = KEY_PGDOWN; break;
        case SDLK_END          : kevent.key.code = KEY_END; break;
        case SDLK_HOME         : kevent.key.code = KEY_HOME; break;
        case SDLK_LEFT         : kevent.key.code = KEY_LEFT; break;
        case SDLK_UP           : kevent.key.code = KEY_UP; break;
        case SDLK_RIGHT        : kevent.key.code = KEY_RIGHT; break;
        case SDLK_DOWN         : kevent.key.code = KEY_DOWN; break;
        case SDLK_DELETE       : kevent.key.code = KEY_DELETE; break;
        case SDLK_INSERT       : kevent.key.code = KEY_INSERT; break;
        //case SDLK_KP5          : kevent.key.code = KEY_CENTER; break;
        case SDLK_ESCAPE       : kevent.key.code = KEY_ESCAPE; break;
        case SDLK_QUOTE        : kevent.key.code = KEY_QUOTE; break;
        case SDLK_COMMA        : kevent.key.code = KEY_COMMA; break;
        case SDLK_MINUS        : kevent.key.code = KEY_MINUS; break;
        case SDLK_PERIOD       : kevent.key.code = KEY_PERIOD; break;
        case SDLK_SLASH        : kevent.key.code = KEY_SLASH; break;
        case SDLK_SEMICOLON    : kevent.key.code = KEY_SCOLON; break;
        case SDLK_LEFTBRACKET  : kevent.key.code = KEY_LBRACKET; break;
        case SDLK_BACKSLASH    : kevent.key.code = KEY_BSLASH; break;
        case SDLK_RIGHTBRACKET : kevent.key.code = KEY_RBRACKET; break;
        case SDLK_BACKQUOTE    : kevent.key.code = KEY_BQUOTE; break;
        default : break;
        }

        // If key was understood by nv, then it's valid, otherwise ignored
        return kevent.key.ascii != 0 || kevent.key.code != 0;
}

static bool sdl_mouse_button_to_io_event( const SDL_MouseButtonEvent& mb, io_event& mevent )
{
        mevent.type            = EV_MOUSE_BUTTON;
        mevent.mbutton.button  = MOUSE_NONE;
        mevent.mbutton.pressed = (mb.state != SDL_RELEASED);
        mevent.mbutton.x       = static_cast< uint16 >( mb.x );
        mevent.mbutton.y       = static_cast< uint16 >( mb.y );

        switch ( mb.button )
        {
        case SDL_BUTTON_LEFT      : mevent.mbutton.button = MOUSE_LEFT; break;
        case SDL_BUTTON_MIDDLE    : mevent.mbutton.button = MOUSE_MIDDLE; break;
        case SDL_BUTTON_RIGHT     : mevent.mbutton.button = MOUSE_RIGHT; break;
#if NV_SDL_VERSION == NV_SDL_12
        case SDL_BUTTON_WHEELUP   : 
                mevent.type           = EV_MOUSE_WHEEL;
                mevent.mwheel.x       = 0;
                mevent.mwheel.y       = 3;
                return true;
        case SDL_BUTTON_WHEELDOWN : 
                mevent.type           = EV_MOUSE_WHEEL;
                mevent.mwheel.x       = 0;
                mevent.mwheel.y       = -3;
                return true;
#endif
        default : break;
        }

        return mevent.mbutton.button != MOUSE_NONE;
}

#if NV_SDL_VERSION == NV_SDL_20
static bool sdl_mouse_wheel_to_io_event( const SDL_MouseWheelEvent& mm, io_event& mevent )
{
        mevent.type          = EV_MOUSE_WHEEL;
        mevent.mwheel.x      = static_cast< sint32 >( mm.x );
        mevent.mwheel.y      = static_cast< sint32 >( mm.y );
        return true;
}
#endif

static bool sdl_mouse_motion_to_io_event( const SDL_MouseMotionEvent& mm, io_event& mevent )
{
        mevent.type          = EV_MOUSE_MOVE;
        mevent.mmove.pressed = (mm.state != SDL_RELEASED);
        mevent.mmove.x       = static_cast< uint16 >( mm.x );
        mevent.mmove.y       = static_cast< uint16 >( mm.y );
        mevent.mmove.rx      = static_cast< sint16 >( mm.xrel );
        mevent.mmove.ry      = static_cast< sint16 >( mm.yrel );
        return true;
}

static bool sdl_joy_button_event_to_io_event( const SDL_JoyButtonEvent& jb, io_event& jevent )
{
        jevent.type            = EV_JOY_BUTTON;
        jevent.jbutton.id      = jb.which;
        jevent.jbutton.button  = jb.button;
        jevent.jbutton.pressed = (jb.type == SDL_PRESSED);
        return true;
}

static bool sdl_joy_axis_event_to_io_event( const SDL_JoyAxisEvent& ja, io_event& jevent )
{
        jevent.type          = EV_JOY_AXIS;
        jevent.jaxis.id      = ja.which;
        jevent.jaxis.axis    = ja.axis;
        jevent.jaxis.value   = ja.value;
        return true;
}

static bool sdl_joy_hat_event_to_io_event( const SDL_JoyHatEvent& jh, io_event& jevent )
{
        jevent.type          = EV_JOY_HAT;
        jevent.jhat.id       = jh.which;
        jevent.jhat.hat      = jh.hat;
        jevent.jhat.value    = jh.value;
        return true;
}

static bool sdl_joy_ball_event_to_io_event( const SDL_JoyBallEvent& jb, io_event& jevent )
{
        jevent.type          = EV_JOY_HAT;
        jevent.jball.id      = jb.which;
        jevent.jball.ball    = jb.ball;
        jevent.jball.rx      = jb.xrel;
        jevent.jball.ry      = jb.yrel;
        return true;
}

static bool sdl_event_to_io_event( const SDL_Event& e, io_event& ioevent )
{
        switch ( e.type )
        {
        case SDL_KEYDOWN         : return sdl_key_event_to_io_event( e.key, ioevent );
        case SDL_KEYUP           : return sdl_key_event_to_io_event( e.key, ioevent );
        case SDL_MOUSEMOTION     : return sdl_mouse_motion_to_io_event( e.motion, ioevent );
        case SDL_MOUSEBUTTONDOWN : return sdl_mouse_button_to_io_event( e.button, ioevent );
        case SDL_MOUSEBUTTONUP   : return sdl_mouse_button_to_io_event( e.button, ioevent );
#if NV_SDL_VERSION == NV_SDL_20
        case SDL_MOUSEWHEEL      : return sdl_mouse_wheel_to_io_event( e.wheel, ioevent );
#endif
/* // SDL 2.0 incompatible 
        case SDL_ACTIVEEVENT     : 
                ioevent.type = EV_ACTIVE; 
                ioevent.active.gain = (e.active.gain != 0); 
                return e.active.state == SDL_APPINPUTFOCUS;
        case SDL_VIDEORESIZE     : 
                ioevent.type     = EV_RESIZE; 
                ioevent.resize.x = e.resize.w;
                ioevent.resize.y = e.resize.h;
                return true;
        case SDL_NOEVENT         : return false;
        case SDL_VIDEOEXPOSE     : return false;
*/
        case SDL_SYSWMEVENT      : ioevent.type = EV_SYSTEM; return true;
        case SDL_QUIT            : ioevent.type = EV_QUIT;   return true;
        case SDL_JOYAXISMOTION   : return sdl_joy_axis_event_to_io_event( e.jaxis, ioevent ); 
        case SDL_JOYBALLMOTION   : return sdl_joy_ball_event_to_io_event( e.jball, ioevent ); 
        case SDL_JOYHATMOTION    : return sdl_joy_hat_event_to_io_event( e.jhat, ioevent ); 
        case SDL_JOYBUTTONDOWN   : return sdl_joy_button_event_to_io_event( e.jbutton, ioevent );
        case SDL_JOYBUTTONUP     : return sdl_joy_button_event_to_io_event( e.jbutton, ioevent );
        default : return false;
        }
}


gl_window::gl_window( device* dev, uint16 width, uint16 height, bool fullscreen )
        : m_device( dev ), m_width( width ), m_height( height ), m_title("NV Engine"), m_handle( nullptr ), m_hwnd( 0 ), m_adopted( false )
{
        //      bpp = m_info->vfmt->BitsPerPixel;

        SDL_GL_SetAttribute( SDL_GL_RED_SIZE, 8 );
        SDL_GL_SetAttribute( SDL_GL_GREEN_SIZE, 8 );
        SDL_GL_SetAttribute( SDL_GL_BLUE_SIZE, 8 );
        SDL_GL_SetAttribute( SDL_GL_DEPTH_SIZE, 24 );
        SDL_GL_SetAttribute( SDL_GL_DOUBLEBUFFER, 1 );

        //      SDL_GL_SetAttribute( SDL_GL_MULTISAMPLEBUFFERS, 1 );
        //      SDL_GL_SetAttribute( SDL_GL_MULTISAMPLESAMPLES, 4 );

#if NV_SDL_VERSION == NV_SDL_20
        SDL_GL_SetAttribute(SDL_GL_CONTEXT_MAJOR_VERSION, 2);
        SDL_GL_SetAttribute(SDL_GL_CONTEXT_MINOR_VERSION, 1);
        SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER, 1);
        SDL_GL_SetAttribute(SDL_GL_DEPTH_SIZE, 24);
#endif


#if NV_SDL_VERSION == NV_SDL_12
        uint32 flags = SDL_OPENGL;
        if (fullscreen) flags |= SDL_FULLSCREEN;
        m_handle = SDL_SetVideoMode( width, height, 32, flags );
#elif NV_SDL_VERSION == NV_SDL_20
        uint32 flags = SDL_WINDOW_OPENGL | SDL_WINDOW_SHOWN;
        if (fullscreen) flags |= SDL_WINDOW_FULLSCREEN;
        m_handle = SDL_CreateWindow("Nova Engine", SDL_WINDOWPOS_CENTERED, SDL_WINDOWPOS_CENTERED,
                width, height, flags );
#endif
        if ( m_handle == 0 )
        {
                NV_LOG( LOG_CRITICAL, "Video mode set failed: " << SDL_GetError( ) );
                return; // TODO: Error report
        }

//      NV_LOG( LOG_INFO, "Joystick count : " << SDL_NumJoysticks() );
//      SDL_Joystick* j = SDL_JoystickOpen(0);
//      if (j)
//      {
//              NV_LOG( LOG_INFO, "Joystick Name: " << SDL_JoystickNameForIndex(0) );
//              NV_LOG( LOG_INFO, "Joystick Number of Axes: " << SDL_JoystickNumAxes(j));
//              NV_LOG( LOG_INFO, "Joystick Number of Buttons: " << SDL_JoystickNumButtons(j));
//              NV_LOG( LOG_INFO, "Joystick Number of Balls: " << SDL_JoystickNumBalls(j));
//      }


        m_context = new sdl_gl_context( m_device, m_handle );
        m_context->set_viewport( nv::ivec4( 0, 0, m_width, m_height ) );
}

uint16 gl_window::get_width() const
{
        return m_width;
}

uint16 gl_window::get_height() const
{
        return m_height;
}

string gl_window::get_title() const
{
        return m_title;
}

void gl_window::set_title( const string& title )
{
        if ( m_adopted ) return;
#if NV_SDL_VERSION == NV_SDL_20
        SDL_SetWindowTitle( static_cast<SDL_Window*>( m_handle ), title.c_str() );
#else
        SDL_WM_SetCaption( title.c_str(), title.c_str() );
#endif
        m_title = title;
}

bool gl_window::is_event_pending()
{
        return SDL_PollEvent( nullptr ) != 0;
}

bool gl_window::poll_event( io_event& event )
{
        SDL_Event sdl_event;
        if ( SDL_PollEvent( &sdl_event ) == 0 ) return false;
        return sdl_event_to_io_event( sdl_event, event );
}

void gl_window::swap_buffers()
{
        if ( m_adopted )
        {
#if NV_PLATFORM == NV_WINDOWS
                ::SwapBuffers( (HDC)m_hwnd );
#else
        NV_ASSERT( false, "Native GL context only working with SDL 2.0!" );
#endif

        }
#if NV_SDL_VERSION == NV_SDL_20
        SDL_GL_SwapWindow( static_cast<SDL_Window*>( m_handle ) );
#else
        SDL_GL_SwapBuffers();
#endif
}

gl_window::~gl_window()
{
        delete m_context;
#if NV_SDL_VERSION == NV_SDL_20
        if ( !m_adopted ) SDL_DestroyWindow( static_cast<SDL_Window*>( m_handle ) );
#endif
}

nv::gl_window::gl_window( device* dev, void* handle, void* dc )
        : m_device( dev ), m_width( 0 ), m_height( 0 ), m_title(), m_handle( nullptr ), m_adopted( true )
{
#if NV_PLATFORM == NV_WINDOWS
#if NV_SDL_VERSION == NV_SDL_20
        m_context = new native_gl_context( m_device, dc );
        SDL_Window* window = SDL_CreateWindowFrom( handle );
        // Doesn't work :/
//      RECT rect;
//      GetClientRect( (HWND)handle, &rect );
//      m_width   = (uint16)rect.right;
//      m_height  = (uint16)rect.bottom;
        m_handle  = window;
        m_hwnd    = ::GetDC( (HWND)handle );
        m_context->set_viewport( nv::ivec4( 0, 0, m_width, m_height ) );
#else
        NV_ASSERT( false, "Native GL context only working with SDL 2.0!" );
#endif
#else
        NV_ASSERT( false, "Native GL context adoption not implemented for this platform!" );
#endif
}