xref: /dokuwiki/inc/ChangeLog/ChangeLog.php (revision 79a2d7845d5e5e48fe3be8f192717de9294aaba5)
10c3a5702SAndreas Gohr<?php
20c3a5702SAndreas Gohr
30c3a5702SAndreas Gohrnamespace dokuwiki\ChangeLog;
40c3a5702SAndreas Gohr
566f4cdd4SSatoshi Saharause dokuwiki\Logger;
666f4cdd4SSatoshi Sahara
70c3a5702SAndreas Gohr/**
81d11f1d3SSatoshi Sahara * ChangeLog Prototype; methods for handling changelog
90c3a5702SAndreas Gohr */
100c3a5702SAndreas Gohrabstract class ChangeLog
110c3a5702SAndreas Gohr{
121d11f1d3SSatoshi Sahara    use ChangeLogTrait;
131d11f1d3SSatoshi Sahara
140c3a5702SAndreas Gohr    /** @var string */
150c3a5702SAndreas Gohr    protected $id;
16*79a2d784SGerrit Uitslag    /** @var false|int */
17bd17ac90SSatoshi Sahara    protected $currentRevision;
180c3a5702SAndreas Gohr    /** @var array */
190c3a5702SAndreas Gohr    protected $cache;
200c3a5702SAndreas Gohr
210c3a5702SAndreas Gohr    /**
220c3a5702SAndreas Gohr     * Constructor
230c3a5702SAndreas Gohr     *
240c3a5702SAndreas Gohr     * @param string $id page id
250c3a5702SAndreas Gohr     * @param int $chunk_size maximum block size read from file
260c3a5702SAndreas Gohr     */
270c3a5702SAndreas Gohr    public function __construct($id, $chunk_size = 8192)
280c3a5702SAndreas Gohr    {
290c3a5702SAndreas Gohr        global $cache_revinfo;
300c3a5702SAndreas Gohr
310c3a5702SAndreas Gohr        $this->cache =& $cache_revinfo;
320c3a5702SAndreas Gohr        if (!isset($this->cache[$id])) {
330c3a5702SAndreas Gohr            $this->cache[$id] = array();
340c3a5702SAndreas Gohr        }
350c3a5702SAndreas Gohr
360c3a5702SAndreas Gohr        $this->id = $id;
370c3a5702SAndreas Gohr        $this->setChunkSize($chunk_size);
3819b5dd7eSSatoshi Sahara        // set property currentRevision and cache prior to getRevisionInfo($currentRev) call
3919b5dd7eSSatoshi Sahara        $this->getCurrentRevisionInfo();
400c3a5702SAndreas Gohr    }
410c3a5702SAndreas Gohr
420c3a5702SAndreas Gohr    /**
430c3a5702SAndreas Gohr     * Returns path to current page/media
440c3a5702SAndreas Gohr     *
450c3a5702SAndreas Gohr     * @return string path to file
460c3a5702SAndreas Gohr     */
470c3a5702SAndreas Gohr    abstract protected function getFilename();
480c3a5702SAndreas Gohr
49df7627d6SSatoshi Sahara    /**
50df7627d6SSatoshi Sahara     * Check whether given revision is the current page
51df7627d6SSatoshi Sahara     *
52df7627d6SSatoshi Sahara     * @param int $rev timestamp of current page
53df7627d6SSatoshi Sahara     * @return bool true if $rev is current revision, otherwise false
54df7627d6SSatoshi Sahara     */
55df7627d6SSatoshi Sahara    public function isCurrentRevision($rev)
56df7627d6SSatoshi Sahara    {
57df7627d6SSatoshi Sahara        return $rev == $this->currentRevision();
58df7627d6SSatoshi Sahara    }
59df7627d6SSatoshi Sahara
60df7627d6SSatoshi Sahara    /**
61df7627d6SSatoshi Sahara     * Checks if the revision is last revision
62df7627d6SSatoshi Sahara     *
63df7627d6SSatoshi Sahara     * @param int $rev revision timestamp
64df7627d6SSatoshi Sahara     * @return bool true if $rev is last revision, otherwise false
65df7627d6SSatoshi Sahara     */
66df7627d6SSatoshi Sahara    public function isLastRevision($rev = null)
67df7627d6SSatoshi Sahara    {
68df7627d6SSatoshi Sahara        return $rev === $this->lastRevision();
69df7627d6SSatoshi Sahara    }
70df7627d6SSatoshi Sahara
71df7627d6SSatoshi Sahara    /**
72df7627d6SSatoshi Sahara     * Return the current revision identifer
7305282e9fSSatoshi Sahara     *
7405282e9fSSatoshi Sahara     * The "current" revision means current version of the page or media file. It is either
7505282e9fSSatoshi Sahara     * identical with or newer than the "last" revision, that depends on whether the file
7605282e9fSSatoshi Sahara     * has modified, created or deleted outside of DokuWiki.
7705282e9fSSatoshi Sahara     * The value of identifier can be determined by timestamp as far as the file exists,
7805282e9fSSatoshi Sahara     * otherwise it must be assigned larger than any other revisions to keep them sortable.
7905282e9fSSatoshi Sahara     *
8005282e9fSSatoshi Sahara     * @return int|false revision timestamp
81df7627d6SSatoshi Sahara     */
82df7627d6SSatoshi Sahara    public function currentRevision()
83df7627d6SSatoshi Sahara    {
84df7627d6SSatoshi Sahara        if (!isset($this->currentRevision)) {
85df7627d6SSatoshi Sahara            // set ChangeLog::currentRevision property
86df7627d6SSatoshi Sahara            $this->getCurrentRevisionInfo();
87df7627d6SSatoshi Sahara        }
88df7627d6SSatoshi Sahara        return $this->currentRevision;
89df7627d6SSatoshi Sahara    }
90df7627d6SSatoshi Sahara
91df7627d6SSatoshi Sahara    /**
9205282e9fSSatoshi Sahara     * Return the last revision identifer, date value of the last entry of the changelog
93d154755dSSatoshi Sahara     *
9405282e9fSSatoshi Sahara     * @return int|false revision timestamp
95df7627d6SSatoshi Sahara     */
96df7627d6SSatoshi Sahara    public function lastRevision()
97df7627d6SSatoshi Sahara    {
98df7627d6SSatoshi Sahara        $revs = $this->getRevisions(-1, 1);
99df7627d6SSatoshi Sahara        return empty($revs) ? false : $revs[0];
100df7627d6SSatoshi Sahara    }
101df7627d6SSatoshi Sahara
1020c3a5702SAndreas Gohr    /**
103b82f2411SSatoshi Sahara     * Save revision info to the cache pool
104b82f2411SSatoshi Sahara     *
105d154755dSSatoshi Sahara     * @param array $info Revision info structure
106b82f2411SSatoshi Sahara     * @return bool
107b82f2411SSatoshi Sahara     */
108d154755dSSatoshi Sahara    protected function cacheRevisionInfo($info)
109b82f2411SSatoshi Sahara    {
110b82f2411SSatoshi Sahara        if (!is_array($info)) return false;
111b82f2411SSatoshi Sahara        //$this->cache[$this->id][$info['date']] ??= $info; // since php 7.4
112b82f2411SSatoshi Sahara        $this->cache[$this->id][$info['date']] = $this->cache[$this->id][$info['date']] ?? $info;
113b82f2411SSatoshi Sahara        return true;
114b82f2411SSatoshi Sahara    }
115b82f2411SSatoshi Sahara
116b82f2411SSatoshi Sahara    /**
117d154755dSSatoshi Sahara     * Get the changelog information for a specific revision (timestamp)
1180c3a5702SAndreas Gohr     *
1190c3a5702SAndreas Gohr     * Adjacent changelog lines are optimistically parsed and cached to speed up
1200c3a5702SAndreas Gohr     * consecutive calls to getRevisionInfo. For large changelog files, only the chunk
1210c3a5702SAndreas Gohr     * containing the requested changelog line is read.
1220c3a5702SAndreas Gohr     *
1230c3a5702SAndreas Gohr     * @param int $rev revision timestamp
1240c3a5702SAndreas Gohr     * @return bool|array false or array with entries:
1250c3a5702SAndreas Gohr     *      - date:  unix timestamp
1260c3a5702SAndreas Gohr     *      - ip:    IPv4 address (127.0.0.1)
1270c3a5702SAndreas Gohr     *      - type:  log line type
1280c3a5702SAndreas Gohr     *      - id:    page id
1290c3a5702SAndreas Gohr     *      - user:  user name
1300c3a5702SAndreas Gohr     *      - sum:   edit summary (or action reason)
1310c3a5702SAndreas Gohr     *      - extra: extra data (varies by line type)
132bd17ac90SSatoshi Sahara     *      - sizechange: change of filesize
1330c3a5702SAndreas Gohr     *
1340c3a5702SAndreas Gohr     * @author Ben Coburn <btcoburn@silicodon.net>
1350c3a5702SAndreas Gohr     * @author Kate Arzamastseva <pshns@ukr.net>
1360c3a5702SAndreas Gohr     */
1370c3a5702SAndreas Gohr    public function getRevisionInfo($rev)
1380c3a5702SAndreas Gohr    {
139a3984ddfSSatoshi Sahara        $rev = max(0, $rev);
140a3984ddfSSatoshi Sahara        if (!$rev) return false;
1410c3a5702SAndreas Gohr
1420c3a5702SAndreas Gohr        // check if it's already in the memory cache
1430c3a5702SAndreas Gohr        if (isset($this->cache[$this->id]) && isset($this->cache[$this->id][$rev])) {
1440c3a5702SAndreas Gohr            return $this->cache[$this->id][$rev];
1450c3a5702SAndreas Gohr        }
1460c3a5702SAndreas Gohr
1470c3a5702SAndreas Gohr        //read lines from changelog
1480c3a5702SAndreas Gohr        list($fp, $lines) = $this->readloglines($rev);
1490c3a5702SAndreas Gohr        if ($fp) {
1500c3a5702SAndreas Gohr            fclose($fp);
1510c3a5702SAndreas Gohr        }
1520c3a5702SAndreas Gohr        if (empty($lines)) return false;
1530c3a5702SAndreas Gohr
1540c3a5702SAndreas Gohr        // parse and cache changelog lines
1550c3a5702SAndreas Gohr        foreach ($lines as $value) {
1561d11f1d3SSatoshi Sahara            $info = $this->parseLogLine($value);
157d154755dSSatoshi Sahara            $this->cacheRevisionInfo($info);
1580c3a5702SAndreas Gohr        }
1590c3a5702SAndreas Gohr        if (!isset($this->cache[$this->id][$rev])) {
1600c3a5702SAndreas Gohr            return false;
1610c3a5702SAndreas Gohr        }
1620c3a5702SAndreas Gohr        return $this->cache[$this->id][$rev];
1630c3a5702SAndreas Gohr    }
1640c3a5702SAndreas Gohr
1650c3a5702SAndreas Gohr    /**
1660c3a5702SAndreas Gohr     * Return a list of page revisions numbers
1670c3a5702SAndreas Gohr     *
1680c3a5702SAndreas Gohr     * Does not guarantee that the revision exists in the attic,
1690c3a5702SAndreas Gohr     * only that a line with the date exists in the changelog.
1700c3a5702SAndreas Gohr     * By default the current revision is skipped.
1710c3a5702SAndreas Gohr     *
1720c3a5702SAndreas Gohr     * The current revision is automatically skipped when the page exists.
1730c3a5702SAndreas Gohr     * See $INFO['meta']['last_change'] for the current revision.
1740c3a5702SAndreas Gohr     * A negative $first let read the current revision too.
1750c3a5702SAndreas Gohr     *
1760c3a5702SAndreas Gohr     * For efficiency, the log lines are parsed and cached for later
1770c3a5702SAndreas Gohr     * calls to getRevisionInfo. Large changelog files are read
1780c3a5702SAndreas Gohr     * backwards in chunks until the requested number of changelog
1790c3a5702SAndreas Gohr     * lines are recieved.
1800c3a5702SAndreas Gohr     *
1810c3a5702SAndreas Gohr     * @param int $first skip the first n changelog lines
1820c3a5702SAndreas Gohr     * @param int $num number of revisions to return
1830c3a5702SAndreas Gohr     * @return array with the revision timestamps
1840c3a5702SAndreas Gohr     *
1850c3a5702SAndreas Gohr     * @author Ben Coburn <btcoburn@silicodon.net>
1860c3a5702SAndreas Gohr     * @author Kate Arzamastseva <pshns@ukr.net>
1870c3a5702SAndreas Gohr     */
1880c3a5702SAndreas Gohr    public function getRevisions($first, $num)
1890c3a5702SAndreas Gohr    {
1900c3a5702SAndreas Gohr        $revs = array();
1910c3a5702SAndreas Gohr        $lines = array();
1920c3a5702SAndreas Gohr        $count = 0;
1930c3a5702SAndreas Gohr
194d154755dSSatoshi Sahara        $logfile = $this->getChangelogFilename();
195d154755dSSatoshi Sahara        if (!file_exists($logfile)) return $revs;
196d154755dSSatoshi Sahara
1970c3a5702SAndreas Gohr        $num = max($num, 0);
1980c3a5702SAndreas Gohr        if ($num == 0) {
1990c3a5702SAndreas Gohr            return $revs;
2000c3a5702SAndreas Gohr        }
2010c3a5702SAndreas Gohr
2020c3a5702SAndreas Gohr        if ($first < 0) {
2030c3a5702SAndreas Gohr            $first = 0;
2040c3a5702SAndreas Gohr        } else {
205df7627d6SSatoshi Sahara            $fileLastMod = $this->getFilename();
206df7627d6SSatoshi Sahara            if (file_exists($fileLastMod) && $this->isLastRevision(filemtime($fileLastMod))) {
207df7627d6SSatoshi Sahara                // skip last revision if the page exists
2080c3a5702SAndreas Gohr                $first = max($first + 1, 0);
2090c3a5702SAndreas Gohr            }
2100c3a5702SAndreas Gohr        }
2110c3a5702SAndreas Gohr
212d154755dSSatoshi Sahara        if (filesize($logfile) < $this->chunk_size || $this->chunk_size == 0) {
2130c3a5702SAndreas Gohr            // read whole file
214d154755dSSatoshi Sahara            $lines = file($logfile);
2150c3a5702SAndreas Gohr            if ($lines === false) {
2160c3a5702SAndreas Gohr                return $revs;
2170c3a5702SAndreas Gohr            }
2180c3a5702SAndreas Gohr        } else {
2190c3a5702SAndreas Gohr            // read chunks backwards
220d154755dSSatoshi Sahara            $fp = fopen($logfile, 'rb'); // "file pointer"
2210c3a5702SAndreas Gohr            if ($fp === false) {
2220c3a5702SAndreas Gohr                return $revs;
2230c3a5702SAndreas Gohr            }
2240c3a5702SAndreas Gohr            fseek($fp, 0, SEEK_END);
2250c3a5702SAndreas Gohr            $tail = ftell($fp);
2260c3a5702SAndreas Gohr
2270c3a5702SAndreas Gohr            // chunk backwards
2280c3a5702SAndreas Gohr            $finger = max($tail - $this->chunk_size, 0);
2290c3a5702SAndreas Gohr            while ($count < $num + $first) {
2300c3a5702SAndreas Gohr                $nl = $this->getNewlinepointer($fp, $finger);
2310c3a5702SAndreas Gohr
2320c3a5702SAndreas Gohr                // was the chunk big enough? if not, take another bite
2330c3a5702SAndreas Gohr                if ($nl > 0 && $tail <= $nl) {
2340c3a5702SAndreas Gohr                    $finger = max($finger - $this->chunk_size, 0);
2350c3a5702SAndreas Gohr                    continue;
2360c3a5702SAndreas Gohr                } else {
2370c3a5702SAndreas Gohr                    $finger = $nl;
2380c3a5702SAndreas Gohr                }
2390c3a5702SAndreas Gohr
2400c3a5702SAndreas Gohr                // read chunk
2410c3a5702SAndreas Gohr                $chunk = '';
2420c3a5702SAndreas Gohr                $read_size = max($tail - $finger, 0); // found chunk size
2430c3a5702SAndreas Gohr                $got = 0;
2440c3a5702SAndreas Gohr                while ($got < $read_size && !feof($fp)) {
2450c3a5702SAndreas Gohr                    $tmp = @fread($fp, max(min($this->chunk_size, $read_size - $got), 0));
2460c3a5702SAndreas Gohr                    if ($tmp === false) {
2470c3a5702SAndreas Gohr                        break;
2480c3a5702SAndreas Gohr                    } //error state
2490c3a5702SAndreas Gohr                    $got += strlen($tmp);
2500c3a5702SAndreas Gohr                    $chunk .= $tmp;
2510c3a5702SAndreas Gohr                }
2520c3a5702SAndreas Gohr                $tmp = explode("\n", $chunk);
2530c3a5702SAndreas Gohr                array_pop($tmp); // remove trailing newline
2540c3a5702SAndreas Gohr
2550c3a5702SAndreas Gohr                // combine with previous chunk
2560c3a5702SAndreas Gohr                $count += count($tmp);
2570c3a5702SAndreas Gohr                $lines = array_merge($tmp, $lines);
2580c3a5702SAndreas Gohr
2590c3a5702SAndreas Gohr                // next chunk
2600c3a5702SAndreas Gohr                if ($finger == 0) {
2610c3a5702SAndreas Gohr                    break;
262e24a74c0SAndreas Gohr                } else { // already read all the lines
2630c3a5702SAndreas Gohr                    $tail = $finger;
2640c3a5702SAndreas Gohr                    $finger = max($tail - $this->chunk_size, 0);
2650c3a5702SAndreas Gohr                }
2660c3a5702SAndreas Gohr            }
2670c3a5702SAndreas Gohr            fclose($fp);
2680c3a5702SAndreas Gohr        }
2690c3a5702SAndreas Gohr
2700c3a5702SAndreas Gohr        // skip parsing extra lines
2710c3a5702SAndreas Gohr        $num = max(min(count($lines) - $first, $num), 0);
2720c3a5702SAndreas Gohr        if ($first > 0 && $num > 0) {
2730c3a5702SAndreas Gohr            $lines = array_slice($lines, max(count($lines) - $first - $num, 0), $num);
274df7627d6SSatoshi Sahara        } elseif ($first > 0 && $num == 0) {
2750c3a5702SAndreas Gohr            $lines = array_slice($lines, 0, max(count($lines) - $first, 0));
2760c3a5702SAndreas Gohr        } elseif ($first == 0 && $num > 0) {
2770c3a5702SAndreas Gohr            $lines = array_slice($lines, max(count($lines) - $num, 0));
2780c3a5702SAndreas Gohr        }
2790c3a5702SAndreas Gohr
2800c3a5702SAndreas Gohr        // handle lines in reverse order
2810c3a5702SAndreas Gohr        for ($i = count($lines) - 1; $i >= 0; $i--) {
2821d11f1d3SSatoshi Sahara            $info = $this->parseLogLine($lines[$i]);
283d154755dSSatoshi Sahara            if ($this->cacheRevisionInfo($info)) {
284bd17ac90SSatoshi Sahara                $revs[] = $info['date'];
2850c3a5702SAndreas Gohr            }
2860c3a5702SAndreas Gohr        }
2870c3a5702SAndreas Gohr
2880c3a5702SAndreas Gohr        return $revs;
2890c3a5702SAndreas Gohr    }
2900c3a5702SAndreas Gohr
2910c3a5702SAndreas Gohr    /**
2920c3a5702SAndreas Gohr     * Get the nth revision left or right handside  for a specific page id and revision (timestamp)
2930c3a5702SAndreas Gohr     *
2940c3a5702SAndreas Gohr     * For large changelog files, only the chunk containing the
2950c3a5702SAndreas Gohr     * reference revision $rev is read and sometimes a next chunck.
2960c3a5702SAndreas Gohr     *
2970c3a5702SAndreas Gohr     * Adjacent changelog lines are optimistically parsed and cached to speed up
2980c3a5702SAndreas Gohr     * consecutive calls to getRevisionInfo.
2990c3a5702SAndreas Gohr     *
300d154755dSSatoshi Sahara     * @param int $rev revision timestamp used as startdate
301d154755dSSatoshi Sahara     *    (doesn't need to be exact revision number)
302d154755dSSatoshi Sahara     * @param int $direction give position of returned revision with respect to $rev;
303d154755dSSatoshi Sahara          positive=next, negative=prev
3040c3a5702SAndreas Gohr     * @return bool|int
3050c3a5702SAndreas Gohr     *      timestamp of the requested revision
3060c3a5702SAndreas Gohr     *      otherwise false
3070c3a5702SAndreas Gohr     */
3080c3a5702SAndreas Gohr    public function getRelativeRevision($rev, $direction)
3090c3a5702SAndreas Gohr    {
3100c3a5702SAndreas Gohr        $rev = max($rev, 0);
3110c3a5702SAndreas Gohr        $direction = (int)$direction;
3120c3a5702SAndreas Gohr
3130c3a5702SAndreas Gohr        //no direction given or last rev, so no follow-up
3140c3a5702SAndreas Gohr        if (!$direction || ($direction > 0 && $this->isCurrentRevision($rev))) {
3150c3a5702SAndreas Gohr            return false;
3160c3a5702SAndreas Gohr        }
3170c3a5702SAndreas Gohr
3180c3a5702SAndreas Gohr        //get lines from changelog
3190c3a5702SAndreas Gohr        list($fp, $lines, $head, $tail, $eof) = $this->readloglines($rev);
3200c3a5702SAndreas Gohr        if (empty($lines)) return false;
3210c3a5702SAndreas Gohr
3225d9428a0SSatoshi Sahara        // look for revisions later/earlier than $rev, when founded count till the wanted revision is reached
3230c3a5702SAndreas Gohr        // also parse and cache changelog lines for getRevisionInfo().
3240c3a5702SAndreas Gohr        $revcounter = 0;
3250c3a5702SAndreas Gohr        $relativerev = false;
3260c3a5702SAndreas Gohr        $checkotherchunck = true; //always runs once
3270c3a5702SAndreas Gohr        while (!$relativerev && $checkotherchunck) {
328bd17ac90SSatoshi Sahara            $info = array();
3290c3a5702SAndreas Gohr            //parse in normal or reverse order
3300c3a5702SAndreas Gohr            $count = count($lines);
3310c3a5702SAndreas Gohr            if ($direction > 0) {
3320c3a5702SAndreas Gohr                $start = 0;
3330c3a5702SAndreas Gohr                $step = 1;
3340c3a5702SAndreas Gohr            } else {
3350c3a5702SAndreas Gohr                $start = $count - 1;
3360c3a5702SAndreas Gohr                $step = -1;
3370c3a5702SAndreas Gohr            }
3380c3a5702SAndreas Gohr            for ($i = $start; $i >= 0 && $i < $count; $i = $i + $step) {
3391d11f1d3SSatoshi Sahara                $info = $this->parseLogLine($lines[$i]);
340d154755dSSatoshi Sahara                if ($this->cacheRevisionInfo($info)) {
3410c3a5702SAndreas Gohr                    //look for revs older/earlier then reference $rev and select $direction-th one
342bd17ac90SSatoshi Sahara                    if (($direction > 0 && $info['date'] > $rev) || ($direction < 0 && $info['date'] < $rev)) {
3430c3a5702SAndreas Gohr                        $revcounter++;
3440c3a5702SAndreas Gohr                        if ($revcounter == abs($direction)) {
345bd17ac90SSatoshi Sahara                            $relativerev = $info['date'];
3460c3a5702SAndreas Gohr                        }
3470c3a5702SAndreas Gohr                    }
3480c3a5702SAndreas Gohr                }
3490c3a5702SAndreas Gohr            }
3500c3a5702SAndreas Gohr
3510c3a5702SAndreas Gohr            //true when $rev is found, but not the wanted follow-up.
3520c3a5702SAndreas Gohr            $checkotherchunck = $fp
353bd17ac90SSatoshi Sahara                && ($info['date'] == $rev || ($revcounter > 0 && !$relativerev))
3540c3a5702SAndreas Gohr                && !(($tail == $eof && $direction > 0) || ($head == 0 && $direction < 0));
3550c3a5702SAndreas Gohr
3560c3a5702SAndreas Gohr            if ($checkotherchunck) {
3570c3a5702SAndreas Gohr                list($lines, $head, $tail) = $this->readAdjacentChunk($fp, $head, $tail, $direction);
3580c3a5702SAndreas Gohr
3590c3a5702SAndreas Gohr                if (empty($lines)) break;
3600c3a5702SAndreas Gohr            }
3610c3a5702SAndreas Gohr        }
3620c3a5702SAndreas Gohr        if ($fp) {
3630c3a5702SAndreas Gohr            fclose($fp);
3640c3a5702SAndreas Gohr        }
3650c3a5702SAndreas Gohr
3660c3a5702SAndreas Gohr        return $relativerev;
3670c3a5702SAndreas Gohr    }
3680c3a5702SAndreas Gohr
3690c3a5702SAndreas Gohr    /**
3700c3a5702SAndreas Gohr     * Returns revisions around rev1 and rev2
3710c3a5702SAndreas Gohr     * When available it returns $max entries for each revision
3720c3a5702SAndreas Gohr     *
3730c3a5702SAndreas Gohr     * @param int $rev1 oldest revision timestamp
3740c3a5702SAndreas Gohr     * @param int $rev2 newest revision timestamp (0 looks up last revision)
3750c3a5702SAndreas Gohr     * @param int $max maximum number of revisions returned
3760c3a5702SAndreas Gohr     * @return array with two arrays with revisions surrounding rev1 respectively rev2
3770c3a5702SAndreas Gohr     */
3780c3a5702SAndreas Gohr    public function getRevisionsAround($rev1, $rev2, $max = 50)
3790c3a5702SAndreas Gohr    {
3805d9428a0SSatoshi Sahara        $max = intval(abs($max) / 2) * 2 + 1;
3810c3a5702SAndreas Gohr        $rev1 = max($rev1, 0);
3820c3a5702SAndreas Gohr        $rev2 = max($rev2, 0);
3830c3a5702SAndreas Gohr
3840c3a5702SAndreas Gohr        if ($rev2) {
3850c3a5702SAndreas Gohr            if ($rev2 < $rev1) {
3860c3a5702SAndreas Gohr                $rev = $rev2;
3870c3a5702SAndreas Gohr                $rev2 = $rev1;
3880c3a5702SAndreas Gohr                $rev1 = $rev;
3890c3a5702SAndreas Gohr            }
3900c3a5702SAndreas Gohr        } else {
3910c3a5702SAndreas Gohr            //empty right side means a removed page. Look up last revision.
392bd17ac90SSatoshi Sahara            $rev2 = $this->currentRevision();
3930c3a5702SAndreas Gohr        }
3940c3a5702SAndreas Gohr        //collect revisions around rev2
3950c3a5702SAndreas Gohr        list($revs2, $allrevs, $fp, $lines, $head, $tail) = $this->retrieveRevisionsAround($rev2, $max);
3960c3a5702SAndreas Gohr
3970c3a5702SAndreas Gohr        if (empty($revs2)) return array(array(), array());
3980c3a5702SAndreas Gohr
3990c3a5702SAndreas Gohr        //collect revisions around rev1
4000c3a5702SAndreas Gohr        $index = array_search($rev1, $allrevs);
4010c3a5702SAndreas Gohr        if ($index === false) {
4020c3a5702SAndreas Gohr            //no overlapping revisions
4030c3a5702SAndreas Gohr            list($revs1, , , , ,) = $this->retrieveRevisionsAround($rev1, $max);
4040c3a5702SAndreas Gohr            if (empty($revs1)) $revs1 = array();
4050c3a5702SAndreas Gohr        } else {
4060c3a5702SAndreas Gohr            //revisions overlaps, reuse revisions around rev2
4075d9428a0SSatoshi Sahara            $lastrev = array_pop($allrevs); //keep last entry that could be external edit
4080c3a5702SAndreas Gohr            $revs1 = $allrevs;
4090c3a5702SAndreas Gohr            while ($head > 0) {
4100c3a5702SAndreas Gohr                for ($i = count($lines) - 1; $i >= 0; $i--) {
4111d11f1d3SSatoshi Sahara                    $info = $this->parseLogLine($lines[$i]);
412d154755dSSatoshi Sahara                    if ($this->cacheRevisionInfo($info)) {
413bd17ac90SSatoshi Sahara                        $revs1[] = $info['date'];
4140c3a5702SAndreas Gohr                        $index++;
4150c3a5702SAndreas Gohr
4165d9428a0SSatoshi Sahara                        if ($index > intval($max / 2)) break 2;
4170c3a5702SAndreas Gohr                    }
4180c3a5702SAndreas Gohr                }
4190c3a5702SAndreas Gohr
4200c3a5702SAndreas Gohr                list($lines, $head, $tail) = $this->readAdjacentChunk($fp, $head, $tail, -1);
4210c3a5702SAndreas Gohr            }
4220c3a5702SAndreas Gohr            sort($revs1);
4235d9428a0SSatoshi Sahara            $revs1[] = $lastrev; //push back last entry
4245d9428a0SSatoshi Sahara
4250c3a5702SAndreas Gohr            //return wanted selection
4265d9428a0SSatoshi Sahara            $revs1 = array_slice($revs1, max($index - intval($max / 2), 0), $max);
4270c3a5702SAndreas Gohr        }
4280c3a5702SAndreas Gohr
4290c3a5702SAndreas Gohr        return array(array_reverse($revs1), array_reverse($revs2));
4300c3a5702SAndreas Gohr    }
4310c3a5702SAndreas Gohr
4320c3a5702SAndreas Gohr    /**
4330c3a5702SAndreas Gohr     * Return an existing revision for a specific date which is
4340c3a5702SAndreas Gohr     * the current one or younger or equal then the date
4350c3a5702SAndreas Gohr     *
4360c3a5702SAndreas Gohr     * @param number $date_at timestamp
4370c3a5702SAndreas Gohr     * @return string revision ('' for current)
4380c3a5702SAndreas Gohr     */
4390c3a5702SAndreas Gohr    public function getLastRevisionAt($date_at)
4400c3a5702SAndreas Gohr    {
441d154755dSSatoshi Sahara        $fileLastMod = $this->getFilename();
4420c3a5702SAndreas Gohr        //requested date_at(timestamp) younger or equal then modified_time($this->id) => load current
443d154755dSSatoshi Sahara        if (file_exists($fileLastMod) && $date_at >= @filemtime($fileLastMod)) {
4440c3a5702SAndreas Gohr            return '';
4450c3a5702SAndreas Gohr        } else {
4460c3a5702SAndreas Gohr            if ($rev = $this->getRelativeRevision($date_at + 1, -1)) { //+1 to get also the requested date revision
4470c3a5702SAndreas Gohr                return $rev;
4480c3a5702SAndreas Gohr            } else {
4490c3a5702SAndreas Gohr                return false;
4500c3a5702SAndreas Gohr            }
4510c3a5702SAndreas Gohr        }
4520c3a5702SAndreas Gohr    }
4530c3a5702SAndreas Gohr
4540c3a5702SAndreas Gohr    /**
4550c3a5702SAndreas Gohr     * Collect the $max revisions near to the timestamp $rev
4560c3a5702SAndreas Gohr     *
457bd17ac90SSatoshi Sahara     * Ideally, half of retrieved timestamps are older than $rev, another half are newer.
458bd17ac90SSatoshi Sahara     * The returned array $requestedrevs may not contain the reference timestamp $rev
459bd17ac90SSatoshi Sahara     * when it does not match any revision value recorded in changelog.
460bd17ac90SSatoshi Sahara     *
4610c3a5702SAndreas Gohr     * @param int $rev revision timestamp
4620c3a5702SAndreas Gohr     * @param int $max maximum number of revisions to be returned
4630c3a5702SAndreas Gohr     * @return bool|array
4640c3a5702SAndreas Gohr     *     return array with entries:
4650c3a5702SAndreas Gohr     *       - $requestedrevs: array of with $max revision timestamps
4660c3a5702SAndreas Gohr     *       - $revs: all parsed revision timestamps
4670c3a5702SAndreas Gohr     *       - $fp: filepointer only defined for chuck reading, needs closing.
4680c3a5702SAndreas Gohr     *       - $lines: non-parsed changelog lines before the parsed revisions
4690c3a5702SAndreas Gohr     *       - $head: position of first readed changelogline
4700c3a5702SAndreas Gohr     *       - $lasttail: position of end of last readed changelogline
4710c3a5702SAndreas Gohr     *     otherwise false
4720c3a5702SAndreas Gohr     */
4730c3a5702SAndreas Gohr    protected function retrieveRevisionsAround($rev, $max)
4740c3a5702SAndreas Gohr    {
475a3984ddfSSatoshi Sahara        $revs = array();
476a3984ddfSSatoshi Sahara        $aftercount = $beforecount = 0;
477a3984ddfSSatoshi Sahara
4780c3a5702SAndreas Gohr        //get lines from changelog
479bd17ac90SSatoshi Sahara        list($fp, $lines, $starthead, $starttail, $eof) = $this->readloglines($rev);
480bd17ac90SSatoshi Sahara        if (empty($lines)) return false;
4810c3a5702SAndreas Gohr
482bd17ac90SSatoshi Sahara        //parse changelog lines in chunk, and read forward more chunks until $max/2 is reached
4830c3a5702SAndreas Gohr        $head = $starthead;
4840c3a5702SAndreas Gohr        $tail = $starttail;
4850c3a5702SAndreas Gohr        while (count($lines) > 0) {
4860c3a5702SAndreas Gohr            foreach ($lines as $line) {
4871d11f1d3SSatoshi Sahara                $info = $this->parseLogLine($line);
488d154755dSSatoshi Sahara                if ($this->cacheRevisionInfo($info)) {
489bd17ac90SSatoshi Sahara                    $revs[] = $info['date'];
490bd17ac90SSatoshi Sahara                    if ($info['date'] >= $rev) {
4910c3a5702SAndreas Gohr                        //count revs after reference $rev
4920c3a5702SAndreas Gohr                        $aftercount++;
4930c3a5702SAndreas Gohr                        if ($aftercount == 1) $beforecount = count($revs);
4940c3a5702SAndreas Gohr                    }
4950c3a5702SAndreas Gohr                    //enough revs after reference $rev?
4965d9428a0SSatoshi Sahara                    if ($aftercount > intval($max / 2)) break 2;
4970c3a5702SAndreas Gohr                }
4980c3a5702SAndreas Gohr            }
4990c3a5702SAndreas Gohr            //retrieve next chunk
5000c3a5702SAndreas Gohr            list($lines, $head, $tail) = $this->readAdjacentChunk($fp, $head, $tail, 1);
5010c3a5702SAndreas Gohr        }
5020c3a5702SAndreas Gohr        $lasttail = $tail;
5030c3a5702SAndreas Gohr
504bd17ac90SSatoshi Sahara        // add a possible revision of external edit, create or deletion
505df7627d6SSatoshi Sahara        if ($lasttail == $eof && $aftercount <= intval($max / 2) &&
506df7627d6SSatoshi Sahara            count($revs) && !$this->isCurrentRevision($revs[count($revs)-1])
507df7627d6SSatoshi Sahara        ) {
508bd17ac90SSatoshi Sahara            $revs[] = $this->currentRevision;
509bd17ac90SSatoshi Sahara            $aftercount++;
510bd17ac90SSatoshi Sahara        }
511bd17ac90SSatoshi Sahara
512bd17ac90SSatoshi Sahara        if ($aftercount == 0) {
513bd17ac90SSatoshi Sahara            //given timestamp $rev is newer than the most recent line in chunk
514bd17ac90SSatoshi Sahara            return false; //FIXME: or proceed to collect older revisions?
515bd17ac90SSatoshi Sahara        }
516bd17ac90SSatoshi Sahara
517bd17ac90SSatoshi Sahara        //read more chunks backward until $max/2 is reached and total number of revs is equal to $max
5180c3a5702SAndreas Gohr        $lines = array();
5190c3a5702SAndreas Gohr        $i = 0;
5200c3a5702SAndreas Gohr        if ($aftercount > 0) {
5210c3a5702SAndreas Gohr            $head = $starthead;
5220c3a5702SAndreas Gohr            $tail = $starttail;
5230c3a5702SAndreas Gohr            while ($head > 0) {
5240c3a5702SAndreas Gohr                list($lines, $head, $tail) = $this->readAdjacentChunk($fp, $head, $tail, -1);
5250c3a5702SAndreas Gohr
5260c3a5702SAndreas Gohr                for ($i = count($lines) - 1; $i >= 0; $i--) {
5271d11f1d3SSatoshi Sahara                    $info = $this->parseLogLine($lines[$i]);
528d154755dSSatoshi Sahara                    if ($this->cacheRevisionInfo($info)) {
529bd17ac90SSatoshi Sahara                        $revs[] = $info['date'];
5300c3a5702SAndreas Gohr                        $beforecount++;
5310c3a5702SAndreas Gohr                        //enough revs before reference $rev?
5325d9428a0SSatoshi Sahara                        if ($beforecount > max(intval($max / 2), $max - $aftercount)) break 2;
5330c3a5702SAndreas Gohr                    }
5340c3a5702SAndreas Gohr                }
5350c3a5702SAndreas Gohr            }
5360c3a5702SAndreas Gohr        }
5370c3a5702SAndreas Gohr        //keep only non-parsed lines
5380c3a5702SAndreas Gohr        $lines = array_slice($lines, 0, $i);
539bd17ac90SSatoshi Sahara
540bd17ac90SSatoshi Sahara        sort($revs);
541bd17ac90SSatoshi Sahara
5420c3a5702SAndreas Gohr        //trunk desired selection
5430c3a5702SAndreas Gohr        $requestedrevs = array_slice($revs, -$max, $max);
5440c3a5702SAndreas Gohr
5450c3a5702SAndreas Gohr        return array($requestedrevs, $revs, $fp, $lines, $head, $lasttail);
5460c3a5702SAndreas Gohr    }
547a3984ddfSSatoshi Sahara
548a3984ddfSSatoshi Sahara    /**
549bd17ac90SSatoshi Sahara     * Get the current revision information, considering external edit, create or deletion
550bd17ac90SSatoshi Sahara     *
55105282e9fSSatoshi Sahara     * When the file has not modified since its last revision, the infomation of the last
55205282e9fSSatoshi Sahara     * change that had already recorded in the changelog is returned as current change info.
55305282e9fSSatoshi Sahara     * Otherwise, the change infomation since the last revision caused outside DokuWiki
55405282e9fSSatoshi Sahara     * should be returned, which is referred as "external revision".
555bd17ac90SSatoshi Sahara     *
55605282e9fSSatoshi Sahara     * The change date of the file can be determined by timestamp as far as the file exists,
55705282e9fSSatoshi Sahara     * however this is not possible when the file has already deleted outside of DokuWiki.
55866f4cdd4SSatoshi Sahara     * In such case we assign 1 sec before current time() for the external deletion.
55905282e9fSSatoshi Sahara     * As a result, the value of current revision identifier may change each time because:
56005282e9fSSatoshi Sahara     *   1) the file has again modified outside of DokuWiki, or
56105282e9fSSatoshi Sahara     *   2) the value is essentially volatile for deleted but once existed files.
562bd17ac90SSatoshi Sahara     *
563bd17ac90SSatoshi Sahara     * @return bool|array false when page had never existed or array with entries:
564bd17ac90SSatoshi Sahara     *      - date:  revision identifier (timestamp or last revision +1)
565bd17ac90SSatoshi Sahara     *      - ip:    IPv4 address (127.0.0.1)
566bd17ac90SSatoshi Sahara     *      - type:  log line type
567bd17ac90SSatoshi Sahara     *      - id:    id of page or media
568bd17ac90SSatoshi Sahara     *      - user:  user name
569bd17ac90SSatoshi Sahara     *      - sum:   edit summary (or action reason)
570bd17ac90SSatoshi Sahara     *      - extra: extra data (varies by line type)
571bd17ac90SSatoshi Sahara     *      - sizechange: change of filesize
572dbf582ddSSatoshi Sahara     *      - timestamp: unix timestamp or false (key set only for external edit occurred)
573bd17ac90SSatoshi Sahara     *
574bd17ac90SSatoshi Sahara     * @author  Satoshi Sahara <sahara.satoshi@gmail.com>
575bd17ac90SSatoshi Sahara     */
576bd17ac90SSatoshi Sahara    public function getCurrentRevisionInfo()
577bd17ac90SSatoshi Sahara    {
578bd17ac90SSatoshi Sahara        global $lang;
579bd17ac90SSatoshi Sahara
580bd17ac90SSatoshi Sahara        if (isset($this->currentRevision)) return $this->getRevisionInfo($this->currentRevision);
581bd17ac90SSatoshi Sahara
582bd17ac90SSatoshi Sahara        // get revision id from the item file timestamp and chagelog
583dbf582ddSSatoshi Sahara        $fileLastMod = $this->getFilename();
584dbf582ddSSatoshi Sahara        $fileRev = @filemtime($fileLastMod); // false when the file not exist
585df7627d6SSatoshi Sahara        $lastRev = $this->lastRevision();    // false when no changelog
586bd17ac90SSatoshi Sahara
587df7627d6SSatoshi Sahara        if (!$fileRev && !$lastRev) {                // has never existed
588df7627d6SSatoshi Sahara            $this->currentRevision = false;
589bd17ac90SSatoshi Sahara            return false;
590bd17ac90SSatoshi Sahara        } elseif ($fileRev === $lastRev) {           // not external edit
591bd17ac90SSatoshi Sahara            $this->currentRevision = $lastRev;
5925ec96136SSatoshi Sahara            return $this->getRevisionInfo($lastRev);
593bd17ac90SSatoshi Sahara        }
594bd17ac90SSatoshi Sahara
595bd17ac90SSatoshi Sahara        if (!$fileRev && $lastRev) {                 // item file does not exist
596bd17ac90SSatoshi Sahara            // check consistency against changelog
597bd17ac90SSatoshi Sahara            $revInfo = $this->getRevisionInfo($lastRev);
598bd17ac90SSatoshi Sahara            if ($revInfo['type'] == DOKU_CHANGE_TYPE_DELETE) {
599bd17ac90SSatoshi Sahara                $this->currentRevision = $lastRev;
6005ec96136SSatoshi Sahara                return $this->getRevisionInfo($lastRev);
601bd17ac90SSatoshi Sahara            }
602bd17ac90SSatoshi Sahara
60366f4cdd4SSatoshi Sahara            // externally deleted, set revision date as late as possible
604bd17ac90SSatoshi Sahara            $revInfo = [
60566f4cdd4SSatoshi Sahara                'date' => max($lastRev +1, time() -1), // 1 sec before now or new page save
606bd17ac90SSatoshi Sahara                'ip'   => '127.0.0.1',
607bd17ac90SSatoshi Sahara                'type' => DOKU_CHANGE_TYPE_DELETE,
608bd17ac90SSatoshi Sahara                'id'   => $this->id,
609bd17ac90SSatoshi Sahara                'user' => '',
610df7627d6SSatoshi Sahara                'sum'  => $lang['deleted'].' - '.$lang['external_edit'].' ('.$lang['unknowndate'].')',
611bd17ac90SSatoshi Sahara                'extra' => '',
612bd17ac90SSatoshi Sahara                'sizechange' => -io_getSizeFile($this->getFilename($lastRev)),
613dbf582ddSSatoshi Sahara                'timestamp' => false,
614bd17ac90SSatoshi Sahara            ];
615bd17ac90SSatoshi Sahara
616bd17ac90SSatoshi Sahara        } elseif ($fileRev) {                        // item file exist
617bd17ac90SSatoshi Sahara            // here, file timestamp is different with last revision in changelog
618df7627d6SSatoshi Sahara            $isJustCreated = $lastRev === false || (
619e39c2efbSSatoshi Sahara                    $fileRev > $lastRev &&
620e39c2efbSSatoshi Sahara                    $this->getRevisionInfo($lastRev)['type'] == DOKU_CHANGE_TYPE_DELETE
621e39c2efbSSatoshi Sahara            );
622bd17ac90SSatoshi Sahara            $filesize_new = filesize($this->getFilename());
623804096eaSSatoshi Sahara            $filesize_old = $isJustCreated ? 0 : io_getSizeFile($this->getFilename($lastRev));
624bd17ac90SSatoshi Sahara            $sizechange = $filesize_new - $filesize_old;
625bd17ac90SSatoshi Sahara
626dbf582ddSSatoshi Sahara            if ($isJustCreated) {
6278ff5c11aSSatoshi Sahara                $timestamp = $fileRev;
628bd17ac90SSatoshi Sahara                $sum = $lang['created'].' - '.$lang['external_edit'];
629bd17ac90SSatoshi Sahara            } elseif ($fileRev > $lastRev) {
6308ff5c11aSSatoshi Sahara                $timestamp = $fileRev;
631bd17ac90SSatoshi Sahara                $sum = $lang['external_edit'];
632bd17ac90SSatoshi Sahara            } else {
6338ff5c11aSSatoshi Sahara                // $fileRev is older than $lastRev, that is erroneous/incorrect occurence.
63466f4cdd4SSatoshi Sahara                $msg = "Warning: current file modification time is older than last revision date";
63566f4cdd4SSatoshi Sahara                $details = 'File revision: '.$fileRev.' '.strftime("%Y-%m-%d %H:%M:%S", $fileRev)."\n"
63666f4cdd4SSatoshi Sahara                          .'Last revision: '.$lastRev.' '.strftime("%Y-%m-%d %H:%M:%S", $lastRev);
63766f4cdd4SSatoshi Sahara                Logger::error($msg, $details, $this->getFilename());
63866f4cdd4SSatoshi Sahara                $timestamp = false;
639df7627d6SSatoshi Sahara                $sum = $lang['external_edit'].' ('.$lang['unknowndate'].')';
640bd17ac90SSatoshi Sahara            }
641bd17ac90SSatoshi Sahara
642bd17ac90SSatoshi Sahara            // externally created or edited
643bd17ac90SSatoshi Sahara            $revInfo = [
64466f4cdd4SSatoshi Sahara                'date' => $timestamp ?: $lastRev +1,
645bd17ac90SSatoshi Sahara                'ip'   => '127.0.0.1',
646bd17ac90SSatoshi Sahara                'type' => $isJustCreated ? DOKU_CHANGE_TYPE_CREATE : DOKU_CHANGE_TYPE_EDIT,
647bd17ac90SSatoshi Sahara                'id'   => $this->id,
648bd17ac90SSatoshi Sahara                'user' => '',
649bd17ac90SSatoshi Sahara                'sum'  => $sum,
650bd17ac90SSatoshi Sahara                'extra' => '',
651bd17ac90SSatoshi Sahara                'sizechange' => $sizechange,
652bd17ac90SSatoshi Sahara                'timestamp' => $timestamp,
653bd17ac90SSatoshi Sahara            ];
654bd17ac90SSatoshi Sahara        }
655bd17ac90SSatoshi Sahara
656bd17ac90SSatoshi Sahara        // cache current revision information of external edition
657bd17ac90SSatoshi Sahara        $this->currentRevision = $revInfo['date'];
658bd17ac90SSatoshi Sahara        $this->cache[$this->id][$this->currentRevision] = $revInfo;
659bd17ac90SSatoshi Sahara        return $this->getRevisionInfo($this->currentRevision);
660bd17ac90SSatoshi Sahara    }
6610c3a5702SAndreas Gohr}
662