xref: /dokuwiki/inc/httputils.php (revision 2b9be4565f8205c2186c4b537e1fa49846bf2fe9)
1758447cfSAndreas Gohr<?php
2758447cfSAndreas Gohr/**
3758447cfSAndreas Gohr * Utilities for handling HTTP related tasks
4758447cfSAndreas Gohr *
5758447cfSAndreas Gohr * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
6758447cfSAndreas Gohr * @author     Andreas Gohr <andi@splitbrain.org>
7758447cfSAndreas Gohr */
8758447cfSAndreas Gohr
9758447cfSAndreas Gohrdefine('HTTP_MULTIPART_BOUNDARY','D0KuW1K1B0uNDARY');
10758447cfSAndreas Gohrdefine('HTTP_HEADER_LF',"\r\n");
11758447cfSAndreas Gohrdefine('HTTP_CHUNK_SIZE',16*1024);
12758447cfSAndreas Gohr
13758447cfSAndreas Gohr/**
14758447cfSAndreas Gohr * Checks and sets HTTP headers for conditional HTTP requests
15758447cfSAndreas Gohr *
16758447cfSAndreas Gohr * @author   Simon Willison <swillison@gmail.com>
1723a96c41SElan Ruusamäe * @link     http://simonwillison.net/2003/Apr/23/conditionalGet/
1842ea7f44SGerrit Uitslag *
1993b2e677SMichael Hamann * @param    int $timestamp lastmodified time of the cache file
20758447cfSAndreas Gohr * @returns  void or exits with previously header() commands executed
21758447cfSAndreas Gohr */
22758447cfSAndreas Gohrfunction http_conditionalRequest($timestamp){
23*2b9be456SAndreas Gohr    global $INPUT;
24*2b9be456SAndreas Gohr
25758447cfSAndreas Gohr    // A PHP implementation of conditional get, see
2623a96c41SElan Ruusamäe    //   http://fishbowl.pastiche.org/2002/10/21/http_conditional_get_for_rss_hackers/
27758447cfSAndreas Gohr    $last_modified = substr(gmdate('r', $timestamp), 0, -5).'GMT';
28758447cfSAndreas Gohr    $etag = '"'.md5($last_modified).'"';
29758447cfSAndreas Gohr    // Send the headers
30758447cfSAndreas Gohr    header("Last-Modified: $last_modified");
31758447cfSAndreas Gohr    header("ETag: $etag");
32758447cfSAndreas Gohr    // See if the client has provided the required headers
33*2b9be456SAndreas Gohr    $if_modified_since = $INPUT->server->filter('stripslashes')->str('HTTP_IF_MODIFIED_SINCE', false);
34*2b9be456SAndreas Gohr    $if_none_match = $INPUT->server->filter('stripslashes')->str('HTTP_IF_NONE_MATCH', false);
35758447cfSAndreas Gohr
36758447cfSAndreas Gohr    if (!$if_modified_since && !$if_none_match){
37758447cfSAndreas Gohr        return;
38758447cfSAndreas Gohr    }
39758447cfSAndreas Gohr
40758447cfSAndreas Gohr    // At least one of the headers is there - check them
41758447cfSAndreas Gohr    if ($if_none_match && $if_none_match != $etag) {
42758447cfSAndreas Gohr        return; // etag is there but doesn't match
43758447cfSAndreas Gohr    }
44758447cfSAndreas Gohr
45758447cfSAndreas Gohr    if ($if_modified_since && $if_modified_since != $last_modified) {
46758447cfSAndreas Gohr        return; // if-modified-since is there but doesn't match
47758447cfSAndreas Gohr    }
48758447cfSAndreas Gohr
49758447cfSAndreas Gohr    // Nothing has changed since their last request - serve a 304 and exit
50758447cfSAndreas Gohr    header('HTTP/1.0 304 Not Modified');
51758447cfSAndreas Gohr
52758447cfSAndreas Gohr    // don't produce output, even if compression is on
53c66972f2SAdrian Lang    @ob_end_clean();
54758447cfSAndreas Gohr    exit;
55758447cfSAndreas Gohr}
56758447cfSAndreas Gohr
57758447cfSAndreas Gohr/**
58b051e974SChristopher Smith * Let the webserver send the given file via x-sendfile method
59758447cfSAndreas Gohr *
60b051e974SChristopher Smith * @author Chris Smith <chris@jalakai.co.uk>
6142ea7f44SGerrit Uitslag *
6240e0b444SDominik Eckelmann * @param string $file absolute path of file to send
63f327a5f0SChristopher Smith * @returns  void or exits with previous header() commands executed
64758447cfSAndreas Gohr */
65758447cfSAndreas Gohrfunction http_sendfile($file) {
66758447cfSAndreas Gohr    global $conf;
67758447cfSAndreas Gohr
68758447cfSAndreas Gohr    //use x-sendfile header to pass the delivery to compatible web servers
69758447cfSAndreas Gohr    if($conf['xsendfile'] == 1){
70758447cfSAndreas Gohr        header("X-LIGHTTPD-send-file: $file");
71758447cfSAndreas Gohr        ob_end_clean();
72758447cfSAndreas Gohr        exit;
73758447cfSAndreas Gohr    }elseif($conf['xsendfile'] == 2){
74758447cfSAndreas Gohr        header("X-Sendfile: $file");
75758447cfSAndreas Gohr        ob_end_clean();
76758447cfSAndreas Gohr        exit;
77758447cfSAndreas Gohr    }elseif($conf['xsendfile'] == 3){
78446b5b59SDominik Eckelmann        // FS#2388 nginx just needs the relative path.
79446b5b59SDominik Eckelmann        $file = DOKU_REL.substr($file, strlen(fullpath(DOKU_INC)) + 1);
80758447cfSAndreas Gohr        header("X-Accel-Redirect: $file");
81758447cfSAndreas Gohr        ob_end_clean();
82758447cfSAndreas Gohr        exit;
83758447cfSAndreas Gohr    }
84758447cfSAndreas Gohr}
85758447cfSAndreas Gohr
86758447cfSAndreas Gohr/**
87758447cfSAndreas Gohr * Send file contents supporting rangeRequests
88758447cfSAndreas Gohr *
89758447cfSAndreas Gohr * This function exits the running script
90758447cfSAndreas Gohr *
9190124802SGerrit Uitslag * @param resource $fh - file handle for an already open file
92758447cfSAndreas Gohr * @param int $size     - size of the whole file
93758447cfSAndreas Gohr * @param int $mime     - MIME type of the file
94758447cfSAndreas Gohr *
95758447cfSAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
96758447cfSAndreas Gohr */
97758447cfSAndreas Gohrfunction http_rangeRequest($fh,$size,$mime){
98*2b9be456SAndreas Gohr    global $INPUT;
99*2b9be456SAndreas Gohr
100758447cfSAndreas Gohr    $ranges  = array();
101758447cfSAndreas Gohr    $isrange = false;
102758447cfSAndreas Gohr
103758447cfSAndreas Gohr    header('Accept-Ranges: bytes');
104758447cfSAndreas Gohr
105*2b9be456SAndreas Gohr    if(!$INPUT->server->has('HTTP_RANGE')){
106758447cfSAndreas Gohr        // no range requested - send the whole file
107758447cfSAndreas Gohr        $ranges[] = array(0,$size,$size);
108758447cfSAndreas Gohr    }else{
109*2b9be456SAndreas Gohr        $t = explode('=', $INPUT->server->str('HTTP_RANGE'));
110758447cfSAndreas Gohr        if (!$t[0]=='bytes') {
111758447cfSAndreas Gohr            // we only understand byte ranges - send the whole file
112758447cfSAndreas Gohr            $ranges[] = array(0,$size,$size);
113758447cfSAndreas Gohr        }else{
114758447cfSAndreas Gohr            $isrange = true;
115758447cfSAndreas Gohr            // handle multiple ranges
116758447cfSAndreas Gohr            $r = explode(',',$t[1]);
117758447cfSAndreas Gohr            foreach($r as $x){
118758447cfSAndreas Gohr                $p = explode('-', $x);
119758447cfSAndreas Gohr                $start = (int)$p[0];
120758447cfSAndreas Gohr                $end   = (int)$p[1];
121758447cfSAndreas Gohr                if (!$end) $end = $size - 1;
122758447cfSAndreas Gohr                if ($start > $end || $start > $size || $end > $size){
123758447cfSAndreas Gohr                    header('HTTP/1.1 416 Requested Range Not Satisfiable');
124758447cfSAndreas Gohr                    print 'Bad Range Request!';
125758447cfSAndreas Gohr                    exit;
126758447cfSAndreas Gohr                }
127758447cfSAndreas Gohr                $len = $end - $start + 1;
128758447cfSAndreas Gohr                $ranges[] = array($start,$end,$len);
129758447cfSAndreas Gohr            }
130758447cfSAndreas Gohr        }
131758447cfSAndreas Gohr    }
132758447cfSAndreas Gohr    $parts = count($ranges);
133758447cfSAndreas Gohr
134758447cfSAndreas Gohr    // now send the type and length headers
135758447cfSAndreas Gohr    if(!$isrange){
136758447cfSAndreas Gohr        header("Content-Type: $mime",true);
137758447cfSAndreas Gohr    }else{
138758447cfSAndreas Gohr        header('HTTP/1.1 206 Partial Content');
139758447cfSAndreas Gohr        if($parts == 1){
140758447cfSAndreas Gohr            header("Content-Type: $mime",true);
141758447cfSAndreas Gohr        }else{
142758447cfSAndreas Gohr            header('Content-Type: multipart/byteranges; boundary='.HTTP_MULTIPART_BOUNDARY,true);
143758447cfSAndreas Gohr        }
144758447cfSAndreas Gohr    }
145758447cfSAndreas Gohr
146758447cfSAndreas Gohr    // send all ranges
147758447cfSAndreas Gohr    for($i=0; $i<$parts; $i++){
148758447cfSAndreas Gohr        list($start,$end,$len) = $ranges[$i];
149758447cfSAndreas Gohr
150758447cfSAndreas Gohr        // multipart or normal headers
151758447cfSAndreas Gohr        if($parts > 1){
152758447cfSAndreas Gohr            echo HTTP_HEADER_LF.'--'.HTTP_MULTIPART_BOUNDARY.HTTP_HEADER_LF;
153758447cfSAndreas Gohr            echo "Content-Type: $mime".HTTP_HEADER_LF;
154758447cfSAndreas Gohr            echo "Content-Range: bytes $start-$end/$size".HTTP_HEADER_LF;
155b8b5563eSAndreas Gohr            echo HTTP_HEADER_LF;
156758447cfSAndreas Gohr        }else{
157758447cfSAndreas Gohr            header("Content-Length: $len");
158758447cfSAndreas Gohr            if($isrange){
159758447cfSAndreas Gohr                header("Content-Range: bytes $start-$end/$size");
160758447cfSAndreas Gohr            }
161758447cfSAndreas Gohr        }
162758447cfSAndreas Gohr
163758447cfSAndreas Gohr        // send file content
164758447cfSAndreas Gohr        fseek($fh,$start); //seek to start of range
165758447cfSAndreas Gohr        $chunk = ($len > HTTP_CHUNK_SIZE) ? HTTP_CHUNK_SIZE : $len;
166758447cfSAndreas Gohr        while (!feof($fh) && $chunk > 0) {
167758447cfSAndreas Gohr            @set_time_limit(30); // large files can take a lot of time
168758447cfSAndreas Gohr            print fread($fh, $chunk);
169758447cfSAndreas Gohr            flush();
170758447cfSAndreas Gohr            $len -= $chunk;
171758447cfSAndreas Gohr            $chunk = ($len > HTTP_CHUNK_SIZE) ? HTTP_CHUNK_SIZE : $len;
172758447cfSAndreas Gohr        }
173758447cfSAndreas Gohr    }
174758447cfSAndreas Gohr    if($parts > 1){
175758447cfSAndreas Gohr        echo HTTP_HEADER_LF.'--'.HTTP_MULTIPART_BOUNDARY.'--'.HTTP_HEADER_LF;
176758447cfSAndreas Gohr    }
177758447cfSAndreas Gohr
178b051e974SChristopher Smith    // everything should be done here, exit (or return if testing)
179b051e974SChristopher Smith    if (defined('SIMPLE_TEST')) return;
180758447cfSAndreas Gohr    exit;
181758447cfSAndreas Gohr}
182758447cfSAndreas Gohr
183758447cfSAndreas Gohr/**
184758447cfSAndreas Gohr * Check for a gzipped version and create if necessary
185758447cfSAndreas Gohr *
186758447cfSAndreas Gohr * return true if there exists a gzip version of the uncompressed file
187758447cfSAndreas Gohr * (samepath/samefilename.sameext.gz) created after the uncompressed file
188758447cfSAndreas Gohr *
189758447cfSAndreas Gohr * @author Chris Smith <chris.eureka@jalakai.co.uk>
19042ea7f44SGerrit Uitslag *
19142ea7f44SGerrit Uitslag * @param string $uncompressed_file
19242ea7f44SGerrit Uitslag * @return bool
193758447cfSAndreas Gohr */
194758447cfSAndreas Gohrfunction http_gzip_valid($uncompressed_file) {
19513c37900SAndreas Gohr    if(!DOKU_HAS_GZIP) return false;
19613c37900SAndreas Gohr
197758447cfSAndreas Gohr    $gzip = $uncompressed_file.'.gz';
198758447cfSAndreas Gohr    if (filemtime($gzip) < filemtime($uncompressed_file)) {    // filemtime returns false (0) if file doesn't exist
199758447cfSAndreas Gohr        return copy($uncompressed_file, 'compress.zlib://'.$gzip);
200758447cfSAndreas Gohr    }
201758447cfSAndreas Gohr
202758447cfSAndreas Gohr    return true;
203758447cfSAndreas Gohr}
2046619f42eSAdrian Lang
2056619f42eSAdrian Lang/**
2066619f42eSAdrian Lang * Set HTTP headers and echo cachefile, if useable
2076619f42eSAdrian Lang *
2086619f42eSAdrian Lang * This function handles output of cacheable resource files. It ses the needed
2096619f42eSAdrian Lang * HTTP headers. If a useable cache is present, it is passed to the web server
21090124802SGerrit Uitslag * and the script is terminated.
21142ea7f44SGerrit Uitslag *
21242ea7f44SGerrit Uitslag * @param string $cache cache file name
21342ea7f44SGerrit Uitslag * @param bool   $cache_ok    if cache can be used
2146619f42eSAdrian Lang */
2156619f42eSAdrian Langfunction http_cached($cache, $cache_ok) {
2166619f42eSAdrian Lang    global $conf;
2176619f42eSAdrian Lang
2186619f42eSAdrian Lang    // check cache age & handle conditional request
2196619f42eSAdrian Lang    // since the resource files are timestamped, we can use a long max age: 1 year
2206619f42eSAdrian Lang    header('Cache-Control: public, max-age=31536000');
2216619f42eSAdrian Lang    header('Pragma: public');
2226619f42eSAdrian Lang    if($cache_ok){
2236619f42eSAdrian Lang        http_conditionalRequest(filemtime($cache));
2246619f42eSAdrian Lang        if($conf['allowdebug']) header("X-CacheUsed: $cache");
2256619f42eSAdrian Lang
2266619f42eSAdrian Lang        // finally send output
2276619f42eSAdrian Lang        if ($conf['gzip_output'] && http_gzip_valid($cache)) {
2286619f42eSAdrian Lang            header('Vary: Accept-Encoding');
2296619f42eSAdrian Lang            header('Content-Encoding: gzip');
2306619f42eSAdrian Lang            readfile($cache.".gz");
2316619f42eSAdrian Lang        } else {
23240e0b444SDominik Eckelmann            http_sendfile($cache);
23340e0b444SDominik Eckelmann            readfile($cache);
2346619f42eSAdrian Lang        }
2356619f42eSAdrian Lang        exit;
2366619f42eSAdrian Lang    }
2376619f42eSAdrian Lang
2386619f42eSAdrian Lang    http_conditionalRequest(time());
2396619f42eSAdrian Lang}
2406619f42eSAdrian Lang
2416619f42eSAdrian Lang/**
2426619f42eSAdrian Lang * Cache content and print it
24342ea7f44SGerrit Uitslag *
24442ea7f44SGerrit Uitslag * @param string $file file name
24542ea7f44SGerrit Uitslag * @param string $content
2466619f42eSAdrian Lang */
2476619f42eSAdrian Langfunction http_cached_finish($file, $content) {
2486619f42eSAdrian Lang    global $conf;
2496619f42eSAdrian Lang
2506619f42eSAdrian Lang    // save cache file
2516619f42eSAdrian Lang    io_saveFile($file, $content);
25213c37900SAndreas Gohr    if(DOKU_HAS_GZIP) io_saveFile("$file.gz",$content);
2536619f42eSAdrian Lang
2546619f42eSAdrian Lang    // finally send output
25513c37900SAndreas Gohr    if ($conf['gzip_output'] && DOKU_HAS_GZIP) {
2566619f42eSAdrian Lang        header('Vary: Accept-Encoding');
2576619f42eSAdrian Lang        header('Content-Encoding: gzip');
2586619f42eSAdrian Lang        print gzencode($content,9,FORCE_GZIP);
2596619f42eSAdrian Lang    } else {
2606619f42eSAdrian Lang        print $content;
2616619f42eSAdrian Lang    }
2626619f42eSAdrian Lang}
26396946cc9SDominik Eckelmann
2649d2e1be6SAndreas Gohr/**
2659d2e1be6SAndreas Gohr * Fetches raw, unparsed POST data
2669d2e1be6SAndreas Gohr *
2679d2e1be6SAndreas Gohr * @return string
2689d2e1be6SAndreas Gohr */
26996946cc9SDominik Eckelmannfunction http_get_raw_post_data() {
27096946cc9SDominik Eckelmann    static $postData = null;
27196946cc9SDominik Eckelmann    if ($postData === null) {
27296946cc9SDominik Eckelmann        $postData = file_get_contents('php://input');
27396946cc9SDominik Eckelmann    }
27496946cc9SDominik Eckelmann    return $postData;
27596946cc9SDominik Eckelmann}
2769d2e1be6SAndreas Gohr
2779d2e1be6SAndreas Gohr/**
2789d2e1be6SAndreas Gohr * Set the HTTP response status and takes care of the used PHP SAPI
2799d2e1be6SAndreas Gohr *
2809d2e1be6SAndreas Gohr * Inspired by CodeIgniter's set_status_header function
2819d2e1be6SAndreas Gohr *
2829d2e1be6SAndreas Gohr * @param int    $code
2839d2e1be6SAndreas Gohr * @param string $text
2849d2e1be6SAndreas Gohr */
2859d2e1be6SAndreas Gohrfunction http_status($code = 200, $text = '') {
286*2b9be456SAndreas Gohr    global $INPUT;
287*2b9be456SAndreas Gohr
2889d2e1be6SAndreas Gohr    static $stati = array(
2899d2e1be6SAndreas Gohr        200 => 'OK',
2909d2e1be6SAndreas Gohr        201 => 'Created',
2919d2e1be6SAndreas Gohr        202 => 'Accepted',
2929d2e1be6SAndreas Gohr        203 => 'Non-Authoritative Information',
2939d2e1be6SAndreas Gohr        204 => 'No Content',
2949d2e1be6SAndreas Gohr        205 => 'Reset Content',
2959d2e1be6SAndreas Gohr        206 => 'Partial Content',
2969d2e1be6SAndreas Gohr
2979d2e1be6SAndreas Gohr        300 => 'Multiple Choices',
2989d2e1be6SAndreas Gohr        301 => 'Moved Permanently',
2999d2e1be6SAndreas Gohr        302 => 'Found',
3009d2e1be6SAndreas Gohr        304 => 'Not Modified',
3019d2e1be6SAndreas Gohr        305 => 'Use Proxy',
3029d2e1be6SAndreas Gohr        307 => 'Temporary Redirect',
3039d2e1be6SAndreas Gohr
3049d2e1be6SAndreas Gohr        400 => 'Bad Request',
3059d2e1be6SAndreas Gohr        401 => 'Unauthorized',
3069d2e1be6SAndreas Gohr        403 => 'Forbidden',
3079d2e1be6SAndreas Gohr        404 => 'Not Found',
3089d2e1be6SAndreas Gohr        405 => 'Method Not Allowed',
3099d2e1be6SAndreas Gohr        406 => 'Not Acceptable',
3109d2e1be6SAndreas Gohr        407 => 'Proxy Authentication Required',
3119d2e1be6SAndreas Gohr        408 => 'Request Timeout',
3129d2e1be6SAndreas Gohr        409 => 'Conflict',
3139d2e1be6SAndreas Gohr        410 => 'Gone',
3149d2e1be6SAndreas Gohr        411 => 'Length Required',
3159d2e1be6SAndreas Gohr        412 => 'Precondition Failed',
3169d2e1be6SAndreas Gohr        413 => 'Request Entity Too Large',
3179d2e1be6SAndreas Gohr        414 => 'Request-URI Too Long',
3189d2e1be6SAndreas Gohr        415 => 'Unsupported Media Type',
3199d2e1be6SAndreas Gohr        416 => 'Requested Range Not Satisfiable',
3209d2e1be6SAndreas Gohr        417 => 'Expectation Failed',
3219d2e1be6SAndreas Gohr
3229d2e1be6SAndreas Gohr        500 => 'Internal Server Error',
3239d2e1be6SAndreas Gohr        501 => 'Not Implemented',
3249d2e1be6SAndreas Gohr        502 => 'Bad Gateway',
3259d2e1be6SAndreas Gohr        503 => 'Service Unavailable',
3269d2e1be6SAndreas Gohr        504 => 'Gateway Timeout',
3279d2e1be6SAndreas Gohr        505 => 'HTTP Version Not Supported'
3289d2e1be6SAndreas Gohr    );
3299d2e1be6SAndreas Gohr
3309d2e1be6SAndreas Gohr    if($text == '' && isset($stati[$code])) {
3319d2e1be6SAndreas Gohr        $text = $stati[$code];
3329d2e1be6SAndreas Gohr    }
3339d2e1be6SAndreas Gohr
334*2b9be456SAndreas Gohr    $server_protocol = $INPUT->server->str('SERVER_PROTOCOL', false);
3359d2e1be6SAndreas Gohr
336b051e974SChristopher Smith    if(substr(php_sapi_name(), 0, 3) == 'cgi' || defined('SIMPLE_TEST')) {
3379d2e1be6SAndreas Gohr        header("Status: {$code} {$text}", true);
3389d2e1be6SAndreas Gohr    } elseif($server_protocol == 'HTTP/1.1' OR $server_protocol == 'HTTP/1.0') {
3399d2e1be6SAndreas Gohr        header($server_protocol." {$code} {$text}", true, $code);
3409d2e1be6SAndreas Gohr    } else {
3419d2e1be6SAndreas Gohr        header("HTTP/1.1 {$code} {$text}", true, $code);
3429d2e1be6SAndreas Gohr    }
3439d2e1be6SAndreas Gohr}
344