1 /* 2 * Copyright (c) 2016-2020, ARM Limited and Contributors. All rights reserved. 3 * 4 * SPDX-License-Identifier: BSD-3-Clause 5 */ 6 7 #include <assert.h> 8 9 #include <arch_helpers.h> 10 #include <common/bl_common.h> 11 #include <common/desc_image_load.h> 12 #include <common/tbbr/tbbr_img_def.h> 13 14 static bl_load_info_t bl_load_info; 15 static bl_params_t next_bl_params; 16 17 18 /******************************************************************************* 19 * This function flushes the data structures so that they are visible 20 * in memory for the next BL image. 21 ******************************************************************************/ 22 void flush_bl_params_desc(void) 23 { 24 flush_bl_params_desc_args(bl_mem_params_desc_ptr, 25 bl_mem_params_desc_num, 26 &next_bl_params); 27 } 28 29 /******************************************************************************* 30 * This function flushes the data structures specified as arguments so that they 31 * are visible in memory for the next BL image. 32 ******************************************************************************/ 33 void flush_bl_params_desc_args(bl_mem_params_node_t *mem_params_desc_ptr, 34 unsigned int mem_params_desc_num, 35 bl_params_t *next_bl_params_ptr) 36 { 37 assert(mem_params_desc_ptr != NULL); 38 assert(mem_params_desc_num != 0U); 39 assert(next_bl_params_ptr != NULL); 40 41 flush_dcache_range((uintptr_t)mem_params_desc_ptr, 42 sizeof(*mem_params_desc_ptr) * mem_params_desc_num); 43 44 flush_dcache_range((uintptr_t)next_bl_params_ptr, 45 sizeof(*next_bl_params_ptr)); 46 } 47 48 /******************************************************************************* 49 * This function returns the index for given image_id, within the 50 * image descriptor array provided by bl_image_info_descs_ptr, if the 51 * image is found else it returns -1. 52 ******************************************************************************/ 53 int get_bl_params_node_index(unsigned int image_id) 54 { 55 unsigned int index; 56 assert(image_id != INVALID_IMAGE_ID); 57 58 for (index = 0U; index < bl_mem_params_desc_num; index++) { 59 if (bl_mem_params_desc_ptr[index].image_id == image_id) 60 return (int)index; 61 } 62 63 return -1; 64 } 65 66 /******************************************************************************* 67 * This function returns the pointer to `bl_mem_params_node_t` object for 68 * given image_id, within the image descriptor array provided by 69 * bl_mem_params_desc_ptr, if the image is found else it returns NULL. 70 ******************************************************************************/ 71 bl_mem_params_node_t *get_bl_mem_params_node(unsigned int image_id) 72 { 73 int index; 74 assert(image_id != INVALID_IMAGE_ID); 75 76 index = get_bl_params_node_index(image_id); 77 if (index >= 0) 78 return &bl_mem_params_desc_ptr[index]; 79 else 80 return NULL; 81 } 82 83 /******************************************************************************* 84 * This function creates the list of loadable images, by populating and 85 * linking each `bl_load_info_node_t` type node, using the internal array 86 * of image descriptor provided by bl_mem_params_desc_ptr. It also populates 87 * and returns `bl_load_info_t` type structure that contains head of the list 88 * of loadable images. 89 ******************************************************************************/ 90 bl_load_info_t *get_bl_load_info_from_mem_params_desc(void) 91 { 92 unsigned int index = 0; 93 94 /* If there is no image to start with, return NULL */ 95 if (bl_mem_params_desc_num == 0U) 96 return NULL; 97 98 /* Assign initial data structures */ 99 bl_load_info_node_t *bl_node_info = 100 &bl_mem_params_desc_ptr[index].load_node_mem; 101 bl_load_info.head = bl_node_info; 102 SET_PARAM_HEAD(&bl_load_info, PARAM_BL_LOAD_INFO, VERSION_2, 0U); 103 104 /* Go through the image descriptor array and create the list */ 105 for (; index < bl_mem_params_desc_num; index++) { 106 107 /* Populate the image information */ 108 bl_node_info->image_id = bl_mem_params_desc_ptr[index].image_id; 109 bl_node_info->image_info = &bl_mem_params_desc_ptr[index].image_info; 110 111 /* Link next image if present */ 112 if ((index + 1U) < bl_mem_params_desc_num) { 113 /* Get the memory and link the next node */ 114 bl_node_info->next_load_info = 115 &bl_mem_params_desc_ptr[index + 1U].load_node_mem; 116 bl_node_info = bl_node_info->next_load_info; 117 } 118 } 119 120 return &bl_load_info; 121 } 122 123 /******************************************************************************* 124 * This function creates the list of executable images, by populating and 125 * linking each `bl_params_node_t` type node, using the internal array of 126 * image descriptor provided by bl_mem_params_desc_ptr. It also populates 127 * and returns `bl_params_t` type structure that contains head of the list 128 * of executable images. 129 ******************************************************************************/ 130 bl_params_t *get_next_bl_params_from_mem_params_desc(void) 131 { 132 unsigned int count; 133 unsigned int img_id = 0U; 134 unsigned int link_index = 0U; 135 bl_params_node_t *bl_current_exec_node = NULL; 136 bl_params_node_t *bl_last_exec_node = NULL; 137 bl_mem_params_node_t *desc_ptr; 138 139 /* If there is no image to start with, return NULL */ 140 if (bl_mem_params_desc_num == 0U) 141 return NULL; 142 143 /* Get the list HEAD */ 144 for (count = 0U; count < bl_mem_params_desc_num; count++) { 145 146 desc_ptr = &bl_mem_params_desc_ptr[count]; 147 148 if ((EP_GET_EXE(desc_ptr->ep_info.h.attr) == EXECUTABLE) && 149 (EP_GET_FIRST_EXE(desc_ptr->ep_info.h.attr) == EP_FIRST_EXE)) { 150 next_bl_params.head = &desc_ptr->params_node_mem; 151 link_index = count; 152 break; 153 } 154 } 155 156 /* Make sure we have a HEAD node */ 157 assert(next_bl_params.head != NULL); 158 159 /* Populate the HEAD information */ 160 SET_PARAM_HEAD(&next_bl_params, PARAM_BL_PARAMS, VERSION_2, 0U); 161 162 /* 163 * Go through the image descriptor array and create the list. 164 * This bounded loop is to make sure that we are not looping forever. 165 */ 166 for (count = 0U; count < bl_mem_params_desc_num; count++) { 167 168 desc_ptr = &bl_mem_params_desc_ptr[link_index]; 169 170 /* Make sure the image is executable */ 171 assert(EP_GET_EXE(desc_ptr->ep_info.h.attr) == EXECUTABLE); 172 173 /* Get the memory for current node */ 174 bl_current_exec_node = &desc_ptr->params_node_mem; 175 176 /* Populate the image information */ 177 bl_current_exec_node->image_id = desc_ptr->image_id; 178 bl_current_exec_node->image_info = &desc_ptr->image_info; 179 bl_current_exec_node->ep_info = &desc_ptr->ep_info; 180 181 if (bl_last_exec_node != NULL) { 182 /* Assert if loop detected */ 183 assert(bl_last_exec_node->next_params_info == NULL); 184 185 /* Link the previous node to the current one */ 186 bl_last_exec_node->next_params_info = bl_current_exec_node; 187 } 188 189 /* Update the last node */ 190 bl_last_exec_node = bl_current_exec_node; 191 192 /* If no next hand-off image then break out */ 193 img_id = desc_ptr->next_handoff_image_id; 194 if (img_id == INVALID_IMAGE_ID) 195 break; 196 197 /* Get the index for the next hand-off image */ 198 link_index = get_bl_params_node_index(img_id); 199 assert((link_index > 0U) && 200 (link_index < bl_mem_params_desc_num)); 201 } 202 203 /* Invalid image is expected to terminate the loop */ 204 assert(img_id == INVALID_IMAGE_ID); 205 206 return &next_bl_params; 207 } 208 209 /******************************************************************************* 210 * This function populates the entry point information with the corresponding 211 * config file for all executable BL images described in bl_params. 212 ******************************************************************************/ 213 void populate_next_bl_params_config(bl_params_t *bl2_to_next_bl_params) 214 { 215 bl_params_node_t *params_node; 216 unsigned int fw_config_id; 217 uintptr_t fw_config_base; 218 bl_mem_params_node_t *mem_params; 219 uintptr_t hw_config_base = 0; 220 221 assert(bl2_to_next_bl_params != NULL); 222 223 /* 224 * Get the `bl_mem_params_node_t` corresponding to HW_CONFIG 225 * if available. 226 */ 227 mem_params = get_bl_mem_params_node(HW_CONFIG_ID); 228 229 if (mem_params != NULL) 230 hw_config_base = mem_params->image_info.image_base; 231 232 for (params_node = bl2_to_next_bl_params->head; params_node != NULL; 233 params_node = params_node->next_params_info) { 234 235 fw_config_base = 0; 236 237 switch (params_node->image_id) { 238 case BL31_IMAGE_ID: 239 fw_config_id = SOC_FW_CONFIG_ID; 240 break; 241 case BL32_IMAGE_ID: 242 /* 243 * At the moment, OPTEE cannot accept a DTB in secure memory, 244 * so fall back and use NT_FW_CONFIG instead. 245 * This MUST be fixed as soon as OPTEE has support to 246 * receive DTBs in secure memory. 247 */ 248 #ifndef SPD_opteed 249 fw_config_id = TOS_FW_CONFIG_ID; 250 break; 251 #endif 252 case BL33_IMAGE_ID: 253 fw_config_id = NT_FW_CONFIG_ID; 254 break; 255 default: 256 fw_config_id = INVALID_IMAGE_ID; 257 break; 258 } 259 260 if (fw_config_id != INVALID_IMAGE_ID) { 261 mem_params = get_bl_mem_params_node(fw_config_id); 262 if (mem_params != NULL) { 263 fw_config_base = mem_params->image_info.image_base; 264 } 265 } 266 267 #ifdef SPD_opteed 268 /* 269 * If SPD_opteed is enabled, arg[0,2] are populated by 270 * parse_optee_header(), which is called by 271 * arm_bl2_handle_post_image_load(). The meaning of the 272 * arguments are: 273 * arg0 <-- MODE_RW 274 * arg1 <-- Paged image base 275 * arg2 <-- Paged image size 276 */ 277 if (params_node->image_id == BL32_IMAGE_ID) { 278 params_node->ep_info->args.arg3 = fw_config_base; 279 } else { 280 #endif 281 /* 282 * Pass hw and tb_fw config addresses to next images. 283 * NOTE - for EL3 runtime images (BL31 for AArch64 284 * and BL32 for AArch32), arg0 is already used by 285 * generic code. Take care of not overwriting the 286 * previous initialisations. 287 */ 288 if (params_node == bl2_to_next_bl_params->head) { 289 if (params_node->ep_info->args.arg1 == 0U) 290 params_node->ep_info->args.arg1 = 291 fw_config_base; 292 if (params_node->ep_info->args.arg2 == 0U) 293 params_node->ep_info->args.arg2 = 294 hw_config_base; 295 } else { 296 if (params_node->ep_info->args.arg0 == 0U) 297 params_node->ep_info->args.arg0 = 298 fw_config_base; 299 if (params_node->ep_info->args.arg1 == 0U) 300 params_node->ep_info->args.arg1 = 301 hw_config_base; 302 } 303 #ifdef SPD_opteed 304 } 305 #endif 306 } 307 } 308 309 /******************************************************************************* 310 * Helper to extract BL32/BL33 entry point info from arg0 passed to BL31, for 311 * platforms that are only interested in those. Platforms that need to extract 312 * more information can parse the structures themselves. 313 ******************************************************************************/ 314 315 void bl31_params_parse_helper(u_register_t param, 316 entry_point_info_t *bl32_ep_info_out, 317 entry_point_info_t *bl33_ep_info_out) 318 { 319 bl_params_node_t *node; 320 bl_params_t *v2 = (void *)(uintptr_t)param; 321 322 #if !ERROR_DEPRECATED 323 if (v2->h.version == PARAM_VERSION_1) { 324 struct { /* Deprecated version 1 parameter structure. */ 325 param_header_t h; 326 image_info_t *bl31_image_info; 327 entry_point_info_t *bl32_ep_info; 328 image_info_t *bl32_image_info; 329 entry_point_info_t *bl33_ep_info; 330 image_info_t *bl33_image_info; 331 } *v1 = (void *)(uintptr_t)param; 332 assert(v1->h.type == PARAM_BL31); 333 if (bl32_ep_info_out != NULL) 334 *bl32_ep_info_out = *v1->bl32_ep_info; 335 if (bl33_ep_info_out != NULL) 336 *bl33_ep_info_out = *v1->bl33_ep_info; 337 return; 338 } 339 #endif /* !ERROR_DEPRECATED */ 340 341 assert(v2->h.version == PARAM_VERSION_2); 342 assert(v2->h.type == PARAM_BL_PARAMS); 343 for (node = v2->head; node != NULL; node = node->next_params_info) { 344 if (node->image_id == BL32_IMAGE_ID) 345 if (bl32_ep_info_out != NULL) 346 *bl32_ep_info_out = *node->ep_info; 347 if (node->image_id == BL33_IMAGE_ID) 348 if (bl33_ep_info_out != NULL) 349 *bl33_ep_info_out = *node->ep_info; 350 } 351 } 352