xref: /dokuwiki/inc/changelog.php (revision 177d6836e2f75d0e404be9c566e61725852a1e07)
17d559c7fSBen Coburn<?php
27d559c7fSBen Coburn/**
37d559c7fSBen Coburn * Changelog handling functions
47d559c7fSBen Coburn *
57d559c7fSBen Coburn * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
67d559c7fSBen Coburn * @author     Andreas Gohr <andi@splitbrain.org>
77d559c7fSBen Coburn */
824870174SAndreas Gohruse dokuwiki\ChangeLog\MediaChangeLog;
91d11f1d3SSatoshi Saharause dokuwiki\ChangeLog\ChangeLog;
107fba736bSSatoshi Saharause dokuwiki\File\PageFile;
111d11f1d3SSatoshi Sahara
127d559c7fSBen Coburn/**
137d559c7fSBen Coburn * parses a changelog line into it's components
147d559c7fSBen Coburn *
157d559c7fSBen Coburn * @author Ben Coburn <btcoburn@silicodon.net>
164f1e2cb3SGerrit Uitslag *
174f1e2cb3SGerrit Uitslag * @param string $line changelog line
184f1e2cb3SGerrit Uitslag * @return array|bool parsed line or false
197d559c7fSBen Coburn */
20d868eb89SAndreas Gohrfunction parseChangelogLine($line)
21d868eb89SAndreas Gohr{
221d11f1d3SSatoshi Sahara    return ChangeLog::parseLogLine($line);
237d559c7fSBen Coburn}
247d559c7fSBen Coburn
257d559c7fSBen Coburn/**
2663f13cadSDamien Regad * Adds an entry to the changelog and saves the metadata for the page
277d559c7fSBen Coburn *
286527839fSSatoshi Sahara * Note: timestamp of the change might not be unique especially after very quick
296527839fSSatoshi Sahara *       repeated edits (e.g. change checkbox via do plugin)
306527839fSSatoshi Sahara *
316527839fSSatoshi Sahara * @param int    $date      Timestamp of the change
32a365baeeSDominik Eckelmann * @param String $id        Name of the affected page
33a365baeeSDominik Eckelmann * @param String $type      Type of the change see DOKU_CHANGE_TYPE_*
34a365baeeSDominik Eckelmann * @param String $summary   Summary of the change
35eeda7adaSGerrit Uitslag * @param mixed  $extra     In case of a revert the revision (timestamp) of the reverted page
36a365baeeSDominik Eckelmann * @param array  $flags     Additional flags in a key value array.
374f1e2cb3SGerrit Uitslag *                             Available flags:
38a365baeeSDominik Eckelmann *                             - ExternalEdit - mark as an external edit.
39ac3ed4afSGerrit Uitslag * @param null|int $sizechange Change of filesize
40a365baeeSDominik Eckelmann *
417d559c7fSBen Coburn * @author Andreas Gohr <andi@splitbrain.org>
427d559c7fSBen Coburn * @author Esther Brunner <wikidesign@gmail.com>
437d559c7fSBen Coburn * @author Ben Coburn <btcoburn@silicodon.net>
4469f9b481SSatoshi Sahara * @deprecated 2021-11-28
457d559c7fSBen Coburn */
465d9428a0SSatoshi Saharafunction addLogEntry(
475d9428a0SSatoshi Sahara    $date,
485d9428a0SSatoshi Sahara    $id,
495d9428a0SSatoshi Sahara    $type = DOKU_CHANGE_TYPE_EDIT,
505d9428a0SSatoshi Sahara    $summary = '',
515d9428a0SSatoshi Sahara    $extra = '',
525d9428a0SSatoshi Sahara    $flags = null,
53d868eb89SAndreas Gohr    $sizechange = null
54d868eb89SAndreas Gohr) {
5569f9b481SSatoshi Sahara    // no more used in DokuWiki core, but left for third-party plugins
5679a2d784SGerrit Uitslag    dbg_deprecated('see '. PageFile::class .'::saveWikiText()');
5769f9b481SSatoshi Sahara
58585bf44eSChristopher Smith    /** @var Input $INPUT */
59585bf44eSChristopher Smith    global $INPUT;
607d559c7fSBen Coburn
615aa52fafSBen Coburn    // check for special flags as keys
6224870174SAndreas Gohr    if (!is_array($flags)) $flags = [];
635aa52fafSBen Coburn    $flagExternalEdit = isset($flags['ExternalEdit']);
645aa52fafSBen Coburn
657d559c7fSBen Coburn    $id = cleanid($id);
667d559c7fSBen Coburn
677d559c7fSBen Coburn    if (!$date) $date = time(); //use current time if none supplied
6824870174SAndreas Gohr    $remote = ($flagExternalEdit) ? '127.0.0.1' : clientIP(true);
6924870174SAndreas Gohr    $user   = ($flagExternalEdit) ? '' : $INPUT->server->str('REMOTE_USER');
701d11f1d3SSatoshi Sahara    $sizechange = ($sizechange === null) ? '' : (int)$sizechange;
717d559c7fSBen Coburn
721d11f1d3SSatoshi Sahara    // update changelog file and get the added entry that is also to be stored in metadata
737fba736bSSatoshi Sahara    $pageFile = new PageFile($id);
747fba736bSSatoshi Sahara    $logEntry = $pageFile->changelog->addLogEntry([
757d559c7fSBen Coburn        'date'       => $date,
767d559c7fSBen Coburn        'ip'         => $remote,
77c7192766SSatoshi Sahara        'type'       => $type,
787d559c7fSBen Coburn        'id'         => $id,
797d559c7fSBen Coburn        'user'       => $user,
80c7192766SSatoshi Sahara        'sum'        => $summary,
81c7192766SSatoshi Sahara        'extra'      => $extra,
82c7192766SSatoshi Sahara        'sizechange' => $sizechange,
831d11f1d3SSatoshi Sahara    ]);
847d559c7fSBen Coburn
857d559c7fSBen Coburn    // update metadata
867fba736bSSatoshi Sahara    $pageFile->updateMetadata($logEntry);
877d559c7fSBen Coburn}
887d559c7fSBen Coburn
897d559c7fSBen Coburn/**
90eeda7adaSGerrit Uitslag * Adds an entry to the media changelog
9199c8d7f2Smichael *
9299c8d7f2Smichael * @author Michael Hamann <michael@content-space.de>
9399c8d7f2Smichael * @author Andreas Gohr <andi@splitbrain.org>
9499c8d7f2Smichael * @author Esther Brunner <wikidesign@gmail.com>
9599c8d7f2Smichael * @author Ben Coburn <btcoburn@silicodon.net>
964f1e2cb3SGerrit Uitslag *
974f1e2cb3SGerrit Uitslag * @param int    $date      Timestamp of the change
984f1e2cb3SGerrit Uitslag * @param String $id        Name of the affected page
994f1e2cb3SGerrit Uitslag * @param String $type      Type of the change see DOKU_CHANGE_TYPE_*
1004f1e2cb3SGerrit Uitslag * @param String $summary   Summary of the change
101eeda7adaSGerrit Uitslag * @param mixed  $extra     In case of a revert the revision (timestamp) of the reverted page
1024f1e2cb3SGerrit Uitslag * @param array  $flags     Additional flags in a key value array.
1034f1e2cb3SGerrit Uitslag *                             Available flags:
1044f1e2cb3SGerrit Uitslag *                             - (none, so far)
105ac3ed4afSGerrit Uitslag * @param null|int $sizechange Change of filesize
10699c8d7f2Smichael */
10764159a61SAndreas Gohrfunction addMediaLogEntry(
10864159a61SAndreas Gohr    $date,
10964159a61SAndreas Gohr    $id,
11064159a61SAndreas Gohr    $type = DOKU_CHANGE_TYPE_EDIT,
11164159a61SAndreas Gohr    $summary = '',
11264159a61SAndreas Gohr    $extra = '',
11364159a61SAndreas Gohr    $flags = null,
114d868eb89SAndreas Gohr    $sizechange = null
115d868eb89SAndreas Gohr) {
116585bf44eSChristopher Smith    /** @var Input $INPUT */
117585bf44eSChristopher Smith    global $INPUT;
11899c8d7f2Smichael
119facfe250SSatoshi Sahara    // check for special flags as keys
12024870174SAndreas Gohr    if (!is_array($flags)) $flags = [];
121facfe250SSatoshi Sahara    $flagExternalEdit = isset($flags['ExternalEdit']);
122facfe250SSatoshi Sahara
12399c8d7f2Smichael    $id = cleanid($id);
12499c8d7f2Smichael
12599c8d7f2Smichael    if (!$date) $date = time(); //use current time if none supplied
12624870174SAndreas Gohr    $remote = ($flagExternalEdit) ? '127.0.0.1' : clientIP(true);
12724870174SAndreas Gohr    $user   = ($flagExternalEdit) ? '' : $INPUT->server->str('REMOTE_USER');
1281d11f1d3SSatoshi Sahara    $sizechange = ($sizechange === null) ? '' : (int)$sizechange;
12999c8d7f2Smichael
1301d11f1d3SSatoshi Sahara    // update changelog file and get the added entry
13124870174SAndreas Gohr    (new MediaChangeLog($id, 1024))->addLogEntry([
13299c8d7f2Smichael        'date'       => $date,
13399c8d7f2Smichael        'ip'         => $remote,
134c7192766SSatoshi Sahara        'type'       => $type,
13599c8d7f2Smichael        'id'         => $id,
13699c8d7f2Smichael        'user'       => $user,
137c7192766SSatoshi Sahara        'sum'        => $summary,
138c7192766SSatoshi Sahara        'extra'      => $extra,
139c7192766SSatoshi Sahara        'sizechange' => $sizechange,
1401d11f1d3SSatoshi Sahara    ]);
14199c8d7f2Smichael}
14299c8d7f2Smichael
14399c8d7f2Smichael/**
144252acce3SSatoshi Sahara * returns an array of recently changed files using the changelog
1457d559c7fSBen Coburn *
1467d559c7fSBen Coburn * The following constants can be used to control which changes are
1477d559c7fSBen Coburn * included. Add them together as needed.
1487d559c7fSBen Coburn *
1497d559c7fSBen Coburn * RECENTS_SKIP_DELETED   - don't include deleted pages
1507d559c7fSBen Coburn * RECENTS_SKIP_MINORS    - don't include minor changes
15108e9b52fSPhy * RECENTS_ONLY_CREATION  - only include new created pages and media
1527d559c7fSBen Coburn * RECENTS_SKIP_SUBSPACES - don't include subspaces
1530b926329SKate Arzamastseva * RECENTS_MEDIA_CHANGES  - return media changes instead of page changes
1540b926329SKate Arzamastseva * RECENTS_MEDIA_PAGES_MIXED  - return both media changes and page changes
1557d559c7fSBen Coburn *
1567d559c7fSBen Coburn * @param int    $first   number of first entry returned (for paginating
1577d559c7fSBen Coburn * @param int    $num     return $num entries
1587d559c7fSBen Coburn * @param string $ns      restrict to given namespace
15959f20ea3SMichael Hamann * @param int    $flags   see above
16059f20ea3SMichael Hamann * @return array recently changed files
1617d559c7fSBen Coburn *
1627d559c7fSBen Coburn * @author Ben Coburn <btcoburn@silicodon.net>
16329778747SKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1647d559c7fSBen Coburn */
165d868eb89SAndreas Gohrfunction getRecents($first, $num, $ns = '', $flags = 0)
166d868eb89SAndreas Gohr{
1677d559c7fSBen Coburn    global $conf;
16824870174SAndreas Gohr    $recent = [];
1697d559c7fSBen Coburn    $count  = 0;
1707d559c7fSBen Coburn
1717d559c7fSBen Coburn    if (!$num)
1727d559c7fSBen Coburn        return $recent;
1737d559c7fSBen Coburn
1747d559c7fSBen Coburn    // read all recent changes. (kept short)
1750b926329SKate Arzamastseva    if ($flags & RECENTS_MEDIA_CHANGES) {
1768e3e8693SAndreas Gohr        $lines = @file($conf['media_changelog']) ?: [];
17799c8d7f2Smichael    } else {
1788e3e8693SAndreas Gohr        $lines = @file($conf['changelog']) ?: [];
17999c8d7f2Smichael    }
1801b266025SPhy    if (!is_array($lines)) {
18124870174SAndreas Gohr        $lines = [];
1821b266025SPhy    }
18329778747SKate Arzamastseva    $lines_position = count($lines) - 1;
18459f20ea3SMichael Hamann    $media_lines_position = 0;
18524870174SAndreas Gohr    $media_lines = [];
18629778747SKate Arzamastseva
1870b926329SKate Arzamastseva    if ($flags & RECENTS_MEDIA_PAGES_MIXED) {
1888e3e8693SAndreas Gohr        $media_lines = @file($conf['media_changelog']) ?: [];
1891b266025SPhy        if (!is_array($media_lines)) {
19024870174SAndreas Gohr            $media_lines = [];
1911b266025SPhy        }
19229778747SKate Arzamastseva        $media_lines_position = count($media_lines) - 1;
19329778747SKate Arzamastseva    }
19429778747SKate Arzamastseva
19524870174SAndreas Gohr    $seen = []; // caches seen lines, _handleRecent() skips them
1967d559c7fSBen Coburn
1977d559c7fSBen Coburn    // handle lines
1980b926329SKate Arzamastseva    while ($lines_position >= 0 || (($flags & RECENTS_MEDIA_PAGES_MIXED) && $media_lines_position >= 0)) {
19929778747SKate Arzamastseva        if (empty($rec) && $lines_position >= 0) {
2001d901ab2SAndreas Gohr            $rec = _handleRecent(@$lines[$lines_position], $ns, $flags, $seen);
20129778747SKate Arzamastseva            if (!$rec) {
20229778747SKate Arzamastseva                $lines_position --;
20329778747SKate Arzamastseva                continue;
20429778747SKate Arzamastseva            }
20529778747SKate Arzamastseva        }
2060b926329SKate Arzamastseva        if (($flags & RECENTS_MEDIA_PAGES_MIXED) && empty($media_rec) && $media_lines_position >= 0) {
20764159a61SAndreas Gohr            $media_rec = _handleRecent(
20864159a61SAndreas Gohr                @$media_lines[$media_lines_position],
20964159a61SAndreas Gohr                $ns,
21064159a61SAndreas Gohr                $flags | RECENTS_MEDIA_CHANGES,
21164159a61SAndreas Gohr                $seen
21264159a61SAndreas Gohr            );
21329778747SKate Arzamastseva            if (!$media_rec) {
21429778747SKate Arzamastseva                $media_lines_position --;
21529778747SKate Arzamastseva                continue;
21629778747SKate Arzamastseva            }
21729778747SKate Arzamastseva        }
2180b926329SKate Arzamastseva        if (($flags & RECENTS_MEDIA_PAGES_MIXED) && @$media_rec['date'] >= @$rec['date']) {
21929778747SKate Arzamastseva            $media_lines_position--;
22029778747SKate Arzamastseva            $x = $media_rec;
221b5941dfaSKate Arzamastseva            $x['media'] = true;
22229778747SKate Arzamastseva            $media_rec = false;
22329778747SKate Arzamastseva        } else {
22429778747SKate Arzamastseva            $lines_position--;
22529778747SKate Arzamastseva            $x = $rec;
22635bad86aSTherealperO            if ($flags & RECENTS_MEDIA_CHANGES) {
22735bad86aSTherealperO                $x['media'] = true;
22835bad86aSTherealperO            } else {
22935bad86aSTherealperO                $x['media'] = false;
23035bad86aSTherealperO            }
23129778747SKate Arzamastseva            $rec = false;
23229778747SKate Arzamastseva        }
2337d559c7fSBen Coburn        if (--$first >= 0) continue; // skip first entries
23429778747SKate Arzamastseva        $recent[] = $x;
2357d559c7fSBen Coburn        $count++;
2367d559c7fSBen Coburn        // break when we have enough entries
237*177d6836SAndreas Gohr        if ($count >= $num) {
238*177d6836SAndreas Gohrbreak; }
2397d559c7fSBen Coburn    }
2407d559c7fSBen Coburn    return $recent;
2417d559c7fSBen Coburn}
2427d559c7fSBen Coburn
2437d559c7fSBen Coburn/**
24499c8d7f2Smichael * returns an array of files changed since a given time using the
24599c8d7f2Smichael * changelog
24699c8d7f2Smichael *
24799c8d7f2Smichael * The following constants can be used to control which changes are
24899c8d7f2Smichael * included. Add them together as needed.
24999c8d7f2Smichael *
25099c8d7f2Smichael * RECENTS_SKIP_DELETED   - don't include deleted pages
25199c8d7f2Smichael * RECENTS_SKIP_MINORS    - don't include minor changes
25208e9b52fSPhy * RECENTS_ONLY_CREATION  - only include new created pages and media
25399c8d7f2Smichael * RECENTS_SKIP_SUBSPACES - don't include subspaces
2540b926329SKate Arzamastseva * RECENTS_MEDIA_CHANGES  - return media changes instead of page changes
25599c8d7f2Smichael *
25699c8d7f2Smichael * @param int    $from    date of the oldest entry to return
25799c8d7f2Smichael * @param int    $to      date of the newest entry to return (for pagination, optional)
25899c8d7f2Smichael * @param string $ns      restrict to given namespace (optional)
25959f20ea3SMichael Hamann * @param int    $flags   see above (optional)
26059f20ea3SMichael Hamann * @return array of files
26199c8d7f2Smichael *
26299c8d7f2Smichael * @author Michael Hamann <michael@content-space.de>
26399c8d7f2Smichael * @author Ben Coburn <btcoburn@silicodon.net>
26499c8d7f2Smichael */
265d868eb89SAndreas Gohrfunction getRecentsSince($from, $to = null, $ns = '', $flags = 0)
266d868eb89SAndreas Gohr{
26799c8d7f2Smichael    global $conf;
26824870174SAndreas Gohr    $recent = [];
26999c8d7f2Smichael
27099c8d7f2Smichael    if ($to && $to < $from)
27199c8d7f2Smichael        return $recent;
27299c8d7f2Smichael
27399c8d7f2Smichael    // read all recent changes. (kept short)
2740b926329SKate Arzamastseva    if ($flags & RECENTS_MEDIA_CHANGES) {
27599c8d7f2Smichael        $lines = @file($conf['media_changelog']);
27699c8d7f2Smichael    } else {
27799c8d7f2Smichael        $lines = @file($conf['changelog']);
27899c8d7f2Smichael    }
279e920a0a1SAndreas Gohr    if (!$lines) return $recent;
28099c8d7f2Smichael
28199c8d7f2Smichael    // we start searching at the end of the list
28299c8d7f2Smichael    $lines = array_reverse($lines);
28399c8d7f2Smichael
28499c8d7f2Smichael    // handle lines
28524870174SAndreas Gohr    $seen = []; // caches seen lines, _handleRecent() skips them
28699c8d7f2Smichael
28799c8d7f2Smichael    foreach ($lines as $line) {
28899c8d7f2Smichael        $rec = _handleRecent($line, $ns, $flags, $seen);
28999c8d7f2Smichael        if ($rec !== false) {
29099c8d7f2Smichael            if ($rec['date'] >= $from) {
29199c8d7f2Smichael                if (!$to || $rec['date'] <= $to) {
29299c8d7f2Smichael                    $recent[] = $rec;
29399c8d7f2Smichael                }
29499c8d7f2Smichael            } else {
29599c8d7f2Smichael                break;
29699c8d7f2Smichael            }
29799c8d7f2Smichael        }
29899c8d7f2Smichael    }
29999c8d7f2Smichael
30099c8d7f2Smichael    return array_reverse($recent);
30199c8d7f2Smichael}
30299c8d7f2Smichael
30399c8d7f2Smichael/**
3047d559c7fSBen Coburn * Internal function used by getRecents
3057d559c7fSBen Coburn *
3067d559c7fSBen Coburn * don't call directly
3077d559c7fSBen Coburn *
3087d559c7fSBen Coburn * @see getRecents()
3097d559c7fSBen Coburn * @author Andreas Gohr <andi@splitbrain.org>
3107d559c7fSBen Coburn * @author Ben Coburn <btcoburn@silicodon.net>
3114f1e2cb3SGerrit Uitslag *
3124f1e2cb3SGerrit Uitslag * @param string $line   changelog line
3134f1e2cb3SGerrit Uitslag * @param string $ns     restrict to given namespace
3144f1e2cb3SGerrit Uitslag * @param int    $flags  flags to control which changes are included
3154f1e2cb3SGerrit Uitslag * @param array  $seen   listing of seen pages
3164f1e2cb3SGerrit Uitslag * @return array|bool    false or array with info about a change
3177d559c7fSBen Coburn */
318d868eb89SAndreas Gohrfunction _handleRecent($line, $ns, $flags, &$seen)
319d868eb89SAndreas Gohr{
3207d559c7fSBen Coburn    if (empty($line)) return false;   //skip empty lines
3217d559c7fSBen Coburn
3227d559c7fSBen Coburn    // split the line into parts
3231d11f1d3SSatoshi Sahara    $recent = ChangeLog::parseLogLine($line);
324252acce3SSatoshi Sahara    if ($recent === false) return false;
3257d559c7fSBen Coburn
3267d559c7fSBen Coburn    // skip seen ones
3277d559c7fSBen Coburn    if (isset($seen[$recent['id']])) return false;
3287d559c7fSBen Coburn
32908e9b52fSPhy    // skip changes, of only new items are requested
33008e9b52fSPhy    if ($recent['type'] !== DOKU_CHANGE_TYPE_CREATE && ($flags & RECENTS_ONLY_CREATION)) return false;
33168f43bcfSTero Kivinen
3327d559c7fSBen Coburn    // skip minors
333ebf1501fSBen Coburn    if ($recent['type'] === DOKU_CHANGE_TYPE_MINOR_EDIT && ($flags & RECENTS_SKIP_MINORS)) return false;
3347d559c7fSBen Coburn
3357d559c7fSBen Coburn    // remember in seen to skip additional sights
3367d559c7fSBen Coburn    $seen[$recent['id']] = 1;
3377d559c7fSBen Coburn
3387d559c7fSBen Coburn    // check if it's a hidden page
3397d559c7fSBen Coburn    if (isHiddenPage($recent['id'])) return false;
3407d559c7fSBen Coburn
3417d559c7fSBen Coburn    // filter namespace
3427d559c7fSBen Coburn    if (($ns) && (strpos($recent['id'], $ns.':') !== 0)) return false;
3437d559c7fSBen Coburn
3447d559c7fSBen Coburn    // exclude subnamespaces
3457d559c7fSBen Coburn    if (($flags & RECENTS_SKIP_SUBSPACES) && (getNS($recent['id']) != $ns)) return false;
3467d559c7fSBen Coburn
3477d559c7fSBen Coburn    // check ACL
34842025dfdSMichael Hamann    if ($flags & RECENTS_MEDIA_CHANGES) {
34942025dfdSMichael Hamann        $recent['perms'] = auth_quickaclcheck(getNS($recent['id']).':*');
35042025dfdSMichael Hamann    } else {
35199c8d7f2Smichael        $recent['perms'] = auth_quickaclcheck($recent['id']);
35242025dfdSMichael Hamann    }
35399c8d7f2Smichael    if ($recent['perms'] < AUTH_READ) return false;
3547d559c7fSBen Coburn
355eeda7adaSGerrit Uitslag    // check existence
3561d901ab2SAndreas Gohr    if ($flags & RECENTS_SKIP_DELETED) {
35742025dfdSMichael Hamann        $fn = (($flags & RECENTS_MEDIA_CHANGES) ? mediaFN($recent['id']) : wikiFN($recent['id']));
35879e79377SAndreas Gohr        if (!file_exists($fn)) return false;
3591d901ab2SAndreas Gohr    }
3607d559c7fSBen Coburn
3617d559c7fSBen Coburn    return $recent;
3627d559c7fSBen Coburn}
363