# -*- python -*-

# Copyright © 2014  Mattias Andrée (maandree@member.fsf.org)
# 
# 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 3 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.
# 
# You should have received a copy of the GNU General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.

cimport cython
from libc.stdlib cimport malloc, free
from libc.stdint cimport *


cdef extern int blueshift_vidmode_open(int use_screen, char* display)
'''
Start stage of colour curve control

@param   use_screen  The screen to use
@param   display     The display to use, `NULL` for the current one
@return              Zero on error, otherwise the size of colours curves
'''

cdef extern int blueshift_vidmode_read(int use_crtc, uint16_t* r_curve, uint16_t* g_curve, uint16_t* b_curve)
'''
Gets the current colour curves

@param   use_crtc  The CRTC to use
@param   r_gamma   Storage location for the red colour curve
@param   g_gamma   Storage location for the green colour curve
@param   b_gamma   Storage location for the blue colour curve
@return            Zero on success
'''

cdef extern int blueshift_vidmode_apply(unsigned long long int use_crtcs,
                                        uint16_t* r_curve, uint16_t* g_curve, uint16_t* b_curve)
'''
Apply stage of colour curve control

@param   use_crtcs  Mask of CRTC:s to use
@param   r_curve    The red colour curve
@param   g_curve    The green colour curve
@param   b_curve    The blue colour curve
@return             Zero on success
'''

cdef extern void blueshift_vidmode_close()
'''
Resource freeing stage of colour curve control
'''



cdef int vidmode_gamma_size
'''
The size of the curves
'''
vidmode_gamma_size = 0


cdef uint16_t* r_c
'''
Storage space for the red colour curve in C native data structure
'''

cdef uint16_t* g_c
'''
Storage space for the green colour curve in C native data structure
'''

cdef uint16_t* b_c
'''
Storage space for the blue colour curve in C native data structure
'''



def vidmode_open(int use_screen, display):
    '''
    Start stage of colour curve control
    
    @param   use_screen      The screen to use
    @param   display:bytes?  The display to use, `None` for the current
    @return  :bool           Whether call was successful
    '''
    global vidmode_gamma_size, r_c, g_c, b_c
    # Get the display to use
    cdef char* display_ = NULL
    if display is not None:
        display_ = display
    # Allocate the storage space for the C native colour curves
    r_c = <uint16_t*>malloc(256 * sizeof(uint16_t))
    g_c = <uint16_t*>malloc(256 * sizeof(uint16_t))
    b_c = <uint16_t*>malloc(256 * sizeof(uint16_t))
    # Check for out-of-memory error
    if (r_c is NULL) or (g_c is NULL) or (b_c is NULL):
        raise MemoryError()
    # Start using VidMode for the screen and display
    vidmode_gamma_size = blueshift_vidmode_open(use_screen, display_)
    # Successful only if we got an even usable size for the curves
    return vidmode_gamma_size > 1


def vidmode_read(int use_crtc):
    '''
    Gets the current colour curves
    
    @param   use_crtc                                  The CRTC to use
    @return  :(r:list<int>, g:list<int>, b:list<int>)  The current red, green and blue colour curves
    '''
    # Read the current curves
    if not blueshift_vidmode_read(use_crtc, r_c, g_c, b_c) == 0:
        raise Exception()
    # Convert to Python integer lists
    r, g, b = [], [], []
    for i in range(vidmode_gamma_size):
        r.append(r_c[i])
        g.append(g_c[i])
        b.append(b_c[i])
    return (r, g, b)


def vidmode_apply(unsigned long long use_crtcs, r_curve, g_curve, b_curve):
    '''
    Apply stage of colour curve control
    
    @param   use_crtcs          Mask of CRTC:s to use
    @param   r_curve:list<int>  The red colour curve
    @param   g_curve:list<int>  The green colour curve
    @param   b_curve:list<int>  The blue colour curve
    @return                     Zero on success
    '''
    # Convert curves to 16-bit C integers
    for i in range(256):
        r_c[i] = r_curve[i] & 0xFFFF
        g_c[i] = g_curve[i] & 0xFFFF
        b_c[i] = b_curve[i] & 0xFFFF
    # Apply curves
    return blueshift_vidmode_apply(use_crtcs, r_c, g_c, b_c)


def vidmode_close():
    '''
    Resource freeing stage of colour curve control
    '''
    # Free the storage space for the colour curves
    free(r_c)
    free(g_c)
    free(b_c)
    # Close free all resources in the native code
    blueshift_vidmode_close()