Statistics
| Branch: | Tag: | Revision:

amiro-os / test / periphery-lld / MPR121_v1 / aos_test_MPR121.c @ 3cee92c7

History | View | Annotate | Download (9.611 KB)

1 e545e620 Thomas Schöpping
/*
2
AMiRo-OS is an operating system designed for the Autonomous Mini Robot (AMiRo) platform.
3 84f0ce9e Thomas Schöpping
Copyright (C) 2016..2019  Thomas Schöpping et al.
4 e545e620 Thomas Schöpping

5
This program is free software: you can redistribute it and/or modify
6
it under the terms of the GNU General Public License as published by
7
the Free Software Foundation, either version 3 of the License, or
8
(at your option) any later version.
9

10
This program is distributed in the hope that it will be useful,
11
but WITHOUT ANY WARRANTY; without even the implied warranty of
12
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13
GNU General Public License for more details.
14

15
You should have received a copy of the GNU General Public License
16
along with this program.  If not, see <http://www.gnu.org/licenses/>.
17
*/
18
19 ddf34c3d Thomas Schöpping
#include <amiroos.h>
20 4c72a54c Thomas Schöpping
#include <aos_test_MPR121.h>
21 e545e620 Thomas Schöpping
22 4c72a54c Thomas Schöpping
#if (AMIROOS_CFG_TESTS_ENABLE == true) || defined(__DOXYGEN__)
23 ddf34c3d Thomas Schöpping
24 f3ac1c96 Thomas Schöpping
/******************************************************************************/
25
/* LOCAL DEFINITIONS                                                          */
26
/******************************************************************************/
27 e545e620 Thomas Schöpping
28
#define INTERRUPT_EVENT_ID            1
29
30 f3ac1c96 Thomas Schöpping
/******************************************************************************/
31
/* EXPORTED VARIABLES                                                         */
32
/******************************************************************************/
33
34
/******************************************************************************/
35
/* LOCAL TYPES                                                                */
36
/******************************************************************************/
37
38
/******************************************************************************/
39
/* LOCAL VARIABLES                                                            */
40
/******************************************************************************/
41
42
/******************************************************************************/
43
/* LOCAL FUNCTIONS                                                            */
44
/******************************************************************************/
45
46
/******************************************************************************/
47
/* EXPORTED FUNCTIONS                                                         */
48
/******************************************************************************/
49
50 4c72a54c Thomas Schöpping
aos_testresult_t aosTestMpr121Func(BaseSequentialStream* stream, const aos_test_t* test)
51 e545e620 Thomas Schöpping
{
52 4c72a54c Thomas Schöpping
  aosDbgCheck(test->data != NULL && ((aos_test_mpr121data_t*)test->data)->mprd != NULL);
53 e545e620 Thomas Schöpping
54
  // local variables
55 4c72a54c Thomas Schöpping
  aos_testresult_t result = {0, 0};
56 b23ca7cc Thomas Schöpping
  int32_t status;
57 e545e620 Thomas Schöpping
  mpr121_lld_config_t cfg;
58 4c72a54c Thomas Schöpping
  uint8_t data = 0;
59
  uint8_t wdata = 0;
60
  uint8_t rdata = 0;
61
  uint16_t edata[4] = {0};
62 e545e620 Thomas Schöpping
  uint8_t tstate = 0;
63
  event_listener_t event_listener;
64
  aos_timestamp_t tstart, tcurrent, tend;
65
66
  chprintf(stream, "soft reset...\n");
67 4c72a54c Thomas Schöpping
  status = mpr121_lld_soft_reset(((aos_test_mpr121data_t*)test->data)->mprd, ((aos_test_mpr121data_t*)test->data)->timeout);
68
  status |= mpr121_lld_read_config(((aos_test_mpr121data_t*)test->data)->mprd, &cfg, ((aos_test_mpr121data_t*)test->data)->timeout);
69 e545e620 Thomas Schöpping
  if (status == APAL_STATUS_SUCCESS && cfg.registers.ele_config == 0) {
70 4c72a54c Thomas Schöpping
    aosTestPassed(stream, &result);
71 e545e620 Thomas Schöpping
  } else {
72 4c72a54c Thomas Schöpping
    aosTestFailedMsg(stream, &result, "0x%08X\n", status);
73 e545e620 Thomas Schöpping
  }
74
75
  chprintf(stream, "read register...\n");
76 4c72a54c Thomas Schöpping
  status = mpr121_lld_read_register(((aos_test_mpr121data_t*)test->data)->mprd, MPR121_LLD_REGISTER_CONFIG_2, 0, 1, &data, ((aos_test_mpr121data_t*)test->data)->timeout);
77 e545e620 Thomas Schöpping
  chprintf(stream, "\t\tdata: 0x%02X\n", data);
78
  if (status == APAL_STATUS_SUCCESS && data == (MPR121_LLD_CDT_0_5 | MPR121_LLD_ESI_16)) {
79 4c72a54c Thomas Schöpping
    aosTestPassed(stream, &result);
80 e545e620 Thomas Schöpping
  } else {
81 4c72a54c Thomas Schöpping
    aosTestFailedMsg(stream, &result, "0x%08X\n", status);
82 e545e620 Thomas Schöpping
  }
83
84
  chprintf(stream, "write register...\n");
85
  wdata = MPR121_LLD_CDT_32 | MPR121_LLD_SFI_10 | MPR121_LLD_ESI_16;
86 4c72a54c Thomas Schöpping
  status = mpr121_lld_write_register(((aos_test_mpr121data_t*)test->data)->mprd, MPR121_LLD_REGISTER_CONFIG_2, 0, 1, &wdata, ((aos_test_mpr121data_t*)test->data)->timeout);
87 e545e620 Thomas Schöpping
  aosThdMSleep(500);
88 4c72a54c Thomas Schöpping
  status |= mpr121_lld_read_register(((aos_test_mpr121data_t*)test->data)->mprd, MPR121_LLD_REGISTER_CONFIG_2, 0, 1, &rdata, ((aos_test_mpr121data_t*)test->data)->timeout);
89 e545e620 Thomas Schöpping
  chprintf(stream, "\t\tdata: 0x%02X\n", rdata);
90 4c72a54c Thomas Schöpping
  status |= mpr121_lld_write_register(((aos_test_mpr121data_t*)test->data)->mprd, MPR121_LLD_REGISTER_CONFIG_2, 0, 1, &data, ((aos_test_mpr121data_t*)test->data)->timeout);
91 e545e620 Thomas Schöpping
  if (status == APAL_STATUS_SUCCESS && rdata == wdata) {
92 4c72a54c Thomas Schöpping
    aosTestPassed(stream, &result);
93 e545e620 Thomas Schöpping
  } else {
94 4c72a54c Thomas Schöpping
    aosTestFailedMsg(stream, &result, "0x%08X\n", status);
95 e545e620 Thomas Schöpping
  }
96
97
  chprintf(stream, "read config...\n");
98 4c72a54c Thomas Schöpping
  status = mpr121_lld_read_config(((aos_test_mpr121data_t*)test->data)->mprd, &cfg, ((aos_test_mpr121data_t*)test->data)->timeout);
99 e545e620 Thomas Schöpping
  if (status == APAL_STATUS_SUCCESS && cfg.registers.config_1 == 0x10 && cfg.registers.config_2 == 0x24) {
100 4c72a54c Thomas Schöpping
    aosTestPassed(stream, &result);
101 e545e620 Thomas Schöpping
  } else {
102
    chprintf(stream, "\t\tconfig 1: 0x%02X\n", cfg.registers.config_1);
103
    chprintf(stream, "\t\tconfig 2: 0x%02X\n", cfg.registers.config_2);
104 4c72a54c Thomas Schöpping
    mpr121_lld_read_register(((aos_test_mpr121data_t*)test->data)->mprd, MPR121_LLD_REGISTER_CONFIG_1, 0, 1, &rdata, ((aos_test_mpr121data_t*)test->data)->timeout);
105 e545e620 Thomas Schöpping
    chprintf(stream, "\t\tconfig 1: 0x%02X\n", rdata);
106 4c72a54c Thomas Schöpping
    mpr121_lld_read_register(((aos_test_mpr121data_t*)test->data)->mprd, MPR121_LLD_REGISTER_CONFIG_2, 0, 1, &rdata, ((aos_test_mpr121data_t*)test->data)->timeout);
107 e545e620 Thomas Schöpping
    chprintf(stream, "\t\tconfig 2: 0x%02X\n", rdata);
108
    for (uint8_t valueIdx = 0; valueIdx < 8; valueIdx++) {
109
      chprintf(stream, "\t\tdata %d: 0x%02X\n", valueIdx, cfg.values[valueIdx]);
110
    }
111
    chprintf(stream, "ele_config: 0x%02X\n", cfg.registers.ele_config);
112
    chprintf(stream, "config_1: 0x%02X\n", cfg.registers.config_1);
113
    chprintf(stream, "config_2: 0x%02X\n", cfg.registers.config_2);
114
    chprintf(stream, "target_level: 0x%02X\n", cfg.registers.target_level);
115
    chprintf(stream, "low_side_limit: 0x%02X\n", cfg.registers.low_side_limit);
116
    chprintf(stream, "up_side_limit: 0x%02X\n", cfg.registers.up_side_limit);
117
    chprintf(stream, "auto_config_2: 0x%02X\n", cfg.registers.auto_config_2);
118
    chprintf(stream, "auto_config_1: 0x%02X\n", cfg.registers.auto_config_1);
119 4c72a54c Thomas Schöpping
    aosTestFailedMsg(stream, &result, "0x%08X\n", status);
120 e545e620 Thomas Schöpping
  }
121
122
  chprintf(stream, "write config...\n");
123
  cfg.registers.ele_config = MPR121_LLD_CL_ON_ALL | MPR121_LLD_ELEPROX_0 | 4;
124
  cfg.registers.config_1 = MPR121_LLD_FFI_18 | 16;
125
  cfg.registers.config_2 = MPR121_LLD_CDT_1 | MPR121_LLD_SFI_10 | MPR121_LLD_ESI_32;
126
  cfg.registers.up_side_limit = 0x96u;
127
  cfg.registers.low_side_limit = 0x58u;
128
  cfg.registers.target_level = 0x68u;
129
  cfg.registers.auto_config_1 = MPR121_LLD_FFI_18 | MPR121_LLD_RETRY_2 | MPR121_LLD_BVA_ON_ALL | MPR121_LLD_AC_RECONF_EN;
130 4c72a54c Thomas Schöpping
  status = mpr121_lld_write_config(((aos_test_mpr121data_t*)test->data)->mprd, cfg, ((aos_test_mpr121data_t*)test->data)->timeout);
131 e545e620 Thomas Schöpping
  aosThdMSleep(500);
132 4c72a54c Thomas Schöpping
  status |= mpr121_lld_read_config(((aos_test_mpr121data_t*)test->data)->mprd, &cfg, ((aos_test_mpr121data_t*)test->data)->timeout);
133 e545e620 Thomas Schöpping
  if (status == APAL_STATUS_SUCCESS && cfg.registers.up_side_limit == 0x96u) {
134 4c72a54c Thomas Schöpping
    aosTestPassed(stream, &result);
135 e545e620 Thomas Schöpping
  } else {
136 4c72a54c Thomas Schöpping
    aosTestFailedMsg(stream, &result, "0x%08X\n", status);
137 e545e620 Thomas Schöpping
  }
138
139
  chprintf(stream, "read filtered data for ten seconds...\n");
140
  chprintf(stream, "(values should change if you touch the sensors now)\n");
141
  for (uint8_t i = 0; i < 10; i++) {
142 4c72a54c Thomas Schöpping
    status = mpr121_lld_read_filtered_data(((aos_test_mpr121data_t*)test->data)->mprd, 0, 4, edata, ((aos_test_mpr121data_t*)test->data)->timeout);
143 e545e620 Thomas Schöpping
    chprintf(stream, "\t\t0x%04X | 0x%04X | 0x%04X | 0x%04X\n", edata[0], edata[1], edata[2], edata[3]);
144
    aosThdSSleep(1);
145
  }
146
  if (status == APAL_STATUS_SUCCESS) {
147 4c72a54c Thomas Schöpping
    aosTestPassed(stream, &result);
148 e545e620 Thomas Schöpping
  } else {
149 4c72a54c Thomas Schöpping
    aosTestFailedMsg(stream, &result, "0x%08X\n", status);
150 e545e620 Thomas Schöpping
  }
151
152
  chprintf(stream, "test interrupts...\n");
153
  status = AOS_OK;
154 4c72a54c Thomas Schöpping
  chEvtRegister(((aos_test_mpr121data_t*)test->data)->evtsource, &event_listener, INTERRUPT_EVENT_ID);
155 e545e620 Thomas Schöpping
  aosSysGetUptime(&tstart);
156
  tend = tstart + (30 * MICROSECONDS_PER_SECOND);
157
  do {
158
    aosSysGetUptime(&tcurrent);
159
    const aos_timestamp_t ttimeout = MICROSECONDS_PER_SECOND - ((tcurrent - tstart) % MICROSECONDS_PER_SECOND);
160 1e5f7648 Thomas Schöpping
    const eventmask_t emask = chEvtWaitOneTimeout(EVENT_MASK(INTERRUPT_EVENT_ID), chTimeUS2I(ttimeout));
161 e545e620 Thomas Schöpping
    const eventflags_t eflags = chEvtGetAndClearFlags(&event_listener);
162 4c72a54c Thomas Schöpping
    if (emask == EVENT_MASK(INTERRUPT_EVENT_ID) && eflags == ((aos_test_mpr121data_t*)test->data)->evtflags) {
163 e545e620 Thomas Schöpping
      // interrupt detected
164 4c72a54c Thomas Schöpping
      status |= mpr121_lld_read_register(((aos_test_mpr121data_t*)test->data)->mprd, MPR121_LLD_REGISTER_TOUCH_STATUS, 0, 1, &tstate, ((aos_test_mpr121data_t*)test->data)->timeout);
165 e545e620 Thomas Schöpping
      chprintf(stream, "\t\tinterrupt detected\n");
166
      chprintf(stream, "\t\ttstate: %X %X %X %X\n", tstate & 1, (tstate >> 1) & 1, (tstate >> 2) & 1, (tstate >> 3) & 1);
167
    }
168
    else if (emask == 0) {
169
      // timeout
170 4c72a54c Thomas Schöpping
      status |= mpr121_lld_read_register(((aos_test_mpr121data_t*)test->data)->mprd, MPR121_LLD_REGISTER_TOUCH_STATUS, 0, 1, &tstate, ((aos_test_mpr121data_t*)test->data)->timeout);
171 e545e620 Thomas Schöpping
      chprintf(stream, "\t\ttstate: %X %X %X %X\n", tstate & 1, (tstate >> 1) & 1, (tstate >> 2) & 1, (tstate >> 3) & 1);
172
    }
173
    aosSysGetUptime(&tcurrent);
174
  } while (tcurrent < tend);
175 4c72a54c Thomas Schöpping
  chEvtUnregister(((aos_test_mpr121data_t*)test->data)->evtsource, &event_listener);
176 e545e620 Thomas Schöpping
  if (status == APAL_STATUS_SUCCESS) {
177 4c72a54c Thomas Schöpping
    aosTestPassed(stream, &result);
178 e545e620 Thomas Schöpping
  } else {
179 4c72a54c Thomas Schöpping
    aosTestFailedMsg(stream, &result, "0x%08X\n", status);
180 e545e620 Thomas Schöpping
  }
181
182 4c72a54c Thomas Schöpping
  aosTestInfoMsg(stream,"driver object memory footprint: %u bytes\n", sizeof(MPR121Driver));
183 e545e620 Thomas Schöpping
184
  return result;
185
}
186
187 4c72a54c Thomas Schöpping
#endif /* (AMIROOS_CFG_TESTS_ENABLE == true) */