]> git.proxmox.com Git - mirror_edk2.git/blobdiff - ArmPkg/Library/DefaultExceptionHandlerLib/AArch64/DefaultExceptionHandler.c
ArmPkg/DefaultExceptionHandlerLib: improve formatting of backtrace
[mirror_edk2.git] / ArmPkg / Library / DefaultExceptionHandlerLib / AArch64 / DefaultExceptionHandler.c
index 27a09044b21bb31fb947bdea0f4868d1c36e4791..2f9c2ede37c1d149dfceb3b3e85f477665f7f1fa 100644 (file)
@@ -2,7 +2,7 @@
   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
@@ -27,8 +27,6 @@
 #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
@@ -36,6 +34,8 @@ STATIC CHAR8 *gExceptionTypeString[] = {
   "SError"\r
 };\r
 \r
+STATIC BOOLEAN mRecursiveException;\r
+\r
 CHAR8 *\r
 GetImageName (\r
   IN  UINTN  FaultAddress,\r
@@ -43,6 +43,102 @@ GetImageName (
   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
@@ -60,17 +156,64 @@ DefaultExceptionHandler (
 {\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
@@ -106,7 +249,19 @@ DefaultExceptionHandler (
 \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