![](/media/cache/img/default_profile.jpg.50x50_q85.jpg)
GSM
Dependencies: DebouncedIn mbed
Fork of CLASEDELGSM1 by
main.cpp
- Committer:
- PabloViana
- Date:
- 2015-11-20
- Revision:
- 3:7988fa80dea8
- Parent:
- 2:0377af333c98
File content as of revision 3:7988fa80dea8:
#include "mbed.h" #include "DebouncedIn.h" #include "stdio.h" #include "string.h" Timer t; DigitalOut LedVerde(LED2); DigitalOut LedRojo(LED1); DigitalOut LedAzul(LED3); DebouncedIn button1(PTC12); //señal que inicia el envio del mensaje Serial GSM(PTE0,PTE1); //Configura puerto UART de la FRDMKL25Z Serial pc(USBTX,USBRX);//Configura puerto USB a la consola serial del PC conectado. void Rx_interrupt(); int position=0; int intentos=0; int lenpack=6; int ret=1; int longi=0; char tel[11]; char DE[50]; char buffer[100]; char buffermsg[100]; char buffer1[100]; char datos[100]; char NUMBER[13]; char resp[6]; char CMT[]="+CMTI"; char tam[2]; int index; int count; int i = 0; int j = 0; int c=0; unsigned char CtrlZ = 0x1A; // comodin de emision controlZ bool Flag = false; // bandera char r[]=""; //Cadena de recepcion de la trama PDU si se usa!! char msg[256]; char char1; //Flush serial para el buffer void FlushGSM(void) { char1 = 0; while (GSM.readable()){ char1 = GSM.getc();} return;} void callback() { // Note: you need to actually read from the serial to clear the RX interrupt pc.printf("%c\n", GSM.getc()); } //**************************************************************************************************************** //esta funcion de abajo lee todo un bufer hasta encontrar CR o LF y el resto lo rellena de //$, count es lo que va a leer.Lo leido lo mete en buffer que es una cadena previamente definida //incorpora medida de tiempo si se demora mas de tres segundos retorna fracaso con -1 //**************************************************************************************************************** int readBuffer(char *buffer,int count) { int i=0; t.start(); // start timer while(1) { while (GSM.readable()) { char c = GSM.getc(); if (c == '\r' || c == '\n') c = '$'; buffer[i++] = c; if(i > count)break; } if(i > count)break; if(t.read() > 3) { t.stop(); t.reset(); break; } } wait(0.5); while(GSM.readable()) { // display the other thing.. char c = GSM.getc(); } return 0; } //******************************************************************************** /* esta funcion de abajo limpia o borra todo un "buffer" de tamaño "count" lo revisa elemento por elemento y le mete el caracter null que indica fin de cadena no retorna nada */ //*************************************************************************************** void cleanBuffer(char *buffer, int count) { for(int i=0; i < count; i++) { buffer[i] = '\0'; } } /* esta funcion de abajo envia un comando parametrizado como cadena puede ser un comando tipo AT */ //*************************************************************************************** void sendCmd(char *cmd) { GSM.puts(cmd); } //**************************************************************************************** /* esta funcion de abajo espera la respuesta de un comando que debe ser identica a la cadena "resp" y un tiempo timeout" si todo sale bien retorna un cero que en la programacion hay que validar si algo sale mal ( no se parece o se demora mucho )retorna -1 que debera validarse con alguna expresion logica */ //*************************************************************************************** int waitForResp(char *resp, int timeout) { int len = strlen(resp); int sum=0; t.start(); while(1) { if(GSM.readable()) { char c = GSM.getc(); sum = (c==resp[sum]) ? sum+1 : 0;// esta linea de C# sum se incrementa o se hace cero segun c if(sum == len)break; //ya acabo se sale } if(t.read() > timeout) { // time out chequea el tiempo minimo antes de salir perdiendo t.stop(); t.reset(); return -1; } } t.stop(); // stop timer antes de retornar t.reset(); // clear timer while(GSM.readable()) { // display the other thing.. char c = GSM.getc(); } return 0; } /* esta funcion de abajo es muy completa e util se encarga de enviar el comando y esperar la respuesta si todo sale bien retorna un cero(herencia de las funciones contenedoras) que en la programacion hay que validar con alguna expresion logica */ //*************************************************************************************** int sendCmdAndWaitForResp(char *cmd, char *resp, int timeout) { sendCmd(cmd); return waitForResp(resp,timeout); } /* esta funcion de abajo chequea que el modem este vivo envia AT y le contesta con OK y espera 2 segundos */ //*************************************************************************************** int powerCheck(void)// este comando se manda para verificar si el modem esta vivo o conectado { return sendCmdAndWaitForResp("AT\r\n", "OK", 2); } /* esta funcion de abajo chequea el estado de la sim card y si todo sale bien retorna un cero que en la programacion hay que validar con alguna expresion logica */ //*************************************************************************************** int checkSIMStatus(void) { char gprsBuffer[30]; int count = 0; cleanBuffer(gprsBuffer,30); while(count < 3) { sendCmd("AT+CPIN?\r\n"); readBuffer(gprsBuffer,30); if((NULL != strstr(gprsBuffer,"+CPIN: READY"))) { break; } count++; wait(1); } if(count == 3) { return -1; } return 0; } /* esta funcion de abajo chequea la calidad de la señal y si todo sale bien retorna con el valor de señal util o un -1 si no es aceptable, en la programacion hay que validar con alguna expresion logica */ //*************************************************************************************** int checkSignalStrength(void) { char gprsBuffer[100]; int index,count = 0; cleanBuffer(gprsBuffer,100); while(count < 3) { sendCmd("AT+CSQ\r\n"); readBuffer(gprsBuffer,25); if(sscanf(gprsBuffer, "AT+CSQ$$$$+CSQ: %d", &index)>0) { break; } count++; wait(1); } if(count == 3) { return -1; } return index; } /* esta funcion de abajo inicaliza el modem se compone de un grupo de subfunciones ya definidas previamente primero chequea que este vivo segundo chequea el estado de la simcard tercero chequea la intencidad de señal celular cuarto aplica la configuracion y si todo sale bien retorna un cero que en la programacion hay que validar con alguna expresion logica */ //*************************************************************************************** int init() { if (0 != sendCmdAndWaitForResp("AT\r\n", "OK", 3)){ return -1; } if (0 != sendCmdAndWaitForResp("AT+CNMI=1,1\r\n", "OK", 3)){ return -1; } if (0 != sendCmdAndWaitForResp("AT+CMGF=0\r\n", "OK", 3)){ return -1; } if (0 != sendCmdAndWaitForResp("AT+CBST=0,0,1\r\n", "OK", 3)){ return -1; } LedVerde=0; return 0; } /* esta funcion de abajo intenta leer un mensaje de texto en formato PDU o HEX y si todo sale bien retorna un cero que en la programacion hay que validar con alguna expresion logica */ //*************************************************************************************** int readSMSpdu(char *message, int index) { int i = 0; char gprsBuffer[100]; char *p,*s; GSM.printf("AT+CMGR=%d\r\n",index); cleanBuffer(gprsBuffer,100); readBuffer(gprsBuffer,100); if(NULL == ( s = strstr(gprsBuffer,"+CMGR"))) { return -1; } if(NULL != ( s = strstr(gprsBuffer,"+32"))) { p = s + 6; while((*p != '$')&&(i < 5)) { message[i++] = *(p++); } message[i] = '\0'; } return 0; } /* esta funcion de abajo borra mensajes SMS del modem y si todo sale bien retorna un cero que en la programacion hay que validar con alguna expresion logica */ //*************************************************************************************** int deleteSMS(int index) { char cmd[32]; snprintf(cmd,sizeof(cmd),"AT+CMGD=%d\r\n",index); sendCmd(cmd); return 0; } //************************************************************************************ //RUTINA PRINCIPAL******************************************************************************************* int main(void) { //configuramos los puertos seriales GSM.baud(9600);//configura los baudios de la FRDMKL25Z en 9600 GSM.format(8,Serial::None,1); //configura el formato de los datos de la UART //apagamos los 3 leds LedVerde=1; LedRojo=1; LedAzul=1; wait(5); //quito el eco del modem GSM.printf("ATE0\r\n"); pc.printf("ATE0\r\n"); for(i=0;i<6;i++){ GSM.printf("AT+CMGD=%d\r\n",i); wait(0.2); } //Se intenta inicializar el módulo, en caso de que supere 10 intentos se termina el programa; while(init()<0) { intentos++; if (intentos==10){pc.printf("El programa terminara...\n\r");LedRojo=0;return 0;} } wait(1); LedVerde=1; //Apgo el led verde; pc.printf("El sistema está listo para iniciar la recepción de SMS\n\r"); //********************************************************************************************************************* while(1){ //inicia la recepcion de un mensaje de texto if (GSM.readable()) { readBuffer(buffer,100); wait(0.2); for(i=0;i<5;i++) { resp[i]=buffer[i]; } wait(0.2); if(strcmp("$$+CM",resp) == 0){ //COMPARA resp con "+CMTI" pc.printf("Nuevo mensaje de texto\r\n"); cleanBuffer(buffer,10); wait(0.5); GSM.printf("AT+CMGL=0\r\n");//envio comando para leer mensaje pc.printf("AT+CMGL=0\r\n"); GSM.printf("AT+CMGD=0\r\n"); readBuffer(buffer,100); pc.printf("%s\r\n",buffer); wait(5); //leer telefono for(i=0;i<10;i++){ tel[i]=buffer[i+40]; } pc.printf("Remitente: %s\r\n",tel); //leer tamaño for(i=0;i<2;i++){ tam[i]=buffer[i+68]; } //leer mensaje for(i=0;i<14;i++){ msg[i]=buffer[i+70]; } pc.printf("Mensaje Recibido: %s\r\n",msg); cleanBuffer(buffer,100); //Limpiar Buffer; pc.printf("\n\r"); if(strcmp("CB347D8C2EBB01",msg) == 0) //Envío la palabra Kitchen - Despliego en pantalla { pc.printf("Se verificara el estado de las hornillas y se apagaran las que esten encendidas\r\n"); //Cómo se reconoce la palabra Kitchen, entonces se envía la palabra OK como respuesta; GSM.printf("AT+CMGS=15\r\n"); wait(0.2); GSM.printf("0011000A91"); pc.printf("0011000A91"); GSM.printf("%s",tel); pc.printf("%s",tel); GSM.printf("0000AA03CF35"); pc.printf("0000AA03CF35\n\r"); GSM.putc((char)0x1A); //ctrl-z LedAzul =0;wait(2);LedAzul=1; //Enciendo y apago el led Azul paara indicar que se realiza una instrucción; } else if(strcmp("C672990C2FD301",msg) == 0) //Envío la palabra Feedpet { pc.printf("Se activara el sistema de alimentacion automatico de mascotas...\r\n"); //Se reconoce la instrucción FeedPet, se responde OK; GSM.printf("AT+CMGS=15\r\n"); wait(0.2); GSM.printf("0011000A91"); GSM.printf("%s",tel); GSM.printf("0000AA03CF35"); GSM.putc((char)0x1A); //ctrl-z LedAzul =0;wait(2);LedAzul=1; //Enciendo y apago el led Azul paara indicar que se realiza una instrucción; } else if(strcmp("C872985E96C700",msg) == 0) //Envío la palabra Heater1; { pc.printf("Se activara el sistema de calefaccion...\r\n"); //Se Reconoce la instrucción Heater1, se responde Ok. GSM.printf("AT+CMGS=15\r\n"); wait(0.2); GSM.printf("0011000A91"); GSM.printf("%s",tel); GSM.printf("0000AA03CF35"); GSM.putc((char)0x1A); //ctrl-z LedAzul =0;wait(2);LedAzul=1; //Enciendo y apago el led Azul paara indicar que se realiza una instrucción; } else { pc.printf("No se reconoce ninguna instruccion...\n\r"); //No se reconoce ninguna instrucción se responde con la palabra Again; GSM.printf("AT+CMGS=18\r\n"); wait(0.2); GSM.printf("0011000A91"); pc.printf("PUD: 0011000A91"); GSM.printf("%s",tel); pc.printf("%s",tel); GSM.printf("0000AA06C17338ED06\r\n"); pc.printf("0000AA06C17338ED06\r\n"); GSM.putc((char)0x1A); //ctrl-z LedRojo =0;wait(2);LedRojo=1; //Enciendo y apago el led rojo paara indicar que no se reconoce la instrucción; } //Ninguna orden reconocida; } } } }