for TwitterMbed
Fork of GSwifi_old by
GSwifi_smtp.cpp@18:4b97804c37d1, 2012-11-01 (annotated)
- Committer:
- gsfan
- Date:
- Thu Nov 01 02:55:57 2012 +0000
- Revision:
- 18:4b97804c37d1
- Child:
- 19:cad912f5a6ba
support smtp (send mail) and http server (httpd)
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
gsfan | 18:4b97804c37d1 | 1 | #include "dbg.h" |
gsfan | 18:4b97804c37d1 | 2 | #include "mbed.h" |
gsfan | 18:4b97804c37d1 | 3 | #include "GSwifi.h" |
gsfan | 18:4b97804c37d1 | 4 | |
gsfan | 18:4b97804c37d1 | 5 | int GSwifi::mail (Host &host, char *to, char *from, char *subject, char *mesg, char *user, char *pwd) { |
gsfan | 18:4b97804c37d1 | 6 | int ret = -1; |
gsfan | 18:4b97804c37d1 | 7 | int cid; |
gsfan | 18:4b97804c37d1 | 8 | |
gsfan | 18:4b97804c37d1 | 9 | if (! _connect || _status != GSSTAT_READY) return -1; |
gsfan | 18:4b97804c37d1 | 10 | |
gsfan | 18:4b97804c37d1 | 11 | if (host.getIp().isNull()) { |
gsfan | 18:4b97804c37d1 | 12 | if (getHostByName(host)) { |
gsfan | 18:4b97804c37d1 | 13 | if (getHostByName(host)) return -1; |
gsfan | 18:4b97804c37d1 | 14 | } |
gsfan | 18:4b97804c37d1 | 15 | } |
gsfan | 18:4b97804c37d1 | 16 | if (host.getPort() == 0) { |
gsfan | 18:4b97804c37d1 | 17 | host.setPort(25); |
gsfan | 18:4b97804c37d1 | 18 | } |
gsfan | 18:4b97804c37d1 | 19 | |
gsfan | 18:4b97804c37d1 | 20 | cid = open(host, GSPROT_TCP); |
gsfan | 18:4b97804c37d1 | 21 | if (cid < 0) return -1; |
gsfan | 18:4b97804c37d1 | 22 | DBG("cid %d\r\n", cid); |
gsfan | 18:4b97804c37d1 | 23 | |
gsfan | 18:4b97804c37d1 | 24 | if (wait_smtp(cid ,220)) goto exit; |
gsfan | 18:4b97804c37d1 | 25 | |
gsfan | 18:4b97804c37d1 | 26 | // send request |
gsfan | 18:4b97804c37d1 | 27 | send(cid, "EHLO gainspan\r\n", 15); |
gsfan | 18:4b97804c37d1 | 28 | wait_ms(100); |
gsfan | 18:4b97804c37d1 | 29 | if (wait_smtp(cid ,250)) goto exit; |
gsfan | 18:4b97804c37d1 | 30 | |
gsfan | 18:4b97804c37d1 | 31 | if (user && pwd) { |
gsfan | 18:4b97804c37d1 | 32 | // smtp auth |
gsfan | 18:4b97804c37d1 | 33 | char tmp[80], buf[100]; |
gsfan | 18:4b97804c37d1 | 34 | int len; |
gsfan | 18:4b97804c37d1 | 35 | snprintf(tmp, sizeof(tmp), "%s%c%s%c%s", user, 0, user, 0, pwd); |
gsfan | 18:4b97804c37d1 | 36 | len = strlen(user) * 2 + strlen(pwd) + 2; |
gsfan | 18:4b97804c37d1 | 37 | base64encode(tmp, len, buf, sizeof(buf)); |
gsfan | 18:4b97804c37d1 | 38 | send(cid, "AUTH PLAIN ", 11); |
gsfan | 18:4b97804c37d1 | 39 | send(cid, buf, strlen(buf)); |
gsfan | 18:4b97804c37d1 | 40 | send(cid, "\r\n", 2); |
gsfan | 18:4b97804c37d1 | 41 | if (wait_smtp(cid ,235)) goto quit; |
gsfan | 18:4b97804c37d1 | 42 | } |
gsfan | 18:4b97804c37d1 | 43 | |
gsfan | 18:4b97804c37d1 | 44 | send(cid, "MAIL FROM: ", 11); |
gsfan | 18:4b97804c37d1 | 45 | send(cid, from, strlen(from)); |
gsfan | 18:4b97804c37d1 | 46 | send(cid, "\r\n", 2); |
gsfan | 18:4b97804c37d1 | 47 | if (wait_smtp(cid ,250)) goto quit; |
gsfan | 18:4b97804c37d1 | 48 | |
gsfan | 18:4b97804c37d1 | 49 | send(cid, "RCPT TO: ", 9); |
gsfan | 18:4b97804c37d1 | 50 | send(cid, to, strlen(to)); |
gsfan | 18:4b97804c37d1 | 51 | send(cid, "\r\n", 2); |
gsfan | 18:4b97804c37d1 | 52 | if (wait_smtp(cid ,250)) goto quit; |
gsfan | 18:4b97804c37d1 | 53 | |
gsfan | 18:4b97804c37d1 | 54 | send(cid, "DATA\r\n", 6); |
gsfan | 18:4b97804c37d1 | 55 | if (wait_smtp(cid ,354)) goto quit; |
gsfan | 18:4b97804c37d1 | 56 | |
gsfan | 18:4b97804c37d1 | 57 | // mail data |
gsfan | 18:4b97804c37d1 | 58 | send(cid, mesg, strlen(mesg)); |
gsfan | 18:4b97804c37d1 | 59 | send(cid, "\r\n.\r\n", 5); |
gsfan | 18:4b97804c37d1 | 60 | if (wait_smtp(cid ,250)) goto quit; |
gsfan | 18:4b97804c37d1 | 61 | ret = 0; |
gsfan | 18:4b97804c37d1 | 62 | |
gsfan | 18:4b97804c37d1 | 63 | quit: |
gsfan | 18:4b97804c37d1 | 64 | send(cid, "QUIT\r\n", 6); |
gsfan | 18:4b97804c37d1 | 65 | if (wait_smtp(cid ,221)) goto exit; |
gsfan | 18:4b97804c37d1 | 66 | |
gsfan | 18:4b97804c37d1 | 67 | exit: |
gsfan | 18:4b97804c37d1 | 68 | close(cid); |
gsfan | 18:4b97804c37d1 | 69 | return ret; |
gsfan | 18:4b97804c37d1 | 70 | } |
gsfan | 18:4b97804c37d1 | 71 | |
gsfan | 18:4b97804c37d1 | 72 | int GSwifi::wait_smtp (int cid, int code) { |
gsfan | 18:4b97804c37d1 | 73 | Timer timeout; |
gsfan | 18:4b97804c37d1 | 74 | int i, n, len = 0; |
gsfan | 18:4b97804c37d1 | 75 | char buf[500], data[100]; |
gsfan | 18:4b97804c37d1 | 76 | |
gsfan | 18:4b97804c37d1 | 77 | // wait responce |
gsfan | 18:4b97804c37d1 | 78 | timeout.start(); |
gsfan | 18:4b97804c37d1 | 79 | while (timeout.read_ms() < SMTP_TIMEOUT) { |
gsfan | 18:4b97804c37d1 | 80 | wait_ms(100); |
gsfan | 18:4b97804c37d1 | 81 | poll(); |
gsfan | 18:4b97804c37d1 | 82 | n = recv(cid, buf, sizeof(buf)); |
gsfan | 18:4b97804c37d1 | 83 | for (i = 0; i < n; i ++) { |
gsfan | 18:4b97804c37d1 | 84 | if (buf[i] == '\r') continue; |
gsfan | 18:4b97804c37d1 | 85 | if (buf[i] == '\n') { |
gsfan | 18:4b97804c37d1 | 86 | if (len == 0) continue; |
gsfan | 18:4b97804c37d1 | 87 | goto next; |
gsfan | 18:4b97804c37d1 | 88 | } else |
gsfan | 18:4b97804c37d1 | 89 | if (len < sizeof(data) - 1) { |
gsfan | 18:4b97804c37d1 | 90 | data[len] = buf[i]; |
gsfan | 18:4b97804c37d1 | 91 | len ++; |
gsfan | 18:4b97804c37d1 | 92 | } |
gsfan | 18:4b97804c37d1 | 93 | } |
gsfan | 18:4b97804c37d1 | 94 | } |
gsfan | 18:4b97804c37d1 | 95 | next: |
gsfan | 18:4b97804c37d1 | 96 | data[len] = 0; |
gsfan | 18:4b97804c37d1 | 97 | len = 0; |
gsfan | 18:4b97804c37d1 | 98 | DBG("smtp: %s\r\n", data); |
gsfan | 18:4b97804c37d1 | 99 | timeout.stop(); |
gsfan | 18:4b97804c37d1 | 100 | |
gsfan | 18:4b97804c37d1 | 101 | // check return code |
gsfan | 18:4b97804c37d1 | 102 | i = atoi(data); |
gsfan | 18:4b97804c37d1 | 103 | DBG("smtp status %d\r\n", i); |
gsfan | 18:4b97804c37d1 | 104 | if (i == code) return 0; |
gsfan | 18:4b97804c37d1 | 105 | |
gsfan | 18:4b97804c37d1 | 106 | return -1; |
gsfan | 18:4b97804c37d1 | 107 | } |