mbed library sources. Supersedes mbed-src.

Dependents:   Nucleo_Hello_Encoder BLE_iBeaconScan AM1805_DEMO DISCO-F429ZI_ExportTemplate1 ... more

Committer:
AnnaBridge
Date:
Thu Nov 08 11:46:34 2018 +0000
Revision:
188:bcfe06ba3d64
Parent:
187:0387e8f68319
Child:
189:f392fc9709a3
mbed-dev library. Release version 164

Who changed what in which revision?

UserRevisionLine numberNew contents of line
<> 149:156823d33999 1 /* mbed Microcontroller Library
<> 149:156823d33999 2 * Copyright (c) 2006-2013 ARM Limited
<> 149:156823d33999 3 *
<> 149:156823d33999 4 * Licensed under the Apache License, Version 2.0 (the "License");
<> 149:156823d33999 5 * you may not use this file except in compliance with the License.
<> 149:156823d33999 6 * You may obtain a copy of the License at
<> 149:156823d33999 7 *
<> 149:156823d33999 8 * http://www.apache.org/licenses/LICENSE-2.0
<> 149:156823d33999 9 *
<> 149:156823d33999 10 * Unless required by applicable law or agreed to in writing, software
<> 149:156823d33999 11 * distributed under the License is distributed on an "AS IS" BASIS,
<> 149:156823d33999 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
<> 149:156823d33999 13 * See the License for the specific language governing permissions and
<> 149:156823d33999 14 * limitations under the License.
<> 149:156823d33999 15 */
<> 149:156823d33999 16 #include <stdlib.h>
<> 149:156823d33999 17 #include <stdarg.h>
Anna Bridge 186:707f6e361f3e 18 #include <string.h>
<> 149:156823d33999 19 #include "device.h"
Anna Bridge 186:707f6e361f3e 20 #include "platform/mbed_critical.h"
<> 149:156823d33999 21 #include "platform/mbed_error.h"
Anna Bridge 186:707f6e361f3e 22 #include "platform/mbed_error_hist.h"
<> 149:156823d33999 23 #include "platform/mbed_interface.h"
AnnaBridge 187:0387e8f68319 24 #ifdef MBED_CONF_RTOS_PRESENT
Anna Bridge 186:707f6e361f3e 25 #include "rtx_os.h"
Anna Bridge 186:707f6e361f3e 26 #endif
Anna Bridge 186:707f6e361f3e 27
<> 149:156823d33999 28 #if DEVICE_STDIO_MESSAGES
<> 149:156823d33999 29 #include <stdio.h>
<> 149:156823d33999 30 #endif
<> 149:156823d33999 31
Anna Bridge 186:707f6e361f3e 32 //Helper macro to get the current SP
Anna Bridge 186:707f6e361f3e 33 #define GET_CURRENT_SP(sp) \
Anna Bridge 186:707f6e361f3e 34 { \
Anna Bridge 186:707f6e361f3e 35 /*If in Handler mode we are always using MSP*/ \
AnnaBridge 187:0387e8f68319 36 if ( __get_IPSR() != 0U ) { \
Anna Bridge 186:707f6e361f3e 37 sp = __get_MSP(); \
Anna Bridge 186:707f6e361f3e 38 } else { \
Anna Bridge 186:707f6e361f3e 39 /*Look into CONTROL.SPSEL value*/ \
Anna Bridge 186:707f6e361f3e 40 if ((__get_CONTROL() & 2U) == 0U) { \
Anna Bridge 186:707f6e361f3e 41 sp = __get_MSP();/*Read MSP*/ \
Anna Bridge 186:707f6e361f3e 42 } else { \
Anna Bridge 186:707f6e361f3e 43 sp = __get_PSP();/*Read PSP*/ \
Anna Bridge 186:707f6e361f3e 44 } \
Anna Bridge 186:707f6e361f3e 45 } \
AnnaBridge 187:0387e8f68319 46 }
Anna Bridge 186:707f6e361f3e 47
AnnaBridge 187:0387e8f68319 48 #ifndef NDEBUG
AnnaBridge 187:0387e8f68319 49 #define ERROR_REPORT(ctx, error_msg) print_error_report(ctx, error_msg)
AnnaBridge 187:0387e8f68319 50 #else
AnnaBridge 187:0387e8f68319 51 #define ERROR_REPORT(ctx, error_msg) ((void) 0)
AnnaBridge 187:0387e8f68319 52 #endif
Anna Bridge 186:707f6e361f3e 53
AnnaBridge 167:e84263d55307 54 static uint8_t error_in_progress = 0;
Anna Bridge 186:707f6e361f3e 55 static int error_count = 0;
Anna Bridge 186:707f6e361f3e 56 static mbed_error_ctx first_error_ctx = {0};
Anna Bridge 186:707f6e361f3e 57 static mbed_error_ctx last_error_ctx = {0};
Anna Bridge 186:707f6e361f3e 58 static mbed_error_hook_t error_hook = NULL;
Anna Bridge 186:707f6e361f3e 59 static void print_error_report(mbed_error_ctx *ctx, const char *);
AnnaBridge 187:0387e8f68319 60 static mbed_error_status_t handle_error(mbed_error_status_t error_status, unsigned int error_value, const char *filename, int line_number, void *caller);
Anna Bridge 186:707f6e361f3e 61
Anna Bridge 186:707f6e361f3e 62 //Helper function to halt the system
Anna Bridge 186:707f6e361f3e 63 static void mbed_halt_system(void)
Anna Bridge 186:707f6e361f3e 64 {
Anna Bridge 186:707f6e361f3e 65 //If not in ISR context exit, otherwise spin on WFI
Anna Bridge 186:707f6e361f3e 66 if (core_util_is_isr_active() || !core_util_are_interrupts_enabled()) {
AnnaBridge 187:0387e8f68319 67 for (;;) {
AnnaBridge 187:0387e8f68319 68 __WFI();
Anna Bridge 186:707f6e361f3e 69 }
Anna Bridge 186:707f6e361f3e 70 } else {
Anna Bridge 186:707f6e361f3e 71 //exit eventually calls mbed_die
Anna Bridge 186:707f6e361f3e 72 exit(1);
Anna Bridge 186:707f6e361f3e 73 }
Anna Bridge 186:707f6e361f3e 74 }
AnnaBridge 167:e84263d55307 75
AnnaBridge 187:0387e8f68319 76 WEAK void error(const char *format, ...)
AnnaBridge 187:0387e8f68319 77 {
AnnaBridge 167:e84263d55307 78
AnnaBridge 167:e84263d55307 79 // Prevent recursion if error is called again
AnnaBridge 167:e84263d55307 80 if (error_in_progress) {
AnnaBridge 167:e84263d55307 81 return;
AnnaBridge 167:e84263d55307 82 }
AnnaBridge 187:0387e8f68319 83
Anna Bridge 186:707f6e361f3e 84 //Call handle_error/print_error_report permanently setting error_in_progress flag
AnnaBridge 187:0387e8f68319 85 handle_error(MBED_ERROR_UNKNOWN, 0, NULL, 0, MBED_CALLER_ADDR());
AnnaBridge 187:0387e8f68319 86 ERROR_REPORT(&last_error_ctx, "Fatal Run-time error");
AnnaBridge 167:e84263d55307 87 error_in_progress = 1;
AnnaBridge 167:e84263d55307 88
<> 149:156823d33999 89 #ifndef NDEBUG
<> 149:156823d33999 90 va_list arg;
<> 149:156823d33999 91 va_start(arg, format);
<> 149:156823d33999 92 mbed_error_vfprintf(format, arg);
<> 149:156823d33999 93 va_end(arg);
<> 149:156823d33999 94 #endif
<> 149:156823d33999 95 exit(1);
<> 149:156823d33999 96 }
Anna Bridge 186:707f6e361f3e 97
Anna Bridge 186:707f6e361f3e 98 //Set an error status with the error handling system
AnnaBridge 187:0387e8f68319 99 static mbed_error_status_t handle_error(mbed_error_status_t error_status, unsigned int error_value, const char *filename, int line_number, void *caller)
Anna Bridge 186:707f6e361f3e 100 {
Anna Bridge 186:707f6e361f3e 101 mbed_error_ctx current_error_ctx;
AnnaBridge 187:0387e8f68319 102
Anna Bridge 186:707f6e361f3e 103 //Error status should always be < 0
AnnaBridge 187:0387e8f68319 104 if (error_status >= 0) {
Anna Bridge 186:707f6e361f3e 105 //This is a weird situation, someone called mbed_error with invalid error code.
Anna Bridge 186:707f6e361f3e 106 //We will still handle the situation but change the error code to ERROR_INVALID_ARGUMENT, atleast the context will have info on who called it
Anna Bridge 186:707f6e361f3e 107 error_status = MBED_ERROR_INVALID_ARGUMENT;
Anna Bridge 186:707f6e361f3e 108 }
AnnaBridge 187:0387e8f68319 109
Anna Bridge 186:707f6e361f3e 110 //Prevent corruption by holding out other callers
Anna Bridge 186:707f6e361f3e 111 //and we also need this until we remove the "error" call completely
Anna Bridge 186:707f6e361f3e 112 while (error_in_progress == 1);
AnnaBridge 187:0387e8f68319 113
Anna Bridge 186:707f6e361f3e 114 //Use critsect here, as we don't want inadvertant modification of this global variable
Anna Bridge 186:707f6e361f3e 115 core_util_critical_section_enter();
Anna Bridge 186:707f6e361f3e 116 error_in_progress = 1;
Anna Bridge 186:707f6e361f3e 117 core_util_critical_section_exit();
AnnaBridge 187:0387e8f68319 118
Anna Bridge 186:707f6e361f3e 119 //Increment error count
Anna Bridge 186:707f6e361f3e 120 error_count++;
AnnaBridge 187:0387e8f68319 121
Anna Bridge 186:707f6e361f3e 122 //Clear the context capturing buffer
AnnaBridge 188:bcfe06ba3d64 123 memset(&current_error_ctx, 0, sizeof(mbed_error_ctx));
Anna Bridge 186:707f6e361f3e 124 //Capture error information
Anna Bridge 186:707f6e361f3e 125 current_error_ctx.error_status = error_status;
AnnaBridge 187:0387e8f68319 126 current_error_ctx.error_address = (uint32_t)caller;
Anna Bridge 186:707f6e361f3e 127 current_error_ctx.error_value = error_value;
AnnaBridge 187:0387e8f68319 128 #ifdef MBED_CONF_RTOS_PRESENT
Anna Bridge 186:707f6e361f3e 129 //Capture thread info
Anna Bridge 186:707f6e361f3e 130 osRtxThread_t *current_thread = osRtxInfo.thread.run.curr;
Anna Bridge 186:707f6e361f3e 131 current_error_ctx.thread_id = (uint32_t)current_thread;
Anna Bridge 186:707f6e361f3e 132 current_error_ctx.thread_entry_address = (uint32_t)current_thread->thread_addr;
Anna Bridge 186:707f6e361f3e 133 current_error_ctx.thread_stack_size = current_thread->stack_size;
Anna Bridge 186:707f6e361f3e 134 current_error_ctx.thread_stack_mem = (uint32_t)current_thread->stack_mem;
AnnaBridge 187:0387e8f68319 135 #ifdef TARGET_CORTEX_M
Anna Bridge 186:707f6e361f3e 136 GET_CURRENT_SP(current_error_ctx.thread_current_sp);
Anna Bridge 186:707f6e361f3e 137 #endif //TARGET_CORTEX_M
AnnaBridge 187:0387e8f68319 138
Anna Bridge 186:707f6e361f3e 139 #endif //MBED_CONF_RTOS_PRESENT
Anna Bridge 186:707f6e361f3e 140
AnnaBridge 187:0387e8f68319 141 #if MBED_CONF_PLATFORM_ERROR_FILENAME_CAPTURE_ENABLED
Anna Bridge 186:707f6e361f3e 142 //Capture filename/linenumber if provided
Anna Bridge 186:707f6e361f3e 143 //Index for tracking error_filename
AnnaBridge 187:0387e8f68319 144 memset(&current_error_ctx.error_filename, 0, MBED_CONF_PLATFORM_MAX_ERROR_FILENAME_LEN);
AnnaBridge 187:0387e8f68319 145 strncpy(current_error_ctx.error_filename, filename, MBED_CONF_PLATFORM_MAX_ERROR_FILENAME_LEN);
Anna Bridge 186:707f6e361f3e 146 current_error_ctx.error_line_number = line_number;
Anna Bridge 186:707f6e361f3e 147 #endif
AnnaBridge 187:0387e8f68319 148
Anna Bridge 186:707f6e361f3e 149 //Capture the fist system error and store it
AnnaBridge 187:0387e8f68319 150 if (error_count == 1) { //first error
Anna Bridge 186:707f6e361f3e 151 memcpy(&first_error_ctx, &current_error_ctx, sizeof(mbed_error_ctx));
Anna Bridge 186:707f6e361f3e 152 }
AnnaBridge 187:0387e8f68319 153
Anna Bridge 186:707f6e361f3e 154 //copy this error to last error
Anna Bridge 186:707f6e361f3e 155 memcpy(&last_error_ctx, &current_error_ctx, sizeof(mbed_error_ctx));
AnnaBridge 187:0387e8f68319 156
AnnaBridge 187:0387e8f68319 157 #if MBED_CONF_PLATFORM_ERROR_HIST_ENABLED
Anna Bridge 186:707f6e361f3e 158 //Log the error with error log
Anna Bridge 186:707f6e361f3e 159 mbed_error_hist_put(&current_error_ctx);
AnnaBridge 187:0387e8f68319 160 #endif
AnnaBridge 187:0387e8f68319 161
Anna Bridge 186:707f6e361f3e 162 //Call the error hook if available
AnnaBridge 187:0387e8f68319 163 if (error_hook != NULL) {
Anna Bridge 186:707f6e361f3e 164 error_hook(&last_error_ctx);
Anna Bridge 186:707f6e361f3e 165 }
AnnaBridge 187:0387e8f68319 166
Anna Bridge 186:707f6e361f3e 167 error_in_progress = 0;
AnnaBridge 187:0387e8f68319 168
Anna Bridge 186:707f6e361f3e 169 return MBED_SUCCESS;
Anna Bridge 186:707f6e361f3e 170 }
Anna Bridge 186:707f6e361f3e 171
Anna Bridge 186:707f6e361f3e 172 //Return the first error
AnnaBridge 187:0387e8f68319 173 mbed_error_status_t mbed_get_first_error(void)
Anna Bridge 186:707f6e361f3e 174 {
Anna Bridge 186:707f6e361f3e 175 //return the first error recorded
Anna Bridge 186:707f6e361f3e 176 return first_error_ctx.error_status;
Anna Bridge 186:707f6e361f3e 177 }
Anna Bridge 186:707f6e361f3e 178
Anna Bridge 186:707f6e361f3e 179 //Return the last error
AnnaBridge 187:0387e8f68319 180 mbed_error_status_t mbed_get_last_error(void)
Anna Bridge 186:707f6e361f3e 181 {
Anna Bridge 186:707f6e361f3e 182 //return the last error recorded
Anna Bridge 186:707f6e361f3e 183 return last_error_ctx.error_status;
Anna Bridge 186:707f6e361f3e 184 }
Anna Bridge 186:707f6e361f3e 185
Anna Bridge 186:707f6e361f3e 186 //Gets the current error count
AnnaBridge 187:0387e8f68319 187 int mbed_get_error_count(void)
Anna Bridge 186:707f6e361f3e 188 {
Anna Bridge 186:707f6e361f3e 189 //return the current error count
Anna Bridge 186:707f6e361f3e 190 return error_count;
Anna Bridge 186:707f6e361f3e 191 }
Anna Bridge 186:707f6e361f3e 192
AnnaBridge 187:0387e8f68319 193 //Sets a fatal error
AnnaBridge 187:0387e8f68319 194 mbed_error_status_t mbed_warning(mbed_error_status_t error_status, const char *error_msg, unsigned int error_value, const char *filename, int line_number)
Anna Bridge 186:707f6e361f3e 195 {
AnnaBridge 187:0387e8f68319 196 return handle_error(error_status, error_value, filename, line_number, MBED_CALLER_ADDR());
Anna Bridge 186:707f6e361f3e 197 }
Anna Bridge 186:707f6e361f3e 198
AnnaBridge 187:0387e8f68319 199 //Sets a fatal error, this function is marked WEAK to be able to override this for some tests
AnnaBridge 187:0387e8f68319 200 WEAK mbed_error_status_t mbed_error(mbed_error_status_t error_status, const char *error_msg, unsigned int error_value, const char *filename, int line_number)
Anna Bridge 186:707f6e361f3e 201 {
Anna Bridge 186:707f6e361f3e 202 //set the error reported and then halt the system
AnnaBridge 187:0387e8f68319 203 if (MBED_SUCCESS != handle_error(error_status, error_value, filename, line_number, MBED_CALLER_ADDR())) {
Anna Bridge 186:707f6e361f3e 204 return MBED_ERROR_FAILED_OPERATION;
AnnaBridge 187:0387e8f68319 205 }
AnnaBridge 187:0387e8f68319 206
Anna Bridge 186:707f6e361f3e 207 //On fatal errors print the error context/report
AnnaBridge 187:0387e8f68319 208 ERROR_REPORT(&last_error_ctx, error_msg);
Anna Bridge 186:707f6e361f3e 209 mbed_halt_system();
AnnaBridge 187:0387e8f68319 210
Anna Bridge 186:707f6e361f3e 211 return MBED_ERROR_FAILED_OPERATION;
Anna Bridge 186:707f6e361f3e 212 }
Anna Bridge 186:707f6e361f3e 213
Anna Bridge 186:707f6e361f3e 214 //Register an application defined callback with error handling
AnnaBridge 187:0387e8f68319 215 mbed_error_status_t mbed_set_error_hook(mbed_error_hook_t error_hook_in)
Anna Bridge 186:707f6e361f3e 216 {
Anna Bridge 186:707f6e361f3e 217 //register the new hook/callback
AnnaBridge 187:0387e8f68319 218 if (error_hook_in != NULL) {
Anna Bridge 186:707f6e361f3e 219 error_hook = error_hook_in;
Anna Bridge 186:707f6e361f3e 220 return MBED_SUCCESS;
AnnaBridge 187:0387e8f68319 221 }
AnnaBridge 187:0387e8f68319 222
Anna Bridge 186:707f6e361f3e 223 return MBED_ERROR_INVALID_ARGUMENT;
Anna Bridge 186:707f6e361f3e 224 }
Anna Bridge 186:707f6e361f3e 225
AnnaBridge 187:0387e8f68319 226 //Retrieve the first error context from error log
AnnaBridge 187:0387e8f68319 227 mbed_error_status_t mbed_get_first_error_info(mbed_error_ctx *error_info)
Anna Bridge 186:707f6e361f3e 228 {
Anna Bridge 186:707f6e361f3e 229 memcpy(error_info, &first_error_ctx, sizeof(first_error_ctx));
Anna Bridge 186:707f6e361f3e 230 return MBED_SUCCESS;
Anna Bridge 186:707f6e361f3e 231 }
Anna Bridge 186:707f6e361f3e 232
AnnaBridge 187:0387e8f68319 233 //Retrieve the last error context from error log
AnnaBridge 187:0387e8f68319 234 mbed_error_status_t mbed_get_last_error_info(mbed_error_ctx *error_info)
Anna Bridge 186:707f6e361f3e 235 {
Anna Bridge 186:707f6e361f3e 236 memcpy(error_info, &last_error_ctx, sizeof(mbed_error_ctx));
Anna Bridge 186:707f6e361f3e 237 return MBED_SUCCESS;
Anna Bridge 186:707f6e361f3e 238 }
Anna Bridge 186:707f6e361f3e 239
Anna Bridge 186:707f6e361f3e 240 //Makes an mbed_error_status_t value
AnnaBridge 187:0387e8f68319 241 mbed_error_status_t mbed_make_error(mbed_error_type_t error_type, mbed_module_type_t entity, mbed_error_code_t error_code)
Anna Bridge 186:707f6e361f3e 242 {
AnnaBridge 187:0387e8f68319 243 switch (error_type) {
Anna Bridge 186:707f6e361f3e 244 case MBED_ERROR_TYPE_POSIX:
AnnaBridge 187:0387e8f68319 245 if (error_code >= MBED_POSIX_ERROR_BASE && error_code <= MBED_SYSTEM_ERROR_BASE) {
Anna Bridge 186:707f6e361f3e 246 return -error_code;
AnnaBridge 187:0387e8f68319 247 }
Anna Bridge 186:707f6e361f3e 248 break;
AnnaBridge 187:0387e8f68319 249
Anna Bridge 186:707f6e361f3e 250 case MBED_ERROR_TYPE_SYSTEM:
AnnaBridge 187:0387e8f68319 251 if (error_code >= MBED_SYSTEM_ERROR_BASE && error_code <= MBED_CUSTOM_ERROR_BASE) {
Anna Bridge 186:707f6e361f3e 252 return MAKE_MBED_ERROR(MBED_ERROR_TYPE_SYSTEM, entity, error_code);
AnnaBridge 187:0387e8f68319 253 }
Anna Bridge 186:707f6e361f3e 254 break;
AnnaBridge 187:0387e8f68319 255
Anna Bridge 186:707f6e361f3e 256 case MBED_ERROR_TYPE_CUSTOM:
AnnaBridge 187:0387e8f68319 257 if (error_code >= MBED_CUSTOM_ERROR_BASE) {
Anna Bridge 186:707f6e361f3e 258 return MAKE_MBED_ERROR(MBED_ERROR_TYPE_CUSTOM, entity, error_code);
AnnaBridge 187:0387e8f68319 259 }
Anna Bridge 186:707f6e361f3e 260 break;
AnnaBridge 187:0387e8f68319 261
Anna Bridge 186:707f6e361f3e 262 default:
Anna Bridge 186:707f6e361f3e 263 break;
Anna Bridge 186:707f6e361f3e 264 }
AnnaBridge 187:0387e8f68319 265
Anna Bridge 186:707f6e361f3e 266 //If we are passed incorrect values return a generic system error
Anna Bridge 186:707f6e361f3e 267 return MAKE_MBED_ERROR(MBED_ERROR_TYPE_SYSTEM, MBED_MODULE_UNKNOWN, MBED_ERROR_CODE_UNKNOWN);
Anna Bridge 186:707f6e361f3e 268 }
Anna Bridge 186:707f6e361f3e 269
Anna Bridge 186:707f6e361f3e 270 /**
Anna Bridge 186:707f6e361f3e 271 * Clears all the last error, error count and all entries in the error log.
Anna Bridge 186:707f6e361f3e 272 * @return 0 or MBED_SUCCESS on success.
Anna Bridge 186:707f6e361f3e 273 *
Anna Bridge 186:707f6e361f3e 274 */
AnnaBridge 187:0387e8f68319 275 mbed_error_status_t mbed_clear_all_errors(void)
Anna Bridge 186:707f6e361f3e 276 {
Anna Bridge 186:707f6e361f3e 277 mbed_error_status_t status = MBED_SUCCESS;
AnnaBridge 187:0387e8f68319 278
Anna Bridge 186:707f6e361f3e 279 //Make sure we dont multiple clients resetting
Anna Bridge 186:707f6e361f3e 280 core_util_critical_section_enter();
Anna Bridge 186:707f6e361f3e 281 //Clear the error and context capturing buffer
AnnaBridge 188:bcfe06ba3d64 282 memset(&last_error_ctx, 0, sizeof(mbed_error_ctx));
Anna Bridge 186:707f6e361f3e 283 //reset error count to 0
Anna Bridge 186:707f6e361f3e 284 error_count = 0;
AnnaBridge 187:0387e8f68319 285 #if MBED_CONF_PLATFORM_ERROR_HIST_ENABLED
Anna Bridge 186:707f6e361f3e 286 status = mbed_error_hist_reset();
Anna Bridge 186:707f6e361f3e 287 #endif
Anna Bridge 186:707f6e361f3e 288 core_util_critical_section_exit();
AnnaBridge 187:0387e8f68319 289
Anna Bridge 186:707f6e361f3e 290 return status;
Anna Bridge 186:707f6e361f3e 291 }
Anna Bridge 186:707f6e361f3e 292
AnnaBridge 187:0387e8f68319 293 #if MBED_CONF_PLATFORM_ERROR_ALL_THREADS_INFO && defined(MBED_CONF_RTOS_PRESENT)
AnnaBridge 187:0387e8f68319 294 /* Prints info of a thread(using osRtxThread_t struct)*/
AnnaBridge 187:0387e8f68319 295 static void print_thread(osRtxThread_t *thread)
AnnaBridge 187:0387e8f68319 296 {
AnnaBridge 187:0387e8f68319 297 mbed_error_printf("\nState: 0x%08X Entry: 0x%08X Stack Size: 0x%08X Mem: 0x%08X SP: 0x%08X", thread->state, thread->thread_addr, thread->stack_size, (uint32_t)thread->stack_mem, thread->sp);
AnnaBridge 187:0387e8f68319 298 }
AnnaBridge 187:0387e8f68319 299
AnnaBridge 187:0387e8f68319 300 /* Prints thread info from a list */
AnnaBridge 187:0387e8f68319 301 static void print_threads_info(osRtxThread_t *threads)
AnnaBridge 187:0387e8f68319 302 {
AnnaBridge 187:0387e8f68319 303 while (threads != NULL) {
AnnaBridge 187:0387e8f68319 304 print_thread(threads);
AnnaBridge 187:0387e8f68319 305 threads = threads->thread_next;
AnnaBridge 187:0387e8f68319 306 }
AnnaBridge 187:0387e8f68319 307 }
AnnaBridge 187:0387e8f68319 308 #endif
AnnaBridge 187:0387e8f68319 309
AnnaBridge 187:0387e8f68319 310 #ifndef NDEBUG
AnnaBridge 187:0387e8f68319 311 static void print_error_report(mbed_error_ctx *ctx, const char *error_msg)
AnnaBridge 187:0387e8f68319 312 {
AnnaBridge 187:0387e8f68319 313 uint32_t error_code = MBED_GET_ERROR_CODE(ctx->error_status);
AnnaBridge 187:0387e8f68319 314 uint32_t error_module = MBED_GET_ERROR_MODULE(ctx->error_status);
AnnaBridge 187:0387e8f68319 315
AnnaBridge 187:0387e8f68319 316 mbed_error_printf("\n\n++ MbedOS Error Info ++\nError Status: 0x%X Code: %d Module: %d\nError Message: ", ctx->error_status, error_code, error_module);
AnnaBridge 187:0387e8f68319 317
AnnaBridge 187:0387e8f68319 318 switch (error_code) {
AnnaBridge 187:0387e8f68319 319 //These are errors reported by kernel handled from mbed_rtx_handlers
AnnaBridge 187:0387e8f68319 320 case MBED_ERROR_CODE_RTOS_EVENT:
AnnaBridge 187:0387e8f68319 321 mbed_error_printf("Kernel Error: 0x%X, ", ctx->error_value);
AnnaBridge 187:0387e8f68319 322 break;
AnnaBridge 187:0387e8f68319 323
AnnaBridge 187:0387e8f68319 324 case MBED_ERROR_CODE_RTOS_THREAD_EVENT:
AnnaBridge 187:0387e8f68319 325 mbed_error_printf("Thread: 0x%X, ", ctx->error_value);
AnnaBridge 187:0387e8f68319 326 break;
AnnaBridge 187:0387e8f68319 327
AnnaBridge 187:0387e8f68319 328 case MBED_ERROR_CODE_RTOS_MUTEX_EVENT:
AnnaBridge 187:0387e8f68319 329 mbed_error_printf("Mutex: 0x%X, ", ctx->error_value);
AnnaBridge 187:0387e8f68319 330 break;
AnnaBridge 187:0387e8f68319 331
AnnaBridge 187:0387e8f68319 332 case MBED_ERROR_CODE_RTOS_SEMAPHORE_EVENT:
AnnaBridge 187:0387e8f68319 333 mbed_error_printf("Semaphore: 0x%X, ", ctx->error_value);
AnnaBridge 187:0387e8f68319 334 break;
AnnaBridge 187:0387e8f68319 335
AnnaBridge 187:0387e8f68319 336 case MBED_ERROR_CODE_RTOS_MEMORY_POOL_EVENT:
AnnaBridge 187:0387e8f68319 337 mbed_error_printf("MemoryPool: 0x%X, ", ctx->error_value);
AnnaBridge 187:0387e8f68319 338 break;
AnnaBridge 187:0387e8f68319 339
AnnaBridge 187:0387e8f68319 340 case MBED_ERROR_CODE_RTOS_EVENT_FLAGS_EVENT:
AnnaBridge 187:0387e8f68319 341 mbed_error_printf("EventFlags: 0x%X, ", ctx->error_value);
AnnaBridge 187:0387e8f68319 342 break;
AnnaBridge 187:0387e8f68319 343
AnnaBridge 187:0387e8f68319 344 case MBED_ERROR_CODE_RTOS_TIMER_EVENT:
AnnaBridge 187:0387e8f68319 345 mbed_error_printf("Timer: 0x%X, ", ctx->error_value);
AnnaBridge 187:0387e8f68319 346 break;
AnnaBridge 187:0387e8f68319 347
AnnaBridge 187:0387e8f68319 348 case MBED_ERROR_CODE_RTOS_MESSAGE_QUEUE_EVENT:
AnnaBridge 187:0387e8f68319 349 mbed_error_printf("MessageQueue: 0x%X, ", ctx->error_value);
AnnaBridge 187:0387e8f68319 350 break;
AnnaBridge 187:0387e8f68319 351
AnnaBridge 187:0387e8f68319 352 default:
AnnaBridge 187:0387e8f68319 353 //Nothing to do here, just print the error info down
AnnaBridge 187:0387e8f68319 354 break;
AnnaBridge 187:0387e8f68319 355 }
AnnaBridge 187:0387e8f68319 356 mbed_error_printf(error_msg);
AnnaBridge 187:0387e8f68319 357 mbed_error_printf("\nLocation: 0x%X", ctx->error_address);
AnnaBridge 187:0387e8f68319 358
AnnaBridge 187:0387e8f68319 359 #if MBED_CONF_PLATFORM_ERROR_FILENAME_CAPTURE_ENABLED && !defined(NDEBUG)
AnnaBridge 187:0387e8f68319 360 if ((NULL != ctx->error_filename[0]) && (ctx->error_line_number != 0)) {
AnnaBridge 187:0387e8f68319 361 //for string, we must pass address of a ptr which has the address of the string
AnnaBridge 187:0387e8f68319 362 mbed_error_printf("\nFile:%s+%d", ctx->error_filename, ctx->error_line_number);
AnnaBridge 187:0387e8f68319 363 }
AnnaBridge 187:0387e8f68319 364 #endif
AnnaBridge 187:0387e8f68319 365
AnnaBridge 187:0387e8f68319 366 mbed_error_printf("\nError Value: 0x%X", ctx->error_value);
AnnaBridge 187:0387e8f68319 367 #ifdef TARGET_CORTEX_M
AnnaBridge 187:0387e8f68319 368 mbed_error_printf("\nCurrent Thread: Id: 0x%X Entry: 0x%X StackSize: 0x%X StackMem: 0x%X SP: 0x%X ",
AnnaBridge 187:0387e8f68319 369 ctx->thread_id, ctx->thread_entry_address, ctx->thread_stack_size, ctx->thread_stack_mem, ctx->thread_current_sp);
AnnaBridge 187:0387e8f68319 370 #else
AnnaBridge 187:0387e8f68319 371 //For Cortex-A targets we dont have support to capture the current SP
AnnaBridge 187:0387e8f68319 372 mbed_error_printf("\nCurrent Thread: Id: 0x%X Entry: 0x%X StackSize: 0x%X StackMem: 0x%X ",
AnnaBridge 187:0387e8f68319 373 ctx->thread_id, ctx->thread_entry_address, ctx->thread_stack_size, ctx->thread_stack_mem);
AnnaBridge 187:0387e8f68319 374 #endif //TARGET_CORTEX_M
AnnaBridge 187:0387e8f68319 375
AnnaBridge 187:0387e8f68319 376 #if MBED_CONF_PLATFORM_ERROR_ALL_THREADS_INFO && defined(MBED_CONF_RTOS_PRESENT)
AnnaBridge 187:0387e8f68319 377 mbed_error_printf("\nNext:");
AnnaBridge 187:0387e8f68319 378 print_thread(osRtxInfo.thread.run.next);
AnnaBridge 187:0387e8f68319 379
AnnaBridge 187:0387e8f68319 380 mbed_error_printf("\nWait:");
AnnaBridge 187:0387e8f68319 381 osRtxThread_t *threads = (osRtxThread_t *)&osRtxInfo.thread.wait_list;
AnnaBridge 187:0387e8f68319 382 print_threads_info(threads);
AnnaBridge 187:0387e8f68319 383
AnnaBridge 187:0387e8f68319 384 mbed_error_printf("\nDelay:");
AnnaBridge 187:0387e8f68319 385 threads = (osRtxThread_t *)&osRtxInfo.thread.delay_list;
AnnaBridge 187:0387e8f68319 386 print_threads_info(threads);
AnnaBridge 187:0387e8f68319 387
AnnaBridge 187:0387e8f68319 388 mbed_error_printf("\nIdle:");
AnnaBridge 187:0387e8f68319 389 threads = (osRtxThread_t *)&osRtxInfo.thread.idle;
AnnaBridge 187:0387e8f68319 390 print_threads_info(threads);
AnnaBridge 187:0387e8f68319 391 #endif
AnnaBridge 188:bcfe06ba3d64 392 mbed_error_printf(MBED_CONF_PLATFORM_ERROR_DECODE_HTTP_URL_STR, ctx->error_status);
AnnaBridge 187:0387e8f68319 393 mbed_error_printf("\n-- MbedOS Error Info --\n");
AnnaBridge 187:0387e8f68319 394 }
AnnaBridge 187:0387e8f68319 395 #endif //ifndef NDEBUG
AnnaBridge 187:0387e8f68319 396
AnnaBridge 187:0387e8f68319 397 #if MBED_CONF_PLATFORM_ERROR_HIST_ENABLED
Anna Bridge 186:707f6e361f3e 398 //Retrieve the error context from error log at the specified index
AnnaBridge 187:0387e8f68319 399 mbed_error_status_t mbed_get_error_hist_info(int index, mbed_error_ctx *error_info)
Anna Bridge 186:707f6e361f3e 400 {
Anna Bridge 186:707f6e361f3e 401 return mbed_error_hist_get(index, error_info);
Anna Bridge 186:707f6e361f3e 402 }
Anna Bridge 186:707f6e361f3e 403
Anna Bridge 186:707f6e361f3e 404 //Retrieve the error log count
AnnaBridge 187:0387e8f68319 405 int mbed_get_error_hist_count(void)
Anna Bridge 186:707f6e361f3e 406 {
Anna Bridge 186:707f6e361f3e 407 return mbed_error_hist_get_count();
Anna Bridge 186:707f6e361f3e 408 }
Anna Bridge 186:707f6e361f3e 409
Anna Bridge 186:707f6e361f3e 410 mbed_error_status_t mbed_save_error_hist(const char *path)
Anna Bridge 186:707f6e361f3e 411 {
Anna Bridge 186:707f6e361f3e 412 mbed_error_status_t ret = MBED_SUCCESS;
Anna Bridge 186:707f6e361f3e 413 mbed_error_ctx ctx = {0};
Anna Bridge 186:707f6e361f3e 414 int log_count = mbed_error_hist_get_count();
Anna Bridge 186:707f6e361f3e 415 FILE *error_log_file = NULL;
AnnaBridge 187:0387e8f68319 416
Anna Bridge 186:707f6e361f3e 417 //Ensure path is valid
AnnaBridge 187:0387e8f68319 418 if (path == NULL) {
Anna Bridge 186:707f6e361f3e 419 ret = MBED_MAKE_ERROR(MBED_MODULE_PLATFORM, MBED_ERROR_CODE_INVALID_ARGUMENT);
Anna Bridge 186:707f6e361f3e 420 goto exit;
Anna Bridge 186:707f6e361f3e 421 }
AnnaBridge 187:0387e8f68319 422
Anna Bridge 186:707f6e361f3e 423 //Open the file for saving the error log info
AnnaBridge 187:0387e8f68319 424 if ((error_log_file = fopen(path, "w")) == NULL) {
Anna Bridge 186:707f6e361f3e 425 ret = MBED_MAKE_ERROR(MBED_MODULE_PLATFORM, MBED_ERROR_CODE_OPEN_FAILED);
Anna Bridge 186:707f6e361f3e 426 goto exit;
Anna Bridge 186:707f6e361f3e 427 }
AnnaBridge 187:0387e8f68319 428
Anna Bridge 186:707f6e361f3e 429 //First store the first and last errors
AnnaBridge 187:0387e8f68319 430 if (fprintf(error_log_file, "\nFirst Error: Status:0x%x ThreadId:0x%x Address:0x%x Value:0x%x\n",
AnnaBridge 187:0387e8f68319 431 (unsigned int)first_error_ctx.error_status,
AnnaBridge 187:0387e8f68319 432 (unsigned int)first_error_ctx.thread_id,
AnnaBridge 187:0387e8f68319 433 (unsigned int)first_error_ctx.error_address,
AnnaBridge 187:0387e8f68319 434 (unsigned int)first_error_ctx.error_value) <= 0) {
Anna Bridge 186:707f6e361f3e 435 ret = MBED_MAKE_ERROR(MBED_MODULE_PLATFORM, MBED_ERROR_CODE_WRITE_FAILED);
Anna Bridge 186:707f6e361f3e 436 goto exit;
Anna Bridge 186:707f6e361f3e 437 }
AnnaBridge 187:0387e8f68319 438
AnnaBridge 187:0387e8f68319 439 if (fprintf(error_log_file, "\nLast Error: Status:0x%x ThreadId:0x%x Address:0x%x Value:0x%x\n",
AnnaBridge 187:0387e8f68319 440 (unsigned int)last_error_ctx.error_status,
AnnaBridge 187:0387e8f68319 441 (unsigned int)last_error_ctx.thread_id,
AnnaBridge 187:0387e8f68319 442 (unsigned int)last_error_ctx.error_address,
AnnaBridge 187:0387e8f68319 443 (unsigned int)last_error_ctx.error_value) <= 0) {
Anna Bridge 186:707f6e361f3e 444 ret = MBED_MAKE_ERROR(MBED_MODULE_PLATFORM, MBED_ERROR_CODE_WRITE_FAILED);
Anna Bridge 186:707f6e361f3e 445 goto exit;
Anna Bridge 186:707f6e361f3e 446 }
AnnaBridge 187:0387e8f68319 447
Anna Bridge 186:707f6e361f3e 448 //Update with error log info
AnnaBridge 187:0387e8f68319 449 while (--log_count >= 0) {
Anna Bridge 186:707f6e361f3e 450 mbed_error_hist_get(log_count, &ctx);
Anna Bridge 186:707f6e361f3e 451 //first line of file will be error log count
AnnaBridge 187:0387e8f68319 452 if (fprintf(error_log_file, "\n%d: Status:0x%x ThreadId:0x%x Address:0x%x Value:0x%x\n",
AnnaBridge 187:0387e8f68319 453 log_count,
AnnaBridge 187:0387e8f68319 454 (unsigned int)ctx.error_status,
AnnaBridge 187:0387e8f68319 455 (unsigned int)ctx.thread_id,
AnnaBridge 187:0387e8f68319 456 (unsigned int)ctx.error_address,
AnnaBridge 187:0387e8f68319 457 (unsigned int)ctx.error_value) <= 0) {
Anna Bridge 186:707f6e361f3e 458 ret = MBED_MAKE_ERROR(MBED_MODULE_PLATFORM, MBED_ERROR_CODE_WRITE_FAILED);
Anna Bridge 186:707f6e361f3e 459 goto exit;
Anna Bridge 186:707f6e361f3e 460 }
Anna Bridge 186:707f6e361f3e 461 }
AnnaBridge 187:0387e8f68319 462
Anna Bridge 186:707f6e361f3e 463 exit:
Anna Bridge 186:707f6e361f3e 464 fclose(error_log_file);
AnnaBridge 187:0387e8f68319 465
Anna Bridge 186:707f6e361f3e 466 return ret;
Anna Bridge 186:707f6e361f3e 467 }
Anna Bridge 186:707f6e361f3e 468 #endif
Anna Bridge 186:707f6e361f3e 469