xref: /dokuwiki/inc/fetch.functions.php (revision 04585e6c37e0352a5bc568fc8c938aeafa1c160e)
17fb7960fSChristopher Smith<?php
27fb7960fSChristopher Smith/**
37fb7960fSChristopher Smith * Functions used by lib/exe/fetch.php
47fb7960fSChristopher Smith * (not included by other parts of dokuwiki)
57fb7960fSChristopher Smith */
67fb7960fSChristopher Smith
77fb7960fSChristopher Smith/**
87fb7960fSChristopher Smith * Set headers and send the file to the client
97fb7960fSChristopher Smith *
107fb7960fSChristopher Smith * The $cache parameter influences how long files may be kept in caches, the $public parameter
117fb7960fSChristopher Smith * influences if this caching may happen in public proxis or in the browser cache only FS#2734
127fb7960fSChristopher Smith *
137fb7960fSChristopher Smith * This function will abort the current script when a 304 is sent or file sending is handled
147fb7960fSChristopher Smith * through x-sendfile
157fb7960fSChristopher Smith *
167fb7960fSChristopher Smith * @author Andreas Gohr <andi@splitbrain.org>
177fb7960fSChristopher Smith * @author Ben Coburn <btcoburn@silicodon.net>
18499df7e5SGerry Weißbach * @author Gerry Weissbach <dokuwiki@gammaproduction.de>
197fb7960fSChristopher Smith * @param string $file   local file to send
207fb7960fSChristopher Smith * @param string $mime   mime type of the file
217fb7960fSChristopher Smith * @param bool   $dl     set to true to force a browser download
227fb7960fSChristopher Smith * @param int    $cache  remaining cache time in seconds (-1 for $conf['cache'], 0 for no-cache)
237fb7960fSChristopher Smith * @param bool   $public is this a public ressource or a private one?
242fd6745dSGerry Weißbach * @param string $orig   original file to send - the file name will be used for the Content-Disposition
257fb7960fSChristopher Smith */
262fd6745dSGerry Weißbachfunction sendFile($file, $mime, $dl, $cache, $public = false, $orig = null) {
277fb7960fSChristopher Smith    global $conf;
287fb7960fSChristopher Smith    // send mime headers
297fb7960fSChristopher Smith    header("Content-Type: $mime");
307fb7960fSChristopher Smith
317fb7960fSChristopher Smith    // calculate cache times
327fb7960fSChristopher Smith    if($cache == -1) {
337fb7960fSChristopher Smith        $maxage  = max($conf['cachetime'], 3600); // cachetime or one hour
347fb7960fSChristopher Smith        $expires = time() + $maxage;
357fb7960fSChristopher Smith    } else if($cache > 0) {
367fb7960fSChristopher Smith        $maxage  = $cache; // given time
377fb7960fSChristopher Smith        $expires = time() + $maxage;
387fb7960fSChristopher Smith    } else { // $cache == 0
397fb7960fSChristopher Smith        $maxage  = 0;
407fb7960fSChristopher Smith        $expires = 0; // 1970-01-01
417fb7960fSChristopher Smith    }
427fb7960fSChristopher Smith
437fb7960fSChristopher Smith    // smart http caching headers
447fb7960fSChristopher Smith    if($maxage) {
457fb7960fSChristopher Smith        if($public) {
467fb7960fSChristopher Smith            // cache publically
477fb7960fSChristopher Smith            header('Expires: '.gmdate("D, d M Y H:i:s", $expires).' GMT');
487fb7960fSChristopher Smith            header('Cache-Control: public, proxy-revalidate, no-transform, max-age='.$maxage);
497fb7960fSChristopher Smith            header('Pragma: public');
507fb7960fSChristopher Smith        } else {
517fb7960fSChristopher Smith            // cache in browser
527fb7960fSChristopher Smith            header('Expires: '.gmdate("D, d M Y H:i:s", $expires).' GMT');
537fb7960fSChristopher Smith            header('Cache-Control: private, no-transform, max-age='.$maxage);
547fb7960fSChristopher Smith            header('Pragma: no-cache');
557fb7960fSChristopher Smith        }
567fb7960fSChristopher Smith    } else {
577fb7960fSChristopher Smith        // no cache at all
587fb7960fSChristopher Smith        header('Expires: Thu, 01 Jan 1970 00:00:00 GMT');
597fb7960fSChristopher Smith        header('Cache-Control: no-cache, no-transform');
607fb7960fSChristopher Smith        header('Pragma: no-cache');
617fb7960fSChristopher Smith    }
627fb7960fSChristopher Smith
637fb7960fSChristopher Smith    //send important headers first, script stops here if '304 Not Modified' response
647fb7960fSChristopher Smith    $fmtime = @filemtime($file);
657fb7960fSChristopher Smith    http_conditionalRequest($fmtime);
667fb7960fSChristopher Smith
672fd6745dSGerry Weißbach    // Use the current $file if is $orig is not set.
682fd6745dSGerry Weißbach    if ( $orig == null ) {
692fd6745dSGerry Weißbach        $orig = $file;
702fd6745dSGerry Weißbach    }
712fd6745dSGerry Weißbach
727fb7960fSChristopher Smith    //download or display?
737fb7960fSChristopher Smith    if($dl) {
74*04585e6cSGerry Weißbach        header('Content-Disposition: attachment;'.rfc2231_encode('filename', utf8_basename($orig)).';');
757fb7960fSChristopher Smith    } else {
76*04585e6cSGerry Weißbach        header('Content-Disposition: inline;'.rfc2231_encode('filename', utf8_basename($orig)).';');
777fb7960fSChristopher Smith    }
787fb7960fSChristopher Smith
797fb7960fSChristopher Smith    //use x-sendfile header to pass the delivery to compatible webservers
8040e0b444SDominik Eckelmann    http_sendfile($file);
817fb7960fSChristopher Smith
827fb7960fSChristopher Smith    // send file contents
837fb7960fSChristopher Smith    $fp = @fopen($file, "rb");
847fb7960fSChristopher Smith    if($fp) {
857fb7960fSChristopher Smith        http_rangeRequest($fp, filesize($file), $mime);
867fb7960fSChristopher Smith    } else {
877fb7960fSChristopher Smith        http_status(500);
887fb7960fSChristopher Smith        print "Could not read $file - bad permissions?";
897fb7960fSChristopher Smith    }
907fb7960fSChristopher Smith}
917fb7960fSChristopher Smith
927fb7960fSChristopher Smith/**
93*04585e6cSGerry Weißbach * Try an rfc2231 compatible encoding. This ensures correct
94*04585e6cSGerry Weißbach * interpretation of filenames outside of the ASCII set.
95*04585e6cSGerry Weißbach * This seems to be needed for file names with e.g. umlauts that
96*04585e6cSGerry Weißbach * would otherwise decode wrongly in IE.
97*04585e6cSGerry Weißbach *
98*04585e6cSGerry Weißbach * There is no additional checking, just the encoding and setting the key=value for usage in headers
99*04585e6cSGerry Weißbach *
100*04585e6cSGerry Weißbach * @author Gerry Weissbach <gerry.w@gammaproduction.de>
101*04585e6cSGerry Weißbach * @param string $name      name of the field to be set in the header() call
102*04585e6cSGerry Weißbach * @param string $value     value of the field to be set in the header() call
103*04585e6cSGerry Weißbach * @param string $charset   used charset for the encoding of value
104*04585e6cSGerry Weißbach * @param string $lang      language used.
105*04585e6cSGerry Weißbach * @return string           in the format " name=value" for values WITHOUT special characters
106*04585e6cSGerry Weißbach * @return string           in the format " name*=charset'lang'value" for values WITH special characters
107*04585e6cSGerry Weißbach */
108*04585e6cSGerry Weißbachfunction rfc2231_encode($name, $value, $charset='utf-8', $lang='en') {
109*04585e6cSGerry Weißbach    $internal = preg_replace_callback('/[\x00-\x20*\'%()<>@,;:\\\\"\/[\]?=\x80-\xFF]/', function($match) { return rawurlencode($match[0]); }, $value);
110*04585e6cSGerry Weißbach    if ( $value != $internal ) {
111*04585e6cSGerry Weißbach        return ' '.$name.'*='.$charset."'".$lang."'".$internal;
112*04585e6cSGerry Weißbach    } else {
113*04585e6cSGerry Weißbach        return ' '.$name.'="'.$value.'"';
114*04585e6cSGerry Weißbach    }
115*04585e6cSGerry Weißbach}
116*04585e6cSGerry Weißbach
117*04585e6cSGerry Weißbach/**
1187fb7960fSChristopher Smith * Check for media for preconditions and return correct status code
1197fb7960fSChristopher Smith *
1207fb7960fSChristopher Smith * READ: MEDIA, MIME, EXT, CACHE
1217fb7960fSChristopher Smith * WRITE: MEDIA, FILE, array( STATUS, STATUSMESSAGE )
1227fb7960fSChristopher Smith *
1237fb7960fSChristopher Smith * @author Gerry Weissbach <gerry.w@gammaproduction.de>
124f481fb8cSKlap-in * @param string $media  reference to the media id
125f481fb8cSKlap-in * @param string $file   reference to the file variable
126f481fb8cSKlap-in * @param string $rev
127f481fb8cSKlap-in * @param int    $width
128f481fb8cSKlap-in * @param int    $height
129f481fb8cSKlap-in * @return array(STATUS, STATUSMESSAGE)
1307fb7960fSChristopher Smith */
1317fb7960fSChristopher Smithfunction checkFileStatus(&$media, &$file, $rev = '', $width=0, $height=0) {
1327fb7960fSChristopher Smith    global $MIME, $EXT, $CACHE, $INPUT;
1337fb7960fSChristopher Smith
1347fb7960fSChristopher Smith    //media to local file
1353e7e6067SKlap-in    if(media_isexternal($media)) {
136cc036f74SKlap-in        //check token for external image and additional for resized and cached images
137cc036f74SKlap-in        if(media_get_token($media, $width, $height) !== $INPUT->str('tok')) {
1387fb7960fSChristopher Smith            return array(412, 'Precondition Failed');
1397fb7960fSChristopher Smith        }
1407fb7960fSChristopher Smith        //handle external images
1417fb7960fSChristopher Smith        if(strncmp($MIME, 'image/', 6) == 0) $file = media_get_from_URL($media, $EXT, $CACHE);
1427fb7960fSChristopher Smith        if(!$file) {
1437fb7960fSChristopher Smith            //download failed - redirect to original URL
1447fb7960fSChristopher Smith            return array(302, $media);
1457fb7960fSChristopher Smith        }
1467fb7960fSChristopher Smith    } else {
1477fb7960fSChristopher Smith        $media = cleanID($media);
1487fb7960fSChristopher Smith        if(empty($media)) {
1497fb7960fSChristopher Smith            return array(400, 'Bad request');
1507fb7960fSChristopher Smith        }
1517fb7960fSChristopher Smith        // check token for resized images
1527fb7960fSChristopher Smith        if (($width || $height) && media_get_token($media, $width, $height) !== $INPUT->str('tok')) {
1537fb7960fSChristopher Smith            return array(412, 'Precondition Failed');
1547fb7960fSChristopher Smith        }
1557fb7960fSChristopher Smith
1567fb7960fSChristopher Smith        //check permissions (namespace only)
1577fb7960fSChristopher Smith        if(auth_quickaclcheck(getNS($media).':X') < AUTH_READ) {
1587fb7960fSChristopher Smith            return array(403, 'Forbidden');
1597fb7960fSChristopher Smith        }
1607fb7960fSChristopher Smith        $file = mediaFN($media, $rev);
1617fb7960fSChristopher Smith    }
1627fb7960fSChristopher Smith
1637fb7960fSChristopher Smith    //check file existance
1647fb7960fSChristopher Smith    if(!@file_exists($file)) {
1657fb7960fSChristopher Smith        return array(404, 'Not Found');
1667fb7960fSChristopher Smith    }
1677fb7960fSChristopher Smith
1687fb7960fSChristopher Smith    return array(200, null);
1697fb7960fSChristopher Smith}
1707fb7960fSChristopher Smith
1717fb7960fSChristopher Smith/**
1727fb7960fSChristopher Smith * Returns the wanted cachetime in seconds
1737fb7960fSChristopher Smith *
1747fb7960fSChristopher Smith * Resolves named constants
1757fb7960fSChristopher Smith *
1767fb7960fSChristopher Smith * @author  Andreas Gohr <andi@splitbrain.org>
1777fb7960fSChristopher Smith */
1787fb7960fSChristopher Smithfunction calc_cache($cache) {
1797fb7960fSChristopher Smith    global $conf;
1807fb7960fSChristopher Smith
1817fb7960fSChristopher Smith    if(strtolower($cache) == 'nocache') return 0; //never cache
1827fb7960fSChristopher Smith    if(strtolower($cache) == 'recache') return $conf['cachetime']; //use standard cache
1837fb7960fSChristopher Smith    return -1; //cache endless
1847fb7960fSChristopher Smith}
185