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

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

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
hexley 0:281d6ff68967 1
hexley 0:281d6ff68967 2 /*
hexley 0:281d6ff68967 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
hexley 0:281d6ff68967 4
hexley 0:281d6ff68967 5 Permission is hereby granted, free of charge, to any person obtaining a copy
hexley 0:281d6ff68967 6 of this software and associated documentation files (the "Software"), to deal
hexley 0:281d6ff68967 7 in the Software without restriction, including without limitation the rights
hexley 0:281d6ff68967 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
hexley 0:281d6ff68967 9 copies of the Software, and to permit persons to whom the Software is
hexley 0:281d6ff68967 10 furnished to do so, subject to the following conditions:
hexley 0:281d6ff68967 11
hexley 0:281d6ff68967 12 The above copyright notice and this permission notice shall be included in
hexley 0:281d6ff68967 13 all copies or substantial portions of the Software.
hexley 0:281d6ff68967 14
hexley 0:281d6ff68967 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
hexley 0:281d6ff68967 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
hexley 0:281d6ff68967 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
hexley 0:281d6ff68967 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
hexley 0:281d6ff68967 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
hexley 0:281d6ff68967 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
hexley 0:281d6ff68967 21 THE SOFTWARE.
hexley 0:281d6ff68967 22 */
hexley 0:281d6ff68967 23
hexley 0:281d6ff68967 24 #include "SMTPClient.h"
hexley 0:281d6ff68967 25
hexley 0:281d6ff68967 26 /*
hexley 0:281d6ff68967 27 Provided as reference only, this code has not been tested.
hexley 0:281d6ff68967 28 */
hexley 0:281d6ff68967 29 #if 0
hexley 0:281d6ff68967 30
hexley 0:281d6ff68967 31 #include <stdio.h>
hexley 0:281d6ff68967 32
hexley 0:281d6ff68967 33 #define __DEBUG
hexley 0:281d6ff68967 34 #include "dbg.h"
hexley 0:281d6ff68967 35
hexley 0:281d6ff68967 36 #define BUF_SIZE 128
hexley 0:281d6ff68967 37 #define CHUNK_SIZE 512
hexley 0:281d6ff68967 38
hexley 0:281d6ff68967 39 SMTPClient::SMTPClient() : m_pMessage(NULL), m_nextState(SMTP_HELLO),
hexley 0:281d6ff68967 40 m_pCbItem(NULL), m_pCbMeth(NULL), m_watchdog(), m_timeout(0), m_posInMsg(0), m_closed(true), m_host()
hexley 0:281d6ff68967 41 {
hexley 0:281d6ff68967 42 setTimeout(SMTP_REQUEST_TIMEOUT);
hexley 0:281d6ff68967 43 }
hexley 0:281d6ff68967 44
hexley 0:281d6ff68967 45 SMTPClient::~SMTPClient()
hexley 0:281d6ff68967 46 {
hexley 0:281d6ff68967 47 close();
hexley 0:281d6ff68967 48 }
hexley 0:281d6ff68967 49
hexley 0:281d6ff68967 50 void SMTPClient::setHost(const Host& host)
hexley 0:281d6ff68967 51 {
hexley 0:281d6ff68967 52 m_host = host;
hexley 0:281d6ff68967 53 }
hexley 0:281d6ff68967 54
hexley 0:281d6ff68967 55 void SMTPClient::send(EmailMessage* pMessage)
hexley 0:281d6ff68967 56 {
hexley 0:281d6ff68967 57 init();
hexley 0:281d6ff68967 58 m_posInMsg = 0;
hexley 0:281d6ff68967 59 m_nextState = SMTP_HELLO;
hexley 0:281d6ff68967 60 if( !m_pTCPSocket->connect(m_host) )
hexley 0:281d6ff68967 61 {
hexley 0:281d6ff68967 62 close();
hexley 0:281d6ff68967 63 onResult(SMTP_DISC);
hexley 0:281d6ff68967 64 }
hexley 0:281d6ff68967 65 }
hexley 0:281d6ff68967 66
hexley 0:281d6ff68967 67 void SMTPClient::init() //Create and setup socket if needed
hexley 0:281d6ff68967 68 {
hexley 0:281d6ff68967 69 close(); //Remove previous elements
hexley 0:281d6ff68967 70 if(!m_closed) //Already opened
hexley 0:281d6ff68967 71 return;
hexley 0:281d6ff68967 72 m_nextState = SMTP_HELLO;
hexley 0:281d6ff68967 73 m_pTCPSocket = new TCPSocket;
hexley 0:281d6ff68967 74 m_pTCPSocket->setOnEvent(this, &SMTPClient::onTCPSocketEvent);
hexley 0:281d6ff68967 75 m_closed = false;
hexley 0:281d6ff68967 76 }
hexley 0:281d6ff68967 77
hexley 0:281d6ff68967 78 void SMTPClient::close()
hexley 0:281d6ff68967 79 {
hexley 0:281d6ff68967 80 if(m_closed)
hexley 0:281d6ff68967 81 return;
hexley 0:281d6ff68967 82 m_closed = true; //Prevent recursive calling or calling on an object being destructed by someone else
hexley 0:281d6ff68967 83 m_watchdog.detach();
hexley 0:281d6ff68967 84 m_pTCPSocket->resetOnEvent();
hexley 0:281d6ff68967 85 m_pTCPSocket->close();
hexley 0:281d6ff68967 86 delete m_pTCPSocket;
hexley 0:281d6ff68967 87 m_pTCPSocket = NULL;
hexley 0:281d6ff68967 88 }
hexley 0:281d6ff68967 89
hexley 0:281d6ff68967 90 int SMTPClient::rc(char* buf) //Parse return code
hexley 0:281d6ff68967 91 {
hexley 0:281d6ff68967 92 int rc;
hexley 0:281d6ff68967 93 int len = sscanf(buf, "%d %*[^\r\n]\r\n", &rc);
hexley 0:281d6ff68967 94 if(len != 1)
hexley 0:281d6ff68967 95 return -1;
hexley 0:281d6ff68967 96 return rc;
hexley 0:281d6ff68967 97 }
hexley 0:281d6ff68967 98
hexley 0:281d6ff68967 99 #define MIN(a,b) ((a)<(b))?(a):(b)
hexley 0:281d6ff68967 100 void SMTPClient::process(bool moreData) //Main state-machine
hexley 0:281d6ff68967 101 {
hexley 0:281d6ff68967 102 char buf[BUF_SIZE] = {0};
hexley 0:281d6ff68967 103 if(moreData)
hexley 0:281d6ff68967 104 {
hexley 0:281d6ff68967 105 if( m_nextState != SMTP_BODYMORE )
hexley 0:281d6ff68967 106 {
hexley 0:281d6ff68967 107 return;
hexley 0:281d6ff68967 108 }
hexley 0:281d6ff68967 109 }
hexley 0:281d6ff68967 110 if(!moreData) //Receive next frame
hexley 0:281d6ff68967 111 {
hexley 0:281d6ff68967 112 m_pTCPSocket->recv(buf, BUF_SIZE - 1);
hexley 0:281d6ff68967 113 }
hexley 0:281d6ff68967 114
hexley 0:281d6ff68967 115 IpAddr myIp(0,0,0,0);
hexley 0:281d6ff68967 116 string to;
hexley 0:281d6ff68967 117 int sendLen;
hexley 0:281d6ff68967 118
hexley 0:281d6ff68967 119 DBG("In state %d", m_nextState);
hexley 0:281d6ff68967 120
hexley 0:281d6ff68967 121 switch(m_nextState)
hexley 0:281d6ff68967 122 {
hexley 0:281d6ff68967 123 case SMTP_HELLO:
hexley 0:281d6ff68967 124 if( rc(buf) != 220 )
hexley 0:281d6ff68967 125 { close(); onResult(SMTP_PRTCL); return; }
hexley 0:281d6ff68967 126 myIp = Net::getDefaultIf()->getIp();
hexley 0:281d6ff68967 127 sprintf(buf, "HELO %d.%d.%d.%d\r\n", myIp[0], myIp[1], myIp[2], myIp[3]);
hexley 0:281d6ff68967 128 m_nextState = SMTP_FROM;
hexley 0:281d6ff68967 129 break;
hexley 0:281d6ff68967 130 case SMTP_FROM:
hexley 0:281d6ff68967 131 if( rc(buf) != 250 )
hexley 0:281d6ff68967 132 { close(); onResult(SMTP_PRTCL); return; }
hexley 0:281d6ff68967 133 sprintf(buf, "MAIL FROM:<%s>\r\n", m_pMessage->m_from.c_str());
hexley 0:281d6ff68967 134 break;
hexley 0:281d6ff68967 135 case SMTP_TO:
hexley 0:281d6ff68967 136 if( rc(buf) != 250 )
hexley 0:281d6ff68967 137 { close(); onResult(SMTP_PRTCL); return; }
hexley 0:281d6ff68967 138 to = m_pMessage->m_lTo.front();
hexley 0:281d6ff68967 139 sprintf(buf, "RCPT TO:<%s>\r\n", to.c_str());
hexley 0:281d6ff68967 140 m_pMessage->m_lTo.pop();
hexley 0:281d6ff68967 141 if(m_pMessage->m_lTo.empty())
hexley 0:281d6ff68967 142 {
hexley 0:281d6ff68967 143 m_nextState = SMTP_DATA;
hexley 0:281d6ff68967 144 }
hexley 0:281d6ff68967 145 break;
hexley 0:281d6ff68967 146 case SMTP_DATA:
hexley 0:281d6ff68967 147 if( rc(buf) != 250 )
hexley 0:281d6ff68967 148 { close(); onResult(SMTP_PRTCL); return; }
hexley 0:281d6ff68967 149 sprintf(buf, "DATA\r\n");
hexley 0:281d6ff68967 150 break;
hexley 0:281d6ff68967 151 case SMTP_BODY:
hexley 0:281d6ff68967 152 if( rc(buf) != 354 )
hexley 0:281d6ff68967 153 { close(); onResult(SMTP_PRTCL); return; }
hexley 0:281d6ff68967 154 m_nextState = SMTP_BODYMORE;
hexley 0:281d6ff68967 155 case SMTP_BODYMORE:
hexley 0:281d6ff68967 156 sendLen = 0;
hexley 0:281d6ff68967 157 if( m_posInMsg < m_pMessage->m_content.length() )
hexley 0:281d6ff68967 158 {
hexley 0:281d6ff68967 159 sendLen = MIN( (m_pMessage->m_content.length() - m_posInMsg), CHUNK_SIZE );
hexley 0:281d6ff68967 160 m_pTCPSocket->send( m_pMessage->m_content.c_str() + m_posInMsg, sendLen );
hexley 0:281d6ff68967 161 m_posInMsg += sendLen;
hexley 0:281d6ff68967 162 }
hexley 0:281d6ff68967 163 if( m_posInMsg == m_pMessage->m_content.length() )
hexley 0:281d6ff68967 164 {
hexley 0:281d6ff68967 165 sprintf(buf, "\r\n.\r\n"); //EOF
hexley 0:281d6ff68967 166 m_nextState = SMTP_EOF;
hexley 0:281d6ff68967 167 }
hexley 0:281d6ff68967 168 break;
hexley 0:281d6ff68967 169 case SMTP_EOF:
hexley 0:281d6ff68967 170 if( rc(buf) != 250 )
hexley 0:281d6ff68967 171 { close(); onResult(SMTP_PRTCL); return; }
hexley 0:281d6ff68967 172 sprintf(buf, "QUIT\r\n");
hexley 0:281d6ff68967 173 m_nextState = SMTP_BYE;
hexley 0:281d6ff68967 174 break;
hexley 0:281d6ff68967 175 case SMTP_BYE:
hexley 0:281d6ff68967 176 if( rc(buf) != 221 )
hexley 0:281d6ff68967 177 { close(); onResult(SMTP_PRTCL); return; }
hexley 0:281d6ff68967 178 close();
hexley 0:281d6ff68967 179 onResult(SMTP_OK);
hexley 0:281d6ff68967 180 break;
hexley 0:281d6ff68967 181 }
hexley 0:281d6ff68967 182
hexley 0:281d6ff68967 183 if( m_nextState != SMTP_BODYMORE )
hexley 0:281d6ff68967 184 {
hexley 0:281d6ff68967 185 m_pTCPSocket->send( buf, strlen(buf) );
hexley 0:281d6ff68967 186 }
hexley 0:281d6ff68967 187 }
hexley 0:281d6ff68967 188
hexley 0:281d6ff68967 189 void SMTPClient::setTimeout(int ms)
hexley 0:281d6ff68967 190 {
hexley 0:281d6ff68967 191 m_timeout = 1000*ms;
hexley 0:281d6ff68967 192 resetTimeout();
hexley 0:281d6ff68967 193 }
hexley 0:281d6ff68967 194
hexley 0:281d6ff68967 195 void SMTPClient::resetTimeout()
hexley 0:281d6ff68967 196 {
hexley 0:281d6ff68967 197 m_watchdog.detach();
hexley 0:281d6ff68967 198 m_watchdog.attach_us<SMTPClient>(this, &SMTPClient::onTimeout, m_timeout);
hexley 0:281d6ff68967 199 }
hexley 0:281d6ff68967 200
hexley 0:281d6ff68967 201 void SMTPClient::onTimeout() //Connection has timed out
hexley 0:281d6ff68967 202 {
hexley 0:281d6ff68967 203 close();
hexley 0:281d6ff68967 204 onResult(SMTP_TIMEOUT);
hexley 0:281d6ff68967 205 }
hexley 0:281d6ff68967 206
hexley 0:281d6ff68967 207 void SMTPClient::onTCPSocketEvent(TCPSocketEvent e)
hexley 0:281d6ff68967 208 {
hexley 0:281d6ff68967 209 switch(e)
hexley 0:281d6ff68967 210 {
hexley 0:281d6ff68967 211 case TCPSOCKET_READABLE:
hexley 0:281d6ff68967 212 resetTimeout();
hexley 0:281d6ff68967 213 process(false);
hexley 0:281d6ff68967 214 break;
hexley 0:281d6ff68967 215 case TCPSOCKET_WRITEABLE:
hexley 0:281d6ff68967 216 resetTimeout();
hexley 0:281d6ff68967 217 process(true);
hexley 0:281d6ff68967 218 break;
hexley 0:281d6ff68967 219 case TCPSOCKET_CONTIMEOUT:
hexley 0:281d6ff68967 220 case TCPSOCKET_CONRST:
hexley 0:281d6ff68967 221 case TCPSOCKET_CONABRT:
hexley 0:281d6ff68967 222 case TCPSOCKET_ERROR:
hexley 0:281d6ff68967 223 onResult(SMTP_DISC);
hexley 0:281d6ff68967 224 DBG("\r\nConnection error in SMTP Client.\r\n");
hexley 0:281d6ff68967 225 close();
hexley 0:281d6ff68967 226 break;
hexley 0:281d6ff68967 227 case TCPSOCKET_DISCONNECTED:
hexley 0:281d6ff68967 228 if(m_nextState != SMTP_BYE)
hexley 0:281d6ff68967 229 {
hexley 0:281d6ff68967 230 onResult(SMTP_DISC);
hexley 0:281d6ff68967 231 DBG("\r\nConnection error in SMTP Client.\r\n");
hexley 0:281d6ff68967 232 close();
hexley 0:281d6ff68967 233 }
hexley 0:281d6ff68967 234 break;
hexley 0:281d6ff68967 235 }
hexley 0:281d6ff68967 236 }
hexley 0:281d6ff68967 237
hexley 0:281d6ff68967 238 void SMTPClient::onResult(SMTPResult r) //Must be called by impl when the request completes
hexley 0:281d6ff68967 239 {
hexley 0:281d6ff68967 240 if(m_pCbItem && m_pCbMeth)
hexley 0:281d6ff68967 241 (m_pCbItem->*m_pCbMeth)(r);
hexley 0:281d6ff68967 242 }
hexley 0:281d6ff68967 243
hexley 0:281d6ff68967 244 #endif