xref: /freebsd/usr.sbin/bhyve/acpi.c (revision a18eacbefdfa1085ca3db829e86ece78cd416493)
1 /*-
2  * Copyright (c) 2012 NetApp, Inc.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY NETAPP, INC ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL NETAPP, INC OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD$
27  */
28 
29 /*
30  * bhyve ACPI table generator.
31  *
32  * Create the minimal set of ACPI tables required to boot FreeBSD (and
33  * hopefully other o/s's) by writing out ASL template files for each of
34  * the tables and the compiling them to AML with the Intel iasl compiler.
35  * The AML files are then read into guest memory.
36  *
37  *  The tables are placed in the guest's ROM area just below 1MB physical,
38  * above the MPTable.
39  *
40  *  Layout
41  *  ------
42  *   RSDP  ->   0xf0400    (36 bytes fixed)
43  *     RSDT  ->   0xf0440    (36 bytes + 4*N table addrs, 2 used)
44  *     XSDT  ->   0xf0480    (36 bytes + 8*N table addrs, 2 used)
45  *       MADT  ->   0xf0500  (depends on #CPUs)
46  *       FADT  ->   0xf0600  (268 bytes)
47  *         FACS  ->   0xf0780 (64 bytes)
48  *         DSDT  ->   0xf0800 (variable - can go up to 0x100000)
49  */
50 
51 #include <sys/cdefs.h>
52 __FBSDID("$FreeBSD$");
53 
54 #include <sys/param.h>
55 #include <sys/errno.h>
56 #include <sys/stat.h>
57 
58 #include <paths.h>
59 #include <stdio.h>
60 #include <stdlib.h>
61 #include <string.h>
62 #include <unistd.h>
63 
64 #include "bhyverun.h"
65 #include "acpi.h"
66 
67 /*
68  * Define the base address of the ACPI tables, and the offsets to
69  * the individual tables
70  */
71 #define BHYVE_ACPI_BASE		0xf0400
72 #define RSDT_OFFSET		0x040
73 #define XSDT_OFFSET		0x080
74 #define MADT_OFFSET		0x100
75 #define FADT_OFFSET		0x200
76 #define FACS_OFFSET		0x380
77 #define DSDT_OFFSET		0x400
78 
79 #define	BHYVE_ASL_TEMPLATE	"bhyve.XXXXXXX"
80 #define BHYVE_ASL_SUFFIX	".aml"
81 #define BHYVE_ASL_COMPILER	"/usr/sbin/iasl"
82 
83 #define BHYVE_PM_TIMER_ADDR	0x408
84 
85 static int basl_keep_temps;
86 static int basl_verbose_iasl;
87 static int basl_ncpu;
88 static uint32_t basl_acpi_base = BHYVE_ACPI_BASE;
89 
90 /*
91  * Contains the full pathname of the template to be passed
92  * to mkstemp/mktemps(3)
93  */
94 static char basl_template[MAXPATHLEN];
95 static char basl_stemplate[MAXPATHLEN];
96 
97 struct basl_fio {
98 	int	fd;
99 	FILE	*fp;
100 	char	f_name[MAXPATHLEN];
101 };
102 
103 #define EFPRINTF(...) \
104 	err = fprintf(__VA_ARGS__); if (err < 0) goto err_exit;
105 
106 #define EFFLUSH(x) \
107 	err = fflush(x); if (err != 0) goto err_exit;
108 
109 static int
110 basl_fwrite_rsdp(FILE *fp)
111 {
112 	int err;
113 
114 	err = 0;
115 
116 	EFPRINTF(fp, "/*\n");
117 	EFPRINTF(fp, " * bhyve RSDP template\n");
118 	EFPRINTF(fp, " */\n");
119 	EFPRINTF(fp, "[0008]\t\tSignature : \"RSD PTR \"\n");
120 	EFPRINTF(fp, "[0001]\t\tChecksum : 43\n");
121 	EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n");
122 	EFPRINTF(fp, "[0001]\t\tRevision : 02\n");
123 	EFPRINTF(fp, "[0004]\t\tRSDT Address : %08X\n",
124 	    basl_acpi_base + RSDT_OFFSET);
125 	EFPRINTF(fp, "[0004]\t\tLength : 00000024\n");
126 	EFPRINTF(fp, "[0008]\t\tXSDT Address : 00000000%08X\n",
127 	    basl_acpi_base + XSDT_OFFSET);
128 	EFPRINTF(fp, "[0001]\t\tExtended Checksum : 00\n");
129 	EFPRINTF(fp, "[0003]\t\tReserved : 000000\n");
130 
131 	EFFLUSH(fp);
132 
133 	return (0);
134 
135 err_exit:
136 	return (errno);
137 }
138 
139 static int
140 basl_fwrite_rsdt(FILE *fp)
141 {
142 	int err;
143 
144 	err = 0;
145 
146 	EFPRINTF(fp, "/*\n");
147 	EFPRINTF(fp, " * bhyve RSDT template\n");
148 	EFPRINTF(fp, " */\n");
149 	EFPRINTF(fp, "[0004]\t\tSignature : \"RSDT\"\n");
150 	EFPRINTF(fp, "[0004]\t\tTable Length : 00000000\n");
151 	EFPRINTF(fp, "[0001]\t\tRevision : 01\n");
152 	EFPRINTF(fp, "[0001]\t\tChecksum : 00\n");
153 	EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n");
154 	EFPRINTF(fp, "[0008]\t\tOem Table ID : \"BVRSDT  \"\n");
155 	EFPRINTF(fp, "[0004]\t\tOem Revision : 00000001\n");
156 	/* iasl will fill in the compiler ID/revision fields */
157 	EFPRINTF(fp, "[0004]\t\tAsl Compiler ID : \"xxxx\"\n");
158 	EFPRINTF(fp, "[0004]\t\tAsl Compiler Revision : 00000000\n");
159 	EFPRINTF(fp, "\n");
160 
161 	/* Add in pointers to the MADT and FADT */
162 	EFPRINTF(fp, "[0004]\t\tACPI Table Address 0 : %08X\n",
163 	    basl_acpi_base + MADT_OFFSET);
164 	EFPRINTF(fp, "[0004]\t\tACPI Table Address 1 : %08X\n",
165 	    basl_acpi_base + FADT_OFFSET);
166 
167 	EFFLUSH(fp);
168 
169 	return (0);
170 
171 err_exit:
172 	return (errno);
173 }
174 
175 static int
176 basl_fwrite_xsdt(FILE *fp)
177 {
178 	int err;
179 
180 	err = 0;
181 
182 	EFPRINTF(fp, "/*\n");
183 	EFPRINTF(fp, " * bhyve XSDT template\n");
184 	EFPRINTF(fp, " */\n");
185 	EFPRINTF(fp, "[0004]\t\tSignature : \"XSDT\"\n");
186 	EFPRINTF(fp, "[0004]\t\tTable Length : 00000000\n");
187 	EFPRINTF(fp, "[0001]\t\tRevision : 01\n");
188 	EFPRINTF(fp, "[0001]\t\tChecksum : 00\n");
189 	EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n");
190 	EFPRINTF(fp, "[0008]\t\tOem Table ID : \"BVXSDT  \"\n");
191 	EFPRINTF(fp, "[0004]\t\tOem Revision : 00000001\n");
192 	/* iasl will fill in the compiler ID/revision fields */
193 	EFPRINTF(fp, "[0004]\t\tAsl Compiler ID : \"xxxx\"\n");
194 	EFPRINTF(fp, "[0004]\t\tAsl Compiler Revision : 00000000\n");
195 	EFPRINTF(fp, "\n");
196 
197 	/* Add in pointers to the MADT and FADT */
198 	EFPRINTF(fp, "[0004]\t\tACPI Table Address 0 : 00000000%08X\n",
199 	    basl_acpi_base + MADT_OFFSET);
200 	EFPRINTF(fp, "[0004]\t\tACPI Table Address 1 : 00000000%08X\n",
201 	    basl_acpi_base + FADT_OFFSET);
202 
203 	EFFLUSH(fp);
204 
205 	return (0);
206 
207 err_exit:
208 	return (errno);
209 }
210 
211 static int
212 basl_fwrite_madt(FILE *fp)
213 {
214 	int err;
215 	int i;
216 
217 	err = 0;
218 
219 	EFPRINTF(fp, "/*\n");
220 	EFPRINTF(fp, " * bhyve MADT template\n");
221 	EFPRINTF(fp, " */\n");
222 	EFPRINTF(fp, "[0004]\t\tSignature : \"APIC\"\n");
223 	EFPRINTF(fp, "[0004]\t\tTable Length : 00000000\n");
224 	EFPRINTF(fp, "[0001]\t\tRevision : 01\n");
225 	EFPRINTF(fp, "[0001]\t\tChecksum : 00\n");
226 	EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n");
227 	EFPRINTF(fp, "[0008]\t\tOem Table ID : \"BVMADT  \"\n");
228 	EFPRINTF(fp, "[0004]\t\tOem Revision : 00000001\n");
229 
230 	/* iasl will fill in the compiler ID/revision fields */
231 	EFPRINTF(fp, "[0004]\t\tAsl Compiler ID : \"xxxx\"\n");
232 	EFPRINTF(fp, "[0004]\t\tAsl Compiler Revision : 00000000\n");
233 	EFPRINTF(fp, "\n");
234 
235 	EFPRINTF(fp, "[0004]\t\tLocal Apic Address : FEE00000\n");
236 	EFPRINTF(fp, "[0004]\t\tFlags (decoded below) : 00000001\n");
237 	EFPRINTF(fp, "\t\t\tPC-AT Compatibility : 1\n");
238 	EFPRINTF(fp, "\n");
239 
240 	/* Add a Processor Local APIC entry for each CPU */
241 	for (i = 0; i < basl_ncpu; i++) {
242 		EFPRINTF(fp, "[0001]\t\tSubtable Type : 00\n");
243 		EFPRINTF(fp, "[0001]\t\tLength : 08\n");
244 		/* iasl expects hex values for the proc and apic id's */
245 		EFPRINTF(fp, "[0001]\t\tProcessor ID : %02x\n", i);
246 		EFPRINTF(fp, "[0001]\t\tLocal Apic ID : %02x\n", i);
247 		EFPRINTF(fp, "[0004]\t\tFlags (decoded below) : 00000001\n");
248 		EFPRINTF(fp, "\t\t\tProcessor Enabled : 1\n");
249 		EFPRINTF(fp, "\n");
250 	}
251 
252 	/* Always a single IOAPIC entry, with ID ncpu+1 */
253 	EFPRINTF(fp, "[0001]\t\tSubtable Type : 01\n");
254 	EFPRINTF(fp, "[0001]\t\tLength : 0C\n");
255 	/* iasl expects a hex value for the i/o apic id */
256 	EFPRINTF(fp, "[0001]\t\tI/O Apic ID : %02x\n", basl_ncpu);
257 	EFPRINTF(fp, "[0001]\t\tReserved : 00\n");
258 	EFPRINTF(fp, "[0004]\t\tAddress : fec00000\n");
259 	EFPRINTF(fp, "[0004]\t\tInterrupt : 00000000\n");
260 	EFPRINTF(fp, "\n");
261 
262 	/* Legacy IRQ0 is connected to pin 2 of the IOAPIC */
263 	EFPRINTF(fp, "[0001]\t\tSubtable Type : 02\n");
264 	EFPRINTF(fp, "[0001]\t\tLength : 0A\n");
265 	EFPRINTF(fp, "[0001]\t\tBus : 00\n");
266 	EFPRINTF(fp, "[0001]\t\tSource : 00\n");
267 	EFPRINTF(fp, "[0004]\t\tInterrupt : 00000002\n");
268 	EFPRINTF(fp, "[0002]\t\tFlags (decoded below) : 0005\n");
269 	EFPRINTF(fp, "\t\t\tPolarity : 1\n");
270 	EFPRINTF(fp, "\t\t\tTrigger Mode : 1\n");
271 	EFPRINTF(fp, "\n");
272 
273 	EFPRINTF(fp, "[0001]\t\tSubtable Type : 02\n");
274 	EFPRINTF(fp, "[0001]\t\tLength : 0A\n");
275 	EFPRINTF(fp, "[0001]\t\tBus : 00\n");
276 	EFPRINTF(fp, "[0001]\t\tSource : 09\n");
277 	EFPRINTF(fp, "[0004]\t\tInterrupt : 00000009\n");
278 	EFPRINTF(fp, "[0002]\t\tFlags (decoded below) : 0000\n");
279 	EFPRINTF(fp, "\t\t\tPolarity : 0\n");
280 	EFPRINTF(fp, "\t\t\tTrigger Mode : 0\n");
281 	EFPRINTF(fp, "\n");
282 
283 	EFFLUSH(fp);
284 
285 	return (0);
286 
287 err_exit:
288 	return (errno);
289 }
290 
291 static int
292 basl_fwrite_fadt(FILE *fp)
293 {
294 	int err;
295 
296 	err = 0;
297 
298 	EFPRINTF(fp, "/*\n");
299 	EFPRINTF(fp, " * bhyve FADT template\n");
300 	EFPRINTF(fp, " */\n");
301 	EFPRINTF(fp, "[0004]\t\tSignature : \"FACP\"\n");
302 	EFPRINTF(fp, "[0004]\t\tTable Length : 0000010C\n");
303 	EFPRINTF(fp, "[0001]\t\tRevision : 05\n");
304 	EFPRINTF(fp, "[0001]\t\tChecksum : 00\n");
305 	EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n");
306 	EFPRINTF(fp, "[0008]\t\tOem Table ID : \"BVFACP  \"\n");
307 	EFPRINTF(fp, "[0004]\t\tOem Revision : 00000001\n");
308 	/* iasl will fill in the compiler ID/revision fields */
309 	EFPRINTF(fp, "[0004]\t\tAsl Compiler ID : \"xxxx\"\n");
310 	EFPRINTF(fp, "[0004]\t\tAsl Compiler Revision : 00000000\n");
311 	EFPRINTF(fp, "\n");
312 
313 	EFPRINTF(fp, "[0004]\t\tFACS Address : %08X\n",
314 	    basl_acpi_base + FACS_OFFSET);
315 	EFPRINTF(fp, "[0004]\t\tDSDT Address : %08X\n",
316 	    basl_acpi_base + DSDT_OFFSET);
317 	EFPRINTF(fp, "[0001]\t\tModel : 00\n");
318 	EFPRINTF(fp, "[0001]\t\tPM Profile : 00 [Unspecified]\n");
319 	EFPRINTF(fp, "[0002]\t\tSCI Interrupt : 0009\n");
320 	EFPRINTF(fp, "[0004]\t\tSMI Command Port : 00000000\n");
321 	EFPRINTF(fp, "[0001]\t\tACPI Enable Value : 00\n");
322 	EFPRINTF(fp, "[0001]\t\tACPI Disable Value : 00\n");
323 	EFPRINTF(fp, "[0001]\t\tS4BIOS Command : 00\n");
324 	EFPRINTF(fp, "[0001]\t\tP-State Control : 00\n");
325 	EFPRINTF(fp, "[0004]\t\tPM1A Event Block Address : 00000000\n");
326 	EFPRINTF(fp, "[0004]\t\tPM1B Event Block Address : 00000000\n");
327 	EFPRINTF(fp, "[0004]\t\tPM1A Control Block Address : 00000000\n");
328 	EFPRINTF(fp, "[0004]\t\tPM1B Control Block Address : 00000000\n");
329 	EFPRINTF(fp, "[0004]\t\tPM2 Control Block Address : 00000000\n");
330 	EFPRINTF(fp, "[0004]\t\tPM Timer Block Address : %08X\n",
331 		 BHYVE_PM_TIMER_ADDR);
332 	EFPRINTF(fp, "[0004]\t\tGPE0 Block Address : 00000000\n");
333 	EFPRINTF(fp, "[0004]\t\tGPE1 Block Address : 00000000\n");
334 	EFPRINTF(fp, "[0001]\t\tPM1 Event Block Length : 04\n");
335 	EFPRINTF(fp, "[0001]\t\tPM1 Control Block Length : 02\n");
336 	EFPRINTF(fp, "[0001]\t\tPM2 Control Block Length : 00\n");
337 	EFPRINTF(fp, "[0001]\t\tPM Timer Block Length : 04\n");
338 	EFPRINTF(fp, "[0001]\t\tGPE0 Block Length : 00\n");
339 	EFPRINTF(fp, "[0001]\t\tGPE1 Block Length : 00\n");
340 	EFPRINTF(fp, "[0001]\t\tGPE1 Base Offset : 00\n");
341 	EFPRINTF(fp, "[0001]\t\t_CST Support : 00\n");
342 	EFPRINTF(fp, "[0002]\t\tC2 Latency : 0000\n");
343 	EFPRINTF(fp, "[0002]\t\tC3 Latency : 0000\n");
344 	EFPRINTF(fp, "[0002]\t\tCPU Cache Size : 0000\n");
345 	EFPRINTF(fp, "[0002]\t\tCache Flush Stride : 0000\n");
346 	EFPRINTF(fp, "[0001]\t\tDuty Cycle Offset : 00\n");
347 	EFPRINTF(fp, "[0001]\t\tDuty Cycle Width : 00\n");
348 	EFPRINTF(fp, "[0001]\t\tRTC Day Alarm Index : 00\n");
349 	EFPRINTF(fp, "[0001]\t\tRTC Month Alarm Index : 00\n");
350 	EFPRINTF(fp, "[0001]\t\tRTC Century Index : 00\n");
351 	EFPRINTF(fp, "[0002]\t\tBoot Flags (decoded below) : 0000\n");
352 	EFPRINTF(fp, "\t\t\tLegacy Devices Supported (V2) : 0\n");
353 	EFPRINTF(fp, "\t\t\t8042 Present on ports 60/64 (V2) : 0\n");
354 	EFPRINTF(fp, "\t\t\tVGA Not Present (V4) : 1\n");
355 	EFPRINTF(fp, "\t\t\tMSI Not Supported (V4) : 0\n");
356 	EFPRINTF(fp, "\t\t\tPCIe ASPM Not Supported (V4) : 1\n");
357 	EFPRINTF(fp, "\t\t\tCMOS RTC Not Present (V5) : 0\n");
358 	EFPRINTF(fp, "[0001]\t\tReserved : 00\n");
359 	EFPRINTF(fp, "[0004]\t\tFlags (decoded below) : 00000000\n");
360 	EFPRINTF(fp, "\t\t\tWBINVD instruction is operational (V1) : 1\n");
361 	EFPRINTF(fp, "\t\t\tWBINVD flushes all caches (V1) : 0\n");
362 	EFPRINTF(fp, "\t\t\tAll CPUs support C1 (V1) : 0\n");
363 	EFPRINTF(fp, "\t\t\tC2 works on MP system (V1) : 0\n");
364 	EFPRINTF(fp, "\t\t\tControl Method Power Button (V1) : 1\n");
365 	EFPRINTF(fp, "\t\t\tControl Method Sleep Button (V1) : 1\n");
366 	EFPRINTF(fp, "\t\t\tRTC wake not in fixed reg space (V1) : 0\n");
367 	EFPRINTF(fp, "\t\t\tRTC can wake system from S4 (V1) : 0\n");
368 	EFPRINTF(fp, "\t\t\t32-bit PM Timer (V1) : 1\n");
369 	EFPRINTF(fp, "\t\t\tDocking Supported (V1) : 0\n");
370 	EFPRINTF(fp, "\t\t\tReset Register Supported (V2) : 0\n");
371 	EFPRINTF(fp, "\t\t\tSealed Case (V3) : 0\n");
372 	EFPRINTF(fp, "\t\t\tHeadless - No Video (V3) : 1\n");
373 	EFPRINTF(fp, "\t\t\tUse native instr after SLP_TYPx (V3) : 0\n");
374 	EFPRINTF(fp, "\t\t\tPCIEXP_WAK Bits Supported (V4) : 0\n");
375 	EFPRINTF(fp, "\t\t\tUse Platform Timer (V4) : 0\n");
376 	EFPRINTF(fp, "\t\t\tRTC_STS valid on S4 wake (V4) : 0\n");
377 	EFPRINTF(fp, "\t\t\tRemote Power-on capable (V4) : 0\n");
378 	EFPRINTF(fp, "\t\t\tUse APIC Cluster Model (V4) : 0\n");
379 	EFPRINTF(fp, "\t\t\tUse APIC Physical Destination Mode (V4) : 1\n");
380 	EFPRINTF(fp, "\t\t\tHardware Reduced (V5) : 0\n");
381 	EFPRINTF(fp, "\t\t\tLow Power S0 Idle (V5) : 0\n");
382 	EFPRINTF(fp, "\n");
383 
384 	EFPRINTF(fp,
385 	    "[0012]\t\tReset Register : [Generic Address Structure]\n");
386 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
387 	EFPRINTF(fp, "[0001]\t\tBit Width : 08\n");
388 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
389 	EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 01 [Byte Access:8]\n");
390 	EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000001\n");
391 	EFPRINTF(fp, "\n");
392 
393 	EFPRINTF(fp, "[0001]\t\tValue to cause reset : 00\n");
394 	EFPRINTF(fp, "[0003]\t\tReserved : 000000\n");
395 	EFPRINTF(fp, "[0008]\t\tFACS Address : 00000000%08X\n",
396 	    basl_acpi_base + FACS_OFFSET);
397 	EFPRINTF(fp, "[0008]\t\tDSDT Address : 00000000%08X\n",
398 	    basl_acpi_base + DSDT_OFFSET);
399 	EFPRINTF(fp,
400 	    "[0012]\t\tPM1A Event Block : [Generic Address Structure]\n");
401 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
402 	EFPRINTF(fp, "[0001]\t\tBit Width : 20\n");
403 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
404 	EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 02 [Word Access:16]\n");
405 	EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000001\n");
406 	EFPRINTF(fp, "\n");
407 
408 	EFPRINTF(fp,
409 	    "[0012]\t\tPM1B Event Block : [Generic Address Structure]\n");
410 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
411 	EFPRINTF(fp, "[0001]\t\tBit Width : 00\n");
412 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
413 	EFPRINTF(fp,
414 	    "[0001]\t\tEncoded Access Width : 00 [Undefined/Legacy]\n");
415 	EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n");
416 	EFPRINTF(fp, "\n");
417 
418 	EFPRINTF(fp,
419 	    "[0012]\t\tPM1A Control Block : [Generic Address Structure]\n");
420 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
421 	EFPRINTF(fp, "[0001]\t\tBit Width : 10\n");
422 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
423 	EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 02 [Word Access:16]\n");
424 	EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000001\n");
425 	EFPRINTF(fp, "\n");
426 
427 	EFPRINTF(fp,
428 	    "[0012]\t\tPM1B Control Block : [Generic Address Structure]\n");
429 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
430 	EFPRINTF(fp, "[0001]\t\tBit Width : 00\n");
431 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
432 	EFPRINTF(fp,
433 	    "[0001]\t\tEncoded Access Width : 00 [Undefined/Legacy]\n");
434 	EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n");
435 	EFPRINTF(fp, "\n");
436 
437 	EFPRINTF(fp,
438 	    "[0012]\t\tPM2 Control Block : [Generic Address Structure]\n");
439 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
440 	EFPRINTF(fp, "[0001]\t\tBit Width : 08\n");
441 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
442 	EFPRINTF(fp,
443 	    "[0001]\t\tEncoded Access Width : 00 [Undefined/Legacy]\n");
444 	EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n");
445 	EFPRINTF(fp, "\n");
446 
447 	/* Valid for bhyve */
448 	EFPRINTF(fp,
449 	    "[0012]\t\tPM Timer Block : [Generic Address Structure]\n");
450 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
451 	EFPRINTF(fp, "[0001]\t\tBit Width : 32\n");
452 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
453 	EFPRINTF(fp,
454 	    "[0001]\t\tEncoded Access Width : 03 [DWord Access:32]\n");
455 	EFPRINTF(fp, "[0008]\t\tAddress : 00000000%08X\n",
456 	    BHYVE_PM_TIMER_ADDR);
457 	EFPRINTF(fp, "\n");
458 
459 	EFPRINTF(fp, "[0012]\t\tGPE0 Block : [Generic Address Structure]\n");
460 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
461 	EFPRINTF(fp, "[0001]\t\tBit Width : 80\n");
462 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
463 	EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 01 [Byte Access:8]\n");
464 	EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n");
465 	EFPRINTF(fp, "\n");
466 
467 	EFPRINTF(fp, "[0012]\t\tGPE1 Block : [Generic Address Structure]\n");
468 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
469 	EFPRINTF(fp, "[0001]\t\tBit Width : 00\n");
470 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
471 	EFPRINTF(fp,
472 	    "[0001]\t\tEncoded Access Width : 00 [Undefined/Legacy]\n");
473 	EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n");
474 	EFPRINTF(fp, "\n");
475 
476 	EFPRINTF(fp,
477 	   "[0012]\t\tSleep Control Register : [Generic Address Structure]\n");
478 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
479 	EFPRINTF(fp, "[0001]\t\tBit Width : 08\n");
480 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
481 	EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 01 [Byte Access:8]\n");
482 	EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n");
483 	EFPRINTF(fp, "\n");
484 
485 	EFPRINTF(fp,
486 	    "[0012]\t\tSleep Status Register : [Generic Address Structure]\n");
487 	EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n");
488 	EFPRINTF(fp, "[0001]\t\tBit Width : 08\n");
489 	EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n");
490 	EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 01 [Byte Access:8]\n");
491 	EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n");
492 
493 	EFFLUSH(fp);
494 
495 	return (0);
496 
497 err_exit:
498 	return (errno);
499 }
500 
501 static int
502 basl_fwrite_facs(FILE *fp)
503 {
504 	int err;
505 
506 	err = 0;
507 
508 	EFPRINTF(fp, "/*\n");
509 	EFPRINTF(fp, " * bhyve FACS template\n");
510 	EFPRINTF(fp, " */\n");
511 	EFPRINTF(fp, "[0004]\t\tSignature : \"FACS\"\n");
512 	EFPRINTF(fp, "[0004]\t\tLength : 00000040\n");
513 	EFPRINTF(fp, "[0004]\t\tHardware Signature : 00000000\n");
514 	EFPRINTF(fp, "[0004]\t\t32 Firmware Waking Vector : 00000000\n");
515 	EFPRINTF(fp, "[0004]\t\tGlobal Lock : 00000000\n");
516 	EFPRINTF(fp, "[0004]\t\tFlags (decoded below) : 00000000\n");
517 	EFPRINTF(fp, "\t\t\tS4BIOS Support Present : 0\n");
518 	EFPRINTF(fp, "\t\t\t64-bit Wake Supported (V2) : 0\n");
519 	EFPRINTF(fp,
520 	    "[0008]\t\t64 Firmware Waking Vector : 0000000000000000\n");
521 	EFPRINTF(fp, "[0001]\t\tVersion : 02\n");
522 	EFPRINTF(fp, "[0003]\t\tReserved : 000000\n");
523 	EFPRINTF(fp, "[0004]\t\tOspmFlags (decoded below) : 00000000\n");
524 	EFPRINTF(fp, "\t\t\t64-bit Wake Env Required (V2) : 0\n");
525 
526 	EFFLUSH(fp);
527 
528 	return (0);
529 
530 err_exit:
531 	return (errno);
532 }
533 
534 static int
535 basl_fwrite_dsdt(FILE *fp)
536 {
537 	int err;
538 
539 	err = 0;
540 
541 	EFPRINTF(fp, "/*\n");
542 	EFPRINTF(fp, " * bhyve DSDT template\n");
543 	EFPRINTF(fp, " */\n");
544 	EFPRINTF(fp, "DefinitionBlock (\"bhyve_dsdt.aml\", \"DSDT\", 2,"
545 		 "\"BHYVE \", \"BVDSDT  \", 0x00000001)\n");
546 	EFPRINTF(fp, "{\n");
547 	EFPRINTF(fp, "  Scope (_SB)\n");
548 	EFPRINTF(fp, "  {\n");
549 	EFPRINTF(fp, "    Device (PCI0)\n");
550 	EFPRINTF(fp, "    {\n");
551 	EFPRINTF(fp, "      Name (_HID, EisaId (\"PNP0A03\"))\n");
552 	EFPRINTF(fp, "      Name (_ADR, Zero)\n");
553 	EFPRINTF(fp, "      Name (_UID, One)\n");
554 	EFPRINTF(fp, "      Name (_CRS, ResourceTemplate ()\n");
555 	EFPRINTF(fp, "      {\n");
556 	EFPRINTF(fp, "        WordBusNumber (ResourceProducer, MinFixed,"
557 		 "MaxFixed, PosDecode,\n");
558 	EFPRINTF(fp, "            0x0000,             // Granularity\n");
559 	EFPRINTF(fp, "            0x0000,             // Range Minimum\n");
560 	EFPRINTF(fp, "            0x00FF,             // Range Maximum\n");
561 	EFPRINTF(fp, "            0x0000,             // Transl Offset\n");
562 	EFPRINTF(fp, "            0x0100,             // Length\n");
563 	EFPRINTF(fp, "            ,, )\n");
564 	EFPRINTF(fp, "         IO (Decode16,\n");
565 	EFPRINTF(fp, "            0x0CF8,             // Range Minimum\n");
566 	EFPRINTF(fp, "            0x0CF8,             // Range Maximum\n");
567 	EFPRINTF(fp, "            0x01,               // Alignment\n");
568 	EFPRINTF(fp, "            0x08,               // Length\n");
569 	EFPRINTF(fp, "            )\n");
570 	EFPRINTF(fp, "         WordIO (ResourceProducer, MinFixed, MaxFixed,"
571 		 "PosDecode, EntireRange,\n");
572 	EFPRINTF(fp, "            0x0000,             // Granularity\n");
573 	EFPRINTF(fp, "            0x0000,             // Range Minimum\n");
574 	EFPRINTF(fp, "            0x0CF7,             // Range Maximum\n");
575 	EFPRINTF(fp, "            0x0000,             // Transl Offset\n");
576 	EFPRINTF(fp, "            0x0CF8,             // Length\n");
577 	EFPRINTF(fp, "            ,, , TypeStatic)\n");
578 	EFPRINTF(fp, "         WordIO (ResourceProducer, MinFixed, MaxFixed,"
579 		 "PosDecode, EntireRange,\n");
580 	EFPRINTF(fp, "            0x0000,             // Granularity\n");
581 	EFPRINTF(fp, "            0x0D00,             // Range Minimum\n");
582 	EFPRINTF(fp, "            0xFFFF,             // Range Maximum\n");
583 	EFPRINTF(fp, "            0x0000,             // Transl Offset\n");
584 	EFPRINTF(fp, "            0xF300,             // Length\n");
585 	EFPRINTF(fp, "             ,, , TypeStatic)\n");
586 	EFPRINTF(fp, "          })\n");
587 	EFPRINTF(fp, "     }\n");
588 	EFPRINTF(fp, "  }\n");
589 	EFPRINTF(fp, "\n");
590 	EFPRINTF(fp, "  Scope (_SB.PCI0)\n");
591 	EFPRINTF(fp, "  {\n");
592 	EFPRINTF(fp, "    Device (ISA)\n");
593 	EFPRINTF(fp, "    {\n");
594 	EFPRINTF(fp, "      Name (_ADR, 0x00010000)\n");
595 	EFPRINTF(fp, "      OperationRegion (P40C, PCI_Config, 0x60, 0x04)\n");
596 	EFPRINTF(fp, "    }\n");
597 	EFPRINTF(fp, "  }\n");
598 	EFPRINTF(fp, "\n");
599 	EFPRINTF(fp, "  Scope (_SB.PCI0.ISA)\n");
600         EFPRINTF(fp, "  {\n");
601 	EFPRINTF(fp, "    Device (RTC)\n");
602         EFPRINTF(fp, "    {\n");
603 	EFPRINTF(fp, "      Name (_HID, EisaId (\"PNP0B00\"))\n");
604 	EFPRINTF(fp, "      Name (_CRS, ResourceTemplate ()\n");
605 	EFPRINTF(fp, "      {\n");
606 	EFPRINTF(fp, "        IO (Decode16,\n");
607 	EFPRINTF(fp, "            0x0070,             // Range Minimum\n");
608 	EFPRINTF(fp, "            0x0070,             // Range Maximum\n");
609 	EFPRINTF(fp, "            0x10,               // Alignment\n");
610 	EFPRINTF(fp, "            0x02,               // Length\n");
611 	EFPRINTF(fp, "            )\n");
612 	EFPRINTF(fp, "        IRQNoFlags ()\n");
613 	EFPRINTF(fp, "            {8}\n");
614 	EFPRINTF(fp, "        IO (Decode16,\n");
615 	EFPRINTF(fp, "            0x0072,             // Range Minimum\n");
616 	EFPRINTF(fp, "            0x0072,             // Range Maximum\n");
617 	EFPRINTF(fp, "            0x02,               // Alignment\n");
618 	EFPRINTF(fp, "            0x06,               // Length\n");
619 	EFPRINTF(fp, "            )\n");
620 	EFPRINTF(fp, "      })\n");
621         EFPRINTF(fp, "    }\n");
622 	EFPRINTF(fp, "  }\n");
623 	EFPRINTF(fp, "}\n");
624 
625 	EFFLUSH(fp);
626 
627 	return (0);
628 
629 err_exit:
630 	return (errno);
631 }
632 
633 static int
634 basl_open(struct basl_fio *bf, int suffix)
635 {
636 	int err;
637 
638 	err = 0;
639 
640 	if (suffix) {
641 		strncpy(bf->f_name, basl_stemplate, MAXPATHLEN);
642 		bf->fd = mkstemps(bf->f_name, strlen(BHYVE_ASL_SUFFIX));
643 	} else {
644 		strncpy(bf->f_name, basl_template, MAXPATHLEN);
645 		bf->fd = mkstemp(bf->f_name);
646 	}
647 
648 	if (bf->fd > 0) {
649 		bf->fp = fdopen(bf->fd, "w+");
650 		if (bf->fp == NULL) {
651 			unlink(bf->f_name);
652 			close(bf->fd);
653 		}
654 	} else {
655 		err = 1;
656 	}
657 
658 	return (err);
659 }
660 
661 static void
662 basl_close(struct basl_fio *bf)
663 {
664 
665 	if (!basl_keep_temps)
666 		unlink(bf->f_name);
667 	fclose(bf->fp);
668 }
669 
670 static int
671 basl_start(struct basl_fio *in, struct basl_fio *out)
672 {
673 	int err;
674 
675 	err = basl_open(in, 0);
676 	if (!err) {
677 		err = basl_open(out, 1);
678 		if (err) {
679 			basl_close(in);
680 		}
681 	}
682 
683 	return (err);
684 }
685 
686 static void
687 basl_end(struct basl_fio *in, struct basl_fio *out)
688 {
689 
690 	basl_close(in);
691 	basl_close(out);
692 }
693 
694 static int
695 basl_load(struct vmctx *ctx, int fd, uint64_t off)
696 {
697 	struct stat sb;
698 	void *gaddr;
699 
700 	if (fstat(fd, &sb) < 0)
701 		return (errno);
702 
703 	gaddr = paddr_guest2host(ctx, basl_acpi_base + off, sb.st_size);
704 	if (gaddr == NULL)
705 		return (EFAULT);
706 
707 	if (read(fd, gaddr, sb.st_size) < 0)
708 		return (errno);
709 
710 	return (0);
711 }
712 
713 static int
714 basl_compile(struct vmctx *ctx, int (*fwrite_section)(FILE *), uint64_t offset)
715 {
716 	struct basl_fio io[2];
717 	static char iaslbuf[3*MAXPATHLEN + 10];
718 	char *fmt;
719 	int err;
720 
721 	err = basl_start(&io[0], &io[1]);
722 	if (!err) {
723 		err = (*fwrite_section)(io[0].fp);
724 
725 		if (!err) {
726 			/*
727 			 * iasl sends the results of the compilation to
728 			 * stdout. Shut this down by using the shell to
729 			 * redirect stdout to /dev/null, unless the user
730 			 * has requested verbose output for debugging
731 			 * purposes
732 			 */
733 			fmt = basl_verbose_iasl ?
734 				"%s -p %s %s" :
735 				"/bin/sh -c \"%s -p %s %s\" 1> /dev/null";
736 
737 			snprintf(iaslbuf, sizeof(iaslbuf),
738 				 fmt,
739 				 BHYVE_ASL_COMPILER,
740 				 io[1].f_name, io[0].f_name);
741 			err = system(iaslbuf);
742 
743 			if (!err) {
744 				/*
745 				 * Copy the aml output file into guest
746 				 * memory at the specified location
747 				 */
748 				err = basl_load(ctx, io[1].fd, offset);
749 			}
750 		}
751 		basl_end(&io[0], &io[1]);
752 	}
753 
754 	return (err);
755 }
756 
757 static int
758 basl_make_templates(void)
759 {
760 	const char *tmpdir;
761 	int err;
762 	int len;
763 
764 	err = 0;
765 
766 	/*
767 	 *
768 	 */
769 	if ((tmpdir = getenv("BHYVE_TMPDIR")) == NULL || *tmpdir == '\0' ||
770 	    (tmpdir = getenv("TMPDIR")) == NULL || *tmpdir == '\0') {
771 		tmpdir = _PATH_TMP;
772 	}
773 
774 	len = strlen(tmpdir);
775 
776 	if ((len + sizeof(BHYVE_ASL_TEMPLATE) + 1) < MAXPATHLEN) {
777 		strcpy(basl_template, tmpdir);
778 		while (len > 0 && basl_template[len - 1] == '/')
779 			len--;
780 		basl_template[len] = '/';
781 		strcpy(&basl_template[len + 1], BHYVE_ASL_TEMPLATE);
782 	} else
783 		err = E2BIG;
784 
785 	if (!err) {
786 		/*
787 		 * len has been intialized (and maybe adjusted) above
788 		 */
789 		if ((len + sizeof(BHYVE_ASL_TEMPLATE) + 1 +
790 		     sizeof(BHYVE_ASL_SUFFIX)) < MAXPATHLEN) {
791 			strcpy(basl_stemplate, tmpdir);
792 			basl_stemplate[len] = '/';
793 			strcpy(&basl_stemplate[len + 1], BHYVE_ASL_TEMPLATE);
794 			len = strlen(basl_stemplate);
795 			strcpy(&basl_stemplate[len], BHYVE_ASL_SUFFIX);
796 		} else
797 			err = E2BIG;
798 	}
799 
800 	return (err);
801 }
802 
803 static struct {
804 	int	(*wsect)(FILE *fp);
805 	uint64_t  offset;
806 } basl_ftables[] =
807 {
808 	{ basl_fwrite_rsdp, 0},
809 	{ basl_fwrite_rsdt, RSDT_OFFSET },
810 	{ basl_fwrite_xsdt, XSDT_OFFSET },
811 	{ basl_fwrite_madt, MADT_OFFSET },
812 	{ basl_fwrite_fadt, FADT_OFFSET },
813 	{ basl_fwrite_facs, FACS_OFFSET },
814 	{ basl_fwrite_dsdt, DSDT_OFFSET },
815 	{ NULL }
816 };
817 
818 int
819 acpi_build(struct vmctx *ctx, int ncpu)
820 {
821 	int err;
822 	int i;
823 
824 	err = 0;
825 	basl_ncpu = ncpu;
826 
827 	/*
828 	 * For debug, allow the user to have iasl compiler output sent
829 	 * to stdout rather than /dev/null
830 	 */
831 	if (getenv("BHYVE_ACPI_VERBOSE_IASL"))
832 		basl_verbose_iasl = 1;
833 
834 	/*
835 	 * Allow the user to keep the generated ASL files for debugging
836 	 * instead of deleting them following use
837 	 */
838 	if (getenv("BHYVE_ACPI_KEEPTMPS"))
839 		basl_keep_temps = 1;
840 
841 	i = 0;
842 	err = basl_make_templates();
843 
844 	/*
845 	 * Run through all the ASL files, compiling them and
846 	 * copying them into guest memory
847 	 */
848 	while (!err && basl_ftables[i].wsect != NULL) {
849 		err = basl_compile(ctx, basl_ftables[i].wsect,
850 				   basl_ftables[i].offset);
851 		i++;
852 	}
853 
854 	return (err);
855 }
856