view install-sh @ 35160:75a8ca0bdd1d

(ansi-color-process-output): Use markers instead of positions for start and end of region. (ansi-color-apply-on-region): Rewrote code to make it more robust. Previously, occasional mistakes happend when fontifying many chunks of output (eg. ls --color=yes /dev). This happened whenever an overlay was created up to the end of the region, which coincided with the process-mark. New text would then be added within that overlay instead of after it. (ansi-color-make-extent): Overlays are created with the property `modification-hooks' set to '(ansi-color-freeze-overlay). (ansi-color-freeze-overlay): New function. When inserting text at the end of the overlay, the overlay will resize. (ansi-color-process-output): Doc change. (ansi-color-unfontify-region): Doc change. No longer installed automatically in font-lock-unfontify-region-function. (ansi-color-apply): Doc change. (ansi-color-apply-on-region): Use extents or overlays instead of text-properties. (ansi-color-make-extent): New function. (ansi-color-set-extent-face): New function. (ansi-color-process): Removed, Emacs and XEmacs both use ansi-color-process-output, now. (ansi-color-process-output): Doesn't return string anymore. It is installed in comint-output-filter-functions for both Emacs and XEmacs, now. (ansi-color-unfontify-region): Simplified code removing variables pos and start-ansi. (ansi-color-apply): Put text-property ansi-color before putting text-property face because ansi-color-unfontify-region is called immediately after the call to put-text-property. (ansi-color-context-region): Doc change. (ansi-color-filter-region): Simplified code. (ansi-color-apply-on-region): Changed start to start-marker, using a marker explicitly. Put text-property ansi-color before putting text-property face because ansi-color-unfontify-region is called immediately after the call to put-text-property. (ansi-color-faces-vector): Doc change. (ansi-color-for-comint-mode): Changed :type property to choice. (ansi-color-last-context): Removed. (ansi-color-process-output): Don't use ansi-color-last-context, as the main functions will store their context now. (ansi-color-context): Doc change. (ansi-color-filter-apply): Rewrote it based on ansi-color-apply. Uses ansi-color-context such that repeated calls will strip partial escape sequences, too. (ansi-color-apply): Simplified code. Colorize end of string if face is not null. Store context in new (FACE STRING) format, such that repeated calls will strip partial escape sequences, too. Append faces to face property using ansi-color-apply-sequence such that cumulative mode actually works. (ansi-color-context-region): New variable. (ansi-color-filter-region): Rewrote it based on ansi-color-apply-on-region. Uses ansi-color-context-region such that repeated calls will strip partial escape sequences, too. (ansi-color-apply-on-region): Simplified code. Colorize end of region if face is not null. Store context in new (FACE POS) format, such that repeated calls will strip partial escape sequences, too. Append faces to face property using ansi-color-apply-sequence such that cumulative mode actually works. (ansi-color-apply-sequence): New function. (ansi-color-get-face): When the default face is added to the list of faces, all previous settings are discarded and the list of faces is set to '(default). (ansi-color-faces-vector): Use nil for the default face, such that ansi-color-apply and ansi-color-apply-on-region will do the right thing. (ansi-color-apply): Do the right thing, ie. if ansi-color-get-face returns nil, set the list of faces back to nil instead of appending the result of ansi-color-get-face to the front of the list. (ansi-color-for-comint-mode): Doc change. (ansi-color-process): Doc change. (ansi-color-last-context): New buffer-local variable. (ansi-color-process-output): New function. It is automatically added to comint-output-filter-functions if this is XEmacs. (ansi-color-unfontify-region): New optional parameter for XEmacs compatibility. Check wether font-lock-syntactic-keywords is boundp before removing the syntax table text property, as XEmacs doesn't have it. (ansi-color-filter-region): Doc change. (ansi-color-apply-on-region): Doc change. (ansi-color-make-face): New function. Compatibility layer for XEmacs. Return temporary faces instead of cons cells for XEmacs. (ansi-color-make-color-map): Use ansi-color-make-face. (ansi-color-get-face): Avoid face text property '(nil) as results in an errow for XEmacs. (ansi-color-unfontify-region): New function. Uses text-property ansi-color in order to preserve fontification by ansi-color. When the package is loaded, a lambda expression is put onto font-lock-mode-hook. This lambda expression will check font-lock-unfontify-region-function and replace font-lock-default-unfontify-region with ansi-color-unfontify-region. (ansi-color-apply): Add text-property ansi-color in addition to text-property face. (ansi-color-apply-on-region): Add text-property ansi-color in addition to text-property face. (save-buffer-state): Copy of the macro that is also used by lazy-lock and font-lock. (ansi-color-for-comint-mode): New option. (ansi-color-for-comint-mode-on): Set ansi-color-for-comint-mode. (ansi-color-for-comint-mode-off): Ditto. (ansi-color-for-comint-mode-filter): Ditto. (ansi-color-process): New function. Uses ansi-color-for-comint-mode to decide what to do. This function is added to comint-preoutput-filter-functions when the package is loaded. (ansi-color-for-shell-mode-set): Removed. (ansi-color-for-shell-mode): Removed. (ansi-color-for-shell-mode-set): New function with the lambda expression from the ansi-color-for-shell-mode :set property. Additionally, modify shell-mode-hook to enable or disable font-lock-mode for future shell buffers. (ansi-color-for-shell-mode): The :set property calls ansi-color-for-shell-mode-set instead of a lambda expression. (ansi-color-for-shell-mode): Doc change. (ansi-color-context): New variable. (ansi-color-apply): Save context between calls.
author Gerd Moellmann <gerd@gnu.org>
date Tue, 09 Jan 2001 11:38:28 +0000
parents 35064c2e86d7
children 23a1cea22d13
line wrap: on
line source

#! /bin/sh
#
# install - install a program, script, or datafile
# This comes from X11R5 (mit/util/scripts/install.sh).
#
# Copyright 1991 by the Massachusetts Institute of Technology
#
# Permission to use, copy, modify, distribute, and sell this software and its
# documentation for any purpose is hereby granted without fee, provided that
# the above copyright notice appear in all copies and that both that
# copyright notice and this permission notice appear in supporting
# documentation, and that the name of M.I.T. not be used in advertising or
# publicity pertaining to distribution of the software without specific,
# written prior permission.  M.I.T. makes no representations about the
# suitability of this software for any purpose.  It is provided "as is"
# without express or implied warranty.
#
# Calling this script install-sh is preferred over install.sh, to prevent
# `make' implicit rules from creating a file called install from it
# when there is no Makefile.
#
# This script is compatible with the BSD install script, but was written
# from scratch.  It can only install one file at a time, a restriction
# shared with many OS's install programs.


# set DOITPROG to echo to test this script

# Don't use :- since 4.3BSD and earlier shells don't like it.
doit="${DOITPROG-}"


# put in absolute paths if you don't have them in your path; or use env. vars.

mvprog="${MVPROG-mv}"
cpprog="${CPPROG-cp}"
chmodprog="${CHMODPROG-chmod}"
chownprog="${CHOWNPROG-chown}"
chgrpprog="${CHGRPPROG-chgrp}"
stripprog="${STRIPPROG-strip}"
rmprog="${RMPROG-rm}"
mkdirprog="${MKDIRPROG-mkdir}"

transformbasename=""
transform_arg=""
instcmd="$mvprog"
chmodcmd="$chmodprog 0755"
chowncmd=""
chgrpcmd=""
stripcmd=""
rmcmd="$rmprog -f"
mvcmd="$mvprog"
src=""
dst=""
dir_arg=""

while [ x"$1" != x ]; do
    case $1 in
	-c) instcmd="$cpprog"
	    shift
	    continue;;

	-d) dir_arg=true
	    shift
	    continue;;

	-m) chmodcmd="$chmodprog $2"
	    shift
	    shift
	    continue;;

	-o) chowncmd="$chownprog $2"
	    shift
	    shift
	    continue;;

	-g) chgrpcmd="$chgrpprog $2"
	    shift
	    shift
	    continue;;

	-s) stripcmd="$stripprog"
	    shift
	    continue;;

	-t=*) transformarg=`echo $1 | sed 's/-t=//'`
	    shift
	    continue;;

	-b=*) transformbasename=`echo $1 | sed 's/-b=//'`
	    shift
	    continue;;

	*)  if [ x"$src" = x ]
	    then
		src=$1
	    else
		# this colon is to work around a 386BSD /bin/sh bug
		:
		dst=$1
	    fi
	    shift
	    continue;;
    esac
done

if [ x"$src" = x ]
then
	echo "install:	no input file specified"
	exit 1
else
	true
fi

if [ x"$dir_arg" != x ]; then
	dst=$src
	src=""
	
	if [ -d $dst ]; then
		instcmd=:
	else
		instcmd=mkdir
	fi
else

# Waiting for this to be detected by the "$instcmd $src $dsttmp" command
# might cause directories to be created, which would be especially bad 
# if $src (and thus $dsttmp) contains '*'.

	if [ -f $src -o -d $src ]
	then
		true
	else
		echo "install:  $src does not exist"
		exit 1
	fi
	
	if [ x"$dst" = x ]
	then
		echo "install:	no destination specified"
		exit 1
	else
		true
	fi

# If destination is a directory, append the input filename; if your system
# does not like double slashes in filenames, you may need to add some logic

	if [ -d $dst ]
	then
		dst="$dst"/`basename $src`
	else
		true
	fi
fi

## this sed command emulates the dirname command
dstdir=`echo $dst | sed -e 's,[^/]*$,,;s,/$,,;s,^$,.,'`

# Make sure that the destination directory exists.
#  this part is taken from Noah Friedman's mkinstalldirs script

# Skip lots of stat calls in the usual case.
if [ ! -d "$dstdir" ]; then
defaultIFS='	
'
IFS="${IFS-${defaultIFS}}"

oIFS="${IFS}"
# Some sh's can't handle IFS=/ for some reason.
IFS='%'
set - `echo ${dstdir} | sed -e 's@/@%@g' -e 's@^%@/@'`
IFS="${oIFS}"

pathcomp=''

while [ $# -ne 0 ] ; do
	pathcomp="${pathcomp}${1}"
	shift

	if [ ! -d "${pathcomp}" ] ;
        then
		$mkdirprog "${pathcomp}"
	else
		true
	fi

	pathcomp="${pathcomp}/"
done
fi

if [ x"$dir_arg" != x ]
then
	$doit $instcmd $dst &&

	if [ x"$chowncmd" != x ]; then $doit $chowncmd $dst; else true ; fi &&
	if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dst; else true ; fi &&
	if [ x"$stripcmd" != x ]; then $doit $stripcmd $dst; else true ; fi &&
	if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dst; else true ; fi
else

# If we're going to rename the final executable, determine the name now.

	if [ x"$transformarg" = x ] 
	then
		dstfile=`basename $dst`
	else
		dstfile=`basename $dst $transformbasename | 
			sed $transformarg`$transformbasename
	fi

# don't allow the sed command to completely eliminate the filename

	if [ x"$dstfile" = x ] 
	then
		dstfile=`basename $dst`
	else
		true
	fi

# Make a temp file name in the proper directory.

	dsttmp=$dstdir/#inst.$$#

# Move or copy the file name to the temp name

	$doit $instcmd $src $dsttmp &&

	trap "rm -f ${dsttmp}" 0 &&

# and set any options; do chmod last to preserve setuid bits

# If any of these fail, we abort the whole thing.  If we want to
# ignore errors from any of these, just make sure not to ignore
# errors from the above "$doit $instcmd $src $dsttmp" command.

	if [ x"$chowncmd" != x ]; then $doit $chowncmd $dsttmp; else true;fi &&
	if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dsttmp; else true;fi &&
	if [ x"$stripcmd" != x ]; then $doit $stripcmd $dsttmp; else true;fi &&
	if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dsttmp; else true;fi &&

# Now rename the file to the real destination.

	$doit $rmcmd -f $dstdir/$dstfile &&
	$doit $mvcmd $dsttmp $dstdir/$dstfile 

fi &&


exit 0