home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 2006 November (DVD) / PCWELT_11_2006.ISO / casper / filesystem.squashfs / usr / bin / gcore < prev    next >
Encoding:
Text File  |  2005-12-17  |  1.9 KB  |  88 lines
  1. #!/bin/sh
  2.  
  3. #   Copyright (C) 2003, 2005  Free Software Foundation, Inc.
  4.  
  5. # This program is free software; you can redistribute it and/or modify
  6. # it under the terms of the GNU General Public License as published by
  7. # the Free Software Foundation; either version 2 of the License, or
  8. # (at your option) any later version.
  9. # 
  10. # This program is distributed in the hope that it will be useful,
  11. # but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13. # GNU General Public License for more details.
  14. # 
  15. # You should have received a copy of the GNU General Public License
  16. # along with this program; if not, write to the Free Software
  17. # Foundation, Inc., 51 Franklin Street, Fifth Floor,
  18. # Boston, MA 02110-1301, USA.  
  19.  
  20. #
  21. # gcore.sh
  22. # Script to generate a core file of a running program.
  23. # It starts up gdb, attaches to the given PID and invokes the gcore command.
  24. #
  25.  
  26. if [ "$#" -eq "0" ]
  27. then
  28.     echo "usage:  gcore [-o filename] pid"
  29.     exit 2
  30. fi
  31.  
  32. # Need to check for -o option, but set default basename to "core".
  33. name=core
  34.  
  35. if [ "$1" = "-o" ]
  36. then
  37.     if [ "$#" -lt "3" ]
  38.     then
  39.     # Not enough arguments.
  40.     echo "usage:  gcore [-o filename] pid"
  41.     exit 2
  42.     fi
  43.     name=$2
  44.  
  45.     # Shift over to start of pid list
  46.     shift; shift
  47. fi
  48.  
  49. # Create a temporary file.  Use mktemp if available, but cope if it is not.
  50. tmpfile=`mktemp ${name}.XXXXXX 2>/dev/null` || {
  51.   tmpfile=${name}.$$
  52.   if test -e $tmpfile; then
  53.     echo "Could not create temporary file $tmpfile"
  54.     exit 1
  55.   fi
  56.   touch $tmpfile
  57. }
  58. trap "rm -f $tmpfile" EXIT
  59.  
  60. # Initialise return code.
  61. rc=0
  62.  
  63. # Loop through pids
  64. for pid in $*
  65. do
  66.     # Write gdb script for pid $pid.  
  67.     cat >>$tmpfile <<EOF
  68. attach $pid
  69. gcore $name.$pid
  70. detach
  71. quit
  72. EOF
  73.  
  74.     gdb -x $tmpfile -batch
  75.  
  76.     if [ -r $name.$pid ] ; then 
  77.         rc=0
  78.     else
  79.         echo gcore: failed to create $name.$pid
  80.         rc=1
  81.         break
  82.     fi
  83.  
  84.  
  85. done
  86.  
  87. exit $rc
  88.