SAIT ARIS / LRAT-example-lorawan-REFACTOR-and-CLEAN-Branch

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependencies:   Custom_LSM303 Custom_UBloxGPS LRAT-mbed-os USBDevice mbed-lora-radio-drv stm32EEPROM

Fork of LRAT-example-lorawan by SAIT ARIS

main.cpp@35:73b3963c6dd3, 2018-08-27 (annotated)

Committer:
lpeters
Date:
Mon Aug 27 15:09:11 2018 +0000
Revision:
35:73b3963c6dd3
Parent:
34:341fb423e74b
Child:
36:dcc6f89fa39a
Hardware definitions for Disco1/Disco2/LRAT, disabled USBSerial due to issues with LoRaWAN stack.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mbed_official 0:7037ed05f54f 1 /**
mbed_official 0:7037ed05f54f 2 * Copyright (c) 2017, Arm Limited and affiliates.
mbed_official 0:7037ed05f54f 3 * SPDX-License-Identifier: Apache-2.0
mbed_official 0:7037ed05f54f 4 *
mbed_official 0:7037ed05f54f 5 * Licensed under the Apache License, Version 2.0 (the "License");
mbed_official 0:7037ed05f54f 6 * you may not use this file except in compliance with the License.
mbed_official 0:7037ed05f54f 7 * You may obtain a copy of the License at
mbed_official 0:7037ed05f54f 8 *
mbed_official 0:7037ed05f54f 9 * http://www.apache.org/licenses/LICENSE-2.0
mbed_official 0:7037ed05f54f 10 *
mbed_official 0:7037ed05f54f 11 * Unless required by applicable law or agreed to in writing, software
mbed_official 0:7037ed05f54f 12 * distributed under the License is distributed on an "AS IS" BASIS,
mbed_official 0:7037ed05f54f 13 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
mbed_official 0:7037ed05f54f 14 * See the License for the specific language governing permissions and
mbed_official 0:7037ed05f54f 15 * limitations under the License.
mbed_official 0:7037ed05f54f 16 */
lpeters 34:341fb423e74b 17 //#define TARGET_LRAT 1
lpeters 35:73b3963c6dd3 18 #define TARGET_DISCO1 1
lpeters 35:73b3963c6dd3 19 //#define TARGET_DISCO2 1
lpeters 34:341fb423e74b 20 //#define SENSOR_TEMP 1
mbed_official 0:7037ed05f54f 21 #include <stdio.h>
tchari 30:ff249a9156dc 22 #include "mbed.h"
mbed_official 3:8c7198d1a2a1 23
mbed_official 0:7037ed05f54f 24 #include "lorawan/LoRaWANInterface.h"
mbed_official 0:7037ed05f54f 25 #include "lorawan/system/lorawan_data_structures.h"
mbed_official 0:7037ed05f54f 26 #include "events/EventQueue.h"
mbed_official 0:7037ed05f54f 27
mbed_official 0:7037ed05f54f 28 // Application helpers
mbed_official 0:7037ed05f54f 29 #include "DummySensor.h"
mbed_official 0:7037ed05f54f 30 #include "trace_helper.h"
mbed_official 0:7037ed05f54f 31 #include "lora_radio_helper.h"
mbed_official 0:7037ed05f54f 32
tchari 30:ff249a9156dc 33 #include "mbed-trace/mbed_trace.h"
tchari 30:ff249a9156dc 34 #define TRACE_GROUP "MAIN"
tchari 30:ff249a9156dc 35
mbed_official 0:7037ed05f54f 36 using namespace events;
mbed_official 0:7037ed05f54f 37
mbed_official 12:5015dfead3f2 38 // Max payload size can be LORAMAC_PHY_MAXPAYLOAD.
mbed_official 12:5015dfead3f2 39 // This example only communicates with much shorter messages (<30 bytes).
mbed_official 12:5015dfead3f2 40 // If longer messages are used, these buffers must be changed accordingly.
mbed_official 12:5015dfead3f2 41 uint8_t tx_buffer[30];
mbed_official 12:5015dfead3f2 42 uint8_t rx_buffer[30];
mbed_official 0:7037ed05f54f 43
mbed_official 0:7037ed05f54f 44 /*
mbed_official 0:7037ed05f54f 45 * Sets up an application dependent transmission timer in ms. Used only when Duty Cycling is off for testing
mbed_official 0:7037ed05f54f 46 */
mbed_official 0:7037ed05f54f 47 #define TX_TIMER 10000
mbed_official 0:7037ed05f54f 48
mbed_official 0:7037ed05f54f 49 /**
mbed_official 0:7037ed05f54f 50 * Maximum number of events for the event queue.
mbed_official 12:5015dfead3f2 51 * 10 is the safe number for the stack events, however, if application
mbed_official 0:7037ed05f54f 52 * also uses the queue for whatever purposes, this number should be increased.
mbed_official 0:7037ed05f54f 53 */
mbed_official 12:5015dfead3f2 54 #define MAX_NUMBER_OF_EVENTS 10
mbed_official 0:7037ed05f54f 55
mbed_official 0:7037ed05f54f 56 /**
mbed_official 0:7037ed05f54f 57 * Maximum number of retries for CONFIRMED messages before giving up
mbed_official 0:7037ed05f54f 58 */
tchari 30:ff249a9156dc 59 #define CONFIRMED_MSG_RETRY_COUNTER 15
mbed_official 0:7037ed05f54f 60
mbed_official 0:7037ed05f54f 61 /**
mbed_official 0:7037ed05f54f 62 * Dummy pin for dummy sensor
mbed_official 0:7037ed05f54f 63 */
mbed_official 0:7037ed05f54f 64 #define PC_9 0
mbed_official 0:7037ed05f54f 65
mbed_official 0:7037ed05f54f 66 /**
mbed_official 0:7037ed05f54f 67 * Dummy sensor class object
mbed_official 0:7037ed05f54f 68 */
mbed_official 0:7037ed05f54f 69 DS1820 ds1820(PC_9);
mbed_official 0:7037ed05f54f 70
mbed_official 0:7037ed05f54f 71 /**
mbed_official 0:7037ed05f54f 72 * This event queue is the global event queue for both the
mbed_official 0:7037ed05f54f 73 * application and stack. To conserve memory, the stack is designed to run
mbed_official 0:7037ed05f54f 74 * in the same thread as the application and the application is responsible for
mbed_official 0:7037ed05f54f 75 * providing an event queue to the stack that will be used for ISR deferment as
mbed_official 0:7037ed05f54f 76 * well as application information event queuing.
mbed_official 0:7037ed05f54f 77 */
mbed_official 0:7037ed05f54f 78 static EventQueue ev_queue(MAX_NUMBER_OF_EVENTS * EVENTS_EVENT_SIZE);
mbed_official 0:7037ed05f54f 79
mbed_official 0:7037ed05f54f 80 /**
mbed_official 0:7037ed05f54f 81 * Event handler.
mbed_official 0:7037ed05f54f 82 *
mbed_official 0:7037ed05f54f 83 * This will be passed to the LoRaWAN stack to queue events for the
mbed_official 0:7037ed05f54f 84 * application which in turn drive the application.
mbed_official 0:7037ed05f54f 85 */
mbed_official 0:7037ed05f54f 86 static void lora_event_handler(lorawan_event_t event);
mbed_official 0:7037ed05f54f 87
mbed_official 0:7037ed05f54f 88 /**
mbed_official 2:dc95ac6d6d4e 89 * Constructing Mbed LoRaWANInterface and passing it down the radio object.
mbed_official 0:7037ed05f54f 90 */
mbed_official 2:dc95ac6d6d4e 91 static LoRaWANInterface lorawan(radio);
mbed_official 0:7037ed05f54f 92
mbed_official 0:7037ed05f54f 93 /**
mbed_official 0:7037ed05f54f 94 * Application specific callbacks
mbed_official 0:7037ed05f54f 95 */
mbed_official 0:7037ed05f54f 96 static lorawan_app_callbacks_t callbacks;
mbed_official 0:7037ed05f54f 97
lpeters 35:73b3963c6dd3 98 /*
lpeters 35:73b3963c6dd3 99 #if defined(TARGET_LRAT) or defined(TARGET_DISCO2)
lpeters 34:341fb423e74b 100 #include "USBSerial.h"
lpeters 34:341fb423e74b 101 USBSerial serial;
lpeters 34:341fb423e74b 102 FileHandle* mbed::mbed_override_console(int) {
lpeters 34:341fb423e74b 103 return &serial;
lpeters 34:341fb423e74b 104 }
lpeters 34:341fb423e74b 105 #endif
lpeters 35:73b3963c6dd3 106 */
lpeters 34:341fb423e74b 107
lpeters 35:73b3963c6dd3 108 uint32_t mytime = 0;
lpeters 35:73b3963c6dd3 109 uint8_t mybatt = 0;
lpeters 35:73b3963c6dd3 110 double mylat = 0;
lpeters 35:73b3963c6dd3 111 double mylon = 0;
lpeters 33:e47306c32791 112
lpeters 33:e47306c32791 113 int16_t myAccX = 0;
lpeters 33:e47306c32791 114 int16_t myAccY = 0;
lpeters 33:e47306c32791 115 int16_t myAccZ = 0;
lpeters 33:e47306c32791 116 int16_t myMagX = 0;
lpeters 33:e47306c32791 117 int16_t myMagY = 0;
lpeters 33:e47306c32791 118 int16_t myMagZ = 0;
lpeters 33:e47306c32791 119 int16_t myOffX = 0;
lpeters 33:e47306c32791 120 int16_t myOffY = 0;
lpeters 33:e47306c32791 121 int16_t myOffZ = 0;
lpeters 33:e47306c32791 122 int16_t myTemp = 0;
lpeters 33:e47306c32791 123
lpeters 33:e47306c32791 124 int16_t accMinX = 0;
lpeters 33:e47306c32791 125 int16_t accMinY = 0;
lpeters 33:e47306c32791 126 int16_t accMinZ = 0;
lpeters 33:e47306c32791 127 int16_t accMaxX = 0;
lpeters 33:e47306c32791 128 int16_t accMaxY = 0;
lpeters 33:e47306c32791 129 int16_t accMaxZ = 0;
lpeters 33:e47306c32791 130
lpeters 33:e47306c32791 131 int16_t magMinX = 0;
lpeters 33:e47306c32791 132 int16_t magMinY = 0;
lpeters 33:e47306c32791 133 int16_t magMinZ = 0;
lpeters 33:e47306c32791 134 int16_t magMaxX = 0;
lpeters 33:e47306c32791 135 int16_t magMaxY = 0;
lpeters 33:e47306c32791 136 int16_t magMaxZ = 0;
lpeters 33:e47306c32791 137
lpeters 33:e47306c32791 138 #define NEOM8M_ADR_GPS 0x84
lpeters 34:341fb423e74b 139 //#define LSM303_ADR_ACC 0x32
lpeters 33:e47306c32791 140 #define LSM303_ADR_MAG 0x3C
tchari 30:ff249a9156dc 141
lpeters 33:e47306c32791 142 #define NEOM8M_REG_GPS_LENH 0xFD
lpeters 33:e47306c32791 143 #define NEOM8M_REG_GPS_LENL 0xFE
lpeters 33:e47306c32791 144 #define NEOM8M_REG_GPS_DATA 0xFE
lpeters 33:e47306c32791 145 #define LSM303_REG_ACC_STATUS_REG_AUX_A 0x07
lpeters 34:341fb423e74b 146 //#define LSM303_REG_ACC_OUT_TEMP_L_A 0x0C
lpeters 34:341fb423e74b 147 //#define LSM303_REG_ACC_OUT_TEMP_H_A 0x0D
lpeters 33:e47306c32791 148 #define LSM303_REG_ACC_WHO_AM_I_A 0x0F
lpeters 34:341fb423e74b 149 //#define LSM303_REG_ACC_TEMP_CFG_REG_A 0x1F
lpeters 33:e47306c32791 150 #define LSM303_REG_ACC_CTRL_REG1_A 0x20
lpeters 33:e47306c32791 151 #define LSM303_REG_ACC_CTRL_REG2_A 0x21
lpeters 33:e47306c32791 152 #define LSM303_REG_ACC_CTRL_REG3_A 0x22
lpeters 33:e47306c32791 153 #define LSM303_REG_ACC_CTRL_REG4_A 0x23
lpeters 33:e47306c32791 154 #define LSM303_REG_ACC_CTRL_REG5_A 0x24
lpeters 34:341fb423e74b 155 #define LSM303_REG_ACC_CTRL_REG6_A 0x25
lpeters 33:e47306c32791 156 #define LSM303_REG_ACC_STATUS_REG_A 0x27
lpeters 33:e47306c32791 157 #define LSM303_REG_ACC_OUT_X_L_A 0x28
lpeters 33:e47306c32791 158 #define LSM303_REG_ACC_OUT_X_H_A 0x29
lpeters 33:e47306c32791 159 #define LSM303_REG_ACC_OUT_Y_L_A 0x2A
lpeters 33:e47306c32791 160 #define LSM303_REG_ACC_OUT_Y_H_A 0x2B
lpeters 33:e47306c32791 161 #define LSM303_REG_ACC_OUT_Z_L_A 0x2C
lpeters 33:e47306c32791 162 #define LSM303_REG_ACC_OUT_Z_H_A 0x2D
lpeters 33:e47306c32791 163 #define LSM303_REG_ACC_INT1_CFG_A 0x30
lpeters 33:e47306c32791 164 #define LSM303_REG_ACC_INT1_SRC_A 0x31
lpeters 33:e47306c32791 165 #define LSM303_REG_ACC_INT1_THS_A 0x32
lpeters 33:e47306c32791 166 #define LSM303_REG_ACC_INT1_DURATION_A 0x33
lpeters 35:73b3963c6dd3 167
lpeters 33:e47306c32791 168 #define LSM303_REG_MAG_OFFSET_X_REG_L_M 0x45
lpeters 33:e47306c32791 169 #define LSM303_REG_MAG_OFFSET_X_REG_H_M 0x46
lpeters 33:e47306c32791 170 #define LSM303_REG_MAG_OFFSET_Y_REG_L_M 0x47
lpeters 33:e47306c32791 171 #define LSM303_REG_MAG_OFFSET_Y_REG_H_M 0x48
lpeters 33:e47306c32791 172 #define LSM303_REG_MAG_OFFSET_Z_REG_L_M 0x49
lpeters 33:e47306c32791 173 #define LSM303_REG_MAG_OFFSET_Z_REG_H_M 0x4A
lpeters 34:341fb423e74b 174 //#define LSM303_REG_MAG_WHO_AM_I_M 0x4F
lpeters 34:341fb423e74b 175 //#define LSM303_REG_MAG_CFG_REG_A_M 0x60
lpeters 34:341fb423e74b 176 //#define LSM303_REG_MAG_CFG_REG_B_M 0x61
lpeters 34:341fb423e74b 177 //#define LSM303_REG_MAG_CFG_REG_C_M 0x62
lpeters 33:e47306c32791 178 #define LSM303_REG_MAG_INT_CTRL_REG_M 0x63
lpeters 33:e47306c32791 179 #define LSM303_REG_MAG_INT_SOURCE_REG_M 0x64
lpeters 33:e47306c32791 180 #define LSM303_REG_MAG_INT_THS_L_REG_M 0x65
lpeters 33:e47306c32791 181 #define LSM303_REG_MAG_INT_THS_H_REG_M 0x66
lpeters 34:341fb423e74b 182 //#define LSM303_REG_MAG_STATUS_REG_M 0x67
lpeters 34:341fb423e74b 183 //#define LSM303_REG_MAG_OUTX_L_REG_M 0x68
lpeters 34:341fb423e74b 184 //#define LSM303_REG_MAG_OUTX_H_REG_M 0x69
lpeters 34:341fb423e74b 185 //#define LSM303_REG_MAG_OUTY_L_REG_M 0x6A
lpeters 34:341fb423e74b 186 //#define LSM303_REG_MAG_OUTY_H_REG_M 0x6B
lpeters 34:341fb423e74b 187 //#define LSM303_REG_MAG_OUTZ_L_REG_M 0x6C
lpeters 34:341fb423e74b 188 //#define LSM303_REG_MAG_OUTZ_H_REG_M 0x6D
lpeters 33:e47306c32791 189
lpeters 35:73b3963c6dd3 190 #define EEPROM_MAX 0x17FF
lpeters 35:73b3963c6dd3 191
lpeters 34:341fb423e74b 192 #if defined(TARGET_LRAT)
lpeters 34:341fb423e74b 193 #define LEDR PB_6
lpeters 34:341fb423e74b 194 #define LEDG PB_7
lpeters 34:341fb423e74b 195 #define LEDB PB_5
lpeters 34:341fb423e74b 196 #define LEDW PB_2
lpeters 35:73b3963c6dd3 197 #define PIN_ACC PB_14
lpeters 35:73b3963c6dd3 198 #define PIN_MAG PB_12
lpeters 35:73b3963c6dd3 199 #define PIN_BTN PA_5
lpeters 35:73b3963c6dd3 200 #define PIN_ALT PA_4
lpeters 34:341fb423e74b 201 #define LSM303_ADR_ACC 0x3A
lpeters 34:341fb423e74b 202 #define LSM303_REG_MAG_WHO_AM_I_M 0x0F
lpeters 34:341fb423e74b 203 #define LSM303_WHO_ACC 0x41
lpeters 34:341fb423e74b 204 #define LSM303_WHO_MAG 0x3D
lpeters 34:341fb423e74b 205 #define LSM303_CTRL_REG7_A 0x26
lpeters 34:341fb423e74b 206 #define LSM303_REG_MAG_CTRL_REG1_M 0x20
lpeters 34:341fb423e74b 207 #define LSM303_REG_MAG_CTRL_REG2_M 0x21
lpeters 34:341fb423e74b 208 #define LSM303_REG_MAG_CTRL_REG3_M 0x22
lpeters 34:341fb423e74b 209 #define LSM303_REG_MAG_CTRL_REG4_M 0x23
lpeters 34:341fb423e74b 210 #define LSM303_REG_MAG_CTRL_REG5_M 0x24
lpeters 34:341fb423e74b 211 #define LSM303_REG_MAG_STATUS_REG_M 0x27
lpeters 34:341fb423e74b 212 #define LSM303_REG_MAG_OUTX_L_REG_M 0x28
lpeters 34:341fb423e74b 213 #define LSM303_REG_MAG_OUTX_H_REG_M 0x29
lpeters 34:341fb423e74b 214 #define LSM303_REG_MAG_OUTY_L_REG_M 0x2A
lpeters 34:341fb423e74b 215 #define LSM303_REG_MAG_OUTY_H_REG_M 0x2B
lpeters 34:341fb423e74b 216 #define LSM303_REG_MAG_OUTZ_L_REG_M 0x2C
lpeters 34:341fb423e74b 217 #define LSM303_REG_MAG_OUTZ_H_REG_M 0x2D
lpeters 34:341fb423e74b 218 #define LSM303_REG_MAG_TEMP_L_M 0x2E
lpeters 34:341fb423e74b 219 #define LSM303_REG_MAG_TEMP_H_M 0x2F
lpeters 34:341fb423e74b 220 #define LSM303_REG_MAG_TEMP_CFG_REG_A 0x1F
lpeters 34:341fb423e74b 221 #define CFG_ACC_ADR LSM303_REG_ACC_CTRL_REG1_A
lpeters 34:341fb423e74b 222 #define CFG_ACC_LEN 7
lpeters 34:341fb423e74b 223 #define CFG_MAG_ADR LSM303_REG_MAG_CTRL_REG1_M
lpeters 34:341fb423e74b 224 #define CFG_MAG_LEN 5
lpeters 34:341fb423e74b 225 #else
lpeters 34:341fb423e74b 226 #define LEDR PB_7
lpeters 34:341fb423e74b 227 #define LEDG PB_5
lpeters 34:341fb423e74b 228 #define LEDB PB_6
lpeters 34:341fb423e74b 229 #define LEDW PA_5
lpeters 35:73b3963c6dd3 230 #define PIN_ACC PB_14 // Not really.
lpeters 35:73b3963c6dd3 231 #if defined(TARGET_DISCO2)
lpeters 35:73b3963c6dd3 232 #define PIN_MAG PB_13
lpeters 35:73b3963c6dd3 233 #else
lpeters 35:73b3963c6dd3 234 #define PIN_MAG PA_10
lpeters 35:73b3963c6dd3 235 #endif
lpeters 35:73b3963c6dd3 236 #define PIN_BTN PB_2
lpeters 34:341fb423e74b 237 #define LSM303_ADR_ACC 0x32
lpeters 34:341fb423e74b 238 #define LSM303_REG_MAG_WHO_AM_I_M 0x4F
lpeters 34:341fb423e74b 239 #define LSM303_WHO_ACC 0x33
lpeters 34:341fb423e74b 240 #define LSM303_WHO_MAG 0x40
lpeters 34:341fb423e74b 241 #define LSM303_REG_ACC_OUT_TEMP_L_A 0x0C
lpeters 34:341fb423e74b 242 #define LSM303_REG_ACC_OUT_TEMP_H_A 0x0D
lpeters 34:341fb423e74b 243 #define LSM303_REG_ACC_TEMP_CFG_REG_A 0x1F
lpeters 34:341fb423e74b 244 #define LSM303_REG_MAG_CFG_REG_A_M 0x60
lpeters 34:341fb423e74b 245 #define LSM303_REG_MAG_CFG_REG_B_M 0x61
lpeters 34:341fb423e74b 246 #define LSM303_REG_MAG_CFG_REG_C_M 0x62
lpeters 34:341fb423e74b 247 #define LSM303_REG_MAG_STATUS_REG_M 0x67
lpeters 34:341fb423e74b 248 #define LSM303_REG_MAG_OUTX_L_REG_M 0x68
lpeters 34:341fb423e74b 249 #define LSM303_REG_MAG_OUTX_H_REG_M 0x69
lpeters 34:341fb423e74b 250 #define LSM303_REG_MAG_OUTY_L_REG_M 0x6A
lpeters 34:341fb423e74b 251 #define LSM303_REG_MAG_OUTY_H_REG_M 0x6B
lpeters 34:341fb423e74b 252 #define LSM303_REG_MAG_OUTZ_L_REG_M 0x6C
lpeters 34:341fb423e74b 253 #define LSM303_REG_MAG_OUTZ_H_REG_M 0x6D
lpeters 34:341fb423e74b 254 #define CFG_ACC_ADR LSM303_REG_ACC_TEMP_CFG_REG_A // Start Disco at TEMP CFG.
lpeters 34:341fb423e74b 255 #define CFG_ACC_LEN 7
lpeters 34:341fb423e74b 256 #define CFG_MAG_ADR LSM303_REG_MAG_CFG_REG_A_M
lpeters 34:341fb423e74b 257 #define CFG_MAG_LEN 3
lpeters 34:341fb423e74b 258 #endif
tchari 30:ff249a9156dc 259
tchari 30:ff249a9156dc 260 I2C i2c(PB_9, PB_8);
lpeters 35:73b3963c6dd3 261 InterruptIn accPin(PIN_ACC);
lpeters 35:73b3963c6dd3 262 InterruptIn magPin(PIN_MAG);
lpeters 35:73b3963c6dd3 263 InterruptIn btnPin(PIN_BTN);
lpeters 33:e47306c32791 264
lpeters 35:73b3963c6dd3 265 uint8_t cfg;
lpeters 33:e47306c32791 266 char ret;
lpeters 33:e47306c32791 267 char rda = '\0';
lpeters 33:e47306c32791 268 char cmd[2];
lpeters 33:e47306c32791 269 char buf[83];
lpeters 35:73b3963c6dd3 270 uint8_t pos = 0;
lpeters 35:73b3963c6dd3 271
lpeters 33:e47306c32791 272 int accShift = 0;
lpeters 33:e47306c32791 273 int accScale = 0;
lpeters 33:e47306c32791 274 int accEvent = 0;
lpeters 35:73b3963c6dd3 275 uint8_t accSFire = 0;
lpeters 35:73b3963c6dd3 276 uint8_t accHFire = 0;
lpeters 35:73b3963c6dd3 277 uint8_t accSLIRQ = 0;
lpeters 35:73b3963c6dd3 278 uint8_t accSHIRQ = 0;
lpeters 33:e47306c32791 279 int magEvent = 0;
lpeters 35:73b3963c6dd3 280 uint8_t magSFire = 0;
lpeters 35:73b3963c6dd3 281 uint8_t magHFire = 0;
lpeters 35:73b3963c6dd3 282 uint8_t magSLIRQ = 0;
lpeters 35:73b3963c6dd3 283 uint8_t magSHIRQ = 0;
lpeters 35:73b3963c6dd3 284 uint8_t btnHFire = 0;
lpeters 33:e47306c32791 285
lpeters 35:73b3963c6dd3 286 char *res;
lpeters 35:73b3963c6dd3 287 char sPass[26] = "[\u001b[32mPASS\u001b[0m]";
lpeters 35:73b3963c6dd3 288 char sFail[26] = "[\u001b[31mFAIL\u001b[0m]";
lpeters 33:e47306c32791 289 char cmdSendLoop[9] = "SendLoop";
lpeters 33:e47306c32791 290
lpeters 35:73b3963c6dd3 291 time_t tInit = 0;
lpeters 35:73b3963c6dd3 292 time_t tBump = 0;
lpeters 35:73b3963c6dd3 293 time_t tLast = 0;
lpeters 35:73b3963c6dd3 294 time_t tNext = 0;
lpeters 35:73b3963c6dd3 295
lpeters 34:341fb423e74b 296 DigitalOut myLedR(LEDR);
lpeters 34:341fb423e74b 297 DigitalOut myLedG(LEDG);
lpeters 34:341fb423e74b 298 DigitalOut myLedB(LEDB);
lpeters 34:341fb423e74b 299 DigitalOut myLedW(LEDW);
lpeters 34:341fb423e74b 300
lpeters 34:341fb423e74b 301 void magInitSequence();
lpeters 34:341fb423e74b 302 void accInitSequence();
lpeters 34:341fb423e74b 303 void gpsInitSequence();
lpeters 34:341fb423e74b 304 void tmpRead();
lpeters 34:341fb423e74b 305 void magRead();
lpeters 34:341fb423e74b 306 void accRead();
lpeters 34:341fb423e74b 307 void gpsRead();
lpeters 34:341fb423e74b 308
lpeters 35:73b3963c6dd3 309 void onBtnIrq()
lpeters 35:73b3963c6dd3 310 {
lpeters 35:73b3963c6dd3 311 btnHFire++;
lpeters 35:73b3963c6dd3 312 // tBump = time(NULL);
lpeters 35:73b3963c6dd3 313 // tNext = tBump;
lpeters 35:73b3963c6dd3 314 tNext = 0;
lpeters 35:73b3963c6dd3 315 }
lpeters 35:73b3963c6dd3 316
lpeters 33:e47306c32791 317 void onAccIrq()
lpeters 33:e47306c32791 318 {
lpeters 33:e47306c32791 319 accHFire++;
lpeters 35:73b3963c6dd3 320 // tBump = time(NULL);
lpeters 35:73b3963c6dd3 321 // tNext = tBump;
lpeters 35:73b3963c6dd3 322 tNext = 0;
lpeters 33:e47306c32791 323 }
lpeters 33:e47306c32791 324
lpeters 33:e47306c32791 325 void onMagIrq()
lpeters 33:e47306c32791 326 {
lpeters 33:e47306c32791 327 magHFire++;
lpeters 35:73b3963c6dd3 328 // tBump = time(NULL);
lpeters 35:73b3963c6dd3 329 // tNext = tBump;
lpeters 35:73b3963c6dd3 330 tNext = 0;
lpeters 33:e47306c32791 331 }
lpeters 33:e47306c32791 332
lpeters 33:e47306c32791 333 void accDumpCfg()
lpeters 33:e47306c32791 334 {
lpeters 34:341fb423e74b 335 char start = CFG_ACC_ADR;
lpeters 34:341fb423e74b 336 for (int i = 0; i < CFG_ACC_LEN; i++)
lpeters 33:e47306c32791 337 {
lpeters 33:e47306c32791 338 cmd[0] = start + i;
lpeters 33:e47306c32791 339 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 33:e47306c32791 340 i2c.read(LSM303_ADR_ACC, &buf[i], 1);
lpeters 33:e47306c32791 341 }
lpeters 34:341fb423e74b 342 printf("CFGACC: | ");
lpeters 34:341fb423e74b 343 for (int i = 0; i < CFG_ACC_LEN; i++)
lpeters 34:341fb423e74b 344 {
lpeters 34:341fb423e74b 345 printf("%02X ", buf[i]);
lpeters 34:341fb423e74b 346 }
lpeters 34:341fb423e74b 347 printf("|\r\n");
lpeters 33:e47306c32791 348 }
lpeters 33:e47306c32791 349
lpeters 33:e47306c32791 350 void magDumpCfg()
lpeters 33:e47306c32791 351 {
lpeters 34:341fb423e74b 352 char start = CFG_MAG_ADR;
lpeters 34:341fb423e74b 353 for (int i = 0; i < CFG_MAG_LEN; i++)
lpeters 33:e47306c32791 354 {
lpeters 33:e47306c32791 355 cmd[0] = start + i;
lpeters 33:e47306c32791 356 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 33:e47306c32791 357 i2c.read(LSM303_ADR_MAG, &buf[i], 1);
lpeters 33:e47306c32791 358 }
lpeters 34:341fb423e74b 359 printf("CFGMAG: | ");
lpeters 34:341fb423e74b 360 for (int i = 0; i < CFG_MAG_LEN; i++)
lpeters 34:341fb423e74b 361 {
lpeters 34:341fb423e74b 362 printf("%02X ", buf[i]);
lpeters 34:341fb423e74b 363 }
lpeters 34:341fb423e74b 364 printf("|\r\n");
lpeters 33:e47306c32791 365 }
lpeters 33:e47306c32791 366
mbed_official 0:7037ed05f54f 367 /**
mbed_official 0:7037ed05f54f 368 * Entry point for application
mbed_official 0:7037ed05f54f 369 */
mbed_official 0:7037ed05f54f 370 int main (void)
mbed_official 0:7037ed05f54f 371 {
lpeters 35:73b3963c6dd3 372 //i2c.frequency(400000);
lpeters 33:e47306c32791 373 wait(4);
lpeters 33:e47306c32791 374 printf("\r\n-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-\r\n");
lpeters 34:341fb423e74b 375
lpeters 34:341fb423e74b 376 // Boot Flash
lpeters 34:341fb423e74b 377 for (int i = 0; i <= 64; i++)
lpeters 33:e47306c32791 378 {
lpeters 34:341fb423e74b 379 myLedR = i & 0x01;
lpeters 34:341fb423e74b 380 myLedG = i & 0x02;
lpeters 34:341fb423e74b 381 myLedB = i & 0x04;
lpeters 34:341fb423e74b 382 myLedW = i & 0x08;
lpeters 34:341fb423e74b 383 wait(0.01);
lpeters 33:e47306c32791 384 }
lpeters 34:341fb423e74b 385 wait(4);
lpeters 35:73b3963c6dd3 386 // btnPin.rise(&onBtnIrq);
lpeters 35:73b3963c6dd3 387
mbed_official 0:7037ed05f54f 388 // setup tracing
mbed_official 0:7037ed05f54f 389 setup_trace();
mbed_official 0:7037ed05f54f 390
mbed_official 0:7037ed05f54f 391 // stores the status of a call to LoRaWAN protocol
mbed_official 0:7037ed05f54f 392 lorawan_status_t retcode;
lpeters 33:e47306c32791 393
lpeters 34:341fb423e74b 394 /* I2C init */
lpeters 34:341fb423e74b 395 ret = 0x00;
lpeters 34:341fb423e74b 396 magDumpCfg();
lpeters 34:341fb423e74b 397 accDumpCfg();
lpeters 34:341fb423e74b 398 magInitSequence();
lpeters 34:341fb423e74b 399 accInitSequence();
lpeters 34:341fb423e74b 400 gpsInitSequence();
lpeters 33:e47306c32791 401 magDumpCfg();
lpeters 33:e47306c32791 402 accDumpCfg();
lpeters 33:e47306c32791 403
lpeters 34:341fb423e74b 404 cfg = 0x00;
lpeters 34:341fb423e74b 405 #if defined(TARGET_LRAT)
lpeters 33:e47306c32791 406 cmd[0] = LSM303_REG_ACC_CTRL_REG1_A;
lpeters 33:e47306c32791 407 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 33:e47306c32791 408 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 34:341fb423e74b 409 cfg |= (ret & 0x80) >> 7;
lpeters 33:e47306c32791 410 cmd[0] = LSM303_REG_ACC_CTRL_REG4_A;
lpeters 33:e47306c32791 411 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 33:e47306c32791 412 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 34:341fb423e74b 413 accScale = 1 << (!(ret & 0x30) ? 0 : ((ret & 0x30) >> 4) - 1);
lpeters 34:341fb423e74b 414 cmd[0] = LSM303_REG_MAG_CTRL_REG2_M;
lpeters 34:341fb423e74b 415 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 416 i2c.read(LSM303_ADR_MAG, &ret, 1);
lpeters 34:341fb423e74b 417 cfg |= (ret & 0x60) >> 1;
lpeters 34:341fb423e74b 418 //accShift = 0; // Full 16-bit resolution
lpeters 34:341fb423e74b 419 accShift = 4;
lpeters 34:341fb423e74b 420 #else
lpeters 33:e47306c32791 421 cmd[0] = LSM303_REG_ACC_CTRL_REG1_A;
lpeters 33:e47306c32791 422 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 33:e47306c32791 423 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 33:e47306c32791 424 cfg |= (ret & 0x08) >> 3;
lpeters 33:e47306c32791 425 cmd[0] = LSM303_REG_ACC_CTRL_REG4_A;
lpeters 33:e47306c32791 426 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 33:e47306c32791 427 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 33:e47306c32791 428 cfg |= (ret & 0x08) >> 2;
lpeters 33:e47306c32791 429 accScale = 1 << ((ret & 0x30) >> 4);
lpeters 33:e47306c32791 430 cmd[0] = LSM303_REG_MAG_CFG_REG_A_M;
lpeters 33:e47306c32791 431 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 33:e47306c32791 432 i2c.read(LSM303_ADR_MAG, &ret, 1);
lpeters 33:e47306c32791 433 cfg |= (ret & 0x10);
lpeters 33:e47306c32791 434 if (cfg & 0x01)
lpeters 33:e47306c32791 435 accShift = 8;
lpeters 33:e47306c32791 436 else if (cfg & 0x02)
lpeters 33:e47306c32791 437 accShift = 4;
lpeters 33:e47306c32791 438 else
lpeters 33:e47306c32791 439 accShift = 6;
lpeters 34:341fb423e74b 440 #endif
lpeters 33:e47306c32791 441 printf("Quality: %02x AccShift: %d AccScale: %d\r\n", cfg, accShift, accScale);
lpeters 33:e47306c32791 442
lpeters 35:73b3963c6dd3 443 time_t tNow;
lpeters 35:73b3963c6dd3 444 /*
lpeters 35:73b3963c6dd3 445 // while(1)
lpeters 35:73b3963c6dd3 446 // {
lpeters 35:73b3963c6dd3 447 tNow = time(NULL);
lpeters 35:73b3963c6dd3 448 printf("RTC: %08X\r\n", tNow);
lpeters 34:341fb423e74b 449 #if defined(SENSOR_TEMP)
lpeters 34:341fb423e74b 450 tmpRead();
lpeters 34:341fb423e74b 451 #endif
lpeters 34:341fb423e74b 452 magRead();
lpeters 34:341fb423e74b 453 accRead();
lpeters 34:341fb423e74b 454 gpsRead();
lpeters 35:73b3963c6dd3 455 printf("TIM: %d, SAT: %d, LAT: %f, LON: %f\r\n", mytime, mybatt, mylat, mylon);
lpeters 35:73b3963c6dd3 456 printf("IRQ: A=%02X M=%02X B=%02X\r\n", accHFire, magHFire, btnHFire);
lpeters 35:73b3963c6dd3 457 wait(1);
lpeters 35:73b3963c6dd3 458 // }
lpeters 35:73b3963c6dd3 459 */
lpeters 35:73b3963c6dd3 460
lpeters 35:73b3963c6dd3 461 printf("CONTROL LOOP GOES HERE!\r\n");
lpeters 35:73b3963c6dd3 462
lpeters 35:73b3963c6dd3 463 #if defined(TARGET_LRAT)
lpeters 35:73b3963c6dd3 464 #else
lpeters 35:73b3963c6dd3 465 for (int i = 0; i < 6; i++)
lpeters 35:73b3963c6dd3 466 {
lpeters 35:73b3963c6dd3 467 tNow = time(NULL);
lpeters 35:73b3963c6dd3 468 printf("RTC: %08X\r\n", tNow);
lpeters 35:73b3963c6dd3 469 tNext = tNow + 10;
lpeters 35:73b3963c6dd3 470 printf("NXT: %08X\r\n", tNext);
lpeters 35:73b3963c6dd3 471 // Clear any pending IRQs
lpeters 35:73b3963c6dd3 472 cmd[0] = LSM303_REG_MAG_INT_SOURCE_REG_M;
lpeters 35:73b3963c6dd3 473 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 35:73b3963c6dd3 474 i2c.read(LSM303_ADR_MAG, &ret, 1);
lpeters 35:73b3963c6dd3 475 while (time(NULL) < tNext)
lpeters 35:73b3963c6dd3 476 {
lpeters 35:73b3963c6dd3 477 wait(1);
lpeters 35:73b3963c6dd3 478 }
lpeters 35:73b3963c6dd3 479 printf("Timer #%d complete.\r\n", i);
lpeters 35:73b3963c6dd3 480 }
lpeters 35:73b3963c6dd3 481 #endif
lpeters 35:73b3963c6dd3 482
lpeters 35:73b3963c6dd3 483 for (int i = 0; i <= 64; i++)
lpeters 35:73b3963c6dd3 484 {
lpeters 35:73b3963c6dd3 485 myLedR = i & 0x01;
lpeters 35:73b3963c6dd3 486 myLedG = i & 0x02;
lpeters 35:73b3963c6dd3 487 myLedB = i & 0x04;
lpeters 35:73b3963c6dd3 488 myLedW = i & 0x08;
lpeters 35:73b3963c6dd3 489 wait(0.01);
lpeters 33:e47306c32791 490 }
lpeters 33:e47306c32791 491
mbed_official 0:7037ed05f54f 492 // Initialize LoRaWAN stack
mbed_official 2:dc95ac6d6d4e 493 if (lorawan.initialize(&ev_queue) != LORAWAN_STATUS_OK) {
mbed_official 0:7037ed05f54f 494 printf("\r\n LoRa initialization failed! \r\n");
mbed_official 0:7037ed05f54f 495 return -1;
mbed_official 0:7037ed05f54f 496 }
mbed_official 0:7037ed05f54f 497
mbed_official 0:7037ed05f54f 498 printf("\r\n Mbed LoRaWANStack initialized \r\n");
lpeters 33:e47306c32791 499 printf("MBED_CONF_LORA_APP_PORT: %d", MBED_CONF_LORA_APP_PORT);
lpeters 35:73b3963c6dd3 500 printf("MBED_CONF_LORA_DUTY_CYCLE_ON: %d", MBED_CONF_LORA_DUTY_CYCLE_ON);
mbed_official 0:7037ed05f54f 501
mbed_official 0:7037ed05f54f 502 // prepare application callbacks
mbed_official 0:7037ed05f54f 503 callbacks.events = mbed::callback(lora_event_handler);
mbed_official 2:dc95ac6d6d4e 504 lorawan.add_app_callbacks(&callbacks);
mbed_official 0:7037ed05f54f 505
mbed_official 0:7037ed05f54f 506 // Set number of retries in case of CONFIRMED messages
mbed_official 2:dc95ac6d6d4e 507 if (lorawan.set_confirmed_msg_retries(CONFIRMED_MSG_RETRY_COUNTER)
mbed_official 0:7037ed05f54f 508 != LORAWAN_STATUS_OK) {
mbed_official 0:7037ed05f54f 509 printf("\r\n set_confirmed_msg_retries failed! \r\n\r\n");
mbed_official 0:7037ed05f54f 510 return -1;
mbed_official 0:7037ed05f54f 511 }
mbed_official 0:7037ed05f54f 512
mbed_official 0:7037ed05f54f 513 printf("\r\n CONFIRMED message retries : %d \r\n",
mbed_official 0:7037ed05f54f 514 CONFIRMED_MSG_RETRY_COUNTER);
mbed_official 0:7037ed05f54f 515
mbed_official 0:7037ed05f54f 516 // Enable adaptive data rate
mbed_official 2:dc95ac6d6d4e 517 if (lorawan.enable_adaptive_datarate() != LORAWAN_STATUS_OK) {
mbed_official 0:7037ed05f54f 518 printf("\r\n enable_adaptive_datarate failed! \r\n");
mbed_official 0:7037ed05f54f 519 return -1;
mbed_official 0:7037ed05f54f 520 }
mbed_official 0:7037ed05f54f 521
mbed_official 0:7037ed05f54f 522 printf("\r\n Adaptive data rate (ADR) - Enabled \r\n");
mbed_official 0:7037ed05f54f 523
mbed_official 2:dc95ac6d6d4e 524 retcode = lorawan.connect();
lpeters 33:e47306c32791 525
mbed_official 0:7037ed05f54f 526 if (retcode == LORAWAN_STATUS_OK ||
mbed_official 0:7037ed05f54f 527 retcode == LORAWAN_STATUS_CONNECT_IN_PROGRESS) {
mbed_official 0:7037ed05f54f 528 } else {
mbed_official 0:7037ed05f54f 529 printf("\r\n Connection error, code = %d \r\n", retcode);
mbed_official 0:7037ed05f54f 530 return -1;
mbed_official 0:7037ed05f54f 531 }
mbed_official 0:7037ed05f54f 532
mbed_official 0:7037ed05f54f 533 printf("\r\n Connection - In Progress ...\r\n");
mbed_official 0:7037ed05f54f 534
mbed_official 0:7037ed05f54f 535 // make your event queue dispatching events forever
mbed_official 0:7037ed05f54f 536 ev_queue.dispatch_forever();
mbed_official 3:8c7198d1a2a1 537
mbed_official 3:8c7198d1a2a1 538 return 0;
mbed_official 0:7037ed05f54f 539 }
mbed_official 0:7037ed05f54f 540
mbed_official 0:7037ed05f54f 541 /**
mbed_official 0:7037ed05f54f 542 * Sends a message to the Network Server
mbed_official 0:7037ed05f54f 543 */
mbed_official 0:7037ed05f54f 544 static void send_message()
mbed_official 0:7037ed05f54f 545 {
mbed_official 0:7037ed05f54f 546 uint16_t packet_len;
mbed_official 0:7037ed05f54f 547 int16_t retcode;
mbed_official 0:7037ed05f54f 548 float sensor_value;
mbed_official 0:7037ed05f54f 549
mbed_official 0:7037ed05f54f 550 if (ds1820.begin()) {
mbed_official 0:7037ed05f54f 551 ds1820.startConversion();
mbed_official 0:7037ed05f54f 552 sensor_value = ds1820.read();
mbed_official 0:7037ed05f54f 553 printf("\r\n Dummy Sensor Value = %3.1f \r\n", sensor_value);
mbed_official 0:7037ed05f54f 554 ds1820.startConversion();
mbed_official 0:7037ed05f54f 555 } else {
mbed_official 0:7037ed05f54f 556 printf("\r\n No sensor found \r\n");
mbed_official 0:7037ed05f54f 557 return;
mbed_official 0:7037ed05f54f 558 }
mbed_official 0:7037ed05f54f 559
tchari 30:ff249a9156dc 560 time_t tNow = time(NULL);
tchari 30:ff249a9156dc 561 printf("Clock: %d\r\n", tNow);
lpeters 34:341fb423e74b 562
lpeters 34:341fb423e74b 563 #if defined(SENSOR_TEMP)
lpeters 34:341fb423e74b 564 tmpRead();
lpeters 34:341fb423e74b 565 #endif
lpeters 34:341fb423e74b 566 magRead();
lpeters 34:341fb423e74b 567 accRead();
lpeters 34:341fb423e74b 568 gpsRead();
lpeters 34:341fb423e74b 569
lpeters 34:341fb423e74b 570 int ilat = (int)(mylat * 100000);
lpeters 34:341fb423e74b 571 int ilon = (int)(mylon * 100000);
lpeters 34:341fb423e74b 572 printf("TIM: %d, SAT: %d, LAT: %d, LON: %d\r\n", mytime, mybatt, ilat, ilon);
lpeters 34:341fb423e74b 573 packet_len = 11;
lpeters 34:341fb423e74b 574 tx_buffer[0] = (mytime >> 24) & 0xFF;
lpeters 34:341fb423e74b 575 tx_buffer[1] = (mytime >> 16) & 0xFF;
lpeters 34:341fb423e74b 576 tx_buffer[2] = (mytime >> 8) & 0xFF;
lpeters 34:341fb423e74b 577 tx_buffer[3] = (mytime >> 0) & 0xFF;
lpeters 34:341fb423e74b 578 tx_buffer[4] = ((mybatt << 4) & 0xF0) | ((ilat >> 22) & 0x0F);
lpeters 34:341fb423e74b 579 tx_buffer[5] = (ilat >> 14) & 0xFF;
lpeters 34:341fb423e74b 580 tx_buffer[6] = (ilat >> 6) & 0xFF;
lpeters 34:341fb423e74b 581 tx_buffer[7] = ((ilat << 2) & 0xFC) | ((ilon >> 24) & 0x03);
lpeters 34:341fb423e74b 582 tx_buffer[8] = (ilon >> 16) & 0xFF;
lpeters 34:341fb423e74b 583 tx_buffer[9] = (ilon >> 8) & 0xFF;
lpeters 34:341fb423e74b 584 tx_buffer[10] = (ilon >> 0) & 0xFF;
lpeters 34:341fb423e74b 585 printf("\r\nBUF: |");
lpeters 34:341fb423e74b 586 for (int i = 0; i < packet_len; i++) { printf("%02X", tx_buffer[i]); }
lpeters 34:341fb423e74b 587 printf("|\r\n");
lpeters 34:341fb423e74b 588 retcode = lorawan.send(MBED_CONF_LORA_APP_PORT, tx_buffer, packet_len,
lpeters 34:341fb423e74b 589 MSG_CONFIRMED_FLAG);
lpeters 33:e47306c32791 590
lpeters 34:341fb423e74b 591 if (retcode < 0) {
lpeters 34:341fb423e74b 592 retcode == LORAWAN_STATUS_WOULD_BLOCK ? printf("send - WOULD BLOCK\r\n")
lpeters 34:341fb423e74b 593 : printf("\r\n send() - Error code %d \r\n", retcode);
lpeters 34:341fb423e74b 594
lpeters 34:341fb423e74b 595 if (retcode == LORAWAN_STATUS_WOULD_BLOCK) {
lpeters 34:341fb423e74b 596 //retry in 3 seconds
lpeters 34:341fb423e74b 597 if (MBED_CONF_LORA_DUTY_CYCLE_ON) {
lpeters 34:341fb423e74b 598 ev_queue.call_in(3000, send_message);
lpeters 34:341fb423e74b 599 }
lpeters 34:341fb423e74b 600 }
lpeters 34:341fb423e74b 601 return;
lpeters 34:341fb423e74b 602 }
lpeters 34:341fb423e74b 603
lpeters 34:341fb423e74b 604 printf("\r\n %d bytes scheduled for transmission \r\n", retcode);
lpeters 34:341fb423e74b 605 memset(tx_buffer, 0, sizeof(tx_buffer));
lpeters 34:341fb423e74b 606
lpeters 34:341fb423e74b 607 //LED Confirmation Output - MESSAGE SENT
lpeters 34:341fb423e74b 608 for (int i = 0; i < 10; i++) {
lpeters 34:341fb423e74b 609 myLedG = 1;
lpeters 34:341fb423e74b 610 wait(0.1);
lpeters 34:341fb423e74b 611 myLedG = 0;
lpeters 34:341fb423e74b 612 myLedR = 1;
lpeters 34:341fb423e74b 613 wait(0.1);
lpeters 34:341fb423e74b 614 myLedR = 0;
lpeters 34:341fb423e74b 615 myLedB = 1;
lpeters 34:341fb423e74b 616 wait(0.1);
lpeters 34:341fb423e74b 617 myLedB = 0;
lpeters 34:341fb423e74b 618 }
lpeters 34:341fb423e74b 619 }
lpeters 34:341fb423e74b 620
lpeters 34:341fb423e74b 621 /**
lpeters 34:341fb423e74b 622 * Receive a message from the Network Server
lpeters 34:341fb423e74b 623 */
lpeters 34:341fb423e74b 624 static void receive_message()
lpeters 34:341fb423e74b 625 {
lpeters 34:341fb423e74b 626 int16_t retcode;
lpeters 34:341fb423e74b 627 retcode = lorawan.receive(MBED_CONF_LORA_APP_PORT, rx_buffer,
lpeters 34:341fb423e74b 628 sizeof(rx_buffer),
lpeters 34:341fb423e74b 629 MSG_CONFIRMED_FLAG|MSG_UNCONFIRMED_FLAG);
lpeters 34:341fb423e74b 630
lpeters 34:341fb423e74b 631 if (retcode < 0) {
lpeters 34:341fb423e74b 632 printf("\r\n receive() - Error code %d \r\n", retcode);
lpeters 34:341fb423e74b 633 return;
lpeters 34:341fb423e74b 634 }
lpeters 34:341fb423e74b 635
lpeters 34:341fb423e74b 636 printf(" Data:");
lpeters 34:341fb423e74b 637
lpeters 34:341fb423e74b 638 for (uint8_t i = 0; i < retcode; i++) {
lpeters 34:341fb423e74b 639 printf("%x", rx_buffer[i]);
lpeters 34:341fb423e74b 640 }
lpeters 34:341fb423e74b 641
lpeters 34:341fb423e74b 642 printf("\r\n Data Length: %d\r\n", retcode);
lpeters 34:341fb423e74b 643
lpeters 34:341fb423e74b 644 /*
lpeters 34:341fb423e74b 645 int startLoop = 0;
lpeters 34:341fb423e74b 646 if (strncmp((char *)rx_buffer, cmdSendLoop, 8) == 0)
lpeters 34:341fb423e74b 647 {
lpeters 34:341fb423e74b 648 printf("SendLoop Command Received!\r\n");
lpeters 34:341fb423e74b 649 startLoop = 1;
lpeters 34:341fb423e74b 650 }
lpeters 34:341fb423e74b 651 */
lpeters 34:341fb423e74b 652
lpeters 34:341fb423e74b 653 memset(rx_buffer, 0, sizeof(rx_buffer));
lpeters 34:341fb423e74b 654 /*
lpeters 34:341fb423e74b 655 if (startLoop)
lpeters 34:341fb423e74b 656 send_message();
lpeters 34:341fb423e74b 657 */
lpeters 34:341fb423e74b 658 }
lpeters 34:341fb423e74b 659
lpeters 34:341fb423e74b 660 /**
lpeters 34:341fb423e74b 661 * Event handler
lpeters 34:341fb423e74b 662 */
lpeters 34:341fb423e74b 663 static void lora_event_handler(lorawan_event_t event)
lpeters 34:341fb423e74b 664 {
lpeters 34:341fb423e74b 665 tr_debug("In lora_event_handler(%d)...", event);
lpeters 34:341fb423e74b 666 switch (event) {
lpeters 34:341fb423e74b 667 case CONNECTED:
lpeters 34:341fb423e74b 668 printf("\r\n Connection - Successful \r\n");
lpeters 34:341fb423e74b 669 if (MBED_CONF_LORA_DUTY_CYCLE_ON) {
lpeters 34:341fb423e74b 670 send_message();
lpeters 34:341fb423e74b 671 } else {
lpeters 34:341fb423e74b 672 ev_queue.call_every(TX_TIMER, send_message);
lpeters 34:341fb423e74b 673 }
lpeters 34:341fb423e74b 674
lpeters 34:341fb423e74b 675 break;
lpeters 34:341fb423e74b 676 case DISCONNECTED:
lpeters 34:341fb423e74b 677 ev_queue.break_dispatch();
lpeters 34:341fb423e74b 678 printf("\r\n Disconnected Successfully \r\n");
lpeters 34:341fb423e74b 679 break;
lpeters 34:341fb423e74b 680 case TX_DONE:
lpeters 34:341fb423e74b 681 printf("\r\n Message Sent to Network Server \r\n");
lpeters 34:341fb423e74b 682 if (MBED_CONF_LORA_DUTY_CYCLE_ON) {
lpeters 34:341fb423e74b 683 send_message();
lpeters 34:341fb423e74b 684 }
lpeters 34:341fb423e74b 685 break;
lpeters 34:341fb423e74b 686 case TX_TIMEOUT:
lpeters 34:341fb423e74b 687 case TX_ERROR:
lpeters 34:341fb423e74b 688 case TX_CRYPTO_ERROR:
lpeters 34:341fb423e74b 689 case TX_SCHEDULING_ERROR:
lpeters 34:341fb423e74b 690 printf("\r\n Transmission Error - EventCode = %d \r\n", event);
lpeters 34:341fb423e74b 691 // try again
lpeters 34:341fb423e74b 692 if (MBED_CONF_LORA_DUTY_CYCLE_ON) {
lpeters 34:341fb423e74b 693 send_message();
lpeters 34:341fb423e74b 694 }
lpeters 34:341fb423e74b 695 break;
lpeters 34:341fb423e74b 696 case RX_DONE:
lpeters 34:341fb423e74b 697 printf("\r\n Received message from Network Server \r\n");
lpeters 34:341fb423e74b 698 receive_message();
lpeters 34:341fb423e74b 699 break;
lpeters 34:341fb423e74b 700 case RX_TIMEOUT:
lpeters 34:341fb423e74b 701 case RX_ERROR:
lpeters 34:341fb423e74b 702 printf("\r\n Error in reception - Code = %d \r\n", event);
lpeters 34:341fb423e74b 703 break;
lpeters 34:341fb423e74b 704 case JOIN_FAILURE:
lpeters 34:341fb423e74b 705 printf("\r\n OTAA Failed - Check Keys \r\n");
lpeters 34:341fb423e74b 706 break;
lpeters 34:341fb423e74b 707 case UPLINK_REQUIRED:
lpeters 34:341fb423e74b 708 printf("\r\n Uplink required by NS \r\n");
lpeters 34:341fb423e74b 709 if (MBED_CONF_LORA_DUTY_CYCLE_ON) {
lpeters 34:341fb423e74b 710 send_message();
lpeters 34:341fb423e74b 711 }
lpeters 34:341fb423e74b 712 break;
lpeters 34:341fb423e74b 713 default:
lpeters 34:341fb423e74b 714 MBED_ASSERT("Unknown Event");
lpeters 34:341fb423e74b 715 }
lpeters 34:341fb423e74b 716 }
lpeters 34:341fb423e74b 717
lpeters 34:341fb423e74b 718 void magInitSequence()
lpeters 34:341fb423e74b 719 {
lpeters 35:73b3963c6dd3 720 printf("In magInitSequence()...\r\n");
lpeters 34:341fb423e74b 721 myLedR = 0;
lpeters 34:341fb423e74b 722 myLedG = 0;
lpeters 34:341fb423e74b 723 cmd[0] = LSM303_REG_MAG_WHO_AM_I_M;
lpeters 34:341fb423e74b 724 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 725 i2c.read(LSM303_ADR_MAG, &ret, 1);
lpeters 34:341fb423e74b 726 res = (ret == LSM303_WHO_MAG ? sPass : sFail);
lpeters 34:341fb423e74b 727 printf("MAG WhoAmI: %02X %s\r\n", ret, res);
lpeters 34:341fb423e74b 728
lpeters 34:341fb423e74b 729 if (ret == LSM303_WHO_MAG)
lpeters 34:341fb423e74b 730 myLedG = 1;
lpeters 34:341fb423e74b 731 else
lpeters 34:341fb423e74b 732 myLedR = 1;
lpeters 34:341fb423e74b 733
lpeters 34:341fb423e74b 734 for (int i = 0; i < 2; i++) {
lpeters 34:341fb423e74b 735 myLedB = 1;
lpeters 34:341fb423e74b 736 wait(0.3);
lpeters 34:341fb423e74b 737 myLedB = 0;
lpeters 34:341fb423e74b 738 wait(0.3);
lpeters 34:341fb423e74b 739 }
lpeters 34:341fb423e74b 740
lpeters 34:341fb423e74b 741 #if defined(TARGET_LRAT)
lpeters 34:341fb423e74b 742 cmd[0] = LSM303_REG_MAG_CTRL_REG1_M;
lpeters 34:341fb423e74b 743 cmd[1] = 0x70; // Ultra-High Performance Mode on XY axes, ODR=10Hz
lpeters 34:341fb423e74b 744 i2c.write(LSM303_ADR_MAG, cmd, 2);
lpeters 34:341fb423e74b 745 cmd[0] = LSM303_REG_MAG_CTRL_REG3_M;
lpeters 34:341fb423e74b 746 cmd[1] = 0x00; // High Resolution? (Full-power), Continuous
lpeters 34:341fb423e74b 747 i2c.write(LSM303_ADR_MAG, cmd, 2);
lpeters 34:341fb423e74b 748 cmd[0] = LSM303_REG_MAG_CTRL_REG4_M;
lpeters 34:341fb423e74b 749 cmd[1] = 0x0C; // Ultra-High Performance Mode on Z axis
lpeters 34:341fb423e74b 750 i2c.write(LSM303_ADR_MAG, cmd, 2);
lpeters 34:341fb423e74b 751 #if defined(SENSOR_TEMP)
lpeters 34:341fb423e74b 752 // Enable Temp Sensor
lpeters 34:341fb423e74b 753 cmd[0] = LSM303_REG_MAG_CTRL_REG1_M;
lpeters 34:341fb423e74b 754 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 755 i2c.read(LSM303_ADR_MAG, &ret, 1);
lpeters 34:341fb423e74b 756 cmd[0] = LSM303_REG_MAG_CTRL_REG1_M;
lpeters 34:341fb423e74b 757 cmd[1] = ret | 0x80;
lpeters 34:341fb423e74b 758 i2c.write(LSM303_ADR_MAG, cmd, 2);
lpeters 34:341fb423e74b 759 /*
lpeters 34:341fb423e74b 760 cmd[0] = LSM303_REG_MAG_CTRL_REG5_M;
lpeters 34:341fb423e74b 761 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 762 i2c.read(LSM303_ADR_MAG, &ret, 1);
lpeters 34:341fb423e74b 763 cmd[0] = LSM303_REG_MAG_CTRL_REG5_M;
lpeters 34:341fb423e74b 764 cmd[1] = ret | 0x40;
lpeters 34:341fb423e74b 765 i2c.write(LSM303_ADR_MAG, cmd, 2);
lpeters 34:341fb423e74b 766 */
lpeters 34:341fb423e74b 767 #endif
lpeters 34:341fb423e74b 768 #else
lpeters 34:341fb423e74b 769 cmd[0] = LSM303_REG_MAG_CFG_REG_A_M;
lpeters 34:341fb423e74b 770 cmd[1] = 0x00; // Mag = 10 Hz (high-resolution and continuous mode)
lpeters 34:341fb423e74b 771 i2c.write(LSM303_ADR_MAG, cmd, 2);
lpeters 34:341fb423e74b 772 cmd[0] = LSM303_REG_MAG_CFG_REG_C_M;
lpeters 34:341fb423e74b 773 //cmd[1] = 0x01; // Mag data-ready interrupt enable
lpeters 34:341fb423e74b 774 cmd[1] = 0x40; // Mag enable interrupt on pin
lpeters 34:341fb423e74b 775 i2c.write(LSM303_ADR_MAG, cmd, 2);
lpeters 34:341fb423e74b 776 #endif
lpeters 34:341fb423e74b 777
lpeters 34:341fb423e74b 778 for (int i = 0; i < 2; i++) {
lpeters 34:341fb423e74b 779 myLedR = 1;
lpeters 34:341fb423e74b 780 myLedG = 1;
lpeters 34:341fb423e74b 781 myLedB = 1;
lpeters 34:341fb423e74b 782 wait(0.5);
lpeters 34:341fb423e74b 783 myLedR = 0;
lpeters 34:341fb423e74b 784 myLedG = 0;
lpeters 34:341fb423e74b 785 myLedB = 0;
lpeters 34:341fb423e74b 786 wait(0.5);
lpeters 34:341fb423e74b 787 }
lpeters 35:73b3963c6dd3 788 #if defined(TARGET_LRAT)
lpeters 35:73b3963c6dd3 789 // LRAT MAG IRQ SETUP GOES HERE
lpeters 35:73b3963c6dd3 790 #else
lpeters 34:341fb423e74b 791 // MAG INTERRUPT SETUP
lpeters 34:341fb423e74b 792 cmd[0] = LSM303_REG_MAG_INT_THS_L_REG_M;
lpeters 35:73b3963c6dd3 793 cmd[1] = 0xE8;
lpeters 34:341fb423e74b 794 i2c.write(LSM303_ADR_MAG, cmd, 2);
lpeters 34:341fb423e74b 795 cmd[0] = LSM303_REG_MAG_INT_THS_H_REG_M;
lpeters 35:73b3963c6dd3 796 cmd[1] = 0x03;
lpeters 34:341fb423e74b 797 i2c.write(LSM303_ADR_MAG, cmd, 2);
lpeters 34:341fb423e74b 798 cmd[0] = LSM303_REG_MAG_INT_CTRL_REG_M;
lpeters 34:341fb423e74b 799 cmd[1] = 0xE7;
lpeters 34:341fb423e74b 800 i2c.write(LSM303_ADR_MAG, cmd, 2);
lpeters 34:341fb423e74b 801 magPin.rise(&onMagIrq);
lpeters 35:73b3963c6dd3 802 #endif
lpeters 34:341fb423e74b 803 }
lpeters 34:341fb423e74b 804
lpeters 34:341fb423e74b 805 void accInitSequence()
lpeters 34:341fb423e74b 806 {
lpeters 35:73b3963c6dd3 807 printf("In accInitSequence()...\r\n");
lpeters 34:341fb423e74b 808 myLedR = 0;
lpeters 34:341fb423e74b 809 myLedG = 0;
lpeters 34:341fb423e74b 810 cmd[0] = LSM303_REG_ACC_WHO_AM_I_A;
lpeters 34:341fb423e74b 811 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 812 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 34:341fb423e74b 813 res = (ret == LSM303_WHO_ACC ? sPass : sFail);
lpeters 34:341fb423e74b 814 printf("ACC WhoAmI: %02X %s\r\n", ret, res);
lpeters 34:341fb423e74b 815
lpeters 34:341fb423e74b 816 if (ret == LSM303_WHO_ACC)
lpeters 34:341fb423e74b 817 myLedG = 1;
lpeters 34:341fb423e74b 818 else
lpeters 34:341fb423e74b 819 myLedR = 1;
lpeters 34:341fb423e74b 820
lpeters 34:341fb423e74b 821 for (int i = 0; i < 2; i++) {
lpeters 34:341fb423e74b 822 myLedB = 1;
lpeters 34:341fb423e74b 823 wait(0.3);
lpeters 34:341fb423e74b 824 myLedB = 0;
lpeters 34:341fb423e74b 825 wait(0.3);
lpeters 34:341fb423e74b 826 }
lpeters 34:341fb423e74b 827
lpeters 34:341fb423e74b 828 #if defined(TARGET_LRAT)
lpeters 34:341fb423e74b 829 cmd[0] = LSM303_REG_ACC_CTRL_REG1_A;
lpeters 34:341fb423e74b 830 cmd[1] = 0xB7; // High Resolution, ODR=100Hz, Enable XYZ Axes
lpeters 34:341fb423e74b 831 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 832 #else
lpeters 34:341fb423e74b 833 cmd[0] = LSM303_REG_ACC_CTRL_REG1_A;
lpeters 34:341fb423e74b 834 cmd[1] = 0x57; // Enable XYZ Axes, ODR=100Hz
lpeters 34:341fb423e74b 835 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 836
lpeters 34:341fb423e74b 837 // Enable High Resolution Mode
lpeters 34:341fb423e74b 838 cmd[0] = LSM303_REG_ACC_CTRL_REG4_A;
lpeters 34:341fb423e74b 839 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 840 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 34:341fb423e74b 841 cmd[0] = LSM303_REG_ACC_CTRL_REG4_A;
lpeters 34:341fb423e74b 842 cmd[1] = ret | 0x08; // High Resolution
lpeters 34:341fb423e74b 843 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 844
lpeters 34:341fb423e74b 845 #if defined(SENSOR_TEMP)
lpeters 34:341fb423e74b 846 // Enable Temp Sensor
lpeters 34:341fb423e74b 847 cmd[0] = LSM303_REG_ACC_TEMP_CFG_REG_A;
lpeters 34:341fb423e74b 848 cmd[1] = 0xC0;
lpeters 34:341fb423e74b 849 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 850 cmd[0] = LSM303_REG_ACC_CTRL_REG4_A;
lpeters 34:341fb423e74b 851 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 852 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 34:341fb423e74b 853 cmd[0] = LSM303_REG_ACC_CTRL_REG4_A;
lpeters 34:341fb423e74b 854 cmd[1] = ret | 0x80;
lpeters 34:341fb423e74b 855 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 856 #endif
lpeters 34:341fb423e74b 857 #endif
lpeters 34:341fb423e74b 858
lpeters 34:341fb423e74b 859 //LED Confirmation Output - ACC INIT COMPLETE
lpeters 34:341fb423e74b 860 for (int i = 0; i < 2; i++) {
lpeters 34:341fb423e74b 861 myLedR = 1;
lpeters 34:341fb423e74b 862 myLedG = 1;
lpeters 34:341fb423e74b 863 myLedB = 1;
lpeters 34:341fb423e74b 864 wait(0.5);
lpeters 34:341fb423e74b 865 myLedR = 0;
lpeters 34:341fb423e74b 866 myLedG = 0;
lpeters 34:341fb423e74b 867 myLedB = 0;
lpeters 34:341fb423e74b 868 wait(0.5);
lpeters 34:341fb423e74b 869 }
lpeters 34:341fb423e74b 870
lpeters 34:341fb423e74b 871 // Set Full Scale to 4g
lpeters 34:341fb423e74b 872 /*
lpeters 34:341fb423e74b 873 cmd[0] = LSM303_REG_ACC_CTRL_REG4_A;
lpeters 34:341fb423e74b 874 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 875 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 34:341fb423e74b 876 cmd[0] = LSM303_REG_ACC_CTRL_REG4_A;
lpeters 34:341fb423e74b 877 //cmd[1] = ret | 0x30; // 16g
lpeters 34:341fb423e74b 878 //cmd[1] = (ret & ~0x10) | 0x20; // 8g
lpeters 34:341fb423e74b 879 cmd[1] = (ret & ~0x20) | 0x10; // 4g
lpeters 34:341fb423e74b 880 //cmd[1] = ret & ~0x30; // 2g
lpeters 34:341fb423e74b 881 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 882 */
lpeters 34:341fb423e74b 883 /*
lpeters 34:341fb423e74b 884 // IRQ Init from Datasheet.
lpeters 34:341fb423e74b 885 cmd[0] = LSM303_REG_ACC_CTRL_REG1_A;
lpeters 34:341fb423e74b 886 cmd[1] = 0xA7;
lpeters 34:341fb423e74b 887 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 888 cmd[0] = LSM303_REG_ACC_CTRL_REG2_A;
lpeters 34:341fb423e74b 889 cmd[1] = 0x00;
lpeters 34:341fb423e74b 890 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 891 cmd[0] = LSM303_REG_ACC_CTRL_REG3_A;
lpeters 34:341fb423e74b 892 cmd[1] = 0x40;
lpeters 34:341fb423e74b 893 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 894 cmd[0] = LSM303_REG_ACC_CTRL_REG4_A;
lpeters 34:341fb423e74b 895 cmd[1] = 0x00;
lpeters 34:341fb423e74b 896 //cmd[1] = 0x10;
lpeters 34:341fb423e74b 897 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 898 cmd[0] = LSM303_REG_ACC_CTRL_REG5_A;
lpeters 34:341fb423e74b 899 cmd[1] = 0x08;
lpeters 34:341fb423e74b 900 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 901 */
lpeters 35:73b3963c6dd3 902 #if defined(TARGET_LRAT)
lpeters 35:73b3963c6dd3 903 // LRAT ACC IRQ SETUP GOES HERE
lpeters 35:73b3963c6dd3 904 #else
lpeters 34:341fb423e74b 905 // ACC INTERRUPT SETUP
lpeters 34:341fb423e74b 906 // Enable Interrupt Pin
lpeters 34:341fb423e74b 907 cmd[0] = LSM303_REG_ACC_CTRL_REG3_A;
lpeters 34:341fb423e74b 908 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 909 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 34:341fb423e74b 910 cmd[0] = LSM303_REG_ACC_CTRL_REG3_A;
lpeters 34:341fb423e74b 911 cmd[1] = ret | 0x40;
lpeters 34:341fb423e74b 912 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 913 // Enable Interrupt Latch
lpeters 34:341fb423e74b 914 cmd[0] = LSM303_REG_ACC_CTRL_REG5_A;
lpeters 34:341fb423e74b 915 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 916 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 34:341fb423e74b 917 cmd[0] = LSM303_REG_ACC_CTRL_REG5_A;
lpeters 34:341fb423e74b 918 cmd[1] = ret | 0x08;
lpeters 34:341fb423e74b 919 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 920
lpeters 34:341fb423e74b 921 // Set Threshold/Duration/Config
lpeters 34:341fb423e74b 922 cmd[0] = LSM303_REG_ACC_INT1_THS_A;
lpeters 34:341fb423e74b 923 //cmd[1] = 0x10;
lpeters 34:341fb423e74b 924 //cmd[1] = 0x40;
lpeters 34:341fb423e74b 925 //cmd[1] = 0x60;
lpeters 34:341fb423e74b 926 cmd[1] = 0x7D;
lpeters 34:341fb423e74b 927 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 928 cmd[0] = LSM303_REG_ACC_INT1_DURATION_A;
lpeters 34:341fb423e74b 929 cmd[1] = 0x00;
lpeters 34:341fb423e74b 930 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 931 cmd[0] = LSM303_REG_ACC_INT1_CFG_A;
lpeters 34:341fb423e74b 932 cmd[1] = 0x2A;
lpeters 34:341fb423e74b 933 //cmd[1] = 0x0A;
lpeters 34:341fb423e74b 934 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 35:73b3963c6dd3 935 accPin.rise(&onAccIrq);
lpeters 35:73b3963c6dd3 936 #endif
lpeters 34:341fb423e74b 937 }
lpeters 34:341fb423e74b 938
lpeters 34:341fb423e74b 939 void gpsInitSequence()
lpeters 34:341fb423e74b 940 {
lpeters 35:73b3963c6dd3 941 printf("In gpsInitSequence()...\r\n");
lpeters 35:73b3963c6dd3 942 gpsRead();
lpeters 35:73b3963c6dd3 943 if (mytime > 0)
lpeters 35:73b3963c6dd3 944 {
lpeters 35:73b3963c6dd3 945 set_time(mytime);
lpeters 35:73b3963c6dd3 946 tInit = mytime;
lpeters 35:73b3963c6dd3 947 myLedG = 1;
lpeters 35:73b3963c6dd3 948 }
lpeters 35:73b3963c6dd3 949 else
lpeters 35:73b3963c6dd3 950 myLedR = 1;
lpeters 34:341fb423e74b 951
lpeters 34:341fb423e74b 952 for (int i = 0; i < 2; i++) {
lpeters 34:341fb423e74b 953 myLedB = 1;
lpeters 34:341fb423e74b 954 wait(0.3);
lpeters 34:341fb423e74b 955 myLedB = 0;
lpeters 34:341fb423e74b 956 wait(0.3);
lpeters 34:341fb423e74b 957 }
lpeters 34:341fb423e74b 958 myLedG = 0;
lpeters 34:341fb423e74b 959 myLedR = 0;
lpeters 34:341fb423e74b 960 }
lpeters 34:341fb423e74b 961
lpeters 34:341fb423e74b 962 void magRead()
lpeters 34:341fb423e74b 963 {
lpeters 34:341fb423e74b 964 cmd[0] = LSM303_REG_MAG_STATUS_REG_M;
lpeters 34:341fb423e74b 965 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 966 i2c.read(LSM303_ADR_MAG, &rda, 1);
lpeters 34:341fb423e74b 967 if (rda)
lpeters 34:341fb423e74b 968 {
lpeters 34:341fb423e74b 969 cmd[0] = LSM303_REG_MAG_OUTX_L_REG_M;
lpeters 34:341fb423e74b 970 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 971 i2c.read(LSM303_ADR_MAG, &buf[0], 1);
lpeters 34:341fb423e74b 972 cmd[0] = LSM303_REG_MAG_OUTX_H_REG_M;
lpeters 34:341fb423e74b 973 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 974 i2c.read(LSM303_ADR_MAG, &buf[1], 1);
lpeters 34:341fb423e74b 975 cmd[0] = LSM303_REG_MAG_OUTY_L_REG_M;
lpeters 34:341fb423e74b 976 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 977 i2c.read(LSM303_ADR_MAG, &buf[2], 1);
lpeters 34:341fb423e74b 978 cmd[0] = LSM303_REG_MAG_OUTY_H_REG_M;
lpeters 34:341fb423e74b 979 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 980 i2c.read(LSM303_ADR_MAG, &buf[3], 1);
lpeters 34:341fb423e74b 981 cmd[0] = LSM303_REG_MAG_OUTZ_L_REG_M;
lpeters 34:341fb423e74b 982 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 983 i2c.read(LSM303_ADR_MAG, &buf[4], 1);
lpeters 34:341fb423e74b 984 cmd[0] = LSM303_REG_MAG_OUTZ_H_REG_M;
lpeters 34:341fb423e74b 985 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 986 i2c.read(LSM303_ADR_MAG, &buf[5], 1);
lpeters 34:341fb423e74b 987 myMagX = (buf[0] | (buf[1] << 8));
lpeters 34:341fb423e74b 988 myMagY = (buf[2] | (buf[3] << 8));
lpeters 34:341fb423e74b 989 myMagZ = (buf[4] | (buf[5] << 8));
lpeters 34:341fb423e74b 990 if (myMagX < magMinX)
lpeters 34:341fb423e74b 991 magMinX = myMagX;
lpeters 34:341fb423e74b 992 if (myMagY < magMinY)
lpeters 34:341fb423e74b 993 magMinY = myMagY;
lpeters 34:341fb423e74b 994 if (myMagZ < magMinZ)
lpeters 34:341fb423e74b 995 magMinZ = myMagZ;
lpeters 34:341fb423e74b 996 if (myMagX > magMaxX)
lpeters 34:341fb423e74b 997 magMaxX = myMagX;
lpeters 34:341fb423e74b 998 if (myMagY > magMaxY)
lpeters 34:341fb423e74b 999 magMaxY = myMagY;
lpeters 34:341fb423e74b 1000 if (myMagZ > magMaxZ)
lpeters 34:341fb423e74b 1001 magMaxZ = myMagZ;
lpeters 34:341fb423e74b 1002 cmd[0] = LSM303_REG_MAG_INT_SOURCE_REG_M;
lpeters 34:341fb423e74b 1003 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 1004 i2c.read(LSM303_ADR_MAG, &ret, 1);
lpeters 34:341fb423e74b 1005 if (ret & 0x01 && magEvent == 0 && ret & 0xFC)
lpeters 34:341fb423e74b 1006 {
lpeters 34:341fb423e74b 1007 magSFire++;
lpeters 34:341fb423e74b 1008 magEvent = 1;
lpeters 34:341fb423e74b 1009 magSHIRQ++;
lpeters 34:341fb423e74b 1010 }
lpeters 34:341fb423e74b 1011 else if (!(ret & 0x01) && magEvent == 1 && !(ret & 0xFC))
lpeters 34:341fb423e74b 1012 {
lpeters 34:341fb423e74b 1013 magSFire++;
lpeters 34:341fb423e74b 1014 magEvent = 0;
lpeters 34:341fb423e74b 1015 magSLIRQ++;
lpeters 34:341fb423e74b 1016 }
lpeters 34:341fb423e74b 1017 printf("M|%02X|%02X %02X %02X %02X %02X %02X|%*d,%*d,%*d|%*d,%*d,%*d|%*d,%*d,%*d|%02X|%02X/%02X %02X/%02X\r\n", rda, buf[0], buf[1], buf[2], buf[3], buf[4], buf[5], 6, myMagX, 6, myMagY, 6, myMagZ, 6, magMinX, 6, magMinY, 6, magMinZ, 6, magMaxX, 6, magMaxY, 6, magMaxZ, ret, magSHIRQ, magSLIRQ, magSFire, magHFire);
lpeters 34:341fb423e74b 1018 }
lpeters 34:341fb423e74b 1019 }
lpeters 34:341fb423e74b 1020
lpeters 34:341fb423e74b 1021 void accRead()
lpeters 34:341fb423e74b 1022 {
lpeters 34:341fb423e74b 1023 cmd[0] = LSM303_REG_ACC_STATUS_REG_A;
lpeters 34:341fb423e74b 1024 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 1025 i2c.read(LSM303_ADR_ACC, &rda, 1);
lpeters 34:341fb423e74b 1026 if (rda)
lpeters 34:341fb423e74b 1027 {
lpeters 34:341fb423e74b 1028 cmd[0] = LSM303_REG_ACC_OUT_X_L_A;
lpeters 34:341fb423e74b 1029 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 1030 i2c.read(LSM303_ADR_ACC, &buf[0], 1);
lpeters 34:341fb423e74b 1031 cmd[0] = LSM303_REG_ACC_OUT_X_H_A;
lpeters 34:341fb423e74b 1032 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 1033 i2c.read(LSM303_ADR_ACC, &buf[1], 1);
lpeters 34:341fb423e74b 1034 cmd[0] = LSM303_REG_ACC_OUT_Y_L_A;
lpeters 34:341fb423e74b 1035 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 1036 i2c.read(LSM303_ADR_ACC, &buf[2], 1);
lpeters 34:341fb423e74b 1037 cmd[0] = LSM303_REG_ACC_OUT_Y_H_A;
lpeters 34:341fb423e74b 1038 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 1039 i2c.read(LSM303_ADR_ACC, &buf[3], 1);
lpeters 34:341fb423e74b 1040 cmd[0] = LSM303_REG_ACC_OUT_Z_L_A;
lpeters 34:341fb423e74b 1041 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 1042 i2c.read(LSM303_ADR_ACC, &buf[4], 1);
lpeters 34:341fb423e74b 1043 cmd[0] = LSM303_REG_ACC_OUT_Z_H_A;
lpeters 34:341fb423e74b 1044 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 1045 i2c.read(LSM303_ADR_ACC, &buf[5], 1);
lpeters 34:341fb423e74b 1046 myAccX = ((int16_t)(buf[0] | (buf[1] << 8)) >> accShift);
lpeters 34:341fb423e74b 1047 myAccY = ((int16_t)(buf[2] | (buf[3] << 8)) >> accShift);
lpeters 34:341fb423e74b 1048 myAccZ = ((int16_t)(buf[4] | (buf[5] << 8)) >> accShift);
lpeters 34:341fb423e74b 1049 if (myAccX < accMinX)
lpeters 34:341fb423e74b 1050 accMinX = myAccX;
lpeters 34:341fb423e74b 1051 if (myAccY < accMinY)
lpeters 34:341fb423e74b 1052 accMinY = myAccY;
lpeters 34:341fb423e74b 1053 if (myAccZ < accMinZ)
lpeters 34:341fb423e74b 1054 accMinZ = myAccZ;
lpeters 34:341fb423e74b 1055 if (myAccX > accMaxX)
lpeters 34:341fb423e74b 1056 accMaxX = myAccX;
lpeters 34:341fb423e74b 1057 if (myAccY > accMaxY)
lpeters 34:341fb423e74b 1058 accMaxY = myAccY;
lpeters 34:341fb423e74b 1059 if (myAccZ > accMaxZ)
lpeters 34:341fb423e74b 1060 accMaxZ = myAccZ;
lpeters 34:341fb423e74b 1061 cmd[0] = LSM303_REG_ACC_INT1_SRC_A;
lpeters 34:341fb423e74b 1062 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 1063 i2c.read(LSM303_ADR_ACC, &ret, 1);
lpeters 34:341fb423e74b 1064 if (ret & 0x40)
lpeters 34:341fb423e74b 1065 {
lpeters 34:341fb423e74b 1066 accSFire++;
lpeters 34:341fb423e74b 1067 if (accEvent == 1)
lpeters 34:341fb423e74b 1068 {
lpeters 34:341fb423e74b 1069 accEvent = 0;
lpeters 34:341fb423e74b 1070 accSLIRQ++;
lpeters 34:341fb423e74b 1071 cmd[0] = LSM303_REG_ACC_INT1_THS_A;
lpeters 34:341fb423e74b 1072 cmd[1] = 0x7D;
lpeters 34:341fb423e74b 1073 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 1074 cmd[0] = LSM303_REG_ACC_INT1_DURATION_A;
lpeters 34:341fb423e74b 1075 cmd[1] = 0x00;
lpeters 34:341fb423e74b 1076 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 1077 cmd[0] = LSM303_REG_ACC_INT1_CFG_A;
lpeters 34:341fb423e74b 1078 cmd[1] = 0x2A;
lpeters 34:341fb423e74b 1079 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 1080 }
lpeters 34:341fb423e74b 1081 else
lpeters 34:341fb423e74b 1082 {
lpeters 34:341fb423e74b 1083 accEvent = 1;
lpeters 34:341fb423e74b 1084 accSHIRQ++;
lpeters 34:341fb423e74b 1085 cmd[0] = LSM303_REG_ACC_INT1_THS_A;
lpeters 34:341fb423e74b 1086 cmd[1] = 0x50;
lpeters 34:341fb423e74b 1087 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 1088 cmd[0] = LSM303_REG_ACC_INT1_DURATION_A;
lpeters 34:341fb423e74b 1089 //cmd[1] = 0x7D;
lpeters 34:341fb423e74b 1090 cmd[1] = 0x03;
lpeters 34:341fb423e74b 1091 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 1092 cmd[0] = LSM303_REG_ACC_INT1_CFG_A;
lpeters 34:341fb423e74b 1093 cmd[1] = 0x95;
lpeters 34:341fb423e74b 1094 i2c.write(LSM303_ADR_ACC, cmd, 2);
lpeters 34:341fb423e74b 1095 }
lpeters 34:341fb423e74b 1096 }
lpeters 34:341fb423e74b 1097 printf("A|%02X|%02X %02X %02X %02X %02X %02X|%*d,%*d,%*d|%*d,%*d,%*d|%*d,%*d,%*d|%02X|%02X/%02X %02X/%02X\r\n", rda, buf[0], buf[1], buf[2], buf[3], buf[4], buf[5], 6, myAccX, 6, myAccY, 6, myAccZ, 6, accMinX, 6, accMinY, 6, accMinZ, 6, accMaxX, 6, accMaxY, 6, accMaxZ, ret, accSHIRQ, accSLIRQ, accSFire, accHFire);
lpeters 34:341fb423e74b 1098 }
lpeters 34:341fb423e74b 1099 }
lpeters 34:341fb423e74b 1100
lpeters 34:341fb423e74b 1101 void tmpRead()
lpeters 34:341fb423e74b 1102 {
lpeters 34:341fb423e74b 1103 #if defined(TARGET_LRAT)
lpeters 34:341fb423e74b 1104 cmd[0] = LSM303_REG_MAG_TEMP_L_M;
lpeters 34:341fb423e74b 1105 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 1106 i2c.read(LSM303_ADR_MAG, &buf[0], 1);
lpeters 34:341fb423e74b 1107 cmd[0] = LSM303_REG_MAG_TEMP_H_M;
lpeters 34:341fb423e74b 1108 i2c.write(LSM303_ADR_MAG, cmd, 1);
lpeters 34:341fb423e74b 1109 i2c.read(LSM303_ADR_MAG, &buf[1], 1);
lpeters 34:341fb423e74b 1110 myTemp = (int16_t)(buf[0] | (buf[1] << 8));
lpeters 34:341fb423e74b 1111 printf("T|%02X %02X| (%d)\r\n", buf[0], buf[1], myTemp);
lpeters 34:341fb423e74b 1112 #else
lpeters 34:341fb423e74b 1113 cmd[0] = LSM303_REG_ACC_STATUS_REG_AUX_A;
lpeters 34:341fb423e74b 1114 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 1115 i2c.read(LSM303_ADR_ACC, &rda, 1);
lpeters 34:341fb423e74b 1116 if (rda & 0x04)
lpeters 34:341fb423e74b 1117 {
lpeters 34:341fb423e74b 1118 cmd[0] = LSM303_REG_ACC_OUT_TEMP_L_A | 0x80;
lpeters 34:341fb423e74b 1119 i2c.write(LSM303_ADR_ACC, cmd, 1);
lpeters 34:341fb423e74b 1120 i2c.read(LSM303_ADR_ACC, &buf[0], 2);
lpeters 34:341fb423e74b 1121 myTemp = (int16_t)(buf[0] | (buf[1] << 8)) >> 6;
lpeters 34:341fb423e74b 1122 printf("T|%02X %02X %02X| (%d)\r\n", rda, buf[0], buf[1], myTemp);
lpeters 34:341fb423e74b 1123 }
lpeters 34:341fb423e74b 1124 #endif
lpeters 34:341fb423e74b 1125 }
lpeters 34:341fb423e74b 1126
lpeters 34:341fb423e74b 1127 void gpsRead()
lpeters 34:341fb423e74b 1128 {
lpeters 34:341fb423e74b 1129 bool gpsDone = false;
lpeters 34:341fb423e74b 1130 bool fixGood = false;
lpeters 35:73b3963c6dd3 1131 uint8_t crcPass = 0;
lpeters 35:73b3963c6dd3 1132 uint8_t crcFail = 0;
lpeters 35:73b3963c6dd3 1133 uint32_t tDate = 0;
lpeters 35:73b3963c6dd3 1134 uint32_t tTime = 0;
lpeters 34:341fb423e74b 1135 myLedW = 1;
lpeters 34:341fb423e74b 1136 pos = 0;
lpeters 33:e47306c32791 1137 ret = 0xFF;
lpeters 33:e47306c32791 1138 cmd[0] = 0xFF;
lpeters 33:e47306c32791 1139 i2c.write(NEOM8M_ADR_GPS, cmd, 1);
lpeters 33:e47306c32791 1140 while(!gpsDone)
lpeters 33:e47306c32791 1141 {
lpeters 33:e47306c32791 1142 while (ret == 0xFF)
lpeters 33:e47306c32791 1143 {
lpeters 33:e47306c32791 1144 i2c.read(NEOM8M_ADR_GPS, &ret, 1);
lpeters 33:e47306c32791 1145 }
lpeters 33:e47306c32791 1146 while (ret != 0xFF)
lpeters 33:e47306c32791 1147 {
lpeters 33:e47306c32791 1148 buf[pos++] = ret;
lpeters 33:e47306c32791 1149 i2c.read(NEOM8M_ADR_GPS, &ret, 1);
lpeters 33:e47306c32791 1150 if (ret == '\r')
lpeters 33:e47306c32791 1151 {
lpeters 33:e47306c32791 1152 i2c.read(NEOM8M_ADR_GPS, &ret, 1);
lpeters 33:e47306c32791 1153 if (ret == '\n')
lpeters 33:e47306c32791 1154 {
lpeters 33:e47306c32791 1155 buf[pos] = 0x00;
lpeters 34:341fb423e74b 1156 // NMEA Validation
lpeters 33:e47306c32791 1157 uint16_t crc = 0;
lpeters 35:73b3963c6dd3 1158 char clr = '\0';
lpeters 33:e47306c32791 1159 if (buf[0] == '$' && buf[pos-3] == '*')
lpeters 33:e47306c32791 1160 {
lpeters 35:73b3963c6dd3 1161 for (int i = 1; i < pos-3; i++)
lpeters 33:e47306c32791 1162 {
lpeters 33:e47306c32791 1163 crc ^= buf[i];
lpeters 33:e47306c32791 1164 }
lpeters 33:e47306c32791 1165 }
lpeters 33:e47306c32791 1166 if (crc == ((buf[pos-2] < 'A' ? buf[pos-2] - '0' : buf[pos-2] - '7') << 4 | (buf[pos-1] < 'A' ? buf[pos-1] - '0' : buf[pos-1] - '7')))
lpeters 35:73b3963c6dd3 1167 {
lpeters 33:e47306c32791 1168 clr = '2'; // 2 = Green
lpeters 35:73b3963c6dd3 1169 crcPass++;
lpeters 35:73b3963c6dd3 1170 }
lpeters 33:e47306c32791 1171 else
lpeters 35:73b3963c6dd3 1172 {
lpeters 33:e47306c32791 1173 clr = '1'; // 1 = Red
lpeters 35:73b3963c6dd3 1174 crcFail++;
lpeters 35:73b3963c6dd3 1175 }
lpeters 33:e47306c32791 1176 printf("GPS: [\u001b[3%cm%02X\u001b[0m] |%s|\r\n", clr, crc, buf);
lpeters 35:73b3963c6dd3 1177 if (clr == '2')
lpeters 35:73b3963c6dd3 1178 {
lpeters 33:e47306c32791 1179 // Global Positioning System Fix Data
lpeters 33:e47306c32791 1180 if(strncmp(buf, "$GNGGA", 6) == 0)
lpeters 33:e47306c32791 1181 {
lpeters 33:e47306c32791 1182 printf("GNGGA> ");
lpeters 33:e47306c32791 1183 //sscanf(cmd, "$GPGGA,%f,%f,%c,%f,%c,%d,%d,%*f,%f", &timefix, &latitude, &ns, &longitude, &ew, &fq, &nst, &altitude);
lpeters 33:e47306c32791 1184 //pc.printf("GPGGA Fix taken at: %f, Latitude: %f %c, Longitude: %f %c, Fix quality: %d, Number of sat: %d, Altitude: %f M\n", timefix, latitude, ns, longitude, ew, fq, nst, altitude);
lpeters 33:e47306c32791 1185 float fldTim, fldAlt;
lpeters 33:e47306c32791 1186 double fldLat, fldLon;
lpeters 33:e47306c32791 1187 char fldN_S, fldE_W;
lpeters 33:e47306c32791 1188 int fldFix, fldSat;
lpeters 33:e47306c32791 1189 sscanf(buf, "$GNGGA,%f,%lf,%c,%lf,%c,%d,%d,%*f,%f", &fldTim, &fldLat, &fldN_S, &fldLon, &fldE_W, &fldFix, &fldSat, &fldAlt);
lpeters 33:e47306c32791 1190 printf("Sec: %.2f, Lat: %.5f %c, Lon: %.5f %c, Fix: %d, Sat: %d, Alt: %.1f M\r\n", fldTim, fldLat, fldN_S, fldLon, fldE_W, fldFix, fldSat, fldAlt);
lpeters 33:e47306c32791 1191 if (clr == '2')
lpeters 33:e47306c32791 1192 {
lpeters 33:e47306c32791 1193 mylat = fldLat / (fldN_S == 'S' ? -100 : 100);
lpeters 33:e47306c32791 1194 mylon = fldLon / (fldE_W == 'W' ? -100 : 100);
lpeters 35:73b3963c6dd3 1195 //mytime = (uint32_t)fldTim;
lpeters 33:e47306c32791 1196 mybatt = (fldSat & 0xF0 ? 0x0F : fldSat & 0x0F);
lpeters 33:e47306c32791 1197 }
lpeters 33:e47306c32791 1198 }
lpeters 33:e47306c32791 1199 // Satellite status
lpeters 33:e47306c32791 1200 if(strncmp(buf, "$GNGSA", 6) == 0)
lpeters 33:e47306c32791 1201 {
lpeters 35:73b3963c6dd3 1202 //printf("GNGSA> ");
lpeters 33:e47306c32791 1203 //sscanf(cmd, "$GPGSA,%c,%d,%d", &tf, &fix, &nst);
lpeters 33:e47306c32791 1204 //pc.printf("GPGSA Type fix: %c, 3D fix: %d, number of sat: %d\r\n", tf, fix, nst);
lpeters 33:e47306c32791 1205 char fldTyp;
lpeters 33:e47306c32791 1206 int fldDim, fldSat;
lpeters 33:e47306c32791 1207 sscanf(buf, "$GNGSA,%c,%d,%d", &fldTyp, &fldDim, &fldSat);
lpeters 35:73b3963c6dd3 1208 //printf("Typ: %c, Pos: %d, Sat: %d\r\n", fldTyp, fldDim, fldSat);
lpeters 33:e47306c32791 1209 }
lpeters 33:e47306c32791 1210 // Geographic position, Latitude and Longitude
lpeters 33:e47306c32791 1211 if(strncmp(buf, "$GNGLL", 6) == 0)
lpeters 33:e47306c32791 1212 {
lpeters 35:73b3963c6dd3 1213 //printf("GNGLL> ");
lpeters 33:e47306c32791 1214 //sscanf(cmd, "$GPGLL,%f,%c,%f,%c,%f", &latitude, &ns, &longitude, &ew, &timefix);
lpeters 33:e47306c32791 1215 //pc.printf("GPGLL Latitude: %f %c, Longitude: %f %c, Fix taken at: %f\n", latitude, ns, longitude, ew, timefix);
lpeters 33:e47306c32791 1216 float fldTim;
lpeters 33:e47306c32791 1217 double fldLat, fldLon;
lpeters 33:e47306c32791 1218 char fldN_S, fldE_W;
lpeters 33:e47306c32791 1219 sscanf(buf, "$GNGLL,%lf,%c,%lf,%c,%f", &fldLat, &fldN_S, &fldLon, &fldE_W, &fldTim);
lpeters 35:73b3963c6dd3 1220 //printf("Lat: %.5f %c, Lon: %.5f %c, Sec: %.2f\r\n", fldLat, fldN_S, fldLon, fldE_W, fldTim);
lpeters 33:e47306c32791 1221 }
lpeters 33:e47306c32791 1222 // Geographic position, Latitude and Longitude
lpeters 33:e47306c32791 1223 if(strncmp(buf, "$GNRMC", 6) == 0)
lpeters 33:e47306c32791 1224 {
lpeters 35:73b3963c6dd3 1225 //printf("GPS: [\u001b[3%cm%02X\u001b[0m] |%s|\r\n", clr, crc, buf);
lpeters 33:e47306c32791 1226 printf("GNRMC> ");
lpeters 33:e47306c32791 1227 //sscanf(cmd, "$GPRMC,%f,%c,%f,%c,%f,%c,%f,,%d", &timefix, &status, &latitude, &ns, &longitude, &ew, &speed, &date);
lpeters 33:e47306c32791 1228 //pc.printf("GPRMC Fix taken at: %f, Status: %c, Latitude: %f %c, Longitude: %f %c, Speed: %f, Date: %d\n", timefix, status, latitude, ns, longitude, ew, speed, date);
lpeters 35:73b3963c6dd3 1229 float fldTim, fldSpd, fldTrk;
lpeters 35:73b3963c6dd3 1230 fldTrk = 0;
lpeters 33:e47306c32791 1231 double fldLat, fldLon;
lpeters 33:e47306c32791 1232 char fldSts, fldN_S, fldE_W;
lpeters 35:73b3963c6dd3 1233 uint32_t fldDat;
lpeters 35:73b3963c6dd3 1234 if (sscanf(buf, "$GNRMC,,%c", &fldSts) != 1 &&
lpeters 35:73b3963c6dd3 1235 sscanf(buf, "$GNRMC,%f,%c,,,,,,,%d", &fldTim, &fldSts, &fldDat) != 3 &&
lpeters 35:73b3963c6dd3 1236 sscanf(buf, "$GNRMC,%f,%c,%lf,%c,%lf,%c,%f,,%d", &fldTim, &fldSts, &fldLat, &fldN_S, &fldLon, &fldE_W, &fldSpd, &fldDat) != 8 &&
lpeters 35:73b3963c6dd3 1237 sscanf(buf, "$GNRMC,%f,%c,%lf,%c,%lf,%c,%f,%f,%d", &fldTim, &fldSts, &fldLat, &fldN_S, &fldLon, &fldE_W, &fldSpd, &fldTrk, &fldDat) != 9)
lpeters 35:73b3963c6dd3 1238 printf("[\u001b[33mWARN\u001b[0m] Invalid GNRMC packet detected.\r\n");
lpeters 35:73b3963c6dd3 1239 //sscanf(buf, "$GNRMC,%f,%c,%lf,%c,%lf,%c,%f,%7[^,],%d", &fldTim, &fldSts, &fldLat, &fldN_S, &fldLon, &fldE_W, &fldSpd, fldFoo, &fldDat);
lpeters 33:e47306c32791 1240 printf("Sec: %.2f, Sts: %c, Lat: %.5f %c, Lon: %.5f %c, Spd: %.3f, Dat: %06d\r\n", fldTim, fldSts, fldLat, fldN_S, fldLon, fldE_W, fldSpd, fldDat);
lpeters 35:73b3963c6dd3 1241 if (clr == '2')
lpeters 35:73b3963c6dd3 1242 {
lpeters 35:73b3963c6dd3 1243 tTime = (uint32_t)fldTim;
lpeters 35:73b3963c6dd3 1244 tDate = fldDat;
lpeters 35:73b3963c6dd3 1245 if (fldSts == 'A')
lpeters 35:73b3963c6dd3 1246 fixGood = true;
lpeters 35:73b3963c6dd3 1247 }
lpeters 35:73b3963c6dd3 1248 }
lpeters 33:e47306c32791 1249 }
lpeters 33:e47306c32791 1250 pos = 0;
lpeters 33:e47306c32791 1251 i2c.read(NEOM8M_ADR_GPS, &ret, 1);
lpeters 33:e47306c32791 1252 }
lpeters 33:e47306c32791 1253 else
lpeters 33:e47306c32791 1254 {
lpeters 35:73b3963c6dd3 1255 printf("[\u001b[33mWARN\u001b[0m] Expected '0A', received '%02X'.\r\n", ret);
lpeters 33:e47306c32791 1256 }
lpeters 33:e47306c32791 1257 }
lpeters 33:e47306c32791 1258 else if (pos == 82)
lpeters 33:e47306c32791 1259 {
lpeters 33:e47306c32791 1260 buf[pos] = 0x00;
lpeters 33:e47306c32791 1261 printf("GPS: |%s| ...\r\n", buf);
lpeters 33:e47306c32791 1262 pos = 0;
lpeters 33:e47306c32791 1263 i2c.read(NEOM8M_ADR_GPS, &ret, 1);
lpeters 33:e47306c32791 1264 }
lpeters 33:e47306c32791 1265 }
lpeters 33:e47306c32791 1266 buf[pos] = 0x00;
lpeters 33:e47306c32791 1267 gpsDone = true;
lpeters 33:e47306c32791 1268 }
lpeters 33:e47306c32791 1269 if (pos > 0)
lpeters 33:e47306c32791 1270 printf("GPS: |%s|\r\n", buf);
lpeters 34:341fb423e74b 1271 myLedW = 0;
lpeters 35:73b3963c6dd3 1272 if (crcFail)
lpeters 35:73b3963c6dd3 1273 printf("[\u001b[33mWARN\u001b[0m] CRC PASS: %d FAIL: %d\r\n", crcPass, crcFail);
lpeters 35:73b3963c6dd3 1274
lpeters 35:73b3963c6dd3 1275 struct tm ts;
lpeters 35:73b3963c6dd3 1276 time_t t;
lpeters 35:73b3963c6dd3 1277
lpeters 35:73b3963c6dd3 1278 uint8_t tDay = tDate / 10000;
lpeters 35:73b3963c6dd3 1279 uint8_t tMon = (tDate - (tDay * 10000)) / 100;
lpeters 35:73b3963c6dd3 1280 uint8_t tYear = (tDate - ((tDay * 10000) + (tMon * 100))) + 100;
lpeters 35:73b3963c6dd3 1281 uint8_t tHour = tTime / 10000;
lpeters 35:73b3963c6dd3 1282 uint8_t tMin = (tTime - (tHour * 10000)) / 100;
lpeters 35:73b3963c6dd3 1283 uint8_t tSec = (tTime - ((tHour * 10000) + (tMin * 100)));
lpeters 35:73b3963c6dd3 1284
lpeters 35:73b3963c6dd3 1285 ts.tm_year = tYear;
lpeters 35:73b3963c6dd3 1286 ts.tm_mon = tMon - 1;
lpeters 35:73b3963c6dd3 1287 ts.tm_mday = tDay;
lpeters 35:73b3963c6dd3 1288 ts.tm_hour = tHour;
lpeters 35:73b3963c6dd3 1289 ts.tm_min = tMin;
lpeters 35:73b3963c6dd3 1290 ts.tm_sec = tSec;
lpeters 35:73b3963c6dd3 1291 t = mktime(&ts);
lpeters 35:73b3963c6dd3 1292 //printf("DAT: %06d TIM: %d\r\n", tDate, tTime);
lpeters 35:73b3963c6dd3 1293 //printf("CNV: %04d-%02d-%02d@%02d:%02d:%02d\r\n", tYear, tMon, tDay, tHour, tMin, tSec);
lpeters 35:73b3963c6dd3 1294 //printf("T: %d\t%s", t, ctime(&t));
lpeters 35:73b3963c6dd3 1295 printf("GPS: %08X\t%s", t, ctime(&t));
lpeters 35:73b3963c6dd3 1296 mytime = t;
lpeters 35:73b3963c6dd3 1297
lpeters 34:341fb423e74b 1298 if (fixGood)
lpeters 34:341fb423e74b 1299 myLedG = 1;
lpeters 34:341fb423e74b 1300 else
lpeters 34:341fb423e74b 1301 myLedR = 1;
lpeters 33:e47306c32791 1302
lpeters 34:341fb423e74b 1303 for (int i = 0; i < 10; i++) {
lpeters 34:341fb423e74b 1304 myLedB = 1;
lpeters 34:341fb423e74b 1305 wait(0.1);
lpeters 34:341fb423e74b 1306 myLedB = 0;
lpeters 34:341fb423e74b 1307 wait(0.1);
mbed_official 0:7037ed05f54f 1308 }
mbed_official 0:7037ed05f54f 1309 }
mbed_official 0:7037ed05f54f 1310
mbed_official 0:7037ed05f54f 1311 // EOF