1: <?php
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23: 24: 25: 26: 27: 28: 29:
30: class PHPExcel_Shared_OLE_PPS_Root extends PHPExcel_Shared_OLE_PPS
31: {
32:
33: 34: 35: 36:
37: protected $_tmp_dir = NULL;
38:
39: 40: 41: 42:
43: public function __construct($time_1st, $time_2nd, $raChild)
44: {
45: $this->_tempDir = PHPExcel_Shared_File::sys_get_temp_dir();
46:
47: parent::__construct(
48: null,
49: PHPExcel_Shared_OLE::Asc2Ucs('Root Entry'),
50: PHPExcel_Shared_OLE::OLE_PPS_TYPE_ROOT,
51: null,
52: null,
53: null,
54: $time_1st,
55: $time_2nd,
56: null,
57: $raChild);
58: }
59:
60: 61: 62: 63: 64: 65: 66: 67: 68: 69: 70:
71: public function save($filename)
72: {
73:
74: $this->_BIG_BLOCK_SIZE = pow(2,
75: ((isset($this->_BIG_BLOCK_SIZE))? self::_adjust2($this->_BIG_BLOCK_SIZE) : 9));
76: $this->_SMALL_BLOCK_SIZE= pow(2,
77: ((isset($this->_SMALL_BLOCK_SIZE))? self::_adjust2($this->_SMALL_BLOCK_SIZE): 6));
78:
79: if (is_resource($filename)) {
80: $this->_FILEH_ = $filename;
81: } else if ($filename == '-' || $filename == '') {
82: if ($this->_tmp_dir === NULL)
83: $this->_tmp_dir = PHPExcel_Shared_File::sys_get_temp_dir();
84: $this->_tmp_filename = tempnam($this->_tmp_dir, "OLE_PPS_Root");
85: $this->_FILEH_ = fopen($this->_tmp_filename,"w+b");
86: if ($this->_FILEH_ == false) {
87: throw new PHPExcel_Writer_Exception("Can't create temporary file.");
88: }
89: } else {
90: $this->_FILEH_ = fopen($filename, "wb");
91: }
92: if ($this->_FILEH_ == false) {
93: throw new PHPExcel_Writer_Exception("Can't open $filename. It may be in use or protected.");
94: }
95:
96: $aList = array();
97: PHPExcel_Shared_OLE_PPS::_savePpsSetPnt($aList, array($this));
98:
99: list($iSBDcnt, $iBBcnt, $iPPScnt) = $this->_calcSize($aList);
100:
101: $this->_saveHeader($iSBDcnt, $iBBcnt, $iPPScnt);
102:
103:
104: $this->_data = $this->_makeSmallData($aList);
105:
106:
107: $this->_saveBigData($iSBDcnt, $aList);
108:
109: $this->_savePps($aList);
110:
111: $this->_saveBbd($iSBDcnt, $iBBcnt, $iPPScnt);
112:
113: if (!is_resource($filename)) {
114: fclose($this->_FILEH_);
115: }
116:
117: return true;
118: }
119:
120: 121: 122: 123: 124: 125: 126:
127: public function _calcSize(&$raList)
128: {
129:
130: list($iSBDcnt, $iBBcnt, $iPPScnt) = array(0,0,0);
131: $iSmallLen = 0;
132: $iSBcnt = 0;
133: $iCount = count($raList);
134: for ($i = 0; $i < $iCount; ++$i) {
135: if ($raList[$i]->Type == PHPExcel_Shared_OLE::OLE_PPS_TYPE_FILE) {
136: $raList[$i]->Size = $raList[$i]->_DataLen();
137: if ($raList[$i]->Size < PHPExcel_Shared_OLE::OLE_DATA_SIZE_SMALL) {
138: $iSBcnt += floor($raList[$i]->Size / $this->_SMALL_BLOCK_SIZE)
139: + (($raList[$i]->Size % $this->_SMALL_BLOCK_SIZE)? 1: 0);
140: } else {
141: $iBBcnt += (floor($raList[$i]->Size / $this->_BIG_BLOCK_SIZE) +
142: (($raList[$i]->Size % $this->_BIG_BLOCK_SIZE)? 1: 0));
143: }
144: }
145: }
146: $iSmallLen = $iSBcnt * $this->_SMALL_BLOCK_SIZE;
147: $iSlCnt = floor($this->_BIG_BLOCK_SIZE / PHPExcel_Shared_OLE::OLE_LONG_INT_SIZE);
148: $iSBDcnt = floor($iSBcnt / $iSlCnt) + (($iSBcnt % $iSlCnt)? 1:0);
149: $iBBcnt += (floor($iSmallLen / $this->_BIG_BLOCK_SIZE) +
150: (( $iSmallLen % $this->_BIG_BLOCK_SIZE)? 1: 0));
151: $iCnt = count($raList);
152: $iBdCnt = $this->_BIG_BLOCK_SIZE / PHPExcel_Shared_OLE::OLE_PPS_SIZE;
153: $iPPScnt = (floor($iCnt/$iBdCnt) + (($iCnt % $iBdCnt)? 1: 0));
154:
155: return array($iSBDcnt, $iBBcnt, $iPPScnt);
156: }
157:
158: 159: 160: 161: 162: 163: 164: 165:
166: private static function _adjust2($i2)
167: {
168: $iWk = log($i2)/log(2);
169: return ($iWk > floor($iWk))? floor($iWk)+1:$iWk;
170: }
171:
172: 173: 174: 175: 176: 177: 178: 179:
180: public function _saveHeader($iSBDcnt, $iBBcnt, $iPPScnt)
181: {
182: $FILE = $this->_FILEH_;
183:
184:
185: $iBlCnt = $this->_BIG_BLOCK_SIZE / PHPExcel_Shared_OLE::OLE_LONG_INT_SIZE;
186: $i1stBdL = ($this->_BIG_BLOCK_SIZE - 0x4C) / PHPExcel_Shared_OLE::OLE_LONG_INT_SIZE;
187:
188: $iBdExL = 0;
189: $iAll = $iBBcnt + $iPPScnt + $iSBDcnt;
190: $iAllW = $iAll;
191: $iBdCntW = floor($iAllW / $iBlCnt) + (($iAllW % $iBlCnt)? 1: 0);
192: $iBdCnt = floor(($iAll + $iBdCntW) / $iBlCnt) + ((($iAllW+$iBdCntW) % $iBlCnt)? 1: 0);
193:
194:
195: if ($iBdCnt > $i1stBdL) {
196: while (1) {
197: ++$iBdExL;
198: ++$iAllW;
199: $iBdCntW = floor($iAllW / $iBlCnt) + (($iAllW % $iBlCnt)? 1: 0);
200: $iBdCnt = floor(($iAllW + $iBdCntW) / $iBlCnt) + ((($iAllW+$iBdCntW) % $iBlCnt)? 1: 0);
201: if ($iBdCnt <= ($iBdExL*$iBlCnt+ $i1stBdL)) {
202: break;
203: }
204: }
205: }
206:
207:
208: fwrite($FILE,
209: "\xD0\xCF\x11\xE0\xA1\xB1\x1A\xE1"
210: . "\x00\x00\x00\x00"
211: . "\x00\x00\x00\x00"
212: . "\x00\x00\x00\x00"
213: . "\x00\x00\x00\x00"
214: . pack("v", 0x3b)
215: . pack("v", 0x03)
216: . pack("v", -2)
217: . pack("v", 9)
218: . pack("v", 6)
219: . pack("v", 0)
220: . "\x00\x00\x00\x00"
221: . "\x00\x00\x00\x00"
222: . pack("V", $iBdCnt)
223: . pack("V", $iBBcnt+$iSBDcnt)
224: . pack("V", 0)
225: . pack("V", 0x1000)
226: . pack("V", $iSBDcnt ? 0 : -2)
227: . pack("V", $iSBDcnt)
228: );
229:
230: if ($iBdCnt < $i1stBdL) {
231: fwrite($FILE,
232: pack("V", -2)
233: . pack("V", 0)
234: );
235: } else {
236: fwrite($FILE, pack("V", $iAll+$iBdCnt) . pack("V", $iBdExL));
237: }
238:
239:
240: for ($i = 0; $i < $i1stBdL && $i < $iBdCnt; ++$i) {
241: fwrite($FILE, pack("V", $iAll+$i));
242: }
243: if ($i < $i1stBdL) {
244: $jB = $i1stBdL - $i;
245: for ($j = 0; $j < $jB; ++$j) {
246: fwrite($FILE, (pack("V", -1)));
247: }
248: }
249: }
250:
251: 252: 253: 254: 255: 256: 257:
258: public function _saveBigData($iStBlk, &$raList)
259: {
260: $FILE = $this->_FILEH_;
261:
262:
263: $iCount = count($raList);
264: for ($i = 0; $i < $iCount; ++$i) {
265: if ($raList[$i]->Type != PHPExcel_Shared_OLE::OLE_PPS_TYPE_DIR) {
266: $raList[$i]->Size = $raList[$i]->_DataLen();
267: if (($raList[$i]->Size >= PHPExcel_Shared_OLE::OLE_DATA_SIZE_SMALL) ||
268: (($raList[$i]->Type == PHPExcel_Shared_OLE::OLE_PPS_TYPE_ROOT) && isset($raList[$i]->_data)))
269: {
270:
271:
272:
273:
274:
275:
276:
277:
278:
279: fwrite($FILE, $raList[$i]->_data);
280:
281:
282: if ($raList[$i]->Size % $this->_BIG_BLOCK_SIZE) {
283: fwrite($FILE, str_repeat("\x00", $this->_BIG_BLOCK_SIZE - ($raList[$i]->Size % $this->_BIG_BLOCK_SIZE)));
284: }
285:
286: $raList[$i]->_StartBlock = $iStBlk;
287: $iStBlk +=
288: (floor($raList[$i]->Size / $this->_BIG_BLOCK_SIZE) +
289: (($raList[$i]->Size % $this->_BIG_BLOCK_SIZE)? 1: 0));
290: }
291:
292:
293:
294:
295:
296:
297: }
298: }
299: }
300:
301: 302: 303: 304: 305: 306:
307: public function _makeSmallData(&$raList)
308: {
309: $sRes = '';
310: $FILE = $this->_FILEH_;
311: $iSmBlk = 0;
312:
313: $iCount = count($raList);
314: for ($i = 0; $i < $iCount; ++$i) {
315:
316: if ($raList[$i]->Type == PHPExcel_Shared_OLE::OLE_PPS_TYPE_FILE) {
317: if ($raList[$i]->Size <= 0) {
318: continue;
319: }
320: if ($raList[$i]->Size < PHPExcel_Shared_OLE::OLE_DATA_SIZE_SMALL) {
321: $iSmbCnt = floor($raList[$i]->Size / $this->_SMALL_BLOCK_SIZE)
322: + (($raList[$i]->Size % $this->_SMALL_BLOCK_SIZE)? 1: 0);
323:
324: $jB = $iSmbCnt - 1;
325: for ($j = 0; $j < $jB; ++$j) {
326: fwrite($FILE, pack("V", $j+$iSmBlk+1));
327: }
328: fwrite($FILE, pack("V", -2));
329:
330:
331:
332:
333:
334:
335:
336:
337: $sRes .= $raList[$i]->_data;
338:
339: if ($raList[$i]->Size % $this->_SMALL_BLOCK_SIZE) {
340: $sRes .= str_repeat("\x00",$this->_SMALL_BLOCK_SIZE - ($raList[$i]->Size % $this->_SMALL_BLOCK_SIZE));
341: }
342:
343: $raList[$i]->_StartBlock = $iSmBlk;
344: $iSmBlk += $iSmbCnt;
345: }
346: }
347: }
348: $iSbCnt = floor($this->_BIG_BLOCK_SIZE / PHPExcel_Shared_OLE::OLE_LONG_INT_SIZE);
349: if ($iSmBlk % $iSbCnt) {
350: $iB = $iSbCnt - ($iSmBlk % $iSbCnt);
351: for ($i = 0; $i < $iB; ++$i) {
352: fwrite($FILE, pack("V", -1));
353: }
354: }
355: return $sRes;
356: }
357:
358: 359: 360: 361: 362: 363:
364: public function _savePps(&$raList)
365: {
366:
367: $iC = count($raList);
368: for ($i = 0; $i < $iC; ++$i) {
369: fwrite($this->_FILEH_, $raList[$i]->_getPpsWk());
370: }
371:
372: $iCnt = count($raList);
373: $iBCnt = $this->_BIG_BLOCK_SIZE / PHPExcel_Shared_OLE::OLE_PPS_SIZE;
374: if ($iCnt % $iBCnt) {
375: fwrite($this->_FILEH_, str_repeat("\x00",($iBCnt - ($iCnt % $iBCnt)) * PHPExcel_Shared_OLE::OLE_PPS_SIZE));
376: }
377: }
378:
379: 380: 381: 382: 383: 384: 385: 386:
387: public function _saveBbd($iSbdSize, $iBsize, $iPpsCnt)
388: {
389: $FILE = $this->_FILEH_;
390:
391: $iBbCnt = $this->_BIG_BLOCK_SIZE / PHPExcel_Shared_OLE::OLE_LONG_INT_SIZE;
392: $i1stBdL = ($this->_BIG_BLOCK_SIZE - 0x4C) / PHPExcel_Shared_OLE::OLE_LONG_INT_SIZE;
393:
394: $iBdExL = 0;
395: $iAll = $iBsize + $iPpsCnt + $iSbdSize;
396: $iAllW = $iAll;
397: $iBdCntW = floor($iAllW / $iBbCnt) + (($iAllW % $iBbCnt)? 1: 0);
398: $iBdCnt = floor(($iAll + $iBdCntW) / $iBbCnt) + ((($iAllW+$iBdCntW) % $iBbCnt)? 1: 0);
399:
400: if ($iBdCnt >$i1stBdL) {
401: while (1) {
402: ++$iBdExL;
403: ++$iAllW;
404: $iBdCntW = floor($iAllW / $iBbCnt) + (($iAllW % $iBbCnt)? 1: 0);
405: $iBdCnt = floor(($iAllW + $iBdCntW) / $iBbCnt) + ((($iAllW+$iBdCntW) % $iBbCnt)? 1: 0);
406: if ($iBdCnt <= ($iBdExL*$iBbCnt+ $i1stBdL)) {
407: break;
408: }
409: }
410: }
411:
412:
413:
414: if ($iSbdSize > 0) {
415: for ($i = 0; $i < ($iSbdSize - 1); ++$i) {
416: fwrite($FILE, pack("V", $i+1));
417: }
418: fwrite($FILE, pack("V", -2));
419: }
420:
421: for ($i = 0; $i < ($iBsize - 1); ++$i) {
422: fwrite($FILE, pack("V", $i+$iSbdSize+1));
423: }
424: fwrite($FILE, pack("V", -2));
425:
426:
427: for ($i = 0; $i < ($iPpsCnt - 1); ++$i) {
428: fwrite($FILE, pack("V", $i+$iSbdSize+$iBsize+1));
429: }
430: fwrite($FILE, pack("V", -2));
431:
432: for ($i = 0; $i < $iBdCnt; ++$i) {
433: fwrite($FILE, pack("V", 0xFFFFFFFD));
434: }
435:
436: for ($i = 0; $i < $iBdExL; ++$i) {
437: fwrite($FILE, pack("V", 0xFFFFFFFC));
438: }
439:
440: if (($iAllW + $iBdCnt) % $iBbCnt) {
441: $iBlock = ($iBbCnt - (($iAllW + $iBdCnt) % $iBbCnt));
442: for ($i = 0; $i < $iBlock; ++$i) {
443: fwrite($FILE, pack("V", -1));
444: }
445: }
446:
447: if ($iBdCnt > $i1stBdL) {
448: $iN=0;
449: $iNb=0;
450: for ($i = $i1stBdL;$i < $iBdCnt; $i++, ++$iN) {
451: if ($iN >= ($iBbCnt - 1)) {
452: $iN = 0;
453: ++$iNb;
454: fwrite($FILE, pack("V", $iAll+$iBdCnt+$iNb));
455: }
456: fwrite($FILE, pack("V", $iBsize+$iSbdSize+$iPpsCnt+$i));
457: }
458: if (($iBdCnt-$i1stBdL) % ($iBbCnt-1)) {
459: $iB = ($iBbCnt - 1) - (($iBdCnt - $i1stBdL) % ($iBbCnt - 1));
460: for ($i = 0; $i < $iB; ++$i) {
461: fwrite($FILE, pack("V", -1));
462: }
463: }
464: fwrite($FILE, pack("V", -2));
465: }
466: }
467: }
468: