xref: /dokuwiki/inc/media.php (revision 5a8d6e48ea57255f66cd0126355f1b73f1000de9)
13df72098SAndreas Gohr<?php
23df72098SAndreas Gohr/**
33df72098SAndreas Gohr * All output and handler function needed for the media management popup
43df72098SAndreas Gohr *
53df72098SAndreas Gohr * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
63df72098SAndreas Gohr * @author     Andreas Gohr <andi@splitbrain.org>
73df72098SAndreas Gohr */
83df72098SAndreas Gohr
90c3a5702SAndreas Gohruse dokuwiki\ChangeLog\MediaChangeLog;
10*5a8d6e48SMichael Großeuse dokuwiki\HTTP\DokuHTTPClient;
110c3a5702SAndreas Gohr
123df72098SAndreas Gohr/**
133df72098SAndreas Gohr * Lists pages which currently use a media file selected for deletion
143df72098SAndreas Gohr *
153df72098SAndreas Gohr * References uses the same visual as search results and share
163df72098SAndreas Gohr * their CSS tags except pagenames won't be links.
173df72098SAndreas Gohr *
183df72098SAndreas Gohr * @author Matthias Grimm <matthiasgrimm@users.sourceforge.net>
1942ea7f44SGerrit Uitslag *
2042ea7f44SGerrit Uitslag * @param array $data
2142ea7f44SGerrit Uitslag * @param string $id
223df72098SAndreas Gohr */
233df72098SAndreas Gohrfunction media_filesinuse($data,$id){
243df72098SAndreas Gohr    global $lang;
253df72098SAndreas Gohr    echo '<h1>'.$lang['reference'].' <code>'.hsc(noNS($id)).'</code></h1>';
263df72098SAndreas Gohr    echo '<p>'.hsc($lang['ref_inuse']).'</p>';
273df72098SAndreas Gohr
283df72098SAndreas Gohr    $hidden=0; //count of hits without read permission
293df72098SAndreas Gohr    foreach($data as $row){
30a05e297aSAndreas Gohr        if(auth_quickaclcheck($row) >= AUTH_READ && isVisiblePage($row)){
313df72098SAndreas Gohr            echo '<div class="search_result">';
32a05e297aSAndreas Gohr            echo '<span class="mediaref_ref">'.hsc($row).'</span>';
333df72098SAndreas Gohr            echo '</div>';
343df72098SAndreas Gohr        }else
353df72098SAndreas Gohr            $hidden++;
363df72098SAndreas Gohr    }
373df72098SAndreas Gohr    if ($hidden){
383df72098SAndreas Gohr        print '<div class="mediaref_hidden">'.$lang['ref_hidden'].'</div>';
393df72098SAndreas Gohr    }
403df72098SAndreas Gohr}
413df72098SAndreas Gohr
423df72098SAndreas Gohr/**
433df72098SAndreas Gohr * Handles the saving of image meta data
443df72098SAndreas Gohr *
453df72098SAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
46cf832786SKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
47e0c26282SGerrit Uitslag *
48e0c26282SGerrit Uitslag * @param string $id media id
49e0c26282SGerrit Uitslag * @param int $auth permission level
50e0c26282SGerrit Uitslag * @param array $data
5142ea7f44SGerrit Uitslag * @return false|string
523df72098SAndreas Gohr */
533df72098SAndreas Gohrfunction media_metasave($id,$auth,$data){
543df72098SAndreas Gohr    if($auth < AUTH_UPLOAD) return false;
55f2ea8432SAndreas Gohr    if(!checkSecurityToken()) return false;
563df72098SAndreas Gohr    global $lang;
570b308644SOtto Vainio    global $conf;
583df72098SAndreas Gohr    $src = mediaFN($id);
593df72098SAndreas Gohr
603df72098SAndreas Gohr    $meta = new JpegMeta($src);
613df72098SAndreas Gohr    $meta->_parseAll();
623df72098SAndreas Gohr
633df72098SAndreas Gohr    foreach($data as $key => $val){
643df72098SAndreas Gohr        $val=trim($val);
653df72098SAndreas Gohr        if(empty($val)){
663df72098SAndreas Gohr            $meta->deleteField($key);
673df72098SAndreas Gohr        }else{
683df72098SAndreas Gohr            $meta->setField($key,$val);
693df72098SAndreas Gohr        }
703df72098SAndreas Gohr    }
713df72098SAndreas Gohr
72cf832786SKate Arzamastseva    $old = @filemtime($src);
7379e79377SAndreas Gohr    if(!file_exists(mediaFN($id, $old)) && file_exists($src)) {
74cf832786SKate Arzamastseva        // add old revision to the attic
75cf832786SKate Arzamastseva        media_saveOldRevision($id);
76cf832786SKate Arzamastseva    }
77ac3ed4afSGerrit Uitslag    $filesize_old = filesize($src);
783df72098SAndreas Gohr    if($meta->save()){
790b308644SOtto Vainio        if($conf['fperm']) chmod($src, $conf['fperm']);
80ac3ed4afSGerrit Uitslag        @clearstatcache(true, $src);
81cf832786SKate Arzamastseva        $new = @filemtime($src);
82ac3ed4afSGerrit Uitslag        $filesize_new = filesize($src);
83ac3ed4afSGerrit Uitslag        $sizechange = $filesize_new - $filesize_old;
84ac3ed4afSGerrit Uitslag
85cf832786SKate Arzamastseva        // add a log entry to the media changelog
86ac3ed4afSGerrit Uitslag        addMediaLogEntry($new, $id, DOKU_CHANGE_TYPE_EDIT, $lang['media_meta_edited'], '', null, $sizechange);
87cf832786SKate Arzamastseva
883df72098SAndreas Gohr        msg($lang['metasaveok'],1);
893df72098SAndreas Gohr        return $id;
903df72098SAndreas Gohr    }else{
913df72098SAndreas Gohr        msg($lang['metasaveerr'],-1);
923df72098SAndreas Gohr        return false;
933df72098SAndreas Gohr    }
943df72098SAndreas Gohr}
953df72098SAndreas Gohr
963df72098SAndreas Gohr/**
97d54f7963SKlap-in * check if a media is external source
98d54f7963SKlap-in *
99d54f7963SKlap-in * @author Gerrit Uitslag <klapinklapin@gmail.com>
10042ea7f44SGerrit Uitslag *
101d54f7963SKlap-in * @param string $id the media ID or URL
102d54f7963SKlap-in * @return bool
103d54f7963SKlap-in */
104d54f7963SKlap-infunction media_isexternal($id){
105fe578fe9SElan Ruusamäe    if (preg_match('#^(?:https?|ftp)://#i', $id)) return true;
106d54f7963SKlap-in    return false;
107d54f7963SKlap-in}
108d54f7963SKlap-in
109d54f7963SKlap-in/**
110add8678fSAndreas Gohr * Check if a media item is public (eg, external URL or readable by @ALL)
111add8678fSAndreas Gohr *
112add8678fSAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
11342ea7f44SGerrit Uitslag *
114add8678fSAndreas Gohr * @param string $id  the media ID or URL
115add8678fSAndreas Gohr * @return bool
116add8678fSAndreas Gohr */
117add8678fSAndreas Gohrfunction media_ispublic($id){
118d54f7963SKlap-in    if(media_isexternal($id)) return true;
119add8678fSAndreas Gohr    $id = cleanID($id);
120add8678fSAndreas Gohr    if(auth_aclcheck(getNS($id).':*', '', array()) >= AUTH_READ) return true;
121add8678fSAndreas Gohr    return false;
122add8678fSAndreas Gohr}
123add8678fSAndreas Gohr
124add8678fSAndreas Gohr/**
1253df72098SAndreas Gohr * Display the form to edit image meta data
1263df72098SAndreas Gohr *
1273df72098SAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
128d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
129e0c26282SGerrit Uitslag *
130e0c26282SGerrit Uitslag * @param string $id media id
131e0c26282SGerrit Uitslag * @param int $auth permission level
132e0c26282SGerrit Uitslag * @return bool
1333df72098SAndreas Gohr */
13430fd72fbSKate Arzamastsevafunction media_metaform($id,$auth){
135ebc28e69SAndreas Gohr    global $lang;
1363df72098SAndreas Gohr
13788a71175SKate Arzamastseva    if($auth < AUTH_UPLOAD) {
13888a71175SKate Arzamastseva        echo '<div class="nothing">'.$lang['media_perm_upload'].'</div>'.NL;
13988a71175SKate Arzamastseva        return false;
14088a71175SKate Arzamastseva    }
14188a71175SKate Arzamastseva
1423df72098SAndreas Gohr    // load the field descriptions
1433df72098SAndreas Gohr    static $fields = null;
1443df72098SAndreas Gohr    if(is_null($fields)){
1453e98e685SKate Arzamastseva        $config_files = getConfigFiles('mediameta');
1463e98e685SKate Arzamastseva        foreach ($config_files as $config_file) {
14779e79377SAndreas Gohr            if(file_exists($config_file)) include($config_file);
1483df72098SAndreas Gohr        }
1493df72098SAndreas Gohr    }
1503df72098SAndreas Gohr
1513df72098SAndreas Gohr    $src = mediaFN($id);
1523df72098SAndreas Gohr
1533df72098SAndreas Gohr    // output
15428db35adSdploeger    $form = new Doku_Form(array('action' => media_managerURL(array('tab_details' => 'view'), '&'),
15595b451bcSAdrian Lang                                'class' => 'meta'));
15695b451bcSAdrian Lang    $form->addHidden('img', $id);
15795b451bcSAdrian Lang    $form->addHidden('mediado', 'save');
1583df72098SAndreas Gohr    foreach($fields as $key => $field){
1593df72098SAndreas Gohr        // get current value
1603e98e685SKate Arzamastseva        if (empty($field[0])) continue;
1613df72098SAndreas Gohr        $tags = array($field[0]);
1623df72098SAndreas Gohr        if(is_array($field[3])) $tags = array_merge($tags,$field[3]);
1633df72098SAndreas Gohr        $value = tpl_img_getTag($tags,'',$src);
164ca6a0701SAndreas Gohr        $value = cleanText($value);
1653df72098SAndreas Gohr
1663df72098SAndreas Gohr        // prepare attributes
1673df72098SAndreas Gohr        $p = array();
1683df72098SAndreas Gohr        $p['class'] = 'edit';
1693df72098SAndreas Gohr        $p['id']    = 'meta__'.$key;
1703df72098SAndreas Gohr        $p['name']  = 'meta['.$field[0].']';
171699c5072SAnika Henke        $p_attrs    = array('class' => 'edit');
1723df72098SAndreas Gohr
17395b451bcSAdrian Lang        $form->addElement('<div class="row">');
1743df72098SAndreas Gohr        if($field[2] == 'text'){
17564159a61SAndreas Gohr            $form->addElement(
17664159a61SAndreas Gohr                form_makeField(
17764159a61SAndreas Gohr                    'text',
17864159a61SAndreas Gohr                    $p['name'],
17964159a61SAndreas Gohr                    $value,
18064159a61SAndreas Gohr                    ($lang[$field[1]]) ? $lang[$field[1]] : $field[1] . ':',
18164159a61SAndreas Gohr                    $p['id'],
18264159a61SAndreas Gohr                    $p['class'],
18364159a61SAndreas Gohr                    $p_attrs
18464159a61SAndreas Gohr                )
18564159a61SAndreas Gohr            );
1863df72098SAndreas Gohr        }else{
1873df72098SAndreas Gohr            $att = buildAttributes($p);
188699c5072SAnika Henke            $form->addElement('<label for="meta__'.$key.'">'.$lang[$field[1]].'</label>');
18995b451bcSAdrian Lang            $form->addElement("<textarea $att rows=\"6\" cols=\"50\">".formText($value).'</textarea>');
1903df72098SAndreas Gohr        }
19194add303SAnika Henke        $form->addElement('</div>'.NL);
1923df72098SAndreas Gohr    }
19395b451bcSAdrian Lang    $form->addElement('<div class="buttons">');
19464159a61SAndreas Gohr    $form->addElement(
19564159a61SAndreas Gohr        form_makeButton(
19664159a61SAndreas Gohr            'submit',
19764159a61SAndreas Gohr            '',
19864159a61SAndreas Gohr            $lang['btn_save'],
19964159a61SAndreas Gohr            array('accesskey' => 's', 'name' => 'mediado[save]')
20064159a61SAndreas Gohr        )
20164159a61SAndreas Gohr    );
20294add303SAnika Henke    $form->addElement('</div>'.NL);
20395b451bcSAdrian Lang    $form->printForm();
204ebc28e69SAndreas Gohr
205ebc28e69SAndreas Gohr    return true;
2063df72098SAndreas Gohr}
2073df72098SAndreas Gohr
208666cdec5SMichael Klier/**
20987229c84SAdrian Lang * Convenience function to check if a media file is still in use
210666cdec5SMichael Klier *
211666cdec5SMichael Klier * @author Michael Klier <chi@chimeric.de>
212e0c26282SGerrit Uitslag *
213e0c26282SGerrit Uitslag * @param string $id media id
214e0c26282SGerrit Uitslag * @return array|bool
215666cdec5SMichael Klier */
216666cdec5SMichael Klierfunction media_inuse($id) {
217666cdec5SMichael Klier    global $conf;
218ebc28e69SAndreas Gohr
219666cdec5SMichael Klier    if($conf['refcheck']){
220ffec1009SMichael Hamann        $mediareferences = ft_mediause($id,true);
221666cdec5SMichael Klier        if(!count($mediareferences)) {
2226dae2464SAndreas Gohr            return false;
223666cdec5SMichael Klier        } else {
224666cdec5SMichael Klier            return $mediareferences;
225666cdec5SMichael Klier        }
226666cdec5SMichael Klier    } else {
227666cdec5SMichael Klier        return false;
228666cdec5SMichael Klier    }
229666cdec5SMichael Klier}
230a05e297aSAndreas Gohr
23187229c84SAdrian Langdefine('DOKU_MEDIA_DELETED', 1);
23287229c84SAdrian Langdefine('DOKU_MEDIA_NOT_AUTH', 2);
23387229c84SAdrian Langdefine('DOKU_MEDIA_INUSE', 4);
23487229c84SAdrian Langdefine('DOKU_MEDIA_EMPTY_NS', 8);
23587229c84SAdrian Lang
2363df72098SAndreas Gohr/**
2373df72098SAndreas Gohr * Handles media file deletions
2383df72098SAndreas Gohr *
2393df72098SAndreas Gohr * If configured, checks for media references before deletion
2403df72098SAndreas Gohr *
2413df72098SAndreas Gohr * @author             Andreas Gohr <andi@splitbrain.org>
24242ea7f44SGerrit Uitslag *
243ebc28e69SAndreas Gohr * @param string $id media id
24422db8df7SAndreas Gohr * @param int $auth no longer used
24587229c84SAdrian Lang * @return int One of: 0,
24663703ba5SAndreas Gohr *                     DOKU_MEDIA_DELETED,
24763703ba5SAndreas Gohr *                     DOKU_MEDIA_DELETED | DOKU_MEDIA_EMPTY_NS,
24863703ba5SAndreas Gohr *                     DOKU_MEDIA_NOT_AUTH,
24963703ba5SAndreas Gohr *                     DOKU_MEDIA_INUSE
2503df72098SAndreas Gohr */
2513df72098SAndreas Gohrfunction media_delete($id,$auth){
2526183fb05SKate Arzamastseva    global $lang;
253ff04e8b7SAndreas Gohr    $auth = auth_quickaclcheck(ltrim(getNS($id).':*', ':'));
25487229c84SAdrian Lang    if($auth < AUTH_DELETE) return DOKU_MEDIA_NOT_AUTH;
25587229c84SAdrian Lang    if(media_inuse($id)) return DOKU_MEDIA_INUSE;
2563df72098SAndreas Gohr
2573df72098SAndreas Gohr    $file = mediaFN($id);
2584a961e72SMichal Kolodziejski
2594a961e72SMichal Kolodziejski    // trigger an event - MEDIA_DELETE_FILE
26059bc3b48SGerrit Uitslag    $data = array();
261666cdec5SMichael Klier    $data['id']   = $id;
2623009a773SAndreas Gohr    $data['name'] = utf8_basename($file);
2634a961e72SMichal Kolodziejski    $data['path'] = $file;
26479e79377SAndreas Gohr    $data['size'] = (file_exists($file)) ? filesize($file) : 0;
265666cdec5SMichael Klier
266666cdec5SMichael Klier    $data['unl'] = false;
267666cdec5SMichael Klier    $data['del'] = false;
2684a961e72SMichal Kolodziejski    $evt = new Doku_Event('MEDIA_DELETE_FILE',$data);
2694a961e72SMichal Kolodziejski    if ($evt->advise_before()) {
2706183fb05SKate Arzamastseva        $old = @filemtime($file);
27179e79377SAndreas Gohr        if(!file_exists(mediaFN($id, $old)) && file_exists($file)) {
2726183fb05SKate Arzamastseva            // add old revision to the attic
2736183fb05SKate Arzamastseva            media_saveOldRevision($id);
2746183fb05SKate Arzamastseva        }
2756183fb05SKate Arzamastseva
276666cdec5SMichael Klier        $data['unl'] = @unlink($file);
277666cdec5SMichael Klier        if($data['unl']) {
278ac3ed4afSGerrit Uitslag            $sizechange = 0 - $data['size'];
279ac3ed4afSGerrit Uitslag            addMediaLogEntry(time(), $id, DOKU_CHANGE_TYPE_DELETE, $lang['deleted'], '', null, $sizechange);
280ac3ed4afSGerrit Uitslag
281666cdec5SMichael Klier            $data['del'] = io_sweepNS($id, 'mediadir');
2823df72098SAndreas Gohr        }
2834a961e72SMichal Kolodziejski    }
2844a961e72SMichal Kolodziejski    $evt->advise_after();
2854a961e72SMichal Kolodziejski    unset($evt);
2864a961e72SMichal Kolodziejski
287666cdec5SMichael Klier    if($data['unl'] && $data['del']){
28887229c84SAdrian Lang        return DOKU_MEDIA_DELETED | DOKU_MEDIA_EMPTY_NS;
2893df72098SAndreas Gohr    }
2903df72098SAndreas Gohr
29187229c84SAdrian Lang    return $data['unl'] ? DOKU_MEDIA_DELETED : 0;
2923df72098SAndreas Gohr}
2933df72098SAndreas Gohr
2943df72098SAndreas Gohr/**
2952d6cc64fSKate Arzamastseva * Handle file uploads via XMLHttpRequest
2962d6cc64fSKate Arzamastseva *
297ebc28e69SAndreas Gohr * @param string $ns   target namespace
298ebc28e69SAndreas Gohr * @param int    $auth current auth check result
29942ea7f44SGerrit Uitslag * @return false|string false on error, id of the new file on success
3002d6cc64fSKate Arzamastseva */
3012d6cc64fSKate Arzamastsevafunction media_upload_xhr($ns,$auth){
302da45d883SKate Arzamastseva    if(!checkSecurityToken()) return false;
3038108113cSTom N Harris    global $INPUT;
304da45d883SKate Arzamastseva
3058108113cSTom N Harris    $id = $INPUT->get->str('qqfile');
306ebc28e69SAndreas Gohr    list($ext,$mime) = mimetype($id);
3072d6cc64fSKate Arzamastseva    $input = fopen("php://input", "r");
3082d6cc64fSKate Arzamastseva    if (!($tmp = io_mktmpdir())) return false;
30962231793SKate Arzamastseva    $path = $tmp.'/'.md5($id);
3102d6cc64fSKate Arzamastseva    $target = fopen($path, "w");
311063fb5b5SAndreas Gohr    $realSize = stream_copy_to_stream($input, $target);
3122d6cc64fSKate Arzamastseva    fclose($target);
313063fb5b5SAndreas Gohr    fclose($input);
314fed6fccbSAnika Henke    if (isset($_SERVER["CONTENT_LENGTH"]) && ($realSize != (int)$_SERVER["CONTENT_LENGTH"])){
315063fb5b5SAndreas Gohr        unlink($path);
316063fb5b5SAndreas Gohr        return false;
317063fb5b5SAndreas Gohr    }
318063fb5b5SAndreas Gohr
3192d6cc64fSKate Arzamastseva    $res = media_save(
3202d6cc64fSKate Arzamastseva        array('name' => $path,
3212d6cc64fSKate Arzamastseva            'mime' => $mime,
3222d6cc64fSKate Arzamastseva            'ext'  => $ext),
3232d6cc64fSKate Arzamastseva        $ns.':'.$id,
324d1264f55S錢政維        (($INPUT->get->str('ow') == 'true') ? true : false),
3252d6cc64fSKate Arzamastseva        $auth,
3262d6cc64fSKate Arzamastseva        'copy'
3272d6cc64fSKate Arzamastseva    );
3282d6cc64fSKate Arzamastseva    unlink($path);
329900a9e9eSGerrit Uitslag    if ($tmp) io_rmdir($tmp, true);
3302d6cc64fSKate Arzamastseva    if (is_array($res)) {
3312d6cc64fSKate Arzamastseva        msg($res[0], $res[1]);
3322d6cc64fSKate Arzamastseva        return false;
3332d6cc64fSKate Arzamastseva    }
3342d6cc64fSKate Arzamastseva    return $res;
3352d6cc64fSKate Arzamastseva}
3362d6cc64fSKate Arzamastseva
3372d6cc64fSKate Arzamastseva/**
3383df72098SAndreas Gohr * Handles media file uploads
3393df72098SAndreas Gohr *
3403df72098SAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
34111d9dfa5SMichael Klier * @author Michael Klier <chi@chimeric.de>
34242ea7f44SGerrit Uitslag *
343ebc28e69SAndreas Gohr * @param string     $ns    target namespace
344ebc28e69SAndreas Gohr * @param int        $auth  current auth check result
345ebc28e69SAndreas Gohr * @param bool|array $file  $_FILES member, $_FILES['upload'] if false
34642ea7f44SGerrit Uitslag * @return false|string false on error, id of the new file on success
3473df72098SAndreas Gohr */
3482d6cc64fSKate Arzamastsevafunction media_upload($ns,$auth,$file=false){
349f2ea8432SAndreas Gohr    if(!checkSecurityToken()) return false;
3503df72098SAndreas Gohr    global $lang;
3518108113cSTom N Harris    global $INPUT;
3523df72098SAndreas Gohr
35344409c3dSAndreas Gohr    // get file and id
3548108113cSTom N Harris    $id   = $INPUT->post->str('mediaid');
3552d6cc64fSKate Arzamastseva    if (!$file) $file = $_FILES['upload'];
3563df72098SAndreas Gohr    if(empty($id)) $id = $file['name'];
35744409c3dSAndreas Gohr
35899766eefSAndreas Gohr    // check for errors (messages are done in lib/exe/mediamanager.php)
35999766eefSAndreas Gohr    if($file['error']) return false;
3609676dc23SAndreas Gohr
36144409c3dSAndreas Gohr    // check extensions
362ebc28e69SAndreas Gohr    list($fext,$fmime) = mimetype($file['name']);
363ebc28e69SAndreas Gohr    list($iext,$imime) = mimetype($id);
36444409c3dSAndreas Gohr    if($fext && !$iext){
3658cb1eb01SAndreas Gohr        // no extension specified in id - read original one
36644409c3dSAndreas Gohr        $id   .= '.'.$fext;
3678cb1eb01SAndreas Gohr        $imime = $fmime;
36844409c3dSAndreas Gohr    }elseif($fext && $fext != $iext){
36944409c3dSAndreas Gohr        // extension was changed, print warning
37044409c3dSAndreas Gohr        msg(sprintf($lang['mediaextchange'],$fext,$iext));
37144409c3dSAndreas Gohr    }
37244409c3dSAndreas Gohr
373ffb291f2SAdrian Lang    $res = media_save(array('name' => $file['tmp_name'],
374ffb291f2SAdrian Lang                            'mime' => $imime,
375ffb291f2SAdrian Lang                            'ext'  => $iext), $ns.':'.$id,
37671f17ac4SAndreas Gohr                      $INPUT->post->bool('ow'), $auth, 'copy_uploaded_file');
377ffb291f2SAdrian Lang    if (is_array($res)) {
378ffb291f2SAdrian Lang        msg($res[0], $res[1]);
379ffb291f2SAdrian Lang        return false;
380ffb291f2SAdrian Lang    }
381ffb291f2SAdrian Lang    return $res;
382ffb291f2SAdrian Lang}
383ffb291f2SAdrian Lang
384ffb291f2SAdrian Lang/**
38571f17ac4SAndreas Gohr * An alternative to move_uploaded_file that copies
38671f17ac4SAndreas Gohr *
38771f17ac4SAndreas Gohr * Using copy, makes sure any setgid bits on the media directory are honored
38871f17ac4SAndreas Gohr *
38971f17ac4SAndreas Gohr * @see   move_uploaded_file()
39042ea7f44SGerrit Uitslag *
39171f17ac4SAndreas Gohr * @param string $from
39271f17ac4SAndreas Gohr * @param string $to
39371f17ac4SAndreas Gohr * @return bool
39471f17ac4SAndreas Gohr */
39571f17ac4SAndreas Gohrfunction copy_uploaded_file($from, $to){
39671f17ac4SAndreas Gohr    if(!is_uploaded_file($from)) return false;
39771f17ac4SAndreas Gohr    $ok = copy($from, $to);
39871f17ac4SAndreas Gohr    @unlink($from);
39971f17ac4SAndreas Gohr    return $ok;
40071f17ac4SAndreas Gohr}
40171f17ac4SAndreas Gohr
40271f17ac4SAndreas Gohr/**
403ffb291f2SAdrian Lang * This generates an action event and delegates to _media_upload_action().
404ffb291f2SAdrian Lang * Action plugins are allowed to pre/postprocess the uploaded file.
405ffb291f2SAdrian Lang * (The triggered event is preventable.)
406ffb291f2SAdrian Lang *
407ffb291f2SAdrian Lang * Event data:
408ffb291f2SAdrian Lang * $data[0]     fn_tmp:    the temporary file name (read from $_FILES)
409ffb291f2SAdrian Lang * $data[1]     fn:        the file name of the uploaded file
410ffb291f2SAdrian Lang * $data[2]     id:        the future directory id of the uploaded file
411ffb291f2SAdrian Lang * $data[3]     imime:     the mimetype of the uploaded file
412ffb291f2SAdrian Lang * $data[4]     overwrite: if an existing file is going to be overwritten
41352a281e8SGerrit Uitslag * $data[5]     move:      name of function that performs move/copy/..
414ffb291f2SAdrian Lang *
415ffb291f2SAdrian Lang * @triggers MEDIA_UPLOAD_FINISH
41642ea7f44SGerrit Uitslag *
417e0c26282SGerrit Uitslag * @param array  $file
41852a281e8SGerrit Uitslag * @param string $id   media id
41942ea7f44SGerrit Uitslag * @param bool   $ow   overwrite?
420e0c26282SGerrit Uitslag * @param int    $auth permission level
42152a281e8SGerrit Uitslag * @param string $move name of functions that performs move/copy/..
42242ea7f44SGerrit Uitslag * @return false|array|string
423e0c26282SGerrit Uitslag */
424ffb291f2SAdrian Langfunction media_save($file, $id, $ow, $auth, $move) {
425ffb291f2SAdrian Lang    if($auth < AUTH_UPLOAD) {
426ffb291f2SAdrian Lang        return array("You don't have permissions to upload files.", -1);
427ffb291f2SAdrian Lang    }
428ffb291f2SAdrian Lang
429ffb291f2SAdrian Lang    if (!isset($file['mime']) || !isset($file['ext'])) {
430ffb291f2SAdrian Lang        list($ext, $mime) = mimetype($id);
431ffb291f2SAdrian Lang        if (!isset($file['mime'])) {
432ffb291f2SAdrian Lang            $file['mime'] = $mime;
433ffb291f2SAdrian Lang        }
434ffb291f2SAdrian Lang        if (!isset($file['ext'])) {
435ffb291f2SAdrian Lang            $file['ext'] = $ext;
436ffb291f2SAdrian Lang        }
437ffb291f2SAdrian Lang    }
438ffb291f2SAdrian Lang
43992cac9a9SKate Arzamastseva    global $lang, $conf;
440ffb291f2SAdrian Lang
4413df72098SAndreas Gohr    // get filename
4423543c6deSAndreas Gohr    $id   = cleanID($id);
4433df72098SAndreas Gohr    $fn   = mediaFN($id);
4443df72098SAndreas Gohr
4453df72098SAndreas Gohr    // get filetype regexp
4463df72098SAndreas Gohr    $types = array_keys(getMimeTypes());
447bad6fc0dSAndreas Gohr    $types = array_map(
448bad6fc0dSAndreas Gohr        function ($q) {
449bad6fc0dSAndreas Gohr            return preg_quote($q, "/");
450bad6fc0dSAndreas Gohr        },
451bad6fc0dSAndreas Gohr        $types
452bad6fc0dSAndreas Gohr    );
4533df72098SAndreas Gohr    $regex = join('|',$types);
4543df72098SAndreas Gohr
4553df72098SAndreas Gohr    // because a temp file was created already
456ffb291f2SAdrian Lang    if(!preg_match('/\.('.$regex.')$/i',$fn)) {
457ffb291f2SAdrian Lang        return array($lang['uploadwrong'],-1);
458ffb291f2SAdrian Lang    }
459ffb291f2SAdrian Lang
4603df72098SAndreas Gohr    //check for overwrite
46179e79377SAndreas Gohr    $overwrite = file_exists($fn);
462e5d185e1SKate Arzamastseva    $auth_ow = (($conf['mediarevisions']) ? AUTH_UPLOAD : AUTH_DELETE);
463e5d185e1SKate Arzamastseva    if($overwrite && (!$ow || $auth < $auth_ow)) {
464ffb291f2SAdrian Lang        return array($lang['uploadexist'], 0);
4653df72098SAndreas Gohr    }
4668cb1eb01SAndreas Gohr    // check for valid content
467ffb291f2SAdrian Lang    $ok = media_contentcheck($file['name'], $file['mime']);
4688cb1eb01SAndreas Gohr    if($ok == -1){
469ffb291f2SAdrian Lang        return array(sprintf($lang['uploadbadcontent'],'.' . $file['ext']),-1);
4708cb1eb01SAndreas Gohr    }elseif($ok == -2){
471ffb291f2SAdrian Lang        return array($lang['uploadspam'],-1);
47226ceae18SAndreas Gohr    }elseif($ok == -3){
473ffb291f2SAdrian Lang        return array($lang['uploadxss'],-1);
4748cb1eb01SAndreas Gohr    }
4758cb1eb01SAndreas Gohr
47611d9dfa5SMichael Klier    // prepare event data
47759bc3b48SGerrit Uitslag    $data = array();
478ffb291f2SAdrian Lang    $data[0] = $file['name'];
47911d9dfa5SMichael Klier    $data[1] = $fn;
48011d9dfa5SMichael Klier    $data[2] = $id;
481ffb291f2SAdrian Lang    $data[3] = $file['mime'];
48299c8d7f2Smichael    $data[4] = $overwrite;
483ffb291f2SAdrian Lang    $data[5] = $move;
48411d9dfa5SMichael Klier
48511d9dfa5SMichael Klier    // trigger event
48611d9dfa5SMichael Klier    return trigger_event('MEDIA_UPLOAD_FINISH', $data, '_media_upload_action', true);
48711d9dfa5SMichael Klier}
48811d9dfa5SMichael Klier
48911d9dfa5SMichael Klier/**
49042ea7f44SGerrit Uitslag * Callback adapter for media_upload_finish() triggered by MEDIA_UPLOAD_FINISH
49142ea7f44SGerrit Uitslag *
49211d9dfa5SMichael Klier * @author Michael Klier <chi@chimeric.de>
49342ea7f44SGerrit Uitslag *
49442ea7f44SGerrit Uitslag * @param array $data event data
49542ea7f44SGerrit Uitslag * @return false|array|string
49611d9dfa5SMichael Klier */
49711d9dfa5SMichael Klierfunction _media_upload_action($data) {
49811d9dfa5SMichael Klier    // fixme do further sanity tests of given data?
499ffb291f2SAdrian Lang    if(is_array($data) && count($data)===6) {
500ffb291f2SAdrian Lang        return media_upload_finish($data[0], $data[1], $data[2], $data[3], $data[4], $data[5]);
50111d9dfa5SMichael Klier    } else {
50211d9dfa5SMichael Klier        return false; //callback error
50311d9dfa5SMichael Klier    }
50411d9dfa5SMichael Klier}
50511d9dfa5SMichael Klier
50611d9dfa5SMichael Klier/**
50711d9dfa5SMichael Klier * Saves an uploaded media file
50811d9dfa5SMichael Klier *
50911d9dfa5SMichael Klier * @author Andreas Gohr <andi@splitbrain.org>
51011d9dfa5SMichael Klier * @author Michael Klier <chi@chimeric.de>
511cbe26ad6SKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
51242ea7f44SGerrit Uitslag *
51342ea7f44SGerrit Uitslag * @param string $fn_tmp
51442ea7f44SGerrit Uitslag * @param string $fn
51542ea7f44SGerrit Uitslag * @param string $id        media id
51642ea7f44SGerrit Uitslag * @param string $imime     mime type
51742ea7f44SGerrit Uitslag * @param bool   $overwrite overwrite existing?
51842ea7f44SGerrit Uitslag * @param string $move      function name
51942ea7f44SGerrit Uitslag * @return array|string
52011d9dfa5SMichael Klier */
521ffb291f2SAdrian Langfunction media_upload_finish($fn_tmp, $fn, $id, $imime, $overwrite, $move = 'move_uploaded_file') {
52211d9dfa5SMichael Klier    global $conf;
52311d9dfa5SMichael Klier    global $lang;
5249c1bd4bcSKate Arzamastseva    global $REV;
52511d9dfa5SMichael Klier
526e4f389efSKate Arzamastseva    $old = @filemtime($fn);
52779e79377SAndreas Gohr    if(!file_exists(mediaFN($id, $old)) && file_exists($fn)) {
528e4f389efSKate Arzamastseva        // add old revision to the attic if missing
529cbe26ad6SKate Arzamastseva        media_saveOldRevision($id);
530e4f389efSKate Arzamastseva    }
531e4f389efSKate Arzamastseva
5323df72098SAndreas Gohr    // prepare directory
533cc7d0c94SBen Coburn    io_createNamespace($id, 'media');
53411d9dfa5SMichael Klier
535ac3ed4afSGerrit Uitslag    $filesize_old = file_exists($fn) ? filesize($fn) : 0;
536ac3ed4afSGerrit Uitslag
537ffb291f2SAdrian Lang    if($move($fn_tmp, $fn)) {
53823846a98SKate Arzamastseva        @clearstatcache(true,$fn);
539dad6764eSKate Arzamastseva        $new = @filemtime($fn);
54074400ea5SBen Coburn        // Set the correct permission here.
54174400ea5SBen Coburn        // Always chmod media because they may be saved with different permissions than expected from the php umask.
54274400ea5SBen Coburn        // (Should normally chmod to $conf['fperm'] only if $conf['fperm'] is set.)
54374400ea5SBen Coburn        chmod($fn, $conf['fmode']);
5443df72098SAndreas Gohr        msg($lang['uploadsucc'],1);
54568ef8942SKate Arzamastseva        media_notify($id,$fn,$imime,$old);
54699c8d7f2Smichael        // add a log entry to the media changelog
547ac3ed4afSGerrit Uitslag        $filesize_new = filesize($fn);
548ac3ed4afSGerrit Uitslag        $sizechange = $filesize_new - $filesize_old;
5499c1bd4bcSKate Arzamastseva        if($REV) {
55064159a61SAndreas Gohr            addMediaLogEntry(
55164159a61SAndreas Gohr                $new,
55264159a61SAndreas Gohr                $id,
55364159a61SAndreas Gohr                DOKU_CHANGE_TYPE_REVERT,
55464159a61SAndreas Gohr                sprintf($lang['restored'], dformat($REV)),
55564159a61SAndreas Gohr                $REV,
55664159a61SAndreas Gohr                null,
55764159a61SAndreas Gohr                $sizechange
55864159a61SAndreas Gohr            );
5599c1bd4bcSKate Arzamastseva        } elseif($overwrite) {
560ac3ed4afSGerrit Uitslag            addMediaLogEntry($new, $id, DOKU_CHANGE_TYPE_EDIT, '', '', null, $sizechange);
56199c8d7f2Smichael        } else {
562ac3ed4afSGerrit Uitslag            addMediaLogEntry($new, $id, DOKU_CHANGE_TYPE_CREATE, $lang['created'], '', null, $sizechange);
56399c8d7f2Smichael        }
5643df72098SAndreas Gohr        return $id;
5653df72098SAndreas Gohr    }else{
566ffb291f2SAdrian Lang        return array($lang['uploadfail'],-1);
5673df72098SAndreas Gohr    }
5683df72098SAndreas Gohr}
5693df72098SAndreas Gohr
5708cb1eb01SAndreas Gohr/**
571cbe26ad6SKate Arzamastseva * Moves the current version of media file to the media_attic
572cbe26ad6SKate Arzamastseva * directory
573cbe26ad6SKate Arzamastseva *
574cbe26ad6SKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
57542ea7f44SGerrit Uitslag *
576cbe26ad6SKate Arzamastseva * @param string $id
577cbe26ad6SKate Arzamastseva * @return int - revision date
578e4f389efSKate Arzamastseva */
579cbe26ad6SKate Arzamastsevafunction media_saveOldRevision($id){
580dbf57c96SKate Arzamastseva    global $conf, $lang;
581dbf57c96SKate Arzamastseva
582e4f389efSKate Arzamastseva    $oldf = mediaFN($id);
58379e79377SAndreas Gohr    if(!file_exists($oldf)) return '';
584e4f389efSKate Arzamastseva    $date = filemtime($oldf);
585e5d185e1SKate Arzamastseva    if (!$conf['mediarevisions']) return $date;
586e5d185e1SKate Arzamastseva
587047bad06SGerrit Uitslag    $medialog = new MediaChangeLog($id);
588047bad06SGerrit Uitslag    if (!$medialog->getRevisionInfo($date)) {
589dbf57c96SKate Arzamastseva        // there was an external edit,
590dbf57c96SKate Arzamastseva        // there is no log entry for current version of file
591ac3ed4afSGerrit Uitslag        $sizechange = filesize($oldf);
59279e79377SAndreas Gohr        if(!file_exists(mediaMetaFN($id, '.changes'))) {
593ac3ed4afSGerrit Uitslag            addMediaLogEntry($date, $id, DOKU_CHANGE_TYPE_CREATE, $lang['created'], '', null, $sizechange);
594dbf57c96SKate Arzamastseva        } else {
595ac3ed4afSGerrit Uitslag            $oldRev = $medialog->getRevisions(-1, 1); // from changelog
596ac3ed4afSGerrit Uitslag            $oldRev = (int) (empty($oldRev) ? 0 : $oldRev[0]);
597ac3ed4afSGerrit Uitslag            $filesize_old = filesize(mediaFN($id, $oldRev));
598ac3ed4afSGerrit Uitslag            $sizechange = $sizechange - $filesize_old;
599ac3ed4afSGerrit Uitslag
600ac3ed4afSGerrit Uitslag            addMediaLogEntry($date, $id, DOKU_CHANGE_TYPE_EDIT, '', '', null, $sizechange);
601dbf57c96SKate Arzamastseva        }
602dbf57c96SKate Arzamastseva    }
603dbf57c96SKate Arzamastseva
604e4f389efSKate Arzamastseva    $newf = mediaFN($id,$date);
605e4f389efSKate Arzamastseva    io_makeFileDir($newf);
606cbe26ad6SKate Arzamastseva    if(copy($oldf, $newf)) {
607e4f389efSKate Arzamastseva        // Set the correct permission here.
608e4f389efSKate Arzamastseva        // Always chmod media because they may be saved with different permissions than expected from the php umask.
609e4f389efSKate Arzamastseva        // (Should normally chmod to $conf['fperm'] only if $conf['fperm'] is set.)
610e4f389efSKate Arzamastseva        chmod($newf, $conf['fmode']);
611e4f389efSKate Arzamastseva    }
612e4f389efSKate Arzamastseva    return $date;
613e4f389efSKate Arzamastseva}
614e4f389efSKate Arzamastseva
615e4f389efSKate Arzamastseva/**
6168cb1eb01SAndreas Gohr * This function checks if the uploaded content is really what the
61726ceae18SAndreas Gohr * mimetype says it is. We also do spam checking for text types here.
6188cb1eb01SAndreas Gohr *
6198cb1eb01SAndreas Gohr * We need to do this stuff because we can not rely on the browser
6208cb1eb01SAndreas Gohr * to do this check correctly. Yes, IE is broken as usual.
6218cb1eb01SAndreas Gohr *
6228cb1eb01SAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
62326ceae18SAndreas Gohr * @link   http://www.splitbrain.org/blog/2007-02/12-internet_explorer_facilitates_cross_site_scripting
6248cb1eb01SAndreas Gohr * @fixme  check all 26 magic IE filetypes here?
62542ea7f44SGerrit Uitslag *
62642ea7f44SGerrit Uitslag * @param string $file path to file
62742ea7f44SGerrit Uitslag * @param string $mime mimetype
62842ea7f44SGerrit Uitslag * @return int
6298cb1eb01SAndreas Gohr */
6308cb1eb01SAndreas Gohrfunction media_contentcheck($file,$mime){
63126ceae18SAndreas Gohr    global $conf;
63226ceae18SAndreas Gohr    if($conf['iexssprotect']){
63326ceae18SAndreas Gohr        $fh = @fopen($file, 'rb');
63426ceae18SAndreas Gohr        if($fh){
63526ceae18SAndreas Gohr            $bytes = fread($fh, 256);
63626ceae18SAndreas Gohr            fclose($fh);
63726ceae18SAndreas Gohr            if(preg_match('/<(script|a|img|html|body|iframe)[\s>]/i',$bytes)){
63842ea7f44SGerrit Uitslag                return -3; //XSS: possibly malicious content
63926ceae18SAndreas Gohr            }
64026ceae18SAndreas Gohr        }
64126ceae18SAndreas Gohr    }
6428cb1eb01SAndreas Gohr    if(substr($mime,0,6) == 'image/'){
6438cb1eb01SAndreas Gohr        $info = @getimagesize($file);
6448cb1eb01SAndreas Gohr        if($mime == 'image/gif' && $info[2] != 1){
64542ea7f44SGerrit Uitslag            return -1; // uploaded content did not match the file extension
6468cb1eb01SAndreas Gohr        }elseif($mime == 'image/jpeg' && $info[2] != 2){
6478cb1eb01SAndreas Gohr            return -1;
6488cb1eb01SAndreas Gohr        }elseif($mime == 'image/png' && $info[2] != 3){
6498cb1eb01SAndreas Gohr            return -1;
6508cb1eb01SAndreas Gohr        }
6518cb1eb01SAndreas Gohr        # fixme maybe check other images types as well
6528cb1eb01SAndreas Gohr    }elseif(substr($mime,0,5) == 'text/'){
6538cb1eb01SAndreas Gohr        global $TEXT;
6548cb1eb01SAndreas Gohr        $TEXT = io_readFile($file);
6558cb1eb01SAndreas Gohr        if(checkwordblock()){
65642ea7f44SGerrit Uitslag            return -2; //blocked by the spam blacklist
6578cb1eb01SAndreas Gohr        }
6588cb1eb01SAndreas Gohr    }
6598cb1eb01SAndreas Gohr    return 0;
6608cb1eb01SAndreas Gohr}
6613df72098SAndreas Gohr
6623df72098SAndreas Gohr/**
66375030359SAndreas Gohr * Send a notify mail on uploads
66475030359SAndreas Gohr *
66575030359SAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
66642ea7f44SGerrit Uitslag *
66742ea7f44SGerrit Uitslag * @param string   $id      media id
66842ea7f44SGerrit Uitslag * @param string   $file    path to file
66942ea7f44SGerrit Uitslag * @param string   $mime    mime type
67042ea7f44SGerrit Uitslag * @param bool|int $old_rev revision timestamp or false
67142ea7f44SGerrit Uitslag * @return bool
67275030359SAndreas Gohr */
67368ef8942SKate Arzamastsevafunction media_notify($id,$file,$mime,$old_rev=false){
67475030359SAndreas Gohr    global $conf;
675ebc28e69SAndreas Gohr    if(empty($conf['notify'])) return false; //notify enabled?
67675030359SAndreas Gohr
677b5460ee2SMichael Hamann    $subscription = new Subscription();
6781253a9dcSAndreas Gohr    return $subscription->send_media_diff($conf['notify'], 'uploadmail', $id, $old_rev);
67975030359SAndreas Gohr}
68075030359SAndreas Gohr
68175030359SAndreas Gohr/**
6823df72098SAndreas Gohr * List all files in a given Media namespace
68342ea7f44SGerrit Uitslag *
68421d806cdSGerrit Uitslag * @param string      $ns             namespace
68542ea7f44SGerrit Uitslag * @param null|int    $auth           permission level
68642ea7f44SGerrit Uitslag * @param string      $jump           id
68742ea7f44SGerrit Uitslag * @param bool        $fullscreenview
6888702de7fSGerrit Uitslag * @param bool|string $sort           sorting order, false skips sorting
6893df72098SAndreas Gohr */
690abc306f4SKate Arzamastsevafunction media_filelist($ns,$auth=null,$jump='',$fullscreenview=false,$sort=false){
6913df72098SAndreas Gohr    global $conf;
6923df72098SAndreas Gohr    global $lang;
6933df72098SAndreas Gohr    $ns = cleanID($ns);
6943df72098SAndreas Gohr
6953df72098SAndreas Gohr    // check auth our self if not given (needed for ajax calls)
6963df72098SAndreas Gohr    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
6973df72098SAndreas Gohr
698d9162c6cSKate Arzamastseva    if (!$fullscreenview) echo '<h1 id="media__ns">:'.hsc($ns).'</h1>'.NL;
6993df72098SAndreas Gohr
7003df72098SAndreas Gohr    if($auth < AUTH_READ){
7013df72098SAndreas Gohr        // FIXME: print permission warning here instead?
7023df72098SAndreas Gohr        echo '<div class="nothing">'.$lang['nothingfound'].'</div>'.NL;
70356fe6664SAndreas Gohr    }else{
70489274c0dSChristopher Smith        if (!$fullscreenview) {
70589274c0dSChristopher Smith            media_uploadform($ns, $auth);
70689274c0dSChristopher Smith            media_searchform($ns);
70789274c0dSChristopher Smith        }
7083df72098SAndreas Gohr
7093df72098SAndreas Gohr        $dir = utf8_encodeFN(str_replace(':','/',$ns));
7103df72098SAndreas Gohr        $data = array();
7111a7f560eSAndreas Gohr        search($data,$conf['mediadir'],'search_media',
712abc306f4SKate Arzamastseva                array('showmsg'=>true,'depth'=>1),$dir,1,$sort);
7133df72098SAndreas Gohr
7143df72098SAndreas Gohr        if(!count($data)){
7153df72098SAndreas Gohr            echo '<div class="nothing">'.$lang['nothingfound'].'</div>'.NL;
7165b9353faSKate Arzamastseva        }else {
7175b9353faSKate Arzamastseva            if ($fullscreenview) {
718554a8c9fSAdrian Lang                echo '<ul class="' . _media_get_list_type() . '">';
7195b9353faSKate Arzamastseva            }
7205b9353faSKate Arzamastseva            foreach($data as $item){
7215b9353faSKate Arzamastseva                if (!$fullscreenview) {
7225b9353faSKate Arzamastseva                    media_printfile($item,$auth,$jump);
7235b9353faSKate Arzamastseva                } else {
7245b9353faSKate Arzamastseva                    media_printfile_thumbs($item,$auth,$jump);
7255b9353faSKate Arzamastseva                }
7265b9353faSKate Arzamastseva            }
72794add303SAnika Henke            if ($fullscreenview) echo '</ul>'.NL;
7283df72098SAndreas Gohr        }
72956fe6664SAndreas Gohr    }
730d9162c6cSKate Arzamastseva}
731d9162c6cSKate Arzamastseva
732d9162c6cSKate Arzamastseva/**
733d9162c6cSKate Arzamastseva * Prints tabs for files list actions
734d9162c6cSKate Arzamastseva *
735d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
73695b451bcSAdrian Lang * @author Adrian Lang <mail@adrianlang.de>
73795b451bcSAdrian Lang *
738035e07f1SKate Arzamastseva * @param string $selected_tab - opened tab
739d9162c6cSKate Arzamastseva */
74095b451bcSAdrian Lang
741035e07f1SKate Arzamastsevafunction media_tabs_files($selected_tab = ''){
742d9162c6cSKate Arzamastseva    global $lang;
74395b451bcSAdrian Lang    $tabs = array();
74495b451bcSAdrian Lang    foreach(array('files'  => 'mediaselect',
74595b451bcSAdrian Lang                  'upload' => 'media_uploadtab',
74695b451bcSAdrian Lang                  'search' => 'media_searchtab') as $tab => $caption) {
74795b451bcSAdrian Lang        $tabs[$tab] = array('href'    => media_managerURL(array('tab_files' => $tab), '&'),
74895b451bcSAdrian Lang                            'caption' => $lang[$caption]);
74995b451bcSAdrian Lang    }
750d9162c6cSKate Arzamastseva
75195b451bcSAdrian Lang    html_tabs($tabs, $selected_tab);
752d9162c6cSKate Arzamastseva}
753d9162c6cSKate Arzamastseva
754d9162c6cSKate Arzamastseva/**
755d9162c6cSKate Arzamastseva * Prints tabs for files details actions
756d9162c6cSKate Arzamastseva *
757d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
758ebc28e69SAndreas Gohr * @param string $image filename of the current image
759ebc28e69SAndreas Gohr * @param string $selected_tab opened tab
760d9162c6cSKate Arzamastseva */
761035e07f1SKate Arzamastsevafunction media_tabs_details($image, $selected_tab = ''){
762e5d185e1SKate Arzamastseva    global $lang, $conf;
763d9162c6cSKate Arzamastseva
76495b451bcSAdrian Lang    $tabs = array();
76595b451bcSAdrian Lang    $tabs['view'] = array('href'    => media_managerURL(array('tab_details' => 'view'), '&'),
76695b451bcSAdrian Lang                          'caption' => $lang['media_viewtab']);
767d9162c6cSKate Arzamastseva
768ebc28e69SAndreas Gohr    list(, $mime) = mimetype($image);
76979e79377SAndreas Gohr    if ($mime == 'image/jpeg' && file_exists(mediaFN($image))) {
77095b451bcSAdrian Lang        $tabs['edit'] = array('href'    => media_managerURL(array('tab_details' => 'edit'), '&'),
77195b451bcSAdrian Lang                              'caption' => $lang['media_edittab']);
772dd9ba38eSKate Arzamastseva    }
773e5d185e1SKate Arzamastseva    if ($conf['mediarevisions']) {
77495b451bcSAdrian Lang        $tabs['history'] = array('href'    => media_managerURL(array('tab_details' => 'history'), '&'),
77595b451bcSAdrian Lang                                 'caption' => $lang['media_historytab']);
776e5d185e1SKate Arzamastseva    }
777d9162c6cSKate Arzamastseva
77895b451bcSAdrian Lang    html_tabs($tabs, $selected_tab);
779d9162c6cSKate Arzamastseva}
780d9162c6cSKate Arzamastseva
781d9162c6cSKate Arzamastseva/**
782d9162c6cSKate Arzamastseva * Prints options for the tab that displays a list of all files
783d9162c6cSKate Arzamastseva *
784d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
785d9162c6cSKate Arzamastseva */
78695b451bcSAdrian Langfunction media_tab_files_options(){
7878108113cSTom N Harris    global $lang;
7888108113cSTom N Harris    global $INPUT;
789b7e5821dSAndreas Gohr    global $ID;
790554a8c9fSAdrian Lang    $form = new Doku_Form(array('class' => 'options', 'method' => 'get',
79138b2bf35SAnika Henke                                'action' => wl($ID)));
79238b2bf35SAnika Henke    $media_manager_params = media_managerURL(array(), '', false, true);
79338b2bf35SAnika Henke    foreach($media_manager_params as $pKey => $pVal){
79438b2bf35SAnika Henke        $form->addHidden($pKey, $pVal);
79538b2bf35SAnika Henke    }
79695b451bcSAdrian Lang    $form->addHidden('sectok', null);
7978108113cSTom N Harris    if ($INPUT->has('q')) {
7988108113cSTom N Harris        $form->addHidden('q', $INPUT->str('q'));
799554a8c9fSAdrian Lang    }
80094add303SAnika Henke    $form->addElement('<ul>'.NL);
80195b451bcSAdrian Lang    foreach(array('list' => array('listType', array('thumbs', 'rows')),
802554a8c9fSAdrian Lang                  'sort' => array('sortBy', array('name', 'date')))
80395b451bcSAdrian Lang            as $group => $content) {
804554a8c9fSAdrian Lang        $checked = "_media_get_${group}_type";
805554a8c9fSAdrian Lang        $checked = $checked();
806d9162c6cSKate Arzamastseva
80795b451bcSAdrian Lang        $form->addElement('<li class="' . $content[0] . '">');
80895b451bcSAdrian Lang        foreach($content[1] as $option) {
80995b451bcSAdrian Lang            $attrs = array();
810554a8c9fSAdrian Lang            if ($checked == $option) {
81195b451bcSAdrian Lang                $attrs['checked'] = 'checked';
81295b451bcSAdrian Lang            }
813815f94e6Slisps            $form->addElement(form_makeRadioField($group . '_dwmedia', $option,
81495b451bcSAdrian Lang                                       $lang['media_' . $group . '_' . $option],
81595b451bcSAdrian Lang                                                  $content[0] . '__' . $option,
81695b451bcSAdrian Lang                                                  $option, $attrs));
81795b451bcSAdrian Lang        }
81894add303SAnika Henke        $form->addElement('</li>'.NL);
81995b451bcSAdrian Lang    }
82095b451bcSAdrian Lang    $form->addElement('<li>');
821abc306f4SKate Arzamastseva    $form->addElement(form_makeButton('submit', '', $lang['btn_apply']));
82294add303SAnika Henke    $form->addElement('</li>'.NL);
82394add303SAnika Henke    $form->addElement('</ul>'.NL);
824abc306f4SKate Arzamastseva    $form->printForm();
825d9162c6cSKate Arzamastseva}
826d9162c6cSKate Arzamastseva
827d9162c6cSKate Arzamastseva/**
82887deddfaSKate Arzamastseva * Returns type of sorting for the list of files in media manager
82987deddfaSKate Arzamastseva *
83087deddfaSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
83142ea7f44SGerrit Uitslag *
83287deddfaSKate Arzamastseva * @return string - sort type
83387deddfaSKate Arzamastseva */
83487deddfaSKate Arzamastsevafunction _media_get_sort_type() {
835554a8c9fSAdrian Lang    return _media_get_display_param('sort', array('default' => 'name', 'date'));
83687deddfaSKate Arzamastseva}
837554a8c9fSAdrian Lang
8386ffaeda9SGerrit Uitslag/**
8396ffaeda9SGerrit Uitslag * Returns type of listing for the list of files in media manager
8406ffaeda9SGerrit Uitslag *
8416ffaeda9SGerrit Uitslag * @author Kate Arzamastseva <pshns@ukr.net>
84242ea7f44SGerrit Uitslag *
8436ffaeda9SGerrit Uitslag * @return string - list type
8446ffaeda9SGerrit Uitslag */
845554a8c9fSAdrian Langfunction _media_get_list_type() {
846554a8c9fSAdrian Lang    return _media_get_display_param('list', array('default' => 'thumbs', 'rows'));
84787deddfaSKate Arzamastseva}
848554a8c9fSAdrian Lang
8496ffaeda9SGerrit Uitslag/**
8506ffaeda9SGerrit Uitslag * Get display parameters
8516ffaeda9SGerrit Uitslag *
8526ffaeda9SGerrit Uitslag * @param string $param   name of parameter
8536ffaeda9SGerrit Uitslag * @param array  $values  allowed values, where default value has index key 'default'
8546ffaeda9SGerrit Uitslag * @return string the parameter value
8556ffaeda9SGerrit Uitslag */
856554a8c9fSAdrian Langfunction _media_get_display_param($param, $values) {
8578108113cSTom N Harris    global $INPUT;
8588108113cSTom N Harris    if (in_array($INPUT->str($param), $values)) {
859554a8c9fSAdrian Lang        // FIXME: Set cookie
8608108113cSTom N Harris        return $INPUT->str($param);
861554a8c9fSAdrian Lang    } else {
8623629bc8cSAdrian Lang        $val = get_doku_pref($param, $values['default']);
8633629bc8cSAdrian Lang        if (!in_array($val, $values)) {
8643629bc8cSAdrian Lang            $val = $values['default'];
8653629bc8cSAdrian Lang        }
8663629bc8cSAdrian Lang        return $val;
867554a8c9fSAdrian Lang    }
86887deddfaSKate Arzamastseva}
86987deddfaSKate Arzamastseva
87087deddfaSKate Arzamastseva/**
871d9162c6cSKate Arzamastseva * Prints tab that displays a list of all files
872d9162c6cSKate Arzamastseva *
873d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
87442ea7f44SGerrit Uitslag *
87542ea7f44SGerrit Uitslag * @param string    $ns
87642ea7f44SGerrit Uitslag * @param null|int  $auth permission level
87742ea7f44SGerrit Uitslag * @param string    $jump item id
878d9162c6cSKate Arzamastseva */
879d9162c6cSKate Arzamastsevafunction media_tab_files($ns,$auth=null,$jump='') {
880d9162c6cSKate Arzamastseva    global $lang;
881d9162c6cSKate Arzamastseva    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
882d9162c6cSKate Arzamastseva
883d9162c6cSKate Arzamastseva    if($auth < AUTH_READ){
88488a71175SKate Arzamastseva        echo '<div class="nothing">'.$lang['media_perm_read'].'</div>'.NL;
885d9162c6cSKate Arzamastseva    }else{
88695b451bcSAdrian Lang        media_filelist($ns,$auth,$jump,true,_media_get_sort_type());
887d9162c6cSKate Arzamastseva    }
888d9162c6cSKate Arzamastseva}
889d9162c6cSKate Arzamastseva
890d9162c6cSKate Arzamastseva/**
891d9162c6cSKate Arzamastseva * Prints tab that displays uploading form
892d9162c6cSKate Arzamastseva *
893d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
89442ea7f44SGerrit Uitslag *
89542ea7f44SGerrit Uitslag * @param string   $ns
89642ea7f44SGerrit Uitslag * @param null|int $auth permission level
89742ea7f44SGerrit Uitslag * @param string   $jump item id
898d9162c6cSKate Arzamastseva */
899d9162c6cSKate Arzamastsevafunction media_tab_upload($ns,$auth=null,$jump='') {
900d9162c6cSKate Arzamastseva    global $lang;
901d9162c6cSKate Arzamastseva    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
902d9162c6cSKate Arzamastseva
90394add303SAnika Henke    echo '<div class="upload">'.NL;
90495b451bcSAdrian Lang    if ($auth >= AUTH_UPLOAD) {
90595b451bcSAdrian Lang        echo '<p>' . $lang['mediaupload'] . '</p>';
90695b451bcSAdrian Lang    }
907d9162c6cSKate Arzamastseva    media_uploadform($ns, $auth, true);
90894add303SAnika Henke    echo '</div>'.NL;
909d9162c6cSKate Arzamastseva}
910d9162c6cSKate Arzamastseva
911d9162c6cSKate Arzamastseva/**
912d9162c6cSKate Arzamastseva * Prints tab that displays search form
913d9162c6cSKate Arzamastseva *
914d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
91542ea7f44SGerrit Uitslag *
91642ea7f44SGerrit Uitslag * @param string $ns
91742ea7f44SGerrit Uitslag * @param null|int $auth permission level
918d9162c6cSKate Arzamastseva */
919d9162c6cSKate Arzamastsevafunction media_tab_search($ns,$auth=null) {
9208108113cSTom N Harris    global $INPUT;
921d9162c6cSKate Arzamastseva
9228108113cSTom N Harris    $do = $INPUT->str('mediado');
9238108113cSTom N Harris    $query = $INPUT->str('q');
92494add303SAnika Henke    echo '<div class="search">'.NL;
925d9162c6cSKate Arzamastseva
926d9162c6cSKate Arzamastseva    media_searchform($ns, $query, true);
9272dba8df4SAdrian Lang    if ($do == 'searchlist' || $query) {
92895b451bcSAdrian Lang        media_searchlist($query,$ns,$auth,true,_media_get_sort_type());
92995b451bcSAdrian Lang    }
93094add303SAnika Henke    echo '</div>'.NL;
931d9162c6cSKate Arzamastseva}
932d9162c6cSKate Arzamastseva
933d9162c6cSKate Arzamastseva/**
934d9162c6cSKate Arzamastseva * Prints tab that displays mediafile details
935d9162c6cSKate Arzamastseva *
936d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
937e0c26282SGerrit Uitslag *
938e0c26282SGerrit Uitslag * @param string     $image media id
939e0c26282SGerrit Uitslag * @param string     $ns
940e0c26282SGerrit Uitslag * @param null|int   $auth  permission level
94142ea7f44SGerrit Uitslag * @param string|int $rev   revision timestamp or empty string
942d9162c6cSKate Arzamastseva */
943e0c26282SGerrit Uitslagfunction media_tab_view($image, $ns, $auth=null, $rev='') {
944ebc28e69SAndreas Gohr    global $lang;
945d9162c6cSKate Arzamastseva    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
946d9162c6cSKate Arzamastseva
947e136d6ccSKate Arzamastseva    if ($image && $auth >= AUTH_READ) {
948dd9ba38eSKate Arzamastseva        $meta = new JpegMeta(mediaFN($image, $rev));
949dd9ba38eSKate Arzamastseva        media_preview($image, $auth, $rev, $meta);
950e136d6ccSKate Arzamastseva        media_preview_buttons($image, $auth, $rev);
951dd9ba38eSKate Arzamastseva        media_details($image, $auth, $rev, $meta);
952e136d6ccSKate Arzamastseva
953e136d6ccSKate Arzamastseva    } else {
95494add303SAnika Henke        echo '<div class="nothing">'.$lang['media_perm_read'].'</div>'.NL;
955e136d6ccSKate Arzamastseva    }
956d9162c6cSKate Arzamastseva}
957d9162c6cSKate Arzamastseva
958d9162c6cSKate Arzamastseva/**
959d9162c6cSKate Arzamastseva * Prints tab that displays form for editing mediafile metadata
960d9162c6cSKate Arzamastseva *
961d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
962e0c26282SGerrit Uitslag *
963e0c26282SGerrit Uitslag * @param string     $image media id
964e0c26282SGerrit Uitslag * @param string     $ns
965e0c26282SGerrit Uitslag * @param null|int   $auth permission level
966d9162c6cSKate Arzamastseva */
967d9162c6cSKate Arzamastsevafunction media_tab_edit($image, $ns, $auth=null) {
968d9162c6cSKate Arzamastseva    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
969d9162c6cSKate Arzamastseva
9701eeeced2SKate Arzamastseva    if ($image) {
971ebc28e69SAndreas Gohr        list(, $mime) = mimetype($image);
97230fd72fbSKate Arzamastseva        if ($mime == 'image/jpeg') media_metaform($image,$auth);
9731eeeced2SKate Arzamastseva    }
974d9162c6cSKate Arzamastseva}
975d9162c6cSKate Arzamastseva
976d9162c6cSKate Arzamastseva/**
977d9162c6cSKate Arzamastseva * Prints tab that displays mediafile revisions
978d9162c6cSKate Arzamastseva *
979d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
980e0c26282SGerrit Uitslag *
981e0c26282SGerrit Uitslag * @param string     $image media id
982e0c26282SGerrit Uitslag * @param string     $ns
983e0c26282SGerrit Uitslag * @param null|int   $auth permission level
984d9162c6cSKate Arzamastseva */
985d9162c6cSKate Arzamastsevafunction media_tab_history($image, $ns, $auth=null) {
986d9162c6cSKate Arzamastseva    global $lang;
9878108113cSTom N Harris    global $INPUT;
9888108113cSTom N Harris
989d9162c6cSKate Arzamastseva    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
9908108113cSTom N Harris    $do = $INPUT->str('mediado');
991d9162c6cSKate Arzamastseva
9922e55802cSKate Arzamastseva    if ($auth >= AUTH_READ && $image) {
9932e55802cSKate Arzamastseva        if ($do == 'diff'){
9942e55802cSKate Arzamastseva            media_diff($image, $ns, $auth);
9952e55802cSKate Arzamastseva        } else {
9968108113cSTom N Harris            $first = $INPUT->int('first');
9978e69fd30SKate Arzamastseva            html_revisions($first, $image);
9982e55802cSKate Arzamastseva        }
99988a71175SKate Arzamastseva    } else {
100088a71175SKate Arzamastseva        echo '<div class="nothing">'.$lang['media_perm_read'].'</div>'.NL;
10012e55802cSKate Arzamastseva    }
10023df72098SAndreas Gohr}
10033df72098SAndreas Gohr
10043df72098SAndreas Gohr/**
10051eeeced2SKate Arzamastseva * Prints mediafile details
10061eeeced2SKate Arzamastseva *
10076ffaeda9SGerrit Uitslag * @param string         $image media id
1008e0c26282SGerrit Uitslag * @param int            $auth permission level
100959bc3b48SGerrit Uitslag * @param int|string     $rev revision timestamp or empty string
10106ffaeda9SGerrit Uitslag * @param JpegMeta|bool  $meta
101142ea7f44SGerrit Uitslag *
10121eeeced2SKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
10131eeeced2SKate Arzamastseva */
101459bc3b48SGerrit Uitslagfunction media_preview($image, $auth, $rev='', $meta=false) {
1015e136d6ccSKate Arzamastseva
1016e136d6ccSKate Arzamastseva    $size = media_image_preview_size($image, $rev, $meta);
1017e136d6ccSKate Arzamastseva
1018e136d6ccSKate Arzamastseva    if ($size) {
101959f3611bSAnika Henke        global $lang;
102094add303SAnika Henke        echo '<div class="image">';
102194add303SAnika Henke
10225b9353faSKate Arzamastseva        $more = array();
1023e136d6ccSKate Arzamastseva        if ($rev) {
10245b9353faSKate Arzamastseva            $more['rev'] = $rev;
1025e136d6ccSKate Arzamastseva        } else {
1026e136d6ccSKate Arzamastseva            $t = @filemtime(mediaFN($image));
10275b9353faSKate Arzamastseva            $more['t'] = $t;
102888a71175SKate Arzamastseva        }
102923786fd7SKate Arzamastseva
10305b9353faSKate Arzamastseva        $more['w'] = $size[0];
10315b9353faSKate Arzamastseva        $more['h'] = $size[1];
1032e136d6ccSKate Arzamastseva        $src = ml($image, $more);
103359f3611bSAnika Henke
103459f3611bSAnika Henke        echo '<a href="'.$src.'" target="_blank" title="'.$lang['mediaview'].'">';
103595b451bcSAdrian Lang        echo '<img src="'.$src.'" alt="" style="max-width: '.$size[0].'px;" />';
103659f3611bSAnika Henke        echo '</a>';
1037e136d6ccSKate Arzamastseva
103894add303SAnika Henke        echo '</div>'.NL;
103994add303SAnika Henke    }
1040e136d6ccSKate Arzamastseva}
1041e136d6ccSKate Arzamastseva
1042e136d6ccSKate Arzamastseva/**
1043e136d6ccSKate Arzamastseva * Prints mediafile action buttons
1044e136d6ccSKate Arzamastseva *
1045e136d6ccSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1046e0c26282SGerrit Uitslag *
1047e0c26282SGerrit Uitslag * @param string     $image media id
1048e0c26282SGerrit Uitslag * @param int        $auth  permission level
1049e0c26282SGerrit Uitslag * @param string|int $rev   revision timestamp, or empty string
1050e136d6ccSKate Arzamastseva */
1051e0c26282SGerrit Uitslagfunction media_preview_buttons($image, $auth, $rev='') {
1052e5d185e1SKate Arzamastseva    global $lang, $conf;
1053e136d6ccSKate Arzamastseva
105494add303SAnika Henke    echo '<ul class="actions">'.NL;
10551eeeced2SKate Arzamastseva
105679e79377SAndreas Gohr    if($auth >= AUTH_DELETE && !$rev && file_exists(mediaFN($image))){
1057e136d6ccSKate Arzamastseva
1058e136d6ccSKate Arzamastseva        // delete button
10597d7ab775SKate Arzamastseva        $form = new Doku_Form(array('id' => 'mediamanager__btn_delete',
10606183fb05SKate Arzamastseva            'action'=>media_managerURL(array('delete' => $image), '&')));
106170c3cc9aSKate Arzamastseva        $form->addElement(form_makeButton('submit','',$lang['btn_delete']));
106295b451bcSAdrian Lang        echo '<li>';
106370c3cc9aSKate Arzamastseva        $form->printForm();
106494add303SAnika Henke        echo '</li>'.NL;
1065e5d185e1SKate Arzamastseva    }
1066e5d185e1SKate Arzamastseva
1067e5d185e1SKate Arzamastseva    $auth_ow = (($conf['mediarevisions']) ? AUTH_UPLOAD : AUTH_DELETE);
1068e5d185e1SKate Arzamastseva    if($auth >= $auth_ow && !$rev){
1069e5d185e1SKate Arzamastseva
1070e136d6ccSKate Arzamastseva        // upload new version button
1071ed69a2aeSKate Arzamastseva        $form = new Doku_Form(array('id' => 'mediamanager__btn_update',
10726183fb05SKate Arzamastseva            'action'=>media_managerURL(array('image' => $image, 'mediado' => 'update'), '&')));
107370c3cc9aSKate Arzamastseva        $form->addElement(form_makeButton('submit','',$lang['media_update']));
107495b451bcSAdrian Lang        echo '<li>';
107570c3cc9aSKate Arzamastseva        $form->printForm();
107694add303SAnika Henke        echo '</li>'.NL;
107770c3cc9aSKate Arzamastseva    }
1078e136d6ccSKate Arzamastseva
107979e79377SAndreas Gohr    if($auth >= AUTH_UPLOAD && $rev && $conf['mediarevisions'] && file_exists(mediaFN($image, $rev))){
1080e136d6ccSKate Arzamastseva
1081e136d6ccSKate Arzamastseva        // restore button
10827d7ab775SKate Arzamastseva        $form = new Doku_Form(array('id' => 'mediamanager__btn_restore',
10836183fb05SKate Arzamastseva            'action'=>media_managerURL(array('image' => $image), '&')));
10849c1bd4bcSKate Arzamastseva        $form->addHidden('mediado','restore');
10859c1bd4bcSKate Arzamastseva        $form->addHidden('rev',$rev);
10869c1bd4bcSKate Arzamastseva        $form->addElement(form_makeButton('submit','',$lang['media_restore']));
108795b451bcSAdrian Lang        echo '<li>';
10889c1bd4bcSKate Arzamastseva        $form->printForm();
108994add303SAnika Henke        echo '</li>'.NL;
10909c1bd4bcSKate Arzamastseva    }
1091e136d6ccSKate Arzamastseva
109294add303SAnika Henke    echo '</ul>'.NL;
10932e55802cSKate Arzamastseva}
10942e55802cSKate Arzamastseva
10952e55802cSKate Arzamastseva/**
1096fa8e5c77SKate Arzamastseva * Returns image width and height for mediamanager preview panel
1097fa8e5c77SKate Arzamastseva *
1098fa8e5c77SKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1099fa8e5c77SKate Arzamastseva * @param string         $image
1100e0c26282SGerrit Uitslag * @param int|string     $rev
110159bc3b48SGerrit Uitslag * @param JpegMeta|bool  $meta
1102ebc28e69SAndreas Gohr * @param int            $size
110342ea7f44SGerrit Uitslag * @return array|false
1104fa8e5c77SKate Arzamastseva */
11056dd095f5SKate Arzamastsevafunction media_image_preview_size($image, $rev, $meta, $size = 500) {
110692cac9a9SKate Arzamastseva    if (!preg_match("/\.(jpe?g|gif|png)$/", $image) || !file_exists(mediaFN($image, $rev))) return false;
1107fa8e5c77SKate Arzamastseva
1108fa8e5c77SKate Arzamastseva    $info = getimagesize(mediaFN($image, $rev));
1109fa8e5c77SKate Arzamastseva    $w = (int) $info[0];
1110fa8e5c77SKate Arzamastseva    $h = (int) $info[1];
1111fa8e5c77SKate Arzamastseva
1112fa8e5c77SKate Arzamastseva    if($meta && ($w > $size || $h > $size)){
1113fa8e5c77SKate Arzamastseva        $ratio = $meta->getResizeRatio($size, $size);
1114fa8e5c77SKate Arzamastseva        $w = floor($w * $ratio);
1115fa8e5c77SKate Arzamastseva        $h = floor($h * $ratio);
1116fa8e5c77SKate Arzamastseva    }
1117fa8e5c77SKate Arzamastseva    return array($w, $h);
1118fa8e5c77SKate Arzamastseva}
1119fa8e5c77SKate Arzamastseva
1120fa8e5c77SKate Arzamastseva/**
1121fa8e5c77SKate Arzamastseva * Returns the requested EXIF/IPTC tag from the image meta
1122fa8e5c77SKate Arzamastseva *
1123fa8e5c77SKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1124e0c26282SGerrit Uitslag *
112542ea7f44SGerrit Uitslag * @param array    $tags array with tags, first existing is returned
1126fa8e5c77SKate Arzamastseva * @param JpegMeta $meta
112742ea7f44SGerrit Uitslag * @param string   $alt  alternative value
1128fa8e5c77SKate Arzamastseva * @return string
1129fa8e5c77SKate Arzamastseva */
1130fa8e5c77SKate Arzamastsevafunction media_getTag($tags,$meta,$alt=''){
1131fa8e5c77SKate Arzamastseva    if($meta === false) return $alt;
1132fa8e5c77SKate Arzamastseva    $info = $meta->getField($tags);
1133fa8e5c77SKate Arzamastseva    if($info == false) return $alt;
1134fa8e5c77SKate Arzamastseva    return $info;
1135fa8e5c77SKate Arzamastseva}
1136fa8e5c77SKate Arzamastseva
1137fa8e5c77SKate Arzamastseva/**
1138e136d6ccSKate Arzamastseva * Returns mediafile tags
11392e55802cSKate Arzamastseva *
11402e55802cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1141e0c26282SGerrit Uitslag *
1142e136d6ccSKate Arzamastseva * @param JpegMeta $meta
114342ea7f44SGerrit Uitslag * @return array list of tags of the mediafile
11442e55802cSKate Arzamastseva */
1145e136d6ccSKate Arzamastsevafunction media_file_tags($meta) {
1146532850edSKate Arzamastseva    // load the field descriptions
11473e98e685SKate Arzamastseva    static $fields = null;
11483e98e685SKate Arzamastseva    if(is_null($fields)){
11493e98e685SKate Arzamastseva        $config_files = getConfigFiles('mediameta');
11503e98e685SKate Arzamastseva        foreach ($config_files as $config_file) {
115179e79377SAndreas Gohr            if(file_exists($config_file)) include($config_file);
1152532850edSKate Arzamastseva        }
1153532850edSKate Arzamastseva    }
11541eeeced2SKate Arzamastseva
1155e136d6ccSKate Arzamastseva    $tags = array();
1156dd9ba38eSKate Arzamastseva
11573e98e685SKate Arzamastseva    foreach($fields as $key => $tag){
11583e98e685SKate Arzamastseva        $t = array();
11593e98e685SKate Arzamastseva        if (!empty($tag[0])) $t = array($tag[0]);
11600e80bb5eSChristopher Smith        if(isset($tag[3]) && is_array($tag[3])) $t = array_merge($t,$tag[3]);
1161e136d6ccSKate Arzamastseva        $value = media_getTag($t, $meta);
1162e136d6ccSKate Arzamastseva        $tags[] = array('tag' => $tag, 'value' => $value);
1163e136d6ccSKate Arzamastseva    }
1164e136d6ccSKate Arzamastseva
1165e136d6ccSKate Arzamastseva    return $tags;
1166e136d6ccSKate Arzamastseva}
1167e136d6ccSKate Arzamastseva
1168e136d6ccSKate Arzamastseva/**
1169e136d6ccSKate Arzamastseva * Prints mediafile tags
1170e136d6ccSKate Arzamastseva *
1171e136d6ccSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
117242ea7f44SGerrit Uitslag *
1173e0c26282SGerrit Uitslag * @param string        $image image id
1174e0c26282SGerrit Uitslag * @param int           $auth  permission level
1175e0c26282SGerrit Uitslag * @param string|int    $rev   revision timestamp, or empty string
1176e0c26282SGerrit Uitslag * @param bool|JpegMeta $meta  image object, or create one if false
1177e0c26282SGerrit Uitslag */
1178e0c26282SGerrit Uitslagfunction media_details($image, $auth, $rev='', $meta=false) {
1179e136d6ccSKate Arzamastseva    global $lang;
1180e136d6ccSKate Arzamastseva
1181e136d6ccSKate Arzamastseva    if (!$meta) $meta = new JpegMeta(mediaFN($image, $rev));
1182e136d6ccSKate Arzamastseva    $tags = media_file_tags($meta);
1183e136d6ccSKate Arzamastseva
118494add303SAnika Henke    echo '<dl>'.NL;
1185e136d6ccSKate Arzamastseva    foreach($tags as $tag){
1186e136d6ccSKate Arzamastseva        if ($tag['value']) {
1187e136d6ccSKate Arzamastseva            $value = cleanText($tag['value']);
1188fde860beSGerrit Uitslag            echo '<dt>'.$lang[$tag['tag'][1]].'</dt><dd>';
1189e136d6ccSKate Arzamastseva            if ($tag['tag'][2] == 'date') echo dformat($value);
11903e98e685SKate Arzamastseva            else echo hsc($value);
119194add303SAnika Henke            echo '</dd>'.NL;
11921eeeced2SKate Arzamastseva        }
1193e136d6ccSKate Arzamastseva    }
119494add303SAnika Henke    echo '</dl>'.NL;
119522e68399Sflammy    echo '<dl>'.NL;
119622e68399Sflammy    echo '<dt>'.$lang['reference'].':</dt>';
119722e68399Sflammy    $media_usage = ft_mediause($image,true);
119822e68399Sflammy    if(count($media_usage) > 0){
119922e68399Sflammy        foreach($media_usage as $path){
120022e68399Sflammy            echo '<dd>'.html_wikilink($path).'</dd>';
120122e68399Sflammy        }
120222e68399Sflammy    }else{
120322e68399Sflammy        echo '<dd>'.$lang['nothingfound'].'</dd>';
120422e68399Sflammy    }
120522e68399Sflammy    echo '</dl>'.NL;
120622e68399Sflammy
12071eeeced2SKate Arzamastseva}
12082e55802cSKate Arzamastseva
12092e55802cSKate Arzamastseva/**
12102e55802cSKate Arzamastseva * Shows difference between two revisions of file
12112e55802cSKate Arzamastseva *
12122e55802cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
121342ea7f44SGerrit Uitslag *
1214e0c26282SGerrit Uitslag * @param string $image  image id
1215e0c26282SGerrit Uitslag * @param string $ns
1216e0c26282SGerrit Uitslag * @param int $auth permission level
1217e0c26282SGerrit Uitslag * @param bool $fromajax
121842ea7f44SGerrit Uitslag * @return false|null|string
1219e0c26282SGerrit Uitslag */
1220b4b31bacSKate Arzamastsevafunction media_diff($image, $ns, $auth, $fromajax = false) {
12212e55802cSKate Arzamastseva    global $conf;
12228108113cSTom N Harris    global $INPUT;
12232e55802cSKate Arzamastseva
1224e5d185e1SKate Arzamastseva    if ($auth < AUTH_READ || !$image || !$conf['mediarevisions']) return '';
12254ee15585SKate Arzamastseva
12268108113cSTom N Harris    $rev1 = $INPUT->int('rev');
12272e55802cSKate Arzamastseva
12284ba05e11SAndreas Gohr    $rev2 = $INPUT->ref('rev2');
12294ba05e11SAndreas Gohr    if(is_array($rev2)){
12304ba05e11SAndreas Gohr        $rev1 = (int) $rev2[0];
12314ba05e11SAndreas Gohr        $rev2 = (int) $rev2[1];
12322e55802cSKate Arzamastseva
12332e55802cSKate Arzamastseva        if(!$rev1){
12342e55802cSKate Arzamastseva            $rev1 = $rev2;
12352e55802cSKate Arzamastseva            unset($rev2);
12362e55802cSKate Arzamastseva        }
12372e55802cSKate Arzamastseva    }else{
12388108113cSTom N Harris        $rev2 = $INPUT->int('rev2');
12392e55802cSKate Arzamastseva    }
12406dd095f5SKate Arzamastseva
12416dd095f5SKate Arzamastseva    if ($rev1 && !file_exists(mediaFN($image, $rev1))) $rev1 = false;
12426dd095f5SKate Arzamastseva    if ($rev2 && !file_exists(mediaFN($image, $rev2))) $rev2 = false;
12436dd095f5SKate Arzamastseva
12442e55802cSKate Arzamastseva    if($rev1 && $rev2){            // two specific revisions wanted
12452e55802cSKate Arzamastseva        // make sure order is correct (older on the left)
12462e55802cSKate Arzamastseva        if($rev1 < $rev2){
12472e55802cSKate Arzamastseva            $l_rev = $rev1;
12482e55802cSKate Arzamastseva            $r_rev = $rev2;
12492e55802cSKate Arzamastseva        }else{
12502e55802cSKate Arzamastseva            $l_rev = $rev2;
12512e55802cSKate Arzamastseva            $r_rev = $rev1;
12522e55802cSKate Arzamastseva        }
12532e55802cSKate Arzamastseva    }elseif($rev1){                // single revision given, compare to current
12542e55802cSKate Arzamastseva        $r_rev = '';
12552e55802cSKate Arzamastseva        $l_rev = $rev1;
12562e55802cSKate Arzamastseva    }else{                        // no revision was given, compare previous to current
12572e55802cSKate Arzamastseva        $r_rev = '';
1258047bad06SGerrit Uitslag        $medialog = new MediaChangeLog($image);
1259047bad06SGerrit Uitslag        $revs = $medialog->getRevisions(0, 1);
1260e5d185e1SKate Arzamastseva        if (file_exists(mediaFN($image, $revs[0]))) {
12612e55802cSKate Arzamastseva            $l_rev = $revs[0];
1262e5d185e1SKate Arzamastseva        } else {
1263e5d185e1SKate Arzamastseva            $l_rev = '';
1264e5d185e1SKate Arzamastseva        }
12652e55802cSKate Arzamastseva    }
1266dd9ba38eSKate Arzamastseva
126759e81a43SKate Arzamastseva    // prepare event data
126859bc3b48SGerrit Uitslag    $data = array();
126959e81a43SKate Arzamastseva    $data[0] = $image;
127059e81a43SKate Arzamastseva    $data[1] = $l_rev;
127159e81a43SKate Arzamastseva    $data[2] = $r_rev;
127259e81a43SKate Arzamastseva    $data[3] = $ns;
127359e81a43SKate Arzamastseva    $data[4] = $auth;
1274b4b31bacSKate Arzamastseva    $data[5] = $fromajax;
127559e81a43SKate Arzamastseva
127659e81a43SKate Arzamastseva    // trigger event
1277fa8e5c77SKate Arzamastseva    return trigger_event('MEDIA_DIFF', $data, '_media_file_diff', true);
127859e81a43SKate Arzamastseva}
127959e81a43SKate Arzamastseva
12806ffaeda9SGerrit Uitslag/**
12816ffaeda9SGerrit Uitslag * Callback for media file diff
12826ffaeda9SGerrit Uitslag *
128342ea7f44SGerrit Uitslag * @param array $data event data
128442ea7f44SGerrit Uitslag * @return false|null
12856ffaeda9SGerrit Uitslag */
1286fa8e5c77SKate Arzamastsevafunction _media_file_diff($data) {
1287b4b31bacSKate Arzamastseva    if(is_array($data) && count($data)===6) {
12886ffaeda9SGerrit Uitslag        media_file_diff($data[0], $data[1], $data[2], $data[3], $data[4], $data[5]);
128959e81a43SKate Arzamastseva    } else {
129059e81a43SKate Arzamastseva        return false;
129159e81a43SKate Arzamastseva    }
129259e81a43SKate Arzamastseva}
129359e81a43SKate Arzamastseva
129459e81a43SKate Arzamastseva/**
129559e81a43SKate Arzamastseva * Shows difference between two revisions of image
129659e81a43SKate Arzamastseva *
129759e81a43SKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1298e0c26282SGerrit Uitslag *
1299e0c26282SGerrit Uitslag * @param string $image
1300e0c26282SGerrit Uitslag * @param string|int $l_rev revision timestamp, or empty string
1301e0c26282SGerrit Uitslag * @param string|int $r_rev revision timestamp, or empty string
1302e0c26282SGerrit Uitslag * @param string $ns
1303e0c26282SGerrit Uitslag * @param int $auth permission level
1304e0c26282SGerrit Uitslag * @param bool $fromajax
130559e81a43SKate Arzamastseva */
1306b4b31bacSKate Arzamastsevafunction media_file_diff($image, $l_rev, $r_rev, $ns, $auth, $fromajax){
13078108113cSTom N Harris    global $lang;
13088108113cSTom N Harris    global $INPUT;
13094ee15585SKate Arzamastseva
131050fc55feSKate Arzamastseva    $l_meta = new JpegMeta(mediaFN($image, $l_rev));
131150fc55feSKate Arzamastseva    $r_meta = new JpegMeta(mediaFN($image, $r_rev));
131250fc55feSKate Arzamastseva
1313ebc28e69SAndreas Gohr    $is_img = preg_match('/\.(jpe?g|gif|png)$/', $image);
13144ee15585SKate Arzamastseva    if ($is_img) {
131550fc55feSKate Arzamastseva        $l_size = media_image_preview_size($image, $l_rev, $l_meta);
131650fc55feSKate Arzamastseva        $r_size = media_image_preview_size($image, $r_rev, $r_meta);
131750fc55feSKate Arzamastseva        $is_img = ($l_size && $r_size && ($l_size[0] >= 30 || $r_size[0] >= 30));
131850fc55feSKate Arzamastseva
13198108113cSTom N Harris        $difftype = $INPUT->str('difftype');
13204ee15585SKate Arzamastseva
1321b4b31bacSKate Arzamastseva        if (!$fromajax) {
13229a71fb5cSAnika Henke            $form = new Doku_Form(array(
13239a71fb5cSAnika Henke                'action' => media_managerURL(array(), '&'),
1324eaac63bbSAdrian Lang                'method' => 'get',
13259a71fb5cSAnika Henke                'id' => 'mediamanager__form_diffview',
13269a71fb5cSAnika Henke                'class' => 'diffView'
13279a71fb5cSAnika Henke            ));
132895b451bcSAdrian Lang            $form->addHidden('sectok', null);
13295b9353faSKate Arzamastseva            $form->addElement('<input type="hidden" name="rev2[]" value="'.$l_rev.'" ></input>');
13305b9353faSKate Arzamastseva            $form->addElement('<input type="hidden" name="rev2[]" value="'.$r_rev.'" ></input>');
13314ee15585SKate Arzamastseva            $form->addHidden('mediado', 'diff');
13324ee15585SKate Arzamastseva            $form->printForm();
13334ee15585SKate Arzamastseva
133494add303SAnika Henke            echo NL.'<div id="mediamanager__diff" >'.NL;
1335b4b31bacSKate Arzamastseva        }
13364ee15585SKate Arzamastseva
1337b4b31bacSKate Arzamastseva        if ($difftype == 'opacity' || $difftype == 'portions') {
133850fc55feSKate Arzamastseva            media_image_diff($image, $l_rev, $r_rev, $l_size, $r_size, $difftype);
1339b4b31bacSKate Arzamastseva            if (!$fromajax) echo '</div>';
1340ebc28e69SAndreas Gohr            return;
1341b4b31bacSKate Arzamastseva        }
13424ee15585SKate Arzamastseva    }
1343e136d6ccSKate Arzamastseva
134495b451bcSAdrian Lang    list($l_head, $r_head) = html_diff_head($l_rev, $r_rev, $image, true);
1345e136d6ccSKate Arzamastseva
134695b451bcSAdrian Lang    ?>
1347c7b28ffdSAnika Henke    <div class="table">
134895b451bcSAdrian Lang    <table>
134995b451bcSAdrian Lang      <tr>
135095b451bcSAdrian Lang        <th><?php echo $l_head; ?></th>
135195b451bcSAdrian Lang        <th><?php echo $r_head; ?></th>
135295b451bcSAdrian Lang      </tr>
135395b451bcSAdrian Lang    <?php
135495b451bcSAdrian Lang
135595b451bcSAdrian Lang    echo '<tr class="image">';
135695b451bcSAdrian Lang    echo '<td>';
1357e136d6ccSKate Arzamastseva    media_preview($image, $auth, $l_rev, $l_meta);
135895b451bcSAdrian Lang    echo '</td>';
1359e136d6ccSKate Arzamastseva
136095b451bcSAdrian Lang    echo '<td>';
1361e136d6ccSKate Arzamastseva    media_preview($image, $auth, $r_rev, $r_meta);
136295b451bcSAdrian Lang    echo '</td>';
136394add303SAnika Henke    echo '</tr>'.NL;
1364e136d6ccSKate Arzamastseva
136595b451bcSAdrian Lang    echo '<tr class="actions">';
136695b451bcSAdrian Lang    echo '<td>';
1367e136d6ccSKate Arzamastseva    media_preview_buttons($image, $auth, $l_rev);
136895b451bcSAdrian Lang    echo '</td>';
1369e136d6ccSKate Arzamastseva
137095b451bcSAdrian Lang    echo '<td>';
1371e136d6ccSKate Arzamastseva    media_preview_buttons($image, $auth, $r_rev);
137295b451bcSAdrian Lang    echo '</td>';
137394add303SAnika Henke    echo '</tr>'.NL;
1374e136d6ccSKate Arzamastseva
1375e136d6ccSKate Arzamastseva    $l_tags = media_file_tags($l_meta);
1376e136d6ccSKate Arzamastseva    $r_tags = media_file_tags($r_meta);
137795b451bcSAdrian Lang    // FIXME r_tags-only stuff
1378e136d6ccSKate Arzamastseva    foreach ($l_tags as $key => $l_tag) {
1379e136d6ccSKate Arzamastseva        if ($l_tag['value'] != $r_tags[$key]['value']) {
138095b451bcSAdrian Lang            $r_tags[$key]['highlighted'] = true;
138195b451bcSAdrian Lang            $l_tags[$key]['highlighted'] = true;
1382e136d6ccSKate Arzamastseva        } else if (!$l_tag['value'] || !$r_tags[$key]['value']) {
1383e136d6ccSKate Arzamastseva            unset($r_tags[$key]);
1384e136d6ccSKate Arzamastseva            unset($l_tags[$key]);
1385e136d6ccSKate Arzamastseva        }
1386e136d6ccSKate Arzamastseva    }
1387e136d6ccSKate Arzamastseva
138895b451bcSAdrian Lang    echo '<tr>';
1389e136d6ccSKate Arzamastseva    foreach(array($l_tags,$r_tags) as $tags){
139094add303SAnika Henke        echo '<td>'.NL;
1391e136d6ccSKate Arzamastseva
1392e136d6ccSKate Arzamastseva        echo '<dl class="img_tags">';
1393e136d6ccSKate Arzamastseva        foreach($tags as $tag){
1394e136d6ccSKate Arzamastseva            $value = cleanText($tag['value']);
1395e136d6ccSKate Arzamastseva            if (!$value) $value = '-';
1396fde860beSGerrit Uitslag            echo '<dt>'.$lang[$tag['tag'][1]].'</dt>';
139795b451bcSAdrian Lang            echo '<dd>';
139895b451bcSAdrian Lang            if ($tag['highlighted']) {
139995b451bcSAdrian Lang                echo '<strong>';
140095b451bcSAdrian Lang            }
1401e136d6ccSKate Arzamastseva            if ($tag['tag'][2] == 'date') echo dformat($value);
1402e136d6ccSKate Arzamastseva            else echo hsc($value);
140395b451bcSAdrian Lang            if ($tag['highlighted']) {
140495b451bcSAdrian Lang                echo '</strong>';
140595b451bcSAdrian Lang            }
1406e136d6ccSKate Arzamastseva            echo '</dd>';
1407e136d6ccSKate Arzamastseva        }
140894add303SAnika Henke        echo '</dl>'.NL;
1409e136d6ccSKate Arzamastseva
141095b451bcSAdrian Lang        echo '</td>';
1411e136d6ccSKate Arzamastseva    }
141294add303SAnika Henke    echo '</tr>'.NL;
1413e136d6ccSKate Arzamastseva
141494add303SAnika Henke    echo '</table>'.NL;
1415c7b28ffdSAnika Henke    echo '</div>'.NL;
1416e136d6ccSKate Arzamastseva
1417b4b31bacSKate Arzamastseva    if ($is_img && !$fromajax) echo '</div>';
1418e136d6ccSKate Arzamastseva}
1419e136d6ccSKate Arzamastseva
1420e136d6ccSKate Arzamastseva/**
1421e136d6ccSKate Arzamastseva * Prints two images side by side
1422fa8e5c77SKate Arzamastseva * and slider
1423e136d6ccSKate Arzamastseva *
1424e136d6ccSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
142542ea7f44SGerrit Uitslag *
142642ea7f44SGerrit Uitslag * @param string $image   image id
1427e0c26282SGerrit Uitslag * @param int    $l_rev   revision timestamp, or empty string
1428e0c26282SGerrit Uitslag * @param int    $r_rev   revision timestamp, or empty string
142942ea7f44SGerrit Uitslag * @param array  $l_size  array with width and height
143042ea7f44SGerrit Uitslag * @param array  $r_size  array with width and height
143150fc55feSKate Arzamastseva * @param string $type
1432e136d6ccSKate Arzamastseva */
143350fc55feSKate Arzamastsevafunction media_image_diff($image, $l_rev, $r_rev, $l_size, $r_size, $type) {
143450fc55feSKate Arzamastseva    if ($l_size != $r_size) {
143550fc55feSKate Arzamastseva        if ($r_size[0] > $l_size[0]) {
143650fc55feSKate Arzamastseva            $l_size = $r_size;
143750fc55feSKate Arzamastseva        }
143850fc55feSKate Arzamastseva    }
1439e136d6ccSKate Arzamastseva
14405b9353faSKate Arzamastseva    $l_more = array('rev' => $l_rev, 'h' => $l_size[1], 'w' => $l_size[0]);
14415b9353faSKate Arzamastseva    $r_more = array('rev' => $r_rev, 'h' => $l_size[1], 'w' => $l_size[0]);
1442e136d6ccSKate Arzamastseva
1443e136d6ccSKate Arzamastseva    $l_src = ml($image, $l_more);
1444e136d6ccSKate Arzamastseva    $r_src = ml($image, $r_more);
1445e136d6ccSKate Arzamastseva
144669143ff2SKate Arzamastseva    // slider
14479a71fb5cSAnika Henke    echo '<div class="slider" style="max-width: '.($l_size[0]-20).'px;" ></div>'.NL;
144869143ff2SKate Arzamastseva
144995b451bcSAdrian Lang    // two images in divs
14509a71fb5cSAnika Henke    echo '<div class="imageDiff ' . $type . '">'.NL;
145195b451bcSAdrian Lang    echo '<div class="image1" style="max-width: '.$l_size[0].'px;">';
14525b9353faSKate Arzamastseva    echo '<img src="'.$l_src.'" alt="" />';
14539a71fb5cSAnika Henke    echo '</div>'.NL;
145495b451bcSAdrian Lang    echo '<div class="image2" style="max-width: '.$l_size[0].'px;">';
14555b9353faSKate Arzamastseva    echo '<img src="'.$r_src.'" alt="" />';
14569a71fb5cSAnika Henke    echo '</div>'.NL;
14579a71fb5cSAnika Henke    echo '</div>'.NL;
14581eeeced2SKate Arzamastseva}
14591eeeced2SKate Arzamastseva
14601eeeced2SKate Arzamastseva/**
14619c1bd4bcSKate Arzamastseva * Restores an old revision of a media file
14629c1bd4bcSKate Arzamastseva *
146342ea7f44SGerrit Uitslag * @param string $image media id
146442ea7f44SGerrit Uitslag * @param int    $rev   revision timestamp or empty string
14659c1bd4bcSKate Arzamastseva * @param int    $auth
14669c1bd4bcSKate Arzamastseva * @return string - file's id
146742ea7f44SGerrit Uitslag *
14689c1bd4bcSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
14699c1bd4bcSKate Arzamastseva */
14709c1bd4bcSKate Arzamastsevafunction media_restore($image, $rev, $auth){
1471e5d185e1SKate Arzamastseva    global $conf;
147280525638SKate Arzamastseva    if ($auth < AUTH_UPLOAD || !$conf['mediarevisions']) return false;
147392cac9a9SKate Arzamastseva    $removed = (!file_exists(mediaFN($image)) && file_exists(mediaMetaFN($image, '.changes')));
147492cac9a9SKate Arzamastseva    if (!$image || (!file_exists(mediaFN($image)) && !$removed)) return false;
14759c1bd4bcSKate Arzamastseva    if (!$rev || !file_exists(mediaFN($image, $rev))) return false;
1476ebc28e69SAndreas Gohr    list(,$imime,) = mimetype($image);
14779c1bd4bcSKate Arzamastseva    $res = media_upload_finish(mediaFN($image, $rev),
14789c1bd4bcSKate Arzamastseva        mediaFN($image),
14799c1bd4bcSKate Arzamastseva        $image,
14809c1bd4bcSKate Arzamastseva        $imime,
14819c1bd4bcSKate Arzamastseva        true,
14829c1bd4bcSKate Arzamastseva        'copy');
14839c1bd4bcSKate Arzamastseva    if (is_array($res)) {
14849c1bd4bcSKate Arzamastseva        msg($res[0], $res[1]);
14859c1bd4bcSKate Arzamastseva        return false;
14869c1bd4bcSKate Arzamastseva    }
14879c1bd4bcSKate Arzamastseva    return $res;
14889c1bd4bcSKate Arzamastseva}
14899c1bd4bcSKate Arzamastseva
14909c1bd4bcSKate Arzamastseva/**
1491bf1f3ac4Ssarnowski * List all files found by the search request
1492c9f56829SAndreas Gohr *
1493c9f56829SAndreas Gohr * @author Tobias Sarnowski <sarnowski@cosmocode.de>
1494c9f56829SAndreas Gohr * @author Andreas Gohr <gohr@cosmocode.de>
1495d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1496c9f56829SAndreas Gohr * @triggers MEDIA_SEARCH
1497e0c26282SGerrit Uitslag *
1498e0c26282SGerrit Uitslag * @param string $query
1499e0c26282SGerrit Uitslag * @param string $ns
1500e0c26282SGerrit Uitslag * @param null|int $auth
1501e0c26282SGerrit Uitslag * @param bool $fullscreen
1502e0c26282SGerrit Uitslag * @param string $sort
1503bf1f3ac4Ssarnowski */
150400e3e394SChristopher Smithfunction media_searchlist($query,$ns,$auth=null,$fullscreen=false,$sort='natural'){
1505bf1f3ac4Ssarnowski    global $conf;
1506bf1f3ac4Ssarnowski    global $lang;
15078e69fd30SKate Arzamastseva
1508bf1f3ac4Ssarnowski    $ns = cleanID($ns);
150956fe6664SAndreas Gohr    $evdata = array(
151056fe6664SAndreas Gohr        'ns'    => $ns,
151156fe6664SAndreas Gohr        'data'  => array(),
151256fe6664SAndreas Gohr        'query' => $query
151356fe6664SAndreas Gohr    );
15147ed31746SSzymon Olewniczak    if (!blank($query)) {
151556fe6664SAndreas Gohr        $evt = new Doku_Event('MEDIA_SEARCH', $evdata);
1516bf1f3ac4Ssarnowski        if ($evt->advise_before()) {
151756fe6664SAndreas Gohr            $dir = utf8_encodeFN(str_replace(':','/',$evdata['ns']));
151876472096SSzymon Olewniczak            $quoted = preg_quote($evdata['query'],'/');
151976472096SSzymon Olewniczak            //apply globbing
152023e31e76SSzymon Olewniczak            $quoted = str_replace(array('\*', '\?'), array('.*', '.'), $quoted, $count);
152123e31e76SSzymon Olewniczak
152223e31e76SSzymon Olewniczak            //if we use globbing file name must match entirely but may be preceded by arbitrary namespace
152323e31e76SSzymon Olewniczak            if ($count > 0) $quoted = '^([^:]*:)*'.$quoted.'$';
152423e31e76SSzymon Olewniczak
152576472096SSzymon Olewniczak            $pattern = '/'.$quoted.'/i';
152656fe6664SAndreas Gohr            search($evdata['data'],
152756fe6664SAndreas Gohr                    $conf['mediadir'],
152856fe6664SAndreas Gohr                    'search_media',
152956fe6664SAndreas Gohr                    array('showmsg'=>false,'pattern'=>$pattern),
153000e3e394SChristopher Smith                    $dir,
153100e3e394SChristopher Smith                    1,
153200e3e394SChristopher Smith                    $sort);
1533bf1f3ac4Ssarnowski        }
1534bf1f3ac4Ssarnowski        $evt->advise_after();
1535bf1f3ac4Ssarnowski        unset($evt);
153656fe6664SAndreas Gohr    }
1537bf1f3ac4Ssarnowski
1538d9162c6cSKate Arzamastseva    if (!$fullscreen) {
153956fe6664SAndreas Gohr        echo '<h1 id="media__ns">'.sprintf($lang['searchmedia_in'],hsc($ns).':*').'</h1>'.NL;
154056fe6664SAndreas Gohr        media_searchform($ns,$query);
1541d9162c6cSKate Arzamastseva    }
154256fe6664SAndreas Gohr
154356fe6664SAndreas Gohr    if(!count($evdata['data'])){
1544bf1f3ac4Ssarnowski        echo '<div class="nothing">'.$lang['nothingfound'].'</div>'.NL;
15455b9353faSKate Arzamastseva    }else {
15465b9353faSKate Arzamastseva        if ($fullscreen) {
1547554a8c9fSAdrian Lang            echo '<ul class="' . _media_get_list_type() . '">';
15485b9353faSKate Arzamastseva        }
15495b9353faSKate Arzamastseva        foreach($evdata['data'] as $item){
1550d9162c6cSKate Arzamastseva            if (!$fullscreen) media_printfile($item,$item['perm'],'',true);
1551db738de5SKate Arzamastseva            else media_printfile_thumbs($item,$item['perm'],false,true);
1552bf1f3ac4Ssarnowski        }
155394add303SAnika Henke        if ($fullscreen) echo '</ul>'.NL;
15545b9353faSKate Arzamastseva    }
1555bf1f3ac4Ssarnowski}
1556bf1f3ac4Ssarnowski
1557bf1f3ac4Ssarnowski/**
15583df72098SAndreas Gohr * Formats and prints one file in the list
1559e0c26282SGerrit Uitslag *
1560e0c26282SGerrit Uitslag * @param array     $item
1561e0c26282SGerrit Uitslag * @param int       $auth              permission level
1562e0c26282SGerrit Uitslag * @param string    $jump              item id
1563e0c26282SGerrit Uitslag * @param bool      $display_namespace
15643df72098SAndreas Gohr */
1565bf1f3ac4Ssarnowskifunction media_printfile($item,$auth,$jump,$display_namespace=false){
156664c9cfd5SAndreas Gohr    global $lang;
156764c9cfd5SAndreas Gohr
15683df72098SAndreas Gohr    // Prepare zebra coloring
15693df72098SAndreas Gohr    // I always wanted to use this variable name :-D
15703df72098SAndreas Gohr    static $twibble = 1;
15713df72098SAndreas Gohr    $twibble *= -1;
15723df72098SAndreas Gohr    $zebra = ($twibble == -1) ? 'odd' : 'even';
15733df72098SAndreas Gohr
15743df72098SAndreas Gohr    // Automatically jump to recent action
15753df72098SAndreas Gohr    if($jump == $item['id']) {
15763df72098SAndreas Gohr        $jump = ' id="scroll__here" ';
15773df72098SAndreas Gohr    }else{
15783df72098SAndreas Gohr        $jump = '';
15793df72098SAndreas Gohr    }
15803df72098SAndreas Gohr
15813df72098SAndreas Gohr    // Prepare fileicons
1582ebc28e69SAndreas Gohr    list($ext) = mimetype($item['file'],false);
15833df72098SAndreas Gohr    $class = preg_replace('/[^_\-a-z0-9]+/i','_',$ext);
15843df72098SAndreas Gohr    $class = 'select mediafile mf_'.$class;
15853df72098SAndreas Gohr
15863df72098SAndreas Gohr    // Prepare filename
15873df72098SAndreas Gohr    $file = utf8_decodeFN($item['file']);
15883df72098SAndreas Gohr
15893df72098SAndreas Gohr    // Prepare info
15903df72098SAndreas Gohr    $info = '';
15913df72098SAndreas Gohr    if($item['isimg']){
15923df72098SAndreas Gohr        $info .= (int) $item['meta']->getField('File.Width');
15933df72098SAndreas Gohr        $info .= '&#215;';
15943df72098SAndreas Gohr        $info .= (int) $item['meta']->getField('File.Height');
15953df72098SAndreas Gohr        $info .= ' ';
15963df72098SAndreas Gohr    }
1597f2263577SAndreas Gohr    $info .= '<i>'.dformat($item['mtime']).'</i>';
15985e7fa82eSAndreas Gohr    $info .= ' ';
15993df72098SAndreas Gohr    $info .= filesize_h($item['size']);
16003df72098SAndreas Gohr
1601c9f56829SAndreas Gohr    // output
160202eb484fSAndreas Gohr    echo '<div class="'.$zebra.'"'.$jump.' title="'.hsc($item['id']).'">'.NL;
1603c9f56829SAndreas Gohr    if (!$display_namespace) {
160463e967bdSAnika Henke        echo '<a id="h_:'.$item['id'].'" class="'.$class.'">'.hsc($file).'</a> ';
1605c9f56829SAndreas Gohr    } else {
160663e967bdSAnika Henke        echo '<a id="h_:'.$item['id'].'" class="'.$class.'">'.hsc($item['id']).'</a><br/>';
1607c9f56829SAndreas Gohr    }
16083df72098SAndreas Gohr    echo '<span class="info">('.$info.')</span>'.NL;
160930fd72fbSKate Arzamastseva
161030fd72fbSKate Arzamastseva    // view button
161130fd72fbSKate Arzamastseva    $link = ml($item['id'],'',true);
161230fd72fbSKate Arzamastseva    echo ' <a href="'.$link.'" target="_blank"><img src="'.DOKU_BASE.'lib/images/magnifier.png" '.
161330fd72fbSKate Arzamastseva        'alt="'.$lang['mediaview'].'" title="'.$lang['mediaview'].'" class="btn" /></a>';
161430fd72fbSKate Arzamastseva
1615f20ead66SAndreas Gohr    // mediamanager button
1616eea07c23SAnika Henke    $link = wl('',array('do'=>'media','image'=>$item['id'],'ns'=>getNS($item['id'])));
1617f20ead66SAndreas Gohr    echo ' <a href="'.$link.'" target="_blank"><img src="'.DOKU_BASE.'lib/images/mediamanager.png" '.
1618f20ead66SAndreas Gohr        'alt="'.$lang['btn_media'].'" title="'.$lang['btn_media'].'" class="btn" /></a>';
1619f20ead66SAndreas Gohr
1620f20ead66SAndreas Gohr    // delete button
1621f20ead66SAndreas Gohr    if($item['writable'] && $auth >= AUTH_DELETE){
1622f20ead66SAndreas Gohr        $link = DOKU_BASE.'lib/exe/mediamanager.php?delete='.rawurlencode($item['id']).
1623f20ead66SAndreas Gohr            '&amp;sectok='.getSecurityToken();
1624f20ead66SAndreas Gohr        echo ' <a href="'.$link.'" class="btn_media_delete" title="'.$item['id'].'">'.
1625f20ead66SAndreas Gohr            '<img src="'.DOKU_BASE.'lib/images/trash.png" alt="'.$lang['btn_delete'].'" '.
1626f20ead66SAndreas Gohr            'title="'.$lang['btn_delete'].'" class="btn" /></a>';
1627f20ead66SAndreas Gohr    }
1628f20ead66SAndreas Gohr
1629f495da32SAnika Henke    echo '<div class="example" id="ex_'.str_replace(':','_',$item['id']).'">';
16300b173dceSAndreas Gohr    echo $lang['mediausage'].' <code>{{:'.$item['id'].'}}</code>';
163164c9cfd5SAndreas Gohr    echo '</div>';
16323df72098SAndreas Gohr    if($item['isimg']) media_printimgdetail($item);
16333df72098SAndreas Gohr    echo '<div class="clearer"></div>'.NL;
16343df72098SAndreas Gohr    echo '</div>'.NL;
16353df72098SAndreas Gohr}
16363df72098SAndreas Gohr
1637c6571d58SAndreas Gohr/**
1638c6571d58SAndreas Gohr * Display a media icon
1639c6571d58SAndreas Gohr *
164042ea7f44SGerrit Uitslag * @param string $filename media id
1641c6571d58SAndreas Gohr * @param string $size     the size subfolder, if not specified 16x16 is used
164242ea7f44SGerrit Uitslag * @return string html
1643c6571d58SAndreas Gohr */
1644c6571d58SAndreas Gohrfunction media_printicon($filename, $size=''){
1645ebc28e69SAndreas Gohr    list($ext) = mimetype(mediaFN($filename),false);
164623786fd7SKate Arzamastseva
164779e79377SAndreas Gohr    if (file_exists(DOKU_INC.'lib/images/fileicons/'.$size.'/'.$ext.'.png')) {
1648c6571d58SAndreas Gohr        $icon = DOKU_BASE.'lib/images/fileicons/'.$size.'/'.$ext.'.png';
164923786fd7SKate Arzamastseva    } else {
1650c6571d58SAndreas Gohr        $icon = DOKU_BASE.'lib/images/fileicons/'.$size.'/file.png';
165123786fd7SKate Arzamastseva    }
165223786fd7SKate Arzamastseva
1653421ec38eSKate Arzamastseva    return '<img src="'.$icon.'" alt="'.$filename.'" class="icon" />';
165423786fd7SKate Arzamastseva}
165523786fd7SKate Arzamastseva
16563df72098SAndreas Gohr/**
1657d9162c6cSKate Arzamastseva * Formats and prints one file in the list in the thumbnails view
1658d9162c6cSKate Arzamastseva *
1659d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1660e0c26282SGerrit Uitslag *
1661e0c26282SGerrit Uitslag * @param array       $item
166242ea7f44SGerrit Uitslag * @param int         $auth              permission level
166342ea7f44SGerrit Uitslag * @param bool|string $jump              item id
1664e0c26282SGerrit Uitslag * @param bool        $display_namespace
1665d9162c6cSKate Arzamastseva */
1666db738de5SKate Arzamastsevafunction media_printfile_thumbs($item,$auth,$jump=false,$display_namespace=false){
1667d9162c6cSKate Arzamastseva
1668d9162c6cSKate Arzamastseva    // Prepare filename
1669d9162c6cSKate Arzamastseva    $file = utf8_decodeFN($item['file']);
1670d9162c6cSKate Arzamastseva
1671030dd1d9SKate Arzamastseva    // output
167202eb484fSAndreas Gohr    echo '<li><dl title="'.hsc($item['id']).'">'.NL;
167323786fd7SKate Arzamastseva
167495b451bcSAdrian Lang        echo '<dt>';
16756b467722SKate Arzamastseva    if($item['isimg']) {
16766b467722SKate Arzamastseva        media_printimgdetail($item, true);
167723786fd7SKate Arzamastseva
16786b467722SKate Arzamastseva    } else {
167963e967bdSAnika Henke        echo '<a id="d_:'.$item['id'].'" class="image" title="'.$item['id'].'" href="'.
168030fd72fbSKate Arzamastseva            media_managerURL(array('image' => hsc($item['id']), 'ns' => getNS($item['id']),
168195b451bcSAdrian Lang            'tab_details' => 'view')).'">';
1682c6571d58SAndreas Gohr        echo media_printicon($item['id'], '32x32');
168395b451bcSAdrian Lang        echo '</a>';
16846b467722SKate Arzamastseva    }
168594add303SAnika Henke    echo '</dt>'.NL;
1686db738de5SKate Arzamastseva    if (!$display_namespace) {
1687db738de5SKate Arzamastseva        $name = hsc($file);
1688db738de5SKate Arzamastseva    } else {
1689db738de5SKate Arzamastseva        $name = hsc($item['id']);
1690db738de5SKate Arzamastseva    }
169195b451bcSAdrian Lang    echo '<dd class="name"><a href="'.media_managerURL(array('image' => hsc($item['id']), 'ns' => getNS($item['id']),
169263e967bdSAnika Henke        'tab_details' => 'view')).'" id="h_:'.$item['id'].'">'.$name.'</a></dd>'.NL;
1693db738de5SKate Arzamastseva
1694d9162c6cSKate Arzamastseva    if($item['isimg']){
1695322111f0SKate Arzamastseva        $size = '';
1696322111f0SKate Arzamastseva        $size .= (int) $item['meta']->getField('File.Width');
1697322111f0SKate Arzamastseva        $size .= '&#215;';
1698322111f0SKate Arzamastseva        $size .= (int) $item['meta']->getField('File.Height');
169994add303SAnika Henke        echo '<dd class="size">'.$size.'</dd>'.NL;
17006b467722SKate Arzamastseva    } else {
1701e260f93bSAnika Henke        echo '<dd class="size">&#160;</dd>'.NL;
1702d9162c6cSKate Arzamastseva    }
1703322111f0SKate Arzamastseva    $date = dformat($item['mtime']);
170494add303SAnika Henke    echo '<dd class="date">'.$date.'</dd>'.NL;
1705322111f0SKate Arzamastseva    $filesize = filesize_h($item['size']);
170694add303SAnika Henke    echo '<dd class="filesize">'.$filesize.'</dd>'.NL;
170795b451bcSAdrian Lang    echo '</dl></li>'.NL;
1708d9162c6cSKate Arzamastseva}
1709d9162c6cSKate Arzamastseva
1710d9162c6cSKate Arzamastseva/**
17115381a7eeSElan Ruusamäe * Prints a thumbnail and metainfo
1712e0c26282SGerrit Uitslag *
1713e0c26282SGerrit Uitslag * @param array $item
1714e0c26282SGerrit Uitslag * @param bool  $fullscreen
17153df72098SAndreas Gohr */
1716d9162c6cSKate Arzamastsevafunction media_printimgdetail($item, $fullscreen=false){
17173df72098SAndreas Gohr    // prepare thumbnail
171833e91473SAdrian Lang    $size = $fullscreen ? 90 : 120;
171933e91473SAdrian Lang
17203df72098SAndreas Gohr    $w = (int) $item['meta']->getField('File.Width');
17213df72098SAndreas Gohr    $h = (int) $item['meta']->getField('File.Height');
1722d9162c6cSKate Arzamastseva    if($w>$size || $h>$size){
17236b467722SKate Arzamastseva        if (!$fullscreen) {
1724d9162c6cSKate Arzamastseva            $ratio = $item['meta']->getResizeRatio($size);
17256b467722SKate Arzamastseva        } else {
17266b467722SKate Arzamastseva            $ratio = $item['meta']->getResizeRatio($size,$size);
17276b467722SKate Arzamastseva        }
17283df72098SAndreas Gohr        $w = floor($w * $ratio);
17293df72098SAndreas Gohr        $h = floor($h * $ratio);
17303df72098SAndreas Gohr    }
173196dedb92SKate Arzamastseva    $src = ml($item['id'],array('w'=>$w,'h'=>$h,'t'=>$item['mtime']));
17323df72098SAndreas Gohr    $p = array();
17336316bc71SKate Arzamastseva    if (!$fullscreen) {
173433e91473SAdrian Lang        // In fullscreen mediamanager view, image resizing is done via CSS.
17353df72098SAndreas Gohr        $p['width']  = $w;
17366316bc71SKate Arzamastseva        $p['height'] = $h;
17376316bc71SKate Arzamastseva    }
17383df72098SAndreas Gohr    $p['alt']    = $item['id'];
17393df72098SAndreas Gohr    $att = buildAttributes($p);
17403df72098SAndreas Gohr
17413df72098SAndreas Gohr    // output
1742d9162c6cSKate Arzamastseva    if ($fullscreen) {
174363e967bdSAnika Henke        echo '<a id="l_:'.$item['id'].'" class="image thumb" href="'.
174464159a61SAndreas Gohr            media_managerURL(['image' => hsc($item['id']), 'ns' => getNS($item['id']), 'tab_details' => 'view']).'">';
174580326249SAnika Henke        echo '<img src="'.$src.'" '.$att.' />';
1746d9162c6cSKate Arzamastseva        echo '</a>';
1747d9162c6cSKate Arzamastseva    }
17486316bc71SKate Arzamastseva
174933e91473SAdrian Lang    if ($fullscreen) return;
1750d9162c6cSKate Arzamastseva
17513df72098SAndreas Gohr    echo '<div class="detail">';
17523df72098SAndreas Gohr    echo '<div class="thumb">';
175363e967bdSAnika Henke    echo '<a id="d_:'.$item['id'].'" class="select">';
17543df72098SAndreas Gohr    echo '<img src="'.$src.'" '.$att.' />';
17553df72098SAndreas Gohr    echo '</a>';
17563df72098SAndreas Gohr    echo '</div>';
17573df72098SAndreas Gohr
17583df72098SAndreas Gohr    // read EXIF/IPTC data
175949ac3837Shakan.sandell    $t = $item['meta']->getField(array('IPTC.Headline','xmp.dc:title'));
17600b173dceSAndreas Gohr    $d = $item['meta']->getField(array('IPTC.Caption','EXIF.UserComment',
17613df72098SAndreas Gohr                'EXIF.TIFFImageDescription',
17623df72098SAndreas Gohr                'EXIF.TIFFUserComment'));
17630b173dceSAndreas Gohr    if(utf8_strlen($d) > 250) $d = utf8_substr($d,0,250).'...';
176449ac3837Shakan.sandell    $k = $item['meta']->getField(array('IPTC.Keywords','IPTC.Category','xmp.dc:subject'));
17653df72098SAndreas Gohr
17660b173dceSAndreas Gohr    // print EXIF/IPTC data
17670b173dceSAndreas Gohr    if($t || $d || $k ){
17680b173dceSAndreas Gohr        echo '<p>';
176965cc1598SPhy        if($t) echo '<strong>'.hsc($t).'</strong><br />';
177065cc1598SPhy        if($d) echo hsc($d).'<br />';
177165cc1598SPhy        if($t) echo '<em>'.hsc($k).'</em>';
17723df72098SAndreas Gohr        echo '</p>';
17730b173dceSAndreas Gohr    }
17743df72098SAndreas Gohr    echo '</div>';
17753df72098SAndreas Gohr}
17763df72098SAndreas Gohr
17773df72098SAndreas Gohr/**
177842ea7f44SGerrit Uitslag * Build link based on the current, adding/rewriting parameters
1779d9162c6cSKate Arzamastseva *
1780d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
178142ea7f44SGerrit Uitslag *
1782ebc28e69SAndreas Gohr * @param array|bool $params
178342ea7f44SGerrit Uitslag * @param string     $amp           separator
178442ea7f44SGerrit Uitslag * @param bool       $abs           absolute url?
178542ea7f44SGerrit Uitslag * @param bool       $params_array  return the parmeters array?
178642ea7f44SGerrit Uitslag * @return string|array - link or link parameters
1787d9162c6cSKate Arzamastseva */
1788035e07f1SKate Arzamastsevafunction media_managerURL($params=false, $amp='&amp;', $abs=false, $params_array=false) {
1789d9162c6cSKate Arzamastseva    global $ID;
17908108113cSTom N Harris    global $INPUT;
1791d9162c6cSKate Arzamastseva
179223846a98SKate Arzamastseva    $gets = array('do' => 'media');
1793554a8c9fSAdrian Lang    $media_manager_params = array('tab_files', 'tab_details', 'image', 'ns', 'list', 'sort');
179423846a98SKate Arzamastseva    foreach ($media_manager_params as $x) {
17958108113cSTom N Harris        if ($INPUT->has($x)) $gets[$x] = $INPUT->str($x);
179623846a98SKate Arzamastseva    }
1797d9162c6cSKate Arzamastseva
1798d9162c6cSKate Arzamastseva    if ($params) {
1799554a8c9fSAdrian Lang        $gets = $params + $gets;
1800d9162c6cSKate Arzamastseva    }
1801d9162c6cSKate Arzamastseva    unset($gets['id']);
1802554a8c9fSAdrian Lang    if (isset($gets['delete'])) {
18031eeeced2SKate Arzamastseva        unset($gets['image']);
18041eeeced2SKate Arzamastseva        unset($gets['tab_details']);
18051eeeced2SKate Arzamastseva    }
1806d9162c6cSKate Arzamastseva
1807035e07f1SKate Arzamastseva    if ($params_array) return $gets;
1808035e07f1SKate Arzamastseva
18096dd095f5SKate Arzamastseva    return wl($ID,$gets,$abs,$amp);
1810d9162c6cSKate Arzamastseva}
1811d9162c6cSKate Arzamastseva
1812d9162c6cSKate Arzamastseva/**
18133df72098SAndreas Gohr * Print the media upload form if permissions are correct
18143df72098SAndreas Gohr *
18153df72098SAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
1816d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1817e0c26282SGerrit Uitslag *
1818e0c26282SGerrit Uitslag * @param string $ns
1819e0c26282SGerrit Uitslag * @param int    $auth permission level
1820e0c26282SGerrit Uitslag * @param bool  $fullscreen
18213df72098SAndreas Gohr */
1822d9162c6cSKate Arzamastsevafunction media_uploadform($ns, $auth, $fullscreen = false){
18238108113cSTom N Harris    global $lang;
18248108113cSTom N Harris    global $conf;
18258108113cSTom N Harris    global $INPUT;
18263df72098SAndreas Gohr
182788a71175SKate Arzamastseva    if($auth < AUTH_UPLOAD) {
182888a71175SKate Arzamastseva        echo '<div class="nothing">'.$lang['media_perm_upload'].'</div>'.NL;
182988a71175SKate Arzamastseva        return;
183088a71175SKate Arzamastseva    }
183192cac9a9SKate Arzamastseva    $auth_ow = (($conf['mediarevisions']) ? AUTH_UPLOAD : AUTH_DELETE);
18323df72098SAndreas Gohr
183370c3cc9aSKate Arzamastseva    $update = false;
183470c3cc9aSKate Arzamastseva    $id = '';
18358108113cSTom N Harris    if ($auth >= $auth_ow && $fullscreen && $INPUT->str('mediado') == 'update') {
183670c3cc9aSKate Arzamastseva        $update = true;
18378108113cSTom N Harris        $id = cleanID($INPUT->str('image'));
183870c3cc9aSKate Arzamastseva    }
183970c3cc9aSKate Arzamastseva
1840d00ec455SAndreas Gohr    // The default HTML upload form
1841d9162c6cSKate Arzamastseva    $params = array('id'      => 'dw__upload',
1842d9162c6cSKate Arzamastseva                    'enctype' => 'multipart/form-data');
184398f03b57SKate Arzamastseva    if (!$fullscreen) {
18449de3b571SKate Arzamastseva        $params['action'] = DOKU_BASE.'lib/exe/mediamanager.php';
184598f03b57SKate Arzamastseva    } else {
184698f03b57SKate Arzamastseva        $params['action'] = media_managerURL(array('tab_files' => 'files',
18476183fb05SKate Arzamastseva            'tab_details' => 'view'), '&');
184898f03b57SKate Arzamastseva    }
1849d9162c6cSKate Arzamastseva
1850d9162c6cSKate Arzamastseva    $form = new Doku_Form($params);
1851c472bad9SKate Arzamastseva    if (!$fullscreen) echo '<div class="upload">' . $lang['mediaupload'] . '</div>';
18529f5dde7fSMichael Klier    $form->addElement(formSecurityToken());
18539f5dde7fSMichael Klier    $form->addHidden('ns', hsc($ns));
18549f5dde7fSMichael Klier    $form->addElement(form_makeOpenTag('p'));
1855fde860beSGerrit Uitslag    $form->addElement(form_makeFileField('upload', $lang['txt_upload'], 'upload__file'));
18569f5dde7fSMichael Klier    $form->addElement(form_makeCloseTag('p'));
18579f5dde7fSMichael Klier    $form->addElement(form_makeOpenTag('p'));
1858fde860beSGerrit Uitslag    $form->addElement(form_makeTextField('mediaid', noNS($id), $lang['txt_filename'], 'upload__name'));
18599f5dde7fSMichael Klier    $form->addElement(form_makeButton('submit', '', $lang['btn_upload']));
18609f5dde7fSMichael Klier    $form->addElement(form_makeCloseTag('p'));
1861cf6894dfSAndreas Gohr
186292cac9a9SKate Arzamastseva    if($auth >= $auth_ow){
18639f5dde7fSMichael Klier        $form->addElement(form_makeOpenTag('p'));
186470c3cc9aSKate Arzamastseva        $attrs = array();
186570c3cc9aSKate Arzamastseva        if ($update) $attrs['checked'] = 'checked';
186670c3cc9aSKate Arzamastseva        $form->addElement(form_makeCheckboxField('ow', 1, $lang['txt_overwrt'], 'dw__ow', 'check', $attrs));
18679f5dde7fSMichael Klier        $form->addElement(form_makeCloseTag('p'));
18683df72098SAndreas Gohr    }
1869c472bad9SKate Arzamastseva
187094add303SAnika Henke    echo NL.'<div id="mediamanager__uploader">'.NL;
18719f5dde7fSMichael Klier    html_form('upload', $form);
1872f940e4a0SAndreas Gohr
187394add303SAnika Henke    echo '</div>'.NL;
1874f940e4a0SAndreas Gohr
1875f940e4a0SAndreas Gohr    echo '<p class="maxsize">';
1876f940e4a0SAndreas Gohr    printf($lang['maxuploadsize'],filesize_h(media_getuploadsize()));
1877f940e4a0SAndreas Gohr    echo '</p>'.NL;
1878f940e4a0SAndreas Gohr
1879f940e4a0SAndreas Gohr}
1880f940e4a0SAndreas Gohr
1881f940e4a0SAndreas Gohr/**
1882f940e4a0SAndreas Gohr * Returns the size uploaded files may have
1883f940e4a0SAndreas Gohr *
1884f940e4a0SAndreas Gohr * This uses a conservative approach using the lowest number found
1885f940e4a0SAndreas Gohr * in any of the limiting ini settings
1886f940e4a0SAndreas Gohr *
1887f940e4a0SAndreas Gohr * @returns int size in bytes
1888f940e4a0SAndreas Gohr */
1889f940e4a0SAndreas Gohrfunction media_getuploadsize(){
1890f940e4a0SAndreas Gohr    $okay = 0;
1891f940e4a0SAndreas Gohr
1892f940e4a0SAndreas Gohr    $post = (int) php_to_byte(@ini_get('post_max_size'));
1893f940e4a0SAndreas Gohr    $suho = (int) php_to_byte(@ini_get('suhosin.post.max_value_length'));
1894f940e4a0SAndreas Gohr    $upld = (int) php_to_byte(@ini_get('upload_max_filesize'));
1895f940e4a0SAndreas Gohr
1896f940e4a0SAndreas Gohr    if($post && ($post < $okay || $okay == 0)) $okay = $post;
1897f940e4a0SAndreas Gohr    if($suho && ($suho < $okay || $okay == 0)) $okay = $suho;
1898f940e4a0SAndreas Gohr    if($upld && ($upld < $okay || $okay == 0)) $okay = $upld;
1899f940e4a0SAndreas Gohr
1900f940e4a0SAndreas Gohr    return $okay;
19019f5dde7fSMichael Klier}
19023df72098SAndreas Gohr
19033df72098SAndreas Gohr/**
1904bf1f3ac4Ssarnowski * Print the search field form
1905bf1f3ac4Ssarnowski *
1906bf1f3ac4Ssarnowski * @author Tobias Sarnowski <sarnowski@cosmocode.de>
1907d9162c6cSKate Arzamastseva * @author Kate Arzamastseva <pshns@ukr.net>
1908e0c26282SGerrit Uitslag *
1909e0c26282SGerrit Uitslag * @param string $ns
1910e0c26282SGerrit Uitslag * @param string $query
1911e0c26282SGerrit Uitslag * @param bool $fullscreen
1912bf1f3ac4Ssarnowski */
1913d9162c6cSKate Arzamastsevafunction media_searchform($ns,$query='',$fullscreen=false){
1914bf1f3ac4Ssarnowski    global $lang;
1915bf1f3ac4Ssarnowski
1916bf1f3ac4Ssarnowski    // The default HTML search form
1917d9162c6cSKate Arzamastseva    $params = array('id' => 'dw__mediasearch');
1918554a8c9fSAdrian Lang    if (!$fullscreen) {
1919554a8c9fSAdrian Lang        $params['action'] = DOKU_BASE.'lib/exe/mediamanager.php';
1920554a8c9fSAdrian Lang    } else {
1921554a8c9fSAdrian Lang        $params['action'] = media_managerURL(array(), '&');
1922554a8c9fSAdrian Lang    }
1923d9162c6cSKate Arzamastseva    $form = new Doku_Form($params);
1924c9f56829SAndreas Gohr    $form->addHidden('ns', $ns);
1925554a8c9fSAdrian Lang    $form->addHidden($fullscreen ? 'mediado' : 'do', 'searchlist');
1926554a8c9fSAdrian Lang
1927bf1f3ac4Ssarnowski    $form->addElement(form_makeOpenTag('p'));
192864159a61SAndreas Gohr    $form->addElement(
192964159a61SAndreas Gohr        form_makeTextField(
193064159a61SAndreas Gohr            'q',
193164159a61SAndreas Gohr            $query,
193264159a61SAndreas Gohr            $lang['searchmedia'],
193364159a61SAndreas Gohr            '',
193464159a61SAndreas Gohr            '',
193564159a61SAndreas Gohr            array('title' => sprintf($lang['searchmedia_in'], hsc($ns) . ':*'))
193664159a61SAndreas Gohr        )
193764159a61SAndreas Gohr    );
1938bf1f3ac4Ssarnowski    $form->addElement(form_makeButton('submit', '', $lang['btn_search']));
1939bf1f3ac4Ssarnowski    $form->addElement(form_makeCloseTag('p'));
1940bf1f3ac4Ssarnowski    html_form('searchmedia', $form);
1941bf1f3ac4Ssarnowski}
1942bf1f3ac4Ssarnowski
1943bf1f3ac4Ssarnowski/**
19443df72098SAndreas Gohr * Build a tree outline of available media namespaces
19453df72098SAndreas Gohr *
19463df72098SAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
1947e0c26282SGerrit Uitslag *
1948e0c26282SGerrit Uitslag * @param string $ns
19493df72098SAndreas Gohr */
19503df72098SAndreas Gohrfunction media_nstree($ns){
19513df72098SAndreas Gohr    global $conf;
1952256ca81eSAndreas Gohr    global $lang;
19533df72098SAndreas Gohr
19543df72098SAndreas Gohr    // currently selected namespace
19553df72098SAndreas Gohr    $ns  = cleanID($ns);
19563df72098SAndreas Gohr    if(empty($ns)){
1957de3eb1d7SAdrian Lang        global $ID;
1958dd90013aSMichael Hamann        $ns = (string)getNS($ID);
19593df72098SAndreas Gohr    }
1960dd90013aSMichael Hamann
1961dd90013aSMichael Hamann    $ns_dir  = utf8_encodeFN(str_replace(':','/',$ns));
19623df72098SAndreas Gohr
19633df72098SAndreas Gohr    $data = array();
1964dd90013aSMichael Hamann    search($data,$conf['mediadir'],'search_index',array('ns' => $ns_dir, 'nofiles' => true));
19653df72098SAndreas Gohr
19663df72098SAndreas Gohr    // wrap a list with the root level around the other namespaces
1967a1dee2b9SAdrian Lang    array_unshift($data, array('level' => 0, 'id' => '', 'open' =>'true',
1968a1dee2b9SAdrian Lang                               'label' => '['.$lang['mediaroot'].']'));
19693df72098SAndreas Gohr
1970dd90013aSMichael Hamann    // insert the current ns into the hierarchy if it isn't already part of it
1971dd90013aSMichael Hamann    $ns_parts = explode(':', $ns);
1972dd90013aSMichael Hamann    $tmp_ns = '';
1973dd90013aSMichael Hamann    $pos = 0;
1974dd90013aSMichael Hamann    foreach ($ns_parts as $level => $part) {
1975dd90013aSMichael Hamann        if ($tmp_ns) $tmp_ns .= ':'.$part;
1976dd90013aSMichael Hamann        else $tmp_ns = $part;
1977dd90013aSMichael Hamann
1978dd90013aSMichael Hamann        // find the namespace parts or insert them
1979dd90013aSMichael Hamann        while ($data[$pos]['id'] != $tmp_ns) {
198064159a61SAndreas Gohr            if (
198164159a61SAndreas Gohr                $pos >= count($data) ||
198264159a61SAndreas Gohr                (
198364159a61SAndreas Gohr                    $data[$pos]['level'] <= $level+1 &&
198464159a61SAndreas Gohr                    strnatcmp(utf8_encodeFN($data[$pos]['id']), utf8_encodeFN($tmp_ns)) > 0
198564159a61SAndreas Gohr                )
198664159a61SAndreas Gohr            ) {
1987dd90013aSMichael Hamann                array_splice($data, $pos, 0, array(array('level' => $level+1, 'id' => $tmp_ns, 'open' => 'true')));
1988dd90013aSMichael Hamann                break;
1989dd90013aSMichael Hamann            }
1990dd90013aSMichael Hamann            ++$pos;
1991dd90013aSMichael Hamann        }
1992dd90013aSMichael Hamann    }
1993dd90013aSMichael Hamann
19943df72098SAndreas Gohr    echo html_buildlist($data,'idx','media_nstree_item','media_nstree_li');
19953df72098SAndreas Gohr}
19963df72098SAndreas Gohr
19973df72098SAndreas Gohr/**
19983df72098SAndreas Gohr * Userfunction for html_buildlist
19993df72098SAndreas Gohr *
20003df72098SAndreas Gohr * Prints a media namespace tree item
20013df72098SAndreas Gohr *
20023df72098SAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
200342ea7f44SGerrit Uitslag *
200442ea7f44SGerrit Uitslag * @param array $item
200542ea7f44SGerrit Uitslag * @return string html
20063df72098SAndreas Gohr */
20073df72098SAndreas Gohrfunction media_nstree_item($item){
20088108113cSTom N Harris    global $INPUT;
20093df72098SAndreas Gohr    $pos   = strrpos($item['id'], ':');
20103df72098SAndreas Gohr    $label = substr($item['id'], $pos > 0 ? $pos + 1 : 0);
20110e80bb5eSChristopher Smith    if(empty($item['label'])) $item['label'] = $label;
20123df72098SAndreas Gohr
20133df72098SAndreas Gohr    $ret  = '';
20148108113cSTom N Harris    if (!($INPUT->str('do') == 'media'))
20153df72098SAndreas Gohr    $ret .= '<a href="'.DOKU_BASE.'lib/exe/mediamanager.php?ns='.idfilter($item['id']).'" class="idx_dir">';
2016370d3435SAdrian Lang    else $ret .= '<a href="'.media_managerURL(array('ns' => idfilter($item['id'], false), 'tab_files' => 'files'))
201723846a98SKate Arzamastseva        .'" class="idx_dir">';
20183df72098SAndreas Gohr    $ret .= $item['label'];
20193df72098SAndreas Gohr    $ret .= '</a>';
20203df72098SAndreas Gohr    return $ret;
20213df72098SAndreas Gohr}
20223df72098SAndreas Gohr
20233df72098SAndreas Gohr/**
20243df72098SAndreas Gohr * Userfunction for html_buildlist
20253df72098SAndreas Gohr *
20263df72098SAndreas Gohr * Prints a media namespace tree item opener
20273df72098SAndreas Gohr *
20283df72098SAndreas Gohr * @author Andreas Gohr <andi@splitbrain.org>
202942ea7f44SGerrit Uitslag *
203042ea7f44SGerrit Uitslag * @param array $item
203142ea7f44SGerrit Uitslag * @return string html
20323df72098SAndreas Gohr */
20333df72098SAndreas Gohrfunction media_nstree_li($item){
20343df72098SAndreas Gohr    $class='media level'.$item['level'];
20353df72098SAndreas Gohr    if($item['open']){
20363df72098SAndreas Gohr        $class .= ' open';
20373df72098SAndreas Gohr        $img   = DOKU_BASE.'lib/images/minus.gif';
2038e260f93bSAnika Henke        $alt   = '−';
20393df72098SAndreas Gohr    }else{
20403df72098SAndreas Gohr        $class .= ' closed';
20413df72098SAndreas Gohr        $img   = DOKU_BASE.'lib/images/plus.gif';
20427af1b404SAnika Henke        $alt   = '+';
20433df72098SAndreas Gohr    }
2044231b8c34SPierre Spring    // TODO: only deliver an image if it actually has a subtree...
20453df72098SAndreas Gohr    return '<li class="'.$class.'">'.
20467af1b404SAnika Henke        '<img src="'.$img.'" alt="'.$alt.'" />';
20473df72098SAndreas Gohr}
204813c08e2fSMichael Klier
204913c08e2fSMichael Klier/**
205013c08e2fSMichael Klier * Resizes the given image to the given size
205113c08e2fSMichael Klier *
205213c08e2fSMichael Klier * @author  Andreas Gohr <andi@splitbrain.org>
205342ea7f44SGerrit Uitslag *
205442ea7f44SGerrit Uitslag * @param string $file filename, path to file
205542ea7f44SGerrit Uitslag * @param string $ext  extension
205642ea7f44SGerrit Uitslag * @param int    $w    desired width
205742ea7f44SGerrit Uitslag * @param int    $h    desired height
205842ea7f44SGerrit Uitslag * @return string path to resized or original size if failed
205913c08e2fSMichael Klier */
206013c08e2fSMichael Klierfunction media_resize_image($file, $ext, $w, $h=0){
206113c08e2fSMichael Klier    global $conf;
206213c08e2fSMichael Klier
206313c08e2fSMichael Klier    $info = @getimagesize($file); //get original size
206413c08e2fSMichael Klier    if($info == false) return $file; // that's no image - it's a spaceship!
206513c08e2fSMichael Klier
206613c08e2fSMichael Klier    if(!$h) $h = round(($w * $info[1]) / $info[0]);
206777450f40Slisps    if(!$w) $w = round(($h * $info[0]) / $info[1]);
206813c08e2fSMichael Klier
206913c08e2fSMichael Klier    // we wont scale up to infinity
207013c08e2fSMichael Klier    if($w > 2000 || $h > 2000) return $file;
207113c08e2fSMichael Klier
2072f0b65004SChristopher Smith    // resize necessary? - (w,h) = native dimensions
2073f0b65004SChristopher Smith    if(($w == $info[0]) && ($h == $info[1])) return $file;
2074f0b65004SChristopher Smith
207513c08e2fSMichael Klier    //cache
207613c08e2fSMichael Klier    $local = getCacheName($file,'.media.'.$w.'x'.$h.'.'.$ext);
207713c08e2fSMichael Klier    $mtime = @filemtime($local); // 0 if not exists
207813c08e2fSMichael Klier
207913c08e2fSMichael Klier    if($mtime > filemtime($file) ||
208013c08e2fSMichael Klier        media_resize_imageIM($ext, $file, $info[0], $info[1], $local, $w, $h) ||
208142ea7f44SGerrit Uitslag        media_resize_imageGD($ext, $file, $info[0], $info[1], $local, $w, $h)
208242ea7f44SGerrit Uitslag    ) {
20830e80bb5eSChristopher Smith        if(!empty($conf['fperm'])) @chmod($local, $conf['fperm']);
208413c08e2fSMichael Klier        return $local;
208513c08e2fSMichael Klier    }
208613c08e2fSMichael Klier    //still here? resizing failed
208713c08e2fSMichael Klier    return $file;
208813c08e2fSMichael Klier}
208913c08e2fSMichael Klier
209013c08e2fSMichael Klier/**
209113c08e2fSMichael Klier * Crops the given image to the wanted ratio, then calls media_resize_image to scale it
209213c08e2fSMichael Klier * to the wanted size
209313c08e2fSMichael Klier *
209413c08e2fSMichael Klier * Crops are centered horizontally but prefer the upper third of an vertical
209513c08e2fSMichael Klier * image because most pics are more interesting in that area (rule of thirds)
209613c08e2fSMichael Klier *
209713c08e2fSMichael Klier * @author  Andreas Gohr <andi@splitbrain.org>
209842ea7f44SGerrit Uitslag *
209942ea7f44SGerrit Uitslag * @param string $file filename, path to file
210042ea7f44SGerrit Uitslag * @param string $ext  extension
210142ea7f44SGerrit Uitslag * @param int    $w    desired width
210242ea7f44SGerrit Uitslag * @param int    $h    desired height
210342ea7f44SGerrit Uitslag * @return string path to resized or original size if failed
210413c08e2fSMichael Klier */
210513c08e2fSMichael Klierfunction media_crop_image($file, $ext, $w, $h=0){
210613c08e2fSMichael Klier    global $conf;
210713c08e2fSMichael Klier
210813c08e2fSMichael Klier    if(!$h) $h = $w;
210913c08e2fSMichael Klier    $info = @getimagesize($file); //get original size
211013c08e2fSMichael Klier    if($info == false) return $file; // that's no image - it's a spaceship!
211113c08e2fSMichael Klier
211213c08e2fSMichael Klier    // calculate crop size
211313c08e2fSMichael Klier    $fr = $info[0]/$info[1];
211413c08e2fSMichael Klier    $tr = $w/$h;
2115fd9d3278SChristopher Smith
2116fd9d3278SChristopher Smith    // check if the crop can be handled completely by resize,
2117fd9d3278SChristopher Smith    // i.e. the specified width & height match the aspect ratio of the source image
2118fd9d3278SChristopher Smith    if ($w == round($h*$fr)) {
2119fd9d3278SChristopher Smith        return media_resize_image($file, $ext, $w);
2120fd9d3278SChristopher Smith    }
2121fd9d3278SChristopher Smith
212213c08e2fSMichael Klier    if($tr >= 1){
212313c08e2fSMichael Klier        if($tr > $fr){
212413c08e2fSMichael Klier            $cw = $info[0];
2125d02ff930SChristopher Smith            $ch = (int) ($info[0]/$tr);
212613c08e2fSMichael Klier        }else{
2127d02ff930SChristopher Smith            $cw = (int) ($info[1]*$tr);
212813c08e2fSMichael Klier            $ch = $info[1];
212913c08e2fSMichael Klier        }
213013c08e2fSMichael Klier    }else{
213113c08e2fSMichael Klier        if($tr < $fr){
2132d02ff930SChristopher Smith            $cw = (int) ($info[1]*$tr);
213313c08e2fSMichael Klier            $ch = $info[1];
213413c08e2fSMichael Klier        }else{
213513c08e2fSMichael Klier            $cw = $info[0];
2136d02ff930SChristopher Smith            $ch = (int) ($info[0]/$tr);
213713c08e2fSMichael Klier        }
213813c08e2fSMichael Klier    }
213913c08e2fSMichael Klier    // calculate crop offset
2140d02ff930SChristopher Smith    $cx = (int) (($info[0]-$cw)/2);
2141d02ff930SChristopher Smith    $cy = (int) (($info[1]-$ch)/3);
214213c08e2fSMichael Klier
214313c08e2fSMichael Klier    //cache
214413c08e2fSMichael Klier    $local = getCacheName($file,'.media.'.$cw.'x'.$ch.'.crop.'.$ext);
214513c08e2fSMichael Klier    $mtime = @filemtime($local); // 0 if not exists
214613c08e2fSMichael Klier
21472e0ce437SAndreas Gohr    if( $mtime > @filemtime($file) ||
214813c08e2fSMichael Klier            media_crop_imageIM($ext,$file,$info[0],$info[1],$local,$cw,$ch,$cx,$cy) ||
214913c08e2fSMichael Klier            media_resize_imageGD($ext,$file,$cw,$ch,$local,$cw,$ch,$cx,$cy) ){
21500e80bb5eSChristopher Smith        if(!empty($conf['fperm'])) @chmod($local, $conf['fperm']);
215113c08e2fSMichael Klier        return media_resize_image($local,$ext, $w, $h);
215213c08e2fSMichael Klier    }
215313c08e2fSMichael Klier
215413c08e2fSMichael Klier    //still here? cropping failed
215513c08e2fSMichael Klier    return media_resize_image($file,$ext, $w, $h);
215613c08e2fSMichael Klier}
215713c08e2fSMichael Klier
215813c08e2fSMichael Klier/**
21590f4e0092SChristopher Smith * Calculate a token to be used to verify fetch requests for resized or
21600f4e0092SChristopher Smith * cropped images have been internally generated - and prevent external
21610f4e0092SChristopher Smith * DDOS attacks via fetch
21620f4e0092SChristopher Smith *
21633c124064SAndreas Gohr * @author Christopher Smith <chris@jalakai.co.uk>
21643c124064SAndreas Gohr *
21650f4e0092SChristopher Smith * @param string  $id    id of the image
21660f4e0092SChristopher Smith * @param int     $w     resize/crop width
21670f4e0092SChristopher Smith * @param int     $h     resize/crop height
216842ea7f44SGerrit Uitslag * @return string token or empty string if no token required
21690f4e0092SChristopher Smith */
21700f4e0092SChristopher Smithfunction media_get_token($id,$w,$h){
21710f4e0092SChristopher Smith    // token is only required for modified images
2172cc036f74SKlap-in    if ($w || $h || media_isexternal($id)) {
21733c124064SAndreas Gohr        $token = $id;
21740f4e0092SChristopher Smith        if ($w) $token .= '.'.$w;
21750f4e0092SChristopher Smith        if ($h) $token .= '.'.$h;
21760f4e0092SChristopher Smith
2177c3cc6e05SAndreas Gohr        return substr(\dokuwiki\PassHash::hmac('md5', $token, auth_cookiesalt()),0,6);
21780f4e0092SChristopher Smith    }
21790f4e0092SChristopher Smith
21800f4e0092SChristopher Smith    return '';
21810f4e0092SChristopher Smith}
21820f4e0092SChristopher Smith
21830f4e0092SChristopher Smith/**
218413c08e2fSMichael Klier * Download a remote file and return local filename
218513c08e2fSMichael Klier *
218613c08e2fSMichael Klier * returns false if download fails. Uses cached file if available and
218713c08e2fSMichael Klier * wanted
218813c08e2fSMichael Klier *
218913c08e2fSMichael Klier * @author  Andreas Gohr <andi@splitbrain.org>
219013c08e2fSMichael Klier * @author  Pavel Vitis <Pavel.Vitis@seznam.cz>
219142ea7f44SGerrit Uitslag *
219242ea7f44SGerrit Uitslag * @param string $url
219342ea7f44SGerrit Uitslag * @param string $ext   extension
219442ea7f44SGerrit Uitslag * @param int    $cache cachetime in seconds
219542ea7f44SGerrit Uitslag * @return false|string path to cached file
219613c08e2fSMichael Klier */
219713c08e2fSMichael Klierfunction media_get_from_URL($url,$ext,$cache){
219813c08e2fSMichael Klier    global $conf;
219913c08e2fSMichael Klier
220013c08e2fSMichael Klier    // if no cache or fetchsize just redirect
220113c08e2fSMichael Klier    if ($cache==0)           return false;
220213c08e2fSMichael Klier    if (!$conf['fetchsize']) return false;
220313c08e2fSMichael Klier
220413c08e2fSMichael Klier    $local = getCacheName(strtolower($url),".media.$ext");
220513c08e2fSMichael Klier    $mtime = @filemtime($local); // 0 if not exists
220613c08e2fSMichael Klier
220713c08e2fSMichael Klier    //decide if download needed:
220813c08e2fSMichael Klier    if(($mtime == 0) || // cache does not exist
220913c08e2fSMichael Klier        ($cache != -1 && $mtime < time() - $cache) // 'recache' and cache has expired
221013c08e2fSMichael Klier    ) {
221113c08e2fSMichael Klier        if(media_image_download($url, $local)) {
221213c08e2fSMichael Klier            return $local;
221313c08e2fSMichael Klier        } else {
221413c08e2fSMichael Klier            return false;
221513c08e2fSMichael Klier        }
221613c08e2fSMichael Klier    }
221713c08e2fSMichael Klier
221813c08e2fSMichael Klier    //if cache exists use it else
221913c08e2fSMichael Klier    if($mtime) return $local;
222013c08e2fSMichael Klier
222113c08e2fSMichael Klier    //else return false
222213c08e2fSMichael Klier    return false;
222313c08e2fSMichael Klier}
222413c08e2fSMichael Klier
222513c08e2fSMichael Klier/**
222613c08e2fSMichael Klier * Download image files
222713c08e2fSMichael Klier *
222813c08e2fSMichael Klier * @author Andreas Gohr <andi@splitbrain.org>
222942ea7f44SGerrit Uitslag *
223042ea7f44SGerrit Uitslag * @param string $url
223142ea7f44SGerrit Uitslag * @param string $file path to file in which to put the downloaded content
223242ea7f44SGerrit Uitslag * @return bool
223313c08e2fSMichael Klier */
223413c08e2fSMichael Klierfunction media_image_download($url,$file){
223513c08e2fSMichael Klier    global $conf;
223613c08e2fSMichael Klier    $http = new DokuHTTPClient();
2237a5951419SAndreas Gohr    $http->keep_alive = false; // we do single ops here, no need for keep-alive
2238a5951419SAndreas Gohr
223913c08e2fSMichael Klier    $http->max_bodysize = $conf['fetchsize'];
224013c08e2fSMichael Klier    $http->timeout = 25; //max. 25 sec
224113c08e2fSMichael Klier    $http->header_regexp = '!\r\nContent-Type: image/(jpe?g|gif|png)!i';
224213c08e2fSMichael Klier
224313c08e2fSMichael Klier    $data = $http->get($url);
224413c08e2fSMichael Klier    if(!$data) return false;
224513c08e2fSMichael Klier
224679e79377SAndreas Gohr    $fileexists = file_exists($file);
224713c08e2fSMichael Klier    $fp = @fopen($file,"w");
224813c08e2fSMichael Klier    if(!$fp) return false;
224913c08e2fSMichael Klier    fwrite($fp,$data);
225013c08e2fSMichael Klier    fclose($fp);
225113c08e2fSMichael Klier    if(!$fileexists and $conf['fperm']) chmod($file, $conf['fperm']);
225213c08e2fSMichael Klier
225313c08e2fSMichael Klier    // check if it is really an image
225413c08e2fSMichael Klier    $info = @getimagesize($file);
225513c08e2fSMichael Klier    if(!$info){
225613c08e2fSMichael Klier        @unlink($file);
225713c08e2fSMichael Klier        return false;
225813c08e2fSMichael Klier    }
225913c08e2fSMichael Klier
226013c08e2fSMichael Klier    return true;
226113c08e2fSMichael Klier}
226213c08e2fSMichael Klier
226313c08e2fSMichael Klier/**
226413c08e2fSMichael Klier * resize images using external ImageMagick convert program
226513c08e2fSMichael Klier *
226613c08e2fSMichael Klier * @author Pavel Vitis <Pavel.Vitis@seznam.cz>
226713c08e2fSMichael Klier * @author Andreas Gohr <andi@splitbrain.org>
226842ea7f44SGerrit Uitslag *
226942ea7f44SGerrit Uitslag * @param string $ext     extension
227042ea7f44SGerrit Uitslag * @param string $from    filename path to file
227142ea7f44SGerrit Uitslag * @param int    $from_w  original width
227242ea7f44SGerrit Uitslag * @param int    $from_h  original height
227342ea7f44SGerrit Uitslag * @param string $to      path to resized file
227442ea7f44SGerrit Uitslag * @param int    $to_w    desired width
227542ea7f44SGerrit Uitslag * @param int    $to_h    desired height
227642ea7f44SGerrit Uitslag * @return bool
227713c08e2fSMichael Klier */
227813c08e2fSMichael Klierfunction media_resize_imageIM($ext,$from,$from_w,$from_h,$to,$to_w,$to_h){
227913c08e2fSMichael Klier    global $conf;
228013c08e2fSMichael Klier
228113c08e2fSMichael Klier    // check if convert is configured
228213c08e2fSMichael Klier    if(!$conf['im_convert']) return false;
228313c08e2fSMichael Klier
228413c08e2fSMichael Klier    // prepare command
228513c08e2fSMichael Klier    $cmd  = $conf['im_convert'];
228613c08e2fSMichael Klier    $cmd .= ' -resize '.$to_w.'x'.$to_h.'!';
228713c08e2fSMichael Klier    if ($ext == 'jpg' || $ext == 'jpeg') {
228813c08e2fSMichael Klier        $cmd .= ' -quality '.$conf['jpg_quality'];
228913c08e2fSMichael Klier    }
229013c08e2fSMichael Klier    $cmd .= " $from $to";
229113c08e2fSMichael Klier
229213c08e2fSMichael Klier    @exec($cmd,$out,$retval);
229313c08e2fSMichael Klier    if ($retval == 0) return true;
229413c08e2fSMichael Klier    return false;
229513c08e2fSMichael Klier}
229613c08e2fSMichael Klier
229713c08e2fSMichael Klier/**
229813c08e2fSMichael Klier * crop images using external ImageMagick convert program
229913c08e2fSMichael Klier *
230013c08e2fSMichael Klier * @author Andreas Gohr <andi@splitbrain.org>
230142ea7f44SGerrit Uitslag *
230242ea7f44SGerrit Uitslag * @param string $ext     extension
230342ea7f44SGerrit Uitslag * @param string $from    filename path to file
230442ea7f44SGerrit Uitslag * @param int    $from_w  original width
230542ea7f44SGerrit Uitslag * @param int    $from_h  original height
230642ea7f44SGerrit Uitslag * @param string $to      path to resized file
230742ea7f44SGerrit Uitslag * @param int    $to_w    desired width
230842ea7f44SGerrit Uitslag * @param int    $to_h    desired height
230942ea7f44SGerrit Uitslag * @param int    $ofs_x   offset of crop centre
231042ea7f44SGerrit Uitslag * @param int    $ofs_y   offset of crop centre
231142ea7f44SGerrit Uitslag * @return bool
231213c08e2fSMichael Klier */
231313c08e2fSMichael Klierfunction media_crop_imageIM($ext,$from,$from_w,$from_h,$to,$to_w,$to_h,$ofs_x,$ofs_y){
231413c08e2fSMichael Klier    global $conf;
231513c08e2fSMichael Klier
231613c08e2fSMichael Klier    // check if convert is configured
231713c08e2fSMichael Klier    if(!$conf['im_convert']) return false;
231813c08e2fSMichael Klier
231913c08e2fSMichael Klier    // prepare command
232013c08e2fSMichael Klier    $cmd  = $conf['im_convert'];
232113c08e2fSMichael Klier    $cmd .= ' -crop '.$to_w.'x'.$to_h.'+'.$ofs_x.'+'.$ofs_y;
232213c08e2fSMichael Klier    if ($ext == 'jpg' || $ext == 'jpeg') {
232313c08e2fSMichael Klier        $cmd .= ' -quality '.$conf['jpg_quality'];
232413c08e2fSMichael Klier    }
232513c08e2fSMichael Klier    $cmd .= " $from $to";
232613c08e2fSMichael Klier
232713c08e2fSMichael Klier    @exec($cmd,$out,$retval);
232813c08e2fSMichael Klier    if ($retval == 0) return true;
232913c08e2fSMichael Klier    return false;
233013c08e2fSMichael Klier}
233113c08e2fSMichael Klier
233213c08e2fSMichael Klier/**
233313c08e2fSMichael Klier * resize or crop images using PHP's libGD support
233413c08e2fSMichael Klier *
233513c08e2fSMichael Klier * @author Andreas Gohr <andi@splitbrain.org>
233613c08e2fSMichael Klier * @author Sebastian Wienecke <s_wienecke@web.de>
233742ea7f44SGerrit Uitslag *
233842ea7f44SGerrit Uitslag * @param string $ext     extension
233942ea7f44SGerrit Uitslag * @param string $from    filename path to file
234042ea7f44SGerrit Uitslag * @param int    $from_w  original width
234142ea7f44SGerrit Uitslag * @param int    $from_h  original height
234242ea7f44SGerrit Uitslag * @param string $to      path to resized file
234342ea7f44SGerrit Uitslag * @param int    $to_w    desired width
234442ea7f44SGerrit Uitslag * @param int    $to_h    desired height
234542ea7f44SGerrit Uitslag * @param int    $ofs_x   offset of crop centre
234642ea7f44SGerrit Uitslag * @param int    $ofs_y   offset of crop centre
234742ea7f44SGerrit Uitslag * @return bool
234813c08e2fSMichael Klier */
234913c08e2fSMichael Klierfunction media_resize_imageGD($ext,$from,$from_w,$from_h,$to,$to_w,$to_h,$ofs_x=0,$ofs_y=0){
235013c08e2fSMichael Klier    global $conf;
235113c08e2fSMichael Klier
235213c08e2fSMichael Klier    if($conf['gdlib'] < 1) return false; //no GDlib available or wanted
235313c08e2fSMichael Klier
235413c08e2fSMichael Klier    // check available memory
235513c08e2fSMichael Klier    if(!is_mem_available(($from_w * $from_h * 4) + ($to_w * $to_h * 4))){
235613c08e2fSMichael Klier        return false;
235713c08e2fSMichael Klier    }
235813c08e2fSMichael Klier
235913c08e2fSMichael Klier    // create an image of the given filetype
236059bc3b48SGerrit Uitslag    $image = false;
236113c08e2fSMichael Klier    if ($ext == 'jpg' || $ext == 'jpeg'){
236213c08e2fSMichael Klier        if(!function_exists("imagecreatefromjpeg")) return false;
236313c08e2fSMichael Klier        $image = @imagecreatefromjpeg($from);
236413c08e2fSMichael Klier    }elseif($ext == 'png') {
236513c08e2fSMichael Klier        if(!function_exists("imagecreatefrompng")) return false;
236613c08e2fSMichael Klier        $image = @imagecreatefrompng($from);
236713c08e2fSMichael Klier
236813c08e2fSMichael Klier    }elseif($ext == 'gif') {
236913c08e2fSMichael Klier        if(!function_exists("imagecreatefromgif")) return false;
237013c08e2fSMichael Klier        $image = @imagecreatefromgif($from);
237113c08e2fSMichael Klier    }
237213c08e2fSMichael Klier    if(!$image) return false;
237313c08e2fSMichael Klier
237459bc3b48SGerrit Uitslag    $newimg = false;
237513c08e2fSMichael Klier    if(($conf['gdlib']>1) && function_exists("imagecreatetruecolor") && $ext != 'gif'){
237613c08e2fSMichael Klier        $newimg = @imagecreatetruecolor ($to_w, $to_h);
237713c08e2fSMichael Klier    }
237813c08e2fSMichael Klier    if(!$newimg) $newimg = @imagecreate($to_w, $to_h);
237913c08e2fSMichael Klier    if(!$newimg){
238013c08e2fSMichael Klier        imagedestroy($image);
238113c08e2fSMichael Klier        return false;
238213c08e2fSMichael Klier    }
238313c08e2fSMichael Klier
238413c08e2fSMichael Klier    //keep png alpha channel if possible
238513c08e2fSMichael Klier    if($ext == 'png' && $conf['gdlib']>1 && function_exists('imagesavealpha')){
238613c08e2fSMichael Klier        imagealphablending($newimg, false);
238713c08e2fSMichael Klier        imagesavealpha($newimg,true);
238813c08e2fSMichael Klier    }
238913c08e2fSMichael Klier
239013c08e2fSMichael Klier    //keep gif transparent color if possible
239113c08e2fSMichael Klier    if($ext == 'gif' && function_exists('imagefill') && function_exists('imagecolorallocate')) {
239213c08e2fSMichael Klier        if(function_exists('imagecolorsforindex') && function_exists('imagecolortransparent')) {
239313c08e2fSMichael Klier            $transcolorindex = @imagecolortransparent($image);
239413c08e2fSMichael Klier            if($transcolorindex >= 0 ) { //transparent color exists
239513c08e2fSMichael Klier                $transcolor = @imagecolorsforindex($image, $transcolorindex);
239664159a61SAndreas Gohr                $transcolorindex = @imagecolorallocate(
239764159a61SAndreas Gohr                    $newimg,
239864159a61SAndreas Gohr                    $transcolor['red'],
239964159a61SAndreas Gohr                    $transcolor['green'],
240064159a61SAndreas Gohr                    $transcolor['blue']
240164159a61SAndreas Gohr                );
240213c08e2fSMichael Klier                @imagefill($newimg, 0, 0, $transcolorindex);
240313c08e2fSMichael Klier                @imagecolortransparent($newimg, $transcolorindex);
240413c08e2fSMichael Klier            }else{ //filling with white
240513c08e2fSMichael Klier                $whitecolorindex = @imagecolorallocate($newimg, 255, 255, 255);
240613c08e2fSMichael Klier                @imagefill($newimg, 0, 0, $whitecolorindex);
240713c08e2fSMichael Klier            }
240813c08e2fSMichael Klier        }else{ //filling with white
240913c08e2fSMichael Klier            $whitecolorindex = @imagecolorallocate($newimg, 255, 255, 255);
241013c08e2fSMichael Klier            @imagefill($newimg, 0, 0, $whitecolorindex);
241113c08e2fSMichael Klier        }
241213c08e2fSMichael Klier    }
241313c08e2fSMichael Klier
241413c08e2fSMichael Klier    //try resampling first
241513c08e2fSMichael Klier    if(function_exists("imagecopyresampled")){
241613c08e2fSMichael Klier        if(!@imagecopyresampled($newimg, $image, 0, 0, $ofs_x, $ofs_y, $to_w, $to_h, $from_w, $from_h)) {
241713c08e2fSMichael Klier            imagecopyresized($newimg, $image, 0, 0, $ofs_x, $ofs_y, $to_w, $to_h, $from_w, $from_h);
241813c08e2fSMichael Klier        }
241913c08e2fSMichael Klier    }else{
242013c08e2fSMichael Klier        imagecopyresized($newimg, $image, 0, 0, $ofs_x, $ofs_y, $to_w, $to_h, $from_w, $from_h);
242113c08e2fSMichael Klier    }
242213c08e2fSMichael Klier
242313c08e2fSMichael Klier    $okay = false;
242413c08e2fSMichael Klier    if ($ext == 'jpg' || $ext == 'jpeg'){
242513c08e2fSMichael Klier        if(!function_exists('imagejpeg')){
242613c08e2fSMichael Klier            $okay = false;
242713c08e2fSMichael Klier        }else{
242813c08e2fSMichael Klier            $okay = imagejpeg($newimg, $to, $conf['jpg_quality']);
242913c08e2fSMichael Klier        }
243013c08e2fSMichael Klier    }elseif($ext == 'png') {
243113c08e2fSMichael Klier        if(!function_exists('imagepng')){
243213c08e2fSMichael Klier            $okay = false;
243313c08e2fSMichael Klier        }else{
243413c08e2fSMichael Klier            $okay =  imagepng($newimg, $to);
243513c08e2fSMichael Klier        }
243613c08e2fSMichael Klier    }elseif($ext == 'gif') {
243713c08e2fSMichael Klier        if(!function_exists('imagegif')){
243813c08e2fSMichael Klier            $okay = false;
243913c08e2fSMichael Klier        }else{
244013c08e2fSMichael Klier            $okay = imagegif($newimg, $to);
244113c08e2fSMichael Klier        }
244213c08e2fSMichael Klier    }
244313c08e2fSMichael Klier
244413c08e2fSMichael Klier    // destroy GD image ressources
244513c08e2fSMichael Klier    if($image) imagedestroy($image);
244613c08e2fSMichael Klier    if($newimg) imagedestroy($newimg);
244713c08e2fSMichael Klier
244813c08e2fSMichael Klier    return $okay;
244913c08e2fSMichael Klier}
245013c08e2fSMichael Klier
24513d7a9e0aSAnika Henke/**
24523d7a9e0aSAnika Henke * Return other media files with the same base name
245379e53fe5SAnika Henke * but different extensions.
24543d7a9e0aSAnika Henke *
24553d7a9e0aSAnika Henke * @param string   $src     - ID of media file
245642ea7f44SGerrit Uitslag * @param string[] $exts    - alternative extensions to find other files for
245742ea7f44SGerrit Uitslag * @return array            - array(mime type => file ID)
24583d7a9e0aSAnika Henke *
24593d7a9e0aSAnika Henke * @author Anika Henke <anika@selfthinker.org>
24603d7a9e0aSAnika Henke */
246179e53fe5SAnika Henkefunction media_alternativefiles($src, $exts){
24623d7a9e0aSAnika Henke
24633d7a9e0aSAnika Henke    $files = array();
246459bc3b48SGerrit Uitslag    list($srcExt, /* $srcMime */) = mimetype($src);
24653d7a9e0aSAnika Henke    $filebase = substr($src, 0, -1 * (strlen($srcExt)+1));
24663d7a9e0aSAnika Henke
24673d7a9e0aSAnika Henke    foreach($exts as $ext) {
24683d7a9e0aSAnika Henke        $fileid = $filebase.'.'.$ext;
24693d7a9e0aSAnika Henke        $file = mediaFN($fileid);
24703d7a9e0aSAnika Henke        if(file_exists($file)) {
247159bc3b48SGerrit Uitslag            list(/* $fileExt */, $fileMime) = mimetype($file);
247279e53fe5SAnika Henke            $files[$fileMime] = $fileid;
247399f943f6SAnika Henke        }
24743d7a9e0aSAnika Henke    }
24753d7a9e0aSAnika Henke    return $files;
24763d7a9e0aSAnika Henke}
24773d7a9e0aSAnika Henke
2478f50634f0SAnika Henke/**
2479f50634f0SAnika Henke * Check if video/audio is supported to be embedded.
2480f50634f0SAnika Henke *
2481b83a74f1SAnika Henke * @param string $mime      - mimetype of media file
248242ea7f44SGerrit Uitslag * @param string $type      - type of media files to check ('video', 'audio', or null for all)
2483f50634f0SAnika Henke * @return boolean
2484f50634f0SAnika Henke *
2485f50634f0SAnika Henke * @author Anika Henke <anika@selfthinker.org>
2486f50634f0SAnika Henke */
2487f50634f0SAnika Henkefunction media_supportedav($mime, $type=NULL){
2488f50634f0SAnika Henke    $supportedAudio = array(
2489f50634f0SAnika Henke        'ogg' => 'audio/ogg',
2490f50634f0SAnika Henke        'mp3' => 'audio/mpeg',
2491f50634f0SAnika Henke        'wav' => 'audio/wav',
2492f50634f0SAnika Henke    );
2493f50634f0SAnika Henke    $supportedVideo = array(
2494f50634f0SAnika Henke        'webm' => 'video/webm',
2495f50634f0SAnika Henke        'ogv' => 'video/ogg',
2496f50634f0SAnika Henke        'mp4' => 'video/mp4',
2497f50634f0SAnika Henke    );
2498f50634f0SAnika Henke    if ($type == 'audio') {
2499f50634f0SAnika Henke        $supportedAv = $supportedAudio;
2500f50634f0SAnika Henke    } elseif ($type == 'video') {
2501f50634f0SAnika Henke        $supportedAv = $supportedVideo;
2502f50634f0SAnika Henke    } else {
2503f50634f0SAnika Henke        $supportedAv = array_merge($supportedAudio, $supportedVideo);
2504f50634f0SAnika Henke    }
2505f50634f0SAnika Henke    return in_array($mime, $supportedAv);
2506f50634f0SAnika Henke}
2507f50634f0SAnika Henke
25080877a1f1SSchplurtz le Déboulonné/**
25090877a1f1SSchplurtz le Déboulonné * Return track media files with the same base name
25100877a1f1SSchplurtz le Déboulonné * but extensions that indicate kind and lang.
25110877a1f1SSchplurtz le Déboulonné * ie for foo.webm search foo.sub.lang.vtt, foo.cap.lang.vtt...
25120877a1f1SSchplurtz le Déboulonné *
25130877a1f1SSchplurtz le Déboulonné * @param string   $src     - ID of media file
251401299338SSchplurtz le Déboulonné * @return array            - array(mediaID => array( kind, srclang ))
25150877a1f1SSchplurtz le Déboulonné *
25160877a1f1SSchplurtz le Déboulonné * @author Schplurtz le Déboulonné <Schplurtz@laposte.net>
25170877a1f1SSchplurtz le Déboulonné */
25180877a1f1SSchplurtz le Déboulonnéfunction media_trackfiles($src){
25190877a1f1SSchplurtz le Déboulonné    $kinds=array(
25200877a1f1SSchplurtz le Déboulonné        'sub' => 'subtitles',
25210877a1f1SSchplurtz le Déboulonné        'cap' => 'captions',
25220877a1f1SSchplurtz le Déboulonné        'des' => 'descriptions',
25230877a1f1SSchplurtz le Déboulonné        'cha' => 'chapters',
25240877a1f1SSchplurtz le Déboulonné        'met' => 'metadata'
25250877a1f1SSchplurtz le Déboulonné    );
25260877a1f1SSchplurtz le Déboulonné
25270877a1f1SSchplurtz le Déboulonné    $files = array();
25280877a1f1SSchplurtz le Déboulonné    $re='/\\.(sub|cap|des|cha|met)\\.([^.]+)\\.vtt$/';
25290877a1f1SSchplurtz le Déboulonné    $baseid=pathinfo($src, PATHINFO_FILENAME);
25300877a1f1SSchplurtz le Déboulonné    $pattern=mediaFN($baseid).'.*.*.vtt';
25310877a1f1SSchplurtz le Déboulonné    $list=glob($pattern);
25320877a1f1SSchplurtz le Déboulonné    foreach($list as $track) {
25330877a1f1SSchplurtz le Déboulonné        if(preg_match($re, $track, $matches)){
25340877a1f1SSchplurtz le Déboulonné            $files[$baseid.'.'.$matches[1].'.'.$matches[2].'.vtt']=array(
25350877a1f1SSchplurtz le Déboulonné                $kinds[$matches[1]],
25360877a1f1SSchplurtz le Déboulonné                $matches[2],
25370877a1f1SSchplurtz le Déboulonné            );
25380877a1f1SSchplurtz le Déboulonné        }
25390877a1f1SSchplurtz le Déboulonné    }
25400877a1f1SSchplurtz le Déboulonné    return $files;
25410877a1f1SSchplurtz le Déboulonné}
25420877a1f1SSchplurtz le Déboulonné
2543365be586SAndreas Gohr/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
2544