/* $NetBSD: acpi_fdt.c,v 1.12 2019/06/22 19:47:27 jmcneill Exp $ */
/*-
* Copyright (c) 2015-2017 Jared McNeill <jmcneill@invisible.ca>
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
* OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
#include "pci.h"
#include "opt_efi.h"
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: acpi_fdt.c,v 1.12 2019/06/22 19:47:27 jmcneill Exp $");
#include <sys/param.h>
#include <sys/bus.h>
#include <sys/device.h>
#include <sys/intr.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/lwp.h>
#include <sys/kmem.h>
#include <sys/queue.h>
#include <sys/sysctl.h>
#include <dev/fdt/fdtvar.h>
#include <dev/acpi/acpivar.h>
#include <dev/pci/pcivar.h>
#include <arm/arm/psci.h>
#include <arm/acpi/acpi_pci_machdep.h>
#ifdef EFI_RUNTIME
#include <arm/arm/efi_runtime.h>
#include <dev/clock_subr.h>
#endif
static int acpi_fdt_match(device_t, cfdata_t, void *);
static void acpi_fdt_attach(device_t, device_t, void *);
static void acpi_fdt_poweroff(device_t);
#ifdef EFI_RUNTIME
static void acpi_fdt_efi_init(device_t);
static int acpi_fdt_efi_rtc_gettime(todr_chip_handle_t, struct clock_ymdhms *);
static int acpi_fdt_efi_rtc_settime(todr_chip_handle_t, struct clock_ymdhms *);
#endif
static void acpi_fdt_sysctl_init(void);
extern struct arm32_bus_dma_tag acpi_coherent_dma_tag;
#if NPCI > 0
static struct acpi_pci_context acpi_fdt_pci_context;
#endif
static uint64_t smbios_table = 0;
#ifdef EFI_RUNTIME
static struct todr_chip_handle efi_todr;
#endif
static const char * const compatible[] = {
"netbsd,acpi",
NULL
};
static const struct fdtbus_power_controller_func acpi_fdt_power_funcs = {
.poweroff = acpi_fdt_poweroff,
};
CFATTACH_DECL_NEW(acpi_fdt, 0, acpi_fdt_match, acpi_fdt_attach, NULL, NULL);
static int
acpi_fdt_match(device_t parent, cfdata_t cf, void *aux)
{
struct fdt_attach_args * const faa = aux;
return of_compatible(faa->faa_phandle, compatible) >= 0;
}
static void
acpi_fdt_attach(device_t parent, device_t self, void *aux)
{
struct fdt_attach_args * const faa = aux;
struct acpibus_attach_args aa;
aprint_naive("\n");
aprint_normal("\n");
#ifdef EFI_RUNTIME
acpi_fdt_efi_init(self);
#endif
fdtbus_register_power_controller(self, faa->faa_phandle,
&acpi_fdt_power_funcs);
if (!acpi_probe())
aprint_error_dev(self, "failed to probe ACPI\n");
memset(&aa, 0, sizeof(aa));
#if NPCI > 0
acpi_fdt_pci_context.ap_pc = arm_acpi_pci_chipset;
acpi_fdt_pci_context.ap_pc.pc_conf_v = &acpi_fdt_pci_context;
acpi_fdt_pci_context.ap_seg = 0;
aa.aa_pciflags =
/*PCI_FLAGS_IO_OKAY |*/ PCI_FLAGS_MEM_OKAY |
PCI_FLAGS_MRL_OKAY | PCI_FLAGS_MRM_OKAY |
PCI_FLAGS_MWI_OKAY;
#ifdef __HAVE_PCI_MSI_MSIX
aa.aa_pciflags |= PCI_FLAGS_MSI_OKAY | PCI_FLAGS_MSIX_OKAY;
#endif
aa.aa_pc = &acpi_fdt_pci_context.ap_pc;
#endif
aa.aa_memt = faa->faa_bst;
aa.aa_dmat = &acpi_coherent_dma_tag;
#ifdef _PCI_HAVE_DMA64
aa.aa_dmat64 = &acpi_coherent_dma_tag;
#endif
config_found_ia(self, "acpibus", &aa, 0);
acpi_fdt_sysctl_init();
}
static void
acpi_fdt_poweroff(device_t dev)
{
delay(500000);
#ifdef EFI_RUNTIME
if (arm_efirt_reset(EFI_RESET_SHUTDOWN) == 0)
return;
#endif
if (psci_available())
psci_system_off();
}
static void
acpi_fdt_sysctl_init(void)
{
const struct sysctlnode *rnode;
int error;
const int chosen = OF_finddevice("/chosen");
if (chosen >= 0)
of_getprop_uint64(chosen, "netbsd,smbios-table", &smbios_table);
error = sysctl_createv(NULL, 0, NULL, &rnode,
CTLFLAG_PERMANENT, CTLTYPE_NODE, "machdep", NULL,
NULL, 0, NULL, 0, CTL_MACHDEP, CTL_EOL);
if (error)
return;
if (smbios_table != 0) {
(void)sysctl_createv(NULL, 0, &rnode, NULL,
CTLFLAG_PERMANENT | CTLFLAG_READONLY | CTLFLAG_HEX, CTLTYPE_QUAD,
"smbios", SYSCTL_DESCR("SMBIOS table pointer"),
NULL, 0, &smbios_table, sizeof(smbios_table),
CTL_CREATE, CTL_EOL);
}
}
#ifdef EFI_RUNTIME
static void
acpi_fdt_efi_init(device_t dev)
{
uint64_t efi_system_table;
struct efi_tm tm;
int error;
const int chosen = OF_finddevice("/chosen");
if (chosen < 0)
return;
if (of_getprop_uint64(chosen, "netbsd,uefi-system-table", &efi_system_table) != 0)
return;
error = arm_efirt_init(efi_system_table);
if (error)
return;
aprint_debug_dev(dev, "EFI system table at %#" PRIx64 "\n", efi_system_table);
if (arm_efirt_gettime(&tm) == 0) {
aprint_normal_dev(dev, "using EFI runtime services for RTC\n");
efi_todr.cookie = NULL;
efi_todr.todr_gettime_ymdhms = acpi_fdt_efi_rtc_gettime;
efi_todr.todr_settime_ymdhms = acpi_fdt_efi_rtc_settime;
todr_attach(&efi_todr);
}
}
static int
acpi_fdt_efi_rtc_gettime(todr_chip_handle_t tch, struct clock_ymdhms *dt)
{
struct efi_tm tm;
int error;
error = arm_efirt_gettime(&tm);
if (error)
return error;
dt->dt_year = tm.tm_year;
dt->dt_mon = tm.tm_mon;
dt->dt_day = tm.tm_mday;
dt->dt_wday = 0;
dt->dt_hour = tm.tm_hour;
dt->dt_min = tm.tm_min;
dt->dt_sec = tm.tm_sec;
return 0;
}
static int
acpi_fdt_efi_rtc_settime(todr_chip_handle_t tch, struct clock_ymdhms *dt)
{
struct efi_tm tm;
memset(&tm, 0, sizeof(tm));
tm.tm_year = dt->dt_year;
tm.tm_mon = dt->dt_mon;
tm.tm_mday = dt->dt_day;
tm.tm_hour = dt->dt_hour;
tm.tm_min = dt->dt_min;
tm.tm_sec = dt->dt_sec;
return arm_efirt_settime(&tm);
}
#endif