aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Jacobowitz <drow@false.org>2007-01-09 17:08:18 +0000
committerDaniel Jacobowitz <drow@false.org>2007-01-09 17:08:18 +0000
commit4de1f557dcb2c73e176636974f379a94c259d06b (patch)
tree1c73c44b1d5a1224acaa38b07beeab639f01af61
parentca4ca11edda678ddafee7314829cc14c11a570ca (diff)
downloadgdb-4de1f557dcb2c73e176636974f379a94c259d06b.zip
gdb-4de1f557dcb2c73e176636974f379a94c259d06b.tar.gz
gdb-4de1f557dcb2c73e176636974f379a94c259d06b.tar.bz2
* copyright.sh: New file.
-rw-r--r--gdb/ChangeLog5
-rw-r--r--gdb/copyright.sh162
2 files changed, 167 insertions, 0 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index b37642a..296fc4c 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,4 +1,9 @@
2007-01-09 Daniel Jacobowitz <dan@codesourcery.com>
+ Eli Zaretskii <eliz@gnu.org>
+
+ * copyright.sh: New file.
+
+2007-01-09 Daniel Jacobowitz <dan@codesourcery.com>
* configure.ac: Check for XML_StopParser.
* xml-support.c (gdb_xml_body_text): Check for an error.
diff --git a/gdb/copyright.sh b/gdb/copyright.sh
new file mode 100644
index 0000000..23f6336
--- /dev/null
+++ b/gdb/copyright.sh
@@ -0,0 +1,162 @@
+#!/bin/sh
+# Automatically update copyright for GDB, the GNU debugger.
+#
+# Copyright (C) 2007 Free Software Foundation, Inc.
+#
+# This file is part of GDB.
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor,
+# Boston, MA 02110-1301, USA.
+
+# Usage: cd src/gdb && sh ./copyright.sh
+# To use a different version of emacs, set the EMACS environment
+# variable before running.
+
+# After running, update those files mentioned in $byhand by hand.
+# Always review the output of this script before committing it!
+# A useful command to review the output is:
+# filterdiff -x \*.c -x \*.cc -x \*.h -x \*.exp updates.diff
+# This removes the bulk of the changes which are most likely
+# to be correct.
+
+####
+# Configuration
+####
+
+# As of Emacs 22.0 (snapshot), wrapping and copyright updating do not
+# handle these file types - all reasonable:
+# Assembly (weird comment characters, e.g. "!"); .S usually has C
+# comments, which are fine)
+# Fortran ("c" comment character)
+# igen
+# Autoconf input (dnl)
+# texinfo (@c)
+# tex (%)
+# *.defs as C
+# man
+# So these need to be done by hand, as needed
+byhand="
+*.s
+*.f
+*.f90
+*.igen
+*.ac
+*.texi
+*.texinfo
+*.tex
+*.defs
+*.1
+"
+
+# Files which should not be modified, either because they are
+# generated, non-FSF, or otherwise special (e.g. license text).
+prunes="
+COPYING
+COPYING.LIB
+CVS
+configure
+copying.c
+gdbarch.c
+gdbarch.h
+fdl.texi
+gpl.texi
+gdbtk
+gdb.gdbtk
+osf-share
+aclocal.m4
+"
+
+####
+# Main program
+####
+
+: ${EMACS:=emacs}
+
+# Disable filename expansion, so that we can get at the glob patterns
+# from $byhand.
+set -f
+
+version=`$EMACS --version | sed 's/GNU Emacs \([0-9]*\)\..*/\1/; 1q'`
+if test "$version" -lt 22; then
+ echo "error: $EMACS is too old; use at least an Emacs 22 snapshot." >&2
+ exit 1
+fi
+
+if test $# -lt 1; then
+ dir=.
+else
+ dir=$1
+fi
+
+if ! test -f doc/gdbint.texinfo; then
+ echo "\"$dir\" is not a GDB source directory."
+ exit 1
+fi
+
+cat > copytmp.el <<EOF
+(load "copyright")
+(setq vc-cvs-stay-local nil
+ message-log-max t)
+(setq fsf-regexp "Free[#; \t\n]+Software[#; \t\n]+Foundation,[#; \t\n]+Inc\."
+ fsf-copyright-regexp (concat copyright-regexp "[#; \t\n]+" fsf-regexp)
+ generated-regexp "THIS FILE IS MACHINE GENERATED WITH CGEN")
+
+(defun gdb-copyright-update (filename)
+ (widen)
+ (goto-char (point-min))
+ (if (and (not (re-search-forward generated-regexp (+ (point) copyright-limit) t))
+ (re-search-forward fsf-copyright-regexp (+ (point) copyright-limit) t))
+ (progn
+ (setq copyright-update t
+ copyright-query nil
+ fill-column 78
+ start (copy-marker (match-beginning 0))
+ end (progn
+ (re-search-backward fsf-regexp)
+ (re-search-forward fsf-regexp
+ (+ (point) copyright-limit) t)
+ (point-marker))
+ fsf-start (copy-marker (match-beginning 0)))
+ (replace-match "Free_Software_Foundation,_Inc." t t)
+ (copyright-update)
+ (fill-region-as-paragraph start end)
+ (replace-string "_" " " nil fsf-start end))
+ (message (concat "WARNING: No copyright message found in " filename))))
+
+EOF
+
+for f in $prunes $byhand; do
+ prune_opts="$prune_opts -name $f -prune -o"
+done
+
+for f in $(find "$dir" "$dir/../include/gdb" "$dir/../sim" \
+ $prune_opts -type f -print); do
+ cat >> copytmp.el <<EOF
+(switch-to-buffer (find-file "$f"))
+(setq backup-inhibited t)
+(setq write-file-hooks '())
+(gdb-copyright-update "$f")
+(save-buffer)
+(kill-buffer (buffer-name))
+EOF
+done
+
+cat >> copytmp.el <<EOF
+(delete-file "copytmp.el")
+;; Comment out the next line to examine the message buffer.
+(kill-emacs)
+EOF
+
+exec $EMACS --no-site-file -q -l ./copytmp.el