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.
UbloxCellularBase.cpp@14:e420232ee4e7, 2018-01-09 (annotated)
- Committer:
- RobMeades
- Date:
- Tue Jan 09 13:20:15 2018 +0000
- Revision:
- 14:e420232ee4e7
- Parent:
- 13:158a035b1b50
- Child:
- 15:93b157a47b8d
Add methods to return IMEI, MEID, IMSI, ICCID and RSSI.
Who changed what in which revision?
| User | Revision | Line number | New contents of line | 
|---|---|---|---|
| RobMeades | 0:5cffef3371f6 | 1 | /* Copyright (c) 2017 ublox Limited | 
| RobMeades | 0:5cffef3371f6 | 2 | * | 
| RobMeades | 0:5cffef3371f6 | 3 | * Licensed under the Apache License, Version 2.0 (the "License"); | 
| RobMeades | 0:5cffef3371f6 | 4 | * you may not use this file except in compliance with the License. | 
| RobMeades | 0:5cffef3371f6 | 5 | * You may obtain a copy of the License at | 
| RobMeades | 0:5cffef3371f6 | 6 | * | 
| RobMeades | 0:5cffef3371f6 | 7 | * http://www.apache.org/licenses/LICENSE-2.0 | 
| RobMeades | 0:5cffef3371f6 | 8 | * | 
| RobMeades | 0:5cffef3371f6 | 9 | * Unless required by applicable law or agreed to in writing, software | 
| RobMeades | 0:5cffef3371f6 | 10 | * distributed under the License is distributed on an "AS IS" BASIS, | 
| RobMeades | 0:5cffef3371f6 | 11 | * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | 
| RobMeades | 0:5cffef3371f6 | 12 | * See the License for the specific language governing permissions and | 
| RobMeades | 0:5cffef3371f6 | 13 | * limitations under the License. | 
| RobMeades | 0:5cffef3371f6 | 14 | */ | 
| RobMeades | 0:5cffef3371f6 | 15 | |
| RobMeades | 0:5cffef3371f6 | 16 | #include "UARTSerial.h" | 
| RobMeades | 0:5cffef3371f6 | 17 | #include "APN_db.h" | 
| RobMeades | 0:5cffef3371f6 | 18 | #include "UbloxCellularBase.h" | 
| RobMeades | 0:5cffef3371f6 | 19 | #include "onboard_modem_api.h" | 
| RobMeades | 0:5cffef3371f6 | 20 | #ifdef FEATURE_COMMON_PAL | 
| RobMeades | 0:5cffef3371f6 | 21 | #include "mbed_trace.h" | 
| RobMeades | 0:5cffef3371f6 | 22 | #define TRACE_GROUP "UCB" | 
| RobMeades | 0:5cffef3371f6 | 23 | #else | 
| rob.meades@u-blox.com | 2:73fcc33c9400 | 24 | #define tr_debug(format, ...) debug_if(_debug_trace_on, format "\n", ## __VA_ARGS__) | 
| rob.meades@u-blox.com | 2:73fcc33c9400 | 25 | #define tr_info(format, ...) debug_if(_debug_trace_on, format "\n", ## __VA_ARGS__) | 
| rob.meades@u-blox.com | 2:73fcc33c9400 | 26 | #define tr_warn(format, ...) debug_if(_debug_trace_on, format "\n", ## __VA_ARGS__) | 
| rob.meades@u-blox.com | 2:73fcc33c9400 | 27 | #define tr_error(format, ...) debug_if(_debug_trace_on, format "\n", ## __VA_ARGS__) | 
| RobMeades | 0:5cffef3371f6 | 28 | #endif | 
| RobMeades | 0:5cffef3371f6 | 29 | |
| RobMeades | 14:e420232ee4e7 | 30 | /* Array to convert the 3G qual number into a median EC_NO_LEV number. | 
| RobMeades | 14:e420232ee4e7 | 31 | */ | 
| RobMeades | 14:e420232ee4e7 | 32 | /* 0 1 2 3 4 5 6 7 */ | 
| RobMeades | 14:e420232ee4e7 | 33 | const int qualConvert3G[] = {44, 41, 35, 29, 23, 17, 11, 7}; | 
| RobMeades | 14:e420232ee4e7 | 34 | |
| RobMeades | 14:e420232ee4e7 | 35 | /* Array to convert the 3G "rssi" number into a dBm RSCP value rounded up to the | 
| RobMeades | 14:e420232ee4e7 | 36 | * nearest whole number. | 
| RobMeades | 14:e420232ee4e7 | 37 | */ | 
| RobMeades | 14:e420232ee4e7 | 38 | const int rscpConvert3G[] = {-108, -105, -103, -100, -98, -96, -94, -93, /* 0 - 7 */ | 
| RobMeades | 14:e420232ee4e7 | 39 | -91, -89, -88, -85, -83, -80, -78, -76, /* 8 - 15 */ | 
| RobMeades | 14:e420232ee4e7 | 40 | -74, -73, -70, -68, -66, -64, -63, -60, /* 16 - 23 */ | 
| RobMeades | 14:e420232ee4e7 | 41 | -58, -56, -54, -53, -51, -49, -48, -46}; /* 24 - 31 */ | 
| RobMeades | 14:e420232ee4e7 | 42 | |
| RobMeades | 14:e420232ee4e7 | 43 | /* Array to convert the LTE rssi number into a dBm value rounded up to the | 
| RobMeades | 14:e420232ee4e7 | 44 | * nearest whole number. | 
| RobMeades | 14:e420232ee4e7 | 45 | */ | 
| RobMeades | 14:e420232ee4e7 | 46 | const int rssiConvertLte[] = {-118, -115, -113, -110, -108, -105, -103, -100, /* 0 - 7 */ | 
| RobMeades | 14:e420232ee4e7 | 47 | -98, -95, -93, -90, -88, -85, -83, -80, /* 8 - 15 */ | 
| RobMeades | 14:e420232ee4e7 | 48 | -78, -76, -74, -73, -71, -69, -68, -65, /* 16 - 23 */ | 
| RobMeades | 14:e420232ee4e7 | 49 | -63, -61, -60, -59, -58, -55, -53, -48}; /* 24 - 31 */ | 
| RobMeades | 14:e420232ee4e7 | 50 | |
| RobMeades | 0:5cffef3371f6 | 51 | /********************************************************************** | 
| RobMeades | 0:5cffef3371f6 | 52 | * PRIVATE METHODS | 
| RobMeades | 0:5cffef3371f6 | 53 | **********************************************************************/ | 
| RobMeades | 0:5cffef3371f6 | 54 | |
| RobMeades | 0:5cffef3371f6 | 55 | void UbloxCellularBase::set_nwk_reg_status_csd(int status) | 
| RobMeades | 0:5cffef3371f6 | 56 | { | 
| RobMeades | 0:5cffef3371f6 | 57 | switch (status) { | 
| RobMeades | 0:5cffef3371f6 | 58 | case CSD_NOT_REGISTERED_NOT_SEARCHING: | 
| RobMeades | 0:5cffef3371f6 | 59 | case CSD_NOT_REGISTERED_SEARCHING: | 
| RobMeades | 0:5cffef3371f6 | 60 | tr_info("Not (yet) registered for circuit switched service"); | 
| RobMeades | 0:5cffef3371f6 | 61 | break; | 
| RobMeades | 0:5cffef3371f6 | 62 | case CSD_REGISTERED: | 
| RobMeades | 0:5cffef3371f6 | 63 | case CSD_REGISTERED_ROAMING: | 
| RobMeades | 0:5cffef3371f6 | 64 | tr_info("Registered for circuit switched service"); | 
| RobMeades | 0:5cffef3371f6 | 65 | break; | 
| RobMeades | 0:5cffef3371f6 | 66 | case CSD_REGISTRATION_DENIED: | 
| RobMeades | 0:5cffef3371f6 | 67 | tr_info("Circuit switched service denied"); | 
| RobMeades | 0:5cffef3371f6 | 68 | break; | 
| RobMeades | 0:5cffef3371f6 | 69 | case CSD_UNKNOWN_COVERAGE: | 
| RobMeades | 0:5cffef3371f6 | 70 | tr_info("Out of circuit switched service coverage"); | 
| RobMeades | 0:5cffef3371f6 | 71 | break; | 
| RobMeades | 0:5cffef3371f6 | 72 | case CSD_SMS_ONLY: | 
| RobMeades | 0:5cffef3371f6 | 73 | tr_info("SMS service only"); | 
| RobMeades | 0:5cffef3371f6 | 74 | break; | 
| RobMeades | 0:5cffef3371f6 | 75 | case CSD_SMS_ONLY_ROAMING: | 
| RobMeades | 0:5cffef3371f6 | 76 | tr_info("SMS service only"); | 
| RobMeades | 0:5cffef3371f6 | 77 | break; | 
| RobMeades | 0:5cffef3371f6 | 78 | case CSD_CSFB_NOT_PREFERRED: | 
| RobMeades | 0:5cffef3371f6 | 79 | tr_info("Registered for circuit switched service with CSFB not preferred"); | 
| RobMeades | 0:5cffef3371f6 | 80 | break; | 
| RobMeades | 0:5cffef3371f6 | 81 | default: | 
| RobMeades | 0:5cffef3371f6 | 82 | tr_info("Unknown circuit switched service registration status. %d", status); | 
| RobMeades | 0:5cffef3371f6 | 83 | break; | 
| RobMeades | 0:5cffef3371f6 | 84 | } | 
| RobMeades | 0:5cffef3371f6 | 85 | |
| RobMeades | 0:5cffef3371f6 | 86 | _dev_info.reg_status_csd = static_cast<NetworkRegistrationStatusCsd>(status); | 
| RobMeades | 0:5cffef3371f6 | 87 | } | 
| RobMeades | 0:5cffef3371f6 | 88 | |
| RobMeades | 0:5cffef3371f6 | 89 | void UbloxCellularBase::set_nwk_reg_status_psd(int status) | 
| RobMeades | 0:5cffef3371f6 | 90 | { | 
| RobMeades | 0:5cffef3371f6 | 91 | switch (status) { | 
| RobMeades | 0:5cffef3371f6 | 92 | case PSD_NOT_REGISTERED_NOT_SEARCHING: | 
| RobMeades | 0:5cffef3371f6 | 93 | case PSD_NOT_REGISTERED_SEARCHING: | 
| RobMeades | 0:5cffef3371f6 | 94 | tr_info("Not (yet) registered for packet switched service"); | 
| RobMeades | 0:5cffef3371f6 | 95 | break; | 
| RobMeades | 0:5cffef3371f6 | 96 | case PSD_REGISTERED: | 
| RobMeades | 0:5cffef3371f6 | 97 | case PSD_REGISTERED_ROAMING: | 
| RobMeades | 0:5cffef3371f6 | 98 | tr_info("Registered for packet switched service"); | 
| RobMeades | 0:5cffef3371f6 | 99 | break; | 
| RobMeades | 0:5cffef3371f6 | 100 | case PSD_REGISTRATION_DENIED: | 
| RobMeades | 0:5cffef3371f6 | 101 | tr_info("Packet switched service denied"); | 
| RobMeades | 0:5cffef3371f6 | 102 | break; | 
| RobMeades | 0:5cffef3371f6 | 103 | case PSD_UNKNOWN_COVERAGE: | 
| RobMeades | 0:5cffef3371f6 | 104 | tr_info("Out of packet switched service coverage"); | 
| RobMeades | 0:5cffef3371f6 | 105 | break; | 
| RobMeades | 0:5cffef3371f6 | 106 | case PSD_EMERGENCY_SERVICES_ONLY: | 
| RobMeades | 0:5cffef3371f6 | 107 | tr_info("Limited access for packet switched service. Emergency use only."); | 
| RobMeades | 0:5cffef3371f6 | 108 | break; | 
| RobMeades | 0:5cffef3371f6 | 109 | default: | 
| RobMeades | 0:5cffef3371f6 | 110 | tr_info("Unknown packet switched service registration status. %d", status); | 
| RobMeades | 0:5cffef3371f6 | 111 | break; | 
| RobMeades | 0:5cffef3371f6 | 112 | } | 
| RobMeades | 0:5cffef3371f6 | 113 | |
| RobMeades | 0:5cffef3371f6 | 114 | _dev_info.reg_status_psd = static_cast<NetworkRegistrationStatusPsd>(status); | 
| RobMeades | 0:5cffef3371f6 | 115 | } | 
| RobMeades | 0:5cffef3371f6 | 116 | |
| RobMeades | 0:5cffef3371f6 | 117 | void UbloxCellularBase::set_nwk_reg_status_eps(int status) | 
| RobMeades | 0:5cffef3371f6 | 118 | { | 
| RobMeades | 0:5cffef3371f6 | 119 | switch (status) { | 
| RobMeades | 0:5cffef3371f6 | 120 | case EPS_NOT_REGISTERED_NOT_SEARCHING: | 
| RobMeades | 0:5cffef3371f6 | 121 | case EPS_NOT_REGISTERED_SEARCHING: | 
| RobMeades | 0:5cffef3371f6 | 122 | tr_info("Not (yet) registered for EPS service"); | 
| RobMeades | 0:5cffef3371f6 | 123 | break; | 
| RobMeades | 0:5cffef3371f6 | 124 | case EPS_REGISTERED: | 
| RobMeades | 0:5cffef3371f6 | 125 | case EPS_REGISTERED_ROAMING: | 
| RobMeades | 0:5cffef3371f6 | 126 | tr_info("Registered for EPS service"); | 
| RobMeades | 0:5cffef3371f6 | 127 | break; | 
| RobMeades | 0:5cffef3371f6 | 128 | case EPS_REGISTRATION_DENIED: | 
| RobMeades | 0:5cffef3371f6 | 129 | tr_info("EPS service denied"); | 
| RobMeades | 0:5cffef3371f6 | 130 | break; | 
| RobMeades | 0:5cffef3371f6 | 131 | case EPS_UNKNOWN_COVERAGE: | 
| RobMeades | 0:5cffef3371f6 | 132 | tr_info("Out of EPS service coverage"); | 
| RobMeades | 0:5cffef3371f6 | 133 | break; | 
| RobMeades | 0:5cffef3371f6 | 134 | case EPS_EMERGENCY_SERVICES_ONLY: | 
| RobMeades | 0:5cffef3371f6 | 135 | tr_info("Limited access for EPS service. Emergency use only."); | 
| RobMeades | 0:5cffef3371f6 | 136 | break; | 
| RobMeades | 0:5cffef3371f6 | 137 | default: | 
| RobMeades | 0:5cffef3371f6 | 138 | tr_info("Unknown EPS service registration status. %d", status); | 
| RobMeades | 0:5cffef3371f6 | 139 | break; | 
| RobMeades | 0:5cffef3371f6 | 140 | } | 
| RobMeades | 0:5cffef3371f6 | 141 | |
| RobMeades | 0:5cffef3371f6 | 142 | _dev_info.reg_status_eps = static_cast<NetworkRegistrationStatusEps>(status); | 
| RobMeades | 0:5cffef3371f6 | 143 | } | 
| RobMeades | 0:5cffef3371f6 | 144 | |
| RobMeades | 14:e420232ee4e7 | 145 | void UbloxCellularBase::set_rat(int acTStatus) | 
| RobMeades | 0:5cffef3371f6 | 146 | { | 
| RobMeades | 14:e420232ee4e7 | 147 | switch (acTStatus) { | 
| RobMeades | 0:5cffef3371f6 | 148 | case GSM: | 
| RobMeades | 0:5cffef3371f6 | 149 | case COMPACT_GSM: | 
| RobMeades | 0:5cffef3371f6 | 150 | tr_info("Connected in GSM"); | 
| RobMeades | 0:5cffef3371f6 | 151 | break; | 
| RobMeades | 0:5cffef3371f6 | 152 | case UTRAN: | 
| RobMeades | 0:5cffef3371f6 | 153 | tr_info("Connected to UTRAN"); | 
| RobMeades | 0:5cffef3371f6 | 154 | break; | 
| RobMeades | 0:5cffef3371f6 | 155 | case EDGE: | 
| RobMeades | 0:5cffef3371f6 | 156 | tr_info("Connected to EDGE"); | 
| RobMeades | 0:5cffef3371f6 | 157 | break; | 
| RobMeades | 0:5cffef3371f6 | 158 | case HSDPA: | 
| RobMeades | 0:5cffef3371f6 | 159 | tr_info("Connected to HSDPA"); | 
| RobMeades | 0:5cffef3371f6 | 160 | break; | 
| RobMeades | 0:5cffef3371f6 | 161 | case HSUPA: | 
| RobMeades | 0:5cffef3371f6 | 162 | tr_info("Connected to HSPA"); | 
| RobMeades | 0:5cffef3371f6 | 163 | break; | 
| RobMeades | 0:5cffef3371f6 | 164 | case HSDPA_HSUPA: | 
| RobMeades | 0:5cffef3371f6 | 165 | tr_info("Connected to HDPA/HSPA"); | 
| RobMeades | 0:5cffef3371f6 | 166 | break; | 
| RobMeades | 0:5cffef3371f6 | 167 | case LTE: | 
| RobMeades | 0:5cffef3371f6 | 168 | tr_info("Connected to LTE"); | 
| RobMeades | 0:5cffef3371f6 | 169 | break; | 
| fahimalavi | 10:c4281fa79b8f | 170 | case EC_GSM_IoT: | 
| fahimalavi | 10:c4281fa79b8f | 171 | tr_info("Connected to EC_GSM_IoT"); | 
| fahimalavi | 10:c4281fa79b8f | 172 | break; | 
| fahimalavi | 10:c4281fa79b8f | 173 | case E_UTRAN_NB_S1: | 
| fahimalavi | 10:c4281fa79b8f | 174 | tr_info("Connected to E_UTRAN NB1"); | 
| fahimalavi | 10:c4281fa79b8f | 175 | break; | 
| RobMeades | 0:5cffef3371f6 | 176 | default: | 
| RobMeades | 14:e420232ee4e7 | 177 | tr_info("Unknown RAT %d", acTStatus); | 
| RobMeades | 0:5cffef3371f6 | 178 | break; | 
| RobMeades | 0:5cffef3371f6 | 179 | } | 
| RobMeades | 0:5cffef3371f6 | 180 | |
| RobMeades | 14:e420232ee4e7 | 181 | _dev_info.rat = static_cast<RadioAccessNetworkType>(acTStatus); | 
| RobMeades | 0:5cffef3371f6 | 182 | } | 
| RobMeades | 0:5cffef3371f6 | 183 | |
| RobMeades | 0:5cffef3371f6 | 184 | bool UbloxCellularBase::get_iccid() | 
| RobMeades | 0:5cffef3371f6 | 185 | { | 
| RobMeades | 0:5cffef3371f6 | 186 | bool success; | 
| RobMeades | 0:5cffef3371f6 | 187 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 188 | |
| RobMeades | 0:5cffef3371f6 | 189 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 190 | |
| RobMeades | 0:5cffef3371f6 | 191 | // Returns the ICCID (Integrated Circuit Card ID) of the SIM-card. | 
| RobMeades | 0:5cffef3371f6 | 192 | // ICCID is a serial number identifying the SIM. | 
| RobMeades | 0:5cffef3371f6 | 193 | // AT Command Manual UBX-13002752, section 4.12 | 
| RobMeades | 0:5cffef3371f6 | 194 | success = _at->send("AT+CCID") && _at->recv("+CCID: %20[^\n]\nOK\n", _dev_info.iccid); | 
| RobMeades | 0:5cffef3371f6 | 195 | tr_info("DevInfo: ICCID=%s", _dev_info.iccid); | 
| RobMeades | 0:5cffef3371f6 | 196 | |
| RobMeades | 0:5cffef3371f6 | 197 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 198 | return success; | 
| RobMeades | 0:5cffef3371f6 | 199 | } | 
| RobMeades | 0:5cffef3371f6 | 200 | |
| RobMeades | 0:5cffef3371f6 | 201 | bool UbloxCellularBase::get_imsi() | 
| RobMeades | 0:5cffef3371f6 | 202 | { | 
| RobMeades | 0:5cffef3371f6 | 203 | bool success; | 
| RobMeades | 0:5cffef3371f6 | 204 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 205 | |
| RobMeades | 0:5cffef3371f6 | 206 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 207 | |
| RobMeades | 0:5cffef3371f6 | 208 | // International mobile subscriber identification | 
| RobMeades | 0:5cffef3371f6 | 209 | // AT Command Manual UBX-13002752, section 4.11 | 
| RobMeades | 0:5cffef3371f6 | 210 | success = _at->send("AT+CIMI") && _at->recv("%15[^\n]\nOK\n", _dev_info.imsi); | 
| RobMeades | 0:5cffef3371f6 | 211 | tr_info("DevInfo: IMSI=%s", _dev_info.imsi); | 
| RobMeades | 0:5cffef3371f6 | 212 | |
| RobMeades | 0:5cffef3371f6 | 213 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 214 | return success; | 
| RobMeades | 0:5cffef3371f6 | 215 | } | 
| RobMeades | 0:5cffef3371f6 | 216 | |
| RobMeades | 0:5cffef3371f6 | 217 | bool UbloxCellularBase::get_imei() | 
| RobMeades | 0:5cffef3371f6 | 218 | { | 
| RobMeades | 0:5cffef3371f6 | 219 | bool success; | 
| RobMeades | 0:5cffef3371f6 | 220 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 221 | |
| RobMeades | 0:5cffef3371f6 | 222 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 223 | |
| RobMeades | 0:5cffef3371f6 | 224 | // International mobile equipment identifier | 
| RobMeades | 0:5cffef3371f6 | 225 | // AT Command Manual UBX-13002752, section 4.7 | 
| RobMeades | 0:5cffef3371f6 | 226 | success = _at->send("AT+CGSN") && _at->recv("%15[^\n]\nOK\n", _dev_info.imei); | 
| RobMeades | 0:5cffef3371f6 | 227 | tr_info("DevInfo: IMEI=%s", _dev_info.imei); | 
| RobMeades | 0:5cffef3371f6 | 228 | |
| RobMeades | 0:5cffef3371f6 | 229 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 230 | return success; | 
| RobMeades | 0:5cffef3371f6 | 231 | } | 
| RobMeades | 0:5cffef3371f6 | 232 | |
| RobMeades | 0:5cffef3371f6 | 233 | bool UbloxCellularBase::get_meid() | 
| RobMeades | 0:5cffef3371f6 | 234 | { | 
| RobMeades | 0:5cffef3371f6 | 235 | bool success; | 
| RobMeades | 0:5cffef3371f6 | 236 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 237 | |
| RobMeades | 0:5cffef3371f6 | 238 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 239 | |
| RobMeades | 0:5cffef3371f6 | 240 | // Mobile equipment identifier | 
| RobMeades | 0:5cffef3371f6 | 241 | // AT Command Manual UBX-13002752, section 4.8 | 
| RobMeades | 0:5cffef3371f6 | 242 | success = _at->send("AT+GSN") && _at->recv("%18[^\n]\nOK\n", _dev_info.meid); | 
| RobMeades | 0:5cffef3371f6 | 243 | tr_info("DevInfo: MEID=%s", _dev_info.meid); | 
| RobMeades | 0:5cffef3371f6 | 244 | |
| RobMeades | 0:5cffef3371f6 | 245 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 246 | return success; | 
| RobMeades | 0:5cffef3371f6 | 247 | } | 
| RobMeades | 0:5cffef3371f6 | 248 | |
| RobMeades | 0:5cffef3371f6 | 249 | bool UbloxCellularBase::set_sms() | 
| RobMeades | 0:5cffef3371f6 | 250 | { | 
| RobMeades | 0:5cffef3371f6 | 251 | bool success = false; | 
| RobMeades | 0:5cffef3371f6 | 252 | char buf[32]; | 
| RobMeades | 0:5cffef3371f6 | 253 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 254 | |
| RobMeades | 0:5cffef3371f6 | 255 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 256 | |
| RobMeades | 0:5cffef3371f6 | 257 | // Set up SMS format and enable URC | 
| RobMeades | 0:5cffef3371f6 | 258 | // AT Command Manual UBX-13002752, section 11 | 
| RobMeades | 0:5cffef3371f6 | 259 | if (_at->send("AT+CMGF=1") && _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 260 | tr_debug("SMS in text mode"); | 
| RobMeades | 0:5cffef3371f6 | 261 | if (_at->send("AT+CNMI=2,1") && _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 262 | tr_debug("SMS URC enabled"); | 
| RobMeades | 0:5cffef3371f6 | 263 | // Set to CS preferred since PS preferred doesn't work | 
| RobMeades | 0:5cffef3371f6 | 264 | // on some networks | 
| RobMeades | 0:5cffef3371f6 | 265 | if (_at->send("AT+CGSMS=1") && _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 266 | tr_debug("SMS set to CS preferred"); | 
| RobMeades | 0:5cffef3371f6 | 267 | success = true; | 
| RobMeades | 0:5cffef3371f6 | 268 | memset (buf, 0, sizeof (buf)); | 
| RobMeades | 0:5cffef3371f6 | 269 | if (_at->send("AT+CSCA?") && | 
| RobMeades | 0:5cffef3371f6 | 270 | _at->recv("+CSCA: \"%31[^\"]\"", buf) && | 
| RobMeades | 0:5cffef3371f6 | 271 | _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 272 | tr_info("SMS Service Centre address is \"%s\"", buf); | 
| RobMeades | 0:5cffef3371f6 | 273 | } | 
| RobMeades | 0:5cffef3371f6 | 274 | } | 
| RobMeades | 0:5cffef3371f6 | 275 | } | 
| RobMeades | 0:5cffef3371f6 | 276 | } | 
| RobMeades | 0:5cffef3371f6 | 277 | |
| RobMeades | 0:5cffef3371f6 | 278 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 279 | return success; | 
| RobMeades | 0:5cffef3371f6 | 280 | } | 
| RobMeades | 0:5cffef3371f6 | 281 | |
| RobMeades | 0:5cffef3371f6 | 282 | void UbloxCellularBase::parser_abort_cb() | 
| RobMeades | 0:5cffef3371f6 | 283 | { | 
| RobMeades | 0:5cffef3371f6 | 284 | _at->abort(); | 
| RobMeades | 0:5cffef3371f6 | 285 | } | 
| RobMeades | 0:5cffef3371f6 | 286 | |
| RobMeades | 0:5cffef3371f6 | 287 | // Callback for CME ERROR and CMS ERROR. | 
| RobMeades | 0:5cffef3371f6 | 288 | void UbloxCellularBase::CMX_ERROR_URC() | 
| RobMeades | 0:5cffef3371f6 | 289 | { | 
| RobMeades | 0:5cffef3371f6 | 290 | char buf[48]; | 
| RobMeades | 0:5cffef3371f6 | 291 | |
| RobMeades | 0:5cffef3371f6 | 292 | if (read_at_to_char(buf, sizeof (buf), '\n') > 0) { | 
| RobMeades | 0:5cffef3371f6 | 293 | tr_debug("AT error %s", buf); | 
| RobMeades | 0:5cffef3371f6 | 294 | } | 
| RobMeades | 0:5cffef3371f6 | 295 | parser_abort_cb(); | 
| RobMeades | 0:5cffef3371f6 | 296 | } | 
| RobMeades | 0:5cffef3371f6 | 297 | |
| RobMeades | 0:5cffef3371f6 | 298 | // Callback for circuit switched registration URC. | 
| RobMeades | 0:5cffef3371f6 | 299 | void UbloxCellularBase::CREG_URC() | 
| RobMeades | 0:5cffef3371f6 | 300 | { | 
| RobMeades | 0:5cffef3371f6 | 301 | char buf[10]; | 
| RobMeades | 0:5cffef3371f6 | 302 | int status; | 
| RobMeades | 14:e420232ee4e7 | 303 | int acTStatus; | 
| RobMeades | 0:5cffef3371f6 | 304 | |
| RobMeades | 0:5cffef3371f6 | 305 | // If this is the URC it will be a single | 
| RobMeades | 0:5cffef3371f6 | 306 | // digit followed by \n. If it is the | 
| RobMeades | 0:5cffef3371f6 | 307 | // answer to a CREG query, it will be | 
| RobMeades | 0:5cffef3371f6 | 308 | // a ": %d,%d\n" where the second digit | 
| RobMeades | 0:5cffef3371f6 | 309 | // indicates the status | 
| RobMeades | 0:5cffef3371f6 | 310 | // Note: not calling _at->recv() from here as we're | 
| RobMeades | 0:5cffef3371f6 | 311 | // already in an _at->recv() | 
| RobMeades | 0:5cffef3371f6 | 312 | if (read_at_to_char(buf, sizeof (buf), '\n') > 0) { | 
| RobMeades | 14:e420232ee4e7 | 313 | if (sscanf(buf, ": %*d,%d,%*d,%*d,%d,", &status, &acTStatus) == 2) { | 
| RobMeades | 14:e420232ee4e7 | 314 | set_nwk_reg_status_csd(status); | 
| RobMeades | 14:e420232ee4e7 | 315 | set_rat(acTStatus); | 
| RobMeades | 14:e420232ee4e7 | 316 | } else if (sscanf(buf, ": %*d,%d", &status) == 1) { | 
| RobMeades | 0:5cffef3371f6 | 317 | set_nwk_reg_status_csd(status); | 
| RobMeades | 0:5cffef3371f6 | 318 | } else if (sscanf(buf, ": %d", &status) == 1) { | 
| RobMeades | 0:5cffef3371f6 | 319 | set_nwk_reg_status_csd(status); | 
| RobMeades | 0:5cffef3371f6 | 320 | } | 
| RobMeades | 0:5cffef3371f6 | 321 | } | 
| RobMeades | 0:5cffef3371f6 | 322 | } | 
| RobMeades | 0:5cffef3371f6 | 323 | |
| RobMeades | 0:5cffef3371f6 | 324 | // Callback for packet switched registration URC. | 
| RobMeades | 0:5cffef3371f6 | 325 | void UbloxCellularBase::CGREG_URC() | 
| RobMeades | 0:5cffef3371f6 | 326 | { | 
| RobMeades | 0:5cffef3371f6 | 327 | char buf[10]; | 
| RobMeades | 0:5cffef3371f6 | 328 | int status; | 
| RobMeades | 14:e420232ee4e7 | 329 | int acTStatus; | 
| RobMeades | 0:5cffef3371f6 | 330 | |
| RobMeades | 0:5cffef3371f6 | 331 | // If this is the URC it will be a single | 
| RobMeades | 0:5cffef3371f6 | 332 | // digit followed by \n. If it is the | 
| RobMeades | 0:5cffef3371f6 | 333 | // answer to a CGREG query, it will be | 
| RobMeades | 0:5cffef3371f6 | 334 | // a ": %d,%d\n" where the second digit | 
| RobMeades | 0:5cffef3371f6 | 335 | // indicates the status | 
| RobMeades | 0:5cffef3371f6 | 336 | // Note: not calling _at->recv() from here as we're | 
| RobMeades | 0:5cffef3371f6 | 337 | // already in an _at->recv() | 
| RobMeades | 0:5cffef3371f6 | 338 | if (read_at_to_char(buf, sizeof (buf), '\n') > 0) { | 
| RobMeades | 14:e420232ee4e7 | 339 | if (sscanf(buf, ": %*d,%d,%*d,%*d,%d,", &status, &acTStatus) == 2) { | 
| RobMeades | 14:e420232ee4e7 | 340 | set_nwk_reg_status_csd(status); | 
| RobMeades | 14:e420232ee4e7 | 341 | set_rat(acTStatus); | 
| RobMeades | 14:e420232ee4e7 | 342 | } else if (sscanf(buf, ": %*d,%d", &status) == 1) { | 
| RobMeades | 0:5cffef3371f6 | 343 | set_nwk_reg_status_psd(status); | 
| RobMeades | 0:5cffef3371f6 | 344 | } else if (sscanf(buf, ": %d", &status) == 1) { | 
| RobMeades | 0:5cffef3371f6 | 345 | set_nwk_reg_status_psd(status); | 
| RobMeades | 0:5cffef3371f6 | 346 | } | 
| RobMeades | 0:5cffef3371f6 | 347 | } | 
| RobMeades | 0:5cffef3371f6 | 348 | } | 
| RobMeades | 0:5cffef3371f6 | 349 | |
| RobMeades | 0:5cffef3371f6 | 350 | // Callback for EPS registration URC. | 
| RobMeades | 0:5cffef3371f6 | 351 | void UbloxCellularBase::CEREG_URC() | 
| RobMeades | 0:5cffef3371f6 | 352 | { | 
| RobMeades | 0:5cffef3371f6 | 353 | char buf[10]; | 
| RobMeades | 0:5cffef3371f6 | 354 | int status; | 
| RobMeades | 14:e420232ee4e7 | 355 | int acTStatus; | 
| RobMeades | 0:5cffef3371f6 | 356 | |
| RobMeades | 0:5cffef3371f6 | 357 | // If this is the URC it will be a single | 
| RobMeades | 0:5cffef3371f6 | 358 | // digit followed by \n. If it is the | 
| RobMeades | 0:5cffef3371f6 | 359 | // answer to a CEREG query, it will be | 
| RobMeades | 0:5cffef3371f6 | 360 | // a ": %d,%d\n" where the second digit | 
| RobMeades | 0:5cffef3371f6 | 361 | // indicates the status | 
| RobMeades | 0:5cffef3371f6 | 362 | // Note: not calling _at->recv() from here as we're | 
| RobMeades | 0:5cffef3371f6 | 363 | // already in an _at->recv() | 
| RobMeades | 0:5cffef3371f6 | 364 | if (read_at_to_char(buf, sizeof (buf), '\n') > 0) { | 
| RobMeades | 14:e420232ee4e7 | 365 | if (sscanf(buf, ": %*d,%d,%*d,%*d,%d,", &status, &acTStatus) == 2) { | 
| RobMeades | 14:e420232ee4e7 | 366 | set_nwk_reg_status_csd(status); | 
| RobMeades | 14:e420232ee4e7 | 367 | set_rat(acTStatus); | 
| RobMeades | 14:e420232ee4e7 | 368 | } else if (sscanf(buf, ": %*d,%d", &status) == 1) { | 
| RobMeades | 0:5cffef3371f6 | 369 | set_nwk_reg_status_eps(status); | 
| RobMeades | 0:5cffef3371f6 | 370 | } else if (sscanf(buf, ": %d", &status) == 1) { | 
| RobMeades | 0:5cffef3371f6 | 371 | set_nwk_reg_status_eps(status); | 
| RobMeades | 0:5cffef3371f6 | 372 | } | 
| RobMeades | 0:5cffef3371f6 | 373 | } | 
| RobMeades | 0:5cffef3371f6 | 374 | } | 
| RobMeades | 0:5cffef3371f6 | 375 | |
| RobMeades | 0:5cffef3371f6 | 376 | // Callback UMWI, just filtering it out. | 
| RobMeades | 0:5cffef3371f6 | 377 | void UbloxCellularBase::UMWI_URC() | 
| RobMeades | 0:5cffef3371f6 | 378 | { | 
| RobMeades | 0:5cffef3371f6 | 379 | char buf[10]; | 
| RobMeades | 0:5cffef3371f6 | 380 | |
| RobMeades | 0:5cffef3371f6 | 381 | // Note: not calling _at->recv() from here as we're | 
| RobMeades | 0:5cffef3371f6 | 382 | // already in an _at->recv() | 
| RobMeades | 0:5cffef3371f6 | 383 | read_at_to_char(buf, sizeof (buf), '\n'); | 
| RobMeades | 0:5cffef3371f6 | 384 | } | 
| RobMeades | 0:5cffef3371f6 | 385 | |
| RobMeades | 0:5cffef3371f6 | 386 | /********************************************************************** | 
| RobMeades | 0:5cffef3371f6 | 387 | * PROTECTED METHODS | 
| RobMeades | 0:5cffef3371f6 | 388 | **********************************************************************/ | 
| RobMeades | 0:5cffef3371f6 | 389 | |
| RobMeades | 0:5cffef3371f6 | 390 | #if MODEM_ON_BOARD | 
| RobMeades | 0:5cffef3371f6 | 391 | void UbloxCellularBase::modem_init() | 
| RobMeades | 0:5cffef3371f6 | 392 | { | 
| RobMeades | 0:5cffef3371f6 | 393 | ::onboard_modem_init(); | 
| RobMeades | 0:5cffef3371f6 | 394 | } | 
| RobMeades | 0:5cffef3371f6 | 395 | |
| RobMeades | 0:5cffef3371f6 | 396 | void UbloxCellularBase::modem_deinit() | 
| RobMeades | 0:5cffef3371f6 | 397 | { | 
| RobMeades | 0:5cffef3371f6 | 398 | ::onboard_modem_deinit(); | 
| RobMeades | 0:5cffef3371f6 | 399 | } | 
| RobMeades | 0:5cffef3371f6 | 400 | |
| RobMeades | 0:5cffef3371f6 | 401 | void UbloxCellularBase::modem_power_up() | 
| RobMeades | 0:5cffef3371f6 | 402 | { | 
| RobMeades | 0:5cffef3371f6 | 403 | ::onboard_modem_power_up(); | 
| RobMeades | 0:5cffef3371f6 | 404 | } | 
| RobMeades | 0:5cffef3371f6 | 405 | |
| RobMeades | 0:5cffef3371f6 | 406 | void UbloxCellularBase::modem_power_down() | 
| RobMeades | 0:5cffef3371f6 | 407 | { | 
| RobMeades | 0:5cffef3371f6 | 408 | ::onboard_modem_power_down(); | 
| RobMeades | 0:5cffef3371f6 | 409 | } | 
| RobMeades | 0:5cffef3371f6 | 410 | #else | 
| RobMeades | 0:5cffef3371f6 | 411 | void UbloxCellularBase::modem_init() | 
| RobMeades | 0:5cffef3371f6 | 412 | { | 
| RobMeades | 0:5cffef3371f6 | 413 | // Meant to be overridden | 
| RobMeades | 0:5cffef3371f6 | 414 | } | 
| RobMeades | 0:5cffef3371f6 | 415 | |
| RobMeades | 0:5cffef3371f6 | 416 | void UbloxCellularBase::modem_deinit() | 
| RobMeades | 0:5cffef3371f6 | 417 | { | 
| RobMeades | 0:5cffef3371f6 | 418 | // Meant to be overridden | 
| RobMeades | 0:5cffef3371f6 | 419 | } | 
| RobMeades | 0:5cffef3371f6 | 420 | |
| RobMeades | 0:5cffef3371f6 | 421 | void UbloxCellularBase::modem_power_up() | 
| RobMeades | 0:5cffef3371f6 | 422 | { | 
| RobMeades | 0:5cffef3371f6 | 423 | // Meant to be overridden | 
| RobMeades | 0:5cffef3371f6 | 424 | } | 
| RobMeades | 0:5cffef3371f6 | 425 | |
| RobMeades | 0:5cffef3371f6 | 426 | void UbloxCellularBase::modem_power_down() | 
| RobMeades | 0:5cffef3371f6 | 427 | { | 
| RobMeades | 0:5cffef3371f6 | 428 | // Mmeant to be overridden | 
| RobMeades | 0:5cffef3371f6 | 429 | } | 
| RobMeades | 0:5cffef3371f6 | 430 | #endif | 
| RobMeades | 0:5cffef3371f6 | 431 | |
| RobMeades | 0:5cffef3371f6 | 432 | // Constructor. | 
| RobMeades | 0:5cffef3371f6 | 433 | // Note: to allow this base class to be inherited as a virtual base class | 
| RobMeades | 0:5cffef3371f6 | 434 | // by everyone, it takes no parameters. See also comment above classInit() | 
| RobMeades | 0:5cffef3371f6 | 435 | // in the header file. | 
| RobMeades | 0:5cffef3371f6 | 436 | UbloxCellularBase::UbloxCellularBase() | 
| RobMeades | 0:5cffef3371f6 | 437 | { | 
| RobMeades | 0:5cffef3371f6 | 438 | _pin = NULL; | 
| RobMeades | 0:5cffef3371f6 | 439 | _at = NULL; | 
| RobMeades | 0:5cffef3371f6 | 440 | _at_timeout = AT_PARSER_TIMEOUT; | 
| RobMeades | 0:5cffef3371f6 | 441 | _fh = NULL; | 
| RobMeades | 0:5cffef3371f6 | 442 | _modem_initialised = false; | 
| RobMeades | 0:5cffef3371f6 | 443 | _sim_pin_check_enabled = false; | 
| RobMeades | 0:5cffef3371f6 | 444 | _debug_trace_on = false; | 
| RobMeades | 0:5cffef3371f6 | 445 | |
| RobMeades | 0:5cffef3371f6 | 446 | _dev_info.dev = DEV_TYPE_NONE; | 
| RobMeades | 0:5cffef3371f6 | 447 | _dev_info.reg_status_csd = CSD_NOT_REGISTERED_NOT_SEARCHING; | 
| RobMeades | 0:5cffef3371f6 | 448 | _dev_info.reg_status_psd = PSD_NOT_REGISTERED_NOT_SEARCHING; | 
| RobMeades | 0:5cffef3371f6 | 449 | _dev_info.reg_status_eps = EPS_NOT_REGISTERED_NOT_SEARCHING; | 
| RobMeades | 0:5cffef3371f6 | 450 | } | 
| RobMeades | 0:5cffef3371f6 | 451 | |
| RobMeades | 0:5cffef3371f6 | 452 | // Destructor. | 
| RobMeades | 0:5cffef3371f6 | 453 | UbloxCellularBase::~UbloxCellularBase() | 
| RobMeades | 0:5cffef3371f6 | 454 | { | 
| RobMeades | 0:5cffef3371f6 | 455 | deinit(); | 
| RobMeades | 0:5cffef3371f6 | 456 | delete _at; | 
| RobMeades | 0:5cffef3371f6 | 457 | delete _fh; | 
| RobMeades | 0:5cffef3371f6 | 458 | } | 
| RobMeades | 0:5cffef3371f6 | 459 | |
| RobMeades | 0:5cffef3371f6 | 460 | // Initialise the portions of this class that are parameterised. | 
| RobMeades | 0:5cffef3371f6 | 461 | void UbloxCellularBase::baseClassInit(PinName tx, PinName rx, | 
| RobMeades | 0:5cffef3371f6 | 462 | int baud, bool debug_on) | 
| RobMeades | 0:5cffef3371f6 | 463 | { | 
| RobMeades | 0:5cffef3371f6 | 464 | // Only initialise ourselves if it's not already been done | 
| RobMeades | 0:5cffef3371f6 | 465 | if (_at == NULL) { | 
| RobMeades | 0:5cffef3371f6 | 466 | if (_debug_trace_on == false) { | 
| RobMeades | 0:5cffef3371f6 | 467 | _debug_trace_on = debug_on; | 
| RobMeades | 0:5cffef3371f6 | 468 | } | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 469 | _baud = baud; | 
| RobMeades | 0:5cffef3371f6 | 470 | |
| RobMeades | 0:5cffef3371f6 | 471 | // Set up File Handle for buffered serial comms with cellular module | 
| RobMeades | 0:5cffef3371f6 | 472 | // (which will be used by the AT parser) | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 473 | // Note: the UART is initialised to run no faster than 115200 because | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 474 | // the modems cannot reliably auto-baud at faster rates. The faster | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 475 | // rate is adopted later with a specific AT command and the | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 476 | // UARTSerial rate is adjusted at that time | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 477 | if (baud > 115200) { | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 478 | baud = 115200; | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 479 | } | 
| RobMeades | 0:5cffef3371f6 | 480 | _fh = new UARTSerial(tx, rx, baud); | 
| RobMeades | 0:5cffef3371f6 | 481 | |
| RobMeades | 0:5cffef3371f6 | 482 | // Set up the AT parser | 
| RobMeades | 0:5cffef3371f6 | 483 | _at = new ATCmdParser(_fh, OUTPUT_ENTER_KEY, AT_PARSER_BUFFER_SIZE, | 
| rob.meades@u-blox.com | 3:f9b2cd6f72b1 | 484 | _at_timeout, _debug_trace_on); | 
| RobMeades | 0:5cffef3371f6 | 485 | |
| RobMeades | 0:5cffef3371f6 | 486 | // Error cases, out of band handling | 
| RobMeades | 0:5cffef3371f6 | 487 | _at->oob("ERROR", callback(this, &UbloxCellularBase::parser_abort_cb)); | 
| RobMeades | 0:5cffef3371f6 | 488 | _at->oob("+CME ERROR", callback(this, &UbloxCellularBase::CMX_ERROR_URC)); | 
| RobMeades | 0:5cffef3371f6 | 489 | _at->oob("+CMS ERROR", callback(this, &UbloxCellularBase::CMX_ERROR_URC)); | 
| RobMeades | 0:5cffef3371f6 | 490 | |
| RobMeades | 0:5cffef3371f6 | 491 | // Registration status, out of band handling | 
| RobMeades | 0:5cffef3371f6 | 492 | _at->oob("+CREG", callback(this, &UbloxCellularBase::CREG_URC)); | 
| RobMeades | 0:5cffef3371f6 | 493 | _at->oob("+CGREG", callback(this, &UbloxCellularBase::CGREG_URC)); | 
| RobMeades | 0:5cffef3371f6 | 494 | _at->oob("+CEREG", callback(this, &UbloxCellularBase::CEREG_URC)); | 
| RobMeades | 0:5cffef3371f6 | 495 | |
| RobMeades | 0:5cffef3371f6 | 496 | // Capture the UMWI, just to stop it getting in the way | 
| RobMeades | 0:5cffef3371f6 | 497 | _at->oob("+UMWI", callback(this, &UbloxCellularBase::UMWI_URC)); | 
| RobMeades | 0:5cffef3371f6 | 498 | } | 
| RobMeades | 0:5cffef3371f6 | 499 | } | 
| RobMeades | 0:5cffef3371f6 | 500 | |
| RobMeades | 0:5cffef3371f6 | 501 | // Set the AT parser timeout. | 
| RobMeades | 0:5cffef3371f6 | 502 | // Note: the AT interface should be locked before this is called. | 
| RobMeades | 0:5cffef3371f6 | 503 | void UbloxCellularBase::at_set_timeout(int timeout) { | 
| RobMeades | 0:5cffef3371f6 | 504 | |
| RobMeades | 0:5cffef3371f6 | 505 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 506 | |
| RobMeades | 0:5cffef3371f6 | 507 | _at_timeout = timeout; | 
| RobMeades | 0:5cffef3371f6 | 508 | _at->set_timeout(timeout); | 
| RobMeades | 0:5cffef3371f6 | 509 | } | 
| RobMeades | 0:5cffef3371f6 | 510 | |
| RobMeades | 0:5cffef3371f6 | 511 | // Read up to size bytes from the AT interface up to a "end". | 
| RobMeades | 0:5cffef3371f6 | 512 | // Note: the AT interface should be locked before this is called. | 
| RobMeades | 0:5cffef3371f6 | 513 | int UbloxCellularBase::read_at_to_char(char * buf, int size, char end) | 
| RobMeades | 0:5cffef3371f6 | 514 | { | 
| RobMeades | 0:5cffef3371f6 | 515 | int count = 0; | 
| RobMeades | 0:5cffef3371f6 | 516 | int x = 0; | 
| RobMeades | 0:5cffef3371f6 | 517 | |
| RobMeades | 0:5cffef3371f6 | 518 | if (size > 0) { | 
| RobMeades | 0:5cffef3371f6 | 519 | for (count = 0; (count < size) && (x >= 0) && (x != end); count++) { | 
| RobMeades | 0:5cffef3371f6 | 520 | x = _at->getc(); | 
| RobMeades | 0:5cffef3371f6 | 521 | *(buf + count) = (char) x; | 
| RobMeades | 0:5cffef3371f6 | 522 | } | 
| RobMeades | 0:5cffef3371f6 | 523 | |
| RobMeades | 0:5cffef3371f6 | 524 | count--; | 
| RobMeades | 0:5cffef3371f6 | 525 | *(buf + count) = 0; | 
| RobMeades | 0:5cffef3371f6 | 526 | |
| RobMeades | 0:5cffef3371f6 | 527 | // Convert line endings: | 
| RobMeades | 0:5cffef3371f6 | 528 | // If end was '\n' (0x0a) and the preceding character was 0x0d, then | 
| RobMeades | 0:5cffef3371f6 | 529 | // overwrite that with null as well. | 
| RobMeades | 0:5cffef3371f6 | 530 | if ((count > 0) && (end == '\n') && (*(buf + count - 1) == '\x0d')) { | 
| RobMeades | 0:5cffef3371f6 | 531 | count--; | 
| RobMeades | 0:5cffef3371f6 | 532 | *(buf + count) = 0; | 
| RobMeades | 0:5cffef3371f6 | 533 | } | 
| RobMeades | 0:5cffef3371f6 | 534 | } | 
| RobMeades | 0:5cffef3371f6 | 535 | |
| RobMeades | 0:5cffef3371f6 | 536 | return count; | 
| RobMeades | 0:5cffef3371f6 | 537 | } | 
| RobMeades | 0:5cffef3371f6 | 538 | |
| RobMeades | 0:5cffef3371f6 | 539 | // Power up the modem. | 
| RobMeades | 0:5cffef3371f6 | 540 | // Enables the GPIO lines to the modem and then wriggles the power line in short pulses. | 
| RobMeades | 0:5cffef3371f6 | 541 | bool UbloxCellularBase::power_up() | 
| RobMeades | 0:5cffef3371f6 | 542 | { | 
| RobMeades | 0:5cffef3371f6 | 543 | bool success = false; | 
| RobMeades | 0:5cffef3371f6 | 544 | int at_timeout; | 
| RobMeades | 0:5cffef3371f6 | 545 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 546 | |
| RobMeades | 0:5cffef3371f6 | 547 | at_timeout = _at_timeout; // Has to be inside LOCK()s | 
| RobMeades | 0:5cffef3371f6 | 548 | |
| RobMeades | 0:5cffef3371f6 | 549 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 550 | |
| RobMeades | 0:5cffef3371f6 | 551 | /* Initialize GPIO lines */ | 
| RobMeades | 0:5cffef3371f6 | 552 | tr_info("Powering up modem..."); | 
| pilotak | 7:c2cf27a981b3 | 553 | modem_init(); | 
| RobMeades | 0:5cffef3371f6 | 554 | /* Give modem a little time to settle down */ | 
| RobMeades | 0:5cffef3371f6 | 555 | wait_ms(250); | 
| RobMeades | 0:5cffef3371f6 | 556 | |
| RobMeades | 0:5cffef3371f6 | 557 | for (int retry_count = 0; !success && (retry_count < 20); retry_count++) { | 
| pilotak | 7:c2cf27a981b3 | 558 | modem_power_up(); | 
| RobMeades | 0:5cffef3371f6 | 559 | wait_ms(500); | 
| RobMeades | 0:5cffef3371f6 | 560 | // Modem tends to spit out noise during power up - don't confuse the parser | 
| RobMeades | 0:5cffef3371f6 | 561 | _at->flush(); | 
| RobMeades | 0:5cffef3371f6 | 562 | at_set_timeout(1000); | 
| RobMeades | 0:5cffef3371f6 | 563 | if (_at->send("AT")) { | 
| RobMeades | 0:5cffef3371f6 | 564 | // C027 needs a delay here | 
| RobMeades | 0:5cffef3371f6 | 565 | wait_ms(100); | 
| RobMeades | 0:5cffef3371f6 | 566 | if (_at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 567 | success = true; | 
| RobMeades | 0:5cffef3371f6 | 568 | } | 
| RobMeades | 0:5cffef3371f6 | 569 | } | 
| RobMeades | 0:5cffef3371f6 | 570 | at_set_timeout(at_timeout); | 
| RobMeades | 0:5cffef3371f6 | 571 | } | 
| RobMeades | 0:5cffef3371f6 | 572 | |
| rob.meades@u-blox.com | 4:2e640a101db1 | 573 | if (success) { | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 574 | // Set the final baud rate | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 575 | if (_at->send("AT+IPR=%d", _baud) && _at->recv("OK")) { | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 576 | // Need to wait for things to be sorted out on the modem side | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 577 | wait_ms(100); | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 578 | ((UARTSerial *)_fh)->set_baud(_baud); | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 579 | } | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 580 | |
| rob.meades@u-blox.com | 4:2e640a101db1 | 581 | // Turn off modem echoing and turn on verbose responses | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 582 | success = _at->send("ATE0;+CMEE=2") && _at->recv("OK") && | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 583 | // The following commands are best sent separately | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 584 | _at->send("AT&K0") && _at->recv("OK") && // Turn off RTC/CTS handshaking | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 585 | _at->send("AT&C1") && _at->recv("OK") && // Set DCD circuit(109), changes in accordance with the carrier detect status | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 586 | _at->send("AT&D0") && _at->recv("OK"); // Set DTR circuit, we ignore the state change of DTR | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 587 | } | 
| RobMeades | 0:5cffef3371f6 | 588 | |
| RobMeades | 0:5cffef3371f6 | 589 | if (!success) { | 
| RobMeades | 0:5cffef3371f6 | 590 | tr_error("Preliminary modem setup failed."); | 
| RobMeades | 0:5cffef3371f6 | 591 | } | 
| RobMeades | 0:5cffef3371f6 | 592 | |
| RobMeades | 0:5cffef3371f6 | 593 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 594 | return success; | 
| RobMeades | 0:5cffef3371f6 | 595 | } | 
| RobMeades | 0:5cffef3371f6 | 596 | |
| RobMeades | 0:5cffef3371f6 | 597 | // Power down modem via AT interface. | 
| RobMeades | 0:5cffef3371f6 | 598 | void UbloxCellularBase::power_down() | 
| RobMeades | 0:5cffef3371f6 | 599 | { | 
| RobMeades | 0:5cffef3371f6 | 600 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 601 | |
| RobMeades | 0:5cffef3371f6 | 602 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 603 | |
| RobMeades | 0:5cffef3371f6 | 604 | // If we have been running, do a soft power-off first | 
| RobMeades | 0:5cffef3371f6 | 605 | if (_modem_initialised && (_at != NULL)) { | 
| RobMeades | 0:5cffef3371f6 | 606 | _at->send("AT+CPWROFF") && _at->recv("OK"); | 
| RobMeades | 0:5cffef3371f6 | 607 | } | 
| RobMeades | 0:5cffef3371f6 | 608 | |
| RobMeades | 0:5cffef3371f6 | 609 | // Now do a hard power-off | 
| pilotak | 7:c2cf27a981b3 | 610 | modem_power_down(); | 
| pilotak | 7:c2cf27a981b3 | 611 | modem_deinit(); | 
| RobMeades | 0:5cffef3371f6 | 612 | |
| RobMeades | 0:5cffef3371f6 | 613 | _dev_info.reg_status_csd = CSD_NOT_REGISTERED_NOT_SEARCHING; | 
| RobMeades | 0:5cffef3371f6 | 614 | _dev_info.reg_status_psd = PSD_NOT_REGISTERED_NOT_SEARCHING; | 
| RobMeades | 0:5cffef3371f6 | 615 | _dev_info.reg_status_eps = EPS_NOT_REGISTERED_NOT_SEARCHING; | 
| RobMeades | 0:5cffef3371f6 | 616 | |
| RobMeades | 0:5cffef3371f6 | 617 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 618 | } | 
| RobMeades | 0:5cffef3371f6 | 619 | |
| RobMeades | 0:5cffef3371f6 | 620 | // Get the device ID. | 
| RobMeades | 0:5cffef3371f6 | 621 | bool UbloxCellularBase::set_device_identity(DeviceType *dev) | 
| RobMeades | 0:5cffef3371f6 | 622 | { | 
| RobMeades | 0:5cffef3371f6 | 623 | char buf[20]; | 
| RobMeades | 0:5cffef3371f6 | 624 | bool success; | 
| RobMeades | 0:5cffef3371f6 | 625 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 626 | |
| RobMeades | 0:5cffef3371f6 | 627 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 628 | |
| RobMeades | 0:5cffef3371f6 | 629 | success = _at->send("ATI") && _at->recv("%19[^\n]\nOK\n", buf); | 
| RobMeades | 0:5cffef3371f6 | 630 | |
| RobMeades | 0:5cffef3371f6 | 631 | if (success) { | 
| RobMeades | 0:5cffef3371f6 | 632 | if (strstr(buf, "SARA-G35")) | 
| RobMeades | 0:5cffef3371f6 | 633 | *dev = DEV_SARA_G35; | 
| RobMeades | 0:5cffef3371f6 | 634 | else if (strstr(buf, "LISA-U200-03S")) | 
| RobMeades | 0:5cffef3371f6 | 635 | *dev = DEV_LISA_U2_03S; | 
| RobMeades | 0:5cffef3371f6 | 636 | else if (strstr(buf, "LISA-U2")) | 
| RobMeades | 0:5cffef3371f6 | 637 | *dev = DEV_LISA_U2; | 
| RobMeades | 0:5cffef3371f6 | 638 | else if (strstr(buf, "SARA-U2")) | 
| RobMeades | 0:5cffef3371f6 | 639 | *dev = DEV_SARA_U2; | 
| fahimalavi | 10:c4281fa79b8f | 640 | else if (strstr(buf, "SARA-R4")) | 
| fahimalavi | 10:c4281fa79b8f | 641 | *dev = DEV_SARA_R4; | 
| RobMeades | 0:5cffef3371f6 | 642 | else if (strstr(buf, "LEON-G2")) | 
| RobMeades | 0:5cffef3371f6 | 643 | *dev = DEV_LEON_G2; | 
| RobMeades | 0:5cffef3371f6 | 644 | else if (strstr(buf, "TOBY-L2")) | 
| RobMeades | 0:5cffef3371f6 | 645 | *dev = DEV_TOBY_L2; | 
| RobMeades | 0:5cffef3371f6 | 646 | else if (strstr(buf, "MPCI-L2")) | 
| RobMeades | 0:5cffef3371f6 | 647 | *dev = DEV_MPCI_L2; | 
| RobMeades | 0:5cffef3371f6 | 648 | } | 
| RobMeades | 0:5cffef3371f6 | 649 | |
| RobMeades | 0:5cffef3371f6 | 650 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 651 | return success; | 
| RobMeades | 0:5cffef3371f6 | 652 | } | 
| RobMeades | 0:5cffef3371f6 | 653 | |
| RobMeades | 0:5cffef3371f6 | 654 | // Send initialisation AT commands that are specific to the device. | 
| RobMeades | 0:5cffef3371f6 | 655 | bool UbloxCellularBase::device_init(DeviceType dev) | 
| RobMeades | 0:5cffef3371f6 | 656 | { | 
| RobMeades | 0:5cffef3371f6 | 657 | bool success = false; | 
| RobMeades | 0:5cffef3371f6 | 658 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 659 | |
| RobMeades | 0:5cffef3371f6 | 660 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 661 | |
| RobMeades | 0:5cffef3371f6 | 662 | if ((dev == DEV_LISA_U2) || (dev == DEV_LEON_G2) || (dev == DEV_TOBY_L2)) { | 
| RobMeades | 0:5cffef3371f6 | 663 | success = _at->send("AT+UGPIOC=20,2") && _at->recv("OK"); | 
| RobMeades | 0:5cffef3371f6 | 664 | } else if ((dev == DEV_SARA_U2) || (dev == DEV_SARA_G35)) { | 
| RobMeades | 0:5cffef3371f6 | 665 | success = _at->send("AT+UGPIOC=16,2") && _at->recv("OK"); | 
| RobMeades | 0:5cffef3371f6 | 666 | } else { | 
| RobMeades | 0:5cffef3371f6 | 667 | success = true; | 
| RobMeades | 0:5cffef3371f6 | 668 | } | 
| RobMeades | 0:5cffef3371f6 | 669 | |
| RobMeades | 0:5cffef3371f6 | 670 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 671 | return success; | 
| RobMeades | 0:5cffef3371f6 | 672 | } | 
| RobMeades | 0:5cffef3371f6 | 673 | |
| RobMeades | 0:5cffef3371f6 | 674 | // Get the SIM card going. | 
| RobMeades | 0:5cffef3371f6 | 675 | bool UbloxCellularBase::initialise_sim_card() | 
| RobMeades | 0:5cffef3371f6 | 676 | { | 
| RobMeades | 0:5cffef3371f6 | 677 | bool success = false; | 
| RobMeades | 0:5cffef3371f6 | 678 | int retry_count = 0; | 
| RobMeades | 0:5cffef3371f6 | 679 | bool done = false; | 
| RobMeades | 0:5cffef3371f6 | 680 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 681 | |
| RobMeades | 0:5cffef3371f6 | 682 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 683 | |
| RobMeades | 0:5cffef3371f6 | 684 | /* SIM initialisation may take a significant amount, so an error is | 
| RobMeades | 0:5cffef3371f6 | 685 | * kind of expected. We should retry 10 times until we succeed or timeout. */ | 
| RobMeades | 0:5cffef3371f6 | 686 | for (retry_count = 0; !done && (retry_count < 10); retry_count++) { | 
| RobMeades | 0:5cffef3371f6 | 687 | char pinstr[16]; | 
| RobMeades | 0:5cffef3371f6 | 688 | |
| RobMeades | 0:5cffef3371f6 | 689 | if (_at->send("AT+CPIN?") && _at->recv("+CPIN: %15[^\n]\n", pinstr) && | 
| RobMeades | 0:5cffef3371f6 | 690 | _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 691 | done = true; | 
| RobMeades | 0:5cffef3371f6 | 692 | if (strcmp(pinstr, "SIM PIN") == 0) { | 
| RobMeades | 0:5cffef3371f6 | 693 | _sim_pin_check_enabled = true; | 
| RobMeades | 0:5cffef3371f6 | 694 | if (_at->send("AT+CPIN=\"%s\"", _pin)) { | 
| RobMeades | 0:5cffef3371f6 | 695 | if (_at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 696 | tr_info("PIN correct"); | 
| RobMeades | 0:5cffef3371f6 | 697 | success = true; | 
| RobMeades | 0:5cffef3371f6 | 698 | } else { | 
| RobMeades | 0:5cffef3371f6 | 699 | tr_error("Incorrect PIN"); | 
| RobMeades | 0:5cffef3371f6 | 700 | } | 
| RobMeades | 0:5cffef3371f6 | 701 | } | 
| RobMeades | 0:5cffef3371f6 | 702 | } else if (strcmp(pinstr, "READY") == 0) { | 
| RobMeades | 0:5cffef3371f6 | 703 | _sim_pin_check_enabled = false; | 
| RobMeades | 0:5cffef3371f6 | 704 | tr_info("No PIN required"); | 
| RobMeades | 0:5cffef3371f6 | 705 | success = true; | 
| RobMeades | 0:5cffef3371f6 | 706 | } else { | 
| RobMeades | 0:5cffef3371f6 | 707 | tr_debug("Unexpected response from SIM: \"%s\"", pinstr); | 
| RobMeades | 0:5cffef3371f6 | 708 | } | 
| RobMeades | 0:5cffef3371f6 | 709 | } | 
| RobMeades | 0:5cffef3371f6 | 710 | |
| RobMeades | 0:5cffef3371f6 | 711 | /* wait for a second before retry */ | 
| RobMeades | 0:5cffef3371f6 | 712 | wait_ms(1000); | 
| RobMeades | 0:5cffef3371f6 | 713 | } | 
| RobMeades | 0:5cffef3371f6 | 714 | |
| RobMeades | 0:5cffef3371f6 | 715 | if (done) { | 
| RobMeades | 0:5cffef3371f6 | 716 | tr_info("SIM Ready."); | 
| RobMeades | 0:5cffef3371f6 | 717 | } else { | 
| RobMeades | 0:5cffef3371f6 | 718 | tr_error("SIM not ready."); | 
| RobMeades | 0:5cffef3371f6 | 719 | } | 
| RobMeades | 0:5cffef3371f6 | 720 | |
| RobMeades | 0:5cffef3371f6 | 721 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 722 | return success; | 
| RobMeades | 0:5cffef3371f6 | 723 | } | 
| RobMeades | 0:5cffef3371f6 | 724 | |
| RobMeades | 0:5cffef3371f6 | 725 | /********************************************************************** | 
| RobMeades | 0:5cffef3371f6 | 726 | * PUBLIC METHODS | 
| RobMeades | 0:5cffef3371f6 | 727 | **********************************************************************/ | 
| RobMeades | 0:5cffef3371f6 | 728 | |
| RobMeades | 0:5cffef3371f6 | 729 | // Initialise the modem. | 
| RobMeades | 0:5cffef3371f6 | 730 | bool UbloxCellularBase::init(const char *pin) | 
| RobMeades | 0:5cffef3371f6 | 731 | { | 
| RobMeades | 8:a15349fcab25 | 732 | int x; | 
| RobMeades | 0:5cffef3371f6 | 733 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 734 | |
| RobMeades | 0:5cffef3371f6 | 735 | if (!_modem_initialised) { | 
| RobMeades | 0:5cffef3371f6 | 736 | if (power_up()) { | 
| RobMeades | 0:5cffef3371f6 | 737 | tr_info("Modem Ready."); | 
| RobMeades | 0:5cffef3371f6 | 738 | if (pin != NULL) { | 
| RobMeades | 0:5cffef3371f6 | 739 | _pin = pin; | 
| RobMeades | 0:5cffef3371f6 | 740 | } | 
| RobMeades | 0:5cffef3371f6 | 741 | if (initialise_sim_card()) { | 
| RobMeades | 0:5cffef3371f6 | 742 | if (set_device_identity(&_dev_info.dev) && // Set up device identity | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 743 | device_init(_dev_info.dev)) {// Initialise this device | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 744 | // Get the integrated circuit ID of the SIM | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 745 | if (get_iccid()) { | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 746 | // Try a few times to get the IMSI (since on some modems this can | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 747 | // take a while to be retrieved, especially if a SIM PIN | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 748 | // was set) | 
| RobMeades | 8:a15349fcab25 | 749 | for (x = 0; (x < 3) && !get_imsi(); x++) { | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 750 | wait_ms(1000); | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 751 | } | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 752 | |
| RobMeades | 8:a15349fcab25 | 753 | if (x < 3) { // If we got the IMSI, can get the others | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 754 | if (get_imei() && // Get international mobile equipment identifier | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 755 | get_meid() && // Probably the same as the IMEI | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 756 | set_sms()) { // And set up SMS | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 757 | // The modem is initialised. | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 758 | _modem_initialised = true; | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 759 | } | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 760 | } | 
| rob.meades@u-blox.com | 6:8fadf1e49487 | 761 | } | 
| RobMeades | 0:5cffef3371f6 | 762 | } | 
| RobMeades | 0:5cffef3371f6 | 763 | } | 
| RobMeades | 0:5cffef3371f6 | 764 | } | 
| RobMeades | 0:5cffef3371f6 | 765 | } | 
| RobMeades | 0:5cffef3371f6 | 766 | |
| RobMeades | 0:5cffef3371f6 | 767 | return _modem_initialised; | 
| RobMeades | 0:5cffef3371f6 | 768 | } | 
| RobMeades | 0:5cffef3371f6 | 769 | |
| RobMeades | 0:5cffef3371f6 | 770 | // Perform registration. | 
| RobMeades | 0:5cffef3371f6 | 771 | bool UbloxCellularBase::nwk_registration() | 
| RobMeades | 0:5cffef3371f6 | 772 | { | 
| RobMeades | 0:5cffef3371f6 | 773 | bool atSuccess = false; | 
| RobMeades | 0:5cffef3371f6 | 774 | bool registered = false; | 
| RobMeades | 0:5cffef3371f6 | 775 | int status; | 
| RobMeades | 0:5cffef3371f6 | 776 | int at_timeout; | 
| RobMeades | 0:5cffef3371f6 | 777 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 778 | |
| RobMeades | 0:5cffef3371f6 | 779 | at_timeout = _at_timeout; // Has to be inside LOCK()s | 
| RobMeades | 0:5cffef3371f6 | 780 | |
| RobMeades | 0:5cffef3371f6 | 781 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 782 | |
| RobMeades | 0:5cffef3371f6 | 783 | if (!is_registered_psd() && !is_registered_csd() && !is_registered_eps()) { | 
| RobMeades | 0:5cffef3371f6 | 784 | tr_info("Searching Network..."); | 
| RobMeades | 0:5cffef3371f6 | 785 | // Enable the packet switched and network registration unsolicited result codes | 
| RobMeades | 0:5cffef3371f6 | 786 | if (_at->send("AT+CREG=1") && _at->recv("OK") && | 
| RobMeades | 0:5cffef3371f6 | 787 | _at->send("AT+CGREG=1") && _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 788 | atSuccess = true; | 
| RobMeades | 0:5cffef3371f6 | 789 | if (_at->send("AT+CEREG=1")) { | 
| RobMeades | 0:5cffef3371f6 | 790 | _at->recv("OK"); | 
| RobMeades | 0:5cffef3371f6 | 791 | // Don't check return value as this works for LTE only | 
| RobMeades | 0:5cffef3371f6 | 792 | } | 
| RobMeades | 0:5cffef3371f6 | 793 | |
| RobMeades | 0:5cffef3371f6 | 794 | if (atSuccess) { | 
| RobMeades | 0:5cffef3371f6 | 795 | // See if we are already in automatic mode | 
| RobMeades | 0:5cffef3371f6 | 796 | if (_at->send("AT+COPS?") && _at->recv("+COPS: %d", &status) && | 
| RobMeades | 0:5cffef3371f6 | 797 | _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 798 | // If not, set it | 
| RobMeades | 0:5cffef3371f6 | 799 | if (status != 0) { | 
| RobMeades | 0:5cffef3371f6 | 800 | // Don't check return code here as there's not much | 
| RobMeades | 0:5cffef3371f6 | 801 | // we can do if this fails. | 
| RobMeades | 0:5cffef3371f6 | 802 | _at->send("AT+COPS=0") && _at->recv("OK"); | 
| RobMeades | 0:5cffef3371f6 | 803 | } | 
| RobMeades | 0:5cffef3371f6 | 804 | } | 
| RobMeades | 0:5cffef3371f6 | 805 | |
| RobMeades | 0:5cffef3371f6 | 806 | // Query the registration status directly as well, | 
| RobMeades | 0:5cffef3371f6 | 807 | // just in case | 
| RobMeades | 0:5cffef3371f6 | 808 | if (_at->send("AT+CREG?") && _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 809 | // Answer will be processed by URC | 
| RobMeades | 0:5cffef3371f6 | 810 | } | 
| RobMeades | 0:5cffef3371f6 | 811 | if (_at->send("AT+CGREG?") && _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 812 | // Answer will be processed by URC | 
| RobMeades | 0:5cffef3371f6 | 813 | } | 
| RobMeades | 0:5cffef3371f6 | 814 | if (_at->send("AT+CEREG?")) { | 
| RobMeades | 0:5cffef3371f6 | 815 | _at->recv("OK"); | 
| RobMeades | 0:5cffef3371f6 | 816 | // Don't check return value as this works for LTE only | 
| RobMeades | 0:5cffef3371f6 | 817 | } | 
| RobMeades | 0:5cffef3371f6 | 818 | } | 
| RobMeades | 0:5cffef3371f6 | 819 | } | 
| RobMeades | 0:5cffef3371f6 | 820 | // Wait for registration to succeed | 
| RobMeades | 0:5cffef3371f6 | 821 | at_set_timeout(1000); | 
| RobMeades | 0:5cffef3371f6 | 822 | for (int waitSeconds = 0; !registered && (waitSeconds < 180); waitSeconds++) { | 
| RobMeades | 0:5cffef3371f6 | 823 | registered = is_registered_psd() || is_registered_csd() || is_registered_eps(); | 
| RobMeades | 0:5cffef3371f6 | 824 | _at->recv(UNNATURAL_STRING); | 
| RobMeades | 0:5cffef3371f6 | 825 | } | 
| RobMeades | 0:5cffef3371f6 | 826 | at_set_timeout(at_timeout); | 
| RobMeades | 0:5cffef3371f6 | 827 | |
| RobMeades | 0:5cffef3371f6 | 828 | if (registered) { | 
| RobMeades | 0:5cffef3371f6 | 829 | // This should return quickly but sometimes the status field is not returned | 
| RobMeades | 0:5cffef3371f6 | 830 | // so make the timeout short | 
| RobMeades | 0:5cffef3371f6 | 831 | at_set_timeout(1000); | 
| RobMeades | 0:5cffef3371f6 | 832 | if (_at->send("AT+COPS?") && _at->recv("+COPS: %*d,%*d,\"%*[^\"]\",%d\n", &status)) { | 
| RobMeades | 0:5cffef3371f6 | 833 | set_rat(status); | 
| RobMeades | 0:5cffef3371f6 | 834 | } | 
| RobMeades | 0:5cffef3371f6 | 835 | at_set_timeout(at_timeout); | 
| RobMeades | 0:5cffef3371f6 | 836 | } | 
| RobMeades | 0:5cffef3371f6 | 837 | } else { | 
| RobMeades | 0:5cffef3371f6 | 838 | registered = true; | 
| RobMeades | 0:5cffef3371f6 | 839 | } | 
| RobMeades | 0:5cffef3371f6 | 840 | |
| RobMeades | 0:5cffef3371f6 | 841 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 842 | return registered; | 
| RobMeades | 0:5cffef3371f6 | 843 | } | 
| RobMeades | 0:5cffef3371f6 | 844 | |
| RobMeades | 0:5cffef3371f6 | 845 | bool UbloxCellularBase::is_registered_csd() | 
| RobMeades | 0:5cffef3371f6 | 846 | { | 
| RobMeades | 0:5cffef3371f6 | 847 | return (_dev_info.reg_status_csd == CSD_REGISTERED) || | 
| RobMeades | 0:5cffef3371f6 | 848 | (_dev_info.reg_status_csd == CSD_REGISTERED_ROAMING) || | 
| RobMeades | 0:5cffef3371f6 | 849 | (_dev_info.reg_status_csd == CSD_CSFB_NOT_PREFERRED); | 
| RobMeades | 0:5cffef3371f6 | 850 | } | 
| RobMeades | 0:5cffef3371f6 | 851 | |
| RobMeades | 0:5cffef3371f6 | 852 | bool UbloxCellularBase::is_registered_psd() | 
| RobMeades | 0:5cffef3371f6 | 853 | { | 
| RobMeades | 0:5cffef3371f6 | 854 | return (_dev_info.reg_status_psd == PSD_REGISTERED) || | 
| RobMeades | 0:5cffef3371f6 | 855 | (_dev_info.reg_status_psd == PSD_REGISTERED_ROAMING); | 
| RobMeades | 0:5cffef3371f6 | 856 | } | 
| RobMeades | 0:5cffef3371f6 | 857 | |
| RobMeades | 0:5cffef3371f6 | 858 | bool UbloxCellularBase::is_registered_eps() | 
| RobMeades | 0:5cffef3371f6 | 859 | { | 
| RobMeades | 0:5cffef3371f6 | 860 | return (_dev_info.reg_status_eps == EPS_REGISTERED) || | 
| RobMeades | 0:5cffef3371f6 | 861 | (_dev_info.reg_status_eps == EPS_REGISTERED_ROAMING); | 
| RobMeades | 0:5cffef3371f6 | 862 | } | 
| RobMeades | 0:5cffef3371f6 | 863 | |
| RobMeades | 0:5cffef3371f6 | 864 | // Perform deregistration. | 
| RobMeades | 0:5cffef3371f6 | 865 | bool UbloxCellularBase::nwk_deregistration() | 
| RobMeades | 0:5cffef3371f6 | 866 | { | 
| RobMeades | 0:5cffef3371f6 | 867 | bool success = false; | 
| RobMeades | 0:5cffef3371f6 | 868 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 869 | |
| RobMeades | 0:5cffef3371f6 | 870 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 871 | |
| RobMeades | 0:5cffef3371f6 | 872 | if (_at->send("AT+COPS=2") && _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 873 | _dev_info.reg_status_csd = CSD_NOT_REGISTERED_NOT_SEARCHING; | 
| RobMeades | 0:5cffef3371f6 | 874 | _dev_info.reg_status_psd = PSD_NOT_REGISTERED_NOT_SEARCHING; | 
| RobMeades | 0:5cffef3371f6 | 875 | _dev_info.reg_status_eps = EPS_NOT_REGISTERED_NOT_SEARCHING; | 
| RobMeades | 0:5cffef3371f6 | 876 | success = true; | 
| RobMeades | 0:5cffef3371f6 | 877 | } | 
| RobMeades | 0:5cffef3371f6 | 878 | |
| RobMeades | 0:5cffef3371f6 | 879 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 880 | return success; | 
| RobMeades | 0:5cffef3371f6 | 881 | } | 
| RobMeades | 0:5cffef3371f6 | 882 | |
| RobMeades | 0:5cffef3371f6 | 883 | // Put the modem into its lowest power state. | 
| RobMeades | 0:5cffef3371f6 | 884 | void UbloxCellularBase::deinit() | 
| RobMeades | 0:5cffef3371f6 | 885 | { | 
| RobMeades | 0:5cffef3371f6 | 886 | power_down(); | 
| RobMeades | 0:5cffef3371f6 | 887 | _modem_initialised = false; | 
| RobMeades | 0:5cffef3371f6 | 888 | } | 
| RobMeades | 0:5cffef3371f6 | 889 | |
| RobMeades | 0:5cffef3371f6 | 890 | // Set the PIN. | 
| RobMeades | 0:5cffef3371f6 | 891 | void UbloxCellularBase::set_pin(const char *pin) { | 
| RobMeades | 0:5cffef3371f6 | 892 | _pin = pin; | 
| RobMeades | 0:5cffef3371f6 | 893 | } | 
| RobMeades | 0:5cffef3371f6 | 894 | |
| RobMeades | 0:5cffef3371f6 | 895 | // Enable or disable SIM pin checking. | 
| rob.meades@u-blox.com | 4:2e640a101db1 | 896 | bool UbloxCellularBase::sim_pin_check_enable(bool enableNotDisable) | 
| RobMeades | 0:5cffef3371f6 | 897 | { | 
| RobMeades | 0:5cffef3371f6 | 898 | bool success = false;; | 
| RobMeades | 0:5cffef3371f6 | 899 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 900 | |
| RobMeades | 0:5cffef3371f6 | 901 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 902 | |
| RobMeades | 0:5cffef3371f6 | 903 | if (_pin != NULL) { | 
| RobMeades | 0:5cffef3371f6 | 904 | if (_sim_pin_check_enabled && !enableNotDisable) { | 
| RobMeades | 0:5cffef3371f6 | 905 | // Disable the SIM lock | 
| RobMeades | 0:5cffef3371f6 | 906 | if (_at->send("AT+CLCK=\"SC\",0,\"%s\"", _pin) && _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 907 | _sim_pin_check_enabled = false; | 
| RobMeades | 0:5cffef3371f6 | 908 | success = true; | 
| RobMeades | 0:5cffef3371f6 | 909 | } | 
| RobMeades | 0:5cffef3371f6 | 910 | } else if (!_sim_pin_check_enabled && enableNotDisable) { | 
| RobMeades | 0:5cffef3371f6 | 911 | // Enable the SIM lock | 
| RobMeades | 0:5cffef3371f6 | 912 | if (_at->send("AT+CLCK=\"SC\",1,\"%s\"", _pin) && _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 913 | _sim_pin_check_enabled = true; | 
| RobMeades | 0:5cffef3371f6 | 914 | success = true; | 
| RobMeades | 0:5cffef3371f6 | 915 | } | 
| RobMeades | 0:5cffef3371f6 | 916 | } else { | 
| RobMeades | 0:5cffef3371f6 | 917 | success = true; | 
| RobMeades | 0:5cffef3371f6 | 918 | } | 
| RobMeades | 0:5cffef3371f6 | 919 | } | 
| RobMeades | 0:5cffef3371f6 | 920 | |
| RobMeades | 0:5cffef3371f6 | 921 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 922 | return success; | 
| RobMeades | 0:5cffef3371f6 | 923 | } | 
| RobMeades | 0:5cffef3371f6 | 924 | |
| RobMeades | 0:5cffef3371f6 | 925 | // Change the pin code for the SIM card. | 
| RobMeades | 0:5cffef3371f6 | 926 | bool UbloxCellularBase::change_sim_pin(const char *pin) | 
| RobMeades | 0:5cffef3371f6 | 927 | { | 
| RobMeades | 0:5cffef3371f6 | 928 | bool success = false;; | 
| RobMeades | 0:5cffef3371f6 | 929 | LOCK(); | 
| RobMeades | 0:5cffef3371f6 | 930 | |
| RobMeades | 0:5cffef3371f6 | 931 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 0:5cffef3371f6 | 932 | |
| RobMeades | 0:5cffef3371f6 | 933 | // Change the SIM pin | 
| RobMeades | 0:5cffef3371f6 | 934 | if ((pin != NULL) && (_pin != NULL)) { | 
| RobMeades | 0:5cffef3371f6 | 935 | if (_at->send("AT+CPWD=\"SC\",\"%s\",\"%s\"", _pin, pin) && _at->recv("OK")) { | 
| RobMeades | 0:5cffef3371f6 | 936 | _pin = pin; | 
| RobMeades | 0:5cffef3371f6 | 937 | success = true; | 
| RobMeades | 0:5cffef3371f6 | 938 | } | 
| RobMeades | 0:5cffef3371f6 | 939 | } | 
| RobMeades | 0:5cffef3371f6 | 940 | |
| RobMeades | 0:5cffef3371f6 | 941 | UNLOCK(); | 
| RobMeades | 0:5cffef3371f6 | 942 | return success; | 
| RobMeades | 0:5cffef3371f6 | 943 | } | 
| RobMeades | 0:5cffef3371f6 | 944 | |
| RobMeades | 14:e420232ee4e7 | 945 | // Get the IMEI. | 
| fahim alavi | 13:158a035b1b50 | 946 | bool UbloxCellularBase::get_imei(char *imei_to_send, int size) | 
| fahim alavi | 13:158a035b1b50 | 947 | { | 
| fahim alavi | 13:158a035b1b50 | 948 | bool success; | 
| fahim alavi | 13:158a035b1b50 | 949 | LOCK(); | 
| fahim alavi | 13:158a035b1b50 | 950 | |
| fahim alavi | 13:158a035b1b50 | 951 | MBED_ASSERT(_at != NULL); | 
| fahim alavi | 13:158a035b1b50 | 952 | |
| fahim alavi | 13:158a035b1b50 | 953 | // International mobile equipment identifier | 
| fahim alavi | 13:158a035b1b50 | 954 | // AT Command Manual UBX-13002752, section 4.7 | 
| fahim alavi | 13:158a035b1b50 | 955 | success = _at->send("AT+CGSN") && _at->recv("%15[^\n]\nOK\n", _dev_info.imei); | 
| fahim alavi | 13:158a035b1b50 | 956 | tr_info("DevInfo: IMEI=%s", _dev_info.imei); | 
| fahim alavi | 13:158a035b1b50 | 957 | |
| fahim alavi | 13:158a035b1b50 | 958 | if (success) { | 
| fahim alavi | 13:158a035b1b50 | 959 | memcpy(imei_to_send,_dev_info.imei,size); | 
| fahim alavi | 13:158a035b1b50 | 960 | imei_to_send[size-1] = '\0'; | 
| fahim alavi | 13:158a035b1b50 | 961 | } | 
| fahim alavi | 13:158a035b1b50 | 962 | |
| fahim alavi | 13:158a035b1b50 | 963 | UNLOCK(); | 
| fahim alavi | 13:158a035b1b50 | 964 | return success; | 
| fahim alavi | 13:158a035b1b50 | 965 | } | 
| fahim alavi | 13:158a035b1b50 | 966 | |
| RobMeades | 14:e420232ee4e7 | 967 | // Get the IMEI of the module. | 
| RobMeades | 14:e420232ee4e7 | 968 | const char *UbloxCellularBase::imei() | 
| RobMeades | 14:e420232ee4e7 | 969 | { | 
| RobMeades | 14:e420232ee4e7 | 970 | return _dev_info.imei; | 
| RobMeades | 14:e420232ee4e7 | 971 | } | 
| RobMeades | 14:e420232ee4e7 | 972 | |
| RobMeades | 14:e420232ee4e7 | 973 | // Get the Mobile Equipment ID (which may be the same as the IMEI). | 
| RobMeades | 14:e420232ee4e7 | 974 | const char *UbloxCellularBase::meid() | 
| RobMeades | 14:e420232ee4e7 | 975 | { | 
| RobMeades | 14:e420232ee4e7 | 976 | return _dev_info.meid; | 
| RobMeades | 14:e420232ee4e7 | 977 | } | 
| RobMeades | 14:e420232ee4e7 | 978 | |
| RobMeades | 14:e420232ee4e7 | 979 | // Get the IMSI of the SIM. | 
| RobMeades | 14:e420232ee4e7 | 980 | const char *UbloxCellularBase::imsi() | 
| RobMeades | 14:e420232ee4e7 | 981 | { | 
| RobMeades | 14:e420232ee4e7 | 982 | // (try) to update the IMSI, just in case the SIM has changed | 
| RobMeades | 14:e420232ee4e7 | 983 | get_imsi(); | 
| RobMeades | 14:e420232ee4e7 | 984 | |
| RobMeades | 14:e420232ee4e7 | 985 | return _dev_info.imsi; | 
| RobMeades | 14:e420232ee4e7 | 986 | } | 
| RobMeades | 14:e420232ee4e7 | 987 | |
| RobMeades | 14:e420232ee4e7 | 988 | // Get the ICCID of the SIM. | 
| RobMeades | 14:e420232ee4e7 | 989 | const char *UbloxCellularBase::iccid() | 
| RobMeades | 14:e420232ee4e7 | 990 | { | 
| RobMeades | 14:e420232ee4e7 | 991 | // (try) to update the ICCID, just in case the SIM has changed | 
| RobMeades | 14:e420232ee4e7 | 992 | get_iccid(); | 
| RobMeades | 14:e420232ee4e7 | 993 | |
| RobMeades | 14:e420232ee4e7 | 994 | return _dev_info.iccid; | 
| RobMeades | 14:e420232ee4e7 | 995 | } | 
| RobMeades | 14:e420232ee4e7 | 996 | |
| RobMeades | 14:e420232ee4e7 | 997 | // Get the RSSI in dBm. | 
| RobMeades | 14:e420232ee4e7 | 998 | int UbloxCellularBase::rssi() | 
| RobMeades | 14:e420232ee4e7 | 999 | { | 
| RobMeades | 14:e420232ee4e7 | 1000 | char buf[7] = {0}; | 
| RobMeades | 14:e420232ee4e7 | 1001 | int rssi = 0; | 
| RobMeades | 14:e420232ee4e7 | 1002 | int qual = 0; | 
| RobMeades | 14:e420232ee4e7 | 1003 | int rssiRet = 0; | 
| RobMeades | 14:e420232ee4e7 | 1004 | bool success; | 
| RobMeades | 14:e420232ee4e7 | 1005 | LOCK(); | 
| RobMeades | 14:e420232ee4e7 | 1006 | |
| RobMeades | 14:e420232ee4e7 | 1007 | MBED_ASSERT(_at != NULL); | 
| RobMeades | 14:e420232ee4e7 | 1008 | |
| RobMeades | 14:e420232ee4e7 | 1009 | success = _at->send("AT+CSQ") && _at->recv("+CSQ: %6[^\n]\nOK\n", buf); | 
| RobMeades | 14:e420232ee4e7 | 1010 | |
| RobMeades | 14:e420232ee4e7 | 1011 | if (success) { | 
| RobMeades | 14:e420232ee4e7 | 1012 | if (sscanf(buf, "%d,%d", &rssi, &qual) == 2) { | 
| RobMeades | 14:e420232ee4e7 | 1013 | // AT+CSQ returns a coded RSSI value and an RxQual value | 
| RobMeades | 14:e420232ee4e7 | 1014 | // For 2G an RSSI of 0 corresponds to -113 dBm or less, | 
| RobMeades | 14:e420232ee4e7 | 1015 | // an RSSI of 31 corresponds to -51 dBm or less and hence | 
| RobMeades | 14:e420232ee4e7 | 1016 | // each value is a 2 dB step. | 
| RobMeades | 14:e420232ee4e7 | 1017 | // For LTE the mapping is defined in the array rssiConvertLte[]. | 
| RobMeades | 14:e420232ee4e7 | 1018 | // For 3G the mapping to RSCP is defined in the array rscpConvert3G[] | 
| RobMeades | 14:e420232ee4e7 | 1019 | // and the RSSI value is then RSCP - the EC_NO_LEV number derived | 
| RobMeades | 14:e420232ee4e7 | 1020 | // by putting the qual number through qualConvert3G[]. | 
| RobMeades | 14:e420232ee4e7 | 1021 | if ((rssi >= 0) && (rssi <= 31)) { | 
| RobMeades | 14:e420232ee4e7 | 1022 | switch (_dev_info.rat) { | 
| RobMeades | 14:e420232ee4e7 | 1023 | case UTRAN: | 
| RobMeades | 14:e420232ee4e7 | 1024 | case HSDPA: | 
| RobMeades | 14:e420232ee4e7 | 1025 | case HSUPA: | 
| RobMeades | 14:e420232ee4e7 | 1026 | case HSDPA_HSUPA: | 
| RobMeades | 14:e420232ee4e7 | 1027 | // 3G | 
| RobMeades | 14:e420232ee4e7 | 1028 | if ((qual >= 0) && (qual <= 7)) { | 
| RobMeades | 14:e420232ee4e7 | 1029 | qual = qualConvert3G[qual]; | 
| RobMeades | 14:e420232ee4e7 | 1030 | } | 
| RobMeades | 14:e420232ee4e7 | 1031 | rssiRet = rscpConvert3G[rssi]; | 
| RobMeades | 14:e420232ee4e7 | 1032 | rssiRet -= qual; | 
| RobMeades | 14:e420232ee4e7 | 1033 | break; | 
| RobMeades | 14:e420232ee4e7 | 1034 | case LTE: | 
| RobMeades | 14:e420232ee4e7 | 1035 | // LTE | 
| RobMeades | 14:e420232ee4e7 | 1036 | rssiRet = rssiConvertLte[rssi]; | 
| RobMeades | 14:e420232ee4e7 | 1037 | break; | 
| RobMeades | 14:e420232ee4e7 | 1038 | case GSM: | 
| RobMeades | 14:e420232ee4e7 | 1039 | case COMPACT_GSM: | 
| RobMeades | 14:e420232ee4e7 | 1040 | case EDGE: | 
| RobMeades | 14:e420232ee4e7 | 1041 | default: | 
| RobMeades | 14:e420232ee4e7 | 1042 | // GSM or assumed GSM if the RAT is not known | 
| RobMeades | 14:e420232ee4e7 | 1043 | rssiRet = -(113 - (rssi << 2)); | 
| RobMeades | 14:e420232ee4e7 | 1044 | break; | 
| RobMeades | 14:e420232ee4e7 | 1045 | } | 
| RobMeades | 14:e420232ee4e7 | 1046 | } | 
| RobMeades | 14:e420232ee4e7 | 1047 | } | 
| RobMeades | 14:e420232ee4e7 | 1048 | } | 
| RobMeades | 14:e420232ee4e7 | 1049 | |
| RobMeades | 14:e420232ee4e7 | 1050 | UNLOCK(); | 
| RobMeades | 14:e420232ee4e7 | 1051 | return rssiRet; | 
| RobMeades | 14:e420232ee4e7 | 1052 | } | 
| RobMeades | 14:e420232ee4e7 | 1053 | |
| RobMeades | 0:5cffef3371f6 | 1054 | // End of File | 
| RobMeades | 0:5cffef3371f6 | 1055 |