#include <rtthread.h>
#include "key.h"

#include <rtgui/event.h>
#include <rtgui/rtgui_server.h>

static void key_io_init(void)
{
    /*Select CPIO function*/
    KEY_PFR &= ~KEY_MASK;
	/*Set CPIO Pull-Up function*/
    KEY_PCR |= KEY_MASK;
    /*Make button pins inputs*/
    KEY_DDR &= ~KEY_MASK;
}

static void key_thread_entry(void *parameter)
{
    rt_time_t next_delay;
    struct rtgui_event_kbd kbd_event;
    rt_uint8_t i;
    
    key_io_init();

    /* init keyboard event */
    RTGUI_EVENT_KBD_INIT(&kbd_event);
    kbd_event.mod  = RTGUI_KMOD_NONE;
    kbd_event.unicode = 0;

    while (1)
    {
        next_delay = RT_TICK_PER_SECOND/10;
        kbd_event.key = RTGUIK_UNKNOWN;
        kbd_event.type = RTGUI_KEYDOWN;

        if(KEY_ENTER_GETVALUE() == 0 )
        {
            for(i=0; ; i++)
            {
                rt_thread_delay( next_delay );
                if (KEY_ENTER_GETVALUE() == 0)
                {
                    if(i>=4)
                    {
                        /* HOME key */
                        //rt_kprintf("key_home\n");
                        kbd_event.key  = RTGUIK_HOME;
                        next_delay = RT_TICK_PER_SECOND/5;
                        break;
                    }
                }
                else
                {
                    //rt_kprintf("key_enter\n");
                    kbd_event.key  = RTGUIK_RETURN;
                    break;
                }
            }
        }

        if(KEY_DOWN_GETVALUE() == 0)
        {
            // rt_kprintf("key_down\n");
            kbd_event.key  = RTGUIK_DOWN;
        }

        if(KEY_UP_GETVALUE() == 0)
        {
            // rt_kprintf("key_up\n");
            kbd_event.key  = RTGUIK_UP;
        }

        if(KEY_RIGHT_GETVALUE() == 0)
        {
            // rt_kprintf("key_right\n");
            kbd_event.key  = RTGUIK_RIGHT;
        }

        if(KEY_LEFT_GETVALUE() == 0)
        {
            // rt_kprintf("key_left\n");
            kbd_event.key  = RTGUIK_LEFT;
        }

        if(kbd_event.key != RTGUIK_UNKNOWN)
        {
            /* post down event */
            rtgui_server_post_event(&(kbd_event.parent), sizeof(kbd_event));

            //next_delay = RT_TICK_PER_SECOND/10;
            /* delay to post up event */
            rt_thread_delay(next_delay);

            /* post up event */
            kbd_event.type = RTGUI_KEYUP;
            rtgui_server_post_event(&(kbd_event.parent), sizeof(kbd_event));
        }

        /* wait next key press */
        rt_thread_delay(next_delay);
    }
}

static rt_thread_t key_thread;
void rt_hw_key_init(void)
{
    key_thread = rt_thread_create("key", key_thread_entry, RT_NULL, 384, 30, 5);
    if(key_thread != RT_NULL) 
        rt_thread_startup(key_thread);
}