* "chmod +x" when extracting archived executable files

Author: stigsb

pear/Archive/Tar.php

@@ -1367,8 +1367,11 @@ function _extractList($p_path, &$p_list_detail, $p_mode, $p_file_list, $p_remove
 
             // ----- Change the file mode, mtime
             @touch($v_header['filename'], $v_header['mtime']);
-            // To be completed
-            //chmod($v_header[filename], DecOct($v_header[mode]));
+            if ($v_header['mode'] & 0111) {
+                // make file executable, obey umask
+                $mode = fileperms($v_header['filename']) | (~umask() & 0111);
+                @chmod($v_header['filename'], $mode);
+            }
           }
 
           // ----- Check the file size