|
|
@@ -0,0 +1,252 @@
|
|
|
+/*
|
|
|
+ * Copyright (c) 2006-2022, RT-Thread Development Team
|
|
|
+ *
|
|
|
+ * SPDX-License-Identifier: Apache-2.0
|
|
|
+ *
|
|
|
+ * Change Logs:
|
|
|
+ * Date Author Notes
|
|
|
+ */
|
|
|
+#include <rthw.h>
|
|
|
+#include <rtthread.h>
|
|
|
+#include <stdint.h>
|
|
|
+#include <stdio.h>
|
|
|
+#include <string.h>
|
|
|
+#include "psci.h"
|
|
|
+#include "psci_api.h"
|
|
|
+#include "smccc.h"
|
|
|
+
|
|
|
+#define DBG_TAG "libcpu.aarch64.psci"
|
|
|
+#define DBG_LVL DBG_INFO
|
|
|
+#include <rtdbg.h>
|
|
|
+
|
|
|
+/** template for creating 4 PSCI ops: SUSPEND, OFF, ON, MIGRATE */
|
|
|
+#define COMMON_PSCI_OPS_TEMPLATE(VER, SUSPEND, OFF, ON, MIGRATE) \
|
|
|
+ static int psci_##VER##_cpu_suspend(uint32_t state, unsigned long entry_point) \
|
|
|
+ { \
|
|
|
+ return psci_call((SUSPEND), state, entry_point, 0); \
|
|
|
+ } \
|
|
|
+ static int psci_##VER##_cpu_off(uint32_t state) \
|
|
|
+ { \
|
|
|
+ return psci_call((OFF), state, 0, 0); \
|
|
|
+ } \
|
|
|
+ static int psci_##VER##_cpu_on(unsigned long cpuid, unsigned long entry_point) \
|
|
|
+ { \
|
|
|
+ return psci_call((ON), cpuid, entry_point, 0); \
|
|
|
+ } \
|
|
|
+ static int psci_##VER##_migrate(unsigned long cpuid) \
|
|
|
+ { \
|
|
|
+ return psci_call((MIGRATE), cpuid, 0, 0); \
|
|
|
+ }
|
|
|
+
|
|
|
+#ifdef RT_USING_FDT
|
|
|
+#include "dtb_node.h"
|
|
|
+
|
|
|
+struct psci_operations psci_ops;
|
|
|
+
|
|
|
+#if __SIZE_WIDTH__ == 64
|
|
|
+#define PSCI_FN_NATIVE(version, name) PSCI_##version##_FN64_##name
|
|
|
+#else
|
|
|
+#define PSCI_FN_NATIVE(version, name) PSCI_##version##_FN_##name
|
|
|
+#endif
|
|
|
+
|
|
|
+/**
|
|
|
+ * SMCCC can use either smc or hvc method
|
|
|
+ * smccc_call will be init to proper interface when psci_init() was executed
|
|
|
+ */
|
|
|
+static void (*smccc_call)(unsigned long a0, unsigned long a1, unsigned long a2,
|
|
|
+ unsigned long a3, unsigned long a4, unsigned long a5,
|
|
|
+ unsigned long a6, unsigned long a7, struct arm_smccc_res_t *res,
|
|
|
+ struct arm_smccc_quirk_t *quirk);
|
|
|
+
|
|
|
+static rt_uint32_t psci_call(unsigned long a0, unsigned long a1, unsigned long a2, unsigned long a3)
|
|
|
+{
|
|
|
+ struct arm_smccc_res_t res;
|
|
|
+ smccc_call(a0, a1, a2, a3, 0, 0, 0, 0, &res, (void *)0);
|
|
|
+ return res.a0;
|
|
|
+}
|
|
|
+
|
|
|
+static int _psci_probe_version(char *version, int *major, int *minor);
|
|
|
+static int _psci_init_with_version(int major, int minor);
|
|
|
+
|
|
|
+static struct dtb_node *psci_node;
|
|
|
+
|
|
|
+/**
|
|
|
+ * init psci operations.
|
|
|
+ * using device tree to probe version and psci-method,
|
|
|
+ * setup psci ops for future use
|
|
|
+ */
|
|
|
+int psci_init()
|
|
|
+{
|
|
|
+ void *root = get_dtb_node_head();
|
|
|
+ psci_node = dtb_node_get_dtb_node_by_path(root, "/psci");
|
|
|
+ if (!psci_node)
|
|
|
+ {
|
|
|
+ return -1;
|
|
|
+ }
|
|
|
+ char *compatible = dtb_node_get_dtb_node_property_value(psci_node, "compatible", NULL);
|
|
|
+ char *method = dtb_node_get_dtb_node_property_value(psci_node, "method", NULL);
|
|
|
+ int ver_major, ver_minor;
|
|
|
+ int retval = 0;
|
|
|
+
|
|
|
+ // setup psci-method
|
|
|
+ if (!strcmp("hvc", method))
|
|
|
+ {
|
|
|
+ smccc_call = arm_smccc_hvc;
|
|
|
+ }
|
|
|
+ else if (!strcmp("smc", method))
|
|
|
+ {
|
|
|
+ smccc_call = arm_smccc_smc;
|
|
|
+ }
|
|
|
+ else
|
|
|
+ {
|
|
|
+ LOG_E("Unknown PSCI method: %s", method);
|
|
|
+ return -1;
|
|
|
+ }
|
|
|
+
|
|
|
+ retval = _psci_probe_version(compatible, &ver_major, &ver_minor);
|
|
|
+ if (retval != 0)
|
|
|
+ return retval;
|
|
|
+
|
|
|
+ // init psci_ops with specified psci version
|
|
|
+ retval = _psci_init_with_version(ver_major, ver_minor);
|
|
|
+
|
|
|
+ return retval;
|
|
|
+}
|
|
|
+
|
|
|
+/* function id of PSCI v0.1 should be probed in FDT, they are implementation defined value */
|
|
|
+static rt_uint32_t cpu_suspend_0_1;
|
|
|
+static rt_uint32_t cpu_off_0_1;
|
|
|
+static rt_uint32_t cpu_on_0_1;
|
|
|
+static rt_uint32_t migrate_0_1;
|
|
|
+
|
|
|
+#ifdef RT_USING_FDT
|
|
|
+/* basic operations TEMPLATE for API since 0.1 version */
|
|
|
+COMMON_PSCI_OPS_TEMPLATE(0_1, cpu_suspend_0_1, cpu_off_0_1, cpu_on_0_1, migrate_0_1);
|
|
|
+
|
|
|
+/* used for v0.1 only, rely on FDT to probe function id */
|
|
|
+#define PROBE_AND_SET(FUNC_NAME) \
|
|
|
+ do \
|
|
|
+ { \
|
|
|
+ int num_of_elem; \
|
|
|
+ funcid = \
|
|
|
+ dtb_node_get_dtb_node_property_value(psci_node, #FUNC_NAME, &num_of_elem); \
|
|
|
+ if (num_of_elem != 4 || funcid == 0 || *funcid == 0) \
|
|
|
+ { \
|
|
|
+ LOG_E("Failed to probe " #FUNC_NAME " in FDT"); \
|
|
|
+ } \
|
|
|
+ else \
|
|
|
+ { \
|
|
|
+ FUNC_NAME##_0_1 = (rt_uint32_t)fdt32_to_cpu(*funcid); \
|
|
|
+ psci_ops.FUNC_NAME = psci_0_1_##FUNC_NAME; \
|
|
|
+ } \
|
|
|
+ } while (0)
|
|
|
+
|
|
|
+static int psci_0_1_init()
|
|
|
+{
|
|
|
+#ifdef RT_USING_FDT
|
|
|
+ // reading function id from fdt
|
|
|
+ rt_uint32_t *funcid;
|
|
|
+ PROBE_AND_SET(cpu_suspend);
|
|
|
+ PROBE_AND_SET(cpu_off);
|
|
|
+ PROBE_AND_SET(cpu_on);
|
|
|
+ PROBE_AND_SET(migrate);
|
|
|
+ return 0;
|
|
|
+#else
|
|
|
+ return -1;
|
|
|
+#endif
|
|
|
+}
|
|
|
+
|
|
|
+#endif /* RT_USING_FDT */
|
|
|
+
|
|
|
+COMMON_PSCI_OPS_TEMPLATE(0_2, PSCI_FN_NATIVE(0_2, CPU_SUSPEND), PSCI_0_2_FN_CPU_OFF, PSCI_FN_NATIVE(0_2, CPU_ON), PSCI_FN_NATIVE(0_2, MIGRATE));
|
|
|
+
|
|
|
+static rt_uint32_t psci_0_2_get_version(void)
|
|
|
+{
|
|
|
+ return psci_call(PSCI_0_2_FN_PSCI_VERSION, 0, 0, 0);
|
|
|
+}
|
|
|
+
|
|
|
+static void psci_0_2_set_basic_ops()
|
|
|
+{
|
|
|
+ psci_ops = (struct psci_operations){
|
|
|
+ .get_version = psci_0_2_get_version,
|
|
|
+
|
|
|
+ // followings API are v0.1 compatible
|
|
|
+ .cpu_suspend = psci_0_2_cpu_suspend,
|
|
|
+ .cpu_off = psci_0_2_cpu_off,
|
|
|
+ .cpu_on = psci_0_2_cpu_on,
|
|
|
+ .migrate = psci_0_2_migrate,
|
|
|
+ };
|
|
|
+}
|
|
|
+
|
|
|
+static int psci_0_2_init()
|
|
|
+{
|
|
|
+ psci_0_2_set_basic_ops();
|
|
|
+
|
|
|
+ // TODO init other version 0.2 features...
|
|
|
+ return 0;
|
|
|
+}
|
|
|
+
|
|
|
+static int psci_1_0_init()
|
|
|
+{
|
|
|
+ psci_0_2_init();
|
|
|
+
|
|
|
+ // TODO init other version 1.0 features...
|
|
|
+ return 0;
|
|
|
+}
|
|
|
+
|
|
|
+/* probe psci version from fdt or SMC call */
|
|
|
+static int _psci_probe_version(char *version, int *major, int *minor)
|
|
|
+{
|
|
|
+ int retval = 0;
|
|
|
+ // if strcmp compatible 'arm,psci-0.1'
|
|
|
+ if (!strcmp(version, "arm,psci"))
|
|
|
+ {
|
|
|
+ *major = 0;
|
|
|
+ *minor = 1;
|
|
|
+ }
|
|
|
+ else if (!strncmp(version, "arm,psci-", 8))
|
|
|
+ {
|
|
|
+ // since psci-0.2, using psci call to probe version
|
|
|
+ rt_uint32_t ret = psci_0_2_get_version();
|
|
|
+ *major = PSCI_VERSION_MAJOR(ret);
|
|
|
+ *minor = PSCI_VERSION_MINOR(ret);
|
|
|
+ }
|
|
|
+ else
|
|
|
+ {
|
|
|
+ LOG_E("[%s] was not a proper PSCI version", version);
|
|
|
+ retval = -1;
|
|
|
+ }
|
|
|
+ LOG_I("Using PSCI v%d.%d", *major, *minor);
|
|
|
+ return retval;
|
|
|
+}
|
|
|
+
|
|
|
+/* init psci ops with version info */
|
|
|
+static int _psci_init_with_version(int major, int minor)
|
|
|
+{
|
|
|
+ int retval = -0xbeef; // mark unsupported
|
|
|
+ if (major == 0)
|
|
|
+ {
|
|
|
+ // for v0.1, psci function id was provided fdt
|
|
|
+ if (minor == 1)
|
|
|
+ {
|
|
|
+ retval = psci_0_1_init();
|
|
|
+ }
|
|
|
+ else if (minor == 2)
|
|
|
+ {
|
|
|
+ retval = psci_0_2_init();
|
|
|
+ }
|
|
|
+ }
|
|
|
+ else if (major == 1)
|
|
|
+ {
|
|
|
+ // psci_1_0_init is a base setup for version after v1.0
|
|
|
+ retval = psci_1_0_init();
|
|
|
+ }
|
|
|
+
|
|
|
+ if (retval == -0xbeef)
|
|
|
+ {
|
|
|
+ LOG_E("PSCI init with incompatible version %d.%d", major, minor);
|
|
|
+ }
|
|
|
+ return retval;
|
|
|
+}
|
|
|
+
|
|
|
+#endif /* RT_USING_FDT */
|