char *linkname = NULL;
struct link *lp;
- assign_string (&linkname, st->orig_file_name);
+ assign_string (&linkname, safer_name_suffix (st->orig_file_name, true,
+ absolute_names_option));
transform_name (&linkname, XFORM_LINK);
lp = xmalloc (offsetof (struct link, name)
--- /dev/null
+# Process this file with autom4te to create testsuite. -*- Autotest -*-
+#
+# Test suite for GNU tar.
+# Copyright 2017 Free Software Foundation, Inc.
+#
+# This file is part of GNU tar.
+#
+# GNU tar 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 3 of the License, or
+# (at your option) any later version.
+#
+# GNU tar 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 <http://www.gnu.org/licenses/>.
+
+AT_SETUP([transforming hard link targets])
+AT_KEYWORDS([transform xform link])
+
+AT_TAR_CHECK([
+mkdir d
+mkdir d/a
+genfile --file d/a/b
+dir=$(pwd|sed s,^/,,)/d
+tar -cf a.tar --xform="s|^$dir/a|dir/c|" /$dir/a/b /$dir/a/b
+mkdir t
+tar -C t -xf a.tar
+find t -type f
+],
+[0],
+[t/dir/c/b
+],
+[tar: Removing leading `/' from member names
+tar: Removing leading `/' from hard link targets
+])
+AT_CLEANUP
+