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