xref: /dokuwiki/inc/media.php (revision 128c643308c6058e7d693bb7b36a2cea751d157e) 
1<?php
2/**
3 * All output and handler function needed for the media management popup
4 *
5 * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
6 * @author     Andreas Gohr <andi@splitbrain.org>
7 */
8
9if(!defined('DOKU_INC')) die('meh.');
10if(!defined('NL')) define('NL',"\n");
11require_once(DOKU_INC.'inc/html.php');
12require_once(DOKU_INC.'inc/search.php');
13require_once(DOKU_INC.'inc/JpegMeta.php');
14
15/**
16 * Lists pages which currently use a media file selected for deletion
17 *
18 * References uses the same visual as search results and share
19 * their CSS tags except pagenames won't be links.
20 *
21 * @author Matthias Grimm <matthiasgrimm@users.sourceforge.net>
22 */
23function media_filesinuse($data,$id){
24    global $lang;
25    echo '<h1>'.$lang['reference'].' <code>'.hsc(noNS($id)).'</code></h1>';
26    echo '<p>'.hsc($lang['ref_inuse']).'</p>';
27
28    $hidden=0; //count of hits without read permission
29    foreach($data as $row){
30        if(auth_quickaclcheck($row) >= AUTH_READ && isVisiblePage($row)){
31            echo '<div class="search_result">';
32            echo '<span class="mediaref_ref">'.hsc($row).'</span>';
33            echo '</div>';
34        }else
35            $hidden++;
36    }
37    if ($hidden){
38        print '<div class="mediaref_hidden">'.$lang['ref_hidden'].'</div>';
39    }
40}
41
42/**
43 * Handles the saving of image meta data
44 *
45 * @author Andreas Gohr <andi@splitbrain.org>
46 */
47function media_metasave($id,$auth,$data){
48    if($auth < AUTH_UPLOAD) return false;
49    if(!checkSecurityToken()) return false;
50    global $lang;
51    global $conf;
52    $src = mediaFN($id);
53
54    $meta = new JpegMeta($src);
55    $meta->_parseAll();
56
57    foreach($data as $key => $val){
58        $val=trim($val);
59        if(empty($val)){
60            $meta->deleteField($key);
61        }else{
62            $meta->setField($key,$val);
63        }
64    }
65
66    if($meta->save()){
67        if($conf['fperm']) chmod($src, $conf['fperm']);
68        msg($lang['metasaveok'],1);
69        return $id;
70    }else{
71        msg($lang['metasaveerr'],-1);
72        return false;
73    }
74}
75
76/**
77 * Display the form to edit image meta data
78 *
79 * @author Andreas Gohr <andi@splitbrain.org>
80 */
81function media_metaform($id,$auth){
82    if($auth < AUTH_UPLOAD) return false;
83    global $lang, $config_cascade;
84
85    // load the field descriptions
86    static $fields = null;
87    if(is_null($fields)){
88
89        foreach (array('default','local') as $config_group) {
90            if (empty($config_cascade['mediameta'][$config_group])) continue;
91            foreach ($config_cascade['mediameta'][$config_group] as $config_file) {
92                if(@file_exists($config_file)){
93                    include($config_file);
94                }
95            }
96        }
97    }
98
99    $src = mediaFN($id);
100
101    // output
102    echo '<h1>'.hsc(noNS($id)).'</h1>'.NL;
103    echo '<form action="'.DOKU_BASE.'lib/exe/mediamanager.php" accept-charset="utf-8" method="post" class="meta">'.NL;
104    formSecurityToken();
105    foreach($fields as $key => $field){
106        // get current value
107        $tags = array($field[0]);
108        if(is_array($field[3])) $tags = array_merge($tags,$field[3]);
109        $value = tpl_img_getTag($tags,'',$src);
110        $value = cleanText($value);
111
112        // prepare attributes
113        $p = array();
114        $p['class'] = 'edit';
115        $p['id']    = 'meta__'.$key;
116        $p['name']  = 'meta['.$field[0].']';
117
118        // put label
119        echo '<div class="metafield">';
120        echo '<label for="meta__'.$key.'">';
121        echo ($lang[$field[1]]) ? $lang[$field[1]] : $field[1];
122        echo ':</label>';
123
124        // put input field
125        if($field[2] == 'text'){
126            $p['value'] = $value;
127            $p['type']  = 'text';
128            $att = buildAttributes($p);
129            echo "<input $att/>".NL;
130        }else{
131            $att = buildAttributes($p);
132            echo "<textarea $att rows=\"6\" cols=\"50\">".formText($value).'</textarea>'.NL;
133        }
134        echo '</div>'.NL;
135    }
136    echo '<div class="buttons">'.NL;
137    echo '<input type="hidden" name="img" value="'.hsc($id).'" />'.NL;
138    echo '<input name="do[save]" type="submit" value="'.$lang['btn_save'].
139        '" title="'.$lang['btn_save'].' [S]" accesskey="s" class="button" />'.NL;
140    echo '<input name="do[cancel]" type="submit" value="'.$lang['btn_cancel'].
141        '" title="'.$lang['btn_cancel'].' [C]" accesskey="c" class="button" />'.NL;
142    echo '</div>'.NL;
143    echo '</form>'.NL;
144}
145
146/**
147 * Conveinience function to check if a media file is still in use
148 *
149 * @author Michael Klier <chi@chimeric.de>
150 */
151function media_inuse($id) {
152    global $conf;
153    $mediareferences = array();
154    if($conf['refcheck']){
155        require_once(DOKU_INC.'inc/fulltext.php');
156        $mediareferences = ft_mediause($id,$conf['refshow']);
157        if(!count($mediareferences)) {
158            return false;
159        } else {
160            return $mediareferences;
161        }
162    } else {
163        return false;
164    }
165}
166
167/**
168 * Handles media file deletions
169 *
170 * If configured, checks for media references before deletion
171 *
172 * @author Andreas Gohr <andi@splitbrain.org>
173 * @return mixed false on error, true on delete or array with refs
174 */
175function media_delete($id,$auth){
176    if($auth < AUTH_DELETE) return false;
177    if(!checkSecurityToken()) return false;
178    global $conf;
179    global $lang;
180
181    $file = mediaFN($id);
182
183    // trigger an event - MEDIA_DELETE_FILE
184    $data['id']   = $id;
185    $data['name'] = basename($file);
186    $data['path'] = $file;
187    $data['size'] = (@file_exists($file)) ? filesize($file) : 0;
188
189    $data['unl'] = false;
190    $data['del'] = false;
191    $evt = new Doku_Event('MEDIA_DELETE_FILE',$data);
192    if ($evt->advise_before()) {
193        $data['unl'] = @unlink($file);
194        if($data['unl']){
195            addMediaLogEntry(time(), $id, DOKU_CHANGE_TYPE_DELETE);
196            $data['del'] = io_sweepNS($id,'mediadir');
197        }
198    }
199    $evt->advise_after();
200    unset($evt);
201
202    if($data['unl'] && $data['del']){
203        // current namespace was removed. redirecting to root ns passing msg along
204        send_redirect(DOKU_URL.'lib/exe/mediamanager.php?msg1='.
205                rawurlencode(sprintf(noNS($id),$lang['deletesucc'])));
206    }
207
208    return $data['unl'];
209}
210
211/**
212 * Handles media file uploads
213 *
214 * This generates an action event and delegates to _media_upload_action().
215 * Action plugins are allowed to pre/postprocess the uploaded file.
216 * (The triggered event is preventable.)
217 *
218 * Event data:
219 * $data[0]     fn_tmp: the temporary file name (read from $_FILES)
220 * $data[1]     fn: the file name of the uploaded file
221 * $data[2]     id: the future directory id of the uploaded file
222 * $data[3]     imime: the mimetype of the uploaded file
223 * $data[4]     overwrite: if an existing file is going to be overwritten
224 *
225 * @triggers MEDIA_UPLOAD_FINISH
226 * @author Andreas Gohr <andi@splitbrain.org>
227 * @author Michael Klier <chi@chimeric.de>
228 * @return mixed false on error, id of the new file on success
229 */
230function media_upload($ns,$auth){
231    if($auth < AUTH_UPLOAD) return false;
232    if(!checkSecurityToken()) return false;
233    require_once(DOKU_INC.'inc/confutils.php');
234    global $lang;
235    global $conf;
236
237    // get file and id
238    $id   = $_POST['id'];
239    $file = $_FILES['upload'];
240    if(empty($id)) $id = $file['name'];
241
242    // check for data
243    if(!@filesize($file['tmp_name'])){
244        msg('No data uploaded. Disk full?',-1);
245        return false;
246    }
247
248    // check extensions
249    list($fext,$fmime,$dl) = mimetype($file['name']);
250    list($iext,$imime,$dl) = mimetype($id);
251    if($fext && !$iext){
252        // no extension specified in id - read original one
253        $id   .= '.'.$fext;
254        $imime = $fmime;
255    }elseif($fext && $fext != $iext){
256        // extension was changed, print warning
257        msg(sprintf($lang['mediaextchange'],$fext,$iext));
258    }
259
260    // get filename
261    $id   = cleanID($ns.':'.$id,false,true);
262    $fn   = mediaFN($id);
263
264    // get filetype regexp
265    $types = array_keys(getMimeTypes());
266    $types = array_map(create_function('$q','return preg_quote($q,"/");'),$types);
267    $regex = join('|',$types);
268
269    // because a temp file was created already
270    if(preg_match('/\.('.$regex.')$/i',$fn)){
271        //check for overwrite
272        $overwrite = @file_exists($fn);
273        if($overwrite && (!$_REQUEST['ow'] || $auth < AUTH_DELETE)){
274            msg($lang['uploadexist'],0);
275            return false;
276        }
277        // check for valid content
278        $ok = media_contentcheck($file['tmp_name'],$imime);
279        if($ok == -1){
280            msg(sprintf($lang['uploadbadcontent'],".$iext"),-1);
281            return false;
282        }elseif($ok == -2){
283            msg($lang['uploadspam'],-1);
284            return false;
285        }elseif($ok == -3){
286            msg($lang['uploadxss'],-1);
287            return false;
288        }
289
290        // prepare event data
291        $data[0] = $file['tmp_name'];
292        $data[1] = $fn;
293        $data[2] = $id;
294        $data[3] = $imime;
295        $data[4] = $overwrite;
296
297        // trigger event
298        return trigger_event('MEDIA_UPLOAD_FINISH', $data, '_media_upload_action', true);
299
300    }else{
301        msg($lang['uploadwrong'],-1);
302    }
303    return false;
304}
305
306/**
307 * Callback adapter for media_upload_finish()
308 * @author Michael Klier <chi@chimeric.de>
309 */
310function _media_upload_action($data) {
311    // fixme do further sanity tests of given data?
312    if(is_array($data) && count($data)===5) {
313        return media_upload_finish($data[0], $data[1], $data[2], $data[3], $data[4]);
314    } else {
315        return false; //callback error
316    }
317}
318
319/**
320 * Saves an uploaded media file
321 *
322 * @author Andreas Gohr <andi@splitbrain.org>
323 * @author Michael Klier <chi@chimeric.de>
324 */
325function media_upload_finish($fn_tmp, $fn, $id, $imime, $overwrite) {
326    global $conf;
327    global $lang;
328
329    // prepare directory
330    io_createNamespace($id, 'media');
331
332    if(move_uploaded_file($fn_tmp, $fn)) {
333        // Set the correct permission here.
334        // Always chmod media because they may be saved with different permissions than expected from the php umask.
335        // (Should normally chmod to $conf['fperm'] only if $conf['fperm'] is set.)
336        chmod($fn, $conf['fmode']);
337        msg($lang['uploadsucc'],1);
338        media_notify($id,$fn,$imime);
339        // add a log entry to the media changelog
340        if ($overwrite) {
341            addMediaLogEntry(time(), $id, DOKU_CHANGE_TYPE_EDIT);
342        } else {
343            addMediaLogEntry(time(), $id, DOKU_CHANGE_TYPE_CREATE);
344        }
345        return $id;
346    }else{
347        msg($lang['uploadfail'],-1);
348    }
349}
350
351/**
352 * This function checks if the uploaded content is really what the
353 * mimetype says it is. We also do spam checking for text types here.
354 *
355 * We need to do this stuff because we can not rely on the browser
356 * to do this check correctly. Yes, IE is broken as usual.
357 *
358 * @author Andreas Gohr <andi@splitbrain.org>
359 * @link   http://www.splitbrain.org/blog/2007-02/12-internet_explorer_facilitates_cross_site_scripting
360 * @fixme  check all 26 magic IE filetypes here?
361 */
362function media_contentcheck($file,$mime){
363    global $conf;
364    if($conf['iexssprotect']){
365        $fh = @fopen($file, 'rb');
366        if($fh){
367            $bytes = fread($fh, 256);
368            fclose($fh);
369            if(preg_match('/<(script|a|img|html|body|iframe)[\s>]/i',$bytes)){
370                return -3;
371            }
372        }
373    }
374    if(substr($mime,0,6) == 'image/'){
375        $info = @getimagesize($file);
376        if($mime == 'image/gif' && $info[2] != 1){
377            return -1;
378        }elseif($mime == 'image/jpeg' && $info[2] != 2){
379            return -1;
380        }elseif($mime == 'image/png' && $info[2] != 3){
381            return -1;
382        }
383        # fixme maybe check other images types as well
384    }elseif(substr($mime,0,5) == 'text/'){
385        global $TEXT;
386        $TEXT = io_readFile($file);
387        if(checkwordblock()){
388            return -2;
389        }
390    }
391    return 0;
392}
393
394/**
395 * Send a notify mail on uploads
396 *
397 * @author Andreas Gohr <andi@splitbrain.org>
398 */
399function media_notify($id,$file,$mime){
400    global $lang;
401    global $conf;
402    if(empty($conf['notify'])) return; //notify enabled?
403
404    $ip = clientIP();
405
406    $text = rawLocale('uploadmail');
407    $text = str_replace('@DATE@',dformat(),$text);
408    $text = str_replace('@BROWSER@',$_SERVER['HTTP_USER_AGENT'],$text);
409    $text = str_replace('@IPADDRESS@',$ip,$text);
410    $text = str_replace('@HOSTNAME@',gethostsbyaddrs($ip),$text);
411    $text = str_replace('@DOKUWIKIURL@',DOKU_URL,$text);
412    $text = str_replace('@USER@',$_SERVER['REMOTE_USER'],$text);
413    $text = str_replace('@MIME@',$mime,$text);
414    $text = str_replace('@MEDIA@',ml($id,'',true,'&',true),$text);
415    $text = str_replace('@SIZE@',filesize_h(filesize($file)),$text);
416
417    $from = $conf['mailfrom'];
418    $from = str_replace('@USER@',$_SERVER['REMOTE_USER'],$from);
419    $from = str_replace('@NAME@',$INFO['userinfo']['name'],$from);
420    $from = str_replace('@MAIL@',$INFO['userinfo']['mail'],$from);
421
422    $subject = '['.$conf['title'].'] '.$lang['mail_upload'].' '.$id;
423
424    mail_send($conf['notify'],$subject,$text,$from);
425}
426
427/**
428 * List all files in a given Media namespace
429 */
430function media_filelist($ns,$auth=null,$jump=''){
431    global $conf;
432    global $lang;
433    $ns = cleanID($ns);
434
435    // check auth our self if not given (needed for ajax calls)
436    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
437
438    echo '<h1 id="media__ns">:'.hsc($ns).'</h1>'.NL;
439
440    if($auth < AUTH_READ){
441        // FIXME: print permission warning here instead?
442        echo '<div class="nothing">'.$lang['nothingfound'].'</div>'.NL;
443    }else{
444        media_uploadform($ns, $auth);
445
446        $dir = utf8_encodeFN(str_replace(':','/',$ns));
447        $data = array();
448        search($data,$conf['mediadir'],'search_media',
449                array('showmsg'=>true,'depth'=>1),$dir);
450
451        if(!count($data)){
452            echo '<div class="nothing">'.$lang['nothingfound'].'</div>'.NL;
453        }else foreach($data as $item){
454            media_printfile($item,$auth,$jump);
455        }
456    }
457    media_searchform($ns);
458}
459
460/**
461 * List all files found by the search request
462 *
463 * @author Tobias Sarnowski <sarnowski@cosmocode.de>
464 * @author Andreas Gohr <gohr@cosmocode.de>
465 * @triggers MEDIA_SEARCH
466 */
467function media_searchlist($query,$ns,$auth=null){
468    global $conf;
469    global $lang;
470    $ns = cleanID($ns);
471
472    if ($query) {
473        $evdata = array(
474                'ns'    => $ns,
475                'data'  => array(),
476                'query' => $query
477                );
478        $evt = new Doku_Event('MEDIA_SEARCH', $evdata);
479        if ($evt->advise_before()) {
480            $dir = utf8_encodeFN(str_replace(':','/',$evdata['ns']));
481            $pattern = '/'.preg_quote($evdata['query'],'/').'/i';
482            search($evdata['data'],
483                    $conf['mediadir'],
484                    'search_media',
485                    array('showmsg'=>false,'pattern'=>$pattern),
486                    $dir);
487        }
488        $evt->advise_after();
489        unset($evt);
490    }
491
492    echo '<h1 id="media__ns">'.sprintf($lang['searchmedia_in'],hsc($ns).':*').'</h1>'.NL;
493    media_searchform($ns,$query);
494
495    if(!count($evdata['data'])){
496        echo '<div class="nothing">'.$lang['nothingfound'].'</div>'.NL;
497    }else foreach($evdata['data'] as $item){
498        media_printfile($item,$item['perm'],'',true);
499    }
500}
501
502/**
503 * Print action links for a file depending on filetype
504 * and available permissions
505 */
506function media_fileactions($item,$auth){
507    global $lang;
508
509    // view button
510    $link = ml($item['id'],'',true);
511    echo ' <a href="'.$link.'" target="_blank"><img src="'.DOKU_BASE.'lib/images/magnifier.png" '.
512        'alt="'.$lang['mediaview'].'" title="'.$lang['mediaview'].'" class="btn" /></a>';
513
514    // no further actions if not writable
515    if(!$item['writable']) return;
516
517    // delete button
518    if($auth >= AUTH_DELETE){
519        echo ' <a href="'.DOKU_BASE.'lib/exe/mediamanager.php?delete='.rawurlencode($item['id']).
520            '&amp;sectok='.getSecurityToken().'" class="btn_media_delete" title="'.$item['id'].'">'.
521            '<img src="'.DOKU_BASE.'lib/images/trash.png" alt="'.$lang['btn_delete'].'" '.
522            'title="'.$lang['btn_delete'].'" class="btn" /></a>';
523    }
524
525    // edit button
526    if($auth >= AUTH_UPLOAD && $item['isimg'] && $item['meta']->getField('File.Mime') == 'image/jpeg'){
527        echo ' <a href="'.DOKU_BASE.'lib/exe/mediamanager.php?edit='.rawurlencode($item['id']).'">'.
528            '<img src="'.DOKU_BASE.'lib/images/pencil.png" alt="'.$lang['metaedit'].'" '.
529            'title="'.$lang['metaedit'].'" class="btn" /></a>';
530    }
531
532}
533
534/**
535 * Formats and prints one file in the list
536 */
537function media_printfile($item,$auth,$jump,$display_namespace=false){
538    global $lang;
539    global $conf;
540
541    // Prepare zebra coloring
542    // I always wanted to use this variable name :-D
543    static $twibble = 1;
544    $twibble *= -1;
545    $zebra = ($twibble == -1) ? 'odd' : 'even';
546
547    // Automatically jump to recent action
548    if($jump == $item['id']) {
549        $jump = ' id="scroll__here" ';
550    }else{
551        $jump = '';
552    }
553
554    // Prepare fileicons
555    list($ext,$mime,$dl) = mimetype($item['file'],false);
556    $class = preg_replace('/[^_\-a-z0-9]+/i','_',$ext);
557    $class = 'select mediafile mf_'.$class;
558
559    // Prepare filename
560    $file = utf8_decodeFN($item['file']);
561
562    // Prepare info
563    $info = '';
564    if($item['isimg']){
565        $info .= (int) $item['meta']->getField('File.Width');
566        $info .= '&#215;';
567        $info .= (int) $item['meta']->getField('File.Height');
568        $info .= ' ';
569    }
570    $info .= '<i>'.dformat($item['mtime']).'</i>';
571    $info .= ' ';
572    $info .= filesize_h($item['size']);
573
574    // output
575    echo '<div class="'.$zebra.'"'.$jump.'>'.NL;
576    if (!$display_namespace) {
577        echo '<a name="h_:'.$item['id'].'" class="'.$class.'">'.hsc($file).'</a> ';
578    } else {
579        echo '<a name="h_:'.$item['id'].'" class="'.$class.'">'.hsc($item['id']).'</a><br/>';
580    }
581    echo '<span class="info">('.$info.')</span>'.NL;
582    media_fileactions($item,$auth);
583    echo '<div class="example" id="ex_'.str_replace(':','_',$item['id']).'">';
584    echo $lang['mediausage'].' <code>{{:'.$item['id'].'}}</code>';
585    echo '</div>';
586    if($item['isimg']) media_printimgdetail($item);
587    echo '<div class="clearer"></div>'.NL;
588    echo '</div>'.NL;
589}
590
591/**
592 * Prints a thumbnail and metainfos
593 */
594function media_printimgdetail($item){
595    // prepare thumbnail
596    $w = (int) $item['meta']->getField('File.Width');
597    $h = (int) $item['meta']->getField('File.Height');
598    if($w>120 || $h>120){
599        $ratio = $item['meta']->getResizeRatio(120);
600        $w = floor($w * $ratio);
601        $h = floor($h * $ratio);
602    }
603    $src = ml($item['id'],array('w'=>$w,'h'=>$h));
604    $p = array();
605    $p['width']  = $w;
606    $p['height'] = $h;
607    $p['alt']    = $item['id'];
608    $p['class']  = 'thumb';
609    $att = buildAttributes($p);
610
611    // output
612    echo '<div class="detail">';
613    echo '<div class="thumb">';
614    echo '<a name="d_:'.$item['id'].'" class="select">';
615    echo '<img src="'.$src.'" '.$att.' />';
616    echo '</a>';
617    echo '</div>';
618
619    // read EXIF/IPTC data
620    $t = $item['meta']->getField(array('IPTC.Headline','xmp.dc:title'));
621    $d = $item['meta']->getField(array('IPTC.Caption','EXIF.UserComment',
622                'EXIF.TIFFImageDescription',
623                'EXIF.TIFFUserComment'));
624    if(utf8_strlen($d) > 250) $d = utf8_substr($d,0,250).'...';
625    $k = $item['meta']->getField(array('IPTC.Keywords','IPTC.Category','xmp.dc:subject'));
626
627    // print EXIF/IPTC data
628    if($t || $d || $k ){
629        echo '<p>';
630        if($t) echo '<strong>'.htmlspecialchars($t).'</strong><br />';
631        if($d) echo htmlspecialchars($d).'<br />';
632        if($t) echo '<em>'.htmlspecialchars($k).'</em>';
633        echo '</p>';
634    }
635    echo '</div>';
636}
637
638/**
639 * Print the media upload form if permissions are correct
640 *
641 * @author Andreas Gohr <andi@splitbrain.org>
642 */
643function media_uploadform($ns, $auth){
644    global $lang;
645
646    if($auth < AUTH_UPLOAD) return; //fixme print info on missing permissions?
647
648    // The default HTML upload form
649    $form = new Doku_Form(array('id'      => 'dw__upload',
650                                'action'  => DOKU_BASE.'lib/exe/mediamanager.php',
651                                'enctype' => 'multipart/form-data'));
652    $form->addElement('<div class="upload">' . $lang['mediaupload'] . '</div>');
653    $form->addElement(formSecurityToken());
654    $form->addHidden('ns', hsc($ns));
655    $form->addElement(form_makeOpenTag('p'));
656    $form->addElement(form_makeFileField('upload', $lang['txt_upload'].':', 'upload__file'));
657    $form->addElement(form_makeCloseTag('p'));
658    $form->addElement(form_makeOpenTag('p'));
659    $form->addElement(form_makeTextField('id', '', $lang['txt_filename'].':', 'upload__name'));
660    $form->addElement(form_makeButton('submit', '', $lang['btn_upload']));
661    $form->addElement(form_makeCloseTag('p'));
662
663    if($auth >= AUTH_DELETE){
664        $form->addElement(form_makeOpenTag('p'));
665        $form->addElement(form_makeCheckboxField('ow', 1, $lang['txt_overwrt'], 'dw__ow', 'check'));
666        $form->addElement(form_makeCloseTag('p'));
667    }
668    html_form('upload', $form);
669
670    // prepare flashvars for multiupload
671    $opt = array(
672            'L_gridname'  => $lang['mu_gridname'] ,
673            'L_gridsize'  => $lang['mu_gridsize'] ,
674            'L_gridstat'  => $lang['mu_gridstat'] ,
675            'L_namespace' => $lang['mu_namespace'] ,
676            'L_overwrite' => $lang['txt_overwrt'],
677            'L_browse'    => $lang['mu_browse'],
678            'L_upload'    => $lang['btn_upload'],
679            'L_toobig'    => $lang['mu_toobig'],
680            'L_ready'     => $lang['mu_ready'],
681            'L_done'      => $lang['mu_done'],
682            'L_fail'      => $lang['mu_fail'],
683            'L_authfail'  => $lang['mu_authfail'],
684            'L_progress'  => $lang['mu_progress'],
685            'L_filetypes' => $lang['mu_filetypes'],
686            'L_info'      => $lang['mu_info'],
687            'L_lasterr'   => $lang['mu_lasterr'],
688
689            'O_ns'        => ":$ns",
690            'O_backend'   => 'mediamanager.php?'.session_name().'='.session_id(),
691            'O_maxsize'   => php_to_byte(ini_get('upload_max_filesize')),
692            'O_extensions'=> join('|',array_keys(getMimeTypes())),
693            'O_overwrite' => ($auth >= AUTH_DELETE),
694            'O_sectok'    => getSecurityToken(),
695            'O_authtok'   => auth_createToken(),
696            );
697    $var = buildURLparams($opt);
698    // output the flash uploader
699    ?>
700        <div id="dw__flashupload" style="display:none">
701        <div class="upload"><?php echo $lang['mu_intro']?></div>
702        <?php echo html_flashobject('multipleUpload.swf','500','190',null,$opt); ?>
703        </div>
704        <?php
705}
706
707/**
708 * Print the search field form
709 *
710 * @author Tobias Sarnowski <sarnowski@cosmocode.de>
711 */
712function media_searchform($ns,$query=''){
713    global $lang;
714
715    // The default HTML search form
716    $form = new Doku_Form(array('id' => 'dw__mediasearch', 'action' => DOKU_BASE.'lib/exe/mediamanager.php'));
717    $form->addElement('<div class="upload">' . $lang['mediasearch'] . '</div>');
718    $form->addElement(formSecurityToken());
719    $form->addHidden('ns', $ns);
720    $form->addHidden('do', 'searchlist');
721    $form->addElement(form_makeOpenTag('p'));
722    $form->addElement(form_makeTextField('q', $query,$lang['searchmedia'],'','',array('title'=>sprintf($lang['searchmedia_in'],hsc($ns).':*'))));
723    $form->addElement(form_makeButton('submit', '', $lang['btn_search']));
724    $form->addElement(form_makeCloseTag('p'));
725    html_form('searchmedia', $form);
726}
727
728/**
729 * Build a tree outline of available media namespaces
730 *
731 * @author Andreas Gohr <andi@splitbrain.org>
732 */
733function media_nstree($ns){
734    global $conf;
735    global $lang;
736
737    // currently selected namespace
738    $ns  = cleanID($ns);
739    if(empty($ns)){
740        $ns = dirname(str_replace(':','/',$ID));
741        if($ns == '.') $ns ='';
742    }
743    $ns  = utf8_encodeFN(str_replace(':','/',$ns));
744
745    $data = array();
746    search($data,$conf['mediadir'],'search_index',array('ns' => $ns, 'nofiles' => true));
747
748    // wrap a list with the root level around the other namespaces
749    $item = array( 'level' => 0, 'id' => '',
750            'open' =>'true', 'label' => '['.$lang['mediaroot'].']');
751
752    echo '<ul class="idx">';
753    echo media_nstree_li($item);
754    echo media_nstree_item($item);
755    echo html_buildlist($data,'idx','media_nstree_item','media_nstree_li');
756    echo '</li>';
757    echo '</ul>';
758}
759
760/**
761 * Userfunction for html_buildlist
762 *
763 * Prints a media namespace tree item
764 *
765 * @author Andreas Gohr <andi@splitbrain.org>
766 */
767function media_nstree_item($item){
768    $pos   = strrpos($item['id'], ':');
769    $label = substr($item['id'], $pos > 0 ? $pos + 1 : 0);
770    if(!$item['label']) $item['label'] = $label;
771
772    $ret  = '';
773    $ret .= '<a href="'.DOKU_BASE.'lib/exe/mediamanager.php?ns='.idfilter($item['id']).'" class="idx_dir">';
774    $ret .= $item['label'];
775    $ret .= '</a>';
776    return $ret;
777}
778
779/**
780 * Userfunction for html_buildlist
781 *
782 * Prints a media namespace tree item opener
783 *
784 * @author Andreas Gohr <andi@splitbrain.org>
785 */
786function media_nstree_li($item){
787    $class='media level'.$item['level'];
788    if($item['open']){
789        $class .= ' open';
790        $img   = DOKU_BASE.'lib/images/minus.gif';
791        $alt   = '&minus;';
792    }else{
793        $class .= ' closed';
794        $img   = DOKU_BASE.'lib/images/plus.gif';
795        $alt   = '+';
796    }
797    return '<li class="'.$class.'">'.
798        '<img src="'.$img.'" alt="'.$alt.'" />';
799}
800
801/**
802 * Resizes the given image to the given size
803 *
804 * @author  Andreas Gohr <andi@splitbrain.org>
805 */
806function media_resize_image($file, $ext, $w, $h=0){
807    global $conf;
808
809    $info = @getimagesize($file); //get original size
810    if($info == false) return $file; // that's no image - it's a spaceship!
811
812    if(!$h) $h = round(($w * $info[1]) / $info[0]);
813
814    // we wont scale up to infinity
815    if($w > 2000 || $h > 2000) return $file;
816
817    //cache
818    $local = getCacheName($file,'.media.'.$w.'x'.$h.'.'.$ext);
819    $mtime = @filemtime($local); // 0 if not exists
820
821    if( $mtime > filemtime($file) ||
822            media_resize_imageIM($ext,$file,$info[0],$info[1],$local,$w,$h) ||
823            media_resize_imageGD($ext,$file,$info[0],$info[1],$local,$w,$h) ){
824        if($conf['fperm']) chmod($local, $conf['fperm']);
825        return $local;
826    }
827    //still here? resizing failed
828    return $file;
829}
830
831/**
832 * Crops the given image to the wanted ratio, then calls media_resize_image to scale it
833 * to the wanted size
834 *
835 * Crops are centered horizontally but prefer the upper third of an vertical
836 * image because most pics are more interesting in that area (rule of thirds)
837 *
838 * @author  Andreas Gohr <andi@splitbrain.org>
839 */
840function media_crop_image($file, $ext, $w, $h=0){
841    global $conf;
842
843    if(!$h) $h = $w;
844    $info = @getimagesize($file); //get original size
845    if($info == false) return $file; // that's no image - it's a spaceship!
846
847    // calculate crop size
848    $fr = $info[0]/$info[1];
849    $tr = $w/$h;
850    if($tr >= 1){
851        if($tr > $fr){
852            $cw = $info[0];
853            $ch = (int) $info[0]/$tr;
854        }else{
855            $cw = (int) $info[1]*$tr;
856            $ch = $info[1];
857        }
858    }else{
859        if($tr < $fr){
860            $cw = (int) $info[1]*$tr;
861            $ch = $info[1];
862        }else{
863            $cw = $info[0];
864            $ch = (int) $info[0]/$tr;
865        }
866    }
867    // calculate crop offset
868    $cx = (int) ($info[0]-$cw)/2;
869    $cy = (int) ($info[1]-$ch)/3;
870
871    //cache
872    $local = getCacheName($file,'.media.'.$cw.'x'.$ch.'.crop.'.$ext);
873    $mtime = @filemtime($local); // 0 if not exists
874
875    if( $mtime > filemtime($file) ||
876            media_crop_imageIM($ext,$file,$info[0],$info[1],$local,$cw,$ch,$cx,$cy) ||
877            media_resize_imageGD($ext,$file,$cw,$ch,$local,$cw,$ch,$cx,$cy) ){
878        if($conf['fperm']) chmod($local, $conf['fperm']);
879        return media_resize_image($local,$ext, $w, $h);
880    }
881
882    //still here? cropping failed
883    return media_resize_image($file,$ext, $w, $h);
884}
885
886/**
887 * Download a remote file and return local filename
888 *
889 * returns false if download fails. Uses cached file if available and
890 * wanted
891 *
892 * @author  Andreas Gohr <andi@splitbrain.org>
893 * @author  Pavel Vitis <Pavel.Vitis@seznam.cz>
894 */
895function media_get_from_URL($url,$ext,$cache){
896    global $conf;
897
898    // if no cache or fetchsize just redirect
899    if ($cache==0)           return false;
900    if (!$conf['fetchsize']) return false;
901
902    $local = getCacheName(strtolower($url),".media.$ext");
903    $mtime = @filemtime($local); // 0 if not exists
904
905    //decide if download needed:
906    if( ($mtime == 0) ||                           // cache does not exist
907            ($cache != -1 && $mtime < time()-$cache)   // 'recache' and cache has expired
908      ){
909        if(media_image_download($url,$local)){
910            return $local;
911        }else{
912            return false;
913        }
914    }
915
916    //if cache exists use it else
917    if($mtime) return $local;
918
919    //else return false
920    return false;
921}
922
923/**
924 * Download image files
925 *
926 * @author Andreas Gohr <andi@splitbrain.org>
927 */
928function media_image_download($url,$file){
929    global $conf;
930    $http = new DokuHTTPClient();
931    $http->max_bodysize = $conf['fetchsize'];
932    $http->timeout = 25; //max. 25 sec
933    $http->header_regexp = '!\r\nContent-Type: image/(jpe?g|gif|png)!i';
934
935    $data = $http->get($url);
936    if(!$data) return false;
937
938    $fileexists = @file_exists($file);
939    $fp = @fopen($file,"w");
940    if(!$fp) return false;
941    fwrite($fp,$data);
942    fclose($fp);
943    if(!$fileexists and $conf['fperm']) chmod($file, $conf['fperm']);
944
945    // check if it is really an image
946    $info = @getimagesize($file);
947    if(!$info){
948        @unlink($file);
949        return false;
950    }
951
952    return true;
953}
954
955/**
956 * resize images using external ImageMagick convert program
957 *
958 * @author Pavel Vitis <Pavel.Vitis@seznam.cz>
959 * @author Andreas Gohr <andi@splitbrain.org>
960 */
961function media_resize_imageIM($ext,$from,$from_w,$from_h,$to,$to_w,$to_h){
962    global $conf;
963
964    // check if convert is configured
965    if(!$conf['im_convert']) return false;
966
967    // prepare command
968    $cmd  = $conf['im_convert'];
969    $cmd .= ' -resize '.$to_w.'x'.$to_h.'!';
970    if ($ext == 'jpg' || $ext == 'jpeg') {
971        $cmd .= ' -quality '.$conf['jpg_quality'];
972    }
973    $cmd .= " $from $to";
974
975    @exec($cmd,$out,$retval);
976    if ($retval == 0) return true;
977    return false;
978}
979
980/**
981 * crop images using external ImageMagick convert program
982 *
983 * @author Andreas Gohr <andi@splitbrain.org>
984 */
985function media_crop_imageIM($ext,$from,$from_w,$from_h,$to,$to_w,$to_h,$ofs_x,$ofs_y){
986    global $conf;
987
988    // check if convert is configured
989    if(!$conf['im_convert']) return false;
990
991    // prepare command
992    $cmd  = $conf['im_convert'];
993    $cmd .= ' -crop '.$to_w.'x'.$to_h.'+'.$ofs_x.'+'.$ofs_y;
994    if ($ext == 'jpg' || $ext == 'jpeg') {
995        $cmd .= ' -quality '.$conf['jpg_quality'];
996    }
997    $cmd .= " $from $to";
998
999    @exec($cmd,$out,$retval);
1000    if ($retval == 0) return true;
1001    return false;
1002}
1003
1004/**
1005 * resize or crop images using PHP's libGD support
1006 *
1007 * @author Andreas Gohr <andi@splitbrain.org>
1008 * @author Sebastian Wienecke <s_wienecke@web.de>
1009 */
1010function media_resize_imageGD($ext,$from,$from_w,$from_h,$to,$to_w,$to_h,$ofs_x=0,$ofs_y=0){
1011    global $conf;
1012
1013    if($conf['gdlib'] < 1) return false; //no GDlib available or wanted
1014
1015    // check available memory
1016    if(!is_mem_available(($from_w * $from_h * 4) + ($to_w * $to_h * 4))){
1017        return false;
1018    }
1019
1020    // create an image of the given filetype
1021    if ($ext == 'jpg' || $ext == 'jpeg'){
1022        if(!function_exists("imagecreatefromjpeg")) return false;
1023        $image = @imagecreatefromjpeg($from);
1024    }elseif($ext == 'png') {
1025        if(!function_exists("imagecreatefrompng")) return false;
1026        $image = @imagecreatefrompng($from);
1027
1028    }elseif($ext == 'gif') {
1029        if(!function_exists("imagecreatefromgif")) return false;
1030        $image = @imagecreatefromgif($from);
1031    }
1032    if(!$image) return false;
1033
1034    if(($conf['gdlib']>1) && function_exists("imagecreatetruecolor") && $ext != 'gif'){
1035        $newimg = @imagecreatetruecolor ($to_w, $to_h);
1036    }
1037    if(!$newimg) $newimg = @imagecreate($to_w, $to_h);
1038    if(!$newimg){
1039        imagedestroy($image);
1040        return false;
1041    }
1042
1043    //keep png alpha channel if possible
1044    if($ext == 'png' && $conf['gdlib']>1 && function_exists('imagesavealpha')){
1045        imagealphablending($newimg, false);
1046        imagesavealpha($newimg,true);
1047    }
1048
1049    //keep gif transparent color if possible
1050    if($ext == 'gif' && function_exists('imagefill') && function_exists('imagecolorallocate')) {
1051        if(function_exists('imagecolorsforindex') && function_exists('imagecolortransparent')) {
1052            $transcolorindex = @imagecolortransparent($image);
1053            if($transcolorindex >= 0 ) { //transparent color exists
1054                $transcolor = @imagecolorsforindex($image, $transcolorindex);
1055                $transcolorindex = @imagecolorallocate($newimg, $transcolor['red'], $transcolor['green'], $transcolor['blue']);
1056                @imagefill($newimg, 0, 0, $transcolorindex);
1057                @imagecolortransparent($newimg, $transcolorindex);
1058            }else{ //filling with white
1059                $whitecolorindex = @imagecolorallocate($newimg, 255, 255, 255);
1060                @imagefill($newimg, 0, 0, $whitecolorindex);
1061            }
1062        }else{ //filling with white
1063            $whitecolorindex = @imagecolorallocate($newimg, 255, 255, 255);
1064            @imagefill($newimg, 0, 0, $whitecolorindex);
1065        }
1066    }
1067
1068    //try resampling first
1069    if(function_exists("imagecopyresampled")){
1070        if(!@imagecopyresampled($newimg, $image, 0, 0, $ofs_x, $ofs_y, $to_w, $to_h, $from_w, $from_h)) {
1071            imagecopyresized($newimg, $image, 0, 0, $ofs_x, $ofs_y, $to_w, $to_h, $from_w, $from_h);
1072        }
1073    }else{
1074        imagecopyresized($newimg, $image, 0, 0, $ofs_x, $ofs_y, $to_w, $to_h, $from_w, $from_h);
1075    }
1076
1077    $okay = false;
1078    if ($ext == 'jpg' || $ext == 'jpeg'){
1079        if(!function_exists('imagejpeg')){
1080            $okay = false;
1081        }else{
1082            $okay = imagejpeg($newimg, $to, $conf['jpg_quality']);
1083        }
1084    }elseif($ext == 'png') {
1085        if(!function_exists('imagepng')){
1086            $okay = false;
1087        }else{
1088            $okay =  imagepng($newimg, $to);
1089        }
1090    }elseif($ext == 'gif') {
1091        if(!function_exists('imagegif')){
1092            $okay = false;
1093        }else{
1094            $okay = imagegif($newimg, $to);
1095        }
1096    }
1097
1098    // destroy GD image ressources
1099    if($image) imagedestroy($image);
1100    if($newimg) imagedestroy($newimg);
1101
1102    return $okay;
1103}
1104
1105/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
1106