SimpleExcel.php
[Pman.Core] / SimpleExcel.php
1 <?php
2
3 /**
4  * class to generate excel file from rows of data, and a configuration.
5  *
6  * usage :
7  *   $x = new Pman_Core_SimpleExcel(array())
8  *   $x->send($fn);
9  *
10  * 
11  * cfg:
12  *     formats 
13  *          name : [ Align : left, .... ]
14  *          
15  *     workbook : nameof
16  *
17  *     head  : [
18             [ "a", "b" ]
19             [],
20             [ "A", "B" ]
21             [ "a",  ["test", "left"]  ] << sub array [text, formatname]
22         ],
23  *     cols :  array(
24             array(
25                 'header'=> "Thumbnail",
26                 'dataIndex'=> 'id',
27                 'width'=>  75,
28                 'renderer' => array($this, 'getThumb')
29             ),
30         
31         // if this is set then it will add a tab foreach one.
32         workbooks = array(
33             workbook ->
34             
35             
36             
37  */
38  
39  
40  
41
42
43 class Pman_Core_SimpleExcel extends Pman
44 {
45     
46     
47     
48     function Pman_Core_SimpleExcel($data,$cfg)
49     {
50       // print_r($cfg);exit;
51         require_once 'Spreadsheet/Excel/Writer.php';
52         // Creating a workbook
53         $outfile2 = $this->tempName('xls');
54        // var_dump($outfile2);
55         $workbook = new Spreadsheet_Excel_Writer($outfile2);
56         //$workbook = new Spreadsheet_Excel_Writer();
57         $workbook->setVersion(8);
58         // sending HTTP headers
59         
60         $formats = array();
61        
62         $cfg['formats'] = isset($cfg['formats']) ? $cfg['formats'] : array();
63         foreach($cfg['formats'] as $f=>$fcfg) {
64             $formats[$f] = & $workbook->addFormat();
65             foreach($fcfg as $k=>$v) {
66                 $formats[$f]->{'set' . $k}($v);
67             }
68              
69         }
70          
71
72         if (empty($cfg['workbooks'])) {
73             $this->buildpage( $workbook,  $formats , $data,$cfg);
74         } else {
75             foreach($cfg['workbooks'] as $i =>$wcfg) {
76                 $this->buildpage( $workbook,  $formats , $data[$i],$wcfg);
77             }
78             
79         }
80          
81          
82          
83         
84         
85         $workbook->close();
86         $this->outfile2 = $outfile2;
87          
88     }
89     
90     
91     static function date($str)
92     {
93         
94         return (strtotime($str . ' UTC') +  (86400 *  25569)) / 86400;
95         
96     }
97     
98     
99     function buildpage($workbook,  $formats , $data,$cfg)
100     {
101         //echo '<PRE>';        print_R($cfg);
102       //  print_r($cfg);exit;
103         // Creating a worksheet
104         $worksheet =  $workbook->addWorksheet($cfg['workbook']);
105         if (is_a($worksheet, 'PEAR_Error')) {
106             die($worksheet->toString());
107         }
108         //print_R($worksheet);
109         $worksheet->setInputEncoding('UTF-8'); 
110          
111          
112          
113         $start_row = 0;
114         
115         if (!empty($cfg['head'])) {
116             foreach($cfg['head'] as $row) { 
117                 foreach($row as $c => $col) {
118                     if (is_array($col)) {
119                         $format = isset($formats[$col[1]] ) ? $formats[$col[1]] : false;
120                         $worksheet->write($start_row, $c, $col[0], $format);
121                         continue;
122                     }
123                     
124                     $worksheet->write($start_row, $c, $col);
125                     
126                 }
127                 $start_row++;
128             }
129             // add a spacer..
130             $start_row++;
131         }
132             
133             
134             
135          
136         foreach($cfg['cols'] as $c=>$col_cfg) {
137             if (is_string($col_cfg)) {
138                 $cfg['cols'][$c] = array(
139                     'header' => $col_cfg,
140                     'dataIndex' => $col_cfg,
141                     'width' => 50,
142                     
143                 );
144             }
145         }
146          
147          
148         foreach($cfg['cols'] as $c=>$col_cfg) {
149             
150             
151             
152             $worksheet->write($start_row, $c, $col_cfg['header']);
153             $worksheet->setColumn ( $c, $c, $col_cfg['width'] / 5);
154              
155         }
156         $start_row++;
157         $hasRender  = false;
158            //     DB_DataObject::debugLevel(1);
159         foreach($data as $r=>$clo) {
160             print_r($clo);
161             $cl = $clo;
162             if (is_object($clo)) {
163                 $cl = (array)$clo; // lossless converstion..
164             }
165             
166             if (isset($cfg['row_height'])) {
167                 $worksheet->setRow($start_row +$r, $cfg['row_height']);
168             }
169             
170             foreach($cfg['cols']  as $c=>$col_cfg) {
171                 $v = isset($cl[$col_cfg['dataIndex']]) ? $cl[$col_cfg['dataIndex']] : '';
172                 if (empty($cl[$col_cfg['dataIndex']])) {
173                     continue;
174                 }
175                 if (isset($col_cfg['txtrenderer'])) {
176                     $v = call_user_func($col_cfg['txtrenderer'], 
177                             $cl[$col_cfg['dataIndex']], $worksheet, $r+1, $c, $clo);
178                     if ($v === false) {
179                         continue;
180                     }
181                   //  var_dump($v);
182                 }
183                 if (isset($col_cfg['renderer'])) {
184                     $hasRender = true;
185                     continue;
186                 }
187                 
188                 $v = @iconv('UTF-8', 'UTF-8//IGNORE', $v);
189                 $format = isset($col_cfg['format']) ? $formats[$col_cfg['format']] : false;
190                 
191           //    echo "<PRE>WRITE: ". htmlspecialchars(print_r(array($r+1, $c,$v), true));
192                 $worksheet->write($start_row+$r, $c, $v, $format);
193             }
194         }
195         /// call user render on any that are defined..
196         if ($hasRender) {
197             foreach($data as $r=>$cl) {
198             
199                 foreach($cfg['cols']   as $c=>$col_cfg) {
200                     $v = isset($cl[$col_cfg['dataIndex']]) ? $cl[$col_cfg['dataIndex']] : '';
201                     if (empty($cl[$col_cfg['dataIndex']])) {
202                         continue;
203                     }
204                     if (isset($col_cfg['renderer'])) {
205                         call_user_func($col_cfg['renderer'], $cl[$col_cfg['dataIndex']], $worksheet, $r+1, $c, $cl);
206                         
207                     }
208                   //  echo "<PRE>WRITE: ". htmlspecialchars(print_r(array($r+1, $c, $cl[$col_cfg['dataIndex']]), true));
209              
210                 }
211             }
212         }
213         $start_row += count($data);
214         
215         if (!empty($cfg['foot'])) {
216             foreach($cfg['foot'] as $row) { 
217                 foreach($row as $c => $col) {
218                     // if it's an array? - formated ???
219                     if (is_array($col)) {
220                         $format = isset($formats[$col[1]] ) ? $formats[$col[1]] : false;
221                         $worksheet->write($start_row, $c, $col[0], $format);
222                         continue;
223                     }
224                     $worksheet->write($start_row, $c, $col);
225                     
226                 }
227                 $start_row++;
228             }
229             // add a spacer..
230             $start_row++;
231         }
232             
233         
234         
235         
236         
237     }
238     
239     function send($fn)
240     {
241         require_once 'File/Convert.php';
242         $fc=  new File_Convert($this->outfile2, "application/vnd.ms-excel");
243         $fn = $fc->convert("application/vnd.ms-excel"); 
244         $fc->serve('attachment',$fn); // can fix IE Mess
245     }
246      
247     
248 }