diff --git a/ext/phar/tests/tar/files/tinylink.tar b/ext/phar/tests/tar/files/tinylink.tar
new file mode 100644
index 00000000000..741b56c2f5c
Binary files /dev/null and b/ext/phar/tests/tar/files/tinylink.tar differ
diff --git a/ext/phar/tests/tar/links4.phpt b/ext/phar/tests/tar/links4.phpt
new file mode 100644
index 00000000000..d0783e84aca
--- /dev/null
+++ b/ext/phar/tests/tar/links4.phpt
@@ -0,0 +1,19 @@
+--TEST--
+Phar: tar with link to root directory file from root directory file
+--SKIPIF--
+<?php if (!extension_loaded("phar")) die("skip"); ?>
+--FILE--
+<?php
+try {
+	$p = new PharData(dirname(__FILE__) . '/files/tinylink.tar');
+} catch (Exception $e) {
+	echo $e->getMessage() . "\n";
+}
+echo $p['file.txt']->getContent();
+echo $p['link.txt']->getContent();
+?>
+===DONE===
+--EXPECT--
+hi
+hi
+===DONE===
diff --git a/ext/phar/util.c b/ext/phar/util.c
index 09258b1f96b..0add3b913e1 100644
--- a/ext/phar/util.c
+++ b/ext/phar/util.c
@@ -28,22 +28,19 @@ extern php_stream_wrapper php_stream_phar_wrapper;
 /* for links to relative location, prepend cwd of the entry */
 static char *phar_get_link_location(phar_entry_info *entry TSRMLS_DC)
 {
-	char *tmp, *p, *ret = NULL;
+	char *p, *ret = NULL;
 	if (!entry->link) {
 		return NULL;
 	}
 	if (entry->link[0] == '/') {
 		return estrdup(entry->link + 1);
 	}
-	tmp = estrndup(entry->filename, entry->filename_len);
-	p = strrchr(tmp, '/');
+	p = strrchr(entry->filename, '/');
 	if (p) {
 		*p = '\0';
-		spprintf(&ret, 0, "%s/%s", tmp, entry->link);
-		efree(tmp);
+		spprintf(&ret, 0, "%s/%s", entry->filename, entry->link);
 		return ret;
 	}
-	efree(ret);
 	return entry->link;
 }