source: spip-zone/_core_/branches/spip-3.2/plugins/medias/lib/getid3/module.archive.tar.php @ 113162

Last change on this file since 113162 was 113162, checked in by spip.franck@…, 5 months ago

Mise à jour de la lib getid en version 1.9.16, nous étions en 1.9.14
https://github.com/JamesHeinrich/getID3/blob/master/changelog.txt

File size: 6.7 KB
Line 
1<?php
2
3/////////////////////////////////////////////////////////////////
4/// getID3() by James Heinrich <info@getid3.org>               //
5//  available at https://github.com/JamesHeinrich/getID3       //
6//            or https://www.getid3.org                        //
7//            or http://getid3.sourceforge.net                 //
8//  see readme.txt for more details                            //
9/////////////////////////////////////////////////////////////////
10//                                                             //
11// module.archive.tar.php                                      //
12// module for analyzing TAR files                              //
13// dependencies: NONE                                          //
14//                                                            ///
15/////////////////////////////////////////////////////////////////
16//                                                             //
17// Module originally written by                                //
18//      Mike Mozolin <teddybearØmail*ru>                       //
19//                                                             //
20/////////////////////////////////////////////////////////////////
21
22
23class getid3_tar extends getid3_handler
24{
25        /**
26         * @return bool
27         */
28        public function Analyze() {
29                $info = &$this->getid3->info;
30
31                $info['fileformat'] = 'tar';
32                $info['tar']['files'] = array();
33
34                $unpack_header = 'a100fname/a8mode/a8uid/a8gid/a12size/a12mtime/a8chksum/a1typflag/a100lnkname/a6magic/a2ver/a32uname/a32gname/a8devmaj/a8devmin/a155prefix';
35                $null_512k = str_repeat("\x00", 512); // end-of-file marker
36
37                $this->fseek(0);
38                while (!feof($this->getid3->fp)) {
39                        $buffer = $this->fread(512);
40                        if (strlen($buffer) < 512) {
41                                break;
42                        }
43
44                        // check the block
45                        $checksum = 0;
46                        for ($i = 0; $i < 148; $i++) {
47                                $checksum += ord($buffer{$i});
48                        }
49                        for ($i = 148; $i < 156; $i++) {
50                                $checksum += ord(' ');
51                        }
52                        for ($i = 156; $i < 512; $i++) {
53                                $checksum += ord($buffer{$i});
54                        }
55                        $attr    = unpack($unpack_header, $buffer);
56                        $name    =       (isset($attr['fname']  ) ? trim($attr['fname']  ) : '');
57                        $mode    = octdec(isset($attr['mode']   ) ? trim($attr['mode']   ) : '');
58                        $uid     = octdec(isset($attr['uid']    ) ? trim($attr['uid']    ) : '');
59                        $gid     = octdec(isset($attr['gid']    ) ? trim($attr['gid']    ) : '');
60                        $size    = octdec(isset($attr['size']   ) ? trim($attr['size']   ) : '');
61                        $mtime   = octdec(isset($attr['mtime']  ) ? trim($attr['mtime']  ) : '');
62                        $chksum  = octdec(isset($attr['chksum'] ) ? trim($attr['chksum'] ) : '');
63                        $typflag =       (isset($attr['typflag']) ? trim($attr['typflag']) : '');
64                        $lnkname =       (isset($attr['lnkname']) ? trim($attr['lnkname']) : '');
65                        $magic   =       (isset($attr['magic']  ) ? trim($attr['magic']  ) : '');
66                        $ver     =       (isset($attr['ver']    ) ? trim($attr['ver']    ) : '');
67                        $uname   =       (isset($attr['uname']  ) ? trim($attr['uname']  ) : '');
68                        $gname   =       (isset($attr['gname']  ) ? trim($attr['gname']  ) : '');
69                        $devmaj  = octdec(isset($attr['devmaj'] ) ? trim($attr['devmaj'] ) : '');
70                        $devmin  = octdec(isset($attr['devmin'] ) ? trim($attr['devmin'] ) : '');
71                        $prefix  =       (isset($attr['prefix'] ) ? trim($attr['prefix'] ) : '');
72                        if (($checksum == 256) && ($chksum == 0)) {
73                                // EOF Found
74                                break;
75                        }
76                        if ($prefix) {
77                                $name = $prefix.'/'.$name;
78                        }
79                        if ((preg_match('#/$#', $name)) && !$name) {
80                                $typeflag = 5;
81                        }
82                        if ($buffer == $null_512k) {
83                                // it's the end of the tar-file...
84                                break;
85                        }
86
87                        // Read to the next chunk
88                        $this->fseek($size, SEEK_CUR);
89
90                        $diff = $size % 512;
91                        if ($diff != 0) {
92                                // Padding, throw away
93                                $this->fseek((512 - $diff), SEEK_CUR);
94                        }
95                        // Protect against tar-files with garbage at the end
96                        if ($name == '') {
97                                break;
98                        }
99                        $info['tar']['file_details'][$name] = array (
100                                'name'     => $name,
101                                'mode_raw' => $mode,
102                                'mode'     => self::display_perms($mode),
103                                'uid'      => $uid,
104                                'gid'      => $gid,
105                                'size'     => $size,
106                                'mtime'    => $mtime,
107                                'chksum'   => $chksum,
108                                'typeflag' => self::get_flag_type($typflag),
109                                'linkname' => $lnkname,
110                                'magic'    => $magic,
111                                'version'  => $ver,
112                                'uname'    => $uname,
113                                'gname'    => $gname,
114                                'devmajor' => $devmaj,
115                                'devminor' => $devmin
116                        );
117                        $info['tar']['files'] = getid3_lib::array_merge_clobber($info['tar']['files'], getid3_lib::CreateDeepArray($info['tar']['file_details'][$name]['name'], '/', $size));
118                }
119                return true;
120        }
121
122        /**
123         * Parses the file mode to file permissions.
124         *
125         * @param int $mode
126         *
127         * @return string
128         */
129        public function display_perms($mode) {
130                // Determine Type
131                if     ($mode & 0x1000) $type='p'; // FIFO pipe
132                elseif ($mode & 0x2000) $type='c'; // Character special
133                elseif ($mode & 0x4000) $type='d'; // Directory
134                elseif ($mode & 0x6000) $type='b'; // Block special
135                elseif ($mode & 0x8000) $type='-'; // Regular
136                elseif ($mode & 0xA000) $type='l'; // Symbolic Link
137                elseif ($mode & 0xC000) $type='s'; // Socket
138                else                    $type='u'; // UNKNOWN
139
140                // Determine permissions
141                $owner['read']    = (($mode & 00400) ? 'r' : '-');
142                $owner['write']   = (($mode & 00200) ? 'w' : '-');
143                $owner['execute'] = (($mode & 00100) ? 'x' : '-');
144                $group['read']    = (($mode & 00040) ? 'r' : '-');
145                $group['write']   = (($mode & 00020) ? 'w' : '-');
146                $group['execute'] = (($mode & 00010) ? 'x' : '-');
147                $world['read']    = (($mode & 00004) ? 'r' : '-');
148                $world['write']   = (($mode & 00002) ? 'w' : '-');
149                $world['execute'] = (($mode & 00001) ? 'x' : '-');
150
151                // Adjust for SUID, SGID and sticky bit
152                if ($mode & 0x800) $owner['execute'] = ($owner['execute'] == 'x') ? 's' : 'S';
153                if ($mode & 0x400) $group['execute'] = ($group['execute'] == 'x') ? 's' : 'S';
154                if ($mode & 0x200) $world['execute'] = ($world['execute'] == 'x') ? 't' : 'T';
155
156                $s  = sprintf('%1s', $type);
157                $s .= sprintf('%1s%1s%1s',      $owner['read'], $owner['write'], $owner['execute']);
158                $s .= sprintf('%1s%1s%1s',      $group['read'], $group['write'], $group['execute']);
159                $s .= sprintf('%1s%1s%1s'."\n", $world['read'], $world['write'], $world['execute']);
160                return $s;
161        }
162
163        /**
164         * Converts the file type.
165         *
166         * @param string $typflag
167         *
168         * @return mixed|string
169         */
170        public function get_flag_type($typflag) {
171                static $flag_types = array(
172                        '0' => 'LF_NORMAL',
173                        '1' => 'LF_LINK',
174                        '2' => 'LF_SYNLINK',
175                        '3' => 'LF_CHR',
176                        '4' => 'LF_BLK',
177                        '5' => 'LF_DIR',
178                        '6' => 'LF_FIFO',
179                        '7' => 'LF_CONFIG',
180                        'D' => 'LF_DUMPDIR',
181                        'K' => 'LF_LONGLINK',
182                        'L' => 'LF_LONGNAME',
183                        'M' => 'LF_MULTIVOL',
184                        'N' => 'LF_NAMES',
185                        'S' => 'LF_SPARSE',
186                        'V' => 'LF_VOLHDR'
187                );
188                return (isset($flag_types[$typflag]) ? $flag_types[$typflag] : '');
189        }
190
191}
Note: See TracBrowser for help on using the repository browser.