NetTribute library with debug turned on in FShandler Donatien Garner -> Segundo Equipo -> this version

Committer:
hexley
Date:
Fri Nov 19 01:54:45 2010 +0000
Revision:
0:281d6ff68967

        

Who changed what in which revision?

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