Wajahat Abbas
ublox-at-cellular-interface-ext
Dependencies: ublox-at-cellular-interface
UbloxATCellularInterfaceExt.cpp@4:39acbc0111eb, 2017-06-09 (annotated)
- Committer:
- RobMeades
- Date:
- Fri Jun 09 22:23:28 2017 +0000
- Revision:
- 4:39acbc0111eb
- Parent:
- 1:26a67ab07275
- Child:
- 5:9fd89567f769
Handle case where uncertainty is "-1". Differentiate between +UULOC and +UULOCIND URCs.
Who changed what in which revision?
| User | Revision | Line number | New contents of line |
|---|---|---|---|
| RobMeades | 0:0b75e22c9231 | 1 | /* Copyright (c) 2017 ublox Limited |
| RobMeades | 0:0b75e22c9231 | 2 | * |
| RobMeades | 0:0b75e22c9231 | 3 | * Licensed under the Apache License, Version 2.0 (the "License"); |
| RobMeades | 0:0b75e22c9231 | 4 | * you may not use this file except in compliance with the License. |
| RobMeades | 0:0b75e22c9231 | 5 | * You may obtain a copy of the License at |
| RobMeades | 0:0b75e22c9231 | 6 | * |
| RobMeades | 0:0b75e22c9231 | 7 | * http://www.apache.org/licenses/LICENSE-2.0 |
| RobMeades | 0:0b75e22c9231 | 8 | * |
| RobMeades | 0:0b75e22c9231 | 9 | * Unless required by applicable law or agreed to in writing, software |
| RobMeades | 0:0b75e22c9231 | 10 | * distributed under the License is distributed on an "AS IS" BASIS, |
| RobMeades | 0:0b75e22c9231 | 11 | * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. |
| RobMeades | 0:0b75e22c9231 | 12 | * See the License for the specific language governing permissions and |
| RobMeades | 0:0b75e22c9231 | 13 | * limitations under the License. |
| RobMeades | 0:0b75e22c9231 | 14 | */ |
| RobMeades | 0:0b75e22c9231 | 15 | |
| RobMeades | 0:0b75e22c9231 | 16 | #include "UbloxATCellularInterfaceExt.h" |
| RobMeades | 0:0b75e22c9231 | 17 | #include "APN_db.h" |
| RobMeades | 0:0b75e22c9231 | 18 | #if defined(FEATURE_COMMON_PAL) |
| RobMeades | 0:0b75e22c9231 | 19 | #include "mbed_trace.h" |
| RobMeades | 0:0b75e22c9231 | 20 | #define TRACE_GROUP "UCAD" |
| RobMeades | 0:0b75e22c9231 | 21 | #else |
| RobMeades | 0:0b75e22c9231 | 22 | #define debug_if(_debug_trace_on, ...) (void(0)) // dummies if feature common pal is not added |
| RobMeades | 0:0b75e22c9231 | 23 | #define tr_info(...) (void(0)) // dummies if feature common pal is not added |
| RobMeades | 0:0b75e22c9231 | 24 | #define tr_error(...) (void(0)) // dummies if feature common pal is not added |
| RobMeades | 0:0b75e22c9231 | 25 | #endif |
| RobMeades | 0:0b75e22c9231 | 26 | |
| RobMeades | 0:0b75e22c9231 | 27 | /********************************************************************** |
| RobMeades | 0:0b75e22c9231 | 28 | * PROTECTED METHODS: HTTP |
| RobMeades | 0:0b75e22c9231 | 29 | **********************************************************************/ |
| RobMeades | 0:0b75e22c9231 | 30 | |
| RobMeades | 0:0b75e22c9231 | 31 | // Callback for HTTP result code handling. |
| RobMeades | 0:0b75e22c9231 | 32 | void UbloxATCellularInterfaceExt::UUHTTPCR_URC() |
| RobMeades | 0:0b75e22c9231 | 33 | { |
| RobMeades | 0:0b75e22c9231 | 34 | char buf[32]; |
| RobMeades | 0:0b75e22c9231 | 35 | int a, b, c; |
| RobMeades | 0:0b75e22c9231 | 36 | |
| RobMeades | 0:0b75e22c9231 | 37 | // Note: not calling _at->recv() from here as we're |
| RobMeades | 0:0b75e22c9231 | 38 | // already in an _at->recv() |
| RobMeades | 0:0b75e22c9231 | 39 | // +UUHTTPCR: <profile_id>,<op_code>,<param_val> |
| RobMeades | 0:0b75e22c9231 | 40 | if (read_at_to_char(buf, sizeof (buf), '\n') > 0) { |
| RobMeades | 0:0b75e22c9231 | 41 | if (sscanf(buf, ": %d,%d,%d", &a, &b, &c) == 3) { |
| RobMeades | 0:0b75e22c9231 | 42 | _httpProfiles[a].cmd = b; // Command |
| RobMeades | 0:0b75e22c9231 | 43 | _httpProfiles[a].result = c; // Result |
| RobMeades | 0:0b75e22c9231 | 44 | debug_if(_debug_trace_on, "%s on profile %d, result code is %d\n", getHttpCmd((HttpCmd) b), a, c); |
| RobMeades | 0:0b75e22c9231 | 45 | } |
| RobMeades | 0:0b75e22c9231 | 46 | } |
| RobMeades | 0:0b75e22c9231 | 47 | } |
| RobMeades | 0:0b75e22c9231 | 48 | |
| RobMeades | 0:0b75e22c9231 | 49 | // Find a given profile. NOTE: LOCK() before calling. |
| RobMeades | 0:0b75e22c9231 | 50 | int UbloxATCellularInterfaceExt::findProfile(int modemHandle) |
| RobMeades | 0:0b75e22c9231 | 51 | { |
| RobMeades | 0:0b75e22c9231 | 52 | for (unsigned int profile = 0; profile < (sizeof(_httpProfiles)/sizeof(_httpProfiles[0])); |
| RobMeades | 0:0b75e22c9231 | 53 | profile++) { |
| RobMeades | 0:0b75e22c9231 | 54 | if (_httpProfiles[profile].modemHandle == modemHandle) { |
| RobMeades | 0:0b75e22c9231 | 55 | return profile; |
| RobMeades | 0:0b75e22c9231 | 56 | } |
| RobMeades | 0:0b75e22c9231 | 57 | } |
| RobMeades | 0:0b75e22c9231 | 58 | |
| RobMeades | 0:0b75e22c9231 | 59 | return HTTP_PROF_UNUSED; |
| RobMeades | 0:0b75e22c9231 | 60 | } |
| RobMeades | 0:0b75e22c9231 | 61 | |
| RobMeades | 0:0b75e22c9231 | 62 | // Return a string representing an HTTP AT command. |
| RobMeades | 0:0b75e22c9231 | 63 | const char *UbloxATCellularInterfaceExt::getHttpCmd(HttpCmd httpCmd) |
| RobMeades | 0:0b75e22c9231 | 64 | { |
| RobMeades | 0:0b75e22c9231 | 65 | const char * str = "HTTP command not recognised"; |
| RobMeades | 0:0b75e22c9231 | 66 | |
| RobMeades | 0:0b75e22c9231 | 67 | switch (httpCmd) { |
| RobMeades | 0:0b75e22c9231 | 68 | case HTTP_HEAD: |
| RobMeades | 0:0b75e22c9231 | 69 | str = "HTTP HEAD command"; |
| RobMeades | 0:0b75e22c9231 | 70 | break; |
| RobMeades | 0:0b75e22c9231 | 71 | case HTTP_GET: |
| RobMeades | 0:0b75e22c9231 | 72 | str = "HTTP GET command"; |
| RobMeades | 0:0b75e22c9231 | 73 | break; |
| RobMeades | 0:0b75e22c9231 | 74 | case HTTP_DELETE: |
| RobMeades | 0:0b75e22c9231 | 75 | str = "HTTP DELETE command"; |
| RobMeades | 0:0b75e22c9231 | 76 | break; |
| RobMeades | 0:0b75e22c9231 | 77 | case HTTP_PUT: |
| RobMeades | 0:0b75e22c9231 | 78 | str = "HTTP PUT command"; |
| RobMeades | 0:0b75e22c9231 | 79 | break; |
| RobMeades | 0:0b75e22c9231 | 80 | case HTTP_POST_FILE: |
| RobMeades | 0:0b75e22c9231 | 81 | str = "HTTP POST file command"; |
| RobMeades | 0:0b75e22c9231 | 82 | break; |
| RobMeades | 0:0b75e22c9231 | 83 | case HTTP_POST_DATA: |
| RobMeades | 0:0b75e22c9231 | 84 | str = "HTTP POST data command"; |
| RobMeades | 0:0b75e22c9231 | 85 | break; |
| RobMeades | 0:0b75e22c9231 | 86 | default: |
| RobMeades | 0:0b75e22c9231 | 87 | break; |
| RobMeades | 0:0b75e22c9231 | 88 | } |
| RobMeades | 0:0b75e22c9231 | 89 | |
| RobMeades | 0:0b75e22c9231 | 90 | return str; |
| RobMeades | 0:0b75e22c9231 | 91 | } |
| RobMeades | 0:0b75e22c9231 | 92 | |
| RobMeades | 0:0b75e22c9231 | 93 | /********************************************************************** |
| RobMeades | 0:0b75e22c9231 | 94 | * PROTECTED METHODS: FTP |
| RobMeades | 0:0b75e22c9231 | 95 | **********************************************************************/ |
| RobMeades | 0:0b75e22c9231 | 96 | |
| RobMeades | 0:0b75e22c9231 | 97 | // Callback for FTP result code handling. |
| RobMeades | 0:0b75e22c9231 | 98 | void UbloxATCellularInterfaceExt::UUFTPCR_URC() |
| RobMeades | 0:0b75e22c9231 | 99 | { |
| RobMeades | 0:0b75e22c9231 | 100 | char buf[64]; |
| RobMeades | 0:0b75e22c9231 | 101 | char md5[32]; |
| RobMeades | 0:0b75e22c9231 | 102 | |
| RobMeades | 0:0b75e22c9231 | 103 | // Note: not calling _at->recv() from here as we're |
| RobMeades | 0:0b75e22c9231 | 104 | // already in an _at->recv() |
| RobMeades | 0:0b75e22c9231 | 105 | // +UUFTPCR: <op_code>,<ftp_result>[,<md5_sum>] |
| RobMeades | 0:0b75e22c9231 | 106 | if (read_at_to_char(buf, sizeof (buf), '\n') > 0) { |
| RobMeades | 0:0b75e22c9231 | 107 | if (sscanf(buf, ": %d,%d,%32[^\n]\n", &_lastFtpOpCodeResult, &_lastFtpResult, md5) == 3) { |
| RobMeades | 0:0b75e22c9231 | 108 | // Store the MD5 sum if we can |
| RobMeades | 0:0b75e22c9231 | 109 | if ((_ftpBuf != NULL) && (_ftpBufLen >= 32)) { |
| RobMeades | 0:0b75e22c9231 | 110 | memcpy (_ftpBuf, md5, 32); |
| RobMeades | 0:0b75e22c9231 | 111 | if (_ftpBufLen == 33) { |
| RobMeades | 0:0b75e22c9231 | 112 | *(buf + 32) = 0; // Add a terminator if there's room |
| RobMeades | 0:0b75e22c9231 | 113 | } |
| RobMeades | 0:0b75e22c9231 | 114 | } |
| RobMeades | 0:0b75e22c9231 | 115 | } |
| RobMeades | 0:0b75e22c9231 | 116 | debug_if(_debug_trace_on, "%s result code is %d\n", |
| RobMeades | 0:0b75e22c9231 | 117 | getFtpCmd((FtpCmd) _lastFtpOpCodeResult), _lastFtpResult); |
| RobMeades | 0:0b75e22c9231 | 118 | } |
| RobMeades | 0:0b75e22c9231 | 119 | } |
| RobMeades | 0:0b75e22c9231 | 120 | |
| RobMeades | 0:0b75e22c9231 | 121 | // Callback for FTP data handling. |
| RobMeades | 0:0b75e22c9231 | 122 | void UbloxATCellularInterfaceExt::UUFTPCD_URC() |
| RobMeades | 0:0b75e22c9231 | 123 | { |
| RobMeades | 0:0b75e22c9231 | 124 | char buf[32]; |
| RobMeades | 0:0b75e22c9231 | 125 | char *ftpBufPtr = _ftpBuf; |
| RobMeades | 0:0b75e22c9231 | 126 | int ftpDataLen; |
| RobMeades | 0:0b75e22c9231 | 127 | |
| RobMeades | 0:0b75e22c9231 | 128 | // Note: not calling _at->recv() from here as we're |
| RobMeades | 0:0b75e22c9231 | 129 | // already in an _at->recv() |
| RobMeades | 0:0b75e22c9231 | 130 | // +UUFTPCD: <op_code>,<ftp_data_len>,<ftp_data_in_quotes> |
| RobMeades | 0:0b75e22c9231 | 131 | if (read_at_to_char(buf, sizeof(buf), '\"') > 0) { |
| RobMeades | 0:0b75e22c9231 | 132 | if (sscanf(buf, ": %d,%d,\"", &_lastFtpOpCodeData, &ftpDataLen) == 2) { |
| RobMeades | 0:0b75e22c9231 | 133 | if ((ftpBufPtr != NULL) && (_ftpBufLen > 0)) { |
| RobMeades | 0:0b75e22c9231 | 134 | if (ftpDataLen + 1 > _ftpBufLen) { // +1 for terminator |
| RobMeades | 0:0b75e22c9231 | 135 | ftpDataLen = _ftpBufLen - 1; |
| RobMeades | 0:0b75e22c9231 | 136 | } |
| RobMeades | 0:0b75e22c9231 | 137 | ftpBufPtr += _at->read(ftpBufPtr, ftpDataLen); |
| RobMeades | 0:0b75e22c9231 | 138 | *ftpBufPtr = 0; // Add terminator |
| RobMeades | 0:0b75e22c9231 | 139 | } |
| RobMeades | 0:0b75e22c9231 | 140 | } |
| RobMeades | 0:0b75e22c9231 | 141 | } |
| RobMeades | 0:0b75e22c9231 | 142 | } |
| RobMeades | 0:0b75e22c9231 | 143 | |
| RobMeades | 0:0b75e22c9231 | 144 | // Return a string representing an FTP AT command. |
| RobMeades | 0:0b75e22c9231 | 145 | const char *UbloxATCellularInterfaceExt::getFtpCmd(FtpCmd ftpCmd) |
| RobMeades | 0:0b75e22c9231 | 146 | { |
| RobMeades | 0:0b75e22c9231 | 147 | const char * str = "FTP command not recognised"; |
| RobMeades | 0:0b75e22c9231 | 148 | |
| RobMeades | 0:0b75e22c9231 | 149 | switch (ftpCmd) { |
| RobMeades | 0:0b75e22c9231 | 150 | case FTP_LOGOUT: |
| RobMeades | 0:0b75e22c9231 | 151 | str = "FTP log out command"; |
| RobMeades | 0:0b75e22c9231 | 152 | break; |
| RobMeades | 0:0b75e22c9231 | 153 | case FTP_LOGIN: |
| RobMeades | 0:0b75e22c9231 | 154 | str = "FTP log in command"; |
| RobMeades | 0:0b75e22c9231 | 155 | break; |
| RobMeades | 0:0b75e22c9231 | 156 | case FTP_DELETE_FILE: |
| RobMeades | 0:0b75e22c9231 | 157 | str = "FTP delete file command"; |
| RobMeades | 0:0b75e22c9231 | 158 | break; |
| RobMeades | 0:0b75e22c9231 | 159 | case FTP_RENAME_FILE: |
| RobMeades | 0:0b75e22c9231 | 160 | str = "FTP rename file command"; |
| RobMeades | 0:0b75e22c9231 | 161 | break; |
| RobMeades | 0:0b75e22c9231 | 162 | case FTP_GET_FILE: |
| RobMeades | 0:0b75e22c9231 | 163 | str = "FTP get file command"; |
| RobMeades | 0:0b75e22c9231 | 164 | break; |
| RobMeades | 0:0b75e22c9231 | 165 | case FTP_PUT_FILE: |
| RobMeades | 0:0b75e22c9231 | 166 | str = "FTP put file command"; |
| RobMeades | 0:0b75e22c9231 | 167 | break; |
| RobMeades | 0:0b75e22c9231 | 168 | case FTP_CD: |
| RobMeades | 0:0b75e22c9231 | 169 | str = "FTP change directory command"; |
| RobMeades | 0:0b75e22c9231 | 170 | break; |
| RobMeades | 0:0b75e22c9231 | 171 | case FTP_MKDIR: |
| RobMeades | 0:0b75e22c9231 | 172 | str = "FTP make directory command"; |
| RobMeades | 0:0b75e22c9231 | 173 | break; |
| RobMeades | 0:0b75e22c9231 | 174 | case FTP_RMDIR: |
| RobMeades | 0:0b75e22c9231 | 175 | str = "FTP remove directory command"; |
| RobMeades | 0:0b75e22c9231 | 176 | break; |
| RobMeades | 0:0b75e22c9231 | 177 | case FTP_FILE_INFO: |
| RobMeades | 0:0b75e22c9231 | 178 | str = "FTP file info command"; |
| RobMeades | 0:0b75e22c9231 | 179 | break; |
| RobMeades | 0:0b75e22c9231 | 180 | case FTP_LS: |
| RobMeades | 0:0b75e22c9231 | 181 | str = "FTP directory list command"; |
| RobMeades | 0:0b75e22c9231 | 182 | break; |
| RobMeades | 0:0b75e22c9231 | 183 | case FTP_FOTA_FILE: |
| RobMeades | 0:0b75e22c9231 | 184 | str = "FTP FOTA file command"; |
| RobMeades | 0:0b75e22c9231 | 185 | break; |
| RobMeades | 0:0b75e22c9231 | 186 | default: |
| RobMeades | 0:0b75e22c9231 | 187 | break; |
| RobMeades | 0:0b75e22c9231 | 188 | } |
| RobMeades | 0:0b75e22c9231 | 189 | |
| RobMeades | 0:0b75e22c9231 | 190 | return str; |
| RobMeades | 0:0b75e22c9231 | 191 | } |
| RobMeades | 0:0b75e22c9231 | 192 | |
| RobMeades | 0:0b75e22c9231 | 193 | /********************************************************************** |
| RobMeades | 0:0b75e22c9231 | 194 | * PROTECTED METHODS: Cell Locate |
| RobMeades | 0:0b75e22c9231 | 195 | **********************************************************************/ |
| RobMeades | 0:0b75e22c9231 | 196 | |
| RobMeades | 0:0b75e22c9231 | 197 | // Callback for UULOCIND handling. |
| RobMeades | 0:0b75e22c9231 | 198 | void UbloxATCellularInterfaceExt::UULOCIND_URC() |
| RobMeades | 0:0b75e22c9231 | 199 | { |
| RobMeades | 0:0b75e22c9231 | 200 | char buf[32]; |
| RobMeades | 0:0b75e22c9231 | 201 | int a, b; |
| RobMeades | 0:0b75e22c9231 | 202 | |
| RobMeades | 0:0b75e22c9231 | 203 | // Note: not calling _at->recv() from here as we're |
| RobMeades | 0:0b75e22c9231 | 204 | // already in an _at->recv() |
| RobMeades | 0:0b75e22c9231 | 205 | // +UULOCIND: <step>,<result> |
| RobMeades | 0:0b75e22c9231 | 206 | if (read_at_to_char(buf, sizeof (buf), '\n') > 0) { |
| RobMeades | 0:0b75e22c9231 | 207 | if (sscanf(buf, " %d,%d", &a, &b) == 2) { |
| RobMeades | 0:0b75e22c9231 | 208 | switch (a) { |
| RobMeades | 0:0b75e22c9231 | 209 | case 0: |
| RobMeades | 0:0b75e22c9231 | 210 | debug_if(_debug_trace_on, "Network scan start\n"); |
| RobMeades | 0:0b75e22c9231 | 211 | break; |
| RobMeades | 0:0b75e22c9231 | 212 | case 1: |
| RobMeades | 0:0b75e22c9231 | 213 | debug_if(_debug_trace_on, "Network scan end\n"); |
| RobMeades | 0:0b75e22c9231 | 214 | break; |
| RobMeades | 0:0b75e22c9231 | 215 | case 2: |
| RobMeades | 0:0b75e22c9231 | 216 | debug_if(_debug_trace_on, "Requesting data from server\n"); |
| RobMeades | 0:0b75e22c9231 | 217 | break; |
| RobMeades | 0:0b75e22c9231 | 218 | case 3: |
| RobMeades | 0:0b75e22c9231 | 219 | debug_if(_debug_trace_on, "Received data from server\n"); |
| RobMeades | 0:0b75e22c9231 | 220 | break; |
| RobMeades | 0:0b75e22c9231 | 221 | case 4: |
| RobMeades | 0:0b75e22c9231 | 222 | debug_if(_debug_trace_on, "Sending feedback to server\n"); |
| RobMeades | 0:0b75e22c9231 | 223 | break; |
| RobMeades | 0:0b75e22c9231 | 224 | default: |
| RobMeades | 0:0b75e22c9231 | 225 | debug_if(_debug_trace_on, "Unknown step\n"); |
| RobMeades | 0:0b75e22c9231 | 226 | break; |
| RobMeades | 0:0b75e22c9231 | 227 | } |
| RobMeades | 0:0b75e22c9231 | 228 | switch (b) { |
| RobMeades | 0:0b75e22c9231 | 229 | case 0: |
| RobMeades | 0:0b75e22c9231 | 230 | // No error |
| RobMeades | 0:0b75e22c9231 | 231 | break; |
| RobMeades | 0:0b75e22c9231 | 232 | case 1: |
| RobMeades | 0:0b75e22c9231 | 233 | debug_if(_debug_trace_on, "Wrong URL!\n"); |
| RobMeades | 0:0b75e22c9231 | 234 | break; |
| RobMeades | 0:0b75e22c9231 | 235 | case 2: |
| RobMeades | 0:0b75e22c9231 | 236 | debug_if(_debug_trace_on, "HTTP error!\n"); |
| RobMeades | 0:0b75e22c9231 | 237 | break; |
| RobMeades | 0:0b75e22c9231 | 238 | case 3: |
| RobMeades | 0:0b75e22c9231 | 239 | debug_if(_debug_trace_on, "Create socket error!\n"); |
| RobMeades | 0:0b75e22c9231 | 240 | break; |
| RobMeades | 0:0b75e22c9231 | 241 | case 4: |
| RobMeades | 0:0b75e22c9231 | 242 | debug_if(_debug_trace_on, "Close socket error!\n"); |
| RobMeades | 0:0b75e22c9231 | 243 | break; |
| RobMeades | 0:0b75e22c9231 | 244 | case 5: |
| RobMeades | 0:0b75e22c9231 | 245 | debug_if(_debug_trace_on, "Write to socket error!\n"); |
| RobMeades | 0:0b75e22c9231 | 246 | break; |
| RobMeades | 0:0b75e22c9231 | 247 | case 6: |
| RobMeades | 0:0b75e22c9231 | 248 | debug_if(_debug_trace_on, "Read from socket error!\n"); |
| RobMeades | 0:0b75e22c9231 | 249 | break; |
| RobMeades | 0:0b75e22c9231 | 250 | case 7: |
| RobMeades | 0:0b75e22c9231 | 251 | debug_if(_debug_trace_on, "Connection/DNS error!\n"); |
| RobMeades | 0:0b75e22c9231 | 252 | break; |
| RobMeades | 0:0b75e22c9231 | 253 | case 8: |
| RobMeades | 0:0b75e22c9231 | 254 | debug_if(_debug_trace_on, "Authentication token problem!\n"); |
| RobMeades | 0:0b75e22c9231 | 255 | break; |
| RobMeades | 0:0b75e22c9231 | 256 | case 9: |
| RobMeades | 0:0b75e22c9231 | 257 | debug_if(_debug_trace_on, "Generic error!\n"); |
| RobMeades | 0:0b75e22c9231 | 258 | break; |
| RobMeades | 0:0b75e22c9231 | 259 | case 10: |
| RobMeades | 0:0b75e22c9231 | 260 | debug_if(_debug_trace_on, "User terminated!\n"); |
| RobMeades | 0:0b75e22c9231 | 261 | break; |
| RobMeades | 0:0b75e22c9231 | 262 | case 11: |
| RobMeades | 0:0b75e22c9231 | 263 | debug_if(_debug_trace_on, "No data from server!\n"); |
| RobMeades | 0:0b75e22c9231 | 264 | break; |
| RobMeades | 0:0b75e22c9231 | 265 | default: |
| RobMeades | 0:0b75e22c9231 | 266 | debug_if(_debug_trace_on, "Unknown result!\n"); |
| RobMeades | 0:0b75e22c9231 | 267 | break; |
| RobMeades | 0:0b75e22c9231 | 268 | } |
| RobMeades | 0:0b75e22c9231 | 269 | } |
| RobMeades | 0:0b75e22c9231 | 270 | } |
| RobMeades | 0:0b75e22c9231 | 271 | } |
| RobMeades | 0:0b75e22c9231 | 272 | |
| RobMeades | 0:0b75e22c9231 | 273 | // Callback for UULOC URC handling. |
| RobMeades | 0:0b75e22c9231 | 274 | void UbloxATCellularInterfaceExt::UULOC_URC() |
| RobMeades | 0:0b75e22c9231 | 275 | { |
| RobMeades | 0:0b75e22c9231 | 276 | int a, b; |
| RobMeades | 0:0b75e22c9231 | 277 | |
| RobMeades | 0:0b75e22c9231 | 278 | // Note: not calling _at->recv() from here as we're |
| RobMeades | 0:0b75e22c9231 | 279 | // already in an _at->recv() |
| RobMeades | 0:0b75e22c9231 | 280 | |
| RobMeades | 0:0b75e22c9231 | 281 | // +UHTTPCR: <profile_id>,<op_code>,<param_val> |
| RobMeades | 0:0b75e22c9231 | 282 | if (read_at_to_char(urcBuf, sizeof (urcBuf), '\n') > 0) { |
| rob.meades@u-blox.com | 1:26a67ab07275 | 283 | // Response type 1 |
| RobMeades | 0:0b75e22c9231 | 284 | // +UULOC: <date>,<time>,<lat>,<long>,<alt>,<uncertainty>,<speed>, <direction>,<vertical_acc>,<sensor_used>,<SV_used>,<antenna_status>, <jamming_status> |
| RobMeades | 4:39acbc0111eb | 285 | if (sscanf(urcBuf, " %d/%d/%d,%d:%d:%d.%*d,%f,%f,%d,%d,%d,%d,%d,%d,%d,%*d,%*d", |
| RobMeades | 0:0b75e22c9231 | 286 | &_loc[0].time.tm_mday, &_loc[0].time.tm_mon, |
| RobMeades | 0:0b75e22c9231 | 287 | &_loc[0].time.tm_year, &_loc[0].time.tm_hour, |
| RobMeades | 0:0b75e22c9231 | 288 | &_loc[0].time.tm_min, &_loc[0].time.tm_sec, |
| RobMeades | 0:0b75e22c9231 | 289 | &_loc[0].latitude, &_loc[0].longitude, &_loc[0].altitude, |
| RobMeades | 0:0b75e22c9231 | 290 | &_loc[0].uncertainty, &_loc[0].speed, &_loc[0].direction, |
| RobMeades | 0:0b75e22c9231 | 291 | &_loc[0].verticalAcc, |
| RobMeades | 0:0b75e22c9231 | 292 | &b, &_loc[0].svUsed) == 15) { |
| RobMeades | 0:0b75e22c9231 | 293 | debug_if(_debug_trace_on, "Position found at index 0\n"); |
| RobMeades | 0:0b75e22c9231 | 294 | _loc[0].sensor = (b == 0) ? CELL_LAST : (b == 1) ? CELL_GNSS : |
| RobMeades | 0:0b75e22c9231 | 295 | (b == 2) ? CELL_LOCATE : (b == 3) ? CELL_HYBRID : CELL_LAST; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 296 | _loc[0].time.tm_year -= 1900; |
| RobMeades | 0:0b75e22c9231 | 297 | _loc[0].time.tm_mon -= 1; |
| RobMeades | 0:0b75e22c9231 | 298 | _loc[0].time.tm_wday = 0; |
| RobMeades | 0:0b75e22c9231 | 299 | _loc[0].time.tm_yday = 0; |
| RobMeades | 0:0b75e22c9231 | 300 | _loc[0].validData = true; |
| RobMeades | 4:39acbc0111eb | 301 | // Uncertainty can appear as 4294967, which is |
| RobMeades | 4:39acbc0111eb | 302 | // (2^32 - 1) / 1000, or -1. Since it is confusing |
| RobMeades | 4:39acbc0111eb | 303 | // for the user to get a large positive number instead |
| RobMeades | 4:39acbc0111eb | 304 | // of 0 -1, set it to -1 in th1s case. |
| RobMeades | 4:39acbc0111eb | 305 | if (_loc[0].uncertainty == 4294967) { |
| RobMeades | 4:39acbc0111eb | 306 | _loc[0].uncertainty = -1; |
| RobMeades | 4:39acbc0111eb | 307 | } |
| RobMeades | 4:39acbc0111eb | 308 | _locExpPos = 1; |
| RobMeades | 0:0b75e22c9231 | 309 | _locRcvPos++; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 310 | // Response type 2, sensor used 1 |
| RobMeades | 0:0b75e22c9231 | 311 | // +UULOC: <sol>,<num>,<sensor_used>,<date>,<time>,<lat>,<long>,<alt>,<uncertainty>,<speed>, <direction>,<vertical_acc>,,<SV_used>,<antenna_status>, <jamming_status> |
| RobMeades | 4:39acbc0111eb | 312 | } else if (sscanf(urcBuf, " %d,%d,%d,%d/%d/%d,%d:%d:%d.%*d,%f,%f,%d,%d,%d,%d,%d,%d,%*d,%*d", |
| RobMeades | 0:0b75e22c9231 | 313 | &a, &_locExpPos, &b, |
| RobMeades | 0:0b75e22c9231 | 314 | &_loc[CELL_MAX_HYP - 1].time.tm_mday, |
| RobMeades | 0:0b75e22c9231 | 315 | &_loc[CELL_MAX_HYP - 1].time.tm_mon, |
| RobMeades | 0:0b75e22c9231 | 316 | &_loc[CELL_MAX_HYP - 1].time.tm_year, |
| RobMeades | 0:0b75e22c9231 | 317 | &_loc[CELL_MAX_HYP - 1].time.tm_hour, |
| RobMeades | 0:0b75e22c9231 | 318 | &_loc[CELL_MAX_HYP - 1].time.tm_min, |
| RobMeades | 0:0b75e22c9231 | 319 | &_loc[CELL_MAX_HYP - 1].time.tm_sec, |
| RobMeades | 0:0b75e22c9231 | 320 | &_loc[CELL_MAX_HYP - 1].latitude, |
| RobMeades | 0:0b75e22c9231 | 321 | &_loc[CELL_MAX_HYP - 1].longitude, |
| RobMeades | 0:0b75e22c9231 | 322 | &_loc[CELL_MAX_HYP - 1].altitude, |
| RobMeades | 0:0b75e22c9231 | 323 | &_loc[CELL_MAX_HYP - 1].uncertainty, |
| RobMeades | 0:0b75e22c9231 | 324 | &_loc[CELL_MAX_HYP - 1].speed, |
| RobMeades | 0:0b75e22c9231 | 325 | &_loc[CELL_MAX_HYP - 1].direction, |
| RobMeades | 0:0b75e22c9231 | 326 | &_loc[CELL_MAX_HYP - 1].verticalAcc, |
| RobMeades | 0:0b75e22c9231 | 327 | &_loc[CELL_MAX_HYP - 1].svUsed) == 17) { |
| RobMeades | 0:0b75e22c9231 | 328 | if (--a >= 0) { |
| RobMeades | 0:0b75e22c9231 | 329 | debug_if(_debug_trace_on, "Position found at index %d\n", a); |
| RobMeades | 0:0b75e22c9231 | 330 | |
| RobMeades | 0:0b75e22c9231 | 331 | memcpy(&_loc[a], &_loc[CELL_MAX_HYP - 1], sizeof(*_loc)); |
| RobMeades | 0:0b75e22c9231 | 332 | |
| RobMeades | 0:0b75e22c9231 | 333 | _loc[a].sensor = (b == 0) ? CELL_LAST : (b == 1) ? CELL_GNSS : |
| RobMeades | 0:0b75e22c9231 | 334 | (b == 2) ? CELL_LOCATE : (b == 3) ? CELL_HYBRID : CELL_LAST; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 335 | _loc[a].time.tm_year -= 1900; |
| RobMeades | 0:0b75e22c9231 | 336 | _loc[a].time.tm_mon -= 1; |
| RobMeades | 0:0b75e22c9231 | 337 | _loc[a].time.tm_wday = 0; |
| RobMeades | 0:0b75e22c9231 | 338 | _loc[a].time.tm_yday = 0; |
| RobMeades | 4:39acbc0111eb | 339 | // Uncertainty can appear as 4294967, which is |
| RobMeades | 4:39acbc0111eb | 340 | // (2^32 - 1) / 1000, or -1. Since it is confusing |
| RobMeades | 4:39acbc0111eb | 341 | // for the user to get a large positive number instead |
| RobMeades | 4:39acbc0111eb | 342 | // of 0 -1, set it to -1 in th1s case. |
| RobMeades | 4:39acbc0111eb | 343 | if (_loc[a].uncertainty == 4294967) { |
| RobMeades | 4:39acbc0111eb | 344 | _loc[a].uncertainty = -1; |
| RobMeades | 4:39acbc0111eb | 345 | } |
| RobMeades | 0:0b75e22c9231 | 346 | _loc[a].validData = true; |
| RobMeades | 0:0b75e22c9231 | 347 | _locRcvPos++; |
| RobMeades | 0:0b75e22c9231 | 348 | } |
| rob.meades@u-blox.com | 1:26a67ab07275 | 349 | // Response type 2, sensor used 2 |
| RobMeades | 0:0b75e22c9231 | 350 | //+UULOC: <sol>,<num>,<sensor_used>,<date>,<time>,<lat>,<long>,<alt>,<lat50>,<long50>,<major50>,<minor50>,<orientation50>,<confidence50>[,<lat95>,<long95>,<major95>,<minor95>,<orientation95>,<confidence95>] |
| RobMeades | 4:39acbc0111eb | 351 | } else if (sscanf(urcBuf, " %d,%d,%d,%d/%d/%d,%d:%d:%d.%*d,%f,%f,%d,%*f,%*f,%d,%*d,%*d,%*d", |
| RobMeades | 0:0b75e22c9231 | 352 | &a, &_locExpPos, &b, |
| RobMeades | 0:0b75e22c9231 | 353 | &_loc[CELL_MAX_HYP - 1].time.tm_mday, |
| RobMeades | 0:0b75e22c9231 | 354 | &_loc[CELL_MAX_HYP - 1].time.tm_mon, |
| RobMeades | 0:0b75e22c9231 | 355 | &_loc[CELL_MAX_HYP - 1].time.tm_year, |
| RobMeades | 0:0b75e22c9231 | 356 | &_loc[CELL_MAX_HYP - 1].time.tm_hour, |
| RobMeades | 0:0b75e22c9231 | 357 | &_loc[CELL_MAX_HYP - 1].time.tm_min, |
| RobMeades | 0:0b75e22c9231 | 358 | &_loc[CELL_MAX_HYP - 1].time.tm_sec, |
| RobMeades | 0:0b75e22c9231 | 359 | &_loc[CELL_MAX_HYP - 1].latitude, |
| RobMeades | 0:0b75e22c9231 | 360 | &_loc[CELL_MAX_HYP - 1].longitude, |
| RobMeades | 0:0b75e22c9231 | 361 | &_loc[CELL_MAX_HYP - 1].altitude, |
| RobMeades | 0:0b75e22c9231 | 362 | &_loc[CELL_MAX_HYP - 1].uncertainty) == 13) { |
| RobMeades | 0:0b75e22c9231 | 363 | if (--a >= 0) { |
| RobMeades | 0:0b75e22c9231 | 364 | |
| RobMeades | 0:0b75e22c9231 | 365 | debug_if(_debug_trace_on, "Position found at index %d\n", a); |
| RobMeades | 0:0b75e22c9231 | 366 | |
| RobMeades | 0:0b75e22c9231 | 367 | memcpy(&_loc[a], &_loc[CELL_MAX_HYP - 1], sizeof(*_loc)); |
| RobMeades | 0:0b75e22c9231 | 368 | |
| RobMeades | 0:0b75e22c9231 | 369 | _loc[a].sensor = (b == 0) ? CELL_LAST : (b == 1) ? CELL_GNSS : |
| RobMeades | 0:0b75e22c9231 | 370 | (b == 2) ? CELL_LOCATE : (b == 3) ? CELL_HYBRID : CELL_LAST; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 371 | _loc[a].time.tm_year -= 1900; |
| RobMeades | 0:0b75e22c9231 | 372 | _loc[a].time.tm_mon -= 1; |
| RobMeades | 0:0b75e22c9231 | 373 | _loc[a].time.tm_wday = 0; |
| RobMeades | 0:0b75e22c9231 | 374 | _loc[a].time.tm_yday = 0; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 375 | _loc[a].speed = 0; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 376 | _loc[a].direction = 0; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 377 | _loc[a].verticalAcc = 0; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 378 | _loc[a].svUsed = 0; |
| RobMeades | 4:39acbc0111eb | 379 | // Uncertainty can appear as 4294967, which is |
| RobMeades | 4:39acbc0111eb | 380 | // (2^32 - 1) / 1000, or -1. Since it is confusing |
| RobMeades | 4:39acbc0111eb | 381 | // for the user to get a large positive number instead |
| RobMeades | 4:39acbc0111eb | 382 | // of 0 -1, set it to -1 in th1s case. |
| RobMeades | 4:39acbc0111eb | 383 | if (_loc[a].uncertainty == 4294967) { |
| RobMeades | 4:39acbc0111eb | 384 | _loc[a].uncertainty = -1; |
| RobMeades | 4:39acbc0111eb | 385 | } |
| rob.meades@u-blox.com | 1:26a67ab07275 | 386 | _loc[a].validData = true; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 387 | _locRcvPos++; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 388 | } |
| rob.meades@u-blox.com | 1:26a67ab07275 | 389 | // Response type 2, sensor used 0 |
| rob.meades@u-blox.com | 1:26a67ab07275 | 390 | //+UULOC: <sol>,<num>,<sensor_used>,<date>,<time>,<lat>,<long>,<alt>,<uncertainty> |
| RobMeades | 4:39acbc0111eb | 391 | } else if (sscanf(urcBuf, " %d,%d,%d,%d/%d/%d,%d:%d:%d.%*d,%f,%f,%d,%d", |
| rob.meades@u-blox.com | 1:26a67ab07275 | 392 | &a, &_locExpPos, &b, |
| rob.meades@u-blox.com | 1:26a67ab07275 | 393 | &_loc[CELL_MAX_HYP - 1].time.tm_mday, |
| rob.meades@u-blox.com | 1:26a67ab07275 | 394 | &_loc[CELL_MAX_HYP - 1].time.tm_mon, |
| rob.meades@u-blox.com | 1:26a67ab07275 | 395 | &_loc[CELL_MAX_HYP - 1].time.tm_year, |
| rob.meades@u-blox.com | 1:26a67ab07275 | 396 | &_loc[CELL_MAX_HYP - 1].time.tm_hour, |
| rob.meades@u-blox.com | 1:26a67ab07275 | 397 | &_loc[CELL_MAX_HYP - 1].time.tm_min, |
| rob.meades@u-blox.com | 1:26a67ab07275 | 398 | &_loc[CELL_MAX_HYP - 1].time.tm_sec, |
| rob.meades@u-blox.com | 1:26a67ab07275 | 399 | &_loc[CELL_MAX_HYP - 1].latitude, |
| rob.meades@u-blox.com | 1:26a67ab07275 | 400 | &_loc[CELL_MAX_HYP - 1].longitude, |
| rob.meades@u-blox.com | 1:26a67ab07275 | 401 | &_loc[CELL_MAX_HYP - 1].altitude, |
| rob.meades@u-blox.com | 1:26a67ab07275 | 402 | &_loc[CELL_MAX_HYP - 1].uncertainty) == 13) { |
| rob.meades@u-blox.com | 1:26a67ab07275 | 403 | if (--a >= 0) { |
| rob.meades@u-blox.com | 1:26a67ab07275 | 404 | |
| rob.meades@u-blox.com | 1:26a67ab07275 | 405 | debug_if(_debug_trace_on, "Position found at index %d\n", a); |
| rob.meades@u-blox.com | 1:26a67ab07275 | 406 | |
| rob.meades@u-blox.com | 1:26a67ab07275 | 407 | memcpy(&_loc[a], &_loc[CELL_MAX_HYP - 1], sizeof(*_loc)); |
| rob.meades@u-blox.com | 1:26a67ab07275 | 408 | |
| rob.meades@u-blox.com | 1:26a67ab07275 | 409 | _loc[a].sensor = (b == 0) ? CELL_LAST : (b == 1) ? CELL_GNSS : |
| rob.meades@u-blox.com | 1:26a67ab07275 | 410 | (b == 2) ? CELL_LOCATE : (b == 3) ? CELL_HYBRID : CELL_LAST; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 411 | _loc[a].time.tm_year -= 1900; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 412 | _loc[a].time.tm_mon -= 1; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 413 | _loc[a].time.tm_wday = 0; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 414 | _loc[a].time.tm_yday = 0; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 415 | _loc[a].speed = 0; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 416 | _loc[a].direction = 0; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 417 | _loc[a].verticalAcc = 0; |
| rob.meades@u-blox.com | 1:26a67ab07275 | 418 | _loc[a].svUsed = 0; |
| RobMeades | 4:39acbc0111eb | 419 | // Uncertainty can appear as 4294967, which is |
| RobMeades | 4:39acbc0111eb | 420 | // (2^32 - 1) / 1000, or -1. Since it is confusing |
| RobMeades | 4:39acbc0111eb | 421 | // for the user to get a large positive number instead |
| RobMeades | 4:39acbc0111eb | 422 | // of 0 -1, set it to -1 in th1s case. |
| RobMeades | 4:39acbc0111eb | 423 | if (_loc[a].uncertainty == 4294967) { |
| RobMeades | 4:39acbc0111eb | 424 | _loc[a].uncertainty = -1; |
| RobMeades | 4:39acbc0111eb | 425 | } |
| RobMeades | 0:0b75e22c9231 | 426 | _loc[a].validData = true; |
| RobMeades | 0:0b75e22c9231 | 427 | _locRcvPos++; |
| RobMeades | 0:0b75e22c9231 | 428 | } |
| RobMeades | 0:0b75e22c9231 | 429 | } |
| RobMeades | 0:0b75e22c9231 | 430 | } |
| RobMeades | 0:0b75e22c9231 | 431 | } |
| RobMeades | 0:0b75e22c9231 | 432 | |
| RobMeades | 0:0b75e22c9231 | 433 | /********************************************************************** |
| RobMeades | 0:0b75e22c9231 | 434 | * PUBLIC METHODS: GENERAL |
| RobMeades | 0:0b75e22c9231 | 435 | **********************************************************************/ |
| RobMeades | 0:0b75e22c9231 | 436 | |
| RobMeades | 0:0b75e22c9231 | 437 | // Constructor. |
| RobMeades | 0:0b75e22c9231 | 438 | UbloxATCellularInterfaceExt::UbloxATCellularInterfaceExt(PinName tx, |
| RobMeades | 0:0b75e22c9231 | 439 | PinName rx, |
| RobMeades | 0:0b75e22c9231 | 440 | int baud, |
| RobMeades | 0:0b75e22c9231 | 441 | bool debugOn): |
| RobMeades | 0:0b75e22c9231 | 442 | UbloxATCellularInterface(tx, rx, baud, debugOn) |
| RobMeades | 0:0b75e22c9231 | 443 | { |
| RobMeades | 0:0b75e22c9231 | 444 | // Zero HTTP stuff |
| RobMeades | 0:0b75e22c9231 | 445 | memset(_httpProfiles, 0, sizeof(_httpProfiles)); |
| RobMeades | 0:0b75e22c9231 | 446 | for (unsigned int profile = 0; profile < sizeof(_httpProfiles) / sizeof(_httpProfiles[0]); |
| RobMeades | 0:0b75e22c9231 | 447 | profile++) { |
| RobMeades | 0:0b75e22c9231 | 448 | _httpProfiles[profile].modemHandle = HTTP_PROF_UNUSED; |
| RobMeades | 0:0b75e22c9231 | 449 | } |
| RobMeades | 0:0b75e22c9231 | 450 | |
| RobMeades | 0:0b75e22c9231 | 451 | // Zero FTP stuff |
| RobMeades | 0:0b75e22c9231 | 452 | _ftpTimeout = TIMEOUT_BLOCKING; |
| RobMeades | 0:0b75e22c9231 | 453 | _lastFtpOpCodeResult = FTP_OP_CODE_UNUSED; |
| RobMeades | 0:0b75e22c9231 | 454 | _lastFtpResult = 0; |
| RobMeades | 0:0b75e22c9231 | 455 | _lastFtpOpCodeData = FTP_OP_CODE_UNUSED; |
| RobMeades | 0:0b75e22c9231 | 456 | _ftpBuf = NULL; |
| RobMeades | 0:0b75e22c9231 | 457 | _ftpBufLen = 0; |
| RobMeades | 0:0b75e22c9231 | 458 | _ftpError.eClass = 0; |
| RobMeades | 0:0b75e22c9231 | 459 | _ftpError.eCode = 0; |
| RobMeades | 0:0b75e22c9231 | 460 | |
| RobMeades | 0:0b75e22c9231 | 461 | // Zero Cell Locate stuff |
| RobMeades | 0:0b75e22c9231 | 462 | _locRcvPos = 0; |
| RobMeades | 0:0b75e22c9231 | 463 | _locExpPos = 0; |
| RobMeades | 0:0b75e22c9231 | 464 | |
| RobMeades | 0:0b75e22c9231 | 465 | // URC handler for HTTP |
| RobMeades | 0:0b75e22c9231 | 466 | _at->oob("+UUHTTPCR", callback(this, &UbloxATCellularInterfaceExt::UUHTTPCR_URC)); |
| RobMeades | 0:0b75e22c9231 | 467 | |
| RobMeades | 0:0b75e22c9231 | 468 | // URC handlers for FTP |
| RobMeades | 0:0b75e22c9231 | 469 | _at->oob("+UUFTPCR", callback(this, &UbloxATCellularInterfaceExt::UUFTPCR_URC)); |
| RobMeades | 0:0b75e22c9231 | 470 | _at->oob("+UUFTPCD", callback(this, &UbloxATCellularInterfaceExt::UUFTPCD_URC)); |
| RobMeades | 0:0b75e22c9231 | 471 | |
| RobMeades | 0:0b75e22c9231 | 472 | // URC handlers for Cell Locate |
| RobMeades | 4:39acbc0111eb | 473 | _at->oob("+UULOCIND:", callback(this, &UbloxATCellularInterfaceExt::UULOCIND_URC)); |
| RobMeades | 4:39acbc0111eb | 474 | _at->oob("+UULOC:", callback(this, &UbloxATCellularInterfaceExt::UULOC_URC)); |
| RobMeades | 0:0b75e22c9231 | 475 | } |
| RobMeades | 0:0b75e22c9231 | 476 | |
| RobMeades | 0:0b75e22c9231 | 477 | // Destructor. |
| RobMeades | 0:0b75e22c9231 | 478 | UbloxATCellularInterfaceExt::~UbloxATCellularInterfaceExt() |
| RobMeades | 0:0b75e22c9231 | 479 | { |
| RobMeades | 0:0b75e22c9231 | 480 | } |
| RobMeades | 0:0b75e22c9231 | 481 | |
| RobMeades | 0:0b75e22c9231 | 482 | /********************************************************************** |
| RobMeades | 0:0b75e22c9231 | 483 | * PUBLIC METHODS: HTTP |
| RobMeades | 0:0b75e22c9231 | 484 | **********************************************************************/ |
| RobMeades | 0:0b75e22c9231 | 485 | |
| RobMeades | 0:0b75e22c9231 | 486 | // Find a free profile. |
| RobMeades | 0:0b75e22c9231 | 487 | int UbloxATCellularInterfaceExt::httpAllocProfile() |
| RobMeades | 0:0b75e22c9231 | 488 | { |
| RobMeades | 0:0b75e22c9231 | 489 | int profile = HTTP_PROF_UNUSED; |
| RobMeades | 0:0b75e22c9231 | 490 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 491 | |
| RobMeades | 0:0b75e22c9231 | 492 | // Find a free HTTP profile |
| RobMeades | 0:0b75e22c9231 | 493 | profile = findProfile(); |
| RobMeades | 0:0b75e22c9231 | 494 | debug_if(_debug_trace_on, "httpFindProfile: profile is %d\n", profile); |
| RobMeades | 0:0b75e22c9231 | 495 | |
| RobMeades | 0:0b75e22c9231 | 496 | if (profile != HTTP_PROF_UNUSED) { |
| RobMeades | 0:0b75e22c9231 | 497 | _httpProfiles[profile].modemHandle = 1; |
| RobMeades | 0:0b75e22c9231 | 498 | _httpProfiles[profile].timeout = TIMEOUT_BLOCKING; |
| RobMeades | 0:0b75e22c9231 | 499 | _httpProfiles[profile].pending = false; |
| RobMeades | 0:0b75e22c9231 | 500 | _httpProfiles[profile].cmd = -1; |
| RobMeades | 0:0b75e22c9231 | 501 | _httpProfiles[profile].result = -1; |
| RobMeades | 0:0b75e22c9231 | 502 | } |
| RobMeades | 0:0b75e22c9231 | 503 | |
| RobMeades | 0:0b75e22c9231 | 504 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 505 | return profile; |
| RobMeades | 0:0b75e22c9231 | 506 | } |
| RobMeades | 0:0b75e22c9231 | 507 | |
| RobMeades | 0:0b75e22c9231 | 508 | // Free a profile. |
| RobMeades | 0:0b75e22c9231 | 509 | bool UbloxATCellularInterfaceExt::httpFreeProfile(int profile) |
| RobMeades | 0:0b75e22c9231 | 510 | { |
| RobMeades | 0:0b75e22c9231 | 511 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 512 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 513 | |
| RobMeades | 0:0b75e22c9231 | 514 | if (IS_PROFILE(profile)) { |
| RobMeades | 0:0b75e22c9231 | 515 | debug_if(_debug_trace_on, "httpFreeProfile(%d)\n", profile); |
| RobMeades | 0:0b75e22c9231 | 516 | _httpProfiles[profile].modemHandle = HTTP_PROF_UNUSED; |
| RobMeades | 0:0b75e22c9231 | 517 | _httpProfiles[profile].timeout = TIMEOUT_BLOCKING; |
| RobMeades | 0:0b75e22c9231 | 518 | _httpProfiles[profile].pending = false; |
| RobMeades | 0:0b75e22c9231 | 519 | _httpProfiles[profile].cmd = -1; |
| RobMeades | 0:0b75e22c9231 | 520 | _httpProfiles[profile].result = -1; |
| RobMeades | 0:0b75e22c9231 | 521 | success = _at->send("AT+UHTTP=%d", profile) && _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 522 | } |
| RobMeades | 0:0b75e22c9231 | 523 | |
| RobMeades | 0:0b75e22c9231 | 524 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 525 | return success; |
| RobMeades | 0:0b75e22c9231 | 526 | } |
| RobMeades | 0:0b75e22c9231 | 527 | |
| RobMeades | 0:0b75e22c9231 | 528 | // Set the blocking/timeout state of a profile. |
| RobMeades | 0:0b75e22c9231 | 529 | bool UbloxATCellularInterfaceExt::httpSetTimeout(int profile, int timeout) |
| RobMeades | 0:0b75e22c9231 | 530 | { |
| RobMeades | 0:0b75e22c9231 | 531 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 532 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 533 | |
| RobMeades | 0:0b75e22c9231 | 534 | debug_if(_debug_trace_on, "httpSetTimeout(%d, %d)\n", profile, timeout); |
| RobMeades | 0:0b75e22c9231 | 535 | |
| RobMeades | 0:0b75e22c9231 | 536 | if (IS_PROFILE(profile)) { |
| RobMeades | 0:0b75e22c9231 | 537 | _httpProfiles[profile].timeout = timeout; |
| RobMeades | 0:0b75e22c9231 | 538 | success = true; |
| RobMeades | 0:0b75e22c9231 | 539 | } |
| RobMeades | 0:0b75e22c9231 | 540 | |
| RobMeades | 0:0b75e22c9231 | 541 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 542 | return success; |
| RobMeades | 0:0b75e22c9231 | 543 | } |
| RobMeades | 0:0b75e22c9231 | 544 | |
| RobMeades | 0:0b75e22c9231 | 545 | // Set a profile back to defaults. |
| RobMeades | 0:0b75e22c9231 | 546 | bool UbloxATCellularInterfaceExt::httpResetProfile(int httpProfile) |
| RobMeades | 0:0b75e22c9231 | 547 | { |
| RobMeades | 0:0b75e22c9231 | 548 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 549 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 550 | |
| RobMeades | 0:0b75e22c9231 | 551 | debug_if(_debug_trace_on, "httpResetProfile(%d)\n", httpProfile); |
| RobMeades | 0:0b75e22c9231 | 552 | success = _at->send("AT+UHTTP=%d", httpProfile) && _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 553 | |
| RobMeades | 0:0b75e22c9231 | 554 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 555 | return success; |
| RobMeades | 0:0b75e22c9231 | 556 | } |
| RobMeades | 0:0b75e22c9231 | 557 | |
| RobMeades | 0:0b75e22c9231 | 558 | // Set HTTP parameters. |
| RobMeades | 0:0b75e22c9231 | 559 | bool UbloxATCellularInterfaceExt::httpSetPar(int httpProfile, |
| RobMeades | 0:0b75e22c9231 | 560 | HttpOpCode httpOpCode, |
| RobMeades | 0:0b75e22c9231 | 561 | const char * httpInPar) |
| RobMeades | 0:0b75e22c9231 | 562 | { |
| RobMeades | 0:0b75e22c9231 | 563 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 564 | int httpInParNum = 0; |
| RobMeades | 0:0b75e22c9231 | 565 | SocketAddress address; |
| RobMeades | 0:0b75e22c9231 | 566 | |
| RobMeades | 0:0b75e22c9231 | 567 | debug_if(_debug_trace_on, "httpSetPar(%d, %d, \"%s\")\n", httpProfile, httpOpCode, httpInPar); |
| RobMeades | 0:0b75e22c9231 | 568 | if (IS_PROFILE(httpProfile)) { |
| RobMeades | 0:0b75e22c9231 | 569 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 570 | |
| RobMeades | 0:0b75e22c9231 | 571 | switch(httpOpCode) { |
| RobMeades | 0:0b75e22c9231 | 572 | case HTTP_IP_ADDRESS: // 0 |
| RobMeades | 0:0b75e22c9231 | 573 | if (gethostbyname(httpInPar, &address) == NSAPI_ERROR_OK) { |
| RobMeades | 0:0b75e22c9231 | 574 | success = _at->send("AT+UHTTP=%d,%d,\"%s\"", |
| RobMeades | 0:0b75e22c9231 | 575 | httpProfile, httpOpCode, address.get_ip_address()) && |
| RobMeades | 0:0b75e22c9231 | 576 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 577 | } |
| RobMeades | 0:0b75e22c9231 | 578 | break; |
| RobMeades | 0:0b75e22c9231 | 579 | case HTTP_SERVER_NAME: // 1 |
| RobMeades | 0:0b75e22c9231 | 580 | case HTTP_USER_NAME: // 2 |
| RobMeades | 0:0b75e22c9231 | 581 | case HTTP_PASSWORD: // 3 |
| RobMeades | 0:0b75e22c9231 | 582 | success = _at->send("AT+UHTTP=%d,%d,\"%s\"", httpProfile, httpOpCode, httpInPar) && |
| RobMeades | 0:0b75e22c9231 | 583 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 584 | break; |
| RobMeades | 0:0b75e22c9231 | 585 | |
| RobMeades | 0:0b75e22c9231 | 586 | case HTTP_AUTH_TYPE: // 4 |
| RobMeades | 0:0b75e22c9231 | 587 | case HTTP_SERVER_PORT: // 5 |
| RobMeades | 0:0b75e22c9231 | 588 | httpInParNum = atoi(httpInPar); |
| RobMeades | 0:0b75e22c9231 | 589 | success = _at->send("AT+UHTTP=%d,%d,%d", httpProfile, httpOpCode, httpInParNum) && |
| RobMeades | 0:0b75e22c9231 | 590 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 591 | break; |
| RobMeades | 0:0b75e22c9231 | 592 | |
| RobMeades | 0:0b75e22c9231 | 593 | case HTTP_SECURE: // 6 |
| RobMeades | 0:0b75e22c9231 | 594 | httpInParNum = atoi(httpInPar); |
| RobMeades | 0:0b75e22c9231 | 595 | success = _at->send("AT+UHTTP=%d,%d,%d", httpProfile, httpOpCode, httpInParNum) && |
| RobMeades | 0:0b75e22c9231 | 596 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 597 | break; |
| RobMeades | 0:0b75e22c9231 | 598 | |
| RobMeades | 0:0b75e22c9231 | 599 | default: |
| RobMeades | 0:0b75e22c9231 | 600 | debug_if(_debug_trace_on, "httpSetPar: unknown httpOpCode %d\n", httpOpCode); |
| RobMeades | 0:0b75e22c9231 | 601 | break; |
| RobMeades | 0:0b75e22c9231 | 602 | } |
| RobMeades | 0:0b75e22c9231 | 603 | |
| RobMeades | 0:0b75e22c9231 | 604 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 605 | } |
| RobMeades | 0:0b75e22c9231 | 606 | |
| RobMeades | 0:0b75e22c9231 | 607 | return success; |
| RobMeades | 0:0b75e22c9231 | 608 | } |
| RobMeades | 0:0b75e22c9231 | 609 | |
| RobMeades | 0:0b75e22c9231 | 610 | // Perform an HTTP command. |
| RobMeades | 0:0b75e22c9231 | 611 | UbloxATCellularInterfaceExt::Error * UbloxATCellularInterfaceExt::httpCommand(int httpProfile, |
| RobMeades | 0:0b75e22c9231 | 612 | HttpCmd httpCmd, |
| RobMeades | 0:0b75e22c9231 | 613 | const char *httpPath, |
| RobMeades | 0:0b75e22c9231 | 614 | const char *rspFile, |
| RobMeades | 0:0b75e22c9231 | 615 | const char *sendStr, |
| RobMeades | 0:0b75e22c9231 | 616 | int httpContentType, |
| RobMeades | 0:0b75e22c9231 | 617 | const char *httpCustomPar, |
| RobMeades | 0:0b75e22c9231 | 618 | char *buf, int len) |
| RobMeades | 0:0b75e22c9231 | 619 | { |
| RobMeades | 0:0b75e22c9231 | 620 | bool atSuccess = false; |
| RobMeades | 0:0b75e22c9231 | 621 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 622 | int at_timeout; |
| RobMeades | 0:0b75e22c9231 | 623 | char defaultFilename[] = "http_last_response_x"; |
| RobMeades | 0:0b75e22c9231 | 624 | |
| RobMeades | 0:0b75e22c9231 | 625 | debug_if(_debug_trace_on, "%s\n", getHttpCmd(httpCmd)); |
| RobMeades | 0:0b75e22c9231 | 626 | |
| RobMeades | 0:0b75e22c9231 | 627 | if (IS_PROFILE(httpProfile)) { |
| RobMeades | 0:0b75e22c9231 | 628 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 629 | at_timeout = _at_timeout; // Has to be inside LOCK()s |
| RobMeades | 0:0b75e22c9231 | 630 | |
| RobMeades | 0:0b75e22c9231 | 631 | if (rspFile == NULL) { |
| RobMeades | 0:0b75e22c9231 | 632 | sprintf(defaultFilename + sizeof (defaultFilename) - 2, "%1d", httpProfile); |
| RobMeades | 0:0b75e22c9231 | 633 | rspFile = defaultFilename; |
| RobMeades | 0:0b75e22c9231 | 634 | } |
| RobMeades | 0:0b75e22c9231 | 635 | |
| RobMeades | 0:0b75e22c9231 | 636 | switch (httpCmd) { |
| RobMeades | 0:0b75e22c9231 | 637 | case HTTP_HEAD: |
| RobMeades | 0:0b75e22c9231 | 638 | atSuccess = _at->send("AT+UHTTPC=%d,%d,\"%s\",\"%s\"", httpProfile, httpCmd, |
| RobMeades | 0:0b75e22c9231 | 639 | httpPath, rspFile) && |
| RobMeades | 0:0b75e22c9231 | 640 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 641 | break; |
| RobMeades | 0:0b75e22c9231 | 642 | case HTTP_GET: |
| RobMeades | 0:0b75e22c9231 | 643 | atSuccess = _at->send("AT+UHTTPC=%d,%d,\"%s\",\"%s\"", httpProfile, httpCmd, |
| RobMeades | 0:0b75e22c9231 | 644 | httpPath, rspFile) && |
| RobMeades | 0:0b75e22c9231 | 645 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 646 | break; |
| RobMeades | 0:0b75e22c9231 | 647 | case HTTP_DELETE: |
| RobMeades | 0:0b75e22c9231 | 648 | atSuccess = _at->send("AT+UHTTPC=%d,%d,\"%s\",\"%s\"", httpProfile, httpCmd, |
| RobMeades | 0:0b75e22c9231 | 649 | httpPath, rspFile) && |
| RobMeades | 0:0b75e22c9231 | 650 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 651 | break; |
| RobMeades | 0:0b75e22c9231 | 652 | case HTTP_PUT: |
| RobMeades | 0:0b75e22c9231 | 653 | // In this case the parameter sendStr is a filename |
| RobMeades | 0:0b75e22c9231 | 654 | atSuccess = _at->send("AT+UHTTPC=%d,%d,\"%s\",\"%s\",\"%s\"", httpProfile, httpCmd, |
| RobMeades | 0:0b75e22c9231 | 655 | httpPath, rspFile, sendStr) && |
| RobMeades | 0:0b75e22c9231 | 656 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 657 | break; |
| RobMeades | 0:0b75e22c9231 | 658 | case HTTP_POST_FILE: |
| RobMeades | 0:0b75e22c9231 | 659 | // In this case the parameter sendStr is a filename |
| RobMeades | 0:0b75e22c9231 | 660 | if (httpContentType != 6) { |
| RobMeades | 0:0b75e22c9231 | 661 | atSuccess = _at->send("AT+UHTTPC=%d,%d,\"%s\",\"%s\",\"%s\",%d", |
| RobMeades | 0:0b75e22c9231 | 662 | httpProfile, httpCmd, httpPath, rspFile, sendStr, |
| RobMeades | 0:0b75e22c9231 | 663 | httpContentType) && |
| RobMeades | 0:0b75e22c9231 | 664 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 665 | } else { |
| RobMeades | 0:0b75e22c9231 | 666 | atSuccess = _at->send("AT+UHTTPC=%d,%d,\"%s\",\"%s\",\"%s\",%d,%s", |
| RobMeades | 0:0b75e22c9231 | 667 | httpProfile, httpCmd, httpPath, rspFile, sendStr, |
| RobMeades | 0:0b75e22c9231 | 668 | httpContentType, |
| RobMeades | 0:0b75e22c9231 | 669 | httpCustomPar) && |
| RobMeades | 0:0b75e22c9231 | 670 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 671 | } |
| RobMeades | 0:0b75e22c9231 | 672 | break; |
| RobMeades | 0:0b75e22c9231 | 673 | case HTTP_POST_DATA: |
| RobMeades | 0:0b75e22c9231 | 674 | // In this case the parameter sendStr is a string containing data |
| RobMeades | 0:0b75e22c9231 | 675 | if (httpContentType != 6) { |
| RobMeades | 0:0b75e22c9231 | 676 | atSuccess = _at->send("AT+UHTTPC=%d,%d,\"%s\",\"%s\",\"%s\",%d", |
| RobMeades | 0:0b75e22c9231 | 677 | httpProfile, httpCmd, httpPath, rspFile, sendStr, |
| RobMeades | 0:0b75e22c9231 | 678 | httpContentType) && |
| RobMeades | 0:0b75e22c9231 | 679 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 680 | } else { |
| RobMeades | 0:0b75e22c9231 | 681 | atSuccess = _at->send("AT+UHTTPC=%d,%d,\"%s\",\"%s\",\"%s\",%d,%s", |
| RobMeades | 0:0b75e22c9231 | 682 | httpProfile, httpCmd, httpPath, rspFile, sendStr, |
| RobMeades | 0:0b75e22c9231 | 683 | httpContentType, |
| RobMeades | 0:0b75e22c9231 | 684 | httpCustomPar) && |
| RobMeades | 0:0b75e22c9231 | 685 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 686 | } |
| RobMeades | 0:0b75e22c9231 | 687 | break; |
| RobMeades | 0:0b75e22c9231 | 688 | default: |
| RobMeades | 0:0b75e22c9231 | 689 | debug_if(_debug_trace_on, "HTTP command not recognised\n"); |
| RobMeades | 0:0b75e22c9231 | 690 | break; |
| RobMeades | 0:0b75e22c9231 | 691 | } |
| RobMeades | 0:0b75e22c9231 | 692 | |
| RobMeades | 0:0b75e22c9231 | 693 | if (atSuccess) { |
| RobMeades | 0:0b75e22c9231 | 694 | Timer timer; |
| RobMeades | 0:0b75e22c9231 | 695 | |
| RobMeades | 0:0b75e22c9231 | 696 | at_set_timeout(1000); |
| RobMeades | 0:0b75e22c9231 | 697 | _httpProfiles[httpProfile].pending = true; |
| RobMeades | 0:0b75e22c9231 | 698 | _httpProfiles[httpProfile].result = -1; |
| RobMeades | 0:0b75e22c9231 | 699 | |
| RobMeades | 0:0b75e22c9231 | 700 | // Waiting for unsolicited result code |
| RobMeades | 0:0b75e22c9231 | 701 | timer.start(); |
| RobMeades | 0:0b75e22c9231 | 702 | while (_httpProfiles[httpProfile].pending) { |
| RobMeades | 0:0b75e22c9231 | 703 | if (_httpProfiles[httpProfile].result != -1) { |
| RobMeades | 0:0b75e22c9231 | 704 | // Received unsolicited: starting its analysis |
| RobMeades | 0:0b75e22c9231 | 705 | _httpProfiles[httpProfile].pending = false; |
| RobMeades | 0:0b75e22c9231 | 706 | if (_httpProfiles[httpProfile].result == 1) { |
| RobMeades | 0:0b75e22c9231 | 707 | // HTTP command successfully executed |
| RobMeades | 0:0b75e22c9231 | 708 | if (readFile(rspFile, buf, len) >= 0) { |
| RobMeades | 0:0b75e22c9231 | 709 | success = true; |
| RobMeades | 0:0b75e22c9231 | 710 | } |
| RobMeades | 0:0b75e22c9231 | 711 | } else { |
| RobMeades | 0:0b75e22c9231 | 712 | // Retrieve the error class and code |
| RobMeades | 0:0b75e22c9231 | 713 | if (_at->send("AT+UHTTPER=%d", httpProfile) && |
| RobMeades | 0:0b75e22c9231 | 714 | _at->recv("AT+UHTTPER=%*d,%d,%d", |
| RobMeades | 0:0b75e22c9231 | 715 | &(_httpProfiles[httpProfile].httpError.eClass), |
| RobMeades | 0:0b75e22c9231 | 716 | &(_httpProfiles[httpProfile].httpError.eCode)) && |
| RobMeades | 0:0b75e22c9231 | 717 | _at->recv("OK")) { |
| RobMeades | 0:0b75e22c9231 | 718 | debug_if(_debug_trace_on, "HTTP error class %d, code %d\n", |
| RobMeades | 0:0b75e22c9231 | 719 | _httpProfiles[httpProfile].httpError.eClass, |
| RobMeades | 0:0b75e22c9231 | 720 | _httpProfiles[httpProfile].httpError.eCode); |
| RobMeades | 0:0b75e22c9231 | 721 | } |
| RobMeades | 0:0b75e22c9231 | 722 | } |
| RobMeades | 0:0b75e22c9231 | 723 | } else if (!TIMEOUT(timer, _httpProfiles[httpProfile].timeout)) { |
| RobMeades | 0:0b75e22c9231 | 724 | // Wait for URCs |
| RobMeades | 0:0b75e22c9231 | 725 | _at->recv(UNNATURAL_STRING); |
| RobMeades | 0:0b75e22c9231 | 726 | } else { |
| RobMeades | 0:0b75e22c9231 | 727 | _httpProfiles[httpProfile].pending = false; |
| RobMeades | 0:0b75e22c9231 | 728 | } |
| RobMeades | 0:0b75e22c9231 | 729 | } |
| RobMeades | 0:0b75e22c9231 | 730 | timer.stop(); |
| RobMeades | 0:0b75e22c9231 | 731 | |
| RobMeades | 0:0b75e22c9231 | 732 | at_set_timeout(at_timeout); |
| RobMeades | 0:0b75e22c9231 | 733 | |
| RobMeades | 0:0b75e22c9231 | 734 | if (!success) { |
| RobMeades | 0:0b75e22c9231 | 735 | debug_if(_debug_trace_on, "%s: ERROR\n", getHttpCmd(httpCmd)); |
| RobMeades | 0:0b75e22c9231 | 736 | } |
| RobMeades | 0:0b75e22c9231 | 737 | |
| RobMeades | 0:0b75e22c9231 | 738 | } |
| RobMeades | 0:0b75e22c9231 | 739 | |
| RobMeades | 0:0b75e22c9231 | 740 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 741 | } |
| RobMeades | 0:0b75e22c9231 | 742 | |
| RobMeades | 0:0b75e22c9231 | 743 | return success ? NULL : &(_httpProfiles[httpProfile].httpError); |
| RobMeades | 0:0b75e22c9231 | 744 | } |
| RobMeades | 0:0b75e22c9231 | 745 | |
| RobMeades | 0:0b75e22c9231 | 746 | /********************************************************************** |
| RobMeades | 0:0b75e22c9231 | 747 | * PUBLIC METHODS: FTP |
| RobMeades | 0:0b75e22c9231 | 748 | **********************************************************************/ |
| RobMeades | 0:0b75e22c9231 | 749 | |
| RobMeades | 0:0b75e22c9231 | 750 | // Set the blocking/timeout for FTP. |
| RobMeades | 0:0b75e22c9231 | 751 | bool UbloxATCellularInterfaceExt::ftpSetTimeout(int timeout) |
| RobMeades | 0:0b75e22c9231 | 752 | { |
| RobMeades | 0:0b75e22c9231 | 753 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 754 | debug_if(_debug_trace_on, "ftpSetTimeout(%d)\n", timeout); |
| RobMeades | 0:0b75e22c9231 | 755 | _ftpTimeout = timeout; |
| RobMeades | 0:0b75e22c9231 | 756 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 757 | |
| RobMeades | 0:0b75e22c9231 | 758 | return true; |
| RobMeades | 0:0b75e22c9231 | 759 | } |
| RobMeades | 0:0b75e22c9231 | 760 | |
| RobMeades | 0:0b75e22c9231 | 761 | // Reset the FTP configuration back to defaults. |
| RobMeades | 0:0b75e22c9231 | 762 | bool UbloxATCellularInterfaceExt::ftpResetPar() |
| RobMeades | 0:0b75e22c9231 | 763 | { |
| RobMeades | 0:0b75e22c9231 | 764 | bool success = true; |
| RobMeades | 0:0b75e22c9231 | 765 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 766 | |
| RobMeades | 0:0b75e22c9231 | 767 | debug_if(_debug_trace_on, "ftpResetPar()\n"); |
| RobMeades | 0:0b75e22c9231 | 768 | for (int x = 0; success && (x < NUM_FTP_OP_CODES); x++) { |
| RobMeades | 0:0b75e22c9231 | 769 | success = _at->send("AT+UFTP=%d", x) && _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 770 | } |
| RobMeades | 0:0b75e22c9231 | 771 | |
| RobMeades | 0:0b75e22c9231 | 772 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 773 | return success; |
| RobMeades | 0:0b75e22c9231 | 774 | } |
| RobMeades | 0:0b75e22c9231 | 775 | |
| RobMeades | 0:0b75e22c9231 | 776 | // Set FTP parameters. |
| RobMeades | 0:0b75e22c9231 | 777 | bool UbloxATCellularInterfaceExt::ftpSetPar(FtpOpCode ftpOpCode, |
| RobMeades | 0:0b75e22c9231 | 778 | const char * ftpInPar) |
| RobMeades | 0:0b75e22c9231 | 779 | { |
| RobMeades | 0:0b75e22c9231 | 780 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 781 | int ftpInParNum = 0; |
| RobMeades | 0:0b75e22c9231 | 782 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 783 | |
| RobMeades | 0:0b75e22c9231 | 784 | debug_if(_debug_trace_on, "ftpSetPar(%d, %s)\n", ftpOpCode, ftpInPar); |
| RobMeades | 0:0b75e22c9231 | 785 | switch (ftpOpCode) { |
| RobMeades | 0:0b75e22c9231 | 786 | case FTP_IP_ADDRESS: // 0 |
| RobMeades | 0:0b75e22c9231 | 787 | case FTP_SERVER_NAME: // 1 |
| RobMeades | 0:0b75e22c9231 | 788 | case FTP_USER_NAME: // 2 |
| RobMeades | 0:0b75e22c9231 | 789 | case FTP_PASSWORD: // 3 |
| RobMeades | 0:0b75e22c9231 | 790 | case FTP_ACCOUNT: // 4 |
| RobMeades | 0:0b75e22c9231 | 791 | success = _at->send("AT+UFTP=%d,\"%s\"", ftpOpCode, ftpInPar) && |
| RobMeades | 0:0b75e22c9231 | 792 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 793 | break; |
| RobMeades | 0:0b75e22c9231 | 794 | case FTP_INACTIVITY_TIMEOUT: // 5 |
| RobMeades | 0:0b75e22c9231 | 795 | case FTP_MODE: // 6 |
| RobMeades | 0:0b75e22c9231 | 796 | case FTP_SERVER_PORT: // 7 |
| RobMeades | 0:0b75e22c9231 | 797 | case FTP_SECURE: // 8 |
| RobMeades | 0:0b75e22c9231 | 798 | ftpInParNum = atoi(ftpInPar); |
| RobMeades | 0:0b75e22c9231 | 799 | success = _at->send("AT+UFTP=%d,%d", ftpOpCode, ftpInParNum) && |
| RobMeades | 0:0b75e22c9231 | 800 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 801 | break; |
| RobMeades | 0:0b75e22c9231 | 802 | default: |
| RobMeades | 0:0b75e22c9231 | 803 | debug_if(_debug_trace_on, "ftpSetPar: unknown ftpOpCode %d\n", ftpOpCode); |
| RobMeades | 0:0b75e22c9231 | 804 | break; |
| RobMeades | 0:0b75e22c9231 | 805 | } |
| RobMeades | 0:0b75e22c9231 | 806 | |
| RobMeades | 0:0b75e22c9231 | 807 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 808 | return success; |
| RobMeades | 0:0b75e22c9231 | 809 | } |
| RobMeades | 0:0b75e22c9231 | 810 | |
| RobMeades | 0:0b75e22c9231 | 811 | // Perform an FTP command. |
| RobMeades | 0:0b75e22c9231 | 812 | UbloxATCellularInterfaceExt::Error * UbloxATCellularInterfaceExt::ftpCommand(FtpCmd ftpCmd, |
| RobMeades | 0:0b75e22c9231 | 813 | const char* file1, |
| RobMeades | 0:0b75e22c9231 | 814 | const char* file2, |
| RobMeades | 0:0b75e22c9231 | 815 | int offset, |
| RobMeades | 0:0b75e22c9231 | 816 | char* buf, int len) |
| RobMeades | 0:0b75e22c9231 | 817 | { |
| RobMeades | 0:0b75e22c9231 | 818 | bool atSuccess = false; |
| RobMeades | 0:0b75e22c9231 | 819 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 820 | int at_timeout; |
| RobMeades | 0:0b75e22c9231 | 821 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 822 | at_timeout = _at_timeout; // Has to be inside LOCK()s |
| RobMeades | 0:0b75e22c9231 | 823 | |
| RobMeades | 0:0b75e22c9231 | 824 | debug_if(_debug_trace_on, "%s\n", getFtpCmd(ftpCmd)); |
| RobMeades | 0:0b75e22c9231 | 825 | switch (ftpCmd) { |
| RobMeades | 0:0b75e22c9231 | 826 | case FTP_LOGOUT: |
| RobMeades | 0:0b75e22c9231 | 827 | case FTP_LOGIN: |
| RobMeades | 0:0b75e22c9231 | 828 | atSuccess = _at->send("AT+UFTPC=%d", ftpCmd) && _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 829 | break; |
| RobMeades | 0:0b75e22c9231 | 830 | case FTP_DELETE_FILE: |
| RobMeades | 0:0b75e22c9231 | 831 | case FTP_CD: |
| RobMeades | 0:0b75e22c9231 | 832 | case FTP_MKDIR: |
| RobMeades | 0:0b75e22c9231 | 833 | case FTP_RMDIR: |
| RobMeades | 0:0b75e22c9231 | 834 | case FTP_FOTA_FILE: |
| RobMeades | 0:0b75e22c9231 | 835 | atSuccess = _at->send("AT+UFTPC=%d,\"%s\"", ftpCmd, file1) && |
| RobMeades | 0:0b75e22c9231 | 836 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 837 | break; |
| RobMeades | 0:0b75e22c9231 | 838 | case FTP_RENAME_FILE: |
| RobMeades | 0:0b75e22c9231 | 839 | atSuccess = _at->send("AT+UFTPC=%d,\"%s\",\"%s\"", |
| RobMeades | 0:0b75e22c9231 | 840 | ftpCmd, file1, file2) && |
| RobMeades | 0:0b75e22c9231 | 841 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 842 | break; |
| RobMeades | 0:0b75e22c9231 | 843 | case FTP_GET_FILE: |
| RobMeades | 0:0b75e22c9231 | 844 | case FTP_PUT_FILE: |
| RobMeades | 0:0b75e22c9231 | 845 | if (file2 == NULL) { |
| RobMeades | 0:0b75e22c9231 | 846 | file2 = file1; |
| RobMeades | 0:0b75e22c9231 | 847 | } |
| RobMeades | 0:0b75e22c9231 | 848 | atSuccess = _at->send("AT+UFTPC=%d,\"%s\",\"%s\",%d", |
| RobMeades | 0:0b75e22c9231 | 849 | ftpCmd, file1, file2, offset) && |
| RobMeades | 0:0b75e22c9231 | 850 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 851 | break; |
| RobMeades | 0:0b75e22c9231 | 852 | case FTP_FILE_INFO: |
| RobMeades | 0:0b75e22c9231 | 853 | case FTP_LS: |
| RobMeades | 0:0b75e22c9231 | 854 | _ftpBuf = buf; |
| RobMeades | 0:0b75e22c9231 | 855 | _ftpBufLen = len; |
| RobMeades | 0:0b75e22c9231 | 856 | // Add a terminator in case nothing comes back |
| RobMeades | 0:0b75e22c9231 | 857 | if (_ftpBufLen > 0) { |
| RobMeades | 0:0b75e22c9231 | 858 | *_ftpBuf = 0; |
| RobMeades | 0:0b75e22c9231 | 859 | } |
| RobMeades | 0:0b75e22c9231 | 860 | if (file1 == NULL) { |
| RobMeades | 0:0b75e22c9231 | 861 | atSuccess = _at->send("AT+UFTPC=%d", ftpCmd) && |
| RobMeades | 0:0b75e22c9231 | 862 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 863 | } else { |
| RobMeades | 0:0b75e22c9231 | 864 | atSuccess = _at->send("AT+UFTPC=%d,\"%s\"", ftpCmd, file1) && |
| RobMeades | 0:0b75e22c9231 | 865 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 866 | } |
| RobMeades | 0:0b75e22c9231 | 867 | break; |
| RobMeades | 0:0b75e22c9231 | 868 | default: |
| RobMeades | 0:0b75e22c9231 | 869 | debug_if(_debug_trace_on, "FTP command not recognised/supported\n"); |
| RobMeades | 0:0b75e22c9231 | 870 | break; |
| RobMeades | 0:0b75e22c9231 | 871 | } |
| RobMeades | 0:0b75e22c9231 | 872 | |
| RobMeades | 0:0b75e22c9231 | 873 | // Wait for the result to arrive back |
| RobMeades | 0:0b75e22c9231 | 874 | if (atSuccess) { |
| RobMeades | 0:0b75e22c9231 | 875 | Timer timer; |
| RobMeades | 0:0b75e22c9231 | 876 | |
| RobMeades | 0:0b75e22c9231 | 877 | at_set_timeout(1000); |
| RobMeades | 0:0b75e22c9231 | 878 | _lastFtpOpCodeData = FTP_OP_CODE_UNUSED; |
| RobMeades | 0:0b75e22c9231 | 879 | _lastFtpOpCodeResult = FTP_OP_CODE_UNUSED; |
| RobMeades | 0:0b75e22c9231 | 880 | _lastFtpResult = -1; // just for safety |
| RobMeades | 0:0b75e22c9231 | 881 | // Waiting for result to arrive |
| RobMeades | 0:0b75e22c9231 | 882 | timer.start(); |
| RobMeades | 0:0b75e22c9231 | 883 | while ((_lastFtpOpCodeResult == FTP_OP_CODE_UNUSED) && |
| RobMeades | 0:0b75e22c9231 | 884 | !TIMEOUT(timer, _ftpTimeout)) { |
| RobMeades | 0:0b75e22c9231 | 885 | _at->recv(UNNATURAL_STRING); |
| RobMeades | 0:0b75e22c9231 | 886 | } |
| RobMeades | 0:0b75e22c9231 | 887 | timer.stop(); |
| RobMeades | 0:0b75e22c9231 | 888 | |
| RobMeades | 0:0b75e22c9231 | 889 | if ((_lastFtpOpCodeResult == ftpCmd) && (_lastFtpResult == 1)) { |
| RobMeades | 0:0b75e22c9231 | 890 | // Got a result for our FTP op code and it is good |
| RobMeades | 0:0b75e22c9231 | 891 | success = true; |
| RobMeades | 0:0b75e22c9231 | 892 | } else { |
| RobMeades | 0:0b75e22c9231 | 893 | // Retrieve the error class and code |
| RobMeades | 0:0b75e22c9231 | 894 | if (_at->send("AT+UFTPER") && |
| RobMeades | 0:0b75e22c9231 | 895 | _at->recv("+UFTPER:%d,%d", &(_ftpError.eClass), &(_ftpError.eCode)) && |
| RobMeades | 0:0b75e22c9231 | 896 | _at->recv("OK")) { |
| RobMeades | 0:0b75e22c9231 | 897 | debug_if(_debug_trace_on, "FTP Error class %d, code %d\n", |
| RobMeades | 0:0b75e22c9231 | 898 | _ftpError.eClass, _ftpError.eCode); |
| RobMeades | 0:0b75e22c9231 | 899 | } |
| RobMeades | 0:0b75e22c9231 | 900 | } |
| RobMeades | 0:0b75e22c9231 | 901 | |
| RobMeades | 0:0b75e22c9231 | 902 | at_set_timeout(at_timeout); |
| RobMeades | 0:0b75e22c9231 | 903 | |
| RobMeades | 0:0b75e22c9231 | 904 | if (!success) { |
| RobMeades | 0:0b75e22c9231 | 905 | debug_if(_debug_trace_on, "%s: ERROR\n", getFtpCmd(ftpCmd)); |
| RobMeades | 0:0b75e22c9231 | 906 | } |
| RobMeades | 0:0b75e22c9231 | 907 | } |
| RobMeades | 0:0b75e22c9231 | 908 | |
| RobMeades | 0:0b75e22c9231 | 909 | // Set these back to nothing to stop the URC splatting |
| RobMeades | 0:0b75e22c9231 | 910 | _ftpBuf = NULL; |
| RobMeades | 0:0b75e22c9231 | 911 | _ftpBufLen = 0; |
| RobMeades | 0:0b75e22c9231 | 912 | |
| RobMeades | 0:0b75e22c9231 | 913 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 914 | return success ? NULL : &_ftpError; |
| RobMeades | 0:0b75e22c9231 | 915 | } |
| RobMeades | 0:0b75e22c9231 | 916 | |
| RobMeades | 0:0b75e22c9231 | 917 | /********************************************************************** |
| RobMeades | 0:0b75e22c9231 | 918 | * PUBLIC METHODS: Cell Locate |
| RobMeades | 0:0b75e22c9231 | 919 | **********************************************************************/ |
| RobMeades | 0:0b75e22c9231 | 920 | |
| RobMeades | 0:0b75e22c9231 | 921 | // Configure CellLocate TCP Aiding server. |
| RobMeades | 0:0b75e22c9231 | 922 | bool UbloxATCellularInterfaceExt::cellLocSrvTcp(const char* token, |
| RobMeades | 0:0b75e22c9231 | 923 | const char* server_1, |
| RobMeades | 0:0b75e22c9231 | 924 | const char* server_2, |
| RobMeades | 0:0b75e22c9231 | 925 | int days, int period, |
| RobMeades | 0:0b75e22c9231 | 926 | int resolution) |
| RobMeades | 0:0b75e22c9231 | 927 | { |
| RobMeades | 0:0b75e22c9231 | 928 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 929 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 930 | |
| RobMeades | 0:0b75e22c9231 | 931 | if ((_dev_info.dev == DEV_LISA_U2_03S) || (_dev_info.dev == DEV_SARA_U2)){ |
| RobMeades | 0:0b75e22c9231 | 932 | success = _at->send("AT+UGSRV=\"%s\",\"%s\",\"%s\",%d,%d,%d", |
| RobMeades | 0:0b75e22c9231 | 933 | server_1, server_2, token, days, period, resolution) && |
| RobMeades | 0:0b75e22c9231 | 934 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 935 | } |
| RobMeades | 0:0b75e22c9231 | 936 | |
| RobMeades | 0:0b75e22c9231 | 937 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 938 | return success; |
| RobMeades | 0:0b75e22c9231 | 939 | } |
| RobMeades | 0:0b75e22c9231 | 940 | |
| RobMeades | 0:0b75e22c9231 | 941 | // Configure CellLocate UDP Aiding server. |
| RobMeades | 0:0b75e22c9231 | 942 | bool UbloxATCellularInterfaceExt::cellLocSrvUdp(const char* server_1, |
| RobMeades | 0:0b75e22c9231 | 943 | int port, int latency, |
| RobMeades | 0:0b75e22c9231 | 944 | int mode) |
| RobMeades | 0:0b75e22c9231 | 945 | { |
| RobMeades | 0:0b75e22c9231 | 946 | |
| RobMeades | 0:0b75e22c9231 | 947 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 948 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 949 | |
| RobMeades | 0:0b75e22c9231 | 950 | if (_dev_info.dev != DEV_TOBY_L2) { |
| RobMeades | 0:0b75e22c9231 | 951 | success = _at->send("AT+UGAOP=\"%s\",%d,%d,%d", server_1, port, latency, mode) && |
| RobMeades | 0:0b75e22c9231 | 952 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 953 | } |
| RobMeades | 0:0b75e22c9231 | 954 | |
| RobMeades | 0:0b75e22c9231 | 955 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 956 | return success; |
| RobMeades | 0:0b75e22c9231 | 957 | } |
| RobMeades | 0:0b75e22c9231 | 958 | |
| RobMeades | 0:0b75e22c9231 | 959 | // Configure Cell Locate location sensor. |
| RobMeades | 0:0b75e22c9231 | 960 | bool UbloxATCellularInterfaceExt::cellLocConfig(int scanMode) |
| RobMeades | 0:0b75e22c9231 | 961 | { |
| RobMeades | 0:0b75e22c9231 | 962 | bool success; |
| RobMeades | 0:0b75e22c9231 | 963 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 964 | |
| RobMeades | 0:0b75e22c9231 | 965 | success = _at->send("AT+ULOCCELL=%d", scanMode) && |
| RobMeades | 0:0b75e22c9231 | 966 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 967 | |
| RobMeades | 0:0b75e22c9231 | 968 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 969 | return success; |
| RobMeades | 0:0b75e22c9231 | 970 | } |
| RobMeades | 0:0b75e22c9231 | 971 | |
| RobMeades | 0:0b75e22c9231 | 972 | // Request CellLocate. |
| RobMeades | 0:0b75e22c9231 | 973 | bool UbloxATCellularInterfaceExt::cellLocRequest(CellSensType sensor, |
| RobMeades | 0:0b75e22c9231 | 974 | int timeout, |
| RobMeades | 0:0b75e22c9231 | 975 | int accuracy, |
| RobMeades | 0:0b75e22c9231 | 976 | CellRespType type, |
| RobMeades | 0:0b75e22c9231 | 977 | int hypothesis) |
| RobMeades | 0:0b75e22c9231 | 978 | { |
| RobMeades | 0:0b75e22c9231 | 979 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 980 | |
| RobMeades | 0:0b75e22c9231 | 981 | if ((hypothesis <= CELL_MAX_HYP) && |
| RobMeades | 0:0b75e22c9231 | 982 | !((hypothesis > 1) && (type != CELL_MULTIHYP))) { |
| RobMeades | 0:0b75e22c9231 | 983 | |
| RobMeades | 0:0b75e22c9231 | 984 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 985 | |
| RobMeades | 0:0b75e22c9231 | 986 | _locRcvPos = 0; |
| RobMeades | 0:0b75e22c9231 | 987 | _locExpPos = 0; |
| RobMeades | 0:0b75e22c9231 | 988 | |
| RobMeades | 0:0b75e22c9231 | 989 | for (int i = 0; i < hypothesis; i++) { |
| RobMeades | 0:0b75e22c9231 | 990 | _loc[i].validData = false; |
| RobMeades | 0:0b75e22c9231 | 991 | } |
| RobMeades | 0:0b75e22c9231 | 992 | |
| RobMeades | 0:0b75e22c9231 | 993 | // Switch on the URC |
| RobMeades | 0:0b75e22c9231 | 994 | if (_at->send("AT+ULOCIND=1") && _at->recv("OK")) { |
| RobMeades | 0:0b75e22c9231 | 995 | // Switch on Cell Locate |
| RobMeades | 0:0b75e22c9231 | 996 | success = _at->send("AT+ULOC=2,%d,%d,%d,%d,%d", sensor, type, timeout, accuracy, hypothesis) && |
| RobMeades | 0:0b75e22c9231 | 997 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 998 | // Answers are picked up by the URC |
| RobMeades | 0:0b75e22c9231 | 999 | } |
| RobMeades | 0:0b75e22c9231 | 1000 | |
| RobMeades | 0:0b75e22c9231 | 1001 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 1002 | } |
| RobMeades | 0:0b75e22c9231 | 1003 | |
| RobMeades | 0:0b75e22c9231 | 1004 | return success; |
| RobMeades | 0:0b75e22c9231 | 1005 | } |
| RobMeades | 0:0b75e22c9231 | 1006 | |
| RobMeades | 0:0b75e22c9231 | 1007 | // Get a position record. |
| RobMeades | 0:0b75e22c9231 | 1008 | bool UbloxATCellularInterfaceExt::cellLocGetData(CellLocData *data, int index) |
| RobMeades | 0:0b75e22c9231 | 1009 | { |
| RobMeades | 0:0b75e22c9231 | 1010 | bool success = false; |
| RobMeades | 0:0b75e22c9231 | 1011 | |
| RobMeades | 0:0b75e22c9231 | 1012 | if (_loc[index].validData) { |
| RobMeades | 0:0b75e22c9231 | 1013 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 1014 | memcpy(data, &_loc[index], sizeof(*_loc)); |
| RobMeades | 0:0b75e22c9231 | 1015 | success = true; |
| RobMeades | 0:0b75e22c9231 | 1016 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 1017 | } |
| RobMeades | 0:0b75e22c9231 | 1018 | |
| RobMeades | 0:0b75e22c9231 | 1019 | return success; |
| RobMeades | 0:0b75e22c9231 | 1020 | } |
| RobMeades | 0:0b75e22c9231 | 1021 | |
| RobMeades | 0:0b75e22c9231 | 1022 | // Get number of position records received. |
| RobMeades | 0:0b75e22c9231 | 1023 | int UbloxATCellularInterfaceExt::cellLocGetRes() |
| RobMeades | 0:0b75e22c9231 | 1024 | { |
| RobMeades | 0:0b75e22c9231 | 1025 | int at_timeout; |
| RobMeades | 0:0b75e22c9231 | 1026 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 1027 | |
| RobMeades | 0:0b75e22c9231 | 1028 | at_timeout = _at_timeout; // Has to be inside LOCK()s |
| RobMeades | 0:0b75e22c9231 | 1029 | at_set_timeout(1000); |
| RobMeades | 0:0b75e22c9231 | 1030 | // Wait for URCs |
| RobMeades | 0:0b75e22c9231 | 1031 | _at->recv(UNNATURAL_STRING); |
| RobMeades | 0:0b75e22c9231 | 1032 | at_set_timeout(at_timeout); |
| RobMeades | 0:0b75e22c9231 | 1033 | |
| RobMeades | 0:0b75e22c9231 | 1034 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 1035 | return _locRcvPos; |
| RobMeades | 0:0b75e22c9231 | 1036 | } |
| RobMeades | 0:0b75e22c9231 | 1037 | |
| RobMeades | 0:0b75e22c9231 | 1038 | // Get number of positions records expected to be received. |
| RobMeades | 0:0b75e22c9231 | 1039 | int UbloxATCellularInterfaceExt::cellLocGetExpRes() |
| RobMeades | 0:0b75e22c9231 | 1040 | { |
| RobMeades | 0:0b75e22c9231 | 1041 | int numRecords = 0; |
| RobMeades | 0:0b75e22c9231 | 1042 | LOCK(); |
| RobMeades | 0:0b75e22c9231 | 1043 | |
| RobMeades | 0:0b75e22c9231 | 1044 | _at->recv("OK"); |
| RobMeades | 0:0b75e22c9231 | 1045 | |
| RobMeades | 0:0b75e22c9231 | 1046 | if (_locRcvPos > 0) { |
| RobMeades | 0:0b75e22c9231 | 1047 | numRecords = _locExpPos; |
| RobMeades | 0:0b75e22c9231 | 1048 | } |
| RobMeades | 0:0b75e22c9231 | 1049 | |
| RobMeades | 0:0b75e22c9231 | 1050 | UNLOCK(); |
| RobMeades | 0:0b75e22c9231 | 1051 | return numRecords; |
| RobMeades | 0:0b75e22c9231 | 1052 | } |
| RobMeades | 0:0b75e22c9231 | 1053 | |
| RobMeades | 0:0b75e22c9231 | 1054 | // End of file |
| RobMeades | 0:0b75e22c9231 | 1055 |