1 /* 2 * Copyright (c) 2015-2021, ARM Limited and Contributors. All rights reserved. 3 * 4 * SPDX-License-Identifier: BSD-3-Clause 5 */ 6 7 #include <assert.h> 8 #include <errno.h> 9 #include <string.h> 10 11 #include <platform_def.h> 12 13 #include <arch_helpers.h> 14 #include <common/bl_common.h> 15 #include <common/debug.h> 16 #include <common/desc_image_load.h> 17 #include <drivers/delay_timer.h> 18 #include <drivers/generic_delay_timer.h> 19 #include <drivers/mmc.h> 20 #include <drivers/st/bsec.h> 21 #include <drivers/st/stm32_console.h> 22 #include <drivers/st/stm32_iwdg.h> 23 #include <drivers/st/stm32mp_pmic.h> 24 #include <drivers/st/stm32mp_reset.h> 25 #include <drivers/st/stm32mp1_clk.h> 26 #include <drivers/st/stm32mp1_pwr.h> 27 #include <drivers/st/stm32mp1_ram.h> 28 #include <lib/fconf/fconf.h> 29 #include <lib/fconf/fconf_dyn_cfg_getter.h> 30 #include <lib/mmio.h> 31 #include <lib/optee_utils.h> 32 #include <lib/xlat_tables/xlat_tables_v2.h> 33 #include <plat/common/platform.h> 34 35 #include <stm32mp1_context.h> 36 #include <stm32mp1_dbgmcu.h> 37 38 #define RESET_TIMEOUT_US_1MS 1000U 39 40 static console_t console; 41 static struct stm32mp_auth_ops stm32mp1_auth_ops; 42 43 static void print_reset_reason(void) 44 { 45 uint32_t rstsr = mmio_read_32(stm32mp_rcc_base() + RCC_MP_RSTSCLRR); 46 47 if (rstsr == 0U) { 48 WARN("Reset reason unknown\n"); 49 return; 50 } 51 52 INFO("Reset reason (0x%x):\n", rstsr); 53 54 if ((rstsr & RCC_MP_RSTSCLRR_PADRSTF) == 0U) { 55 if ((rstsr & RCC_MP_RSTSCLRR_STDBYRSTF) != 0U) { 56 INFO("System exits from STANDBY\n"); 57 return; 58 } 59 60 if ((rstsr & RCC_MP_RSTSCLRR_CSTDBYRSTF) != 0U) { 61 INFO("MPU exits from CSTANDBY\n"); 62 return; 63 } 64 } 65 66 if ((rstsr & RCC_MP_RSTSCLRR_PORRSTF) != 0U) { 67 INFO(" Power-on Reset (rst_por)\n"); 68 return; 69 } 70 71 if ((rstsr & RCC_MP_RSTSCLRR_BORRSTF) != 0U) { 72 INFO(" Brownout Reset (rst_bor)\n"); 73 return; 74 } 75 76 if ((rstsr & RCC_MP_RSTSCLRR_MCSYSRSTF) != 0U) { 77 if ((rstsr & RCC_MP_RSTSCLRR_PADRSTF) != 0U) { 78 INFO(" System reset generated by MCU (MCSYSRST)\n"); 79 } else { 80 INFO(" Local reset generated by MCU (MCSYSRST)\n"); 81 } 82 return; 83 } 84 85 if ((rstsr & RCC_MP_RSTSCLRR_MPSYSRSTF) != 0U) { 86 INFO(" System reset generated by MPU (MPSYSRST)\n"); 87 return; 88 } 89 90 if ((rstsr & RCC_MP_RSTSCLRR_HCSSRSTF) != 0U) { 91 INFO(" Reset due to a clock failure on HSE\n"); 92 return; 93 } 94 95 if ((rstsr & RCC_MP_RSTSCLRR_IWDG1RSTF) != 0U) { 96 INFO(" IWDG1 Reset (rst_iwdg1)\n"); 97 return; 98 } 99 100 if ((rstsr & RCC_MP_RSTSCLRR_IWDG2RSTF) != 0U) { 101 INFO(" IWDG2 Reset (rst_iwdg2)\n"); 102 return; 103 } 104 105 if ((rstsr & RCC_MP_RSTSCLRR_MPUP0RSTF) != 0U) { 106 INFO(" MPU Processor 0 Reset\n"); 107 return; 108 } 109 110 if ((rstsr & RCC_MP_RSTSCLRR_MPUP1RSTF) != 0U) { 111 INFO(" MPU Processor 1 Reset\n"); 112 return; 113 } 114 115 if ((rstsr & RCC_MP_RSTSCLRR_PADRSTF) != 0U) { 116 INFO(" Pad Reset from NRST\n"); 117 return; 118 } 119 120 if ((rstsr & RCC_MP_RSTSCLRR_VCORERSTF) != 0U) { 121 INFO(" Reset due to a failure of VDD_CORE\n"); 122 return; 123 } 124 125 ERROR(" Unidentified reset reason\n"); 126 } 127 128 void bl2_el3_early_platform_setup(u_register_t arg0, 129 u_register_t arg1 __unused, 130 u_register_t arg2 __unused, 131 u_register_t arg3 __unused) 132 { 133 stm32mp_save_boot_ctx_address(arg0); 134 } 135 136 void bl2_platform_setup(void) 137 { 138 int ret; 139 140 if (dt_pmic_status() > 0) { 141 initialize_pmic(); 142 } 143 144 ret = stm32mp1_ddr_probe(); 145 if (ret < 0) { 146 ERROR("Invalid DDR init: error %d\n", ret); 147 panic(); 148 } 149 150 /* Map DDR for binary load, now with cacheable attribute */ 151 ret = mmap_add_dynamic_region(STM32MP_DDR_BASE, STM32MP_DDR_BASE, 152 STM32MP_DDR_MAX_SIZE, MT_MEMORY | MT_RW | MT_SECURE); 153 if (ret < 0) { 154 ERROR("DDR mapping: error %d\n", ret); 155 panic(); 156 } 157 158 #if STM32MP_USE_STM32IMAGE 159 #ifdef AARCH32_SP_OPTEE 160 INFO("BL2 runs OP-TEE setup\n"); 161 #else 162 INFO("BL2 runs SP_MIN setup\n"); 163 #endif 164 #endif /* STM32MP_USE_STM32IMAGE */ 165 } 166 167 void bl2_el3_plat_arch_setup(void) 168 { 169 int32_t result; 170 struct dt_node_info dt_uart_info; 171 const char *board_model; 172 boot_api_context_t *boot_context = 173 (boot_api_context_t *)stm32mp_get_boot_ctx_address(); 174 uint32_t clk_rate; 175 uintptr_t pwr_base; 176 uintptr_t rcc_base; 177 178 mmap_add_region(BL_CODE_BASE, BL_CODE_BASE, 179 BL_CODE_END - BL_CODE_BASE, 180 MT_CODE | MT_SECURE); 181 182 #if STM32MP_USE_STM32IMAGE 183 #ifdef AARCH32_SP_OPTEE 184 mmap_add_region(STM32MP_OPTEE_BASE, STM32MP_OPTEE_BASE, 185 STM32MP_OPTEE_SIZE, 186 MT_MEMORY | MT_RW | MT_SECURE); 187 #else 188 /* Prevent corruption of preloaded BL32 */ 189 mmap_add_region(BL32_BASE, BL32_BASE, 190 BL32_LIMIT - BL32_BASE, 191 MT_RO_DATA | MT_SECURE); 192 #endif 193 #endif /* STM32MP_USE_STM32IMAGE */ 194 195 /* Prevent corruption of preloaded Device Tree */ 196 mmap_add_region(DTB_BASE, DTB_BASE, 197 DTB_LIMIT - DTB_BASE, 198 MT_RO_DATA | MT_SECURE); 199 200 configure_mmu(); 201 202 if (dt_open_and_check(STM32MP_DTB_BASE) < 0) { 203 panic(); 204 } 205 206 pwr_base = stm32mp_pwr_base(); 207 rcc_base = stm32mp_rcc_base(); 208 209 /* 210 * Disable the backup domain write protection. 211 * The protection is enable at each reset by hardware 212 * and must be disabled by software. 213 */ 214 mmio_setbits_32(pwr_base + PWR_CR1, PWR_CR1_DBP); 215 216 while ((mmio_read_32(pwr_base + PWR_CR1) & PWR_CR1_DBP) == 0U) { 217 ; 218 } 219 220 if (bsec_probe() != 0) { 221 panic(); 222 } 223 224 /* Reset backup domain on cold boot cases */ 225 if ((mmio_read_32(rcc_base + RCC_BDCR) & RCC_BDCR_RTCSRC_MASK) == 0U) { 226 mmio_setbits_32(rcc_base + RCC_BDCR, RCC_BDCR_VSWRST); 227 228 while ((mmio_read_32(rcc_base + RCC_BDCR) & RCC_BDCR_VSWRST) == 229 0U) { 230 ; 231 } 232 233 mmio_clrbits_32(rcc_base + RCC_BDCR, RCC_BDCR_VSWRST); 234 } 235 236 /* Disable MCKPROT */ 237 mmio_clrbits_32(rcc_base + RCC_TZCR, RCC_TZCR_MCKPROT); 238 239 generic_delay_timer_init(); 240 241 if (stm32mp1_clk_probe() < 0) { 242 panic(); 243 } 244 245 if (stm32mp1_clk_init() < 0) { 246 panic(); 247 } 248 249 stm32mp1_syscfg_init(); 250 251 result = dt_get_stdout_uart_info(&dt_uart_info); 252 253 if ((result <= 0) || 254 (dt_uart_info.status == 0U) || 255 (dt_uart_info.clock < 0) || 256 (dt_uart_info.reset < 0)) { 257 goto skip_console_init; 258 } 259 260 if (dt_set_stdout_pinctrl() != 0) { 261 goto skip_console_init; 262 } 263 264 stm32mp_clk_enable((unsigned long)dt_uart_info.clock); 265 266 if (stm32mp_reset_assert((uint32_t)dt_uart_info.reset, 267 RESET_TIMEOUT_US_1MS) != 0) { 268 panic(); 269 } 270 271 udelay(2); 272 273 if (stm32mp_reset_deassert((uint32_t)dt_uart_info.reset, 274 RESET_TIMEOUT_US_1MS) != 0) { 275 panic(); 276 } 277 278 mdelay(1); 279 280 clk_rate = stm32mp_clk_get_rate((unsigned long)dt_uart_info.clock); 281 282 if (console_stm32_register(dt_uart_info.base, clk_rate, 283 STM32MP_UART_BAUDRATE, &console) == 0) { 284 panic(); 285 } 286 287 console_set_scope(&console, CONSOLE_FLAG_BOOT | 288 CONSOLE_FLAG_CRASH | CONSOLE_FLAG_TRANSLATE_CRLF); 289 290 stm32mp_print_cpuinfo(); 291 292 board_model = dt_get_board_model(); 293 if (board_model != NULL) { 294 NOTICE("Model: %s\n", board_model); 295 } 296 297 stm32mp_print_boardinfo(); 298 299 if (boot_context->auth_status != BOOT_API_CTX_AUTH_NO) { 300 NOTICE("Bootrom authentication %s\n", 301 (boot_context->auth_status == BOOT_API_CTX_AUTH_FAILED) ? 302 "failed" : "succeeded"); 303 } 304 305 skip_console_init: 306 if (stm32_iwdg_init() < 0) { 307 panic(); 308 } 309 310 stm32_iwdg_refresh(); 311 312 result = stm32mp1_dbgmcu_freeze_iwdg2(); 313 if (result != 0) { 314 INFO("IWDG2 freeze error : %i\n", result); 315 } 316 317 if (stm32_save_boot_interface(boot_context->boot_interface_selected, 318 boot_context->boot_interface_instance) != 319 0) { 320 ERROR("Cannot save boot interface\n"); 321 } 322 323 stm32mp1_auth_ops.check_key = boot_context->bootrom_ecdsa_check_key; 324 stm32mp1_auth_ops.verify_signature = 325 boot_context->bootrom_ecdsa_verify_signature; 326 327 stm32mp_init_auth(&stm32mp1_auth_ops); 328 329 stm32mp1_arch_security_setup(); 330 331 print_reset_reason(); 332 333 #if !STM32MP_USE_STM32IMAGE 334 fconf_populate("TB_FW", STM32MP_DTB_BASE); 335 #endif /* !STM32MP_USE_STM32IMAGE */ 336 337 stm32mp_io_setup(); 338 } 339 340 /******************************************************************************* 341 * This function can be used by the platforms to update/use image 342 * information for given `image_id`. 343 ******************************************************************************/ 344 int bl2_plat_handle_post_image_load(unsigned int image_id) 345 { 346 int err = 0; 347 bl_mem_params_node_t *bl_mem_params = get_bl_mem_params_node(image_id); 348 bl_mem_params_node_t *bl32_mem_params; 349 bl_mem_params_node_t *pager_mem_params __unused; 350 bl_mem_params_node_t *paged_mem_params __unused; 351 #if !STM32MP_USE_STM32IMAGE 352 const struct dyn_cfg_dtb_info_t *config_info; 353 bl_mem_params_node_t *tos_fw_mem_params; 354 unsigned int i; 355 unsigned long long ddr_top __unused; 356 const unsigned int image_ids[] = { 357 BL32_IMAGE_ID, 358 BL33_IMAGE_ID, 359 HW_CONFIG_ID, 360 TOS_FW_CONFIG_ID, 361 }; 362 #endif /* !STM32MP_USE_STM32IMAGE */ 363 364 assert(bl_mem_params != NULL); 365 366 switch (image_id) { 367 #if !STM32MP_USE_STM32IMAGE 368 case FW_CONFIG_ID: 369 /* Set global DTB info for fixed fw_config information */ 370 set_config_info(STM32MP_FW_CONFIG_BASE, STM32MP_FW_CONFIG_MAX_SIZE, FW_CONFIG_ID); 371 fconf_populate("FW_CONFIG", STM32MP_FW_CONFIG_BASE); 372 373 /* Iterate through all the fw config IDs */ 374 for (i = 0U; i < ARRAY_SIZE(image_ids); i++) { 375 bl_mem_params = get_bl_mem_params_node(image_ids[i]); 376 assert(bl_mem_params != NULL); 377 378 config_info = FCONF_GET_PROPERTY(dyn_cfg, dtb, image_ids[i]); 379 if (config_info == NULL) { 380 continue; 381 } 382 383 bl_mem_params->image_info.image_base = config_info->config_addr; 384 bl_mem_params->image_info.image_max_size = config_info->config_max_size; 385 386 bl_mem_params->image_info.h.attr &= ~IMAGE_ATTRIB_SKIP_LOADING; 387 388 switch (image_ids[i]) { 389 case BL32_IMAGE_ID: 390 bl_mem_params->ep_info.pc = config_info->config_addr; 391 392 /* In case of OPTEE, initialize address space with tos_fw addr */ 393 pager_mem_params = get_bl_mem_params_node(BL32_EXTRA1_IMAGE_ID); 394 pager_mem_params->image_info.image_base = config_info->config_addr; 395 pager_mem_params->image_info.image_max_size = 396 config_info->config_max_size; 397 398 /* Init base and size for pager if exist */ 399 paged_mem_params = get_bl_mem_params_node(BL32_EXTRA2_IMAGE_ID); 400 paged_mem_params->image_info.image_base = STM32MP_DDR_BASE + 401 (dt_get_ddr_size() - STM32MP_DDR_S_SIZE - 402 STM32MP_DDR_SHMEM_SIZE); 403 paged_mem_params->image_info.image_max_size = STM32MP_DDR_S_SIZE; 404 break; 405 406 case BL33_IMAGE_ID: 407 bl_mem_params->ep_info.pc = config_info->config_addr; 408 break; 409 410 case HW_CONFIG_ID: 411 case TOS_FW_CONFIG_ID: 412 break; 413 414 default: 415 return -EINVAL; 416 } 417 } 418 break; 419 #endif /* !STM32MP_USE_STM32IMAGE */ 420 421 case BL32_IMAGE_ID: 422 if (optee_header_is_valid(bl_mem_params->image_info.image_base)) { 423 /* BL32 is OP-TEE header */ 424 bl_mem_params->ep_info.pc = bl_mem_params->image_info.image_base; 425 pager_mem_params = get_bl_mem_params_node(BL32_EXTRA1_IMAGE_ID); 426 paged_mem_params = get_bl_mem_params_node(BL32_EXTRA2_IMAGE_ID); 427 assert((pager_mem_params != NULL) && (paged_mem_params != NULL)); 428 429 #if STM32MP_USE_STM32IMAGE && defined(AARCH32_SP_OPTEE) 430 /* Set OP-TEE extra image load areas at run-time */ 431 pager_mem_params->image_info.image_base = STM32MP_OPTEE_BASE; 432 pager_mem_params->image_info.image_max_size = STM32MP_OPTEE_SIZE; 433 434 paged_mem_params->image_info.image_base = STM32MP_DDR_BASE + 435 dt_get_ddr_size() - 436 STM32MP_DDR_S_SIZE - 437 STM32MP_DDR_SHMEM_SIZE; 438 paged_mem_params->image_info.image_max_size = STM32MP_DDR_S_SIZE; 439 #endif /* STM32MP_USE_STM32IMAGE && defined(AARCH32_SP_OPTEE) */ 440 441 err = parse_optee_header(&bl_mem_params->ep_info, 442 &pager_mem_params->image_info, 443 &paged_mem_params->image_info); 444 if (err) { 445 ERROR("OPTEE header parse error.\n"); 446 panic(); 447 } 448 449 /* Set optee boot info from parsed header data */ 450 bl_mem_params->ep_info.args.arg0 = paged_mem_params->image_info.image_base; 451 bl_mem_params->ep_info.args.arg1 = 0; /* Unused */ 452 bl_mem_params->ep_info.args.arg2 = 0; /* No DT supported */ 453 } else { 454 #if !STM32MP_USE_STM32IMAGE 455 bl_mem_params->ep_info.pc = bl_mem_params->image_info.image_base; 456 tos_fw_mem_params = get_bl_mem_params_node(TOS_FW_CONFIG_ID); 457 bl_mem_params->image_info.image_max_size += 458 tos_fw_mem_params->image_info.image_max_size; 459 #endif /* !STM32MP_USE_STM32IMAGE */ 460 bl_mem_params->ep_info.args.arg0 = 0; 461 } 462 break; 463 464 case BL33_IMAGE_ID: 465 bl32_mem_params = get_bl_mem_params_node(BL32_IMAGE_ID); 466 assert(bl32_mem_params != NULL); 467 bl32_mem_params->ep_info.lr_svc = bl_mem_params->ep_info.pc; 468 break; 469 470 default: 471 /* Do nothing in default case */ 472 break; 473 } 474 475 #if STM32MP_SDMMC || STM32MP_EMMC 476 /* 477 * Invalidate remaining data read from MMC but not flushed by load_image_flush(). 478 * We take the worst case which is 2 MMC blocks. 479 */ 480 if ((image_id != FW_CONFIG_ID) && 481 ((bl_mem_params->image_info.h.attr & IMAGE_ATTRIB_SKIP_LOADING) == 0U)) { 482 inv_dcache_range(bl_mem_params->image_info.image_base + 483 bl_mem_params->image_info.image_size, 484 2U * MMC_BLOCK_SIZE); 485 } 486 #endif /* STM32MP_SDMMC || STM32MP_EMMC */ 487 488 return err; 489 } 490 491 void bl2_el3_plat_prepare_exit(void) 492 { 493 stm32mp1_security_setup(); 494 } 495