Nino Der Kinderen / Mbed 2 deprecated InetTest

Embedded C project:18/12/2014

Dependencies:   DS1307 TextLCD mbed

NetServices/drv/gprs/GPRSModem.cpp@0:8d87bc453349, 2014-12-18 (annotated)

Committer:
ninoderkinderen
Date:
Thu Dec 18 09:35:49 2014 +0000
Revision:
0:8d87bc453349
Programma embedded C

Who changed what in which revision?

UserRevisionLine numberNew contents of line
ninoderkinderen 0:8d87bc453349 1
ninoderkinderen 0:8d87bc453349 2 /*
ninoderkinderen 0:8d87bc453349 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
ninoderkinderen 0:8d87bc453349 4
ninoderkinderen 0:8d87bc453349 5 Permission is hereby granted, free of charge, to any person obtaining a copy
ninoderkinderen 0:8d87bc453349 6 of this software and associated documentation files (the "Software"), to deal
ninoderkinderen 0:8d87bc453349 7 in the Software without restriction, including without limitation the rights
ninoderkinderen 0:8d87bc453349 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
ninoderkinderen 0:8d87bc453349 9 copies of the Software, and to permit persons to whom the Software is
ninoderkinderen 0:8d87bc453349 10 furnished to do so, subject to the following conditions:
ninoderkinderen 0:8d87bc453349 11
ninoderkinderen 0:8d87bc453349 12 The above copyright notice and this permission notice shall be included in
ninoderkinderen 0:8d87bc453349 13 all copies or substantial portions of the Software.
ninoderkinderen 0:8d87bc453349 14
ninoderkinderen 0:8d87bc453349 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
ninoderkinderen 0:8d87bc453349 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
ninoderkinderen 0:8d87bc453349 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
ninoderkinderen 0:8d87bc453349 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
ninoderkinderen 0:8d87bc453349 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
ninoderkinderen 0:8d87bc453349 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
ninoderkinderen 0:8d87bc453349 21 THE SOFTWARE.
ninoderkinderen 0:8d87bc453349 22 */
ninoderkinderen 0:8d87bc453349 23
ninoderkinderen 0:8d87bc453349 24 #include "GPRSModem.h"
ninoderkinderen 0:8d87bc453349 25 #include "mbed.h"
ninoderkinderen 0:8d87bc453349 26
ninoderkinderen 0:8d87bc453349 27 //#define __DEBUG
ninoderkinderen 0:8d87bc453349 28 #include "dbg/dbg.h"
ninoderkinderen 0:8d87bc453349 29
ninoderkinderen 0:8d87bc453349 30 #define WAIT_BTW_NETW_POLLS 3.
ninoderkinderen 0:8d87bc453349 31
ninoderkinderen 0:8d87bc453349 32 #include "netCfg.h"
ninoderkinderen 0:8d87bc453349 33 #if NET_GPRS
ninoderkinderen 0:8d87bc453349 34
ninoderkinderen 0:8d87bc453349 35 GPRSModem::GPRSModem() : ATIf()
ninoderkinderen 0:8d87bc453349 36 {
ninoderkinderen 0:8d87bc453349 37 DBG("New GPRSModem@%p\n", this);
ninoderkinderen 0:8d87bc453349 38 }
ninoderkinderen 0:8d87bc453349 39
ninoderkinderen 0:8d87bc453349 40 GPRSModem::~GPRSModem()
ninoderkinderen 0:8d87bc453349 41 {
ninoderkinderen 0:8d87bc453349 42
ninoderkinderen 0:8d87bc453349 43 }
ninoderkinderen 0:8d87bc453349 44
ninoderkinderen 0:8d87bc453349 45 GPRSErr GPRSModem::getNetworkState()
ninoderkinderen 0:8d87bc453349 46 {
ninoderkinderen 0:8d87bc453349 47 ATIf::flushBuffer();
ninoderkinderen 0:8d87bc453349 48 /*
ninoderkinderen 0:8d87bc453349 49 netState can be : (Telit_AT_Reference_Guide.pdf p.98)
ninoderkinderen 0:8d87bc453349 50 0 - not registered, ME is not currently searching a new operator to register to
ninoderkinderen 0:8d87bc453349 51 1 - registered, home network
ninoderkinderen 0:8d87bc453349 52 2 - not registered, but ME is currently searching a new operator to register to
ninoderkinderen 0:8d87bc453349 53 3 - registration denied
ninoderkinderen 0:8d87bc453349 54 4 - unknown
ninoderkinderen 0:8d87bc453349 55 5 - registered, roaming
ninoderkinderen 0:8d87bc453349 56 */
ninoderkinderen 0:8d87bc453349 57 // DBG("Network?...\r\n");
ninoderkinderen 0:8d87bc453349 58 ATIf::setReadMode(false); //Discard chars
ninoderkinderen 0:8d87bc453349 59 ATIf::setTimeout(10000);
ninoderkinderen 0:8d87bc453349 60 ATIf::setLineMode(true); //Line mode
ninoderkinderen 0:8d87bc453349 61 int netState = 0;
ninoderkinderen 0:8d87bc453349 62 int len;
ninoderkinderen 0:8d87bc453349 63 len = ATIf::printf("AT+CREG?"); //Registered ?
ninoderkinderen 0:8d87bc453349 64 if(!len) DBG("\r\nprintf - len=%d\r\n",len);
ninoderkinderen 0:8d87bc453349 65 if(!len)
ninoderkinderen 0:8d87bc453349 66 return GPRS_MODEM; //Nothing was actually sent
ninoderkinderen 0:8d87bc453349 67
ninoderkinderen 0:8d87bc453349 68 len = ATIf::scanf("+CREG: 0,%d", &netState); //Get status
ninoderkinderen 0:8d87bc453349 69 if(len != 1) DBG("\r\nscanf - len=%d\r\n",len);
ninoderkinderen 0:8d87bc453349 70 if(len != 1) //Likely +CMS ERROR was returned
ninoderkinderen 0:8d87bc453349 71 return GPRS_MODEM;
ninoderkinderen 0:8d87bc453349 72
ninoderkinderen 0:8d87bc453349 73 if( !!ATIf::checkOK() ) //Should not be a problem
ninoderkinderen 0:8d87bc453349 74 {DBG("\r\nNOK\r\n"); return GPRS_MODEM; }
ninoderkinderen 0:8d87bc453349 75
ninoderkinderen 0:8d87bc453349 76 switch(netState)
ninoderkinderen 0:8d87bc453349 77 {
ninoderkinderen 0:8d87bc453349 78 case 1:
ninoderkinderen 0:8d87bc453349 79 case 5: //TODO: Option allow roaming
ninoderkinderen 0:8d87bc453349 80 DBG("\r\nNetwork is up!\r\n");
ninoderkinderen 0:8d87bc453349 81 return GPRS_OK;
ninoderkinderen 0:8d87bc453349 82 case 3:
ninoderkinderen 0:8d87bc453349 83 DBG("\r\nAccess to network denied.\r\n");
ninoderkinderen 0:8d87bc453349 84 return GPRS_DENIED;
ninoderkinderen 0:8d87bc453349 85 case 0:
ninoderkinderen 0:8d87bc453349 86 DBG("\r\nNo network.\r\n");
ninoderkinderen 0:8d87bc453349 87 return GPRS_NONETWORK;
ninoderkinderen 0:8d87bc453349 88 case 4:
ninoderkinderen 0:8d87bc453349 89 case 2:
ninoderkinderen 0:8d87bc453349 90 //DBG("\r\nRegistering...\r\n");
ninoderkinderen 0:8d87bc453349 91 return GPRS_REGISTERING;
ninoderkinderen 0:8d87bc453349 92 }
ninoderkinderen 0:8d87bc453349 93
ninoderkinderen 0:8d87bc453349 94 return GPRS_MODEM; // Should not reach this
ninoderkinderen 0:8d87bc453349 95
ninoderkinderen 0:8d87bc453349 96 }
ninoderkinderen 0:8d87bc453349 97
ninoderkinderen 0:8d87bc453349 98 GPRSErr GPRSModem::setNetworkUp()
ninoderkinderen 0:8d87bc453349 99 {
ninoderkinderen 0:8d87bc453349 100 ATIf::flushBuffer();
ninoderkinderen 0:8d87bc453349 101 GPRSErr err = GPRS_REGISTERING;
ninoderkinderen 0:8d87bc453349 102 while(true)
ninoderkinderen 0:8d87bc453349 103 {
ninoderkinderen 0:8d87bc453349 104 err = getNetworkState();
ninoderkinderen 0:8d87bc453349 105 if(err != GPRS_REGISTERING)
ninoderkinderen 0:8d87bc453349 106 break;
ninoderkinderen 0:8d87bc453349 107 wait(WAIT_BTW_NETW_POLLS);
ninoderkinderen 0:8d87bc453349 108 }
ninoderkinderen 0:8d87bc453349 109 return err;
ninoderkinderen 0:8d87bc453349 110 }
ninoderkinderen 0:8d87bc453349 111
ninoderkinderen 0:8d87bc453349 112 //Same, but for GPRS
ninoderkinderen 0:8d87bc453349 113 GPRSErr GPRSModem::getGPRSState()
ninoderkinderen 0:8d87bc453349 114 {
ninoderkinderen 0:8d87bc453349 115 ATIf::flushBuffer();
ninoderkinderen 0:8d87bc453349 116 /*
ninoderkinderen 0:8d87bc453349 117 netState can be : (Telit_AT_Reference_Guide.pdf p.192)
ninoderkinderen 0:8d87bc453349 118 0 - not registered, terminal is not currently searching a new operator to register to
ninoderkinderen 0:8d87bc453349 119 1 - registered, home network
ninoderkinderen 0:8d87bc453349 120 2 - not registered, but terminal is currently searching a new operator to register to
ninoderkinderen 0:8d87bc453349 121 3 - registration denied
ninoderkinderen 0:8d87bc453349 122 4 - unknown
ninoderkinderen 0:8d87bc453349 123 5 - registered, roaming
ninoderkinderen 0:8d87bc453349 124 */
ninoderkinderen 0:8d87bc453349 125
ninoderkinderen 0:8d87bc453349 126 DBG("GPRS?...\r\n");
ninoderkinderen 0:8d87bc453349 127 ATIf::setReadMode(false); //Discard chars
ninoderkinderen 0:8d87bc453349 128 ATIf::setTimeout(10000);
ninoderkinderen 0:8d87bc453349 129 ATIf::setLineMode(true); //Line mode
ninoderkinderen 0:8d87bc453349 130 int netState = 0;
ninoderkinderen 0:8d87bc453349 131 int len;
ninoderkinderen 0:8d87bc453349 132 len = ATIf::printf("AT+CGREG?"); //Registered ?
ninoderkinderen 0:8d87bc453349 133 if(!len)
ninoderkinderen 0:8d87bc453349 134 return GPRS_MODEM; //Nothing was actually sent
ninoderkinderen 0:8d87bc453349 135
ninoderkinderen 0:8d87bc453349 136 len = ATIf::scanf("+CGREG: %*d,%d", &netState); //Get GPRS status, see GSM 07.07 spec as Telit AT ref is wrong
ninoderkinderen 0:8d87bc453349 137 if(len != 1) DBG("\r\nscanf - len=%d\r\n",len);
ninoderkinderen 0:8d87bc453349 138 if(len != 1) //Likely +CMS ERROR was returned
ninoderkinderen 0:8d87bc453349 139 return GPRS_MODEM;
ninoderkinderen 0:8d87bc453349 140
ninoderkinderen 0:8d87bc453349 141 if( !!ATIf::checkOK() ) //Should not be a problem
ninoderkinderen 0:8d87bc453349 142 return GPRS_MODEM;
ninoderkinderen 0:8d87bc453349 143
ninoderkinderen 0:8d87bc453349 144 switch(netState)
ninoderkinderen 0:8d87bc453349 145 {
ninoderkinderen 0:8d87bc453349 146 case 1:
ninoderkinderen 0:8d87bc453349 147 case 5: //TODO: Option allow roaming
ninoderkinderen 0:8d87bc453349 148 DBG("\r\nNetwork is up!\r\n");
ninoderkinderen 0:8d87bc453349 149 return GPRS_OK;
ninoderkinderen 0:8d87bc453349 150 case 3:
ninoderkinderen 0:8d87bc453349 151 DBG("\r\nAccess to network denied.\r\n");
ninoderkinderen 0:8d87bc453349 152 return GPRS_DENIED;
ninoderkinderen 0:8d87bc453349 153 case 0:
ninoderkinderen 0:8d87bc453349 154 DBG("\r\nNo network.\r\n");
ninoderkinderen 0:8d87bc453349 155 return GPRS_NONETWORK;
ninoderkinderen 0:8d87bc453349 156 case 4:
ninoderkinderen 0:8d87bc453349 157 case 2:
ninoderkinderen 0:8d87bc453349 158 DBG("\r\nRegistering...\r\n");
ninoderkinderen 0:8d87bc453349 159 return GPRS_REGISTERING;
ninoderkinderen 0:8d87bc453349 160 }
ninoderkinderen 0:8d87bc453349 161
ninoderkinderen 0:8d87bc453349 162 return GPRS_MODEM; // Should not reach this
ninoderkinderen 0:8d87bc453349 163
ninoderkinderen 0:8d87bc453349 164 }
ninoderkinderen 0:8d87bc453349 165
ninoderkinderen 0:8d87bc453349 166 GPRSErr GPRSModem::setGPRSUp()
ninoderkinderen 0:8d87bc453349 167 {
ninoderkinderen 0:8d87bc453349 168 ATIf::flushBuffer();
ninoderkinderen 0:8d87bc453349 169 GPRSErr err;
ninoderkinderen 0:8d87bc453349 170
ninoderkinderen 0:8d87bc453349 171 err = setNetworkUp();
ninoderkinderen 0:8d87bc453349 172 if(err)
ninoderkinderen 0:8d87bc453349 173 return err;
ninoderkinderen 0:8d87bc453349 174
ninoderkinderen 0:8d87bc453349 175 DBG("\r\nAttaching GPRS...\r\n");
ninoderkinderen 0:8d87bc453349 176 ATIf::setReadMode(false); //Discard chars
ninoderkinderen 0:8d87bc453349 177 ATIf::setTimeout(10000);
ninoderkinderen 0:8d87bc453349 178 ATIf::setLineMode(true); //Line mode
ninoderkinderen 0:8d87bc453349 179 int len;
ninoderkinderen 0:8d87bc453349 180
ninoderkinderen 0:8d87bc453349 181 err = getGPRSState();
ninoderkinderen 0:8d87bc453349 182 if(err == GPRS_NONETWORK)
ninoderkinderen 0:8d87bc453349 183 {
ninoderkinderen 0:8d87bc453349 184 len = ATIf::printf("AT+CGATT=1"); //Attach
ninoderkinderen 0:8d87bc453349 185 if(!len)
ninoderkinderen 0:8d87bc453349 186 return GPRS_MODEM; //Nothing was actually sent
ninoderkinderen 0:8d87bc453349 187
ninoderkinderen 0:8d87bc453349 188 if( !!ATIf::checkOK() ) //Should not be a problem
ninoderkinderen 0:8d87bc453349 189 return GPRS_MODEM;
ninoderkinderen 0:8d87bc453349 190 }
ninoderkinderen 0:8d87bc453349 191
ninoderkinderen 0:8d87bc453349 192 while(true)
ninoderkinderen 0:8d87bc453349 193 {
ninoderkinderen 0:8d87bc453349 194 err = getGPRSState();
ninoderkinderen 0:8d87bc453349 195 if(err != GPRS_REGISTERING)
ninoderkinderen 0:8d87bc453349 196 break;
ninoderkinderen 0:8d87bc453349 197 wait(WAIT_BTW_NETW_POLLS);
ninoderkinderen 0:8d87bc453349 198 }
ninoderkinderen 0:8d87bc453349 199 return err;
ninoderkinderen 0:8d87bc453349 200 }
ninoderkinderen 0:8d87bc453349 201
ninoderkinderen 0:8d87bc453349 202 GPRSErr GPRSModem::setGPRSDown()
ninoderkinderen 0:8d87bc453349 203 {
ninoderkinderen 0:8d87bc453349 204 ATIf::flushBuffer();
ninoderkinderen 0:8d87bc453349 205 DBG("\r\nDetaching GPRS...\r\n");
ninoderkinderen 0:8d87bc453349 206 ATIf::setReadMode(false); //Discard chars
ninoderkinderen 0:8d87bc453349 207 ATIf::setTimeout(10000);
ninoderkinderen 0:8d87bc453349 208 ATIf::setLineMode(true); //Line mode
ninoderkinderen 0:8d87bc453349 209 int len;
ninoderkinderen 0:8d87bc453349 210
ninoderkinderen 0:8d87bc453349 211 len = ATIf::printf("AT+CGATT=0"); //Detach
ninoderkinderen 0:8d87bc453349 212 if(!len)
ninoderkinderen 0:8d87bc453349 213 return GPRS_MODEM; //Nothing was actually sent
ninoderkinderen 0:8d87bc453349 214
ninoderkinderen 0:8d87bc453349 215 if( !!ATIf::checkOK() ) //Should not be a problem
ninoderkinderen 0:8d87bc453349 216 return GPRS_MODEM;
ninoderkinderen 0:8d87bc453349 217
ninoderkinderen 0:8d87bc453349 218 return GPRS_OK;
ninoderkinderen 0:8d87bc453349 219 }
ninoderkinderen 0:8d87bc453349 220
ninoderkinderen 0:8d87bc453349 221
ninoderkinderen 0:8d87bc453349 222 GPRSErr GPRSModem::connect(const char* apn /*=NULL*/)
ninoderkinderen 0:8d87bc453349 223 {
ninoderkinderen 0:8d87bc453349 224 ATIf::flushBuffer();
ninoderkinderen 0:8d87bc453349 225 GPRSErr err;
ninoderkinderen 0:8d87bc453349 226
ninoderkinderen 0:8d87bc453349 227 ATIf::setReadMode(false); //Discard chars
ninoderkinderen 0:8d87bc453349 228 ATIf::setTimeout(5000);
ninoderkinderen 0:8d87bc453349 229 ATIf::setLineMode(true); //Line mode
ninoderkinderen 0:8d87bc453349 230
ninoderkinderen 0:8d87bc453349 231 DBG("\r\nConnecting...\r\n");
ninoderkinderen 0:8d87bc453349 232
ninoderkinderen 0:8d87bc453349 233 int len;
ninoderkinderen 0:8d87bc453349 234
ninoderkinderen 0:8d87bc453349 235 if( apn != NULL ) //Config APN
ninoderkinderen 0:8d87bc453349 236 {
ninoderkinderen 0:8d87bc453349 237 len = ATIf::printf("AT+CGDCONT=1,\"IP\",\"%s\"",apn); //Define APN
ninoderkinderen 0:8d87bc453349 238 if(!len)
ninoderkinderen 0:8d87bc453349 239 return GPRS_MODEM; //Nothing was actually sent
ninoderkinderen 0:8d87bc453349 240
ninoderkinderen 0:8d87bc453349 241 if( !!ATIf::checkOK() ) //Should not be a problem
ninoderkinderen 0:8d87bc453349 242 return GPRS_MODEM;
ninoderkinderen 0:8d87bc453349 243 }
ninoderkinderen 0:8d87bc453349 244
ninoderkinderen 0:8d87bc453349 245 err = setGPRSUp();
ninoderkinderen 0:8d87bc453349 246 if(err)
ninoderkinderen 0:8d87bc453349 247 return err;
ninoderkinderen 0:8d87bc453349 248
ninoderkinderen 0:8d87bc453349 249 ATIf::setReadMode(false); //Discard chars
ninoderkinderen 0:8d87bc453349 250 ATIf::setTimeout(60000);
ninoderkinderen 0:8d87bc453349 251 ATIf::setLineMode(true); //Line mode
ninoderkinderen 0:8d87bc453349 252 //
ninoderkinderen 0:8d87bc453349 253 //len = ATIf::printf("AT+CGDATA=\"PPP\",1"); //Connect using PDP context #1
ninoderkinderen 0:8d87bc453349 254 // len = ATIf::printf("ATDT *99***1#");
ninoderkinderen 0:8d87bc453349 255 len = ATIf::printf("ATDT *99#");
ninoderkinderen 0:8d87bc453349 256 if(!len)
ninoderkinderen 0:8d87bc453349 257 return GPRS_MODEM; //Nothing was actually sent
ninoderkinderen 0:8d87bc453349 258
ninoderkinderen 0:8d87bc453349 259 len = ATIf::scanf("CONNECT"); //Beginning of session
ninoderkinderen 0:8d87bc453349 260 if(len != 0) //Likely +CME ERROR was returned or NO CARRIER
ninoderkinderen 0:8d87bc453349 261 return GPRS_MODEM;
ninoderkinderen 0:8d87bc453349 262
ninoderkinderen 0:8d87bc453349 263 //ATIf::setSignals(false);
ninoderkinderen 0:8d87bc453349 264
ninoderkinderen 0:8d87bc453349 265 DBG("\r\nConnected.\r\n");
ninoderkinderen 0:8d87bc453349 266
ninoderkinderen 0:8d87bc453349 267 return GPRS_OK; //Time to enter a PPP Session !
ninoderkinderen 0:8d87bc453349 268
ninoderkinderen 0:8d87bc453349 269 }
ninoderkinderen 0:8d87bc453349 270
ninoderkinderen 0:8d87bc453349 271 GPRSErr GPRSModem::disconnect()
ninoderkinderen 0:8d87bc453349 272 {
ninoderkinderen 0:8d87bc453349 273 ATIf::flushBuffer();
ninoderkinderen 0:8d87bc453349 274 ATIf::setReadMode(false); //Discard chars
ninoderkinderen 0:8d87bc453349 275 ATIf::setTimeout(5000);
ninoderkinderen 0:8d87bc453349 276 ATIf::setLineMode(true); //Line mode
ninoderkinderen 0:8d87bc453349 277
ninoderkinderen 0:8d87bc453349 278 if( !!ATIf::checkOK() ) //Should be present at the end of connection
ninoderkinderen 0:8d87bc453349 279 return GPRS_MODEM;
ninoderkinderen 0:8d87bc453349 280
ninoderkinderen 0:8d87bc453349 281 GPRSErr err;
ninoderkinderen 0:8d87bc453349 282 err = setGPRSDown();
ninoderkinderen 0:8d87bc453349 283 if(err)
ninoderkinderen 0:8d87bc453349 284 return err;
ninoderkinderen 0:8d87bc453349 285
ninoderkinderen 0:8d87bc453349 286 DBG("\r\nDisconnected.\r\n");
ninoderkinderen 0:8d87bc453349 287
ninoderkinderen 0:8d87bc453349 288 return GPRS_OK;
ninoderkinderen 0:8d87bc453349 289 }
ninoderkinderen 0:8d87bc453349 290
ninoderkinderen 0:8d87bc453349 291 #endif
ninoderkinderen 0:8d87bc453349 292