Bonjour/Zerconf library

Dependencies:   mbed

Committer:
dirkx
Date:
Sat Aug 14 15:54:31 2010 +0000
Revision:
5:8e53abda9900
Parent:
0:355018f44c9f

        

Who changed what in which revision?

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