434306b
2004-11-23  Andrew Cagney  <cagney@redhat.com>
434306b
434306b
	* Makefile.in (uninstall-gstack, install-gstack): New rules, add
434306b
	to install and uninstall.
434306b
	* gstack.sh, gstack.1: New files.
434306b
8b1b3fd
Index: gdb-6.8/gdb/Makefile.in
8b1b3fd
===================================================================
8b1b3fd
--- gdb-6.8.orig/gdb/Makefile.in	2008-03-17 13:15:08.000000000 +0100
8b1b3fd
+++ gdb-6.8/gdb/Makefile.in	2008-07-14 10:25:47.000000000 +0200
8b1b3fd
@@ -1161,7 +1161,7 @@ gdb.z:gdb.1
434306b
 # time it takes for make to check that all is up to date.
434306b
 # install-only is intended to address that need.
434306b
 install: all install-only
434306b
-install-only: $(CONFIG_INSTALL)
434306b
+install-only: install-gstack $(CONFIG_INSTALL)
434306b
 	transformed_name=`t='$(program_transform_name)'; \
434306b
 			  echo gdb | sed -e "$$t"` ; \
434306b
 		if test "x$$transformed_name" = x; then \
8b1b3fd
@@ -1193,9 +1193,26 @@ install-tui:
434306b
 			$(DESTDIR)$(man1dir) ; \
434306b
 		$(INSTALL_DATA) $(srcdir)/gdb.1 \
434306b
 			$(DESTDIR)$(man1dir)/$$transformed_name.1
434306b
+GSTACK=gstack
434306b
+.PHONY: install-gstack
434306b
+install-gstack:
434306b
+	transformed_name=`t='$(program_transform_name)'; \
434306b
+			  echo $(GSTACK) | sed -e "$$t"` ; \
434306b
+		if test "x$$transformed_name" = x; then \
434306b
+		  transformed_name=$(GSTACK) ; \
434306b
+		else \
434306b
+		  true ; \
434306b
+		fi ; \
434306b
+		$(SHELL) $(srcdir)/../mkinstalldirs $(DESTDIR)$(bindir) ; \
434306b
+		$(INSTALL_PROGRAM) $(srcdir)/$(GSTACK).sh \
434306b
+			$(DESTDIR)$(bindir)/$$transformed_name$(EXEEXT) ; \
434306b
+		: $(SHELL) $(srcdir)/../mkinstalldirs \
434306b
+			$(DESTDIR)$(man1dir) ; \
434306b
+		: $(INSTALL_DATA) $(srcdir)/gstack.1 \
434306b
+			$(DESTDIR)$(man1dir)/$$transformed_name.1
434306b
 
434306b
 
434306b
-uninstall: force $(CONFIG_UNINSTALL)
434306b
+uninstall: force uninstall-gstack $(CONFIG_UNINSTALL)
434306b
 	transformed_name=`t='$(program_transform_name)'; \
434306b
 			  echo gdb | sed -e $$t` ; \
434306b
 		if test "x$$transformed_name" = x; then \
8b1b3fd
@@ -1217,6 +1234,17 @@ uninstall-tui:
434306b
 		fi ; \
434306b
 		rm -f $(DESTDIR)$(bindir)/$$transformed_name$(EXEEXT) \
434306b
 		      $(DESTDIR)$(man1dir)/$$transformed_name.1
434306b
+.PHONY: uninstall-gstack
434306b
+uninstall-gstack:
434306b
+	transformed_name=`t='$(program_transform_name)'; \
434306b
+			  echo $(GSTACK) | sed -e $$t` ; \
434306b
+		if test "x$$transformed_name" = x; then \
434306b
+		  transformed_name=$(GSTACK) ; \
434306b
+		else \
434306b
+		  true ; \
434306b
+		fi ; \
434306b
+		rm -f $(DESTDIR)$(bindir)/$$transformed_name$(EXEEXT) \
434306b
+		      $(DESTDIR)$(man1dir)/$$transformed_name.1
434306b
 
8b1b3fd
 # The C++ name parser can be built standalone for testing.
8b1b3fd
 test-cp-name-parser.o: cp-name-parser.c $(safe_ctype_h) $(libiberty_h) \
8b1b3fd
Index: gdb-6.8/gdb/gstack.sh
8b1b3fd
===================================================================
8b1b3fd
--- /dev/null	1970-01-01 00:00:00.000000000 +0000
8b1b3fd
+++ gdb-6.8/gdb/gstack.sh	2008-07-14 10:25:47.000000000 +0200
434306b
@@ -0,0 +1,45 @@
434306b
+#!/bin/sh
434306b
+
434306b
+if test $# -ne 1; then
434306b
+    echo "Usage: `basename $0 .sh` <process-id>" 1>&2
434306b
+    exit 1
434306b
+fi
434306b
+
434306b
+if test ! -r /proc/$1; then
434306b
+    echo "Process $1 not found." 1>&2
434306b
+    exit 1
434306b
+fi
434306b
+
434306b
+# GDB doesn't allow "thread apply all bt" when the process isn't
434306b
+# threaded; need to peek at the process to determine if that or the
434306b
+# simpler "bt" should be used.
434306b
+
434306b
+backtrace="bt"
434306b
+if test -d /proc/$1/task ; then
434306b
+    # Newer kernel; has a task/ directory.
434306b
+    if test `ls /proc/$1/task | wc -l` -gt 1 2>/dev/null ; then
434306b
+	backtrace="thread apply all bt"
434306b
+    fi
434306b
+elif test -f /proc/$1/maps ; then
434306b
+    # Older kernel; go by it loading libpthread.
434306b
+    if grep -e libpthread /proc/$1/maps > /dev/null 2>&1 ; then
434306b
+	backtrace="thread apply all bt"
434306b
+    fi
434306b
+fi
434306b
+
434306b
+GDB=${GDB:-gdb}
434306b
+
434306b
+if $GDB -nx --quiet --batch --readnever > /dev/null 2>&1; then
434306b
+    readnever=--readnever
434306b
+else
434306b
+    readnever=
434306b
+fi
434306b
+
434306b
+# Run GDB, strip out unwanted noise.
434306b
+$GDB --quiet $readnever -nx /proc/$1/exe $1 <<EOF 2>&1 | 
434306b
+$backtrace
434306b
+EOF
434306b
+sed -n \
434306b
+    -e 's/^(gdb) //' \
434306b
+    -e '/^#/p' \
434306b
+    -e '/^Thread/p'