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
 140         if (!$direct_cache AND ($cachefile == '')) {
 141                 $r = qu("SELECT * FROM `photo` WHERE `resource-id` = '%s' LIMIT 1", $urlhash);
 142                 if (dbm::is_result($r)) {
 143 <<<<<<< HEAD
 144 <<<<<<< origin/rewrites/app_get_baseurl_static
 145                         $img_str = $r[0]['data'];
 146                         $mime = $r[0]["desc"];
 147                         if ($mime == "") $mime = "image/jpeg";
 148 =======
 149 =======
 150 >>>>>>> upstream/develop
 151                         $img_str = $r[0]['data'];
 152                         $mime = $r[0]['desc'];
 153                         if ($mime == '') {
 154                                 $mime = 'image/jpeg';
 155                         }
 156 <<<<<<< HEAD
 157 >>>>>>> HEAD~0
 158 =======
 159 >>>>>>> upstream/develop
 160                 }
 161         } else {
 162                 $r = array();
 163         }
 164
 165         if (!dbm::is_result($r)) {
 166                 // It shouldn't happen but it does - spaces in URL
 167                 $_REQUEST['url'] = str_replace(' ', '+', $_REQUEST['url']);
 168                 $redirects = 0;
 169                 $img_str = fetch_url($_REQUEST['url'], true, $redirects, 10);
 170
 171                 $tempfile = tempnam(get_temppath(), 'cache');
 172                 file_put_contents($tempfile, $img_str);
 173                 $mime = image_type_to_mime_type(exif_imagetype($tempfile));
 174                 unlink($tempfile);
 175
 176                 // If there is an error then return a blank image
 177                 if ((substr($a->get_curl_code(), 0, 1) == '4') OR (!$img_str)) {
 178                         $img_str = file_get_contents('images/blank.png');
 179                         $mime = 'image/png';
 180                         $cachefile = ''; // Clear the cachefile so that the dummy isn't stored
 181                         $valid = false;
 182                         $img = new Photo($img_str, 'image/png');
 183                         if ($img->is_valid()) {
 184                                 $img->scaleImage(10);
 185                                 $img_str = $img->imageString();
 186                         }
 187                 } elseif ($mime != 'image/jpeg' AND !$direct_cache AND $cachefile == '') {
 188                         $image = @imagecreatefromstring($img_str);
 189
 190                         if ($image === FALSE) {
 191                                 die();
 192                         }
 193
 194                         q("INSERT INTO `photo`
 195                         ( `uid`, `contact-id`, `guid`, `resource-id`, `created`, `edited`, `filename`, `album`, `height`, `width`, `desc`, `data`, `scale`, `profile`, `allow_cid`, `allow_gid`, `deny_cid`, `deny_gid` )
 196                         VALUES ( %d, %d, '%s', '%s', '%s', '%s', '%s', '%s', %d, %d, '%s', '%s', %d, %d, '%s', '%s', '%s', '%s' )",
 197                                 0, 0, get_guid(), dbesc($urlhash),
 198                                 dbesc(datetime_convert()),
 199                                 dbesc(datetime_convert()),
 200                                 dbesc(basename(dbesc($_REQUEST['url']))),
 201                                 dbesc(''),
 202                                 intval(imagesy($image)),
 203                                 intval(imagesx($image)),
 204                                 $mime,
 205                                 dbesc($img_str),
 206                                 100,
 207                                 intval(0),
 208                                 dbesc(''), dbesc(''), dbesc(''), dbesc('')
 209                         );
 210
 211                 } else {
 212                         $img = new Photo($img_str, $mime);
 213                         if ($img->is_valid() AND !$direct_cache AND ($cachefile == '')) {
 214                                 $img->store(0, 0, $urlhash, $_REQUEST['url'], '', 100);
 215                         }
 216                 }
 217         }
 218
 219         $img_str_orig = $img_str;
 220
 221         // reduce quality - if it isn't a GIF
 222         if ($mime != 'image/gif') {
 223                 $img = new Photo($img_str, $mime);
 224                 if ($img->is_valid()) {
 225                         $img->scaleImage($size);
 226                         $img_str = $img->imageString();
 227                 }
 228         }
 229
 230         // If there is a real existing directory then put the cache file there
 231         // advantage: real file access is really fast
 232         // Otherwise write in cachefile
 233         if ($valid AND $direct_cache) {
 234                 file_put_contents($basepath . '/proxy/' . proxy_url($_REQUEST['url'], true), $img_str_orig);
 235                 if ($sizetype != '') {
 236                         file_put_contents($basepath . '/proxy/' . proxy_url($_REQUEST['url'], true) . $sizetype, $img_str);
 237                 }
 238         } elseif ($cachefile != '') {
 239                 file_put_contents($cachefile, $img_str_orig);
 240         }
 241
 242         header('Content-type: ' . $mime);
 243
 244         // Only output the cache headers when the file is valid
 245         if ($valid) {
 246                 header('Last-Modified: ' . gmdate('D, d M Y H:i:s', time()) . ' GMT');
 247                 header('Etag: "' . md5($img_str) . '"');
 248                 header('Expires: ' . gmdate('D, d M Y H:i:s', time() + (31536000)) . ' GMT');
 249                 header('Cache-Control: max-age=31536000');
 250         }
 251
 252         echo $img_str;
 253
 254         killme();
 255 }
 256
 257 /**
 258  * @brief Transform a remote URL into a local one
 259  *
 260  * This function only performs the URL replacement on http URL and if the
 261  * provided URL isn't local, "the isn't deactivated" (sic) and if the config
 262  * system.proxy_disabled is set to false.
 263  *
 264  * @param string $url       The URL to proxyfy
 265  * @param bool   $writemode Returns a local path the remote URL should be saved to
 266  * @param string $size      One of the PROXY_SIZE_* constants
 267  *
 268  * @return string The proxyfied URL or relative path
 269  */
 270 function proxy_url($url, $writemode = false, $size = '') {
 271         $a = get_app();
 272
 273         if (substr($url, 0, strlen('http')) !== 'http') {
 274                 return $url;
 275         }
 276
 277         // Only continue if it isn't a local image and the isn't deactivated
 278         if (proxy_is_local_image($url)) {
 279                 $url = str_replace(normalise_link(App::get_baseurl()) . '/', App::get_baseurl() . '/', $url);
 280                 return $url;
 281         }
 282
 283         if (get_config('system', 'proxy_disabled')) {
 284                 return $url;
 285         }
 286
 287         // Image URL may have encoded ampersands for display which aren't desirable for proxy
 288         $url = html_entity_decode($url, ENT_NOQUOTES, 'utf-8');
 289
 290         // Creating a sub directory to reduce the amount of files in the cache directory
 291         $basepath = $a->get_basepath() . '/proxy';
 292
 293         $shortpath = hash('md5', $url);
 294         $longpath = substr($shortpath, 0, 2);
 295
 296         if (is_dir($basepath) AND $writemode AND !is_dir($basepath . '/' . $longpath)) {
 297                 mkdir($basepath . '/' . $longpath);
 298                 chmod($basepath . '/' . $longpath, 0777);
 299         }
 300
 301         $longpath .= '/' . strtr(base64_encode($url), '+/', '-_');
 302
 303         // Extract the URL extension
 304         $extension = pathinfo(parse_url($url, PHP_URL_PATH), PATHINFO_EXTENSION);
 305
 306         $extensions = array('jpg', 'jpeg', 'gif', 'png');
 307         if (in_array($extension, $extensions)) {
 308                 $shortpath .= '.' . $extension;
 309                 $longpath .= '.' . $extension;
 310         }
 311
 312         $proxypath = App::get_baseurl() . '/proxy/' . $longpath;
 313
 314         if ($size != '') {
 315                 $size = ':' . $size;
 316         }
 317
 318         // Too long files aren't supported by Apache
 319         // Writemode in combination with long files shouldn't be possible
 320         if ((strlen($proxypath) > 250) AND $writemode) {
 321                 return $shortpath;
 322         } elseif (strlen($proxypath) > 250) {
 323                 return App::get_baseurl() . '/proxy/' . $shortpath . '?url=' . urlencode($url);
 324         } elseif ($writemode) {
 325                 return $longpath;
 326         } else {
 327                 return $proxypath . $size;
 328         }
 329 }
 330
 331 /**
 332  * @param $url string
 333  * @return boolean
 334  */
 335 function proxy_is_local_image($url) {
 336         if ($url[0] == '/') {
 337                 return true;
 338         }
 339
 340         if (strtolower(substr($url, 0, 5)) == 'data:') {
 341                 return true;
 342         }
 343
 344         // links normalised - bug #431
 345         $baseurl = normalise_link(App::get_baseurl());
 346         $url = normalise_link($url);
 347         return (substr($url, 0, strlen($baseurl)) == $baseurl);
 348 }
 349
 350 /**
 351  * @brief Return the array of query string parameters from a URL
 352  *
 353  * @param string $url
 354  * @return array Associative array of query string parameters
 355  */
 356 function proxy_parse_query($url) {
 357         $query = parse_url($url, PHP_URL_QUERY);
 358         $query = html_entity_decode($query);
 359         $query_list = explode('&', $query);
 360         $arr = array();
 361
 362         foreach ($query_list as $key_value) {
 363                 $key_value_list = explode('=', $key_value);
 364                 $arr[$key_value_list[0]] = $key_value_list[1];
 365         }
 366
 367         unset($url, $query_list, $url);
 368         return $arr;
 369 }
 370
 371 function proxy_img_cb($matches) {
 372         // if the picture seems to be from another picture cache then take the original source
 373         $queryvar = proxy_parse_query($matches[2]);
 374         if (($queryvar['url'] != '') AND (substr($queryvar['url'], 0, 4) == 'http')) {
 375                 $matches[2] = urldecode($queryvar['url']);
 376         }
 377
 378         // following line changed per bug #431
 379         if (proxy_is_local_image($matches[2])) {
 380                 return $matches[1] . $matches[2] . $matches[3];
 381         }
 382
 383         return $matches[1] . proxy_url(htmlspecialchars_decode($matches[2])) . $matches[3];
 384 }
 385
 386 function proxy_parse_html($html) {
 387         $html = str_replace(normalise_link(App::get_baseurl()) . '/', App::get_baseurl() . '/', $html);
 388
 389         return preg_replace_callback('/(<img [^>]*src *= *["\'])([^"\']+)(["\'][^>]*>)/siU', 'proxy_img_cb', $html);
 390 }