diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2016-12-21 22:13:18 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2016-12-21 22:13:18 (GMT) |
commit | 07e464099b99459d0a37757771791598ef3395d9 (patch) | |
tree | 4ba7d8aad13735e52f59bdce7ca5ba3151ebd7e3 /tcl8.6/unix/installManPage | |
parent | deb3650e37f26f651f280e480c4df3d7dde87bae (diff) | |
download | blt-07e464099b99459d0a37757771791598ef3395d9.zip blt-07e464099b99459d0a37757771791598ef3395d9.tar.gz blt-07e464099b99459d0a37757771791598ef3395d9.tar.bz2 |
new subtree for tcl/tk
Diffstat (limited to 'tcl8.6/unix/installManPage')
-rwxr-xr-x | tcl8.6/unix/installManPage | 117 |
1 files changed, 0 insertions, 117 deletions
diff --git a/tcl8.6/unix/installManPage b/tcl8.6/unix/installManPage deleted file mode 100755 index 1f1cbde..0000000 --- a/tcl8.6/unix/installManPage +++ /dev/null @@ -1,117 +0,0 @@ -#!/bin/sh - -######################################################################## -### Parse Options -### - -Gzip=: -SymOrLoc="" -Gz="" -Suffix="" - -while true; do - case $1 in - -s | --symlinks ) SymOrLoc="-s " ;; - -z | --compress ) Gzip=$2; shift ;; - -e | --extension ) Gz=$2; shift ;; - -x | --suffix ) Suffix=$2; shift ;; - -*) cat <<EOF -Unknown option "$1". Supported options: - -s Use symbolic links for manpages with multiple names. - -z PROG Use PROG to compress manual pages. - -e EXT Defines the extension added by -z PROG when compressing. - -x SUFF Defines an extra extension suffix to use. -Option names may not be combined getopt-style. -EOF - exit 1 ;; - *) break ;; - esac - shift -done -if test "$#" != 2; then - echo "Usage: installManPages <options> file dir" - exit 1 -fi - -######################################################################## -### Parse Required Arguments -### - -ManPage=$1 -Dir=$2 -if test -f $ManPage ; then : ; else - echo "source manual page file must exist" - exit 1 -fi -if test -d $Dir ; then : ; else - echo "target directory must exist" - exit 1 -fi -test -z "$SymOrLoc" && SymOrLoc="$Dir/" - -######################################################################## -### Extract Target Names from Manual Page -### - -# A sed script to parse the alternative names out of a man page. -# -# Backslashes are trippled in the sed script, because it is in -# backticks which doesn't pass backslashes literally. -# -Names=`sed -n ' -# Look for a line that starts with .SH NAME - /^\.SH NAME/{ -# Read next line - n -# Remove all commas ... - s/,//g -# ... and backslash-escaped spaces. - s/\\\ //g -# Delete from \- to the end of line - s/ \\\-.*// -# Convert all non-space non-alphanum sequences -# to single underscores. - s/[^ A-Za-z0-9][^ A-Za-z0-9]*/_/g -# print the result and exit - p;q - }' $ManPage` - -if test -z "$Names" ; then - echo "warning: no target names found in $ManPage" -fi - -######################################################################## -### Remaining Set Up -### - -case $ManPage in - *.1) Section=1 ;; - *.3) Section=3 ;; - *.n) Section=n ;; - *) echo "unknown section for $ManPage" - exit 2 ;; -esac - -SrcDir=`dirname $ManPage` - -######################################################################## -### Process Page to Create Target Pages -### - -First="" -for Target in $Names; do - Target=$Target.$Section$Suffix - rm -f $Dir/$Target $Dir/$Target.* - if test -z "$First" ; then - First=$Target - sed -e "/man\.macros/r $SrcDir/man.macros" -e "/man\.macros/d" \ - $ManPage > $Dir/$First - chmod 644 $Dir/$First - $Gzip $Dir/$First - else - ln $SymOrLoc$First$Gz $Dir/$Target$Gz - fi -done - -######################################################################## -exit 0 |