1 /*
2 * QTest testcase for the DS1338 RTC
3 *
4 * Copyright (c) 2013 Jean-Christophe Dubois
5 *
6 * This program is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License as published by the
8 * Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful, but WITHOUT
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 * for more details.
15 *
16 * You should have received a copy of the GNU General Public License along
17 * with this program; if not, see <http://www.gnu.org/licenses/>.
18 */
19
20 #include "qemu/osdep.h"
21 #include "libqtest.h"
22 #include "libqos/i2c.h"
23
24 #define DS1338_ADDR 0x68
25
bcd2bin(uint8_t x)26 static inline uint8_t bcd2bin(uint8_t x)
27 {
28 return ((x) & 0x0f) + ((x) >> 4) * 10;
29 }
30
send_and_receive(void * obj,void * data,QGuestAllocator * alloc)31 static void send_and_receive(void *obj, void *data, QGuestAllocator *alloc)
32 {
33 QI2CDevice *i2cdev = (QI2CDevice *)obj;
34
35 uint8_t resp[7];
36 time_t now = time(NULL);
37 struct tm *tm_ptr = gmtime(&now);
38
39 i2c_read_block(i2cdev, 0, resp, sizeof(resp));
40
41 /* check retrieved time against local time */
42 g_assert_cmpuint(bcd2bin(resp[4]), == , tm_ptr->tm_mday);
43 g_assert_cmpuint(bcd2bin(resp[5]), == , 1 + tm_ptr->tm_mon);
44 g_assert_cmpuint(2000 + bcd2bin(resp[6]), == , 1900 + tm_ptr->tm_year);
45 }
46
ds1338_register_nodes(void)47 static void ds1338_register_nodes(void)
48 {
49 QOSGraphEdgeOptions opts = {
50 .extra_device_opts = "address=0x68"
51 };
52 add_qi2c_address(&opts, &(QI2CAddress) { DS1338_ADDR });
53
54 qos_node_create_driver("ds1338", i2c_device_create);
55 qos_node_consumes("ds1338", "i2c-bus", &opts);
56 qos_add_test("tx-rx", "ds1338", send_and_receive, NULL);
57 }
58 libqos_init(ds1338_register_nodes);
59