SMS Scheduler that will automatically send and receive text messages using the Enfora 1308 GSM Modem. Please note that it uses a modified NetServices library and to set the baud rate for the GSM Modem to 19.2K.

Dependencies:   mbed

Committer:
mafischl
Date:
Thu Oct 13 18:01:31 2011 +0000
Revision:
1:5a7cce9994a3
Parent:
0:d9266031f832

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mafischl 0:d9266031f832 1
mafischl 0:d9266031f832 2 /*
mafischl 0:d9266031f832 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
mafischl 0:d9266031f832 4
mafischl 0:d9266031f832 5 Permission is hereby granted, free of charge, to any person obtaining a copy
mafischl 0:d9266031f832 6 of this software and associated documentation files (the "Software"), to deal
mafischl 0:d9266031f832 7 in the Software without restriction, including without limitation the rights
mafischl 0:d9266031f832 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
mafischl 0:d9266031f832 9 copies of the Software, and to permit persons to whom the Software is
mafischl 0:d9266031f832 10 furnished to do so, subject to the following conditions:
mafischl 0:d9266031f832 11
mafischl 0:d9266031f832 12 The above copyright notice and this permission notice shall be included in
mafischl 0:d9266031f832 13 all copies or substantial portions of the Software.
mafischl 0:d9266031f832 14
mafischl 0:d9266031f832 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
mafischl 0:d9266031f832 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
mafischl 0:d9266031f832 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
mafischl 0:d9266031f832 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
mafischl 0:d9266031f832 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
mafischl 0:d9266031f832 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
mafischl 0:d9266031f832 21 THE SOFTWARE.
mafischl 0:d9266031f832 22 */
mafischl 0:d9266031f832 23
mafischl 0:d9266031f832 24 #include "SerialBuf.h"
mafischl 0:d9266031f832 25 #include "mbed.h"
mafischl 0:d9266031f832 26
mafischl 0:d9266031f832 27 //#define __DEBUG
mafischl 0:d9266031f832 28 #include "dbg/dbg.h"
mafischl 0:d9266031f832 29
mafischl 0:d9266031f832 30 #include "netCfg.h"
mafischl 0:d9266031f832 31 #if NET_GPRS
mafischl 0:d9266031f832 32
mafischl 0:d9266031f832 33 #if NET_USB_SERIAL
mafischl 0:d9266031f832 34 #define m_pStream( a ) (m_pSerial?m_pSerial->a:m_pUsbSerial->a)
mafischl 0:d9266031f832 35 #else
mafischl 0:d9266031f832 36 #define m_pStream( a ) (m_pSerial->a)
mafischl 0:d9266031f832 37 #endif
mafischl 0:d9266031f832 38
mafischl 0:d9266031f832 39 //Circular buf
mafischl 0:d9266031f832 40
mafischl 0:d9266031f832 41 SerialCircularBuf::SerialCircularBuf(int len) : m_readMode(false)
mafischl 0:d9266031f832 42 {
mafischl 0:d9266031f832 43 m_buf = new char[len];
mafischl 0:d9266031f832 44 m_len = len;
mafischl 0:d9266031f832 45 m_pReadStart = m_pRead = m_buf;
mafischl 0:d9266031f832 46 m_pWrite = m_buf;
mafischl 0:d9266031f832 47 }
mafischl 0:d9266031f832 48
mafischl 0:d9266031f832 49 SerialCircularBuf::~SerialCircularBuf()
mafischl 0:d9266031f832 50 {
mafischl 0:d9266031f832 51 if(m_buf)
mafischl 0:d9266031f832 52 delete[] m_buf;
mafischl 0:d9266031f832 53 }
mafischl 0:d9266031f832 54
mafischl 0:d9266031f832 55 int SerialCircularBuf::room() //Return room available in buf
mafischl 0:d9266031f832 56 {
mafischl 0:d9266031f832 57 //return m_len - len() - 1; //-1 is to avoid loop
mafischl 0:d9266031f832 58 if ( m_pReadStart > m_pWrite )
mafischl 0:d9266031f832 59 return ( m_pReadStart - m_pWrite - 1 );
mafischl 0:d9266031f832 60 else
mafischl 0:d9266031f832 61 return m_len - ( m_pWrite - m_pReadStart ) - 1;
mafischl 0:d9266031f832 62 }
mafischl 0:d9266031f832 63
mafischl 0:d9266031f832 64 int SerialCircularBuf::len() //Return chars length in buf
mafischl 0:d9266031f832 65 {
mafischl 0:d9266031f832 66 if ( m_pWrite >= m_pRead )
mafischl 0:d9266031f832 67 return ( m_pWrite - m_pRead );
mafischl 0:d9266031f832 68 else
mafischl 0:d9266031f832 69 return m_len - ( m_pRead - m_pWrite ); // = ( ( m_buf + m_len) - m_pRead ) + ( m_pWrite - m_buf )
mafischl 0:d9266031f832 70 }
mafischl 0:d9266031f832 71
mafischl 0:d9266031f832 72 void SerialCircularBuf::write(char c)
mafischl 0:d9266031f832 73 {
mafischl 0:d9266031f832 74 #if 0
mafischl 0:d9266031f832 75 if(!room())
mafischl 0:d9266031f832 76 return;
mafischl 0:d9266031f832 77 #endif
mafischl 0:d9266031f832 78 //WARN: Must call room() before
mafischl 0:d9266031f832 79 *m_pWrite = c;
mafischl 0:d9266031f832 80 m_pWrite++;
mafischl 0:d9266031f832 81 if(m_pWrite>=m_buf+m_len)
mafischl 0:d9266031f832 82 m_pWrite=m_buf;
mafischl 0:d9266031f832 83 }
mafischl 0:d9266031f832 84 char SerialCircularBuf::read()
mafischl 0:d9266031f832 85 {
mafischl 0:d9266031f832 86 #if 0
mafischl 0:d9266031f832 87 if(!len())
mafischl 0:d9266031f832 88 return 0;
mafischl 0:d9266031f832 89 #endif
mafischl 0:d9266031f832 90 //WARN: Must call len() before
mafischl 0:d9266031f832 91 char c = *m_pRead;
mafischl 0:d9266031f832 92 m_pRead++;
mafischl 0:d9266031f832 93
mafischl 0:d9266031f832 94 if(m_pRead>=m_buf+m_len)
mafischl 0:d9266031f832 95 m_pRead=m_buf;
mafischl 0:d9266031f832 96
mafischl 0:d9266031f832 97 if(!m_readMode) //If readmode=false, trash this char
mafischl 0:d9266031f832 98 m_pReadStart=m_pRead;
mafischl 0:d9266031f832 99
mafischl 0:d9266031f832 100 return c;
mafischl 0:d9266031f832 101 }
mafischl 0:d9266031f832 102
mafischl 0:d9266031f832 103 void SerialCircularBuf::setReadMode(bool readMode) //If true, keeps chars in buf when read, false by default
mafischl 0:d9266031f832 104 {
mafischl 0:d9266031f832 105 if(m_readMode == true && readMode == false)
mafischl 0:d9266031f832 106 {
mafischl 0:d9266031f832 107 //Trash bytes that have been read
mafischl 0:d9266031f832 108 flushRead();
mafischl 0:d9266031f832 109 }
mafischl 0:d9266031f832 110 m_readMode = readMode;
mafischl 0:d9266031f832 111 }
mafischl 0:d9266031f832 112
mafischl 0:d9266031f832 113 void SerialCircularBuf::flushRead() //Delete chars that have been read & return chars len (only useful with readMode = true)
mafischl 0:d9266031f832 114 {
mafischl 0:d9266031f832 115 m_pReadStart = m_pRead;
mafischl 0:d9266031f832 116 }
mafischl 0:d9266031f832 117
mafischl 0:d9266031f832 118 void SerialCircularBuf::resetRead() //Go back to initial read position & return chars len (only useful with readMode = true)
mafischl 0:d9266031f832 119 {
mafischl 0:d9266031f832 120 m_pRead = m_pReadStart;
mafischl 0:d9266031f832 121 }
mafischl 0:d9266031f832 122
mafischl 0:d9266031f832 123 //SerialBuf
mafischl 0:d9266031f832 124
mafischl 0:d9266031f832 125 SerialBuf::SerialBuf(int len) : m_rxBuf(len), m_txBuf(len), m_pSerial(NULL) //Buffer length
mafischl 0:d9266031f832 126 #if NET_USB_SERIAL
mafischl 0:d9266031f832 127 , m_pUsbSerial(NULL)
mafischl 0:d9266031f832 128 #endif
mafischl 0:d9266031f832 129 {
mafischl 0:d9266031f832 130 DBG("New Serial buf@%p\n", this);
mafischl 0:d9266031f832 131 }
mafischl 0:d9266031f832 132
mafischl 0:d9266031f832 133 SerialBuf::~SerialBuf()
mafischl 0:d9266031f832 134 {
mafischl 0:d9266031f832 135
mafischl 0:d9266031f832 136 }
mafischl 0:d9266031f832 137
mafischl 0:d9266031f832 138 void SerialBuf::attach(Serial* pSerial)
mafischl 0:d9266031f832 139 {
mafischl 0:d9266031f832 140 DBG("Serial buf@%p in attach\n", this);
mafischl 0:d9266031f832 141 m_pSerial = pSerial;
mafischl 0:d9266031f832 142 m_pSerial->attach<SerialBuf>(this, &SerialBuf::onRxInterrupt, Serial::RxIrq);
mafischl 0:d9266031f832 143 m_pSerial->attach<SerialBuf>(this, &SerialBuf::onTxInterrupt, Serial::TxIrq);
mafischl 0:d9266031f832 144 onRxInterrupt(); //Read data
mafischl 0:d9266031f832 145 }
mafischl 0:d9266031f832 146
mafischl 0:d9266031f832 147 void SerialBuf::detach()
mafischl 0:d9266031f832 148 {
mafischl 0:d9266031f832 149 if(m_pSerial)
mafischl 0:d9266031f832 150 {
mafischl 0:d9266031f832 151 m_pSerial->attach<SerialBuf>(NULL, NULL, Serial::RxIrq);
mafischl 0:d9266031f832 152 m_pSerial->attach<SerialBuf>(NULL, NULL, Serial::TxIrq);
mafischl 0:d9266031f832 153 m_pSerial = NULL;
mafischl 0:d9266031f832 154 }
mafischl 0:d9266031f832 155 #if NET_USB_SERIAL
mafischl 0:d9266031f832 156 else if(m_pUsbSerial)
mafischl 0:d9266031f832 157 {
mafischl 0:d9266031f832 158 m_pUsbSerial->attach<SerialBuf>(NULL, NULL, UsbSerial::RxIrq);
mafischl 0:d9266031f832 159 m_pUsbSerial->attach<SerialBuf>(NULL, NULL, UsbSerial::TxIrq);
mafischl 0:d9266031f832 160 m_pUsbSerial = NULL;
mafischl 0:d9266031f832 161 }
mafischl 0:d9266031f832 162 #endif
mafischl 0:d9266031f832 163 }
mafischl 0:d9266031f832 164
mafischl 0:d9266031f832 165 #if NET_USB_SERIAL
mafischl 0:d9266031f832 166 void SerialBuf::attach(UsbSerial* pUsbSerial)
mafischl 0:d9266031f832 167 {
mafischl 0:d9266031f832 168 m_pUsbSerial = pUsbSerial;
mafischl 0:d9266031f832 169 m_pUsbSerial->attach<SerialBuf>(this, &SerialBuf::onRxInterrupt, UsbSerial::RxIrq);
mafischl 0:d9266031f832 170 m_pUsbSerial->attach<SerialBuf>(this, &SerialBuf::onTxInterrupt, UsbSerial::TxIrq);
mafischl 0:d9266031f832 171 onRxInterrupt(); //Read data
mafischl 0:d9266031f832 172 }
mafischl 0:d9266031f832 173 #endif
mafischl 0:d9266031f832 174
mafischl 0:d9266031f832 175 char SerialBuf::getc()
mafischl 0:d9266031f832 176 {
mafischl 0:d9266031f832 177 while(!readable());
mafischl 0:d9266031f832 178 char c = m_rxBuf.read();
mafischl 0:d9266031f832 179 return c;
mafischl 0:d9266031f832 180 }
mafischl 0:d9266031f832 181
mafischl 0:d9266031f832 182 void SerialBuf::putc(char c)
mafischl 0:d9266031f832 183 {
mafischl 0:d9266031f832 184 while(!writeable());
mafischl 0:d9266031f832 185 m_txBuf.write(c);
mafischl 0:d9266031f832 186 onTxInterrupt();
mafischl 0:d9266031f832 187 }
mafischl 0:d9266031f832 188
mafischl 0:d9266031f832 189 bool SerialBuf::readable()
mafischl 0:d9266031f832 190 {
mafischl 0:d9266031f832 191 if( !m_rxBuf.len() ) //Fill buf if possible
mafischl 0:d9266031f832 192 onRxInterrupt();
mafischl 0:d9266031f832 193 return (m_rxBuf.len() > 0);
mafischl 0:d9266031f832 194 }
mafischl 0:d9266031f832 195
mafischl 0:d9266031f832 196 bool SerialBuf::writeable()
mafischl 0:d9266031f832 197 {
mafischl 0:d9266031f832 198 if( !m_txBuf.room() ) //Free buf is possible
mafischl 0:d9266031f832 199 onTxInterrupt();
mafischl 0:d9266031f832 200 return (m_txBuf.room() > 0);
mafischl 0:d9266031f832 201 }
mafischl 0:d9266031f832 202
mafischl 0:d9266031f832 203 void SerialBuf::setReadMode(bool readMode) //If true, keeps chars in buf when read, false by default
mafischl 0:d9266031f832 204 {
mafischl 0:d9266031f832 205 m_rxBuf.setReadMode(readMode);
mafischl 0:d9266031f832 206 }
mafischl 0:d9266031f832 207
mafischl 0:d9266031f832 208 void SerialBuf::flushRead() //Delete chars that have been read & return chars len (only useful with readMode = true)
mafischl 0:d9266031f832 209 {
mafischl 0:d9266031f832 210 m_rxBuf.flushRead();
mafischl 0:d9266031f832 211 }
mafischl 0:d9266031f832 212
mafischl 0:d9266031f832 213 void SerialBuf::resetRead() //Go back to initial read position & return chars len (only useful with readMode = true)
mafischl 0:d9266031f832 214 {
mafischl 0:d9266031f832 215 m_rxBuf.resetRead();
mafischl 0:d9266031f832 216 }
mafischl 0:d9266031f832 217
mafischl 0:d9266031f832 218 void SerialBuf::onRxInterrupt() //Callback from m_pSerial
mafischl 0:d9266031f832 219 {
mafischl 0:d9266031f832 220 while( m_rxBuf.room() && m_pStream(readable()) )
mafischl 0:d9266031f832 221 {
mafischl 0:d9266031f832 222 m_rxBuf.write(m_pStream(getc()));
mafischl 0:d9266031f832 223 }
mafischl 0:d9266031f832 224 }
mafischl 0:d9266031f832 225
mafischl 0:d9266031f832 226 void SerialBuf::onTxInterrupt() //Callback from m_pSerial
mafischl 0:d9266031f832 227 {
mafischl 0:d9266031f832 228 while( m_txBuf.len() && m_pStream(writeable()) )
mafischl 0:d9266031f832 229 {
mafischl 0:d9266031f832 230 m_pStream(putc(m_txBuf.read()));
mafischl 0:d9266031f832 231 }
mafischl 0:d9266031f832 232 }
mafischl 0:d9266031f832 233
mafischl 0:d9266031f832 234
mafischl 0:d9266031f832 235 #endif