chong wang / NetServices

old netservices

Dependents:   lab3-News_Reader1

Fork of NetServices by Segundo Equipo

drv/gprs/GPRSModem.cpp@8:1fb1dbb9ad9e, 2013-03-06 (annotated)

Committer:
cwang365
Date:
Wed Mar 06 00:34:07 2013 +0000
Revision:
8:1fb1dbb9ad9e
Parent:
0:ac1725ba162c 
old net services

Who changed what in which revision?

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