NetServices Stack source

Dependents:   HelloWorld ServoInterfaceBoardExample1 4180_Lab4

Committer:
donatien
Date:
Fri Jun 11 16:05:15 2010 +0000
Revision:
0:632c9925f013
Child:
4:fd826cad83c0

        

Who changed what in which revision?

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