Jean-Christophe Dubois | 7f39862 | 2015-09-07 10:39:31 +0100 | [diff] [blame] | 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 | |
Peter Maydell | 681c28a | 2016-02-08 18:08:51 +0000 | [diff] [blame] | 20 | #include "qemu/osdep.h" |
Jean-Christophe Dubois | 7f39862 | 2015-09-07 10:39:31 +0100 | [diff] [blame] | 21 | #include "libqtest.h" |
| 22 | #include "libqos/i2c.h" |
| 23 | |
Jean-Christophe Dubois | 7f39862 | 2015-09-07 10:39:31 +0100 | [diff] [blame] | 24 | #define DS1338_ADDR 0x68 |
| 25 | |
Jean-Christophe Dubois | 7f39862 | 2015-09-07 10:39:31 +0100 | [diff] [blame] | 26 | static inline uint8_t bcd2bin(uint8_t x) |
| 27 | { |
| 28 | return ((x) & 0x0f) + ((x) >> 4) * 10; |
| 29 | } |
| 30 | |
Paolo Bonzini | 8130dbc | 2019-03-18 15:59:42 +0100 | [diff] [blame] | 31 | static void send_and_receive(void *obj, void *data, QGuestAllocator *alloc) |
Jean-Christophe Dubois | 7f39862 | 2015-09-07 10:39:31 +0100 | [diff] [blame] | 32 | { |
Paolo Bonzini | 8130dbc | 2019-03-18 15:59:42 +0100 | [diff] [blame] | 33 | QI2CDevice *i2cdev = (QI2CDevice *)obj; |
Paolo Bonzini | 8130dbc | 2019-03-18 15:59:42 +0100 | [diff] [blame] | 34 | |
Jean-Christophe Dubois | 7f39862 | 2015-09-07 10:39:31 +0100 | [diff] [blame] | 35 | uint8_t resp[7]; |
| 36 | time_t now = time(NULL); |
| 37 | struct tm *tm_ptr = gmtime(&now); |
| 38 | |
Paolo Bonzini | 0659947 | 2019-03-18 15:06:50 +0100 | [diff] [blame] | 39 | i2c_read_block(i2cdev, 0, resp, sizeof(resp)); |
Jean-Christophe Dubois | 7f39862 | 2015-09-07 10:39:31 +0100 | [diff] [blame] | 40 | |
| 41 | /* check retrieved time againt 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 | |
Paolo Bonzini | 8130dbc | 2019-03-18 15:59:42 +0100 | [diff] [blame] | 47 | static void ds1338_register_nodes(void) |
Jean-Christophe Dubois | 7f39862 | 2015-09-07 10:39:31 +0100 | [diff] [blame] | 48 | { |
Paolo Bonzini | 8130dbc | 2019-03-18 15:59:42 +0100 | [diff] [blame] | 49 | QOSGraphEdgeOptions opts = { |
| 50 | .extra_device_opts = "address=0x68" |
| 51 | }; |
Paolo Bonzini | 0659947 | 2019-03-18 15:06:50 +0100 | [diff] [blame] | 52 | add_qi2c_address(&opts, &(QI2CAddress) { DS1338_ADDR }); |
Jean-Christophe Dubois | 7f39862 | 2015-09-07 10:39:31 +0100 | [diff] [blame] | 53 | |
Paolo Bonzini | 8130dbc | 2019-03-18 15:59:42 +0100 | [diff] [blame] | 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); |
Jean-Christophe Dubois | 7f39862 | 2015-09-07 10:39:31 +0100 | [diff] [blame] | 57 | } |
Paolo Bonzini | 8130dbc | 2019-03-18 15:59:42 +0100 | [diff] [blame] | 58 | libqos_init(ds1338_register_nodes); |