LuatOS/components/lcd/luat_lib_lcd.c

/*
@module  lcd
@summary lcd驱动模块
@version 1.0
@date    2021.06.16
@demo lcd
@tag LUAT_USE_LCD
@usage
--提醒:
-- 1. 本模块需要硬件支持, 请确认你的设备有lcd屏幕
-- 2. 本功能支持 SPI QSPI RGB等多种接口的lcd屏幕, 取决于具体的模组硬件
-- 3. 对于Air780EHM/Air8000 系列, 默认开启JPG硬件解码, JPG图片的长宽都需要是16的倍数, 否则会出现画面拉伸的现象
-- 4. 大部分API都只能在lcd.init()成功后使用
*/
#include "luat_base.h"
#include "luat_lcd.h"
#include "luat_mem.h"
#include "luat_zbuff.h"
#include "luat_fs.h"
#include "luat_gpio.h"

#define LUAT_LOG_TAG "lcd"
#include "luat_log.h"

#include "u8g2.h"
#include "u8g2_luat_fonts.h"
#include "luat_u8g2.h"

#include "qrcodegen.h"

int8_t u8g2_font_decode_get_signed_bits(u8g2_font_decode_t *f, uint8_t cnt);
uint8_t u8g2_font_decode_get_unsigned_bits(u8g2_font_decode_t *f, uint8_t cnt);

extern luat_color_t BACK_COLOR , FORE_COLOR ;

extern const luat_lcd_opts_t lcd_opts_custom;
extern const luat_lcd_opts_t lcd_opts_user_ctrl;

typedef struct lcd_reg {
  const char *name;
  const luat_lcd_opts_t *lcd_opts;
}lcd_reg_t;

luat_lcd_opts_t lcd_opts_nv3052c = {
    .name = "nv3052c",
};
luat_lcd_opts_t lcd_opts_hx8282 = {
    .name = "hx8282",
};
luat_lcd_opts_t lcd_opts_st7701s = {
    .name = "st7701s",
};
luat_lcd_opts_t lcd_opts_st7701sn = {
    .name = "st7701sn",
};
static const lcd_reg_t lcd_regs[] = {
  {"custom",  &lcd_opts_custom},   //0 固定为第零个
  {"st7735",  &lcd_opts_st7735},
  {"st7735v", &lcd_opts_st7735v},
  {"st7735s", &lcd_opts_st7735s},
  {"st7789",  &lcd_opts_st7789},
  {"st7796",  &lcd_opts_st7796},
  {"gc9a01",  &lcd_opts_gc9a01},
  {"gc9106l", &lcd_opts_gc9106l},
  {"gc9306x", &lcd_opts_gc9306x},
  {"gc9306",  &lcd_opts_gc9306x},  //gc9306是gc9306x的别名
  {"ili9341", &lcd_opts_ili9341},
  {"ili9486", &lcd_opts_ili9486},
  {"nv3037",  &lcd_opts_nv3037},
  {"h050iwv", &lcd_opts_h050iwv},
  {"jd9261t_inited", &lcd_opts_jd9261t_inited},
  {"nv3052c", &lcd_opts_nv3052c},
  {"hx8282",  &lcd_opts_hx8282},
  {"st7701s",  &lcd_opts_st7701s},
  {"st7701sn",  &lcd_opts_st7701sn},
  {"sh8601z",  &lcd_opts_sh8601z},
  {"user",  &lcd_opts_user_ctrl},
  {"", NULL} // 最后一个必须是空字符串
};

luat_lcd_conf_t *lcd_dft_conf = NULL;
// static int dft_conf_lua_ref = 0;

// 所有绘图相关的函数都应该调用本函数
void lcd_auto_flush(luat_lcd_conf_t *conf) {
#ifdef LUAT_USE_LCD_SDL2
  if (conf == NULL || conf->auto_flush == 0)
    return;
#else
  if (conf == NULL || conf->buff == NULL || conf->auto_flush == 0)
    return;
#endif
  luat_lcd_flush(conf);
}

luat_lcd_conf_t *l_lcd_get_default_conf(void) {return lcd_dft_conf;}
LUAT_WEAK void luat_lcd_IF_init(luat_lcd_conf_t* conf){}
LUAT_WEAK int luat_lcd_init_in_service(luat_lcd_conf_t* conf){return -1;}
/*
lcd显示屏初始化
@api lcd.init(tp, args, spi_dev, init_in_service)
@string lcd类型，当前支持：<br>st7796<br>st7789<br>st7735<br>st7735v<br>st7735s<br>gc9a01<br>gc9106l<br>gc9306x<br>ili9486<br>custom
@table 附加参数,与具体设备有关：<br>pin_pwr（背光）为可选项,可不设置<br>port：驱动端口,rgb:lcd.RGB spi:例如0,1,2...如果为device方式则为"device"<br>pin_dc：lcd数据/命令选择引脚<br>pin_rst：lcd复位引脚<br>pin_pwr：lcd背光引脚 可选项,可不设置<br>direction：lcd屏幕方向 0:0° 1:180° 2:270° 3:90°<br>w：lcd 水平分辨率<br>h：lcd 竖直分辨率<br>xoffset：x偏移(不同屏幕ic 不同屏幕方向会有差异)<br>yoffset：y偏移(不同屏幕ic 不同屏幕方向会有差异)<br>direction0：0°方向命令，(不同屏幕ic会有差异)<br>direction90：90°方向命令，(不同屏幕ic会有差异)<br>direction180：180°方向命令，(不同屏幕ic会有差异)<br>direction270：270°方向命令，(不同屏幕ic会有差异) <br>sleepcmd：睡眠命令，默认0X10<br>wakecmd：唤醒命令，默认0X11 <br>interface_mode lcd模式，默认lcd.WIRE_4_BIT_8_INTERFACE_I <br>bus_speed:qspi/rgb总线速率 <br>hbp:水平后廊 <br>hspw:水平同步脉冲宽度 <br>hfp:水平前廊,<br>vbp:垂直后廊 <br>vspw:垂直同步脉冲宽度 <br>vfp:垂直前廊
@userdata spi设备,当port = "device"时有效
@boolean 允许初始化在lcd service里运行，在后台初始化LCD，默认是false
@usage
-- 初始化spi0的st7735s 注意:lcd初始化之前需要先初始化spi
spi_lcd = spi.deviceSetup(0,20,0,0,8,2000000,spi.MSB,1,1)
log.info("lcd.init",
lcd.init("st7735s",{port = "device",pin_dc = 17, pin_pwr = 7,pin_rst = 19,direction = 2,w = 160,h = 80,xoffset = 1,yoffset = 26},spi_lcd))

-- rgb屏幕初始化
-- lcd.init("h050iwv",{port = lcd.RGB, w = 800,h = 480})

-- 自定义驱动
-- lcd.init("custom",{port = port,hbp = 46, hspw = 2, hfp = 48,vbp = 24, vspw = 2, vfp = 24,bus_speed = 60*1000*1000,w = 800,h = 480})

*/

/*
此处为api设想新增设计
rgb:
lcd.init("st7796s",{port = "rgb",direction = 2,w = 160,h = 80,xoffset = 1,yoffset = 26}))
8080:
lcd.init("st7796s",{port = "8080",direction = 2,w = 160,h = 80,xoffset = 1,yoffset = 26}))
arm2d:
lcd.init("st7796s",{port = "ARM2D",direction = 2,w = 160,h = 80,xoffset = 1,yoffset = 26}))
dma2d:
lcd.init("st7796s",{port = "DMA2D",direction = 2,w = 160,h = 80,xoffset = 1,yoffset = 26}))
*/

static int l_lcd_init(lua_State* L) {
    int ret;
    size_t len = 0;
    uint8_t spi_device = 0;
    luat_lcd_conf_t *conf = luat_heap_malloc(sizeof(luat_lcd_conf_t));
    if (conf == NULL) {
        LLOGE("out of system memory!!!");
        return 0;
    }
    if (lcd_dft_conf != NULL) {
        LLOGD("lcd was inited, skip");
        lua_pushboolean(L, 1);
        return 1;
    }
#if defined LUAT_USE_LCD_SERVICE
    uint8_t init_in_service = 0;
    if (lua_isboolean(L, 4)) {
        init_in_service = lua_toboolean(L, 4);
    }
#endif
    memset(conf, 0, sizeof(luat_lcd_conf_t)); // 填充0,保证无脏数据
    conf->acc_hw = 0xFF;
    conf->bpp = 16;
    conf->lcd_cs_pin = LUAT_GPIO_NONE;
    conf->pin_dc = LUAT_GPIO_NONE;
    conf->pin_pwr = LUAT_GPIO_NONE;
    conf->interface_mode = LUAT_LCD_IM_4_WIRE_8_BIT_INTERFACE_I;
    if (lua_type(L, 3) == LUA_TUSERDATA){
        // 如果是SPI Device模式, 就可能出现变量为local, 从而在某个时间点被GC掉的可能性
        conf->lcd_spi_device = (luat_spi_device_t*)lua_touserdata(L, 3);
        lua_pushvalue(L, 3);
        // 所以, 直接引用之外, 再加上强制引用, 避免被GC
        // 鉴于LCD不太可能重复初始化, 引用也没什么问题
        conf->lcd_spi_ref = luaL_ref(L, LUA_REGISTRYINDEX);
        spi_device = 1;
    }
    const char* tp = luaL_checklstring(L, 1, &len);
    int16_t s_index = -1;//第几个屏幕，-1表示没匹配到
    for(int i = 0; i < 100; i++){
        if (strlen(lcd_regs[i].name) == 0)
            break;
        if(strcmp(lcd_regs[i].name,tp) == 0){
            s_index = i;
            break;
        }
    }
    if (s_index != -1) {
        LLOGD("ic support: %s",tp);
        if (lua_gettop(L) > 1) {
            conf->opts = (struct luat_lcd_opts *)lcd_regs[s_index].lcd_opts;
            lua_settop(L, 2); // 丢弃多余的参数

            lua_pushstring(L, "port");
            int port = lua_gettable(L, 2);
            if (LUA_TNUMBER == port) {
                conf->port = luaL_checkinteger(L, -1);
            }else if(LUA_TSTRING == port){
                size_t len;
                const char *lcd_port = luaL_checklstring(L, -1,&len);
                if(memcmp("device", lcd_port, len) == 0){
                    conf->port = LUAT_LCD_SPI_DEVICE;
                }else if(memcmp("rgb", lcd_port, len) == 0){
                    conf->port = LUAT_LCD_PORT_RGB;
                }else{
                    LLOGE("port %s is not support ",lcd_port);
                    goto end; 
                }
            }
            if (spi_device == 1 && conf->port != LUAT_LCD_SPI_DEVICE) {
                LLOGE("port is not device but find luat_spi_device_t");
                goto end;
            }else if (spi_device == 0 && conf->port == LUAT_LCD_SPI_DEVICE){
                LLOGE("port is device but not find luat_spi_device_t");
                goto end;
            }
            if (conf->port < LUAT_LCD_HW_ID_0 || conf->port == LUAT_LCD_SPI_DEVICE){
                conf->endianness_swap = 1;
            }
            lua_pop(L, 1);

            lua_pushstring(L, "endianness_swap");
            if (LUA_TBOOLEAN == lua_gettable(L, 2)) {
                conf->endianness_swap = lua_toboolean(L, -1);
            }
            lua_pop(L, 1);
            
            lua_pushstring(L, "rb_swap");
            if (LUA_TBOOLEAN == lua_gettable(L, 2)) {
                conf->opts->rb_swap = lua_toboolean(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "pin_dc");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->pin_dc = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "pin_pwr");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->pin_pwr = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "pin_rst");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->pin_rst = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "direction");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->direction = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);
            lua_pushstring(L, "direction0");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->opts->direction0 = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);
            lua_pushstring(L, "direction90");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->opts->direction90 = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);
            lua_pushstring(L, "direction180");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->opts->direction180 = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);
            lua_pushstring(L, "direction270");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->opts->direction270 = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "w");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->w = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);
            lua_pushstring(L, "h");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->h = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);
            conf->buffer_size = (conf->w * conf->h) * sizeof(luat_color_t);

            lua_pushstring(L, "xoffset");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->xoffset = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "yoffset");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->yoffset = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "sleepcmd");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->opts->sleep_cmd = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "wakecmd");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->opts->wakeup_cmd = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "interface_mode");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->interface_mode = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "bus_speed");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->bus_speed = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "flush_rate");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->flush_rate = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "hbp");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->hbp = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "hspw");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->hspw = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "hfp");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->hfp = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "vbp");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->vbp = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "vspw");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->vspw = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "vfp");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->vfp = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);

            lua_pushstring(L, "pin_cs");
            if (LUA_TNUMBER == lua_gettable(L, 2)) {
                conf->lcd_cs_pin = luaL_checkinteger(L, -1);
            }
            lua_pop(L, 1);
        }
        if (s_index == 0){
            unsigned int cmd = 0;
            lua_pushstring(L, "initcmd");
            lua_gettable(L, 2);
            if (lua_istable(L, -1)) {
                conf->opts->init_cmds_len = lua_rawlen(L, -1);
                conf->opts->init_cmds = luat_heap_malloc( conf->opts->init_cmds_len * sizeof(uint16_t));
                for (size_t i = 1; i <= conf->opts->init_cmds_len; i++){
                    lua_geti(L, -1, i);
                    cmd = luaL_checkinteger(L, -1);
                    conf->opts->init_cmds[i-1] = ((cmd >> 8) & 0xFF00) | (cmd & 0xFF);
                    lua_pop(L, 1);
                }
                }else if(lua_isstring(L, -1)){
                size_t  len;
                const char *fail_name = luaL_checklstring(L, -1, &len);
                FILE* fd = (FILE *)luat_fs_fopen(fail_name, "rb");
                conf->opts->init_cmds_len = 0;
                if (fd){
                    #define INITCMD_BUFF_SIZE 128
                    char init_cmd_buff[INITCMD_BUFF_SIZE] ;
                    conf->opts->init_cmds = luat_heap_malloc(sizeof(uint16_t));
                    while (1) {
                        memset(init_cmd_buff, 0, INITCMD_BUFF_SIZE);
                        int readline_len = luat_fs_readline(init_cmd_buff, INITCMD_BUFF_SIZE-1, fd);
                        if (readline_len < 1)
                            break;
                        if (memcmp(init_cmd_buff, "#", 1)==0){
                            continue;
                        }
                        char *token = strtok(init_cmd_buff, ",");
                        if (sscanf(token,"%x",&cmd) < 1){
                            continue;
                        }
                        conf->opts->init_cmds_len = conf->opts->init_cmds_len + 1;
                        conf->opts->init_cmds = luat_heap_realloc(conf->opts->init_cmds,conf->opts->init_cmds_len * sizeof(uint16_t));
                        conf->opts->init_cmds[conf->opts->init_cmds_len-1]=((cmd >> 8) & 0xFF00) | (cmd & 0xFF);;
                        while( token != NULL ) {
                            token = strtok(NULL, ",");
                            if (sscanf(token,"%x",&cmd) < 1){
                                break;
                            }
                            conf->opts->init_cmds_len = conf->opts->init_cmds_len + 1;
                            conf->opts->init_cmds = luat_heap_realloc(conf->opts->init_cmds,conf->opts->init_cmds_len * sizeof(uint16_t));
                            conf->opts->init_cmds[conf->opts->init_cmds_len-1]=((cmd >> 8) & 0xFF00) | (cmd & 0xFF);;
                        }
                    }
                    conf->opts->init_cmds[conf->opts->init_cmds_len]= 0;
                    luat_fs_fclose(fd);
                }else{
                    LLOGE("init_cmd fail open error");
                }
            }
            lua_pop(L, 1);
        }
        // 默认自动flush,即使没有buff
        conf->auto_flush = 1;

#ifdef LUAT_USE_LCD_SDL2
        extern const luat_lcd_opts_t lcd_opts_sdl2;
        conf->opts = &lcd_opts_sdl2;
#endif
        if (conf->port == LUAT_LCD_HW_ID_0) luat_lcd_IF_init(conf);
#if defined LUAT_USE_LCD_SERVICE
        if (init_in_service) {
        	ret = luat_lcd_init_in_service(conf);
        } else 
#endif
        {
            ret = luat_lcd_init(conf);
        }

        if (ret != 0) {
            LLOGE("lcd init fail %d", ret);
            luat_heap_free(conf);
            lua_pushboolean(L, 0);
            return 0;
        }
        // 初始化OK, 配置额外的参数
        lcd_dft_conf = conf;
        u8g2_SetFont(&(conf->luat_lcd_u8g2), u8g2_font_opposansm12);
        u8g2_SetFontMode(&(conf->luat_lcd_u8g2), 0);
        u8g2_SetFontDirection(&(conf->luat_lcd_u8g2), 0);
        lua_pushboolean(L, 1);
        return 1;
    }
    LLOGE("ic not support: %s",tp);
end:
    lua_pushboolean(L, 0);
    luat_heap_free(conf);
    return 1;
}

/*
关闭lcd显示屏
@api lcd.close()
@usage
-- 关闭lcd
lcd.close()
*/
static int l_lcd_close(lua_State* L) {
    int ret = luat_lcd_close(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
开启lcd显示屏背光
@api lcd.on()
@usage
-- 开启lcd显示屏背光
lcd.on()
*/
static int l_lcd_display_on(lua_State* L) {
    int ret = luat_lcd_display_on(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
关闭lcd显示屏背光
@api lcd.off()
@usage
-- 关闭lcd显示屏背光
lcd.off()
*/
static int l_lcd_display_off(lua_State* L) {
    int ret = luat_lcd_display_off(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
lcd睡眠
@api lcd.sleep()
@usage
-- lcd睡眠
lcd.sleep()
*/
static int l_lcd_sleep(lua_State* L) {
    int ret = luat_lcd_sleep(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
lcd唤醒
@api lcd.wakeup()
@usage
-- lcd唤醒
lcd.wakeup()
*/
static int l_lcd_wakeup(lua_State* L) {
    int ret = luat_lcd_wakeup(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
lcd反显
@api lcd.invon()
@usage
-- lcd反显
lcd.invon()
*/
static int l_lcd_inv_on(lua_State* L) {
    int ret = luat_lcd_inv_on(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
lcd反显关闭
@api lcd.invoff()
@usage
-- lcd反显关闭
lcd.invoff()
*/
static int l_lcd_inv_off(lua_State* L) {
    int ret = luat_lcd_inv_off(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
lcd命令
@api lcd.cmd(cmd, param, param_len)
@int lcd命令模式下的命令值
@int/zbuff lcd命令模式下的参数值，如果只有1个参数，可以用int，如果有多个，使用zbuff传入
@int 参数长度，如果上一个参数是int，则忽略长度
@return boolean 成功与否
@usage
-- lcd命令
lcd.cmd(0x21)
lcd.cmd(0x21)
*/
static int l_lcd_write_cmd(lua_State* L) {
	uint8_t param;
	uint32_t param_len = 0;
	const uint8_t *data = NULL;
	if (lua_isinteger(L, 2))
	{
		param = lua_tointeger(L, 2);
		param_len = 1;
		data = &param;
	}
	else if (lua_isuserdata(L, 2)) {
        // zbuff
        luat_zbuff_t* buff = ((luat_zbuff_t *)luaL_checkudata(L, 2, LUAT_ZBUFF_TYPE));
        data = (const uint8_t*)buff->addr;
        param_len = luaL_optinteger(L, 3, buff->used);
    }else if(lua_isstring(L, 2)){
        data = (const uint8_t*)luaL_checklstring(L, 2, &param_len);
    }
    int ret = lcd_write_cmd_data(lcd_dft_conf,(uint8_t)luaL_checkinteger(L, 1), data, param_len);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
lcd数据
@api lcd.data(data)
@int data
@usage
-- lcd数据
lcd.data(0x21)
*/
static int l_lcd_write_data(lua_State* L) {
    int ret = lcd_write_data(lcd_dft_conf,(const uint8_t)luaL_checkinteger(L, 1));
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
lcd颜色设置
@api lcd.setColor(back,fore)
@int 背景色
@int 前景色
@usage
-- lcd颜色设置
lcd.setColor(0xFFFF,0x0000)
*/
static int l_lcd_set_color(lua_State* L) {
    luat_color_t back,fore;
    back = (luat_color_t)luaL_checkinteger(L, 1);
    fore = (luat_color_t)luaL_checkinteger(L, 2);
    int ret = luat_lcd_set_color(back, fore);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

static int l_lcd_set_direction(lua_State* L) {
    int ret = luat_lcd_set_direction(lcd_dft_conf, (uint8_t)luaL_checkinteger(L, 1));
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
控制lcd reset pin拉高或者拉低,2025/9/5启用
@api lcd.reset_pin(level)
@int reset脚电平，1高电平，0低电平
@usage
-- lcd reset脚高电平
lcd.reset_pin(1)
*/
static int l_lcd_set_reset_pin(lua_State* L) {
    luat_lcd_set_reset_pin_level(lcd_dft_conf, luaL_optinteger(L, 1, 1));
    return 0;
}
/*
lcd颜色填充
@api lcd.draw(x1, y1, x2, y2,color)
@int 左上边缘的X位置.
@int 左上边缘的Y位置.
@int 右下边缘的X位置(color传入framebuff的zbuff时可选，默认为x+图片宽度).
@int 右下边缘的Y位置(color传入framebuff的zbuff时可选，默认为y+图片高度).
@string 字符串或zbuff对象
@usage
-- lcd颜色填充
local buff = zbuff.create({201,1,16},0x001F)
lcd.draw(20,30,220,30,buff)
*/
static int l_lcd_draw(lua_State* L) {
    int16_t x1, y1, x2, y2;
    int ret;
    luat_color_t *color = NULL;
    
    x1 = luaL_checkinteger(L, 1);
    y1 = luaL_checkinteger(L, 2);
    if (lcd_dft_conf == NULL) {
        LLOGE("lcd not init");
        return 0;
    }
    if (lua_isuserdata(L, 5)) {
        luat_zbuff_t *zbuff = luaL_checkudata(L, 5, LUAT_ZBUFF_TYPE);
		if (zbuff->width && zbuff->height){
			x2 = x1+zbuff->width-1;
			y2 = y1+zbuff->height-1;
		}else{
            x2 = luaL_checkinteger(L, 3);
            y2 = luaL_checkinteger(L, 4);
                if (x2-x1<zbuff->width-1 || y2-y1<zbuff->height-1) {
                    LLOGE("The display area is too small");
                    return 0;
                }
            }
        color = (luat_color_t *)zbuff->addr;
    }
    else if(lua_isstring(L, 5)) {
        x2 = luaL_checkinteger(L, 3);
        y2 = luaL_checkinteger(L, 4);
        color = (luat_color_t *)luaL_checkstring(L, 5);
    }
    else {
        return 0;
    }
    ret = luat_lcd_draw(lcd_dft_conf, x1, y1, x2, y2, color);
    lcd_auto_flush(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
lcd清屏
@api lcd.clear(color)
@int 屏幕颜色 可选参数,默认背景色
@usage
-- lcd清屏
lcd.clear()
*/
static int l_lcd_clear(lua_State* L) {
    //size_t len = 0;
    luat_color_t color = BACK_COLOR;
    if (lua_gettop(L) > 0)
        color = (luat_color_t)luaL_checkinteger(L, 1);
    int ret = luat_lcd_clear(lcd_dft_conf, color);
    lcd_auto_flush(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
lcd颜色填充
@api lcd.fill(x1, y1, x2, y2,color)
@int 左上边缘的X位置.
@int 左上边缘的Y位置.
@int 右下边缘的X位置,不含
@int 右下边缘的Y位置,不含
@int 绘画颜色 可选参数,默认背景色
@usage
-- lcd颜色填充
lcd.fill(20,30,220,30,0x0000)
*/
static int l_lcd_draw_fill(lua_State* L) {
    int16_t x1, y1, x2, y2;
    luat_color_t color = BACK_COLOR;
    x1 = luaL_checkinteger(L, 1);
    y1 = luaL_checkinteger(L, 2);
    x2 = luaL_checkinteger(L, 3);
    y2 = luaL_checkinteger(L, 4);
    if (lua_gettop(L) > 4)
        color = (luat_color_t)luaL_checkinteger(L, 5);
    int ret = luat_lcd_draw_fill(lcd_dft_conf, x1,  y1,  x2,  y2, color);
    lcd_auto_flush(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
画一个点.
@api lcd.drawPoint(x0,y0,color)
@int 点的X位置.
@int 点的Y位置.
@int 绘画颜色 可选参数,默认前景色
@usage
lcd.drawPoint(20,30,0x001F)
*/
static int l_lcd_draw_point(lua_State* L) {
    int16_t x, y;
    luat_color_t color = FORE_COLOR;
    x = luaL_checkinteger(L, 1);
    y = luaL_checkinteger(L, 2);
    if (lua_gettop(L) > 2)
        color = (luat_color_t)luaL_checkinteger(L, 3);
    int ret = luat_lcd_draw_point(lcd_dft_conf, x, y, color);
    lcd_auto_flush(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
在两点之间画一条线.
@api lcd.drawLine(x0,y0,x1,y1,color)
@int 第一个点的X位置.
@int 第一个点的Y位置.
@int 第二个点的X位置.
@int 第二个点的Y位置.
@int 绘画颜色 可选参数,默认前景色
@usage
lcd.drawLine(20,30,220,30,0x001F)
*/
static int l_lcd_draw_line(lua_State* L) {
    int16_t x1, y1, x2, y2;
    luat_color_t color = FORE_COLOR;
    x1 = luaL_checkinteger(L, 1);
    y1 = luaL_checkinteger(L, 2);
    x2 = luaL_checkinteger(L, 3);
    y2 = luaL_checkinteger(L, 4);
    if (lua_gettop(L) > 4)
        color = (luat_color_t)luaL_checkinteger(L, 5);
    int ret = luat_lcd_draw_line(lcd_dft_conf, x1,  y1,  x2,  y2, color);
    lcd_auto_flush(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
从x / y位置（左上边缘）开始绘制一个框
@api lcd.drawRectangle(x0,y0,x1,y1,color)
@int 左上边缘的X位置.
@int 左上边缘的Y位置.
@int 右下边缘的X位置.
@int 右下边缘的Y位置.
@int 绘画颜色 可选参数,默认前景色
@usage
lcd.drawRectangle(20,40,220,80,0x001F)
*/
static int l_lcd_draw_rectangle(lua_State* L) {
    int16_t x1, y1, x2, y2;
    luat_color_t color = FORE_COLOR;
    x1 = luaL_checkinteger(L, 1);
    y1 = luaL_checkinteger(L, 2);
    x2 = luaL_checkinteger(L, 3);
    y2 = luaL_checkinteger(L, 4);
    if (lua_gettop(L) > 4)
        color = (luat_color_t)luaL_checkinteger(L, 5);
    int ret = luat_lcd_draw_rectangle(lcd_dft_conf, x1,  y1,  x2,  y2, color);
    lcd_auto_flush(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
从x / y位置（圆心）开始绘制一个圆
@api lcd.drawCircle(x0,y0,r,color)
@int 圆心的X位置.
@int 圆心的Y位置.
@int 半径.
@int 绘画颜色 可选参数,默认前景色
@usage
lcd.drawCircle(120,120,20,0x001F)
*/
static int l_lcd_draw_circle(lua_State* L) {
    int16_t x0, y0, r;
    luat_color_t color = FORE_COLOR;
    x0 = luaL_checkinteger(L, 1);
    y0 = luaL_checkinteger(L, 2);
    r = luaL_checkinteger(L, 3);
    if (lua_gettop(L) > 3)
        color = (luat_color_t)luaL_checkinteger(L, 4);
    int ret = luat_lcd_draw_circle(lcd_dft_conf, x0,  y0,  r, color);
    lcd_auto_flush(lcd_dft_conf);
    lua_pushboolean(L, ret == 0 ? 1 : 0);
    return 1;
}

/*
缓冲区绘制QRCode
@api lcd.drawQrcode(x, y, str, size)
@int x坐标
@int y坐标
@string 二维码的内容
@int 显示大小 (注意:二维码生成大小与要显示内容和纠错等级有关,生成版本为1-40(对应 21x21 - 177x177)的不定大小,如果和设置大小不同会自动在指定的区域中间显示二维码,如二维码未显示请查看日志提示)
@return nil 无返回值
*/
static int l_lcd_drawQrcode(lua_State *L)
{
    size_t len;
    int x           = luaL_checkinteger(L, 1);
    int y           = luaL_checkinteger(L, 2);
    const char* text = luaL_checklstring(L, 3, &len);
    int size        = luaL_checkinteger(L, 4);
    uint8_t *qrcode = luat_heap_malloc(qrcodegen_BUFFER_LEN_MAX);
    uint8_t *tempBuffer = luat_heap_malloc(qrcodegen_BUFFER_LEN_MAX);
    if (qrcode == NULL || tempBuffer == NULL) {
        if (qrcode)
            luat_heap_free(qrcode);
        if (tempBuffer)
            luat_heap_free(tempBuffer);
        LLOGE("qrcode out of memory");
        return 0;
    }
    bool ok = qrcodegen_encodeText(text, tempBuffer, qrcode, qrcodegen_Ecc_LOW,
        qrcodegen_VERSION_MIN, qrcodegen_VERSION_MAX, qrcodegen_Mask_AUTO, true);
    if (ok){
        int qr_size = qrcodegen_getSize(qrcode);
        if (size < qr_size){
            LLOGE("size must be greater than qr_size %d",qr_size);
            goto end;
        }
        int scale = size / qr_size ;
        if (!scale)scale = 1;
        int margin = (size - qr_size * scale) / 2;
        luat_lcd_draw_fill(lcd_dft_conf,x,y,x+size,y+size,BACK_COLOR);
        x+=margin;
        y+=margin;
        for (int j = 0; j < qr_size; j++) {
            for (int i = 0; i < qr_size; i++) {
                if (qrcodegen_getModule(qrcode, i, j))
                    luat_lcd_draw_fill(lcd_dft_conf,x+i*scale,y+j*scale,x+(i+1)*scale,y+(j+1)*scale,FORE_COLOR);
            }
        }
    }else{
        LLOGE("qrcodegen_encodeText false");
    }
end:
    if (qrcode)
        luat_heap_free(qrcode);
    if (tempBuffer)
        luat_heap_free(tempBuffer);
    lcd_auto_flush(lcd_dft_conf);
    return 0;
}

static uint8_t utf8_state;
static uint16_t encoding;
static uint16_t utf8_next(uint8_t b)
{
    if ( b == 0 )  /* '\n' terminates the string to support the string list procedures */
        return 0x0ffff; /* end of string detected, pending UTF8 is discarded */
    if ( utf8_state == 0 ){
        if ( b >= 0xfc )  /* 6 byte sequence */
        {
            utf8_state = 5;
            b &= 1;
        }
        else if ( b >= 0xf8 )
        {
            utf8_state = 4;
            b &= 3;
        }
        else if ( b >= 0xf0 )
        {
            utf8_state = 3;
            b &= 7;
        }
        else if ( b >= 0xe0 )
        {
            utf8_state = 2;
            b &= 15;
        }
        else if ( b >= 0xc0 )
        {
            utf8_state = 1;
            b &= 0x01f;
        }
        else
        {
            /* do nothing, just use the value as encoding */
            return b;
        }
        encoding = b;
        return 0x0fffe;
    } else {
        utf8_state--;
        /* The case b < 0x080 (an illegal UTF8 encoding) is not checked here. */
        encoding<<=6;
        b &= 0x03f;
        encoding |= b;
        if ( utf8_state != 0 )
        return 0x0fffe; /* nothing to do yet */
    }
    return encoding;
}

static void u8g2_draw_hv_line(u8g2_t *u8g2, int16_t x, int16_t y, int16_t len, uint8_t dir, uint16_t color){
    switch(dir){
    case 0:
    luat_lcd_draw_hline(lcd_dft_conf,x,y,len,color);
    break;
    case 1:
    luat_lcd_draw_vline(lcd_dft_conf,x,y,len,color);
    break;
    case 2:
        luat_lcd_draw_hline(lcd_dft_conf,x-len+1,y,len,color);
    break;
    case 3:
    luat_lcd_draw_vline(lcd_dft_conf,x,y-len+1,len,color);
    break;
    }
}

static void u8g2_font_decode_len(u8g2_t *u8g2, uint8_t len, uint8_t is_foreground){
    uint8_t cnt;  /* total number of remaining pixels, which have to be drawn */
    uint8_t rem;  /* remaining pixel to the right edge of the glyph */
    uint8_t current;  /* number of pixels, which need to be drawn for the draw procedure */
    /* current is either equal to cnt or equal to rem */
    /* local coordinates of the glyph */
    uint8_t lx,ly;
    /* target position on the screen */
    int16_t x, y;
    u8g2_font_decode_t *decode = &(u8g2->font_decode);
    cnt = len;
    /* get the local position */
    lx = decode->x;
    ly = decode->y;
    for(;;){
        /* calculate the number of pixel to the right edge of the glyph */
        rem = decode->glyph_width;
        rem -= lx;
        /* calculate how many pixel to draw. This is either to the right edge */
        /* or lesser, if not enough pixel are left */
        current = rem;
        if ( cnt < rem )
            current = cnt;
        /* now draw the line, but apply the rotation around the glyph target position */
        //u8g2_font_decode_draw_pixel(u8g2, lx,ly,current, is_foreground);
        // printf("lx:%d,ly:%d,current:%d, is_foreground:%d \r\n",lx,ly,current, is_foreground);
        /* get target position */
        x = decode->target_x;
        y = decode->target_y;
        /* apply rotation */
        x = u8g2_add_vector_x(x, lx, ly, decode->dir);
        y = u8g2_add_vector_y(y, lx, ly, decode->dir);
        /* draw foreground and background (if required) */
        if ( current > 0 )		/* avoid drawing zero length lines, issue #4 */
        {
            if ( is_foreground )
            {
                u8g2_draw_hv_line(u8g2, x, y, current, decode->dir, FORE_COLOR);
            }
            // else if ( decode->is_transparent == 0 )
            // {
                // u8g2_draw_hv_line(u8g2, x, y, current, decode->dir, BACK_COLOR);
            // }
        }
        /* check, whether the end of the run length code has been reached */
        if ( cnt < rem )
            break;
        cnt -= rem;
        lx = 0;
        ly++;
    }
    lx += cnt;
    decode->x = lx;
    decode->y = ly;
}
static void u8g2_font_setup_decode(u8g2_t *u8g2, const uint8_t *glyph_data)
{
    u8g2_font_decode_t *decode = &(u8g2->font_decode);
    decode->decode_ptr = glyph_data;
    decode->decode_bit_pos = 0;

    /* 8 Nov 2015, this is already done in the glyph data search procedure */
    /*
    decode->decode_ptr += 1;
    decode->decode_ptr += 1;
    */

    decode->glyph_width = u8g2_font_decode_get_unsigned_bits(decode, u8g2->font_info.bits_per_char_width);
    decode->glyph_height = u8g2_font_decode_get_unsigned_bits(decode,u8g2->font_info.bits_per_char_height);

}
static int8_t u8g2_font_decode_glyph(u8g2_t *u8g2, const uint8_t *glyph_data){
    uint8_t a, b;
    int8_t x, y;
    int8_t d;
    int8_t h;
    u8g2_font_decode_t *decode = &(u8g2->font_decode);
    u8g2_font_setup_decode(u8g2, glyph_data);
    h = u8g2->font_decode.glyph_height;
    x = u8g2_font_decode_get_signed_bits(decode, u8g2->font_info.bits_per_char_x);
    y = u8g2_font_decode_get_signed_bits(decode, u8g2->font_info.bits_per_char_y);
    d = u8g2_font_decode_get_signed_bits(decode, u8g2->font_info.bits_per_delta_x);

    if ( decode->glyph_width > 0 )
    {
        decode->target_x = u8g2_add_vector_x(decode->target_x, x, -(h+y), decode->dir);
        decode->target_y = u8g2_add_vector_y(decode->target_y, x, -(h+y), decode->dir);
        //u8g2_add_vector(&(decode->target_x), &(decode->target_y), x, -(h+y), decode->dir);
        /* reset local x/y position */
        decode->x = 0;
        decode->y = 0;
        /* decode glyph */
        for(;;){
        a = u8g2_font_decode_get_unsigned_bits(decode, u8g2->font_info.bits_per_0);
        b = u8g2_font_decode_get_unsigned_bits(decode, u8g2->font_info.bits_per_1);
        do{
            u8g2_font_decode_len(u8g2, a, 0);
            u8g2_font_decode_len(u8g2, b, 1);
        } while( u8g2_font_decode_get_unsigned_bits(decode, 1) != 0 );
        if ( decode->y >= h )
            break;
        }
    }
    return d;
}
const uint8_t *u8g2_font_get_glyph_data(u8g2_t *u8g2, uint16_t encoding);
static int16_t u8g2_font_draw_glyph(u8g2_t *u8g2, int16_t x, int16_t y, uint16_t encoding){
    int16_t dx = 0;
    u8g2->font_decode.target_x = x;
    u8g2->font_decode.target_y = y;
    const uint8_t *glyph_data = u8g2_font_get_glyph_data(u8g2, encoding);
    if ( glyph_data != NULL ){
        dx = u8g2_font_decode_glyph(u8g2, glyph_data);
    }
    return dx;
}
extern void luat_u8g2_set_ascii_indentation(uint8_t value);
/*
设置字体
@api lcd.setFont(font, indentation)
@int font lcd.font_XXX 请查阅常量表
@int indentation, 等宽字体ascii右侧缩进0~127个pixel，等宽字体的ascii字符可能在右侧有大片空白，用户可以选择删除部分。留空或者超过127则直接删除右半边, 非等宽字体无效
@usage
-- 设置为字体,对之后的drawStr有效,调用lcd.drawStr前一定要先设置

-- 若提示 "only font pointer is allow" , 则代表当前固件不含对应字体

-- lcd库的默认字体均以 lcd.font_ 开头
lcd.setFont(lcd.font_opposansm12)
lcd.drawStr(40,10,"drawStr")
sys.wait(2000)
lcd.setFont(lcd.font_opposansm12_chinese) -- 具体取值可参考api文档的常量表
lcd.drawStr(40,40,"drawStr测试")
*/
static int l_lcd_set_font(lua_State *L) {
    if (!lua_islightuserdata(L, 1)) {
        LLOGE("only font pointer is allow");
        return 0;
    }
    const uint8_t *ptr = (const uint8_t *)lua_touserdata(L, 1);
    if (ptr == NULL) {
        LLOGE("only font pointer is allow");
        return 0;
    }

    if (lcd_dft_conf == NULL) {
        LLOGE("lcd not init");
        return 0;
    }

    luat_u8g2_set_ascii_indentation(0xff);
    u8g2_SetFont(&(lcd_dft_conf->luat_lcd_u8g2), ptr);
    if (lua_isinteger(L, 2)) {
        int indentation = luaL_checkinteger(L, 2);
        luat_u8g2_set_ascii_indentation(indentation);
    }
    lua_pushboolean(L, 1);
    return 1;
}

/*
设置使用文件系统中的字体文件 
@api lcd.setFontFile(font, indentation)
@string filename 字体文件
@int indentation, 等宽字体ascii右侧缩进0~127个pixel，等宽字体的ascii字符可能在右侧有大片空白，用户可以选择删除部分。留空或者超过127则直接删除右半边, 非等宽字体无效
@return boolean 成功返回true, 失败返回nil
@usage
-- 字体文件制作工具: https://gitee.com/Dozingfiretruck/u8g2_font_tool
-- 设置为字体,对之后的drawStr有效,调用lcd.drawStr前一定要先设置

lcd.setFontFile("/sd/u8g2_font_opposansm12.bin")
lcd.drawStr(40,10,"drawStr")
*/
static int l_lcd_set_fontfile(lua_State *L) {
    if (lcd_dft_conf == NULL) {
        LLOGE("lcd not init");
        return 0;
    }
    if (lcd_dft_conf->luat_lcd_u8g2.font_file) {
        luat_fs_fclose(lcd_dft_conf->luat_lcd_u8g2.font_file);
        lcd_dft_conf->luat_lcd_u8g2.font_file = NULL;
    }
    size_t sz = 0;
    if (lua_isnil(L, 1)) {
        return 0;
    }
    const uint8_t* font_filename = (const uint8_t*)luaL_checklstring(L, 1, &sz);
    lcd_dft_conf->luat_lcd_u8g2.font_file = luat_fs_fopen((const char*)font_filename, "rb");
    if (lcd_dft_conf->luat_lcd_u8g2.font_file == NULL) {
        LLOGE("open font file fail %s", font_filename);
        return 0;
    }
    luat_u8g2_set_ascii_indentation(0xff);
    u8g2_SetFont(&(lcd_dft_conf->luat_lcd_u8g2), NULL);
    if (lua_isinteger(L, 2)) {
        int indentation = luaL_checkinteger(L, 2);
        luat_u8g2_set_ascii_indentation(indentation);
    }
    lua_pushboolean(L, 1);
    return 1;
}

/*
获取字符串宽度
@api lcd.getStrWidth(str)
@string str 要测量的字符串
@return int 字符串的像素宽度
@usage
-- 设置字体
lcd.setFont(lcd.font_opposansm12_chinese)
-- 获取字符串宽度
local width = lcd.getStrWidth("Hello世界")
print("字符串宽度:", width)
*/
static int l_lcd_get_str_width(lua_State* L) {
    size_t sz;
    const uint8_t* data;
    int total_width = 0;
    
    data = (const uint8_t*)luaL_checklstring(L, 1, &sz);
    
    if (sz == 0) {
        lua_pushinteger(L, 0);
        return 1;
    }
    
    if (lcd_dft_conf == NULL) {
        LLOGE("lcd not init");
        lua_pushinteger(L, 0);
        return 1;
    }
    
    uint16_t e;
    int16_t delta;
    utf8_state = 0;
    u8g2_t *u8g2 = &(lcd_dft_conf->luat_lcd_u8g2);

    // 遍历字符串中的每个字符，累加宽度
    for(;;){
        e = utf8_next((uint8_t)*data);
        if ( e == 0x0ffff )
            break;
        data++;
        if ( e != 0x0fffe ){
            // 只获取字符宽度，不绘制
            const uint8_t *glyph_data = u8g2_font_get_glyph_data(u8g2, e);
            if (glyph_data != NULL) {
                u8g2_font_decode_t *decode = &(u8g2->font_decode);
                u8g2_font_setup_decode(u8g2, glyph_data);
                // 直接从解码后的数据获取 delta_x (字符宽度)
                u8g2_font_decode_get_signed_bits(decode, u8g2->font_info.bits_per_char_x);
                u8g2_font_decode_get_signed_bits(decode, u8g2->font_info.bits_per_char_y);
                delta = u8g2_font_decode_get_signed_bits(decode, u8g2->font_info.bits_per_delta_x);
                if (e < 0x0080) delta = luat_u8g2_need_ascii_cut(delta);
                total_width += delta;
            }
        }
    }
    
    lua_pushinteger(L, total_width);
    return 1;
}

/*
显示字符串
@api lcd.drawStr(x,y,str,fg_color)
@int x 横坐标
@int y 竖坐标  注意:此(x,y)为左下起始坐标
@string str 文件内容
@int fg_color str颜色 注意:此参数可选，如不填写则使用之前设置的颜色，绘制只会绘制字体部分，背景需要自己清除
@usage
-- 显示之前先设置为中文字体,对之后的drawStr有效
lcd.setFont(lcd.font_opposansm12)
lcd.drawStr(40,10,"drawStr")
sys.wait(2000)
lcd.setFont(lcd.font_opposansm16_chinese)
lcd.drawStr(40,40,"drawStr测试")
*/
static int l_lcd_draw_str(lua_State* L) {
    int x, y;
    size_t sz;
    const uint8_t* data;
    x = luaL_checkinteger(L, 1);
    y = luaL_checkinteger(L, 2);
    data = (const uint8_t*)luaL_checklstring(L, 3, &sz);
    FORE_COLOR = (luat_color_t)luaL_optinteger(L, 4,FORE_COLOR);
    // BACK_COLOR = (uint32_t)luaL_optinteger(L, 5,BACK_COLOR);
    if (sz == 0)
        return 0;
    if (lcd_dft_conf == NULL) {
        LLOGE("lcd not init");
        return 0;
    }
    uint16_t e;
    int16_t delta;
    utf8_state = 0;

    for(;;){
        e = utf8_next((uint8_t)*data);
        if ( e == 0x0ffff )
            break;
        data++;
        if ( e != 0x0fffe ){
            delta = u8g2_font_draw_glyph(&(lcd_dft_conf->luat_lcd_u8g2), x, y, e);
            if (e < 0x0080) delta = luat_u8g2_need_ascii_cut(delta);
            switch(lcd_dft_conf->luat_lcd_u8g2.font_decode.dir){
                case 0:
                x += delta;
                break;
                case 1:
                y += delta;
                break;
                case 2:
                x -= delta;
                break;
                case 3:
                y -= delta;
                break;
            }
        }
    }
    lcd_auto_flush(lcd_dft_conf);
    return 0;
}

#ifdef LUAT_USE_GTFONT

#include "luat_gtfont.h"

/*
使用gtfont显示gb2312字符串
@api lcd.drawGtfontGb2312(str,size,x,y)
@string str 显示字符串
@int size 字体大小 (支持16-192号大小字体)
@int x 横坐标
@int y 竖坐标
@usage
-- 注意, gtfont是额外的字体芯片硬件, 需要外挂在SPI总线才能调用本函数的
lcd.drawGtfontGb2312("啊啊啊",32,0,0)
*/
/*
使用gtfont显示gbk字符串
@api lcd.drawGtfontGbk(str,size,x,y)
@string str 显示字符串
@int size 字体大小 (支持16-192号大小字体)
@int x 横坐标
@int y 竖坐标
@usage
-- 注意, gtfont是额外的字体芯片硬件, 需要外挂在SPI总线才能调用本函数的
lcd.drawGtfontGbk("啊啊啊",32,0,0)
*/
static int l_lcd_draw_gtfont_gbk(lua_State *L) {
	size_t len;
	int i = 0;
	uint8_t strhigh,strlow ;
	uint16_t str;
    const char *fontCode = luaL_checklstring(L, 1,&len);
    unsigned char size = luaL_checkinteger(L, 2);
	int x = luaL_checkinteger(L, 3);
	int y = luaL_checkinteger(L, 4);
    FORE_COLOR = (luat_color_t)luaL_optinteger(L, 5,FORE_COLOR);
    // BACK_COLOR = (luat_color_t)luaL_optinteger(L, 6,BACK_COLOR);

    if (lcd_dft_conf == NULL) {
        LLOGE("lcd not init");
        return 0;
    }
    int buff_size = size*size/8+512;
    unsigned char* buf = luat_heap_malloc(buff_size);
    if (buf == NULL){
        LLOGE("malloc error");
        return 0;
    }
	while ( i < len){
        int font_size = 0;
        memset(buf,0x00,buff_size);
		strhigh = *fontCode;
		fontCode++;
        if (strhigh<0x80){
            str = strhigh;
            font_size = get_font(buf, VEC_HZ_ASCII_STY, str, size, size, size);
            if(font_size == 0){
                LLOGW("get gtfont error size:%d font_size:%d",size,font_size);
                return 0;
            }
            i+=1;
        }else{
            strlow = *fontCode;
            str = (strhigh<<8)|strlow;
            fontCode++;
            font_size = get_font(buf, VEC_BLACK_STY, str, size, size, size);
            if(font_size == 0){
                LLOGW("get gtfont error size:%d font_size:%d",size,font_size);
                return 0;
            }
            i+=2;
        }
		gtfont_draw_w(buf , x ,y , font_size,size , size,luat_lcd_draw_point,lcd_dft_conf,0);
		x+=size;
	}
    lcd_auto_flush(lcd_dft_conf);
    luat_heap_free(buf);
    return 0;
}

/*
使用gtfont灰度显示gb2312字符串
@api lcd.drawGtfontGb2312Gray(str,size,gray,x,y)
@string str 显示字符串
@int size 字体大小 (支持16-192号大小字体)
@int gray 灰度[1阶/2阶/4阶]
@int x 横坐标
@int y 竖坐标
@usage
-- 注意, gtfont是额外的字体芯片硬件, 需要外挂在SPI总线才能调用本函数的
lcd.drawGtfontGb2312Gray("啊啊啊",32,4,0,40)
*/
/*
使用gtfont灰度显示gbk字符串
@api lcd.drawGtfontGbkGray(str,size,gray,x,y)
@string str 显示字符串
@int size 字体大小 (支持16-192号大小字体)
@int gray 灰度[1阶/2阶/4阶]
@int x 横坐标
@int y 竖坐标
@usage
-- 注意, gtfont是额外的字体芯片硬件, 需要外挂在SPI总线才能调用本函数的
lcd.drawGtfontGbkGray("啊啊啊",32,4,0,40)
*/
static int l_lcd_draw_gtfont_gbk_gray(lua_State* L) {
	size_t len;
	int i = 0;
	uint8_t strhigh,strlow ;
	uint16_t str;
    const char *fontCode = luaL_checklstring(L, 1,&len);
    unsigned char size = luaL_checkinteger(L, 2);
	// unsigned char font_g = luaL_optinteger(L, 3, 4);
	int x = luaL_checkinteger(L, 4);
	int y = luaL_checkinteger(L, 5);
    FORE_COLOR = (luat_color_t)luaL_optinteger(L, 6,FORE_COLOR);
    // BACK_COLOR = (luat_color_t)luaL_optinteger(L, 7,BACK_COLOR);
    int buff_size = size*4*size*4/8+512;
    unsigned char* buf = luat_heap_malloc(buff_size);
    if (buf == NULL){
        LLOGE("malloc error");
        return 0;
    }
	while ( i < len){
        unsigned int* width = NULL;
        memset(buf,0x00,buff_size);
		strhigh = *fontCode;
		fontCode++;
        if (strhigh<0x80){
            str = strhigh;
            width = get_Font_Gray(buf,VEC_HZ_ASCII_STY,str,size, size);
            i+=1;
        }else{
            strlow = *fontCode;
            str = (strhigh<<8)|strlow;
            fontCode++;
            width = get_Font_Gray(buf,VEC_BLACK_STY,str,size, size);
            i+=2;
        }
		// LLOGW("get_Font_Gray width[0]:%d width[1]:%d",width[0], width[1]);
        int dw = gtfont_draw_gray_hz(buf, x, y, width[0] , size, width[1], luat_lcd_draw_point,lcd_dft_conf,0);
        x+=dw;
	}
    lcd_auto_flush(lcd_dft_conf);
    luat_heap_free(buf);
    return 0;
}

#ifdef LUAT_USE_GTFONT_UTF8

/*
使用gtfont显示UTF8字符串
@api lcd.drawGtfontUtf8(str,size,x,y)
@string str 显示字符串
@int size 字体大小 (支持16-192号大小字体)
@int x 横坐标
@int y 竖坐标
@usage
lcd.drawGtfontUtf8("啊啊啊",32,0,0)
*/
static int l_lcd_draw_gtfont_utf8(lua_State *L) {
    size_t len;
    const char *fontCode = luaL_checklstring(L, 1,&len);
    unsigned char size = luaL_checkinteger(L, 2);
    int x = luaL_checkinteger(L, 3);
    int y = luaL_checkinteger(L, 4);
    FORE_COLOR = (luat_color_t)luaL_optinteger(L, 5,FORE_COLOR);
    // BACK_COLOR = (luat_color_t)luaL_optinteger(L, 6,BACK_COLOR);
    int buff_size = size*size/8+512;
    unsigned char* buf = luat_heap_malloc(buff_size);
    if (buf == NULL){
        LLOGE("malloc error");
        return 0;
    }
    for(;;){
        memset(buf,0,buff_size);
        uint16_t e = utf8_next((uint8_t)*fontCode);
        if ( e == 0x0ffff )
        break;
        fontCode++;
        if ( e != 0x0fffe ){
            uint16_t str = gt_unicode2gb18030(e);
            int font_size = get_font(buf, str<0x80?VEC_HZ_ASCII_STY:VEC_BLACK_STY, str, size, size, size);
            if(font_size == 0){
                LLOGW("get gtfont error size:%d font_size:%d",size,font_size);
                return 0;
            }
            unsigned int dw = gtfont_draw_w(buf , x ,y , font_size,size , size,luat_lcd_draw_point,lcd_dft_conf,0);
            if (str==0x20){
                x+=size/2;
            }else{
                x+=(str<0x80)?dw:size; 
            }
        }
    }
    lcd_auto_flush(lcd_dft_conf);
    luat_heap_free(buf);
    return 0;
}

/*
使用gtfont灰度显示UTF8字符串
@api lcd.drawGtfontUtf8Gray(str,size,gray,x,y)
@string str 显示字符串
@int size 字体大小 (支持16-192号大小字体)
@int gray 灰度[1阶/2阶/4阶]
@int x 横坐标
@int y 竖坐标
@usage
lcd.drawGtfontUtf8Gray("啊啊啊",32,4,0,40)
*/
static int l_lcd_draw_gtfont_utf8_gray(lua_State* L) {
	size_t len;
    const char *fontCode = luaL_checklstring(L, 1,&len);
    unsigned char size = luaL_checkinteger(L, 2);
	// unsigned char font_g = luaL_optinteger(L, 3, 4);
	int x = luaL_checkinteger(L, 4);
	int y = luaL_checkinteger(L, 5);
    FORE_COLOR = (luat_color_t)luaL_optinteger(L, 6,FORE_COLOR);
    // BACK_COLOR = (luat_color_t)luaL_optinteger(L, 7,BACK_COLOR);
    uint16_t buff_size = size*4*size*4/8+512;
    unsigned char* buf = luat_heap_malloc(buff_size);
    // LLOGD("buff_size:%d buf:%p", buff_size,buf);
    if (buf == NULL){
        LLOGE("malloc error");
        return 0;
    }
	for(;;){
        memset(buf,0x00,buff_size);
        uint16_t e = utf8_next((uint8_t)*fontCode);
        if ( e == 0x0ffff )
        break;
        fontCode++;
        if ( e != 0x0fffe ){
            uint16_t str = gt_unicode2gb18030(e);
            unsigned int* width = NULL;
            width = get_Font_Gray(buf,str<0x80?VEC_HZ_ASCII_STY:VEC_BLACK_STY,str,size, size);
            // LLOGW("get_Font_Gray size:%d width[0]:%d width[1]:%d", size, width[0], width[1]);
            int dw = gtfont_draw_gray_hz(buf, x, y, width[0] , size, width[1], luat_lcd_draw_point,lcd_dft_conf,0);
        	// LLOGW("gtfont_draw_gray_hz dw:%d",dw);
            x+=dw;
        }
    }
    lcd_auto_flush(lcd_dft_conf);
    luat_heap_free(buf);
    return 0;
}

#endif // LUAT_USE_GTFONT_UTF8

#endif // LUAT_USE_GTFONT

static int l_lcd_set_default(lua_State *L) {
    if (lua_gettop(L) == 1) {
        lcd_dft_conf = lua_touserdata(L, 1);
        lua_pushboolean(L, 1);
        return 1;
    }
    return 1;
}

static int l_lcd_get_default(lua_State *L) {
    if (lcd_dft_conf == NULL)
        return 0;
    lua_pushlightuserdata(L, lcd_dft_conf);
    return 1;
}

/*
获取屏幕尺寸
@api lcd.getSize()
@return int 宽, 如果未初始化会返回0
@return int 高, 如果未初始化会返回0
@usage
log.info("lcd", "size", lcd.getSize())
*/
static int l_lcd_get_size(lua_State *L) {
    if (lua_gettop(L) == 1) {
        luat_lcd_conf_t * conf = lua_touserdata(L, 1);
        if (conf) {
            lua_pushinteger(L, conf->w);
            lua_pushinteger(L, conf->h);
            return 2;
        }
    }
    if (lcd_dft_conf == NULL) {
        lua_pushinteger(L, 0);
        lua_pushinteger(L, 0);
    }
    else {
        lua_pushinteger(L, lcd_dft_conf->w);
        lua_pushinteger(L, lcd_dft_conf->h);
    }
    return 2;
}

/*
绘制位图
@api lcd.drawXbm(x, y, w, h, data)
@int X坐标
@int y坐标
@int 位图宽
@int 位图高
@int 位图数据,每一位代表一个像素
@usage
-- 取模使用PCtoLCD2002软件即可 阴码 逐行 逆向
-- 在(0,0)为左上角,绘制 16x16 "今" 的位图
lcd.drawXbm(0, 0, 16,16, string.char(
    0x80,0x00,0x80,0x00,0x40,0x01,0x20,0x02,0x10,0x04,0x48,0x08,0x84,0x10,0x83,0x60,
    0x00,0x00,0xF8,0x0F,0x00,0x08,0x00,0x04,0x00,0x04,0x00,0x02,0x00,0x01,0x80,0x00
))
*/
static int l_lcd_drawxbm(lua_State *L){
    int x = luaL_checkinteger(L, 1);
    int y = luaL_checkinteger(L, 2);
    size_t w = luaL_checkinteger(L, 3);
    size_t h = luaL_checkinteger(L, 4);
    size_t len = 0;
    const char* data = luaL_checklstring(L, 5, &len);
    uint8_t mask = 1;
    if (h < 1) return 0; // 行数必须大于0
    if (len*8/h < w) return 0; // 起码要填满一行
    int w1 = w/8;
    if (w%8)w1++;
    if (len != h*w1)return 0;
    
    if (lcd_dft_conf == NULL) {
        LLOGE("lcd not init");
        return 0;
    }
    luat_color_t* color_w = luat_heap_malloc(sizeof(luat_color_t) * w);
    for (size_t b = 0; b < h; b++){
        size_t a = 0;
        while (a < w){
            for (size_t c = 0; c < 8; c++){
                if (*data&(mask<<c)){
                    color_w[a]=FORE_COLOR;
                }else{
                    color_w[a]=BACK_COLOR;
                }
                a++;
                if (a == w)break;
            }
            data++;
        }
        luat_lcd_draw(lcd_dft_conf, x, y+b, x+w-1, y+b, color_w);
    }
    luat_heap_free(color_w);
    lcd_auto_flush(lcd_dft_conf);
    lua_pushboolean(L, 1);
    return 1;
}

#ifdef LUAT_USE_TJPGD
/*
显示图片,当前只支持jpg,jpeg
@api lcd.showImage(x, y, file)
@int X坐标
@int y坐标
@string 文件路径
@usage
lcd.showImage(0,0,"/luadb/logo.jpg")
*/
int l_lcd_showimage(lua_State *L) {
    if (lcd_dft_conf == NULL) {
        LLOGE("lcd not init");
        return 0;
    }
    size_t size = 0;
    int ret = 0;
    int x = luaL_checkinteger(L, 1);
    int y = luaL_checkinteger(L, 2);
    const char* input_file = luaL_checklstring(L, 3, &size);
    if (memcmp(input_file+size-4, ".jpg", 5) == 0 || memcmp(input_file+size-4, ".JPG", 5) == 0 || memcmp(input_file+size-5, ".jpeg", 6) == 0 || memcmp(input_file+size-5, ".JPEG", 6) == 0){
        ret = lcd_draw_jpeg(lcd_dft_conf, input_file, x, y);
        lua_pushboolean(L, ret == 0 ? 1 : 0);
    } else{
        LLOGE("input_file not support");
        lua_pushboolean(L, 0);
    }
    return 1;
}
/*
解码图片,当前只支持jpg,jpeg
@api lcd.image2raw(file)
@string 文件路径
@return userdata 颜色zbuff
@usage
lcd_zbuff = lcd.image2raw("/luadb/logo.jpg")
lcd.draw(0, 0, 80, 80, lcd_zbuff)
*/
int l_lcd_image2raw(lua_State *L) {
    if (lcd_dft_conf == NULL) {
        LLOGE("lcd not init");
        return 0;
    }
    size_t size = 0;
    int ret = 0;
    luat_lcd_buff_info_t buff_info = {0};
    const char* input_file = luaL_checklstring(L, 1, &size);
    if (memcmp(input_file+size-4, ".jpg", 5) == 0 || memcmp(input_file+size-4, ".JPG", 5) == 0 || memcmp(input_file+size-5, ".jpeg", 6) == 0 || memcmp(input_file+size-5, ".JPEG", 6) == 0){
        ret = lcd_jpeg_decode(lcd_dft_conf, input_file, &buff_info);
        if(ret){
            goto error;
        }
    } else{
        LLOGE("input_file not support");
        lua_pushboolean(L, 0);
        return 1;
    }
    luat_zbuff_t *zbuff = (luat_zbuff_t *)lua_newuserdata(L, sizeof(luat_zbuff_t));
	memset(zbuff,0,sizeof(luat_zbuff_t));
    zbuff->addr = buff_info.buff;
	zbuff->len = buff_info.len;
	zbuff->width = buff_info.width;
	zbuff->height = buff_info.height;
	zbuff->bit = LUAT_LCD_COLOR_DEPTH;
	// LLOGD("addr:%p len:%d width:%d height:%d bit:%d ",zbuff->addr,zbuff->len,zbuff->width,zbuff->height,zbuff->bit);
	luaL_setmetatable(L, LUAT_ZBUFF_TYPE);
    return 1;
error:
    if (buff_info.buff) {
        luat_heap_free(buff_info.buff);
    }
    return 0;
}

#endif

/*
主动刷新数据到界面, 仅设置buff且禁用自动属性后使用
@api lcd.flush()
@return bool 成功返回true, 否则返回nil/false
@usage
-- 本API与 lcd.setupBuff lcd.autoFlush 配合使用
lcd.flush()
*/
static int l_lcd_flush(lua_State* L) {
    luat_lcd_conf_t * conf = NULL;
    if (lua_gettop(L) == 1) {
        conf = lua_touserdata(L, 1);
    }else {
        conf = lcd_dft_conf;
    }
    if (conf == NULL) {
        //LLOGW("lcd not init");
        return 0;
    }
    if (conf->buff == NULL) {
        //LLOGW("lcd without buff, not support flush");
        return 0;
    }
    if (conf->auto_flush) {
        //LLOGI("lcd auto flush is enable, no need for flush");
        return 0;
    }
    luat_lcd_flush(conf);
    lua_pushboolean(L, 1);
    return 1;
}

/*
设置显示缓冲区, 所需内存大小为 2×宽×高 字节. 请衡量内存需求与业务所需的刷新频次.
@api lcd.setupBuff(conf, onheap)
@userdata conf指针, 不需要传
@bool true使用heap内存, false使用vm内存, 默认使用vm内存, 不需要主动传
@return bool 是否成功
@usage
-- 初始化lcd的buff缓冲区, 可理解为FrameBuffer区域.
lcd.setupBuff()
*/
static int l_lcd_setup_buff(lua_State* L) {
    luat_lcd_conf_t * conf = NULL;
    if (lua_gettop(L) == 1) {
        conf = lua_touserdata(L, 1);
    }
    else {
        conf = lcd_dft_conf;
    }
    if (conf == NULL) {
        LLOGW("lcd not init");
        return 0;
    }
    if (conf->buff != NULL && conf->buff_ex != NULL) {
        LLOGI("lcd buff is aready exist");
        return 0;
    }
    if (lua_isboolean(L, 2) && lua_toboolean(L, 2)) {
        luat_lcd_setup_buff(conf);
    }
    else {
        conf->buff = lua_newuserdata(L, sizeof(luat_color_t) * conf->w * conf->h);
        if (conf->buff) {
        conf->buff_ref = luaL_ref(L, LUA_REGISTRYINDEX);
        }
    }
    if (conf->buff == NULL) {
        LLOGE("lcd buff malloc fail, out of memory? size %d", sizeof(luat_color_t) * conf->w * conf->h);
        return 0;
    }
    // 先设置为不需要的区间
    conf->flush_y_min = conf->h;
    conf->flush_y_max = 0;
    // luat_lcd_clear 会将区域扩展到整个屏幕
    luat_lcd_clear(lcd_dft_conf, BACK_COLOR);
    lua_pushboolean(L, 1);
    return 1;
}

/*
设置自动刷新, 需配合lcd.setupBuff使用
@api lcd.autoFlush(enable)
@bool 是否自动刷新,默认为true
@usage
-- 设置buff 并禁用自动更新
lcd.setupBuff()
lcd.autoFlush(false)
-- 禁止自动更新后, 需要使用 lcd.flush() 主动刷新数据到屏幕
*/
static int l_lcd_auto_flush(lua_State* L) {
    luat_lcd_conf_t * conf = lcd_dft_conf;
    if (conf == NULL) {
        LLOGW("lcd not init");
        return 0;
    }
    conf->auto_flush = lua_toboolean(L, 1);
    lua_pushboolean(L, conf->auto_flush);
    return 1;
}

/*
RGB565颜色生成
@api lcd.rgb565(r, g, b, swap)
@int 红色, 0x00 ~ 0xFF
@int 绿色, 0x00 ~ 0xFF
@int 蓝色, 0x00 ~ 0xFF
@bool 是否翻转, true 翻转, false 不翻转. 默认翻转
@return int 颜色值
@usage
-- 本API支持多种模式, 参数数量分别是 1, 2, 3, 4
-- 1. 单参数形式, 24bit RGB值, swap = true, 推荐
local red =   lcd.rgb565(0xFF0000)
local green = lcd.rgb565(0x00FF00)
local blue =  lcd.rgb565(0x0000FF)

-- 2. 两参数形式, 24bit RGB值, 增加swap的设置
local red =   lcd.rgb565(0xFF0000, true)
local green = lcd.rgb565(0x00FF00, true)
local blue =  lcd.rgb565(0x0000FF, true)

-- 3. 三参数形式, 红/绿/蓝, 各8bit
local red = lcd.rgb565(0xFF, 0x00, 0x00)
local green = lcd.rgb565(0x00, 0xFF, 0x00)
local blue = lcd.rgb565(0x00, 0x00, 0xFF)

-- 4. 四参数形式, 红/绿/蓝, 各8bit, 增加swap的设置
local red = lcd.rgb565(0xFF, 0x00, 0x00, true)
local green = lcd.rgb565(0x00, 0xFF, 0x00, true)
local blue = lcd.rgb565(0x00, 0x00, 0xFF, true)
*/
static int l_lcd_rgb565(lua_State* L) {
    uint8_t r =0,g =0,b = 0;
    uint8_t swap = 0;
    uint16_t dst = 0;
    int top = 0 ;
    uint32_t rgb = 0;
    top = lua_gettop(L);
    if (top == 1 || top == 2) {
        rgb = luaL_checkinteger(L, 1);
        r = (uint8_t)((rgb >> 16 ) & 0xFF);
        g = (uint8_t)((rgb >> 8 ) & 0xFF);
        b = (uint8_t)((rgb >> 0 ) & 0xFF);
        swap = (lua_isboolean(L, 2) && !lua_toboolean(L, 2)) ? 0U : 1U;
    }
    else if (top == 3 || top == 4) {
        r = (uint8_t)luaL_checkinteger(L, 1);
        g = (uint8_t)luaL_checkinteger(L, 2);
        b = (uint8_t)luaL_checkinteger(L, 3);
        swap = (lua_isboolean(L, 4) && !lua_toboolean(L, 4)) ? 0U : 1U;
    }
    else {
        LLOGW("unkown args count %d", top);
        dst = 0;
    }
    dst = (uint16_t)((r&0xF8)<<8) | (uint16_t)((g&0xFC)<<3) | (uint16_t)(b>>3);

    if (swap) {
        dst = ((dst >> 8) & 0xFF) + ((dst & 0xFF) << 8);
    }
    lua_pushinteger(L, dst);
    return 1;
}
#ifdef LUAT_USE_UFONT
#include "luat_ufont.h"
static const int l_lcd_draw_utf8(lua_State *L) {
    size_t sz = 0;
    uint32_t letter = 0;
    uint32_t str_offset;
    int ret = 0;
    uint16_t draw_offset = 0;

    int draw_x = 0;
    int draw_y = 0;
    luat_font_char_desc_t desc = {0};
    // 左上角坐标x,y
    int x = luaL_checkinteger(L, 1);
    int y = luaL_checkinteger(L, 2);
    // 待绘制的字符串
    const char* data = (const char*)luaL_checklstring(L, 3, &sz);
    // 字体指针
    lv_font_t* lfont = (lv_font_t*)lua_touserdata(L, 4);
    if (lfont == NULL) {
        LLOGW("draw without font");
        return 0;
    }
    luat_font_header_t* font = (luat_font_header_t*)lfont->dsc;
    // 是否填充背景
    bool draw_bg = lua_isboolean(L, 5) ? lua_toboolean(L, 5) : true;

    // 没内容, 不需要画了
    if (sz == 0) {
        // 直接返回原坐标
        lua_pushinteger(L, x);
        return 1;
    }

    // 没字体, 不需要画了
    if (font == NULL) {
        LLOGD("NULL font, skip draw");
        // 直接返回原坐标
        lua_pushinteger(L, x);
        return 1;
    }
    // 超边界了没? 超了就没必要绘制了
    if (lcd_dft_conf->h < y || lcd_dft_conf->w < x) {
        //LLOGD("draw y %d h % font->line_height %d", y, lcd_dft_conf->h, font->line_height);
        // 直接返回原坐标
        lua_pushinteger(L, x);
        return 1;
    }

    luat_color_t* buff = NULL;
    if (draw_bg)
      buff = luat_heap_malloc(font->line_height * font->line_height * 2);
    // if (buff == NULL)
    //   return 0;
    int offset = 0;
    uint8_t *data_ptr = data;
    uint8_t utf8_state = 0;
    uint16_t utf8_tmp = 0;
    uint16_t utf8_out = 0;
    luat_color_t color = FORE_COLOR;
    for (size_t i = 0; i < sz; i++)
    {
        utf8_out = luat_utf8_next(data[i], &utf8_state, &utf8_tmp);
        if (utf8_out == 0x0ffff)
          break; // 结束了
        if (utf8_out == 0x0fffe)
          continue; // 没读完一个字符,继续下一个循环
        letter = (uint32_t)utf8_out;

        //LLOGD("draw letter %04X", letter);
        int ret = luat_font_get_bitmap(font, &desc, letter);
        if (ret != 0) {
            LLOGD("not such char in font");
            draw_offset += font->line_height / 2; // 找不到字符, 默认跳过半个字
            continue;
        }
        offset = 0;
        // desc.data = tmp;
        memset(buff, 0, font->line_height * font->line_height * 2);
        draw_x = x + draw_offset;
        draw_offset += desc.char_w;
        if (draw_x >= 0 &&  draw_x + desc.char_w <= lcd_dft_conf->w) {
            //if (lcd_dft_conf->buff == NULL) {
            for (size_t j = 0; j < font->line_height; j++)
            {
              //LLOGD("draw char pix line %d", i);
                for (size_t k = 0; k < desc.char_w; k++)
                {
                    if ((desc.data[offset / 8] >> (7 - (offset % 8))) & 0x01) {
                        color = FORE_COLOR;
                        if (buff)
                            buff[offset] = FORE_COLOR;
                        else
                            luat_lcd_draw_point(lcd_dft_conf, draw_x + k, y + j, FORE_COLOR);
                        //LLOGD("draw char pix mark %d", offset);
                    }else {
                        if (buff)
                            buff[offset] = BACK_COLOR;
                        //LLOGD("draw char pix offset %d color %04X", offset, FORE_COLOR);
                    }
                    offset ++;
                }
            }
            //LLOGD("luat_lcd_draw %d %d %d %d", draw_x, y, draw_x + desc.char_w, y + font->line_height);
            luat_lcd_draw(lcd_dft_conf, draw_x, y, draw_x + desc.char_w - 1, y + font->line_height - 1, buff);
          //}
          //else {
          //
          //}
        }
    }
    if (buff)
        luat_heap_free(buff);

    lcd_auto_flush(lcd_dft_conf);
    lua_pushinteger(L, draw_x + desc.char_w);
    return 1;
}
#endif

/*
硬件lcd qspi接口配置，需要在lcd.init前配置好
@api lcd.qspi(1_wire_command, 1_wire_command, 1_wire_command_4_wire_data, 4_wire_command_4_wire_data, vsync_reg, hsync_cmd, hsync_reg)
@int lcd命令模式下的qspi指令
@int lcd数据模式下，1线地址，4线数据的qspi指令，
@int lcd数据模式下，4线地址，4线数据的qspi指令，可以留空，如果存在，发送数据时优先使用这个模式
@int 帧同步时的地址值，只有无ram的屏幕需要，如果能用0x2c发送数据则不需要这个参数
@int 行同步时的指令，一般情况和命令模式下的指令一致，只有无ram的屏幕需要，如果能用0x2c发送数据则不需要这个参数
@int 行同步时的地址值，只有无ram的屏幕需要，如果能用0x2c发送数据则不需要这个参数
@return nil 无返回值
@usage
-- sh8601z驱动ic所需的qspi配置
lcd.qspi(0x02, 0x32, 0x12)
-- jd9261t驱动ic所需的qspi配置
lcd.qspi(0xde, 0xde, nil, 0x61, 0xde, 0x60)
-- CO5300驱动ic所需的qspi配置
lcd.qspi(0x02, 0x32, 0x12)
*/
static int l_lcd_qspi_config(lua_State* L){
	luat_lcd_qspi_conf_t qspi_config = {0};
	qspi_config.write_1line_cmd = luaL_optinteger(L, 1, 0x02);
	qspi_config.write_4line_cmd = luaL_optinteger(L, 2, 0x32);
	qspi_config.write_4line_data = luaL_optinteger(L, 3, 0);
	qspi_config.vsync_reg = luaL_optinteger(L, 4, 0);
	qspi_config.hsync_cmd = luaL_optinteger(L, 5, 0);
	qspi_config.hsync_reg = luaL_optinteger(L, 6, 0);
	luat_lcd_qspi_config(NULL, &qspi_config);
	return 0;
}

/*
用户使用脚本初始化LCD完成后，必须调用本API
@api lcd.user_done()
@return nil 无返回值
*/
static int l_lcd_user_ctrl_done(lua_State* L){
	lcd_dft_conf->is_init_done = 1;
	if (LUAT_LCD_IM_QSPI_MODE == lcd_dft_conf->interface_mode) {
		if (luat_lcd_qspi_is_no_ram(lcd_dft_conf)) {
            luat_lcd_qspi_auto_flush_on_off(lcd_dft_conf, 1);
		}
	}
	return 0;
}

/*
开启/关闭硬件加速(lcd.init后默认开启所有支持的硬件加速,当使用存在问题时可使用此接口进行开关指定的硬件加速)
@api lcd.setAcchw(type,enable)
@number type 支持的类型, 可选,默认全部类型 目前支持 lcd.ACC_HW_JPEG lcd.ACC_HW_ALL
@bool enable 开关, 可选 默认关闭 ture开启 false关闭
@return nil 无返回值
@usage
    lcd.setAcchw(lcd.ACC_HW_JPEG,false) -- 关闭硬件加速的jpeg解码功能
    lcd.setAcchw(lcd.ACC_HW_ALL,false) -- 关闭所有硬件加速
*/
static int l_lcd_set_acc_hw(lua_State* L){
    luat_lcd_conf_t * conf = lcd_dft_conf;
    uint8_t type = luaL_optinteger(L, 1, LUAT_LCD_ACC_HW_ALL);
    uint8_t enable = 0;
    if (lua_isboolean(L, 2)) {
        enable = lua_toboolean(L, 2);
    }
    if (type == LUAT_LCD_ACC_HW_ALL){
        if (enable){
            conf->acc_hw = LUAT_LCD_ACC_HW_ALL;
        }else{
            conf->acc_hw = 0;
        }
    }else if(type == LUAT_LCD_ACC_HW_JPEG){
        if (enable){
            conf->acc_hw_jpeg = 1;
        }else{
            conf->acc_hw_jpeg = 0;
        }
    }
	return 0;
}


#include "rotable2.h"
static const rotable_Reg_t reg_lcd[] =
{
    { "init",       ROREG_FUNC(l_lcd_init)},
    { "clear",      ROREG_FUNC(l_lcd_clear)},
    { "fill",       ROREG_FUNC(l_lcd_draw_fill)},
    { "drawPoint",  ROREG_FUNC(l_lcd_draw_point)},
    { "drawLine",   ROREG_FUNC(l_lcd_draw_line)},
    { "drawRectangle",   ROREG_FUNC(l_lcd_draw_rectangle)},
    { "drawCircle", ROREG_FUNC(l_lcd_draw_circle)},
    { "drawQrcode", ROREG_FUNC(l_lcd_drawQrcode)},
    { "drawStr",    ROREG_FUNC(l_lcd_draw_str)},
    { "flush",      ROREG_FUNC(l_lcd_flush)},
    { "setupBuff",  ROREG_FUNC(l_lcd_setup_buff)},
    { "autoFlush",  ROREG_FUNC(l_lcd_auto_flush)},
    { "setFont",    ROREG_FUNC(l_lcd_set_font)},
    { "setFontFile",ROREG_FUNC(l_lcd_set_fontfile)},
    { "setDefault", ROREG_FUNC(l_lcd_set_default)},
    { "getDefault", ROREG_FUNC(l_lcd_get_default)},
    { "getSize",    ROREG_FUNC(l_lcd_get_size)},
    { "drawXbm",    ROREG_FUNC(l_lcd_drawxbm)},
    { "close",      ROREG_FUNC(l_lcd_close)},
    { "on",         ROREG_FUNC(l_lcd_display_on)},
    { "off",        ROREG_FUNC(l_lcd_display_off)},
    { "sleep",      ROREG_FUNC(l_lcd_sleep)},
    { "wakeup",     ROREG_FUNC(l_lcd_wakeup)},
    { "invon",      ROREG_FUNC(l_lcd_inv_on)},
    { "invoff",     ROREG_FUNC(l_lcd_inv_off)},
    { "cmd",        ROREG_FUNC(l_lcd_write_cmd)},
    { "data",       ROREG_FUNC(l_lcd_write_data)},
    { "setColor",   ROREG_FUNC(l_lcd_set_color)},
    { "draw",       ROREG_FUNC(l_lcd_draw)},
    { "rgb565",     ROREG_FUNC(l_lcd_rgb565)},
	{ "qspi",		ROREG_FUNC(l_lcd_qspi_config)},
	{ "user_done",		ROREG_FUNC(l_lcd_user_ctrl_done)},
    { "setAcchw",    ROREG_FUNC(l_lcd_set_acc_hw)},
#ifdef LUAT_USE_UFONT
    { "drawUTF8",   ROREG_FUNC(l_lcd_draw_utf8)},
#endif
#ifdef LUAT_USE_TJPGD
    { "image2raw",    ROREG_FUNC(l_lcd_image2raw)},
    { "showImage",    ROREG_FUNC(l_lcd_showimage)},
#endif
#ifdef LUAT_USE_GTFONT
    { "drawGtfontGb2312", ROREG_FUNC(l_lcd_draw_gtfont_gbk)},
    { "drawGtfontGb2312Gray", ROREG_FUNC(l_lcd_draw_gtfont_gbk_gray)},
    { "drawGtfontGbk", ROREG_FUNC(l_lcd_draw_gtfont_gbk)},
    { "drawGtfontGbkGray", ROREG_FUNC(l_lcd_draw_gtfont_gbk_gray)},
#ifdef LUAT_USE_GTFONT_UTF8
    { "drawGtfontUtf8", ROREG_FUNC(l_lcd_draw_gtfont_utf8)},
    { "drawGtfontUtf8Gray", ROREG_FUNC(l_lcd_draw_gtfont_utf8_gray)},
#endif // LUAT_USE_GTFONT_UTF8
#endif // LUAT_USE_GTFONT
    // 默认只带英文12号字体
    //@const font_opposansm12 font 12号字体
    { "font_opposansm12", ROREG_PTR((void*)u8g2_font_opposansm12)},
#ifdef USE_U8G2_OPPOSANSM_ENGLISH
    #ifndef LUAT_CONF_FONT_SYMBOLS_DISABLE
    { "font_unifont_t_symbols",   ROREG_PTR((void*)u8g2_font_unifont_t_symbols)},
    { "font_open_iconic_weather_6x_t", ROREG_PTR((void*)u8g2_font_open_iconic_weather_6x_t)},
    #endif

    //@const font_opposansm16 font 16号字体
    //@const font_opposansm18 font 18号字体
    //@const font_opposansm20 font 20号字体
    //@const font_opposansm22 font 22号字体
    //@const font_opposansm24 font 24号字体
    //@const font_opposansm32 font 32号字体
    { "font_opposansm16", ROREG_PTR((void*)u8g2_font_opposansm16)},
    { "font_opposansm18", ROREG_PTR((void*)u8g2_font_opposansm18)},
    { "font_opposansm20", ROREG_PTR((void*)u8g2_font_opposansm20)},
    { "font_opposansm22", ROREG_PTR((void*)u8g2_font_opposansm22)},
    { "font_opposansm24", ROREG_PTR((void*)u8g2_font_opposansm24)},
    { "font_opposansm32", ROREG_PTR((void*)u8g2_font_opposansm32)},
#endif
#ifdef USE_U8G2_OPPOSANSM12_CHINESE
    //@const font_opposansm12_chinese font 12号中文字体
    { "font_opposansm12_chinese", ROREG_PTR((void*)u8g2_font_opposansm12_chinese)},
#endif
#ifdef USE_U8G2_OPPOSANSM14_CHINESE
    //@const font_opposansm14_chinese font 14号中文字体
    { "font_opposansm14_chinese", ROREG_PTR((void*)u8g2_font_opposansm14_chinese)},
#endif
#ifdef USE_U8G2_OPPOSANSM16_CHINESE
    //@const font_opposansm16_chinese font 16号中文字体
    { "font_opposansm16_chinese", ROREG_PTR((void*)u8g2_font_opposansm16_chinese)},
#endif
#ifdef USE_U8G2_OPPOSANSM18_CHINESE
    //@const font_opposansm18_chinese font 18号中文字体
    { "font_opposansm18_chinese", ROREG_PTR((void*)u8g2_font_opposansm18_chinese)},
#endif
#ifdef USE_U8G2_OPPOSANSM20_CHINESE
    //@const font_opposansm20_chinese font 20号中文字体
    { "font_opposansm20_chinese", ROREG_PTR((void*)u8g2_font_opposansm20_chinese)},
#endif
#ifdef USE_U8G2_OPPOSANSM22_CHINESE
    //@const font_opposansm22_chinese font 22号中文字体
    { "font_opposansm22_chinese", ROREG_PTR((void*)u8g2_font_opposansm22_chinese)},
#endif
#ifdef USE_U8G2_OPPOSANSM24_CHINESE
    //@const font_opposansm24_chinese font 24号中文字体
    { "font_opposansm24_chinese", ROREG_PTR((void*)u8g2_font_opposansm24_chinese)},
#endif
#ifdef USE_U8G2_OPPOSANSM32_CHINESE
    //@const font_opposansm32_chinese font 32号中文字体
    { "font_opposansm32_chinese", ROREG_PTR((void*)u8g2_font_opposansm32_chinese)},
#endif
#ifdef USE_U8G2_SARASA_ENGLISH
    { "font_sarasa_m12_ascii", ROREG_PTR((void*)u8g2_font_sarasa_m12_ascii)},
    { "font_sarasa_m14_ascii", ROREG_PTR((void*)u8g2_font_sarasa_m14_ascii)},
    { "font_sarasa_m16_ascii", ROREG_PTR((void*)u8g2_font_sarasa_m16_ascii)},
    { "font_sarasa_m18_ascii", ROREG_PTR((void*)u8g2_font_sarasa_m18_ascii)},
    { "font_sarasa_m20_ascii", ROREG_PTR((void*)u8g2_font_sarasa_m20_ascii)},
    { "font_sarasa_m22_ascii", ROREG_PTR((void*)u8g2_font_sarasa_m22_ascii)},
    //再大的很少用到先不加了
#endif

// #ifdef USE_U8G2_SARASA_M8_CHINESE
//     { "font_sarasa_m8_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m8_chinese)},
// #endif
#ifdef USE_U8G2_SARASA_M10_CHINESE
    { "font_sarasa_m10_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m10_chinese)},
#endif
#ifdef USE_U8G2_SARASA_M12_CHINESE
    { "font_sarasa_m12_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m12_chinese)},
#endif
#ifdef USE_U8G2_SARASA_M14_CHINESE
    { "font_sarasa_m14_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m14_chinese)},
#endif
#ifdef USE_U8G2_SARASA_M16_CHINESE
    { "font_sarasa_m16_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m16_chinese)},
#endif
#ifdef USE_U8G2_SARASA_M18_CHINESE
    { "font_sarasa_m18_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m18_chinese)},
#endif
#ifdef USE_U8G2_SARASA_M20_CHINESE
    { "font_sarasa_m20_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m20_chinese)},
#endif
#ifdef USE_U8G2_SARASA_M22_CHINESE
    { "font_sarasa_m22_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m22_chinese)},
#endif
#ifdef USE_U8G2_SARASA_M24_CHINESE
    { "font_sarasa_m24_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m24_chinese)},
#endif
#ifdef USE_U8G2_SARASA_M26_CHINESE
    { "font_sarasa_m26_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m26_chinese)},
#endif
#ifdef USE_U8G2_SARASA_M28_CHINESE
    { "font_sarasa_m28_chinese", ROREG_PTR((void*)u8g2_font_sarasa_m28_chinese)},
#endif
    { "set_direction",  ROREG_FUNC(l_lcd_set_direction)},
	{ "reset_pin",  ROREG_FUNC(l_lcd_set_reset_pin)},
    //@const direction_0 int 0°方向命令
    { "direction_0",    ROREG_INT(LUAT_LCD_ROTATE_0)},
    //@const direction_90 int 90°方向命令
    { "direction_90",   ROREG_INT(LUAT_LCD_ROTATE_90)},
    //@const direction_180 int 180°方向命令
    { "direction_180",  ROREG_INT(LUAT_LCD_ROTATE_180)},
    //@const direction_270 int 270°方向命令
    { "direction_270",  ROREG_INT(LUAT_LCD_ROTATE_270)},
    //@const SPI 硬件spi device lcd驱动
    { "SPI",            ROREG_INT(LUAT_LCD_SPI_DEVICE)},
    //@const HWID_0 硬件lcd驱动id0 (根据芯片支持选择)
    { "HWID_0",         ROREG_INT(LUAT_LCD_HW_ID_0)},
    //@const RGB 硬件RGB lcd驱动 (根据芯片支持选择)
    { "RGB",            ROREG_INT(LUAT_LCD_PORT_RGB)},

    // //@const ARM2D 硬件ARM2D lcd驱动 (根据芯片支持选择)
    // { "ARM2D",         ROREG_INT(LUAT_LCD_PORT_ARM2D)},
    // //@const DMA2D 硬件DMA2D lcd驱动 (根据芯片支持选择)
    // { "DMA2D",         ROREG_INT(LUAT_LCD_PORT_DMA2D)},


    //@const WIRE_3_BIT_9_INTERFACE_I 三线spi 9bit 模式I
    { "WIRE_3_BIT_9_INTERFACE_I",   ROREG_INT(LUAT_LCD_IM_3_WIRE_9_BIT_INTERFACE_I)},
    //@const WIRE_4_BIT_8_INTERFACE_I 四线spi 8bit 模式I
    { "WIRE_4_BIT_8_INTERFACE_I",   ROREG_INT(LUAT_LCD_IM_4_WIRE_8_BIT_INTERFACE_I)},
    //@const WIRE_3_BIT_9_INTERFACE_II 三线spi 9bit 模式II
    { "WIRE_3_BIT_9_INTERFACE_II",  ROREG_INT(LUAT_LCD_IM_3_WIRE_9_BIT_INTERFACE_II)},
    //@const WIRE_4_BIT_8_INTERFACE_II 四线spi 8bit 模式II
    { "WIRE_4_BIT_8_INTERFACE_II",  ROREG_INT(LUAT_LCD_IM_4_WIRE_8_BIT_INTERFACE_II)},
    //@const DATA_2_LANE spi双通道模式
    { "DATA_2_LANE",                ROREG_INT(LUAT_LCD_IM_2_DATA_LANE)},
	//@const QSPI_MODE QSPI模式
	{ "QSPI_MODE",                ROREG_INT(LUAT_LCD_IM_QSPI_MODE)},
	//@const 8080_MODE 8080模式
	{ "8080_MODE",                ROREG_INT(LUAT_LCD_IM_8080_MODE)},

    //@const ACC_HW_JPEG JPEG硬件加速
    {"ACC_HW_JPEG", ROREG_INT(LUAT_LCD_ACC_HW_JPEG)},
    //@const ACC_HW_ALL 所有硬件加速
    {"ACC_HW_ALL", ROREG_INT(LUAT_LCD_ACC_HW_ALL)},

	{NULL, ROREG_INT(0)}
};

LUAMOD_API int luaopen_lcd( lua_State *L ) {
    luat_newlib2(L, reg_lcd);
    return 1;
}