Eric Jung
/
WIZnet-IoTShield-BG96-PSM
BG96 Cat.M1 PSM setting sample for WIZnet IoT Shield
main.cpp@2:d7c5df056a3b, 2019-03-21 (annotated)
- Committer:
- hkjung
- Date:
- Thu Mar 21 07:51:49 2019 +0000
- Revision:
- 2:d7c5df056a3b
- Parent:
- 1:0d7ba45f12b1
Initial Release
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
hkjung | 0:5cd6077e0a8e | 1 | /* WIZnet IoT Shield Cat.M1 Sample code for Arm MBED |
hkjung | 0:5cd6077e0a8e | 2 | * Copyright (c) 2019 WIZnet Co., Ltd. |
hkjung | 0:5cd6077e0a8e | 3 | * SPDX-License-Identifier: Apache-2.0 |
hkjung | 0:5cd6077e0a8e | 4 | */ |
hkjung | 0:5cd6077e0a8e | 5 | |
hkjung | 0:5cd6077e0a8e | 6 | /* |
hkjung | 0:5cd6077e0a8e | 7 | * Licensed under the Apache License, Version 2.0 (the "License"); |
hkjung | 0:5cd6077e0a8e | 8 | * you may not use this file except in compliance with the License. |
hkjung | 0:5cd6077e0a8e | 9 | * You may obtain a copy of the License at |
hkjung | 0:5cd6077e0a8e | 10 | * |
hkjung | 0:5cd6077e0a8e | 11 | * http://www.apache.org/licenses/LICENSE-2.0 |
hkjung | 0:5cd6077e0a8e | 12 | * |
hkjung | 0:5cd6077e0a8e | 13 | * Unless required by applicable law or agreed to in writing, software |
hkjung | 0:5cd6077e0a8e | 14 | * distributed under the License is distributed on an "AS IS" BASIS, |
hkjung | 0:5cd6077e0a8e | 15 | * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. |
hkjung | 0:5cd6077e0a8e | 16 | * |
hkjung | 0:5cd6077e0a8e | 17 | * See the License for the specific language governing permissions and |
hkjung | 0:5cd6077e0a8e | 18 | * limitations under the License. |
hkjung | 0:5cd6077e0a8e | 19 | * |
hkjung | 0:5cd6077e0a8e | 20 | */ |
hkjung | 0:5cd6077e0a8e | 21 | |
hkjung | 0:5cd6077e0a8e | 22 | |
hkjung | 0:5cd6077e0a8e | 23 | #include <string> |
hkjung | 0:5cd6077e0a8e | 24 | #include "mbed.h" |
hkjung | 0:5cd6077e0a8e | 25 | |
hkjung | 0:5cd6077e0a8e | 26 | #define RET_OK 1 |
hkjung | 0:5cd6077e0a8e | 27 | #define RET_NOK -1 |
hkjung | 0:5cd6077e0a8e | 28 | #define DEBUG_ENABLE 1 |
hkjung | 0:5cd6077e0a8e | 29 | #define DEBUG_DISABLE 0 |
hkjung | 0:5cd6077e0a8e | 30 | #define ON 1 |
hkjung | 0:5cd6077e0a8e | 31 | #define OFF 0 |
hkjung | 0:5cd6077e0a8e | 32 | |
hkjung | 0:5cd6077e0a8e | 33 | #define MAX_BUF_SIZE 1024 |
hkjung | 0:5cd6077e0a8e | 34 | |
hkjung | 0:5cd6077e0a8e | 35 | #define BG96_APN_PROTOCOL_IPv4 1 |
hkjung | 0:5cd6077e0a8e | 36 | #define BG96_APN_PROTOCOL_IPv6 2 |
hkjung | 0:5cd6077e0a8e | 37 | #define BG96_DEFAULT_TIMEOUT 1000 |
hkjung | 0:5cd6077e0a8e | 38 | #define BG96_CONNECT_TIMEOUT 15000 |
hkjung | 0:5cd6077e0a8e | 39 | #define BG96_SEND_TIMEOUT 500 |
hkjung | 0:5cd6077e0a8e | 40 | #define BG96_RECV_TIMEOUT 500 |
hkjung | 0:5cd6077e0a8e | 41 | |
hkjung | 0:5cd6077e0a8e | 42 | #define BG96_APN_PROTOCOL BG96_APN_PROTOCOL_IPv6 |
hkjung | 0:5cd6077e0a8e | 43 | #define BG96_DEFAULT_BAUD_RATE 115200 |
hkjung | 0:5cd6077e0a8e | 44 | #define BG96_PARSER_DELIMITER "\r\n" |
hkjung | 0:5cd6077e0a8e | 45 | |
hkjung | 0:5cd6077e0a8e | 46 | #define CATM1_APN_SKT "lte-internet.sktelecom.com" |
hkjung | 0:5cd6077e0a8e | 47 | |
hkjung | 0:5cd6077e0a8e | 48 | #define CATM1_DEVICE_NAME_BG96 "BG96" |
hkjung | 0:5cd6077e0a8e | 49 | #define DEVNAME CATM1_DEVICE_NAME_BG96 |
hkjung | 0:5cd6077e0a8e | 50 | |
hkjung | 0:5cd6077e0a8e | 51 | #define devlog(f_, ...) if(CATM1_DEVICE_DEBUG == DEBUG_ENABLE) { pc.printf("\r\n[%s] ", DEVNAME); pc.printf((f_), ##__VA_ARGS__); } |
hkjung | 0:5cd6077e0a8e | 52 | #define myprintf(f_, ...) {pc.printf("\r\n[MAIN] "); pc.printf((f_), ##__VA_ARGS__);} |
hkjung | 0:5cd6077e0a8e | 53 | |
hkjung | 0:5cd6077e0a8e | 54 | /* Pin configuraiton */ |
hkjung | 0:5cd6077e0a8e | 55 | // Cat.M1 |
hkjung | 0:5cd6077e0a8e | 56 | #define MBED_CONF_IOTSHIELD_CATM1_TX D8 |
hkjung | 0:5cd6077e0a8e | 57 | #define MBED_CONF_IOTSHIELD_CATM1_RX D2 |
hkjung | 1:0d7ba45f12b1 | 58 | #define MBED_CONF_IOTSHIELD_CATM1_RESET D7 |
hkjung | 0:5cd6077e0a8e | 59 | #define MBED_CONF_IOTSHIELD_CATM1_PWRKEY D9 |
hkjung | 1:0d7ba45f12b1 | 60 | |
hkjung | 0:5cd6077e0a8e | 61 | // Sensors |
hkjung | 0:5cd6077e0a8e | 62 | #define MBED_CONF_IOTSHIELD_SENSOR_CDS A0 |
hkjung | 0:5cd6077e0a8e | 63 | #define MBED_CONF_IOTSHIELD_SENSOR_TEMP A1 |
hkjung | 0:5cd6077e0a8e | 64 | |
hkjung | 0:5cd6077e0a8e | 65 | /* Debug message settings */ |
hkjung | 2:d7c5df056a3b | 66 | #define BG96_PARSER_DEBUG DEBUG_DISABLE |
hkjung | 0:5cd6077e0a8e | 67 | #define CATM1_DEVICE_DEBUG DEBUG_ENABLE |
hkjung | 0:5cd6077e0a8e | 68 | |
hkjung | 1:0d7ba45f12b1 | 69 | |
hkjung | 0:5cd6077e0a8e | 70 | // Functions: Module Status |
hkjung | 0:5cd6077e0a8e | 71 | void waitCatM1Ready(void); |
hkjung | 0:5cd6077e0a8e | 72 | int8_t setEchoStatus_BG96(bool onoff); |
hkjung | 0:5cd6077e0a8e | 73 | int8_t getUsimStatus_BG96(void); |
hkjung | 0:5cd6077e0a8e | 74 | int8_t getNetworkStatus_BG96(void); |
hkjung | 0:5cd6077e0a8e | 75 | int8_t checknSetApn_BG96(const char * apn); |
hkjung | 0:5cd6077e0a8e | 76 | int8_t getFirmwareVersion_BG96(char * version); |
hkjung | 0:5cd6077e0a8e | 77 | |
hkjung | 2:d7c5df056a3b | 78 | // Functions: PSM (Power Saving Mode) |
hkjung | 2:d7c5df056a3b | 79 | int8_t setPsmActivate_BG96(char * Requested_Periodic_TAU, char * Requested_Active_Time); |
hkjung | 2:d7c5df056a3b | 80 | int8_t setPsmDeactivate_BG96(void); |
hkjung | 2:d7c5df056a3b | 81 | int8_t getPsmSetting_BG96(bool * enable, int * Requested_Periodic_TAU, int * Requested_Active_Time); |
hkjung | 2:d7c5df056a3b | 82 | |
hkjung | 2:d7c5df056a3b | 83 | // Functions: Network time |
hkjung | 2:d7c5df056a3b | 84 | int8_t getNetworkTimeGMT_BG96(char * timestr); |
hkjung | 2:d7c5df056a3b | 85 | int8_t getNetworkTimeLocal_BG96(char * timestr); |
hkjung | 2:d7c5df056a3b | 86 | void setFlagGettime(void); |
hkjung | 2:d7c5df056a3b | 87 | void clearFlagGettime(void); |
hkjung | 2:d7c5df056a3b | 88 | |
hkjung | 0:5cd6077e0a8e | 89 | |
hkjung | 0:5cd6077e0a8e | 90 | Serial pc(USBTX, USBRX); // USB debug |
hkjung | 0:5cd6077e0a8e | 91 | |
hkjung | 0:5cd6077e0a8e | 92 | UARTSerial *_serial; // Cat.M1 module |
hkjung | 0:5cd6077e0a8e | 93 | ATCmdParser *_parser; |
hkjung | 0:5cd6077e0a8e | 94 | |
hkjung | 1:0d7ba45f12b1 | 95 | DigitalOut _RESET_BG96(MBED_CONF_IOTSHIELD_CATM1_RESET); |
hkjung | 1:0d7ba45f12b1 | 96 | DigitalOut _PWRKEY_BG96(MBED_CONF_IOTSHIELD_CATM1_PWRKEY); |
hkjung | 0:5cd6077e0a8e | 97 | |
hkjung | 2:d7c5df056a3b | 98 | Ticker flip; |
hkjung | 2:d7c5df056a3b | 99 | bool flag_gettime = false; |
hkjung | 2:d7c5df056a3b | 100 | |
hkjung | 0:5cd6077e0a8e | 101 | void serialPcInit(void) |
hkjung | 0:5cd6077e0a8e | 102 | { |
hkjung | 0:5cd6077e0a8e | 103 | pc.baud(115200); |
hkjung | 0:5cd6077e0a8e | 104 | pc.format(8, Serial::None, 1); |
hkjung | 0:5cd6077e0a8e | 105 | } |
hkjung | 0:5cd6077e0a8e | 106 | |
hkjung | 0:5cd6077e0a8e | 107 | void serialDeviceInit(PinName tx, PinName rx, int baudrate) |
hkjung | 0:5cd6077e0a8e | 108 | { |
hkjung | 0:5cd6077e0a8e | 109 | _serial = new UARTSerial(tx, rx, baudrate); |
hkjung | 0:5cd6077e0a8e | 110 | } |
hkjung | 0:5cd6077e0a8e | 111 | |
hkjung | 0:5cd6077e0a8e | 112 | void serialAtParserInit(const char *delimiter, bool debug_en) |
hkjung | 0:5cd6077e0a8e | 113 | { |
hkjung | 0:5cd6077e0a8e | 114 | _parser = new ATCmdParser(_serial); |
hkjung | 0:5cd6077e0a8e | 115 | _parser->debug_on(debug_en); |
hkjung | 0:5cd6077e0a8e | 116 | _parser->set_delimiter(delimiter); |
hkjung | 0:5cd6077e0a8e | 117 | _parser->set_timeout(BG96_DEFAULT_TIMEOUT); |
hkjung | 0:5cd6077e0a8e | 118 | } |
hkjung | 0:5cd6077e0a8e | 119 | |
hkjung | 0:5cd6077e0a8e | 120 | void catm1DeviceInit(void) |
hkjung | 0:5cd6077e0a8e | 121 | { |
hkjung | 0:5cd6077e0a8e | 122 | serialDeviceInit( MBED_CONF_IOTSHIELD_CATM1_TX, |
hkjung | 0:5cd6077e0a8e | 123 | MBED_CONF_IOTSHIELD_CATM1_RX, |
hkjung | 0:5cd6077e0a8e | 124 | BG96_DEFAULT_BAUD_RATE); |
hkjung | 0:5cd6077e0a8e | 125 | |
hkjung | 0:5cd6077e0a8e | 126 | serialAtParserInit( BG96_PARSER_DELIMITER, |
hkjung | 0:5cd6077e0a8e | 127 | BG96_PARSER_DEBUG); |
hkjung | 0:5cd6077e0a8e | 128 | } |
hkjung | 0:5cd6077e0a8e | 129 | |
hkjung | 1:0d7ba45f12b1 | 130 | void catm1DeviceReset_BG96(void) |
hkjung | 1:0d7ba45f12b1 | 131 | { |
hkjung | 1:0d7ba45f12b1 | 132 | _RESET_BG96 = 1; |
hkjung | 1:0d7ba45f12b1 | 133 | _PWRKEY_BG96 = 1; |
hkjung | 1:0d7ba45f12b1 | 134 | wait_ms(300); |
hkjung | 0:5cd6077e0a8e | 135 | |
hkjung | 1:0d7ba45f12b1 | 136 | _RESET_BG96 = 0; |
hkjung | 1:0d7ba45f12b1 | 137 | _PWRKEY_BG96 = 0; |
hkjung | 1:0d7ba45f12b1 | 138 | wait_ms(400); |
hkjung | 0:5cd6077e0a8e | 139 | |
hkjung | 1:0d7ba45f12b1 | 140 | _RESET_BG96 = 1; |
hkjung | 1:0d7ba45f12b1 | 141 | wait_ms(1000); |
hkjung | 0:5cd6077e0a8e | 142 | } |
hkjung | 0:5cd6077e0a8e | 143 | |
hkjung | 1:0d7ba45f12b1 | 144 | |
hkjung | 1:0d7ba45f12b1 | 145 | // ---------------------------------------------------------------- |
hkjung | 1:0d7ba45f12b1 | 146 | // Main routine |
hkjung | 1:0d7ba45f12b1 | 147 | // ---------------------------------------------------------------- |
hkjung | 1:0d7ba45f12b1 | 148 | |
hkjung | 0:5cd6077e0a8e | 149 | int main() |
hkjung | 0:5cd6077e0a8e | 150 | { |
hkjung | 0:5cd6077e0a8e | 151 | serialPcInit(); |
hkjung | 0:5cd6077e0a8e | 152 | catm1DeviceInit(); |
hkjung | 0:5cd6077e0a8e | 153 | |
hkjung | 0:5cd6077e0a8e | 154 | myprintf("Waiting for Cat.M1 Module Ready...\r\n"); |
hkjung | 0:5cd6077e0a8e | 155 | |
hkjung | 1:0d7ba45f12b1 | 156 | catm1DeviceReset_BG96(); |
hkjung | 0:5cd6077e0a8e | 157 | |
hkjung | 0:5cd6077e0a8e | 158 | waitCatM1Ready(); |
hkjung | 1:0d7ba45f12b1 | 159 | |
hkjung | 1:0d7ba45f12b1 | 160 | wait_ms(5000); |
hkjung | 0:5cd6077e0a8e | 161 | |
hkjung | 0:5cd6077e0a8e | 162 | myprintf("System Init Complete\r\n"); |
hkjung | 0:5cd6077e0a8e | 163 | |
hkjung | 0:5cd6077e0a8e | 164 | myprintf("WIZnet IoT Shield for Arm MBED"); |
hkjung | 0:5cd6077e0a8e | 165 | myprintf("LTE Cat.M1 Version"); |
hkjung | 0:5cd6077e0a8e | 166 | myprintf("================================================="); |
hkjung | 0:5cd6077e0a8e | 167 | myprintf(">> Target Board: WIoT-QC01 (Quectel BG96)"); |
hkjung | 2:d7c5df056a3b | 168 | myprintf(">> Sample Code: PSM (Power Saving Mode)"); |
hkjung | 0:5cd6077e0a8e | 169 | myprintf("=================================================\r\n"); |
hkjung | 0:5cd6077e0a8e | 170 | |
hkjung | 0:5cd6077e0a8e | 171 | setEchoStatus_BG96(OFF); |
hkjung | 0:5cd6077e0a8e | 172 | |
hkjung | 0:5cd6077e0a8e | 173 | getUsimStatus_BG96(); |
hkjung | 0:5cd6077e0a8e | 174 | |
hkjung | 0:5cd6077e0a8e | 175 | getNetworkStatus_BG96(); |
hkjung | 0:5cd6077e0a8e | 176 | |
hkjung | 0:5cd6077e0a8e | 177 | checknSetApn_BG96(CATM1_APN_SKT); |
hkjung | 0:5cd6077e0a8e | 178 | |
hkjung | 2:d7c5df056a3b | 179 | Timer t; |
hkjung | 2:d7c5df056a3b | 180 | float elapsed_time_sec = 0; |
hkjung | 2:d7c5df056a3b | 181 | bool psm_en = false; |
hkjung | 2:d7c5df056a3b | 182 | int psm_tau = 0; |
hkjung | 2:d7c5df056a3b | 183 | int psm_active = 0; |
hkjung | 2:d7c5df056a3b | 184 | |
hkjung | 2:d7c5df056a3b | 185 | // PSM enable |
hkjung | 2:d7c5df056a3b | 186 | #if 0 |
hkjung | 2:d7c5df056a3b | 187 | setPsmDeactivate_BG96(); |
hkjung | 2:d7c5df056a3b | 188 | #endif |
hkjung | 2:d7c5df056a3b | 189 | if(getPsmSetting_BG96(&psm_en, &psm_tau, &psm_active) == RET_OK) { |
hkjung | 2:d7c5df056a3b | 190 | if(psm_en != true) { |
hkjung | 2:d7c5df056a3b | 191 | if(setPsmActivate_BG96("10100101", "00100100") == RET_OK) { |
hkjung | 2:d7c5df056a3b | 192 | myprintf("Cat.M1 PSM enable, Device reboot"); |
hkjung | 2:d7c5df056a3b | 193 | |
hkjung | 2:d7c5df056a3b | 194 | // Cat.M1 reboot |
hkjung | 2:d7c5df056a3b | 195 | catm1DeviceReset_BG96(); |
hkjung | 2:d7c5df056a3b | 196 | waitCatM1Ready(); |
hkjung | 2:d7c5df056a3b | 197 | } else { |
hkjung | 2:d7c5df056a3b | 198 | myprintf("Cat.M1 PSM enable failed"); |
hkjung | 2:d7c5df056a3b | 199 | } |
hkjung | 2:d7c5df056a3b | 200 | } |
hkjung | 2:d7c5df056a3b | 201 | } |
hkjung | 2:d7c5df056a3b | 202 | |
hkjung | 2:d7c5df056a3b | 203 | myprintf("Cat.M1 PSM Config: %s, TAU time: %dsec, Active time: %dsec", psm_en?"Enabled":"Disabled", psm_tau, psm_active); |
hkjung | 2:d7c5df056a3b | 204 | |
hkjung | 2:d7c5df056a3b | 205 | // Timer event callback |
hkjung | 2:d7c5df056a3b | 206 | flip.attach(callback(&setFlagGettime), 1.0); |
hkjung | 2:d7c5df056a3b | 207 | |
hkjung | 2:d7c5df056a3b | 208 | while(1) |
hkjung | 2:d7c5df056a3b | 209 | { |
hkjung | 2:d7c5df056a3b | 210 | if(flag_gettime) { |
hkjung | 2:d7c5df056a3b | 211 | char nettime[30] = {0, }; |
hkjung | 2:d7c5df056a3b | 212 | if(getNetworkTimeLocal_BG96(nettime) == RET_OK) { |
hkjung | 2:d7c5df056a3b | 213 | if(elapsed_time_sec > 0) { |
hkjung | 2:d7c5df056a3b | 214 | t.stop(); |
hkjung | 2:d7c5df056a3b | 215 | myprintf("Cat.M1 Active, Sleep time: %.2fsec", elapsed_time_sec); |
hkjung | 2:d7c5df056a3b | 216 | elapsed_time_sec = 0; |
hkjung | 2:d7c5df056a3b | 217 | } |
hkjung | 2:d7c5df056a3b | 218 | myprintf("%s", nettime); |
hkjung | 2:d7c5df056a3b | 219 | } else { |
hkjung | 2:d7c5df056a3b | 220 | if(elapsed_time_sec == 0) { |
hkjung | 2:d7c5df056a3b | 221 | t.start(); |
hkjung | 2:d7c5df056a3b | 222 | myprintf("%s", "Sleep Start"); |
hkjung | 2:d7c5df056a3b | 223 | } |
hkjung | 2:d7c5df056a3b | 224 | elapsed_time_sec = t.read(); |
hkjung | 2:d7c5df056a3b | 225 | myprintf("Cat.M1 PSM, %.2f", elapsed_time_sec); |
hkjung | 2:d7c5df056a3b | 226 | } |
hkjung | 2:d7c5df056a3b | 227 | clearFlagGettime(); |
hkjung | 2:d7c5df056a3b | 228 | } |
hkjung | 2:d7c5df056a3b | 229 | } |
hkjung | 2:d7c5df056a3b | 230 | |
hkjung | 2:d7c5df056a3b | 231 | /* |
hkjung | 1:0d7ba45f12b1 | 232 | // Set HTTP request URL |
hkjung | 1:0d7ba45f12b1 | 233 | if(setHttpRequest_BG96(request_url, strlen(request_url)-1) != RET_OK) { |
hkjung | 1:0d7ba45f12b1 | 234 | myprintf("[HTTP] setHttpRequest failed\r\n"); |
hkjung | 1:0d7ba45f12b1 | 235 | while(1){;} |
hkjung | 1:0d7ba45f12b1 | 236 | } |
hkjung | 0:5cd6077e0a8e | 237 | |
hkjung | 1:0d7ba45f12b1 | 238 | int http_response_code = 0; |
hkjung | 1:0d7ba45f12b1 | 239 | int http_response_len = 0; |
hkjung | 0:5cd6077e0a8e | 240 | |
hkjung | 1:0d7ba45f12b1 | 241 | if(sendHttpRequest_BG96(20, &http_response_code, &http_response_len)) { |
hkjung | 1:0d7ba45f12b1 | 242 | if(http_response_code == HTTP_STATUS_CODE_OK) { |
hkjung | 1:0d7ba45f12b1 | 243 | myprintf("[HTTP] 200 OK, Response content length: %d\r\n", http_response_len); |
hkjung | 1:0d7ba45f12b1 | 244 | |
hkjung | 1:0d7ba45f12b1 | 245 | char * http_buf; |
hkjung | 1:0d7ba45f12b1 | 246 | http_buf = (char*)calloc(http_response_len+2, sizeof(char)); // memory allocation |
hkjung | 1:0d7ba45f12b1 | 247 | |
hkjung | 1:0d7ba45f12b1 | 248 | if(getHttpResponse_BG96(20, http_buf, http_response_len+2)) { |
hkjung | 1:0d7ba45f12b1 | 249 | dumpHttpRespones_BG96(http_buf); |
hkjung | 1:0d7ba45f12b1 | 250 | } |
hkjung | 1:0d7ba45f12b1 | 251 | |
hkjung | 1:0d7ba45f12b1 | 252 | free(http_buf); // release |
hkjung | 1:0d7ba45f12b1 | 253 | |
hkjung | 1:0d7ba45f12b1 | 254 | myprintf("[HTTP] getHttpResponse success\r\n"); |
hkjung | 1:0d7ba45f12b1 | 255 | } else { |
hkjung | 1:0d7ba45f12b1 | 256 | myprintf("[HTTP] sendHttpRequest failed - HTTP response code: %d\r\n", http_response_code); |
hkjung | 1:0d7ba45f12b1 | 257 | } |
hkjung | 1:0d7ba45f12b1 | 258 | } |
hkjung | 2:d7c5df056a3b | 259 | */ |
hkjung | 0:5cd6077e0a8e | 260 | } |
hkjung | 0:5cd6077e0a8e | 261 | |
hkjung | 1:0d7ba45f12b1 | 262 | |
hkjung | 1:0d7ba45f12b1 | 263 | // ---------------------------------------------------------------- |
hkjung | 1:0d7ba45f12b1 | 264 | // Functions: Cat.M1 Status |
hkjung | 1:0d7ba45f12b1 | 265 | // ---------------------------------------------------------------- |
hkjung | 1:0d7ba45f12b1 | 266 | |
hkjung | 0:5cd6077e0a8e | 267 | void waitCatM1Ready(void) |
hkjung | 0:5cd6077e0a8e | 268 | { |
hkjung | 0:5cd6077e0a8e | 269 | while(1) |
hkjung | 0:5cd6077e0a8e | 270 | { |
hkjung | 0:5cd6077e0a8e | 271 | if(_parser->recv("RDY")) |
hkjung | 0:5cd6077e0a8e | 272 | { |
hkjung | 0:5cd6077e0a8e | 273 | myprintf("BG96 ready\r\n"); |
hkjung | 0:5cd6077e0a8e | 274 | return ; |
hkjung | 0:5cd6077e0a8e | 275 | } |
hkjung | 0:5cd6077e0a8e | 276 | else if(_parser->send("AT") && _parser->recv("OK")) |
hkjung | 0:5cd6077e0a8e | 277 | { |
hkjung | 0:5cd6077e0a8e | 278 | myprintf("BG96 already available\r\n"); |
hkjung | 0:5cd6077e0a8e | 279 | return ; |
hkjung | 0:5cd6077e0a8e | 280 | } |
hkjung | 0:5cd6077e0a8e | 281 | } |
hkjung | 0:5cd6077e0a8e | 282 | } |
hkjung | 0:5cd6077e0a8e | 283 | |
hkjung | 0:5cd6077e0a8e | 284 | int8_t setEchoStatus_BG96(bool onoff) |
hkjung | 0:5cd6077e0a8e | 285 | { |
hkjung | 0:5cd6077e0a8e | 286 | int8_t ret = RET_NOK; |
hkjung | 0:5cd6077e0a8e | 287 | char _buf[10]; |
hkjung | 0:5cd6077e0a8e | 288 | |
hkjung | 0:5cd6077e0a8e | 289 | sprintf((char *)_buf, "ATE%d", onoff); |
hkjung | 0:5cd6077e0a8e | 290 | |
hkjung | 0:5cd6077e0a8e | 291 | if(_parser->send(_buf) && _parser->recv("OK")) { |
hkjung | 0:5cd6077e0a8e | 292 | devlog("Turn Echo %s success\r\n", onoff?"ON":"OFF"); |
hkjung | 0:5cd6077e0a8e | 293 | ret = RET_OK; |
hkjung | 0:5cd6077e0a8e | 294 | } else { |
hkjung | 0:5cd6077e0a8e | 295 | devlog("Turn Echo %s failed\r\n", onoff?"ON":"OFF"); |
hkjung | 0:5cd6077e0a8e | 296 | } |
hkjung | 0:5cd6077e0a8e | 297 | return ret; |
hkjung | 0:5cd6077e0a8e | 298 | } |
hkjung | 0:5cd6077e0a8e | 299 | |
hkjung | 0:5cd6077e0a8e | 300 | int8_t getUsimStatus_BG96(void) |
hkjung | 0:5cd6077e0a8e | 301 | { |
hkjung | 0:5cd6077e0a8e | 302 | int8_t ret = RET_NOK; |
hkjung | 0:5cd6077e0a8e | 303 | |
hkjung | 0:5cd6077e0a8e | 304 | _parser->send("AT+CPIN?"); |
hkjung | 0:5cd6077e0a8e | 305 | if(_parser->recv("+CPIN: READY") && _parser->recv("OK")) { |
hkjung | 0:5cd6077e0a8e | 306 | devlog("USIM Status: READY\r\n"); |
hkjung | 0:5cd6077e0a8e | 307 | ret = RET_OK; |
hkjung | 0:5cd6077e0a8e | 308 | } else { |
hkjung | 0:5cd6077e0a8e | 309 | devlog("Retrieving USIM Status failed\r\n"); |
hkjung | 0:5cd6077e0a8e | 310 | } |
hkjung | 0:5cd6077e0a8e | 311 | return ret; |
hkjung | 0:5cd6077e0a8e | 312 | } |
hkjung | 0:5cd6077e0a8e | 313 | |
hkjung | 0:5cd6077e0a8e | 314 | int8_t getNetworkStatus_BG96(void) |
hkjung | 0:5cd6077e0a8e | 315 | { |
hkjung | 0:5cd6077e0a8e | 316 | int8_t ret = RET_NOK; |
hkjung | 0:5cd6077e0a8e | 317 | |
hkjung | 0:5cd6077e0a8e | 318 | if(_parser->send("AT+QCDS") && _parser->recv("+QCDS: \"SRV\"") && _parser->recv("OK")) { |
hkjung | 0:5cd6077e0a8e | 319 | devlog("Network Status: attached\r\n"); |
hkjung | 0:5cd6077e0a8e | 320 | ret = RET_OK; |
hkjung | 0:5cd6077e0a8e | 321 | } else if (_parser->send("AT+QCDS") && _parser->recv("+QCDS: \"LIMITED\"") && _parser->recv("OK")) { |
hkjung | 0:5cd6077e0a8e | 322 | devlog("Network Status: limited\r\n"); |
hkjung | 0:5cd6077e0a8e | 323 | ret = RET_OK; |
hkjung | 0:5cd6077e0a8e | 324 | } else { |
hkjung | 0:5cd6077e0a8e | 325 | devlog("Network Status: Error\r\n"); |
hkjung | 0:5cd6077e0a8e | 326 | } |
hkjung | 0:5cd6077e0a8e | 327 | return ret; |
hkjung | 0:5cd6077e0a8e | 328 | } |
hkjung | 0:5cd6077e0a8e | 329 | |
hkjung | 0:5cd6077e0a8e | 330 | int8_t checknSetApn_BG96(const char * apn) // Configure Parameters of a TCP/IP Context |
hkjung | 0:5cd6077e0a8e | 331 | { |
hkjung | 0:5cd6077e0a8e | 332 | char resp_str[100]; |
hkjung | 0:5cd6077e0a8e | 333 | |
hkjung | 0:5cd6077e0a8e | 334 | uint16_t i = 0; |
hkjung | 0:5cd6077e0a8e | 335 | char * search_pt; |
hkjung | 0:5cd6077e0a8e | 336 | |
hkjung | 0:5cd6077e0a8e | 337 | memset(resp_str, 0, sizeof(resp_str)); |
hkjung | 0:5cd6077e0a8e | 338 | |
hkjung | 0:5cd6077e0a8e | 339 | devlog("Checking APN...\r\n"); |
hkjung | 0:5cd6077e0a8e | 340 | |
hkjung | 0:5cd6077e0a8e | 341 | _parser->send("AT+QICSGP=1"); |
hkjung | 0:5cd6077e0a8e | 342 | |
hkjung | 0:5cd6077e0a8e | 343 | while(1) |
hkjung | 0:5cd6077e0a8e | 344 | { |
hkjung | 0:5cd6077e0a8e | 345 | _parser->read(&resp_str[i++], 1); |
hkjung | 0:5cd6077e0a8e | 346 | search_pt = strstr(resp_str, "OK\r\n"); |
hkjung | 0:5cd6077e0a8e | 347 | if (search_pt != 0) |
hkjung | 0:5cd6077e0a8e | 348 | { |
hkjung | 0:5cd6077e0a8e | 349 | break; |
hkjung | 0:5cd6077e0a8e | 350 | } |
hkjung | 0:5cd6077e0a8e | 351 | } |
hkjung | 0:5cd6077e0a8e | 352 | |
hkjung | 0:5cd6077e0a8e | 353 | search_pt = strstr(resp_str, apn); |
hkjung | 0:5cd6077e0a8e | 354 | if (search_pt == 0) |
hkjung | 0:5cd6077e0a8e | 355 | { |
hkjung | 0:5cd6077e0a8e | 356 | devlog("Mismatched APN: %s\r\n", resp_str); |
hkjung | 0:5cd6077e0a8e | 357 | devlog("Storing APN %s...\r\n", apn); |
hkjung | 0:5cd6077e0a8e | 358 | if(!(_parser->send("AT+QICSGP=1,%d,\"%s\",\"\",\"\",0", BG96_APN_PROTOCOL, apn) && _parser->recv("OK"))) |
hkjung | 0:5cd6077e0a8e | 359 | { |
hkjung | 0:5cd6077e0a8e | 360 | return RET_NOK; // failed |
hkjung | 0:5cd6077e0a8e | 361 | } |
hkjung | 0:5cd6077e0a8e | 362 | } |
hkjung | 1:0d7ba45f12b1 | 363 | devlog("APN Check Done\r\n"); |
hkjung | 1:0d7ba45f12b1 | 364 | |
hkjung | 0:5cd6077e0a8e | 365 | return RET_OK; |
hkjung | 0:5cd6077e0a8e | 366 | } |
hkjung | 0:5cd6077e0a8e | 367 | |
hkjung | 0:5cd6077e0a8e | 368 | int8_t getFirmwareVersion_BG96(char * version) |
hkjung | 0:5cd6077e0a8e | 369 | { |
hkjung | 0:5cd6077e0a8e | 370 | int8_t ret = RET_NOK; |
hkjung | 0:5cd6077e0a8e | 371 | |
hkjung | 0:5cd6077e0a8e | 372 | if(_parser->send("AT+QGMR") && _parser->recv("%s\n", version) && _parser->recv("OK")) |
hkjung | 0:5cd6077e0a8e | 373 | { |
hkjung | 0:5cd6077e0a8e | 374 | ret = RET_OK; |
hkjung | 0:5cd6077e0a8e | 375 | } |
hkjung | 0:5cd6077e0a8e | 376 | return ret; |
hkjung | 0:5cd6077e0a8e | 377 | } |
hkjung | 0:5cd6077e0a8e | 378 | |
hkjung | 0:5cd6077e0a8e | 379 | int8_t getImeiNumber_BG96(char * imei) |
hkjung | 0:5cd6077e0a8e | 380 | { |
hkjung | 0:5cd6077e0a8e | 381 | int8_t ret = RET_NOK; |
hkjung | 0:5cd6077e0a8e | 382 | |
hkjung | 0:5cd6077e0a8e | 383 | if(_parser->send("AT+CGSN") && _parser->recv("%s\n", imei) && _parser->recv("OK")) |
hkjung | 0:5cd6077e0a8e | 384 | { |
hkjung | 0:5cd6077e0a8e | 385 | ret = RET_OK; |
hkjung | 0:5cd6077e0a8e | 386 | } |
hkjung | 0:5cd6077e0a8e | 387 | return ret; |
hkjung | 0:5cd6077e0a8e | 388 | } |
hkjung | 0:5cd6077e0a8e | 389 | |
hkjung | 1:0d7ba45f12b1 | 390 | // ---------------------------------------------------------------- |
hkjung | 2:d7c5df056a3b | 391 | // Functions: Cat.M1 PSM activate / deactivate |
hkjung | 2:d7c5df056a3b | 392 | // ---------------------------------------------------------------- |
hkjung | 2:d7c5df056a3b | 393 | |
hkjung | 2:d7c5df056a3b | 394 | int8_t setPsmActivate_BG96(char *Requested_Periodic_TAU, char *Requested_Active_Time) |
hkjung | 2:d7c5df056a3b | 395 | { |
hkjung | 2:d7c5df056a3b | 396 | int8_t ret = RET_NOK; |
hkjung | 2:d7c5df056a3b | 397 | |
hkjung | 2:d7c5df056a3b | 398 | if (_parser->send("AT+CPSMS=1,,,\"%s\",\"%s\"", Requested_Periodic_TAU, Requested_Active_Time) |
hkjung | 2:d7c5df056a3b | 399 | && _parser->recv("OK")) |
hkjung | 2:d7c5df056a3b | 400 | { |
hkjung | 2:d7c5df056a3b | 401 | devlog("PSM activate success\r\n"); |
hkjung | 2:d7c5df056a3b | 402 | ret = RET_OK; |
hkjung | 2:d7c5df056a3b | 403 | } |
hkjung | 2:d7c5df056a3b | 404 | return ret; |
hkjung | 2:d7c5df056a3b | 405 | } |
hkjung | 2:d7c5df056a3b | 406 | |
hkjung | 2:d7c5df056a3b | 407 | int8_t setPsmDeactivate_BG96(void) |
hkjung | 2:d7c5df056a3b | 408 | { |
hkjung | 2:d7c5df056a3b | 409 | int8_t ret = RET_NOK; |
hkjung | 2:d7c5df056a3b | 410 | |
hkjung | 2:d7c5df056a3b | 411 | if (_parser->send("AT+CPSMS=0") && _parser->recv("OK")) { |
hkjung | 2:d7c5df056a3b | 412 | devlog("PSM deactivate success\r\n"); |
hkjung | 2:d7c5df056a3b | 413 | } |
hkjung | 2:d7c5df056a3b | 414 | return ret; |
hkjung | 2:d7c5df056a3b | 415 | } |
hkjung | 2:d7c5df056a3b | 416 | |
hkjung | 2:d7c5df056a3b | 417 | int8_t getPsmSetting_BG96(bool * enable, int * Requested_Periodic_TAU, int * Requested_Active_Time) |
hkjung | 2:d7c5df056a3b | 418 | { |
hkjung | 2:d7c5df056a3b | 419 | int8_t ret = RET_NOK; |
hkjung | 2:d7c5df056a3b | 420 | int en = 0; |
hkjung | 2:d7c5df056a3b | 421 | |
hkjung | 2:d7c5df056a3b | 422 | if (_parser->send("AT+QPSMS?") // BG96 only |
hkjung | 2:d7c5df056a3b | 423 | && _parser->recv("+QPSMS: %d,,,\"%d\",\"%d\"", &en, Requested_Periodic_TAU, Requested_Active_Time) |
hkjung | 2:d7c5df056a3b | 424 | && _parser->recv("OK")) |
hkjung | 2:d7c5df056a3b | 425 | { |
hkjung | 2:d7c5df056a3b | 426 | if(en != 0) |
hkjung | 2:d7c5df056a3b | 427 | *enable = true; |
hkjung | 2:d7c5df056a3b | 428 | else |
hkjung | 2:d7c5df056a3b | 429 | *enable = false; |
hkjung | 2:d7c5df056a3b | 430 | |
hkjung | 2:d7c5df056a3b | 431 | devlog("Get PSM setting success\r\n"); |
hkjung | 2:d7c5df056a3b | 432 | ret = RET_OK; |
hkjung | 2:d7c5df056a3b | 433 | } |
hkjung | 2:d7c5df056a3b | 434 | return ret; |
hkjung | 2:d7c5df056a3b | 435 | } |
hkjung | 2:d7c5df056a3b | 436 | |
hkjung | 2:d7c5df056a3b | 437 | |
hkjung | 2:d7c5df056a3b | 438 | // ---------------------------------------------------------------- |
hkjung | 2:d7c5df056a3b | 439 | // Functions: Cat.M1 Network time |
hkjung | 2:d7c5df056a3b | 440 | // ---------------------------------------------------------------- |
hkjung | 2:d7c5df056a3b | 441 | |
hkjung | 2:d7c5df056a3b | 442 | int8_t getNetworkTimeGMT_BG96(char * timestr) |
hkjung | 2:d7c5df056a3b | 443 | { |
hkjung | 2:d7c5df056a3b | 444 | int8_t ret = RET_NOK; |
hkjung | 2:d7c5df056a3b | 445 | if (_parser->send("AT+QLTS=1") |
hkjung | 2:d7c5df056a3b | 446 | && _parser->recv("+QLTS: \"%[^\"]\"", timestr) |
hkjung | 2:d7c5df056a3b | 447 | && _parser->recv("OK")) |
hkjung | 2:d7c5df056a3b | 448 | { |
hkjung | 2:d7c5df056a3b | 449 | //devlog("Get current GMT time success\r\n"); |
hkjung | 2:d7c5df056a3b | 450 | ret = RET_OK; |
hkjung | 2:d7c5df056a3b | 451 | } |
hkjung | 2:d7c5df056a3b | 452 | return ret; |
hkjung | 2:d7c5df056a3b | 453 | } |
hkjung | 2:d7c5df056a3b | 454 | |
hkjung | 2:d7c5df056a3b | 455 | int8_t getNetworkTimeLocal_BG96(char * timestr) |
hkjung | 2:d7c5df056a3b | 456 | { |
hkjung | 2:d7c5df056a3b | 457 | int8_t ret = RET_NOK; |
hkjung | 2:d7c5df056a3b | 458 | if (_parser->send("AT+QLTS=2") |
hkjung | 2:d7c5df056a3b | 459 | && _parser->recv("+QLTS: \"%[^\"]\"", timestr) |
hkjung | 2:d7c5df056a3b | 460 | && _parser->recv("OK")) |
hkjung | 2:d7c5df056a3b | 461 | { |
hkjung | 2:d7c5df056a3b | 462 | //devlog("Get current local time success\r\n"); |
hkjung | 2:d7c5df056a3b | 463 | ret = RET_OK; |
hkjung | 2:d7c5df056a3b | 464 | } |
hkjung | 2:d7c5df056a3b | 465 | return ret; |
hkjung | 2:d7c5df056a3b | 466 | } |
hkjung | 2:d7c5df056a3b | 467 | |
hkjung | 2:d7c5df056a3b | 468 | void setFlagGettime(void) |
hkjung | 2:d7c5df056a3b | 469 | { |
hkjung | 2:d7c5df056a3b | 470 | flag_gettime = true; |
hkjung | 2:d7c5df056a3b | 471 | } |
hkjung | 2:d7c5df056a3b | 472 | |
hkjung | 2:d7c5df056a3b | 473 | void clearFlagGettime(void) |
hkjung | 2:d7c5df056a3b | 474 | { |
hkjung | 2:d7c5df056a3b | 475 | flag_gettime = false; |
hkjung | 2:d7c5df056a3b | 476 | } |
hkjung | 2:d7c5df056a3b | 477 | |
hkjung | 2:d7c5df056a3b | 478 | // ---------------------------------------------------------------- |
hkjung | 1:0d7ba45f12b1 | 479 | // Functions: Cat.M1 HTTP send & recv |
hkjung | 1:0d7ba45f12b1 | 480 | // ---------------------------------------------------------------- |
hkjung | 2:d7c5df056a3b | 481 | /* |
hkjung | 1:0d7ba45f12b1 | 482 | int8_t setHttpRequest_BG96(char * req, int len) |
hkjung | 0:5cd6077e0a8e | 483 | { |
hkjung | 0:5cd6077e0a8e | 484 | int8_t ret = RET_NOK; |
hkjung | 0:5cd6077e0a8e | 485 | bool done = false; |
hkjung | 0:5cd6077e0a8e | 486 | |
hkjung | 0:5cd6077e0a8e | 487 | _parser->set_timeout(BG96_CONNECT_TIMEOUT); |
hkjung | 0:5cd6077e0a8e | 488 | |
hkjung | 1:0d7ba45f12b1 | 489 | _parser->send("AT+QHTTPURL=%d,%d", len, 5); |
hkjung | 1:0d7ba45f12b1 | 490 | if( !done && _parser->recv("CONNECT\r\n") ) |
hkjung | 1:0d7ba45f12b1 | 491 | done = (_parser->write(req, len) <= 0); |
hkjung | 1:0d7ba45f12b1 | 492 | |
hkjung | 1:0d7ba45f12b1 | 493 | if( !done ) { |
hkjung | 1:0d7ba45f12b1 | 494 | done = (_parser->recv("OK")); |
hkjung | 1:0d7ba45f12b1 | 495 | if(done) { |
hkjung | 1:0d7ba45f12b1 | 496 | devlog("Set HTTP request URL success: %s\r\n", req); |
hkjung | 1:0d7ba45f12b1 | 497 | ret = RET_OK; |
hkjung | 1:0d7ba45f12b1 | 498 | } |
hkjung | 0:5cd6077e0a8e | 499 | } |
hkjung | 1:0d7ba45f12b1 | 500 | _parser->set_timeout(BG96_DEFAULT_TIMEOUT); |
hkjung | 0:5cd6077e0a8e | 501 | |
hkjung | 0:5cd6077e0a8e | 502 | return ret; |
hkjung | 0:5cd6077e0a8e | 503 | } |
hkjung | 0:5cd6077e0a8e | 504 | |
hkjung | 1:0d7ba45f12b1 | 505 | |
hkjung | 2:d7c5df056a3b | 506 | |
hkjung | 1:0d7ba45f12b1 | 507 | int8_t sendHttpRequest_BG96(int timeout, int * rsp_code, int * content_len) |
hkjung | 0:5cd6077e0a8e | 508 | { |
hkjung | 0:5cd6077e0a8e | 509 | int8_t ret = RET_NOK; |
hkjung | 1:0d7ba45f12b1 | 510 | int err; |
hkjung | 0:5cd6077e0a8e | 511 | |
hkjung | 1:0d7ba45f12b1 | 512 | _parser->set_timeout(BG96_DEFAULT_TIMEOUT + (timeout * 1000)); |
hkjung | 0:5cd6077e0a8e | 513 | |
hkjung | 1:0d7ba45f12b1 | 514 | if( _parser->send("AT+QHTTPGET=%d", timeout) |
hkjung | 1:0d7ba45f12b1 | 515 | && _parser->recv("+QHTTPGET: %d,%d,%d\r\n", &err, rsp_code, content_len) |
hkjung | 1:0d7ba45f12b1 | 516 | && (err == 0)) |
hkjung | 1:0d7ba45f12b1 | 517 | { |
hkjung | 1:0d7ba45f12b1 | 518 | devlog("The HTTP request is sent and the response is successful\r\n"); |
hkjung | 1:0d7ba45f12b1 | 519 | ret = RET_OK; |
hkjung | 1:0d7ba45f12b1 | 520 | } |
hkjung | 1:0d7ba45f12b1 | 521 | _parser->set_timeout(BG96_DEFAULT_TIMEOUT); |
hkjung | 0:5cd6077e0a8e | 522 | |
hkjung | 0:5cd6077e0a8e | 523 | return ret; |
hkjung | 0:5cd6077e0a8e | 524 | } |
hkjung | 0:5cd6077e0a8e | 525 | |
hkjung | 1:0d7ba45f12b1 | 526 | |
hkjung | 1:0d7ba45f12b1 | 527 | int8_t getHttpResponse_BG96(int timeout, char * buf, int len) |
hkjung | 0:5cd6077e0a8e | 528 | { |
hkjung | 0:5cd6077e0a8e | 529 | int8_t ret = RET_NOK; |
hkjung | 1:0d7ba45f12b1 | 530 | bool done = false; |
hkjung | 1:0d7ba45f12b1 | 531 | |
hkjung | 1:0d7ba45f12b1 | 532 | if( _parser->send("AT+QHTTPREAD=%d", timeout) && _parser->recv("CONNECT\r\n")) { |
hkjung | 1:0d7ba45f12b1 | 533 | done = _parser->read(buf, len); |
hkjung | 1:0d7ba45f12b1 | 534 | } |
hkjung | 0:5cd6077e0a8e | 535 | |
hkjung | 1:0d7ba45f12b1 | 536 | if(done) { |
hkjung | 1:0d7ba45f12b1 | 537 | if( _parser->recv("OK") && _parser->recv("+QHTTPREAD: 0")) { |
hkjung | 1:0d7ba45f12b1 | 538 | ret = RET_OK; |
hkjung | 1:0d7ba45f12b1 | 539 | } |
hkjung | 1:0d7ba45f12b1 | 540 | } |
hkjung | 0:5cd6077e0a8e | 541 | return ret; |
hkjung | 0:5cd6077e0a8e | 542 | } |
hkjung | 0:5cd6077e0a8e | 543 | |
hkjung | 1:0d7ba45f12b1 | 544 | void dumpHttpRespones_BG96(char * buf) |
hkjung | 0:5cd6077e0a8e | 545 | { |
hkjung | 1:0d7ba45f12b1 | 546 | myprintf("%s", buf); |
hkjung | 0:5cd6077e0a8e | 547 | } |
hkjung | 2:d7c5df056a3b | 548 | */ |