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:
Tue Nov 05 16:36:31 2019 +0500
Revision:
4:574b2be59d12
Parent:
3:6debe6b322c4
Child:
6:29f8fd75379d
Updated Libraries and application.

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());
wajahat.abbas@u-blox.com 0:4858efb34078 168 Thread::wait(2);
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 Thread::wait(2000);
wajahat.abbas@u-blox.com 0:4858efb34078 184 calculate_icellular_samples();
wajahat.abbas@u-blox.com 0:4858efb34078 185 }
wajahat.abbas@u-blox.com 0:4858efb34078 186 }
wajahat.abbas@u-blox.com 0:4858efb34078 187 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 188 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 189
wajahat.abbas@u-blox.com 0:4858efb34078 190 /* This example program for the u-blox C030-R410M board instantiates
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 191 * the UbloxATCellularInterface and uses it to make a simple sockets
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 192 * connection to a server, using 2.pool.ntp.org for UDP and
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 193 * developer.mbed.org for TCP. It also showcases the 3GPP PSM feature.
wajahat.abbas@u-blox.com 2:500c4fe5b9a4 194 * For a more comprehensive example, where higher layer protocols
wajahat.abbas@u-blox.com 0:4858efb34078 195 * make use of the same sockets interface, see example-ublox-mbed-client.
wajahat.abbas@u-blox.com 0:4858efb34078 196 * Progress may be monitored with a serial terminal running at 9600 baud.
wajahat.abbas@u-blox.com 0:4858efb34078 197 * The LED on the C030 board will turn green when this program is
wajahat.abbas@u-blox.com 0:4858efb34078 198 * operating correctly, pulse blue when a sockets operation is completed
wajahat.abbas@u-blox.com 0:4858efb34078 199 * and turn red if there is a failure.
wajahat.abbas@u-blox.com 0:4858efb34078 200 */
wajahat.abbas@u-blox.com 0:4858efb34078 201 int main()
wajahat.abbas@u-blox.com 0:4858efb34078 202 {
wajahat.abbas@u-blox.com 0:4858efb34078 203 #ifdef TARGET_UBLOX_C030_R412M
wajahat.abbas@u-blox.com 0:4858efb34078 204 #ifdef CURRENT_MEASUREMENT
wajahat.abbas@u-blox.com 0:4858efb34078 205 //current monitoring using Icellular
wajahat.abbas@u-blox.com 0:4858efb34078 206 icell_thread.start(icell_thread_handler);
wajahat.abbas@u-blox.com 0:4858efb34078 207 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 208 int status = 0, pt = 0, at = 0;
wajahat.abbas@u-blox.com 0:4858efb34078 209 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 210 INTERFACE_CLASS *interface = new INTERFACE_CLASS();
wajahat.abbas@u-blox.com 0:4858efb34078 211 // If you need to debug the cellular interface, comment out the
wajahat.abbas@u-blox.com 0:4858efb34078 212 // instantiation above and uncomment the one below.
wajahat.abbas@u-blox.com 0:4858efb34078 213 // For the N2xx interface, change xxx to MBED_CONF_UBLOX_CELL_BAUD_RATE,
wajahat.abbas@u-blox.com 0:4858efb34078 214 // while for the non-N2xx interface change it to MBED_CONF_UBLOX_CELL_N2XX_BAUD_RATE.
wajahat.abbas@u-blox.com 0:4858efb34078 215 // INTERFACE_CLASS *interface = new INTERFACE_CLASS(MDMTXD, MDMRXD,
wajahat.abbas@u-blox.com 0:4858efb34078 216 // xxx,
wajahat.abbas@u-blox.com 0:4858efb34078 217 // true);
qasim-ublox 4:574b2be59d12 218
wajahat.abbas@u-blox.com 0:4858efb34078 219 UDPSocket sockUdp;
wajahat.abbas@u-blox.com 0:4858efb34078 220 SocketAddress udpServer;
wajahat.abbas@u-blox.com 0:4858efb34078 221 SocketAddress udpSenderAddress;
wajahat.abbas@u-blox.com 0:4858efb34078 222 char buf[1024];
wajahat.abbas@u-blox.com 0:4858efb34078 223 int x;
wajahat.abbas@u-blox.com 0:4858efb34078 224 #ifdef TARGET_UBLOX_C027
wajahat.abbas@u-blox.com 0:4858efb34078 225 // No user button on C027
wajahat.abbas@u-blox.com 0:4858efb34078 226 InterruptIn userButton(NC);
wajahat.abbas@u-blox.com 0:4858efb34078 227 #else
wajahat.abbas@u-blox.com 0:4858efb34078 228 InterruptIn userButton(SW0);
wajahat.abbas@u-blox.com 0:4858efb34078 229 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 230
wajahat.abbas@u-blox.com 0:4858efb34078 231 // Attach a function to the user button
wajahat.abbas@u-blox.com 0:4858efb34078 232 userButton.rise(&cbButton);
wajahat.abbas@u-blox.com 0:4858efb34078 233
wajahat.abbas@u-blox.com 0:4858efb34078 234 good();
qasimublox 3:6debe6b322c4 235 print_function("Initializing modem, please wait.\n");
wajahat.abbas@u-blox.com 0:4858efb34078 236 if (interface->init(PIN) == false) //setup modem
wajahat.abbas@u-blox.com 0:4858efb34078 237 {
qasimublox 3:6debe6b322c4 238 int mno_profile;
qasimublox 3:6debe6b322c4 239 int ret_val = false;
qasimublox 3:6debe6b322c4 240 interface->get_mno_profile(&mno_profile);
qasimublox 3:6debe6b322c4 241 if((UbloxATCellularInterface::MNOProfile)mno_profile == (UbloxATCellularInterface::MNOProfile)0)
qasimublox 3:6debe6b322c4 242 {
qasimublox 3:6debe6b322c4 243 print_function("Setting MNO profile..\r");
qasimublox 3:6debe6b322c4 244 if(interface->set_mno_profile(UbloxATCellularInterface::STANDARD_EU))
qasimublox 3:6debe6b322c4 245 {
qasimublox 3:6debe6b322c4 246 print_function("MNO Profile set and rebooting the module\n");
qasimublox 3:6debe6b322c4 247 interface->reboot_modem();
qasimublox 3:6debe6b322c4 248 wait_ms(5000); //give modem a little time
qasimublox 3:6debe6b322c4 249 ret_val = interface->init(PIN);
qasimublox 3:6debe6b322c4 250 }
qasimublox 3:6debe6b322c4 251 }
qasimublox 3:6debe6b322c4 252 if(ret_val == false)
qasimublox 3:6debe6b322c4 253 {
qasimublox 3:6debe6b322c4 254 bad();
qasimublox 3:6debe6b322c4 255 print_function("Failed to Initialize modem\n");
qasimublox 3:6debe6b322c4 256 while(1);
qasimublox 3:6debe6b322c4 257 }
wajahat.abbas@u-blox.com 0:4858efb34078 258 }
qasimublox 3:6debe6b322c4 259 print_function("Initialization complete.\n");
wajahat.abbas@u-blox.com 0:4858efb34078 260 pulseEvent();
wajahat.abbas@u-blox.com 0:4858efb34078 261
wajahat.abbas@u-blox.com 0:4858efb34078 262 #ifdef TARGET_UBLOX_C030_R412M
qasimublox 3:6debe6b322c4 263 print_function("Enabling PSM...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 264 if (interface->set_power_saving_mode(120, 30)) { //enable PSM
qasimublox 3:6debe6b322c4 265 print_function("PSM enabled. Attaching CB function and rebooting the module\n");
wajahat.abbas@u-blox.com 0:4858efb34078 266 interface->attach_cb_psm_going_in(&psm_going_in_cb, NULL); //register callback
wajahat.abbas@u-blox.com 0:4858efb34078 267
wajahat.abbas@u-blox.com 0:4858efb34078 268 //reset modem so that PSM settings can take effect
wajahat.abbas@u-blox.com 0:4858efb34078 269 interface->reboot_modem();
wajahat.abbas@u-blox.com 0:4858efb34078 270 wait_ms(5000); //give modem a little time
wajahat.abbas@u-blox.com 0:4858efb34078 271
qasimublox 3:6debe6b322c4 272 print_function("please wait up to 180 seconds for network registration to complete...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 273 //try to re-init modem and perform registration
qasim-ublox 4:574b2be59d12 274 interface->set_credentials(APN, USERNAME, PASSWORD);
wajahat.abbas@u-blox.com 0:4858efb34078 275 for (x = 0; interface->connect(PIN) != 0; x++) {
wajahat.abbas@u-blox.com 0:4858efb34078 276 if (x > 0) {
wajahat.abbas@u-blox.com 0:4858efb34078 277 bad();
qasimublox 3:6debe6b322c4 278 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 279 }
wajahat.abbas@u-blox.com 0:4858efb34078 280 }
wajahat.abbas@u-blox.com 0:4858efb34078 281
wajahat.abbas@u-blox.com 0:4858efb34078 282 interface->get_power_saving_mode(&status, &pt, &at); //read assigned values
qasimublox 3:6debe6b322c4 283 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 284 pulseEvent();
wajahat.abbas@u-blox.com 0:4858efb34078 285 }
wajahat.abbas@u-blox.com 0:4858efb34078 286
wajahat.abbas@u-blox.com 0:4858efb34078 287 //sometimes modem goes in to PSM before we can do any UDP/TCP transfers
wajahat.abbas@u-blox.com 0:4858efb34078 288 if (modem_asleep == true) {
qasimublox 3:6debe6b322c4 289 print_function("Modem is in PSM, waking up and initializing it\n");
wajahat.abbas@u-blox.com 0:4858efb34078 290 interface->wakeup_modem(); //this wakes up the modem and also CellularBase gets synced with modem state.
wajahat.abbas@u-blox.com 0:4858efb34078 291 init_modem(interface);
wajahat.abbas@u-blox.com 0:4858efb34078 292 modem_asleep = false;
qasimublox 3:6debe6b322c4 293 print_function("Initialization complete\n");
wajahat.abbas@u-blox.com 0:4858efb34078 294 }
wajahat.abbas@u-blox.com 0:4858efb34078 295 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 296
qasim-ublox 4:574b2be59d12 297 print_function("\nGetting the IP address of \"2.pool.ntp.org\"...\n");
qasim-ublox 4:574b2be59d12 298 if ((interface->gethostbyname("2.pool.ntp.org", &udpServer) == 0)) {
wajahat.abbas@u-blox.com 0:4858efb34078 299 pulseEvent();
wajahat.abbas@u-blox.com 0:4858efb34078 300
wajahat.abbas@u-blox.com 0:4858efb34078 301 udpServer.set_port(123);
qasimublox 3:6debe6b322c4 302 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 303
qasimublox 3:6debe6b322c4 304 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 305 while (!buttonPressed) {
wajahat.abbas@u-blox.com 0:4858efb34078 306 #ifdef TARGET_UBLOX_C030_R412M
wajahat.abbas@u-blox.com 0:4858efb34078 307 if (modem_asleep == true) {
qasimublox 3:6debe6b322c4 308 print_function("Modem is in PSM, waking up and initializing it\n");
wajahat.abbas@u-blox.com 0:4858efb34078 309 interface->wakeup_modem(); //this wakes up the modem and also CellularBase gets synced with modem state.
wajahat.abbas@u-blox.com 0:4858efb34078 310 init_modem(interface);
wajahat.abbas@u-blox.com 0:4858efb34078 311 modem_asleep = false;
qasimublox 3:6debe6b322c4 312 print_function("Initialization complete\n");
wajahat.abbas@u-blox.com 0:4858efb34078 313 wait_ms(5000);
wajahat.abbas@u-blox.com 0:4858efb34078 314 } else {
wajahat.abbas@u-blox.com 0:4858efb34078 315 #endif
qasimublox 3:6debe6b322c4 316 print_function("Opening a UDP socket...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 317 if ((sockUdp.open(interface)) == 0) {
wajahat.abbas@u-blox.com 0:4858efb34078 318 // UDP Sockets
wajahat.abbas@u-blox.com 0:4858efb34078 319 pulseEvent();
qasimublox 3:6debe6b322c4 320 print_function("UDP socket open.\n");
wajahat.abbas@u-blox.com 0:4858efb34078 321 sockUdp.set_timeout(20000);
qasimublox 3:6debe6b322c4 322 print_function("Sending time request to \"2.pool.ntp.org\" over UDP socket...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 323 memset (buf, 0, sizeof(buf));
wajahat.abbas@u-blox.com 0:4858efb34078 324 *buf = '\x1b';
wajahat.abbas@u-blox.com 0:4858efb34078 325 if (sockUdp.sendto(udpServer, (void *) buf, 48) == 48) {
wajahat.abbas@u-blox.com 0:4858efb34078 326 pulseEvent();
qasimublox 3:6debe6b322c4 327 print_function("Socket send completed, waiting for UDP response...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 328 x = sockUdp.recvfrom(&udpSenderAddress, buf, sizeof (buf));
wajahat.abbas@u-blox.com 0:4858efb34078 329 if (x > 0) {
wajahat.abbas@u-blox.com 0:4858efb34078 330 pulseEvent();
qasimublox 3:6debe6b322c4 331 print_function("Received %d byte response from server %s on UDP socket:\n"
wajahat.abbas@u-blox.com 0:4858efb34078 332 "-------------------------------------------------------\n",
wajahat.abbas@u-blox.com 0:4858efb34078 333 x, udpSenderAddress.get_ip_address());
wajahat.abbas@u-blox.com 0:4858efb34078 334 printNtpTime(buf, x);
qasimublox 3:6debe6b322c4 335 print_function("-------------------------------------------------------\n");
wajahat.abbas@u-blox.com 0:4858efb34078 336 }
wajahat.abbas@u-blox.com 0:4858efb34078 337 }
qasimublox 3:6debe6b322c4 338 print_function("Closing socket...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 339 sockUdp.close();
wajahat.abbas@u-blox.com 0:4858efb34078 340 pulseEvent();
qasimublox 3:6debe6b322c4 341 print_function("Socket closed.\n");
wajahat.abbas@u-blox.com 0:4858efb34078 342 }
wajahat.abbas@u-blox.com 0:4858efb34078 343 #ifdef TARGET_UBLOX_C030_R412M
wajahat.abbas@u-blox.com 0:4858efb34078 344 while(modem_asleep == false) { //modem is awake, let it go to sleep again
qasimublox 3:6debe6b322c4 345 print_function("Waiting for modem to go to PSM sleep\n");
wajahat.abbas@u-blox.com 0:4858efb34078 346 wait_ms(5000);
wajahat.abbas@u-blox.com 0:4858efb34078 347 }
wajahat.abbas@u-blox.com 0:4858efb34078 348 }
wajahat.abbas@u-blox.com 0:4858efb34078 349 #endif /* TARGET_UBLOX_C030_R412M */
qasim-ublox 4:574b2be59d12 350
wajahat.abbas@u-blox.com 0:4858efb34078 351
wajahat.abbas@u-blox.com 0:4858efb34078 352 wait_ms(5000);
wajahat.abbas@u-blox.com 0:4858efb34078 353 #ifndef TARGET_UBLOX_C027
qasimublox 3:6debe6b322c4 354 print_function("\n\n[Checking if user button has been pressed]\n");
wajahat.abbas@u-blox.com 0:4858efb34078 355 #endif
wajahat.abbas@u-blox.com 0:4858efb34078 356 }
wajahat.abbas@u-blox.com 0:4858efb34078 357
wajahat.abbas@u-blox.com 0:4858efb34078 358 pulseEvent();
qasimublox 3:6debe6b322c4 359 print_function("User button was pressed, stopping...\n");
wajahat.abbas@u-blox.com 0:4858efb34078 360 interface->disconnect();
wajahat.abbas@u-blox.com 0:4858efb34078 361 ledOff();
qasimublox 3:6debe6b322c4 362 print_function("Stopped.\n");
wajahat.abbas@u-blox.com 0:4858efb34078 363 } else {
wajahat.abbas@u-blox.com 0:4858efb34078 364 bad();
qasim-ublox 4:574b2be59d12 365 print_function("Unable to get IP address of \"2.pool.ntp.org\".\n");
wajahat.abbas@u-blox.com 0:4858efb34078 366 }
wajahat.abbas@u-blox.com 0:4858efb34078 367 }
wajahat.abbas@u-blox.com 0:4858efb34078 368
wajahat.abbas@u-blox.com 0:4858efb34078 369 // End Of File