/************************************************************************
 * Copyright(c) 2023 Levetop Semiconductor Co.,Led. All rights reserved.
 * @file     tp_drv.c
 * @author   UartTFT Application Team
 * @version  V1.0.0
 * @date     2023-02-24
 * @brief
 *************************************************************************/

#include "tp_drv.h"
#include "i2c_drv.h"
#include "ctp.h"
#include "eflash_drv.h"
#include "iomacros.h"

uint8_t ft5216flag = 0;
uint8_t gt911flag = 0;
uint16_t X_Output_Max;
uint16_t Y_Output_Max;
/*****************Resistance touch screen************************/
void RTP_io_Init(void)
{
	I2C_ConfigGpio(I2C_SCL, GPIO_OUTPUT);		// CTP-SCL
	I2C_ConfigGpio(I2C_SDA, GPIO_OUTPUT);		// CTP-SDA
	EPORT_ConfigGpio(EPORT_PIN3, GPIO_INPUT);	// CTP-SDO
	
	SPI_ConfigGpio(SPI3, SPI_SS, GPIO_OUTPUT);	// CTP-RST
	EPORT_ConfigGpio(EPORT_PIN4, GPIO_INPUT);	// CTP-INT1
	// EPORT_ConfigGpio(EPORT_PIN5,GPIO_OUTPUT);//For debug	
}

#define flh_sAddr 0x0807EE00
// Save calibration parameters
void LT_TpSaveAdjdata(void)
{
	gTpInfo.flag = 0x5a;
	EFLASH_Init(g_sys_clk / 1000);
	EFLASH_SetWritePermission();

	EFLASH_PageErase(flh_sAddr);	// Erase Eflash

	EFLASH_WordProg(flh_sAddr, gTpInfo.flag);
	EFLASH_WordProg(flh_sAddr + 20, gTpxfac.s[0]);
	EFLASH_WordProg(flh_sAddr + 24, gTpxfac.s[1]);
	EFLASH_WordProg(flh_sAddr + 28, gTpxfac.s[2]);
	EFLASH_WordProg(flh_sAddr + 32, gTpxfac.s[3]);

	EFLASH_WordProg(flh_sAddr + 36, gTpxoff.s[0]);
	EFLASH_WordProg(flh_sAddr + 40, gTpxoff.s[1]);
	EFLASH_WordProg(flh_sAddr + 44, gTpxoff.s[2]);
	EFLASH_WordProg(flh_sAddr + 48, gTpxoff.s[3]);

	EFLASH_WordProg(flh_sAddr + 52, gTpyfac.s[0]);
	EFLASH_WordProg(flh_sAddr + 56, gTpyfac.s[1]);
	EFLASH_WordProg(flh_sAddr + 60, gTpyfac.s[2]);
	EFLASH_WordProg(flh_sAddr + 64, gTpyfac.s[3]);

	EFLASH_WordProg(flh_sAddr + 68, gTpyoff.s[0]);
	EFLASH_WordProg(flh_sAddr + 72, gTpyoff.s[1]);
	EFLASH_WordProg(flh_sAddr + 76, gTpyoff.s[2]);
	EFLASH_WordProg(flh_sAddr + 80, gTpyoff.s[3]);
}
// Read calibration parameters
uint8_t LT_TpGetAdjdata(void)
{
	gTpxfac.s[0] = IO_READ32(flh_sAddr + 20);
	gTpxfac.s[1] = IO_READ32(flh_sAddr + 24);
	gTpxfac.s[2] = IO_READ32(flh_sAddr + 28);
	gTpxfac.s[3] = IO_READ32(flh_sAddr + 32);

	gTpxoff.s[0] = IO_READ32(flh_sAddr + 36);
	gTpxoff.s[1] = IO_READ32(flh_sAddr + 40);
	gTpxoff.s[2] = IO_READ32(flh_sAddr + 44);
	gTpxoff.s[3] = IO_READ32(flh_sAddr + 48);

	gTpyfac.s[0] = IO_READ32(flh_sAddr + 52);
	gTpyfac.s[1] = IO_READ32(flh_sAddr + 56);
	gTpyfac.s[2] = IO_READ32(flh_sAddr + 60);
	gTpyfac.s[3] = IO_READ32(flh_sAddr + 64);

	gTpyoff.s[0] = IO_READ32(flh_sAddr + 68);
	gTpyoff.s[1] = IO_READ32(flh_sAddr + 72);
	gTpyoff.s[2] = IO_READ32(flh_sAddr + 76);
	gTpyoff.s[3] = IO_READ32(flh_sAddr + 80);

	if (IO_READ32(flh_sAddr) == 0x5a)
	{
		gTpxfac.s[0] = IO_READ32(flh_sAddr + 20);
		gTpxfac.s[1] = IO_READ32(flh_sAddr + 24);
		gTpxfac.s[2] = IO_READ32(flh_sAddr + 28);
		gTpxfac.s[3] = IO_READ32(flh_sAddr + 32);

		gTpxoff.s[0] = IO_READ32(flh_sAddr + 36);
		gTpxoff.s[1] = IO_READ32(flh_sAddr + 40);
		gTpxoff.s[2] = IO_READ32(flh_sAddr + 44);
		gTpxoff.s[3] = IO_READ32(flh_sAddr + 48);

		gTpyfac.s[0] = IO_READ32(flh_sAddr + 52);
		gTpyfac.s[1] = IO_READ32(flh_sAddr + 56);
		gTpyfac.s[2] = IO_READ32(flh_sAddr + 60);
		gTpyfac.s[3] = IO_READ32(flh_sAddr + 64);

		gTpyoff.s[0] = IO_READ32(flh_sAddr + 68);
		gTpyoff.s[1] = IO_READ32(flh_sAddr + 72);
		gTpyoff.s[2] = IO_READ32(flh_sAddr + 76);
		gTpyoff.s[3] = IO_READ32(flh_sAddr + 80);

		gTpInfo.xfac = gTpxfac.xfac;
		gTpInfo.xoff = gTpxoff.xoff;
		gTpInfo.yfac = gTpyfac.yfac;
		gTpInfo.yoff = gTpyoff.yoff;

		//For debug
		// printf("%f",gTpInfo.xfac);
		// printf("%f",gTpInfo.xoff);
		// printf("%f",gTpInfo.yfac);
		// printf("%f",gTpInfo.yoff);

		return 1;
	}
	else
		return 0;
}
/******Capacitive touch screen*****/
/****Initialization function of IO port related to capacitive touch screen*******/
unsigned char Config_BUFF[186] =
	{
		0x4B, 0x00, 0x04, 0x58, 0x02, 0x01, 0x0D, 0x00, 0x01, 0x08,
		0x28, 0x05, 0x50, 0x32, 0x03, 0x05, 0x00, 0x00, 0x00, 0x00,
		0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x8C, 0x2E, 0x0E,
		0x17, 0x15, 0x31, 0x0D, 0x00, 0x00, 0x02, 0xBC, 0x03, 0x2D,
		0x00, 0x00, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x00,
		0x00, 0x0F, 0x41, 0x94, 0xC5, 0x02, 0x07, 0x00, 0x00, 0x04,
		0x9B, 0x11, 0x00, 0x77, 0x17, 0x00, 0x5C, 0x1F, 0x00, 0x48,
		0x2A, 0x00, 0x3B, 0x38, 0x00, 0x3B, 0x00, 0x00, 0x00, 0x00,
		0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
		0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
		0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
		0x00, 0x00, 0x02, 0x04, 0x06, 0x08, 0x0A, 0x0C, 0x0E, 0x10,
		0x12, 0x14, 0x16, 0x18, 0x1A, 0x1C, 0x00, 0x00, 0x00, 0x00,
		0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
		0x00, 0x00, 0x00, 0x02, 0x04, 0x06, 0x08, 0x0A, 0x0C, 0x0F,
		0x10, 0x12, 0x13, 0x14, 0x16, 0x18, 0x1C, 0x1D, 0x1E, 0x1F,
		0x20, 0x21, 0x22, 0x24, 0x26, 0x28, 0x29, 0x2A, 0x00, 0x00,
		0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 
		0x00, 0x00, 0x00, 0x00, 0xBB, 0x01};

void CTP_io_Init(void)
{
	uint8_t READ_BUFF[10],CTP_ADDR;
	uint8_t ack, i,k;
	
	unsigned int Product_ID;

	I2C_ConfigGpio(I2C_SDA, GPIO_OUTPUT);
	I2C_ConfigGpio(I2C_SCL, GPIO_OUTPUT);
	SPI_ConfigGpio(SPI3, SPI_SS, GPIO_OUTPUT);
	EPORT_ConfigGpio(EPORT_PIN4, GPIO_OUTPUT);

	INT_Low;	// INT = 0,For GT911 Addr = 0xBB
	RST_Low;	// RESET = 0;
	DelayMS(2);
	INT_High;	// INT  = 1;
	DelayMS(2);
	RST_High;
	DelayMS(10);
	INT_Low;
	DelayMS(60);
	EPORT_ConfigGpio(EPORT_PIN4, GPIO_INPUT);
	DelayMS(20);
	EPORT_Init(EPORT_PIN4, RISING_EDGE_INT);
	//CT_Write_Nbyte(0x28,0x8047,186,Config_BUFF);
	for (i = 0; i < 128; i++)
	{
		I2C_start();
		ack = I2C_write_byte(i << 1);
		I2C_stop();
		if (!ack)
		{
			// printf("addr==0x%x, ack==ok  \r\n",i<<1);
			CTP_ADDR = (i << 1);
			if (CTP_ADDR == 0x28)
			{
				
				//CT_Write_Nbyte(0x28,0x8047,186,Config_BUFF);
				gt911flag = 1;
				I2C_start();
				I2C_write_byte(0x28);
				I2C_write_byte(0x81);
				I2C_write_byte(0x46);
				I2C_stop();
				I2C_start();
				I2C_write_byte(0x29);
				for (k = 0; k < 4;k++)
				{
					READ_BUFF[k] = I2C_read_byte(0);
				}
				READ_BUFF[k] = I2C_read_byte(1);
				X_Output_Max = (READ_BUFF[1] << 8 | READ_BUFF[0]);
				Y_Output_Max = (READ_BUFF[3] << 8 | READ_BUFF[2]);
				
			}
			else if (CTP_ADDR == 0x70)
				ft5216flag = 1;
			break;
		}
		DelayUS(1);
	}
}
/*************Configure SDA pin as output********************/
void SDA_OUTPUT(void)
{
	I2C_ConfigGpio(I2C_SDA, GPIO_OUTPUT);
}
/**************Configure SDA pin as input*****************/
void SDA_INPUT(void)
{
	I2C_ConfigGpio(I2C_SDA, GPIO_INPUT);
}

void CT_DELAY_US(UINT32 val)
{
	#if OSC_Frequency
	for (int i = 0; i < val * 25; i++)
	{
		__NOP;
	}
	#else
	for (int i = 0; i < val * 21; i++)
	{
		__NOP;
	}
	#endif
	
}

/*****************************I2C startup function***************************/
void I2C_start(void)
{
	SDA_OUTPUT();
	SDA_High;
	SCL_High;
	CT_DELAY_US(1);
	SDA_Low;
	CT_DELAY_US(1);
	SCL_Low;
	CT_DELAY_US(1);
}

/****CTI2C stop function*****/
void I2C_stop(void)
{
	SDA_OUTPUT();
	SCL_Low;
	SDA_Low;

	CT_DELAY_US(1);
	SCL_High;
	CT_DELAY_US(1);
	SDA_High;
	CT_DELAY_US(1);
}

/*****CTI2C writes the 1byte function, S is the content to be written*************/
uint8_t I2C_write_byte(const uint8_t s)
{
	uint8_t j, ch_data, i = 0;

	SDA_OUTPUT();
	ch_data = s;
	SCL_Low;
	for (i = 0; i < 8; i++)
	{
		if (ch_data & 0x80)
			SDA_High;
		else
			SDA_Low;
		CT_DELAY_US(1);
		SCL_High;
		CT_DELAY_US(1);
		SCL_Low;
		ch_data = ch_data << 1;
	}
	
	SDA_INPUT();	// Read ACK
	CT_DELAY_US(1);
	SCL_High;	

	j = 0;
	while (GetSDABit == 1)
	{
		CT_DELAY_US(1);
		j++;
		if (j > 10)
			break;
	}
	if (GetSDABit == 0)
	{
		SCL_Low;
		return 0;
	}
	else
	{
		SCL_Low;
		return 1;
	}
}

/*CTI2C reads the 1byte function, and the return value is the read data*/
uint8_t I2C_read_byte(uint8_t ack)
{
	uint8_t ch_data, iii = 0;

	SDA_INPUT();
	ch_data = 0x00;
	for (iii = 0; iii < 8; iii++)
	{
		ch_data = ch_data << 1;
		SCL_Low;
		SDA_High;
		CT_DELAY_US(1);
		SCL_High;
		CT_DELAY_US(1);
		if (GetSDABit == 1)
			ch_data = ch_data | 0x01;
	}
	SCL_Low;
	SDA_OUTPUT();
	SCL_Low;
	if (!ack)
	{
		SDA_Low;
		CT_DELAY_US(1);
		SCL_High;
		CT_DELAY_US(1);
		SCL_Low;
	}
	else
	{
		SDA_High;
		CT_DELAY_US(1);
		SCL_High;
		CT_DELAY_US(1);
		SCL_Low;
	}

	return ch_data;
}