19 function getid3_pcd(&$fd, &$ThisFileInfo, $ExtractData=0) {
20 $ThisFileInfo[
'fileformat'] =
'pcd';
21 $ThisFileInfo[
'video'][
'dataformat'] =
'pcd';
22 $ThisFileInfo[
'video'][
'lossless'] =
false;
25 fseek($fd, $ThisFileInfo[
'avdataoffset'] + 72, SEEK_SET);
27 $PCDflags = fread($fd, 1);
28 $PCDisVertical = ((ord($PCDflags) & 0x01) ?
true :
false);
32 $ThisFileInfo[
'video'][
'resolution_x'] = 3072;
33 $ThisFileInfo[
'video'][
'resolution_y'] = 2048;
35 $ThisFileInfo[
'video'][
'resolution_x'] = 2048;
36 $ThisFileInfo[
'video'][
'resolution_y'] = 3072;
40 if ($ExtractData > 3) {
42 $ThisFileInfo[
'error'][] =
'Cannot extract PSD image data for detail levels above BASE (3)';
44 } elseif ($ExtractData > 0) {
46 $PCD_levels[1] = array( 192, 128, 0x02000);
47 $PCD_levels[2] = array( 384, 256, 0x0B800);
48 $PCD_levels[3] = array( 768, 512, 0x30000);
53 list($PCD_width, $PCD_height, $PCD_dataOffset) = $PCD_levels[3];
55 fseek($fd, $ThisFileInfo[
'avdataoffset'] + $PCD_dataOffset, SEEK_SET);
57 for (
$y = 0;
$y < $PCD_height;
$y += 2) {
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)));
69 for (
$x = 0;
$x < $PCD_width;
$x++) {
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)}));
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)}));
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;
111 $RGBcolor = array(
'red'=>0,
'green'=>0,
'blue'=>0);
112 foreach ($RGBcolor as $rgbname => $dummy) {
113 $RGBcolor[$rgbname] = max(0,
117 ($YCbCr_constants[$rgbname][
'Y'] *
$Y) +
118 ($YCbCr_constants[$rgbname][
'Cb'] * ($Cb - 156)) +
119 ($YCbCr_constants[$rgbname][
'Cr'] * ($Cr - 137))
125 return (($RGBcolor[
'red'] * 65536) + ($RGBcolor[
'green'] * 256) + $RGBcolor[
'blue']);