#include "asm/cpu.h"
#include "asm/irq.h"
#include "asm/clock.h"
#include "system/timer.h"
#include "system/init.h"
#include "gpio.h"
#include "asm/power_interface.h"

/* #define LOG_TAG_CONST   TMR */
/* #define LOG_TAG         "[USER_TMR]" */
/* #define LOG_INFO_ENABLE */
/* #define LOG_DUMP_ENABLE */
/* #define LOG_ERROR_ENABLE */
/* #define LOG_DEBUG_ENABLE */
#include "debug.h"
/*
 *
 */

//注意：改定时器会被低功耗使用到，使用时需要关闭低功耗
/* #define TCFG_USER_TIMER_ENABLE */

#ifdef TCFG_USER_TIMER_ENABLE

struct timer_hdl {
    int index;
    int prd;
};

static struct timer_hdl hdl;

#define __this  (&hdl)

static const u32 timer_div[] = {
    /*0000*/    1,
    /*0001*/    4,
    /*0010*/    16,
    /*0011*/    64,
    /*0100*/    2,
    /*0101*/    8,
    /*0110*/    32,
    /*0111*/    128,
    /*1000*/    256,
    /*1001*/    4 * 256,
    /*1010*/    16 * 256,
    /*1011*/    64 * 256,
    /*1100*/    2 * 256,
    /*1101*/    8 * 256,
    /*1110*/    32 * 256,
    /*1111*/    128 * 256,
};

#define APP_TIMER_CLK           clk_get("timer")
#define MAX_TIME_CNT            0x7fff
#define MIN_TIME_CNT            0x100


#define TIMER_CON               JL_TIMER0->CON
#define TIMER_CNT               JL_TIMER0->CNT
#define TIMER_PRD               JL_TIMER0->PRD
#define TIMER_VETOR             IRQ_TIME0_IDX

#define TIMER_UNIT_MS           1 //1ms起一次中断
#define MAX_TIMER_PERIOD_MS     (1000/TIMER_UNIT_MS)

/*-----------------------------------------------------------*/

static volatile u32 delay_cnt = 0;

void user_delay_nms(int cnt)
{
    delay_cnt = cnt;

    while (delay_cnt);
}

static u8 io_status = 0;
void __attribute__((weak)) timer_1ms_handler()
{
    /* putchar('a'); */
    if (io_status) {
        gpio_direction_output(IO_PORTA_06, 1);
        io_status = 0;
    } else {
        gpio_direction_output(IO_PORTA_06, 0);
        io_status = 1;
    }
}

___interrupt
static void timer0_isr()
{
    static u32 cnt1 = 0;

//   irq_handler_enter(TIME1_INT);

    TIMER_CON |= BIT(14);

    ++cnt1;

    timer_1ms_handler();

    if (delay_cnt) {
        delay_cnt--;
    }

    if (!(cnt1 % 5)) { //5ms
        /* r_printf("a"); */
    }

    if (cnt1 == 500) { //500ms
        /* putchar('!'); */
        cnt1 = 0;
    }
//    irq_handler_exit(TIME1_INT);
}

int timer0_init()
{
    u32 prd_cnt;
    u8 index;

    printf("%s :%d", __func__, __LINE__);

    for (index = 0; index < (sizeof(timer_div) / sizeof(timer_div[0])); index++) {
        prd_cnt = TIMER_UNIT_MS * (APP_TIMER_CLK / 1000) / timer_div[index];
        if (prd_cnt > MIN_TIME_CNT && prd_cnt < MAX_TIME_CNT) {
            break;
        }
    }
    __this->index   = index;
    __this->prd     = prd_cnt;

    TIMER_CNT = 0;
    TIMER_PRD = prd_cnt; //1ms
    request_irq(TIMER_VETOR, 1, timer0_isr, 0);
    TIMER_CON = (index << 4) | BIT(0) | BIT(3);

    printf("PRD : 0x%x / %d", TIMER_PRD, clk_get("timer"));

    return 0;
}

#endif