<?php



//require_once 'PEAR.php';

require_once 'oleread.inc';



//define('Spreadsheet_Excel_Reader_HAVE_ICONV', function_exists('iconv'));

//define('Spreadsheet_Excel_Reader_HAVE_MB', function_exists('mb_convert_encoding'));



define('Spreadsheet_Excel_Reader_BIFF8', 0x600);

define('Spreadsheet_Excel_Reader_BIFF7', 0x500);

define('Spreadsheet_Excel_Reader_WorkbookGlobals', 0x5);

define('Spreadsheet_Excel_Reader_Worksheet', 0x10);



define('Spreadsheet_Excel_Reader_Type_BOF', 0x809);

define('Spreadsheet_Excel_Reader_Type_EOF', 0x0a);

define('Spreadsheet_Excel_Reader_Type_BOUNDSHEET', 0x85);

define('Spreadsheet_Excel_Reader_Type_DIMENSION', 0x200);

define('Spreadsheet_Excel_Reader_Type_ROW', 0x208);

define('Spreadsheet_Excel_Reader_Type_DBCELL', 0xd7);

define('Spreadsheet_Excel_Reader_Type_FILEPASS', 0x2f);

define('Spreadsheet_Excel_Reader_Type_NOTE', 0x1c);

define('Spreadsheet_Excel_Reader_Type_TXO', 0x1b6);

define('Spreadsheet_Excel_Reader_Type_RK', 0x7e);

define('Spreadsheet_Excel_Reader_Type_RK2', 0x27e);

define('Spreadsheet_Excel_Reader_Type_MULRK', 0xbd);

define('Spreadsheet_Excel_Reader_Type_MULBLANK', 0xbe);

define('Spreadsheet_Excel_Reader_Type_INDEX', 0x20b);

define('Spreadsheet_Excel_Reader_Type_SST', 0xfc);

define('Spreadsheet_Excel_Reader_Type_EXTSST', 0xff);

define('Spreadsheet_Excel_Reader_Type_CONTINUE', 0x3c);

define('Spreadsheet_Excel_Reader_Type_LABEL', 0x204);

define('Spreadsheet_Excel_Reader_Type_LABELSST', 0xfd);

define('Spreadsheet_Excel_Reader_Type_NUMBER', 0x203);

define('Spreadsheet_Excel_Reader_Type_NAME', 0x18);

define('Spreadsheet_Excel_Reader_Type_ARRAY', 0x221);

define('Spreadsheet_Excel_Reader_Type_STRING', 0x207);

define('Spreadsheet_Excel_Reader_Type_FORMULA', 0x406);

define('Spreadsheet_Excel_Reader_Type_FORMULA2', 0x6);

define('Spreadsheet_Excel_Reader_Type_FORMAT', 0x41e);

define('Spreadsheet_Excel_Reader_Type_XF', 0xe0);

define('Spreadsheet_Excel_Reader_Type_BOOLERR', 0x205);

define('Spreadsheet_Excel_Reader_Type_UNKNOWN', 0xffff);

define('Spreadsheet_Excel_Reader_Type_NINETEENFOUR', 0x22);

define('Spreadsheet_Excel_Reader_Type_MERGEDCELLS', 0xE5);



define('Spreadsheet_Excel_Reader_utcOffsetDays' , 25569);

define('Spreadsheet_Excel_Reader_utcOffsetDays1904', 24107);

define('Spreadsheet_Excel_Reader_msInADay', 24 * 60 * 60);



//define('Spreadsheet_Excel_Reader_DEF_NUM_FORMAT', "%.2f");

define('Spreadsheet_Excel_Reader_DEF_NUM_FORMAT', "%s");



// function file_get_contents for PHP < 4.3.0

// Thanks Marian Steinbach for this function

if (!function_exists('file_get_contents')) {

    function file_get_contents($filename, $use_include_path = 0) {

        $data = '';

        $file = @fopen($filename, "rb", $use_include_path);

        if ($file) {

            while (!feof($file)) $data .= fread($file, 1024);

            fclose($file);

        } else {

            // There was a problem opening the file

            $data = FALSE;

        }

        return $data;

    }

}





//class Spreadsheet_Excel_Reader extends PEAR {

class Spreadsheet_Excel_Reader {



    var $boundsheets = array();

    var $formatRecords = array();

    var $sst = array();

    var $sheets = array();

    var $data;

    var $pos;

    var $_ole;

    var $_defaultEncoding;

    var $_defaultFormat = Spreadsheet_Excel_Reader_DEF_NUM_FORMAT;

    var $_columnsFormat = array();

    var $_rowoffset = 1;

    var $_coloffset = 1;

    

    var $dateFormats = array (

        0xe => "d/m/Y",

        0xf => "d-M-Y",

        0x10 => "d-M",

        0x11 => "M-Y",

        0x12 => "h:i a",

        0x13 => "h:i:s a",

        0x14 => "H:i",

        0x15 => "H:i:s",

        0x16 => "d/m/Y H:i",

        0x2d => "i:s",

        0x2e => "H:i:s",

        0x2f => "i:s.S");



    var $numberFormats = array(

        0x1 => "%1.0f", // "0"

        0x2 => "%1.2f", // "0.00",

        0x3 => "%1.0f", //"#,##0",

        0x4 => "%1.2f", //"#,##0.00",

        0x5 => "%1.0f", /*"$#,##0;($#,##0)",*/

        0x6 => '$%1.0f', /*"$#,##0;($#,##0)",*/

        0x7 => '$%1.2f', //"$#,##0.00;($#,##0.00)",

        0x8 => '$%1.2f', //"$#,##0.00;($#,##0.00)",

        0x9 => '%1.0f%%', // "0%"

        0xa => '%1.2f%%', // "0.00%"

        0xb => '%1.2f', // 0.00E00",

        0x25 => '%1.0f', // "#,##0;(#,##0)",

        0x26 => '%1.0f', //"#,##0;(#,##0)",

        0x27 => '%1.2f', //"#,##0.00;(#,##0.00)",

        0x28 => '%1.2f', //"#,##0.00;(#,##0.00)",

        0x29 => '%1.0f', //"#,##0;(#,##0)",

        0x2a => '$%1.0f', //"$#,##0;($#,##0)",

        0x2b => '%1.2f', //"#,##0.00;(#,##0.00)",

        0x2c => '$%1.2f', //"$#,##0.00;($#,##0.00)",

        0x30 => '%1.0f'); //"##0.0E0";



    function Spreadsheet_Excel_Reader(){

        $this->_ole =& new OLERead();

        $this->setUTFEncoder('iconv');



    }



    function setOutputEncoding($Encoding){

        $this->_defaultEncoding = $Encoding;

    }



    /**

    *  $encoder = 'iconv' or 'mb'

    *  set iconv if you would like use 'iconv' for encode UTF-16LE to your encoding

    *  set mb if you would like use 'mb_convert_encoding' for encode UTF-16LE to your encoding

    */

    function setUTFEncoder($encoder = 'iconv'){

    	$this->_encoderFunction = '';

    	if ($encoder == 'iconv'){

        	$this->_encoderFunction = function_exists('iconv') ? 'iconv' : '';

        }elseif ($encoder == 'mb') {

        	$this->_encoderFunction = function_exists('mb_convert_encoding') ? 'mb_convert_encoding' : '';

    	}

    }



    function setRowColOffset($iOffset){

        $this->_rowoffset = $iOffset;

		$this->_coloffset = $iOffset;

    }



    function setDefaultFormat($sFormat){

        $this->_defaultFormat = $sFormat;

    }



    function setColumnFormat($column, $sFormat){

        $this->_columnsFormat[$column] = $sFormat;

    }





    function read($sFileName) {

    	$errlevel = error_reporting();

    	error_reporting($errlevel ^ E_NOTICE);

        $res = $this->_ole->read($sFileName);

        

        // oops, something goes wrong (Darko Miljanovic)

        if($res === false) {

        	// check error code

        	if($this->_ole->error == 1) {

        	// bad file

        		die('The filename ' . $sFileName . ' is not readable');	

        	}

        	// check other error codes here (eg bad fileformat, etc...)

        }



        $this->data = $this->_ole->getWorkBook();



        

        /*

        $res = $this->_ole->read($sFileName);



        if ($this->isError($res)) {

//		var_dump($res);		

            return $this->raiseError($res);

        }



        $total = $this->_ole->ppsTotal();

        for ($i = 0; $i < $total; $i++) {

            if ($this->_ole->isFile($i)) {

                $type = unpack("v", $this->_ole->getData($i, 0, 2));

                if ($type[''] == 0x0809)  { // check if it's a BIFF stream

                    $this->_index = $i;

                    $this->data = $this->_ole->getData($i, 0, $this->_ole->getDataLength($i));

                    break;

                }

            }

        }



        if ($this->_index === null) {

            return $this->raiseError("$file doesn't seem to be an Excel file");

        }

        

        */

		

		//var_dump($this->data);

	//echo "data =".$this->data;	

        $this->pos = 0;

        //$this->readRecords();

        $this->_parse();

    	error_reporting($errlevel);



    }



    function _parse(){

        $pos = 0;



        $code = ord($this->data[$pos]) | ord($this->data[$pos+1])<<8;

        $length = ord($this->data[$pos+2]) | ord($this->data[$pos+3])<<8;



        $version = ord($this->data[$pos + 4]) | ord($this->data[$pos + 5])<<8;

        $substreamType = ord($this->data[$pos + 6]) | ord($this->data[$pos + 7])<<8;

        //echo "Start parse code=".base_convert($code,10,16)." version=".base_convert($version,10,16)." substreamType=".base_convert($substreamType,10,16).""."\n";



        if (($version != Spreadsheet_Excel_Reader_BIFF8) && ($version != Spreadsheet_Excel_Reader_BIFF7)) {

            return false;

        }



        if ($substreamType != Spreadsheet_Excel_Reader_WorkbookGlobals){

            return false;

        }



        //print_r($rec);

        $pos += $length + 4;



        $code = ord($this->data[$pos]) | ord($this->data[$pos+1])<<8;

        $length = ord($this->data[$pos+2]) | ord($this->data[$pos+3])<<8;



        while ($code != Spreadsheet_Excel_Reader_Type_EOF){

            switch ($code) {

                case Spreadsheet_Excel_Reader_Type_SST:

                    //echo "Type_SST\n";

                     $spos = $pos + 4;

                     $limitpos = $spos + $length;

                     $uniqueStrings = $this->_GetInt4d($this->data, $spos+4);

                                                $spos += 8;

                                       for ($i = 0; $i < $uniqueStrings; $i++) {

        // Read in the number of characters

                                                if ($spos == $limitpos) {

                                                $opcode = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

                                                $conlength = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

                                                        if ($opcode != 0x3c) {

                                                                return -1;

                                                        }

                                                $spos += 4;

                                                $limitpos = $spos + $conlength;

                                                }

                                                $numChars = ord($this->data[$spos]) | (ord($this->data[$spos+1]) << 8);

                                                //echo "i = $i pos = $pos numChars = $numChars ";

                                                $spos += 2;

                                                $optionFlags = ord($this->data[$spos]);

                                                $spos++;

                                        $asciiEncoding = (($optionFlags & 0x01) == 0) ;

                                                $extendedString = ( ($optionFlags & 0x04) != 0);



                                                // See if string contains formatting information

                                                $richString = ( ($optionFlags & 0x08) != 0);



                                                if ($richString) {

                                        // Read in the crun

                                                        $formattingRuns = ord($this->data[$spos]) | (ord($this->data[$spos+1]) << 8);

                                                        $spos += 2;

                                                }



                                                if ($extendedString) {

                                                  // Read in cchExtRst

                                                  $extendedRunLength = $this->_GetInt4d($this->data, $spos);

                                                  $spos += 4;

                                                }



                                                $len = ($asciiEncoding)? $numChars : $numChars*2;

                                                if ($spos + $len < $limitpos) {

                                                                $retstr = substr($this->data, $spos, $len);

                                                                $spos += $len;

                                                }else{

                                                        // found countinue

                                                        $retstr = substr($this->data, $spos, $limitpos - $spos);

                                                        $bytesRead = $limitpos - $spos;

                                                        $charsLeft = $numChars - (($asciiEncoding) ? $bytesRead : ($bytesRead / 2));

                                                        $spos = $limitpos;



                                                         while ($charsLeft > 0){

                                                                $opcode = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

                                                                $conlength = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

                                                                        if ($opcode != 0x3c) {

                                                                                return -1;

                                                                        }

                                                                $spos += 4;

                                                                $limitpos = $spos + $conlength;

                                                                $option = ord($this->data[$spos]);

                                                                $spos += 1;

                                                                  if ($asciiEncoding && ($option == 0)) {

                                                                                $len = min($charsLeft, $limitpos - $spos); // min($charsLeft, $conlength);

                                                                    $retstr .= substr($this->data, $spos, $len);

                                                                    $charsLeft -= $len;

                                                                    $asciiEncoding = true;

                                                                  }elseif (!$asciiEncoding && ($option != 0)){

                                                                                $len = min($charsLeft * 2, $limitpos - $spos); // min($charsLeft, $conlength);

                                                                    $retstr .= substr($this->data, $spos, $len);

                                                                    $charsLeft -= $len/2;

                                                                    $asciiEncoding = false;

                                                                  }elseif (!$asciiEncoding && ($option == 0)) {

                                                                // Bummer - the string starts off as Unicode, but after the

                                                                // continuation it is in straightforward ASCII encoding

                                                                                $len = min($charsLeft, $limitpos - $spos); // min($charsLeft, $conlength);

                                                                        for ($j = 0; $j < $len; $j++) {

                                                                 $retstr .= $this->data[$spos + $j].chr(0);

                                                                }

                                                            $charsLeft -= $len;

                                                                $asciiEncoding = false;

                                                                  }else{

                                                            $newstr = '';

                                                                    for ($j = 0; $j < strlen($retstr); $j++) {

                                                                      $newstr = $retstr[$j].chr(0);

                                                                    }

                                                                    $retstr = $newstr;

                                                                                $len = min($charsLeft * 2, $limitpos - $spos); // min($charsLeft, $conlength);

                                                                    $retstr .= substr($this->data, $spos, $len);

                                                                    $charsLeft -= $len/2;

                                                                    $asciiEncoding = false;

                                                                        //echo "Izavrat\n";

                                                                  }

                                                          $spos += $len;



                                                         }

                                                }

                                                $retstr = ($asciiEncoding) ? $retstr : $this->_encodeUTF16($retstr);

//                                              echo "Str $i = $retstr\n";

                                        if ($richString){

                                                  $spos += 4 * $formattingRuns;

                                                }



                                                // For extended strings, skip over the extended string data

                                                if ($extendedString) {

                                                  $spos += $extendedRunLength;

                                                }

                                                        //if ($retstr == 'Derby'){

                                                        //      echo "bb\n";

                                                        //}

                                                $this->sst[]=$retstr;

                                       }

                    /*$continueRecords = array();

                    while ($this->getNextCode() == Type_CONTINUE) {

                        $continueRecords[] = &$this->nextRecord();

                    }

                    //echo " 1 Type_SST\n";

                    $this->shareStrings = new SSTRecord($r, $continueRecords);

                    //print_r($this->shareStrings->strings);

                     */

                     // echo 'SST read: '.($time_end-$time_start)."\n";

                    break;



                case Spreadsheet_Excel_Reader_Type_FILEPASS:

                    return false;

                    break;

                case Spreadsheet_Excel_Reader_Type_NAME:

                    //echo "Type_NAME\n";

                    break;

                case Spreadsheet_Excel_Reader_Type_FORMAT:

                        $indexCode = ord($this->data[$pos+4]) | ord($this->data[$pos+5]) << 8;



                        if ($version == Spreadsheet_Excel_Reader_BIFF8) {

                            $numchars = ord($this->data[$pos+6]) | ord($this->data[$pos+7]) << 8;

                            if (ord($this->data[$pos+8]) == 0){

                                $formatString = substr($this->data, $pos+9, $numchars);

                            } else {

                                $formatString = substr($this->data, $pos+9, $numchars*2);

                            }

                        } else {

                            $numchars = ord($this->data[$pos+6]);

                            $formatString = substr($this->data, $pos+7, $numchars*2);

                        }



                    $this->formatRecords[$indexCode] = $formatString;

                   // echo "Type.FORMAT\n";

                    break;

                case Spreadsheet_Excel_Reader_Type_XF:

                        //global $dateFormats, $numberFormats;

                        $indexCode = ord($this->data[$pos+6]) | ord($this->data[$pos+7]) << 8;

                        //echo "\nType.XF ".count($this->formatRecords['xfrecords'])." $indexCode ";

                        if (array_key_exists($indexCode, $this->dateFormats)) {

                            //echo "isdate ".$dateFormats[$indexCode];

                            $this->formatRecords['xfrecords'][] = array(

                                    'type' => 'date',

                                    'format' => $this->dateFormats[$indexCode]

                                    );

                        }elseif (array_key_exists($indexCode, $this->numberFormats)) {

                        //echo "isnumber ".$this->numberFormats[$indexCode];

                            $this->formatRecords['xfrecords'][] = array(

                                    'type' => 'number',

                                    'format' => $this->numberFormats[$indexCode]

                                    );

                        }else{

                            $isdate = FALSE;

                            if ($indexCode > 0){

                            	if (isset($this->formatRecords[$indexCode]))

                                	$formatstr = $this->formatRecords[$indexCode];

                                //echo '.other.';

                                //echo "\ndate-time=$formatstr=\n";

                                if ($formatstr)

                                if (preg_match("/[^hmsday\/\-:\s]/i", $formatstr) == 0) { // found day and time format

                                    $isdate = TRUE;

                                    $formatstr = str_replace('mm', 'i', $formatstr);

                                    $formatstr = str_replace('h', 'H', $formatstr);

                                    //echo "\ndate-time $formatstr \n";

                                }

                            }



                            if ($isdate){

                                $this->formatRecords['xfrecords'][] = array(

                                        'type' => 'date',

                                        'format' => $formatstr,

                                        );

                            }else{

                                $this->formatRecords['xfrecords'][] = array(

                                        'type' => 'other',

                                        'format' => '',

                                        'code' => $indexCode

                                        );

                            }

                        }

                        //echo "\n";

                    break;

                case Spreadsheet_Excel_Reader_Type_NINETEENFOUR:

                    //echo "Type.NINETEENFOUR\n";

                    $this->nineteenFour = (ord($this->data[$pos+4]) == 1);

                    break;

                case Spreadsheet_Excel_Reader_Type_BOUNDSHEET:

                    //echo "Type.BOUNDSHEET\n";

                        $rec_offset = $this->_GetInt4d($this->data, $pos+4);

                        $rec_typeFlag = ord($this->data[$pos+8]);

                        $rec_visibilityFlag = ord($this->data[$pos+9]);

                        $rec_length = ord($this->data[$pos+10]);



                        if ($version == Spreadsheet_Excel_Reader_BIFF8){

                            $chartype =  ord($this->data[$pos+11]);

                            if ($chartype == 0){

                                $rec_name    = substr($this->data, $pos+12, $rec_length);

                            } else {

                                $rec_name    = $this->_encodeUTF16(substr($this->data, $pos+12, $rec_length*2));

                            }

                        }elseif ($version == Spreadsheet_Excel_Reader_BIFF7){

                                $rec_name    = substr($this->data, $pos+11, $rec_length);

                        }

                    $this->boundsheets[] = array('name'=>$rec_name,

                                                 'offset'=>$rec_offset);



                    break;



            }



            //echo "Code = ".base_convert($r['code'],10,16)."\n";

            $pos += $length + 4;

            $code = ord($this->data[$pos]) | ord($this->data[$pos+1])<<8;

            $length = ord($this->data[$pos+2]) | ord($this->data[$pos+3])<<8;



            //$r = &$this->nextRecord();

            //echo "1 Code = ".base_convert($r['code'],10,16)."\n";

        }



        foreach ($this->boundsheets as $key=>$val){

            $this->sn = $key;

            $this->_parsesheet($val['offset']);

        }

        return true;



    }



    function _parsesheet($spos){

        $cont = true;

        // read BOF

        $code = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

        $length = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;



        $version = ord($this->data[$spos + 4]) | ord($this->data[$spos + 5])<<8;

        $substreamType = ord($this->data[$spos + 6]) | ord($this->data[$spos + 7])<<8;



        if (($version != Spreadsheet_Excel_Reader_BIFF8) && ($version != Spreadsheet_Excel_Reader_BIFF7)) {

            return -1;

        }



        if ($substreamType != Spreadsheet_Excel_Reader_Worksheet){

            return -2;

        }

        //echo "Start parse code=".base_convert($code,10,16)." version=".base_convert($version,10,16)." substreamType=".base_convert($substreamType,10,16).""."\n";

        $spos += $length + 4;

        //var_dump($this->formatRecords);

	//echo "code $code $length";

        while($cont) {

            //echo "mem= ".memory_get_usage()."\n";

//            $r = &$this->file->nextRecord();

            $lowcode = ord($this->data[$spos]);

            if ($lowcode == Spreadsheet_Excel_Reader_Type_EOF) break;

            $code = $lowcode | ord($this->data[$spos+1])<<8;

            $length = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

            $spos += 4;

            $this->sheets[$this->sn]['maxrow'] = $this->_rowoffset - 1;

            $this->sheets[$this->sn]['maxcol'] = $this->_coloffset - 1;

            //echo "Code=".base_convert($code,10,16)." $code\n";

            unset($this->rectype);

            $this->multiplier = 1; // need for format with %

            switch ($code) {

                case Spreadsheet_Excel_Reader_Type_DIMENSION:

                    //echo 'Type_DIMENSION ';

                    if (!isset($this->numRows)) {

                        if (($length == 10) ||  ($version == Spreadsheet_Excel_Reader_BIFF7)){

                            $this->sheets[$this->sn]['numRows'] = ord($this->data[$spos+2]) | ord($this->data[$spos+3]) << 8;

                            $this->sheets[$this->sn]['numCols'] = ord($this->data[$spos+6]) | ord($this->data[$spos+7]) << 8;

                        } else {

                            $this->sheets[$this->sn]['numRows'] = ord($this->data[$spos+4]) | ord($this->data[$spos+5]) << 8;

                            $this->sheets[$this->sn]['numCols'] = ord($this->data[$spos+10]) | ord($this->data[$spos+11]) << 8;

                        }

                    }

                    //echo 'numRows '.$this->numRows.' '.$this->numCols."\n";

                    break;

                case Spreadsheet_Excel_Reader_Type_MERGEDCELLS:

                    $cellRanges = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

                    for ($i = 0; $i < $cellRanges; $i++) {

                        $fr =  ord($this->data[$spos + 8*$i + 2]) | ord($this->data[$spos + 8*$i + 3])<<8;

                        $lr =  ord($this->data[$spos + 8*$i + 4]) | ord($this->data[$spos + 8*$i + 5])<<8;

                        $fc =  ord($this->data[$spos + 8*$i + 6]) | ord($this->data[$spos + 8*$i + 7])<<8;

                        $lc =  ord($this->data[$spos + 8*$i + 8]) | ord($this->data[$spos + 8*$i + 9])<<8;

                        //$this->sheets[$this->sn]['mergedCells'][] = array($fr + 1, $fc + 1, $lr + 1, $lc + 1);

                        if ($lr - $fr > 0) {

                            $this->sheets[$this->sn]['cellsInfo'][$fr+1][$fc+1]['rowspan'] = $lr - $fr + 1;

                        }

                        if ($lc - $fc > 0) {

                            $this->sheets[$this->sn]['cellsInfo'][$fr+1][$fc+1]['colspan'] = $lc - $fc + 1;

                        }

                    }

                    //echo "Merged Cells $cellRanges $lr $fr $lc $fc\n";

                    break;

                case Spreadsheet_Excel_Reader_Type_RK:

                case Spreadsheet_Excel_Reader_Type_RK2:

                    //echo 'Spreadsheet_Excel_Reader_Type_RK'."\n";

                    $row = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

                    $column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

                    $rknum = $this->_GetInt4d($this->data, $spos + 6);

                    $numValue = $this->_GetIEEE754($rknum);

                    //echo $numValue." ";

                    if ($this->isDate($spos)) {

                        list($string, $raw) = $this->createDate($numValue);

                    }else{

                        $raw = $numValue;

                        if (isset($this->_columnsFormat[$column + 1])){

                                $this->curformat = $this->_columnsFormat[$column + 1];

                        }

                        $string = sprintf($this->curformat, $numValue * $this->multiplier);

                        //$this->addcell(RKRecord($r));

                    }

                    $this->addcell($row, $column, $string, $raw);

                    //echo "Type_RK $row $column $string $raw {$this->curformat}\n";

                    break;

                case Spreadsheet_Excel_Reader_Type_LABELSST:

                        $row        = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

                        $column     = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

                        $xfindex    = ord($this->data[$spos+4]) | ord($this->data[$spos+5])<<8;

                        $index  = $this->_GetInt4d($this->data, $spos + 6);

			//var_dump($this->sst);

                        $this->addcell($row, $column, $this->sst[$index]);

                        //echo "LabelSST $row $column $string\n";

                    break;

                case Spreadsheet_Excel_Reader_Type_MULRK:

                    $row        = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

                    $colFirst   = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

                    $colLast    = ord($this->data[$spos + $length - 2]) | ord($this->data[$spos + $length - 1])<<8;

                    $columns    = $colLast - $colFirst + 1;

                    $tmppos = $spos+4;

                    for ($i = 0; $i < $columns; $i++) {

                        $numValue = $this->_GetIEEE754($this->_GetInt4d($this->data, $tmppos + 2));

                        if ($this->isDate($tmppos-4)) {

                            list($string, $raw) = $this->createDate($numValue);

                        }else{

                            $raw = $numValue;

                            if (isset($this->_columnsFormat[$colFirst + $i + 1])){

                                        $this->curformat = $this->_columnsFormat[$colFirst + $i + 1];

                                }

                            $string = sprintf($this->curformat, $numValue * $this->multiplier);

                        }

                      //$rec['rknumbers'][$i]['xfindex'] = ord($rec['data'][$pos]) | ord($rec['data'][$pos+1]) << 8;

                      $tmppos += 6;

                      $this->addcell($row, $colFirst + $i, $string, $raw);

                      //echo "MULRK $row ".($colFirst + $i)." $string\n";

                    }

                     //MulRKRecord($r);

                    // Get the individual cell records from the multiple record

                     //$num = ;



                    break;

                case Spreadsheet_Excel_Reader_Type_NUMBER:

                    $row    = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

                    $column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

                    $tmp = unpack("ddouble", substr($this->data, $spos + 6, 8)); // It machine machine dependent

                    if ($this->isDate($spos)) {

                        list($string, $raw) = $this->createDate($tmp['double']);

                     //   $this->addcell(DateRecord($r, 1));

                    }else{

                        //$raw = $tmp[''];

                        if (isset($this->_columnsFormat[$column + 1])){

                                $this->curformat = $this->_columnsFormat[$column + 1];

                        }

                        $raw = $this->createNumber($spos);

                        $string = sprintf($this->curformat, $raw * $this->multiplier);



                     //   $this->addcell(NumberRecord($r));

                    }

                    $this->addcell($row, $column, $string, $raw);

                    //echo "Number $row $column $string\n";

                    break;

                case Spreadsheet_Excel_Reader_Type_FORMULA:

                case Spreadsheet_Excel_Reader_Type_FORMULA2:

                    $row    = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

                    $column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

					if ((ord($this->data[$spos+6])==0) && (ord($this->data[$spos+12])==255) && (ord($this->data[$spos+13])==255)) {

						//String formula. Result follows in a STRING record

					    //echo "FORMULA $row $column Formula with a string<br>\n";

					} elseif ((ord($this->data[$spos+6])==1) && (ord($this->data[$spos+12])==255) && (ord($this->data[$spos+13])==255)) {

						//Boolean formula. Result is in +2; 0=false,1=true

					} elseif ((ord($this->data[$spos+6])==2) && (ord($this->data[$spos+12])==255) && (ord($this->data[$spos+13])==255)) {

						//Error formula. Error code is in +2;

					} elseif ((ord($this->data[$spos+6])==3) && (ord($this->data[$spos+12])==255) && (ord($this->data[$spos+13])==255)) {

						//Formula result is a null string.

					} else {

						// result is a number, so first 14 bytes are just like a _NUMBER record

	                    $tmp = unpack("ddouble", substr($this->data, $spos + 6, 8)); // It machine machine dependent

	                    if ($this->isDate($spos)) {

	                        list($string, $raw) = $this->createDate($tmp['double']);

	                     //   $this->addcell(DateRecord($r, 1));

	                    }else{

	                        //$raw = $tmp[''];

	                        if (isset($this->_columnsFormat[$column + 1])){

	                                $this->curformat = $this->_columnsFormat[$column + 1];

	                        }

	                        $raw = $this->createNumber($spos);

							$string = sprintf($this->curformat, $raw * $this->multiplier);

	

	                     //   $this->addcell(NumberRecord($r));

	                    }

	                    $this->addcell($row, $column, $string, $raw);

	                    //echo "Number $row $column $string\n";

					}

					break;                    

                case Spreadsheet_Excel_Reader_Type_BOOLERR:

                    $row    = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

                    $column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

                    $string = ord($this->data[$spos+6]);

                    $this->addcell($row, $column, $string);

                    //echo 'Type_BOOLERR '."\n";

                    break;

                case Spreadsheet_Excel_Reader_Type_ROW:

                case Spreadsheet_Excel_Reader_Type_DBCELL:

                case Spreadsheet_Excel_Reader_Type_MULBLANK:

                    break;

                case Spreadsheet_Excel_Reader_Type_LABEL:

                    $row    = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;

                    $column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

                    $this->addcell($row, $column, substr($this->data, $spos + 8, ord($this->data[$spos + 6]) | ord($this->data[$spos + 7])<<8));



                   // $this->addcell(LabelRecord($r));

                    break;



                case Spreadsheet_Excel_Reader_Type_EOF:

                    $cont = false;

                    break;

                default:

                    //echo ' unknown :'.base_convert($r['code'],10,16)."\n";

                    break;



            }

            $spos += $length;

        }



        if (!isset($this->sheets[$this->sn]['numRows']))

        	 $this->sheets[$this->sn]['numRows'] = $this->sheets[$this->sn]['maxrow'];

        if (!isset($this->sheets[$this->sn]['numCols']))

        	 $this->sheets[$this->sn]['numCols'] = $this->sheets[$this->sn]['maxcol'];



    }



    function isDate($spos){

        //$xfindex = GetInt2d(, 4);

        $xfindex = ord($this->data[$spos+4]) | ord($this->data[$spos+5]) << 8;

        //echo 'check is date '.$xfindex.' '.$this->formatRecords['xfrecords'][$xfindex]['type']."\n";

        //var_dump($this->formatRecords['xfrecords'][$xfindex]);

        if ($this->formatRecords['xfrecords'][$xfindex]['type'] == 'date') {

            $this->curformat = $this->formatRecords['xfrecords'][$xfindex]['format'];

            $this->rectype = 'date';

            return true;

        } else {

            if ($this->formatRecords['xfrecords'][$xfindex]['type'] == 'number') {

                $this->curformat = $this->formatRecords['xfrecords'][$xfindex]['format'];

                $this->rectype = 'number';

                if (($xfindex == 0x9) || ($xfindex == 0xa)){

                    $this->multiplier = 100;

                }

            }else{

                $this->curformat = $this->_defaultFormat;

                $this->rectype = 'unknown';

            }

            return false;

        }

    }



    function createDate($numValue){

        if ($numValue > 1){

            $utcDays = $numValue - ($this->nineteenFour ? Spreadsheet_Excel_Reader_utcOffsetDays1904 : Spreadsheet_Excel_Reader_utcOffsetDays);

            $utcValue = round($utcDays * Spreadsheet_Excel_Reader_msInADay);

            $string = date ($this->curformat, $utcValue);

            $raw = $utcValue;

        }else{

            $raw = $numValue;

            $hours = floor($numValue * 24);

            $mins = floor($numValue * 24 * 60) - $hours * 60;

            $secs = floor($numValue * Spreadsheet_Excel_Reader_msInADay) - $hours * 60 * 60 - $mins * 60;

            $string = date ($this->curformat, mktime($hours, $mins, $secs));

        }

        return array($string, $raw);

    }



    function createNumber($spos){

		$rknumhigh = $this->_GetInt4d($this->data, $spos + 10);

		$rknumlow = $this->_GetInt4d($this->data, $spos + 6);

		//for ($i=0; $i<8; $i++) { echo ord($this->data[$i+$spos+6]) . " "; } echo "<br>";

		$sign = ($rknumhigh & 0x80000000) >> 31;

		$exp =  ($rknumhigh & 0x7ff00000) >> 20;

		$mantissa = (0x100000 | ($rknumhigh & 0x000fffff));

		$mantissalow1 = ($rknumlow & 0x80000000) >> 31;

		$mantissalow2 = ($rknumlow & 0x7fffffff);

		$value = $mantissa / pow( 2 , (20- ($exp - 1023)));

		if ($mantissalow1 != 0) $value += 1 / pow (2 , (21 - ($exp - 1023)));

		$value += $mantissalow2 / pow (2 , (52 - ($exp - 1023)));

		//echo "Sign = $sign, Exp = $exp, mantissahighx = $mantissa, mantissalow1 = $mantissalow1, mantissalow2 = $mantissalow2<br>\n";

		if ($sign) {$value = -1 * $value;}

		return  $value;

    }



    function addcell($row, $col, $string, $raw = ''){

        //echo "ADD cel $row-$col $string\n";

        $this->sheets[$this->sn]['maxrow'] = max($this->sheets[$this->sn]['maxrow'], $row + $this->_rowoffset);

        $this->sheets[$this->sn]['maxcol'] = max($this->sheets[$this->sn]['maxcol'], $col + $this->_coloffset);

        $this->sheets[$this->sn]['cells'][$row + $this->_rowoffset][$col + $this->_coloffset] = $string;

        if ($raw)

            $this->sheets[$this->sn]['cellsInfo'][$row + $this->_rowoffset][$col + $this->_coloffset]['raw'] = $raw;

        if (isset($this->rectype))

            $this->sheets[$this->sn]['cellsInfo'][$row + $this->_rowoffset][$col + $this->_coloffset]['type'] = $this->rectype;



    }





    function _GetIEEE754($rknum){

        if (($rknum & 0x02) != 0) {

                $value = $rknum >> 2;

        } else {

//mmp

// first comment out the previously existing 7 lines of code here

//                $tmp = unpack("d", pack("VV", 0, ($rknum & 0xfffffffc)));

//                //$value = $tmp[''];

//                if (array_key_exists(1, $tmp)) {

//                    $value = $tmp[1];

//                } else {

//                    $value = $tmp[''];

//                }

// I got my info on IEEE754 encoding from 

// http://research.microsoft.com/~hollasch/cgindex/coding/ieeefloat.html

// The RK format calls for using only the most significant 30 bits of the

// 64 bit floating point value. The other 34 bits are assumed to be 0

// So, we use the upper 30 bits of $rknum as follows...

 		$sign = ($rknum & 0x80000000) >> 31;

		$exp = ($rknum & 0x7ff00000) >> 20;

		$mantissa = (0x100000 | ($rknum & 0x000ffffc));

		$value = $mantissa / pow( 2 , (20- ($exp - 1023)));

		if ($sign) {$value = -1 * $value;}

//end of changes by mmp		



        }



        if (($rknum & 0x01) != 0) {

            $value /= 100;

        }

        return $value;

    }



    function _encodeUTF16($string){

    	$result = $string;

        if ($this->_defaultEncoding){

        	switch ($this->_encoderFunction){

        		case 'iconv' : 	$result = iconv('UTF-16LE', $this->_defaultEncoding, $string);

        						break;

        		case 'mb_convert_encoding' : 	$result = mb_convert_encoding($string, $this->_defaultEncoding, 'UTF-16LE' );

        						break;

        	}

        }

        return $result;

    }



    function _GetInt4d($data, $pos) {

        return ord($data[$pos]) | (ord($data[$pos+1]) << 8) | (ord($data[$pos+2]) << 16) | (ord($data[$pos+3]) << 24);

    }





}



class Spreadsheet_Calc_Reader{



   var $sheets;



    function read($sFileName) {

    	$zip = zip_open($sFileName);

	if ($zip) {

		$zip_entry = zip_read($zip);

		while($zip_entry != "content.xml") {

			$zip_entry = zip_read($zip);

		}

		$line = zip_entry_read($zip_entry);

		$content += $line;

		while($line) {

			$line = zip_entry_read($zip_entry);

			$content += $line;

		}

		zip_entry_close($zip_entry);

		zip_close($zip);

	} else {

		

		return;

	}

	$xml = xml_parser_create();

	xml_parse_into_struct($xml,$content,$values);

	xml_parser_free($xml);

	

	$counter = 0;

	$col = 0;

	$mcol = 0;

	$row = 0;

	while(!strcasecmp ($values[$counter++]['tag'], "table:table"));



	do {

		if(!strcasecmp ($values[$counter]['tag'], "table:table-row") && !strcasecmp ($values[$counter]['type'], "open")) {

			$row++;

		}

		if(!strcasecmp ($values[$counter]['tag'], "table:table-cell") && !strcasecmp ($values[$counter]['type'], "open")) {

			$col++;

		}

		if(!strcasecmp ($values[$counter]['tag'], "text:p") && !strcasecmp ($values[$counter]['type'], "complete")) {

			$this->sheets[0]['cells'][$row][$col] = $values[$counter]['value'];

		}

		if(!strcasecmp ($values[$counter]['tag'], "table:table-cell") && !strcasecmp ($values[$counter]['type'], "close")) {

			// nothing here

		}

		if(!strcasecmp ($values[$counter]['tag'], "table:table-row") && !strcasecmp ($values[$counter]['type'], "close")) {

			$mcol = max($col,$mcol);

			$col = 0;

		}

	} while(!strcasecmp ($values[$counter++]['tag'], "table:table"));

	$this->sheets[0]['numRows'] = $row - 1;

	$this->sheets[0]['numCols'] = $mcol - 1;

    }

}
?>
