20 {
21
22 fseek($fd, $ThisFileInfo['avdataoffset'], SEEK_SET);
23 $SZIPHeader = fread($fd, 6);
24 if (substr($SZIPHeader, 0, 4) != 'SZ'."\x0A\x04") {
25 $ThisFileInfo['error'][] = 'Expecting "SZ[x0A][x04]" at offset '.$ThisFileInfo['avdataoffset'].', found "'.substr($SZIPHeader, 0, 4).'"';
26 return false;
27 }
28
29 $ThisFileInfo['fileformat'] = 'szip';
30
33
34 while (!feof($fd)) {
35 $NextBlockID = fread($fd, 2);
36 switch ($NextBlockID) {
37 case 'SZ':
38
39
40
41 fseek($fd, 4, SEEK_CUR);
42 break;
43
44 case 'BH':
46 $BHheaderdata = fread($fd, $BHheaderbytes);
47 $BHheaderoffset = 0;
48 while (strpos($BHheaderdata, "\x00", $BHheaderoffset) > 0) {
49
50
51
52
53
54
55
56
57
58 $BHdataArray['filename'] = substr($BHheaderdata, $BHheaderoffset, strcspn($BHheaderdata, "\x00"));
59 $BHheaderoffset += (strlen($BHdataArray['filename']) + 1);
60
61 $BHdataArray['owner'] = substr($BHheaderdata, $BHheaderoffset, strcspn($BHheaderdata, "\x00"));
62 $BHheaderoffset += (strlen($BHdataArray['owner']) + 1);
63
64 $BHdataArray['group'] = substr($BHheaderdata, $BHheaderoffset, strcspn($BHheaderdata, "\x00"));
65 $BHheaderoffset += (strlen($BHdataArray['group']) + 1);
66
68 $BHheaderoffset += 3;
69
71 $BHheaderoffset += 2;
72
74 $BHheaderoffset += 4;
75
77 $BHheaderoffset += 4;
78
80 $BHheaderoffset += 4;
81
82 $ThisFileInfo['szip']['BH'][] = $BHdataArray;
83 }
84 break;
85
86 default:
87 break 2;
88 }
89 }
90
91 return true;
92
93 }
BigEndian2Int($byteword, $synchsafe=false, $signed=false)