ILIAS  release_5-3 Revision v5.3.23-19-g915713cf615
module.graphic.pcd.php
Go to the documentation of this file.
1 <?php
4 // available at http://getid3.sourceforge.net //
5 // or http://www.getid3.org //
6 // also https://github.com/JamesHeinrich/getID3 //
8 // See readme.txt for more details //
10 // //
11 // module.graphic.pcd.php //
12 // module for analyzing PhotoCD (PCD) Image files //
13 // dependencies: NONE //
14 // ///
16 
17 
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 ‘w’ bytes, where ‘w’ is the width of the image-subtype. The first ‘w’ bytes and
66  // the first half of the third ‘w’ bytes contain data for the first RGB-line, the second ‘w’ bytes
67  // and the second half of the third ‘w’ 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 }
$x
Definition: example_009.php:98
error($text)
Definition: getid3.php:1752
YCbCr2RGB($Y, $Cb, $Cr)
getID3() by James Heinrich info@getid3.org //
$y
Definition: example_007.php:83
fread($bytes)
Definition: getid3.php:1683
Create styles array
The data for the language used.
fseek($bytes, $whence=SEEK_SET)
Definition: getid3.php:1711
$info
Definition: index.php:5