summaryrefslogtreecommitdiff
path: root/ucoo/hal/i2c/test/test_i2c.cc
blob: 8b6ef9b5aac083c3b8f982e52e83e571b39f4979 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
// ucoolib - Microcontroller object oriented library. {{{
//
// Copyright (C) 2013 Nicolas Schodet
//
// Permission is hereby granted, free of charge, to any person obtaining a
// copy of this software and associated documentation files (the "Software"),
// to deal in the Software without restriction, including without limitation
// the rights to use, copy, modify, merge, publish, distribute, sublicense,
// and/or sell copies of the Software, and to permit persons to whom the
// Software is furnished to do so, subject to the following conditions:
//
// The above copyright notice and this permission notice shall be included in
// all copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
// DEALINGS IN THE SOFTWARE.
//
// }}}
#include "ucoo/hal/i2c/i2c.hh"

#include "ucoo/arch/arch.hh"
#include "ucoo/base/test/test.hh"

#ifdef TARGET_stm32
#  include <libopencm3/stm32/rcc.h>
#  include "ucoo/hal/gpio/gpio.hh"
#endif

#ifdef TARGET_host
#  define TEST_NOT_THERE 0
#else
#  define TEST_NOT_THERE 1
#endif

#include "ucoo/utils/delay.hh"

#include <algorithm>
#include <cstring>

static const int buffer_size = 16;
static const int margin = 5;
static const uint8_t a1 = 0x2c, a2 = 0x2e, a3 = 0x42;

void
test_basic (ucoo::TestSuite &tsuite, ucoo::I2cMaster &m,
            ucoo::I2cSlaveDataBuffer &d, uint8_t addr)
{
    tsuite.group ("basic");
    {
        ucoo::Test test (tsuite, "recv");
        const char *hello = "Hello world!";
        char buf[buffer_size + margin];
        d.update (hello, std::strlen (hello) + 1);
        char ref[buffer_size + margin];
        int ref_size = std::strlen (hello) + 1;
        std::copy (hello, hello + ref_size, ref);
#ifdef TARGET_stm32
        // Slave is not able to signal its buffer end. Extra bytes will be
        // read as 0xff.
        std::fill (ref + ref_size, ref + sizeof (ref), 0xff);
        ref_size = sizeof (ref);
#endif
        for (int len = 2; len < (int) sizeof (buf); len++)
        {
            std::fill (buf, buf + sizeof (buf), 42);
            m.recv (addr, buf, len);
            int r = m.wait ();
            int rexp = std::min (len, ref_size);
            test_fail_break_unless (test, r == rexp);
            test_fail_break_unless (test, std::equal (buf, buf + rexp, ref));
            test_fail_break_unless (test, std::count (buf, buf + sizeof (buf), 42)
                                    == (int) sizeof (buf) - rexp);
        }
    }
    {
        ucoo::Test test (tsuite, "send");
        // Slave is supposed to signal when it received enough data, but this
        // is not implemented.
        char buf[buffer_size + margin];
        for (int len = 1; len < (int) sizeof (buf); len++)
        {
            int r;
            // Before transfer, no data.
            r = d.poll (buf, sizeof (buf));
            test_fail_break_unless (test, r == 0);
            // Send data.
            char c = '0' + len % 10;
            std::fill (buf, buf + len, c);
            m.send (addr, buf, len);
            r = m.wait ();
            test_fail_break_unless (test, r == len);
            // Let some time for slave to finish reception.
            ucoo::delay_ms (1);
            // Check what is received.
            r = d.poll (buf, sizeof (buf));
            test_fail_break_unless (test, r == std::min (len, buffer_size));
            test_fail_break_unless (test, std::count (buf, buf + r, c) == r);
        }
    }
    do {
        ucoo::Test test (tsuite, "callback");
        // Callback object will start a reception, then a transmission of what
        // was received.
        class TestCallback : public ucoo::I2cMaster::FinishedHandler
        {
            ucoo::I2cMaster &m_;
            uint8_t addr_;
            int step_;
            char buf_[buffer_size];
          public:
            bool failed;
          public:
            TestCallback (ucoo::I2cMaster &m, uint8_t addr)
                : m_ (m), addr_ (addr), step_ (0), failed (false) { }
            void finished (int status)
            {
                if (status != buffer_size)
                    failed = true;
                else
                {
                    switch (step_)
                    {
                    case 0:
                        step_++;
                        m_.recv (addr_, buf_, buffer_size);
                        break;
                    case 1:
                        step_++;
                        m_.send (addr_, buf_, buffer_size);
                        break;
                    case 2:
                        // Nothing, stop.
                        break;
                    }
                }
            }
        };
        TestCallback callback (m, addr);
        m.register_finished (callback);
        // Set slave data.
        char buf[buffer_size];
        std::fill (buf, buf + sizeof (buf), 42);
        d.update (buf, sizeof (buf));
        // Start transfers.
        std::fill (buf, buf + sizeof (buf), 21);
        m.send (addr, buf, sizeof (buf));
        // Will only return after the last transfer.
        m.wait ();
        m.unregister_finished ();
        test_fail_break_unless (test, !callback.failed);
        // Let some time for slave to finish reception.
        ucoo::delay_ms (1);
        // Check what is received by slave (master should have read 42 from
        // slave and send it back).
        int r = d.poll (buf, sizeof (buf));
        test_fail_break_unless (test, r == buffer_size);
        test_fail_break_unless (test, std::count (buf, buf + r, 42) == r);
    } while (0);
}

void
test_not_there (ucoo::TestSuite &tsuite, ucoo::I2cMaster &m, uint8_t addr)
{
    tsuite.group ("not there");
    do {
        ucoo::Test test (tsuite, "recv");
        char buf[buffer_size];
        m.recv (addr, buf, buffer_size);
        int r = m.wait ();
        test_fail_break_unless (test, r == ucoo::I2cMaster::STATUS_ERROR);
    } while (0);
    do {
        ucoo::Test test (tsuite, "send");
        char buf[buffer_size];
        std::fill (buf, buf + buffer_size, 42);
        m.send (addr, buf, buffer_size);
        int r = m.wait ();
        test_fail_break_unless (test, r == ucoo::I2cMaster::STATUS_ERROR);
    } while (0);
}

int
main (int argc, const char **argv)
{
    ucoo::arch_init (argc, argv);
    ucoo::TestSuite tsuite ("i2c");
#if defined (TARGET_host)
    ucoo::Host host ("test_i2c");
    host.parse_options ();
    ucoo::I2cHost i2c1 (host, 0);
    ucoo::I2cHost i2c2 (host, 1);
#elif defined (TARGET_stm32)
    // Connect I2C1 to I2C3 for the test.
    // I2C1: B6: SCL, B9: SDA
    // I2C3: A8: SCL, C9: SDA
    rcc_periph_clock_enable (RCC_GPIOA);
    rcc_periph_clock_enable (RCC_GPIOB);
    rcc_periph_clock_enable (RCC_GPIOC);
    gpio_mode_setup (GPIOB, GPIO_MODE_AF, GPIO_PUPD_NONE, GPIO6 | GPIO9);
    gpio_mode_setup (GPIOA, GPIO_MODE_AF, GPIO_PUPD_NONE, GPIO8);
    gpio_mode_setup (GPIOC, GPIO_MODE_AF, GPIO_PUPD_NONE, GPIO9);
    gpio_set_output_options (GPIOB, GPIO_OTYPE_OD, GPIO_OSPEED_2MHZ, GPIO6 | GPIO9);
    gpio_set_output_options (GPIOA, GPIO_OTYPE_OD, GPIO_OSPEED_2MHZ, GPIO8);
    gpio_set_output_options (GPIOC, GPIO_OTYPE_OD, GPIO_OSPEED_2MHZ, GPIO9);
    gpio_set_af (GPIOB, GPIO_AF4, GPIO6 | GPIO9);
    gpio_set_af (GPIOA, GPIO_AF4, GPIO8);
    gpio_set_af (GPIOC, GPIO_AF4, GPIO9);
    ucoo::I2cHard i2c1 (0);
    ucoo::I2cHard i2c2 (2);
    i2c1.enable ();
    i2c2.enable ();
#endif
    ucoo::I2cSlaveDataBufferSize<16, 16> data1, data2;
    i2c1.register_data (a1, data1);
    i2c2.register_data (a2, data2);
    // Run tests.
    test_basic (tsuite, i2c1, data2, a2);
    if (TEST_NOT_THERE)
        test_not_there (tsuite, i2c1, a3);
    test_basic (tsuite, i2c2, data1, a1);
    return tsuite.report () ? 0 : 1;
}