Browse Source

Introduced bin/sde-list-files, an internal helper to transform files into their root relative form

misl/sde-wrapper
Alejandro Mery 17 years ago
parent
commit
438a311aca
1 changed files with 114 additions and 0 deletions
  1. +114
    -0
      bin/sde-list-files

+ 114
- 0
bin/sde-list-files

@ -0,0 +1,114 @@
#!/bin/sh
# --- SDE-COPYRIGHT-NOTE-BEGIN ---
# This copyright note is auto-generated by ./scripts/Create-CopyPatch.
#
# Filename: bin/sde-list-files
# Copyright (C) 2007 The OpenSDE Project
#
# More information can be found in the files COPYING and README.
#
# 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; version 2 of the License. A copy of the
# GNU General Public License can be found in the file COPYING.
# --- SDE-COPYRIGHT-NOTE-END ---
# This script returns a list of locations in SDEROOT relative form
#
[ -n "$SDEROOT" ] ||
export SDEROOT=$( cd "${0%/*}/.."; pwd -P )
. $SDEROOT/lib/libsde.in
list_usage() {
local progname=${0##*/}
cat <<EOT
Usage: $progname [--absolute] [--roots] [FILES...]
EOT
}
shortopts='a'
longopts='roots,absolute'
options=$( getopt -o "$shortopts" -l "$longopts" -- "$@" )
if [ $? -ne 0 ]; then
list_usage
exit -1
fi
# load new arguments list
eval set -- "$options"
show_roots=
show_absolute_path=
while [ $# -gt 0 ]; do
case "$1" in
--roots) show_roots=1 ;;
-a|--absolute) show_absolute_path=1 ;;
--) shift; break ;;
*) echo_abort 1 "Unknown argument '$1', aborting."
esac
shift
done
print_error() { echo "$@" >&2; }
print_file() {
local file="$1" root="$2"
if [ -z "$root" ]; then
# only filename
[ -n "$show_absolute_path" ] || file="${file#$SDEROOT/}"
elif [ "$root" == "." ]; then
# $SDEROOT is the root
[ -z "$show_absolute_path" ] || root="$SDEROOT"
else
[ -z "$show_absolute_path" ] || root="$SDEROOT/$root"
fi
if [ -n "$root" ]; then
echo "$root ${file#$SDEROOT/}"
else
echo "$file"
fi
}
for x; do
y=
if [ -e "$x" ]; then
if [ "${x:0:1}" == "/" ]; then
# absolute
y="$x"
else
# $PWD relative
y="$PWD/$x"
fi
elif [ -e "$SDEROOT/$x" ]; then
# $SDEROOT relative
y="$SDEROOT/$x"
fi
# canonicalize
[ -z "$y" ] || y=$( readlink -f "$y" )
# analyse
if [ -z "$y" ]; then
# missing
print_error "$x: not found."
elif [ "$y" == "$SDEROOT" ]; then
# uh, the root itself
print_file "." "."
elif ! expr "$y" : "$SDEROOT/*" > /dev/null; then
# missing
print_error "$x: outside the tree."
elif [ -n "$show_roots" ]; then
# detect the right VCS roots and split the output accordingly
print_file "$y" "."
else
# just output the list
print_file "$y"
fi
done

Loading…
Cancel
Save