Default exception handler\r
\r
Copyright (c) 2008 - 2010, Apple Inc. All rights reserved.<BR>\r
- Copyright (c) 2011 - 2013, ARM Ltd. All rights reserved.<BR>\r
+ Copyright (c) 2011 - 2014, ARM Ltd. All rights reserved.<BR>\r
\r
This program and the accompanying materials\r
are licensed and made available under the terms and conditions of the BSD License\r
#include <Protocol/DebugSupport.h>\r
#include <Protocol/LoadedImage.h>\r
\r
-EFI_DEBUG_IMAGE_INFO_TABLE_HEADER *gDebugImageTableHeader = NULL;\r
-\r
STATIC CHAR8 *gExceptionTypeString[] = {\r
"Synchronous",\r
"IRQ",\r
"SError"\r
};\r
\r
+STATIC BOOLEAN mRecursiveException;\r
+\r
CHAR8 *\r
GetImageName (\r
IN UINTN FaultAddress,\r
OUT UINTN *PeCoffSizeOfHeaders\r
);\r
\r
+STATIC\r
+VOID\r
+DescribeInstructionOrDataAbort (\r
+ IN CHAR8 *AbortType,\r
+ IN UINTN Iss\r
+ )\r
+{\r
+ CHAR8 *AbortCause;\r
+\r
+ switch (Iss & 0x3f) {\r
+ case 0x0: AbortCause = "Address size fault, zeroth level of translation or translation table base register"; break;\r
+ case 0x1: AbortCause = "Address size fault, first level"; break;\r
+ case 0x2: AbortCause = "Address size fault, second level"; break;\r
+ case 0x3: AbortCause = "Address size fault, third level"; break;\r
+ case 0x4: AbortCause = "Translation fault, zeroth level"; break;\r
+ case 0x5: AbortCause = "Translation fault, first level"; break;\r
+ case 0x6: AbortCause = "Translation fault, second level"; break;\r
+ case 0x7: AbortCause = "Translation fault, third level"; break;\r
+ case 0x9: AbortCause = "Access flag fault, first level"; break;\r
+ case 0xa: AbortCause = "Access flag fault, second level"; break;\r
+ case 0xb: AbortCause = "Access flag fault, third level"; break;\r
+ case 0xd: AbortCause = "Permission fault, first level"; break;\r
+ case 0xe: AbortCause = "Permission fault, second level"; break;\r
+ case 0xf: AbortCause = "Permission fault, third level"; break;\r
+ case 0x10: AbortCause = "Synchronous external abort"; break;\r
+ case 0x18: AbortCause = "Synchronous parity error on memory access"; break;\r
+ case 0x11: AbortCause = "Asynchronous external abort"; break;\r
+ case 0x19: AbortCause = "Asynchronous parity error on memory access"; break;\r
+ case 0x14: AbortCause = "Synchronous external abort on translation table walk, zeroth level"; break;\r
+ case 0x15: AbortCause = "Synchronous external abort on translation table walk, first level"; break;\r
+ case 0x16: AbortCause = "Synchronous external abort on translation table walk, second level"; break;\r
+ case 0x17: AbortCause = "Synchronous external abort on translation table walk, third level"; break;\r
+ case 0x1c: AbortCause = "Synchronous parity error on memory access on translation table walk, zeroth level"; break;\r
+ case 0x1d: AbortCause = "Synchronous parity error on memory access on translation table walk, first level"; break;\r
+ case 0x1e: AbortCause = "Synchronous parity error on memory access on translation table walk, second level"; break;\r
+ case 0x1f: AbortCause = "Synchronous parity error on memory access on translation table walk, third level"; break;\r
+ case 0x21: AbortCause = "Alignment fault"; break;\r
+ case 0x22: AbortCause = "Debug event"; break;\r
+ case 0x30: AbortCause = "TLB conflict abort"; break;\r
+ case 0x33:\r
+ case 0x34: AbortCause = "IMPLEMENTATION DEFINED"; break;\r
+ case 0x35:\r
+ case 0x36: AbortCause = "Domain fault"; break;\r
+ default: AbortCause = ""; break;\r
+ }\r
+\r
+ DEBUG ((EFI_D_ERROR, "\n%a: %a\n", AbortType, AbortCause));\r
+}\r
+\r
+STATIC\r
+VOID\r
+DescribeExceptionSyndrome (\r
+ IN UINT32 Esr\r
+ )\r
+{\r
+ CHAR8 *Message;\r
+ UINTN Ec;\r
+ UINTN Iss;\r
+\r
+ Ec = Esr >> 26;\r
+ Iss = Esr & 0x00ffffff;\r
+\r
+ switch (Ec) {\r
+ case 0x15: Message = "SVC executed in AArch64"; break;\r
+ case 0x20:\r
+ case 0x21: DescribeInstructionOrDataAbort ("Instruction abort", Iss); return;\r
+ case 0x22: Message = "PC alignment fault"; break;\r
+ case 0x23: Message = "SP alignment fault"; break;\r
+ case 0x24:\r
+ case 0x25: DescribeInstructionOrDataAbort ("Data abort", Iss); return;\r
+ default: return;\r
+ }\r
+\r
+ DEBUG ((EFI_D_ERROR, "\n %a \n", Message));\r
+}\r
+\r
+#ifndef MDEPKG_NDEBUG\r
+STATIC\r
+CONST CHAR8 *\r
+BaseName (\r
+ IN CONST CHAR8 *FullName\r
+ )\r
+{\r
+ CONST CHAR8 *Str;\r
+\r
+ Str = FullName + AsciiStrLen (FullName);\r
+\r
+ while (--Str > FullName) {\r
+ if (*Str == '/' || *Str == '\\') {\r
+ return Str + 1;\r
+ }\r
+ }\r
+ return Str;\r
+}\r
+#endif\r
+\r
/**\r
This is the default action to take on an unexpected exception\r
\r
{\r
CHAR8 Buffer[100];\r
UINTN CharCount;\r
+ INT32 Offset;\r
\r
- CharCount = AsciiSPrint (Buffer,sizeof (Buffer),"\n\n%a Exception: \n", gExceptionTypeString[ExceptionType]);\r
+ if (mRecursiveException) {\r
+ CharCount = AsciiSPrint (Buffer, sizeof (Buffer),"\nRecursive exception occurred while dumping the CPU state\n");\r
+ SerialPortWrite ((UINT8 *) Buffer, CharCount);\r
+ CpuDeadLoop ();\r
+ }\r
+ mRecursiveException = TRUE;\r
+\r
+ CharCount = AsciiSPrint (Buffer,sizeof (Buffer),"\n\n%a Exception at 0x%016lx\n", gExceptionTypeString[ExceptionType], SystemContext.SystemContextAArch64->ELR);\r
SerialPortWrite ((UINT8 *) Buffer, CharCount);\r
\r
DEBUG_CODE_BEGIN ();\r
- CHAR8 *Pdb;\r
+ CHAR8 *Pdb, *PrevPdb;\r
UINTN ImageBase;\r
UINTN PeCoffSizeOfHeader;\r
- Pdb = GetImageName (SystemContext.SystemContextAArch64->ELR, &ImageBase, &PeCoffSizeOfHeader);\r
+ UINT64 *Fp;\r
+ UINT64 RootFp[2];\r
+ UINTN Idx;\r
+\r
+ PrevPdb = Pdb = GetImageName (SystemContext.SystemContextAArch64->ELR, &ImageBase, &PeCoffSizeOfHeader);\r
if (Pdb != NULL) {\r
- DEBUG ((EFI_D_ERROR, "%a loaded at 0x%016lx \n", Pdb, ImageBase));\r
+ DEBUG ((EFI_D_ERROR, "PC 0x%012lx (0x%012lx+0x%08x) [ 0] %a\n",\r
+ SystemContext.SystemContextAArch64->ELR, ImageBase,\r
+ SystemContext.SystemContextAArch64->ELR - ImageBase, BaseName (Pdb)));\r
+\r
+ if ((UINT64 *)SystemContext.SystemContextAArch64->FP != 0) {\r
+ Idx = 0;\r
+\r
+ RootFp[0] = ((UINT64 *)SystemContext.SystemContextAArch64->FP)[0];\r
+ RootFp[1] = ((UINT64 *)SystemContext.SystemContextAArch64->FP)[1];\r
+ if (RootFp[1] != SystemContext.SystemContextAArch64->LR) {\r
+ RootFp[0] = SystemContext.SystemContextAArch64->FP;\r
+ RootFp[1] = SystemContext.SystemContextAArch64->LR;\r
+ }\r
+ for (Fp = RootFp; Fp[0] != 0; Fp = (UINT64 *)Fp[0]) {\r
+ Pdb = GetImageName (Fp[1], &ImageBase, &PeCoffSizeOfHeader);\r
+ if (Pdb != NULL) {\r
+ if (Pdb != PrevPdb) {\r
+ Idx++;\r
+ PrevPdb = Pdb;\r
+ }\r
+ DEBUG ((EFI_D_ERROR, "PC 0x%012lx (0x%012lx+0x%08x) [% 2d] %a\n",\r
+ Fp[1], ImageBase, Fp[1] - ImageBase, Idx, BaseName (Pdb)));\r
+ }\r
+ }\r
+ PrevPdb = Pdb = GetImageName (SystemContext.SystemContextAArch64->ELR, &ImageBase, &PeCoffSizeOfHeader);\r
+ DEBUG ((EFI_D_ERROR, "\n[ 0] %a\n", Pdb));\r
+\r
+ Idx = 0;\r
+ for (Fp = RootFp; Fp[0] != 0; Fp = (UINT64 *)Fp[0]) {\r
+ Pdb = GetImageName (Fp[1], &ImageBase, &PeCoffSizeOfHeader);\r
+ if (Pdb != NULL && Pdb != PrevPdb) {\r
+ DEBUG ((EFI_D_ERROR, "[% 2d] %a\n", ++Idx, Pdb));\r
+ PrevPdb = Pdb;\r
+ }\r
+ }\r
+ }\r
}\r
DEBUG_CODE_END ();\r
\r
\r
DEBUG ((EFI_D_ERROR, "\n ESR : EC 0x%02x IL 0x%x ISS 0x%08x\n", (SystemContext.SystemContextAArch64->ESR & 0xFC000000) >> 26, (SystemContext.SystemContextAArch64->ESR >> 25) & 0x1, SystemContext.SystemContextAArch64->ESR & 0x1FFFFFF ));\r
\r
- DEBUG ((EFI_D_ERROR, "\n"));\r
+ DescribeExceptionSyndrome (SystemContext.SystemContextAArch64->ESR);\r
+\r
+ DEBUG ((EFI_D_ERROR, "\nStack dump:\n"));\r
+ for (Offset = -256; Offset < 256; Offset += 32) {\r
+ DEBUG ((EFI_D_ERROR, "%c %013lx: %016lx %016lx %016lx %016lx\n",\r
+ Offset == 0 ? '>' : ' ',\r
+ SystemContext.SystemContextAArch64->SP + Offset,\r
+ *(UINT64 *)(SystemContext.SystemContextAArch64->SP + Offset),\r
+ *(UINT64 *)(SystemContext.SystemContextAArch64->SP + Offset + 8),\r
+ *(UINT64 *)(SystemContext.SystemContextAArch64->SP + Offset + 16),\r
+ *(UINT64 *)(SystemContext.SystemContextAArch64->SP + Offset + 24)));\r
+ }\r
+\r
ASSERT (FALSE);\r
+ CpuDeadLoop ();\r
}\r
-\r