]> git.mxchange.org Git - friendica.git/blob - mod/proxy.php
Merge branch 'develop' into rewrites/dbm_is_result
[friendica.git] / mod / proxy.php
1 <?php
2 // Based upon "Privacy Image Cache" by Tobias Hößl <https://github.com/CatoTH/>
3
4 define('PROXY_DEFAULT_TIME', 86400); // 1 Day
5
6 define('PROXY_SIZE_MICRO', 'micro');
7 define('PROXY_SIZE_THUMB', 'thumb');
8 define('PROXY_SIZE_SMALL', 'small');
9 define('PROXY_SIZE_MEDIUM', 'medium');
10 define('PROXY_SIZE_LARGE', 'large');
11
12 require_once 'include/security.php';
13 require_once 'include/Photo.php';
14
15 function proxy_init(App $a) {
16         // Pictures are stored in one of the following ways:
17         // 1. If a folder "proxy" exists and is writeable, then use this for caching
18         // 2. If a cache path is defined, use this
19         // 3. If everything else failed, cache into the database
20         //
21         // Question: Do we really need these three methods?
22
23         if (isset($_SERVER['HTTP_IF_MODIFIED_SINCE'])) {
24                 header('HTTP/1.1 304 Not Modified');
25                 header('Last-Modified: ' . gmdate('D, d M Y H:i:s', time()) . ' GMT');
26                 header('Etag: ' . $_SERVER['HTTP_IF_NONE_MATCH']);
27                 header('Expires: ' . gmdate('D, d M Y H:i:s', time() + (31536000)) . ' GMT');
28                 header('Cache-Control: max-age=31536000');
29
30                 if (function_exists('header_remove')) {
31                         header_remove('Last-Modified');
32                         header_remove('Expires');
33                         header_remove('Cache-Control');
34                 }
35                 exit;
36         }
37
38         if (function_exists('header_remove')) {
39                 header_remove('Pragma');
40                 header_remove('pragma');
41         }
42
43         $thumb = false;
44         $size = 1024;
45         $sizetype = '';
46         $basepath = $a->get_basepath();
47
48         // If the cache path isn't there, try to create it
49         if (!is_dir($basepath . '/proxy') AND is_writable($basepath)) {
50                 mkdir($basepath . '/proxy');
51         }
52
53         // Checking if caching into a folder in the webroot is activated and working
54         $direct_cache = (is_dir($basepath . '/proxy') AND is_writable($basepath . '/proxy'));
55
56         // Look for filename in the arguments
57         if ((isset($a->argv[1]) OR isset($a->argv[2]) OR isset($a->argv[3])) AND !isset($_REQUEST['url'])) {
58                 if (isset($a->argv[3])) {
59                         $url = $a->argv[3];
60                 } elseif (isset($a->argv[2])) {
61                         $url = $a->argv[2];
62                 } else {
63                         $url = $a->argv[1];
64                 }
65
66                 if (isset($a->argv[3]) AND ($a->argv[3] == 'thumb')) {
67                         $size = 200;
68                 }
69
70                 // thumb, small, medium and large.
71                 if (substr($url, -6) == ':micro') {
72                         $size = 48;
73                         $sizetype = ':micro';
74                         $url = substr($url, 0, -6);
75                 } elseif (substr($url, -6) == ':thumb') {
76                         $size = 80;
77                         $sizetype = ':thumb';
78                         $url = substr($url, 0, -6);
79                 } elseif (substr($url, -6) == ':small') {
80                         $size = 175;
81                         $url = substr($url, 0, -6);
82                         $sizetype = ':small';
83                 } elseif (substr($url, -7) == ':medium') {
84                         $size = 600;
85                         $url = substr($url, 0, -7);
86                         $sizetype = ':medium';
87                 } elseif (substr($url, -6) == ':large') {
88                         $size = 1024;
89                         $url = substr($url, 0, -6);
90                         $sizetype = ':large';
91                 }
92
93                 $pos = strrpos($url, '=.');
94                 if ($pos) {
95                         $url = substr($url, 0, $pos + 1);
96                 }
97
98                 $url = str_replace(array('.jpg', '.jpeg', '.gif', '.png'), array('','','',''), $url);
99
100                 $url = base64_decode(strtr($url, '-_', '+/'), true);
101
102                 if ($url) {
103                         $_REQUEST['url'] = $url;
104                 }
105         } else {
106                 $direct_cache = false;
107         }
108
109         if (!$direct_cache) {
110                 $urlhash = 'pic:' . sha1($_REQUEST['url']);
111
112                 $cachefile = get_cachefile(hash('md5', $_REQUEST['url']));
113                 if ($cachefile != '' AND file_exists($cachefile)) {
114                         $img_str = file_get_contents($cachefile);
115                         $mime = image_type_to_mime_type(exif_imagetype($cachefile));
116
117                         header('Content-type: ' . $mime);
118                         header('Last-Modified: ' . gmdate('D, d M Y H:i:s', time()) . ' GMT');
119                         header('Etag: "' . md5($img_str) . '"');
120                         header('Expires: ' . gmdate('D, d M Y H:i:s', time() + (31536000)) . ' GMT');
121                         header('Cache-Control: max-age=31536000');
122
123                         // reduce quality - if it isn't a GIF
124                         if ($mime != 'image/gif') {
125                                 $img = new Photo($img_str, $mime);
126                                 if ($img->is_valid()) {
127                                         $img_str = $img->imageString();
128                                 }
129                         }
130
131                         echo $img_str;
132                         killme();
133                 }
134         } else {
135                 $cachefile = '';
136         }
137
138         $valid = true;
139         $r = array();
140
141         if (!$direct_cache AND ($cachefile == '')) {
142                 $r = qu("SELECT * FROM `photo` WHERE `resource-id` = '%s' LIMIT 1", $urlhash);
143                 if (dbm::is_result($r)) {
144                         $img_str = $r[0]['data'];
145                         $mime = $r[0]['desc'];
146                         if ($mime == '') {
147                                 $mime = 'image/jpeg';
148                         }
149                 }
150         }
151
152         if (!dbm::is_result($r)) {
153                 // It shouldn't happen but it does - spaces in URL
154                 $_REQUEST['url'] = str_replace(' ', '+', $_REQUEST['url']);
155                 $redirects = 0;
156                 $img_str = fetch_url($_REQUEST['url'], true, $redirects, 10);
157
158                 $tempfile = tempnam(get_temppath(), 'cache');
159                 file_put_contents($tempfile, $img_str);
160                 $mime = image_type_to_mime_type(exif_imagetype($tempfile));
161                 unlink($tempfile);
162
163                 // If there is an error then return a blank image
164                 if ((substr($a->get_curl_code(), 0, 1) == '4') OR (!$img_str)) {
165                         $img_str = file_get_contents('images/blank.png');
166                         $mime = 'image/png';
167                         $cachefile = ''; // Clear the cachefile so that the dummy isn't stored
168                         $valid = false;
169                         $img = new Photo($img_str, 'image/png');
170                         if ($img->is_valid()) {
171                                 $img->scaleImage(10);
172                                 $img_str = $img->imageString();
173                         }
174                 } elseif ($mime != 'image/jpeg' AND !$direct_cache AND $cachefile == '') {
175                         $image = @imagecreatefromstring($img_str);
176
177                         if ($image === FALSE) {
178                                 die();
179                         }
180
181                         q("INSERT INTO `photo`
182                         ( `uid`, `contact-id`, `guid`, `resource-id`, `created`, `edited`, `filename`, `album`, `height`, `width`, `desc`, `data`, `scale`, `profile`, `allow_cid`, `allow_gid`, `deny_cid`, `deny_gid` )
183                         VALUES ( %d, %d, '%s', '%s', '%s', '%s', '%s', '%s', %d, %d, '%s', '%s', %d, %d, '%s', '%s', '%s', '%s' )",
184                                 0, 0, get_guid(), dbesc($urlhash),
185                                 dbesc(datetime_convert()),
186                                 dbesc(datetime_convert()),
187                                 dbesc(basename(dbesc($_REQUEST['url']))),
188                                 dbesc(''),
189                                 intval(imagesy($image)),
190                                 intval(imagesx($image)),
191                                 $mime,
192                                 dbesc($img_str),
193                                 100,
194                                 intval(0),
195                                 dbesc(''), dbesc(''), dbesc(''), dbesc('')
196                         );
197
198                 } else {
199                         $img = new Photo($img_str, $mime);
200                         if ($img->is_valid() AND !$direct_cache AND ($cachefile == '')) {
201                                 $img->store(0, 0, $urlhash, $_REQUEST['url'], '', 100);
202                         }
203                 }
204         }
205
206         $img_str_orig = $img_str;
207
208         // reduce quality - if it isn't a GIF
209         if ($mime != 'image/gif') {
210                 $img = new Photo($img_str, $mime);
211                 if ($img->is_valid()) {
212                         $img->scaleImage($size);
213                         $img_str = $img->imageString();
214                 }
215         }
216
217         // If there is a real existing directory then put the cache file there
218         // advantage: real file access is really fast
219         // Otherwise write in cachefile
220         if ($valid AND $direct_cache) {
221                 file_put_contents($basepath . '/proxy/' . proxy_url($_REQUEST['url'], true), $img_str_orig);
222                 if ($sizetype != '') {
223                         file_put_contents($basepath . '/proxy/' . proxy_url($_REQUEST['url'], true) . $sizetype, $img_str);
224                 }
225         } elseif ($cachefile != '') {
226                 file_put_contents($cachefile, $img_str_orig);
227         }
228
229         header('Content-type: ' . $mime);
230
231         // Only output the cache headers when the file is valid
232         if ($valid) {
233                 header('Last-Modified: ' . gmdate('D, d M Y H:i:s', time()) . ' GMT');
234                 header('Etag: "' . md5($img_str) . '"');
235                 header('Expires: ' . gmdate('D, d M Y H:i:s', time() + (31536000)) . ' GMT');
236                 header('Cache-Control: max-age=31536000');
237         }
238
239         echo $img_str;
240
241         killme();
242 }
243
244 /**
245  * @brief Transform a remote URL into a local one
246  *
247  * This function only performs the URL replacement on http URL and if the
248  * provided URL isn't local, "the isn't deactivated" (sic) and if the config
249  * system.proxy_disabled is set to false.
250  *
251  * @param string $url       The URL to proxyfy
252  * @param bool   $writemode Returns a local path the remote URL should be saved to
253  * @param string $size      One of the PROXY_SIZE_* constants
254  *
255  * @return string The proxyfied URL or relative path
256  */
257 function proxy_url($url, $writemode = false, $size = '') {
258         $a = get_app();
259
260         if (substr($url, 0, strlen('http')) !== 'http') {
261                 return $url;
262         }
263
264         // Only continue if it isn't a local image and the isn't deactivated
265         if (proxy_is_local_image($url)) {
266                 $url = str_replace(normalise_link(App::get_baseurl()) . '/', App::get_baseurl() . '/', $url);
267                 return $url;
268         }
269
270         if (get_config('system', 'proxy_disabled')) {
271                 return $url;
272         }
273
274         // Image URL may have encoded ampersands for display which aren't desirable for proxy
275         $url = html_entity_decode($url, ENT_NOQUOTES, 'utf-8');
276
277         // Creating a sub directory to reduce the amount of files in the cache directory
278         $basepath = $a->get_basepath() . '/proxy';
279
280         $shortpath = hash('md5', $url);
281         $longpath = substr($shortpath, 0, 2);
282
283         if (is_dir($basepath) AND $writemode AND !is_dir($basepath . '/' . $longpath)) {
284                 mkdir($basepath . '/' . $longpath);
285                 chmod($basepath . '/' . $longpath, 0777);
286         }
287
288         $longpath .= '/' . strtr(base64_encode($url), '+/', '-_');
289
290         // Extract the URL extension
291         $extension = pathinfo(parse_url($url, PHP_URL_PATH), PATHINFO_EXTENSION);
292
293         $extensions = array('jpg', 'jpeg', 'gif', 'png');
294         if (in_array($extension, $extensions)) {
295                 $shortpath .= '.' . $extension;
296                 $longpath .= '.' . $extension;
297         }
298
299         $proxypath = App::get_baseurl() . '/proxy/' . $longpath;
300
301         if ($size != '') {
302                 $size = ':' . $size;
303         }
304
305         // Too long files aren't supported by Apache
306         // Writemode in combination with long files shouldn't be possible
307         if ((strlen($proxypath) > 250) AND $writemode) {
308                 return $shortpath;
309         } elseif (strlen($proxypath) > 250) {
310                 return App::get_baseurl() . '/proxy/' . $shortpath . '?url=' . urlencode($url);
311         } elseif ($writemode) {
312                 return $longpath;
313         } else {
314                 return $proxypath . $size;
315         }
316 }
317
318 /**
319  * @param $url string
320  * @return boolean
321  */
322 function proxy_is_local_image($url) {
323         if ($url[0] == '/') {
324                 return true;
325         }
326
327         if (strtolower(substr($url, 0, 5)) == 'data:') {
328                 return true;
329         }
330
331         // links normalised - bug #431
332         $baseurl = normalise_link(App::get_baseurl());
333         $url = normalise_link($url);
334         return (substr($url, 0, strlen($baseurl)) == $baseurl);
335 }
336
337 /**
338  * @brief Return the array of query string parameters from a URL
339  *
340  * @param string $url
341  * @return array Associative array of query string parameters
342  */
343 function proxy_parse_query($url) {
344         $query = parse_url($url, PHP_URL_QUERY);
345         $query = html_entity_decode($query);
346         $query_list = explode('&', $query);
347         $arr = array();
348
349         foreach ($query_list as $key_value) {
350                 $key_value_list = explode('=', $key_value);
351                 $arr[$key_value_list[0]] = $key_value_list[1];
352         }
353
354         unset($url, $query_list, $url);
355         return $arr;
356 }
357
358 function proxy_img_cb($matches) {
359         // if the picture seems to be from another picture cache then take the original source
360         $queryvar = proxy_parse_query($matches[2]);
361         if (($queryvar['url'] != '') AND (substr($queryvar['url'], 0, 4) == 'http')) {
362                 $matches[2] = urldecode($queryvar['url']);
363         }
364
365         // following line changed per bug #431
366         if (proxy_is_local_image($matches[2])) {
367                 return $matches[1] . $matches[2] . $matches[3];
368         }
369
370         return $matches[1] . proxy_url(htmlspecialchars_decode($matches[2])) . $matches[3];
371 }
372
373 function proxy_parse_html($html) {
374         $html = str_replace(normalise_link(App::get_baseurl()) . '/', App::get_baseurl() . '/', $html);
375
376         return preg_replace_callback('/(<img [^>]*src *= *["\'])([^"\']+)(["\'][^>]*>)/siU', 'proxy_img_cb', $html);
377 }