]>
Commit | Line | Data |
---|---|---|
24f976d3 CM |
1 | /* |
2 | * IPMI KCS test cases, using the local interface. | |
3 | * | |
4 | * Copyright (c) 2012 Corey Minyard <cminyard@mvista.com> | |
5 | * | |
6 | * Permission is hereby granted, free of charge, to any person obtaining a copy | |
7 | * of this software and associated documentation files (the "Software"), to deal | |
8 | * in the Software without restriction, including without limitation the rights | |
9 | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell | |
10 | * copies of the Software, and to permit persons to whom the Software is | |
11 | * furnished to do so, subject to the following conditions: | |
12 | * | |
13 | * The above copyright notice and this permission notice shall be included in | |
14 | * all copies or substantial portions of the Software. | |
15 | * | |
16 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | |
17 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | |
18 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL | |
19 | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER | |
20 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, | |
21 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN | |
22 | * THE SOFTWARE. | |
23 | */ | |
24 | ||
681c28a3 | 25 | #include "qemu/osdep.h" |
24f976d3 | 26 | |
dd210749 | 27 | #include "libqtest-single.h" |
24f976d3 CM |
28 | |
29 | #define IPMI_IRQ 5 | |
30 | ||
31 | #define IPMI_KCS_BASE 0xca2 | |
32 | ||
33 | #define IPMI_KCS_STATUS_ABORT 0x60 | |
34 | #define IPMI_KCS_CMD_WRITE_START 0x61 | |
35 | #define IPMI_KCS_CMD_WRITE_END 0x62 | |
36 | #define IPMI_KCS_CMD_READ 0x68 | |
37 | ||
38 | #define IPMI_KCS_ABORTED_BY_CMD 0x01 | |
39 | ||
40 | #define IPMI_KCS_CMDREG_GET_STATE() ((kcs_get_cmdreg() >> 6) & 3) | |
41 | #define IPMI_KCS_STATE_IDLE 0 | |
42 | #define IPMI_KCS_STATE_READ 1 | |
43 | #define IPMI_KCS_STATE_WRITE 2 | |
44 | #define IPMI_KCS_STATE_ERROR 3 | |
45 | #define IPMI_KCS_CMDREG_GET_CD() ((kcs_get_cmdreg() >> 3) & 1) | |
46 | #define IPMI_KCS_CMDREG_GET_ATN() ((kcs_get_cmdreg() >> 2) & 1) | |
47 | #define IPMI_KCS_CMDREG_GET_IBF() ((kcs_get_cmdreg() >> 1) & 1) | |
48 | #define IPMI_KCS_CMDREG_GET_OBF() ((kcs_get_cmdreg() >> 0) & 1) | |
49 | ||
50 | static int kcs_ints_enabled; | |
51 | ||
52 | static uint8_t kcs_get_cmdreg(void) | |
53 | { | |
54 | return inb(IPMI_KCS_BASE + 1); | |
55 | } | |
56 | ||
57 | static void kcs_write_cmdreg(uint8_t val) | |
58 | { | |
59 | outb(IPMI_KCS_BASE + 1, val); | |
60 | } | |
61 | ||
62 | static uint8_t kcs_get_datareg(void) | |
63 | { | |
64 | return inb(IPMI_KCS_BASE); | |
65 | } | |
66 | ||
67 | static void kcs_write_datareg(uint8_t val) | |
68 | { | |
69 | outb(IPMI_KCS_BASE, val); | |
70 | } | |
71 | ||
72 | static void kcs_wait_ibf(void) | |
73 | { | |
74 | unsigned int count = 1000; | |
75 | while (IPMI_KCS_CMDREG_GET_IBF() != 0) { | |
76 | g_assert(--count != 0); | |
77 | } | |
78 | } | |
79 | ||
80 | static void kcs_wait_obf(void) | |
81 | { | |
82 | unsigned int count = 1000; | |
83 | while (IPMI_KCS_CMDREG_GET_OBF() == 0) { | |
84 | g_assert(--count != 0); | |
85 | } | |
86 | } | |
87 | ||
88 | static void kcs_clear_obf(void) | |
89 | { | |
90 | if (kcs_ints_enabled) { | |
91 | g_assert(get_irq(IPMI_IRQ)); | |
92 | } else { | |
93 | g_assert(!get_irq(IPMI_IRQ)); | |
94 | } | |
95 | g_assert(IPMI_KCS_CMDREG_GET_OBF() == 1); | |
96 | kcs_get_datareg(); | |
97 | g_assert(IPMI_KCS_CMDREG_GET_OBF() == 0); | |
98 | g_assert(!get_irq(IPMI_IRQ)); | |
99 | } | |
100 | ||
101 | static void kcs_check_state(uint8_t state) | |
102 | { | |
103 | g_assert(IPMI_KCS_CMDREG_GET_STATE() == state); | |
104 | } | |
105 | ||
106 | static void kcs_cmd(uint8_t *cmd, unsigned int cmd_len, | |
107 | uint8_t *rsp, unsigned int *rsp_len) | |
108 | { | |
109 | unsigned int i, j = 0; | |
110 | ||
111 | /* Should be idle */ | |
112 | g_assert(kcs_get_cmdreg() == 0); | |
113 | ||
114 | kcs_write_cmdreg(IPMI_KCS_CMD_WRITE_START); | |
115 | kcs_wait_ibf(); | |
116 | kcs_check_state(IPMI_KCS_STATE_WRITE); | |
117 | kcs_clear_obf(); | |
118 | for (i = 0; i < cmd_len; i++) { | |
119 | kcs_write_datareg(cmd[i]); | |
120 | kcs_wait_ibf(); | |
121 | kcs_check_state(IPMI_KCS_STATE_WRITE); | |
122 | kcs_clear_obf(); | |
123 | } | |
124 | kcs_write_cmdreg(IPMI_KCS_CMD_WRITE_END); | |
125 | kcs_wait_ibf(); | |
126 | kcs_check_state(IPMI_KCS_STATE_WRITE); | |
127 | kcs_clear_obf(); | |
128 | kcs_write_datareg(0); | |
129 | next_read_byte: | |
130 | kcs_wait_ibf(); | |
131 | switch (IPMI_KCS_CMDREG_GET_STATE()) { | |
132 | case IPMI_KCS_STATE_READ: | |
133 | kcs_wait_obf(); | |
134 | g_assert(j < *rsp_len); | |
135 | rsp[j++] = kcs_get_datareg(); | |
136 | kcs_write_datareg(IPMI_KCS_CMD_READ); | |
137 | goto next_read_byte; | |
138 | break; | |
139 | ||
140 | case IPMI_KCS_STATE_IDLE: | |
141 | kcs_wait_obf(); | |
142 | kcs_get_datareg(); | |
143 | break; | |
144 | ||
145 | default: | |
146 | g_assert(0); | |
147 | } | |
148 | *rsp_len = j; | |
149 | } | |
150 | ||
151 | static void kcs_abort(uint8_t *cmd, unsigned int cmd_len, | |
152 | uint8_t *rsp, unsigned int *rsp_len) | |
153 | { | |
154 | unsigned int i, j = 0; | |
155 | unsigned int retries = 4; | |
156 | ||
157 | /* Should be idle */ | |
158 | g_assert(kcs_get_cmdreg() == 0); | |
159 | ||
160 | kcs_write_cmdreg(IPMI_KCS_CMD_WRITE_START); | |
161 | kcs_wait_ibf(); | |
162 | kcs_check_state(IPMI_KCS_STATE_WRITE); | |
163 | kcs_clear_obf(); | |
164 | for (i = 0; i < cmd_len; i++) { | |
165 | kcs_write_datareg(cmd[i]); | |
166 | kcs_wait_ibf(); | |
167 | kcs_check_state(IPMI_KCS_STATE_WRITE); | |
168 | kcs_clear_obf(); | |
169 | } | |
170 | kcs_write_cmdreg(IPMI_KCS_CMD_WRITE_END); | |
171 | kcs_wait_ibf(); | |
172 | kcs_check_state(IPMI_KCS_STATE_WRITE); | |
173 | kcs_clear_obf(); | |
174 | kcs_write_datareg(0); | |
175 | kcs_wait_ibf(); | |
176 | switch (IPMI_KCS_CMDREG_GET_STATE()) { | |
177 | case IPMI_KCS_STATE_READ: | |
178 | kcs_wait_obf(); | |
179 | g_assert(j < *rsp_len); | |
180 | rsp[j++] = kcs_get_datareg(); | |
181 | kcs_write_datareg(IPMI_KCS_CMD_READ); | |
182 | break; | |
183 | ||
184 | default: | |
185 | g_assert(0); | |
186 | } | |
187 | ||
188 | /* Start the abort here */ | |
189 | retry_abort: | |
190 | g_assert(retries > 0); | |
191 | ||
192 | kcs_wait_ibf(); | |
193 | kcs_write_cmdreg(IPMI_KCS_STATUS_ABORT); | |
194 | kcs_wait_ibf(); | |
195 | kcs_clear_obf(); | |
196 | kcs_write_datareg(0); | |
197 | kcs_wait_ibf(); | |
198 | if (IPMI_KCS_CMDREG_GET_STATE() != IPMI_KCS_STATE_READ) { | |
199 | retries--; | |
200 | goto retry_abort; | |
201 | } | |
202 | kcs_wait_obf(); | |
203 | rsp[0] = kcs_get_datareg(); | |
204 | kcs_write_datareg(IPMI_KCS_CMD_READ); | |
205 | kcs_wait_ibf(); | |
206 | if (IPMI_KCS_CMDREG_GET_STATE() != IPMI_KCS_STATE_IDLE) { | |
207 | retries--; | |
208 | goto retry_abort; | |
209 | } | |
210 | kcs_wait_obf(); | |
211 | kcs_clear_obf(); | |
212 | ||
213 | *rsp_len = j; | |
214 | } | |
215 | ||
216 | ||
217 | static uint8_t get_dev_id_cmd[] = { 0x18, 0x01 }; | |
218 | static uint8_t get_dev_id_rsp[] = { 0x1c, 0x01, 0x00, 0x20, 0x00, 0x00, 0x00, | |
219 | 0x02, 0x07, 0x00, 0x00, 0x00, 0x00, 0x00 }; | |
220 | ||
221 | /* | |
222 | * Send a get_device_id to do a basic test. | |
223 | */ | |
224 | static void test_kcs_base(void) | |
225 | { | |
226 | uint8_t rsp[20]; | |
227 | unsigned int rsplen = sizeof(rsp); | |
228 | ||
229 | kcs_cmd(get_dev_id_cmd, sizeof(get_dev_id_cmd), rsp, &rsplen); | |
230 | g_assert(rsplen == sizeof(get_dev_id_rsp)); | |
231 | g_assert(memcmp(get_dev_id_rsp, rsp, rsplen) == 0); | |
232 | } | |
233 | ||
234 | /* | |
235 | * Abort a kcs operation while reading | |
236 | */ | |
237 | static void test_kcs_abort(void) | |
238 | { | |
239 | uint8_t rsp[20]; | |
240 | unsigned int rsplen = sizeof(rsp); | |
241 | ||
242 | kcs_abort(get_dev_id_cmd, sizeof(get_dev_id_cmd), rsp, &rsplen); | |
243 | g_assert(rsp[0] == IPMI_KCS_ABORTED_BY_CMD); | |
244 | } | |
245 | ||
246 | static uint8_t set_bmc_globals_cmd[] = { 0x18, 0x2e, 0x0f }; | |
247 | static uint8_t set_bmc_globals_rsp[] = { 0x1c, 0x2e, 0x00 }; | |
248 | ||
249 | /* | |
250 | * Enable interrupts | |
251 | */ | |
252 | static void test_enable_irq(void) | |
253 | { | |
254 | uint8_t rsp[20]; | |
255 | unsigned int rsplen = sizeof(rsp); | |
256 | ||
257 | kcs_cmd(set_bmc_globals_cmd, sizeof(set_bmc_globals_cmd), rsp, &rsplen); | |
258 | g_assert(rsplen == sizeof(set_bmc_globals_rsp)); | |
259 | g_assert(memcmp(set_bmc_globals_rsp, rsp, rsplen) == 0); | |
260 | kcs_ints_enabled = 1; | |
261 | } | |
262 | ||
263 | int main(int argc, char **argv) | |
264 | { | |
24f976d3 CM |
265 | char *cmdline; |
266 | int ret; | |
267 | ||
24f976d3 CM |
268 | /* Run the tests */ |
269 | g_test_init(&argc, &argv, NULL); | |
270 | ||
2df35773 | 271 | cmdline = g_strdup_printf("-device ipmi-bmc-sim,id=bmc0" |
24f976d3 CM |
272 | " -device isa-ipmi-kcs,bmc=bmc0"); |
273 | qtest_start(cmdline); | |
3f5f5d04 | 274 | g_free(cmdline); |
24f976d3 CM |
275 | qtest_irq_intercept_in(global_qtest, "ioapic"); |
276 | qtest_add_func("/ipmi/local/kcs_base", test_kcs_base); | |
277 | qtest_add_func("/ipmi/local/kcs_abort", test_kcs_abort); | |
278 | qtest_add_func("/ipmi/local/kcs_enable_irq", test_enable_irq); | |
279 | qtest_add_func("/ipmi/local/kcs_base_irq", test_kcs_base); | |
280 | qtest_add_func("/ipmi/local/kcs_abort_irq", test_kcs_abort); | |
281 | ret = g_test_run(); | |
282 | qtest_quit(global_qtest); | |
283 | ||
284 | return ret; | |
285 | } |