xref: /dokuwiki/inc/changelog.php (revision d4f83172d9533c4d84f450fe22ef630816b21d75)
17d559c7fSBen Coburn<?php
2*d4f83172SAndreas Gohr
37d559c7fSBen Coburn/**
47d559c7fSBen Coburn * Changelog handling functions
57d559c7fSBen Coburn *
67d559c7fSBen Coburn * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
77d559c7fSBen Coburn * @author     Andreas Gohr <andi@splitbrain.org>
87d559c7fSBen Coburn */
9*d4f83172SAndreas Gohr
1024870174SAndreas Gohruse dokuwiki\ChangeLog\MediaChangeLog;
111d11f1d3SSatoshi Saharause dokuwiki\ChangeLog\ChangeLog;
127fba736bSSatoshi Saharause dokuwiki\File\PageFile;
131d11f1d3SSatoshi Sahara
147d559c7fSBen Coburn/**
157d559c7fSBen Coburn * parses a changelog line into it's components
167d559c7fSBen Coburn *
177d559c7fSBen Coburn * @author Ben Coburn <btcoburn@silicodon.net>
184f1e2cb3SGerrit Uitslag *
194f1e2cb3SGerrit Uitslag * @param string $line changelog line
204f1e2cb3SGerrit Uitslag * @return array|bool parsed line or false
217d559c7fSBen Coburn */
22d868eb89SAndreas Gohrfunction parseChangelogLine($line)
23d868eb89SAndreas Gohr{
241d11f1d3SSatoshi Sahara    return ChangeLog::parseLogLine($line);
257d559c7fSBen Coburn}
267d559c7fSBen Coburn
277d559c7fSBen Coburn/**
2863f13cadSDamien Regad * Adds an entry to the changelog and saves the metadata for the page
297d559c7fSBen Coburn *
306527839fSSatoshi Sahara * Note: timestamp of the change might not be unique especially after very quick
316527839fSSatoshi Sahara *       repeated edits (e.g. change checkbox via do plugin)
326527839fSSatoshi Sahara *
336527839fSSatoshi Sahara * @param int    $date      Timestamp of the change
34a365baeeSDominik Eckelmann * @param String $id        Name of the affected page
35a365baeeSDominik Eckelmann * @param String $type      Type of the change see DOKU_CHANGE_TYPE_*
36a365baeeSDominik Eckelmann * @param String $summary   Summary of the change
37eeda7adaSGerrit Uitslag * @param mixed  $extra     In case of a revert the revision (timestamp) of the reverted page
38a365baeeSDominik Eckelmann * @param array  $flags     Additional flags in a key value array.
394f1e2cb3SGerrit Uitslag *                             Available flags:
40a365baeeSDominik Eckelmann *                             - ExternalEdit - mark as an external edit.
41ac3ed4afSGerrit Uitslag * @param null|int $sizechange Change of filesize
42a365baeeSDominik Eckelmann *
437d559c7fSBen Coburn * @author Andreas Gohr <andi@splitbrain.org>
447d559c7fSBen Coburn * @author Esther Brunner <wikidesign@gmail.com>
457d559c7fSBen Coburn * @author Ben Coburn <btcoburn@silicodon.net>
4669f9b481SSatoshi Sahara * @deprecated 2021-11-28
477d559c7fSBen Coburn */
485d9428a0SSatoshi Saharafunction addLogEntry(
495d9428a0SSatoshi Sahara    $date,
505d9428a0SSatoshi Sahara    $id,
515d9428a0SSatoshi Sahara    $type = DOKU_CHANGE_TYPE_EDIT,
525d9428a0SSatoshi Sahara    $summary = '',
535d9428a0SSatoshi Sahara    $extra = '',
545d9428a0SSatoshi Sahara    $flags = null,
55d868eb89SAndreas Gohr    $sizechange = null
56d868eb89SAndreas Gohr) {
5769f9b481SSatoshi Sahara    // no more used in DokuWiki core, but left for third-party plugins
5879a2d784SGerrit Uitslag    dbg_deprecated('see ' . PageFile::class . '::saveWikiText()');
5969f9b481SSatoshi Sahara
60585bf44eSChristopher Smith    /** @var Input $INPUT */
61585bf44eSChristopher Smith    global $INPUT;
627d559c7fSBen Coburn
635aa52fafSBen Coburn    // check for special flags as keys
6424870174SAndreas Gohr    if (!is_array($flags)) $flags = [];
655aa52fafSBen Coburn    $flagExternalEdit = isset($flags['ExternalEdit']);
665aa52fafSBen Coburn
677d559c7fSBen Coburn    $id = cleanid($id);
687d559c7fSBen Coburn
697d559c7fSBen Coburn    if (!$date) $date = time(); //use current time if none supplied
7024870174SAndreas Gohr    $remote = ($flagExternalEdit) ? '127.0.0.1' : clientIP(true);
7124870174SAndreas Gohr    $user   = ($flagExternalEdit) ? '' : $INPUT->server->str('REMOTE_USER');
721d11f1d3SSatoshi Sahara    $sizechange = ($sizechange === null) ? '' : (int)$sizechange;
737d559c7fSBen Coburn
741d11f1d3SSatoshi Sahara    // update changelog file and get the added entry that is also to be stored in metadata
757fba736bSSatoshi Sahara    $pageFile = new PageFile($id);
767fba736bSSatoshi Sahara    $logEntry = $pageFile->changelog->addLogEntry([
777d559c7fSBen Coburn        'date'       => $date,
787d559c7fSBen Coburn        'ip'         => $remote,
79c7192766SSatoshi Sahara        'type'       => $type,
807d559c7fSBen Coburn        'id'         => $id,
817d559c7fSBen Coburn        'user'       => $user,
82c7192766SSatoshi Sahara        'sum'        => $summary,
83c7192766SSatoshi Sahara        'extra'      => $extra,
84c7192766SSatoshi Sahara        'sizechange' => $sizechange,
851d11f1d3SSatoshi Sahara    ]);
867d559c7fSBen Coburn
877d559c7fSBen Coburn    // update metadata
887fba736bSSatoshi Sahara    $pageFile->updateMetadata($logEntry);
897d559c7fSBen Coburn}
907d559c7fSBen Coburn
917d559c7fSBen Coburn/**
92eeda7adaSGerrit Uitslag * Adds an entry to the media changelog
9399c8d7f2Smichael *
9499c8d7f2Smichael * @author Michael Hamann <michael@content-space.de>
9599c8d7f2Smichael * @author Andreas Gohr <andi@splitbrain.org>
9699c8d7f2Smichael * @author Esther Brunner <wikidesign@gmail.com>
9799c8d7f2Smichael * @author Ben Coburn <btcoburn@silicodon.net>
984f1e2cb3SGerrit Uitslag *
994f1e2cb3SGerrit Uitslag * @param int    $date      Timestamp of the change
1004f1e2cb3SGerrit Uitslag * @param String $id        Name of the affected page
1014f1e2cb3SGerrit Uitslag * @param String $type      Type of the change see DOKU_CHANGE_TYPE_*
1024f1e2cb3SGerrit Uitslag * @param String $summary   Summary of the change
103eeda7adaSGerrit Uitslag * @param mixed  $extra     In case of a revert the revision (timestamp) of the reverted page
1044f1e2cb3SGerrit Uitslag * @param array  $flags     Additional flags in a key value array.
1054f1e2cb3SGerrit Uitslag *                             Available flags:
1064f1e2cb3SGerrit Uitslag *                             - (none, so far)
107ac3ed4afSGerrit Uitslag * @param null|int $sizechange Change of filesize
10899c8d7f2Smichael */
10964159a61SAndreas Gohrfunction addMediaLogEntry(
11064159a61SAndreas Gohr    $date,
11164159a61SAndreas Gohr    $id,
11264159a61SAndreas Gohr    $type = DOKU_CHANGE_TYPE_EDIT,
11364159a61SAndreas Gohr    $summary = '',
11464159a61SAndreas Gohr    $extra = '',
11564159a61SAndreas Gohr    $flags = null,
116d868eb89SAndreas Gohr    $sizechange = null
117d868eb89SAndreas Gohr) {
118585bf44eSChristopher Smith    /** @var Input $INPUT */
119585bf44eSChristopher Smith    global $INPUT;
12099c8d7f2Smichael
121facfe250SSatoshi Sahara    // check for special flags as keys
12224870174SAndreas Gohr    if (!is_array($flags)) $flags = [];
123facfe250SSatoshi Sahara    $flagExternalEdit = isset($flags['ExternalEdit']);
124facfe250SSatoshi Sahara
12599c8d7f2Smichael    $id = cleanid($id);
12699c8d7f2Smichael
12799c8d7f2Smichael    if (!$date) $date = time(); //use current time if none supplied
12824870174SAndreas Gohr    $remote = ($flagExternalEdit) ? '127.0.0.1' : clientIP(true);
12924870174SAndreas Gohr    $user   = ($flagExternalEdit) ? '' : $INPUT->server->str('REMOTE_USER');
1301d11f1d3SSatoshi Sahara    $sizechange = ($sizechange === null) ? '' : (int)$sizechange;
13199c8d7f2Smichael
1321d11f1d3SSatoshi Sahara    // update changelog file and get the added entry
13324870174SAndreas Gohr    (new MediaChangeLog($id, 1024))->addLogEntry([
13499c8d7f2Smichael        'date'       => $date,
13599c8d7f2Smichael        'ip'         => $remote,
136c7192766SSatoshi Sahara        'type'       => $type,
13799c8d7f2Smichael        'id'         => $id,
13899c8d7f2Smichael        'user'       => $user,
139c7192766SSatoshi Sahara        'sum'        => $summary,
140c7192766SSatoshi Sahara        'extra'      => $extra,
141c7192766SSatoshi Sahara        'sizechange' => $sizechange,
1421d11f1d3SSatoshi Sahara    ]);
14399c8d7f2Smichael}
14499c8d7f2Smichael
14599c8d7f2Smichael/**
146252acce3SSatoshi Sahara * returns an array of recently changed files using the changelog
1477d559c7fSBen Coburn *
1487d559c7fSBen Coburn * The following constants can be used to control which changes are
1497d559c7fSBen Coburn * included. Add them together as needed.
1507d559c7fSBen Coburn *
1517d559c7fSBen Coburn * RECENTS_SKIP_DELETED   - don't include deleted pages
1527d559c7fSBen Coburn * RECENTS_SKIP_MINORS    - don't include minor changes
15308e9b52fSPhy * RECENTS_ONLY_CREATION  - only include new created pages and media
1547d559c7fSBen Coburn * RECENTS_SKIP_SUBSPACES - don't include subspaces
1550b926329SKate Arzamastseva * RECENTS_MEDIA_CHANGES  - return media changes instead of page changes
1560b926329SKate Arzamastseva * RECENTS_MEDIA_PAGES_MIXED  - return both media changes and page changes
1577d559c7fSBen Coburn *
1587d559c7fSBen Coburn * @param int    $first   number of first entry returned (for paginating
1597d559c7fSBen Coburn * @param int    $num     return $num entries
1607d559c7fSBen Coburn * @param string $ns      restrict to given namespace
16159f20ea3SMichael Hamann * @param int    $flags   see above
16259f20ea3SMichael Hamann * @return array recently changed files
1637d559c7fSBen Coburn *
1647d559c7fSBen Coburn * @author Ben Coburn <btcoburn@silicodon.net>
16529778747SKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1667d559c7fSBen Coburn */
167d868eb89SAndreas Gohrfunction getRecents($first, $num, $ns = '', $flags = 0)
168d868eb89SAndreas Gohr{
1697d559c7fSBen Coburn    global $conf;
17024870174SAndreas Gohr    $recent = [];
1717d559c7fSBen Coburn    $count  = 0;
1727d559c7fSBen Coburn
1737d559c7fSBen Coburn    if (!$num)
1747d559c7fSBen Coburn        return $recent;
1757d559c7fSBen Coburn
1767d559c7fSBen Coburn    // read all recent changes. (kept short)
1770b926329SKate Arzamastseva    if ($flags & RECENTS_MEDIA_CHANGES) {
1788e3e8693SAndreas Gohr        $lines = @file($conf['media_changelog']) ?: [];
17999c8d7f2Smichael    } else {
1808e3e8693SAndreas Gohr        $lines = @file($conf['changelog']) ?: [];
18199c8d7f2Smichael    }
1821b266025SPhy    if (!is_array($lines)) {
18324870174SAndreas Gohr        $lines = [];
1841b266025SPhy    }
18529778747SKate Arzamastseva    $lines_position = count($lines) - 1;
18659f20ea3SMichael Hamann    $media_lines_position = 0;
18724870174SAndreas Gohr    $media_lines = [];
18829778747SKate Arzamastseva
1890b926329SKate Arzamastseva    if ($flags & RECENTS_MEDIA_PAGES_MIXED) {
1908e3e8693SAndreas Gohr        $media_lines = @file($conf['media_changelog']) ?: [];
1911b266025SPhy        if (!is_array($media_lines)) {
19224870174SAndreas Gohr            $media_lines = [];
1931b266025SPhy        }
19429778747SKate Arzamastseva        $media_lines_position = count($media_lines) - 1;
19529778747SKate Arzamastseva    }
19629778747SKate Arzamastseva
19724870174SAndreas Gohr    $seen = []; // caches seen lines, _handleRecent() skips them
1987d559c7fSBen Coburn
1997d559c7fSBen Coburn    // handle lines
2000b926329SKate Arzamastseva    while ($lines_position >= 0 || (($flags & RECENTS_MEDIA_PAGES_MIXED) && $media_lines_position >= 0)) {
20129778747SKate Arzamastseva        if (empty($rec) && $lines_position >= 0) {
2021d901ab2SAndreas Gohr            $rec = _handleRecent(@$lines[$lines_position], $ns, $flags, $seen);
20329778747SKate Arzamastseva            if (!$rec) {
20429778747SKate Arzamastseva                $lines_position--;
20529778747SKate Arzamastseva                continue;
20629778747SKate Arzamastseva            }
20729778747SKate Arzamastseva        }
2080b926329SKate Arzamastseva        if (($flags & RECENTS_MEDIA_PAGES_MIXED) && empty($media_rec) && $media_lines_position >= 0) {
20964159a61SAndreas Gohr            $media_rec = _handleRecent(
21064159a61SAndreas Gohr                @$media_lines[$media_lines_position],
21164159a61SAndreas Gohr                $ns,
21264159a61SAndreas Gohr                $flags | RECENTS_MEDIA_CHANGES,
21364159a61SAndreas Gohr                $seen
21464159a61SAndreas Gohr            );
21529778747SKate Arzamastseva            if (!$media_rec) {
21629778747SKate Arzamastseva                $media_lines_position--;
21729778747SKate Arzamastseva                continue;
21829778747SKate Arzamastseva            }
21929778747SKate Arzamastseva        }
2200b926329SKate Arzamastseva        if (($flags & RECENTS_MEDIA_PAGES_MIXED) && @$media_rec['date'] >= @$rec['date']) {
22129778747SKate Arzamastseva            $media_lines_position--;
22229778747SKate Arzamastseva            $x = $media_rec;
223b5941dfaSKate Arzamastseva            $x['media'] = true;
22429778747SKate Arzamastseva            $media_rec = false;
22529778747SKate Arzamastseva        } else {
22629778747SKate Arzamastseva            $lines_position--;
22729778747SKate Arzamastseva            $x = $rec;
22835bad86aSTherealperO            if ($flags & RECENTS_MEDIA_CHANGES) {
22935bad86aSTherealperO                $x['media'] = true;
23035bad86aSTherealperO            } else {
23135bad86aSTherealperO                $x['media'] = false;
23235bad86aSTherealperO            }
23329778747SKate Arzamastseva            $rec = false;
23429778747SKate Arzamastseva        }
2357d559c7fSBen Coburn        if (--$first >= 0) continue; // skip first entries
23629778747SKate Arzamastseva        $recent[] = $x;
2377d559c7fSBen Coburn        $count++;
2387d559c7fSBen Coburn        // break when we have enough entries
239177d6836SAndreas Gohr        if ($count >= $num) {
240*d4f83172SAndreas Gohr            break;
241*d4f83172SAndreas Gohr        }
2427d559c7fSBen Coburn    }
2437d559c7fSBen Coburn    return $recent;
2447d559c7fSBen Coburn}
2457d559c7fSBen Coburn
2467d559c7fSBen Coburn/**
24799c8d7f2Smichael * returns an array of files changed since a given time using the
24899c8d7f2Smichael * changelog
24999c8d7f2Smichael *
25099c8d7f2Smichael * The following constants can be used to control which changes are
25199c8d7f2Smichael * included. Add them together as needed.
25299c8d7f2Smichael *
25399c8d7f2Smichael * RECENTS_SKIP_DELETED   - don't include deleted pages
25499c8d7f2Smichael * RECENTS_SKIP_MINORS    - don't include minor changes
25508e9b52fSPhy * RECENTS_ONLY_CREATION  - only include new created pages and media
25699c8d7f2Smichael * RECENTS_SKIP_SUBSPACES - don't include subspaces
2570b926329SKate Arzamastseva * RECENTS_MEDIA_CHANGES  - return media changes instead of page changes
25899c8d7f2Smichael *
25999c8d7f2Smichael * @param int    $from    date of the oldest entry to return
26099c8d7f2Smichael * @param int    $to      date of the newest entry to return (for pagination, optional)
26199c8d7f2Smichael * @param string $ns      restrict to given namespace (optional)
26259f20ea3SMichael Hamann * @param int    $flags   see above (optional)
26359f20ea3SMichael Hamann * @return array of files
26499c8d7f2Smichael *
26599c8d7f2Smichael * @author Michael Hamann <michael@content-space.de>
26699c8d7f2Smichael * @author Ben Coburn <btcoburn@silicodon.net>
26799c8d7f2Smichael */
268d868eb89SAndreas Gohrfunction getRecentsSince($from, $to = null, $ns = '', $flags = 0)
269d868eb89SAndreas Gohr{
27099c8d7f2Smichael    global $conf;
27124870174SAndreas Gohr    $recent = [];
27299c8d7f2Smichael
27399c8d7f2Smichael    if ($to && $to < $from)
27499c8d7f2Smichael        return $recent;
27599c8d7f2Smichael
27699c8d7f2Smichael    // read all recent changes. (kept short)
2770b926329SKate Arzamastseva    if ($flags & RECENTS_MEDIA_CHANGES) {
27899c8d7f2Smichael        $lines = @file($conf['media_changelog']);
27999c8d7f2Smichael    } else {
28099c8d7f2Smichael        $lines = @file($conf['changelog']);
28199c8d7f2Smichael    }
282e920a0a1SAndreas Gohr    if (!$lines) return $recent;
28399c8d7f2Smichael
28499c8d7f2Smichael    // we start searching at the end of the list
28599c8d7f2Smichael    $lines = array_reverse($lines);
28699c8d7f2Smichael
28799c8d7f2Smichael    // handle lines
28824870174SAndreas Gohr    $seen = []; // caches seen lines, _handleRecent() skips them
28999c8d7f2Smichael
29099c8d7f2Smichael    foreach ($lines as $line) {
29199c8d7f2Smichael        $rec = _handleRecent($line, $ns, $flags, $seen);
29299c8d7f2Smichael        if ($rec !== false) {
29399c8d7f2Smichael            if ($rec['date'] >= $from) {
29499c8d7f2Smichael                if (!$to || $rec['date'] <= $to) {
29599c8d7f2Smichael                    $recent[] = $rec;
29699c8d7f2Smichael                }
29799c8d7f2Smichael            } else {
29899c8d7f2Smichael                break;
29999c8d7f2Smichael            }
30099c8d7f2Smichael        }
30199c8d7f2Smichael    }
30299c8d7f2Smichael
30399c8d7f2Smichael    return array_reverse($recent);
30499c8d7f2Smichael}
30599c8d7f2Smichael
30699c8d7f2Smichael/**
3077d559c7fSBen Coburn * Internal function used by getRecents
3087d559c7fSBen Coburn *
3097d559c7fSBen Coburn * don't call directly
3107d559c7fSBen Coburn *
3117d559c7fSBen Coburn * @see getRecents()
3127d559c7fSBen Coburn * @author Andreas Gohr <andi@splitbrain.org>
3137d559c7fSBen Coburn * @author Ben Coburn <btcoburn@silicodon.net>
3144f1e2cb3SGerrit Uitslag *
3154f1e2cb3SGerrit Uitslag * @param string $line   changelog line
3164f1e2cb3SGerrit Uitslag * @param string $ns     restrict to given namespace
3174f1e2cb3SGerrit Uitslag * @param int    $flags  flags to control which changes are included
3184f1e2cb3SGerrit Uitslag * @param array  $seen   listing of seen pages
3194f1e2cb3SGerrit Uitslag * @return array|bool    false or array with info about a change
3207d559c7fSBen Coburn */
321d868eb89SAndreas Gohrfunction _handleRecent($line, $ns, $flags, &$seen)
322d868eb89SAndreas Gohr{
3237d559c7fSBen Coburn    if (empty($line)) return false;   //skip empty lines
3247d559c7fSBen Coburn
3257d559c7fSBen Coburn    // split the line into parts
3261d11f1d3SSatoshi Sahara    $recent = ChangeLog::parseLogLine($line);
327252acce3SSatoshi Sahara    if ($recent === false) return false;
3287d559c7fSBen Coburn
3297d559c7fSBen Coburn    // skip seen ones
3307d559c7fSBen Coburn    if (isset($seen[$recent['id']])) return false;
3317d559c7fSBen Coburn
33208e9b52fSPhy    // skip changes, of only new items are requested
33308e9b52fSPhy    if ($recent['type'] !== DOKU_CHANGE_TYPE_CREATE && ($flags & RECENTS_ONLY_CREATION)) return false;
33468f43bcfSTero Kivinen
3357d559c7fSBen Coburn    // skip minors
336ebf1501fSBen Coburn    if ($recent['type'] === DOKU_CHANGE_TYPE_MINOR_EDIT && ($flags & RECENTS_SKIP_MINORS)) return false;
3377d559c7fSBen Coburn
3387d559c7fSBen Coburn    // remember in seen to skip additional sights
3397d559c7fSBen Coburn    $seen[$recent['id']] = 1;
3407d559c7fSBen Coburn
3417d559c7fSBen Coburn    // check if it's a hidden page
3427d559c7fSBen Coburn    if (isHiddenPage($recent['id'])) return false;
3437d559c7fSBen Coburn
3447d559c7fSBen Coburn    // filter namespace
3457d559c7fSBen Coburn    if (($ns) && (strpos($recent['id'], $ns . ':') !== 0)) return false;
3467d559c7fSBen Coburn
3477d559c7fSBen Coburn    // exclude subnamespaces
3487d559c7fSBen Coburn    if (($flags & RECENTS_SKIP_SUBSPACES) && (getNS($recent['id']) != $ns)) return false;
3497d559c7fSBen Coburn
3507d559c7fSBen Coburn    // check ACL
35142025dfdSMichael Hamann    if ($flags & RECENTS_MEDIA_CHANGES) {
35242025dfdSMichael Hamann        $recent['perms'] = auth_quickaclcheck(getNS($recent['id']) . ':*');
35342025dfdSMichael Hamann    } else {
35499c8d7f2Smichael        $recent['perms'] = auth_quickaclcheck($recent['id']);
35542025dfdSMichael Hamann    }
35699c8d7f2Smichael    if ($recent['perms'] < AUTH_READ) return false;
3577d559c7fSBen Coburn
358eeda7adaSGerrit Uitslag    // check existence
3591d901ab2SAndreas Gohr    if ($flags & RECENTS_SKIP_DELETED) {
36042025dfdSMichael Hamann        $fn = (($flags & RECENTS_MEDIA_CHANGES) ? mediaFN($recent['id']) : wikiFN($recent['id']));
36179e79377SAndreas Gohr        if (!file_exists($fn)) return false;
3621d901ab2SAndreas Gohr    }
3637d559c7fSBen Coburn
3647d559c7fSBen Coburn    return $recent;
3657d559c7fSBen Coburn}
366