blob: ad4ddf87e47c98d0f1f69a4ba513fd3627b52b74 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
#! /bin/sh
# Copyright (C) 2012-2017 Free Software Foundation, Inc.
#
# 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; either version 2, or (at your option)
# any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <https://www.gnu.org/licenses/>.
# Test Automake-provided internal make macro $(am__relativize).
am_create_testdir=empty
. test-init.sh
plan_ later
mkdir uber uber/top
cd uber/top
: > install-sh
: > missing
cat >> configure.ac <<END
AC_INIT([$me], [1.0])
AM_INIT_AUTOMAKE
AC_CONFIG_FILES([Makefile])
AC_OUTPUT
END
cat > Makefile.am << 'END'
# The 'am__relitivize' definition is only brought in when
# SUBDIRS are defined.
SUBDIRS = .
.PHONY: test
test:
@$(am__relativize); echo "result: '$$reldir'"; set -x; \
case $${reldir:-.} in "$$exp"|"$$exp/.") ;; *) exit 1;; esac
END
$ACLOCAL && $AUTOMAKE && $AUTOCONF && ./configure || fatal_ "setup failure"
rel_ ()
{
case $1 in -x) directive=TODO; shift;; *) directive=;; esac
test $# -eq 4 && test x"$3" = x"=" || fatal_ "rel_: incorrect usage"
command_ok_ "$1/{$4} = $2" -D "$directive" \
env dir1=$1 dir2=$2 exp=$4 $MAKE test
}
# am__relativize
# ~~~~~~~~~~~~~~
# Computes a relative pathname RELDIR such that DIR1/RELDIR = DIR2.
# Input:
# - DIR1 relative pathname, relative to the current directory
# - DIR2 relative pathname, relative to the current directory
# Output:
# - reldir relative pathname of DIR2, relative to DIR1
rel_ . . = .
rel_ . .. = ..
rel_ .. . = top
for d in x long-longer a/b 1/2/3/4/5; do
rel_ $d $d = .
for d2 in . .. x r/s/t; do
rel_ $d $d/$d2 = $d2
done
done
rel_ one two = ../two
rel_ a b/c = ../b/c
rel_ a/b . = ../..
rel_ a/b foo = ../../foo
rel_ a/b foo/bar = ../../foo/bar
rel_ a/b a/c = ../c
rel_ a/b a/c/d = ../c/d
rel_ foo/bar/baz foo/bar/qux/zap = ../qux/zap
rel_ ../foo . = ../top
rel_ ../.. . = uber/top
rel_ ../../foo . = ../uber/top
rel_ ../../x ok = ../uber/top/ok
rel_ ../../x bo/ba = ../uber/top/bo/ba
rel_ ../../x ../ok2 = ../uber/top/../ok2
rel_ ../a/b/c/d/e . = ../../../../../top
:
|
