Michiel Berckvens / Mbed 2 deprecated ProjectHTTP

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependencies:   DS1307 TextLCD mbed

NetServices/drv/gprsmodule/TelitModule.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 "TelitModule.h"
Michielber 0:f615d151a72c 25
Michielber 0:f615d151a72c 26 #include "mbed.h"
Michielber 0:f615d151a72c 27
Michielber 0:f615d151a72c 28 //#define __DEBUG
Michielber 0:f615d151a72c 29 #include "dbg/dbg.h"
Michielber 0:f615d151a72c 30
Michielber 0:f615d151a72c 31 #include "netCfg.h"
Michielber 0:f615d151a72c 32 #if NET_GPRS_MODULE
Michielber 0:f615d151a72c 33
Michielber 0:f615d151a72c 34 TelitModule::TelitModule(PinName pwrSetPin, PinName pwrMonPin) : m_pwrSetPin(pwrSetPin), m_pwrMonPin(pwrMonPin)
Michielber 0:f615d151a72c 35 {
Michielber 0:f615d151a72c 36 //m_pwrSetPin.write(0);
Michielber 0:f615d151a72c 37
Michielber 0:f615d151a72c 38 //m_pwrMonPin.mode(PullDown);
Michielber 0:f615d151a72c 39 }
Michielber 0:f615d151a72c 40
Michielber 0:f615d151a72c 41 TelitModule::~TelitModule() {
Michielber 0:f615d151a72c 42
Michielber 0:f615d151a72c 43 }
Michielber 0:f615d151a72c 44
Michielber 0:f615d151a72c 45 bool TelitModule::isOn() //True if on
Michielber 0:f615d151a72c 46 {
Michielber 0:f615d151a72c 47 return m_pwrMonPin.read();
Michielber 0:f615d151a72c 48 }
Michielber 0:f615d151a72c 49
Michielber 0:f615d151a72c 50 bool TelitModule::on() //True if OK
Michielber 0:f615d151a72c 51 {
Michielber 0:f615d151a72c 52 Timer tmr;
Michielber 0:f615d151a72c 53 if(!m_pwrMonPin.read()){
Michielber 0:f615d151a72c 54 //On
Michielber 0:f615d151a72c 55 DBG("Switching On...\n");
Michielber 0:f615d151a72c 56 m_pwrSetPin.write(1);
Michielber 0:f615d151a72c 57 wait(1.);
Michielber 0:f615d151a72c 58 m_pwrSetPin.write(0);
Michielber 0:f615d151a72c 59
Michielber 0:f615d151a72c 60 tmr.start();
Michielber 0:f615d151a72c 61 while(!m_pwrMonPin.read())
Michielber 0:f615d151a72c 62 {
Michielber 0:f615d151a72c 63 wait(.001);
Michielber 0:f615d151a72c 64 if(tmr.read() > 2)
Michielber 0:f615d151a72c 65 {
Michielber 0:f615d151a72c 66 DBG("ERROR - MUST RESET MODULE\n");
Michielber 0:f615d151a72c 67 break;
Michielber 0:f615d151a72c 68 }
Michielber 0:f615d151a72c 69 }
Michielber 0:f615d151a72c 70 tmr.stop();
Michielber 0:f615d151a72c 71 }
Michielber 0:f615d151a72c 72 wait(.1);
Michielber 0:f615d151a72c 73 return m_pwrMonPin.read();
Michielber 0:f615d151a72c 74 }
Michielber 0:f615d151a72c 75
Michielber 0:f615d151a72c 76 bool TelitModule::off() { //True if OK
Michielber 0:f615d151a72c 77 Timer tmr;
Michielber 0:f615d151a72c 78 if(m_pwrMonPin.read()){
Michielber 0:f615d151a72c 79 //Off
Michielber 0:f615d151a72c 80 DBG("Switching Off...\n");
Michielber 0:f615d151a72c 81 m_pwrSetPin.write(1);
Michielber 0:f615d151a72c 82 wait(3.);
Michielber 0:f615d151a72c 83 m_pwrSetPin.write(0);
Michielber 0:f615d151a72c 84 DBG("Waiting....\n");
Michielber 0:f615d151a72c 85 tmr.start();
Michielber 0:f615d151a72c 86 while(m_pwrMonPin.read())
Michielber 0:f615d151a72c 87 {
Michielber 0:f615d151a72c 88 wait(.001);
Michielber 0:f615d151a72c 89 if(tmr.read() > 15)
Michielber 0:f615d151a72c 90 {
Michielber 0:f615d151a72c 91 DBG("ERROR - MUST RESET MODULE\n");
Michielber 0:f615d151a72c 92 break;
Michielber 0:f615d151a72c 93 }
Michielber 0:f615d151a72c 94 }
Michielber 0:f615d151a72c 95 tmr.stop();
Michielber 0:f615d151a72c 96 }
Michielber 0:f615d151a72c 97 return !m_pwrMonPin.read();
Michielber 0:f615d151a72c 98 }
Michielber 0:f615d151a72c 99
Michielber 0:f615d151a72c 100 #endif