* add C027_Support fork

Fork of C027_Support by u-blox

Committer:
mazgch
Date:
Tue May 13 12:31:33 2014 +0000
Revision:
63:42cb563a25bc
Parent:
59:382695f1ce85
Child:
66:69072b3c5bca
some progress on UDP

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mazgch 17:296d94a006b4 1 #pragma once
mazgch 17:296d94a006b4 2
mazgch 17:296d94a006b4 3 #include "mbed.h"
mazgch 21:c4d64830bf02 4 #include <stdarg.h>
mazgch 21:c4d64830bf02 5
mazgch 18:e5697801df29 6 #include "Pipe.h"
mazgch 18:e5697801df29 7 #include "SerialPipe.h"
mazgch 17:296d94a006b4 8
mazgch 19:2b5d097ca15d 9 #ifdef TARGET_UBLOX_C027
mazgch 19:2b5d097ca15d 10 // if we detect the C027 platform we will assign the
mazgch 19:2b5d097ca15d 11 // default pinname and baudrate in the constructor
mazgch 19:2b5d097ca15d 12 // this helper macro will be used.
mazgch 19:2b5d097ca15d 13 #define _C027DEFAULT(name) = name
mazgch 19:2b5d097ca15d 14 #else
mazgch 19:2b5d097ca15d 15 #define _C027DEFAULT(name)
mazgch 19:2b5d097ca15d 16 #endif
mazgch 18:e5697801df29 17
mazgch 38:e6cab4632d84 18 /** basic modem parser class
mazgch 38:e6cab4632d84 19 */
mazgch 18:e5697801df29 20 class MDMParser
mazgch 18:e5697801df29 21 {
mazgch 18:e5697801df29 22 public:
mazgch 31:a0bed6c1e05d 23 //! Constructor
mazgch 35:9275215a3a5b 24 MDMParser();
mazgch 44:9d12223b78ff 25 //! get static instance
mazgch 44:9d12223b78ff 26 static MDMParser* getInstance() { return inst; };
mazgch 31:a0bed6c1e05d 27
mazgch 31:a0bed6c1e05d 28 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 29 // Types
mazgch 31:a0bed6c1e05d 30 // ----------------------------------------------------------------
mazgch 38:e6cab4632d84 31 //! MT Device Types
mazgch 38:e6cab4632d84 32 typedef enum { DEV_UNKNOWN, DEV_SARA_G350, DEV_LISA_U200, DEV_LISA_C200 } Dev;
mazgch 38:e6cab4632d84 33 //! SIM Status
mazgch 38:e6cab4632d84 34 typedef enum { SIM_UNKNOWN, SIM_PIN, SIM_READY } Sim;
mazgch 38:e6cab4632d84 35 //! SIM Status
mazgch 38:e6cab4632d84 36 typedef enum { LPM_DISABLED, LPM_ENABLED, LPM_ACTIVE, LPM_SLEEP } Lpm;
mazgch 38:e6cab4632d84 37 //! Device status
mazgch 33:fb8fb5021b09 38 typedef struct {
mazgch 34:3b3b7807c0c3 39 Dev dev; //!< Device Type
mazgch 35:9275215a3a5b 40 Lpm lpm; //!< Power Saving
mazgch 34:3b3b7807c0c3 41 Sim sim; //!< SIM Card Status
mazgch 34:3b3b7807c0c3 42 char ccid[20+1]; //!< Integrated Circuit Card ID
mazgch 34:3b3b7807c0c3 43 char imsi[15+1]; //!< International Mobile Station Identity
mazgch 34:3b3b7807c0c3 44 char imei[15+1]; //!< International Mobile Equipment Identity
mazgch 34:3b3b7807c0c3 45 char meid[18+1]; //!< Mobile Equipment IDentifier
mazgch 34:3b3b7807c0c3 46 char manu[16]; //!< Manufacturer (u-blox)
mazgch 34:3b3b7807c0c3 47 char model[16]; //!< Model Name (LISA-U200, LISA-C200 or SARA-G350)
mazgch 34:3b3b7807c0c3 48 char ver[16]; //!< Software Version
mazgch 38:e6cab4632d84 49 } DevStatus;
mazgch 38:e6cab4632d84 50 //! Registration Status
mazgch 38:e6cab4632d84 51 typedef enum { REG_UNKNOWN, REG_DENIED, REG_NONE, REG_HOME, REG_ROAMING } Reg;
mazgch 38:e6cab4632d84 52 //! Access Technology
mazgch 38:e6cab4632d84 53 typedef enum { ACT_UNKNOWN, ACT_GSM, ACT_EDGE, ACT_UTRAN, ACT_CDMA } AcT;
mazgch 38:e6cab4632d84 54 //! Network Status
mazgch 33:fb8fb5021b09 55 typedef struct {
mazgch 34:3b3b7807c0c3 56 Reg reg; //!< Registration Status
mazgch 34:3b3b7807c0c3 57 AcT act; //!< Access Technology
mazgch 34:3b3b7807c0c3 58 int rssi; //!< Received Signal Strength Indication (in dBm, range -113..-53)
mazgch 54:7ba8e4c218e2 59 int ber; //!< Bit Error Rate (BER), see 3GPP TS 45.008 [20] subclause 8.2.4
mazgch 34:3b3b7807c0c3 60 char opr[16+1]; //!< Operator Name
mazgch 34:3b3b7807c0c3 61 char num[32]; //!< Mobile Directory Number
mazgch 54:7ba8e4c218e2 62 unsigned short lac; //!< location area code in hexadecimal format (2 bytes in hex)
mazgch 54:7ba8e4c218e2 63 unsigned int ci; //!< Cell ID in hexadecimal format (2 to 4 bytes in hex)
mazgch 38:e6cab4632d84 64 } NetStatus;
mazgch 38:e6cab4632d84 65 //! An IP v4 address
mazgch 38:e6cab4632d84 66 typedef uint32_t IP;
mazgch 33:fb8fb5021b09 67 #define NOIP ((MDMParser::IP)0) //!< No IP address
mazgch 31:a0bed6c1e05d 68 // ip number formating and conversion
mazgch 31:a0bed6c1e05d 69 #define IPSTR "%d.%d.%d.%d"
mazgch 31:a0bed6c1e05d 70 #define IPNUM(ip) ((ip)>>24)&0xff, \
mazgch 31:a0bed6c1e05d 71 ((ip)>>16)&0xff, \
mazgch 31:a0bed6c1e05d 72 ((ip)>> 8)&0xff, \
mazgch 31:a0bed6c1e05d 73 ((ip)>> 0)&0xff
mazgch 31:a0bed6c1e05d 74 #define IPADR(a,b,c,d) ((((IP)(a))<<24) | \
mazgch 31:a0bed6c1e05d 75 (((IP)(b))<<16) | \
mazgch 31:a0bed6c1e05d 76 (((IP)(c))<< 8) | \
mazgch 31:a0bed6c1e05d 77 (((IP)(d))<< 0))
mazgch 31:a0bed6c1e05d 78
mazgch 31:a0bed6c1e05d 79
mazgch 31:a0bed6c1e05d 80 // ----------------------------------------------------------------
mazgch 57:869bd35f44cc 81 // Device
mazgch 31:a0bed6c1e05d 82 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 83
mazgch 57:869bd35f44cc 84 /** Combined Init, checkNetStatus, join suitable for simple applications
mazgch 57:869bd35f44cc 85 \param simpin a optional pin of the SIM card
mazgch 57:869bd35f44cc 86 \param apn the of the network provider e.g. "internet" or "apn.provider.com"
mazgch 57:869bd35f44cc 87 \param username is the user name text string for the authentication phase
mazgch 57:869bd35f44cc 88 \param password is the password text string for the authentication phase
mazgch 57:869bd35f44cc 89 \param dump set to true if you like to dump the status if successful
mazgch 57:869bd35f44cc 90 \return true if successful, false otherwise
mazgch 57:869bd35f44cc 91 */
mazgch 57:869bd35f44cc 92 bool connect(const char* simpin,
mazgch 57:869bd35f44cc 93 const char* apn, const char* username, const char* password,
mazgch 57:869bd35f44cc 94 bool dump);
mazgch 57:869bd35f44cc 95
mazgch 31:a0bed6c1e05d 96 /** register (Attach) the MT to the GPRS service.
mazgch 57:869bd35f44cc 97 \param simpin a optional pin of the SIM card
mazgch 31:a0bed6c1e05d 98 \param status an optional struture to with device information
mazgch 31:a0bed6c1e05d 99 \return true if successful, false otherwise
mazgch 31:a0bed6c1e05d 100 */
mazgch 57:869bd35f44cc 101 bool init(const char* simpin = NULL, DevStatus* status = NULL);
mazgch 31:a0bed6c1e05d 102
mazgch 31:a0bed6c1e05d 103 /** check if the network is available
mazgch 31:a0bed6c1e05d 104 \param status an optional structure to with network information
mazgch 31:a0bed6c1e05d 105 \return true if successful and connected to network, false otherwise
mazgch 31:a0bed6c1e05d 106 */
mazgch 31:a0bed6c1e05d 107 bool checkNetStatus(NetStatus* status = NULL);
mazgch 31:a0bed6c1e05d 108
mazgch 31:a0bed6c1e05d 109 /** Power off the MT, This function has to be called prior to
mazgch 31:a0bed6c1e05d 110 switching off the supply.
mazgch 31:a0bed6c1e05d 111 \return true if successfully, false otherwise
mazgch 31:a0bed6c1e05d 112 */
mazgch 31:a0bed6c1e05d 113 bool powerOff(void);
mazgch 31:a0bed6c1e05d 114
mazgch 31:a0bed6c1e05d 115 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 116 // Data Connection (GPRS)
mazgch 31:a0bed6c1e05d 117 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 118
mazgch 31:a0bed6c1e05d 119 /** register (Attach) the MT to the GPRS service.
mazgch 31:a0bed6c1e05d 120 \param apn the of the network provider e.g. "internet" or "apn.provider.com"
mazgch 57:869bd35f44cc 121 \param username is the user name text string for the authentication phase
mazgch 31:a0bed6c1e05d 122 \param password is the password text string for the authentication phase
mazgch 57:869bd35f44cc 123 \param dump set to true if you like to dump the status if successful
mazgch 31:a0bed6c1e05d 124 \return the ip that is assigned
mazgch 31:a0bed6c1e05d 125 */
mazgch 57:869bd35f44cc 126 MDMParser::IP join(const char* apn = NULL, const char* username = NULL, const char* password = NULL);
mazgch 31:a0bed6c1e05d 127
mazgch 31:a0bed6c1e05d 128 /** deregister (detach) the MT from the GPRS service.
mazgch 31:a0bed6c1e05d 129 \return true if successful, false otherwise
mazgch 31:a0bed6c1e05d 130 */
mazgch 31:a0bed6c1e05d 131 bool disconnect(void);
mazgch 31:a0bed6c1e05d 132
mazgch 31:a0bed6c1e05d 133 /** Translates a domain name to an IP address
mazgch 31:a0bed6c1e05d 134 \param host the domain name to translate e.g. "u-blox.com"
mazgch 31:a0bed6c1e05d 135 \return the IP if successful, 0 otherwise
mazgch 31:a0bed6c1e05d 136 */
mazgch 31:a0bed6c1e05d 137 MDMParser::IP gethostbyname(const char* host);
mazgch 31:a0bed6c1e05d 138
mazgch 31:a0bed6c1e05d 139 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 140 // Sockets
mazgch 31:a0bed6c1e05d 141 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 142
mazgch 31:a0bed6c1e05d 143 //! Type of IP protocol
mazgch 31:a0bed6c1e05d 144 typedef enum { IPPROTO_TCP, IPPROTO_UDP } IpProtocol;
mazgch 31:a0bed6c1e05d 145
mazgch 31:a0bed6c1e05d 146 //! Socket error return codes
mazgch 31:a0bed6c1e05d 147 #define SOCKET_ERROR -1
mazgch 31:a0bed6c1e05d 148
mazgch 63:42cb563a25bc 149 /** Create a socket for a ip protocol (and optionaly bind)
mazgch 31:a0bed6c1e05d 150 \param ipproto the protocol (UDP or TCP)
mazgch 63:42cb563a25bc 151 \param port in case of UDP, this optional port where it is bind
mazgch 31:a0bed6c1e05d 152 \return the socket handle if successful or SOCKET_ERROR on failure
mazgch 31:a0bed6c1e05d 153 */
mazgch 63:42cb563a25bc 154 int socketSocket(IpProtocol ipproto, int port = -1);
mazgch 31:a0bed6c1e05d 155
mazgch 31:a0bed6c1e05d 156 /** make a socket connection
mazgch 31:a0bed6c1e05d 157 \param socket the socket handle
mazgch 31:a0bed6c1e05d 158 \param host the domain name to connect e.g. "u-blox.com"
mazgch 31:a0bed6c1e05d 159 \param port the port to connect
mazgch 31:a0bed6c1e05d 160 \return true if successfully, false otherwise
mazgch 31:a0bed6c1e05d 161 */
mazgch 31:a0bed6c1e05d 162 bool socketConnect(int socket, const char* host, int port);
mazgch 31:a0bed6c1e05d 163
mazgch 44:9d12223b78ff 164 /** make a socket connection
mazgch 44:9d12223b78ff 165 \param socket the socket handle
mazgch 44:9d12223b78ff 166 \return true if connected, false otherwise
mazgch 44:9d12223b78ff 167 */
mazgch 44:9d12223b78ff 168 bool socketIsConnected(int socket);
mazgch 44:9d12223b78ff 169
mazgch 44:9d12223b78ff 170 /** Get the number of bytes pending for reading for this socket
mazgch 44:9d12223b78ff 171 \param socket the socket handle
mazgch 44:9d12223b78ff 172 \param timeout_ms -1 blocking, else non blocking timeout in ms
mazgch 44:9d12223b78ff 173 \return 0 if successful or SOCKET_ERROR on failure
mazgch 44:9d12223b78ff 174 */
mazgch 44:9d12223b78ff 175 bool socketSetBlocking(int socket, unsigned int timeout_ms);
mazgch 44:9d12223b78ff 176
mazgch 31:a0bed6c1e05d 177 /** Write socket data
mazgch 31:a0bed6c1e05d 178 \param socket the socket handle
mazgch 31:a0bed6c1e05d 179 \param buf the buffer to write
mazgch 31:a0bed6c1e05d 180 \param len the size of the buffer to write
mazgch 31:a0bed6c1e05d 181 \return the size written or SOCKET_ERROR on failure
mazgch 31:a0bed6c1e05d 182 */
mazgch 31:a0bed6c1e05d 183 int socketSend(int socket, const char * buf, int len);
mazgch 31:a0bed6c1e05d 184
mazgch 31:a0bed6c1e05d 185 /** Write socket data to a IP
mazgch 31:a0bed6c1e05d 186 \param socket the socket handle
mazgch 31:a0bed6c1e05d 187 \param ip the ip to send to
mazgch 31:a0bed6c1e05d 188 \param port the port to send to
mazgch 31:a0bed6c1e05d 189 \param buf the buffer to write
mazgch 31:a0bed6c1e05d 190 \param len the size of the buffer to write
mazgch 31:a0bed6c1e05d 191 \return the size written or SOCKET_ERROR on failure
mazgch 31:a0bed6c1e05d 192 */
mazgch 31:a0bed6c1e05d 193 int socketSendTo(int socket, IP ip, int port, const char * buf, int len);
mazgch 31:a0bed6c1e05d 194
mazgch 31:a0bed6c1e05d 195 /** Get the number of bytes pending for reading for this socket
mazgch 31:a0bed6c1e05d 196 \param socket the socket handle
mazgch 31:a0bed6c1e05d 197 \return the number of bytes pending or SOCKET_ERROR on failure
mazgch 31:a0bed6c1e05d 198 */
mazgch 31:a0bed6c1e05d 199 int socketReadable(int socket);
mazgch 31:a0bed6c1e05d 200
mazgch 31:a0bed6c1e05d 201 /** Read this socket
mazgch 31:a0bed6c1e05d 202 \param socket the socket handle
mazgch 31:a0bed6c1e05d 203 \param buf the buffer to read into
mazgch 31:a0bed6c1e05d 204 \param len the size of the buffer to read into
mazgch 31:a0bed6c1e05d 205 \return the number of bytes read or SOCKET_ERROR on failure
mazgch 31:a0bed6c1e05d 206 */
mazgch 31:a0bed6c1e05d 207 int socketRecv(int socket, char* buf, int len);
mazgch 31:a0bed6c1e05d 208
mazgch 31:a0bed6c1e05d 209 /** Read from this socket
mazgch 31:a0bed6c1e05d 210 \param socket the socket handle
mazgch 63:42cb563a25bc 211 \param ip the ip of host where the data originates from
mazgch 63:42cb563a25bc 212 \param port the port where the data originates from
mazgch 31:a0bed6c1e05d 213 \param buf the buffer to read into
mazgch 31:a0bed6c1e05d 214 \param len the size of the buffer to read into
mazgch 31:a0bed6c1e05d 215 \return the number of bytes read or SOCKET_ERROR on failure
mazgch 31:a0bed6c1e05d 216 */
mazgch 63:42cb563a25bc 217 int socketRecvFrom(int socket, IP* ip, int* port, char* buf, int len);
mazgch 31:a0bed6c1e05d 218
mazgch 31:a0bed6c1e05d 219 /** Close a connectied socket (that was connected with #socketConnect)
mazgch 31:a0bed6c1e05d 220 \param socket the socket handle
mazgch 31:a0bed6c1e05d 221 \return true if successfully, false otherwise
mazgch 31:a0bed6c1e05d 222 */
mazgch 31:a0bed6c1e05d 223 bool socketClose(int socket);
mazgch 31:a0bed6c1e05d 224
mazgch 31:a0bed6c1e05d 225 /** Free the socket (that was allocated before by #socketSocket)
mazgch 31:a0bed6c1e05d 226 \param socket the socket handle
mazgch 31:a0bed6c1e05d 227 \return true if successfully, false otherwise
mazgch 31:a0bed6c1e05d 228 */
mazgch 31:a0bed6c1e05d 229 bool socketFree(int socket);
mazgch 31:a0bed6c1e05d 230
mazgch 31:a0bed6c1e05d 231 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 232 // SMS Short Message Service
mazgch 31:a0bed6c1e05d 233 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 234
mazgch 31:a0bed6c1e05d 235 /** count the number of sms in the device and optionally return a
mazgch 31:a0bed6c1e05d 236 list with indexes from the storage locations in the device.
mazgch 31:a0bed6c1e05d 237 \param stat what type of messages you can use use
mazgch 31:a0bed6c1e05d 238 "REC UNREAD", "REC READ", "STO UNSENT", "STO SENT", "ALL"
mazgch 31:a0bed6c1e05d 239 \param ix list where to save the storage positions
mazgch 31:a0bed6c1e05d 240 \param num number of elements in the list
mazgch 31:a0bed6c1e05d 241 \return the number of messages, this can be bigger than num, -1 on failure
mazgch 31:a0bed6c1e05d 242 */
mazgch 31:a0bed6c1e05d 243 int smsList(const char* stat = "ALL", int* ix = NULL, int num = 0);
mazgch 31:a0bed6c1e05d 244
mazgch 31:a0bed6c1e05d 245 /** Read a Message from a storage position
mazgch 31:a0bed6c1e05d 246 \param ix the storage position to read
mazgch 31:a0bed6c1e05d 247 \param num the originator address (~16 chars)
mazgch 31:a0bed6c1e05d 248 \param buf a buffer where to save the sm
mazgch 31:a0bed6c1e05d 249 \param len the length of the sm
mazgch 31:a0bed6c1e05d 250 \return true if successful, false otherwise
mazgch 31:a0bed6c1e05d 251 */
mazgch 31:a0bed6c1e05d 252 bool smsRead(int ix, char* num, char* buf, int len);
mazgch 31:a0bed6c1e05d 253
mazgch 31:a0bed6c1e05d 254 /** Send a message to a recipient
mazgch 31:a0bed6c1e05d 255 \param ix the storage position to delete
mazgch 31:a0bed6c1e05d 256 \return true if successful, false otherwise
mazgch 31:a0bed6c1e05d 257 */
mazgch 31:a0bed6c1e05d 258 bool smsDelete(int ix);
mazgch 31:a0bed6c1e05d 259
mazgch 31:a0bed6c1e05d 260 /** Send a message to a recipient
mazgch 31:a0bed6c1e05d 261 \param num the phone number of the recipient
mazgch 31:a0bed6c1e05d 262 \param buf the content of the message to sent
mazgch 31:a0bed6c1e05d 263 \return true if successful, false otherwise
mazgch 31:a0bed6c1e05d 264 */
mazgch 31:a0bed6c1e05d 265 bool smsSend(const char* num, const char* buf);
mazgch 31:a0bed6c1e05d 266
mazgch 31:a0bed6c1e05d 267 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 268 // USSD Unstructured Supplementary Service Data
mazgch 31:a0bed6c1e05d 269 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 270
mazgch 31:a0bed6c1e05d 271 /** Read a Message from a storage position
mazgch 31:a0bed6c1e05d 272 \param cmd the ussd command to send e.g "*#06#"
mazgch 31:a0bed6c1e05d 273 \param buf a buffer where to save the reply
mazgch 31:a0bed6c1e05d 274 \return true if successful, false otherwise
mazgch 31:a0bed6c1e05d 275 */
mazgch 31:a0bed6c1e05d 276 bool ussdCommand(const char* cmd, char* buf);
mazgch 31:a0bed6c1e05d 277
mazgch 38:e6cab4632d84 278 // ----------------------------------------------------------------
mazgch 54:7ba8e4c218e2 279 // DUMP status to standard out (printf)
mazgch 54:7ba8e4c218e2 280 // ----------------------------------------------------------------
mazgch 54:7ba8e4c218e2 281
mazgch 54:7ba8e4c218e2 282 /** dump the device status to stdout using printf
mazgch 54:7ba8e4c218e2 283 \param status the status to convert to textual form,
mazgch 54:7ba8e4c218e2 284 unavailable fields are ommited (not printed)
mazgch 54:7ba8e4c218e2 285 */
mazgch 54:7ba8e4c218e2 286 static void dumpDevStatus(MDMParser::DevStatus *status);
mazgch 54:7ba8e4c218e2 287
mazgch 54:7ba8e4c218e2 288 /** dump the network status to stdout using printf
mazgch 54:7ba8e4c218e2 289 \param status the status to convert to textual form,
mazgch 54:7ba8e4c218e2 290 unavailable fields are ommited (not printed)
mazgch 54:7ba8e4c218e2 291 */
mazgch 54:7ba8e4c218e2 292 static void dumpNetStatus(MDMParser::NetStatus *status);
mazgch 54:7ba8e4c218e2 293
mazgch 54:7ba8e4c218e2 294 /** dump the ip address to stdout using printf
mazgch 54:7ba8e4c218e2 295 \param ip the ip to convert to textual form,
mazgch 54:7ba8e4c218e2 296 unavailable fields are ommited (not printed)
mazgch 54:7ba8e4c218e2 297 */
mazgch 54:7ba8e4c218e2 298 static void dumpIp(MDMParser::IP ip);
mazgch 54:7ba8e4c218e2 299
mazgch 54:7ba8e4c218e2 300 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 301 // Parseing
mazgch 31:a0bed6c1e05d 302 // ----------------------------------------------------------------
mazgch 31:a0bed6c1e05d 303
mazgch 51:e7b81c31baec 304 enum {
mazgch 51:e7b81c31baec 305 // waitFinalResp Responses
mazgch 52:8071747a7cb3 306 NOT_FOUND = 0,
mazgch 52:8071747a7cb3 307 WAIT = -1, // TIMEOUT
mazgch 52:8071747a7cb3 308 RESP_OK = -2,
mazgch 52:8071747a7cb3 309 RESP_ERROR = -3,
mazgch 52:8071747a7cb3 310 RESP_PROMPT = -4,
mazgch 31:a0bed6c1e05d 311
mazgch 51:e7b81c31baec 312 // getLine Responses
mazgch 51:e7b81c31baec 313 #define LENGTH(x) (x & 0x00FFFF) //!< extract/mask the length
mazgch 51:e7b81c31baec 314 #define TYPE(x) (x & 0xFF0000) //!< extract/mask the type
mazgch 51:e7b81c31baec 315
mazgch 51:e7b81c31baec 316 TYPE_UNKNOWN = 0x000000,
mazgch 51:e7b81c31baec 317 TYPE_OK = 0x110000,
mazgch 51:e7b81c31baec 318 TYPE_ERROR = 0x120000,
mazgch 51:e7b81c31baec 319 TYPE_RING = 0x210000,
mazgch 51:e7b81c31baec 320 TYPE_CONNECT = 0x220000,
mazgch 51:e7b81c31baec 321 TYPE_NOCARRIER = 0x230000,
mazgch 51:e7b81c31baec 322 TYPE_NODIALTONE = 0x240000,
mazgch 51:e7b81c31baec 323 TYPE_BUSY = 0x250000,
mazgch 51:e7b81c31baec 324 TYPE_NOANSWER = 0x260000,
mazgch 51:e7b81c31baec 325 TYPE_PROMPT = 0x300000,
mazgch 51:e7b81c31baec 326 TYPE_PLUS = 0x400000,
mazgch 51:e7b81c31baec 327 TYPE_TEXT = 0x500000
mazgch 51:e7b81c31baec 328 };
mazgch 31:a0bed6c1e05d 329
mazgch 31:a0bed6c1e05d 330 /** Get a line from the physical interface. This function need
mazgch 31:a0bed6c1e05d 331 to be implemented in a inherited class. Usually just calls
mazgch 31:a0bed6c1e05d 332 #_getLine on the rx buffer pipe.
mazgch 31:a0bed6c1e05d 333
mazgch 31:a0bed6c1e05d 334 \param buf the buffer to store it
mazgch 31:a0bed6c1e05d 335 \param buf size of the buffer
mazgch 31:a0bed6c1e05d 336 \return type and length if something was found,
mazgch 31:a0bed6c1e05d 337 WAIT if not enough data is available
mazgch 31:a0bed6c1e05d 338 NOT_FOUND if nothing was found
mazgch 31:a0bed6c1e05d 339 */
mazgch 31:a0bed6c1e05d 340 virtual int getLine(char* buf, int len) = 0;
mazgch 28:4d9509e3b1cf 341
mazgch 31:a0bed6c1e05d 342 /** Write data to the device
mazgch 31:a0bed6c1e05d 343 \param buf the buffer to write
mazgch 31:a0bed6c1e05d 344 \param buf size of the buffer to write
mazgch 31:a0bed6c1e05d 345 \return bytes written
mazgch 31:a0bed6c1e05d 346 */
mazgch 31:a0bed6c1e05d 347 virtual int send(const char* buf, int len);
mazgch 21:c4d64830bf02 348
mazgch 31:a0bed6c1e05d 349 /** Write formated date to the physical interface (printf style)
mazgch 31:a0bed6c1e05d 350 \param fmt the format string
mazgch 31:a0bed6c1e05d 351 \param .. variable arguments to be formated
mazgch 31:a0bed6c1e05d 352 \return bytes written
mazgch 31:a0bed6c1e05d 353 */
mazgch 21:c4d64830bf02 354 int sendFormated(const char* format, ...);
mazgch 26:07be5faf8925 355
mazgch 31:a0bed6c1e05d 356 /** callback function for #waitFinalResp with void* as argument
mazgch 31:a0bed6c1e05d 357 \param type the #getLine response
mazgch 31:a0bed6c1e05d 358 \param buf the parsed line
mazgch 31:a0bed6c1e05d 359 \param len the size of the parsed line
mazgch 31:a0bed6c1e05d 360 \param param the optional argument passed to #waitFinalResp
mazgch 31:a0bed6c1e05d 361 \return WAIT if processing should continue,
mazgch 31:a0bed6c1e05d 362 any other value aborts #waitFinalResp and this retunr value retuned
mazgch 31:a0bed6c1e05d 363 */
mazgch 26:07be5faf8925 364 typedef int (*_CALLBACKPTR)(int type, const char* buf, int len, void* param);
mazgch 31:a0bed6c1e05d 365
mazgch 31:a0bed6c1e05d 366 /** Wait for a final respons
mazgch 31:a0bed6c1e05d 367 \param cb the optional callback function
mazgch 31:a0bed6c1e05d 368 \param param the optional callback function parameter
mazgch 58:e38a2e942fbb 369 \param timeout_ms the timeout to wait (See Estimated command
mazgch 58:e38a2e942fbb 370 response time of AT manual)
mazgch 31:a0bed6c1e05d 371 */
mazgch 31:a0bed6c1e05d 372 int waitFinalResp(_CALLBACKPTR cb = NULL,
mazgch 26:07be5faf8925 373 void* param = NULL,
mazgch 58:e38a2e942fbb 374 int timeout_ms = 10000);
mazgch 31:a0bed6c1e05d 375
mazgch 31:a0bed6c1e05d 376 /** template version of #waitFinalResp when using callbacks,
mazgch 31:a0bed6c1e05d 377 This template will allow the compiler to do type cheking but
mazgch 31:a0bed6c1e05d 378 internally symply casts the arguments and call the (void*)
mazgch 31:a0bed6c1e05d 379 version of #waitFinalResp.
mazgch 31:a0bed6c1e05d 380 \sa waitFinalResp
mazgch 31:a0bed6c1e05d 381 */
mazgch 26:07be5faf8925 382 template<class T>
mazgch 26:07be5faf8925 383 int waitFinalResp(int (*cb)(int type, const char* buf, int len,
mazgch 26:07be5faf8925 384 T* param),
mazgch 58:e38a2e942fbb 385 T* param, int timeout_ms = 10000)
mazgch 26:07be5faf8925 386 {
mazgch 26:07be5faf8925 387 return waitFinalResp((_CALLBACKPTR)cb, (void*)param, timeout_ms);
mazgch 26:07be5faf8925 388 }
mazgch 31:a0bed6c1e05d 389
mazgch 18:e5697801df29 390 protected:
mazgch 31:a0bed6c1e05d 391 /** Write bytes to the physical interface. This function should be
mazgch 31:a0bed6c1e05d 392 implemented in a inherited class.
mazgch 31:a0bed6c1e05d 393 \param buf the buffer to write
mazgch 31:a0bed6c1e05d 394 \param buf size of the buffer to write
mazgch 31:a0bed6c1e05d 395 \return bytes written
mazgch 31:a0bed6c1e05d 396 */
mazgch 18:e5697801df29 397 virtual int _send(const void* buf, int len) = 0;
mazgch 31:a0bed6c1e05d 398
mazgch 31:a0bed6c1e05d 399 /** Helper: Parse a line from the receiving buffered pipe
mazgch 31:a0bed6c1e05d 400 \param pipe the receiving buffer pipe
mazgch 31:a0bed6c1e05d 401 \param buf the parsed line
mazgch 31:a0bed6c1e05d 402 \param len the size of the parsed line
mazgch 31:a0bed6c1e05d 403 \return type and length if something was found,
mazgch 31:a0bed6c1e05d 404 WAIT if not enough data is available
mazgch 31:a0bed6c1e05d 405 NOT_FOUND if nothing was found
mazgch 31:a0bed6c1e05d 406 */
mazgch 31:a0bed6c1e05d 407 static int _getLine(Pipe<char>* pipe, char* buffer, int length);
mazgch 31:a0bed6c1e05d 408
mazgch 31:a0bed6c1e05d 409 /** Helper: Parse a match from the pipe
mazgch 31:a0bed6c1e05d 410 \param pipe the buffered pipe
mazgch 31:a0bed6c1e05d 411 \param number of bytes to parse at maximum,
mazgch 31:a0bed6c1e05d 412 \param sta the starting string, NULL if none
mazgch 31:a0bed6c1e05d 413 \param end the terminating string, NULL if none
mazgch 31:a0bed6c1e05d 414 \return size of parsed match
mazgch 31:a0bed6c1e05d 415 */
mazgch 31:a0bed6c1e05d 416 static int _parseMatch(Pipe<char>* pipe, int len, const char* sta, const char* end);
mazgch 31:a0bed6c1e05d 417
mazgch 31:a0bed6c1e05d 418 /** Helper: Parse a match from the pipe
mazgch 31:a0bed6c1e05d 419 \param pipe the buffered pipe
mazgch 31:a0bed6c1e05d 420 \param number of bytes to parse at maximum,
mazgch 31:a0bed6c1e05d 421 \param fmt the formating string (%d any number, %c any char of last %d len)
mazgch 31:a0bed6c1e05d 422 \return size of parsed match
mazgch 31:a0bed6c1e05d 423 */
mazgch 31:a0bed6c1e05d 424 static int _parseFormated(Pipe<char>* pipe, int len, const char* fmt);
mazgch 31:a0bed6c1e05d 425
mazgch 35:9275215a3a5b 426 protected:
mazgch 31:a0bed6c1e05d 427 // parsing callbacks for different AT commands and their parameter arguments
mazgch 31:a0bed6c1e05d 428 static int _cbString(int type, const char* buf, int len, char* str);
mazgch 31:a0bed6c1e05d 429 static int _cbInt(int type, const char* buf, int len, int* val);
mazgch 31:a0bed6c1e05d 430 // device
mazgch 32:8f12ac182bbb 431 static int _cbATI(int type, const char* buf, int len, Dev* dev);
mazgch 31:a0bed6c1e05d 432 static int _cbCPIN(int type, const char* buf, int len, Sim* sim);
mazgch 31:a0bed6c1e05d 433 static int _cbCCID(int type, const char* buf, int len, char* ccid);
mazgch 31:a0bed6c1e05d 434 // network
mazgch 54:7ba8e4c218e2 435 static int _cbCSQ(int type, const char* buf, int len, NetStatus* status);
mazgch 31:a0bed6c1e05d 436 static int _cbCOPS(int type, const char* buf, int len, NetStatus* status);
mazgch 31:a0bed6c1e05d 437 static int _cbCNUM(int type, const char* buf, int len, char* num);
mazgch 31:a0bed6c1e05d 438 static int _cbCGATT(int type, const char* buf, int len, int* state);
mazgch 31:a0bed6c1e05d 439 // sockets
mazgch 32:8f12ac182bbb 440 static int _cbCMIP(int type, const char* buf, int len, IP* ip);
mazgch 31:a0bed6c1e05d 441 static int _cbUPSND(int type, const char* buf, int len, int* act);
mazgch 31:a0bed6c1e05d 442 static int _cbUPSND(int type, const char* buf, int len, IP* ip);
mazgch 21:c4d64830bf02 443 static int _cbUDNSRN(int type, const char* buf, int len, IP* ip);
mazgch 21:c4d64830bf02 444 static int _cbUSOCR(int type, const char* buf, int len, int* socket);
mazgch 21:c4d64830bf02 445 static int _cbUSORD(int type, const char* buf, int len, char* out);
mazgch 21:c4d64830bf02 446 typedef struct { char* buf; IP ip; int port; } USORFparam;
mazgch 21:c4d64830bf02 447 static int _cbUSORF(int type, const char* buf, int len, USORFparam* param);
mazgch 21:c4d64830bf02 448 typedef struct { char* buf; char* num; } CMGRparam;
mazgch 21:c4d64830bf02 449 static int _cbCUSD(int type, const char* buf, int len, char* buf);
mazgch 31:a0bed6c1e05d 450 // sms
mazgch 31:a0bed6c1e05d 451 typedef struct { int* ix; int num; } CMGLparam;
mazgch 31:a0bed6c1e05d 452 static int _cbCMGL(int type, const char* buf, int len, CMGLparam* param);
mazgch 21:c4d64830bf02 453 static int _cbCMGR(int type, const char* buf, int len, CMGRparam* param);
mazgch 38:e6cab4632d84 454 // variables
mazgch 31:a0bed6c1e05d 455 DevStatus _dev; //!< collected device information
mazgch 31:a0bed6c1e05d 456 NetStatus _net; //!< collected network information
mazgch 31:a0bed6c1e05d 457 IP _ip; //!< assigned ip address
mazgch 31:a0bed6c1e05d 458 // management struture for sockets
mazgch 21:c4d64830bf02 459 typedef enum { SOCK_FREE, SOCK_CREATED, SOCK_CONNECTED } SockState;
mazgch 44:9d12223b78ff 460 typedef struct { SockState state; int pending; unsigned int timeout_ms; } SockCtrl;
mazgch 59:382695f1ce85 461 // LISA-C has 6 TCP and 6 UDP sockets starting at index 18
mazgch 59:382695f1ce85 462 // LISA-U and SARA-G have 7 sockets starting at index 1
mazgch 59:382695f1ce85 463 SockCtrl _sockets[32];
mazgch 44:9d12223b78ff 464 static MDMParser* inst;
mazgch 18:e5697801df29 465 };
mazgch 18:e5697801df29 466
mazgch 18:e5697801df29 467 // -----------------------------------------------------------------------
mazgch 18:e5697801df29 468
mazgch 38:e6cab4632d84 469 /** modem class which uses a serial port
mazgch 38:e6cab4632d84 470 as physical interface.
mazgch 38:e6cab4632d84 471 */
mazgch 18:e5697801df29 472 class MDMSerial : public SerialPipe, public MDMParser
mazgch 17:296d94a006b4 473 {
mazgch 17:296d94a006b4 474 public:
mazgch 38:e6cab4632d84 475 /** Constructor
mazgch 38:e6cab4632d84 476
mazgch 38:e6cab4632d84 477 \param tx is the serial ports transmit pin (modem to CPU)
mazgch 38:e6cab4632d84 478 \param rx is the serial ports receive pin (CPU to modem)
mazgch 38:e6cab4632d84 479 \param baudrate the baudrate of the modem use 115200
mazgch 38:e6cab4632d84 480 \param rts is the serial ports ready to send pin (CPU to modem)
mazgch 38:e6cab4632d84 481 this pin is optional
mazgch 38:e6cab4632d84 482 \param cts is the serial ports clear to send pin (modem to CPU)
mazgch 38:e6cab4632d84 483 this pin is optional, but required for power saving to be enabled
mazgch 38:e6cab4632d84 484 \param rxSize the size of the serial rx buffer
mazgch 38:e6cab4632d84 485 \param txSize the size of the serial tx buffer
mazgch 38:e6cab4632d84 486 */
mazgch 19:2b5d097ca15d 487 MDMSerial(PinName tx _C027DEFAULT(MDMTXD),
mazgch 19:2b5d097ca15d 488 PinName rx _C027DEFAULT(MDMRXD),
mazgch 19:2b5d097ca15d 489 int baudrate _C027DEFAULT(MDMBAUD),
mazgch 35:9275215a3a5b 490 #if DEVICE_SERIAL_FC
mazgch 19:2b5d097ca15d 491 PinName rts _C027DEFAULT(MDMRTS),
mazgch 19:2b5d097ca15d 492 PinName cts _C027DEFAULT(MDMCTS),
mazgch 35:9275215a3a5b 493 #endif
mazgch 19:2b5d097ca15d 494 int rxSize = 256 ,
mazgch 21:c4d64830bf02 495 int txSize = 128 );
mazgch 38:e6cab4632d84 496 /** Get a line from the physical interface.
mazgch 38:e6cab4632d84 497 \param buf the buffer to store it
mazgch 38:e6cab4632d84 498 \param buf size of the buffer
mazgch 38:e6cab4632d84 499 \return type and length if something was found,
mazgch 38:e6cab4632d84 500 WAIT if not enough data is available
mazgch 38:e6cab4632d84 501 NOT_FOUND if nothing was found
mazgch 38:e6cab4632d84 502 */
mazgch 18:e5697801df29 503 virtual int getLine(char* buffer, int length);
mazgch 18:e5697801df29 504 protected:
mazgch 38:e6cab4632d84 505 /** Write bytes to the physical interface.
mazgch 38:e6cab4632d84 506 \param buf the buffer to write
mazgch 38:e6cab4632d84 507 \param buf size of the buffer to write
mazgch 38:e6cab4632d84 508 \return bytes written
mazgch 38:e6cab4632d84 509 */
mazgch 18:e5697801df29 510 virtual int _send(const void* buf, int len);
mazgch 17:296d94a006b4 511 };
mazgch 18:e5697801df29 512
mazgch 18:e5697801df29 513 // -----------------------------------------------------------------------
mazgch 18:e5697801df29 514
mazgch 38:e6cab4632d84 515 //#define HAVE_MDMUSB
mazgch 18:e5697801df29 516 #ifdef HAVE_MDMUSB
mazgch 18:e5697801df29 517 class MDMUsb : /*public UsbSerial,*/ public MDMParser
mazgch 18:e5697801df29 518 {
mazgch 18:e5697801df29 519 public:
mazgch 18:e5697801df29 520 MDMUsb(void);
mazgch 18:e5697801df29 521 virtual int getLine(char* buffer, int length);
mazgch 18:e5697801df29 522 protected:
mazgch 18:e5697801df29 523 virtual int _send(const void* buf, int len);
mazgch 18:e5697801df29 524 };
mazgch 18:e5697801df29 525 #endif
mazgch 18:e5697801df29 526
mazgch 18:e5697801df29 527