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@37:df69df1bcb1a, 2018-08-29 (annotated)

Committer:
lpeters
Date:
Wed Aug 29 20:18:49 2018 +0000
Revision:
37:df69df1bcb1a
Parent:
36:dcc6f89fa39a
Child:
38:fd7a407bfe3e
Initial impl of main timing loop and GPS power control.

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