[SPIP][PLUGINS] v3.0-->v3.2
[lhc/web/www.git] / www / plugins-dist / medias / lib / getid3 / module.graphic.pcd.php
1 <?php
2 /////////////////////////////////////////////////////////////////
3 /// getID3() by James Heinrich <info@getid3.org> //
4 // available at http://getid3.sourceforge.net //
5 // or http://www.getid3.org //
6 // also https://github.com/JamesHeinrich/getID3 //
7 /////////////////////////////////////////////////////////////////
8 // See readme.txt for more details //
9 /////////////////////////////////////////////////////////////////
10 // //
11 // module.graphic.pcd.php //
12 // module for analyzing PhotoCD (PCD) Image files //
13 // dependencies: NONE //
14 // ///
15 /////////////////////////////////////////////////////////////////
16
17
18 class getid3_pcd extends getid3_handler
19 {
20 public $ExtractData = 0;
21
22 public function Analyze() {
23 $info = &$this->getid3->info;
24
25 $info['fileformat'] = 'pcd';
26 $info['video']['dataformat'] = 'pcd';
27 $info['video']['lossless'] = false;
28
29
30 $this->fseek($info['avdataoffset'] + 72);
31
32 $PCDflags = $this->fread(1);
33 $PCDisVertical = ((ord($PCDflags) & 0x01) ? true : false);
34
35
36 if ($PCDisVertical) {
37 $info['video']['resolution_x'] = 3072;
38 $info['video']['resolution_y'] = 2048;
39 } else {
40 $info['video']['resolution_x'] = 2048;
41 $info['video']['resolution_y'] = 3072;
42 }
43
44
45 if ($this->ExtractData > 3) {
46
47 $this->error('Cannot extract PSD image data for detail levels above BASE (level-3) because encrypted with Kodak-proprietary compression/encryption.');
48
49 } elseif ($this->ExtractData > 0) {
50
51 $PCD_levels[1] = array( 192, 128, 0x02000); // BASE/16
52 $PCD_levels[2] = array( 384, 256, 0x0B800); // BASE/4
53 $PCD_levels[3] = array( 768, 512, 0x30000); // BASE
54 //$PCD_levels[4] = array(1536, 1024, ??); // BASE*4 - encrypted with Kodak-proprietary compression/encryption
55 //$PCD_levels[5] = array(3072, 2048, ??); // BASE*16 - encrypted with Kodak-proprietary compression/encryption
56 //$PCD_levels[6] = array(6144, 4096, ??); // BASE*64 - encrypted with Kodak-proprietary compression/encryption; PhotoCD-Pro only
57
58 list($PCD_width, $PCD_height, $PCD_dataOffset) = $PCD_levels[3];
59
60 $this->fseek($info['avdataoffset'] + $PCD_dataOffset);
61
62 for ($y = 0; $y < $PCD_height; $y += 2) {
63 // The image-data of these subtypes start at the respective offsets of 02000h, 0b800h and 30000h.
64 // To decode the YcbYr to the more usual RGB-code, three lines of data have to be read, each
65 // consisting of \91w\92 bytes, where \91w\92 is the width of the image-subtype. The first \91w\92 bytes and
66 // the first half of the third \91w\92 bytes contain data for the first RGB-line, the second \91w\92 bytes
67 // and the second half of the third \91w\92 bytes contain data for a second RGB-line.
68
69 $PCD_data_Y1 = $this->fread($PCD_width);
70 $PCD_data_Y2 = $this->fread($PCD_width);
71 $PCD_data_Cb = $this->fread(intval(round($PCD_width / 2)));
72 $PCD_data_Cr = $this->fread(intval(round($PCD_width / 2)));
73
74 for ($x = 0; $x < $PCD_width; $x++) {
75 if ($PCDisVertical) {
76 $info['pcd']['data'][$PCD_width - $x][$y] = $this->YCbCr2RGB(ord($PCD_data_Y1{$x}), ord($PCD_data_Cb{floor($x / 2)}), ord($PCD_data_Cr{floor($x / 2)}));
77 $info['pcd']['data'][$PCD_width - $x][$y + 1] = $this->YCbCr2RGB(ord($PCD_data_Y2{$x}), ord($PCD_data_Cb{floor($x / 2)}), ord($PCD_data_Cr{floor($x / 2)}));
78 } else {
79 $info['pcd']['data'][$y][$x] = $this->YCbCr2RGB(ord($PCD_data_Y1{$x}), ord($PCD_data_Cb{floor($x / 2)}), ord($PCD_data_Cr{floor($x / 2)}));
80 $info['pcd']['data'][$y + 1][$x] = $this->YCbCr2RGB(ord($PCD_data_Y2{$x}), ord($PCD_data_Cb{floor($x / 2)}), ord($PCD_data_Cr{floor($x / 2)}));
81 }
82 }
83 }
84
85 // Example for plotting extracted data
86 //getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'module.audio.ac3.php', __FILE__, true);
87 //if ($PCDisVertical) {
88 // $BMPinfo['resolution_x'] = $PCD_height;
89 // $BMPinfo['resolution_y'] = $PCD_width;
90 //} else {
91 // $BMPinfo['resolution_x'] = $PCD_width;
92 // $BMPinfo['resolution_y'] = $PCD_height;
93 //}
94 //$BMPinfo['bmp']['data'] = $info['pcd']['data'];
95 //getid3_bmp::PlotBMP($BMPinfo);
96 //exit;
97
98 }
99
100 }
101
102 public function YCbCr2RGB($Y, $Cb, $Cr) {
103 static $YCbCr_constants = array();
104 if (empty($YCbCr_constants)) {
105 $YCbCr_constants['red']['Y'] = 0.0054980 * 256;
106 $YCbCr_constants['red']['Cb'] = 0.0000000 * 256;
107 $YCbCr_constants['red']['Cr'] = 0.0051681 * 256;
108 $YCbCr_constants['green']['Y'] = 0.0054980 * 256;
109 $YCbCr_constants['green']['Cb'] = -0.0015446 * 256;
110 $YCbCr_constants['green']['Cr'] = -0.0026325 * 256;
111 $YCbCr_constants['blue']['Y'] = 0.0054980 * 256;
112 $YCbCr_constants['blue']['Cb'] = 0.0079533 * 256;
113 $YCbCr_constants['blue']['Cr'] = 0.0000000 * 256;
114 }
115
116 $RGBcolor = array('red'=>0, 'green'=>0, 'blue'=>0);
117 foreach ($RGBcolor as $rgbname => $dummy) {
118 $RGBcolor[$rgbname] = max(0,
119 min(255,
120 intval(
121 round(
122 ($YCbCr_constants[$rgbname]['Y'] * $Y) +
123 ($YCbCr_constants[$rgbname]['Cb'] * ($Cb - 156)) +
124 ($YCbCr_constants[$rgbname]['Cr'] * ($Cr - 137))
125 )
126 )
127 )
128 );
129 }
130 return (($RGBcolor['red'] * 65536) + ($RGBcolor['green'] * 256) + $RGBcolor['blue']);
131 }
132
133 }