Initial setup for TheKsystem.

Dependencies:   mbed-http HTS221

Committer:
Jan Jongboom
Date:
Sat Nov 18 13:58:34 2017 +0100
Revision:
20:d851bc648f9e
Parent:
17:97b1dd566b07
Child:
25:a8be9f3a530c
Remove heap stats tracking

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Jan Jongboom 12:4c226ca06191 1 #include "select-demo.h"
Jan Jongboom 12:4c226ca06191 2
Jan Jongboom 12:4c226ca06191 3 /**
Jan Jongboom 12:4c226ca06191 4 * This demo shows how to re-use sockets, so the TLS handshake only has to happen once
Jan Jongboom 12:4c226ca06191 5 */
Jan Jongboom 12:4c226ca06191 6
Jan Jongboom 12:4c226ca06191 7 #if DEMO == DEMO_HTTPS_SOCKET_REUSE
Jan Jongboom 12:4c226ca06191 8
Jan Jongboom 12:4c226ca06191 9 #include "mbed.h"
Jan Jongboom 12:4c226ca06191 10 #include "easy-connect.h"
Jan Jongboom 12:4c226ca06191 11 #include "https_request.h"
Jan Jongboom 12:4c226ca06191 12
Jan Jongboom 12:4c226ca06191 13 Serial pc(USBTX, USBRX);
Jan Jongboom 12:4c226ca06191 14
Jan Jongboom 12:4c226ca06191 15 /* List of trusted root CA certificates
Jan Jongboom 12:4c226ca06191 16 * currently one: Let's Encrypt, the CA for httpbin.org
Jan Jongboom 12:4c226ca06191 17 *
Jan Jongboom 12:4c226ca06191 18 * To add more root certificates, just concatenate them.
Jan Jongboom 12:4c226ca06191 19 */
Jan Jongboom 12:4c226ca06191 20 const char SSL_CA_PEM[] = "-----BEGIN CERTIFICATE-----\n"
Jan Jongboom 12:4c226ca06191 21 "MIIEkjCCA3qgAwIBAgIQCgFBQgAAAVOFc2oLheynCDANBgkqhkiG9w0BAQsFADA/\n"
Jan Jongboom 12:4c226ca06191 22 "MSQwIgYDVQQKExtEaWdpdGFsIFNpZ25hdHVyZSBUcnVzdCBDby4xFzAVBgNVBAMT\n"
Jan Jongboom 12:4c226ca06191 23 "DkRTVCBSb290IENBIFgzMB4XDTE2MDMxNzE2NDA0NloXDTIxMDMxNzE2NDA0Nlow\n"
Jan Jongboom 12:4c226ca06191 24 "SjELMAkGA1UEBhMCVVMxFjAUBgNVBAoTDUxldCdzIEVuY3J5cHQxIzAhBgNVBAMT\n"
Jan Jongboom 12:4c226ca06191 25 "GkxldCdzIEVuY3J5cHQgQXV0aG9yaXR5IFgzMIIBIjANBgkqhkiG9w0BAQEFAAOC\n"
Jan Jongboom 12:4c226ca06191 26 "AQ8AMIIBCgKCAQEAnNMM8FrlLke3cl03g7NoYzDq1zUmGSXhvb418XCSL7e4S0EF\n"
Jan Jongboom 12:4c226ca06191 27 "q6meNQhY7LEqxGiHC6PjdeTm86dicbp5gWAf15Gan/PQeGdxyGkOlZHP/uaZ6WA8\n"
Jan Jongboom 12:4c226ca06191 28 "SMx+yk13EiSdRxta67nsHjcAHJyse6cF6s5K671B5TaYucv9bTyWaN8jKkKQDIZ0\n"
Jan Jongboom 12:4c226ca06191 29 "Z8h/pZq4UmEUEz9l6YKHy9v6Dlb2honzhT+Xhq+w3Brvaw2VFn3EK6BlspkENnWA\n"
Jan Jongboom 12:4c226ca06191 30 "a6xK8xuQSXgvopZPKiAlKQTGdMDQMc2PMTiVFrqoM7hD8bEfwzB/onkxEz0tNvjj\n"
Jan Jongboom 12:4c226ca06191 31 "/PIzark5McWvxI0NHWQWM6r6hCm21AvA2H3DkwIDAQABo4IBfTCCAXkwEgYDVR0T\n"
Jan Jongboom 12:4c226ca06191 32 "AQH/BAgwBgEB/wIBADAOBgNVHQ8BAf8EBAMCAYYwfwYIKwYBBQUHAQEEczBxMDIG\n"
Jan Jongboom 12:4c226ca06191 33 "CCsGAQUFBzABhiZodHRwOi8vaXNyZy50cnVzdGlkLm9jc3AuaWRlbnRydXN0LmNv\n"
Jan Jongboom 12:4c226ca06191 34 "bTA7BggrBgEFBQcwAoYvaHR0cDovL2FwcHMuaWRlbnRydXN0LmNvbS9yb290cy9k\n"
Jan Jongboom 12:4c226ca06191 35 "c3Ryb290Y2F4My5wN2MwHwYDVR0jBBgwFoAUxKexpHsscfrb4UuQdf/EFWCFiRAw\n"
Jan Jongboom 12:4c226ca06191 36 "VAYDVR0gBE0wSzAIBgZngQwBAgEwPwYLKwYBBAGC3xMBAQEwMDAuBggrBgEFBQcC\n"
Jan Jongboom 12:4c226ca06191 37 "ARYiaHR0cDovL2Nwcy5yb290LXgxLmxldHNlbmNyeXB0Lm9yZzA8BgNVHR8ENTAz\n"
Jan Jongboom 12:4c226ca06191 38 "MDGgL6AthitodHRwOi8vY3JsLmlkZW50cnVzdC5jb20vRFNUUk9PVENBWDNDUkwu\n"
Jan Jongboom 12:4c226ca06191 39 "Y3JsMB0GA1UdDgQWBBSoSmpjBH3duubRObemRWXv86jsoTANBgkqhkiG9w0BAQsF\n"
Jan Jongboom 12:4c226ca06191 40 "AAOCAQEA3TPXEfNjWDjdGBX7CVW+dla5cEilaUcne8IkCJLxWh9KEik3JHRRHGJo\n"
Jan Jongboom 12:4c226ca06191 41 "uM2VcGfl96S8TihRzZvoroed6ti6WqEBmtzw3Wodatg+VyOeph4EYpr/1wXKtx8/\n"
Jan Jongboom 12:4c226ca06191 42 "wApIvJSwtmVi4MFU5aMqrSDE6ea73Mj2tcMyo5jMd6jmeWUHK8so/joWUoHOUgwu\n"
Jan Jongboom 12:4c226ca06191 43 "X4Po1QYz+3dszkDqMp4fklxBwXRsW10KXzPMTZ+sOPAveyxindmjkW8lGy+QsRlG\n"
Jan Jongboom 12:4c226ca06191 44 "PfZ+G6Z6h7mjem0Y+iWlkYcV4PIWL1iwBi8saCbGS5jN2p8M+X+Q7UNKEkROb3N6\n"
Jan Jongboom 12:4c226ca06191 45 "KOqkqm57TH2H3eDJAkSnh6/DNFu0Qg==\n"
Jan Jongboom 12:4c226ca06191 46 "-----END CERTIFICATE-----\n";
Jan Jongboom 12:4c226ca06191 47
Jan Jongboom 12:4c226ca06191 48 void dump_response(HttpResponse* res) {
Jan Jongboom 12:4c226ca06191 49 mbedtls_printf("Status: %d - %s\n", res->get_status_code(), res->get_status_message().c_str());
Jan Jongboom 12:4c226ca06191 50
Jan Jongboom 12:4c226ca06191 51 mbedtls_printf("Headers:\n");
Jan Jongboom 12:4c226ca06191 52 for (size_t ix = 0; ix < res->get_headers_length(); ix++) {
Jan Jongboom 12:4c226ca06191 53 mbedtls_printf("\t%s: %s\n", res->get_headers_fields()[ix]->c_str(), res->get_headers_values()[ix]->c_str());
Jan Jongboom 12:4c226ca06191 54 }
Jan Jongboom 12:4c226ca06191 55 mbedtls_printf("\nBody (%d bytes):\n\n%s\n", res->get_body_length(), res->get_body_as_string().c_str());
Jan Jongboom 12:4c226ca06191 56 }
Jan Jongboom 12:4c226ca06191 57
Jan Jongboom 16:1374b4c35897 58 void run() {
Jan Jongboom 12:4c226ca06191 59 NetworkInterface* network = easy_connect(true);
Jan Jongboom 12:4c226ca06191 60 if (!network) {
Jan Jongboom 16:1374b4c35897 61 return;
Jan Jongboom 12:4c226ca06191 62 }
Jan Jongboom 12:4c226ca06191 63
Jan Jongboom 12:4c226ca06191 64 // Create a TLS socket (which holds a TCPSocket)
Jan Jongboom 12:4c226ca06191 65 printf("\n----- Setting up TLS connection -----\n");
Jan Jongboom 12:4c226ca06191 66
Jan Jongboom 12:4c226ca06191 67 TLSSocket* socket = new TLSSocket(network, "httpbin.org", 443, SSL_CA_PEM);
Jan Jongboom 12:4c226ca06191 68 socket->set_debug(true);
Jan Jongboom 12:4c226ca06191 69 if (socket->connect() != 0) {
Jan Jongboom 12:4c226ca06191 70 printf("TLS Connect failed %d\n", socket->error());
Jan Jongboom 16:1374b4c35897 71 return;
Jan Jongboom 12:4c226ca06191 72 }
Jan Jongboom 12:4c226ca06191 73
Jan Jongboom 12:4c226ca06191 74 // GET request to httpbin.org
Jan Jongboom 12:4c226ca06191 75 {
Jan Jongboom 12:4c226ca06191 76 HttpsRequest* get_req = new HttpsRequest(socket, HTTP_GET, "https://httpbin.org/status/418");
Jan Jongboom 12:4c226ca06191 77 get_req->set_debug(true);
Jan Jongboom 12:4c226ca06191 78
Jan Jongboom 12:4c226ca06191 79 HttpResponse* get_res = get_req->send();
Jan Jongboom 12:4c226ca06191 80 if (!get_res) {
Jan Jongboom 12:4c226ca06191 81 printf("HttpRequest failed (error code %d)\n", get_req->get_error());
Jan Jongboom 16:1374b4c35897 82 return;
Jan Jongboom 12:4c226ca06191 83 }
Jan Jongboom 12:4c226ca06191 84 printf("\n----- HTTPS GET response -----\n");
Jan Jongboom 12:4c226ca06191 85 dump_response(get_res);
Jan Jongboom 12:4c226ca06191 86
Jan Jongboom 12:4c226ca06191 87 delete get_req;
Jan Jongboom 12:4c226ca06191 88 }
Jan Jongboom 12:4c226ca06191 89
Jan Jongboom 12:4c226ca06191 90 // POST request to httpbin.org
Jan Jongboom 12:4c226ca06191 91 {
Jan Jongboom 12:4c226ca06191 92 HttpsRequest* post_req = new HttpsRequest(socket, HTTP_POST, "https://httpbin.org/post");
Jan Jongboom 12:4c226ca06191 93 post_req->set_debug(true);
Jan Jongboom 12:4c226ca06191 94 post_req->set_header("Content-Type", "application/json");
Jan Jongboom 12:4c226ca06191 95
Jan Jongboom 12:4c226ca06191 96 const char body[] = "{\"hello\":\"world\"}";
Jan Jongboom 12:4c226ca06191 97
Jan Jongboom 12:4c226ca06191 98 HttpResponse* post_res = post_req->send(body, strlen(body));
Jan Jongboom 12:4c226ca06191 99 if (!post_res) {
Jan Jongboom 12:4c226ca06191 100 printf("HttpRequest failed (error code %d)\n", post_req->get_error());
Jan Jongboom 16:1374b4c35897 101 return;
Jan Jongboom 12:4c226ca06191 102 }
Jan Jongboom 12:4c226ca06191 103
Jan Jongboom 12:4c226ca06191 104 printf("\n----- HTTPS POST response -----\n");
Jan Jongboom 12:4c226ca06191 105 dump_response(post_res);
Jan Jongboom 12:4c226ca06191 106
Jan Jongboom 12:4c226ca06191 107 delete post_req;
Jan Jongboom 12:4c226ca06191 108 }
Jan Jongboom 12:4c226ca06191 109
Jan Jongboom 12:4c226ca06191 110 delete socket;
Jan Jongboom 12:4c226ca06191 111
Jan Jongboom 16:1374b4c35897 112 Thread::wait(osWaitForever);
Jan Jongboom 16:1374b4c35897 113 }
Jan Jongboom 16:1374b4c35897 114
Jan Jongboom 16:1374b4c35897 115 int main() {
Jan Jongboom 16:1374b4c35897 116 pc.baud(115200);
Jan Jongboom 16:1374b4c35897 117
Jan Jongboom 16:1374b4c35897 118 Thread t(osPriorityNormal, 8 * 1024);
Jan Jongboom 16:1374b4c35897 119 t.start(&run);
Jan Jongboom 16:1374b4c35897 120
Jan Jongboom 12:4c226ca06191 121 Thread::wait(osWaitForever);
Jan Jongboom 12:4c226ca06191 122 }
Jan Jongboom 12:4c226ca06191 123
Jan Jongboom 12:4c226ca06191 124 #endif