Michiel Berckvens / Mbed 2 deprecated ProjectHTTP

Dependencies:   DS1307 TextLCD mbed

NetServices/if/gprsmodule/GPRSModuleNetIf.cpp@5:6878defcfeb9, 2014-12-11 (annotated)

Committer:
Michielber
Date:
Thu Dec 11 16:07:34 2014 +0000
Revision:
5:6878defcfeb9
Parent:
0:f615d151a72c 
Project updated belastingslijn

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Michielber 0:f615d151a72c 1
Michielber 0:f615d151a72c 2 /*
Michielber 0:f615d151a72c 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
Michielber 0:f615d151a72c 4
Michielber 0:f615d151a72c 5 Permission is hereby granted, free of charge, to any person obtaining a copy
Michielber 0:f615d151a72c 6 of this software and associated documentation files (the "Software"), to deal
Michielber 0:f615d151a72c 7 in the Software without restriction, including without limitation the rights
Michielber 0:f615d151a72c 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
Michielber 0:f615d151a72c 9 copies of the Software, and to permit persons to whom the Software is
Michielber 0:f615d151a72c 10 furnished to do so, subject to the following conditions:
Michielber 0:f615d151a72c 11
Michielber 0:f615d151a72c 12 The above copyright notice and this permission notice shall be included in
Michielber 0:f615d151a72c 13 all copies or substantial portions of the Software.
Michielber 0:f615d151a72c 14
Michielber 0:f615d151a72c 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
Michielber 0:f615d151a72c 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
Michielber 0:f615d151a72c 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
Michielber 0:f615d151a72c 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
Michielber 0:f615d151a72c 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
Michielber 0:f615d151a72c 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
Michielber 0:f615d151a72c 21 THE SOFTWARE.
Michielber 0:f615d151a72c 22 */
Michielber 0:f615d151a72c 23
Michielber 0:f615d151a72c 24 #include "netCfg.h"
Michielber 0:f615d151a72c 25 #if NET_GPRS_MODULE
Michielber 0:f615d151a72c 26
Michielber 0:f615d151a72c 27 #include "GPRSModuleNetIf.h"
Michielber 0:f615d151a72c 28
Michielber 0:f615d151a72c 29 #define __DEBUG
Michielber 0:f615d151a72c 30 #include "dbg/dbg.h"
Michielber 0:f615d151a72c 31
Michielber 0:f615d151a72c 32 GPRSModuleNetIf::GPRSModuleNetIf(PinName tx, PinName rx, int baud /*= 115200*/) : PPPNetIf(NULL), m_serial(tx, rx)
Michielber 0:f615d151a72c 33 {
Michielber 0:f615d151a72c 34 PPPNetIf::m_pIf = new GPRSModem();
Michielber 0:f615d151a72c 35 m_serial.baud(baud);
Michielber 0:f615d151a72c 36 }
Michielber 0:f615d151a72c 37
Michielber 0:f615d151a72c 38 GPRSModuleNetIf::~GPRSModuleNetIf()
Michielber 0:f615d151a72c 39 {
Michielber 0:f615d151a72c 40 delete PPPNetIf::m_pIf;
Michielber 0:f615d151a72c 41 }
Michielber 0:f615d151a72c 42
Michielber 0:f615d151a72c 43 PPPErr GPRSModuleNetIf::connect(const char* apn /*= NULL*/, const char* userId /*= NULL*/, const char* password /*= NULL*/) //Connect using GPRS
Michielber 0:f615d151a72c 44 {
Michielber 0:f615d151a72c 45
Michielber 0:f615d151a72c 46 DBG("Powering on module.\n")
Michielber 0:f615d151a72c 47 if(!setOn()) //Could not power on module
Michielber 0:f615d151a72c 48 {
Michielber 0:f615d151a72c 49 DBG("Could not power on module.\n");
Michielber 0:f615d151a72c 50 return PPP_MODEM;
Michielber 0:f615d151a72c 51 }
Michielber 0:f615d151a72c 52
Michielber 0:f615d151a72c 53 //wait(10); //Wait for module to init.
Michielber 0:f615d151a72c 54
Michielber 0:f615d151a72c 55 ATErr atErr;
Michielber 0:f615d151a72c 56 for(int i=0; i<3; i++)
Michielber 0:f615d151a72c 57 {
Michielber 0:f615d151a72c 58 atErr = m_pIf->open(&m_serial); //3 tries
Michielber 0:f615d151a72c 59 if(!atErr)
Michielber 0:f615d151a72c 60 break;
Michielber 0:f615d151a72c 61 DBG("Could not open AT If, trying again.\n");
Michielber 0:f615d151a72c 62 wait(4);
Michielber 0:f615d151a72c 63 }
Michielber 0:f615d151a72c 64
Michielber 0:f615d151a72c 65 if(atErr)
Michielber 0:f615d151a72c 66 {
Michielber 0:f615d151a72c 67 setOff();
Michielber 0:f615d151a72c 68 return PPP_MODEM;
Michielber 0:f615d151a72c 69 }
Michielber 0:f615d151a72c 70
Michielber 0:f615d151a72c 71 DBG("AT If opened.\n");
Michielber 0:f615d151a72c 72
Michielber 0:f615d151a72c 73 PPPErr pppErr;
Michielber 0:f615d151a72c 74 for(int i=0; i<3; i++)
Michielber 0:f615d151a72c 75 {
Michielber 0:f615d151a72c 76 DBG("Trying to connect.\n");
Michielber 0:f615d151a72c 77 pppErr = PPPNetIf::GPRSConnect(apn, userId, password);
Michielber 0:f615d151a72c 78 if(!pppErr)
Michielber 0:f615d151a72c 79 break;
Michielber 0:f615d151a72c 80 DBG("Could not connect.\n");
Michielber 0:f615d151a72c 81 wait(4);
Michielber 0:f615d151a72c 82 }
Michielber 0:f615d151a72c 83 if(pppErr)
Michielber 0:f615d151a72c 84 {
Michielber 0:f615d151a72c 85 setOff();
Michielber 0:f615d151a72c 86 return pppErr;
Michielber 0:f615d151a72c 87 }
Michielber 0:f615d151a72c 88
Michielber 0:f615d151a72c 89 DBG("Connected.\n");
Michielber 0:f615d151a72c 90
Michielber 0:f615d151a72c 91 return PPP_OK;
Michielber 0:f615d151a72c 92 }
Michielber 0:f615d151a72c 93
Michielber 0:f615d151a72c 94 PPPErr GPRSModuleNetIf::disconnect()
Michielber 0:f615d151a72c 95 {
Michielber 0:f615d151a72c 96 DBG("Disconnecting...\n");
Michielber 0:f615d151a72c 97 PPPErr pppErr = PPPNetIf::disconnect();
Michielber 0:f615d151a72c 98 if(pppErr)
Michielber 0:f615d151a72c 99 return pppErr;
Michielber 0:f615d151a72c 100
Michielber 0:f615d151a72c 101 m_pIf->close();
Michielber 0:f615d151a72c 102
Michielber 0:f615d151a72c 103 DBG("Powering off module.\n")
Michielber 0:f615d151a72c 104 setOff(); //Power off module
Michielber 0:f615d151a72c 105
Michielber 0:f615d151a72c 106 DBG("Off.\n")
Michielber 0:f615d151a72c 107
Michielber 0:f615d151a72c 108 return PPP_OK;
Michielber 0:f615d151a72c 109 }
Michielber 0:f615d151a72c 110
Michielber 0:f615d151a72c 111
Michielber 0:f615d151a72c 112 #endif