/********************************************************************************** * File Name: Modem.c * Function Describe:device for modem * Relate Module: * Explain: the modem must be using ZTE MC8332 * Writer: ShiLiangWen * Date: 2015.1.20 ***********************************************************************************/ #define THIS_FILE_ID 2 /* Includes ------------------------------------------------------------------*/ #include "includes.h" //os_mbx_declare (PocMsgBox, 5); /* Declare an RTX mailbox */ //_declare_box(PocMpool,sizeof(SUT_MODEM_POC_MSG),5); //SUT_SMS_PARA sutSMSpara; //os_mbx_declare (AtMsgBox, 7); /* Declare an RTX mailbox */ //_declare_box(AtMpool,sizeof(SUT_MODEM_AT_MSG),7); SUT_MODEM_AT_MSG sutAtm,sutAtmPro; unsigned char g_ucModemSentTcpCt;//TCP 发送计数器 unsigned char g_usModeMTime=0x00; unsigned char g_usModeSTime=0x00; unsigned char g_usModeHTime=0x00; unsigned char g_usModeYTime=0x00;//年 unsigned char g_usModemTime=0x00;//月 unsigned char g_usModeDTime=0x00;//日 //MODEM_TYPE MODEM_TYPE; /************************************************************************************ * *************************************************************************************/ void ModemSendAT(char *p) { unsigned short len; len=strlen(p); RunMake(THIS_FILE_ID); #if UART2_TX_USE_DMA==0 Uart2Send(p,len); #else USART2_Send(p,len); #endif } /************************************************************************************ * *************************************************************************************/ void ModemSendData(unsigned char *pData,unsigned short datalen) { #if UART2_TX_USE_DMA==0 Uart2Send(pData,datalen); #else USART2_Send((char *)pData,datalen); #endif } /********************************************************************************** 等待模块启动完成 0:成功 -1:超时 ***********************************************************************************/ int WaitModemIsOpened(void) { int i; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; RunMake(THIS_FILE_ID); for(i=0;i<100;i++){ SlwTrace(INF,"AT",1); ModemSendAT("AT\r\n"); //if(OS_R_TMO!=os_mbx_wait(AtMsgBox,(void **)&pMsg,50)){ if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))){ if('O'==pMsg->MsgData[0] && 'K'==pMsg->MsgData[1]){ return 0; } //free(pMsg); }else os_dly_wait(1); } return -1; } void ModemCtrlInit(void) { GPIO_InitTypeDef GPIO_InitStructure; RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA|RCC_APB2Periph_GPIOB|RCC_APB2Periph_GPIOC, ENABLE); GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz; MODEM_DTR_HIGH; MODEM_RING_HIGH; MODEM_DSR_HIGH; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP; GPIO_InitStructure.GPIO_Pin = MODEM_DTR_PIN; GPIO_Init(MODEM_DTR_PORT, &GPIO_InitStructure); MODEM_DTR_HIGH; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP; GPIO_InitStructure.GPIO_Pin = MODEM_RING_PIN; GPIO_Init(MODEM_RING_PORT, &GPIO_InitStructure); MODEM_RING_HIGH; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP; GPIO_InitStructure.GPIO_Pin = MODEM_DSR_PIN; GPIO_Init(MODEM_DSR_PORT, &GPIO_InitStructure); MODEM_DSR_HIGH; MODEM_DCD_HIGH; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IPU; GPIO_InitStructure.GPIO_Pin = MODEM_DCD_PIN; GPIO_Init(MODEM_DCD_PORT, &GPIO_InitStructure); } /************************************************************************* *ModemWaitAtReady **************************************************************************/ int ModemWaitAtReady(void) { int i; SUT_MODEM_AT_MSG *pMsg; for(i=0;i<20;i++){ if(ModemSendAT2WaitAckMsg("AT\r\n","OK",&pMsg,100)){ //_free_box(AtMpool,pMsg); return 1; } } return 0; } /************************************************************************* ModemWaitOpen 等待模块开机 通过检查模块主动上报: **************************************************************************/ int ModemWaitOpen(int timeout) { //char *pAck; //SUT_MODEM_AT_MSG **pMsg; SUT_MODEM_AT_MSG *Msg; SlwTrace(DEBUG,"ModemWaitOpen",1); while(timeout--){ //if(OS_R_TMO!=os_mbx_wait(AtMsgBox,(void **)&Msg,1)){ if((Msg->MsgLen = MsgQueueAccept(Msg->MsgData,sizeof(Msg->MsgData)))){ SlwTrace(DEBUG,(char *)Msg->MsgData,0); // if(0==ModemStrCmp((char *)Msg->MsgData,pAck)){ // *pMsg=Msg; // return 1; // }else{ // _free_box(AtMpool,Msg); //} }else os_dly_wait(1); } return 1; } //模块的电源以及复位引脚的配置 //这段配置要放要最开始 //目的是一开机时确保模块是没有电源的 //解决原来问题：当开机到模块播报“欢迎.....”时马上关机，看到屏幕灭后马上又开机，此次开机会失败 void ModemPinConfig(void) { GPIO_InitTypeDef GPIO_InitStructure; RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA|RCC_APB2Periph_GPIOB|RCC_APB2Periph_GPIOC, ENABLE); GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP; GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz; GPIO_InitStructure.GPIO_Pin = MODEM_RESET_PIN; GPIO_Init(MODEM_RESET_PORT, &GPIO_InitStructure); GPIO_InitStructure.GPIO_Pin = MODEM_PWRKEY_PIN; GPIO_Init(MODEM_PWRKEY_PORT, &GPIO_InitStructure); MODEM_RESET_HIGH; MODEM_PWRKEY_LOW; } /********************************************************************************** ModemInit 返回：1 初始化成功 0-失败 ***********************************************************************************/ int ModemInit(void) { RunMake(THIS_FILE_ID); MsgQueueSet();//初始化队列 g_ucModemSentTcpCt=0; RunMake(THIS_FILE_ID); MODEM_RESET_HIGH; os_dly_wait(100); MODEM_RESET_LOW; MODEM_PWRKEY_HIGH; os_dly_wait(100); MODEM_PWRKEY_LOW; //等待模块开机并能接受AT命令 if(WaitModemStart())return 0; return 1; //ModemGetIMEI(); } char ModemLCCCheck(void) { int t,i; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; SlwTrace(INF, "check version type",1); for(i=0;i<100;i++) { t=50; ModemSendAT("AT+LSPOCPF?\r\n"); while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if((0==ModemStrCmp((char *)pMsg->MsgData,"ERROR"))){ SlwTrace(INF, "It is not 3 in 1 version quit this check",1); return 0; }else if(0==ModemStrCmp((char *)pMsg->MsgData,"+LSPOCPF:")){//+LSPOCPF:hgs(1) //这个模块支持三合一指令，即为三合一模块版本 if(pMsg->MsgData[13] == '1'){ SlwTrace(INF, "It is hgs version now",1); return 0; }else{ SlwTrace(INF, "Reset to hgs version and reboot",1); ModemSendAT("AT+LSPOCPF=hgs\r\n"); ShowMessageBox("切换海高思版本"); t=0; while(++t<50){ DelayMs(2); IWDG_ReloadCounter(); } return 1; } } }else os_dly_wait(1); } } SlwTrace(INF, "TimeOut",1); return 0; } /********************************************************************************** CSQ2Num ***********************************************************************************/ int CSQ2Num(char *str) { int csq; csq=atoi(str); if(csq<0 || csq>99)return 99; else return csq; } /********************************************************************************** ModemStrCmp ***********************************************************************************/ int ModemStrCmp(char *msg,char *str) { char *p1=str; char *p2=msg; while(*p1!=0){ if(*p1!=*p2)return 1; p1++; p2++; } return 0; } /********************************************************************************** ModemWaitAckMsg Input: pATCmd--AT Command string pAck --期待回的ACK，头相同即可 pMsg --实际消息内容，可能比pAck长 timeout --超时，10ms为单位 Output: if timeout return 0 else return 1 注意，处理完消息要调用_free_box释放消息 ***********************************************************************************/ int ModemSendAT2WaitAckMsg(char *pATCmd,char *pAck,SUT_MODEM_AT_MSG **pMsg,int timeout) { SUT_MODEM_AT_MSG *Msg=&sutAtmPro; ModemSendAT(pATCmd); while(timeout){ //if(OS_R_TMO!=os_mbx_wait(AtMsgBox,(void **)&Msg,1)){ if((Msg->MsgLen = MsgQueueAccept(Msg->MsgData,sizeof(Msg->MsgData)))){ //SlwTrace(DEBUG,(char *)Msg->MsgData); if(0==ModemStrCmp((char *)Msg->MsgData,pAck)){ *pMsg=Msg; return 1; }else{ //_free_box(AtMpool,Msg); } }else { timeout--; os_dly_wait(1); } } return 0; } /******************************************** *0x12 --> "12" --> 0x31 0x32 **********************************************/ void HexToAsc(unsigned char Hex,char *pAsc) { unsigned char h,l; l=Hex & 0x0f; h=Hex >> 4; if((l>=0)&&(l<=9))l += 0x30; else if((l>=10)&&(l<=15))l += ('A'-10); if((h>=0)&&(h<=9))h += 0x30; else if((h>=10)&&(h<=15))h += ('A'-10); pAsc[0]=h; pAsc[1]=l; } void HexToStr(unsigned char *HexStr,char *AscStr,unsigned short len) { int i,j=0; for(i=0;i45)len=45; buf[0]='>';buf[1]='>';buf[2]=0; for(i=0;i0x2f && str[0]<0x3a){ if(str[1]>0x2f && str[1]<0x3a){ if(str[2]>0x2f && str[2]<0x3a){ if(str[3]>0x2f && str[3]<0x3a){ num=1000*(str[0]-0x30); num+=100*(str[1]-0x30); num+=10*(str[2]-0x30); num+=(str[3]-0x30); }else{ num=100*(str[0]-0x30); num+=10*(str[1]-0x30); num+=(str[2]-0x30); } }else{ num=10*(str[0]-0x30); num+=(str[1]-0x30); } }else{ num= str[0]-0x30; } }else{ num=0; } return num; } /*********************************************************************************** *ModemPoweroff ************************************************************************************/ void ModemPoweroff(void) { ModemSendAT("AT+ZPWROFF\r\n"); os_dly_wait(50); ModemSendAT("AT+ZPWROFF\r\n"); IWDG_ReloadCounter();//喂狗 os_dly_wait(100); IWDG_ReloadCounter();//喂狗 os_dly_wait(100); IWDG_ReloadCounter();//喂狗 os_dly_wait(50); IWDG_ReloadCounter();//喂狗 MODEM_PWRKEY_LOW; MODEM_RESET_HIGH; os_dly_wait(10); MODEM_RESET_LOW; } /********************************************************************************** *ModemSetDTRLow ***********************************************************************************/ void ModemSetDtrLow(void) { GPIO_InitTypeDef GPIO_InitStructure; RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA|RCC_APB2Periph_GPIOB|RCC_APB2Periph_GPIOC, ENABLE); GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP; GPIO_InitStructure.GPIO_Speed = GPIO_Speed_10MHz; GPIO_InitStructure.GPIO_Pin = MODEM_DTR_PIN; GPIO_Init(MODEM_DTR_PORT, &GPIO_InitStructure); MODEM_DTR_LOW; } /********************************************************************************** *ModemSetRINGLow ***********************************************************************************/ void ModemSetRingLow(void) { GPIO_InitTypeDef GPIO_InitStructure; RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA|RCC_APB2Periph_GPIOB|RCC_APB2Periph_GPIOC, ENABLE); GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP; GPIO_InitStructure.GPIO_Speed = GPIO_Speed_10MHz; GPIO_InitStructure.GPIO_Pin = MODEM_RING_PIN; GPIO_Init(MODEM_RING_PORT, &GPIO_InitStructure); MODEM_RING_LOW; } unsigned char AsciiHexStringToHexBytes(char *src, unsigned char *des) {//"3031"-->0x30,0x31 unsigned char temp[2]; unsigned char i,k; int len; len=strlen(src); if(len % 2) return 0;//不能为单数 for(i=0;i= '0' && temp[k] <= '9') temp[k] -= 0x30; else if(temp[k] >= 'a' && temp[k] <= 'f') temp[k] -= 0x57; else if(temp[k] >= 'A' && temp[k] <= 'F') temp[k] -= 0x37; } des[i] = ((temp[0]<<4)&0xf0) | temp[1]; } return i; } /******************************************************************* *ModemCheckPocParam return: 1--not same, Reset 0--same,no reset ********************************************************************/ int ModemCheckPocParam(void) { int t,j; int i,len; char buf[40]; char buf1[100]; char idFlag=0; char ipFlag=0; char pwdFlag=0; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; // #error "也测试一下这个函数正常与否呗" for(i=0;i<5;i++) { ModemSendAT("AT+POC=020000\r\n"); //+POC:0200000069643D313030303031343031343B69703D3138332E3133312E31332E31303B7077643D3135303034343739303438383931343B646F6D61696E3D7777772E6869676F73706F632E636F6D3B //id=1000014014;ip=183.131.13.10;pwd=150044790488914;domain=www.higospoc.com; t=50; while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if(0==ModemStrCmp((char *)pMsg->MsgData,"+POC:02")) { pMsg->MsgData[pMsg->MsgLen-3]=0; len=AsciiHexStringToHexBytes(&pMsg->MsgData[13], pMsg->MsgData); pMsg->MsgData[len]=0; //找id len=GetParaFromStr(pMsg->MsgData,"id",buf); snprintf(buf1, sizeof(buf1),"%lu",sutProductPara.PSN); if(0!=strcmp(buf1, buf)) idFlag=1;; //找ip len=GetParaFromStr(pMsg->MsgData,"ip",buf); snprintf(buf1, sizeof(buf1), "%s", getPIPAddr()); if(0!=strcmp(buf1, buf)) ipFlag=1; //找pwd len=GetParaFromStr(pMsg->MsgData,"pwd",buf); snprintf(buf1, sizeof(buf1), "%s",DEV_HARDID); if(0!=strcmp(buf1, buf)) pwdFlag=1; if(idFlag == 0 && ipFlag==0 && pwdFlag==0) return 0; RESET_ALL: ModemSendAT("AT+POC=010000"); //更新id //if(idFlag != 0){ snprintf(buf, sizeof(buf),"id=%lu;",sutProductPara.PSN); AscStrToHexStr(buf,buf1); ModemSendAT(buf1); //} //更新ip //if(ipFlag != 0){ snprintf(buf, sizeof(buf), "ip=%s;", getPIPAddr()); AscStrToHexStr(buf,buf1); ModemSendAT(buf1); //} //更新pwd //if(pwdFlag != 0){ snprintf(buf, sizeof(buf), "pwd=%s;",DEV_HARDID); AscStrToHexStr(buf,buf1); ModemSendAT(buf1); //} ModemSendAT("\r\n"); return 1; } }else os_dly_wait(1); } } return 0; } char WaitModemStart(void) { int t,i; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; SlwTrace(INF, "WaitModemRun:",0); for(i=0;i<100;i++) { t=50; ModemSendAT("ATE0\r\n"); while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if(0==ModemStrCmp((char *)pMsg->MsgData,"OK") || 0==ModemStrCmp((char *)pMsg->MsgData,"+POC:START")) { SlwTrace(INF, "Runing",1); return 0; } }else os_dly_wait(1); } } SlwTrace(INF, "TimeOut",1); return 1; } void ModemInfo(void) { int t; int i,len,ver,j; char bufTemp[30],version[10],type,countFlag; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; RunMake(THIS_FILE_ID); ver=0; SlwTrace(INF, "[03]ModemInfo:",1); type=0; for(i=0;i<10;i++) { if(type==0) ModemSendAT("ATI\r\n");//模块型号 else ModemSendAT("AT+LCTSW\r\n");//版本信息 t=50; while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if(type==0) {//Manufacturer: LONGSUNG //Model: U9507C 全网通模块版本 //Model: U9507C_SXNT 单电信模块版本 //Model: U9507C_SXNM 移动联通模块版本 //Model: U9507C V3 全网通版本 if(0==ModemStrCmp((char *)pMsg->MsgData,"Manufacturer:")) SlwTrace(INF, pMsg->MsgData, 0); else if(0==ModemStrCmp((char *)pMsg->MsgData,"Model:")) { if(0==ModemStrCmp((char *)pMsg->MsgData,"Model: U9507C V3")|| 0==ModemStrCmp((char *)pMsg->MsgData,"Model: U9507C SXNT")){ //单电信 support_type=ONLY_Telecom; }else if(0==ModemStrCmp((char *)pMsg->MsgData,"Model: U9507C_SXNM")|| 0==ModemStrCmp((char *)pMsg->MsgData,"Model: U9507C SXNM")){ //移动联通版 support_type=Mobile_unicom; }else if(0==ModemStrCmp((char *)pMsg->MsgData,"Model: U9507C POCC") ){ support_type=All_Netcom; //全网通 }else { //未知 support_type=Un_Known; } SlwTrace(INF, pMsg->MsgData, 0); type ++; break; } }else{ //SoftwareVersion: LLA0029.1.2_M005 //InnerVersion: LLA0029_0016_1.0.57_L0901_EFS2.6 //AP: LLA0029_0016_0.0.57_L0901_M005 if(0==ModemStrCmp((char *)pMsg->MsgData,"SoftwareVersion:")) SlwTrace(INF, pMsg->MsgData, 0); else if(0==ModemStrCmp((char *)pMsg->MsgData,"AP:")) { SlwTrace(INF, pMsg->MsgData, 0); return; } else if(0==ModemStrCmp((char *)pMsg->MsgData,"InnerVersion:")) { SlwTrace(INF, pMsg->MsgData, 0); countFlag=0; for(j=0;jMsgData);j++) { if(pMsg->MsgData[j] == '_') { countFlag++; if(countFlag == 1) { version[0] = pMsg->MsgData[j+3]; version[1] = pMsg->MsgData[j+4]; }else if(countFlag == 3) { version[2] = pMsg->MsgData[j+2]; version[3] = pMsg->MsgData[j+3]; version[4] = pMsg->MsgData[j+4]; version[5] = pMsg->MsgData[j+5]; version[6] = 0; snprintf(bufTemp, sizeof(bufTemp), "[03]ModemVer:%s",version); SlwTrace(INF, bufTemp, 1); g_iModemVer=atoi(version); } } } } } }else os_dly_wait(1); } } } int ModemGetIMEI(void) { int t,j; int i,len; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; for(i=0;i<50;i++){ ModemSendAT("AT+GSN\r\n");//0x80DA219D //862015030301209 两种情况都会返回 t=50; while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { len=strlen((char *)&(pMsg->MsgData)); if(0==ModemStrCmp((char *)pMsg->MsgData,"0x")) { len -=4; memcpy(DEV_HARDID, &pMsg->MsgData[2], len); if(len < sizeof(DEV_HARDID)) DEV_HARDID[len]=0; return 1; }else if(len == 17) { len -= 2; memcpy(DEV_HARDID, pMsg->MsgData, len); if(len < sizeof(DEV_HARDID)) DEV_HARDID[len]=0; return 2; } }else os_dly_wait(1); } } return 0; } void CheckPocType(void) { //19001 19002 19003 自研POC版本号 //1184 1191 西安POC版本号 hgs_poc_type=POC_XIAN;//默认是西安的，然后通过POC版本号来判断是西安的还是自研的POC if(g_iPocVer > 19000){ hgs_poc_type=POC_OWN; SlwTrace(INF, "poc-own",1); }else SlwTrace(INF, "poc-xian",1); } void ModemPocVersionCheck(void) { char bufTemp[40]; short t,i,len,j; int ver; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; for(i=0;i<5;i++) { t=50; ModemSendAT("AT+POC_VER?\r\n"); while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if(0==ModemStrCmp((char *)pMsg->MsgData,"+POC_VER:")) { len = strlen(pMsg->MsgData); j=0; for(i=0;iMsgData[i] == '\r') { bufTemp[j]=0; ver=atoi(bufTemp); snprintf(bufTemp, sizeof(bufTemp),"[04]POCver:%d<->%s", ver,pMsg->MsgData); SlwTrace(INF, bufTemp,0); g_iPocVer=ver; return; }else if(pMsg->MsgData[i] >= '0' && pMsg->MsgData[i] <= '9') bufTemp[j++]=pMsg->MsgData[i]; } } }else os_dly_wait(1); } } snprintf(bufTemp, sizeof(bufTemp),"[04]PocVer=%d", ver); SlwTrace(INF, bufTemp, 1); } void ModemApnConfig(void) { char needAuthLogin=0; char buf[100]; char buf2[80]; char i,t; char ApnSetFlag=0; char *apnName=newPara.apnList.apnList[newPara.apnList.defaultuse].account; char *apnPass=newPara.apnList.apnList[newPara.apnList.defaultuse].pass; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; snprintf(buf, sizeof(buf), "[11]Accessp:"); if(newPara.apnList.APN_Name[0]==0) {//接入点为空时不配置,因为模块不支持 strcat(buf, "unsupport-Empty"); }else { snprintf(buf2, sizeof(buf2), "AT+MIPPROFILE=1,\"%s\"\r\n",newPara.apnList.APN_Name); ModemSendAT(buf2); snprintf(buf2, sizeof(buf2), "%s",newPara.apnList.APN_Name); strcat(buf,buf2); } SlwTrace(INF,buf,0); snprintf(buf, sizeof(buf), ",Name-Pass:"); if(apnName[0] ==0 || apnPass[0] ==0) {//名称或密码为空不配置，因为模块不支持 strcat(buf, "unsupport-Empty"); }else { snprintf(buf2, sizeof(buf2),"AT^PPPCFG=\"%s\",\"%s\"\r\n",apnName,apnPass); ModemSendAT(buf2); snprintf(buf2, sizeof(buf2), "%s,%s",apnName,apnPass); strcat(buf,buf2); needAuthLogin=1; } SlwTrace(INF, buf,1); if(needAuthLogin != 0){ //认证 snprintf(buf, sizeof(buf),"AUTH-LOGIN:"); switch(newPara.authType){ case AUTH_LOGIN_PAP:strcat(buf, "PAP"); snprintf(buf2, sizeof(buf2),"AT$QCPDPP=1,%d,%s,%s\r\n",newPara.authType,apnPass,apnName); break; case AUTH_LOGIN_CHAP:strcat(buf, "CHAP"); case AUTH_LOGIN_NONE:strcat(buf, "NONE"); default:strcat(buf, " Do nothing"); snprintf(buf2, sizeof(buf2),"AT$QCPDPP=1,%d\r\n",newPara.authType); break; } SlwTrace(INF,buf, 1); ModemSendAT(buf2); SlwTrace(INF,buf2,0); os_dly_wait(20); SlwTrace(INF,"AuthLogin Done",1); } } void M9507CSendTcpData(unsigned char socket, unsigned char *pData, unsigned short len) { char buf[20]; snprintf(buf, sizeof(buf), "AT+TCPSEND=%d,%d,",socket, len); ModemSendAT(buf); ModemSendData(pData, len); ModemSendAT("\r\n"); } void ModemSetSpeed(void) { char i,t; int Volume; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; for(i=0;i<5;i++) { t=50; REGO: ModemSendAT("AT+LSHTTSSPEED?\r\n"); while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if(0==ModemStrCmp((char *)pMsg->MsgData,"+LSHTTSSPEED:")) { Volume=atoi(&pMsg->MsgData[13]); if(7000 != Volume) { ModemSendAT("AT+LSHTTSSPEED=-1,7000\r\n"); os_dly_wait(1); goto REGO; } else { SlwTrace(INF, "[06]SetTTS Speed Ok",1); return; } } }else os_dly_wait(1); } } SlwTrace(INF, "[06]SetTTS Speed Failed",1); } void VolumeSet(void) { char i,t; int Volume; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; char sendBuf[40],readBuf[30]; char target[5]; snprintf(sendBuf, sizeof(sendBuf), "at+syscmd=start_pcm volume "); snprintf(readBuf, sizeof(readBuf), "at+syscmd=start_pcm volume\r\n"); if(newPara.SoundMode==0) snprintf(target, sizeof(target), "7 5"); else snprintf(target, sizeof(target), "7 7"); strcat(sendBuf, target); strcat(sendBuf, "\r\n"); //先配置一次，再查，因为默认就查有可能是没有返回的 ModemSendAT(sendBuf);//TTS 音量/ MIC 输入音量 for(i=0;i<10;i++) { t=100; ModemSendAT(readBuf); while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if(0==ModemStrCmp((char *)pMsg->MsgData,target)) { SlwTrace(INF, "[07]Set Volume ok",1); return; }else{ if(t==0) ModemSendAT(sendBuf); } }else os_dly_wait(1); } } SlwTrace(INF, "[07]Set Volume failed",1); } void SpeakTTSVoice(void) { int len,timeout; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; unsigned char codeType=ENCODE_UNICODE; if(newPara.ttsMessage[0]==0) return; len=strlen(newPara.ttsMessage); len = len+(8-len%8);//8倍数 timeout=len/8;//两个中文需要播报1秒算 timeout *= 100; if(newPara.ttsCodeType==TTS_UNICODE) codeType=ENCODE_UNICODE; else if(newPara.ttsCodeType==TTS_GBK) codeType=ENCODE_GBK; MeSpeak(codeType, newPara.ttsMessage,0); // while(timeout--) // { // if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) // { // if(0==ModemStrCmp((char *)pMsg->MsgData,"+LSHTTS: END")) // { // SpeakerCtrl(0); // return; // } // }else os_dly_wait(1); // } // SpeakerCtrl(0); } void ServerTimeGet(void) { static unsigned short timeCnt=12000; if(++timeCnt < 12000) return; timeCnt=0; ModemSendAT("AT+CCLK?\r\n"); } //total 成员总数 //一次获取个数最多5个，取决于显示条目个数 //前提是要使用简短模式 void SimpleUserInfoScan(uint8_t firstIn,uint8_t direction) { uint16_t i; uint16_t timeout; char buf[30]; uint16_t thisStartIndex; uint8_t readNum; if(firstIn) sutPocStatus.handleIndex=0; ShowMessageBox("请稍候..."); os_dly_wait(1); snprintf(buf, sizeof(buf),"AT+POC=0E0000%08x\r\n",sutPocStatus.LocalGroup.ID);//先更新总数 ModemSendAT(buf); SlwTrace(INF,buf,0); timeout=1000; sutPocStatus.UserNum_Update=0; sutPocStatus.UserOnLineNum=0; while(timeout) { timeout--; OsDelayTime(1); if(sutPocStatus.UserNum_Update) break; if(timeout % 200 == 0) ModemSendAT(buf); } if(sutPocStatus.UserOnLineNum<=0) { sutPocStatus.FillUserIndex=0; goto QUIT_FUNCTION; } if(sutPocStatus.handleIndex >= sutPocStatus.UserOnLineNum) { snprintf(buf, sizeof(buf), "over:%d",sutPocStatus.handleIndex); SlwTrace(INF, buf, 1); sutPocStatus.handleIndex=sutPocStatus.UserOnLineNum-1; } //然后根据最新总数来获取每个成员信息 if(direction==1)//递增索引 { thisStartIndex=sutPocStatus.handleIndex; if(sutPocStatus.UserOnLineNum-thisStartIndex>=5) readNum=5; else readNum=sutPocStatus.UserOnLineNum-thisStartIndex; }else{//递减索引 if(sutPocStatus.handleIndex <5) { thisStartIndex=0; readNum=sutPocStatus.UserOnLineNum; } else { thisStartIndex=sutPocStatus.handleIndex-5; readNum=5; } } if(readNum >= 5) readNum=5; sutPocStatus.FillUserIndex=0; for(i=thisStartIndex;i<(thisStartIndex+readNum);i++) { sutPocStatus.GetOneUserFlag=0; snprintf(buf, sizeof(buf), "AT+POC=10000021%04x\r\n",i); ModemSendAT(buf); SlwTrace(INF, buf,0); timeout=200; while(1) { OsDelayTime(1); if(sutPocStatus.GetOneUserFlag) { sutPocStatus.FillUserIndex++; break; } if(--timeout==0) break; } } if(direction==1) sutPocStatus.handleIndex += readNum; else sutPocStatus.handleIndex -= readNum; //最终成功读了多少个回来，存在sutPocStatus.FillUserIndex中 QUIT_FUNCTION: GuiClearRect(0, 40, LCD_WIDTH-1, LCD_HEIGHT-32); } void SetModemPocSimpleMode(void) {//设置使用简短模式获取成员信息 short t,i; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; for(i=0;i<5;i++) { t=50; ModemSendAT("AT+POC=10000020\r\n"); while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if(0==ModemStrCmp((char *)pMsg->MsgData,"+POC:10000000")) { SlwTrace(INF, "[14]SimpleMode_Ok",1); return; } }else os_dly_wait(1); } } SlwTrace(INF, "[14]SimpleMode_Tout",1); } char GetUniStringByID(char *HardIDString) {//输出15个字节的字符串 unsigned char id[12]; unsigned char string[16]; long long temp; short i; unsigned char seed; if(HardIDString == '\0') return 0; GetSTM32ID(id); printf("STM32 ID=="); for(i=0;i<12;i++)printf("%02x",id[i]); printf("\r\n"); for(i=5;i>=0;i--){ temp <<=8; temp |= id[i]; } temp &= 0xffffffffffff; printf("temp=%015llu\r\n",temp); snprintf(string,sizeof(string),"%015llu",temp); for(i=0;i<15;i++) HardIDString[i]=string[i]; HardIDString[15]='\0'; //snprintf(HardIDString,16,"%015llu",temp); return 1; } //检查并设置POC域名 int ModemCheckFotaDomain(void) { #if 1 return 0; #else int t,j; int i,len; char buf1[130]; char buf2[40]; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; RunMake(THIS_FILE_ID); for(i=0;i<5;i++) { ModemSendAT("AT+POC=21000000\r\n"); t=50; while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if(0==ModemStrCmp((char *)pMsg->MsgData,"+POC:21000000")) { snprintf(buf2,sizeof(buf2),"%s",sutProductPara.fota_pocdomain); //strcat(buf,buf2); for(j=0;jMsgData);j++) if(pMsg->MsgData[j]== '\r') pMsg->MsgData[j] = 0; if(0!=strcasecmp((char *)&pMsg->MsgData[13],buf2)) { snprintf(buf1,sizeof(buf1),"AT+POC=21000001%s",buf1); return 1; }else return 0; } }else os_dly_wait(1); } } return 0; #endif } int htoi(char s[]) { int i = 0; int n = 0; if (s[0] == '0' && (s[1]=='x' || s[1]=='X')) { i = 2; } else { i = 0; } for (; (s[i] >= '0' && s[i] <= '9') || (s[i] >= 'a' && s[i] <= 'z') || (s[i] >='A' && s[i] <= 'Z');++i) { if (tolower(s[i]) > '9') { n = 16 * n + (10 + tolower(s[i]) - 'a'); } else { n = 16 * n + (tolower(s[i]) - '0'); } } return n; } int ModemSetCodec(unsigned char addr,unsigned short value) { int t,j; int i,len; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; char buf[50]; for(i=0;i<10;i++){ t=50; sprintf(buf,"AT+CODEC=3,%2x,%4x\r\n",addr,value); ModemSendAT(buf); while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { len=strlen((char *)&(pMsg->MsgData)); if(0==ModemStrCmp((char *)pMsg->MsgData,"OK")) { //SlwTrace(INF,(char *)pMsg->MsgData,1); return 0; } }else os_dly_wait(1); } } return addr; } void VolumeSetSpk(void) { char i,t; int Volume; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; char sendBuf[40],readBuf[30]; char target[5]; char tmp; if(newPara.SoundMode==0)tmp=newPara.lvl; else tmp=newPara.OutDoorLvl; snprintf(sendBuf,sizeof(sendBuf),"AT+LVL=4,%d\r\n",tmp); snprintf(readBuf,sizeof(readBuf),"+LVL:4,%d\r\n",tmp); SlwTrace(INF,sendBuf,0); for(i=0;i<15;i++) { t=100; //100 ModemSendAT(sendBuf);//TTS 音量/ MIC 输入音量 os_dly_wait(100); ModemSendAT("AT+LVL?\r\n"); while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if(0==ModemStrCmp((char *)pMsg->MsgData,readBuf)) { SlwTrace(INF, "[07-02]Set SPK ok",1); return; } }else os_dly_wait(1); } } SlwTrace(INF, "[07-02]Set Volume failed",1); } void VolumeSetMIC(void) { char i,t; char buf[40]; char readbuf[20]; int Volume; SUT_MODEM_AT_MSG *pMsg=&sutAtmPro; snprintf(buf,sizeof(buf),"AT+MIC=4,255\r\n"); snprintf(readbuf,sizeof(readbuf),"+MIC:4,255\r\n"); ModemSendAT(buf);//TTS 音量/ MIC 输入音量 SlwTrace(INF,buf,0); SlwTrace(INF,readbuf,0); for(i=0;i<15;i++) { t=50; //100 os_dly_wait(10); ModemSendAT("AT+MIC?\r\n"); while(t--) { if((pMsg->MsgLen = MsgQueueAccept(pMsg->MsgData,sizeof(pMsg->MsgData)))) { if(0==ModemStrCmp((char *)pMsg->MsgData,readbuf)) { SlwTrace(INF, "[07-03]Set MIC ok",1); return; }else{ if(t==0) ModemSendAT(buf); } }else os_dly_wait(1); } } SlwTrace(INF, "[07-03]Set MIC failed",1); } /***********************************************************************************/