Example self-announcing webserver which controls a servo through a smallHTML userinterface.

Dependencies:   mbed

Committer:
dirkx
Date:
Sat Aug 14 15:56:01 2010 +0000
Revision:
0:a259777c45a3

        

Who changed what in which revision?

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