From: Jesse Thilo Date: Fri, 10 Mar 2000 21:15:47 +0000 (+0000) Subject: # Added clcommit script. X-Git-Tag: BISON-1_28b~176 X-Git-Url: https://git.saurik.com/bison.git/commitdiff_plain/aefb051ce08fb5a1e84ae1ef774f4d3721f54e32?ds=sidebyside # Added clcommit script. --- diff --git a/etc/clcommit b/etc/clcommit new file mode 100755 index 00000000..e0da119e --- /dev/null +++ b/etc/clcommit @@ -0,0 +1,262 @@ +#! /bin/sh + +# commit version 0.9.3 + +# Copyright (C) 1999, 2000, Free Software Foundation + +# This script is Free Software, and it can be copied, distributed and +# modified as defined in the GNU General Public License. A copy of +# its license can be downloaded from http://www.gnu.org/copyleft/gpl.html + +# Originally by Gary V. Vaughan +# Heavily modified by Alexandre Oliva + +# This scripts eases checking in changes to CVS-maintained projects +# with ChangeLog files. It will check that there have been no +# conflicting commits in the CVS repository and print which files it +# is going to commit to stderr. A list of files to compare and to +# check in can be given in the command line. If it is not given, all +# files in the current directory (and below, unless `-l' is given) are +# considered for check in. + +# The commit message will be extracted from the differences between a +# file named ChangeLog* in the commit list, or named after -C, and the +# one in the repository (unless a message was specified with `-m' or +# `-F'). An empty message is not accepted (but a blank line is). If +# the message is acceptable, it will be presented for verification +# (and possible edition) using the $PAGER environment variable (or +# `more', if it is not set, or `cat', if the `-f' switch is given). +# If $PAGER exits successfully, the modified files (at that moment) +# are checked in, unless `-n' was specified, in which case nothing is +# checked in. + +# usage: commit [-v] [-h] [-f] [-l] [-n] [-q] [-z N] [-C ChangeLog_file] +# [-m msg|-F msg_file] [--] [file|dir ...] + +# -f --fast don't check (unless *followed* by -n), and just +# --force display commit message instead of running $PAGER +# -l --local don't descend into subdirectories +# -m msg --message=msg set commit message +# --msg=msg same as -m +# -F file --file=file read commit message from file +# -C file --changelog=file extract commit message from specified ChangeLog +# -n --dry-run don't commit anything +# -q --quiet run cvs in quiet mode +# -zN --compress=N set compression level (0-9, 0=none, 9=max) +# -v --version print version information +# -h,-? --help print short or long help message + +name=commit +cvsopt= +updateopt= +commitopt= +dry_run=false +commit=: +update=: +log_file="${TMPDIR-/tmp}/commitlog.$$" + +rm -f "$log_file" +trap 'rm -f "$log_file"; exit 1' 1 2 15 + +# this just eases exit handling +main_repeat=":" +while $main_repeat; do + +repeat="test $# -gt 0" +while $repeat; do + case "$1" in + -f|--force|--fast) + update=false + PAGER=cat + shift + ;; + -l|--local) + updateopt="$updateopt -l" + commitopt="$commitopt -l" + shift + ;; + -m|--message|--msg) + if test $# = 1; then + echo "$name: missing argument for $1" >&2 + break + fi + if test -f "$log_file"; then + echo "$name: you can have at most one of -m and -F" >&2 + break + fi + shift + echo "$1" > "$log_file" + shift + ;; + -F|--file) + if test -f "$log_file"; then + echo "$name: you can have at most one of -m and -F" >&2 + break + fi + if test $# = 1; then + echo "$name: missing argument for $1" >&2 + break + fi + shift + if cat < "$1" > "$log_file"; then :; else + break + fi + shift + ;; + -C|--[cC]hange[lL]og) + if test $# = 1; then + echo "$name: missing argument for $1" >&2 + break + fi + shift + if test ! -f "$1"; then + echo "$name: ChangeLog file \`$1' does not exist" >&2 + break + fi + ChangeLog="$1" + ;; + -n|--dry-run) + commit=false + update=true + shift + ;; + -q|--quiet) + cvsopt="$cvsopt -q" + shift + ;; + -z|--compress) + if test $# = 1; then + echo "$name: missing argument for $1" >&2 + break + fi + case "$2" in + [0-9]) :;; + *) echo "$name: invalid argument for $1" >&2 + break + ;; + esac + cvsopt="$cvsopt -z$2" + shift + shift + ;; + + -m*|-F*|-C*|-z*) + opt=`echo "$1" | sed '1s/^\(..\).*$/\1/;q'` + arg=`echo "$1" | sed '1s/^-[a-zA-Z0-9]//'` + shift + set -- "$opt" "$arg" ${1+"$@"} + ;; + --message=*|--msg=*|--file=*|--[Cc]hange[Ll]og=*|--compress=*) + opt=`echo "$1" | sed '1s/^\(--[^=]*\)=.*/\1/;q'` + arg=`echo "$1" | sed '1s/^--[^=]*=//'` + shift + set -- "$opt" "$arg" ${1+"$@"} + ;; + + -v|--version) + sed '/^# '$name' version /,/^# Heavily modified by/ { s/^# //; p; }; d' < $0 + exit 0 + ;; + -\?|-h) + sed '/^# usage:/,/# -h/ { s/^# //; p; }; d' < $0 && + echo + echo "run \`$name --help | more' for full usage" + exit 0 + ;; + --help) + sed '/^# '$name' version /,/^[^#]/ { /^[^#]/ d; s/^# //; p; }; d' < $0 + exit 0 + ;; + --) + shift + repeat=false + ;; + -*) + echo "$name: invalid flag $1" >&2 + break + ;; + *) + repeat=false + ;; + esac +done +# might have used break 2 within the previous loop, but so what +$repeat && break + +$update && \ +if echo "$name: checking for conflicts..." >&2 + (cvs $cvsopt -q -n update $updateopt ${1+"$@"} 2>/dev/null \ + | while read line; do + echo "$line" + echo "$line" >&3 + done | grep '^C') 3>&1 >/dev/null; then + echo "$name: some conflicts were found, aborting..." >&2 + break +fi + +if test ! -f "$log_file"; then + if test -z "$ChangeLog"; then + for f in ${1+"$@"}; do + case "$f" in + ChangeLog* | */ChangeLog*) + if test -z "$ChangeLog"; then + ChangeLog="$f" + else + echo "$name: multiple ChangeLog files: $ChangeLog and $f" >&2 + break + fi + ;; + esac + done + fi + + echo "$name: checking commit message..." >&2 + cvs $cvsopt diff -u $ChangeLog \ + | while read line; do + case "$line" in + "--- "*) :;; + "-"*) + echo "$name: *** Warning: the following line in ChangeLog diff is suspicious:" >&2 + echo "$line" | sed 's/^.//' >&2;; + "+ "*) + echo "$name: *** Warning: lines should start with tabs, not spaces; ignoring line:" >&2 + echo "$line" | sed 's/^.//' >&2;; + "+") echo;; + "+ "*) echo "$line";; + esac + done \ + | sed -e 's,\+ ,,' -e '/./p' -e '/./d' -e '1d' -e '$d' > "$log_file" \ + || break +# The sed script above removes "+TAB" from the beginning of a line, then +# deletes the first and/or the last line, when they happen to be empty +fi + +if grep '[^ ]' < "$log_file" > /dev/null; then :; else + echo "$name: empty commit message, aborting" >&2 + break +fi + +if grep '^$' < "$log_file" > /dev/null; then + echo "$name: *** Warning: blank lines should not appear within a commit messages." >&2 + echo "$name: *** They should be used to separate distinct commits." >&2 +fi + +${PAGER-more} "$log_file" || break + +sleep 1 # give the user some time for a ^C + +# Do not check for empty $log_file again, even though the user might have +# zeroed it out. If s/he did, it was probably intentional. + +if $commit; then + cvs $cvsopt commit $commitopt -F $log_file ${1+"$@"} || break +fi + +main_repeat=false +done + +rm -f "$log_file" + +# if main_repeat was not set to `false', we failed +$main_repeat && exit 1 +exit 0