xref: /openbmc/qemu/tests/qtest/i440fx-test.c (revision 5202861b) 
1 /*
2  * qtest I440FX test case
3  *
4  * Copyright IBM, Corp. 2012-2013
5  * Copyright Red Hat, Inc. 2013
6  *
7  * Authors:
8  *  Anthony Liguori   <aliguori@us.ibm.com>
9  *  Laszlo Ersek      <lersek@redhat.com>
10  *
11  * This work is licensed under the terms of the GNU GPL, version 2 or later.
12  * See the COPYING file in the top-level directory.
13  */
14 
15 #include "qemu/osdep.h"
16 
17 #include "libqtest-single.h"
18 #include "libqos/pci.h"
19 #include "libqos/pci-pc.h"
20 #include "hw/pci/pci_regs.h"
21 
22 #define BROKEN 1
23 
24 typedef struct TestData
25 {
26     int num_cpus;
27 } TestData;
28 
29 typedef struct FirmwareTestFixture {
30     /* decides whether we're testing -bios or -pflash */
31     bool is_bios;
32 } FirmwareTestFixture;
33 
34 static QPCIBus *test_start_get_bus(const TestData *s)
35 {
36     char *cmdline;
37 
38     cmdline = g_strdup_printf("-machine pc -smp %d", s->num_cpus);
39     qtest_start(cmdline);
40     g_free(cmdline);
41     return qpci_new_pc(global_qtest, NULL);
42 }
43 
44 static void test_i440fx_defaults(gconstpointer opaque)
45 {
46     const TestData *s = opaque;
47     QPCIBus *bus;
48     QPCIDevice *dev;
49     uint32_t value;
50 
51     bus = test_start_get_bus(s);
52     dev = qpci_device_find(bus, QPCI_DEVFN(0, 0));
53     g_assert(dev != NULL);
54 
55     /* 3.2.2 */
56     g_assert_cmpint(qpci_config_readw(dev, PCI_VENDOR_ID), ==, 0x8086);
57     /* 3.2.3 */
58     g_assert_cmpint(qpci_config_readw(dev, PCI_DEVICE_ID), ==, 0x1237);
59 #ifndef BROKEN
60     /* 3.2.4 */
61     g_assert_cmpint(qpci_config_readw(dev, PCI_COMMAND), ==, 0x0006);
62     /* 3.2.5 */
63     g_assert_cmpint(qpci_config_readw(dev, PCI_STATUS), ==, 0x0280);
64 #endif
65     /* 3.2.7 */
66     g_assert_cmpint(qpci_config_readb(dev, PCI_CLASS_PROG), ==, 0x00);
67     g_assert_cmpint(qpci_config_readw(dev, PCI_CLASS_DEVICE), ==, 0x0600);
68     /* 3.2.8 */
69     g_assert_cmpint(qpci_config_readb(dev, PCI_LATENCY_TIMER), ==, 0x00);
70     /* 3.2.9 */
71     g_assert_cmpint(qpci_config_readb(dev, PCI_HEADER_TYPE), ==, 0x00);
72     /* 3.2.10 */
73     g_assert_cmpint(qpci_config_readb(dev, PCI_BIST), ==, 0x00);
74 
75     /* 3.2.11 */
76     value = qpci_config_readw(dev, 0x50); /* PMCCFG */
77     if (s->num_cpus == 1) { /* WPE */
78         g_assert(!(value & (1 << 15)));
79     } else {
80         g_assert((value & (1 << 15)));
81     }
82 
83     g_assert(!(value & (1 << 6))); /* EPTE */
84 
85     /* 3.2.12 */
86     g_assert_cmpint(qpci_config_readb(dev, 0x52), ==, 0x00); /* DETURBO */
87     /* 3.2.13 */
88 #ifndef BROKEN
89     g_assert_cmpint(qpci_config_readb(dev, 0x53), ==, 0x80); /* DBC */
90 #endif
91     /* 3.2.14 */
92     g_assert_cmpint(qpci_config_readb(dev, 0x54), ==, 0x00); /* AXC */
93     /* 3.2.15 */
94     g_assert_cmpint(qpci_config_readw(dev, 0x55), ==, 0x0000); /* DRT */
95 #ifndef BROKEN
96     /* 3.2.16 */
97     g_assert_cmpint(qpci_config_readb(dev, 0x57), ==, 0x01); /* DRAMC */
98     /* 3.2.17 */
99     g_assert_cmpint(qpci_config_readb(dev, 0x58), ==, 0x10); /* DRAMT */
100 #endif
101     /* 3.2.18 */
102     g_assert_cmpint(qpci_config_readb(dev, 0x59), ==, 0x00); /* PAM0 */
103     g_assert_cmpint(qpci_config_readb(dev, 0x5A), ==, 0x00); /* PAM1 */
104     g_assert_cmpint(qpci_config_readb(dev, 0x5B), ==, 0x00); /* PAM2 */
105     g_assert_cmpint(qpci_config_readb(dev, 0x5C), ==, 0x00); /* PAM3 */
106     g_assert_cmpint(qpci_config_readb(dev, 0x5D), ==, 0x00); /* PAM4 */
107     g_assert_cmpint(qpci_config_readb(dev, 0x5E), ==, 0x00); /* PAM5 */
108     g_assert_cmpint(qpci_config_readb(dev, 0x5F), ==, 0x00); /* PAM6 */
109 #ifndef BROKEN
110     /* 3.2.19 */
111     g_assert_cmpint(qpci_config_readb(dev, 0x60), ==, 0x01); /* DRB0 */
112     g_assert_cmpint(qpci_config_readb(dev, 0x61), ==, 0x01); /* DRB1 */
113     g_assert_cmpint(qpci_config_readb(dev, 0x62), ==, 0x01); /* DRB2 */
114     g_assert_cmpint(qpci_config_readb(dev, 0x63), ==, 0x01); /* DRB3 */
115     g_assert_cmpint(qpci_config_readb(dev, 0x64), ==, 0x01); /* DRB4 */
116     g_assert_cmpint(qpci_config_readb(dev, 0x65), ==, 0x01); /* DRB5 */
117     g_assert_cmpint(qpci_config_readb(dev, 0x66), ==, 0x01); /* DRB6 */
118     g_assert_cmpint(qpci_config_readb(dev, 0x67), ==, 0x01); /* DRB7 */
119 #endif
120     /* 3.2.20 */
121     g_assert_cmpint(qpci_config_readb(dev, 0x68), ==, 0x00); /* FDHC */
122     /* 3.2.21 */
123     g_assert_cmpint(qpci_config_readb(dev, 0x70), ==, 0x00); /* MTT */
124 #ifndef BROKEN
125     /* 3.2.22 */
126     g_assert_cmpint(qpci_config_readb(dev, 0x71), ==, 0x10); /* CLT */
127 #endif
128     /* 3.2.23 */
129     g_assert_cmpint(qpci_config_readb(dev, 0x72), ==, 0x02); /* SMRAM */
130     /* 3.2.24 */
131     g_assert_cmpint(qpci_config_readb(dev, 0x90), ==, 0x00); /* ERRCMD */
132     /* 3.2.25 */
133     g_assert_cmpint(qpci_config_readb(dev, 0x91), ==, 0x00); /* ERRSTS */
134     /* 3.2.26 */
135     g_assert_cmpint(qpci_config_readb(dev, 0x93), ==, 0x00); /* TRC */
136 
137     g_free(dev);
138     qpci_free_pc(bus);
139     qtest_end();
140 }
141 
142 #define PAM_RE 1
143 #define PAM_WE 2
144 
145 static void pam_set(QPCIDevice *dev, int index, int flags)
146 {
147     int regno = 0x59 + (index / 2);
148     uint8_t reg;
149 
150     reg = qpci_config_readb(dev, regno);
151     if (index & 1) {
152         reg = (reg & 0x0F) | (flags << 4);
153     } else {
154         reg = (reg & 0xF0) | flags;
155     }
156     qpci_config_writeb(dev, regno, reg);
157 }
158 
159 static gboolean verify_area(uint32_t start, uint32_t end, uint8_t value)
160 {
161     uint32_t size = end - start + 1;
162     gboolean ret = TRUE;
163     uint8_t *data;
164     int i;
165 
166     data = g_malloc0(size);
167     memread(start, data, size);
168 
169     g_test_message("verify_area: data[0] = 0x%x", data[0]);
170 
171     for (i = 0; i < size; i++) {
172         if (data[i] != value) {
173             ret = FALSE;
174             break;
175         }
176     }
177 
178     g_free(data);
179 
180     return ret;
181 }
182 
183 static void write_area(uint32_t start, uint32_t end, uint8_t value)
184 {
185     uint32_t size = end - start + 1;
186     uint8_t *data;
187 
188     data = g_malloc(size);
189     memset(data, value, size);
190     memwrite(start, data, size);
191 
192     g_free(data);
193 }
194 
195 static void test_i440fx_pam(gconstpointer opaque)
196 {
197     const TestData *s = opaque;
198     QPCIBus *bus;
199     QPCIDevice *dev;
200     int i;
201     static struct {
202         uint32_t start;
203         uint32_t end;
204     } pam_area[] = {
205         { 0, 0 },             /* Reserved */
206         { 0xF0000, 0xFFFFF }, /* BIOS Area */
207         { 0xC0000, 0xC3FFF }, /* Option ROM */
208         { 0xC4000, 0xC7FFF }, /* Option ROM */
209         { 0xC8000, 0xCBFFF }, /* Option ROM */
210         { 0xCC000, 0xCFFFF }, /* Option ROM */
211         { 0xD0000, 0xD3FFF }, /* Option ROM */
212         { 0xD4000, 0xD7FFF }, /* Option ROM */
213         { 0xD8000, 0xDBFFF }, /* Option ROM */
214         { 0xDC000, 0xDFFFF }, /* Option ROM */
215         { 0xE0000, 0xE3FFF }, /* BIOS Extension */
216         { 0xE4000, 0xE7FFF }, /* BIOS Extension */
217         { 0xE8000, 0xEBFFF }, /* BIOS Extension */
218         { 0xEC000, 0xEFFFF }, /* BIOS Extension */
219     };
220 
221     bus = test_start_get_bus(s);
222     dev = qpci_device_find(bus, QPCI_DEVFN(0, 0));
223     g_assert(dev != NULL);
224 
225     for (i = 0; i < ARRAY_SIZE(pam_area); i++) {
226         if (pam_area[i].start == pam_area[i].end) {
227             continue;
228         }
229 
230         g_test_message("Checking area 0x%05x..0x%05x",
231                        pam_area[i].start, pam_area[i].end);
232         /* Switch to RE for the area */
233         pam_set(dev, i, PAM_RE);
234         /* Verify the RAM is all zeros */
235         g_assert(verify_area(pam_area[i].start, pam_area[i].end, 0));
236 
237         /* Switch to WE for the area */
238         pam_set(dev, i, PAM_RE | PAM_WE);
239         /* Write out a non-zero mask to the full area */
240         write_area(pam_area[i].start, pam_area[i].end, 0x42);
241 
242 #ifndef BROKEN
243         /* QEMU only supports a limited form of PAM */
244 
245         /* Switch to !RE for the area */
246         pam_set(dev, i, PAM_WE);
247         /* Verify the area is not our mask */
248         g_assert(!verify_area(pam_area[i].start, pam_area[i].end, 0x42));
249 #endif
250 
251         /* Verify the area is our new mask */
252         g_assert(verify_area(pam_area[i].start, pam_area[i].end, 0x42));
253 
254         /* Write out a new mask */
255         write_area(pam_area[i].start, pam_area[i].end, 0x82);
256 
257 #ifndef BROKEN
258         /* QEMU only supports a limited form of PAM */
259 
260         /* Verify the area is not our mask */
261         g_assert(!verify_area(pam_area[i].start, pam_area[i].end, 0x82));
262 
263         /* Switch to RE for the area */
264         pam_set(dev, i, PAM_RE | PAM_WE);
265 #endif
266         /* Verify the area is our new mask */
267         g_assert(verify_area(pam_area[i].start, pam_area[i].end, 0x82));
268 
269         /* Reset area */
270         pam_set(dev, i, 0);
271 
272         /* Verify the area is not our new mask */
273         g_assert(!verify_area(pam_area[i].start, pam_area[i].end, 0x82));
274     }
275 
276     g_free(dev);
277     qpci_free_pc(bus);
278     qtest_end();
279 }
280 
281 #ifndef _WIN32
282 
283 #define BLOB_SIZE ((size_t)65536)
284 #define ISA_BIOS_MAXSZ ((size_t)(128 * 1024))
285 
286 /* Create a blob file, and return its absolute pathname as a dynamically
287  * allocated string.
288  * The file is closed before the function returns.
289  * In case of error, NULL is returned. The function prints the error message.
290  */
291 static char *create_blob_file(void)
292 {
293     int ret, fd;
294     char *pathname;
295     GError *error = NULL;
296 
297     ret = -1;
298     fd = g_file_open_tmp("blob_XXXXXX", &pathname, &error);
299     if (fd == -1) {
300         fprintf(stderr, "unable to create blob file: %s\n", error->message);
301         g_error_free(error);
302     } else {
303         if (ftruncate(fd, BLOB_SIZE) == -1) {
304             fprintf(stderr, "ftruncate(\"%s\", %zu): %s\n", pathname,
305                     BLOB_SIZE, strerror(errno));
306         } else {
307             void *buf;
308 
309             buf = mmap(NULL, BLOB_SIZE, PROT_WRITE, MAP_SHARED, fd, 0);
310             if (buf == MAP_FAILED) {
311                 fprintf(stderr, "mmap(\"%s\", %zu): %s\n", pathname, BLOB_SIZE,
312                         strerror(errno));
313             } else {
314                 size_t i;
315 
316                 for (i = 0; i < BLOB_SIZE; ++i) {
317                     ((uint8_t *)buf)[i] = i;
318                 }
319                 munmap(buf, BLOB_SIZE);
320                 ret = 0;
321             }
322         }
323         close(fd);
324         if (ret == -1) {
325             unlink(pathname);
326             g_free(pathname);
327         }
328     }
329 
330     return ret == -1 ? NULL : pathname;
331 }
332 
333 static void test_i440fx_firmware(FirmwareTestFixture *fixture,
334                                  gconstpointer user_data)
335 {
336     char *fw_pathname, *cmdline;
337     uint8_t *buf;
338     size_t i, isa_bios_size;
339 
340     fw_pathname = create_blob_file();
341     g_assert(fw_pathname != NULL);
342 
343     /* Better hope the user didn't put metacharacters in TMPDIR and co. */
344     cmdline = g_strdup_printf("-S %s%s", fixture->is_bios
345                                          ? "-bios "
346                                          : "-drive if=pflash,format=raw,file=",
347                               fw_pathname);
348     g_test_message("qemu cmdline: %s", cmdline);
349     qtest_start(cmdline);
350     g_free(cmdline);
351 
352     /* QEMU has loaded the firmware (because qtest_start() only returns after
353      * the QMP handshake completes). We must unlink the firmware blob right
354      * here, because any assertion firing below would leak it in the
355      * filesystem. This is also the reason why we recreate the blob every time
356      * this function is invoked.
357      */
358     unlink(fw_pathname);
359     g_free(fw_pathname);
360 
361     /* check below 4G */
362     buf = g_malloc0(BLOB_SIZE);
363     memread(0x100000000ULL - BLOB_SIZE, buf, BLOB_SIZE);
364     for (i = 0; i < BLOB_SIZE; ++i) {
365         g_assert_cmphex(buf[i], ==, (uint8_t)i);
366     }
367 
368     /* check in ISA space too */
369     memset(buf, 0, BLOB_SIZE);
370     isa_bios_size = ISA_BIOS_MAXSZ < BLOB_SIZE ? ISA_BIOS_MAXSZ : BLOB_SIZE;
371     memread(0x100000 - isa_bios_size, buf, isa_bios_size);
372     for (i = 0; i < isa_bios_size; ++i) {
373         g_assert_cmphex(buf[i], ==,
374                         (uint8_t)((BLOB_SIZE - isa_bios_size) + i));
375     }
376 
377     g_free(buf);
378     qtest_end();
379 }
380 
381 static void add_firmware_test(const char *testpath,
382                               void (*setup_fixture)(FirmwareTestFixture *f,
383                                                     gconstpointer test_data))
384 {
385     qtest_add(testpath, FirmwareTestFixture, NULL, setup_fixture,
386               test_i440fx_firmware, NULL);
387 }
388 
389 static void request_bios(FirmwareTestFixture *fixture,
390                          gconstpointer user_data)
391 {
392     fixture->is_bios = true;
393 }
394 
395 static void request_pflash(FirmwareTestFixture *fixture,
396                            gconstpointer user_data)
397 {
398     fixture->is_bios = false;
399 }
400 
401 #endif /* _WIN32 */
402 
403 int main(int argc, char **argv)
404 {
405     TestData data;
406 
407     g_test_init(&argc, &argv, NULL);
408 
409     data.num_cpus = 1;
410 
411     qtest_add_data_func("i440fx/defaults", &data, test_i440fx_defaults);
412     qtest_add_data_func("i440fx/pam", &data, test_i440fx_pam);
413 #ifndef _WIN32
414     add_firmware_test("i440fx/firmware/bios", request_bios);
415     add_firmware_test("i440fx/firmware/pflash", request_pflash);
416 #endif
417 
418     return g_test_run();
419 }
420