Sachit kadle / Mbed 2 deprecated GPSTweeter

GPS Tweeter program that tweets the device's GPS location every 5 minutes.

Dependencies:   EthernetNetIf HTTPClient mbed

Fork of TwitterExample by Donatien Garnier

GPS.cpp@4:2d5b7c5b995e, 2013-10-16 (annotated)

Committer:
4180skrw
Date:
Wed Oct 16 20:32:46 2013 +0000
Revision:
4:2d5b7c5b995e
GPS Tweeter

Who changed what in which revision?

UserRevisionLine numberNew contents of line
4180skrw 4:2d5b7c5b995e 1 /* mbed EM-406 GPS Module Library
4180skrw 4:2d5b7c5b995e 2 * Copyright (c) 2008-2010, sford
4180skrw 4:2d5b7c5b995e 3 *
4180skrw 4:2d5b7c5b995e 4 * Permission is hereby granted, free of charge, to any person obtaining a copy
4180skrw 4:2d5b7c5b995e 5 * of this software and associated documentation files (the "Software"), to deal
4180skrw 4:2d5b7c5b995e 6 * in the Software without restriction, including without limitation the rights
4180skrw 4:2d5b7c5b995e 7 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
4180skrw 4:2d5b7c5b995e 8 * copies of the Software, and to permit persons to whom the Software is
4180skrw 4:2d5b7c5b995e 9 * furnished to do so, subject to the following conditions:
4180skrw 4:2d5b7c5b995e 10 *
4180skrw 4:2d5b7c5b995e 11 * The above copyright notice and this permission notice shall be included in
4180skrw 4:2d5b7c5b995e 12 * all copies or substantial portions of the Software.
4180skrw 4:2d5b7c5b995e 13 *
4180skrw 4:2d5b7c5b995e 14 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
4180skrw 4:2d5b7c5b995e 15 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
4180skrw 4:2d5b7c5b995e 16 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
4180skrw 4:2d5b7c5b995e 17 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
4180skrw 4:2d5b7c5b995e 18 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
4180skrw 4:2d5b7c5b995e 19 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
4180skrw 4:2d5b7c5b995e 20 * THE SOFTWARE.
4180skrw 4:2d5b7c5b995e 21 */
4180skrw 4:2d5b7c5b995e 22
4180skrw 4:2d5b7c5b995e 23 #include "GPS.h"
4180skrw 4:2d5b7c5b995e 24
4180skrw 4:2d5b7c5b995e 25 GPS::GPS(PinName tx, PinName rx) : _gps(tx, rx) {
4180skrw 4:2d5b7c5b995e 26 _gps.baud(4800);
4180skrw 4:2d5b7c5b995e 27 longitude = 0.0;
4180skrw 4:2d5b7c5b995e 28 latitude = 0.0;
4180skrw 4:2d5b7c5b995e 29 }
4180skrw 4:2d5b7c5b995e 30
4180skrw 4:2d5b7c5b995e 31 int GPS::sample() {
4180skrw 4:2d5b7c5b995e 32 float time;
4180skrw 4:2d5b7c5b995e 33 char ns, ew;
4180skrw 4:2d5b7c5b995e 34 int lock;
4180skrw 4:2d5b7c5b995e 35
4180skrw 4:2d5b7c5b995e 36 //return 1; //testing by Jigar
4180skrw 4:2d5b7c5b995e 37 while (1) {
4180skrw 4:2d5b7c5b995e 38 getline();
4180skrw 4:2d5b7c5b995e 39 //printf("\n\rentered the GPS.sample while loop \n\r %s\n\r", msg);
4180skrw 4:2d5b7c5b995e 40
4180skrw 4:2d5b7c5b995e 41
4180skrw 4:2d5b7c5b995e 42 // Check if it is a GPGGA msg (matches both locked and non-locked msg)
4180skrw 4:2d5b7c5b995e 43 // $GPGGA,000116.031,,,,,0,00,,,M,0.0,M,,0000*52
4180skrw 4:2d5b7c5b995e 44 /*
4180skrw 4:2d5b7c5b995e 45 eg3. $GPGGA,hhmmss.ss,llll.ll,a,yyyyy.yy,a,x,xx,x.x,x.x,M,x.x,M,x.x,xxxx*hh
4180skrw 4:2d5b7c5b995e 46 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
4180skrw 4:2d5b7c5b995e 47 1 = UTC of Position
4180skrw 4:2d5b7c5b995e 48 2 = Latitude
4180skrw 4:2d5b7c5b995e 49 3 = N or S
4180skrw 4:2d5b7c5b995e 50 4 = Longitude
4180skrw 4:2d5b7c5b995e 51 5 = E or W
4180skrw 4:2d5b7c5b995e 52 6 = GPS quality indicator (0=invalid; 1=GPS fix; 2=Diff. GPS fix)
4180skrw 4:2d5b7c5b995e 53 7 = Number of satellites in use [not those in view]
4180skrw 4:2d5b7c5b995e 54 8 = Horizontal dilution of position
4180skrw 4:2d5b7c5b995e 55 9 = Antenna altitude above/below mean sea level (geoid)
4180skrw 4:2d5b7c5b995e 56 10 = Meters (Antenna height unit)
4180skrw 4:2d5b7c5b995e 57 11 = Geoidal separation (Diff. between WGS-84 earth ellipsoid and
4180skrw 4:2d5b7c5b995e 58 mean sea level. -=geoid is below WGS-84 ellipsoid)
4180skrw 4:2d5b7c5b995e 59 12 = Meters (Units of geoidal separation)
4180skrw 4:2d5b7c5b995e 60 13 = Age in seconds since last update from diff. reference station
4180skrw 4:2d5b7c5b995e 61 14 = Diff. reference station ID#
4180skrw 4:2d5b7c5b995e 62 15 = Checksum
4180skrw 4:2d5b7c5b995e 63
4180skrw 4:2d5b7c5b995e 64 */
4180skrw 4:2d5b7c5b995e 65 // if (sscanf(msg, "GPGGA,%f,%f,%c,%f,%c,%*d,%*d, %*f,%*f,%*f,%*f,%*f,%*f,%d ", &time, &latitude, &ns, &longitude, &ew, &lock) >= 1) {
4180skrw 4:2d5b7c5b995e 66 if(sscanf(msg, "GPGGA,%f,%f,%c,%f,%c,%d", &time, &latitude, &ns, &longitude, &ew, &lock) >= 1) {
4180skrw 4:2d5b7c5b995e 67
4180skrw 4:2d5b7c5b995e 68 if (!lock) {
4180skrw 4:2d5b7c5b995e 69 longitude = 0.0;
4180skrw 4:2d5b7c5b995e 70 latitude = 0.0;
4180skrw 4:2d5b7c5b995e 71 return 0;
4180skrw 4:2d5b7c5b995e 72 } else {
4180skrw 4:2d5b7c5b995e 73 if (ns == 'S') {
4180skrw 4:2d5b7c5b995e 74 latitude *= -1.0;
4180skrw 4:2d5b7c5b995e 75 }
4180skrw 4:2d5b7c5b995e 76 if (ew == 'W') {
4180skrw 4:2d5b7c5b995e 77 longitude *= -1.0;
4180skrw 4:2d5b7c5b995e 78 }
4180skrw 4:2d5b7c5b995e 79 float degrees = trunc(latitude / 100.0f);
4180skrw 4:2d5b7c5b995e 80 float minutes = latitude - (degrees * 100.0f);
4180skrw 4:2d5b7c5b995e 81 latitude = degrees + minutes / 60.0f;
4180skrw 4:2d5b7c5b995e 82 degrees = trunc(longitude / 100.0f ); //degrees = trunc(longitude / 100.0f * 0.01f);
4180skrw 4:2d5b7c5b995e 83 minutes = longitude - (degrees * 100.0f);
4180skrw 4:2d5b7c5b995e 84 longitude = degrees + minutes / 60.0f;
4180skrw 4:2d5b7c5b995e 85 return 1;
4180skrw 4:2d5b7c5b995e 86 }
4180skrw 4:2d5b7c5b995e 87 }
4180skrw 4:2d5b7c5b995e 88 }
4180skrw 4:2d5b7c5b995e 89 }
4180skrw 4:2d5b7c5b995e 90
4180skrw 4:2d5b7c5b995e 91 float GPS::trunc(float v) {
4180skrw 4:2d5b7c5b995e 92 if (v < 0.0) {
4180skrw 4:2d5b7c5b995e 93 v*= -1.0;
4180skrw 4:2d5b7c5b995e 94 v = floor(v);
4180skrw 4:2d5b7c5b995e 95 v*=-1.0;
4180skrw 4:2d5b7c5b995e 96 } else {
4180skrw 4:2d5b7c5b995e 97 v = floor(v);
4180skrw 4:2d5b7c5b995e 98 }
4180skrw 4:2d5b7c5b995e 99 return v;
4180skrw 4:2d5b7c5b995e 100 }
4180skrw 4:2d5b7c5b995e 101
4180skrw 4:2d5b7c5b995e 102 void GPS::getline() {
4180skrw 4:2d5b7c5b995e 103 char c;
4180skrw 4:2d5b7c5b995e 104 while (c = _gps.getc() != '$'); // wait for the start of a line
4180skrw 4:2d5b7c5b995e 105 // printf("entered the getline loop\n\r");
4180skrw 4:2d5b7c5b995e 106 for (int i=0; i<256; i++) {
4180skrw 4:2d5b7c5b995e 107 msg[i] = _gps.getc();
4180skrw 4:2d5b7c5b995e 108 if (msg[i] == '\r') {
4180skrw 4:2d5b7c5b995e 109 msg[i] = 0;
4180skrw 4:2d5b7c5b995e 110 return;
4180skrw 4:2d5b7c5b995e 111 }
4180skrw 4:2d5b7c5b995e 112 }
4180skrw 4:2d5b7c5b995e 113 error("Overflowed message limit");
4180skrw 4:2d5b7c5b995e 114 }
4180skrw 4:2d5b7c5b995e 115
4180skrw 4:2d5b7c5b995e 116 /*
4180skrw 4:2d5b7c5b995e 117 $GPRMC,000115.039,V,,,,,,,291006,,*2C
4180skrw 4:2d5b7c5b995e 118 $GPGGA,000116.031,,,,,0,00,,,M,0.0,M,,0000*52
4180skrw 4:2d5b7c5b995e 119 $GPGSA,A,1,,,,,,,,,,,,,,,*1E
4180skrw 4:2d5b7c5b995e 120 $GPGSV,3,1,12,20,00,000,,10,00,000,,31,00,000,,27,00,000,*7C
4180skrw 4:2d5b7c5b995e 121 $GPGSV,3,2,12,19,00,000,,07,00,000,,04,00,000,,24,00,000,*76
4180skrw 4:2d5b7c5b995e 122 $GPGSV,3,3,12,16,00,000,,28,00,000,,26,00,000,,29,00,000,*78
4180skrw 4:2d5b7c5b995e 123 $GPRMC,000116.031,V,,,,,,,291006,,*27
4180skrw 4:2d5b7c5b995e 124 $GPGGA,000117.035,,,,,0,00,,,M,0.0,M,,0000*57
4180skrw 4:2d5b7c5b995e 125 $GPGSA,A,1,,,,,,,,,,,,,,,*1E
4180skrw 4:2d5b7c5b995e 126 $GPRMC,000117.035,V,,,,,,,291006,,*22
4180skrw 4:2d5b7c5b995e 127 $GPGGA,000118.039,,,,,0,00,,,M,0.0,M,,0000*54
4180skrw 4:2d5b7c5b995e 128 $GPGSA,A,1,,,,,,,,,,,,,,,*1E
4180skrw 4:2d5b7c5b995e 129 $GPRMC,000118.039,V,,,,,,,291006,,*21
4180skrw 4:2d5b7c5b995e 130 $GPGGA,000119.035,,,,,0,00,,,M,0.0,M,,0000*59
4180skrw 4:2d5b7c5b995e 131 $GPGSA,A,1,,,,,,,,,,,,,,,*1E
4180skrw 4:2d5b7c5b995e 132 $GPRMC,000119.035,V,,,,,,,291006,,*2C
4180skrw 4:2d5b7c5b995e 133 $GPGGA,000120.037,,,,,0,00,,,M,0.0,M,,0000*51
4180skrw 4:2d5b7c5b995e 134 $GPGSA,A,1,,,,,,,,,,,,,,,*1E
4180skrw 4:2d5b7c5b995e 135 $GPRMC,000120.037,V,,,,,,,291006,,*24
4180skrw 4:2d5b7c5b995e 136
4180skrw 4:2d5b7c5b995e 137 */