bool SetLocDate(char* line) {
char* pch;
char* last;
int inx = 0;
QlSysTimer ql;
pch = strtok_r(line, "T", &last);
pch = strtok(pch, "-");
while (pch != NULL)
{
if (inx == 0)
ql.year = Ql_atoi(pch);
if (inx == 1)
ql.month = Ql_atoi(pch);
if (inx == 2)
ql.day = Ql_atoi(pch);
pch = strtok(NULL, "-");
inx++;
}
inx = 0;
pch = strtok(last, ":");
while (pch != NULL)
{
if (inx == 0)
ql.hour = Ql_atoi(pch);
if (inx == 1)
ql.minute = Ql_atoi(pch);
if (inx == 2)
ql.second = Ql_atoi(pch);
pch = strtok(NULL, ":");
inx++;
}
bool ret= Ql_SetLocalTime(&ql);
return ret;
}
void ql_entry(void)
{
s32 ret;
bool keepGoing = TRUE;
bool isContinued = FALSE;
u32 cnt = 0;
Ql_DebugTrace("OpenCPU: Hello TTS !\r\n\r\n"); /* Print out messages through DEBUG port */
Ql_SetDebugMode(BASIC_MODE); /* Only after the device reboots,
* the set debug-mode takes effect.
*/
// Initialize TTS, and register callback function
Ql_TTS_Initialize(&Callback_TTS_Play);
while(keepGoing)
{
Ql_GetEvent(&g_event);
switch(g_event.eventType)
{
case EVENT_UARTDATA:
{
// TODO: receive and handle data from UART
ascii* pChar;
s16 strLen;
PortData_Event* pDataEvt = (PortData_Event*)&g_event.eventData.uartdata_evt;
/* Change audio path (Command: audio path=0/1/2)
* 0 = the main audio path
* 1 = earphone audio path
* 2 = loudspeaker audio path
*/
Ql_memset(g_buffer, 0x0, sizeof(g_buffer));
strLen = Ql_sprintf(g_buffer, "audio path=");
pChar = Ql_strstr((char*)pDataEvt->data, g_buffer);
if (pChar)
{
u8 audPath;
char* p1;
char* p2;
Ql_DebugTrace((char*)pDataEvt->data);
p1 = Ql_strstr((char*)pDataEvt->data, "=");
p2 = Ql_strstr((char*)pDataEvt->data, "\r\n");
Ql_memset(g_buffer, 0x0, sizeof(g_buffer));
memcpy(g_buffer, p1 + 1, p2 - p1 -1);
if (Ql_strcmp(g_buffer, "1") == 0)
{
audPath = QL_AUDIO_PATH_HEADSET;
}
else if (Ql_strcmp(g_buffer, "2") == 0)
{
audPath = QL_AUDIO_PATH_LOUDSPEAKER;
}
else
{
audPath = QL_AUDIO_PATH_NORMAL;
}
if (!Ql_VoiceCallChangePath(audPath))
{
Ql_DebugTrace("Fail to change audio path.\r\n");
}
else
{
Ql_DebugTrace("Change audio path to %d.\r\n", audPath);
}
break;
}
// Start tts speech (Command: start tts=...)
strLen = Ql_sprintf(g_buffer, "start tts=");
ret = Ql_strncmp((char*)pDataEvt->data, g_buffer, strLen);
if (0 == ret)
{
char* pCh = NULL;
pCh = Ql_strstr((char*)pDataEvt->data, "=");
if (pCh != NULL)
{
Ql_memset(g_buffer, 0x0, sizeof(g_buffer));
Ql_strncpy(g_buffer, pCh + 1, pDataEvt->len - (pCh - (char*)pDataEvt->data + 1) - 2);
Ql_DebugTrace("Ql_TTS_Play(), len=%d\r\n", Ql_strlen(g_buffer));
ret = Ql_TTS_Play((u8*)g_buffer, sizeof(g_buffer));
if (ret < 0)
{
Ql_DebugTrace("Fail to play TTS.\r\n");
break;
}
else
{
Ql_DebugTrace("Playing finished.\r\n");
}
}
break;
}
// Stop TTS (Command: stop tts)
Ql_memset(g_buffer, 0x0, Ql_strlen(g_buffer));
strLen = Ql_sprintf(g_buffer, "stop tts\r\n");
ret = Ql_strncmp((char*)pDataEvt->data, g_buffer, strLen);
if (0 == ret)
{
Ql_DebugTrace(g_buffer);
Ql_TTS_Stop();
break;
}
// Query TTS' status (Command: tts?)
Ql_memset(g_buffer, 0x0, Ql_strlen(g_buffer));
strLen = Ql_sprintf(g_buffer, "tts?\r\n");
ret = Ql_strncmp((char*)pDataEvt->data, g_buffer, strLen);
if (0 == ret)
{
Ql_DebugTrace(g_buffer);
ret = Ql_TTS_Query();
switch (ret)
{
case TTS_STATUS_IDLE:
Ql_DebugTrace("TTS: idle\r\n");
break;
case TTS_STATUS_PLAYING:
Ql_DebugTrace("TTS: playing\r\n");
break;
default:
Ql_DebugTrace("Fail to query TTS' status. Error code: %d\r\n", ret);
break;
}
break;
}
// Set volume (Command: tts vol=0..100)
Ql_memset(g_buffer, 0x0, sizeof(g_buffer));
strLen = Ql_sprintf(g_buffer, "tts vol=");
pChar = Ql_strstr((char*)pDataEvt->data, g_buffer);
if (pChar)
{
u8 ttsVol;
char* p1;
char* p2;
Ql_DebugTrace((char*)pDataEvt->data);
p1 = Ql_strstr((char*)pDataEvt->data, "=");
p2 = Ql_strstr((char*)pDataEvt->data, "\r\n");
Ql_memset(g_buffer, 0x0, sizeof(g_buffer));
memcpy(g_buffer, p1 + 1, p2 - p1 -1);
ttsVol = Ql_atoi(g_buffer);
ttsVol = (ttsVol > 100) ? 100 : ttsVol;
Ql_SetVolume_Ex(VOL_TYPE_MEDIA, QL_AUDIO_PATH_HEADSET, ttsVol);
break;
}
// Set TTS Style
// Set TTS fastest voice speed
Ql_memset(g_buffer, 0x0, sizeof(g_buffer));
strLen = Ql_sprintf(g_buffer, "tts Style1=");
pChar = Ql_strstr((char*)pDataEvt->data, g_buffer);
if (pChar)
{
u32 ret;
ret = Ql_TTS_SetStyle(TTS_PARAM_VOICE_SPEED,TTS_SPEED_MAX);
Ql_DebugTrace("Set TTS fastest voice speed.\r\n");
break;
}
// Set TTS minimized volume.
Ql_memset(g_buffer, 0x0, sizeof(g_buffer));
strLen = Ql_sprintf(g_buffer, "tts Style2=");
pChar = Ql_strstr((char*)pDataEvt->data, g_buffer);
if (pChar)
{
u32 ret;
ret = Ql_TTS_SetStyle(TTS_PARAM_VOLUME,TTS_VOLUME_MIN);
Ql_DebugTrace("Set TTS minimized volume.\r\n");
break;
}
// Set TTS voice effect --eccentric
Ql_memset(g_buffer, 0x0, sizeof(g_buffer));
strLen = Ql_sprintf(g_buffer, "tts Style3=");
pChar = Ql_strstr((char*)pDataEvt->data, g_buffer);
if (pChar)
{
u32 ret;
ret = Ql_TTS_SetStyle(TTS_PARAM_VEMODE,TTS_VEMODE_ECCENTRIC);
Ql_DebugTrace("Set TTS voice effect --eccentric.\r\n");
break;
}
}
/*************************************
* 'Case' another EVENT if needed.
*
**************************************/
default:
break;
}
}
}
void setCommand(char* command){
char* cmd = NULL;
char idx=0;
char* pch=NULL;
cmd = Ql_strstr(command, "DEBUG=");
if (cmd){
cmd += 6;
if (Ql_strstr(cmd, "TRUE")){
__debug=TRUE;
}
else{
__debug=FALSE;
}
Ql_strcpy(&__settings.Debug[0],cmd);
}
cmd = Ql_strstr(command, "LOG=");
if (cmd){
cmd += 4;
if (Ql_strstr(cmd, "TRUE")){
__log=TRUE;
}
else{
__log=FALSE;
}
Ql_strcpy(&__settings.Log[0],cmd);
}
cmd = Ql_strstr(command, "TCP=");
if (cmd){
cmd += 4;
__settings.TCP=Ql_atoi(cmd);
}
cmd = Ql_strstr(command, "IP=");
if (cmd){
cmd += 3;
pch = strtok(cmd, ".");
while (pch != NULL)
{
__settings.IP[idx] = Ql_atoi(pch);
pch = strtok(NULL, ".");
idx++;
}
//OUTD("Set IP:%d.%d.%d.%d\r\n",__settings.IP[0],__settings.IP[1],__settings.IP[2],__settings.IP[3]);
}
cmd = Ql_strstr(command, "APN=");
if (cmd){
cmd += 4;
Ql_strcpy(&__settings.APN[0],cmd);
}
cmd = Ql_strstr(command, "PASS="******"NUM=");
if (cmd){
cmd += 4;
__settings.Num=Ql_atoi(cmd);
}
/*cmd = Ql_strstr(command, "PWD=");
if (cmd){
cmd += 4;
Ql_strcpy(&__settings.Pwd[0],cmd);
}*/
cmd = Ql_strstr(command, "USER="******"TIME=");
if (cmd){
char* last;
QlSysTimer tm;
Ql_GetLocalTime(&tm);
cmd+=5;
if (Ql_strlen(cmd)==8) {
tm.hour = Ql_atoi(strtok_r(cmd, ":",&last));
tm.minute = Ql_atoi(strtok_r(last, ":",&last));
tm.second = Ql_atoi(strtok_r(last, ":",&last));
Ql_SetLocalTime(&tm);
}
}
cmd = Ql_strstr(command, "DATE=");
if (cmd){
char* last;
QlSysTimer tm;
Ql_GetLocalTime(&tm);
cmd+=5;
if (Ql_strlen(cmd)==8) {
tm.day = Ql_atoi(strtok_r(cmd, ".",&last));
tm.month = Ql_atoi(strtok_r(last, ".",&last));
tm.year = Ql_atoi(strtok_r(last, ".",&last));
Ql_SetLocalTime(&tm);
}
}
cmd = Ql_strstr(command, "REBOOT");
if (cmd){
OUTD("!-----Get command to reboot..-----",NULL);
Ql_Sleep(100);
Ql_Reset(0);
}
cmd = Ql_strstr(command, "TSEND=");
if (cmd){
s32 tsend;
cmd+=6;
tsend=Ql_atoi(cmd);
if (tsend>10 && tsend<60) {
__settings.TSend = tsend;
}
}
cmd = Ql_strstr(command, "DEBOUNCE=");
if (cmd){
s32 deboung;
cmd+=9;
deboung=Ql_atoi(cmd);
//OUTD("set debounce ok:%d",deboung);
if (deboung>=100 && deboung<=1000) {
//OUTD("set debounce ok:%d",deboung);
__settings.Deboung = deboung;
}
}
cmd = Ql_strstr(command, "WUser="******"WPass="******"?");
if (cmd){
PrintSettings();
}
}
static void proc_handle(char *pData,s32 len)
{
char *p = NULL;
s32 iret;
u8 srvport[10];
//command: Set_APN_Param=<APN>,<username>,<password>
p = Ql_strstr(pData,"Set_APN_Param=");
if (p)
{
Ql_memset(m_apn, 0, 10);
if (Analyse_Command(pData, 1, '>', m_apn))
{
APP_DEBUG("<--APN Parameter Error.-->\r\n");
return;
}
Ql_memset(m_userid, 0, 10);
if (Analyse_Command(pData, 2, '>', m_userid))
{
APP_DEBUG("<--APN Username Parameter Error.-->\r\n");
return;
}
Ql_memset(m_passwd, 0, 10);
if (Analyse_Command(pData, 3, '>', m_passwd))
{
APP_DEBUG("<--APN Password Parameter Error.-->\r\n");
return;
}
APP_DEBUG("<--Set APN Parameter Successfully<%s>,<%s>,<%s>.-->\r\n",m_apn,m_userid,m_passwd);
return;
}
//command: Set_Srv_Param=<srv ip>,<srv port>
p = Ql_strstr(pData,"Set_Srv_Param=");
if (p)
{
Ql_memset(m_SrvADDR, 0, SRVADDR_BUFFER_LEN);
if (Analyse_Command(pData, 1, '>', m_SrvADDR))
{
APP_DEBUG("<--Server Address Parameter Error.-->\r\n");
return;
}
Ql_memset(srvport, 0, 10);
if (Analyse_Command(pData, 2, '>', srvport))
{
APP_DEBUG("<--Server Port Parameter Error.-->\r\n");
return;
}
m_SrvPort = Ql_atoi(srvport);
APP_DEBUG("<--Set TCP Server Parameter Successfully<%s>,<%d>.-->\r\n",m_SrvADDR,m_SrvPort);
m_tcp_state = STATE_NW_GET_SIMSTATE;
APP_DEBUG("<--Restart the TCP connection process.-->\r\n");
return;
}
//if not command,send it to server
m_pCurrentPos = m_send_buf;
Ql_strcpy(m_pCurrentPos + m_remain_len, pData);
m_remain_len = Ql_strlen(m_pCurrentPos);
}
void ql_entry()
{
bool keepGoing = TRUE;
QlEventBuffer flSignalBuffer;
char *p=NULL;
char *p1=NULL;
char *pData= NULL;
Ql_memset(data_p, '*', DATA_LEN);
data_p[0] = 'B';
data_p[1] = 'e';
data_p[2] = 'g';
data_p[3] = 'i';
data_p[4] = 'n';
data_p[DATA_LEN-3] = 'E';
data_p[DATA_LEN-2] = 'n';
data_p[DATA_LEN-1] = 'D';
Ql_SetDebugMode(BASIC_MODE);
Ql_DebugTrace("tcpip: ql_entry\r\n");
Ql_GprsNetworkInitialize(0, 0, &callback_func);
Ql_GprsNetworkInitialize(1, 1, &callback_func);
while(keepGoing)
{
Ql_GetEvent(&flSignalBuffer);
switch(flSignalBuffer.eventType)
{
case EVENT_UARTDATA:
{
pData = (char*)flSignalBuffer.eventData.uartdata_evt.data;
pData[flSignalBuffer.eventData.uartdata_evt.len+1] = '\0';
/*APNSet=0-1*/
p = Ql_strstr(pData,"APNSet=");
if (p)
{
s32 ret;
p = Ql_strstr(pData,"=");
p += 1;
ret = Ql_GprsAPNSet(Ql_atoi(p), (u8*)"CMNET", (u8*)"", (u8*)"", CallBack_GprsAPNSet);
OUT_DEBUG(textBuf,"Ql_GprsAPNSet(%d)=%d\r\n",Ql_atoi(p),ret);
break;
}
/*APNGet=0-1*/
p = Ql_strstr(pData,"APNGet=");
if (p)
{
s32 ret;
p = Ql_strstr(pData,"=");
p += 1;
ret = Ql_GprsAPNGet(Ql_atoi(p), CallBack_GprsAPNGet);
OUT_DEBUG(textBuf,"Ql_GprsAPNGet(%d)=%d\r\n",Ql_atoi(p),ret);
break;
}
/*NetworkActive=0-1*/
p = Ql_strstr(pData,"NetworkActive=");
if (p)
{
s32 ret;
p = Ql_strstr(pData,"=");
p += 1;
ret = Ql_GprsNetworkActive(Ql_atoi(p));
OUT_DEBUG(textBuf,"Ql_GprsNetworkActive(contxtid=%d)=%d\r\n",Ql_atoi(p),ret);
break;
}
/*NetworkDeactive=0-1*/
p = Ql_strstr(pData,"NetworkDeactive=");
if (p)
{
s32 ret;
p = Ql_strstr(pData,"=");
p += 1;
//you must close socket
if(socketonly[Ql_atoi(p)] >= 0)
{
Ql_SocketClose(socketonly[Ql_atoi(p)]);
socketonly[Ql_atoi(p)] = 0xFF;
send_dataLen[Ql_atoi(p)] = 0;
}
if(udponly[Ql_atoi(p)] >= 0)
{
Ql_SocketClose(udponly[Ql_atoi(p)]);
udponly[Ql_atoi(p)] = 0xFF;
send_dataLen[Ql_atoi(p)] = 0;
}
ret = Ql_GprsNetworkDeactive(Ql_atoi(p));
OUT_DEBUG(textBuf,"Ql_GprsNetworkDeactive(contxtid=%d)=%d\r\n",Ql_atoi(p),ret);
break;
}
/*NetworkGetState=0-1*/
p = Ql_strstr(pData,"NetworkGetState=");
if (p)
{
s32 ret;
OpenCpuNetWorkState_e networkstate;
u8 ps_status;
p = Ql_strstr(pData,"=");
p += 1;
ret = Ql_GprsNetworkGetState(Ql_atoi(p), &networkstate, &ps_status);
OUT_DEBUG(textBuf,"Ql_GprsNetworkGetState(contxtid=%d,networkstate=%d,ps_status=%d)=%d\r\n",Ql_atoi(p),networkstate,ps_status,ret);
break;
}
/*GetHostIpbyName=0-1,www.quectel.com*/
p = Ql_strstr(pData,"GetHostIpbyName=");
if (p)
{
s32 ret;
OpenCpuNetWorkState_e networkstate;
u8 addr[4*5];
u8 addr_len = 0;
u8 out_entry_num;
u8 ps_status;
p = Ql_strstr(pData,"=");
p += 1;
p1 = Ql_strstr(pData,",");
*p1 = '\0';
p1 += 1;
ret = Ql_GetHostIpbyName(Ql_atoi(p), (u8*)p1, addr, &addr_len, 5, &out_entry_num, CallBack_getipbyname);
OUT_DEBUG(textBuf,"Ql_GetHostIpbyName(contxtid=%d,\"%s\")=%d\r\n",Ql_atoi(p),p1,ret);
if(ret == 0)
{
OUT_DEBUG(textBuf,"addr_len=%d,ip=%d.%d.%d.%d,out_entry_num=%d\r\n",addr_len, addr[0],addr[1],addr[2],addr[3],out_entry_num);
}
else if(ret == -2)
{
OUT_DEBUG(textBuf,"please wait CallBack_getipbyname\r\n");
}
else
{
OUT_DEBUG(textBuf,"Ql_GetHostIpbyName run error\r\n");
}
break;
}
/*socketcreate=0-1*/
p = Ql_strstr(pData,"socketcreate="); // tcp socket
if (p)
{
s32 ret;
OpenCpuNetWorkState_e networkstate;
u8 ps_status;
p = Ql_strstr(pData,"=");
p += 1;
ret = Ql_SocketCreate(Ql_atoi(p), 0);
OUT_DEBUG(textBuf,"Ql_SocketCreate(contxtid=%d)=%d\r\n",Ql_atoi(p),ret);
if(ret < 0)
{
OUT_DEBUG(textBuf,"failed to create socket\r\n");
break;
}
socketonly[Ql_atoi(p)] = ret;
ret = Ql_SocketConnect(ret, address, port);
OUT_DEBUG(textBuf,"Ql_SocketConnect(ip=%d,%d,%d,%d,port=%d)=%d\r\n",address[0],address[1],address[2],address[3],port,ret);
if(ret == 0)
{
OUT_DEBUG(textBuf,"Ql_SocketConnect connect successed\r\n");
}
else if(ret == -2)
{
OUT_DEBUG(textBuf,"please wait CallBack_socket_connect\r\n");
}
else
{
OUT_DEBUG(textBuf,"Ql_SocketConnect run error\r\n");
}
break;
}
/*socketclose=0-1*/
p = Ql_strstr(pData,"socketclose=");
if (p)
{
s32 ret;
p = Ql_strstr(pData,"=");
p += 1;
if(socketonly[Ql_atoi(p)] == 0xFF)
{
OUT_DEBUG(textBuf,"socket already close\r\n");
break;
}
ret = Ql_SocketClose(socketonly[Ql_atoi(p)]);
OUT_DEBUG(textBuf,"Ql_SocketClose(socket=%d)=%d\r\n",socketonly[Ql_atoi(p)],ret);
socketonly[Ql_atoi(p)] = 0xFF;
send_dataLen[Ql_atoi(p)] = 0;
break;
}
/*socketsend=0-1*/
p = Ql_strstr(pData,"socketsend="); //tcp send
if (p)
{
s32 ret;
p = Ql_strstr(pData,"=");
p += 1;
if(socketonly[Ql_atoi(p)] == 0xFF)
{
OUT_DEBUG(textBuf,"socket not create\r\n");
break;
}
if(send_dataLen[Ql_atoi(p)] > 0)
{
OUT_DEBUG(textBuf,"socket now busy, sending\r\n");
break;
}
send_dataLen[Ql_atoi(p)] = 0;
dataLen[Ql_atoi(p)] = DATA_LEN;
do
{
ret = Ql_SocketSend(socketonly[Ql_atoi(p)] , data_p + send_dataLen[Ql_atoi(p)] ,dataLen[Ql_atoi(p)] - send_dataLen[Ql_atoi(p)] );
OUT_DEBUG(textBuf,"Ql_SocketSend(socket=%d,dataLen=%d)=%d\r\n",socketonly[Ql_atoi(p)] ,dataLen[Ql_atoi(p)] ,ret);
if(ret == (dataLen[Ql_atoi(p)] - send_dataLen[Ql_atoi(p)] ))
{
//send compelete
send_dataLen[Ql_atoi(p)] = 0;
break;
}
else if((ret < 0) && (ret == -2))
{
//you must wait CallBack_socket_write, then send data;
break;
}
else if(ret < 0)
{
//error , Ql_SocketClose
Ql_SocketClose(socketonly[Ql_atoi(p)]);
socketonly[Ql_atoi(p)] = 0xFF;
send_dataLen[Ql_atoi(p)] = 0;
break;
}
else if(ret <= dataLen[Ql_atoi(p)] )
{
send_dataLen[Ql_atoi(p)] += ret;
//continue send
}
}while(1);
break;
}
/*socketack=*/
p = Ql_strstr(pData,"socketack="); // tcp ack
if (p)
{
s8 ret;
u64 ackedNum;
p = Ql_strstr(pData,"=");
p += 1;
if(socketonly[Ql_atoi(p)] == 0xFF)
{
OUT_DEBUG(textBuf,"socket not create\r\n");
break;
}
ret = Ql_SocketTcpAckNumber(socketonly[Ql_atoi(p)], &ackedNum);
OUT_DEBUG(textBuf,"Ql_SocketTcpAckNumber(socket=%d,ackedNum=%d)=%d\r\n",socketonly[Ql_atoi(p)],ackedNum,ret);
break;
}
/*udpcreate=0-1*/
p = Ql_strstr(pData,"udpcreate="); //udp socket
if (p)
{
s32 ret;
OpenCpuNetWorkState_e networkstate;
u8 ps_status;
p = Ql_strstr(pData,"=");
p += 1;
ret = Ql_SocketCreate(Ql_atoi(p), 1);
OUT_DEBUG(textBuf,"Ql_SocketCreate(contxtid=%d)=%d\r\n",Ql_atoi(p),ret);
if(ret < 0)
{
OUT_DEBUG(textBuf,"failed to create socket\r\n");
break;
}
udponly[Ql_atoi(p)] = ret;
break;
}
/*udpclose=0-1*/
p = Ql_strstr(pData,"udpclose=");
if (p)
{
s32 ret;
p = Ql_strstr(pData,"=");
p += 1;
if(udponly[Ql_atoi(p)] == 0xFF)
{
OUT_DEBUG(textBuf,"socket already close\r\n");
break;
}
ret = Ql_SocketClose(udponly[Ql_atoi(p)]);
OUT_DEBUG(textBuf,"Ql_SocketClose(socket=%d)=%d\r\n",udponly[Ql_atoi(p)],ret);
udponly[Ql_atoi(p)] = 0xFF;
send_dataLen[Ql_atoi(p)] = 0;
break;
}
/*SendHeartBeat*/
p = Ql_strstr(pData,"SendHeartBeat");
if (p)
{
s32 ret;
ret = Ql_SwitchHeartBeat(1, 70, 15);
OUT_DEBUG(textBuf,"!!!!SET heart Beat =%d!!!!\r\n",ret);
break;
}
/*udpsend=0-1*/
p = Ql_strstr(pData,"udpsend=");
if (p)
{
s32 ret;
p = Ql_strstr(pData,"=");
p += 1;
if(udponly[Ql_atoi(p)] == 0xFF)
{
OUT_DEBUG(textBuf,"socket not create\r\n");
break;
}
if(send_dataLen[Ql_atoi(p)] > 0)
{
OUT_DEBUG(textBuf,"socket now busy, sending\r\n");
break;
}
send_dataLen[Ql_atoi(p)] = 0;
dataLen[Ql_atoi(p)] = DATA_LEN;
ret = Ql_SocketSendTo(udponly[Ql_atoi(p)], data_p, DATA_LEN, address, port);
OUT_DEBUG(textBuf,"Ql_SocketSendTo(socket=%d,dataLen=%d)=%d\r\n",udponly[Ql_atoi(p)] ,DATA_LEN ,ret);
if(ret == DATA_LEN)
{
//send success
}
else if(ret < 0)
{
//error , Ql_SocketClose
Ql_SocketClose(udponly[Ql_atoi(p)]);
udponly[Ql_atoi(p)] = 0xFF;
send_dataLen[Ql_atoi(p)] = 0;
OUT_DEBUG(textBuf,"Ql_SocketSendTo send error\r\n");
}
else
{
//error , Ql_SocketClose
Ql_SocketClose(udponly[Ql_atoi(p)]);
udponly[Ql_atoi(p)] = 0xFF;
send_dataLen[Ql_atoi(p)] = 0;
OUT_DEBUG(textBuf,"Ql_SocketSendTo send error\r\n");
}
break;
}
break;
}
default:
break;
}
}
Ql_GprsNetworkUnInitialize(0);
Ql_GprsNetworkUnInitialize(1);
}
static void CallBack_UART_Hdlr(Enum_SerialPort port, Enum_UARTEventType msg, bool level, void* customizedPara)
{
u32 rdLen=0;
s32 ret;
char *p=NULL;
char *p1=NULL;
char *p2=NULL;
u8 write_buffer[4]={'a','b','c','D'};
u8 read_buffer[6]={0x00,0x00,0x00,0x00,0x00,0x00};
u8 registerAdrr[2]={0x01,0x45};
switch (msg)
{
case EVENT_UART_READY_TO_READ:
{
Ql_memset(m_Read_Buffer, 0x0, sizeof(m_Read_Buffer));
rdLen = Ql_UART_Read(port, m_Read_Buffer, sizeof(m_Read_Buffer));
//command-->Init the IIC , type 0 Лђеп 1.
p = Ql_strstr(m_Read_Buffer,"Ql_IIC_Init=");
if(p)
{
char* p1 = NULL;
char* p2 = NULL;
u8 NumberBuf[10];
s8 IIC_type=0;
p1 = Ql_strstr(m_Read_Buffer, "=");
p2 = Ql_strstr(m_Read_Buffer, "\r\n");
Ql_memset(NumberBuf, 0x0, sizeof(NumberBuf));
Ql_memcpy(NumberBuf, p1 + 1, p2 - p1 -1);
IIC_type = Ql_atoi(NumberBuf);
if(0 == IIC_type)// simultion iic test, and we choose PINNAME_GPIO4, PINNAME_GPIO5 for IIC SCL and SDA pins
{
ret = Ql_IIC_Init(0,PINNAME_CTS,PINNAME_RTS,0);
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed!! Ql_IIC_Init channel 0 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--pins(%d & %d) Ql_IIC_Init channel 0 ret=%d-->\r\n",PINNAME_CTS,PINNAME_RTS,ret);
break;
}
else if(1 == IIC_type)// IIC controller
{
ret = Ql_IIC_Init(1,PINNAME_RI,PINNAME_DCD,1);
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed!! IIC controller Ql_IIC_Init channel 1 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--pins(SCL=%d,SDA=%d) IIC controller Ql_IIC_Init channel 1 ret=%d-->\r\n",PINNAME_RI,PINNAME_DCD,ret);
break;
}
else
{
APP_DEBUG("\r\n<--IIC type error!!!!-->\r\n");
break;
}
}
//command-->IIC config, IIC controller interface
Ql_memset(m_buffer, 0x0, sizeof(m_buffer));
Ql_sprintf(m_buffer, "Ql_IIC_Config=0\r\n");// simultion IIC (channel 0)
ret = Ql_strncmp(m_Read_Buffer, m_buffer, Ql_strlen(m_buffer));
if(0 == ret)
{
ret = Ql_IIC_Config(0,TRUE, 0x07, 0);// simultion IIC interface ,do not care the IicSpeed.
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed !!Ql_IIC_Config channel 0 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--Ql_IIC_Config channel 0 ret=%d-->\r\n",ret);
break;
}
//command-->IIC config, IIC controller interface
Ql_memset(m_buffer, 0x0, sizeof(m_buffer));
Ql_sprintf(m_buffer, "Ql_IIC_Config=1\r\n");// IIC controller (channel 1)
ret = Ql_strncmp(m_Read_Buffer, m_buffer, Ql_strlen(m_buffer));
if(0 == ret)
{
ret = Ql_IIC_Config(1,TRUE, 0x07, 300);// just for the IIC controller
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed !! IIC controller Ql_IIC_Config channel 1 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--IIC controller Ql_IIC_Config channel 1 ret=%d-->\r\n",ret);
break;
}
//command-->IIC write
Ql_memset(m_buffer, 0x0, sizeof(m_buffer));
Ql_sprintf(m_buffer, "Ql_IIC_Write=0\r\n");// channel 0
ret = Ql_strncmp(m_Read_Buffer, m_buffer, Ql_strlen(m_buffer));
if(0 == ret)
{
ret = Ql_IIC_Write(0, 0x07, write_buffer, 4);
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed !! Ql_IIC_Write channel 0 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--channel 0 Ql_IIC_Write ret=%d-->\r\n",ret);
break;
}
Ql_memset(m_buffer, 0x0, sizeof(m_buffer));
Ql_sprintf(m_buffer, "Ql_IIC_Write=1\r\n");// channel 1
ret = Ql_strncmp(m_Read_Buffer, m_buffer, Ql_strlen(m_buffer));
if(0 == ret)
{
ret = Ql_IIC_Write(1, 0x07, write_buffer,4);
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed !! IIC controller Ql_IIC_Write channel 1 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--IIC controller Ql_IIC_Write ret=%d-->\r\n",ret);
break;
}
//command-->IIC read
Ql_memset(m_buffer, 0x0, sizeof(m_buffer));
Ql_sprintf(m_buffer, "Ql_IIC_Read=0\r\n");// channel 0
ret = Ql_strncmp(m_Read_Buffer, m_buffer, Ql_strlen(m_buffer));
if(0 == ret)
{
ret = Ql_IIC_Read(0, 0x07, read_buffer, 6);
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed !! Ql_IIC_Read channel 0 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--channel 0 Ql_IIC_Read ret=%d-->\r\n",ret);
break;
}
Ql_memset(m_buffer, 0x0, sizeof(m_buffer));
Ql_sprintf(m_buffer, "Ql_IIC_Read=1\r\n");// channel 1
ret = Ql_strncmp(m_Read_Buffer, m_buffer, Ql_strlen(m_buffer));
if(0 == ret)
{
ret = Ql_IIC_Read(1, 0x07, write_buffer, 6);
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed !! IIC controller Ql_IIC_Read channel 1 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--IIC controller Ql_IIC_Read ret=%d-->\r\n",ret);
break;
}
//command-->IIC write then read
Ql_memset(m_buffer, 0x0, sizeof(m_buffer));
Ql_sprintf(m_buffer, "Ql_IIC_Write_Read=0\r\n");// channel 0
ret = Ql_strncmp(m_Read_Buffer, m_buffer, Ql_strlen(m_buffer));
if(0 == ret)
{
ret = Ql_IIC_Write_Read(0, 0x07, registerAdrr, 2,read_buffer, 6);
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed !! Ql_IIC_Write_Read channel 0 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--channel 0 Ql_IIC_Write_Read ret=%d-->\r\n",ret);
break;
}
Ql_memset(m_buffer, 0x0, sizeof(m_buffer));
Ql_sprintf(m_buffer, "Ql_IIC_Write_Read=1\r\n");// channel 1
ret = Ql_strncmp(m_Read_Buffer, m_buffer, Ql_strlen(m_buffer));
if(0 == ret)
{
ret = Ql_IIC_Write_Read(1, 0x07, registerAdrr, 2,read_buffer, 6);
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed !! IIC controller Ql_IIC_Write_Read channel 1 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--IIC controller Ql_IIC_Write_Read ret=%d-->\r\n",ret);
break;
}
//command-->IIC write then read
Ql_memset(m_buffer, 0x0, sizeof(m_buffer));
Ql_sprintf(m_buffer, "Ql_IIC_Uninit=0\r\n");// channel 0
ret = Ql_strncmp(m_Read_Buffer, m_buffer, Ql_strlen(m_buffer));
if(0 == ret)
{
ret = Ql_IIC_Uninit(0);
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed !! Ql_IIC_Uninit channel 0 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--channel 0 Ql_IIC_Uninit ret=%d-->\r\n",ret);
break;
}
Ql_memset(m_buffer, 0x0, sizeof(m_buffer));
Ql_sprintf(m_buffer, "Ql_IIC_Uninit=1\r\n");// channel 1
ret = Ql_strncmp(m_Read_Buffer, m_buffer, Ql_strlen(m_buffer));
if(0 == ret)
{
ret = Ql_IIC_Uninit(1);
if(ret < 0)
{
APP_DEBUG("\r\n<--Failed !! IIC controller Ql_IIC_Uninit channel 1 fail ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--IIC controller (chnnlNo 1) Ql_IIC_Uninit ret=%d-->\r\n",ret);
break;
}
APP_DEBUG("\r\n<--Not found this command, please check you command-->\r\n");
}
default:
break;
}
}
void ql_entry(void)
{
bool keepGoing = TRUE;
s32 ret;
s32 i;
char notes[50];
OUT_DEBUG(debug_buffer,"sms: ql_entry\r\n");
Ql_SetDebugMode(ADVANCE_MODE);
Ql_OpenModemPort(ql_md_port1);
Ql_SMS_Callback cb_func={CallBack_NewSMS,CallBack_SendSMS,CallBack_DeleteSMS, //public
CallBack_ReadPDUSMS,CallBack_NewFlashPDUSMS,CallBack_PDUStatusReport, //pdu
CallBack_ReadTextSMS,CallBack_NewFlashTextSMS,CallBack_TextStatusReport}; //text
ret=Ql_SMSInitialize(&cb_func);
OUT_DEBUG(debug_buffer,"\r\nQl_SMSInitialize=%d\r\n",ret);
//OUT_DEBUG(debug_buffer,"CallBack_ReadPDUSMS=%X\r\n",CallBack_ReadPDUSMS);
while(keepGoing)
{
Ql_GetEvent(&g_event);
switch(g_event.eventType)
{
case EVENT_MODEMDATA:
{
//TODO: receive and hanle data from CORE through virtual modem port
PortData_Event* pPortEvt = (PortData_Event*)&g_event.eventData.modemdata_evt;
OUT_DEBUG(debug_buffer,"%s", pPortEvt->data);
break;
}
case EVENT_UARTDATA:
{
char* pChar=NULL;
char* pChar2=NULL;
PortData_Event* pDataEvt = (PortData_Event*)&g_event.eventData.uartdata_evt;
//Ql_SetSMSStorage=(0-3)
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_SetSMSStorage=");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u8 storage;
pChar+=17;
storage=Ql_atoi(pChar);
ret=Ql_SetSMSStorage(storage);
OUT_DEBUG(debug_buffer,"\r\nQl_SetSMSStorage(storage=%d)=%d\r\n",storage,ret);
break;
}
//Ql_GetSMSStorageInfo
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_GetSMSStorageInfo");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u8 current_mem,used,total;
ret=Ql_GetSMSStorageInfo(¤t_mem, &used, &total);
OUT_DEBUG(debug_buffer,"\r\nQl_GetSMSStorageInfo(current_mem=%d,used=%d,total=%d)=%d\r\n",
current_mem,used,total,ret);
break;
}
//Ql_SetInfoCentreNum="<sca number>" eg:Ql_SetInfoCentreNum="+8613800551500"
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_SetInfoCentreNum=\"");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
pChar+=21;
pChar2 = Ql_strstr(pChar,"\"");
*pChar2=0;
ret=Ql_SetInfoCentreNum((u8*)pChar);
OUT_DEBUG(debug_buffer,"\r\nQl_SetInfoCentreNum(sca_num=%s)=%d\r\n", pChar,ret);
break;
}
//Ql_GetInfoCentreNum
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_GetInfoCentreNum");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u8 sca_number[40];
u8 type;
ret=Ql_GetInfoCentreNum(sca_number,&type);
OUT_DEBUG(debug_buffer,"\r\nQl_GetInfoCentreNum(sca_number=\"%s\",type=%d)=%d\r\n",
sca_number,type,ret);
break;
}
//Ql_SetNewSMSDirectToTE=(0,1)
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_SetNewSMSDirectToTE=");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u8 op;
pChar+=23;
op=Ql_atoi(pChar);
ret=Ql_SetNewSMSDirectToTE(op);
OUT_DEBUG(debug_buffer,"\r\nQl_SetNewSMSDirectToTE(op=%d)=%d\r\n",op,ret);
break;
}
//Ql_SetSMSFormat=(0,1)
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_SetSMSFormat=");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u8 format;
pChar+=16;
format=Ql_atoi(pChar);
ret=Ql_SetSMSFormat(format);
OUT_DEBUG(debug_buffer,"\r\nQl_SetSMSFormat(format=%d)=%d\r\n",format,ret);
break;
}
//Ql_ReadSMS=(1,300),(0,1)
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_ReadSMS=");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u16 index;
u8 mode;
pChar+=11;
index=Ql_atoi(pChar);
pChar=Ql_strstr(pChar, ",");
pChar++;
mode=Ql_atoi(pChar);
ret=Ql_ReadSMS(index,mode);
OUT_DEBUG(debug_buffer,"\r\nQl_ReadSMS(index=%d,mode=%d)=%d\r\n",index,mode,ret);
break;
}
//Ql_DeleteSMS=(1,300),(0,4)
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_DeleteSMS=");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u16 index;
u8 flag;
pChar+=13;
index=Ql_atoi(pChar);
pChar=Ql_strstr(pChar, ",");
pChar++;
flag=Ql_atoi(pChar);
ret=Ql_DeleteSMS(index,flag);
OUT_DEBUG(debug_buffer,"\r\nQl_DeleteSMS(index=%d,flag=%d)=%d\r\n",index,flag,ret);
break;
}
//Ql_ListSMS=(0,4)
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_ListSMS=");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u8 by_status;
u16 sms_count=0;
QlSMSListNode sms_list[MAX_LIST_NODE_COUNT]; //MAX_LIST_NODE_COUNT should be set large enough
pChar+=11;
by_status=Ql_atoi(pChar);
ret=Ql_ListSMS(sms_list, MAX_LIST_NODE_COUNT, by_status, &sms_count);
OUT_DEBUG(debug_buffer,"\r\nQl_ListSMS(by_status=%d,node_count=%d,sms_count=%d)=%d\r\n",
by_status,MAX_LIST_NODE_COUNT,sms_count,ret);
if(0==ret)
{
for(i=0;i<sms_count;i++)
{
OUT_DEBUG(debug_buffer,"index=%d,status=%d\r\n",sms_list[i].index,sms_list[i].status);
}
}
break;
}
//Ql_GetUnReadSMS=(0,1)
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_GetUnReadSMS=");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u8 mode;
pChar+=16;
mode=Ql_atoi(pChar);
ret=Ql_GetUnReadSMS(mode);
OUT_DEBUG(debug_buffer,"\r\nQl_GetUnReadSMS(mode=%d)=%d\r\n",mode,ret);
break;
}
//Ql_SendPDUSMS
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_SendPDUSMS");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u8 pdu_len;
u8 pdu_string[]={0x00, //Set aside for SCA
0x31, //FO
0xff, //Set aside for MR
/*
0x05, //DA Length
0x81, //DA type
0x01,
0x80,
0xf6, //DA:10086
*/
0x0b, //DA Length
0x81, //DA type
0x31,
0x58,
0x15,
0x64,
0x79,
0xf3, //DA:13855146973
0x00, //PID
0x00, //DCS
0x47, //VP
0x07, //UDH
0xd1,
0x7a,
0x79,
0x4c,
0x2f,
0xb3,
0x01 //UD:Quectel, GSM 7-bit coding
};
pdu_len=sizeof(pdu_string);
ret=Ql_SendPDUSMS(pdu_string,pdu_len);
OUT_DEBUG(debug_buffer,"\r\nQl_SendPDUSMS(pdu_len=%d)=%d\r\n",pdu_len,ret);
if(0==ret)
{
for(i=0;i<pdu_len;i++)
{
OUT_DEBUG(debug_buffer,"%02X",pdu_string[i]);
}
OUT_DEBUG(debug_buffer,"\r\n");
}
break;
}
//Ql_SetTextSMSPara=(0-2),(0,1),(0,1)
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_SetTextSMSPara=");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
u8 chset,isflashsms,status_report;
pChar+=18;
chset=Ql_atoi(pChar);
pChar=Ql_strstr(pChar, ",");
pChar++;
isflashsms=Ql_atoi(pChar);
pChar=Ql_strstr(pChar, ",");
pChar++;
status_report=Ql_atoi(pChar);
ret=Ql_SetTextSMSPara(chset, isflashsms, status_report);
OUT_DEBUG(debug_buffer,
"\r\nQl_SetTextSMSPara(chset=%d,isflashsms=%d,status_report=%d)=%d\r\n",chset,isflashsms,status_report,ret);
break;
}
//Ql_SendTextSMS="<phone number>"
Ql_memset(notes, 0x0, sizeof(notes));
Ql_sprintf(notes, "Ql_SendTextSMS=\"");
pChar = Ql_strstr((char*)pDataEvt->data, notes);
if (NULL != pChar)
{
pChar+=16;
pChar2 = Ql_strstr(pChar,"\"");
*pChar2=0;
ret=Ql_SendTextSMS((u8*)pChar,(u8*)"Welcome to use Quectel module!",
Ql_strlen((u8*)"Welcome to use Quectel module!"));
OUT_DEBUG(debug_buffer, "\r\nQl_SendTextSMS(phone_num=\"%s\")=%d\r\n",pChar,ret);
break;
}
Ql_SendToModem(ql_md_port1, (u8*)pDataEvt->data, pDataEvt->len);
break;
}
default:
break;
}
}
}
static void proc_handle(char *pData,s32 len)
{
char *p = NULL;
char parambuf[100];
//command: Reset=<type>
p = Ql_strstr(pData,"Reset=");
if (p)
{
Ql_memset(parambuf, 0, 100);
if (Analyse_Command(pData, 1, '>', parambuf))
{
APP_DEBUG("<--Parameter Error.-->\r\n");
return;
}
if (Ql_atoi(parambuf) != 0)//must be 0
{
APP_DEBUG("<--Parameter Error.-->\r\n");
return;
}
APP_DEBUG("<--Set Reset Parameter Successfully<%d>.-->\r\n",Ql_atoi(parambuf));
Ql_Sleep(100);
Ql_Reset(Ql_atoi(parambuf));
return;
}
//command: Sleep=<msec>
p = Ql_strstr(pData,"Sleep=");
if (p)
{
s32 ret;
ST_Time time,*tm;
Ql_memset(parambuf, 0, 100);
if (Analyse_Command(pData, 1, '>', parambuf))
{
APP_DEBUG("<--Parameter Error.-->\r\n");
return;
}
APP_DEBUG("<--Set Sleep Parameter Successfully<%d>.-->\r\n",Ql_atoi(parambuf));
APP_DEBUG("<--Start sleeping-->\r\n");
Ql_Sleep(Ql_atoi(parambuf));
APP_DEBUG("<--sleeping over-->\r\n");
return;
}
//command: Read Module UID
p = Ql_strstr(pData,"Read Module UID");
if (p)
{
s32 i, uidLen;
u8 moduleUID[100];
u8 tmpbuf[100];
Ql_memset(moduleUID, 0, sizeof(moduleUID));
Ql_memset(tmpbuf, 0, sizeof(tmpbuf));
uidLen = Ql_GetUID(moduleUID, sizeof(moduleUID));
for (i = 0; i < uidLen; i++)
{
Ql_sprintf(tmpbuf + i*2, "%02X", moduleUID[i]);
}
APP_DEBUG("<--Module UID=0x%s,len=%d-->\r\n", tmpbuf, uidLen);
return;
}
//command: Get Core Version
p = Ql_strstr(pData,"Get Core Version");
if (p)
{
s32 ret;
u8 tmpbuf[100];
Ql_memset(tmpbuf, 0, sizeof(tmpbuf));
ret = Ql_GetCoreVer((u8*)tmpbuf, sizeof(tmpbuf));
if(ret > 0)
{
APP_DEBUG("<--Core Version:%s-->\r\n", tmpbuf);
} else
{
APP_DEBUG("<--Get Core Version Failure.-->\r\n");
}
return;
}
//command: Get SDK Version
p = Ql_strstr(pData,"Get SDK Version");
if (p)
{
s32 ret;
u8 tmpbuf[100];
Ql_memset(tmpbuf, 0, sizeof(tmpbuf));
ret = Ql_GetSDKVer((u8*)tmpbuf, sizeof(tmpbuf));
if(ret > 0)
{
APP_DEBUG("<--SDK Version:%s.-->\r\n", tmpbuf);
} else
{
APP_DEBUG("<--Get SDK Version Failure.-->\r\n");
}
return;
}
//command: Get Ms Since PwrOn
p = Ql_strstr(pData,"Get Ms Since PwrOn");
if (p)
{
u64 totalMS;
totalMS = Ql_GetMsSincePwrOn();
APP_DEBUG("<--Get Ms Since PwrOn:=%lld.-->\r\n", totalMS);
return;
}
//command: Ql_SleepEnable set the module into sleep mod
p= Ql_strstr(pData,"Ql_SleepEnable");
if(p)
{
s32 ret;
APP_DEBUG("<-- Ql_SleepEnable=%d -->\r\n", ret);
ret = Ql_SleepEnable();
return;
}
//
p= Ql_strstr(pData,"Ql_SleepDisable");
if(p)
{
s32 ret;
APP_DEBUG("<-- Ql_SleepDisable=%d -->\r\n", ret);
ret = Ql_SleepDisable();
return;
}
//command:Ql_SecureData_Store=<n> , n=1~13.
p= Ql_strstr(pData,"Ql_SecureData_Store=");
if(p)
{
s32 ret;
u8 index;
Ql_memset(parambuf, 0, 100);
if (Analyse_Command(pData, 1, '>', parambuf))
{
APP_DEBUG("<--Parameter Error.-->\r\n");
return;
}
index = Ql_atoi(parambuf);
if(index <1 || index >13)
{
APP_DEBUG("<--Parameter n Error.-->\r\n");
return;
}
ret = Ql_SecureData_Store(index, (u8*)&test,sizeof(test));
APP_DEBUG("<-- Ql_SecureData_Store(index=%d, value=%d, data size=%d)=%d -->\r\n", index,test.reset.Period,sizeof(Global_SYS_Cfg),ret);
return;
}
//command:Ql_SecureData_Read=<n> , n=1~13.
p= Ql_strstr(pData,"Ql_SecureData_Read=");
if(p)
{
s32 ret;
u8 index;
Ql_memset(parambuf, 0, 100);
if (Analyse_Command(pData, 1, '>', parambuf))
{
APP_DEBUG("<--Parameter Error.-->\r\n");
return;
}
index = Ql_atoi(parambuf);
if(index <1 || index >13)
{
APP_DEBUG("<--Parameter n Error.-->\r\n");
return;
}
ret = Ql_SecureData_Read(index, (u8*)&tempTest,sizeof(Global_SYS_Cfg));
APP_DEBUG("<-- Ql_SecureData_Read =%d \r\n test.version:%s test.data=%s test.reset.timeDelay =%d-->\r\n",ret, tempTest.version,tempTest.data,tempTest.reset.timeDelay);
return;
}
return;
}
bool parse_header(void *clients,HttpHeader *http_header){
char *param;
char *value;
char *last;
char *ph;
char* bon_val = NULL;
char header[1024 * 2];
char*lens=NULL;
QlClient *client=(QlClient*)clients;
char* head = Ql_strstr((char*)client->recvBuffer, "\r\n\r\n");
if (head) {
http_header->set_cookie=FALSE;
http_header->authorization=FALSE;
Ql_memset(http_header->action,0,100);
Ql_memset(http_header->boundary,0,200);
Ql_memset(http_header->cookie,0,200);
Ql_memset(http_header->data,0,10 * 1024);
http_header->length=0;
Ql_strcpy(http_header->cookie, "NONE");
int head_len = (char*)head - ((char*)client->recvBuffer);
int body_len = (int)(client->pRecvCurrentPos) - head_len - 4;
Ql_memcpy(header, client->recvBuffer, head_len);
ph = strtok_r(header, "\r\n", &last);
char* lst;
if (Ql_strstr(ph, "GET")!=NULL)
{
char* act = strtok_r(ph+4, " ", &lst);
if (Ql_strlen(act)>1)
Ql_strcpy(http_header->action, act+1);
else
Ql_strcpy(http_header->action, act);
http_header->method = GET;
OUTD("action:%s",http_header->action);
}
if (Ql_strstr(ph, "POST")!=NULL) {
http_header->method = POST;
char* act = strtok_r(ph+5, " ", &lst);
if (Ql_strlen(act)>1)
Ql_strcpy(http_header->action, act+1);
else
Ql_strcpy(http_header->action, act);
}
while (1)
{
ph = strtok_r(NULL, "\r", &last);
if (ph == NULL) {
return TRUE;
}
param = strtok_r(ph + 1, ":", &value);
if (Ql_strstr(param, "Content-Type")) {
char* bon = Ql_strstr(value, "boundary");
bon_val = bon + 9;
Ql_strcpy(http_header->boundary, bon_val);
}
else if ((lens = Ql_strstr(param, "Cookie"))!=NULL)
{
char* cookie;
if ((cookie=Ql_strstr(value,"__ztp"))!=NULL) {
Ql_strcpy(http_header->cookie, cookie+6);
http_header->authorization=TRUE;
http_header->set_cookie=FALSE;
}
}
else if ((lens = Ql_strstr(param, "Content-Length"))!=NULL) {
char* slen = lens + 16;
int len_head = Ql_atoi(slen);
http_header->length = len_head;
if (len_head == body_len){
OUTD("data full",NULL);
}
else
{
OUTD("not full data.wait:%d have:%d", len_head, body_len);
return FALSE;
}
}
else if ((lens = Ql_strstr(param, "Authorization"))!=NULL) {
/*char* slen = lens + 21;
unsigned char dbuf[50];
Ql_memset(dbuf,0,50);
decode_b64((unsigned char*)slen,dbuf);
OUTD("decode buf:%s",dbuf);
param = strtok_r((char*)dbuf, ":", &value);
if (Ql_strstr(param,"admin") && Ql_strstr(value,"admin")) {
OUTD("Autorization user:%s pswd:%s",param,value);
http_header->authorization=TRUE;
http_header->set_cookie=TRUE;
}*/
}
}
}
else
{
return FALSE;
}
}
