Dependents:   TimeZoneDemo EthernetJackTestCode MMEx_Challenge ntp_mem ... more

Committer:
segundo
Date:
Sat Nov 27 23:23:43 2010 +0000
Revision:
5:fa27dde97304
Parent:
0:ac1725ba162c
Child:
6:d64fca63b94e

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
segundo 0:ac1725ba162c 1
segundo 0:ac1725ba162c 2 /*
segundo 5:fa27dde97304 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com) y Segundo Equipo
segundo 5:fa27dde97304 4
segundo 0:ac1725ba162c 5 Permission is hereby granted, free of charge, to any person obtaining a copy
segundo 0:ac1725ba162c 6 of this software and associated documentation files (the "Software"), to deal
segundo 0:ac1725ba162c 7 in the Software without restriction, including without limitation the rights
segundo 0:ac1725ba162c 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
segundo 0:ac1725ba162c 9 copies of the Software, and to permit persons to whom the Software is
segundo 0:ac1725ba162c 10 furnished to do so, subject to the following conditions:
segundo 5:fa27dde97304 11
segundo 0:ac1725ba162c 12 The above copyright notice and this permission notice shall be included in
segundo 0:ac1725ba162c 13 all copies or substantial portions of the Software.
segundo 5:fa27dde97304 14
segundo 0:ac1725ba162c 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
segundo 0:ac1725ba162c 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
segundo 0:ac1725ba162c 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
segundo 0:ac1725ba162c 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
segundo 0:ac1725ba162c 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
segundo 0:ac1725ba162c 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
segundo 0:ac1725ba162c 21 THE SOFTWARE.
segundo 0:ac1725ba162c 22 */
segundo 5:fa27dde97304 23 #include "core/netservice.h"
segundo 0:ac1725ba162c 24 #include "SMTPClient.h"
segundo 5:fa27dde97304 25 #include "../util/base64.h"
segundo 0:ac1725ba162c 26
segundo 0:ac1725ba162c 27 #define __DEBUG
segundo 5:fa27dde97304 28 #include "dbg/dbg.h"
segundo 5:fa27dde97304 29
segundo 5:fa27dde97304 30 #define CHUNK_SIZE 256 //512
segundo 5:fa27dde97304 31 #define BUF_SIZE (CHUNK_SIZE + 1)
segundo 5:fa27dde97304 32
segundo 5:fa27dde97304 33 #define SMTP_REQUEST_TIMEOUT 15000
segundo 5:fa27dde97304 34 #define SMTP_PORT 25
segundo 0:ac1725ba162c 35
segundo 5:fa27dde97304 36 SMTPClient::SMTPClient() : NetService(false) /*Not owned by the pool*/,
segundo 5:fa27dde97304 37 m_pCbItem(NULL), m_pCbMeth(NULL), m_pCb(NULL),
segundo 5:fa27dde97304 38 m_watchdog(), m_timeout(SMTP_REQUEST_TIMEOUT), m_pDnsReq(NULL), m_server(),
segundo 5:fa27dde97304 39 m_closed(true), m_state(SMTP_CLOSED), m_pMessage(NULL),
segundo 5:fa27dde97304 40 m_posInMsg(0), m_blockingResult(SMTP_PROCESSING),
segundo 5:fa27dde97304 41 m_username(""), m_password(""), m_auth(SMTP_AUTH_NONE),
segundo 5:fa27dde97304 42 m_heloDomain("localhost") {
segundo 5:fa27dde97304 43 DBG("New SMTPClient %p\n", this);
segundo 5:fa27dde97304 44 }
segundo 0:ac1725ba162c 45
segundo 5:fa27dde97304 46 SMTPClient::SMTPClient(const Host& host, const char* heloDomain, const char* user, const char* password, SMTPAuth auth) : NetService(false),
segundo 5:fa27dde97304 47 m_pCbItem(NULL), m_pCbMeth(NULL), m_pCb(NULL),
segundo 5:fa27dde97304 48 m_watchdog(), m_timeout(SMTP_REQUEST_TIMEOUT), m_pDnsReq(NULL), m_server(host),
segundo 5:fa27dde97304 49 m_closed(true), m_state(SMTP_CLOSED), m_pMessage(NULL),
segundo 5:fa27dde97304 50 m_posInMsg(0), m_blockingResult(SMTP_PROCESSING),
segundo 5:fa27dde97304 51 m_username(string(user)), m_password(string(password)), m_auth(auth),
segundo 5:fa27dde97304 52 m_heloDomain(heloDomain) {
segundo 5:fa27dde97304 53 DBG("New SMTPClient %p\n", this);
segundo 5:fa27dde97304 54 }
segundo 5:fa27dde97304 55
segundo 5:fa27dde97304 56 SMTPClient::~SMTPClient() {
segundo 5:fa27dde97304 57 close();
segundo 5:fa27dde97304 58 }
segundo 5:fa27dde97304 59
segundo 5:fa27dde97304 60 void SMTPClient::setAuth(const char* user, const char* password) { // Plain authentication
segundo 5:fa27dde97304 61 m_username = string(user);
segundo 5:fa27dde97304 62 m_password = string(password);
segundo 5:fa27dde97304 63 m_auth = SMTP_AUTH_PLAIN;
segundo 5:fa27dde97304 64 }
segundo 5:fa27dde97304 65
segundo 5:fa27dde97304 66 void SMTPClient::clearAuth() { // Clear authentication
segundo 5:fa27dde97304 67 m_username = "";
segundo 5:fa27dde97304 68 m_password = "";
segundo 5:fa27dde97304 69 m_auth = SMTP_AUTH_NONE;
segundo 0:ac1725ba162c 70 }
segundo 0:ac1725ba162c 71
segundo 5:fa27dde97304 72 string SMTPClient::encodePlainAuth() {
segundo 5:fa27dde97304 73 string auth = "AUTH PLAIN ";
segundo 5:fa27dde97304 74 string decStr = m_username;
segundo 5:fa27dde97304 75 decStr += '\0';
segundo 5:fa27dde97304 76 decStr += m_username;
segundo 5:fa27dde97304 77 decStr += '\0';
segundo 5:fa27dde97304 78 decStr += m_password;
segundo 5:fa27dde97304 79
segundo 5:fa27dde97304 80 char* out = new char[ (((decStr.length()-1)/3)+1)<<2 ];
segundo 5:fa27dde97304 81 base64enc(decStr.c_str(), decStr.length(), out);
segundo 5:fa27dde97304 82 auth.append(string(out));
segundo 5:fa27dde97304 83 delete[] out;
segundo 5:fa27dde97304 84
segundo 5:fa27dde97304 85 return auth;
segundo 5:fa27dde97304 86 }
segundo 5:fa27dde97304 87
segundo 5:fa27dde97304 88 void SMTPClient::setHeloDomain(const char* heloDomain) {
segundo 5:fa27dde97304 89 m_heloDomain = string(heloDomain);
segundo 5:fa27dde97304 90 }
segundo 5:fa27dde97304 91
segundo 5:fa27dde97304 92 SMTPResult SMTPClient::send(EmailMessage* pMessage) { //Blocking
segundo 5:fa27dde97304 93 doSend(pMessage);
segundo 5:fa27dde97304 94 return blockingProcess();
segundo 5:fa27dde97304 95 }
segundo 5:fa27dde97304 96
segundo 5:fa27dde97304 97 SMTPResult SMTPClient::send(EmailMessage* pMessage, void (*pMethod)(SMTPResult)) { //Non blocking
segundo 5:fa27dde97304 98 setOnResult(pMethod);
segundo 5:fa27dde97304 99 doSend(pMessage);
segundo 5:fa27dde97304 100 return SMTP_PROCESSING;
segundo 5:fa27dde97304 101 }
segundo 5:fa27dde97304 102
segundo 5:fa27dde97304 103 void SMTPClient::doSend(EmailMessage* pMessage) {
segundo 5:fa27dde97304 104 setup(pMessage);
segundo 5:fa27dde97304 105 }
segundo 5:fa27dde97304 106
segundo 5:fa27dde97304 107 void SMTPClient::setOnResult( void (*pMethod)(SMTPResult) ) {
segundo 5:fa27dde97304 108 m_pCb = pMethod;
segundo 5:fa27dde97304 109 m_pCbItem = NULL;
segundo 5:fa27dde97304 110 m_pCbMeth = NULL;
segundo 5:fa27dde97304 111 }
segundo 5:fa27dde97304 112
segundo 5:fa27dde97304 113 void SMTPClient::setTimeout(int ms) {
segundo 5:fa27dde97304 114 m_timeout = ms;
segundo 5:fa27dde97304 115 }
segundo 5:fa27dde97304 116
segundo 5:fa27dde97304 117 void SMTPClient::poll() { //Called by NetServices
segundo 5:fa27dde97304 118 if ( (!m_closed) && (m_watchdog.read_ms() >= m_timeout) ) {
segundo 5:fa27dde97304 119 onTimeout();
segundo 5:fa27dde97304 120 }
segundo 0:ac1725ba162c 121 }
segundo 0:ac1725ba162c 122
segundo 5:fa27dde97304 123 void SMTPClient::resetTimeout() {
segundo 5:fa27dde97304 124 m_watchdog.reset();
segundo 5:fa27dde97304 125 m_watchdog.start();
segundo 5:fa27dde97304 126 }
segundo 5:fa27dde97304 127
segundo 5:fa27dde97304 128 void SMTPClient::init() { //Create and setup socket if needed
segundo 5:fa27dde97304 129 close(); //Remove previous elements
segundo 5:fa27dde97304 130 if (!m_closed) //Already opened
segundo 5:fa27dde97304 131 return;
segundo 5:fa27dde97304 132 m_state = SMTP_HELLO;
segundo 5:fa27dde97304 133 m_pTCPSocket = new TCPSocket;
segundo 5:fa27dde97304 134 m_pTCPSocket->setOnEvent(this, &SMTPClient::onTCPSocketEvent);
segundo 5:fa27dde97304 135 m_closed = false;
segundo 5:fa27dde97304 136 m_posInMsg = 0;
segundo 5:fa27dde97304 137 m_posInCRLF = 2;
segundo 5:fa27dde97304 138 m_response = "";
segundo 0:ac1725ba162c 139 }
segundo 5:fa27dde97304 140
segundo 5:fa27dde97304 141 void SMTPClient::close() {
segundo 5:fa27dde97304 142 if (m_closed)
segundo 5:fa27dde97304 143 return;
segundo 5:fa27dde97304 144 m_state = SMTP_CLOSED;
segundo 5:fa27dde97304 145 m_closed = true; //Prevent recursive calling or calling on an object being destructed by someone else
segundo 5:fa27dde97304 146 m_watchdog.stop(); //Stop timeout
segundo 5:fa27dde97304 147 m_watchdog.reset();
segundo 5:fa27dde97304 148 m_pTCPSocket->resetOnEvent();
segundo 5:fa27dde97304 149 m_pTCPSocket->close();
segundo 5:fa27dde97304 150 delete m_pTCPSocket;
segundo 5:fa27dde97304 151 m_pTCPSocket = NULL;
segundo 5:fa27dde97304 152 if ( m_pDnsReq ) {
segundo 5:fa27dde97304 153 m_pDnsReq->close();
segundo 5:fa27dde97304 154 delete m_pDnsReq;
segundo 5:fa27dde97304 155 m_pDnsReq = NULL;
segundo 5:fa27dde97304 156 }
segundo 5:fa27dde97304 157 }
segundo 5:fa27dde97304 158
segundo 5:fa27dde97304 159 void SMTPClient::setServer(const Host& host) { //Setup request, make DNS Req if necessary
segundo 5:fa27dde97304 160 m_server = host;
segundo 0:ac1725ba162c 161 }
segundo 0:ac1725ba162c 162
segundo 5:fa27dde97304 163 void SMTPClient::setup(EmailMessage* pMessage) { //Setup request, make DNS Req if necessary
segundo 5:fa27dde97304 164
segundo 5:fa27dde97304 165 init(); //Initialize client in known state, create socket
segundo 5:fa27dde97304 166 m_pMessage = pMessage;
segundo 5:fa27dde97304 167 resetTimeout();
segundo 5:fa27dde97304 168
segundo 5:fa27dde97304 169 m_To = m_pMessage->m_lTo.begin(); // Point to first to recipient in TO list
segundo 5:fa27dde97304 170
segundo 5:fa27dde97304 171 //If port set to zero then use default port
segundo 5:fa27dde97304 172 if (!m_server.getPort()) {
segundo 5:fa27dde97304 173 m_server.setPort(SMTP_PORT);
segundo 5:fa27dde97304 174 DBG("Using default port %d\n", SMTP_PORT);
segundo 5:fa27dde97304 175 }
segundo 5:fa27dde97304 176
segundo 5:fa27dde97304 177 if (m_server.getIp().isNull()) {
segundo 5:fa27dde97304 178 //DNS query required
segundo 5:fa27dde97304 179 m_pDnsReq = new DNSRequest();
segundo 5:fa27dde97304 180 DBG("DNSRequest %p\r\n", m_pDnsReq);
segundo 5:fa27dde97304 181 m_pDnsReq->setOnReply(this, &SMTPClient::onDNSReply);
segundo 5:fa27dde97304 182 m_pDnsReq->resolve(&m_server);
segundo 5:fa27dde97304 183 return;
segundo 5:fa27dde97304 184 } else
segundo 5:fa27dde97304 185 connect();
segundo 5:fa27dde97304 186
segundo 5:fa27dde97304 187 }
segundo 5:fa27dde97304 188
segundo 5:fa27dde97304 189 void SMTPClient::connect() { //Start Connection
segundo 5:fa27dde97304 190 resetTimeout();
segundo 5:fa27dde97304 191 DBG("Connecting...\n");
segundo 5:fa27dde97304 192 m_pTCPSocket->connect(m_server);
segundo 0:ac1725ba162c 193 }
segundo 0:ac1725ba162c 194
segundo 5:fa27dde97304 195 void SMTPClient::onTCPSocketEvent(TCPSocketEvent e) {
segundo 5:fa27dde97304 196
segundo 5:fa27dde97304 197 DBG("Event %d in SMTPClient::onTCPSocketEvent()\n", e);
segundo 5:fa27dde97304 198
segundo 5:fa27dde97304 199 if (m_closed) {
segundo 5:fa27dde97304 200 DBG("WARN: Discarded\n");
segundo 5:fa27dde97304 201 return;
segundo 5:fa27dde97304 202 }
segundo 0:ac1725ba162c 203
segundo 5:fa27dde97304 204 switch (e) {
segundo 5:fa27dde97304 205 case TCPSOCKET_READABLE:
segundo 5:fa27dde97304 206 resetTimeout();
segundo 5:fa27dde97304 207 process(false);
segundo 5:fa27dde97304 208 break;
segundo 5:fa27dde97304 209 case TCPSOCKET_WRITEABLE:
segundo 5:fa27dde97304 210 resetTimeout();
segundo 5:fa27dde97304 211 process(true);
segundo 5:fa27dde97304 212 break;
segundo 5:fa27dde97304 213 case TCPSOCKET_CONTIMEOUT:
segundo 5:fa27dde97304 214 case TCPSOCKET_CONRST:
segundo 5:fa27dde97304 215 case TCPSOCKET_CONABRT:
segundo 5:fa27dde97304 216 case TCPSOCKET_ERROR:
segundo 5:fa27dde97304 217 DBG("Connection error in SMTP Client.\n");
segundo 5:fa27dde97304 218 close();
segundo 5:fa27dde97304 219 onResult(SMTP_DISC);
segundo 5:fa27dde97304 220 break;
segundo 5:fa27dde97304 221 case TCPSOCKET_DISCONNECTED:
segundo 5:fa27dde97304 222 if (m_state != SMTP_BYE) {
segundo 5:fa27dde97304 223 DBG("Connection error in SMTP Client.\n");
segundo 5:fa27dde97304 224 close();
segundo 5:fa27dde97304 225 onResult(SMTP_DISC);
segundo 5:fa27dde97304 226 }
segundo 5:fa27dde97304 227 break;
segundo 5:fa27dde97304 228 }
segundo 0:ac1725ba162c 229 }
segundo 0:ac1725ba162c 230
segundo 5:fa27dde97304 231 void SMTPClient::onDNSReply(DNSReply r) {
segundo 5:fa27dde97304 232 if (m_closed) {
segundo 5:fa27dde97304 233 DBG("WARN: Discarded\n");
segundo 5:fa27dde97304 234 return;
segundo 5:fa27dde97304 235 }
segundo 5:fa27dde97304 236
segundo 5:fa27dde97304 237 if ( r != DNS_FOUND ) {
segundo 5:fa27dde97304 238 DBG("Could not resolve hostname.\n");
segundo 5:fa27dde97304 239 close();
segundo 5:fa27dde97304 240 onResult(SMTP_DNS);
segundo 5:fa27dde97304 241 return;
segundo 0:ac1725ba162c 242 }
segundo 5:fa27dde97304 243
segundo 5:fa27dde97304 244 DBG("DNS Resolved to %d.%d.%d.%d\n", m_server.getIp()[0], m_server.getIp()[1], m_server.getIp()[2], m_server.getIp()[3]);
segundo 5:fa27dde97304 245 //If no error, m_server has been updated by m_pDnsReq so we're set to go !
segundo 5:fa27dde97304 246 m_pDnsReq->close();
segundo 5:fa27dde97304 247 delete m_pDnsReq;
segundo 5:fa27dde97304 248 m_pDnsReq = NULL;
segundo 5:fa27dde97304 249 connect();
segundo 5:fa27dde97304 250 }
segundo 5:fa27dde97304 251
segundo 5:fa27dde97304 252 void SMTPClient::onResult(SMTPResult r) { //Called when exchange completed or on failure
segundo 5:fa27dde97304 253 if (m_pCbItem && m_pCbMeth)
segundo 5:fa27dde97304 254 (m_pCbItem->*m_pCbMeth)(r);
segundo 5:fa27dde97304 255 else if (m_pCb)
segundo 5:fa27dde97304 256 m_pCb(r);
segundo 5:fa27dde97304 257 m_blockingResult = r; //Blocking mode
segundo 5:fa27dde97304 258 }
segundo 0:ac1725ba162c 259
segundo 5:fa27dde97304 260 void SMTPClient::onTimeout() { //Connection has timed out
segundo 5:fa27dde97304 261 DBG("Timed out.\n");
segundo 0:ac1725ba162c 262 close();
segundo 5:fa27dde97304 263 onResult(SMTP_TIMEOUT);
segundo 5:fa27dde97304 264 }
segundo 5:fa27dde97304 265
segundo 5:fa27dde97304 266 SMTPResult SMTPClient::blockingProcess() { //Called in blocking mode, calls Net::poll() until return code is available
segundo 5:fa27dde97304 267 //Disable callbacks
segundo 5:fa27dde97304 268 m_pCb = NULL;
segundo 5:fa27dde97304 269 m_pCbItem = NULL;
segundo 5:fa27dde97304 270 m_pCbMeth = NULL;
segundo 5:fa27dde97304 271 m_blockingResult = SMTP_PROCESSING;
segundo 5:fa27dde97304 272 do {
segundo 5:fa27dde97304 273 Net::poll();
segundo 5:fa27dde97304 274 } while (m_blockingResult == SMTP_PROCESSING);
segundo 5:fa27dde97304 275 Net::poll(); //Necessary for cleanup
segundo 5:fa27dde97304 276 return m_blockingResult;
segundo 5:fa27dde97304 277 }
segundo 5:fa27dde97304 278
segundo 5:fa27dde97304 279 int SMTPClient::rc(char* buf) { //Parse return code
segundo 5:fa27dde97304 280 int rc;
segundo 5:fa27dde97304 281 int len = sscanf(buf, "%d %*[^\r\n]\r\n", &rc);
segundo 5:fa27dde97304 282 if (len != 1)
segundo 5:fa27dde97304 283 return -1;
segundo 5:fa27dde97304 284 return rc;
segundo 5:fa27dde97304 285 }
segundo 5:fa27dde97304 286
segundo 5:fa27dde97304 287 bool SMTPClient::okPostAuthentication(int code) {
segundo 5:fa27dde97304 288 return (code == 250) || (code == 235);
segundo 0:ac1725ba162c 289 }
segundo 0:ac1725ba162c 290
segundo 5:fa27dde97304 291 void SMTPClient::process(bool writeable) { //Main state-machine
segundo 5:fa27dde97304 292
segundo 5:fa27dde97304 293 DBG("In state %d, writeable %d\n", m_state, writeable);
segundo 5:fa27dde97304 294
segundo 5:fa27dde97304 295 // If writeable but nothing to write then return
segundo 5:fa27dde97304 296 if (writeable && (m_state != SMTP_BODYMORE))
segundo 5:fa27dde97304 297 return;
segundo 5:fa27dde97304 298
segundo 5:fa27dde97304 299 // If not writeable then read
segundo 5:fa27dde97304 300 char buf[BUF_SIZE] = {0};
segundo 5:fa27dde97304 301 int responseCode = -1;
segundo 5:fa27dde97304 302 if (!writeable) {
segundo 5:fa27dde97304 303 bool firstBuf = true;
segundo 5:fa27dde97304 304 int read;
segundo 5:fa27dde97304 305 do { // read until nothing left but only process the response from first buffer
segundo 5:fa27dde97304 306 read = m_pTCPSocket->recv(buf, BUF_SIZE - 1);
segundo 5:fa27dde97304 307 if (firstBuf) {
segundo 5:fa27dde97304 308 m_response = string(buf);
segundo 5:fa27dde97304 309 responseCode = rc(buf);
segundo 5:fa27dde97304 310 firstBuf = false;
segundo 5:fa27dde97304 311 DBG("Response %d %d | %s", read, responseCode, buf);
segundo 5:fa27dde97304 312 }
segundo 5:fa27dde97304 313 } while (read > 0);
segundo 5:fa27dde97304 314 }
segundo 0:ac1725ba162c 315
segundo 5:fa27dde97304 316 switch (m_state) {
segundo 5:fa27dde97304 317 case SMTP_HELLO:
segundo 5:fa27dde97304 318 if ( responseCode != 220 ) {
segundo 5:fa27dde97304 319 close();
segundo 5:fa27dde97304 320 onResult(SMTP_PRTCL);
segundo 5:fa27dde97304 321 return;
segundo 5:fa27dde97304 322 }
segundo 5:fa27dde97304 323 char* helloCommand;
segundo 5:fa27dde97304 324 if (m_auth == SMTP_AUTH_NONE) {
segundo 5:fa27dde97304 325 helloCommand = "HELO";
segundo 5:fa27dde97304 326 m_state = SMTP_FROM;
segundo 5:fa27dde97304 327 } else {
segundo 5:fa27dde97304 328 helloCommand = "EHLO";
segundo 5:fa27dde97304 329 m_state = SMTP_AUTH;
segundo 5:fa27dde97304 330 }
segundo 5:fa27dde97304 331 snprintf(buf, BUF_SIZE, "%s %s\r\n", helloCommand, m_heloDomain.c_str());
segundo 5:fa27dde97304 332 break;
segundo 5:fa27dde97304 333 case SMTP_AUTH:
segundo 5:fa27dde97304 334 if ( responseCode != 250 ) {
segundo 5:fa27dde97304 335 close();
segundo 5:fa27dde97304 336 onResult(SMTP_PRTCL);
segundo 5:fa27dde97304 337 return;
segundo 5:fa27dde97304 338 }
segundo 5:fa27dde97304 339 snprintf(buf, BUF_SIZE, "%s\r\n", encodePlainAuth().c_str());
segundo 5:fa27dde97304 340 m_state = SMTP_FROM;
segundo 5:fa27dde97304 341 break;
segundo 5:fa27dde97304 342 case SMTP_FROM:
segundo 5:fa27dde97304 343 if (!okPostAuthentication(responseCode)) {
segundo 5:fa27dde97304 344 close();
segundo 5:fa27dde97304 345 onResult(SMTP_PRTCL);
segundo 5:fa27dde97304 346 return;
segundo 5:fa27dde97304 347 }
segundo 5:fa27dde97304 348 snprintf(buf, BUF_SIZE, "MAIL FROM:<%s>\r\n", m_pMessage->m_from.c_str());
segundo 5:fa27dde97304 349 m_state = SMTP_TO;
segundo 5:fa27dde97304 350 break;
segundo 5:fa27dde97304 351 case SMTP_TO:
segundo 5:fa27dde97304 352 if ( responseCode != 250 ) {
segundo 5:fa27dde97304 353 close();
segundo 5:fa27dde97304 354 onResult(SMTP_PRTCL);
segundo 5:fa27dde97304 355 return;
segundo 5:fa27dde97304 356 }
segundo 5:fa27dde97304 357 snprintf(buf, BUF_SIZE, "RCPT TO:<%s>\r\n", (m_To++)->c_str());
segundo 5:fa27dde97304 358 if (m_To == m_pMessage->m_lTo.end())
segundo 5:fa27dde97304 359 m_state = SMTP_DATA;
segundo 5:fa27dde97304 360 break;
segundo 5:fa27dde97304 361 case SMTP_DATA:
segundo 5:fa27dde97304 362 if ( responseCode != 250 ) {
segundo 5:fa27dde97304 363 close();
segundo 5:fa27dde97304 364 onResult(SMTP_PRTCL);
segundo 5:fa27dde97304 365 return;
segundo 5:fa27dde97304 366 }
segundo 5:fa27dde97304 367 snprintf(buf, BUF_SIZE, "DATA\r\n");
segundo 5:fa27dde97304 368 m_state = SMTP_BODY;
segundo 5:fa27dde97304 369 break;
segundo 5:fa27dde97304 370 case SMTP_BODY:
segundo 5:fa27dde97304 371 if ( responseCode != 354 ) {
segundo 5:fa27dde97304 372 close();
segundo 5:fa27dde97304 373 onResult(SMTP_PRTCL);
segundo 5:fa27dde97304 374 return;
segundo 5:fa27dde97304 375 }
segundo 5:fa27dde97304 376 m_state = SMTP_BODYMORE;
segundo 5:fa27dde97304 377 buf[0] = '\0'; // clear buffer before carrying on into next state
segundo 5:fa27dde97304 378 case SMTP_BODYMORE:
segundo 5:fa27dde97304 379 if (strlen(buf) > 0) { // sending interrupted by a server response
segundo 5:fa27dde97304 380 close();
segundo 5:fa27dde97304 381 onResult(SMTP_PRTCL);
segundo 5:fa27dde97304 382 return;
segundo 5:fa27dde97304 383 }
segundo 5:fa27dde97304 384
segundo 5:fa27dde97304 385 if ( m_posInMsg < m_pMessage->m_content.length() ) { // if still something to send
segundo 5:fa27dde97304 386 int sendLen = 0;
segundo 5:fa27dde97304 387 while (sendLen < BUF_SIZE - 1) { // - 1 to allow room for extra dot or CR or LF
segundo 5:fa27dde97304 388 char c = m_pMessage->m_content.at(m_posInMsg++);
segundo 5:fa27dde97304 389 switch (c) { // thanks ExtraDotOutputStream.java (with extra check for naked CR)
segundo 5:fa27dde97304 390 case '.':
segundo 5:fa27dde97304 391 if (m_posInCRLF == 2) // add extra dot
segundo 5:fa27dde97304 392 buf[sendLen++] = '.';
segundo 5:fa27dde97304 393 m_posInCRLF = 0;
segundo 5:fa27dde97304 394 break;
segundo 5:fa27dde97304 395 case '\r':
segundo 5:fa27dde97304 396 if (m_posInCRLF == 1) // two CR in a row, so insert an LF first
segundo 5:fa27dde97304 397 buf[sendLen++] = '\n';
segundo 5:fa27dde97304 398 m_posInCRLF = 1;
segundo 5:fa27dde97304 399 break;
segundo 5:fa27dde97304 400 case '\n':
segundo 5:fa27dde97304 401 if (m_posInCRLF != 1) // convert naked LF to CRLF
segundo 5:fa27dde97304 402 buf[sendLen++] = '\r';
segundo 5:fa27dde97304 403 m_posInCRLF = 2;
segundo 5:fa27dde97304 404 break;
segundo 5:fa27dde97304 405 default:
segundo 5:fa27dde97304 406 if (m_posInCRLF == 1) { // convert naked CR to CRLF
segundo 5:fa27dde97304 407 buf[sendLen++] = '\n';
segundo 5:fa27dde97304 408 m_posInCRLF = 2;
segundo 5:fa27dde97304 409 } else
segundo 5:fa27dde97304 410 m_posInCRLF = 0; // we're no longer at the start of a line
segundo 5:fa27dde97304 411 break;
segundo 5:fa27dde97304 412 }
segundo 5:fa27dde97304 413 buf[sendLen++] = c;
segundo 5:fa27dde97304 414 if ( m_posInMsg == m_pMessage->m_content.length() )
segundo 5:fa27dde97304 415 break;
segundo 5:fa27dde97304 416 }
segundo 5:fa27dde97304 417 m_pTCPSocket->send( buf, sendLen );
segundo 5:fa27dde97304 418 DBG("Sending %d bytes of processed message content\n", sendLen);
segundo 5:fa27dde97304 419 } else {
segundo 5:fa27dde97304 420 if (m_posInCRLF == 0)
segundo 5:fa27dde97304 421 snprintf(buf, BUF_SIZE, "\r\n.\r\n");
segundo 5:fa27dde97304 422 else if (m_posInCRLF == 1)
segundo 5:fa27dde97304 423 snprintf(buf, BUF_SIZE, "\n.\r\n");
segundo 5:fa27dde97304 424 else
segundo 5:fa27dde97304 425 snprintf(buf, BUF_SIZE, ".\r\n");
segundo 5:fa27dde97304 426 m_state = SMTP_EOF;
segundo 5:fa27dde97304 427 }
segundo 5:fa27dde97304 428 break;
segundo 5:fa27dde97304 429 case SMTP_EOF:
segundo 5:fa27dde97304 430 if ( responseCode != 250 ) {
segundo 5:fa27dde97304 431 close();
segundo 5:fa27dde97304 432 onResult(SMTP_PRTCL);
segundo 5:fa27dde97304 433 return;
segundo 5:fa27dde97304 434 }
segundo 5:fa27dde97304 435 snprintf(buf, BUF_SIZE, "QUIT\r\n");
segundo 5:fa27dde97304 436 m_state = SMTP_BYE;
segundo 5:fa27dde97304 437 break;
segundo 5:fa27dde97304 438 case SMTP_BYE:
segundo 5:fa27dde97304 439 if ( responseCode != 221 ) {
segundo 5:fa27dde97304 440 close();
segundo 5:fa27dde97304 441 onResult(SMTP_PRTCL);
segundo 5:fa27dde97304 442 return;
segundo 5:fa27dde97304 443 }
segundo 5:fa27dde97304 444 close();
segundo 5:fa27dde97304 445 onResult(SMTP_OK);
segundo 5:fa27dde97304 446 return;
segundo 5:fa27dde97304 447 }
segundo 5:fa27dde97304 448
segundo 5:fa27dde97304 449 if ( m_state != SMTP_BODYMORE ) {
segundo 5:fa27dde97304 450 DBG("Sending | %s", buf);
segundo 5:fa27dde97304 451 m_pTCPSocket->send( buf, strlen(buf) );
segundo 5:fa27dde97304 452 }
segundo 5:fa27dde97304 453
segundo 0:ac1725ba162c 454 }
segundo 0:ac1725ba162c 455
segundo 5:fa27dde97304 456 string& SMTPClient::getLastResponse() { // Return last response set on result
segundo 5:fa27dde97304 457 return m_response;
segundo 5:fa27dde97304 458 }