#include "include.h"
#include "func.h"
#include "app_variable.h"

#define CALE_CONTEXT_X_START_GAP    30  //x方向边界间隙
#define CALE_CONTEXT_X_GAP          8  //间隔间隙
#define CALE_CONTEXT_WIDTH          ((GUI_SCREEN_WIDTH - 6*CALE_CONTEXT_X_GAP - 2*CALE_CONTEXT_X_START_GAP) / 7) //宽度

#define CALE_CONTEXT_Y_START_GAP    80 //y方向上边界间隙
#define CALE_CONTEXT_Y_GAP          6  //间隔间隙
#define CALE_CONTEXT_HEIGHT         18  //字高

#define CALE_CONTEXT_MAX                37
#define CALE_CONTEXT_NUM_COUNT_MAX      2

#define CALE_CONTEXT_TXT_W              34
#define CALE_CONTEXT_TXT_H              28

typedef struct calendar_info_t_
{
    u16 today_year;
    u8  today_mon;
    u8  today_day;
    u16 update_year;
    u8  update_mon;
    widget_icon_t *icon[CALE_CONTEXT_MAX];
} calendar_info_t;
static calendar_info_t calendar_info = {0}; 

typedef struct f_calendar_t_
{
} f_calendar_t;

enum
{
    CALE_SUNDAY = 0,
    CALE_MONDAY,
    CALE_TUESDAY,
    CALE_WEDNESDAY,
    CALE_THURSDAY,
    CALE_FRIDAY,
    CALE_SATURDAY,
} e_cale_week;

//基姆拉尔森计算公式，求某天的星期(当月份为1月或2月时，当作上一年的13月和14月)
#define CAL_DAY_OF_WEEK(year, month, day)     (uint16_t)(((day) + 1 + 2 * (month) + 3 * (month + 1) / 5 + \
                                                                (year) + (year) / 4 - (year) / 100 + (year) / 400) % 7)

enum{
    //文本
    COMPO_ID_YEAR_TEXT = 256,
    COMPO_ID_TXT_TIME,
    COMPO_ID_DATE_TEXT_START,
    COMPO_ID_DATE_TEXT_END = (COMPO_ID_DATE_TEXT_START + CALE_CONTEXT_MAX),

    //按钮
    COMPO_ID_LAST_BTN,
    COMPO_ID_NEXT_BTN,
    COMPO_ID_CUR_SHAPE,
};

//根据当前月获取上个月
static uint8_t cal_last_month(uint8_t cur_month)
{
    return (uint8_t)(cur_month > 1 ? (--cur_month) : 12);
}

//获取每个月最大天数
static uint8_t cal_max_of_days_per_month(uint16_t year, uint8_t month)
{
    uint8_t day_max;

    switch(month) {
        case 1:
        case 3:
        case 5:
        case 7:
        case 8:
        case 10:
        case 12:
            day_max = 31;
            break;

        case 4:
        case 6:
        case 9:
        case 11:
            day_max = 30;
            break;

        case 2:
            day_max = IS_LEAP_YEAR(year) ? 29 : 28;
            break;

        default:
            day_max = 30;
            break;
    }

    return day_max;
}

//刷新日历内容
static void func_calender_refresh(uint16_t year, uint8_t month, uint8_t today_day)
{
    static uint16_t frist_day_week;
    static uint16_t cur_day_week;
    static uint8_t day;
    static uint8_t day_max;
    static uint8_t last_day_max;
    static uint8_t i;
    static char buf[3] = {0};

    day = 1;
    day_max = cal_max_of_days_per_month(year, month);
    last_day_max = cal_max_of_days_per_month(year, cal_last_month(month));
    if (1 == month || 2 == month)
    {
        month += 12;
        year--;
    }
    frist_day_week = CAL_DAY_OF_WEEK(year, month, 1);
    
    for (i = 0; i < CALE_CONTEXT_MAX; i++)
    {
        compo_label_t *cale_label = compo_getobj_byid(COMPO_ID_DATE_TEXT_START + i);
        if (calendar_info.icon[i] && cale_label)
        {
            if (i < frist_day_week)
            {
                buf[0] = 48 + (last_day_max - frist_day_week + i + 1) / 10;
                buf[1] = 48 + (last_day_max - frist_day_week + i + 1) % 10;
                compo_label_set_forecolor(cale_label, COLOR_GRAY);
                compo_label_set(cale_label, buf);
                /* 最新UI需求，不显示不需要本月日期 */
                compo_label_set_visible(cale_label, false);
                widget_set_visible(calendar_info.icon[i], false);
            }
            else
            {
                if (day <= day_max)
                {
                    if (day < 10)
                    {
                        buf[0] = 48 + day;
                        buf[1] = 0;
                    }
                    else
                    {
                        buf[0] = 48 + day / 10;
                        buf[1] = 48 + day % 10;
                    }

                    if (today_day == day)
                    {
                        compo_label_set_forecolor(cale_label, COLOR_WHITE);

                        widget_icon_set(calendar_info.icon[i], UI_BUF_CALENDAR_CURRENT_BIN);
                        widget_set_visible(calendar_info.icon[i], true);
                    }
                    else
                    {
                        /* 周六、周日显示灰色背景 */
                        if (!(i % 7) || !((i + 1) % 7))
                        {
                            compo_label_set_forecolor(cale_label, COLOR_GRAY);
                            widget_set_visible(calendar_info.icon[i], false);
                        }
                        else
                        {
                            compo_label_set_forecolor(cale_label, COLOR_BLACK);

                            widget_icon_set(calendar_info.icon[i], UI_BUF_CALENDAR_NONE_BIN);
                            widget_set_visible(calendar_info.icon[i], true);
                        }
                    }

                    compo_label_set(cale_label, buf);
                    compo_label_set_visible(cale_label, true);
                }
                else
                {
                    if ((day - day_max) < 10)
                    {
                        buf[0] = 48 + (day - day_max);
                        buf[1] = 0;
                    }
                    else
                    {
                        buf[0] = 48 + (day - day_max) / 10;
                        buf[1] = 48 + (day - day_max) % 10;
                    }
                    compo_label_set_forecolor(cale_label, COLOR_GRAY);
                    compo_label_set(cale_label, buf);
                    /* 最新UI需求，不显示不需要本月日期 */
                    compo_label_set_visible(cale_label, false);
                    widget_set_visible(calendar_info.icon[i], false);
                }
                day++;
            }
        }
    }
}

//创建日历主界面
void func_calender_content_show(compo_form_t *frm)
{
    if (frm == NULL) {
        return;
    }

    compo_label_t *cale_label = NULL;

    static uint8_t i;
    static s16 x_pos = CALE_CONTEXT_X_START_GAP + CALE_CONTEXT_WIDTH / 2;
    static s16 y_pos = CALE_CONTEXT_Y_START_GAP;
    static char week_text[7][4] = {"Su", "Mo", "Tu", "We", "Th", "Fr", "Sa"};
    static char week_text_cn[7][4] = {"日", "一", "二", "三", "四", "五", "六"};

    //上方时间
    char buf_time[10] = {0};
    if (SysVariable.deviceInfo.timeType == TIME_TYPE_12_HOUR)
        sprintf(buf_time, "%02d:%02d%s", get_autoformat_hour(SysVariable.Rtc.hour), SysVariable.Rtc.min, SysVariable.Rtc.hour >= 12 ? "PM" : "AM");
    else
        sprintf(buf_time, "%02d:%02d", SysVariable.Rtc.hour, SysVariable.Rtc.min);
    compo_textbox_t *txt_time = compo_textbox_create(frm, 8);
    compo_setid(txt_time, COMPO_ID_TXT_TIME);
    compo_textbox_set_location(txt_time, GUI_SCREEN_CENTER_X, 11 + 6, 95, 25);
    compo_textbox_set_autosize(txt_time, true);
    compo_textbox_set(txt_time, buf_time);
    // 新建日历文本内容
    for (i = 0; i < CALE_CONTEXT_MAX; i++)
    {
        if (!(i % 7)) {
            x_pos = CALE_CONTEXT_X_START_GAP + CALE_CONTEXT_WIDTH / 2;
            y_pos = CALE_CONTEXT_Y_START_GAP + (i / 7) * (CALE_CONTEXT_HEIGHT + CALE_CONTEXT_Y_GAP);
        }

        calendar_info.icon[i] = widget_icon_create(frm->page_body, UI_BUF_CALENDAR_NONE_BIN);
        widget_set_pos(calendar_info.icon[i], x_pos + 1, y_pos - 8);
        widget_set_visible(calendar_info.icon[i], false);

        cale_label = compo_label_create(frm, CALE_CONTEXT_NUM_COUNT_MAX);
        compo_label_set_font(cale_label, UI_BUF_0FONT_FONT_BIN);
        compo_setid(cale_label, COMPO_ID_DATE_TEXT_START + i);
        compo_label_set_pos(cale_label, x_pos, y_pos - 10);

        x_pos += (CALE_CONTEXT_WIDTH + CALE_CONTEXT_X_GAP);
    }

    // 新建（日 一 二 三 四 五 六）文本
    x_pos = CALE_CONTEXT_X_START_GAP + CALE_CONTEXT_WIDTH / 2;
    y_pos = CALE_CONTEXT_Y_START_GAP - 40;
    for (i = 0; i < 7; i++)
    {
        cale_label = compo_label_create(frm, 2);
        compo_label_set_location(cale_label, x_pos + 2, y_pos + 5, CALE_CONTEXT_TXT_W, CALE_CONTEXT_TXT_H);
#if defined(__LANGUAGE_SM_CHINESE__)
        if (tjd_Get_Language_Current_Index() == LANGUAGE_TYPE_Chinese)
            compo_label_set(cale_label, week_text_cn[i]);
        else
#endif
            compo_label_set(cale_label, week_text[i]);

        // /* 周六、周日颜色单独区分 */
        // if (!i || i == 6) {
        //     compo_label_set_forecolor(cale_label, COLOR_GRAY);
        // }
        x_pos += (CALE_CONTEXT_WIDTH + CALE_CONTEXT_X_GAP);
    }

    compo_shape_t *line_shape = compo_shape_create(frm, COMPO_SHAPE_TYPE_RECTANGLE);
    compo_shape_set_location(line_shape, GUI_SCREEN_CENTER_X, y_pos + CALE_CONTEXT_HEIGHT, GUI_SCREEN_WIDTH, 2);
    compo_shape_set_color(line_shape, COLOR_GRAY);

    compo_shape_t *line_shape2 = compo_shape_create(frm, COMPO_SHAPE_TYPE_RECTANGLE);
    compo_setid(line_shape2, COMPO_ID_CUR_SHAPE);
    compo_shape_set_location(line_shape2, 2 + (CALE_CONTEXT_X_START_GAP + CALE_CONTEXT_WIDTH / 2) + (CAL_DAY_OF_WEEK(calendar_info.today_year, calendar_info.today_mon, calendar_info.today_day))*((CALE_CONTEXT_WIDTH + CALE_CONTEXT_X_GAP)),
     y_pos + CALE_CONTEXT_HEIGHT, 30, 2);
    compo_shape_set_color(line_shape2, make_color(255,115,0));
    compo_shape_set_visible(line_shape2, false);
    // year_text
    char str_txt[TEXTBOX_TEXT_BUF_LEN] = {0};
    cale_label = compo_label_create(frm, 8);
    compo_label_set_font(cale_label, UI_BUF_0FONT_FONT_BIN);
    compo_label_set_pos(cale_label, GUI_SCREEN_CENTER_X, GUI_SCREEN_HEIGHT - 23);
    sprintf(str_txt, "%04d.%02d", SysVariable.Rtc.year, SysVariable.Rtc.mon);
    compo_label_set(cale_label, str_txt);
    compo_setid(cale_label, COMPO_ID_YEAR_TEXT);

    // last_btn
    compo_form_add_image(frm, UI_BUF_COMMON_LEFT_BIN, GUI_SCREEN_CENTER_X - 53, GUI_SCREEN_HEIGHT - 23);
    compo_button_t *btn = compo_button_create(frm);
    compo_setid(btn, COMPO_ID_LAST_BTN);
    compo_button_set_location(btn, GUI_SCREEN_CENTER_X - 53, GUI_SCREEN_HEIGHT - 23, 20, 32);

    // next_btn
    compo_form_add_image(frm, UI_BUF_COMMON_RIGHT_BIN, GUI_SCREEN_CENTER_X + 53, GUI_SCREEN_HEIGHT - 23);
    btn = compo_button_create(frm);
    compo_setid(btn, COMPO_ID_NEXT_BTN);
    compo_button_set_location(btn, GUI_SCREEN_CENTER_X + 53, GUI_SCREEN_HEIGHT - 23, 20, 32);
}

//创建日历主界面
compo_form_t *func_calender_form_create(void)
{
    /* 初始化日历基础数据 */
    calendar_info.today_year  = SysVariable.Rtc.year;
    calendar_info.today_mon   = SysVariable.Rtc.mon;
    calendar_info.today_day   = SysVariable.Rtc.day;
    calendar_info.update_year = calendar_info.today_year;
    calendar_info.update_mon  = calendar_info.today_mon;

    // 新建窗体
    compo_form_t *frm = compo_form_create(true);

    // 设置标题栏
    //compo_form_set_mode(frm, COMPO_FORM_MODE_SHOW_TITLE | COMPO_FORM_MODE_SHOW_TIME);
    //compo_form_set_title(frm, i18n[STR_SETTING_CALENDAR]);

    /* 显示日历内容 */
    func_calender_content_show(frm);

    /* 刷新日历信息 */
    func_calender_refresh(SysVariable.Rtc.year, SysVariable.Rtc.mon, SysVariable.Rtc.day);

    return frm;
}

//切换日期并刷新
static void func_calendar_date_update(bool next)
{
    compo_shape_t *cur_shape = compo_getobj_byid(COMPO_ID_CUR_SHAPE);
    static uint16_t cur_week;
    uint8_t today_day;
    component_t *comop;

    cur_week = CAL_DAY_OF_WEEK(calendar_info.today_year, calendar_info.today_mon, calendar_info.today_day);

    char str_txt[TEXTBOX_TEXT_BUF_LEN] = {0};

    if(next) {
        calendar_info.update_mon ++;
        if(calendar_info.update_mon > 12) {
            calendar_info.update_mon = 1;
            calendar_info.update_year ++;
        }
    } else {
        calendar_info.update_mon --;
        if(0 == calendar_info.update_mon) {
            calendar_info.update_mon = 12;
            calendar_info.update_year --;
        }
    }

    comop = compo_getobj_byid(COMPO_ID_YEAR_TEXT);
    sprintf(str_txt, "%04d.%02d", calendar_info.update_year, calendar_info.update_mon);
    compo_label_set((compo_label_t *)comop, str_txt);

    //刷新当前日期
    today_day = 0;
    if(calendar_info.today_year == calendar_info.update_year && calendar_info.today_mon == calendar_info.update_mon) {
        today_day = calendar_info.today_day;
        if(cur_shape)
        {
            compo_shape_set_location(cur_shape,2 + (CALE_CONTEXT_X_START_GAP + CALE_CONTEXT_WIDTH / 2) + cur_week*((CALE_CONTEXT_WIDTH + CALE_CONTEXT_X_GAP)), 
            CALE_CONTEXT_Y_START_GAP - 40 + CALE_CONTEXT_HEIGHT, 30, 2);
            compo_shape_set_visible(cur_shape, false);
        }
    }
    else{
        if(cur_shape)
        {
            compo_shape_set_visible(cur_shape, false);
        }
    }

    //刷新日历内容
    func_calender_refresh(calendar_info.update_year, calendar_info.update_mon, today_day);
}

//单击按钮
static void func_calendar_button_click(void)
{
    int id = compo_get_button_id();

    if (COMPO_ID_LAST_BTN == id) {
        func_calendar_date_update(false);
    } else if (COMPO_ID_NEXT_BTN == id) {
        func_calendar_date_update(true);
    }
}

//公共事件处理
static void func_calendar_comm_process(void)
{
    func_process();
}

//消息处理
static void func_calendar_message(size_msg_t msg)
{
    switch (msg)
    {
    case MSG_CTP_CLICK:
        func_calendar_button_click();
        break;

    case MSG_CTP_SHORT_LEFT:
    case MSG_QDEC_FORWARD:
        func_calendar_date_update(true);
        break;

    case MSG_CTP_SHORT_RIGHT:
    case MSG_QDEC_BACKWARD:
        if (msg == MSG_CTP_SHORT_RIGHT && ctp_get_sxy().x < 20) {
            func_message(msg);
            break;
        }
        func_calendar_date_update(false);
        break;

    default:
        func_message(msg);
        break;
    }
}

//进入日历功能
static void func_calendar_enter(void)
{
    func_cb.f_cb = func_zalloc(sizeof(f_calendar_t));

    func_cb.frm_main = func_calender_form_create();
}

//退出日历功能
static void func_calendar_exit(void)
{
    func_cb.last = FUNC_CALENDAER;
}

//日历功能
void func_calendar(void)
{
    printf("%s\n", __func__);
    func_calendar_enter();
    while (func_cb.sta == FUNC_CALENDAER) {
        func_calendar_comm_process();
        func_calendar_message(msg_dequeue());
    }
    func_calendar_exit();
}