xref: /dokuwiki/inc/ChangeLog/ChangeLog.php (revision 1d11f1d3396b6d0e55489e568b4bb7028ff9f172)
10c3a5702SAndreas Gohr<?php
20c3a5702SAndreas Gohr
30c3a5702SAndreas Gohrnamespace dokuwiki\ChangeLog;
40c3a5702SAndreas Gohr
50c3a5702SAndreas Gohr/**
6*1d11f1d3SSatoshi Sahara * ChangeLog Prototype; methods for handling changelog
70c3a5702SAndreas Gohr */
80c3a5702SAndreas Gohrabstract class ChangeLog
90c3a5702SAndreas Gohr{
10*1d11f1d3SSatoshi Sahara    use ChangeLogTrait;
11*1d11f1d3SSatoshi Sahara
120c3a5702SAndreas Gohr    /** @var string */
130c3a5702SAndreas Gohr    protected $id;
140c3a5702SAndreas Gohr    /** @var int */
15bd17ac90SSatoshi Sahara    protected $currentRevision;
160c3a5702SAndreas Gohr    /** @var array */
170c3a5702SAndreas Gohr    protected $cache;
180c3a5702SAndreas Gohr
190c3a5702SAndreas Gohr    /**
200c3a5702SAndreas Gohr     * Constructor
210c3a5702SAndreas Gohr     *
220c3a5702SAndreas Gohr     * @param string $id page id
230c3a5702SAndreas Gohr     * @param int $chunk_size maximum block size read from file
240c3a5702SAndreas Gohr     */
250c3a5702SAndreas Gohr    public function __construct($id, $chunk_size = 8192)
260c3a5702SAndreas Gohr    {
270c3a5702SAndreas Gohr        global $cache_revinfo;
280c3a5702SAndreas Gohr
290c3a5702SAndreas Gohr        $this->cache =& $cache_revinfo;
300c3a5702SAndreas Gohr        if (!isset($this->cache[$id])) {
310c3a5702SAndreas Gohr            $this->cache[$id] = array();
320c3a5702SAndreas Gohr        }
330c3a5702SAndreas Gohr
340c3a5702SAndreas Gohr        $this->id = $id;
350c3a5702SAndreas Gohr        $this->setChunkSize($chunk_size);
3619b5dd7eSSatoshi Sahara        // set property currentRevision and cache prior to getRevisionInfo($currentRev) call
3719b5dd7eSSatoshi Sahara        $this->getCurrentRevisionInfo();
380c3a5702SAndreas Gohr    }
390c3a5702SAndreas Gohr
400c3a5702SAndreas Gohr    /**
410c3a5702SAndreas Gohr     * Returns path to current page/media
420c3a5702SAndreas Gohr     *
430c3a5702SAndreas Gohr     * @return string path to file
440c3a5702SAndreas Gohr     */
450c3a5702SAndreas Gohr    abstract protected function getFilename();
460c3a5702SAndreas Gohr
47df7627d6SSatoshi Sahara    /**
48df7627d6SSatoshi Sahara     * Check whether given revision is the current page
49df7627d6SSatoshi Sahara     *
50df7627d6SSatoshi Sahara     * @param int $rev timestamp of current page
51df7627d6SSatoshi Sahara     * @return bool true if $rev is current revision, otherwise false
52df7627d6SSatoshi Sahara     */
53df7627d6SSatoshi Sahara    public function isCurrentRevision($rev)
54df7627d6SSatoshi Sahara    {
55df7627d6SSatoshi Sahara        return $rev == $this->currentRevision();
56df7627d6SSatoshi Sahara    }
57df7627d6SSatoshi Sahara
58df7627d6SSatoshi Sahara    /**
59df7627d6SSatoshi Sahara     * Checks if the revision is last revision
60df7627d6SSatoshi Sahara     *
61df7627d6SSatoshi Sahara     * @param int $rev revision timestamp
62df7627d6SSatoshi Sahara     * @return bool true if $rev is last revision, otherwise false
63df7627d6SSatoshi Sahara     */
64df7627d6SSatoshi Sahara    public function isLastRevision($rev = null)
65df7627d6SSatoshi Sahara    {
66df7627d6SSatoshi Sahara        return $rev === $this->lastRevision();
67df7627d6SSatoshi Sahara    }
68df7627d6SSatoshi Sahara
69df7627d6SSatoshi Sahara    /**
70df7627d6SSatoshi Sahara     * Return the current revision identifer
71df7627d6SSatoshi Sahara     * @return int|false
72df7627d6SSatoshi Sahara     */
73df7627d6SSatoshi Sahara    public function currentRevision()
74df7627d6SSatoshi Sahara    {
75df7627d6SSatoshi Sahara        if (!isset($this->currentRevision)) {
76df7627d6SSatoshi Sahara            // set ChangeLog::currentRevision property
77df7627d6SSatoshi Sahara            $this->getCurrentRevisionInfo();
78df7627d6SSatoshi Sahara        }
79df7627d6SSatoshi Sahara        return $this->currentRevision;
80df7627d6SSatoshi Sahara    }
81df7627d6SSatoshi Sahara
82df7627d6SSatoshi Sahara    /**
83df7627d6SSatoshi Sahara     * Return the last revision identifer, timestamp of last entry of changelog
84df7627d6SSatoshi Sahara     * @return int|false
85df7627d6SSatoshi Sahara     */
86df7627d6SSatoshi Sahara    public function lastRevision()
87df7627d6SSatoshi Sahara    {
88df7627d6SSatoshi Sahara        $revs = $this->getRevisions(-1, 1);
89df7627d6SSatoshi Sahara        return empty($revs) ? false : $revs[0];
90df7627d6SSatoshi Sahara    }
91df7627d6SSatoshi Sahara
920c3a5702SAndreas Gohr    /**
93b82f2411SSatoshi Sahara     * Save revision info to the cache pool
94b82f2411SSatoshi Sahara     *
95b82f2411SSatoshi Sahara     * @return bool
96b82f2411SSatoshi Sahara     */
97b82f2411SSatoshi Sahara    protected function saveRevisionInfo($info)
98b82f2411SSatoshi Sahara    {
99b82f2411SSatoshi Sahara        if (!is_array($info)) return false;
100b82f2411SSatoshi Sahara        //$this->cache[$this->id][$info['date']] ??= $info; // since php 7.4
101b82f2411SSatoshi Sahara        $this->cache[$this->id][$info['date']] = $this->cache[$this->id][$info['date']] ?? $info;
102b82f2411SSatoshi Sahara        return true;
103b82f2411SSatoshi Sahara    }
104b82f2411SSatoshi Sahara
105b82f2411SSatoshi Sahara    /**
1060c3a5702SAndreas Gohr     * Get the changelog information for a specific page id and revision (timestamp)
1070c3a5702SAndreas Gohr     *
1080c3a5702SAndreas Gohr     * Adjacent changelog lines are optimistically parsed and cached to speed up
1090c3a5702SAndreas Gohr     * consecutive calls to getRevisionInfo. For large changelog files, only the chunk
1100c3a5702SAndreas Gohr     * containing the requested changelog line is read.
1110c3a5702SAndreas Gohr     *
1120c3a5702SAndreas Gohr     * @param int $rev revision timestamp
1130c3a5702SAndreas Gohr     * @return bool|array false or array with entries:
1140c3a5702SAndreas Gohr     *      - date:  unix timestamp
1150c3a5702SAndreas Gohr     *      - ip:    IPv4 address (127.0.0.1)
1160c3a5702SAndreas Gohr     *      - type:  log line type
1170c3a5702SAndreas Gohr     *      - id:    page id
1180c3a5702SAndreas Gohr     *      - user:  user name
1190c3a5702SAndreas Gohr     *      - sum:   edit summary (or action reason)
1200c3a5702SAndreas Gohr     *      - extra: extra data (varies by line type)
121bd17ac90SSatoshi Sahara     *      - sizechange: change of filesize
1220c3a5702SAndreas Gohr     *
1230c3a5702SAndreas Gohr     * @author Ben Coburn <btcoburn@silicodon.net>
1240c3a5702SAndreas Gohr     * @author Kate Arzamastseva <pshns@ukr.net>
1250c3a5702SAndreas Gohr     */
1260c3a5702SAndreas Gohr    public function getRevisionInfo($rev)
1270c3a5702SAndreas Gohr    {
128a3984ddfSSatoshi Sahara        $rev = max(0, $rev);
129a3984ddfSSatoshi Sahara        if (!$rev) return false;
1300c3a5702SAndreas Gohr
1310c3a5702SAndreas Gohr        // check if it's already in the memory cache
1320c3a5702SAndreas Gohr        if (isset($this->cache[$this->id]) && isset($this->cache[$this->id][$rev])) {
1330c3a5702SAndreas Gohr            return $this->cache[$this->id][$rev];
1340c3a5702SAndreas Gohr        }
1350c3a5702SAndreas Gohr
1360c3a5702SAndreas Gohr        //read lines from changelog
1370c3a5702SAndreas Gohr        list($fp, $lines) = $this->readloglines($rev);
1380c3a5702SAndreas Gohr        if ($fp) {
1390c3a5702SAndreas Gohr            fclose($fp);
1400c3a5702SAndreas Gohr        }
1410c3a5702SAndreas Gohr        if (empty($lines)) return false;
1420c3a5702SAndreas Gohr
1430c3a5702SAndreas Gohr        // parse and cache changelog lines
1440c3a5702SAndreas Gohr        foreach ($lines as $value) {
145*1d11f1d3SSatoshi Sahara            $info = $this->parseLogLine($value);
146b82f2411SSatoshi Sahara            $this->saveRevisionInfo($info);
1470c3a5702SAndreas Gohr        }
1480c3a5702SAndreas Gohr        if (!isset($this->cache[$this->id][$rev])) {
1490c3a5702SAndreas Gohr            return false;
1500c3a5702SAndreas Gohr        }
1510c3a5702SAndreas Gohr        return $this->cache[$this->id][$rev];
1520c3a5702SAndreas Gohr    }
1530c3a5702SAndreas Gohr
1540c3a5702SAndreas Gohr    /**
1550c3a5702SAndreas Gohr     * Return a list of page revisions numbers
1560c3a5702SAndreas Gohr     *
1570c3a5702SAndreas Gohr     * Does not guarantee that the revision exists in the attic,
1580c3a5702SAndreas Gohr     * only that a line with the date exists in the changelog.
1590c3a5702SAndreas Gohr     * By default the current revision is skipped.
1600c3a5702SAndreas Gohr     *
1610c3a5702SAndreas Gohr     * The current revision is automatically skipped when the page exists.
1620c3a5702SAndreas Gohr     * See $INFO['meta']['last_change'] for the current revision.
1630c3a5702SAndreas Gohr     * A negative $first let read the current revision too.
1640c3a5702SAndreas Gohr     *
1650c3a5702SAndreas Gohr     * For efficiency, the log lines are parsed and cached for later
1660c3a5702SAndreas Gohr     * calls to getRevisionInfo. Large changelog files are read
1670c3a5702SAndreas Gohr     * backwards in chunks until the requested number of changelog
1680c3a5702SAndreas Gohr     * lines are recieved.
1690c3a5702SAndreas Gohr     *
1700c3a5702SAndreas Gohr     * @param int $first skip the first n changelog lines
1710c3a5702SAndreas Gohr     * @param int $num number of revisions to return
1720c3a5702SAndreas Gohr     * @return array with the revision timestamps
1730c3a5702SAndreas Gohr     *
1740c3a5702SAndreas Gohr     * @author Ben Coburn <btcoburn@silicodon.net>
1750c3a5702SAndreas Gohr     * @author Kate Arzamastseva <pshns@ukr.net>
1760c3a5702SAndreas Gohr     */
1770c3a5702SAndreas Gohr    public function getRevisions($first, $num)
1780c3a5702SAndreas Gohr    {
1790c3a5702SAndreas Gohr        $revs = array();
1800c3a5702SAndreas Gohr        $lines = array();
1810c3a5702SAndreas Gohr        $count = 0;
1820c3a5702SAndreas Gohr
1830c3a5702SAndreas Gohr        $num = max($num, 0);
1840c3a5702SAndreas Gohr        if ($num == 0) {
1850c3a5702SAndreas Gohr            return $revs;
1860c3a5702SAndreas Gohr        }
1870c3a5702SAndreas Gohr
1880c3a5702SAndreas Gohr        if ($first < 0) {
1890c3a5702SAndreas Gohr            $first = 0;
1900c3a5702SAndreas Gohr        } else {
191df7627d6SSatoshi Sahara            $fileLastMod = $this->getFilename();
192df7627d6SSatoshi Sahara            if (file_exists($fileLastMod) && $this->isLastRevision(filemtime($fileLastMod))) {
193df7627d6SSatoshi Sahara                // skip last revision if the page exists
1940c3a5702SAndreas Gohr                $first = max($first + 1, 0);
1950c3a5702SAndreas Gohr            }
1960c3a5702SAndreas Gohr        }
1970c3a5702SAndreas Gohr
1980c3a5702SAndreas Gohr        $file = $this->getChangelogFilename();
1990c3a5702SAndreas Gohr
2000c3a5702SAndreas Gohr        if (!file_exists($file)) {
2010c3a5702SAndreas Gohr            return $revs;
2020c3a5702SAndreas Gohr        }
2030c3a5702SAndreas Gohr        if (filesize($file) < $this->chunk_size || $this->chunk_size == 0) {
2040c3a5702SAndreas Gohr            // read whole file
2050c3a5702SAndreas Gohr            $lines = file($file);
2060c3a5702SAndreas Gohr            if ($lines === false) {
2070c3a5702SAndreas Gohr                return $revs;
2080c3a5702SAndreas Gohr            }
2090c3a5702SAndreas Gohr        } else {
2100c3a5702SAndreas Gohr            // read chunks backwards
2110c3a5702SAndreas Gohr            $fp = fopen($file, 'rb'); // "file pointer"
2120c3a5702SAndreas Gohr            if ($fp === false) {
2130c3a5702SAndreas Gohr                return $revs;
2140c3a5702SAndreas Gohr            }
2150c3a5702SAndreas Gohr            fseek($fp, 0, SEEK_END);
2160c3a5702SAndreas Gohr            $tail = ftell($fp);
2170c3a5702SAndreas Gohr
2180c3a5702SAndreas Gohr            // chunk backwards
2190c3a5702SAndreas Gohr            $finger = max($tail - $this->chunk_size, 0);
2200c3a5702SAndreas Gohr            while ($count < $num + $first) {
2210c3a5702SAndreas Gohr                $nl = $this->getNewlinepointer($fp, $finger);
2220c3a5702SAndreas Gohr
2230c3a5702SAndreas Gohr                // was the chunk big enough? if not, take another bite
2240c3a5702SAndreas Gohr                if ($nl > 0 && $tail <= $nl) {
2250c3a5702SAndreas Gohr                    $finger = max($finger - $this->chunk_size, 0);
2260c3a5702SAndreas Gohr                    continue;
2270c3a5702SAndreas Gohr                } else {
2280c3a5702SAndreas Gohr                    $finger = $nl;
2290c3a5702SAndreas Gohr                }
2300c3a5702SAndreas Gohr
2310c3a5702SAndreas Gohr                // read chunk
2320c3a5702SAndreas Gohr                $chunk = '';
2330c3a5702SAndreas Gohr                $read_size = max($tail - $finger, 0); // found chunk size
2340c3a5702SAndreas Gohr                $got = 0;
2350c3a5702SAndreas Gohr                while ($got < $read_size && !feof($fp)) {
2360c3a5702SAndreas Gohr                    $tmp = @fread($fp, max(min($this->chunk_size, $read_size - $got), 0));
2370c3a5702SAndreas Gohr                    if ($tmp === false) {
2380c3a5702SAndreas Gohr                        break;
2390c3a5702SAndreas Gohr                    } //error state
2400c3a5702SAndreas Gohr                    $got += strlen($tmp);
2410c3a5702SAndreas Gohr                    $chunk .= $tmp;
2420c3a5702SAndreas Gohr                }
2430c3a5702SAndreas Gohr                $tmp = explode("\n", $chunk);
2440c3a5702SAndreas Gohr                array_pop($tmp); // remove trailing newline
2450c3a5702SAndreas Gohr
2460c3a5702SAndreas Gohr                // combine with previous chunk
2470c3a5702SAndreas Gohr                $count += count($tmp);
2480c3a5702SAndreas Gohr                $lines = array_merge($tmp, $lines);
2490c3a5702SAndreas Gohr
2500c3a5702SAndreas Gohr                // next chunk
2510c3a5702SAndreas Gohr                if ($finger == 0) {
2520c3a5702SAndreas Gohr                    break;
253e24a74c0SAndreas Gohr                } else { // already read all the lines
2540c3a5702SAndreas Gohr                    $tail = $finger;
2550c3a5702SAndreas Gohr                    $finger = max($tail - $this->chunk_size, 0);
2560c3a5702SAndreas Gohr                }
2570c3a5702SAndreas Gohr            }
2580c3a5702SAndreas Gohr            fclose($fp);
2590c3a5702SAndreas Gohr        }
2600c3a5702SAndreas Gohr
2610c3a5702SAndreas Gohr        // skip parsing extra lines
2620c3a5702SAndreas Gohr        $num = max(min(count($lines) - $first, $num), 0);
2630c3a5702SAndreas Gohr        if ($first > 0 && $num > 0) {
2640c3a5702SAndreas Gohr            $lines = array_slice($lines, max(count($lines) - $first - $num, 0), $num);
265df7627d6SSatoshi Sahara        } elseif ($first > 0 && $num == 0) {
2660c3a5702SAndreas Gohr            $lines = array_slice($lines, 0, max(count($lines) - $first, 0));
2670c3a5702SAndreas Gohr        } elseif ($first == 0 && $num > 0) {
2680c3a5702SAndreas Gohr            $lines = array_slice($lines, max(count($lines) - $num, 0));
2690c3a5702SAndreas Gohr        }
2700c3a5702SAndreas Gohr
2710c3a5702SAndreas Gohr        // handle lines in reverse order
2720c3a5702SAndreas Gohr        for ($i = count($lines) - 1; $i >= 0; $i--) {
273*1d11f1d3SSatoshi Sahara            $info = $this->parseLogLine($lines[$i]);
274b82f2411SSatoshi Sahara            if ($this->saveRevisionInfo($info)) {
275bd17ac90SSatoshi Sahara                $revs[] = $info['date'];
2760c3a5702SAndreas Gohr            }
2770c3a5702SAndreas Gohr        }
2780c3a5702SAndreas Gohr
2790c3a5702SAndreas Gohr        return $revs;
2800c3a5702SAndreas Gohr    }
2810c3a5702SAndreas Gohr
2820c3a5702SAndreas Gohr    /**
2830c3a5702SAndreas Gohr     * Get the nth revision left or right handside  for a specific page id and revision (timestamp)
2840c3a5702SAndreas Gohr     *
2850c3a5702SAndreas Gohr     * For large changelog files, only the chunk containing the
2860c3a5702SAndreas Gohr     * reference revision $rev is read and sometimes a next chunck.
2870c3a5702SAndreas Gohr     *
2880c3a5702SAndreas Gohr     * Adjacent changelog lines are optimistically parsed and cached to speed up
2890c3a5702SAndreas Gohr     * consecutive calls to getRevisionInfo.
2900c3a5702SAndreas Gohr     *
2910c3a5702SAndreas Gohr     * @param int $rev revision timestamp used as startdate (doesn't need to be revisionnumber)
2920c3a5702SAndreas Gohr     * @param int $direction give position of returned revision with respect to $rev; positive=next, negative=prev
2930c3a5702SAndreas Gohr     * @return bool|int
2940c3a5702SAndreas Gohr     *      timestamp of the requested revision
2950c3a5702SAndreas Gohr     *      otherwise false
2960c3a5702SAndreas Gohr     */
2970c3a5702SAndreas Gohr    public function getRelativeRevision($rev, $direction)
2980c3a5702SAndreas Gohr    {
2990c3a5702SAndreas Gohr        $rev = max($rev, 0);
3000c3a5702SAndreas Gohr        $direction = (int)$direction;
3010c3a5702SAndreas Gohr
3020c3a5702SAndreas Gohr        //no direction given or last rev, so no follow-up
3030c3a5702SAndreas Gohr        if (!$direction || ($direction > 0 && $this->isCurrentRevision($rev))) {
3040c3a5702SAndreas Gohr            return false;
3050c3a5702SAndreas Gohr        }
3060c3a5702SAndreas Gohr
3070c3a5702SAndreas Gohr        //get lines from changelog
3080c3a5702SAndreas Gohr        list($fp, $lines, $head, $tail, $eof) = $this->readloglines($rev);
3090c3a5702SAndreas Gohr        if (empty($lines)) return false;
3100c3a5702SAndreas Gohr
3115d9428a0SSatoshi Sahara        // look for revisions later/earlier than $rev, when founded count till the wanted revision is reached
3120c3a5702SAndreas Gohr        // also parse and cache changelog lines for getRevisionInfo().
3130c3a5702SAndreas Gohr        $revcounter = 0;
3140c3a5702SAndreas Gohr        $relativerev = false;
3150c3a5702SAndreas Gohr        $checkotherchunck = true; //always runs once
3160c3a5702SAndreas Gohr        while (!$relativerev && $checkotherchunck) {
317bd17ac90SSatoshi Sahara            $info = array();
3180c3a5702SAndreas Gohr            //parse in normal or reverse order
3190c3a5702SAndreas Gohr            $count = count($lines);
3200c3a5702SAndreas Gohr            if ($direction > 0) {
3210c3a5702SAndreas Gohr                $start = 0;
3220c3a5702SAndreas Gohr                $step = 1;
3230c3a5702SAndreas Gohr            } else {
3240c3a5702SAndreas Gohr                $start = $count - 1;
3250c3a5702SAndreas Gohr                $step = -1;
3260c3a5702SAndreas Gohr            }
3270c3a5702SAndreas Gohr            for ($i = $start; $i >= 0 && $i < $count; $i = $i + $step) {
328*1d11f1d3SSatoshi Sahara                $info = $this->parseLogLine($lines[$i]);
329b82f2411SSatoshi Sahara                if ($this->saveRevisionInfo($info)) {
3300c3a5702SAndreas Gohr                    //look for revs older/earlier then reference $rev and select $direction-th one
331bd17ac90SSatoshi Sahara                    if (($direction > 0 && $info['date'] > $rev) || ($direction < 0 && $info['date'] < $rev)) {
3320c3a5702SAndreas Gohr                        $revcounter++;
3330c3a5702SAndreas Gohr                        if ($revcounter == abs($direction)) {
334bd17ac90SSatoshi Sahara                            $relativerev = $info['date'];
3350c3a5702SAndreas Gohr                        }
3360c3a5702SAndreas Gohr                    }
3370c3a5702SAndreas Gohr                }
3380c3a5702SAndreas Gohr            }
3390c3a5702SAndreas Gohr
3400c3a5702SAndreas Gohr            //true when $rev is found, but not the wanted follow-up.
3410c3a5702SAndreas Gohr            $checkotherchunck = $fp
342bd17ac90SSatoshi Sahara                && ($info['date'] == $rev || ($revcounter > 0 && !$relativerev))
3430c3a5702SAndreas Gohr                && !(($tail == $eof && $direction > 0) || ($head == 0 && $direction < 0));
3440c3a5702SAndreas Gohr
3450c3a5702SAndreas Gohr            if ($checkotherchunck) {
3460c3a5702SAndreas Gohr                list($lines, $head, $tail) = $this->readAdjacentChunk($fp, $head, $tail, $direction);
3470c3a5702SAndreas Gohr
3480c3a5702SAndreas Gohr                if (empty($lines)) break;
3490c3a5702SAndreas Gohr            }
3500c3a5702SAndreas Gohr        }
3510c3a5702SAndreas Gohr        if ($fp) {
3520c3a5702SAndreas Gohr            fclose($fp);
3530c3a5702SAndreas Gohr        }
3540c3a5702SAndreas Gohr
3550c3a5702SAndreas Gohr        return $relativerev;
3560c3a5702SAndreas Gohr    }
3570c3a5702SAndreas Gohr
3580c3a5702SAndreas Gohr    /**
3590c3a5702SAndreas Gohr     * Returns revisions around rev1 and rev2
3600c3a5702SAndreas Gohr     * When available it returns $max entries for each revision
3610c3a5702SAndreas Gohr     *
3620c3a5702SAndreas Gohr     * @param int $rev1 oldest revision timestamp
3630c3a5702SAndreas Gohr     * @param int $rev2 newest revision timestamp (0 looks up last revision)
3640c3a5702SAndreas Gohr     * @param int $max maximum number of revisions returned
3650c3a5702SAndreas Gohr     * @return array with two arrays with revisions surrounding rev1 respectively rev2
3660c3a5702SAndreas Gohr     */
3670c3a5702SAndreas Gohr    public function getRevisionsAround($rev1, $rev2, $max = 50)
3680c3a5702SAndreas Gohr    {
3695d9428a0SSatoshi Sahara        $max = intval(abs($max) / 2) * 2 + 1;
3700c3a5702SAndreas Gohr        $rev1 = max($rev1, 0);
3710c3a5702SAndreas Gohr        $rev2 = max($rev2, 0);
3720c3a5702SAndreas Gohr
3730c3a5702SAndreas Gohr        if ($rev2) {
3740c3a5702SAndreas Gohr            if ($rev2 < $rev1) {
3750c3a5702SAndreas Gohr                $rev = $rev2;
3760c3a5702SAndreas Gohr                $rev2 = $rev1;
3770c3a5702SAndreas Gohr                $rev1 = $rev;
3780c3a5702SAndreas Gohr            }
3790c3a5702SAndreas Gohr        } else {
3800c3a5702SAndreas Gohr            //empty right side means a removed page. Look up last revision.
381bd17ac90SSatoshi Sahara            $rev2 = $this->currentRevision();
3820c3a5702SAndreas Gohr        }
3830c3a5702SAndreas Gohr        //collect revisions around rev2
3840c3a5702SAndreas Gohr        list($revs2, $allrevs, $fp, $lines, $head, $tail) = $this->retrieveRevisionsAround($rev2, $max);
3850c3a5702SAndreas Gohr
3860c3a5702SAndreas Gohr        if (empty($revs2)) return array(array(), array());
3870c3a5702SAndreas Gohr
3880c3a5702SAndreas Gohr        //collect revisions around rev1
3890c3a5702SAndreas Gohr        $index = array_search($rev1, $allrevs);
3900c3a5702SAndreas Gohr        if ($index === false) {
3910c3a5702SAndreas Gohr            //no overlapping revisions
3920c3a5702SAndreas Gohr            list($revs1, , , , ,) = $this->retrieveRevisionsAround($rev1, $max);
3930c3a5702SAndreas Gohr            if (empty($revs1)) $revs1 = array();
3940c3a5702SAndreas Gohr        } else {
3950c3a5702SAndreas Gohr            //revisions overlaps, reuse revisions around rev2
3965d9428a0SSatoshi Sahara            $lastrev = array_pop($allrevs); //keep last entry that could be external edit
3970c3a5702SAndreas Gohr            $revs1 = $allrevs;
3980c3a5702SAndreas Gohr            while ($head > 0) {
3990c3a5702SAndreas Gohr                for ($i = count($lines) - 1; $i >= 0; $i--) {
400*1d11f1d3SSatoshi Sahara                    $info = $this->parseLogLine($lines[$i]);
401b82f2411SSatoshi Sahara                    if ($this->saveRevisionInfo($info)) {
402bd17ac90SSatoshi Sahara                        $revs1[] = $info['date'];
4030c3a5702SAndreas Gohr                        $index++;
4040c3a5702SAndreas Gohr
4055d9428a0SSatoshi Sahara                        if ($index > intval($max / 2)) break 2;
4060c3a5702SAndreas Gohr                    }
4070c3a5702SAndreas Gohr                }
4080c3a5702SAndreas Gohr
4090c3a5702SAndreas Gohr                list($lines, $head, $tail) = $this->readAdjacentChunk($fp, $head, $tail, -1);
4100c3a5702SAndreas Gohr            }
4110c3a5702SAndreas Gohr            sort($revs1);
4125d9428a0SSatoshi Sahara            $revs1[] = $lastrev; //push back last entry
4135d9428a0SSatoshi Sahara
4140c3a5702SAndreas Gohr            //return wanted selection
4155d9428a0SSatoshi Sahara            $revs1 = array_slice($revs1, max($index - intval($max / 2), 0), $max);
4160c3a5702SAndreas Gohr        }
4170c3a5702SAndreas Gohr
4180c3a5702SAndreas Gohr        return array(array_reverse($revs1), array_reverse($revs2));
4190c3a5702SAndreas Gohr    }
4200c3a5702SAndreas Gohr
421923e149aSMichael Große
422923e149aSMichael Große    /**
423923e149aSMichael Große     * Checks if the ID has old revisons
424923e149aSMichael Große     * @return boolean
425923e149aSMichael Große     */
426923e149aSMichael Große    public function hasRevisions() {
427923e149aSMichael Große        $file = $this->getChangelogFilename();
428923e149aSMichael Große        return file_exists($file);
429923e149aSMichael Große    }
430923e149aSMichael Große
4310c3a5702SAndreas Gohr    /**
4320c3a5702SAndreas Gohr     * Return an existing revision for a specific date which is
4330c3a5702SAndreas Gohr     * the current one or younger or equal then the date
4340c3a5702SAndreas Gohr     *
4350c3a5702SAndreas Gohr     * @param number $date_at timestamp
4360c3a5702SAndreas Gohr     * @return string revision ('' for current)
4370c3a5702SAndreas Gohr     */
4380c3a5702SAndreas Gohr    public function getLastRevisionAt($date_at)
4390c3a5702SAndreas Gohr    {
4400c3a5702SAndreas Gohr        //requested date_at(timestamp) younger or equal then modified_time($this->id) => load current
4410c3a5702SAndreas Gohr        if (file_exists($this->getFilename()) && $date_at >= @filemtime($this->getFilename())) {
4420c3a5702SAndreas Gohr            return '';
4430c3a5702SAndreas Gohr        } else {
4440c3a5702SAndreas Gohr            if ($rev = $this->getRelativeRevision($date_at + 1, -1)) { //+1 to get also the requested date revision
4450c3a5702SAndreas Gohr                return $rev;
4460c3a5702SAndreas Gohr            } else {
4470c3a5702SAndreas Gohr                return false;
4480c3a5702SAndreas Gohr            }
4490c3a5702SAndreas Gohr        }
4500c3a5702SAndreas Gohr    }
4510c3a5702SAndreas Gohr
4520c3a5702SAndreas Gohr    /**
4530c3a5702SAndreas Gohr     * Collect the $max revisions near to the timestamp $rev
4540c3a5702SAndreas Gohr     *
455bd17ac90SSatoshi Sahara     * Ideally, half of retrieved timestamps are older than $rev, another half are newer.
456bd17ac90SSatoshi Sahara     * The returned array $requestedrevs may not contain the reference timestamp $rev
457bd17ac90SSatoshi Sahara     * when it does not match any revision value recorded in changelog.
458bd17ac90SSatoshi Sahara     *
4590c3a5702SAndreas Gohr     * @param int $rev revision timestamp
4600c3a5702SAndreas Gohr     * @param int $max maximum number of revisions to be returned
4610c3a5702SAndreas Gohr     * @return bool|array
4620c3a5702SAndreas Gohr     *     return array with entries:
4630c3a5702SAndreas Gohr     *       - $requestedrevs: array of with $max revision timestamps
4640c3a5702SAndreas Gohr     *       - $revs: all parsed revision timestamps
4650c3a5702SAndreas Gohr     *       - $fp: filepointer only defined for chuck reading, needs closing.
4660c3a5702SAndreas Gohr     *       - $lines: non-parsed changelog lines before the parsed revisions
4670c3a5702SAndreas Gohr     *       - $head: position of first readed changelogline
4680c3a5702SAndreas Gohr     *       - $lasttail: position of end of last readed changelogline
4690c3a5702SAndreas Gohr     *     otherwise false
4700c3a5702SAndreas Gohr     */
4710c3a5702SAndreas Gohr    protected function retrieveRevisionsAround($rev, $max)
4720c3a5702SAndreas Gohr    {
473a3984ddfSSatoshi Sahara        $revs = array();
474a3984ddfSSatoshi Sahara        $aftercount = $beforecount = 0;
475a3984ddfSSatoshi Sahara
4760c3a5702SAndreas Gohr        //get lines from changelog
477bd17ac90SSatoshi Sahara        list($fp, $lines, $starthead, $starttail, $eof) = $this->readloglines($rev);
478bd17ac90SSatoshi Sahara        if (empty($lines)) return false;
4790c3a5702SAndreas Gohr
480bd17ac90SSatoshi Sahara        //parse changelog lines in chunk, and read forward more chunks until $max/2 is reached
4810c3a5702SAndreas Gohr        $head = $starthead;
4820c3a5702SAndreas Gohr        $tail = $starttail;
4830c3a5702SAndreas Gohr        while (count($lines) > 0) {
4840c3a5702SAndreas Gohr            foreach ($lines as $line) {
485*1d11f1d3SSatoshi Sahara                $info = $this->parseLogLine($line);
486b82f2411SSatoshi Sahara                if ($this->saveRevisionInfo($info)) {
487bd17ac90SSatoshi Sahara                    $revs[] = $info['date'];
488bd17ac90SSatoshi Sahara                    if ($info['date'] >= $rev) {
4890c3a5702SAndreas Gohr                        //count revs after reference $rev
4900c3a5702SAndreas Gohr                        $aftercount++;
4910c3a5702SAndreas Gohr                        if ($aftercount == 1) $beforecount = count($revs);
4920c3a5702SAndreas Gohr                    }
4930c3a5702SAndreas Gohr                    //enough revs after reference $rev?
4945d9428a0SSatoshi Sahara                    if ($aftercount > intval($max / 2)) break 2;
4950c3a5702SAndreas Gohr                }
4960c3a5702SAndreas Gohr            }
4970c3a5702SAndreas Gohr            //retrieve next chunk
4980c3a5702SAndreas Gohr            list($lines, $head, $tail) = $this->readAdjacentChunk($fp, $head, $tail, 1);
4990c3a5702SAndreas Gohr        }
5000c3a5702SAndreas Gohr        $lasttail = $tail;
5010c3a5702SAndreas Gohr
502bd17ac90SSatoshi Sahara        // add a possible revision of external edit, create or deletion
503df7627d6SSatoshi Sahara        if ($lasttail == $eof && $aftercount <= intval($max / 2) &&
504df7627d6SSatoshi Sahara            count($revs) && !$this->isCurrentRevision($revs[count($revs)-1])
505df7627d6SSatoshi Sahara        ) {
506bd17ac90SSatoshi Sahara            $revs[] = $this->currentRevision;
507bd17ac90SSatoshi Sahara            $aftercount++;
508bd17ac90SSatoshi Sahara        }
509bd17ac90SSatoshi Sahara
510bd17ac90SSatoshi Sahara        if ($aftercount == 0) {
511bd17ac90SSatoshi Sahara            //given timestamp $rev is newer than the most recent line in chunk
512bd17ac90SSatoshi Sahara            return false; //FIXME: or proceed to collect older revisions?
513bd17ac90SSatoshi Sahara        }
514bd17ac90SSatoshi Sahara
515bd17ac90SSatoshi Sahara        //read more chunks backward until $max/2 is reached and total number of revs is equal to $max
5160c3a5702SAndreas Gohr        $lines = array();
5170c3a5702SAndreas Gohr        $i = 0;
5180c3a5702SAndreas Gohr        if ($aftercount > 0) {
5190c3a5702SAndreas Gohr            $head = $starthead;
5200c3a5702SAndreas Gohr            $tail = $starttail;
5210c3a5702SAndreas Gohr            while ($head > 0) {
5220c3a5702SAndreas Gohr                list($lines, $head, $tail) = $this->readAdjacentChunk($fp, $head, $tail, -1);
5230c3a5702SAndreas Gohr
5240c3a5702SAndreas Gohr                for ($i = count($lines) - 1; $i >= 0; $i--) {
525*1d11f1d3SSatoshi Sahara                    $info = $this->parseLogLine($lines[$i]);
526b82f2411SSatoshi Sahara                    if ($this->saveRevisionInfo($info)) {
527bd17ac90SSatoshi Sahara                        $revs[] = $info['date'];
5280c3a5702SAndreas Gohr                        $beforecount++;
5290c3a5702SAndreas Gohr                        //enough revs before reference $rev?
5305d9428a0SSatoshi Sahara                        if ($beforecount > max(intval($max / 2), $max - $aftercount)) break 2;
5310c3a5702SAndreas Gohr                    }
5320c3a5702SAndreas Gohr                }
5330c3a5702SAndreas Gohr            }
5340c3a5702SAndreas Gohr        }
5350c3a5702SAndreas Gohr        //keep only non-parsed lines
5360c3a5702SAndreas Gohr        $lines = array_slice($lines, 0, $i);
537bd17ac90SSatoshi Sahara
538bd17ac90SSatoshi Sahara        sort($revs);
539bd17ac90SSatoshi Sahara
5400c3a5702SAndreas Gohr        //trunk desired selection
5410c3a5702SAndreas Gohr        $requestedrevs = array_slice($revs, -$max, $max);
5420c3a5702SAndreas Gohr
5430c3a5702SAndreas Gohr        return array($requestedrevs, $revs, $fp, $lines, $head, $lasttail);
5440c3a5702SAndreas Gohr    }
545a3984ddfSSatoshi Sahara
546a3984ddfSSatoshi Sahara    /**
547bd17ac90SSatoshi Sahara     * Get the current revision information, considering external edit, create or deletion
548bd17ac90SSatoshi Sahara     *
549bd17ac90SSatoshi Sahara     * The "current" revison is the last timestamp of the page in the context of changelog.
550bd17ac90SSatoshi Sahara     * However it is often recognised that is in sight now from the DokuWiki user perspective.
551bd17ac90SSatoshi Sahara     * The current page is accessible without any revision identifier (eg. doku.php?id=foo),
552bd17ac90SSatoshi Sahara     * but it has unique modification time of the source txt file and kept in changelog.
553bd17ac90SSatoshi Sahara     * When the page is deleted by saving blank text in the DokuWiki editor, the deletion
554bd17ac90SSatoshi Sahara     * time is to be kept as its revision identifier in the changelog.
555bd17ac90SSatoshi Sahara     *
556bd17ac90SSatoshi Sahara     * External edit will break consistency between the file and changelog. A page source
557bd17ac90SSatoshi Sahara     * file might be modified, created or deleted without using DokuWiki editor, instead
558bd17ac90SSatoshi Sahara     * by accessing direct to the file stored in data directory via server console.
559bd17ac90SSatoshi Sahara     * Such editions are never recorded in changelog. However after external file edit,
560bd17ac90SSatoshi Sahara     * now we can see new "current" content of the edited page!
561bd17ac90SSatoshi Sahara     *
562bd17ac90SSatoshi Sahara     * A tentative revision should be assigned for the external edition to handle whole
563bd17ac90SSatoshi Sahara     * revisions successfully in DokuWiki revision list and diff view interface.
564bd17ac90SSatoshi Sahara     * As far as the source file of the edition exists, a unique revision can be decided
565bd17ac90SSatoshi Sahara     * using function filemtime(), but it could be unknown if the foo.txt file had deleted
566bd17ac90SSatoshi Sahara     * or moved to foo.bak file.
567df7627d6SSatoshi Sahara     * In such case, we assume unknown revision as "last timestamp in changelog" +1
568bd17ac90SSatoshi Sahara     * to ensure that current one should be newer than any revisions in changelog.
569bd17ac90SSatoshi Sahara     * Another case of external edit: when foo.bak file moved back to foo.txt, the current
570bd17ac90SSatoshi Sahara     * one could become older than latest timestamp in changelog. In this case, we should
571bd17ac90SSatoshi Sahara     * assume the revison as "last timestamp in chagelog" +1, instead of its timestamp.
572bd17ac90SSatoshi Sahara     *
573bd17ac90SSatoshi Sahara     * @return bool|array false when page had never existed or array with entries:
574bd17ac90SSatoshi Sahara     *      - date:  revision identifier (timestamp or last revision +1)
575bd17ac90SSatoshi Sahara     *      - ip:    IPv4 address (127.0.0.1)
576bd17ac90SSatoshi Sahara     *      - type:  log line type
577bd17ac90SSatoshi Sahara     *      - id:    id of page or media
578bd17ac90SSatoshi Sahara     *      - user:  user name
579bd17ac90SSatoshi Sahara     *      - sum:   edit summary (or action reason)
580bd17ac90SSatoshi Sahara     *      - extra: extra data (varies by line type)
581bd17ac90SSatoshi Sahara     *      - sizechange: change of filesize
582dbf582ddSSatoshi Sahara     *      - timestamp: unix timestamp or false (key set only for external edit occurred)
583bd17ac90SSatoshi Sahara     *
584bd17ac90SSatoshi Sahara     * @author  Satoshi Sahara <sahara.satoshi@gmail.com>
585bd17ac90SSatoshi Sahara     */
586bd17ac90SSatoshi Sahara    public function getCurrentRevisionInfo()
587bd17ac90SSatoshi Sahara    {
588bd17ac90SSatoshi Sahara        global $lang;
589bd17ac90SSatoshi Sahara
590bd17ac90SSatoshi Sahara        if (isset($this->currentRevision)) return $this->getRevisionInfo($this->currentRevision);
591bd17ac90SSatoshi Sahara
592bd17ac90SSatoshi Sahara        // get revision id from the item file timestamp and chagelog
593dbf582ddSSatoshi Sahara        $fileLastMod = $this->getFilename();
594dbf582ddSSatoshi Sahara        $fileRev = @filemtime($fileLastMod); // false when the file not exist
595df7627d6SSatoshi Sahara        $lastRev = $this->lastRevision();    // false when no changelog
596bd17ac90SSatoshi Sahara
597df7627d6SSatoshi Sahara        if (!$fileRev && !$lastRev) {                // has never existed
598df7627d6SSatoshi Sahara            $this->currentRevision = false;
599bd17ac90SSatoshi Sahara            return false;
600bd17ac90SSatoshi Sahara        } elseif ($fileRev === $lastRev) {           // not external edit
601bd17ac90SSatoshi Sahara            $this->currentRevision = $lastRev;
6025ec96136SSatoshi Sahara            return $this->getRevisionInfo($lastRev);
603bd17ac90SSatoshi Sahara        }
604bd17ac90SSatoshi Sahara
605bd17ac90SSatoshi Sahara        if (!$fileRev && $lastRev) {                 // item file does not exist
606bd17ac90SSatoshi Sahara            // check consistency against changelog
607bd17ac90SSatoshi Sahara            $revInfo = $this->getRevisionInfo($lastRev);
608bd17ac90SSatoshi Sahara            if ($revInfo['type'] == DOKU_CHANGE_TYPE_DELETE) {
609bd17ac90SSatoshi Sahara                $this->currentRevision = $lastRev;
6105ec96136SSatoshi Sahara                return $this->getRevisionInfo($lastRev);
611bd17ac90SSatoshi Sahara            }
612bd17ac90SSatoshi Sahara
613bd17ac90SSatoshi Sahara            // externally deleted
614bd17ac90SSatoshi Sahara            $revInfo = [
615bd17ac90SSatoshi Sahara                'date' => $lastRev +1,
616bd17ac90SSatoshi Sahara                'ip'   => '127.0.0.1',
617bd17ac90SSatoshi Sahara                'type' => DOKU_CHANGE_TYPE_DELETE,
618bd17ac90SSatoshi Sahara                'id'   => $this->id,
619bd17ac90SSatoshi Sahara                'user' => '',
620df7627d6SSatoshi Sahara                'sum'  => $lang['deleted'].' - '.$lang['external_edit'].' ('.$lang['unknowndate'].')',
621bd17ac90SSatoshi Sahara                'extra' => '',
622bd17ac90SSatoshi Sahara                'sizechange' => -io_getSizeFile($this->getFilename($lastRev)),
623dbf582ddSSatoshi Sahara                'timestamp' => false,
624bd17ac90SSatoshi Sahara            ];
625bd17ac90SSatoshi Sahara
626bd17ac90SSatoshi Sahara        } elseif ($fileRev) {                        // item file exist
627bd17ac90SSatoshi Sahara            // here, file timestamp is different with last revision in changelog
628df7627d6SSatoshi Sahara            $isJustCreated = $lastRev === false || (
629e39c2efbSSatoshi Sahara                    $fileRev > $lastRev &&
630e39c2efbSSatoshi Sahara                    $this->getRevisionInfo($lastRev)['type'] == DOKU_CHANGE_TYPE_DELETE
631e39c2efbSSatoshi Sahara            );
632bd17ac90SSatoshi Sahara            $filesize_new = filesize($this->getFilename());
633804096eaSSatoshi Sahara            $filesize_old = $isJustCreated ? 0 : io_getSizeFile($this->getFilename($lastRev));
634bd17ac90SSatoshi Sahara            $sizechange = $filesize_new - $filesize_old;
635bd17ac90SSatoshi Sahara
636dbf582ddSSatoshi Sahara            if ($isJustCreated) {
6378ff5c11aSSatoshi Sahara                $timestamp = $fileRev;
638bd17ac90SSatoshi Sahara                $sum = $lang['created'].' - '.$lang['external_edit'];
639bd17ac90SSatoshi Sahara            } elseif ($fileRev > $lastRev) {
6408ff5c11aSSatoshi Sahara                $timestamp = $fileRev;
641bd17ac90SSatoshi Sahara                $sum = $lang['external_edit'];
642bd17ac90SSatoshi Sahara            } else {
6438ff5c11aSSatoshi Sahara                // $fileRev is older than $lastRev, that is erroneous/incorrect occurence.
6448ff5c11aSSatoshi Sahara                // try to change file modification time to the detection time
6458ff5c11aSSatoshi Sahara                $timestamp = touch($fileLastMod) ? filemtime($fileLastMod) : false;
646df7627d6SSatoshi Sahara                $sum = $lang['external_edit'].' ('.$lang['unknowndate'].')';
647bd17ac90SSatoshi Sahara            }
648bd17ac90SSatoshi Sahara
649bd17ac90SSatoshi Sahara            // externally created or edited
650bd17ac90SSatoshi Sahara            $revInfo = [
6518ff5c11aSSatoshi Sahara                'date' => $timestamp ?: $lastRev +1,
652bd17ac90SSatoshi Sahara                'ip'   => '127.0.0.1',
653bd17ac90SSatoshi Sahara                'type' => $isJustCreated ? DOKU_CHANGE_TYPE_CREATE : DOKU_CHANGE_TYPE_EDIT,
654bd17ac90SSatoshi Sahara                'id'   => $this->id,
655bd17ac90SSatoshi Sahara                'user' => '',
656bd17ac90SSatoshi Sahara                'sum'  => $sum,
657bd17ac90SSatoshi Sahara                'extra' => '',
658bd17ac90SSatoshi Sahara                'sizechange' => $sizechange,
659bd17ac90SSatoshi Sahara                'timestamp' => $timestamp,
660bd17ac90SSatoshi Sahara            ];
661bd17ac90SSatoshi Sahara        }
662bd17ac90SSatoshi Sahara
663bd17ac90SSatoshi Sahara        // cache current revision information of external edition
664bd17ac90SSatoshi Sahara        $this->currentRevision = $revInfo['date'];
665bd17ac90SSatoshi Sahara        $this->cache[$this->id][$this->currentRevision] = $revInfo;
666bd17ac90SSatoshi Sahara        return $this->getRevisionInfo($this->currentRevision);
667bd17ac90SSatoshi Sahara    }
6680c3a5702SAndreas Gohr}
669