Hendrik Vincent / Mbed 2 deprecated Weerstation

Leest de waarde van een sensor binnen een maakt deze beschikbaar via internet

Dependencies:   NTPClient_NetServices mbed

NetServices/services/email/smtp/SMTPClient.cpp@0:05ccbd4f84f1, 2013-12-02 (annotated)

Committer:
hendrikvincent
Date:
Mon Dec 02 09:01:23 2013 +0000
Revision:
0:05ccbd4f84f1
eerste programma;

Who changed what in which revision?

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