Ir al contenido principal

Leer datos del GPS bluetooth en una PDA en C++

Este código tiene una función que lee los datos enviados por un GPS Bluetooth en una PDA con Windows Mobile 2003 SE, está desarrollado en C++ con VS 2005.
En este caso particular el GPS no está integrado en la PDA envía los datos en formato NMEA a través de una conexión Bluetooth. Al puerto Bluetooth lo podemos leer como un puerto COM más, solo tenemos que saber de antemano cual es el número de los puertos COM de entrada y de salidada del Bluetooth. Esto podemos hacerlo leyendo el registro de la PDA, en mi caso particular es el "COM5:". Una vez que conocemos el puerto que tiene la función de Bluetoot in, leemos los datos con la función ReadFile como con cualquier puerto COM en la PDA o en Windows. La función lee los datos almacenados en el puerto, estableciendo previamente algunos parámetros como velocidad, timeouts y buffers, luego falta procesar los datos obtenidos (en este caso los datos vienen en formato NMEA, hay que procesarlos para obtener los valores de Latitud, Longitud, cantidad de satélites, etc). De la misma manera podemos utilizar esta función o alguna similar para obtener los datos de cualquier dispositivo que envíe a un puerto COM, ya sea en el dispositivo móvil o en nuestra aplicación Windows.
Este es solo un ejemplo, estableciendo algunos valores solo para mostrar como se hace, y guardando los resultados obtenidos en un array local, sin procesarlos luego, es probable que haya que hacerle algunos retoques a la hora de ponerlo en práctica en un programa real.

/*en la parte de definiciones*/
bool PuertoCom(wchar_t *Port);

/*Para llamar la función, por ejemplo al hacer clic en algún botón*/
bool result;

result = PuertoCom(L"COM5:");
if (result == true){
MessageBox(hWnd, L"Se leyeron los datos del puerto", L"OK:", MB_ICONINFORMATION | MB_OK);
}else{
MessageBox(hWnd, L"No se puede abrir, leer el puerto", L"ERROR:", MB_ICONERROR | MB_OK);
}


/*Implementación de la función*/
bool PuertoCom(wchar_t *Port){

HANDLE PCom;
OVERLAPPED ov;
DCB dcb;
COMMTIMEOUTS to;
DWORD x;
COMSTAT cs;
char tmp[1024];
wchar_t buf[1024];

//abrir el puerto
PCom = CreateFile(Port, GENERIC_READ | GENERIC_WRITE, 0, NULL, OPEN_EXISTING, FILE_FLAG_OVERLAPPED, NULL);
if(PCom ==INVALID_HANDLE_VALUE) return false;

//Obtener los timeouts actuales del puerto
if (GetCommTimeouts(PCom, &to) == 0) return false;

//Setear timeouts en el puerto
to.ReadIntervalTimeout = MAXDWORD;
to.ReadTotalTimeoutMultiplier = 0;
to.ReadTotalTimeoutConstant = 0;
to.WriteTotalTimeoutMultiplier = 0;
to.WriteTotalTimeoutConstant = 0;
if (SetCommTimeouts(PCom, &to) == 0) return false;

//setear buffers del puerto
if (SetupComm(PCom, 1024, 1024) == 0) return false;

//Obtener estado del puerto
if (GetCommState(PCom, &dcb) == 0) return false;

//Setear estado del puerto
dcb.BaudRate = (DWORD)38400; //Velocidad;
dcb.ByteSize = (BYTE)8; //NBits;
dcb.Parity = (BYTE)0; //Paridad;
dcb.StopBits = (BYTE)1; //StopBits;
if (SetCommState(PCom, &dcb) == 0) return false;

//Leer datos del puerto
if (ReadFile(PCom, tmp, 1024, &x, &ov) != 0){ //almacenamos en tmp los datos leídos del puerto
int a = strlen(tmp);
BSTR unicodestr = SysAllocStringLen(NULL, a);
::MultiByteToWideChar(CP_ACP, 0, tmp, a, unicodestr, a);
wcscpy(buf ,unicodestr); //convertir la cadena char devuelta por ReadFile en wschar_t
::SysFreeString(unicodestr);
}

//Cerrar puerto com
SetCommMask(PCom, 0);
CloseHandle(PCom);
return true;
}

Comentarios

Entradas más populares de este blog

Como eliminar coordenada Z de elementos (Autocad, VLisp)

Este ejemplo muestra como poner en cero la coordenada Z de unos elementos dentro de un dibujo de AutoCAD, es decir "baja" las entidades que estén dibujadas a una altura en el eje Z y le asigna el valor "0", o en el caso de polilíneas 3d las aplana poniendole a todos sus vertices una altura 0 en Z y respentando sus coordenadas X e Y. Solo tiene en cuenta los puntos, los textos (TEXT y MTEXT), las líneas y las polilíneas. Básicamente lo que hace es hacer un conjunto por cada tipo de entidad (línea, polilínea, texto, y punto) analizar los puntos por cada uno de los elementos dentro del conjunto y redefinir cada punto poniendo en 0 su coordenada Z, en el caso de las polilíneas recorre uno por uno todos los vértices que la componen. El ejemplo puede mejorarse, quizás no sea la forma más óptima de hacerlo, por ejemplo podriamos hacer solo un conjunto y trabajar con todos lo elementos, pero bueno de esta manera quizás es un poco más claro, además hay que tener en cuenta qu...

Ejemplo MVC en PHP

Implementación básica del patrón Modelo Vista Controlador (MVC) en PHP utilizando OOP. MVC es un patrón de diseño que implementa tres capas con el objetivo de separar la interfaz de usuario, las reglas de negocio y el acceso a los datos. Aquellos que no tienen conocimiento de este patrón les recomiendo que lean brevemente de que se trata MVC y la programación orientada a objetos. En esta implementación PHP las vistas manejan todo lo relacionado con la interfaz del usuario (html, css, javascript), el modelo proporciona el acceso a los datos (para facilitar este ejemplo se simula la conexión a una Base de Datos) y el controlador administra toda la lógica del negocio y es el nexo entre el modelo y la vista. Hay muchos frameworks que implementan MVC en PHP de forma muy efectiva y son muy populares. Este ejemplo está orientado a aquellos que quieran hacer su propio framework o que quieran conocer el funcionamiento paso a paso. En este ejemplo se muestra una pantalla de bienvenida co...

Insertar un texto en un dibujo (AutoCAD, Visual Lisp)

Aquellos que conocen programas de dibujo como AutoCAD o MicroStation deben saber que podemos realizar pequeñas personalizaciones o comandos personalizados, que pueden llegar a ser muy útiles y acelerar bastante el trabajo, pudiendo incluso hasta automatizar algunas tareas manuales rutinarias. Para hacer estos programas y comandos podemos utilizar el Editor de Visual Basic, y programar en VBA, hay un montón de ejemplos en la web de VBA. En el caso particular de AutoCAD podemos programar también en AutoLISP , LISP es un lenguaje de programación de alrededor de los 60 (si mal no recuerdo) que se basa en paréntesis, y que es muy potente para algunas cosas, sobre todo para funciones recursivas. AutoCAD adoptó una versión del lenguaje llamada AutoLISP, podemos acceder al compilador a través del menu tools/AutoLISP/Visual LISP Editor, incluso AutoCAD tiene unos ejemplos y tutoriales muy buenos de este lenguaje. Este ejemplo está hecho en Visual LISP , es bastante sencillo, lo único que ha...