#include <string.h>
#include <unistd.h>
#include "menu.h"
#include "lcd.h"
#include "led.h"
#include "beep.h"
#include "paras.h"
#include "cascade.h"
#include "elog.h"
#include "../src/thread.h"
#include "common.h"
#include "lang.h"
#include "timer.h"
#include "cfg.h"

#define REFRESH_TIME   300
//#define TEXT_ALIGN

#if 1
    #define LOGD  log_d
    #define LOGE  log_e
#else
    #define LOGD  printf
    #define LOGE  printf
#endif

enum {
    MENU_SYSTEM=0,
    MENU_INPUT,
    MENU_OUTPUT,
#ifndef NO_SENSOR_UI
    MENU_SENSOR,
#endif
    MENU_MODBUS,


    MENU_MAX
};
enum {
    MODBUS_ITEM_ADDR=0,
    MODBUS_ITEM_MODE,
    MODBUS_ITEM_SAVE,
    MODBUS_ITEM_QUIT,

    MODBUS_ITEM_MAX
};
enum {
    UFLAG_KEY=(1<<0),
    UFLAG_FLIP=(1<<1),
    UFLAG_TIMER=(1<<2),
    UFLAG_REFRESH=(1<<3),
};

typedef struct {
    int menu_id;
    int item_id;
    int item_max;
}page_data_t;
typedef struct {
    int menu_id;
    int menu_lv;    //level
    page_data_t page[MENU_MAX];
}menu_data_t;
typedef struct {
    int         fd;
    int         tmr;
    int         lang;

    int         ph_in;
    int         ph_out;
    int         ch_out;
    int         ch_out_max;
    menu_data_t menu;
    
    uint64_t    flip_ms;
    uint64_t    refresh_ms;

    uint16_t    uflag;
    int         fliptime;

    ModbusInfo_t mb;
    GlobalDeviceManager *dm;
}menu_handle_t;
static int lang_id=LANG_ID_CHINESE;
//static int lang_id=LANG_ID_ENGLISH;
static menu_handle_t mnHandle={0};


static inline GlobalDeviceManager* get_dm(void)
{
    return &__globalDeviceManage;
}
static uint64_t get_ms(void)
{
    struct timeval tv;
    gettimeofday(&tv, NULL);
    return (uint64_t)(tv.tv_sec)*1000 + (uint64_t)(tv.tv_usec)/1000;
}
static void delay_ms(int ms)
{
    usleep(1000*ms);
}
static ModbusInfo_t*get_pmb(menu_handle_t *h)
{
    if(h->menu.menu_lv==0) {
        return &h->dm->_globalDevInfo.cascade;
    }
    else {
        return &h->mb;
    }
}

static int get_ch_out_max(menu_handle_t *h)
{
    int ch=0;
    GlobalPowerManger *tmp;
    
    if(!thread_is_running(THREAD_ID_POWER)) {
        return 0;
    }
    if(list_empty(&h->dm->_globalPowerManger.list)) {
        return 0;
    }
    list_for_each_entry(tmp, &h->dm->_globalPowerManger.list, list) {
        ch++;
    }
    return ch;
}
static int is_ph3_in(menu_handle_t *h)
{
    if ((h->dm->_globalDevInfo.product.pwr_type == SmartPDU_Tree_AC_Tree ||
         h->dm->_globalDevInfo.product.pwr_type == SmartPDU_Tree_AC_One  ||
         h->dm->_globalDevInfo.product.pwr_type == SmartPDU_Tree_AC_Two  ||
         h->dm->_globalDevInfo.product.pwr_type == SmartPDU_Tree_AC_One_B)) {
        return 1;
    }
    return 0;
}
static int is_ph3_out(menu_handle_t *h)
{
    if (h->dm->_globalDevInfo.product.pwr_type == SmartPDU_Tree_AC_Tree) {
        return 1;
    }
    return 0;
}
static int get_input(menu_handle_t *h, int ph, PowerInfo *info)
{
    int i=0;
    GlobalTreeACManager *tmp3=NULL;

    if (is_ph3_in(h) && ph>0) {
        if(list_empty(&h->dm->_globalPowerManger.list_Tree_AC)) {
            return -1;
        }

        list_for_each_entry(tmp3, &h->dm->_globalPowerManger.list_Tree_AC, list_Tree_AC) {
            i++;
            if (i==ph)
                break;
        }
        if (tmp3) {
            *info = tmp3->_PowerInfo;
        }
    }
    else {
        *info = h->dm->_globalPowerManger._PowerInfo;
    }
    return 0;
}
static int get_output(menu_handle_t *h, int ch, int ph, PowerInfo *info)
{
    int i=-1,j=0;
    GlobalPowerManger *tmp;
    GlobalTreeACManager *tmp3 = NULL;
    
    list_for_each_entry(tmp, &h->dm->_globalPowerManger.list, list)
    {
        i++;
        if (i==ch) {
            if (is_ph3_out(h) && ph>0) {
                list_for_each_entry(tmp3, &tmp->list_Tree_AC, list_Tree_AC)
                {
                    j++;
                    if(j==ph) {
                        *info = tmp3->_PowerInfo;
                    }
                }
            }
            else {
                *info = tmp->_PowerInfo;
            }
            return 0;
        }
    }

    return -1;
}
static void refresh_handler(void *arg, int last)
{
    menu_handle_t *h=(menu_handle_t*)arg;
    h->uflag |= UFLAG_TIMER;
    
    if(last) {
        timer_stop(h->tmr);
    }
}
static void tmr_start(menu_handle_t *h, int ms)
{
    if(h->tmr!=-1) {
        timer_stop(h->tmr);
    }
    timer_start(h->tmr, ms, -1, refresh_handler, h);
}
static void tmr_stop(menu_handle_t *h)
{
    timer_stop(h->tmr);
    h->tmr = -1;
}

static void menu_system_paint(menu_handle_t *h, int font1, int font2, int item_h, key_val_t *kv)
{
    char time[60],tmp[100];

    lcd_fill(0);
    sprintf(tmp, "SmartPDU");
    lcd_draw_string(0, 0, LCD_WIDTH, item_h, tmp, font1, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_CENTER, VERTICAL_CENTER);

    sprintf(tmp, "%s:%s", lang_get_str(h->lang, STR_ID_VER), VERSION);
    lcd_draw_string(0, item_h, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    get_curtime_str2(time, sizeof(time));
    sprintf(tmp, "%s:%s", lang_get_str(h->lang, STR_ID_TIME), time);
    lcd_draw_string(0, item_h*2, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    sprintf(tmp, "IP:%s", getLocalIpAddress("eth0"));
    lcd_draw_string(0, item_h*3, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
    lcd_refresh();
}
static void menu_input_paint(menu_handle_t *h, int font1, int font2, int item_h, key_val_t *kv)
{
    int r;
    char tmp[100];
    PowerInfo *pwr,info={0};

    pwr = &info;
    sprintf(tmp, "%s", lang_get_str(h->lang, STR_ID_INPUT));

    r = get_input(h, h->ph_in, &info);
    if(r==0) {
        if(h->menu.menu_lv==1 && h->ph_in>0) {
            sprintf(tmp, "%s-L%d", lang_get_str(h->lang, STR_ID_INPUT), h->ph_in);
        }
    }

    lcd_fill(0);
    lcd_draw_string(0, 0, LCD_WIDTH, item_h, tmp, font1, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_CENTER, VERTICAL_CENTER);

#ifdef TEXT_ALIGN
    sprintf(tmp, "%s:%0.2f", lang_get_str(h->lang, STR_ID_VOLTAGE), pwr->voltage);
    lcd_draw_string(0, item_h, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
    sprintf(tmp, "%s:%0.2f", lang_get_str(h->lang, STR_ID_CURRENT), pwr->current);
    lcd_draw_string(LCD_WIDTH/2, item_h, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    sprintf(tmp, "%s:%0.2f", lang_get_str(h->lang, STR_ID_POWER), pwr->power);
    lcd_draw_string(0, item_h*2, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
    sprintf(tmp, "%s:%0.2f", lang_get_str(h->lang, STR_ID_FACTOR), pwr->factor);
    lcd_draw_string(LCD_WIDTH/2, item_h*2, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
#else
    sprintf(tmp, "%s:%0.2f %s:%0.2f", lang_get_str(h->lang, STR_ID_VOLTAGE), pwr->voltage, lang_get_str(h->lang, STR_ID_CURRENT), pwr->current);
    lcd_draw_string(0, item_h, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    sprintf(tmp, "%s:%0.2f %s:%0.2f", lang_get_str(h->lang, STR_ID_POWER), pwr->power, lang_get_str(h->lang, STR_ID_FACTOR), pwr->factor);
    lcd_draw_string(0, item_h*2, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
#endif
    sprintf(tmp, "%s:%0.2f", lang_get_str(h->lang, STR_ID_CONSUMP), pwr->consumption);
    lcd_draw_string(0, item_h*3, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    lcd_refresh();
    
}
static void menu_output_paint(menu_handle_t *h, int font1, int font2, int item_h, key_val_t *kv)
{
    int r;
    char tmp[100];
    PowerInfo *pwr,info={0};

    pwr = &info;
    sprintf(tmp, "%s", lang_get_str(h->lang, STR_ID_OUTPUT));

    r = get_output(h, h->ch_out, h->ph_out, &info);
    if(r==0 && h->ch_out_max>0) {
        sprintf(tmp, "%s CH%d", lang_get_str(h->lang, STR_ID_OUTPUT), h->ch_out+1);
    }

    lcd_fill(0);
    lcd_draw_string(0, 0, LCD_WIDTH, item_h, tmp, font1, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_CENTER, VERTICAL_CENTER);

    char *pon=((pwr->status)?lang_get_str(h->lang, STR_ID_ON):lang_get_str(h->lang, STR_ID_OFF));
#ifdef TEXT_ALIGN
    sprintf(tmp, "%s:%s", lang_get_str(h->lang, STR_ID_SWITCH), pon);
    lcd_draw_string(0, item_h, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
    sprintf(tmp, "%s:%0.2f", lang_get_str(h->lang, STR_ID_CURRENT), pwr->current);
    lcd_draw_string(LCD_WIDTH/2, item_h, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    sprintf(tmp, "%s:%0.2f ", lang_get_str(h->lang, STR_ID_POWER), pwr->power);
    lcd_draw_string(0, item_h*2, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
    sprintf(tmp, "%s:%0.2f", lang_get_str(h->lang, STR_ID_FACTOR), pwr->factor);
    lcd_draw_string(LCD_WIDTH/2, item_h*2, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
#else
    sprintf(tmp, "%s:%s  %s:%0.2f", lang_get_str(h->lang, STR_ID_SWITCH), pon, lang_get_str(h->lang, STR_ID_CURRENT), pwr->current);
    lcd_draw_string(0, item_h, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    sprintf(tmp, "%s:%0.2f %s:%0.2f", lang_get_str(h->lang, STR_ID_POWER), pwr->power, lang_get_str(h->lang, STR_ID_FACTOR), pwr->factor);
    lcd_draw_string(0, item_h*2, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
#endif
    sprintf(tmp, "%s:%0.2f", lang_get_str(h->lang, STR_ID_CONSUMP), pwr->consumption);
    lcd_draw_string(0, item_h*3, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    lcd_refresh();
    
}
static void menu_sensor_paint(menu_handle_t *h, int font1, int font2, int item_h, key_val_t *kv)
{
    char tmp[100];

    lcd_fill(0);
    sprintf(tmp, "%s/%s", lang_get_str(h->lang, STR_ID_TEMP), lang_get_str(h->lang, STR_ID_HUMI));
    lcd_draw_string(0, 0, LCD_WIDTH, item_h, tmp, font1, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_CENTER, VERTICAL_CENTER);

#ifdef TEXT_ALIGN
    sprintf(tmp, "%s:", lang_get_str(h->lang, STR_ID_TEMP));
    lcd_draw_string(0, item_h, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
    sprintf(tmp, "%0.1f", dm->g_modebus_read.temprature/100.0f);
    lcd_draw_string(LCD_WIDTH/2, item_h, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    sprintf(tmp, "%s:", lang_get_str(h->lang, STR_ID_HUMI));
    lcd_draw_string(0, item_h*2, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
    sprintf(tmp, "%0.1f", dm->g_modebus_read.humidity/100.0f);
    lcd_draw_string(LCD_WIDTH/2, item_h*2, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
#else
    sprintf(tmp, " %s: %0.1f%s", lang_get_str(h->lang, STR_ID_TEMP), h->dm->g_modebus_read.temprature/100.0f,lang_get_str(0,STR_ID_TEMPLOG));
    lcd_draw_string(0, item_h, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    sprintf(tmp, " %s: %0.1f%%", lang_get_str(h->lang, STR_ID_HUMI), h->dm->g_modebus_read.humidity/100.0f);
    lcd_draw_string(0, item_h*2, LCD_WIDTH, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
#endif

    lcd_refresh();
    
}
static void menu_modbus_paint(menu_handle_t *h, int font1, int font2, int item_h, key_val_t *kv)
{
    int r,font_color;
    char tmp[100];
    ModbusInfo_t *pmb=get_pmb(h);
    static uint8_t flash_cnt=0;
    
    if(h->uflag&UFLAG_TIMER) {
        flash_cnt++;
    }

    lcd_fill(0);

    sprintf(tmp, "MODBUS %s", lang_get_str(h->lang, STR_ID_SETT));
    lcd_draw_string(0, 0, LCD_WIDTH, item_h, tmp, font1, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_CENTER, VERTICAL_CENTER);

    font_color = COLOR_WHITE;
    if(h->menu.menu_lv && h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_ADDR) {
        if(h->uflag&UFLAG_TIMER && h->menu.menu_lv==2) {
            font_color = (flash_cnt%2)?COLOR_WHITE:COLOR_BLACK;
        }
        sprintf(tmp, ">%s:", lang_get_str(h->lang, STR_ID_ADDR));
    }
    else {
        sprintf(tmp, " %s:", lang_get_str(h->lang, STR_ID_ADDR));
    }
    lcd_draw_string(0, item_h, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
    sprintf(tmp, "%d", pmb->addr);
    lcd_draw_string(LCD_WIDTH/2, item_h, LCD_WIDTH/2, item_h, tmp, font2, font_color, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    font_color = COLOR_WHITE;
    if(h->menu.menu_lv && h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_MODE) {
        if(h->uflag&UFLAG_TIMER && h->menu.menu_lv==2) {
            font_color = (flash_cnt%2)?COLOR_WHITE:COLOR_BLACK;
        }
        sprintf(tmp, ">%s:", lang_get_str(h->lang, STR_ID_MODE));
    }
    else {
        sprintf(tmp, " %s:", lang_get_str(h->lang, STR_ID_MODE));
    }
    lcd_draw_string(0, item_h*2, LCD_WIDTH/2, item_h, tmp, font2, COLOR_WHITE, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);
    sprintf(tmp, "%s", (pmb->mode==MODBUS_MASTER)?lang_get_str(h->lang, STR_ID_MASTER):lang_get_str(h->lang, STR_ID_SLAVE));
    lcd_draw_string(LCD_WIDTH/2, item_h*2, LCD_WIDTH/2, item_h, tmp, font2, font_color, COLOR_BLACK, HORIZONTAL_LEFT, VERTICAL_CENTER);

    font_color = COLOR_WHITE;
    if(h->menu.menu_lv && h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_SAVE) {
        sprintf(tmp, ">%s", lang_get_str(h->lang, STR_ID_SAVE));
    }
    else {
        sprintf(tmp, " %s", lang_get_str(h->lang, STR_ID_SAVE));
    }
    lcd_draw_string(0, item_h*3, LCD_WIDTH/2, item_h, tmp, font2, font_color, COLOR_BLACK, HORIZONTAL_CENTER, VERTICAL_CENTER);
    
    font_color = COLOR_WHITE;
    if(h->menu.menu_lv && h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_QUIT) {
        sprintf(tmp, ">%s", lang_get_str(h->lang, STR_ID_QUIT));
    }
    else {
        sprintf(tmp, " %s", lang_get_str(h->lang, STR_ID_QUIT));
    }
    lcd_draw_string(LCD_WIDTH/2, item_h*3, LCD_WIDTH/2, item_h, tmp, font2, font_color, COLOR_BLACK, HORIZONTAL_CENTER, VERTICAL_CENTER);

    lcd_refresh();
}
/////////////////////////////////////////////////

int menu_init(void)
{
    int i;
    menu_handle_t *h=&mnHandle;
    MiscInfo_t *misc=&get_dm()->_globalDevInfo.misc;
    
    memset(h, 0, sizeof(menu_handle_t));
    h->lang = lang_id;
    h->tmr = timer_init();
    h->flip_ms = get_ms();
    h->refresh_ms = get_ms();
    h->uflag |= UFLAG_REFRESH;
    h->dm = get_dm();
    h->fliptime = misc->flip_time*1000;
    
    h->ph_in = 0;
    h->ph_out = 0;
    h->ch_out = 0;
    h->ch_out_max = 0;
    h->menu.menu_id = 0;
    h->menu.menu_lv = 0;
    for(i=0; i<MENU_MAX; i++) {
        h->menu.page[i].menu_id = i;
        h->menu.page[i].item_id = 0;
        h->menu.page[i].item_max = 0;
    }

    led_init();
    beep_init();
    key_init();

#ifdef USE_UI
    lcd_init(LCD_WIDTH,LCD_HEIGHT,LCD_COLOR);
    lcd_rotate(misc->rotate);
#endif
    
    return 0;
}

int menu_deinit(void)
{
    menu_handle_t *h=&mnHandle;
    
    timer_deinit(h->tmr);
    led_deinit();
    beep_deinit();
#ifdef USE_UI
    lcd_deinit();
    key_deinit();
#endif
    
    return 0;
}


static void key_remap(key_val_t *kv, int rotate)
{
    key_print(kv);
    if(rotate==180) {
        if(kv->key==KEY_UP) {
            kv->key = KEY_DOWN;
        }
        else if(kv->key==KEY_DOWN) {
            kv->key = KEY_UP;
        }
    }
}
static int menu_modbus_key_handle(menu_handle_t *h, key_val_t *kv)
{
    int r=-1;
    
    if(h->menu.menu_lv==0) {
        h->mb = h->dm->_globalDevInfo.cascade;
    }

    switch(kv->key) {
        case KEY_UP:
        {
            if(h->menu.menu_lv==0) {
                if(kv->type==TYPE_SHORT) {
                    h->menu.menu_id--;
                }
            }
            else if(h->menu.menu_lv==1) {
                if(h->menu.page[h->menu.menu_id].item_id>0) {
                    h->menu.page[h->menu.menu_id].item_id--;
                }
                else {
                    h->menu.page[h->menu.menu_id].item_id = MODBUS_ITEM_QUIT;
                }
            }
            else if(h->menu.menu_lv==2) {
                ModbusInfo_t *pmb=&h->mb;
                if(h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_ADDR) {         //addr
                    if(pmb->addr<CASCADE_MAX) {
                        pmb->addr++;
                    }
                    else {
                        pmb->addr = 1;
                    }
                }
                else if(h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_MODE) {    //mode
                    pmb->mode = !pmb->mode;
                }
            }
        }
        break;

        case KEY_DOWN:
        {
            if(h->menu.menu_lv==0) {
                if(kv->type==TYPE_SHORT) {
                    h->menu.menu_id = MENU_SYSTEM;
                }
            }
            else if(h->menu.menu_lv==1) {
                if(h->menu.page[h->menu.menu_id].item_id<MODBUS_ITEM_QUIT) {
                    h->menu.page[h->menu.menu_id].item_id++;
                }
                else {
                    h->menu.page[h->menu.menu_id].item_id = 0;
                }
            }
            else if(h->menu.menu_lv==2) {
                ModbusInfo_t *pmb=&h->mb;
                if(h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_ADDR) {         //addr
                    if(pmb->addr) {
                        pmb->addr--;
                    }
                    else {
                        pmb->addr = CASCADE_MAX;
                    }
                }
                else if(h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_MODE) {    //mode
                    pmb->mode = !pmb->mode;
                }
            }
        }
        break;

        case KEY_OK:
        {
            if(h->menu.menu_lv==1) {
                if(h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_SAVE || h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_QUIT) {         //save
                    if(h->menu.page[h->menu.menu_id].item_id==MODBUS_ITEM_SAVE) {
                        r = cascade_set_modbus(&h->mb);
                        if(r==0) {
                            h->dm->_globalDevInfo.cascade = h->mb;
                            r = paras_save();
                        }

                    }
                    h->menu.page[h->menu.menu_id].item_id = 0;
                    h->menu.menu_lv = 0;
                    tmr_stop(h);
                }
                else {
                    h->menu.menu_lv = 2;
                    tmr_start(h, 500);
                }
            }
            else if(h->menu.menu_lv==2 && kv->type==TYPE_SHORT) {
                h->menu.menu_lv = 1;
            }
            else {
                if(kv->type==TYPE_LONG) {
                    h->menu.menu_lv = 1;
                }
            }
        }
        break;

        default:
        {
            if(h->menu.menu_lv==0 && h->uflag&UFLAG_FLIP) {
                h->menu.menu_id = MENU_SYSTEM;
            }
        }
    }
    
    return r;
}
static int menu_key_handle(menu_handle_t *h, key_val_t *kv)
{
    int r=0;

    h->ch_out_max = get_ch_out_max(h);
    switch(h->menu.menu_id) {
        case MENU_SYSTEM:
#ifndef NO_SENSOR_UI
        case MENU_SENSOR:
#endif
        {
            if(h->menu.menu_lv==0) {
                if(h->uflag&UFLAG_FLIP || ((kv->key==KEY_UP || kv->key==KEY_DOWN) && kv->type==TYPE_SHORT)) {
                    if(kv->key==KEY_UP) {
                        h->menu.menu_id = h->menu.menu_id?(h->menu.menu_id-1):MENU_MAX-1;
                    }
                    else {
                        h->menu.menu_id = (h->menu.menu_id==MENU_MAX-1)?0:(h->menu.menu_id+1);
                    }
                }
            }
        }
        break;

        case MENU_INPUT:
        {
            if(h->menu.menu_lv==0) {
                if((kv->key==KEY_UP || kv->key==KEY_DOWN) && kv->type==TYPE_SHORT) {
                    if(kv->key==KEY_UP) {
                        h->menu.menu_id--;
                    }
                    else {
                        h->menu.menu_id++;
                    }
                }
                else if(kv->key==KEY_OK && kv->type==TYPE_SHORT) {
                    if(is_ph3_in(h)) {
                        h->ph_in = 1;
                        h->menu.menu_lv = 1;
                    }
                }
                else if(h->uflag&UFLAG_FLIP) {
                    if(is_ph3_in(h)) {
                        h->ph_in = 1;
                        h->menu.menu_lv = 1;
                    }
                    else {
                        h->menu.menu_id++;
                    }
                }
            }
            else if(h->menu.menu_lv==1) {
                if((kv->key==KEY_UP || kv->key==KEY_DOWN) && kv->type==TYPE_SHORT) {
                    if(kv->key==KEY_UP) {
                        if(h->ph_in>1) {
                            h->ph_in--;
                        }
                        else {
                            h->ph_in = 3;
                        }
                    }
                    else {
                        if(h->ph_in<3) {
                            h->ph_in++;
                        }
                        else {
                            h->ph_in = 1;
                        }
                    }
                }
                else if(h->uflag&UFLAG_FLIP) {
                    if(h->ph_in<3) {
                        h->ph_in++;
                    }
                    else {
                        h->ph_in = 0;
                        h->menu.menu_lv = 0;
                        h->menu.menu_id++;
                    }
                }
                else if(h->uflag&UFLAG_REFRESH) {
                    //
                }
                else {
                    h->ph_in = 0;
                    h->menu.menu_lv = 0;
                }
            }
        }
        break;

        case MENU_OUTPUT:
        {
            if(h->uflag&UFLAG_FLIP || ((kv->key==KEY_UP || kv->key==KEY_DOWN) && kv->type==TYPE_SHORT)) {
                if(kv->key==KEY_UP) {
                    if(h->ch_out>0) {
                        h->ch_out--;
                    }
                    else {
                        h->ch_out = 0;
                        h->menu.menu_id--;
                    }
                }
                else {
                    if(h->ch_out<h->ch_out_max-1) {
                        h->ch_out++;
                    }
                    else {
                        h->ch_out = 0;
                        h->menu.menu_id++;
                    }
                }
            }
        }
        break;

        case MENU_MODBUS:
        {
            r = menu_modbus_key_handle(h, kv);
        }

        break;

    }

    return r;
}


int menu_handle(void)
{
    int r;
    uint64_t cur_ms;
    key_val_t kv;
    int rotate=lcd_get_rotate();
    int item_h=LCD_HEIGHT/4;
    int font1=FONT_12,font2=FONT_12;
    menu_handle_t *h=&mnHandle;
    
    r = key_get(&kv); key_remap(&kv, rotate);
    switch(kv.key) {
        case KEY_OK:
        {
            if(kv.type==TYPE_SHORT) {
                if(h->menu.menu_lv==0) {
            #if 0
                    if(rotate==0) {
                        lcd_rotate(180);
                    }
                    else {
                        lcd_rotate(0);
                    }
            #endif
                }
            }
        }
        break;

        case KEY_UP:
        case KEY_DOWN:
        {
            led_reset(); beep_reset();
        }
        break;

        default:
        {
            cur_ms = get_ms();
#if 1
            if(h->fliptime>0) {
                if((cur_ms-h->flip_ms)>=h->fliptime) {
                    h->uflag |= UFLAG_FLIP;
                    h->flip_ms = cur_ms;
                }
            }
#endif
            if((cur_ms-h->refresh_ms)>=REFRESH_TIME) {
                h->uflag |= UFLAG_REFRESH;
                h->refresh_ms = cur_ms;
            }
        }
    }
    if(h->uflag==0 && kv.key<0) {
        return -1;
    }
    //printf("___ uflag: %d\n", h->uflag);

#ifdef USE_UI
    menu_key_handle(h, &kv);
    switch(h->menu.menu_id) {
        case MENU_SYSTEM:
        {
            menu_system_paint(h, font1, font2, item_h, &kv);
        }
        break;

        case MENU_INPUT:
        {
            menu_input_paint(h, font1, font2, item_h, &kv);
        }
        break;

        case MENU_OUTPUT:
        {
            menu_output_paint(h, font1, font2, item_h, &kv);
        }
        break;
#ifndef NO_SENSOR_UI
        case MENU_SENSOR:
        {
            menu_sensor_paint(h, font1, font2, item_h, &kv);
        }
        break;
#endif
        case MENU_MODBUS:
        {
            menu_modbus_paint(h, font1, font2, item_h, &kv);
        }
        break;

    }
    h->uflag = 0;
    //printf("___ menu_id: %d, menu_lv: %d\n", h->menu.menu_id, h->menu.menu_lv);
#endif
    
    return 0;
}