Diff: main.cpp

Revision:

0:1230a968d925

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/main.cpp	Fri Dec 05 20:36:39 2014 +0000
@@ -0,0 +1,395 @@
+#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);  //inicia el envio
+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 lenpack=6;
+int longi=0;
+char buffer1[13];
+char mensaje[100];
+char NUMBER[13];
+char tel[10];
+char DE[50];
+char buffer[512];
+char buffermsg[72];
+    
+int index;
+int count;
+int i = 0;
+int c=0;
+int cont=0;
+unsigned char CtrlZ = 0x1A;  // comodin 
+bool Flag = false; // Bandera 
+char r[]=""; //Cadena de recepción
+char msg[256];
+char char1;  //Flush serial para el buffer
+void FlushGSM(void) { 
+char1 = 0;
+ while (GSM.readable()){
+     char1 = GSM.getc();}
+     return;}
+
+void callback() {
+    
+    pc.printf("%c\n", GSM.getc());
+    
+}
+ 
+int readBuffer(char *buffer,int count)
+{
+    int i=0; 
+    t.start();  // inicia el timmer
+    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;
+}
+
+
+
+void cleanBuffer(char *buffer, int count)
+{
+    for(int i=0; i < count; i++) {
+        buffer[i] = '\0';
+    }
+}
+/* la funcion envia un comando parametrizado
+*/
+
+
+void sendCmd(char *cmd)
+{
+    GSM.puts(cmd);
+}
+/* la funcion 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;//sum se incrementa o se hace cero segun c
+            if(sum == len)break;  //termina
+        }
+        if(t.read() > timeout) {  // time out revisa 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 cun el valor de señal util o un -1 si nop 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;
+}
+/* la funcion  configura el modem con comandas AT
+y si se completa el proceso retorna un cero que en la programacion hay que validar
+con alguna expresion logica pero si no, retorna un -1
+*/
+//
+int settingSMS() //esta funcion se invoca para configurar el modem al principio
+{
+    if(0 != sendCmdAndWaitForResp("AT\r\n", "OK", 1)) {
+        return -1;
+    }
+    if(0 != sendCmdAndWaitForResp("AT+CNMI=1,1\r\n", "OK", 1)) {
+        return -1;
+    }
+    if(0 != sendCmdAndWaitForResp("AT+CMGF=0\r\n", "OK", 1)) {
+        return -1;
+    }
+    if(0 != sendCmdAndWaitForResp("ATE\r\n", "OK", 1)) {
+        return -1;
+    }
+    if(0 != sendCmdAndWaitForResp("CBST=0,0,1\r\n", "OK", 1)) {
+        return -1;
+    }
+    return 0;
+}
+
+
+/* la funcion que inicaliza el modem se compone de un grupo de subfunciones 
+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()
+{
+    for(int i = 0; i < 3; i++){
+        sendCmdAndWaitForResp("AT\r\n", "OK", 1);
+        wait(0.5);
+    }
+    if(0 != checkSIMStatus()) {
+        return -1;
+    }
+    if(checkSignalStrength()<1) {
+        return -1;
+    }
+   
+    GSM.attach(&Rx_interrupt, Serial::RxIrq);
+    return 0;
+}
+/* la funcion  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;
+}
+/* la funcion  borra mensajes SMS del modem
+
+*/
+//
+int deleteSMS(int index)
+{
+    char cmd[32];
+    snprintf(cmd,sizeof(cmd),"AT+CMGD=%d\r\n",index);
+    sendCmd(cmd);
+    return 0;
+}
+//
+
+// 
+void Rx_interrupt(){
+     }
+     /*
+     readBuffer(buffer,6);
+     if(strncmp(buffer, "+CMTI", 5)){
+     wait(1);
+     GSM.printf("AT+CMGL=%d\r\n",0);
+     readBuffer(buffer,100);}
+     if(strncmp(buffer, "+CMGL:", 5)){  
+     for (i=0;i<31;i++){
+     buffer[5+i]=c;  // 32 de basura
+     }
+     }
+     for (i=0;i<10;i++){
+     buffer[36+i]=tel[i];  // numero telefonico
+     }
+     for (i=0;i<18;i++){
+     buffer[46+i]=c;  // 18 de basura
+     }
+     for (i=0;i<2;i++){
+     buffer[64+i]=tel[i];  // tamaño de septetos
+     }
+     for (i=0;i<30;i++){
+     buffer[66+i]=DE[i];  // datos en octetos hex
+     if (buffer[i]=='\0'){
+     }
+     */
+     
+
+
+int main(void)
+       { 
+       
+
+  
+       //NVIC_DisableIRQ(UART1_IRQn);       
+       //apagamos los 3 leds
+       LedVerde=1;
+       LedRojo=1;
+       LedAzul=1;
+       lenpack=6;  //tamaño de "ALARMA"
+       GSM.baud(9600);//actualiza los baudios de la FRDMKL25Z en 9600
+       GSM.format(8,Serial::None,1); //actualiza el formato de los datos de la UART
+       //se configura el modem GSM
+       GSM.printf("AT\r\n");
+       wait(0.5);
+       GSM.printf("AT+CNMI=1,1\r\n");
+       wait(0.5);
+       GSM.printf("AT+CMGF=0\r\n");
+       wait(0.5);
+       GSM.printf("ATE\r\n");
+       wait(0.5);
+       GSM.printf("CBST=0,0,1\r\n");
+       wait(0.5);  
+       LedVerde=0;     
+      
+       //if(0!= init()){  //se configura y chequea el modem GSM 
+       // LedRojo=0;
+       //}
+     
+
+        
+      while(1){ 
+      
+       if (button1.falling())
+        { LedVerde=1;
+          wait(2);
+           if (!button1)
+           {LedVerde=0;
+           index=20;
+       //GSM.printf("AT+CNMI=1,1\r\n"); //configuracion inicial del MODEM!
+       GSM.printf("AT+CMGS=%d\r\n",index);
+       wait(0.2);
+       GSM.printf("0011000A91037130590900AA08416650DA0C8262"); //esto es "ALARMA 1 "
+       wait(0.5);              
+       GSM.putc((char)0x1A); //esto es controlZ   
+       LedVerde=1;
+       LedRojo=0;  //se prende
+       wait(3);
+       LedRojo=1;  // se apaga
+       LedVerde=0;          
+       }
+       }  
+      
+       if (GSM.readable()) {
+            readBuffer(buffer,100);
+            pc.printf("buffer= %s\n\r ",buffer);
+            pc.printf("buffer= %c  %c\n\r ",buffer[10],buffer[11]);
+                if(buffer[67]=='A'){for(i=0;i<86;i++)
+                 {buffermsg[i]=buffer[i];}
+                 pc.printf("mensaje= %s\n\r ",buffermsg); 
+                 pc.printf("mensaje[72]= %c mensaje[73]=%c\n\r ",buffermsg[72],buffermsg[73]);        
+                 buffer[67]='c';
+                 }
+                 
+ if(buffer[10]=='S'&& buffer[11]=='M'){
+             for(i=0;i<5;i++)
+             {buffer1[i]=buffer[2+i];}
+             pc.printf("buffer1= %s\n\r ",buffer1);         
+             buffer[10]='c';
+             buffer[11]='c';
+             }
+if(buffer1[3]=='T'){pc.printf("AT+CMGL=0\n\r");
+            wait(0.5);
+            GSM.printf("AT+CMGL=0\r\n");
+            buffer1[3]='p';
+            }
+            
+            
+if(buffermsg[70]=='6' && buffermsg[71]=='5'){LedAzul=0;}
+if(buffermsg[70]=='6' && buffermsg[71]=='F'){LedAzul=1;}
+               
+         
+    }
+        
+            
+            
+      
+}
+
+
+}
\ No newline at end of file