Initial setup for TheKsystem.

Dependencies:   mbed-http HTS221

Committer:
Jan Jongboom
Date:
Mon Sep 04 17:01:11 2017 +0100
Revision:
17:97b1dd566b07
Parent:
16:1374b4c35897
Child:
20:d851bc648f9e
Enable entropy sources for ODIN-W2; add note on memory usage

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