Images.php
[Pman.Core] / Images.php
1 <?php
2 /**
3  * Deal with image delivery and HTML replacement of image links in body text.
4  *
5  * $str = Pman_Core_Images::replaceImg($str); // < use with HTML
6  *
7  * or
8  *
9  * Deliver image /file etc..
10  * 
11  * Use Cases:
12  * 
13  * args: ontable request
14  *      ontable (req) tablename.
15  *      filename
16  *      (other table args)
17  *      as (serve as a type) = eg. ?as=audio/mpeg 
18  * 
19  * args: generic
20  *     as :(serve as a type) = eg. mimetype.
21  * 
22  * Images/{ID}/fullname.xxxx
23  * 
24  * (valid thumbs 200, 400)...?
25  * Images/Thumb/200/{ID}/fullname.xxxx
26  * Images/Download/{ID}/fullname.xxxx
27  *
28  *
29  *
30  * 
31  * Used to be in Base... now in core..
32  *
33  * 
34  * view permission should be required on the underlying object...
35  * 
36  */
37 require_once  'Pman.php';
38 class Pman_Core_Images extends Pman
39 {
40     function getAuth()
41     {
42         parent::getAuth(); // load company!
43         //return true;
44         $au = $this->getAuthUser();
45         
46         if (!$au) {
47             die("Access denied");
48         }
49         
50         $this->authUser = $au;
51         
52         return true;
53     }
54     var $thumb = false;
55     var $as_mimetype = false;
56     var $method = 'inline';
57     
58     function get($s) // determin what to serve!!!!
59     {
60         print_r('test');exit;
61         // for testing only.
62         //if (!empty($_GET['_post'])) {
63         //   return $this->post();
64         //}
65         
66         $this->as_mimetype = empty($_REQUEST['as']) ? '' : $_REQUEST['as'];
67         
68         $bits= explode('/', $s);
69         $id = 0;
70 //        var_dump($bits);die('in');
71         // without id as first part...
72         if (!empty($bits[0]) && $bits[0] == 'Thumb') {
73             $this->thumb = true;
74             $this->as_mimetype = 'image/jpeg';
75             $this->size = empty($bits[1]) ? '0x0' : $bits[1];
76             $id = empty($bits[2]) ? 0 :   $bits[2];
77             
78         } else if (!empty($bits[0]) && $bits[0] == 'Download') {
79             $this->method = 'attachment';
80             $id = empty($bits[1]) ? 0 :   $bits[1];
81             
82         } else  if (!empty($bits[1]) && $bits[1] == 'Thumb') { // with id as first part.
83             $this->thumb = true;
84             $this->as_mimetype = 'image/jpeg';
85             $this->size = empty($bits[2]) ? '0x0' : $bits[2];
86             $id = empty($bits[3]) ? 0 :   $bits[3];
87             
88         } else if (!empty($bits[0]) && $bits[0] == 'events') {
89             
90             $this->downloadEvent($bits);
91             
92             die ("unknown file?"); 
93             
94         } else {
95         
96             $id = empty($bits[0]) ? 0 :  $bits[0];
97         }
98         
99         if (strpos($id,':') > 0) {  // id format  tablename:id:-imgtype
100             $onbits = explode(':', $id);
101             if ((count($onbits) < 2)   || empty($onbits[1]) || !is_numeric($onbits[1]) || !strlen($onbits[0])) {
102                 die("Bad url");
103             }
104             //DB_DataObject::debugLevel(1);
105             $img = DB_DataObject::factory('Images');
106             $img->ontable = $onbits[0];
107             $img->onid = $onbits[1];
108             if (empty($_REQUEST['anytype'])) {
109                 $img->whereAdd("mimetype like 'image/%'");
110             }
111             $img->orderBy('title ASC'); /// spurious ordering... (curretnly used by shipping project)
112             if (isset($onbits[2])) {
113                 $img->imgtype = $onbits[2];
114             }
115             $img->limit(1);
116             if (!$img->find(true)) {
117                 header('Location: ' . $this->rootURL . '/Pman/templates/images/file-broken.png?reason=' .
118                 urlencode("no images for that item: " . htmlspecialchars($id)));
119             }
120             
121             $id = $img->id;
122             
123             
124         }
125         $id = (int) $id;
126         
127         // depreciated - should use ontable:onid:type here...
128         if (!empty($_REQUEST['ontable'])) {
129
130             //DB_DataObjecT::debugLevel(1);
131             $img = DB_DataObjecT::factory('Images');
132             $img->setFrom($_REQUEST);
133             // use imgtype now...
134            // if (!empty($_REQUEST['query']['filename'])){
135            //     $img->whereAdd("filename LIKE '". $img->escape($_REQUEST['query']['filename']).".%'");
136            // }
137             
138             
139             $img->limit(1);
140             if (!$img->find(true)) {
141                 header('Location: ' . $this->rootURL . '/Pman/templates/images/file-broken.png?reason='. 
142                     urlencode("No file exists"));
143             } 
144             $id = $img->id;
145             
146         }
147         
148         
149        
150         $img = DB_DataObjecT::factory('Images');
151          
152         if (!$id || !$img->get($id)) {
153              
154             header('Location: ' . $this->rootURL . '/Pman/templates/images/file-broken.png?reason=' .
155                 urlencode("image has been removed or deleted."));
156             
157         }
158         
159         if(!$this->hasPermission($img)){
160             header('Location: ' . $this->rootURL . '/Pman/templates/images/file-broken.png?reason=' .
161                 urlencode("access to this image/file has been denied."));
162         }
163         
164         $this->serve($img);
165         exit;
166     }
167     
168     function hasPermission($img) 
169     {
170         return true;
171     }
172     
173     function post()
174     {
175         
176         if (!$this->authUser) {
177             $this->jerr("image conversion only allowed by registered users");
178         }
179         // converts a posted string (eg.svg)
180         // into another type..
181         if (empty($_REQUEST['as'])) {
182            $this->jerr("missing target type");
183         }
184         if (empty($_REQUEST['mimetype'])) {
185             $this->jerr("missing mimetype");
186         }
187         if (empty($_REQUEST['data'])) {
188             $this->jerr("missing data");
189         }
190         
191         
192         $this->as_mimetype = $_REQUEST['as'];
193         $this->mimetype = $_REQUEST['mimetype'];
194         require_once 'File/MimeType.php';
195         $y = new File_MimeType();
196         $src_ext = $y->toExt( $this->mimetype );
197         
198         
199         $tmp = $this->tempName($src_ext);
200         file_put_contents($tmp, $_REQUEST['data']);
201         
202         require_once 'File/Convert.php';
203         $cv = new File_Convert($tmp, $this->mimetype);
204         
205         $fn = $cv->convert(
206                 $this->as_mimetype ,
207                 empty($_REQUEST['width']) ? 0 : $_REQUEST['width'],
208                 empty($_REQUEST['height']) ? 0 : $_REQUEST['height']
209         );
210         if (!empty($_REQUEST['as_data'])) {
211             $this->jok(base64_encode(file_get_contents($fn)));
212         }
213         
214         $cv->serve('attachment');
215         exit;
216         
217         
218         
219     }
220     
221     
222  
223     function serve($img)
224     {
225         print_f("test??");exit;
226         $this->sessionState(0); // turn off session... - locking...
227         
228         require_once 'File/Convert.php';
229         if (!file_exists($img->getStoreName())) {
230 //            print_r($img);exit;
231             header('Location: ' . $this->rootURL . '/Pman/templates/images/file-broken.png?reason=' .
232                 urlencode("Original file was missing : " . $img->getStoreName()));
233     
234         }
235 //        print_r($img);exit;
236         $x = $img->toFileConvert();
237         if (empty($this->as_mimetype) || $img->mimetype == 'image/gif') {
238             $this->as_mimetype  = $img->mimetype;
239         }
240         
241         if (!$this->thumb) {
242             $x->convert( $this->as_mimetype);
243             $x->serve($this->method);
244             exit;
245         }
246         //echo "SKALING?  $this->size";
247         // acutally if we generated the image, then we do not need to validate the size..
248         
249         require_once 'File/MimeType.php';
250         $y = new File_MimeType();
251         $ext = $y->toExt(trim((string) $this->as_mimetype ));
252         
253         print_r($ext);exit;
254         
255         // if the mimetype is not converted..
256         // then the filename should be original.{size}.jpeg
257         $fn = $img->getStoreName() . '.'. $this->size . '.jpeg'; // thumbs are currenly all jpeg.!???
258         
259         if (!file_exists($fn)) {
260             $fn = $img->getStoreName()  . '.'. $this->size . '.'. $img->fileExt();
261             // if it's an image, convert into the same type for thumbnail..
262             if (preg_match('#^image/#', $img->mimetype)) {
263                $this->as_mimetype = $img->mimetype;
264             }
265         }
266         
267         if (!file_exists($fn)) {    
268             $this->validateSize();
269         }
270         
271         $x->convert( $this->as_mimetype, $this->size);
272         $x->serve();
273         exit;
274         
275         
276         
277         
278     }
279     function validateSize()
280     {
281         if (($this->authUser && !empty($this->authUser->company_id) && $this->authUser->company()->comptype=='OWNER') || $_SERVER['SERVER_ADDR'] == $_SERVER['REMOTE_ADDR']) {
282             return true;
283         }
284         
285         
286         $ff = HTML_FlexyFramework::get();
287         
288         $sizes = array(
289                 '100', 
290                 '100x100', 
291                 '150', 
292                 '150x150', 
293                 '200', 
294                 '200x0',
295                 '200x200',  
296                 '400x0',
297                 '300x100',
298                 '500'
299             );
300         
301         $cfg = isset($ff->Pman_Images) ? $ff->Pman_Images :
302                 (isset($ff->Pman_Core_Images) ? $ff->Pman_Core_Images : array());
303         
304         if (!empty($cfg['sizes'])) {
305             $sizes = array_merge($sizes , $cfg['sizes']);
306         }
307         
308         $project = $ff->project;
309         
310         require_once $ff->project . '.php';
311         
312         $project = new $ff->project();
313         
314         if(isset($project::$Pman_Core_Images_Size)){
315             $sizes = $project::$Pman_Core_Images_Size;
316         }
317         
318         if (!in_array($this->size, $sizes)) {
319             die("invalid scale - ".$this->size);
320         }
321     }
322     /**
323      * replace image urls
324      *
325      * The idea of this code was to replace urls for images when you have an admin
326      * and a distribution page. with different urls.
327      *
328      * it may be usefull later if things like embedded images in emails. but
329      * I think it's proably better not to use this.
330      *
331      * The key problem being how to determine if we are replacing 'our' images or some external one..
332      * 
333      *
334      */
335     
336     
337     static function replaceImageURLS($html)
338     {
339         
340         $ff = HTML_FlexyFramework::get();
341         if (!isset($ff->Pman_Images['public_baseURL'])) {
342             return $html;
343         }
344         //var_dump($ff->Pman_Images['public_baseURL']);
345         $baseURL = $ff->Pman_Images['public_baseURL'];
346         
347         preg_match_all('/<img\s+[^>]+>/i',$html, $result); 
348         //print_r($result);
349         $matches = array_unique($result[0]);
350         foreach($matches as $img) {
351             $imatch = array();
352             preg_match_all('/(width|height|src)="([^"]*)"/i',$img, $imatch);
353             // build a keymap
354             $attr =  array();
355             
356             foreach($imatch[1] as $i=>$key) {
357                 $attr[$key] = $imatch[2][$i];
358             }
359             // does it contain baseURL??? --- well what about relative paths...
360             //print_R($attr);
361             
362             if (empty($attr['src'])) {
363                 continue;
364             }
365             if (0 !== strpos($attr['src'], $baseURL)) {
366                 // it starts with our 'new' baseURL?
367                 $html = self::replaceImgUrl($html, $baseURL, $img, $attr,  'src' );
368                 continue;
369             }
370             if (false !== strpos($attr['src'], '//') && false === strpos($attr['src'], $baseURL)) {
371                 // contains an absolute path.. that is probably not us...
372                 continue;
373             }
374             // what about mailto or data... - just ignore?? for images...
375             
376             $html = self::replaceImgUrl($html, $baseURL, $img, $attr,  'src' );
377             
378         }
379         
380         
381         $result = array();
382         preg_match_all('/<a\s+[^>]+>/i',$html, $result); 
383
384         $matches = array_unique($result[0]);
385         foreach($matches as $img) {
386             $imatch = array();
387             preg_match_all('/(href)="([^"]*)"/i',$img, $imatch);
388             // build a keymap
389             $attr =  array();
390             
391             foreach($imatch[1] as $i=>$key) {
392                 $attr[$key] = $imatch[2][$i];
393             }
394             if (!isset($attr['href']) || 0 !== strpos($attr['href'], $baseURL)) { 
395                 continue;
396             }
397             $html = self::replaceImgUrl($html, $baseURL, $img, $attr, 'href' );
398         }
399         
400         return $html;
401     }
402     static function replaceImgUrl($html, $baseURL, $tag, $attr, $attr_name) 
403     {
404         
405         //print_R($attr);
406         // see if it's an image url..
407         // Images/{ID}/fullname.xxxx
408         // Images/Thumb/200/{ID}/fullname.xxxx
409         // Images/Download/{ID}/fullname.xxxx
410         
411         $attr_url = $attr[$attr_name];
412         $umatch  = false;
413         if(!preg_match('#/(Images|Images/Thumb/[a-z0-9]+|Images/Download)/([0-9]+)/(.*)$#', $attr_url, $umatch))  {
414             return $html;
415         }
416         
417         $id = $umatch[2];
418         $hash = '';
419         if (!empty($umatch[3]) && strpos($umatch[3],'#')) {
420             $hash = '#'. array_pop(explode('#',$umatch[3]));
421         }
422         
423         
424         $img = DB_DataObject::factory('Images');
425         if (!$img->get($id)) {
426             return $html;
427         }
428         $type = explode('/', $umatch[1]);
429         $thumbsize = -1;
430          
431         if (count($type) > 2 && $type[1] == 'Thumb') {
432             $thumbsize = $type[2];
433             $provider = '/Images/Thumb';
434         } else {
435             $provider = '/'.$umatch[1];
436         }
437         
438         if (!empty($attr['width']) || !empty($attr['height']) )
439         {
440             // no support for %...
441             $thumbsize =
442                 (empty($attr['width']) ? '0' : $attr['width'] * 1) .
443                 'x' .
444                 (empty($attr['height']) ? '0' : $attr['height'] * 1);
445              $provider = '/Images/Thumb';
446             
447         }
448         
449         if ($thumbsize !== -1) {
450             // change in size..
451             // need to regenerate it..
452             
453             $type = array('Images', 'Thumb', $thumbsize);
454                 
455             $fc = $img->toFileConvert();
456             // make sure it's available..
457             $fc->convert($img->mimetype, $thumbsize);
458             
459             
460         } else {
461             $provider = $provider == 'Images/Thumb' ? 'Images' : $provider; 
462         }
463         
464         
465         // finally replace the original TAG with the new version..
466         
467         $new_tag = str_replace(
468             $attr_name. '="'. $attr_url . '"',
469             $attr_name .'="'. htmlspecialchars($img->URL($thumbsize, $provider, $baseURL)) . $hash .'"',
470             $tag
471         );
472         
473         
474         return str_replace($tag, $new_tag, $html);
475          
476     }
477     
478     function downloadEvent($bits)
479     {
480         $popts = PEAR::getStaticProperty('Pman','options');
481         $ev = DB_DAtaObject::Factory('events');
482         if (!$ev->get($bits[1])) {
483             die("could not find event id");
484         }
485         // technically same user only.. -- normally www-data..
486         if (function_exists('posix_getpwuid')) {
487             $uinfo = posix_getpwuid( posix_getuid () ); 
488             $user = $uinfo['name'];
489         } else {
490             $user = getenv('USERNAME'); // windows.
491         }
492         $ff = HTML_FlexyFramework::get();
493         $file = $ff->Pman['event_log_dir']. '/'. $user. date('/Y/m/d/',strtotime($ev->event_when)). $ev->id . ".json";
494         $filesJ = json_decode(file_get_contents($file));
495
496         //print_r($filesJ);
497
498         foreach($filesJ->FILES as $k=>$f){
499             if ($f->tmp_name != $bits[2]) {
500                 continue;
501             }
502
503             $src = $ff->Pman['event_log_dir']. '/'. $user. date('/Y/m/d/', strtotime($ev->event_when)).  $f->tmp_name ;
504             if (!file_exists($src)) {
505                 die("file was not saved");
506             }
507             header ('Content-Type: ' . $f->type);
508
509             header("Content-Disposition: attachment; filename=\"".basename($f->name)."\";" );
510             @ob_clean();
511             flush();
512             readfile($src);
513             exit;
514         }
515     }
516     
517 }