lwip - Added parallel versions of the packet pressure tests

Author: geky

features/FEATURE_LWIP/TESTS/mbedmicro-net/tcp_packet_pressure_parallel/main.cpp

@@ -0,0 +1,269 @@
+#if !FEATURE_LWIP
+    #error [NOT_SUPPORTED] LWIP not supported for this target
+#endif
+
+#include "mbed.h"
+#include "EthernetInterface.h"
+#include "TCPSocket.h"
+#include "greentea-client/test_env.h"
+#include "unity/unity.h"
+
+
+#ifndef MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_MIN
+#define MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_MIN 64
+#endif
+
+#ifndef MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_MAX
+#define MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_MAX 0x80000
+#endif
+
+#ifndef MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_SEED
+#define MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_SEED 0x6d626564
+#endif
+
+#ifndef MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_THREADS
+#define MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_THREADS 3
+#endif
+
+#ifndef MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_DEBUG
+#define MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_DEBUG false
+#endif
+
+
+// Simple xorshift pseudorandom number generator
+class RandSeq {
+private:
+    uint32_t x;
+    uint32_t y;
+    static const int A = 15;
+    static const int B = 18;
+    static const int C = 11;
+
+public:
+    RandSeq(uint32_t seed=MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_SEED)
+        : x(seed), y(seed) {}
+
+    uint32_t next(void) {
+        x ^= x << A;
+        x ^= x >> B;
+        x ^= y ^ (y >> C);
+        return x + y;
+    }
+
+    void skip(size_t size) {
+        for (size_t i = 0; i < size; i++) {
+            next();
+        }
+    }
+
+    void buffer(uint8_t *buffer, size_t size) {
+        RandSeq lookahead = *this;
+
+        for (size_t i = 0; i < size; i++) {
+            buffer[i] = lookahead.next() & 0xff;
+        }
+    }
+
+    int cmp(uint8_t *buffer, size_t size) {
+        RandSeq lookahead = *this;
+
+        for (size_t i = 0; i < size; i++) {
+            int diff = buffer[i] - (lookahead.next() & 0xff);
+            if (diff != 0) {
+                return diff;
+            }
+        }
+        return 0;
+    }
+};
+
+
+// Tries to get the biggest buffer possible on the device. Exponentially
+// grows a buffer until heap runs out of space, and uses half to leave
+// space for the rest of the program
+void generate_buffer(uint8_t **buffer, size_t *size, size_t min, size_t max) {
+    size_t i = min;
+    while (i < max) {
+        void *b = malloc(i);
+        if (!b) {
+            i /= 4;
+            if (i < min) {
+                i = min;
+            }
+            break;
+        }
+        free(b);
+        i *= 2;
+    }
+
+    *buffer = (uint8_t *)malloc(i);
+    *size = i;
+    TEST_ASSERT(buffer);
+}
+
+
+// Global variables shared between pressure tests
+EthernetInterface net;
+SocketAddress tcp_addr;
+Timer timer;
+Mutex iomutex;
+
+// Single instance of a pressure test
+class PressureTest {
+private:
+    uint8_t *buffer;
+    size_t buffer_size;
+
+    TCPSocket sock;
+    Thread thread;
+
+public:
+    PressureTest(uint8_t *buffer, size_t buffer_size)
+        : buffer(buffer), buffer_size(buffer_size) {
+    }
+
+    void start() {
+        osStatus status = thread.start(callback(this, &PressureTest::run));
+        TEST_ASSERT_EQUAL(osOK, status);
+    }
+
+    void join() {
+        osStatus status = thread.join();
+        TEST_ASSERT_EQUAL(osOK, status);
+    }
+
+    void run() {
+        // Tests exponentially growing sequences
+        for (size_t size = MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_MIN;
+             size < MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_MAX;
+             size *= 2) {
+            int err = sock.open(&net);
+            TEST_ASSERT_EQUAL(0, err);
+            err = sock.connect(tcp_addr);
+            TEST_ASSERT_EQUAL(0, err);
+            iomutex.lock();
+            printf("TCP: %s:%d streaming %d bytes\r\n",
+                tcp_addr.get_ip_address(), tcp_addr.get_port(), size);
+            iomutex.unlock();
+
+            sock.set_blocking(false);
+
+            // Loop to send/recv all data
+            RandSeq tx_seq;
+            RandSeq rx_seq;
+            size_t rx_count = 0;
+            size_t tx_count = 0;
+
+            while (tx_count < size || rx_count < size) {
+                // Send out data
+                if (tx_count < size) {
+                    size_t chunk_size = size - tx_count;
+                    if (chunk_size > buffer_size) {
+                        chunk_size = buffer_size;
+                    }
+
+                    tx_seq.buffer(buffer, chunk_size);
+                    int td = sock.send(buffer, chunk_size);
+                    TEST_ASSERT(td > 0 || td == NSAPI_ERROR_WOULD_BLOCK);
+                    if (td > 0) {
+                        if (MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_DEBUG) {
+                            iomutex.lock();
+                            printf("TCP: tx -> %d\r\n", td);
+                            iomutex.unlock();
+                        }
+                        tx_seq.skip(td);
+                        tx_count += td;
+                    }
+                }
+
+                // Verify recieved data
+                if (rx_count < size) {
+                    int rd = sock.recv(buffer, buffer_size);
+                    TEST_ASSERT(rd > 0 || rd == NSAPI_ERROR_WOULD_BLOCK);
+                    if (rd > 0) {
+                        if (MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_DEBUG) {
+                            iomutex.lock();
+                            printf("TCP: rx <- %d\r\n", rd);
+                            iomutex.unlock();
+                        }
+                        int diff = rx_seq.cmp(buffer, rd);
+                        TEST_ASSERT_EQUAL(0, diff);
+                        rx_seq.skip(rd);
+                        rx_count += rd;
+                    }
+                }
+            }
+
+            err = sock.close();
+            TEST_ASSERT_EQUAL(0, err);
+        }
+    }
+};
+
+PressureTest *pressure_tests[MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_THREADS];
+
+
+int main() {
+    GREENTEA_SETUP(60, "tcp_echo");
+
+    uint8_t *buffer;
+    size_t buffer_size;
+    generate_buffer(&buffer, &buffer_size,
+        MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_MIN,
+        MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_MAX);
+
+    size_t buffer_subsize = buffer_size / MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_THREADS;
+    printf("MBED: Generated buffer %d\r\n", buffer_size);
+    printf("MBED: Split into %d buffers %d\r\n",
+            MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_THREADS,
+            buffer_subsize);
+
+    int err = net.connect();
+    TEST_ASSERT_EQUAL(0, err);
+
+    printf("MBED: TCPClient IP address is '%s'\n", net.get_ip_address());
+    printf("MBED: TCPClient waiting for server IP and port...\n");
+
+    greentea_send_kv("target_ip", net.get_ip_address());
+
+    bool result = true;
+
+    char recv_key[] = "host_port";
+    char ipbuf[60] = {0};
+    char portbuf[16] = {0};
+    unsigned int port = 0;
+
+    greentea_send_kv("host_ip", " ");
+    greentea_parse_kv(recv_key, ipbuf, sizeof(recv_key), sizeof(ipbuf));
+
+    greentea_send_kv("host_port", " ");
+    greentea_parse_kv(recv_key, portbuf, sizeof(recv_key), sizeof(ipbuf));
+    sscanf(portbuf, "%u", &port);
+
+    printf("MBED: Server IP address received: %s:%d \n", ipbuf, port);
+    tcp_addr.set_ip_address(ipbuf);
+    tcp_addr.set_port(port);
+
+    timer.start();
+
+    // Startup pressure tests in parallel
+    for (int i = 0; i < MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_THREADS; i++) {
+        pressure_tests[i] = new PressureTest(&buffer[i*buffer_subsize], buffer_subsize);
+        pressure_tests[i]->start();
+    }
+
+    for (int i = 0; i < MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_THREADS; i++) {
+        pressure_tests[i]->join();
+        delete pressure_tests[i];
+    }
+
+    timer.stop();
+    printf("MBED: Time taken: %fs\r\n", timer.read());
+    printf("MBED: Speed: %.3fkb/s\r\n",
+            MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_THREADS*
+            8*(2*MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_MAX - 
+            MBED_CFG_TCP_CLIENT_PACKET_PRESSURE_MIN) / (1000*timer.read()));
+
+    net.disconnect();
+    GREENTEA_TESTSUITE_RESULT(result);
+}