Example program for power saving mode of cellular modem. This program can be used with UBLOX_C030_R412M board.

Dependencies:   ublox-at-cellular-interface ublox-cellular-base ublox-cellular-base-n2xx ublox-at-cellular-interface-n2xx

Committer:
qasim-ublox
Date:
Wed Nov 06 16:42:09 2019 +0500
Revision:
6:29f8fd75379d
Parent:
4:574b2be59d12
Added delay to keep the modem in PSM for while

Who changed what in which revision?

UserRevisionLine numberNew contents of line
wajahat.abbas@u-blox.com 0:4858efb34078 1 /* mbed Microcontroller Library
wajahat.abbas@u-blox.com 0:4858efb34078 2 * Copyright (c) 2017 u-blox
wajahat.abbas@u-blox.com 0:4858efb34078 3 *
wajahat.abbas@u-blox.com 0:4858efb34078 4 * Licensed under the Apache License, Version 2.0 (the "License");
wajahat.abbas@u-blox.com 0:4858efb34078 5 * you may not use this file except in compliance with the License.
wajahat.abbas@u-blox.com 0:4858efb34078 6 * You may obtain a copy of the License at
wajahat.abbas@u-blox.com 0:4858efb34078 7 *
wajahat.abbas@u-blox.com 0:4858efb34078 8 * http://www.apache.org/licenses/LICENSE-2.0
wajahat.abbas@u-blox.com 0:4858efb34078 9 *
wajahat.abbas@u-blox.com 0:4858efb34078 10 * Unless required by applicable law or agreed to in writing, software
wajahat.abbas@u-blox.com 0:4858efb34078 11 * distributed under the License is distributed on an "AS IS" BASIS,
wajahat.abbas@u-blox.com 0:4858efb34078 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
wajahat.abbas@u-blox.com 0:4858efb34078 13 * See the License for the specific language governing permissions and
wajahat.abbas@u-blox.com 0:4858efb34078 14 * limitations under the License.
wajahat.abbas@u-blox.com 0:4858efb34078 15 */
qasimublox 3:6debe6b322c4 16 #include <stdarg.h>
wajahat.abbas@u-blox.com 0:4858efb34078 17 #include "mbed.h"
wajahat.abbas@u-blox.com 0:4858efb34078 18 #include "UbloxATCellularInterface.h"
wajahat.abbas@u-blox.com 0:4858efb34078 19 #include "UbloxATCellularInterfaceN2xx.h"
wajahat.abbas@u-blox.com 0:4858efb34078 20
wajahat.abbas@u-blox.com 0:4858efb34078 21 // You must select the correct interface library for your board, by
wajahat.abbas@u-blox.com 0:4858efb34078 22 // uncommenting the correct line below. Supported combinations are
wajahat.abbas@u-blox.com 0:4858efb34078 23 // indicated with a "Y" in the table below.
wajahat.abbas@u-blox.com 0:4858efb34078 24 //
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 25 // C030_U201 C030_N211 C027 C030_R41XM
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 26 // UbloxATCellularInterface Y - Y Y
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 27 // UbloxATCellularInterfaceN2xx - Y - -
wajahat.abbas@u-blox.com 0:4858efb34078 28 // Note: the N211 module supports only UDP, not TCP
wajahat.abbas@u-blox.com 0:4858efb34078 29
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 30 // UbloxATCellularInterface and UbloxATCellularInterfaceN2xx
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 31 // uses an IP stack on the cellular module and hence uses less RAM (significant on C027).
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 32 // This also allows other AT command operations (e.g. sending an SMS) to happen
wajahat.abbas@u-blox.com 0:4858efb34078 33 // during a data transfer (for which you should replace the
wajahat.abbas@u-blox.com 0:4858efb34078 34 // UbloxATCellularInterface library with the UbloxATCellularInterfaceExt
wajahat.abbas@u-blox.com 0:4858efb34078 35 // library). However, it is slower than using the LWIP/PPP on the mbed
wajahat.abbas@u-blox.com 0:4858efb34078 36 // MCU interface since more string parsing is required.
wajahat.abbas@u-blox.com 0:4858efb34078 37 #define INTERFACE_CLASS UbloxATCellularInterface
wajahat.abbas@u-blox.com 0:4858efb34078 38 //#define INTERFACE_CLASS UbloxATCellularInterfaceN2xx
wajahat.abbas@u-blox.com 0:4858efb34078 39
wajahat.abbas@u-blox.com 0:4858efb34078 40 // The credentials of the SIM in the board. If PIN checking is enabled
wajahat.abbas@u-blox.com 0:4858efb34078 41 // for your SIM card you must set this to the required PIN.
wajahat.abbas@u-blox.com 0:4858efb34078 42 #define PIN "0000"
wajahat.abbas@u-blox.com 0:4858efb34078 43
wajahat.abbas@u-blox.com 0:4858efb34078 44 // Network credentials. You should set this according to your
wajahat.abbas@u-blox.com 0:4858efb34078 45 // network/SIM card. For C030 non-N2xx boards, leave the parameters as NULL
wajahat.abbas@u-blox.com 0:4858efb34078 46 // otherwise, if you do not know the APN for your network, you may
wajahat.abbas@u-blox.com 0:4858efb34078 47 // either try the fairly common "internet" for the APN (and leave the
wajahat.abbas@u-blox.com 0:4858efb34078 48 // username and password NULL), or you may leave all three as NULL and then
wajahat.abbas@u-blox.com 0:4858efb34078 49 // a lookup will be attempted for a small number of known networks
wajahat.abbas@u-blox.com 0:4858efb34078 50 // (see APN_db.h in mbed-os/features/netsocket/cellular/utils).
wajahat.abbas@u-blox.com 0:4858efb34078 51 #define APN NULL
wajahat.abbas@u-blox.com 0:4858efb34078 52 #define USERNAME NULL
wajahat.abbas@u-blox.com 0:4858efb34078 53 #define PASSWORD NULL
wajahat.abbas@u-blox.com 0:4858efb34078 54
wajahat.abbas@u-blox.com 0:4858efb34078 55 // Uncomment the following line to enable Icellular Current measurement.
wajahat.abbas@u-blox.com 0:4858efb34078 56 // Current drawn by modem is printed on serial every 2 seconds.
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 57 #define CURRENT_MEASUREMENT
wajahat.abbas@u-blox.com 0:4858efb34078 58
wajahat.abbas@u-blox.com 0:4858efb34078 59 // LEDs
wajahat.abbas@u-blox.com 0:4858efb34078 60 DigitalOut ledRed(LED1, 1);
wajahat.abbas@u-blox.com 0:4858efb34078 61 DigitalOut ledGreen(LED2, 1);
wajahat.abbas@u-blox.com 0:4858efb34078 62 DigitalOut ledBlue(LED3, 1);
wajahat.abbas@u-blox.com 0:4858efb34078 63
wajahat.abbas@u-blox.com 0:4858efb34078 64 // The user button
wajahat.abbas@u-blox.com 0:4858efb34078 65 volatile bool buttonPressed = false;
wajahat.abbas@u-blox.com 0:4858efb34078 66 #ifdef TARGET_UBLOX_C030_R412M
wajahat.abbas@u-blox.com 0:4858efb34078 67 volatile bool modem_asleep = false;
wajahat.abbas@u-blox.com 0:4858efb34078 68 #ifdef CURRENT_MEASUREMENT
wajahat.abbas@u-blox.com 0:4858efb34078 69 AnalogIn ain_icellular(MDMCURRENTSENSE);
wajahat.abbas@u-blox.com 0:4858efb34078 70 Thread icell_thread;
wajahat.abbas@u-blox.com 0:4858efb34078 71 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 72 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 73
qasimublox 3:6debe6b322c4 74 static rtos::Mutex trace_mutex;
qasimublox 3:6debe6b322c4 75
wajahat.abbas@u-blox.com 0:4858efb34078 76 static void good() {
wajahat.abbas@u-blox.com 0:4858efb34078 77 ledGreen = 0;
wajahat.abbas@u-blox.com 0:4858efb34078 78 ledBlue = 1;
wajahat.abbas@u-blox.com 0:4858efb34078 79 ledRed = 1;
wajahat.abbas@u-blox.com 0:4858efb34078 80 }
wajahat.abbas@u-blox.com 0:4858efb34078 81
wajahat.abbas@u-blox.com 0:4858efb34078 82 static void bad() {
wajahat.abbas@u-blox.com 0:4858efb34078 83 ledRed = 0;
wajahat.abbas@u-blox.com 0:4858efb34078 84 ledGreen = 1;
wajahat.abbas@u-blox.com 0:4858efb34078 85 ledBlue = 1;
wajahat.abbas@u-blox.com 0:4858efb34078 86 }
wajahat.abbas@u-blox.com 0:4858efb34078 87
wajahat.abbas@u-blox.com 0:4858efb34078 88 static void event() {
wajahat.abbas@u-blox.com 0:4858efb34078 89 ledBlue = 0;
wajahat.abbas@u-blox.com 0:4858efb34078 90 ledRed = 1;
wajahat.abbas@u-blox.com 0:4858efb34078 91 ledGreen = 1;
wajahat.abbas@u-blox.com 0:4858efb34078 92 }
wajahat.abbas@u-blox.com 0:4858efb34078 93
wajahat.abbas@u-blox.com 0:4858efb34078 94 static void pulseEvent() {
wajahat.abbas@u-blox.com 0:4858efb34078 95 event();
wajahat.abbas@u-blox.com 0:4858efb34078 96 wait_ms(500);
wajahat.abbas@u-blox.com 0:4858efb34078 97 good();
wajahat.abbas@u-blox.com 0:4858efb34078 98 }
wajahat.abbas@u-blox.com 0:4858efb34078 99
wajahat.abbas@u-blox.com 0:4858efb34078 100 static void ledOff() {
wajahat.abbas@u-blox.com 0:4858efb34078 101 ledBlue = 1;
wajahat.abbas@u-blox.com 0:4858efb34078 102 ledRed = 1;
wajahat.abbas@u-blox.com 0:4858efb34078 103 ledGreen = 1;
wajahat.abbas@u-blox.com 0:4858efb34078 104 }
wajahat.abbas@u-blox.com 0:4858efb34078 105
qasimublox 3:6debe6b322c4 106 static void print_function(const char *format, ...)
qasimublox 3:6debe6b322c4 107 {
qasimublox 3:6debe6b322c4 108 trace_mutex.lock();
qasimublox 3:6debe6b322c4 109 va_list arglist;
qasimublox 3:6debe6b322c4 110 va_start( arglist, format );
qasimublox 3:6debe6b322c4 111 vprintf(format, arglist);
qasimublox 3:6debe6b322c4 112 va_end( arglist );
qasimublox 3:6debe6b322c4 113 trace_mutex.unlock();
qasimublox 3:6debe6b322c4 114 }
qasimublox 3:6debe6b322c4 115
wajahat.abbas@u-blox.com 0:4858efb34078 116 static void printNtpTime(char * buf, int len)
wajahat.abbas@u-blox.com 0:4858efb34078 117 {
wajahat.abbas@u-blox.com 0:4858efb34078 118 time_t timestamp = 0;
wajahat.abbas@u-blox.com 0:4858efb34078 119 struct tm *localTime;
wajahat.abbas@u-blox.com 0:4858efb34078 120 char timeString[25];
wajahat.abbas@u-blox.com 0:4858efb34078 121 time_t TIME1970 = 2208988800U;
wajahat.abbas@u-blox.com 0:4858efb34078 122
wajahat.abbas@u-blox.com 0:4858efb34078 123 if (len >= 43) {
wajahat.abbas@u-blox.com 0:4858efb34078 124 timestamp |= ((int) *(buf + 40)) << 24;
wajahat.abbas@u-blox.com 0:4858efb34078 125 timestamp |= ((int) *(buf + 41)) << 16;
wajahat.abbas@u-blox.com 0:4858efb34078 126 timestamp |= ((int) *(buf + 42)) << 8;
wajahat.abbas@u-blox.com 0:4858efb34078 127 timestamp |= ((int) *(buf + 43));
wajahat.abbas@u-blox.com 0:4858efb34078 128 timestamp -= TIME1970;
wajahat.abbas@u-blox.com 0:4858efb34078 129 localTime = localtime(&timestamp);
wajahat.abbas@u-blox.com 0:4858efb34078 130 if (localTime) {
wajahat.abbas@u-blox.com 0:4858efb34078 131 if (strftime(timeString, sizeof(timeString), "%a %b %d %H:%M:%S %Y", localTime) > 0) {
qasimublox 3:6debe6b322c4 132 print_function("NTP timestamp is %s.\n", timeString);
wajahat.abbas@u-blox.com 0:4858efb34078 133 }
wajahat.abbas@u-blox.com 0:4858efb34078 134 }
wajahat.abbas@u-blox.com 0:4858efb34078 135 }
wajahat.abbas@u-blox.com 0:4858efb34078 136 }
wajahat.abbas@u-blox.com 0:4858efb34078 137
wajahat.abbas@u-blox.com 0:4858efb34078 138 static void cbButton()
wajahat.abbas@u-blox.com 0:4858efb34078 139 {
wajahat.abbas@u-blox.com 0:4858efb34078 140 buttonPressed = true;
wajahat.abbas@u-blox.com 0:4858efb34078 141 }
wajahat.abbas@u-blox.com 0:4858efb34078 142
wajahat.abbas@u-blox.com 0:4858efb34078 143 void init_modem(INTERFACE_CLASS *interface) {
wajahat.abbas@u-blox.com 0:4858efb34078 144 int x;
wajahat.abbas@u-blox.com 0:4858efb34078 145
wajahat.abbas@u-blox.com 0:4858efb34078 146 for (x = 0; interface->connect(PIN) != 0; x++) {
wajahat.abbas@u-blox.com 0:4858efb34078 147 if (x > 0) {
wajahat.abbas@u-blox.com 0:4858efb34078 148 bad();
qasimublox 3:6debe6b322c4 149 print_function("Retrying (have you checked that an antenna is plugged in and your APN is correct?)...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 150 }
wajahat.abbas@u-blox.com 0:4858efb34078 151 }
wajahat.abbas@u-blox.com 0:4858efb34078 152 }
wajahat.abbas@u-blox.com 0:4858efb34078 153 #ifdef TARGET_UBLOX_C030_R412M
wajahat.abbas@u-blox.com 0:4858efb34078 154 void psm_going_in_cb(void *param)
wajahat.abbas@u-blox.com 0:4858efb34078 155 {
qasimublox 3:6debe6b322c4 156 print_function("PSM callback function:: Modem going in to sleep\n");
wajahat.abbas@u-blox.com 0:4858efb34078 157 modem_asleep = true;
wajahat.abbas@u-blox.com 0:4858efb34078 158 }
wajahat.abbas@u-blox.com 0:4858efb34078 159 #ifdef CURRENT_MEASUREMENT
wajahat.abbas@u-blox.com 0:4858efb34078 160 float calculate_icellular_samples() {
wajahat.abbas@u-blox.com 0:4858efb34078 161 float ain=0.0f;
wajahat.abbas@u-blox.com 0:4858efb34078 162 float icellular_val;
wajahat.abbas@u-blox.com 0:4858efb34078 163 const int c_number_of_analog_samples = 50;
wajahat.abbas@u-blox.com 0:4858efb34078 164
wajahat.abbas@u-blox.com 0:4858efb34078 165 ain = 0;
wajahat.abbas@u-blox.com 0:4858efb34078 166 for(int i = 0; i < c_number_of_analog_samples; i++) {
wajahat.abbas@u-blox.com 0:4858efb34078 167 ain = (ain + ain_icellular.read());
qasim-ublox 6:29f8fd75379d 168 Thread::wait(20);
wajahat.abbas@u-blox.com 0:4858efb34078 169 }
wajahat.abbas@u-blox.com 0:4858efb34078 170 ain = ain/c_number_of_analog_samples;
wajahat.abbas@u-blox.com 0:4858efb34078 171 icellular_val = (ain*1.8*1000)/7.0f;
wajahat.abbas@u-blox.com 0:4858efb34078 172
wajahat.abbas@u-blox.com 0:4858efb34078 173
qasimublox 3:6debe6b322c4 174 print_function("Voltage in mV: %f\n", icellular_val * 7.0f);
qasimublox 3:6debe6b322c4 175 print_function("Current draw in mA: %f\n\n", icellular_val);
wajahat.abbas@u-blox.com 0:4858efb34078 176
wajahat.abbas@u-blox.com 0:4858efb34078 177 return icellular_val;
wajahat.abbas@u-blox.com 0:4858efb34078 178 }
wajahat.abbas@u-blox.com 0:4858efb34078 179
wajahat.abbas@u-blox.com 0:4858efb34078 180 void icell_thread_handler() {
wajahat.abbas@u-blox.com 0:4858efb34078 181
wajahat.abbas@u-blox.com 0:4858efb34078 182 while(1) {
wajahat.abbas@u-blox.com 0:4858efb34078 183 calculate_icellular_samples();
wajahat.abbas@u-blox.com 0:4858efb34078 184 }
wajahat.abbas@u-blox.com 0:4858efb34078 185 }
wajahat.abbas@u-blox.com 0:4858efb34078 186 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 187 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 188
wajahat.abbas@u-blox.com 0:4858efb34078 189 /* This example program for the u-blox C030-R410M board instantiates
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 190 * the UbloxATCellularInterface and uses it to make a simple sockets
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 191 * connection to a server, using 2.pool.ntp.org for UDP and
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 192 * developer.mbed.org for TCP. It also showcases the 3GPP PSM feature.
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 193 * For a more comprehensive example, where higher layer protocols
wajahat.abbas@u-blox.com 0:4858efb34078 194 * make use of the same sockets interface, see example-ublox-mbed-client.
wajahat.abbas@u-blox.com 0:4858efb34078 195 * Progress may be monitored with a serial terminal running at 9600 baud.
wajahat.abbas@u-blox.com 0:4858efb34078 196 * The LED on the C030 board will turn green when this program is
wajahat.abbas@u-blox.com 0:4858efb34078 197 * operating correctly, pulse blue when a sockets operation is completed
wajahat.abbas@u-blox.com 0:4858efb34078 198 * and turn red if there is a failure.
wajahat.abbas@u-blox.com 0:4858efb34078 199 */
wajahat.abbas@u-blox.com 0:4858efb34078 200 int main()
wajahat.abbas@u-blox.com 0:4858efb34078 201 {
wajahat.abbas@u-blox.com 0:4858efb34078 202 #ifdef TARGET_UBLOX_C030_R412M
wajahat.abbas@u-blox.com 0:4858efb34078 203 #ifdef CURRENT_MEASUREMENT
wajahat.abbas@u-blox.com 0:4858efb34078 204 //current monitoring using Icellular
wajahat.abbas@u-blox.com 0:4858efb34078 205 icell_thread.start(icell_thread_handler);
wajahat.abbas@u-blox.com 0:4858efb34078 206 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 207 int status = 0, pt = 0, at = 0;
wajahat.abbas@u-blox.com 0:4858efb34078 208 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 209 INTERFACE_CLASS *interface = new INTERFACE_CLASS();
wajahat.abbas@u-blox.com 0:4858efb34078 210 // If you need to debug the cellular interface, comment out the
wajahat.abbas@u-blox.com 0:4858efb34078 211 // instantiation above and uncomment the one below.
wajahat.abbas@u-blox.com 0:4858efb34078 212 // For the N2xx interface, change xxx to MBED_CONF_UBLOX_CELL_BAUD_RATE,
wajahat.abbas@u-blox.com 0:4858efb34078 213 // while for the non-N2xx interface change it to MBED_CONF_UBLOX_CELL_N2XX_BAUD_RATE.
wajahat.abbas@u-blox.com 0:4858efb34078 214 // INTERFACE_CLASS *interface = new INTERFACE_CLASS(MDMTXD, MDMRXD,
wajahat.abbas@u-blox.com 0:4858efb34078 215 // xxx,
wajahat.abbas@u-blox.com 0:4858efb34078 216 // true);
qasim-ublox 4:574b2be59d12 217
wajahat.abbas@u-blox.com 0:4858efb34078 218 UDPSocket sockUdp;
wajahat.abbas@u-blox.com 0:4858efb34078 219 SocketAddress udpServer;
wajahat.abbas@u-blox.com 0:4858efb34078 220 SocketAddress udpSenderAddress;
wajahat.abbas@u-blox.com 0:4858efb34078 221 char buf[1024];
wajahat.abbas@u-blox.com 0:4858efb34078 222 int x;
wajahat.abbas@u-blox.com 0:4858efb34078 223 #ifdef TARGET_UBLOX_C027
wajahat.abbas@u-blox.com 0:4858efb34078 224 // No user button on C027
wajahat.abbas@u-blox.com 0:4858efb34078 225 InterruptIn userButton(NC);
wajahat.abbas@u-blox.com 0:4858efb34078 226 #else
wajahat.abbas@u-blox.com 0:4858efb34078 227 InterruptIn userButton(SW0);
wajahat.abbas@u-blox.com 0:4858efb34078 228 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 229
wajahat.abbas@u-blox.com 0:4858efb34078 230 // Attach a function to the user button
wajahat.abbas@u-blox.com 0:4858efb34078 231 userButton.rise(&cbButton);
wajahat.abbas@u-blox.com 0:4858efb34078 232
wajahat.abbas@u-blox.com 0:4858efb34078 233 good();
qasimublox 3:6debe6b322c4 234 print_function("Initializing modem, please wait.\n");
wajahat.abbas@u-blox.com 0:4858efb34078 235 if (interface->init(PIN) == false) //setup modem
wajahat.abbas@u-blox.com 0:4858efb34078 236 {
qasimublox 3:6debe6b322c4 237 int mno_profile;
qasimublox 3:6debe6b322c4 238 int ret_val = false;
qasimublox 3:6debe6b322c4 239 interface->get_mno_profile(&mno_profile);
qasimublox 3:6debe6b322c4 240 if((UbloxATCellularInterface::MNOProfile)mno_profile == (UbloxATCellularInterface::MNOProfile)0)
qasimublox 3:6debe6b322c4 241 {
qasimublox 3:6debe6b322c4 242 print_function("Setting MNO profile..\r");
qasimublox 3:6debe6b322c4 243 if(interface->set_mno_profile(UbloxATCellularInterface::STANDARD_EU))
qasimublox 3:6debe6b322c4 244 {
qasimublox 3:6debe6b322c4 245 print_function("MNO Profile set and rebooting the module\n");
qasimublox 3:6debe6b322c4 246 interface->reboot_modem();
qasimublox 3:6debe6b322c4 247 wait_ms(5000); //give modem a little time
qasimublox 3:6debe6b322c4 248 ret_val = interface->init(PIN);
qasimublox 3:6debe6b322c4 249 }
qasimublox 3:6debe6b322c4 250 }
qasimublox 3:6debe6b322c4 251 if(ret_val == false)
qasimublox 3:6debe6b322c4 252 {
qasimublox 3:6debe6b322c4 253 bad();
qasimublox 3:6debe6b322c4 254 print_function("Failed to Initialize modem\n");
qasimublox 3:6debe6b322c4 255 while(1);
qasimublox 3:6debe6b322c4 256 }
wajahat.abbas@u-blox.com 0:4858efb34078 257 }
qasimublox 3:6debe6b322c4 258 print_function("Initialization complete.\n");
wajahat.abbas@u-blox.com 0:4858efb34078 259 pulseEvent();
wajahat.abbas@u-blox.com 0:4858efb34078 260
wajahat.abbas@u-blox.com 0:4858efb34078 261 #ifdef TARGET_UBLOX_C030_R412M
qasimublox 3:6debe6b322c4 262 print_function("Enabling PSM...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 263 if (interface->set_power_saving_mode(120, 30)) { //enable PSM
qasimublox 3:6debe6b322c4 264 print_function("PSM enabled. Attaching CB function and rebooting the module\n");
wajahat.abbas@u-blox.com 0:4858efb34078 265 interface->attach_cb_psm_going_in(&psm_going_in_cb, NULL); //register callback
wajahat.abbas@u-blox.com 0:4858efb34078 266
wajahat.abbas@u-blox.com 0:4858efb34078 267 //reset modem so that PSM settings can take effect
wajahat.abbas@u-blox.com 0:4858efb34078 268 interface->reboot_modem();
wajahat.abbas@u-blox.com 0:4858efb34078 269 wait_ms(5000); //give modem a little time
wajahat.abbas@u-blox.com 0:4858efb34078 270
qasimublox 3:6debe6b322c4 271 print_function("please wait up to 180 seconds for network registration to complete...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 272 //try to re-init modem and perform registration
qasim-ublox 4:574b2be59d12 273 interface->set_credentials(APN, USERNAME, PASSWORD);
wajahat.abbas@u-blox.com 0:4858efb34078 274 for (x = 0; interface->connect(PIN) != 0; x++) {
wajahat.abbas@u-blox.com 0:4858efb34078 275 if (x > 0) {
wajahat.abbas@u-blox.com 0:4858efb34078 276 bad();
qasimublox 3:6debe6b322c4 277 print_function("Retrying (have you checked that an antenna is plugged in and your APN is correct?)...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 278 }
wajahat.abbas@u-blox.com 0:4858efb34078 279 }
wajahat.abbas@u-blox.com 0:4858efb34078 280
wajahat.abbas@u-blox.com 0:4858efb34078 281 interface->get_power_saving_mode(&status, &pt, &at); //read assigned values
qasimublox 3:6debe6b322c4 282 print_function("PSM status: %s\nAssigned Periodic TAU: %d\nAssigned Active time: %d\n", status ? "enabled" : "disabled", pt, at);
wajahat.abbas@u-blox.com 0:4858efb34078 283 pulseEvent();
wajahat.abbas@u-blox.com 0:4858efb34078 284 }
wajahat.abbas@u-blox.com 0:4858efb34078 285
wajahat.abbas@u-blox.com 0:4858efb34078 286 //sometimes modem goes in to PSM before we can do any UDP/TCP transfers
wajahat.abbas@u-blox.com 0:4858efb34078 287 if (modem_asleep == true) {
qasimublox 3:6debe6b322c4 288 print_function("Modem is in PSM, waking up and initializing it\n");
wajahat.abbas@u-blox.com 0:4858efb34078 289 interface->wakeup_modem(); //this wakes up the modem and also CellularBase gets synced with modem state.
wajahat.abbas@u-blox.com 0:4858efb34078 290 init_modem(interface);
wajahat.abbas@u-blox.com 0:4858efb34078 291 modem_asleep = false;
qasimublox 3:6debe6b322c4 292 print_function("Initialization complete\n");
wajahat.abbas@u-blox.com 0:4858efb34078 293 }
wajahat.abbas@u-blox.com 0:4858efb34078 294 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 295
qasim-ublox 4:574b2be59d12 296 print_function("\nGetting the IP address of \"2.pool.ntp.org\"...\n");
qasim-ublox 4:574b2be59d12 297 if ((interface->gethostbyname("2.pool.ntp.org", &udpServer) == 0)) {
wajahat.abbas@u-blox.com 0:4858efb34078 298 pulseEvent();
wajahat.abbas@u-blox.com 0:4858efb34078 299
wajahat.abbas@u-blox.com 0:4858efb34078 300 udpServer.set_port(123);
qasimublox 3:6debe6b322c4 301 print_function("\"2.pool.ntp.org\" address: %s on port %d.\n", udpServer.get_ip_address(), udpServer.get_port());
wajahat.abbas@u-blox.com 0:4858efb34078 302
qasimublox 3:6debe6b322c4 303 print_function("Performing socket operations in a loop (until the user button is pressed on C030 or forever on C027)...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 304 while (!buttonPressed) {
wajahat.abbas@u-blox.com 0:4858efb34078 305 #ifdef TARGET_UBLOX_C030_R412M
wajahat.abbas@u-blox.com 0:4858efb34078 306 if (modem_asleep == true) {
qasimublox 3:6debe6b322c4 307 print_function("Modem is in PSM, waking up and initializing it\n");
wajahat.abbas@u-blox.com 0:4858efb34078 308 interface->wakeup_modem(); //this wakes up the modem and also CellularBase gets synced with modem state.
wajahat.abbas@u-blox.com 0:4858efb34078 309 init_modem(interface);
wajahat.abbas@u-blox.com 0:4858efb34078 310 modem_asleep = false;
qasimublox 3:6debe6b322c4 311 print_function("Initialization complete\n");
wajahat.abbas@u-blox.com 0:4858efb34078 312 wait_ms(5000);
wajahat.abbas@u-blox.com 0:4858efb34078 313 } else {
wajahat.abbas@u-blox.com 0:4858efb34078 314 #endif
qasimublox 3:6debe6b322c4 315 print_function("Opening a UDP socket...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 316 if ((sockUdp.open(interface)) == 0) {
wajahat.abbas@u-blox.com 0:4858efb34078 317 // UDP Sockets
wajahat.abbas@u-blox.com 0:4858efb34078 318 pulseEvent();
qasimublox 3:6debe6b322c4 319 print_function("UDP socket open.\n");
wajahat.abbas@u-blox.com 0:4858efb34078 320 sockUdp.set_timeout(20000);
qasimublox 3:6debe6b322c4 321 print_function("Sending time request to \"2.pool.ntp.org\" over UDP socket...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 322 memset (buf, 0, sizeof(buf));
wajahat.abbas@u-blox.com 0:4858efb34078 323 *buf = '\x1b';
wajahat.abbas@u-blox.com 0:4858efb34078 324 if (sockUdp.sendto(udpServer, (void *) buf, 48) == 48) {
wajahat.abbas@u-blox.com 0:4858efb34078 325 pulseEvent();
qasimublox 3:6debe6b322c4 326 print_function("Socket send completed, waiting for UDP response...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 327 x = sockUdp.recvfrom(&udpSenderAddress, buf, sizeof (buf));
wajahat.abbas@u-blox.com 0:4858efb34078 328 if (x > 0) {
wajahat.abbas@u-blox.com 0:4858efb34078 329 pulseEvent();
qasimublox 3:6debe6b322c4 330 print_function("Received %d byte response from server %s on UDP socket:\n"
wajahat.abbas@u-blox.com 0:4858efb34078 331 "-------------------------------------------------------\n",
wajahat.abbas@u-blox.com 0:4858efb34078 332 x, udpSenderAddress.get_ip_address());
wajahat.abbas@u-blox.com 0:4858efb34078 333 printNtpTime(buf, x);
qasimublox 3:6debe6b322c4 334 print_function("-------------------------------------------------------\n");
wajahat.abbas@u-blox.com 0:4858efb34078 335 }
wajahat.abbas@u-blox.com 0:4858efb34078 336 }
qasimublox 3:6debe6b322c4 337 print_function("Closing socket...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 338 sockUdp.close();
wajahat.abbas@u-blox.com 0:4858efb34078 339 pulseEvent();
qasimublox 3:6debe6b322c4 340 print_function("Socket closed.\n");
wajahat.abbas@u-blox.com 0:4858efb34078 341 }
wajahat.abbas@u-blox.com 0:4858efb34078 342 #ifdef TARGET_UBLOX_C030_R412M
wajahat.abbas@u-blox.com 0:4858efb34078 343 while(modem_asleep == false) { //modem is awake, let it go to sleep again
qasimublox 3:6debe6b322c4 344 print_function("Waiting for modem to go to PSM sleep\n");
wajahat.abbas@u-blox.com 0:4858efb34078 345 wait_ms(5000);
wajahat.abbas@u-blox.com 0:4858efb34078 346 }
wajahat.abbas@u-blox.com 0:4858efb34078 347 }
wajahat.abbas@u-blox.com 0:4858efb34078 348 #endif /* TARGET_UBLOX_C030_R412M */
qasim-ublox 4:574b2be59d12 349
wajahat.abbas@u-blox.com 0:4858efb34078 350
qasim-ublox 6:29f8fd75379d 351 wait_ms(20000);
wajahat.abbas@u-blox.com 0:4858efb34078 352 #ifndef TARGET_UBLOX_C027
qasimublox 3:6debe6b322c4 353 print_function("\n\n[Checking if user button has been pressed]\n");
wajahat.abbas@u-blox.com 0:4858efb34078 354 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 355 }
wajahat.abbas@u-blox.com 0:4858efb34078 356
wajahat.abbas@u-blox.com 0:4858efb34078 357 pulseEvent();
qasimublox 3:6debe6b322c4 358 print_function("User button was pressed, stopping...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 359 interface->disconnect();
wajahat.abbas@u-blox.com 0:4858efb34078 360 ledOff();
qasimublox 3:6debe6b322c4 361 print_function("Stopped.\n");
wajahat.abbas@u-blox.com 0:4858efb34078 362 } else {
wajahat.abbas@u-blox.com 0:4858efb34078 363 bad();
qasim-ublox 4:574b2be59d12 364 print_function("Unable to get IP address of \"2.pool.ntp.org\".\n");
wajahat.abbas@u-blox.com 0:4858efb34078 365 }
wajahat.abbas@u-blox.com 0:4858efb34078 366 }
wajahat.abbas@u-blox.com 0:4858efb34078 367
wajahat.abbas@u-blox.com 0:4858efb34078 368 // End Of File