|
|
@ -0,0 +1,30 @@ |
|
|
|
From 7340f67b9860ea0531c1450e5aa261c50f67165d Mon Sep 17 00:00:00 2001 |
|
|
|
From: Paul Eggert <eggert@Penguin.CS.UCLA.EDU> |
|
|
|
Date: Sat, 29 Oct 2016 21:04:40 -0700 |
|
|
|
Subject: When extracting, skip ".." members |
|
|
|
|
|
|
|
* src/extract.c (extract_archive): Skip members whose names |
|
|
|
contain "..". |
|
|
|
--- a/src/extract.c
|
|
|
|
+++ b/src/extract.c
|
|
|
|
@@ -1629,12 +1629,20 @@ extract_archive (void)
|
|
|
|
{ |
|
|
|
char typeflag; |
|
|
|
tar_extractor_t fun; |
|
|
|
+ bool skip_dotdot_name;
|
|
|
|
|
|
|
|
fatal_exit_hook = extract_finish; |
|
|
|
|
|
|
|
set_next_block_after (current_header); |
|
|
|
|
|
|
|
+ skip_dotdot_name = (!absolute_names_option
|
|
|
|
+ && contains_dot_dot (current_stat_info.orig_file_name));
|
|
|
|
+ if (skip_dotdot_name)
|
|
|
|
+ ERROR ((0, 0, _("%s: Member name contains '..'"),
|
|
|
|
+ quotearg_colon (current_stat_info.orig_file_name)));
|
|
|
|
+
|
|
|
|
if (!current_stat_info.file_name[0] |
|
|
|
+ || skip_dotdot_name
|
|
|
|
|| (interactive_option |
|
|
|
&& !confirm ("extract", current_stat_info.file_name))) |
|
|
|
{ |