First step: AutoIP compiled in and working

Dependencies:   mbed

Committer:
darran
Date:
Fri Jun 18 15:54:21 2010 +0000
Revision:
1:4218cacaf696
Parent:
0:55a05330f8cc

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
darran 0:55a05330f8cc 1
darran 0:55a05330f8cc 2 /*
darran 0:55a05330f8cc 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
darran 0:55a05330f8cc 4
darran 0:55a05330f8cc 5 Permission is hereby granted, free of charge, to any person obtaining a copy
darran 0:55a05330f8cc 6 of this software and associated documentation files (the "Software"), to deal
darran 0:55a05330f8cc 7 in the Software without restriction, including without limitation the rights
darran 0:55a05330f8cc 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
darran 0:55a05330f8cc 9 copies of the Software, and to permit persons to whom the Software is
darran 0:55a05330f8cc 10 furnished to do so, subject to the following conditions:
darran 0:55a05330f8cc 11
darran 0:55a05330f8cc 12 The above copyright notice and this permission notice shall be included in
darran 0:55a05330f8cc 13 all copies or substantial portions of the Software.
darran 0:55a05330f8cc 14
darran 0:55a05330f8cc 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
darran 0:55a05330f8cc 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
darran 0:55a05330f8cc 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
darran 0:55a05330f8cc 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
darran 0:55a05330f8cc 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
darran 0:55a05330f8cc 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
darran 0:55a05330f8cc 21 THE SOFTWARE.
darran 0:55a05330f8cc 22 */
darran 0:55a05330f8cc 23
darran 0:55a05330f8cc 24 #include "ATIf.h"
darran 0:55a05330f8cc 25 #include "mbed.h"
darran 0:55a05330f8cc 26 #include <cstdarg>
darran 0:55a05330f8cc 27
darran 0:55a05330f8cc 28 #define READ_TIMEOUT 100
darran 0:55a05330f8cc 29 #define TMP_BUF_SIZE 128//512
darran 0:55a05330f8cc 30
darran 0:55a05330f8cc 31 #define SERIAL_BUF_LEN 512 //Huge buf needed for PPP (esp. when transferring big data chunks, using TCP)
darran 0:55a05330f8cc 32
darran 0:55a05330f8cc 33 #define BAUDRATE 9600//9600//115200// 19200
darran 0:55a05330f8cc 34
darran 0:55a05330f8cc 35 #include "netCfg.h"
darran 0:55a05330f8cc 36 #if NET_GPRS
darran 0:55a05330f8cc 37
darran 0:55a05330f8cc 38 //#define __DEBUG
darran 0:55a05330f8cc 39 #include "dbg/dbg.h"
darran 0:55a05330f8cc 40
darran 0:55a05330f8cc 41 ATIf::ATIf() : SerialBuf(SERIAL_BUF_LEN), m_signalsEnable(false), m_isOpen(false), m_pCurrentSignal(NULL), m_signals()
darran 0:55a05330f8cc 42 {
darran 0:55a05330f8cc 43 m_readTimeout = READ_TIMEOUT; //default 1s
darran 0:55a05330f8cc 44 //tmpBuf = NULL;
darran 0:55a05330f8cc 45 m_tmpBuf = new char[TMP_BUF_SIZE];
darran 0:55a05330f8cc 46 }
darran 0:55a05330f8cc 47
darran 0:55a05330f8cc 48 ATIf::~ATIf()
darran 0:55a05330f8cc 49 {
darran 0:55a05330f8cc 50 if(m_tmpBuf)
darran 0:55a05330f8cc 51 delete[] m_tmpBuf;
darran 0:55a05330f8cc 52 }
darran 0:55a05330f8cc 53
darran 0:55a05330f8cc 54 int ATIf::printf(const char* format, ... )
darran 0:55a05330f8cc 55 {
darran 0:55a05330f8cc 56
darran 0:55a05330f8cc 57 /*if(!m_tmpBuf)
darran 0:55a05330f8cc 58 m_tmpBuf = new char[TMP_BUF_SIZE]; //is it really necessary ??*/
darran 0:55a05330f8cc 59 *m_tmpBuf=0;
darran 0:55a05330f8cc 60
darran 0:55a05330f8cc 61 int len = 0;
darran 0:55a05330f8cc 62
darran 0:55a05330f8cc 63 //
darran 0:55a05330f8cc 64 // flushBuffer();
darran 0:55a05330f8cc 65 //wait(1);
darran 0:55a05330f8cc 66 //
darran 0:55a05330f8cc 67
darran 0:55a05330f8cc 68 va_list argp;
darran 0:55a05330f8cc 69
darran 0:55a05330f8cc 70 va_start(argp, format);
darran 0:55a05330f8cc 71 len += vsprintf(m_tmpBuf, format, argp);
darran 0:55a05330f8cc 72 va_end(argp);
darran 0:55a05330f8cc 73
darran 0:55a05330f8cc 74 //DBG("\r\nOutBuf is : %s, mode is %d.", m_tmpBuf, m_lineMode);
darran 0:55a05330f8cc 75
darran 0:55a05330f8cc 76 int err = write( m_tmpBuf, m_lineMode );
darran 0:55a05330f8cc 77 if (err<0)
darran 0:55a05330f8cc 78 return 0;
darran 0:55a05330f8cc 79
darran 0:55a05330f8cc 80 return len;
darran 0:55a05330f8cc 81
darran 0:55a05330f8cc 82 }
darran 0:55a05330f8cc 83
darran 0:55a05330f8cc 84 int ATIf::scanf(const char* format, ... )
darran 0:55a05330f8cc 85 {
darran 0:55a05330f8cc 86 /*if(!m_tmpBuf)
darran 0:55a05330f8cc 87 m_tmpBuf = new char[TMP_BUF_SIZE];*/
darran 0:55a05330f8cc 88 int err = read( m_tmpBuf, TMP_BUF_SIZE - 1, m_readTimeout, m_lineMode, 1/*Ensure at least one char is read*/ );
darran 0:55a05330f8cc 89 if (err<0)
darran 0:55a05330f8cc 90 return -1;//EOF
darran 0:55a05330f8cc 91
darran 0:55a05330f8cc 92 DBG("Scanf'ing:\r\n%s\r\n",m_tmpBuf);
darran 0:55a05330f8cc 93
darran 0:55a05330f8cc 94 int len = 0;
darran 0:55a05330f8cc 95
darran 0:55a05330f8cc 96 if(strchr(format,'%')) //Ugly, determines wether format string is null or not
darran 0:55a05330f8cc 97 {
darran 0:55a05330f8cc 98 va_list argp;
darran 0:55a05330f8cc 99
darran 0:55a05330f8cc 100 va_start(argp, format);
darran 0:55a05330f8cc 101 len += vsscanf(m_tmpBuf, format, argp);
darran 0:55a05330f8cc 102 va_end(argp);
darran 0:55a05330f8cc 103 }
darran 0:55a05330f8cc 104 else //No varargs, call strncmp
darran 0:55a05330f8cc 105 {
darran 0:55a05330f8cc 106 /* if(strlen(m_tmpBuf) == 0 )
darran 0:55a05330f8cc 107 return -1;*/
darran 0:55a05330f8cc 108 if( !strncmp(m_tmpBuf, format, strlen(format)) )
darran 0:55a05330f8cc 109 {
darran 0:55a05330f8cc 110 return 0;
darran 0:55a05330f8cc 111 }
darran 0:55a05330f8cc 112 else
darran 0:55a05330f8cc 113 {
darran 0:55a05330f8cc 114 return -1;
darran 0:55a05330f8cc 115 }
darran 0:55a05330f8cc 116 }
darran 0:55a05330f8cc 117
darran 0:55a05330f8cc 118 return len;
darran 0:55a05330f8cc 119
darran 0:55a05330f8cc 120 }
darran 0:55a05330f8cc 121
darran 0:55a05330f8cc 122 void ATIf::setTimeout(int timeout) //used by scanf
darran 0:55a05330f8cc 123 {
darran 0:55a05330f8cc 124 m_readTimeout = timeout;
darran 0:55a05330f8cc 125 }
darran 0:55a05330f8cc 126
darran 0:55a05330f8cc 127 void ATIf::setLineMode(bool lineMode) //Switch btw line & raw fns
darran 0:55a05330f8cc 128 {
darran 0:55a05330f8cc 129 m_lineMode = lineMode;
darran 0:55a05330f8cc 130 }
darran 0:55a05330f8cc 131
darran 0:55a05330f8cc 132 void ATIf::setSignals(bool signalsEnable)
darran 0:55a05330f8cc 133 {
darran 0:55a05330f8cc 134 m_signalsEnable=signalsEnable;
darran 0:55a05330f8cc 135 }
darran 0:55a05330f8cc 136
darran 0:55a05330f8cc 137 #ifdef __LINKING_SCRIPT_BUG_SOLVED__
darran 0:55a05330f8cc 138 template<class T>
darran 0:55a05330f8cc 139 void ATIf::attachSignal( const char* sigName, T* pItem, bool (T::*pMethod)(ATIf*, bool, bool*) ) //Attach Signal ("Unsollicited response code" in Telit_AT_Reference_Guide.pdf) to an handler fn
darran 0:55a05330f8cc 140 {
darran 0:55a05330f8cc 141 ATSigHandler sig(sigName, (ATSigHandler::CDummy*)pItem, (bool (ATSigHandler::CDummy::*)(ATIf*, bool, bool*))pMethod);
darran 0:55a05330f8cc 142 m_signals.push_back(sig);
darran 0:55a05330f8cc 143 }
darran 0:55a05330f8cc 144 #else
darran 0:55a05330f8cc 145 //defined in ATIf.h directly
darran 0:55a05330f8cc 146 //(it's ugly, I know ;))
darran 0:55a05330f8cc 147 #endif
darran 0:55a05330f8cc 148
darran 0:55a05330f8cc 149 void ATIf::detachSignal( const char* sigName )
darran 0:55a05330f8cc 150 {
darran 0:55a05330f8cc 151 list<ATSigHandler>::iterator it;
darran 0:55a05330f8cc 152
darran 0:55a05330f8cc 153 for ( it = m_signals.begin(); it != m_signals.end(); it++ )
darran 0:55a05330f8cc 154 {
darran 0:55a05330f8cc 155 if( !strcmp((*it).m_name,sigName) )
darran 0:55a05330f8cc 156 {
darran 0:55a05330f8cc 157 m_signals.erase(it);
darran 0:55a05330f8cc 158 break;
darran 0:55a05330f8cc 159 }
darran 0:55a05330f8cc 160 }
darran 0:55a05330f8cc 161 }
darran 0:55a05330f8cc 162
darran 0:55a05330f8cc 163 ATErr ATIf::open(Serial* pSerial) //Deactivate echo, etc
darran 0:55a05330f8cc 164 {
darran 0:55a05330f8cc 165 DBG("\r\nOpening...");
darran 0:55a05330f8cc 166 m_isOpen = true; //Must be set so that the serial port-related fns work
darran 0:55a05330f8cc 167 //Setup options
darran 0:55a05330f8cc 168 // pSerial->baud(BAUDRATE); //FIXME
darran 0:55a05330f8cc 169 SerialBuf::attach(pSerial);
darran 0:55a05330f8cc 170
darran 0:55a05330f8cc 171 setReadMode(false); //Discard chars
darran 0:55a05330f8cc 172 setTimeout(1000);
darran 0:55a05330f8cc 173 setLineMode(true); //Line Mode
darran 0:55a05330f8cc 174
darran 0:55a05330f8cc 175 DBG("\r\nTrmt...");
darran 0:55a05330f8cc 176 // printf("AT+IPR=%d", BAUDRATE); //FIXME
darran 0:55a05330f8cc 177 wait(.100);
darran 0:55a05330f8cc 178 printf("ATE"); //Deactivate echo
darran 0:55a05330f8cc 179 wait(.500);
darran 0:55a05330f8cc 180 flushBuffer();
darran 0:55a05330f8cc 181
darran 0:55a05330f8cc 182 DBG("\r\nATE OK.");
darran 0:55a05330f8cc 183
darran 0:55a05330f8cc 184 int len = writeLine("ATV1");
darran 0:55a05330f8cc 185 ATErr err = AT_OK;
darran 0:55a05330f8cc 186 if(len<0)
darran 0:55a05330f8cc 187 err=(ATErr)len;
darran 0:55a05330f8cc 188
darran 0:55a05330f8cc 189 if(!err)
darran 0:55a05330f8cc 190 {
darran 0:55a05330f8cc 191 err = checkOK();
darran 0:55a05330f8cc 192 if (err) //No ACK from module
darran 0:55a05330f8cc 193 {
darran 0:55a05330f8cc 194 DBG("\r\nOpening port, error %d.", err);
darran 0:55a05330f8cc 195 if(err==AT_TIMEOUT)
darran 0:55a05330f8cc 196 err = AT_NOANSWER;
darran 0:55a05330f8cc 197 }
darran 0:55a05330f8cc 198 }
darran 0:55a05330f8cc 199
darran 0:55a05330f8cc 200 if(err)
darran 0:55a05330f8cc 201 {
darran 0:55a05330f8cc 202 SerialBuf::detach();
darran 0:55a05330f8cc 203 m_isOpen = false;
darran 0:55a05330f8cc 204 return err;
darran 0:55a05330f8cc 205 }
darran 0:55a05330f8cc 206
darran 0:55a05330f8cc 207 DBG("\r\nNo error.");
darran 0:55a05330f8cc 208 #if 0//FIXME
darran 0:55a05330f8cc 209 m_signalsEnable = true;
darran 0:55a05330f8cc 210 #endif
darran 0:55a05330f8cc 211 //FIXME:
darran 0:55a05330f8cc 212 // m_pSerial->attach<ATIf>(this, &ATIf::onSerialInterrupt);
darran 0:55a05330f8cc 213
darran 0:55a05330f8cc 214 return AT_OK;
darran 0:55a05330f8cc 215 }
darran 0:55a05330f8cc 216
darran 0:55a05330f8cc 217 #if NET_USB_SERIAL
darran 0:55a05330f8cc 218 ATErr ATIf::open(UsbSerial* pUsbSerial) //Deactivate echo, etc
darran 0:55a05330f8cc 219 {
darran 0:55a05330f8cc 220 DBG("\r\nOpening...");
darran 0:55a05330f8cc 221 m_isOpen = true; //Must be set so that the serial port-related fns work
darran 0:55a05330f8cc 222 //Setup options
darran 0:55a05330f8cc 223 SerialBuf::attach(pUsbSerial);
darran 0:55a05330f8cc 224
darran 0:55a05330f8cc 225 setReadMode(false); //Discard chars
darran 0:55a05330f8cc 226 setTimeout(1000);
darran 0:55a05330f8cc 227 setLineMode(true); //Line Mode
darran 0:55a05330f8cc 228
darran 0:55a05330f8cc 229 printf("ATZ"); //Reinit
darran 0:55a05330f8cc 230 wait(.500);
darran 0:55a05330f8cc 231 //flushBuffer();
darran 0:55a05330f8cc 232 // printf("ATE0 ^CURC=0"); //Deactivate echo & notif
darran 0:55a05330f8cc 233 printf("ATE0"); //Deactivate echo & notif
darran 0:55a05330f8cc 234 wait(.500);
darran 0:55a05330f8cc 235 flushBuffer();
darran 0:55a05330f8cc 236
darran 0:55a05330f8cc 237 DBG("\r\nATE OK.");
darran 0:55a05330f8cc 238
darran 0:55a05330f8cc 239 int len = writeLine("ATQ0 V1 S0=0 &C1 &D2 +FCLASS=0");//writeLine("ATQ0 V1 S0=0 &C1 &D2 +FCLASS=0");
darran 0:55a05330f8cc 240 ATErr err = AT_OK;
darran 0:55a05330f8cc 241 if(len<0)
darran 0:55a05330f8cc 242 err=(ATErr)len;
darran 0:55a05330f8cc 243
darran 0:55a05330f8cc 244 if(!err)
darran 0:55a05330f8cc 245 {
darran 0:55a05330f8cc 246 err = checkOK();
darran 0:55a05330f8cc 247 if (err) //No ACK from module
darran 0:55a05330f8cc 248 {
darran 0:55a05330f8cc 249 DBG("\r\nOpening port, error %d.", err);
darran 0:55a05330f8cc 250 if(err==AT_TIMEOUT)
darran 0:55a05330f8cc 251 err = AT_NOANSWER;
darran 0:55a05330f8cc 252 }
darran 0:55a05330f8cc 253 }
darran 0:55a05330f8cc 254
darran 0:55a05330f8cc 255 if(err)
darran 0:55a05330f8cc 256 {
darran 0:55a05330f8cc 257 SerialBuf::detach();
darran 0:55a05330f8cc 258 m_isOpen = false;
darran 0:55a05330f8cc 259 return err;
darran 0:55a05330f8cc 260 }
darran 0:55a05330f8cc 261
darran 0:55a05330f8cc 262 DBG("\r\nNo error.");
darran 0:55a05330f8cc 263 m_signalsEnable = true;
darran 0:55a05330f8cc 264 //FIXME:
darran 0:55a05330f8cc 265 // m_pSerial->attach<ATIf>(this, &ATIf::onSerialInterrupt);
darran 0:55a05330f8cc 266
darran 0:55a05330f8cc 267 return AT_OK;
darran 0:55a05330f8cc 268 }
darran 0:55a05330f8cc 269 #endif
darran 0:55a05330f8cc 270
darran 0:55a05330f8cc 271 ATErr ATIf::close() //Release port
darran 0:55a05330f8cc 272 {
darran 0:55a05330f8cc 273 SerialBuf::detach(); //Detach serial buf
darran 0:55a05330f8cc 274 m_isOpen = false;
darran 0:55a05330f8cc 275 m_signalsEnable = false;
darran 0:55a05330f8cc 276 return AT_OK;
darran 0:55a05330f8cc 277 }
darran 0:55a05330f8cc 278
darran 0:55a05330f8cc 279 ATErr ATIf::flushBuffer()
darran 0:55a05330f8cc 280 {
darran 0:55a05330f8cc 281 if(!m_isOpen)
darran 0:55a05330f8cc 282 return AT_CLOSED;
darran 0:55a05330f8cc 283
darran 0:55a05330f8cc 284 int len=0;
darran 0:55a05330f8cc 285 // char c;
darran 0:55a05330f8cc 286 while(readable())
darran 0:55a05330f8cc 287 {
darran 0:55a05330f8cc 288 /* c = */ getc();
darran 0:55a05330f8cc 289 // DBG("\r\n[%c] discarded.", c);
darran 0:55a05330f8cc 290 // wait(0.01);
darran 0:55a05330f8cc 291 len++;
darran 0:55a05330f8cc 292 }
darran 0:55a05330f8cc 293
darran 0:55a05330f8cc 294 DBG("\r\n%d chars discarded.", len);
darran 0:55a05330f8cc 295
darran 0:55a05330f8cc 296 return AT_OK;
darran 0:55a05330f8cc 297 }
darran 0:55a05330f8cc 298
darran 0:55a05330f8cc 299 ATErr ATIf::flushLine(int timeout)
darran 0:55a05330f8cc 300 {
darran 0:55a05330f8cc 301 if(!m_isOpen)
darran 0:55a05330f8cc 302 return AT_CLOSED;
darran 0:55a05330f8cc 303
darran 0:55a05330f8cc 304 Timer timer;
darran 0:55a05330f8cc 305
darran 0:55a05330f8cc 306 timer.start();
darran 0:55a05330f8cc 307
darran 0:55a05330f8cc 308 int len=0;
darran 0:55a05330f8cc 309 char c=0;
darran 0:55a05330f8cc 310 while(true)
darran 0:55a05330f8cc 311 {
darran 0:55a05330f8cc 312 while(!readable())
darran 0:55a05330f8cc 313 { if(timer.read_ms()>timeout)
darran 0:55a05330f8cc 314 {
darran 0:55a05330f8cc 315 // DBG("Timeout!!0");
darran 0:55a05330f8cc 316 return AT_TIMEOUT;
darran 0:55a05330f8cc 317 }
darran 0:55a05330f8cc 318 }
darran 0:55a05330f8cc 319 if(c=='\x0D')
darran 0:55a05330f8cc 320 {
darran 0:55a05330f8cc 321 c = getc();
darran 0:55a05330f8cc 322 len++;
darran 0:55a05330f8cc 323 if(c=='\x0A')
darran 0:55a05330f8cc 324 break;
darran 0:55a05330f8cc 325 }
darran 0:55a05330f8cc 326 else
darran 0:55a05330f8cc 327 {
darran 0:55a05330f8cc 328 c = getc();
darran 0:55a05330f8cc 329 len++;
darran 0:55a05330f8cc 330 }
darran 0:55a05330f8cc 331 }
darran 0:55a05330f8cc 332
darran 0:55a05330f8cc 333 // DBG("\r\n%d chars discarded.", len);
darran 0:55a05330f8cc 334
darran 0:55a05330f8cc 335 return AT_OK;
darran 0:55a05330f8cc 336 }
darran 0:55a05330f8cc 337
darran 0:55a05330f8cc 338 bool ATIf::onRead()
darran 0:55a05330f8cc 339 {
darran 0:55a05330f8cc 340 if(!m_signalsEnable)
darran 0:55a05330f8cc 341 return false;
darran 0:55a05330f8cc 342
darran 0:55a05330f8cc 343 //Save Usermode params
darran 0:55a05330f8cc 344 volatile int u_readTimeout = m_readTimeout;
darran 0:55a05330f8cc 345 volatile bool u_lineMode = m_lineMode;
darran 0:55a05330f8cc 346 // bool u_isOpen = m_isOpen;
darran 0:55a05330f8cc 347 SerialBuf::setReadMode(true);
darran 0:55a05330f8cc 348
darran 0:55a05330f8cc 349 m_readTimeout = 0; //No timeout in an interrupt fn!
darran 0:55a05330f8cc 350
darran 0:55a05330f8cc 351 bool handled;
darran 0:55a05330f8cc 352 if(!!flushLine(0))
darran 0:55a05330f8cc 353 {
darran 0:55a05330f8cc 354 SerialBuf::resetRead();
darran 0:55a05330f8cc 355 //Not a complete line here, wait...
darran 0:55a05330f8cc 356 handled = false;
darran 0:55a05330f8cc 357 }
darran 0:55a05330f8cc 358 else
darran 0:55a05330f8cc 359 {
darran 0:55a05330f8cc 360 SerialBuf::resetRead();
darran 0:55a05330f8cc 361 handled = true;
darran 0:55a05330f8cc 362 if( handleSignal() ) //Was that a signal ?
darran 0:55a05330f8cc 363 {
darran 0:55a05330f8cc 364 //OK, discard data since it has been processed
darran 0:55a05330f8cc 365 SerialBuf::flushRead();
darran 0:55a05330f8cc 366 }
darran 0:55a05330f8cc 367 else
darran 0:55a05330f8cc 368 {
darran 0:55a05330f8cc 369 //Keep data since it has not been processed yet
darran 0:55a05330f8cc 370 //Have to be processed in usermode
darran 0:55a05330f8cc 371 SerialBuf::resetRead();
darran 0:55a05330f8cc 372 // handled = false;
darran 0:55a05330f8cc 373 }
darran 0:55a05330f8cc 374 }
darran 0:55a05330f8cc 375 //Restore Usermode params
darran 0:55a05330f8cc 376 m_readTimeout = u_readTimeout;
darran 0:55a05330f8cc 377 m_lineMode = u_lineMode;
darran 0:55a05330f8cc 378 //m_isOpen = u_isOpen;
darran 0:55a05330f8cc 379 return handled;
darran 0:55a05330f8cc 380 }
darran 0:55a05330f8cc 381
darran 0:55a05330f8cc 382 ATErr ATIf::rawOpen(Serial* pSerial, int baudrate) //Simple open function for similar non-conforming protocols
darran 0:55a05330f8cc 383 {
darran 0:55a05330f8cc 384 DBG("\r\nOpening...");
darran 0:55a05330f8cc 385 m_isOpen = true; //Must be set so that the serial port-related fns work
darran 0:55a05330f8cc 386 //Setup options
darran 0:55a05330f8cc 387 pSerial->baud(baudrate);
darran 0:55a05330f8cc 388 SerialBuf::attach(pSerial);
darran 0:55a05330f8cc 389
darran 0:55a05330f8cc 390 return AT_OK;
darran 0:55a05330f8cc 391 }
darran 0:55a05330f8cc 392
darran 0:55a05330f8cc 393 #if 0
darran 0:55a05330f8cc 394 ATErr ATIf::command(const char* cmd, char* result, int resultLen, int timeout) ////WARN/FIXME: result has to be long enough!!!
darran 0:55a05330f8cc 395 {
darran 0:55a05330f8cc 396 if(!m_isOpen)
darran 0:55a05330f8cc 397 return AT_CLOSED;
darran 0:55a05330f8cc 398
darran 0:55a05330f8cc 399 flushBuffer();
darran 0:55a05330f8cc 400
darran 0:55a05330f8cc 401 int err;
darran 0:55a05330f8cc 402 err = writeLine(cmd);
darran 0:55a05330f8cc 403
darran 0:55a05330f8cc 404 if(err<0)
darran 0:55a05330f8cc 405 { m_receiveStatus = AT_READY; return (ATErr)err; }
darran 0:55a05330f8cc 406
darran 0:55a05330f8cc 407 err = readLine(result, resultLen, timeout);
darran 0:55a05330f8cc 408
darran 0:55a05330f8cc 409 if(err<0)
darran 0:55a05330f8cc 410 { m_receiveStatus = AT_READY; return (ATErr)err; }
darran 0:55a05330f8cc 411
darran 0:55a05330f8cc 412 m_receiveStatus = AT_READY;
darran 0:55a05330f8cc 413
darran 0:55a05330f8cc 414 return AT_OK;
darran 0:55a05330f8cc 415
darran 0:55a05330f8cc 416 }
darran 0:55a05330f8cc 417 #endif
darran 0:55a05330f8cc 418
darran 0:55a05330f8cc 419 ATErr ATIf::write(const char* cmd, bool lineMode /*= false*/)
darran 0:55a05330f8cc 420 {
darran 0:55a05330f8cc 421 if(!m_isOpen)
darran 0:55a05330f8cc 422 return AT_CLOSED;
darran 0:55a05330f8cc 423
darran 0:55a05330f8cc 424 int err;
darran 0:55a05330f8cc 425 err = lineMode ? writeLine(cmd) : writeRaw(cmd);
darran 0:55a05330f8cc 426
darran 0:55a05330f8cc 427 if(err<0)
darran 0:55a05330f8cc 428 return (ATErr)err;
darran 0:55a05330f8cc 429
darran 0:55a05330f8cc 430 return AT_OK;
darran 0:55a05330f8cc 431 }
darran 0:55a05330f8cc 432
darran 0:55a05330f8cc 433
darran 0:55a05330f8cc 434 ATErr ATIf::read(char* result, int resultMaxLen, int timeout, bool lineMode /*= false*/, int resultMinLen/* = 0*/)
darran 0:55a05330f8cc 435 {
darran 0:55a05330f8cc 436 if(!m_isOpen)
darran 0:55a05330f8cc 437 return AT_CLOSED;
darran 0:55a05330f8cc 438
darran 0:55a05330f8cc 439 int err;
darran 0:55a05330f8cc 440 err = lineMode ? readLine(result, resultMaxLen, timeout) : readRaw(result, resultMaxLen, timeout, resultMinLen);
darran 0:55a05330f8cc 441
darran 0:55a05330f8cc 442 if(err<0)
darran 0:55a05330f8cc 443 return (ATErr)err;
darran 0:55a05330f8cc 444
darran 0:55a05330f8cc 445 return AT_OK;
darran 0:55a05330f8cc 446 }
darran 0:55a05330f8cc 447
darran 0:55a05330f8cc 448 bool ATIf::isOpen()
darran 0:55a05330f8cc 449 {
darran 0:55a05330f8cc 450 return m_isOpen;
darran 0:55a05330f8cc 451 }
darran 0:55a05330f8cc 452
darran 0:55a05330f8cc 453 ATErr ATIf::checkOK() //Helper fn to quickly check that OK has been returned
darran 0:55a05330f8cc 454 {
darran 0:55a05330f8cc 455 char ret[16] = {0};
darran 0:55a05330f8cc 456 int err = readLine(ret,16,m_readTimeout);
darran 0:55a05330f8cc 457
darran 0:55a05330f8cc 458 if(err<0)
darran 0:55a05330f8cc 459 {
darran 0:55a05330f8cc 460 DBG("\r\nError in check (%s).\r\n", ret);
darran 0:55a05330f8cc 461 flushBuffer(); //Discard anything in buf to avoid misparsing in the following calls
darran 0:55a05330f8cc 462 return (ATErr)err;
darran 0:55a05330f8cc 463 }
darran 0:55a05330f8cc 464
darran 0:55a05330f8cc 465 if(!!strcmp("OK",ret))
darran 0:55a05330f8cc 466 {
darran 0:55a05330f8cc 467 DBG("\r\nNot an OK <%s>.\r\n", ret);
darran 0:55a05330f8cc 468 flushBuffer();
darran 0:55a05330f8cc 469 return AT_ERROR;
darran 0:55a05330f8cc 470 }
darran 0:55a05330f8cc 471
darran 0:55a05330f8cc 472 DBG("\r\nCHECK OK\r\n");
darran 0:55a05330f8cc 473
darran 0:55a05330f8cc 474 return AT_OK;
darran 0:55a05330f8cc 475 }
darran 0:55a05330f8cc 476
darran 0:55a05330f8cc 477 #if 0
darran 0:55a05330f8cc 478 void ATIf::onSerialInterrupt() //Callback from m_pSerial
darran 0:55a05330f8cc 479 {
darran 0:55a05330f8cc 480 return;//FIXME
darran 0:55a05330f8cc 481
darran 0:55a05330f8cc 482 if(m_receiveStatus == AT_READING)
darran 0:55a05330f8cc 483 return;
darran 0:55a05330f8cc 484
darran 0:55a05330f8cc 485 if( m_cbObj && m_cbMeth )
darran 0:55a05330f8cc 486 return (m_cbObj->*m_cbMeth)();
darran 0:55a05330f8cc 487 }
darran 0:55a05330f8cc 488 #endif
darran 0:55a05330f8cc 489
darran 0:55a05330f8cc 490 int ATIf::readLine(char* line, int maxLen, int timeout) //Read a single line from serial port, return length or ATErr(<0)
darran 0:55a05330f8cc 491 {
darran 0:55a05330f8cc 492 #ifdef OLDREADLINE
darran 0:55a05330f8cc 493 if(!m_isOpen)
darran 0:55a05330f8cc 494 return AT_CLOSED;
darran 0:55a05330f8cc 495
darran 0:55a05330f8cc 496 int len = 0;
darran 0:55a05330f8cc 497
darran 0:55a05330f8cc 498 Timer timer;
darran 0:55a05330f8cc 499
darran 0:55a05330f8cc 500 timer.start();
darran 0:55a05330f8cc 501 #ifdef __START_CLRF_MANDAT
darran 0:55a05330f8cc 502 for( int i=0; i<2; i++ )
darran 0:55a05330f8cc 503 {
darran 0:55a05330f8cc 504 while(!readable())
darran 0:55a05330f8cc 505 {
darran 0:55a05330f8cc 506 if(timer.read_ms()>timeout)
darran 0:55a05330f8cc 507 {
darran 0:55a05330f8cc 508 // DBG("Timeout!!0");
darran 0:55a05330f8cc 509 return AT_TIMEOUT;
darran 0:55a05330f8cc 510 }
darran 0:55a05330f8cc 511 wait_ms(10); //Wait 10ms
darran 0:55a05330f8cc 512 }
darran 0:55a05330f8cc 513 *line = getc();
darran 0:55a05330f8cc 514 // DBG("In readLine(), read : %c", *line);
darran 0:55a05330f8cc 515 if( ( (i == 0) && (*line!='\x0D') )
darran 0:55a05330f8cc 516 || ( (i == 1) && (*line!='\x0A') ) )
darran 0:55a05330f8cc 517 return AT_PARSE;
darran 0:55a05330f8cc 518 }
darran 0:55a05330f8cc 519 #else
darran 0:55a05330f8cc 520
darran 0:55a05330f8cc 521 #endif
darran 0:55a05330f8cc 522
darran 0:55a05330f8cc 523 for( ; len < maxLen ; len++ )
darran 0:55a05330f8cc 524 {
darran 0:55a05330f8cc 525 timer.reset();
darran 0:55a05330f8cc 526 while(!readable())
darran 0:55a05330f8cc 527 {
darran 0:55a05330f8cc 528 if(timer.read_ms()>timeout)
darran 0:55a05330f8cc 529 {
darran 0:55a05330f8cc 530 // DBG("Timeout!!1");
darran 0:55a05330f8cc 531 return AT_TIMEOUT;
darran 0:55a05330f8cc 532 }
darran 0:55a05330f8cc 533 wait_ms(10); //Wait 10ms
darran 0:55a05330f8cc 534 }
darran 0:55a05330f8cc 535 *line = getc();
darran 0:55a05330f8cc 536 //DBG("In readLine(), read : %c", *line);
darran 0:55a05330f8cc 537
darran 0:55a05330f8cc 538 if(*line=='\x0D')
darran 0:55a05330f8cc 539 {
darran 0:55a05330f8cc 540 timer.reset();
darran 0:55a05330f8cc 541 while(!readable())
darran 0:55a05330f8cc 542 {
darran 0:55a05330f8cc 543 if(timer.read_ms()>timeout)
darran 0:55a05330f8cc 544 {
darran 0:55a05330f8cc 545 return AT_TIMEOUT;
darran 0:55a05330f8cc 546 }
darran 0:55a05330f8cc 547 wait_ms(10); //Wait 1ms
darran 0:55a05330f8cc 548 }
darran 0:55a05330f8cc 549 *line = getc();
darran 0:55a05330f8cc 550 // DBG("In readLine(), read : %c", *line);
darran 0:55a05330f8cc 551 if(*line=='\x0A')
darran 0:55a05330f8cc 552 {
darran 0:55a05330f8cc 553 if(len==0)
darran 0:55a05330f8cc 554 {
darran 0:55a05330f8cc 555 //Start of line
darran 0:55a05330f8cc 556 len--;
darran 0:55a05330f8cc 557 continue;
darran 0:55a05330f8cc 558 }
darran 0:55a05330f8cc 559 else
darran 0:55a05330f8cc 560 {
darran 0:55a05330f8cc 561 *line=0; //End of line
darran 0:55a05330f8cc 562 break;
darran 0:55a05330f8cc 563 }
darran 0:55a05330f8cc 564 }
darran 0:55a05330f8cc 565 else
darran 0:55a05330f8cc 566 {
darran 0:55a05330f8cc 567 //Should not happen, must have lost some bytes somewhere or non AT protocol
darran 0:55a05330f8cc 568 return AT_PARSE;
darran 0:55a05330f8cc 569 }
darran 0:55a05330f8cc 570 }
darran 0:55a05330f8cc 571 line++;
darran 0:55a05330f8cc 572 }
darran 0:55a05330f8cc 573
darran 0:55a05330f8cc 574 if(len==maxLen)
darran 0:55a05330f8cc 575 return AT_INCOMPLETE; //Buffer full, must call this method again to get end of line
darran 0:55a05330f8cc 576
darran 0:55a05330f8cc 577 return len;
darran 0:55a05330f8cc 578 #else
darran 0:55a05330f8cc 579 if(!m_isOpen)
darran 0:55a05330f8cc 580 return AT_CLOSED;
darran 0:55a05330f8cc 581
darran 0:55a05330f8cc 582 Timer timer;
darran 0:55a05330f8cc 583 timer.start();
darran 0:55a05330f8cc 584
darran 0:55a05330f8cc 585 int len = 0;
darran 0:55a05330f8cc 586 while( len < maxLen )
darran 0:55a05330f8cc 587 {
darran 0:55a05330f8cc 588 timer.reset();
darran 0:55a05330f8cc 589 while(!readable())
darran 0:55a05330f8cc 590 {
darran 0:55a05330f8cc 591 if(timer.read_ms()>timeout)
darran 0:55a05330f8cc 592 {
darran 0:55a05330f8cc 593 return AT_TIMEOUT;
darran 0:55a05330f8cc 594 }
darran 0:55a05330f8cc 595 wait_ms(10); //Wait 10ms
darran 0:55a05330f8cc 596 }
darran 0:55a05330f8cc 597 *line = getc();
darran 0:55a05330f8cc 598
darran 0:55a05330f8cc 599 if( (*line=='\x0D') || (*line=='\x0A') )
darran 0:55a05330f8cc 600 {
darran 0:55a05330f8cc 601
darran 0:55a05330f8cc 602 if(len==0)
darran 0:55a05330f8cc 603 {
darran 0:55a05330f8cc 604 //Start of line
darran 0:55a05330f8cc 605 continue;
darran 0:55a05330f8cc 606 }
darran 0:55a05330f8cc 607 else
darran 0:55a05330f8cc 608 {
darran 0:55a05330f8cc 609 *line=0; //End of line
darran 0:55a05330f8cc 610 break;
darran 0:55a05330f8cc 611 }
darran 0:55a05330f8cc 612 }
darran 0:55a05330f8cc 613 len++;
darran 0:55a05330f8cc 614 line++;
darran 0:55a05330f8cc 615 }
darran 0:55a05330f8cc 616
darran 0:55a05330f8cc 617 if(len==maxLen)
darran 0:55a05330f8cc 618 return AT_INCOMPLETE; //Buffer full, must call this method again to get end of line
darran 0:55a05330f8cc 619
darran 0:55a05330f8cc 620 return len;
darran 0:55a05330f8cc 621 #endif
darran 0:55a05330f8cc 622 }
darran 0:55a05330f8cc 623
darran 0:55a05330f8cc 624 int ATIf::writeLine(const char* line) //Write a single line to serial port
darran 0:55a05330f8cc 625 {
darran 0:55a05330f8cc 626 // char* line = (char*) _line;
darran 0:55a05330f8cc 627 if(!m_isOpen)
darran 0:55a05330f8cc 628 return AT_CLOSED;
darran 0:55a05330f8cc 629
darran 0:55a05330f8cc 630 // DBG("\n\rIn writeline.");
darran 0:55a05330f8cc 631
darran 0:55a05330f8cc 632 int len = 0;
darran 0:55a05330f8cc 633
darran 0:55a05330f8cc 634 while(*line)
darran 0:55a05330f8cc 635 {
darran 0:55a05330f8cc 636 putc(*line);
darran 0:55a05330f8cc 637 line++;
darran 0:55a05330f8cc 638 len++;
darran 0:55a05330f8cc 639 }
darran 0:55a05330f8cc 640
darran 0:55a05330f8cc 641 /* putc('\r');
darran 0:55a05330f8cc 642
darran 0:55a05330f8cc 643 putc('\n');*/
darran 0:55a05330f8cc 644
darran 0:55a05330f8cc 645 putc('\x0D');
darran 0:55a05330f8cc 646 // putc('\x0A');
darran 0:55a05330f8cc 647
darran 0:55a05330f8cc 648 // DBG("\n\rWritten %d + 1", len);
darran 0:55a05330f8cc 649
darran 0:55a05330f8cc 650 return len;
darran 0:55a05330f8cc 651
darran 0:55a05330f8cc 652 }
darran 0:55a05330f8cc 653
darran 0:55a05330f8cc 654
darran 0:55a05330f8cc 655
darran 0:55a05330f8cc 656 int ATIf::readRaw(char* str, int maxLen, int timeout /*= 0*/, int minLen /*= 0*/) //Read from serial port in buf
darran 0:55a05330f8cc 657 {
darran 0:55a05330f8cc 658 if(!m_isOpen)
darran 0:55a05330f8cc 659 return AT_CLOSED;
darran 0:55a05330f8cc 660
darran 0:55a05330f8cc 661 int len = 0;
darran 0:55a05330f8cc 662
darran 0:55a05330f8cc 663 Timer timer;
darran 0:55a05330f8cc 664
darran 0:55a05330f8cc 665 timer.start();
darran 0:55a05330f8cc 666
darran 0:55a05330f8cc 667 for( ; len < maxLen ; len++ )
darran 0:55a05330f8cc 668 {
darran 0:55a05330f8cc 669 while( (len < minLen) && !readable())
darran 0:55a05330f8cc 670 {
darran 0:55a05330f8cc 671 if(timer.read_ms()>timeout)
darran 0:55a05330f8cc 672 {
darran 0:55a05330f8cc 673 return AT_TIMEOUT;
darran 0:55a05330f8cc 674 }
darran 0:55a05330f8cc 675 wait(.01); //Wait 10ms
darran 0:55a05330f8cc 676 }
darran 0:55a05330f8cc 677
darran 0:55a05330f8cc 678 if(!readable()) //Buffer read entirely
darran 0:55a05330f8cc 679 break;
darran 0:55a05330f8cc 680
darran 0:55a05330f8cc 681 *str = getc();
darran 0:55a05330f8cc 682 str++;
darran 0:55a05330f8cc 683 len++;
darran 0:55a05330f8cc 684 }
darran 0:55a05330f8cc 685
darran 0:55a05330f8cc 686 *str = 0; //End char
darran 0:55a05330f8cc 687
darran 0:55a05330f8cc 688 return len;
darran 0:55a05330f8cc 689
darran 0:55a05330f8cc 690 }
darran 0:55a05330f8cc 691
darran 0:55a05330f8cc 692 int ATIf::writeRaw(const char* str) //Write directly to serial port
darran 0:55a05330f8cc 693 {
darran 0:55a05330f8cc 694 if(!m_isOpen)
darran 0:55a05330f8cc 695 return AT_CLOSED;
darran 0:55a05330f8cc 696
darran 0:55a05330f8cc 697 int len = 0;
darran 0:55a05330f8cc 698
darran 0:55a05330f8cc 699 while(*str)
darran 0:55a05330f8cc 700 {
darran 0:55a05330f8cc 701 putc(*str);
darran 0:55a05330f8cc 702 str++;
darran 0:55a05330f8cc 703 len++;
darran 0:55a05330f8cc 704 }
darran 0:55a05330f8cc 705
darran 0:55a05330f8cc 706 return len;
darran 0:55a05330f8cc 707 }
darran 0:55a05330f8cc 708
darran 0:55a05330f8cc 709 bool ATIf::handleSignal()
darran 0:55a05330f8cc 710 {
darran 0:55a05330f8cc 711 bool beg = false;
darran 0:55a05330f8cc 712
darran 0:55a05330f8cc 713 // SerialBuf::setReadMode(true); //Keep chars in buf when read
darran 0:55a05330f8cc 714 // SerialBuf::resetRead();
darran 0:55a05330f8cc 715
darran 0:55a05330f8cc 716 //if( !m_pCurrentSignal ) //If no signal asked for this line
darran 0:55a05330f8cc 717 if(true) //Check anyway, could have been some parsing error before
darran 0:55a05330f8cc 718 {
darran 0:55a05330f8cc 719 //Extract Signal Name
darran 0:55a05330f8cc 720 char sigName[32]; //Should not be longer than that
darran 0:55a05330f8cc 721 setLineMode(true); //Read one line
darran 0:55a05330f8cc 722
darran 0:55a05330f8cc 723 int len = scanf("%[^:]:%*[^\n]", sigName);
darran 0:55a05330f8cc 724 if(len != 1)
darran 0:55a05330f8cc 725 return false; //This is not a signal
darran 0:55a05330f8cc 726 // DBG("\r\nGot signal %s\r\n", sigName);
darran 0:55a05330f8cc 727
darran 0:55a05330f8cc 728 list<ATSigHandler>::iterator it;
darran 0:55a05330f8cc 729
darran 0:55a05330f8cc 730 for ( it = m_signals.begin(); it != m_signals.end(); it++ )
darran 0:55a05330f8cc 731 {
darran 0:55a05330f8cc 732 if( !strcmp((*it).m_name, sigName) )
darran 0:55a05330f8cc 733 {
darran 0:55a05330f8cc 734 // DBG("\r\nFound signal %s\r\n", sigName);
darran 0:55a05330f8cc 735 m_pCurrentSignal = &(*it);
darran 0:55a05330f8cc 736 beg = true;
darran 0:55a05330f8cc 737 break;
darran 0:55a05330f8cc 738 }
darran 0:55a05330f8cc 739 }
darran 0:55a05330f8cc 740
darran 0:55a05330f8cc 741
darran 0:55a05330f8cc 742 }
darran 0:55a05330f8cc 743
darran 0:55a05330f8cc 744 if( !m_pCurrentSignal )
darran 0:55a05330f8cc 745 return false; //This is not a signal or it cannot be handled
darran 0:55a05330f8cc 746
darran 0:55a05330f8cc 747 bool moreData = false;
darran 0:55a05330f8cc 748 //Call signal handling routine
darran 0:55a05330f8cc 749 SerialBuf::resetRead(); //Rollback so that the handling fn can call scanf properly
darran 0:55a05330f8cc 750 bool result = ((m_pCurrentSignal->m_cbObj)->*(m_pCurrentSignal->m_cbMeth))(this, beg, &moreData);
darran 0:55a05330f8cc 751
darran 0:55a05330f8cc 752 if( !moreData ) //Processing completed
darran 0:55a05330f8cc 753 {
darran 0:55a05330f8cc 754 m_pCurrentSignal = NULL;
darran 0:55a05330f8cc 755 }
darran 0:55a05330f8cc 756
darran 0:55a05330f8cc 757 return result;
darran 0:55a05330f8cc 758 }
darran 0:55a05330f8cc 759
darran 0:55a05330f8cc 760 #endif