Bryan Escobar Restrepo
Tarea_GSM Equipo Rojo 2019_1 Universidad Nacional de Colombia, Materia:Procesadores. Este código envía la ubicación del módem a un smartphone al mandarle "Coordenadas" o "coordenadas"
Diff: main.cpp
- Revision:
- 2:ea6275d1222f
- Parent:
- 1:e2bd083802c0
- Child:
- 3:8aef67673965
--- a/main.cpp Fri Jun 03 01:03:02 2016 +0000
+++ b/main.cpp Fri Nov 18 21:27:40 2016 +0000
@@ -1,79 +1,164 @@
-///Tarea de comunicación celular y módulo GPS
-//programa para celular siemens que recibe un mensaje de texto y activa una salida en formato
-//pdu hex
+// Programa para establecer la comunicación con un módem Siemens A56 por una de las UART.
+// Por otra UART se envían datos de GPS de una región seleccionada de la aplicación de
+// Google Earth en formato .kml leídos por el programa SatGen de NMEA por un puerto COM
+// del Micro hacia un Dongle USB. Se deberá enviar un mensaje de texto al módem el cual
+// podrá ser la palabra "coordenadas" o "voltaje". Si se envía "coordenadas" el programa
+// calcula la latitud y la longitud de la coordenada actual de GPS y envía un mensaje de
+// texto al mismo número con las coordenadas en formato de Google Maps. Si se envía
+// "voltaje" se lee el voltaje de un puerto que se puede variar con un potenciómetro y
+// envía un mensaje de texto con la medida. Los mensajes de texto recibidos se interpretan
+// y decodifican de formato PDU a caracteres y los mensajes enviados se codifican de
+// caracteres a formato PDU para ser enviados.
+
+// Oswaldo Andrés Giraldo Giraldo - C.C.: 1152458465
+// Héctor Andrés Hoyos Ceballos - C.C.: 1039466317
+// Jose Fernando Montoya Vargas - C.C.: 1039468676
+// María Fernanda Villa Tamayo - C.C.: 1152457490
+
#include "mbed.h"
#include "DebouncedIn.h"
#include "stdio.h"
#include "string.h"
#include "GPS.h"
+
//Salidas digitales
Timer t;
DigitalOut LedVerde(LED2);
DigitalOut LedRojo(LED1);
DigitalOut LedAzul(LED3);
-//Declaración de los puertos de la FRDm, modem y GPS
-
-Serial GSM(PTE0,PTE1); //puertos del FRDM para el modem
+// Entrada análoga
+AnalogIn v(PTB0);
+float medi;
+
+// Declaración de los puertos de la FRDM, Módem y GPS.
+Serial GSM(PTE0,PTE1); // Puertos del FRDM para el Módem.
Serial pc(USBTX,USBRX);
-GPS gps(PTE22, PTE23); // Puerto del FDRM para el gps
-
-//Declaración de variables
+GPS gps(PTE22, PTE23); // Puerto del FDRM para el GPS.
-//Cadenas de caracteres con las que se va a trabajar
-short DE[255];
-short DS[255];
+// Declaración de variables
+// Cadenas de caracteres con las que se va a trabajar.
+char DE1[255];
+char DS1[255];
+char DE2[255];
+char DS2[255];
char buffer[512];
-char buffermsg[100];
-char buffer1[13];
+char resp[6];
+char tam[2];
char mensaje[100];
+
//Variables enteras y caracteres
int count;
-int i,K,LENOUT,LENIN,C;
+int i, K, LENOUT1, LENIN1, LENOUT2, LENIN2, C;
int c=0;
-int cont=0;
-unsigned char CtrlZ = 0x1A;
-bool Flag = false;
char r[]="";
char msg[256];
char char1;
-int index;
-//Adquisición de números de teléfono, emisor - receptor
-char Tel[15];
-char cel[15];
-char ojala[15]; // OJO
+int ind;
+float med;
+char outmed[16], outmedn[16];
+int ret = 1;
+
+// Adquisición de números de teléfono, emisor - receptor
+char tel[15];
-//El GPS entregará al celular coordenadas expresadas en latitud y longitud según la ubicación que encuentre
-// por tanto se declaran estas variables:
-
+// El GPS entregará al celular coordenadas expresadas en latitud y longitud
+// según la ubicación que encuentre, por lo tanto se declaran estas variables.
float lo,la;
-char clo[255], cla[255]; //Cadenas a capturar para latitud y longitud
-int LENINlo,LENINla,LENINla_lo;
-char la_lo[255];
-//Cadena de google maps
+char clo[255], cla[255]; // Cadenas a capturar para latitud y longitud.
+char la_lo[255], volt[255];
+
+// Cadena de google maps
char http2[255];
char http[] = "http://maps.google.com/maps?q=";
-
-//Conversión octetos septetos
-
-int iht,Kht,ChtLENOUTht,LENINht;
-int ioct,Koct,LENOUToct,LENINoct,Coct;
-char DEoct[255];
-char DSoct[255];
char buf[100];
-//Relleno de datos - con el fin de que tengan el mismo número de caracteres
+// Relleno de datos propio del protocolo de SMS.
+char relle1[] = "0011000A91";
+char relle2[] = "0000AA";
-char relle1[]= "0011000A91";
-char relle2[]= "10000AA";
-char relle3[]= "68";
+// Reverses a string 'str' of length 'len'
+// driver program to test above funtion.
+void reverse(char *str, int len)
+{
+ int i=0, j=len-1, temp;
+ while (i<j)
+ {
+ temp = str[i];
+ str[i] = str[j];
+ str[j] = temp;
+ i++; j--;
+ }
+}
+
+ // Converts a given integer x to string str[]. d is the number
+ // of digits required in output. If d is more than the number
+ // of digits in x, then 0s are added at the beginning.
+int intToStr(int x, char str[], int d)
+{
+ int i = 0;
+ while (x)
+ {
+ str[i++] = (x%10) + '0';
+ x = x/10;
+ }
+
+ // If number of digits required is more, then
+ // add 0s at the beginning
+ while (i < d)
+ str[i++] = '0';
+
+ reverse(str, i);
+ str[i] = '\0';
+ return i;
+}
-//Funciones del programa
+// Converts a floating point number to string.
+void ftoa(float n, char *res, int afterpoint)
+{
+ // Extract integer part
+ int ipart = (int)n;
+
+ // Extract floating part
+ float fpart = n - (float)ipart;
+
+ // convert integer part to string
+ int i = intToStr(ipart, res, 0);
+
+ // check for display option after point
+ if (afterpoint != 0)
+ {
+ res[i] = '.'; // add dot
-int readBuffer(char *buffer,int count)
-{
+ // Get the value of fraction part upto given no.
+ // of points after dot. The third parameter is needed
+ // to handle cases like 233.007
+ float fp=10;
+ fpart =fpart * pow(fp,afterpoint);
+
+ intToStr((int)fpart, res + i + 1, afterpoint);
+ }
+}
+
+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();
+ t.start(); // start timer
while(1) {
while (GSM.readable()) {
char c = GSM.getc();
@@ -81,241 +166,436 @@
buffer[i++] = c;
if(i > count)break;
}
- if(i > count)break; // ojooo
+ if(i > count)break;
if(t.read() > 3) {
t.stop();
t.reset();
break;
}
}
-
wait(0.5);
- while(GSM.readable()) {
+ while(GSM.readable()){ // display the other thing..
+ char c = GSM.getc();
+ }
+ return 0;
+}
+
+// Esta función 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 función de abajo envia un comando parametrizado como cadena
+// puede ser un comando tipo AT.
+void sendCmd(char *cmd){
+ GSM.puts(cmd);
+}
+
+// Esta función de abajo espera la respuesta de un comando que debe ser idéntica 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;
}
-//Programas a ejecutar
+// Esta función de abajo es muy completa y útil, 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 lógica.
+int sendCmdAndWaitForResp(char *cmd, char *resp, int timeout){
+ sendCmd(cmd);
+ return waitForResp(resp,timeout);
+}
+
+// Esta función de abajo chequea que el módem este vivo, envia AT, le contesta con OK y espera 2 segundos.
+int powerCheck(void){ // Este comando se manda para verificar si el módem esta vivo o conectado.
+ return sendCmdAndWaitForResp("AT\r\n", "OK", 2);
+}
+
+// Esta función 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 expresión lógica.
+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 función de abajo chequea la calidad de la señal
+// y si todo sale bien retorna con el valor de señal útil o un -1 si no es aceptable, en la programacion hay que validar
+// con alguna expresión lógica.
+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 módem. 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 expresión lógica.
+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=7,0,1\r\n", "OK", 3)){ //velocidad fija a 9600, modem asincronico no transparente
+ return -1;
+ }
+ if (0 != sendCmdAndWaitForResp("ATE\r\n", "OK", 3)){ //se le quita el eco al modem GSM
+ 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 expresión lógica.
+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 función 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;
+}
+
+// Esta función devuelve la confirmacion del mensaje a quien lo envio.
+int recibe_ok(){
+ GSM.printf("AT+CMGS=27\n\r");
+ pc.printf("AT+CMGS=27\n\r");
+ wait_ms(100);
+ GSM.printf("0011000A91%s0000AA10CDB27B1E569741F2F2382D4E93DF",tel);
+ pc.printf("0011000A91%s0000AA10CDB27B1E569741F2F2382D4E93DF",tel);
+ wait_ms(100);
+ GSM.putc((char)0x1A);
+ return 0;
+}
+
+// Programas a ejecutar.
+int main(){
+ //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
+ LedVerde = 1; // APAGO LOS LEDS
+ LedRojo = 1;
+ LedAzul = 1;
+ LedRojo = 0; // PRENDO EL LED ROJO
+ // Quito el eco del modem
-int main(void)
- {
-//LED´S en alto
- LedVerde=1;
- LedRojo=1;
- LedAzul=1;
-//Tasa de baudios
- GSM.baud(9600);
- GSM.format(8,Serial::None,1);
-//Lectura del modem
- 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);
+ // CONFIGURACIÓN DEL MODEM GSM (TELEFONO CELULAR SIEMENS A56i).
+ inicio1:
+ ret = init();
+ if(ret==0){
+ LedRojo = 1;
+ LedVerde = 0; // Apagar LED Verde para confirmar la comunicación con el módem.
+ pc.printf("Modem configurado\n");
+ }
+ else{
+ wait(1);
+ goto inicio1;
+ }
+
+ while(1){
+ if (GSM.readable()){
+ readBuffer(buffer,110);
+ pc.printf("%s\r\n",buffer);
+ for(i=0; i<5; i++){
+ resp[i] = buffer[i];
+ }
+
+ pc.printf("%s\r\n", resp);
+ if(strcmp("$$+CM", resp) == 0){ //COMPARA resp con "+CMTI"
+ pc.printf("Llego MSG\r\n");
+ cleanBuffer(buffer,10);
+ GSM.printf("AT+CMGL=0\r\n"); // Envío comando para leer mensaje
+ pc.printf("AT+CMGL=0\r\n");
+ //GSM.printf("AT+CMGD=0\r\n"); // Envío comando para borrar el mensaje.
+ readBuffer(buffer,110);
+ pc.printf("%s\r\n",buffer);
- while(1){
-//Lectura del buffer
- 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';
- //Si llegan estos tres tipos de mensajes...
- if (buffermsg[69] == '2'){ // PARA CUANDO LA CLAVE ES On
- LENIN=2; //numero de caracteres de abajo son los octetos
- DE[0]=0x47;
- DE[1]=0x37;
- }
- if (buffermsg[69] == '3'&& buffermsg[70] == '4'){ // PARA CUANDO LA CLAVE ES Off
- LENIN=3; //numero de caracteres de abajo son los octetos
- DE[0]=0x4F;
- DE[1]=0xB3;
- DE[2]=0x19;
- }
-//Recepción de las coordenadas otorgadas por el GPS
- if (buffermsg[69] == '3'&& buffermsg[70] == 'C'){ // PARA CUANDO LA CLAVE ES Cor
- LENIN=3; //numero de caracteres de abajo son los octetos
- DE[0]=0xC3;
- DE[1]=0xB7;
- DE[2]=0x1C;
- }
-
- LENOUT= LENIN*8/7;
- K=7;
- C=0;
- DS[0]=DE[0] & 0x7F; // la primera sola
- pc.printf("%2X\n",DS[0]);
-
- for (i=1;i < LENOUT;i++){ // inicia el algoritmo
- DS[i]=(DE[i-1-C]>>K | DE[i-C]<<(8-K))& 0x7F; //valido para todos
- pc.printf("%2X\n",DS[i]);
+ // Lectura el teléfono emisor
+ for(i=0; i<10; i++){
+ tel[i] = buffer[i+40];
+ }
+ pc.printf("Telefono: %c%c%c%c%c%c%c%c%c%c\r\n", tel[1], tel[0], tel[3], tel[2], tel[5], tel[4], tel[7], tel[6], tel[9], tel[8]);
+
+ // Lectura del tamaño
+ for(i=0;i<2;i++){
+ tam[i] = buffer[i + 68];
+ }
+ pc.printf("%s-\r\n", tam);
+
+ // Lectura del mensaje
+ for(i=0;i<26;i++){
+ msg[i] = buffer[i+70]; // Lee un mensaje de 26 caracteres máximo desde la posición 70 del buffer.
+ }
+ pc.printf("%s-\r\n", msg);
+
+ // Decodificación del mensaje
+
+ // Comparar el mensaje
+ deleteSMS(1); // Se borran los mensajes por medio de una función
+ readBuffer(buffer, 200);
+ // COMPARA resp con "E3F75B4E2EBBC3E4F01C" que es "coordenadas", o "C3F75B4E2EBBC3E4F01C" que es "Coordenadas".
+ if((strncmp("E3F75B4E2EBBC3E4F01C", msg, 20) == 0) || (strncmp("C3F75B4E2EBBC3E4F01C", msg, 20) == 0)){
+ //recibe_ok();
+ LedVerde = 1; // Encender LED azul.
+ LedAzul = 0;
+ wait(2);
+
+ if(gps.sample()){
+ lo = gps.longitude;
+ la = gps.latitude;
+ pc.printf("\nLongitud entera = %f, Latitud entera = %f\n", lo, la);
+ //wait(0.5);
+
+ //LONGITUD
+ sprintf (clo, "%f", lo);
+ pc.printf ("\nLongitud = %s\n",clo);
+ //wait(0.5);
+
+ // LATITUD
+ sprintf (cla, "%f", la);
+ pc.printf ( "\nLatitud = %s\n",cla);
+ //wait(0.5);
+
+ // Concatenando las cadenas de Latitud y Longitud
+ strcpy(la_lo,cla);
+ strcat(la_lo,",");
+ strcat(la_lo,clo);
+ pc.printf("\nLatitud, Longitud: %s\n",la_lo);
- if (K==0) {K=8;C++;}
- K--;
+ //Ahora se juntan las cadenas obtenidas y se agrega el protocolo de transferencia de hipertextos http
+ strcpy(DE1,http);
+ strcat(DE1,la_lo);
+ pc.printf("\nDireccion: %s\n",DE1);
+ pc.printf("\n");
+ LENIN1 = strlen(DE1);
+
+ //Conversión a octetos.
+ K = 0;
+ C = 0;
+ for (i = 0; i < LENIN1; i++){
+ DS1[i] = DE1[i + C] >> K | DE1[i + C + 1] << (7 - K);
+ if(DS1[i] == 0x00) {LENOUT1 = i; goto salir1;}
+ K++;
+ if (K == 7) {K = 0; C++;} // se chequea que ya se acabaron los bits en un ciclo de conversion.
+ }
+
+ salir1:
+ for (i = 0; i < LENIN1; i++){
+ pc.printf("%X", DE1[i]);
+ }
+
+ pc.printf(":\r\n");
+ for (i = 0; i < LENOUT1; i++){
+ pc.printf("%2X", DS1[i]&0x000000FF);
+ }
+ pc.printf("\r\nLENOUT GPS: %d, LENIN GPS: %2X\r\n", LENOUT1, LENIN1);
+
+ // Concatenación del mensaje en formato PDU y envío del mismo.
+ ind = 14 + LENOUT1 - 1;
+
+ GSM.printf("AT+CMGS=%d\r\n",ind);
+ pc.printf("AT+CMGS=%d\r\n",ind);
+ pc.printf(relle1);
+ GSM.printf(relle1);
+
+ for (i=0 ;i<=9; i++) {
+ pc.printf("%c",tel[i]);
+ GSM.printf("%c",tel[i]);
+ }
+
+ pc.printf(relle2);
+ GSM.printf(relle2);
+ pc.printf("%2X", LENIN1);
+ GSM.printf("%2X", LENIN1);
+
+ for (i = 0; i < LENOUT1; i++){
+ pc.printf("%02X", DS1[i]&0x000000FF);
+ GSM.printf("%02X", DS1[i]&0x000000FF);
+ }
+ wait(1);
+ GSM.putc((char)0x1A); // Ctrl - Z.
+ GSM.scanf("%s",buf); // Estado del mensaje (Envió o Error).
+ pc.printf(">%s\n",buf);
+ pc.printf("\n");
}
- for (i=0 ;i<=9;i++)
- {
- Tel[i] = buffermsg[40+i];
- }
-//Lectura del número de teléfono
+ wait(2);
+ LedAzul = 1;
+ LedVerde = 0;
+ GSM.printf("AT+CMGD=0\r\n"); // Borra el mensaje actual (Posición "0").
+ //pc.printf("\n%s\n\n", "Borro mensaje");
+ }
+
+ // COMPARA resp con "F6379B1E569701" que es "voltaje", o "F6379B1E569701" que es "Voltaje".
+ if((strncmp("F6379B1E569701", msg, 14) == 0) || (strncmp("D6379B1E569701", msg, 14) == 0)){
+ //recibe_ok();
+ LedRojo = 0; // Encender LED amarillo.
+ LedVerde = 0;
+ LedAzul = 1;
+ wait(2);
+
+ med = v.read()*3.3;
+ medi = v.read();
+ pc.printf("\n%f\n", medi);
+
+ cleanBuffer(outmed, 16);
+ if (med < 1){ // Se convierte la Medida a caracter.
+ strcat(outmed, "0");
+ ftoa(med, outmedn, 5);
+ strcat(outmed, outmedn);
+ }
+ else{
+ ftoa(med, outmed, 5);
+ }
+ strcpy(DE2,"Voltaje: ");
+ strcat(DE2,outmed);
+ pc.printf("\n%s\n\n", DE2);
+ LENIN2 = strlen(DE2);
+
+ //Conversión a octetos.
+ K = 0;
+ C = 0;
+ for (i = 0; i < LENIN2; i++){
+ DS2[i] = DE2[i + C] >> K | DE2[i + C + 1] << (7 - K);
+ if(DS2[i] == 0x00) {LENOUT2 = i; goto salir2;}
+ K++;
+ if (K == 7) {K = 0; C++;} // se chequea que ya se acabaron los bits en un ciclo de conversion.
+ }
+
+ salir2:
+ for (i = 0; i < LENIN2; i++){
+ pc.printf("%X", DE2[i]);
+ }
+
+ pc.printf(":\r\n");
+ for (i = 0; i < LENOUT2; i++){
+ pc.printf("%2X", DS2[i]&0x000000FF);
+ }
+ pc.printf("\r\nLENOUT VOLTAJE: %d, LENIN VOLTAJE: %2X\r\n", LENOUT2, LENIN2);
+
+ // Concatenación del mensaje en formato PDU y envío del mismo.
+ ind = 14 + LENOUT2 - 1;
+
+ GSM.printf("AT+CMGS=%d\r\n",ind);
+ pc.printf("AT+CMGS=%d\r\n",ind);
+ pc.printf(relle1);
+ GSM.printf(relle1);
+
+ for (i=0; i <= 9; i++) {
+ pc.printf("%c",tel[i]);
+ GSM.printf("%c",tel[i]);
+ }
+
+ pc.printf(relle2);
+ GSM.printf(relle2);
+ pc.printf("%2X", LENIN2);
+ GSM.printf("%2X", LENIN2);
+ /*pc.printf("0F");
+ GSM.printf("0F");*/
+
+ for (i = 0; i < LENOUT2; i++){
+ pc.printf("%02X", DS2[i]&0x000000FF);
+ GSM.printf("%02X", DS2[i]&0x000000FF);
+ }
+
+ wait(1);
+ GSM.putc((char)0x1A); // Ctrl - Z
+ GSM.scanf("%s",buf); // Estado del mensaje (Envió o Error).
+ pc.printf(">%s\n\n",buf);
pc.printf("\n");
- pc.printf("%c%c%c%c%c%c%c%c%c%c",Tel[1],Tel[0],Tel[3],Tel[2],Tel[5],Tel[4],Tel[7],Tel[6],Tel[9],Tel[8]);
- }
- 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(DS[0]-67 == 0&& DS[1]-111==0) // Cor en octetos es 436f72
- {
- pc.printf("\n");
- LedAzul=0;
-
- DS[0] = '\0';
- DS[1] = '\0';
-//Entrega los datos de longitud y latitud
- if(gps.sample())
- {
- lo =gps.longitude;
- la =gps.latitude;
- pc.printf("longitud_entera=%f, Latitud entera=%f\n", lo, la);
- wait(0.5);
-
- //LONGITUD/
- sprintf (clo, "%f", lo);
- pc.printf ( "\nlongitud = %s\n",clo);
- LENINlo=strlen(clo);
- wait(0.5);
-
- //LATITUD/
- sprintf (cla, "%f", la);
- pc.printf ( "\nlatitud = %s\n",cla);
- LENINla=strlen(cla);
-
- //Concatenando las cadenas de Latitud y Longitud...
-
- strcpy(la_lo,cla);
- strcat(la_lo,",");
- strcat(la_lo,clo);
-
- pc.printf ( "\nla_lo: %s\n",la_lo);
-
- LENINla_lo=strlen(la_lo);
-
- //Ahora se juntan las cadenas obtenidas y se agrega el protocolo de transferencia de hipertextos http
- strcpy(http2,http);
- strcat(http2,la_lo);
- pc.printf ( "%s\n",http2);
- pc.printf ( "\n" );
-
-
- //Conversión de la cadena de http2 de octetos a septetos
-
- LENINht=strlen(http2);
- pc.printf("%d\n",LENINht);
- for (iht=0;iht<LENINht;iht++){
- pc.printf("%2X",http2[iht]);
- }
- pc.printf ( "\n" );
- LENINoct=strlen(http2);
- pc.printf("%d\n",LENINoct);
- for (ioct=0;ioct<LENINoct;ioct++)
- {
- DEoct[ioct]=http2[ioct];
- pc.printf("%2X,%d\n",DEoct[ioct],ioct);
- }
-
- Koct=0;
- Coct=0;
-
- for (ioct=0;ioct < LENINoct;ioct++)
- {
- DSoct[ioct]=DEoct[ioct+Coct]>>Koct | DEoct[ioct+Coct+1]<<(7-Koct);
- if (DSoct[ioct]==0x00){
- LENOUToct=ioct;
- pc.printf("\n");
- pc.printf("%s",DEoct);
- pc.printf("out =%d",LENOUToct);
- for (ioct=0;ioct<LENOUToct;ioct++){
- pc.printf("%2X,%d\r\n",DSoct[ioct]&0x000000FF,ioct);
- }
- }
-
- Koct++;
- if (Koct==7)
- {
- Koct=0;Coct++;
- } // se chequea que ya se acabaron los bits en un ciclo de conversion.
- }
-
- //Concatenación de los datos relleno y el número de celular
- wait(5);
- index=56;
- GSM.printf("AT+CMGS=%d\r\n",index);
- pc.printf("AT+CMGS=%d\r\n",index);
- pc.printf("0011000A91");
- GSM.printf("0011000A91");
- for (i=0 ;i<=9;i++)
- {
- pc.printf("%c",Tel[i]);
- GSM.printf("%c",Tel[i]);
- }
- pc.printf("10000AA");
- GSM.printf("0000AA");
- pc.printf("31");
- GSM.printf("31");
-
- for (ioct=0;ioct<=((LENOUToct*7)/8);ioct++)
- {
- pc.printf("%02X",DSoct[ioct]);
- GSM.printf("%02X",DSoct[ioct]);
- }
- wait(0.5);
- GSM.putc((char)0x1A);
- GSM.scanf("%s",buf);
- GSM.scanf("%s",buf);
- GSM.scanf("%s",buf);
- //GSM.scanf("%s",buf);
- pc.printf(">%s\n",buf);
- pc.printf("\n");
-
- }
- }
-//Si el mensaje recibido fue OFF...
- if(DS[0]-79==0 && DS[1]-102==0) // Off en octetos es 4F6666
- {
- //Secuencia de apagado
- LedAzul=1;
- LedVerde = 0;
- LedRojo=1;
- }
-//Si el mensaje recibido fue ON...
- if(DS[0]-71==0 && DS[1]-110==0) // On en octetos es 476E
- {
- //Secuencia de apagado
- LedAzul=1;
- LedRojo =0;
- LedVerde = 1;
- }
- }
-}
+ wait(2);
+ LedRojo=1;
+ LedVerde=0;
+ GSM.printf("AT+CMGD=0\r\n"); // Borra el mensaje actual (Posición "0").
+ //pc.printf("\n%s\n\n", "Borro mensaje");
+ }
+ }
+ }
+ }
}
\ No newline at end of file