FM / runtime

/usr/share/systemtap/runtime

Name	Size	Mode	Actions
dyninst/	-	0755	rm
linux/	-	0755	rm
softfloat/	-	0755	rm
transport/	-	0755	rm
unwind/	-	0755	rm
addr-map.c	523	0644	edit dl rm
addr-map.h	1156	0644	edit dl rm
alloc.c	498	0644	edit dl rm
arith.c	483	0644	edit dl rm
common_probe_context.h	6576	0644	edit dl rm
common_session_state.h	415	0644	edit dl rm
compatdefs.h	3682	0644	edit dl rm
copy.c	585	0644	edit dl rm
debug.h	485	0644	edit dl rm
io.c	508	0644	edit dl rm
k_syms.h	182	0644	edit dl rm
loc2c-runtime.h	17937	0644	edit dl rm
map-gen.c	25977	0644	edit dl rm
map-stat.c	3589	0644	edit dl rm
map.c	14660	0644	edit dl rm
map.h	5918	0644	edit dl rm
mempool.c	2644	0644	edit dl rm
namespaces.h	487	0644	edit dl rm
pmap-gen.c	8710	0644	edit dl rm
print.c	486	0644	edit dl rm
print.h	872	0644	edit dl rm
print_flush.c	3073	0644	edit dl rm
probe_lock.h	498	0644	edit dl rm
procfs-probes.c	4673	0644	edit dl rm
procfs-probes.h	674	0644	edit dl rm
procfs.c	4021	0644	edit dl rm
proc_fs_compatibility.h	2316	0644	edit dl rm
ptrace_compatibility.h	1512	0644	edit dl rm
regs.c	4280	0644	edit dl rm
regs.h	2352	0644	edit dl rm
runtime.h	928	0644	edit dl rm
runtime_context.h	669	0644	edit dl rm
runtime_defines.h	3582	0644	edit dl rm
softfloat.c	77159	0644	edit dl rm
softfloat.h	5125	0644	edit dl rm
stack-arm.c	1688	0644	edit dl rm
stack-ia64.c	1083	0644	edit dl rm
stack-mips.c	125	0644	edit dl rm
stack-s390.c	2362	0644	edit dl rm
stack.c	21790	0644	edit dl rm
stat-common.c	8486	0644	edit dl rm
stat.c	7421	0644	edit dl rm
stat.h	1964	0644	edit dl rm
stp_helper_lock.h	3669	0644	edit dl rm
stp_string.c	8632	0644	edit dl rm
stp_string.h	598	0644	edit dl rm
stp_task_work.c	3511	0644	edit dl rm
stp_utrace.c	94735	0644	edit dl rm
stp_utrace.h	14010	0644	edit dl rm
sym.c	39757	0644	edit dl rm
sym.h	6539	0644	edit dl rm
syscall.h	17408	0644	edit dl rm
task_finder_vma.c	13290	0644	edit dl rm
time.c	14887	0644	edit dl rm
timer.c	481	0644	edit dl rm
timer.h	482	0644	edit dl rm
uidgid_compatibility.h	603	0644	edit dl rm
unwind.c	47890	0644	edit dl rm
utrace_compatibility.h	3148	0644	edit dl rm
vma.c	9545	0644	edit dl rm
vsprintf.c	24058	0644	edit dl rm
vsprintf.h	1502	0644	edit dl rm

Edit: /usr/share/systemtap/runtime/stack-s390.c (2362B)

/* -*- linux-c -*-
 * s390 stack tracing functions
 *
 * This file is part of systemtap, and is free software.  You can
 * redistribute it and/or modify it under the terms of the GNU General
 * Public License (GPL); either version 2, or (at your option) any
 * later version.
 */

static unsigned long
__stp_show_stack (unsigned long sp, unsigned long low,
 		  unsigned long high, int verbose)
{
	struct stack_frame *sf;
	struct pt_regs *regs;
	unsigned long ip;
 
	while (1) {
		sp = sp & PSW_ADDR_INSN;
		/* fixme: verify  this is a kernel stack */
		if (sp < low || sp > high - sizeof(*sf))
			return sp;
		sf = (struct stack_frame *) sp;
		ip = sf->gprs[8] & PSW_ADDR_INSN;
		if (verbose)
			_stp_printf("[%p] [%p] ", (int64_t)sp, (int64_t)ip);
		_stp_print_addr((int64_t)ip, verbose, NULL);
		/* Follow the back_chain */
		while (1) {
			low = sp;
			sp = sf->back_chain & PSW_ADDR_INSN;
			if (!sp)
				break;
			if (sp <= low || sp > high - sizeof(*sf))
				return sp;
			sf = (struct stack_frame *) sp;
			ip = sf->gprs[8] & PSW_ADDR_INSN;
			if (verbose)
				_stp_printf("[%p] [%p] ", (int64_t)sp, (int64_t)ip);
			_stp_print_addr((int64_t)ip, verbose, NULL);
		}
		/* Zero backchain detected, check for interrupt frame. */
		sp = (unsigned long) (sf + 1);
		if (sp <= low || sp > high - sizeof(*regs))
			return sp;
		regs = (struct pt_regs *) sp;
		if (verbose)
			_stp_printf("[%p] [%p] ", (int64_t)sp, (int64_t)ip);
		_stp_print_addr((int64_t)ip, verbose, NULL);
		low = sp;
		sp = regs->gprs[15];
	}
}

#ifndef ASYNC_SIZE
#define ASYNC_SIZE (PAGE_SIZE << 2)
#endif

static void __stp_stack_print (struct pt_regs *regs,
			       int verbose, int levels)
{
		unsigned long *_sp = (unsigned long *)&REG_SP(regs);
		unsigned long sp = (unsigned long)_sp;
		// unsigned long sp = (unsigned long)*_sp;
 
		sp = __stp_show_stack(sp,
			S390_lowcore.async_stack - ASYNC_SIZE,
			S390_lowcore.async_stack, verbose);
 
#ifdef CONFIG_THREAD_INFO_IN_TASK
		/* FIXME: Note that this CONFIG_THREAD_INFO_IN_TASK
		 * code is untested, since the s390 uses the dwarf
		 * unwinder so this code doesn't get called. */
		__stp_show_stack(sp, ((unsigned long)current->stack),
				 (((unsigned long)current->stack)
				  + THREAD_SIZE), verbose);
#else
		__stp_show_stack(sp,
			S390_lowcore.thread_info,
			S390_lowcore.thread_info + THREAD_SIZE, verbose);
#endif
}

cmd: