xref: /dokuwiki/lib/exe/fetch.php (revision 5783998f1518db5000b33432885f3153de6b579f)
1<?php
2/**
3 * DokuWiki media passthrough file
4 *
5 * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
6 * @author     Andreas Gohr <andi@splitbrain.org>
7 */
8
9  if(!defined('DOKU_INC')) define('DOKU_INC',realpath(dirname(__FILE__).'/../../').'/');
10  require_once(DOKU_INC.'inc/init.php');
11  require_once(DOKU_INC.'inc/common.php');
12  require_once(DOKU_INC.'inc/pageutils.php');
13  require_once(DOKU_INC.'inc/confutils.php');
14  require_once(DOKU_INC.'inc/auth.php');
15  //close sesseion
16  session_write_close();
17
18  $mimetypes = getMimeTypes();
19
20  //get input
21  $MEDIA  = getID('media');
22  $CACHE  = calc_cache($_REQUEST['cache']);
23  $WIDTH  = $_REQUEST['w'];
24  $HEIGHT = $_REQUEST['h'];
25  list($EXT,$MIME) = mimetype($MEDIA);
26  if($EXT === false){
27    $EXT  = 'unknown';
28    $MIME = 'application/octet-stream';
29  }
30
31  //media to local file
32  if(preg_match('#^(https?|ftp)://#i',$MEDIA)){
33    //handle external media
34    $FILE = get_from_URL($MEDIA,$EXT,$CACHE);
35    if(!$FILE){
36      //download failed - redirect to original URL
37      header('Location: '.$MEDIA);
38      exit;
39    }
40  }else{
41    $MEDIA = cleanID($MEDIA);
42    if(empty($MEDIA)){
43      header("HTTP/1.0 400 Bad Request");
44      print 'Bad request';
45      exit;
46    }
47
48    //check permissions (namespace only)
49    if(auth_quickaclcheck(getNS($MEDIA).':X') < AUTH_READ){
50      header("HTTP/1.0 401 Unauthorized");
51      //fixme add some image for imagefiles
52      print 'Unauthorized';
53      exit;
54    }
55    $FILE  = mediaFN($MEDIA);
56  }
57
58  //check file existance
59  if(!@file_exists($FILE)){
60    header("HTTP/1.0 404 Not Found");
61    //FIXME add some default broken image
62    print 'Not Found';
63    exit;
64  }
65
66  //handle image resizing
67  if((substr($MIME,0,5) == 'image') && $WIDTH){
68    $FILE = get_resized($FILE,$EXT,$WIDTH,$HEIGHT);
69  }
70
71
72  //FIXME set sane cachecontrol headers
73  //FIXME handle conditional and partial requests
74
75  //send file
76  header("Content-Type: $MIME");
77  header('Last-Modified: '.date('r',filemtime($FILE)));
78  header('Content-Length: '.filesize($FILE));
79  header('Cache-Control: private, must-revalidate, post-check=0, pre-check=0');
80
81  //application mime type is downloadable
82  if(substr($MIME,0,11) == 'application'){
83    header('Content-Disposition: attachment; filename="'.basename($FILE).'"');
84  }
85
86  $fp = @fopen($FILE,"rb");
87  if($fp){
88    while (!feof($fp)) {
89      @set_time_limit(); // large files can take a lot of time
90      print fread($fp, 16*1024);
91      flush();
92    }
93    fclose($fp);
94  }else{
95    header("HTTP/1.0 500 Internal Server Error");
96    print "Could not read $FILE - bad permissions?";
97  }
98
99/* ------------------------------------------------------------------------ */
100
101/**
102 * Resizes the given image to the given size
103 *
104 * @author  Andreas Gohr <andi@splitbrain.org>
105 */
106function get_resized($file, $ext, $w, $h=0){
107  global $conf;
108
109  $info  = getimagesize($file);
110  if(!$h) $h = round(($w * $info[1]) / $info[0]);
111
112
113  //cache
114  $local = getCacheName($file,'.media.'.$w.'x'.$h.'.'.$ext);
115  $mtime = @filemtime($local); // 0 if not exists
116
117  if( $mtime > filemtime($file) ||
118      resize_imageIM($ext,$file,$info[0],$info[1],$local,$w,$h) ||
119      resize_imageGD($ext,$file,$info[0],$info[1],$local,$w,$h) ){
120    return $local;
121  }
122  //still here? resizing failed
123  return $file;
124}
125
126/**
127 * Returns the wanted cachetime in seconds
128 *
129 * Resolves named constants
130 *
131 * @author  Andreas Gohr <andi@splitbrain.org>
132 */
133function calc_cache($cache){
134  global $conf;
135
136  if(strtolower($cache) == 'nocache') return 0; //never cache
137  if(strtolower($cache) == 'recache') return $conf['cachetime']; //use standard cache
138  return -1; //cache endless
139}
140
141/**
142 * Download a remote file and return local filename
143 *
144 * returns false if download fails. Uses cached file if available and
145 * wanted
146 *
147 * @author  Andreas Gohr <andi@splitbrain.org>
148 * @author  Pavel Vitis <Pavel.Vitis@seznam.cz>
149 */
150function get_from_URL($url,$ext,$cache){
151  global $conf;
152
153  $local = getCacheName(strtolower($url),".media.$ext");
154  $mtime = @filemtime($local); // 0 if not exists
155
156  //decide if download needed:
157  if( $cache == 0 ||                             // never cache
158      ($mtime != 0 && $cache != -1) ||           // exists but no endless cache
159      ($mtime == 0) ||                           // not exists
160      ($cache != -1 && $mtime < time()-$cache)   // expired
161    ){
162      if(io_download($url,$local)){
163        return $local;
164      }else{
165        return false;
166      }
167  }
168
169  //if cache exists use it else
170  if($mtime) return $local;
171
172  //else return false
173  return false;
174}
175
176/**
177 * resize images using external ImageMagick convert program
178 *
179 * @author Pavel Vitis <Pavel.Vitis@seznam.cz>
180 * @author Andreas Gohr <andi@splitbrain.org>
181 */
182function resize_imageIM($ext,$from,$from_w,$from_h,$to,$to_w,$to_h){
183  global $conf;
184
185  // check if convert is configured
186  if(!$conf['im_convert']) return false;
187
188  // prepare command
189  $cmd  = $conf['im_convert'];
190  $cmd .= ' -resize '.$to_w.'x'.$to_h.'!';
191  $cmd .= " $from $to";
192
193  @exec($cmd,$out,$retval);
194  if ($retval == 0) return true;
195
196  return false;
197}
198
199/**
200 * resize images using PHP's libGD support
201 *
202 * @author Andreas Gohr <andi@splitbrain.org>
203 */
204function resize_imageGD($ext,$from,$from_w,$from_h,$to,$to_w,$to_h){
205  global $conf;
206
207  if($conf['gdlib'] < 1) return false; //no GDlib available or wanted
208
209  // create an image of the given filetype
210  if ($ext == 'jpg' || $ext == 'jpeg'){
211    if(!function_exists("imagecreatefromjpeg")) return false;
212    $image = @imagecreatefromjpeg($from);
213  }elseif($ext == 'png') {
214    if(!function_exists("imagecreatefrompng")) return false;
215    $image = @imagecreatefrompng($from);
216
217  }elseif($ext == 'gif') {
218    if(!function_exists("imagecreatefromgif")) return false;
219    $image = @imagecreatefromgif($from);
220  }
221  if(!$image) return false;
222
223  if(($conf['gdlib']>1) && function_exists("imagecreatetruecolor")){
224    $newimg = @imagecreatetruecolor ($to_w, $to_h);
225  }
226  if(!$newimg) $newimg = @imagecreate($to_w, $to_h);
227  if(!$newimg) return false;
228
229  //keep png alpha channel if possible
230  if($ext == 'png' && $conf['gdlib']>1 && function_exists('imagesavealpha')){
231    imagealphablending($newimg, false);
232    imagesavealpha($newimg,true);
233  }
234
235  // create cachedir
236  //io_makeFileDir($to); // not needed anymore, should exist
237
238  //try resampling first
239  if(function_exists("imagecopyresampled")){
240    if(!@imagecopyresampled($newimg, $image, 0, 0, 0, 0, $to_w, $to_h, $from_w, $from_h)) {
241      imagecopyresized($newimg, $image, 0, 0, 0, 0, $to_w, $to_h, $from_w, $from_h);
242    }
243  }else{
244    imagecopyresized($newimg, $image, 0, 0, 0, 0, $to_w, $to_h, $from_w, $from_h);
245  }
246
247  if ($ext == 'jpg' || $ext == 'jpeg'){
248    if(!function_exists("imagejpeg")) return false;
249    return imagejpeg($newimg, $to, 70);
250  }elseif($ext == 'png') {
251    if(!function_exists("imagepng")) return false;
252    return imagepng($newimg, $to);
253  }elseif($ext == 'gif') {
254    if(!function_exists("imagegif")) return false;
255    return imagegif($newimg, $to);
256  }
257
258  return false;
259}
260
261
262//Setup VIM: ex: et ts=2 enc=utf-8 :
263?>
264