Code Duplication    Length = 7-7 lines in 2 locations

class/pcltar.lib.php 2 locations

@@ 1942-1948 (lines=7) @@
1939
        }
1940
1941
        // ----- Open the tar file
1942
        if ($p_tar_mode === 'tar') {
1943
            TrFctMessage(__FILE__, __LINE__, 3, 'Open file in binary read mode');
1944
            $v_tar = fopen($p_tarname, 'rb');
1945
        } else {
1946
            TrFctMessage(__FILE__, __LINE__, 3, 'Open file in gzip binary read mode');
1947
            $v_tar = @gzopen($p_tarname, 'rb');
1948
        }
1949
1950
        // ----- Check that the archive is open
1951
        if ($v_tar == 0) {
@@ 2338-2344 (lines=7) @@
2335
        $p_remove_path_size = strlen($p_remove_path);
2336
2337
        // ----- Open the tar file
2338
        if ($p_tar_mode === 'tar') {
2339
            TrFctMessage(__FILE__, __LINE__, 3, 'Open file in binary read mode');
2340
            $v_tar = @fopen($p_tarname, 'rb');
2341
        } else {
2342
            TrFctMessage(__FILE__, __LINE__, 3, 'Open file in gzip binary read mode');
2343
            $v_tar = @gzopen($p_tarname, 'rb');
2344
        }
2345
2346
        // ----- Check that the archive is open
2347
        if ($v_tar == 0) {