NetServices Stack source

Dependents:   HelloWorld ServoInterfaceBoardExample1 4180_Lab4

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