DataObjects/core.sql
[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);
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         
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             $cl = $clo;
161             if (is_object($clo)) {
162                 $cl = (array)$clo; // lossless converstion..
163             }
164             
165             if (isset($cfg['row_height'])) {
166                 $worksheet->setRow($start_row +$r, $cfg['row_height']);
167             }
168             
169             foreach($cfg['cols']  as $c=>$col_cfg) {
170                 $v = isset($cl[$col_cfg['dataIndex']]) ? $cl[$col_cfg['dataIndex']] : '';
171                 if (empty($cl[$col_cfg['dataIndex']])) {
172                     continue;
173                 }
174                 if (isset($col_cfg['txtrenderer'])) {
175                     $v = call_user_func($col_cfg['txtrenderer'], 
176                             $cl[$col_cfg['dataIndex']], $worksheet, $r+1, $c, $clo);
177                     if ($v === false) {
178                         continue;
179                     }
180                   //  var_dump($v);
181                 }
182                 if (isset($col_cfg['renderer'])) {
183                     $hasRender = true;
184                     continue;
185                 }
186                 
187                 $v = @iconv('UTF-8', 'UTF-8//IGNORE', $v);
188                 $format = isset($col_cfg['format']) ? $formats[$col_cfg['format']] : false;
189                 
190           //    echo "<PRE>WRITE: ". htmlspecialchars(print_r(array($r+1, $c,$v), true));
191                 $worksheet->write($start_row+$r, $c, $v, $format);
192             }
193         }
194         /// call user render on any that are defined..
195         if ($hasRender) {
196             foreach($data as $r=>$cl) {
197             
198                 foreach($cfg['cols']   as $c=>$col_cfg) {
199                     $v = isset($cl[$col_cfg['dataIndex']]) ? $cl[$col_cfg['dataIndex']] : '';
200                     if (empty($cl[$col_cfg['dataIndex']])) {
201                         continue;
202                     }
203                     if (isset($col_cfg['renderer'])) {
204                         call_user_func($col_cfg['renderer'], $cl[$col_cfg['dataIndex']], $worksheet, $r+1, $c, $cl);
205                         
206                     }
207                   //  echo "<PRE>WRITE: ". htmlspecialchars(print_r(array($r+1, $c, $cl[$col_cfg['dataIndex']]), true));
208              
209                 }
210             }
211         }
212         $start_row += count($data);
213         
214         if (!empty($cfg['foot'])) {
215             foreach($cfg['foot'] as $row) { 
216                 foreach($row as $c => $col) {
217                     // if it's an array? - formated ???
218                     if (is_array($col)) {
219                         $format = isset($formats[$col[1]] ) ? $formats[$col[1]] : false;
220                         $worksheet->write($start_row, $c, $col[0], $format);
221                         continue;
222                     }
223                     $worksheet->write($start_row, $c, $col);
224                     
225                 }
226                 $start_row++;
227             }
228             // add a spacer..
229             $start_row++;
230         }
231             
232         
233         
234         
235         
236     }
237     
238     function send($fn)
239     {
240         require_once 'File/Convert.php';
241         $fc=  new File_Convert($this->outfile2, "application/vnd.ms-excel");
242         $fn = $fc->convert("application/vnd.ms-excel"); 
243         $fc->serve('attachment',$fn); // can fix IE Mess
244     }
245      
246     
247 }