@ -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 |