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 -> 0xf2400 (36 bytes fixed) 43 * RSDT -> 0xf2440 (36 bytes + 4*7 table addrs, 4 used) 44 * XSDT -> 0xf2480 (36 bytes + 8*7 table addrs, 4 used) 45 * MADT -> 0xf2500 (depends on #CPUs) 46 * FADT -> 0xf2600 (268 bytes) 47 * HPET -> 0xf2740 (56 bytes) 48 * MCFG -> 0xf2780 (60 bytes) 49 * FACS -> 0xf27C0 (64 bytes) 50 * DSDT -> 0xf2800 (variable - can go up to 0x100000) 51 */ 52 53 #include <sys/cdefs.h> 54 __FBSDID("$FreeBSD$"); 55 56 #include <sys/param.h> 57 #include <sys/errno.h> 58 #include <sys/stat.h> 59 60 #include <paths.h> 61 #include <stdarg.h> 62 #include <stdio.h> 63 #include <stdlib.h> 64 #include <string.h> 65 #include <unistd.h> 66 67 #include <machine/vmm.h> 68 #include <vmmapi.h> 69 70 #include "bhyverun.h" 71 #include "acpi.h" 72 #include "pci_emul.h" 73 74 /* 75 * Define the base address of the ACPI tables, and the offsets to 76 * the individual tables 77 */ 78 #define BHYVE_ACPI_BASE 0xf2400 79 #define RSDT_OFFSET 0x040 80 #define XSDT_OFFSET 0x080 81 #define MADT_OFFSET 0x100 82 #define FADT_OFFSET 0x200 83 #define HPET_OFFSET 0x340 84 #define MCFG_OFFSET 0x380 85 #define FACS_OFFSET 0x3C0 86 #define DSDT_OFFSET 0x400 87 88 #define BHYVE_ASL_TEMPLATE "bhyve.XXXXXXX" 89 #define BHYVE_ASL_SUFFIX ".aml" 90 #define BHYVE_ASL_COMPILER "/usr/sbin/iasl" 91 92 static int basl_keep_temps; 93 static int basl_verbose_iasl; 94 static int basl_ncpu; 95 static uint32_t basl_acpi_base = BHYVE_ACPI_BASE; 96 static uint32_t hpet_capabilities; 97 98 /* 99 * Contains the full pathname of the template to be passed 100 * to mkstemp/mktemps(3) 101 */ 102 static char basl_template[MAXPATHLEN]; 103 static char basl_stemplate[MAXPATHLEN]; 104 105 /* 106 * State for dsdt_line(), dsdt_indent(), and dsdt_unindent(). 107 */ 108 static FILE *dsdt_fp; 109 static int dsdt_indent_level; 110 static int dsdt_error; 111 112 struct basl_fio { 113 int fd; 114 FILE *fp; 115 char f_name[MAXPATHLEN]; 116 }; 117 118 #define EFPRINTF(...) \ 119 err = fprintf(__VA_ARGS__); if (err < 0) goto err_exit; 120 121 #define EFFLUSH(x) \ 122 err = fflush(x); if (err != 0) goto err_exit; 123 124 static int 125 basl_fwrite_rsdp(FILE *fp) 126 { 127 int err; 128 129 err = 0; 130 131 EFPRINTF(fp, "/*\n"); 132 EFPRINTF(fp, " * bhyve RSDP template\n"); 133 EFPRINTF(fp, " */\n"); 134 EFPRINTF(fp, "[0008]\t\tSignature : \"RSD PTR \"\n"); 135 EFPRINTF(fp, "[0001]\t\tChecksum : 43\n"); 136 EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n"); 137 EFPRINTF(fp, "[0001]\t\tRevision : 02\n"); 138 EFPRINTF(fp, "[0004]\t\tRSDT Address : %08X\n", 139 basl_acpi_base + RSDT_OFFSET); 140 EFPRINTF(fp, "[0004]\t\tLength : 00000024\n"); 141 EFPRINTF(fp, "[0008]\t\tXSDT Address : 00000000%08X\n", 142 basl_acpi_base + XSDT_OFFSET); 143 EFPRINTF(fp, "[0001]\t\tExtended Checksum : 00\n"); 144 EFPRINTF(fp, "[0003]\t\tReserved : 000000\n"); 145 146 EFFLUSH(fp); 147 148 return (0); 149 150 err_exit: 151 return (errno); 152 } 153 154 static int 155 basl_fwrite_rsdt(FILE *fp) 156 { 157 int err; 158 159 err = 0; 160 161 EFPRINTF(fp, "/*\n"); 162 EFPRINTF(fp, " * bhyve RSDT template\n"); 163 EFPRINTF(fp, " */\n"); 164 EFPRINTF(fp, "[0004]\t\tSignature : \"RSDT\"\n"); 165 EFPRINTF(fp, "[0004]\t\tTable Length : 00000000\n"); 166 EFPRINTF(fp, "[0001]\t\tRevision : 01\n"); 167 EFPRINTF(fp, "[0001]\t\tChecksum : 00\n"); 168 EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n"); 169 EFPRINTF(fp, "[0008]\t\tOem Table ID : \"BVRSDT \"\n"); 170 EFPRINTF(fp, "[0004]\t\tOem Revision : 00000001\n"); 171 /* iasl will fill in the compiler ID/revision fields */ 172 EFPRINTF(fp, "[0004]\t\tAsl Compiler ID : \"xxxx\"\n"); 173 EFPRINTF(fp, "[0004]\t\tAsl Compiler Revision : 00000000\n"); 174 EFPRINTF(fp, "\n"); 175 176 /* Add in pointers to the MADT, FADT and HPET */ 177 EFPRINTF(fp, "[0004]\t\tACPI Table Address 0 : %08X\n", 178 basl_acpi_base + MADT_OFFSET); 179 EFPRINTF(fp, "[0004]\t\tACPI Table Address 1 : %08X\n", 180 basl_acpi_base + FADT_OFFSET); 181 EFPRINTF(fp, "[0004]\t\tACPI Table Address 2 : %08X\n", 182 basl_acpi_base + HPET_OFFSET); 183 EFPRINTF(fp, "[0004]\t\tACPI Table Address 3 : %08X\n", 184 basl_acpi_base + MCFG_OFFSET); 185 186 EFFLUSH(fp); 187 188 return (0); 189 190 err_exit: 191 return (errno); 192 } 193 194 static int 195 basl_fwrite_xsdt(FILE *fp) 196 { 197 int err; 198 199 err = 0; 200 201 EFPRINTF(fp, "/*\n"); 202 EFPRINTF(fp, " * bhyve XSDT template\n"); 203 EFPRINTF(fp, " */\n"); 204 EFPRINTF(fp, "[0004]\t\tSignature : \"XSDT\"\n"); 205 EFPRINTF(fp, "[0004]\t\tTable Length : 00000000\n"); 206 EFPRINTF(fp, "[0001]\t\tRevision : 01\n"); 207 EFPRINTF(fp, "[0001]\t\tChecksum : 00\n"); 208 EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n"); 209 EFPRINTF(fp, "[0008]\t\tOem Table ID : \"BVXSDT \"\n"); 210 EFPRINTF(fp, "[0004]\t\tOem Revision : 00000001\n"); 211 /* iasl will fill in the compiler ID/revision fields */ 212 EFPRINTF(fp, "[0004]\t\tAsl Compiler ID : \"xxxx\"\n"); 213 EFPRINTF(fp, "[0004]\t\tAsl Compiler Revision : 00000000\n"); 214 EFPRINTF(fp, "\n"); 215 216 /* Add in pointers to the MADT, FADT and HPET */ 217 EFPRINTF(fp, "[0004]\t\tACPI Table Address 0 : 00000000%08X\n", 218 basl_acpi_base + MADT_OFFSET); 219 EFPRINTF(fp, "[0004]\t\tACPI Table Address 1 : 00000000%08X\n", 220 basl_acpi_base + FADT_OFFSET); 221 EFPRINTF(fp, "[0004]\t\tACPI Table Address 2 : 00000000%08X\n", 222 basl_acpi_base + HPET_OFFSET); 223 EFPRINTF(fp, "[0004]\t\tACPI Table Address 3 : 00000000%08X\n", 224 basl_acpi_base + MCFG_OFFSET); 225 226 EFFLUSH(fp); 227 228 return (0); 229 230 err_exit: 231 return (errno); 232 } 233 234 static int 235 basl_fwrite_madt(FILE *fp) 236 { 237 int err; 238 int i; 239 240 err = 0; 241 242 EFPRINTF(fp, "/*\n"); 243 EFPRINTF(fp, " * bhyve MADT template\n"); 244 EFPRINTF(fp, " */\n"); 245 EFPRINTF(fp, "[0004]\t\tSignature : \"APIC\"\n"); 246 EFPRINTF(fp, "[0004]\t\tTable Length : 00000000\n"); 247 EFPRINTF(fp, "[0001]\t\tRevision : 01\n"); 248 EFPRINTF(fp, "[0001]\t\tChecksum : 00\n"); 249 EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n"); 250 EFPRINTF(fp, "[0008]\t\tOem Table ID : \"BVMADT \"\n"); 251 EFPRINTF(fp, "[0004]\t\tOem Revision : 00000001\n"); 252 253 /* iasl will fill in the compiler ID/revision fields */ 254 EFPRINTF(fp, "[0004]\t\tAsl Compiler ID : \"xxxx\"\n"); 255 EFPRINTF(fp, "[0004]\t\tAsl Compiler Revision : 00000000\n"); 256 EFPRINTF(fp, "\n"); 257 258 EFPRINTF(fp, "[0004]\t\tLocal Apic Address : FEE00000\n"); 259 EFPRINTF(fp, "[0004]\t\tFlags (decoded below) : 00000001\n"); 260 EFPRINTF(fp, "\t\t\tPC-AT Compatibility : 1\n"); 261 EFPRINTF(fp, "\n"); 262 263 /* Add a Processor Local APIC entry for each CPU */ 264 for (i = 0; i < basl_ncpu; i++) { 265 EFPRINTF(fp, "[0001]\t\tSubtable Type : 00\n"); 266 EFPRINTF(fp, "[0001]\t\tLength : 08\n"); 267 /* iasl expects hex values for the proc and apic id's */ 268 EFPRINTF(fp, "[0001]\t\tProcessor ID : %02x\n", i); 269 EFPRINTF(fp, "[0001]\t\tLocal Apic ID : %02x\n", i); 270 EFPRINTF(fp, "[0004]\t\tFlags (decoded below) : 00000001\n"); 271 EFPRINTF(fp, "\t\t\tProcessor Enabled : 1\n"); 272 EFPRINTF(fp, "\n"); 273 } 274 275 /* Always a single IOAPIC entry, with ID 0 */ 276 EFPRINTF(fp, "[0001]\t\tSubtable Type : 01\n"); 277 EFPRINTF(fp, "[0001]\t\tLength : 0C\n"); 278 /* iasl expects a hex value for the i/o apic id */ 279 EFPRINTF(fp, "[0001]\t\tI/O Apic ID : %02x\n", 0); 280 EFPRINTF(fp, "[0001]\t\tReserved : 00\n"); 281 EFPRINTF(fp, "[0004]\t\tAddress : fec00000\n"); 282 EFPRINTF(fp, "[0004]\t\tInterrupt : 00000000\n"); 283 EFPRINTF(fp, "\n"); 284 285 /* Legacy IRQ0 is connected to pin 2 of the IOAPIC */ 286 EFPRINTF(fp, "[0001]\t\tSubtable Type : 02\n"); 287 EFPRINTF(fp, "[0001]\t\tLength : 0A\n"); 288 EFPRINTF(fp, "[0001]\t\tBus : 00\n"); 289 EFPRINTF(fp, "[0001]\t\tSource : 00\n"); 290 EFPRINTF(fp, "[0004]\t\tInterrupt : 00000002\n"); 291 EFPRINTF(fp, "[0002]\t\tFlags (decoded below) : 0005\n"); 292 EFPRINTF(fp, "\t\t\tPolarity : 1\n"); 293 EFPRINTF(fp, "\t\t\tTrigger Mode : 1\n"); 294 EFPRINTF(fp, "\n"); 295 296 EFPRINTF(fp, "[0001]\t\tSubtable Type : 02\n"); 297 EFPRINTF(fp, "[0001]\t\tLength : 0A\n"); 298 EFPRINTF(fp, "[0001]\t\tBus : 00\n"); 299 EFPRINTF(fp, "[0001]\t\tSource : %02X\n", SCI_INT); 300 EFPRINTF(fp, "[0004]\t\tInterrupt : %08X\n", SCI_INT); 301 EFPRINTF(fp, "[0002]\t\tFlags (decoded below) : 0000\n"); 302 EFPRINTF(fp, "\t\t\tPolarity : 3\n"); 303 EFPRINTF(fp, "\t\t\tTrigger Mode : 3\n"); 304 EFPRINTF(fp, "\n"); 305 306 /* Local APIC NMI is connected to LINT 1 on all CPUs */ 307 EFPRINTF(fp, "[0001]\t\tSubtable Type : 04\n"); 308 EFPRINTF(fp, "[0001]\t\tLength : 06\n"); 309 EFPRINTF(fp, "[0001]\t\tProcessorId : FF\n"); 310 EFPRINTF(fp, "[0002]\t\tFlags (decoded below) : 0005\n"); 311 EFPRINTF(fp, "\t\t\tPolarity : 1\n"); 312 EFPRINTF(fp, "\t\t\tTrigger Mode : 1\n"); 313 EFPRINTF(fp, "[0001]\t\tInterrupt : 01\n"); 314 EFPRINTF(fp, "\n"); 315 316 EFFLUSH(fp); 317 318 return (0); 319 320 err_exit: 321 return (errno); 322 } 323 324 static int 325 basl_fwrite_fadt(FILE *fp) 326 { 327 int err; 328 329 err = 0; 330 331 EFPRINTF(fp, "/*\n"); 332 EFPRINTF(fp, " * bhyve FADT template\n"); 333 EFPRINTF(fp, " */\n"); 334 EFPRINTF(fp, "[0004]\t\tSignature : \"FACP\"\n"); 335 EFPRINTF(fp, "[0004]\t\tTable Length : 0000010C\n"); 336 EFPRINTF(fp, "[0001]\t\tRevision : 05\n"); 337 EFPRINTF(fp, "[0001]\t\tChecksum : 00\n"); 338 EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n"); 339 EFPRINTF(fp, "[0008]\t\tOem Table ID : \"BVFACP \"\n"); 340 EFPRINTF(fp, "[0004]\t\tOem Revision : 00000001\n"); 341 /* iasl will fill in the compiler ID/revision fields */ 342 EFPRINTF(fp, "[0004]\t\tAsl Compiler ID : \"xxxx\"\n"); 343 EFPRINTF(fp, "[0004]\t\tAsl Compiler Revision : 00000000\n"); 344 EFPRINTF(fp, "\n"); 345 346 EFPRINTF(fp, "[0004]\t\tFACS Address : %08X\n", 347 basl_acpi_base + FACS_OFFSET); 348 EFPRINTF(fp, "[0004]\t\tDSDT Address : %08X\n", 349 basl_acpi_base + DSDT_OFFSET); 350 EFPRINTF(fp, "[0001]\t\tModel : 01\n"); 351 EFPRINTF(fp, "[0001]\t\tPM Profile : 00 [Unspecified]\n"); 352 EFPRINTF(fp, "[0002]\t\tSCI Interrupt : %04X\n", 353 SCI_INT); 354 EFPRINTF(fp, "[0004]\t\tSMI Command Port : %08X\n", 355 SMI_CMD); 356 EFPRINTF(fp, "[0001]\t\tACPI Enable Value : %02X\n", 357 BHYVE_ACPI_ENABLE); 358 EFPRINTF(fp, "[0001]\t\tACPI Disable Value : %02X\n", 359 BHYVE_ACPI_DISABLE); 360 EFPRINTF(fp, "[0001]\t\tS4BIOS Command : 00\n"); 361 EFPRINTF(fp, "[0001]\t\tP-State Control : 00\n"); 362 EFPRINTF(fp, "[0004]\t\tPM1A Event Block Address : %08X\n", 363 PM1A_EVT_ADDR); 364 EFPRINTF(fp, "[0004]\t\tPM1B Event Block Address : 00000000\n"); 365 EFPRINTF(fp, "[0004]\t\tPM1A Control Block Address : %08X\n", 366 PM1A_CNT_ADDR); 367 EFPRINTF(fp, "[0004]\t\tPM1B Control Block Address : 00000000\n"); 368 EFPRINTF(fp, "[0004]\t\tPM2 Control Block Address : 00000000\n"); 369 EFPRINTF(fp, "[0004]\t\tPM Timer Block Address : %08X\n", 370 IO_PMTMR); 371 EFPRINTF(fp, "[0004]\t\tGPE0 Block Address : 00000000\n"); 372 EFPRINTF(fp, "[0004]\t\tGPE1 Block Address : 00000000\n"); 373 EFPRINTF(fp, "[0001]\t\tPM1 Event Block Length : 04\n"); 374 EFPRINTF(fp, "[0001]\t\tPM1 Control Block Length : 02\n"); 375 EFPRINTF(fp, "[0001]\t\tPM2 Control Block Length : 00\n"); 376 EFPRINTF(fp, "[0001]\t\tPM Timer Block Length : 04\n"); 377 EFPRINTF(fp, "[0001]\t\tGPE0 Block Length : 00\n"); 378 EFPRINTF(fp, "[0001]\t\tGPE1 Block Length : 00\n"); 379 EFPRINTF(fp, "[0001]\t\tGPE1 Base Offset : 00\n"); 380 EFPRINTF(fp, "[0001]\t\t_CST Support : 00\n"); 381 EFPRINTF(fp, "[0002]\t\tC2 Latency : 0000\n"); 382 EFPRINTF(fp, "[0002]\t\tC3 Latency : 0000\n"); 383 EFPRINTF(fp, "[0002]\t\tCPU Cache Size : 0000\n"); 384 EFPRINTF(fp, "[0002]\t\tCache Flush Stride : 0000\n"); 385 EFPRINTF(fp, "[0001]\t\tDuty Cycle Offset : 00\n"); 386 EFPRINTF(fp, "[0001]\t\tDuty Cycle Width : 00\n"); 387 EFPRINTF(fp, "[0001]\t\tRTC Day Alarm Index : 00\n"); 388 EFPRINTF(fp, "[0001]\t\tRTC Month Alarm Index : 00\n"); 389 EFPRINTF(fp, "[0001]\t\tRTC Century Index : 00\n"); 390 EFPRINTF(fp, "[0002]\t\tBoot Flags (decoded below) : 0000\n"); 391 EFPRINTF(fp, "\t\t\tLegacy Devices Supported (V2) : 0\n"); 392 EFPRINTF(fp, "\t\t\t8042 Present on ports 60/64 (V2) : 0\n"); 393 EFPRINTF(fp, "\t\t\tVGA Not Present (V4) : 1\n"); 394 EFPRINTF(fp, "\t\t\tMSI Not Supported (V4) : 0\n"); 395 EFPRINTF(fp, "\t\t\tPCIe ASPM Not Supported (V4) : 1\n"); 396 EFPRINTF(fp, "\t\t\tCMOS RTC Not Present (V5) : 0\n"); 397 EFPRINTF(fp, "[0001]\t\tReserved : 00\n"); 398 EFPRINTF(fp, "[0004]\t\tFlags (decoded below) : 00000000\n"); 399 EFPRINTF(fp, "\t\t\tWBINVD instruction is operational (V1) : 1\n"); 400 EFPRINTF(fp, "\t\t\tWBINVD flushes all caches (V1) : 0\n"); 401 EFPRINTF(fp, "\t\t\tAll CPUs support C1 (V1) : 1\n"); 402 EFPRINTF(fp, "\t\t\tC2 works on MP system (V1) : 0\n"); 403 EFPRINTF(fp, "\t\t\tControl Method Power Button (V1) : 0\n"); 404 EFPRINTF(fp, "\t\t\tControl Method Sleep Button (V1) : 1\n"); 405 EFPRINTF(fp, "\t\t\tRTC wake not in fixed reg space (V1) : 0\n"); 406 EFPRINTF(fp, "\t\t\tRTC can wake system from S4 (V1) : 0\n"); 407 EFPRINTF(fp, "\t\t\t32-bit PM Timer (V1) : 1\n"); 408 EFPRINTF(fp, "\t\t\tDocking Supported (V1) : 0\n"); 409 EFPRINTF(fp, "\t\t\tReset Register Supported (V2) : 1\n"); 410 EFPRINTF(fp, "\t\t\tSealed Case (V3) : 0\n"); 411 EFPRINTF(fp, "\t\t\tHeadless - No Video (V3) : 1\n"); 412 EFPRINTF(fp, "\t\t\tUse native instr after SLP_TYPx (V3) : 0\n"); 413 EFPRINTF(fp, "\t\t\tPCIEXP_WAK Bits Supported (V4) : 0\n"); 414 EFPRINTF(fp, "\t\t\tUse Platform Timer (V4) : 0\n"); 415 EFPRINTF(fp, "\t\t\tRTC_STS valid on S4 wake (V4) : 0\n"); 416 EFPRINTF(fp, "\t\t\tRemote Power-on capable (V4) : 0\n"); 417 EFPRINTF(fp, "\t\t\tUse APIC Cluster Model (V4) : 0\n"); 418 EFPRINTF(fp, "\t\t\tUse APIC Physical Destination Mode (V4) : 1\n"); 419 EFPRINTF(fp, "\t\t\tHardware Reduced (V5) : 0\n"); 420 EFPRINTF(fp, "\t\t\tLow Power S0 Idle (V5) : 0\n"); 421 EFPRINTF(fp, "\n"); 422 423 EFPRINTF(fp, 424 "[0012]\t\tReset Register : [Generic Address Structure]\n"); 425 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 426 EFPRINTF(fp, "[0001]\t\tBit Width : 08\n"); 427 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 428 EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 01 [Byte Access:8]\n"); 429 EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000CF9\n"); 430 EFPRINTF(fp, "\n"); 431 432 EFPRINTF(fp, "[0001]\t\tValue to cause reset : 06\n"); 433 EFPRINTF(fp, "[0003]\t\tReserved : 000000\n"); 434 EFPRINTF(fp, "[0008]\t\tFACS Address : 00000000%08X\n", 435 basl_acpi_base + FACS_OFFSET); 436 EFPRINTF(fp, "[0008]\t\tDSDT Address : 00000000%08X\n", 437 basl_acpi_base + DSDT_OFFSET); 438 EFPRINTF(fp, 439 "[0012]\t\tPM1A Event Block : [Generic Address Structure]\n"); 440 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 441 EFPRINTF(fp, "[0001]\t\tBit Width : 20\n"); 442 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 443 EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 02 [Word Access:16]\n"); 444 EFPRINTF(fp, "[0008]\t\tAddress : 00000000%08X\n", 445 PM1A_EVT_ADDR); 446 EFPRINTF(fp, "\n"); 447 448 EFPRINTF(fp, 449 "[0012]\t\tPM1B Event Block : [Generic Address Structure]\n"); 450 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 451 EFPRINTF(fp, "[0001]\t\tBit Width : 00\n"); 452 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 453 EFPRINTF(fp, 454 "[0001]\t\tEncoded Access Width : 00 [Undefined/Legacy]\n"); 455 EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n"); 456 EFPRINTF(fp, "\n"); 457 458 EFPRINTF(fp, 459 "[0012]\t\tPM1A Control Block : [Generic Address Structure]\n"); 460 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 461 EFPRINTF(fp, "[0001]\t\tBit Width : 10\n"); 462 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 463 EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 02 [Word Access:16]\n"); 464 EFPRINTF(fp, "[0008]\t\tAddress : 00000000%08X\n", 465 PM1A_CNT_ADDR); 466 EFPRINTF(fp, "\n"); 467 468 EFPRINTF(fp, 469 "[0012]\t\tPM1B Control Block : [Generic Address Structure]\n"); 470 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 471 EFPRINTF(fp, "[0001]\t\tBit Width : 00\n"); 472 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 473 EFPRINTF(fp, 474 "[0001]\t\tEncoded Access Width : 00 [Undefined/Legacy]\n"); 475 EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n"); 476 EFPRINTF(fp, "\n"); 477 478 EFPRINTF(fp, 479 "[0012]\t\tPM2 Control Block : [Generic Address Structure]\n"); 480 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 481 EFPRINTF(fp, "[0001]\t\tBit Width : 08\n"); 482 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 483 EFPRINTF(fp, 484 "[0001]\t\tEncoded Access Width : 00 [Undefined/Legacy]\n"); 485 EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n"); 486 EFPRINTF(fp, "\n"); 487 488 /* Valid for bhyve */ 489 EFPRINTF(fp, 490 "[0012]\t\tPM Timer Block : [Generic Address Structure]\n"); 491 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 492 EFPRINTF(fp, "[0001]\t\tBit Width : 32\n"); 493 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 494 EFPRINTF(fp, 495 "[0001]\t\tEncoded Access Width : 03 [DWord Access:32]\n"); 496 EFPRINTF(fp, "[0008]\t\tAddress : 00000000%08X\n", 497 IO_PMTMR); 498 EFPRINTF(fp, "\n"); 499 500 EFPRINTF(fp, "[0012]\t\tGPE0 Block : [Generic Address Structure]\n"); 501 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 502 EFPRINTF(fp, "[0001]\t\tBit Width : 80\n"); 503 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 504 EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 01 [Byte Access:8]\n"); 505 EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n"); 506 EFPRINTF(fp, "\n"); 507 508 EFPRINTF(fp, "[0012]\t\tGPE1 Block : [Generic Address Structure]\n"); 509 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 510 EFPRINTF(fp, "[0001]\t\tBit Width : 00\n"); 511 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 512 EFPRINTF(fp, 513 "[0001]\t\tEncoded Access Width : 00 [Undefined/Legacy]\n"); 514 EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n"); 515 EFPRINTF(fp, "\n"); 516 517 EFPRINTF(fp, 518 "[0012]\t\tSleep Control Register : [Generic Address Structure]\n"); 519 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 520 EFPRINTF(fp, "[0001]\t\tBit Width : 08\n"); 521 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 522 EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 01 [Byte Access:8]\n"); 523 EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n"); 524 EFPRINTF(fp, "\n"); 525 526 EFPRINTF(fp, 527 "[0012]\t\tSleep Status Register : [Generic Address Structure]\n"); 528 EFPRINTF(fp, "[0001]\t\tSpace ID : 01 [SystemIO]\n"); 529 EFPRINTF(fp, "[0001]\t\tBit Width : 08\n"); 530 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 531 EFPRINTF(fp, "[0001]\t\tEncoded Access Width : 01 [Byte Access:8]\n"); 532 EFPRINTF(fp, "[0008]\t\tAddress : 0000000000000000\n"); 533 534 EFFLUSH(fp); 535 536 return (0); 537 538 err_exit: 539 return (errno); 540 } 541 542 static int 543 basl_fwrite_hpet(FILE *fp) 544 { 545 int err; 546 547 err = 0; 548 549 EFPRINTF(fp, "/*\n"); 550 EFPRINTF(fp, " * bhyve HPET template\n"); 551 EFPRINTF(fp, " */\n"); 552 EFPRINTF(fp, "[0004]\t\tSignature : \"HPET\"\n"); 553 EFPRINTF(fp, "[0004]\t\tTable Length : 00000000\n"); 554 EFPRINTF(fp, "[0001]\t\tRevision : 01\n"); 555 EFPRINTF(fp, "[0001]\t\tChecksum : 00\n"); 556 EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n"); 557 EFPRINTF(fp, "[0008]\t\tOem Table ID : \"BVHPET \"\n"); 558 EFPRINTF(fp, "[0004]\t\tOem Revision : 00000001\n"); 559 560 /* iasl will fill in the compiler ID/revision fields */ 561 EFPRINTF(fp, "[0004]\t\tAsl Compiler ID : \"xxxx\"\n"); 562 EFPRINTF(fp, "[0004]\t\tAsl Compiler Revision : 00000000\n"); 563 EFPRINTF(fp, "\n"); 564 565 EFPRINTF(fp, "[0004]\t\tTimer Block ID : %08X\n", hpet_capabilities); 566 EFPRINTF(fp, 567 "[0012]\t\tTimer Block Register : [Generic Address Structure]\n"); 568 EFPRINTF(fp, "[0001]\t\tSpace ID : 00 [SystemMemory]\n"); 569 EFPRINTF(fp, "[0001]\t\tBit Width : 00\n"); 570 EFPRINTF(fp, "[0001]\t\tBit Offset : 00\n"); 571 EFPRINTF(fp, 572 "[0001]\t\tEncoded Access Width : 00 [Undefined/Legacy]\n"); 573 EFPRINTF(fp, "[0008]\t\tAddress : 00000000FED00000\n"); 574 EFPRINTF(fp, "\n"); 575 576 EFPRINTF(fp, "[0001]\t\tHPET Number : 00\n"); 577 EFPRINTF(fp, "[0002]\t\tMinimum Clock Ticks : 0000\n"); 578 EFPRINTF(fp, "[0004]\t\tFlags (decoded below) : 00000001\n"); 579 EFPRINTF(fp, "\t\t\t4K Page Protect : 1\n"); 580 EFPRINTF(fp, "\t\t\t64K Page Protect : 0\n"); 581 EFPRINTF(fp, "\n"); 582 583 EFFLUSH(fp); 584 585 return (0); 586 587 err_exit: 588 return (errno); 589 } 590 591 static int 592 basl_fwrite_mcfg(FILE *fp) 593 { 594 int err = 0; 595 596 EFPRINTF(fp, "/*\n"); 597 EFPRINTF(fp, " * bhyve MCFG template\n"); 598 EFPRINTF(fp, " */\n"); 599 EFPRINTF(fp, "[0004]\t\tSignature : \"MCFG\"\n"); 600 EFPRINTF(fp, "[0004]\t\tTable Length : 00000000\n"); 601 EFPRINTF(fp, "[0001]\t\tRevision : 01\n"); 602 EFPRINTF(fp, "[0001]\t\tChecksum : 00\n"); 603 EFPRINTF(fp, "[0006]\t\tOem ID : \"BHYVE \"\n"); 604 EFPRINTF(fp, "[0008]\t\tOem Table ID : \"BVMCFG \"\n"); 605 EFPRINTF(fp, "[0004]\t\tOem Revision : 00000001\n"); 606 607 /* iasl will fill in the compiler ID/revision fields */ 608 EFPRINTF(fp, "[0004]\t\tAsl Compiler ID : \"xxxx\"\n"); 609 EFPRINTF(fp, "[0004]\t\tAsl Compiler Revision : 00000000\n"); 610 EFPRINTF(fp, "[0008]\t\tReserved : 0\n"); 611 EFPRINTF(fp, "\n"); 612 613 EFPRINTF(fp, "[0008]\t\tBase Address : %016lX\n", pci_ecfg_base()); 614 EFPRINTF(fp, "[0002]\t\tSegment Group: 0000\n"); 615 EFPRINTF(fp, "[0001]\t\tStart Bus: 00\n"); 616 EFPRINTF(fp, "[0001]\t\tEnd Bus: FF\n"); 617 EFPRINTF(fp, "[0004]\t\tReserved : 0\n"); 618 EFFLUSH(fp); 619 return (0); 620 err_exit: 621 return (errno); 622 } 623 624 static int 625 basl_fwrite_facs(FILE *fp) 626 { 627 int err; 628 629 err = 0; 630 631 EFPRINTF(fp, "/*\n"); 632 EFPRINTF(fp, " * bhyve FACS template\n"); 633 EFPRINTF(fp, " */\n"); 634 EFPRINTF(fp, "[0004]\t\tSignature : \"FACS\"\n"); 635 EFPRINTF(fp, "[0004]\t\tLength : 00000040\n"); 636 EFPRINTF(fp, "[0004]\t\tHardware Signature : 00000000\n"); 637 EFPRINTF(fp, "[0004]\t\t32 Firmware Waking Vector : 00000000\n"); 638 EFPRINTF(fp, "[0004]\t\tGlobal Lock : 00000000\n"); 639 EFPRINTF(fp, "[0004]\t\tFlags (decoded below) : 00000000\n"); 640 EFPRINTF(fp, "\t\t\tS4BIOS Support Present : 0\n"); 641 EFPRINTF(fp, "\t\t\t64-bit Wake Supported (V2) : 0\n"); 642 EFPRINTF(fp, 643 "[0008]\t\t64 Firmware Waking Vector : 0000000000000000\n"); 644 EFPRINTF(fp, "[0001]\t\tVersion : 02\n"); 645 EFPRINTF(fp, "[0003]\t\tReserved : 000000\n"); 646 EFPRINTF(fp, "[0004]\t\tOspmFlags (decoded below) : 00000000\n"); 647 EFPRINTF(fp, "\t\t\t64-bit Wake Env Required (V2) : 0\n"); 648 649 EFFLUSH(fp); 650 651 return (0); 652 653 err_exit: 654 return (errno); 655 } 656 657 /* 658 * Helper routines for writing to the DSDT from other modules. 659 */ 660 void 661 dsdt_line(const char *fmt, ...) 662 { 663 va_list ap; 664 int err; 665 666 if (dsdt_error != 0) 667 return; 668 669 if (strcmp(fmt, "") != 0) { 670 if (dsdt_indent_level != 0) 671 EFPRINTF(dsdt_fp, "%*c", dsdt_indent_level * 2, ' '); 672 va_start(ap, fmt); 673 if (vfprintf(dsdt_fp, fmt, ap) < 0) 674 goto err_exit; 675 va_end(ap); 676 } 677 EFPRINTF(dsdt_fp, "\n"); 678 return; 679 680 err_exit: 681 dsdt_error = errno; 682 } 683 684 void 685 dsdt_indent(int levels) 686 { 687 688 dsdt_indent_level += levels; 689 assert(dsdt_indent_level >= 0); 690 } 691 692 void 693 dsdt_unindent(int levels) 694 { 695 696 assert(dsdt_indent_level >= levels); 697 dsdt_indent_level -= levels; 698 } 699 700 void 701 dsdt_fixed_ioport(uint16_t iobase, uint16_t length) 702 { 703 704 dsdt_line("IO (Decode16,"); 705 dsdt_line(" 0x%04X, // Range Minimum", iobase); 706 dsdt_line(" 0x%04X, // Range Maximum", iobase); 707 dsdt_line(" 0x01, // Alignment"); 708 dsdt_line(" 0x%02X, // Length", length); 709 dsdt_line(" )"); 710 } 711 712 void 713 dsdt_fixed_irq(uint8_t irq) 714 { 715 716 dsdt_line("IRQNoFlags ()"); 717 dsdt_line(" {%d}", irq); 718 } 719 720 void 721 dsdt_fixed_mem32(uint32_t base, uint32_t length) 722 { 723 724 dsdt_line("Memory32Fixed (ReadWrite,"); 725 dsdt_line(" 0x%08X, // Address Base", base); 726 dsdt_line(" 0x%08X, // Address Length", length); 727 dsdt_line(" )"); 728 } 729 730 static int 731 basl_fwrite_dsdt(FILE *fp) 732 { 733 int err; 734 735 err = 0; 736 dsdt_fp = fp; 737 dsdt_error = 0; 738 dsdt_indent_level = 0; 739 740 dsdt_line("/*"); 741 dsdt_line(" * bhyve DSDT template"); 742 dsdt_line(" */"); 743 dsdt_line("DefinitionBlock (\"bhyve_dsdt.aml\", \"DSDT\", 2," 744 "\"BHYVE \", \"BVDSDT \", 0x00000001)"); 745 dsdt_line("{"); 746 dsdt_line(" Name (_S5, Package ()"); 747 dsdt_line(" {"); 748 dsdt_line(" 0x05,"); 749 dsdt_line(" Zero,"); 750 dsdt_line(" })"); 751 752 pci_write_dsdt(); 753 754 dsdt_line(""); 755 dsdt_line(" Scope (_SB.PC00)"); 756 dsdt_line(" {"); 757 dsdt_line(" Device (HPET)"); 758 dsdt_line(" {"); 759 dsdt_line(" Name (_HID, EISAID(\"PNP0103\"))"); 760 dsdt_line(" Name (_UID, 0)"); 761 dsdt_line(" Name (_CRS, ResourceTemplate ()"); 762 dsdt_line(" {"); 763 dsdt_indent(4); 764 dsdt_fixed_mem32(0xFED00000, 0x400); 765 dsdt_unindent(4); 766 dsdt_line(" })"); 767 dsdt_line(" }"); 768 dsdt_line(" }"); 769 dsdt_line("}"); 770 771 if (dsdt_error != 0) 772 return (dsdt_error); 773 774 EFFLUSH(fp); 775 776 return (0); 777 778 err_exit: 779 return (errno); 780 } 781 782 static int 783 basl_open(struct basl_fio *bf, int suffix) 784 { 785 int err; 786 787 err = 0; 788 789 if (suffix) { 790 strncpy(bf->f_name, basl_stemplate, MAXPATHLEN); 791 bf->fd = mkstemps(bf->f_name, strlen(BHYVE_ASL_SUFFIX)); 792 } else { 793 strncpy(bf->f_name, basl_template, MAXPATHLEN); 794 bf->fd = mkstemp(bf->f_name); 795 } 796 797 if (bf->fd > 0) { 798 bf->fp = fdopen(bf->fd, "w+"); 799 if (bf->fp == NULL) { 800 unlink(bf->f_name); 801 close(bf->fd); 802 } 803 } else { 804 err = 1; 805 } 806 807 return (err); 808 } 809 810 static void 811 basl_close(struct basl_fio *bf) 812 { 813 814 if (!basl_keep_temps) 815 unlink(bf->f_name); 816 fclose(bf->fp); 817 } 818 819 static int 820 basl_start(struct basl_fio *in, struct basl_fio *out) 821 { 822 int err; 823 824 err = basl_open(in, 0); 825 if (!err) { 826 err = basl_open(out, 1); 827 if (err) { 828 basl_close(in); 829 } 830 } 831 832 return (err); 833 } 834 835 static void 836 basl_end(struct basl_fio *in, struct basl_fio *out) 837 { 838 839 basl_close(in); 840 basl_close(out); 841 } 842 843 static int 844 basl_load(struct vmctx *ctx, int fd, uint64_t off) 845 { 846 struct stat sb; 847 void *gaddr; 848 849 if (fstat(fd, &sb) < 0) 850 return (errno); 851 852 gaddr = paddr_guest2host(ctx, basl_acpi_base + off, sb.st_size); 853 if (gaddr == NULL) 854 return (EFAULT); 855 856 if (read(fd, gaddr, sb.st_size) < 0) 857 return (errno); 858 859 return (0); 860 } 861 862 static int 863 basl_compile(struct vmctx *ctx, int (*fwrite_section)(FILE *), uint64_t offset) 864 { 865 struct basl_fio io[2]; 866 static char iaslbuf[3*MAXPATHLEN + 10]; 867 char *fmt; 868 int err; 869 870 err = basl_start(&io[0], &io[1]); 871 if (!err) { 872 err = (*fwrite_section)(io[0].fp); 873 874 if (!err) { 875 /* 876 * iasl sends the results of the compilation to 877 * stdout. Shut this down by using the shell to 878 * redirect stdout to /dev/null, unless the user 879 * has requested verbose output for debugging 880 * purposes 881 */ 882 fmt = basl_verbose_iasl ? 883 "%s -p %s %s" : 884 "/bin/sh -c \"%s -p %s %s\" 1> /dev/null"; 885 886 snprintf(iaslbuf, sizeof(iaslbuf), 887 fmt, 888 BHYVE_ASL_COMPILER, 889 io[1].f_name, io[0].f_name); 890 err = system(iaslbuf); 891 892 if (!err) { 893 /* 894 * Copy the aml output file into guest 895 * memory at the specified location 896 */ 897 err = basl_load(ctx, io[1].fd, offset); 898 } 899 } 900 basl_end(&io[0], &io[1]); 901 } 902 903 return (err); 904 } 905 906 static int 907 basl_make_templates(void) 908 { 909 const char *tmpdir; 910 int err; 911 int len; 912 913 err = 0; 914 915 /* 916 * 917 */ 918 if ((tmpdir = getenv("BHYVE_TMPDIR")) == NULL || *tmpdir == '\0' || 919 (tmpdir = getenv("TMPDIR")) == NULL || *tmpdir == '\0') { 920 tmpdir = _PATH_TMP; 921 } 922 923 len = strlen(tmpdir); 924 925 if ((len + sizeof(BHYVE_ASL_TEMPLATE) + 1) < MAXPATHLEN) { 926 strcpy(basl_template, tmpdir); 927 while (len > 0 && basl_template[len - 1] == '/') 928 len--; 929 basl_template[len] = '/'; 930 strcpy(&basl_template[len + 1], BHYVE_ASL_TEMPLATE); 931 } else 932 err = E2BIG; 933 934 if (!err) { 935 /* 936 * len has been intialized (and maybe adjusted) above 937 */ 938 if ((len + sizeof(BHYVE_ASL_TEMPLATE) + 1 + 939 sizeof(BHYVE_ASL_SUFFIX)) < MAXPATHLEN) { 940 strcpy(basl_stemplate, tmpdir); 941 basl_stemplate[len] = '/'; 942 strcpy(&basl_stemplate[len + 1], BHYVE_ASL_TEMPLATE); 943 len = strlen(basl_stemplate); 944 strcpy(&basl_stemplate[len], BHYVE_ASL_SUFFIX); 945 } else 946 err = E2BIG; 947 } 948 949 return (err); 950 } 951 952 static struct { 953 int (*wsect)(FILE *fp); 954 uint64_t offset; 955 } basl_ftables[] = 956 { 957 { basl_fwrite_rsdp, 0}, 958 { basl_fwrite_rsdt, RSDT_OFFSET }, 959 { basl_fwrite_xsdt, XSDT_OFFSET }, 960 { basl_fwrite_madt, MADT_OFFSET }, 961 { basl_fwrite_fadt, FADT_OFFSET }, 962 { basl_fwrite_hpet, HPET_OFFSET }, 963 { basl_fwrite_mcfg, MCFG_OFFSET }, 964 { basl_fwrite_facs, FACS_OFFSET }, 965 { basl_fwrite_dsdt, DSDT_OFFSET }, 966 { NULL } 967 }; 968 969 int 970 acpi_build(struct vmctx *ctx, int ncpu) 971 { 972 int err; 973 int i; 974 975 basl_ncpu = ncpu; 976 977 err = vm_get_hpet_capabilities(ctx, &hpet_capabilities); 978 if (err != 0) 979 return (err); 980 981 /* 982 * For debug, allow the user to have iasl compiler output sent 983 * to stdout rather than /dev/null 984 */ 985 if (getenv("BHYVE_ACPI_VERBOSE_IASL")) 986 basl_verbose_iasl = 1; 987 988 /* 989 * Allow the user to keep the generated ASL files for debugging 990 * instead of deleting them following use 991 */ 992 if (getenv("BHYVE_ACPI_KEEPTMPS")) 993 basl_keep_temps = 1; 994 995 i = 0; 996 err = basl_make_templates(); 997 998 /* 999 * Run through all the ASL files, compiling them and 1000 * copying them into guest memory 1001 */ 1002 while (!err && basl_ftables[i].wsect != NULL) { 1003 err = basl_compile(ctx, basl_ftables[i].wsect, 1004 basl_ftables[i].offset); 1005 i++; 1006 } 1007 1008 return (err); 1009 } 1010