ILIAS  release_4-4 Revision
Public Member Functions
getid3_pcd Class Reference

getID3() by James Heinrich info@.nosp@m.geti.nosp@m.d3.or.nosp@m.g // More...

+ Collaboration diagram for getid3_pcd:

Public Member Functions

 getid3_pcd (&$fd, &$ThisFileInfo, $ExtractData=0)
 
 YCbCr2RGB ($Y, $Cb, $Cr)
 

Detailed Description

getID3() by James Heinrich info@.nosp@m.geti.nosp@m.d3.or.nosp@m.g //

Definition at line 17 of file module.graphic.pcd.php.

Member Function Documentation

◆ getid3_pcd()

getid3_pcd::getid3_pcd ( &  $fd,
&  $ThisFileInfo,
  $ExtractData = 0 
)

Definition at line 19 of file module.graphic.pcd.php.

References YCbCr2RGB().

19  {
20  $ThisFileInfo['fileformat'] = 'pcd';
21  $ThisFileInfo['video']['dataformat'] = 'pcd';
22  $ThisFileInfo['video']['lossless'] = false;
23 
24 
25  fseek($fd, $ThisFileInfo['avdataoffset'] + 72, SEEK_SET);
26 
27  $PCDflags = fread($fd, 1);
28  $PCDisVertical = ((ord($PCDflags) & 0x01) ? true : false);
29 
30 
31  if ($PCDisVertical) {
32  $ThisFileInfo['video']['resolution_x'] = 3072;
33  $ThisFileInfo['video']['resolution_y'] = 2048;
34  } else {
35  $ThisFileInfo['video']['resolution_x'] = 2048;
36  $ThisFileInfo['video']['resolution_y'] = 3072;
37  }
38 
39 
40  if ($ExtractData > 3) {
41 
42  $ThisFileInfo['error'][] = 'Cannot extract PSD image data for detail levels above BASE (3)';
43 
44  } elseif ($ExtractData > 0) {
45 
46  $PCD_levels[1] = array( 192, 128, 0x02000); // BASE/16
47  $PCD_levels[2] = array( 384, 256, 0x0B800); // BASE/4
48  $PCD_levels[3] = array( 768, 512, 0x30000); // BASE
49  //$PCD_levels[4] = array(1536, 1024, ??); // BASE*4 - encrypted with Kodak-proprietary compression/encryption
50  //$PCD_levels[5] = array(3072, 2048, ??); // BASE*16 - encrypted with Kodak-proprietary compression/encryption
51  //$PCD_levels[6] = array(6144, 4096, ??); // BASE*64 - encrypted with Kodak-proprietary compression/encryption; PhotoCD-Pro only
52 
53  list($PCD_width, $PCD_height, $PCD_dataOffset) = $PCD_levels[3];
54 
55  fseek($fd, $ThisFileInfo['avdataoffset'] + $PCD_dataOffset, SEEK_SET);
56 
57  for ($y = 0; $y < $PCD_height; $y += 2) {
58  // The image-data of these subtypes start at the respective offsets of 02000h, 0b800h and 30000h.
59  // To decode the YcbYr to the more usual RGB-code, three lines of data have to be read, each
60  // consisting of ‘w’ bytes, where ‘w’ is the width of the image-subtype. The first ‘w’ bytes and
61  // the first half of the third ‘w’ bytes contain data for the first RGB-line, the second ‘w’ bytes
62  // and the second half of the third ‘w’ bytes contain data for a second RGB-line.
63 
64  $PCD_data_Y1 = fread($fd, $PCD_width);
65  $PCD_data_Y2 = fread($fd, $PCD_width);
66  $PCD_data_Cb = fread($fd, intval(round($PCD_width / 2)));
67  $PCD_data_Cr = fread($fd, intval(round($PCD_width / 2)));
68 
69  for ($x = 0; $x < $PCD_width; $x++) {
70  if ($PCDisVertical) {
71  $ThisFileInfo['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)}));
72  $ThisFileInfo['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)}));
73  } else {
74  $ThisFileInfo['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)}));
75  $ThisFileInfo['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)}));
76  }
77  }
78  }
79 
80  // Example for plotting extracted data
81  //getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'module.audio.ac3.php', __FILE__, true);
82  //if ($PCDisVertical) {
83  // $BMPinfo['resolution_x'] = $PCD_height;
84  // $BMPinfo['resolution_y'] = $PCD_width;
85  //} else {
86  // $BMPinfo['resolution_x'] = $PCD_width;
87  // $BMPinfo['resolution_y'] = $PCD_height;
88  //}
89  //$BMPinfo['bmp']['data'] = $ThisFileInfo['pcd']['data'];
90  //getid3_bmp::PlotBMP($BMPinfo);
91  //exit;
92 
93  }
94 
95  }
getid3_pcd\YCbCr2RGB
YCbCr2RGB($Y, $Cb, $Cr)
Definition: module.graphic.pcd.php:97
+ Here is the call graph for this function:

◆ YCbCr2RGB()

getid3_pcd::YCbCr2RGB (   $Y,
  $Cb,
  $Cr 
)

Definition at line 97 of file module.graphic.pcd.php.

Referenced by getid3_pcd().

97  {
98  static $YCbCr_constants = array();
99  if (empty($YCbCr_constants)) {
100  $YCbCr_constants['red']['Y'] = 0.0054980 * 256;
101  $YCbCr_constants['red']['Cb'] = 0.0000000 * 256;
102  $YCbCr_constants['red']['Cr'] = 0.0051681 * 256;
103  $YCbCr_constants['green']['Y'] = 0.0054980 * 256;
104  $YCbCr_constants['green']['Cb'] = -0.0015446 * 256;
105  $YCbCr_constants['green']['Cr'] = -0.0026325 * 256;
106  $YCbCr_constants['blue']['Y'] = 0.0054980 * 256;
107  $YCbCr_constants['blue']['Cb'] = 0.0079533 * 256;
108  $YCbCr_constants['blue']['Cr'] = 0.0000000 * 256;
109  }
110 
111  $RGBcolor = array('red'=>0, 'green'=>0, 'blue'=>0);
112  foreach ($RGBcolor as $rgbname => $dummy) {
113  $RGBcolor[$rgbname] = max(0,
114  min(255,
115  intval(
116  round(
117  ($YCbCr_constants[$rgbname]['Y'] * $Y) +
118  ($YCbCr_constants[$rgbname]['Cb'] * ($Cb - 156)) +
119  ($YCbCr_constants[$rgbname]['Cr'] * ($Cr - 137))
120  )
121  )
122  )
123  );
124  }
125  return (($RGBcolor['red'] * 65536) + ($RGBcolor['green'] * 256) + $RGBcolor['blue']);
126  }
+ Here is the caller graph for this function:
The documentation for this class was generated from the following file: