Metadata_PHP/metadata/include/toExcell.php

<?php
/****************************************************************
* Script         : PHP ñêðèïò ôîðìèðîâàíèÿ îò÷åòîâ â Excell ôàéë
* Author         : LiO <lio@lio.kz>
* Version        : 0.1
* Copyright      : GNU LGPL
* URL            : http://lio.kz
* Last modified  : 08.07.2004
* Description    : Îáúåêò ôîðìèðîâàíèÿ xls ôàéëà. Ôàéë ìîæåò áûòü
* ñîõðàíåí ôèçè÷åñêè íà äèñê äëÿ äàëüíåéøåé ðàáîòû (ïåðåäà÷à,
* îòïðàâêà íà e-mail è ò.ä.). Òàê æå ìîæíî ñðàçó "ïîêàçàòü" ñòðóêòóðó
* Äàííûé ñêðèïò ïîääåðæèâàåò ôîðìàò Excell 5, ñ îãðàíè÷åíèÿìè -
* íå áîëåå 255 ñòîëáöîâ, è 65535 ñòðîê.
*
* Îòëå÷èñòåëüíûå îñîáåííîñòè îò äðóãèõ ñêðèïòîâ
*  1. Ôîðìèðîâàíèÿ àòðèáóòîâ ÿ÷ååê (îáðàìëåíèå)
*  2. Îòäåëüíàÿ çàïèñü öåëûõ ÷èñåë è âåùåñòâåííûõ
*  3. Êîððåêòèðîâêà ñòèëåé øðèôòîâ è ðàçìåðà
******************************************************************/


 class  PhpToExcell {
    var  $data   = "";          // äàííûå ñòðóêòóðû

    // ôîðìèðîâàíèÿ çàãîëîâêà îòêðûòèÿ
    function  ExBOF()
     {
       // begin of the excel file header
       $this->data = pack("c*", 0x09, 0x00, 0x04, 0x00, 0x02, 0x00, 0x10, 0x0);
     }
     
    // ôîðìèðîâàíèÿ çàãîëîâêà çàêðûòèÿ
    function  ExEOF()
     {
     $this->data .= pack("cc", 0x0A, 0x00);
     }
     
    // Ïåðåâîäèò â ñòðîêó attr1..3
    function RowAttr($attr1,$attr2,$attr3)
    {
     return chr($attr1).chr($attr2).chr($attr3);
    }

    // óñòàíàâëèâàåò ðóññêèé ÿçûê â ñòðóêòóðà xls
    function Rus()
    {
     $this->data .= (chr(0x42).chr(0x00).chr(0x02).chr(0x00).chr(0x01).chr(0x80));
    }

    // çàïèñü ñòðîêè
    // Col,Row - êîëîíêà è ñòðîêà
    // attr1 - àòðèáóò ïîêàçà ÿ÷åéêè è çàùèòà îò çàïèñè
    // attr2 - ðàçìåð øðèôòà
    // attr3 - îáðàìëåíèå ÿ÷åéêè
    // äëÿ ôîðìèðîâàíèÿ àòðèáóòîâ èñïîëüçóéòå ñîîòâåñòâóþùèå ôóíêöèè
    function WriteLabel($Col,$Row,$attr1=0,$attr2=0,$attr3=0,$value) // { Çàïèñü String }
    {
     $i=strlen($value);
     $this->data .= pack("v*",0x04,8+$i,$Col,$Row);
     $this->data .= $this->RowAttr($attr1,$attr2,$attr3);
     $this->data .= pack("c",$i);
     $this->data .= $value;
    }

    // óñòàíîâêà øèðèíû êîëîíêè  Width*1/256
    //                           3000 - 100% }
    function ColWidth($ColFirst,$ColLast,$Width)
    {
      $this->data .= (CHR(0x24).CHR(00).Chr(04).CHR(00).chr($ColFirst).chr($ColLast).pack('s',$Width));
    }

    // Óïðàâëÿåò âèäîì êîëîíîê è ñòðîê ïðè
    // ReferenceMode=1 Ñòèëü ññûëîê = R1C1
    // ReferenceMode=0 Ñòèëü ññûëîê ñòàíäàðòíûé A1...
    function RefMode($ReferenceMode=1)
    {
     if ($ReferenceMode==1)
     {
      $this->data .= (CHR(0x0f).chr(0x00).chr(2).chr(0x00).chr(0x00).chr(0x00));
     } else
      {
       $this->data .= (CHR(0x0f).chr(0x00).chr(2).chr(0x00).chr(0x00).chr(0x01));
      }
    }

    // çàïèñü öåëîãî ÷èñëà
    function WriteInteger($Col,$Row,$attr1,$attr2,$attr3,$value=0)
    {
     $this->data.=pack("v*",0x02,0x09,$Col,$Row);
     $this->data.=$this->RowAttr($attr1,$attr2,$attr3);
     $this->data.=pack("v",$value);
    }

    // çàïèñü äðîáíîãî ÷èñëà
    function WriteNumber($Col,$Row,$attr1,$attr2,$attr3,$value=0.00)
    {
     $this->data.=pack("v*",0x03,0x0F,$Col,$Row);
     $this->data.=$this->RowAttr($attr1,$attr2,$attr3);
     $this->data.=pack("d",$value);

    }
    // çàïèñü ïóñòîé ÿ÷åéêè
    function WriteBlank($Col,$Row,$attr1,$attr2,$attr3)
    {
     $this->data.=pack("v*",0x01,0x07,$Col,$Row);
     $this->data.=$this->RowAttr($attr1,$attr2,$attr3);
    }

    // Óñòàíîâêà øðèôòà. Height*1/20
    //      Äëÿ 10 ïóíêòîâ Height = 200   }
    function Font($Height,$Bold=0,$Italic=0,$Underline=0,$StrikeOut=0,$FontName)
    {
     $i=strlen($FontName);
     $this->data.=CHR(0x31).chr(0x00).Chr($i+5).chr(0x00);
     $this->data.=pack("v",$Height);
     $k=0;
     if ($Bold==1) $k=$k|1;
     if ($Italic==1) $k=$k|2;
     if ($Underline==1) $k=$k|4;
     if ($StrikeOut==1) $k=$k|8;
     $this->data.=pack("v",$k);
     $this->data.=chr($i);
     $this->data.=$FontName;
    }

    // Ôîðìèðóåì àòòðèáóò ¹1 ($Attr1)
    // $CellHidden - ñêðûòü ôîðìóëû
    // $CellLocked - çàùèùåííàÿ ÿ÷åéêà
    function Attr1($CellHidden=0,$CellLocked=0)
    {
     $r=0x0;
     if ($CellHidden==1)$r=$r|128;
     if ($CellLocked==1)$r=$r|64;
     return $r;
    }
    
    // Ôîðìèðóåì àòòðèáóò ¹2 ($Attr2)
    // $FontNumber 0..3
    function Attr2($FontNumber=0)
    {
     $r=0;
     switch ($FontNumber)
     {
      case 1:
            $r=64;
            break;
      case 2:
            $r=128;
            break;
      case 3:
            $r=129;
            break;
      }
      return $r;
    }
    
    // Ôîðìèðóåì àòòðèáóò ¹3 ($Attr3)
    // Alignment  0 - General
    //            1 - left
    //            2 - center
    //            3 - Right
    //            4 - Fill
    function Attr3($Shaded=0,$BottomBorder=0,$TopBorder=0,$RightBorder=0,$LeftBorder=0,$Alignment=0)
    {
     $r=0;
     if ($Shaded==1) $r=$r|128;
     if ($BottomBorder==1) $r=$r|64;
     if ($TopBorder==1) $r=$r|32;
     if ($RightBorder==1) $r=$r|16;
     if ($LeftBorder==1) $r= $r|8;
     if ($Alignment<8) $r=$r|$Alignment;
     return $r;
    }
    
    // ñîõðàíåíèå äàííûõ â xls ôàéë
    function SaveToFileXls($FName='file.xls')
    {
     $fp = fopen( $FName, "wb" );
     fwrite( $fp,$this->data);
     fclose( $fp );
    }
    
    // ïîêàçàòü ñòðóêòóðó â web
    function SendFileToHTTP($FName='file.xls')
    {
     header ( "Expires: Mon, 1 Apr 1974 05:00:00 GMT" );
     header ( "Last-Modified: " . gmdate("D,d M YH:i:s") . " GMT" );
     header ( "Cache-Control: no-cache, must-revalidate" );
     header ( "Pragma: no-cache" );
     header ( "Content-type: application/x-msexcel" );
     header ( "Content-Disposition: attachment; filename=".$FName );
     print $this->data;
    }
  }

?>