stacktrace.c 2.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899
  1. /*
  2. * arch/s390/kernel/stacktrace.c
  3. *
  4. * Stack trace management functions
  5. *
  6. * Copyright (C) IBM Corp. 2006
  7. * Author(s): Heiko Carstens <heiko.carstens@de.ibm.com>
  8. */
  9. #include <linux/sched.h>
  10. #include <linux/stacktrace.h>
  11. #include <linux/kallsyms.h>
  12. #include <linux/module.h>
  13. static unsigned long save_context_stack(struct stack_trace *trace,
  14. unsigned long sp,
  15. unsigned long low,
  16. unsigned long high,
  17. int savesched)
  18. {
  19. struct stack_frame *sf;
  20. struct pt_regs *regs;
  21. unsigned long addr;
  22. while(1) {
  23. sp &= PSW_ADDR_INSN;
  24. if (sp < low || sp > high)
  25. return sp;
  26. sf = (struct stack_frame *)sp;
  27. while(1) {
  28. addr = sf->gprs[8] & PSW_ADDR_INSN;
  29. if (!trace->skip)
  30. trace->entries[trace->nr_entries++] = addr;
  31. else
  32. trace->skip--;
  33. if (trace->nr_entries >= trace->max_entries)
  34. return sp;
  35. low = sp;
  36. sp = sf->back_chain & PSW_ADDR_INSN;
  37. if (!sp)
  38. break;
  39. if (sp <= low || sp > high - sizeof(*sf))
  40. return sp;
  41. sf = (struct stack_frame *)sp;
  42. }
  43. /* Zero backchain detected, check for interrupt frame. */
  44. sp = (unsigned long)(sf + 1);
  45. if (sp <= low || sp > high - sizeof(*regs))
  46. return sp;
  47. regs = (struct pt_regs *)sp;
  48. addr = regs->psw.addr & PSW_ADDR_INSN;
  49. if (savesched || !in_sched_functions(addr)) {
  50. if (!trace->skip)
  51. trace->entries[trace->nr_entries++] = addr;
  52. else
  53. trace->skip--;
  54. }
  55. if (trace->nr_entries >= trace->max_entries)
  56. return sp;
  57. low = sp;
  58. sp = regs->gprs[15];
  59. }
  60. }
  61. void save_stack_trace(struct stack_trace *trace)
  62. {
  63. register unsigned long sp asm ("15");
  64. unsigned long orig_sp, new_sp;
  65. orig_sp = sp & PSW_ADDR_INSN;
  66. new_sp = save_context_stack(trace, orig_sp,
  67. S390_lowcore.panic_stack - PAGE_SIZE,
  68. S390_lowcore.panic_stack, 1);
  69. if (new_sp != orig_sp)
  70. return;
  71. new_sp = save_context_stack(trace, new_sp,
  72. S390_lowcore.async_stack - ASYNC_SIZE,
  73. S390_lowcore.async_stack, 1);
  74. if (new_sp != orig_sp)
  75. return;
  76. save_context_stack(trace, new_sp,
  77. S390_lowcore.thread_info,
  78. S390_lowcore.thread_info + THREAD_SIZE, 1);
  79. }
  80. EXPORT_SYMBOL_GPL(save_stack_trace);
  81. void save_stack_trace_tsk(struct task_struct *tsk, struct stack_trace *trace)
  82. {
  83. unsigned long sp, low, high;
  84. sp = tsk->thread.ksp & PSW_ADDR_INSN;
  85. low = (unsigned long) task_stack_page(tsk);
  86. high = (unsigned long) task_pt_regs(tsk);
  87. save_context_stack(trace, sp, low, high, 0);
  88. if (trace->nr_entries < trace->max_entries)
  89. trace->entries[trace->nr_entries++] = ULONG_MAX;
  90. }
  91. EXPORT_SYMBOL_GPL(save_stack_trace_tsk);