xref: /dokuwiki/inc/media.php (revision 80d6fbc300b7e423fe0d2373cf3888c80ac94a41) 
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");
11
12/**
13 * Lists pages which currently use a media file selected for deletion
14 *
15 * References uses the same visual as search results and share
16 * their CSS tags except pagenames won't be links.
17 *
18 * @author Matthias Grimm <matthiasgrimm@users.sourceforge.net>
19 */
20function media_filesinuse($data,$id){
21    global $lang;
22    echo '<h1>'.$lang['reference'].' <code>'.hsc(noNS($id)).'</code></h1>';
23    echo '<p>'.hsc($lang['ref_inuse']).'</p>';
24
25    $hidden=0; //count of hits without read permission
26    foreach($data as $row){
27        if(auth_quickaclcheck($row) >= AUTH_READ && isVisiblePage($row)){
28            echo '<div class="search_result">';
29            echo '<span class="mediaref_ref">'.hsc($row).'</span>';
30            echo '</div>';
31        }else
32            $hidden++;
33    }
34    if ($hidden){
35        print '<div class="mediaref_hidden">'.$lang['ref_hidden'].'</div>';
36    }
37}
38
39/**
40 * Handles the saving of image meta data
41 *
42 * @author Andreas Gohr <andi@splitbrain.org>
43 * @author Kate Arzamastseva <pshns@ukr.net>
44 */
45function media_metasave($id,$auth,$data){
46    if($auth < AUTH_UPLOAD) return false;
47    if(!checkSecurityToken()) return false;
48    global $lang;
49    global $conf;
50    $src = mediaFN($id);
51
52    $meta = new JpegMeta($src);
53    $meta->_parseAll();
54
55    foreach($data as $key => $val){
56        $val=trim($val);
57        if(empty($val)){
58            $meta->deleteField($key);
59        }else{
60            $meta->setField($key,$val);
61        }
62    }
63
64    $old = @filemtime($src);
65    if(!@file_exists(mediaFN($id, $old)) && @file_exists($src)) {
66        // add old revision to the attic
67        media_saveOldRevision($id);
68    }
69
70    if($meta->save()){
71        if($conf['fperm']) chmod($src, $conf['fperm']);
72
73        $new = @filemtime($src);
74        // add a log entry to the media changelog
75        addMediaLogEntry($new, $id, DOKU_CHANGE_TYPE_EDIT, $lang['media_meta_edited']);
76
77        msg($lang['metasaveok'],1);
78        return $id;
79    }else{
80        msg($lang['metasaveerr'],-1);
81        return false;
82    }
83}
84
85/**
86 * Display the form to edit image meta data
87 *
88 * @author Andreas Gohr <andi@splitbrain.org>
89 * @author Kate Arzamastseva <pshns@ukr.net>
90 */
91function media_metaform($id,$auth){
92    global $lang, $config_cascade;
93
94    if($auth < AUTH_UPLOAD) {
95        echo '<div class="nothing">'.$lang['media_perm_upload'].'</div>'.NL;
96        return false;
97    }
98
99    // load the field descriptions
100    static $fields = null;
101    if(is_null($fields)){
102        $config_files = getConfigFiles('mediameta');
103        foreach ($config_files as $config_file) {
104            if(@file_exists($config_file)) include($config_file);
105        }
106    }
107
108    $src = mediaFN($id);
109
110    // output
111    $form = new Doku_Form(array('action' => media_managerURL(array('tab_details' => 'view')),
112                                'class' => 'meta'));
113    $form->addHidden('img', $id);
114    $form->addHidden('mediado', 'save');
115    foreach($fields as $key => $field){
116        // get current value
117        if (empty($field[0])) continue;
118        $tags = array($field[0]);
119        if(is_array($field[3])) $tags = array_merge($tags,$field[3]);
120        $value = tpl_img_getTag($tags,'',$src);
121        $value = cleanText($value);
122
123        // prepare attributes
124        $p = array();
125        $p['class'] = 'edit';
126        $p['id']    = 'meta__'.$key;
127        $p['name']  = 'meta['.$field[0].']';
128        $p_attrs    = array('class' => 'edit');
129
130        $form->addElement('<div class="row">');
131        if($field[2] == 'text'){
132            $form->addElement(form_makeField('text', $p['name'], $value, ($lang[$field[1]]) ? $lang[$field[1]] : $field[1] . ':', $p['id'], $p['class'], $p_attrs));
133        }else{
134            $att = buildAttributes($p);
135            $form->addElement('<label for="meta__'.$key.'">'.$lang[$field[1]].'</label>');
136            $form->addElement("<textarea $att rows=\"6\" cols=\"50\">".formText($value).'</textarea>');
137        }
138        $form->addElement('</div>'.NL);
139    }
140    $form->addElement('<div class="buttons">');
141    $form->addElement(form_makeButton('submit', '', $lang['btn_save'], array('accesskey' => 's', 'name' => 'mediado[save]')));
142    $form->addElement('</div>'.NL);
143    $form->printForm();
144}
145
146/**
147 * Convenience 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        $mediareferences = ft_mediause($id,$conf['refshow']);
156        if(!count($mediareferences)) {
157            return false;
158        } else {
159            return $mediareferences;
160        }
161    } else {
162        return false;
163    }
164}
165
166define('DOKU_MEDIA_DELETED', 1);
167define('DOKU_MEDIA_NOT_AUTH', 2);
168define('DOKU_MEDIA_INUSE', 4);
169define('DOKU_MEDIA_EMPTY_NS', 8);
170
171/**
172 * Handles media file deletions
173 *
174 * If configured, checks for media references before deletion
175 *
176 * @author Andreas Gohr <andi@splitbrain.org>
177 * @return int One of: 0,
178                       DOKU_MEDIA_DELETED,
179                       DOKU_MEDIA_DELETED | DOKU_MEDIA_EMPTY_NS,
180                       DOKU_MEDIA_NOT_AUTH,
181                       DOKU_MEDIA_INUSE
182 */
183function media_delete($id,$auth){
184    global $lang;
185    if($auth < AUTH_DELETE) return DOKU_MEDIA_NOT_AUTH;
186    if(media_inuse($id)) return DOKU_MEDIA_INUSE;
187
188    $file = mediaFN($id);
189
190    // trigger an event - MEDIA_DELETE_FILE
191    $data['id']   = $id;
192    $data['name'] = basename($file);
193    $data['path'] = $file;
194    $data['size'] = (@file_exists($file)) ? filesize($file) : 0;
195
196    $data['unl'] = false;
197    $data['del'] = false;
198    $evt = new Doku_Event('MEDIA_DELETE_FILE',$data);
199    if ($evt->advise_before()) {
200        $old = @filemtime($file);
201        if(!@file_exists(mediaFN($id, $old)) && @file_exists($file)) {
202            // add old revision to the attic
203            media_saveOldRevision($id);
204        }
205
206        $data['unl'] = @unlink($file);
207        if($data['unl']){
208            addMediaLogEntry(time(), $id, DOKU_CHANGE_TYPE_DELETE, $lang['deleted']);
209            $data['del'] = io_sweepNS($id,'mediadir');
210        }
211    }
212    $evt->advise_after();
213    unset($evt);
214
215    if($data['unl'] && $data['del']){
216        return DOKU_MEDIA_DELETED | DOKU_MEDIA_EMPTY_NS;
217    }
218
219    return $data['unl'] ? DOKU_MEDIA_DELETED : 0;
220}
221
222/**
223 * Handle file uploads via XMLHttpRequest
224 *
225 * @return mixed false on error, id of the new file on success
226 */
227function media_upload_xhr($ns,$auth){
228    if(!checkSecurityToken()) return false;
229
230    $id = $_GET['qqfile'];
231    list($ext,$mime,$dl) = mimetype($id);
232    $input = fopen("php://input", "r");
233    $temp = tmpfile();
234    $realSize = stream_copy_to_stream($input, $temp);
235    fclose($input);
236    if ($realSize != (int)$_SERVER["CONTENT_LENGTH"]) return false;
237    if (!($tmp = io_mktmpdir())) return false;
238    $path = $tmp.'/'.md5($id);
239    $target = fopen($path, "w");
240    fseek($temp, 0, SEEK_SET);
241    stream_copy_to_stream($temp, $target);
242    fclose($target);
243    $res = media_save(
244        array('name' => $path,
245            'mime' => $mime,
246            'ext'  => $ext),
247        $ns.':'.$id,
248        (($_REQUEST['ow'] == 'checked') ? true : false),
249        $auth,
250        'copy'
251    );
252    unlink($path);
253    if ($tmp) dir_delete($tmp);
254    if (is_array($res)) {
255        msg($res[0], $res[1]);
256        return false;
257    }
258    return $res;
259}
260
261/**
262 * Handles media file uploads
263 *
264 * @author Andreas Gohr <andi@splitbrain.org>
265 * @author Michael Klier <chi@chimeric.de>
266 * @return mixed false on error, id of the new file on success
267 */
268function media_upload($ns,$auth,$file=false){
269    if(!checkSecurityToken()) return false;
270    global $lang;
271
272    // get file and id
273    $id   = $_POST['mediaid'];
274    if (!$file) $file = $_FILES['upload'];
275    if(empty($id)) $id = $file['name'];
276
277    // check for errors (messages are done in lib/exe/mediamanager.php)
278    if($file['error']) return false;
279
280    // check extensions
281    list($fext,$fmime,$dl) = mimetype($file['name']);
282    list($iext,$imime,$dl) = mimetype($id);
283    if($fext && !$iext){
284        // no extension specified in id - read original one
285        $id   .= '.'.$fext;
286        $imime = $fmime;
287    }elseif($fext && $fext != $iext){
288        // extension was changed, print warning
289        msg(sprintf($lang['mediaextchange'],$fext,$iext));
290    }
291
292    $res = media_save(array('name' => $file['tmp_name'],
293                            'mime' => $imime,
294                            'ext'  => $iext), $ns.':'.$id,
295                      $_REQUEST['ow'], $auth, 'move_uploaded_file');
296    if (is_array($res)) {
297        msg($res[0], $res[1]);
298        return false;
299    }
300    return $res;
301}
302
303/**
304 * This generates an action event and delegates to _media_upload_action().
305 * Action plugins are allowed to pre/postprocess the uploaded file.
306 * (The triggered event is preventable.)
307 *
308 * Event data:
309 * $data[0]     fn_tmp: the temporary file name (read from $_FILES)
310 * $data[1]     fn: the file name of the uploaded file
311 * $data[2]     id: the future directory id of the uploaded file
312 * $data[3]     imime: the mimetype of the uploaded file
313 * $data[4]     overwrite: if an existing file is going to be overwritten
314 *
315 * @triggers MEDIA_UPLOAD_FINISH
316 */
317function media_save($file, $id, $ow, $auth, $move) {
318    if($auth < AUTH_UPLOAD) {
319        return array("You don't have permissions to upload files.", -1);
320    }
321
322    if (!isset($file['mime']) || !isset($file['ext'])) {
323        list($ext, $mime) = mimetype($id);
324        if (!isset($file['mime'])) {
325            $file['mime'] = $mime;
326        }
327        if (!isset($file['ext'])) {
328            $file['ext'] = $ext;
329        }
330    }
331
332    global $lang, $conf;
333
334    // get filename
335    $id   = cleanID($id,false,true);
336    $fn   = mediaFN($id);
337
338    // get filetype regexp
339    $types = array_keys(getMimeTypes());
340    $types = array_map(create_function('$q','return preg_quote($q,"/");'),$types);
341    $regex = join('|',$types);
342
343    // because a temp file was created already
344    if(!preg_match('/\.('.$regex.')$/i',$fn)) {
345        return array($lang['uploadwrong'],-1);
346    }
347
348    //check for overwrite
349    $overwrite = @file_exists($fn);
350    $auth_ow = (($conf['mediarevisions']) ? AUTH_UPLOAD : AUTH_DELETE);
351    if($overwrite && (!$ow || $auth < $auth_ow)) {
352        return array($lang['uploadexist'], 0);
353    }
354    // check for valid content
355    $ok = media_contentcheck($file['name'], $file['mime']);
356    if($ok == -1){
357        return array(sprintf($lang['uploadbadcontent'],'.' . $file['ext']),-1);
358    }elseif($ok == -2){
359        return array($lang['uploadspam'],-1);
360    }elseif($ok == -3){
361        return array($lang['uploadxss'],-1);
362    }
363
364    // prepare event data
365    $data[0] = $file['name'];
366    $data[1] = $fn;
367    $data[2] = $id;
368    $data[3] = $file['mime'];
369    $data[4] = $overwrite;
370    $data[5] = $move;
371
372    // trigger event
373    return trigger_event('MEDIA_UPLOAD_FINISH', $data, '_media_upload_action', true);
374}
375
376/**
377 * Callback adapter for media_upload_finish()
378 * @author Michael Klier <chi@chimeric.de>
379 */
380function _media_upload_action($data) {
381    // fixme do further sanity tests of given data?
382    if(is_array($data) && count($data)===6) {
383        return media_upload_finish($data[0], $data[1], $data[2], $data[3], $data[4], $data[5]);
384    } else {
385        return false; //callback error
386    }
387}
388
389/**
390 * Saves an uploaded media file
391 *
392 * @author Andreas Gohr <andi@splitbrain.org>
393 * @author Michael Klier <chi@chimeric.de>
394 * @author Kate Arzamastseva <pshns@ukr.net>
395 */
396function media_upload_finish($fn_tmp, $fn, $id, $imime, $overwrite, $move = 'move_uploaded_file') {
397    global $conf;
398    global $lang;
399    global $REV;
400
401    $old = @filemtime($fn);
402    if(!@file_exists(mediaFN($id, $old)) && @file_exists($fn)) {
403        // add old revision to the attic if missing
404        media_saveOldRevision($id);
405    }
406
407    // prepare directory
408    io_createNamespace($id, 'media');
409
410    if($move($fn_tmp, $fn)) {
411        @clearstatcache(true,$fn);
412        $new = @filemtime($fn);
413        // Set the correct permission here.
414        // Always chmod media because they may be saved with different permissions than expected from the php umask.
415        // (Should normally chmod to $conf['fperm'] only if $conf['fperm'] is set.)
416        chmod($fn, $conf['fmode']);
417        msg($lang['uploadsucc'],1);
418        media_notify($id,$fn,$imime,$old);
419        // add a log entry to the media changelog
420        if ($REV){
421            addMediaLogEntry($new, $id, DOKU_CHANGE_TYPE_REVERT, $lang['restored'], $REV);
422        } elseif ($overwrite) {
423            addMediaLogEntry($new, $id, DOKU_CHANGE_TYPE_EDIT);
424        } else {
425            addMediaLogEntry($new, $id, DOKU_CHANGE_TYPE_CREATE, $lang['created']);
426        }
427        return $id;
428    }else{
429        return array($lang['uploadfail'],-1);
430    }
431}
432
433/**
434 * Moves the current version of media file to the media_attic
435 * directory
436 *
437 * @author Kate Arzamastseva <pshns@ukr.net>
438 * @param string $id
439 * @return int - revision date
440 */
441function media_saveOldRevision($id){
442    global $conf, $lang;
443
444    $oldf = mediaFN($id);
445    if(!@file_exists($oldf)) return '';
446    $date = filemtime($oldf);
447    if (!$conf['mediarevisions']) return $date;
448
449    if (!getRevisionInfo($id, $date, 8192, true)) {
450        // there was an external edit,
451        // there is no log entry for current version of file
452        if (!@file_exists(mediaMetaFN($id,'.changes'))) {
453            addMediaLogEntry($date, $id, DOKU_CHANGE_TYPE_CREATE, $lang['created']);
454        } else {
455            addMediaLogEntry($date, $id, DOKU_CHANGE_TYPE_EDIT);
456        }
457    }
458
459    $newf = mediaFN($id,$date);
460    io_makeFileDir($newf);
461    if(copy($oldf, $newf)) {
462        // Set the correct permission here.
463        // Always chmod media because they may be saved with different permissions than expected from the php umask.
464        // (Should normally chmod to $conf['fperm'] only if $conf['fperm'] is set.)
465        chmod($newf, $conf['fmode']);
466    }
467    return $date;
468}
469
470/**
471 * This function checks if the uploaded content is really what the
472 * mimetype says it is. We also do spam checking for text types here.
473 *
474 * We need to do this stuff because we can not rely on the browser
475 * to do this check correctly. Yes, IE is broken as usual.
476 *
477 * @author Andreas Gohr <andi@splitbrain.org>
478 * @link   http://www.splitbrain.org/blog/2007-02/12-internet_explorer_facilitates_cross_site_scripting
479 * @fixme  check all 26 magic IE filetypes here?
480 */
481function media_contentcheck($file,$mime){
482    global $conf;
483    if($conf['iexssprotect']){
484        $fh = @fopen($file, 'rb');
485        if($fh){
486            $bytes = fread($fh, 256);
487            fclose($fh);
488            if(preg_match('/<(script|a|img|html|body|iframe)[\s>]/i',$bytes)){
489                return -3;
490            }
491        }
492    }
493    if(substr($mime,0,6) == 'image/'){
494        $info = @getimagesize($file);
495        if($mime == 'image/gif' && $info[2] != 1){
496            return -1;
497        }elseif($mime == 'image/jpeg' && $info[2] != 2){
498            return -1;
499        }elseif($mime == 'image/png' && $info[2] != 3){
500            return -1;
501        }
502        # fixme maybe check other images types as well
503    }elseif(substr($mime,0,5) == 'text/'){
504        global $TEXT;
505        $TEXT = io_readFile($file);
506        if(checkwordblock()){
507            return -2;
508        }
509    }
510    return 0;
511}
512
513/**
514 * Send a notify mail on uploads
515 *
516 * @author Andreas Gohr <andi@splitbrain.org>
517 */
518function media_notify($id,$file,$mime,$old_rev=false){
519    global $lang;
520    global $conf;
521    global $INFO;
522    if(empty($conf['notify'])) return; //notify enabled?
523
524    $ip = clientIP();
525
526    $text = rawLocale('uploadmail');
527    $text = str_replace('@DATE@',dformat(),$text);
528    $text = str_replace('@BROWSER@',$_SERVER['HTTP_USER_AGENT'],$text);
529    $text = str_replace('@IPADDRESS@',$ip,$text);
530    $text = str_replace('@HOSTNAME@',gethostsbyaddrs($ip),$text);
531    $text = str_replace('@DOKUWIKIURL@',DOKU_URL,$text);
532    $text = str_replace('@USER@',$_SERVER['REMOTE_USER'],$text);
533    $text = str_replace('@MIME@',$mime,$text);
534    $text = str_replace('@MEDIA@',ml($id,'',true,'&',true),$text);
535    $text = str_replace('@SIZE@',filesize_h(filesize($file)),$text);
536    if ($old_rev && $conf['mediarevisions']) {
537        $text = str_replace('@OLD@', ml($id, "rev=$old_rev", true, '&', true), $text);
538    } else {
539        $text = str_replace('@OLD@', '', $text);
540    }
541
542    if(empty($conf['mailprefix'])) {
543        $subject = '['.$conf['title'].'] '.$lang['mail_upload'].' '.$id;
544    } else {
545        $subject = '['.$conf['mailprefix'].'] '.$lang['mail_upload'].' '.$id;
546    }
547
548    mail_send($conf['notify'],$subject,$text,$conf['mailfrom']);
549}
550
551/**
552 * List all files in a given Media namespace
553 */
554function media_filelist($ns,$auth=null,$jump='',$fullscreenview=false,$sort=false){
555    global $conf;
556    global $lang;
557    $ns = cleanID($ns);
558
559    // check auth our self if not given (needed for ajax calls)
560    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
561
562    if (!$fullscreenview) echo '<h1 id="media__ns">:'.hsc($ns).'</h1>'.NL;
563
564    if($auth < AUTH_READ){
565        // FIXME: print permission warning here instead?
566        echo '<div class="nothing">'.$lang['nothingfound'].'</div>'.NL;
567    }else{
568        if (!$fullscreenview) media_uploadform($ns, $auth);
569
570        $dir = utf8_encodeFN(str_replace(':','/',$ns));
571        $data = array();
572        search($data,$conf['mediadir'],'search_media',
573                array('showmsg'=>true,'depth'=>1),$dir,1,$sort);
574
575        if(!count($data)){
576            echo '<div class="nothing">'.$lang['nothingfound'].'</div>'.NL;
577        }else {
578            if ($fullscreenview) {
579                echo '<ul class="' . _media_get_list_type() . '">';
580            }
581            foreach($data as $item){
582                if (!$fullscreenview) {
583                    media_printfile($item,$auth,$jump);
584                } else {
585                    media_printfile_thumbs($item,$auth,$jump);
586                }
587            }
588            if ($fullscreenview) echo '</ul>'.NL;
589        }
590    }
591    if (!$fullscreenview) media_searchform($ns);
592}
593
594/**
595 * Prints tabs for files list actions
596 *
597 * @author Kate Arzamastseva <pshns@ukr.net>
598 * @author Adrian Lang <mail@adrianlang.de>
599 *
600 * @param string $selected_tab - opened tab
601 */
602
603function media_tabs_files($selected_tab = ''){
604    global $lang;
605    $tabs = array();
606    foreach(array('files'  => 'mediaselect',
607                  'upload' => 'media_uploadtab',
608                  'search' => 'media_searchtab') as $tab => $caption) {
609        $tabs[$tab] = array('href'    => media_managerURL(array('tab_files' => $tab), '&'),
610                            'caption' => $lang[$caption]);
611    }
612
613    html_tabs($tabs, $selected_tab);
614}
615
616/**
617 * Prints tabs for files details actions
618 *
619 * @author Kate Arzamastseva <pshns@ukr.net>
620 * @param string $selected_tab - opened tab
621 */
622function media_tabs_details($image, $selected_tab = ''){
623    global $lang, $conf;
624
625    $tabs = array();
626    $tabs['view'] = array('href'    => media_managerURL(array('tab_details' => 'view'), '&'),
627                          'caption' => $lang['media_viewtab']);
628
629    list($ext, $mime) = mimetype($image);
630    if ($mime == 'image/jpeg' && @file_exists(mediaFN($image))) {
631        $tabs['edit'] = array('href'    => media_managerURL(array('tab_details' => 'edit'), '&'),
632                              'caption' => $lang['media_edittab']);
633    }
634    if ($conf['mediarevisions']) {
635        $tabs['history'] = array('href'    => media_managerURL(array('tab_details' => 'history'), '&'),
636                                 'caption' => $lang['media_historytab']);
637    }
638
639    html_tabs($tabs, $selected_tab);
640}
641
642/**
643 * Prints options for the tab that displays a list of all files
644 *
645 * @author Kate Arzamastseva <pshns@ukr.net>
646 */
647function media_tab_files_options(){
648    global $lang, $NS;
649    $form = new Doku_Form(array('class' => 'options', 'method' => 'get',
650                                'action' => media_managerURL(array(), '&')));
651    $form->addHidden('sectok', null);
652    if (isset($_REQUEST['q'])) {
653        $form->addHidden('q', $_REQUEST['q']);
654    }
655    $form->addElement('<ul>'.NL);
656    foreach(array('list' => array('listType', array('thumbs', 'rows')),
657                  'sort' => array('sortBy', array('name', 'date')))
658            as $group => $content) {
659        $checked = "_media_get_${group}_type";
660        $checked = $checked();
661
662        $form->addElement('<li class="' . $content[0] . '">');
663        foreach($content[1] as $option) {
664            $attrs = array();
665            if ($checked == $option) {
666                $attrs['checked'] = 'checked';
667            }
668            $form->addElement(form_makeRadioField($group, $option,
669                                       $lang['media_' . $group . '_' . $option],
670                                                  $content[0] . '__' . $option,
671                                                  $option, $attrs));
672        }
673        $form->addElement('</li>'.NL);
674    }
675    $form->addElement('<li>');
676    $form->addElement(form_makeButton('submit', '', $lang['btn_apply']));
677    $form->addElement('</li>'.NL);
678    $form->addElement('</ul>'.NL);
679    $form->printForm();
680}
681
682/**
683 * Returns type of sorting for the list of files in media manager
684 *
685 * @author Kate Arzamastseva <pshns@ukr.net>
686 * @return string - sort type
687 */
688function _media_get_sort_type() {
689    return _media_get_display_param('sort', array('default' => 'name', 'date'));
690}
691
692function _media_get_list_type() {
693    return _media_get_display_param('list', array('default' => 'thumbs', 'rows'));
694}
695
696function _media_get_display_param($param, $values) {
697    if (isset($_REQUEST[$param]) && in_array($_REQUEST[$param], $values)) {
698        // FIXME: Set cookie
699        return $_REQUEST[$param];
700    } else {
701        $val = get_doku_pref($param, $values['default']);
702        if (!in_array($val, $values)) {
703            $val = $values['default'];
704        }
705        return $val;
706    }
707}
708
709/**
710 * Prints tab that displays a list of all files
711 *
712 * @author Kate Arzamastseva <pshns@ukr.net>
713 */
714function media_tab_files($ns,$auth=null,$jump='') {
715    global $lang;
716    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
717
718    if($auth < AUTH_READ){
719        echo '<div class="nothing">'.$lang['media_perm_read'].'</div>'.NL;
720    }else{
721        media_filelist($ns,$auth,$jump,true,_media_get_sort_type());
722    }
723}
724
725/**
726 * Prints tab that displays uploading form
727 *
728 * @author Kate Arzamastseva <pshns@ukr.net>
729 */
730function media_tab_upload($ns,$auth=null,$jump='') {
731    global $lang;
732    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
733
734    echo '<div class="upload">'.NL;
735    if ($auth >= AUTH_UPLOAD) {
736        echo '<p>' . $lang['mediaupload'] . '</p>';
737    }
738    media_uploadform($ns, $auth, true);
739    echo '</div>'.NL;
740}
741
742/**
743 * Prints tab that displays search form
744 *
745 * @author Kate Arzamastseva <pshns@ukr.net>
746 */
747function media_tab_search($ns,$auth=null) {
748    global $lang;
749
750    $do = $_REQUEST['mediado'];
751    $query = $_REQUEST['q'];
752    if (!$query) $query = '';
753    echo '<div class="search">'.NL;
754
755    media_searchform($ns, $query, true);
756    if ($do == 'searchlist') {
757        media_searchlist($query,$ns,$auth,true,_media_get_sort_type());
758    }
759    echo '</div>'.NL;
760}
761
762/**
763 * Prints tab that displays mediafile details
764 *
765 * @author Kate Arzamastseva <pshns@ukr.net>
766 */
767function media_tab_view($image, $ns, $auth=null, $rev=false) {
768    global $lang, $conf;
769    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
770
771    if ($image && $auth >= AUTH_READ) {
772        $meta = new JpegMeta(mediaFN($image, $rev));
773        media_preview($image, $auth, $rev, $meta);
774        media_preview_buttons($image, $auth, $rev);
775        media_details($image, $auth, $rev, $meta);
776
777    } else {
778        echo '<div class="nothing">'.$lang['media_perm_read'].'</div>'.NL;
779    }
780}
781
782/**
783 * Prints tab that displays form for editing mediafile metadata
784 *
785 * @author Kate Arzamastseva <pshns@ukr.net>
786 */
787function media_tab_edit($image, $ns, $auth=null) {
788    global $lang;
789    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
790
791    if ($image) {
792        list($ext, $mime) = mimetype($image);
793        if ($mime == 'image/jpeg') media_metaform($image,$auth);
794    }
795}
796
797/**
798 * Prints tab that displays mediafile revisions
799 *
800 * @author Kate Arzamastseva <pshns@ukr.net>
801 */
802function media_tab_history($image, $ns, $auth=null) {
803    global $lang;
804    if(is_null($auth)) $auth = auth_quickaclcheck("$ns:*");
805    $do = $_REQUEST['mediado'];
806
807    if ($auth >= AUTH_READ && $image) {
808        if ($do == 'diff'){
809            media_diff($image, $ns, $auth);
810        } else {
811            $first = isset($_REQUEST['first']) ? intval($_REQUEST['first']) : 0;
812            html_revisions($first, $image);
813        }
814    } else {
815        echo '<div class="nothing">'.$lang['media_perm_read'].'</div>'.NL;
816    }
817}
818
819/**
820 * Prints mediafile details
821 *
822 * @author Kate Arzamastseva <pshns@ukr.net>
823 */
824function media_preview($image, $auth, $rev=false, $meta=false) {
825
826    $size = media_image_preview_size($image, $rev, $meta);
827
828    if ($size) {
829        echo '<div class="image">';
830
831        $more = array();
832        if ($rev) {
833            $more['rev'] = $rev;
834        } else {
835            $t = @filemtime(mediaFN($image));
836            $more['t'] = $t;
837        }
838
839        $more['w'] = $size[0];
840        $more['h'] = $size[1];
841        $src = ml($image, $more);
842        echo '<img src="'.$src.'" alt="" style="max-width: '.$size[0].'px;" />';
843
844        echo '</div>'.NL;
845    }
846}
847
848/**
849 * Prints mediafile action buttons
850 *
851 * @author Kate Arzamastseva <pshns@ukr.net>
852 */
853function media_preview_buttons($image, $auth, $rev=false) {
854    global $lang, $conf;
855
856    echo '<ul class="actions">'.NL;
857
858    if($auth >= AUTH_DELETE && !$rev && @file_exists(mediaFN($image))){
859
860        // delete button
861        $form = new Doku_Form(array('id' => 'mediamanager__btn_delete',
862            'action'=>media_managerURL(array('delete' => $image), '&')));
863        $form->addElement(form_makeButton('submit','',$lang['btn_delete']));
864        echo '<li>';
865        $form->printForm();
866        echo '</li>'.NL;
867    }
868
869    $auth_ow = (($conf['mediarevisions']) ? AUTH_UPLOAD : AUTH_DELETE);
870    if($auth >= $auth_ow && !$rev){
871
872        // upload new version button
873        $form = new Doku_Form(array('id' => 'mediamanager__btn_update',
874            'action'=>media_managerURL(array('image' => $image, 'mediado' => 'update'), '&')));
875        $form->addElement(form_makeButton('submit','',$lang['media_update']));
876        echo '<li>';
877        $form->printForm();
878        echo '</li>'.NL;
879    }
880
881    if($auth >= AUTH_UPLOAD && $rev && $conf['mediarevisions'] && @file_exists(mediaFN($image, $rev))){
882
883        // restore button
884        $form = new Doku_Form(array('id' => 'mediamanager__btn_restore',
885            'action'=>media_managerURL(array('image' => $image), '&')));
886        $form->addHidden('mediado','restore');
887        $form->addHidden('rev',$rev);
888        $form->addElement(form_makeButton('submit','',$lang['media_restore']));
889        echo '<li>';
890        $form->printForm();
891        echo '</li>'.NL;
892    }
893
894    echo '</ul>'.NL;
895}
896
897/**
898 * Returns image width and height for mediamanager preview panel
899 *
900 * @author Kate Arzamastseva <pshns@ukr.net>
901 * @param string $image
902 * @param int $rev
903 * @param JpegMeta $meta
904 * @return array
905 */
906function media_image_preview_size($image, $rev, $meta, $size = 500) {
907    if (!preg_match("/\.(jpe?g|gif|png)$/", $image) || !file_exists(mediaFN($image, $rev))) return false;
908
909    $info = getimagesize(mediaFN($image, $rev));
910    $w = (int) $info[0];
911    $h = (int) $info[1];
912
913    if($meta && ($w > $size || $h > $size)){
914        $ratio = $meta->getResizeRatio($size, $size);
915        $w = floor($w * $ratio);
916        $h = floor($h * $ratio);
917    }
918    return array($w, $h);
919}
920
921/**
922 * Returns the requested EXIF/IPTC tag from the image meta
923 *
924 * @author Kate Arzamastseva <pshns@ukr.net>
925 * @param array $tags
926 * @param JpegMeta $meta
927 * @param string $alt
928 * @return string
929 */
930function media_getTag($tags,$meta,$alt=''){
931    if($meta === false) return $alt;
932    $info = $meta->getField($tags);
933    if($info == false) return $alt;
934    return $info;
935}
936
937/**
938 * Returns mediafile tags
939 *
940 * @author Kate Arzamastseva <pshns@ukr.net>
941 * @param JpegMeta $meta
942 * @return array
943 */
944function media_file_tags($meta) {
945    global $config_cascade;
946
947    // load the field descriptions
948    static $fields = null;
949    if(is_null($fields)){
950        $config_files = getConfigFiles('mediameta');
951        foreach ($config_files as $config_file) {
952            if(@file_exists($config_file)) include($config_file);
953        }
954    }
955
956    $tags = array();
957
958    foreach($fields as $key => $tag){
959        $t = array();
960        if (!empty($tag[0])) $t = array($tag[0]);
961        if(is_array($tag[3])) $t = array_merge($t,$tag[3]);
962        $value = media_getTag($t, $meta);
963        $tags[] = array('tag' => $tag, 'value' => $value);
964    }
965
966    return $tags;
967}
968
969/**
970 * Prints mediafile tags
971 *
972 * @author Kate Arzamastseva <pshns@ukr.net>
973 */
974function media_details($image, $auth, $rev=false, $meta=false) {
975    global $lang;
976
977    if (!$meta) $meta = new JpegMeta(mediaFN($image, $rev));
978    $tags = media_file_tags($meta);
979
980    echo '<dl>'.NL;
981    foreach($tags as $tag){
982        if ($tag['value']) {
983            $value = cleanText($tag['value']);
984            echo '<dt>'.$lang[$tag['tag'][1]].':</dt><dd>';
985            if ($tag['tag'][2] == 'date') echo dformat($value);
986            else echo hsc($value);
987            echo '</dd>'.NL;
988        }
989    }
990    echo '</dl>'.NL;
991}
992
993/**
994 * Shows difference between two revisions of file
995 *
996 * @author Kate Arzamastseva <pshns@ukr.net>
997 */
998function media_diff($image, $ns, $auth, $fromajax = false) {
999    global $lang;
1000    global $conf;
1001
1002    if ($auth < AUTH_READ || !$image || !$conf['mediarevisions']) return '';
1003
1004    $rev1 = (int) $_REQUEST['rev'];
1005
1006    if(is_array($_REQUEST['rev2'])){
1007        $rev1 = (int) $_REQUEST['rev2'][0];
1008        $rev2 = (int) $_REQUEST['rev2'][1];
1009
1010        if(!$rev1){
1011            $rev1 = $rev2;
1012            unset($rev2);
1013        }
1014    }else{
1015        $rev2 = (int) $_REQUEST['rev2'];
1016    }
1017
1018    if ($rev1 && !file_exists(mediaFN($image, $rev1))) $rev1 = false;
1019    if ($rev2 && !file_exists(mediaFN($image, $rev2))) $rev2 = false;
1020
1021    if($rev1 && $rev2){            // two specific revisions wanted
1022        // make sure order is correct (older on the left)
1023        if($rev1 < $rev2){
1024            $l_rev = $rev1;
1025            $r_rev = $rev2;
1026        }else{
1027            $l_rev = $rev2;
1028            $r_rev = $rev1;
1029        }
1030    }elseif($rev1){                // single revision given, compare to current
1031        $r_rev = '';
1032        $l_rev = $rev1;
1033    }else{                        // no revision was given, compare previous to current
1034        $r_rev = '';
1035        $revs = getRevisions($image, 0, 1, 8192, true);
1036        if (file_exists(mediaFN($image, $revs[0]))) {
1037            $l_rev = $revs[0];
1038        } else {
1039            $l_rev = '';
1040        }
1041    }
1042
1043    // prepare event data
1044    $data[0] = $image;
1045    $data[1] = $l_rev;
1046    $data[2] = $r_rev;
1047    $data[3] = $ns;
1048    $data[4] = $auth;
1049    $data[5] = $fromajax;
1050
1051    // trigger event
1052    return trigger_event('MEDIA_DIFF', $data, '_media_file_diff', true);
1053
1054}
1055
1056function _media_file_diff($data) {
1057    if(is_array($data) && count($data)===6) {
1058        return media_file_diff($data[0], $data[1], $data[2], $data[3], $data[4], $data[5]);
1059    } else {
1060        return false;
1061    }
1062}
1063
1064/**
1065 * Shows difference between two revisions of image
1066 *
1067 * @author Kate Arzamastseva <pshns@ukr.net>
1068 */
1069function media_file_diff($image, $l_rev, $r_rev, $ns, $auth, $fromajax){
1070    global $lang, $config_cascade;
1071
1072    $l_meta = new JpegMeta(mediaFN($image, $l_rev));
1073    $r_meta = new JpegMeta(mediaFN($image, $r_rev));
1074
1075    $is_img = preg_match("/\.(jpe?g|gif|png)$/", $image);
1076    if ($is_img) {
1077        $l_size = media_image_preview_size($image, $l_rev, $l_meta);
1078        $r_size = media_image_preview_size($image, $r_rev, $r_meta);
1079        $is_img = ($l_size && $r_size && ($l_size[0] >= 30 || $r_size[0] >= 30));
1080
1081        $difftype = $_REQUEST['difftype'];
1082
1083        if (!$fromajax) {
1084            $form = new Doku_Form(array(
1085                'action' => media_managerURL(array(), '&'),
1086                'method' => 'get',
1087                'id' => 'mediamanager__form_diffview',
1088                'class' => 'diffView'
1089            ));
1090            $form->addHidden('sectok', null);
1091            $form->addElement('<input type="hidden" name="rev2[]" value="'.$l_rev.'" ></input>');
1092            $form->addElement('<input type="hidden" name="rev2[]" value="'.$r_rev.'" ></input>');
1093            $form->addHidden('mediado', 'diff');
1094            $form->printForm();
1095
1096            echo NL.'<div id="mediamanager__diff" >'.NL;
1097        }
1098
1099        if ($difftype == 'opacity' || $difftype == 'portions') {
1100            media_image_diff($image, $l_rev, $r_rev, $l_size, $r_size, $difftype);
1101            if (!$fromajax) echo '</div>';
1102            return '';
1103        }
1104    }
1105
1106    list($l_head, $r_head) = html_diff_head($l_rev, $r_rev, $image, true);
1107
1108    ?>
1109    <table>
1110      <tr>
1111        <th><?php echo $l_head; ?></th>
1112        <th><?php echo $r_head; ?></th>
1113      </tr>
1114    <?php
1115
1116    echo '<tr class="image">';
1117    echo '<td>';
1118    media_preview($image, $auth, $l_rev, $l_meta);
1119    echo '</td>';
1120
1121    echo '<td>';
1122    media_preview($image, $auth, $r_rev, $r_meta);
1123    echo '</td>';
1124    echo '</tr>'.NL;
1125
1126    echo '<tr class="actions">';
1127    echo '<td>';
1128    media_preview_buttons($image, $auth, $l_rev);
1129    echo '</td>';
1130
1131    echo '<td>';
1132    media_preview_buttons($image, $auth, $r_rev);
1133    echo '</td>';
1134    echo '</tr>'.NL;
1135
1136    $l_tags = media_file_tags($l_meta);
1137    $r_tags = media_file_tags($r_meta);
1138    // FIXME r_tags-only stuff
1139    foreach ($l_tags as $key => $l_tag) {
1140        if ($l_tag['value'] != $r_tags[$key]['value']) {
1141            $r_tags[$key]['highlighted'] = true;
1142            $l_tags[$key]['highlighted'] = true;
1143        } else if (!$l_tag['value'] || !$r_tags[$key]['value']) {
1144            unset($r_tags[$key]);
1145            unset($l_tags[$key]);
1146        }
1147    }
1148
1149    echo '<tr>';
1150    foreach(array($l_tags,$r_tags) as $tags){
1151        echo '<td>'.NL;
1152
1153        echo '<dl class="img_tags">';
1154        foreach($tags as $tag){
1155            $value = cleanText($tag['value']);
1156            if (!$value) $value = '-';
1157            echo '<dt>'.$lang[$tag['tag'][1]].':</dt>';
1158            echo '<dd>';
1159            if ($tag['highlighted']) {
1160                echo '<strong>';
1161            }
1162            if ($tag['tag'][2] == 'date') echo dformat($value);
1163            else echo hsc($value);
1164            if ($tag['highlighted']) {
1165                echo '</strong>';
1166            }
1167            echo '</dd>';
1168        }
1169        echo '</dl>'.NL;
1170
1171        echo '</td>';
1172    }
1173    echo '</tr>'.NL;
1174
1175    echo '</table>'.NL;
1176
1177    if ($is_img && !$fromajax) echo '</div>';
1178}
1179
1180/**
1181 * Prints two images side by side
1182 * and slider
1183 *
1184 * @author Kate Arzamastseva <pshns@ukr.net>
1185 * @param string $image
1186 * @param int $l_rev
1187 * @param int $r_rev
1188 * @param array $l_size
1189 * @param array $r_size
1190 * @param string $type
1191 */
1192function media_image_diff($image, $l_rev, $r_rev, $l_size, $r_size, $type) {
1193    if ($l_size != $r_size) {
1194        if ($r_size[0] > $l_size[0]) {
1195            $l_size = $r_size;
1196        }
1197    }
1198
1199    $l_more = array('rev' => $l_rev, 'h' => $l_size[1], 'w' => $l_size[0]);
1200    $r_more = array('rev' => $r_rev, 'h' => $l_size[1], 'w' => $l_size[0]);
1201
1202    $l_src = ml($image, $l_more);
1203    $r_src = ml($image, $r_more);
1204
1205    // slider
1206    echo '<div class="slider" style="max-width: '.($l_size[0]-20).'px;" ></div>'.NL;
1207
1208    // two images in divs
1209    echo '<div class="imageDiff ' . $type . '">'.NL;
1210    echo '<div class="image1" style="max-width: '.$l_size[0].'px;">';
1211    echo '<img src="'.$l_src.'" alt="" />';
1212    echo '</div>'.NL;
1213    echo '<div class="image2" style="max-width: '.$l_size[0].'px;">';
1214    echo '<img src="'.$r_src.'" alt="" />';
1215    echo '</div>'.NL;
1216    echo '</div>'.NL;
1217}
1218
1219/**
1220 * Restores an old revision of a media file
1221 *
1222 * @param string $image
1223 * @param int $rev
1224 * @param int $auth
1225 * @return string - file's id
1226 * @author Kate Arzamastseva <pshns@ukr.net>
1227 */
1228function media_restore($image, $rev, $auth){
1229    global $conf;
1230    if ($auth < AUTH_UPLOAD || !$conf['mediarevisions']) return false;
1231    $removed = (!file_exists(mediaFN($image)) && file_exists(mediaMetaFN($image, '.changes')));
1232    if (!$image || (!file_exists(mediaFN($image)) && !$removed)) return false;
1233    if (!$rev || !file_exists(mediaFN($image, $rev))) return false;
1234    list($iext,$imime,$dl) = mimetype($image);
1235    $res = media_upload_finish(mediaFN($image, $rev),
1236        mediaFN($image),
1237        $image,
1238        $imime,
1239        true,
1240        'copy');
1241    if (is_array($res)) {
1242        msg($res[0], $res[1]);
1243        return false;
1244    }
1245    return $res;
1246}
1247
1248/**
1249 * List all files found by the search request
1250 *
1251 * @author Tobias Sarnowski <sarnowski@cosmocode.de>
1252 * @author Andreas Gohr <gohr@cosmocode.de>
1253 * @author Kate Arzamastseva <pshns@ukr.net>
1254 * @triggers MEDIA_SEARCH
1255 */
1256function media_searchlist($query,$ns,$auth=null,$fullscreen=false,$sort=''){
1257    global $conf;
1258    global $lang;
1259
1260    $ns = cleanID($ns);
1261
1262    if ($query) {
1263        $evdata = array(
1264                'ns'    => $ns,
1265                'data'  => array(),
1266                'query' => $query
1267                );
1268        $evt = new Doku_Event('MEDIA_SEARCH', $evdata);
1269        if ($evt->advise_before()) {
1270            $dir = utf8_encodeFN(str_replace(':','/',$evdata['ns']));
1271            $pattern = '/'.preg_quote($evdata['query'],'/').'/i';
1272            search($evdata['data'],
1273                    $conf['mediadir'],
1274                    'search_media',
1275                    array('showmsg'=>false,'pattern'=>$pattern),
1276                    $dir);
1277        }
1278
1279        $data = array();
1280        foreach ($evdata['data'] as $k => $v) {
1281            $data[$k] = ($sort == 'date') ? $v['mtime'] : $v['id'];
1282        }
1283        array_multisort($data, SORT_DESC, SORT_NUMERIC, $evdata['data']);
1284
1285        $evt->advise_after();
1286        unset($evt);
1287    }
1288
1289    if (!$fullscreen) {
1290        echo '<h1 id="media__ns">'.sprintf($lang['searchmedia_in'],hsc($ns).':*').'</h1>'.NL;
1291        media_searchform($ns,$query);
1292    }
1293
1294    if(!count($evdata['data'])){
1295        echo '<div class="nothing">'.$lang['nothingfound'].'</div>'.NL;
1296    }else {
1297        if ($fullscreen) {
1298            echo '<ul class="' . _media_get_list_type() . '">';
1299        }
1300        foreach($evdata['data'] as $item){
1301            if (!$fullscreen) media_printfile($item,$item['perm'],'',true);
1302            else media_printfile_thumbs($item,$item['perm'],false,true);
1303        }
1304        if ($fullscreen) echo '</ul>'.NL;
1305    }
1306}
1307
1308/**
1309 * Formats and prints one file in the list
1310 */
1311function media_printfile($item,$auth,$jump,$display_namespace=false){
1312    global $lang;
1313    global $conf;
1314
1315    // Prepare zebra coloring
1316    // I always wanted to use this variable name :-D
1317    static $twibble = 1;
1318    $twibble *= -1;
1319    $zebra = ($twibble == -1) ? 'odd' : 'even';
1320
1321    // Automatically jump to recent action
1322    if($jump == $item['id']) {
1323        $jump = ' id="scroll__here" ';
1324    }else{
1325        $jump = '';
1326    }
1327
1328    // Prepare fileicons
1329    list($ext,$mime,$dl) = mimetype($item['file'],false);
1330    $class = preg_replace('/[^_\-a-z0-9]+/i','_',$ext);
1331    $class = 'select mediafile mf_'.$class;
1332
1333    // Prepare filename
1334    $file = utf8_decodeFN($item['file']);
1335
1336    // Prepare info
1337    $info = '';
1338    if($item['isimg']){
1339        $info .= (int) $item['meta']->getField('File.Width');
1340        $info .= '&#215;';
1341        $info .= (int) $item['meta']->getField('File.Height');
1342        $info .= ' ';
1343    }
1344    $info .= '<i>'.dformat($item['mtime']).'</i>';
1345    $info .= ' ';
1346    $info .= filesize_h($item['size']);
1347
1348    // output
1349    echo '<div class="'.$zebra.'"'.$jump.'>'.NL;
1350    if (!$display_namespace) {
1351        echo '<a name="h_:'.$item['id'].'" class="'.$class.'">'.hsc($file).'</a> ';
1352    } else {
1353        echo '<a name="h_:'.$item['id'].'" class="'.$class.'">'.hsc($item['id']).'</a><br/>';
1354    }
1355    echo '<span class="info">('.$info.')</span>'.NL;
1356
1357    // view button
1358    $link = ml($item['id'],'',true);
1359    echo ' <a href="'.$link.'" target="_blank"><img src="'.DOKU_BASE.'lib/images/magnifier.png" '.
1360        'alt="'.$lang['mediaview'].'" title="'.$lang['mediaview'].'" class="btn" /></a>';
1361
1362    // mediamanager button
1363    $link = wl('',array('do'=>'media','image'=>$item['id']));
1364    echo ' <a href="'.$link.'" target="_blank"><img src="'.DOKU_BASE.'lib/images/mediamanager.png" '.
1365        'alt="'.$lang['btn_media'].'" title="'.$lang['btn_media'].'" class="btn" /></a>';
1366
1367    // delete button
1368    if($item['writable'] && $auth >= AUTH_DELETE){
1369        $link = DOKU_BASE.'lib/exe/mediamanager.php?delete='.rawurlencode($item['id']).
1370            '&amp;sectok='.getSecurityToken();
1371        echo ' <a href="'.$link.'" class="btn_media_delete" title="'.$item['id'].'">'.
1372            '<img src="'.DOKU_BASE.'lib/images/trash.png" alt="'.$lang['btn_delete'].'" '.
1373            'title="'.$lang['btn_delete'].'" class="btn" /></a>';
1374    }
1375
1376    echo '<div class="example" id="ex_'.str_replace(':','_',$item['id']).'">';
1377    echo $lang['mediausage'].' <code>{{:'.$item['id'].'}}</code>';
1378    echo '</div>';
1379    if($item['isimg']) media_printimgdetail($item);
1380    echo '<div class="clearer"></div>'.NL;
1381    echo '</div>'.NL;
1382}
1383
1384function media_printicon($filename){
1385    list($ext,$mime,$dl) = mimetype(mediaFN($filename),false);
1386
1387    if (@file_exists(DOKU_INC.'lib/images/fileicons/'.$ext.'.png')) {
1388        $icon = DOKU_BASE.'lib/images/fileicons/'.$ext.'.png';
1389    } else {
1390        $icon = DOKU_BASE.'lib/images/fileicons/file.png';
1391    }
1392
1393    return '<img src="'.$icon.'" alt="'.$filename.'" class="icon" />';
1394
1395}
1396
1397/**
1398 * Formats and prints one file in the list in the thumbnails view
1399 *
1400 * @author Kate Arzamastseva <pshns@ukr.net>
1401 */
1402function media_printfile_thumbs($item,$auth,$jump=false,$display_namespace=false){
1403    global $lang;
1404    global $conf;
1405
1406    // Prepare filename
1407    $file = utf8_decodeFN($item['file']);
1408
1409    // output
1410    echo '<li><dl>'.NL;
1411
1412        echo '<dt>';
1413    if($item['isimg']) {
1414        media_printimgdetail($item, true);
1415
1416    } else {
1417        echo '<a name="d_:'.$item['id'].'" class="image" title="'.$item['id'].'" href="'.
1418            media_managerURL(array('image' => hsc($item['id']), 'ns' => getNS($item['id']),
1419            'tab_details' => 'view')).'">';
1420        echo media_printicon($item['id']);
1421        echo '</a>';
1422    }
1423    echo '</dt>'.NL;
1424    if (!$display_namespace) {
1425        $name = hsc($file);
1426    } else {
1427        $name = hsc($item['id']);
1428    }
1429    echo '<dd class="name"><a href="'.media_managerURL(array('image' => hsc($item['id']), 'ns' => getNS($item['id']),
1430        'tab_details' => 'view')).'" name="h_:'.$item['id'].'">'.$name.'</a></dd>'.NL;
1431
1432    if($item['isimg']){
1433        $size = '';
1434        $size .= (int) $item['meta']->getField('File.Width');
1435        $size .= '&#215;';
1436        $size .= (int) $item['meta']->getField('File.Height');
1437        echo '<dd class="size">'.$size.'</dd>'.NL;
1438    } else {
1439        echo '<dd class="size">&nbsp;</dd>'.NL;
1440    }
1441    $date = dformat($item['mtime']);
1442    echo '<dd class="date">'.$date.'</dd>'.NL;
1443    $filesize = filesize_h($item['size']);
1444    echo '<dd class="filesize">'.$filesize.'</dd>'.NL;
1445    echo '</dl></li>'.NL;
1446}
1447
1448/**
1449 * Prints a thumbnail and metainfos
1450 */
1451function media_printimgdetail($item, $fullscreen=false){
1452    // prepare thumbnail
1453    $size = $fullscreen ? 90 : 120;
1454
1455    $w = (int) $item['meta']->getField('File.Width');
1456    $h = (int) $item['meta']->getField('File.Height');
1457    if($w>$size || $h>$size){
1458        if (!$fullscreen) {
1459            $ratio = $item['meta']->getResizeRatio($size);
1460        } else {
1461            $ratio = $item['meta']->getResizeRatio($size,$size);
1462        }
1463        $w = floor($w * $ratio);
1464        $h = floor($h * $ratio);
1465    }
1466    $src = ml($item['id'],array('w'=>$w,'h'=>$h,'t'=>$item['mtime']));
1467    $p = array();
1468    if (!$fullscreen) {
1469        // In fullscreen mediamanager view, image resizing is done via CSS.
1470        $p['width']  = $w;
1471        $p['height'] = $h;
1472    }
1473    $p['alt']    = $item['id'];
1474    $att = buildAttributes($p);
1475
1476    // output
1477    if ($fullscreen) {
1478        echo '<a name="l_:'.$item['id'].'" class="image thumb" href="'.
1479            media_managerURL(array('image' => hsc($item['id']), 'ns' => getNS($item['id']), 'tab_details' => 'view')).'">';
1480        echo '<img src="'.$src.'" '.$att.' />';
1481        echo '</a>';
1482    }
1483
1484    if ($fullscreen) return;
1485
1486    echo '<div class="detail">';
1487    echo '<div class="thumb">';
1488    echo '<a name="d_:'.$item['id'].'" class="select">';
1489    echo '<img src="'.$src.'" '.$att.' />';
1490    echo '</a>';
1491    echo '</div>';
1492
1493    // read EXIF/IPTC data
1494    $t = $item['meta']->getField(array('IPTC.Headline','xmp.dc:title'));
1495    $d = $item['meta']->getField(array('IPTC.Caption','EXIF.UserComment',
1496                'EXIF.TIFFImageDescription',
1497                'EXIF.TIFFUserComment'));
1498    if(utf8_strlen($d) > 250) $d = utf8_substr($d,0,250).'...';
1499    $k = $item['meta']->getField(array('IPTC.Keywords','IPTC.Category','xmp.dc:subject'));
1500
1501    // print EXIF/IPTC data
1502    if($t || $d || $k ){
1503        echo '<p>';
1504        if($t) echo '<strong>'.htmlspecialchars($t).'</strong><br />';
1505        if($d) echo htmlspecialchars($d).'<br />';
1506        if($t) echo '<em>'.htmlspecialchars($k).'</em>';
1507        echo '</p>';
1508    }
1509    echo '</div>';
1510}
1511
1512/**
1513 * Build link based on the current, adding/rewriting
1514 * parameters
1515 *
1516 * @author Kate Arzamastseva <pshns@ukr.net>
1517 * @param array $params
1518 * @param string $amp - separator
1519 * @return string - link
1520 */
1521function media_managerURL($params=false, $amp='&amp;', $abs=false, $params_array=false) {
1522    global $conf;
1523    global $ID;
1524
1525    $gets = array('do' => 'media');
1526    $media_manager_params = array('tab_files', 'tab_details', 'image', 'ns', 'list', 'sort');
1527    foreach ($media_manager_params as $x) {
1528        if (isset($_REQUEST[$x])) $gets[$x] = $_REQUEST[$x];
1529    }
1530
1531    if ($params) {
1532        $gets = $params + $gets;
1533    }
1534    unset($gets['id']);
1535    if (isset($gets['delete'])) {
1536        unset($gets['image']);
1537        unset($gets['tab_details']);
1538    }
1539
1540    if ($params_array) return $gets;
1541
1542    return wl($ID,$gets,$abs,$amp);
1543}
1544
1545/**
1546 * Print the media upload form if permissions are correct
1547 *
1548 * @author Andreas Gohr <andi@splitbrain.org>
1549 * @author Kate Arzamastseva <pshns@ukr.net>
1550 */
1551function media_uploadform($ns, $auth, $fullscreen = false){
1552    global $lang, $conf;
1553
1554    if($auth < AUTH_UPLOAD) {
1555        echo '<div class="nothing">'.$lang['media_perm_upload'].'</div>'.NL;
1556        return;
1557    }
1558    $auth_ow = (($conf['mediarevisions']) ? AUTH_UPLOAD : AUTH_DELETE);
1559
1560    $update = false;
1561    $id = '';
1562    if ($auth >= $auth_ow && $fullscreen && $_REQUEST['mediado'] == 'update') {
1563        $update = true;
1564        $id = cleanID($_REQUEST['image']);
1565    }
1566
1567    // The default HTML upload form
1568    $params = array('id'      => 'dw__upload',
1569                    'enctype' => 'multipart/form-data');
1570    if (!$fullscreen) {
1571        $params['action'] = DOKU_BASE.'lib/exe/mediamanager.php';
1572    } else {
1573        $params['action'] = media_managerURL(array('tab_files' => 'files',
1574            'tab_details' => 'view'), '&');
1575    }
1576
1577    $form = new Doku_Form($params);
1578    if (!$fullscreen) echo '<div class="upload">' . $lang['mediaupload'] . '</div>';
1579    $form->addElement(formSecurityToken());
1580    $form->addHidden('ns', hsc($ns));
1581    $form->addElement(form_makeOpenTag('p'));
1582    $form->addElement(form_makeFileField('upload', $lang['txt_upload'].':', 'upload__file'));
1583    $form->addElement(form_makeCloseTag('p'));
1584    $form->addElement(form_makeOpenTag('p'));
1585    $form->addElement(form_makeTextField('mediaid', noNS($id), $lang['txt_filename'].':', 'upload__name'));
1586    $form->addElement(form_makeButton('submit', '', $lang['btn_upload']));
1587    $form->addElement(form_makeCloseTag('p'));
1588
1589    if($auth >= $auth_ow){
1590        $form->addElement(form_makeOpenTag('p'));
1591        $attrs = array();
1592        if ($update) $attrs['checked'] = 'checked';
1593        $form->addElement(form_makeCheckboxField('ow', 1, $lang['txt_overwrt'], 'dw__ow', 'check', $attrs));
1594        $form->addElement(form_makeCloseTag('p'));
1595    }
1596
1597    echo NL.'<div id="mediamanager__uploader">'.NL;
1598    html_form('upload', $form);
1599    echo '</div>'.NL;
1600}
1601
1602/**
1603 * Print the search field form
1604 *
1605 * @author Tobias Sarnowski <sarnowski@cosmocode.de>
1606 * @author Kate Arzamastseva <pshns@ukr.net>
1607 */
1608function media_searchform($ns,$query='',$fullscreen=false){
1609    global $lang;
1610
1611    // The default HTML search form
1612    $params = array('id' => 'dw__mediasearch');
1613    if (!$fullscreen) {
1614        $params['action'] = DOKU_BASE.'lib/exe/mediamanager.php';
1615    } else {
1616        $params['action'] = media_managerURL(array(), '&');
1617    }
1618    $form = new Doku_Form($params);
1619    $form->addHidden('ns', $ns);
1620    $form->addHidden($fullscreen ? 'mediado' : 'do', 'searchlist');
1621
1622    if (!$fullscreen) $form->addElement('<div class="upload">' . $lang['mediasearch'] . '</div>'.NL);
1623    $form->addElement(form_makeOpenTag('p'));
1624    $form->addElement(form_makeTextField('q', $query,$lang['searchmedia'],'','',array('title'=>sprintf($lang['searchmedia_in'],hsc($ns).':*'))));
1625    $form->addElement(form_makeButton('submit', '', $lang['btn_search']));
1626    $form->addElement(form_makeCloseTag('p'));
1627    html_form('searchmedia', $form);
1628}
1629
1630/**
1631 * Build a tree outline of available media namespaces
1632 *
1633 * @author Andreas Gohr <andi@splitbrain.org>
1634 */
1635function media_nstree($ns){
1636    global $conf;
1637    global $lang;
1638
1639    // currently selected namespace
1640    $ns  = cleanID($ns);
1641    if(empty($ns)){
1642        global $ID;
1643        $ns = dirname(str_replace(':','/',$ID));
1644        if($ns == '.') $ns ='';
1645    }
1646    $ns  = utf8_encodeFN(str_replace(':','/',$ns));
1647
1648    $data = array();
1649    search($data,$conf['mediadir'],'search_index',array('ns' => $ns, 'nofiles' => true));
1650
1651    // wrap a list with the root level around the other namespaces
1652    array_unshift($data, array('level' => 0, 'id' => '', 'open' =>'true',
1653                               'label' => '['.$lang['mediaroot'].']'));
1654
1655    echo html_buildlist($data,'idx','media_nstree_item','media_nstree_li');
1656}
1657
1658/**
1659 * Userfunction for html_buildlist
1660 *
1661 * Prints a media namespace tree item
1662 *
1663 * @author Andreas Gohr <andi@splitbrain.org>
1664 */
1665function media_nstree_item($item){
1666    $pos   = strrpos($item['id'], ':');
1667    $label = substr($item['id'], $pos > 0 ? $pos + 1 : 0);
1668    if(!$item['label']) $item['label'] = $label;
1669
1670    $ret  = '';
1671    if (!($_REQUEST['do'] == 'media'))
1672    $ret .= '<a href="'.DOKU_BASE.'lib/exe/mediamanager.php?ns='.idfilter($item['id']).'" class="idx_dir">';
1673    else $ret .= '<a href="'.media_managerURL(array('ns' => idfilter($item['id']), 'tab_files' => 'files'))
1674        .'" class="idx_dir">';
1675    $ret .= $item['label'];
1676    $ret .= '</a>';
1677    return $ret;
1678}
1679
1680/**
1681 * Userfunction for html_buildlist
1682 *
1683 * Prints a media namespace tree item opener
1684 *
1685 * @author Andreas Gohr <andi@splitbrain.org>
1686 */
1687function media_nstree_li($item){
1688    $class='media level'.$item['level'];
1689    if($item['open']){
1690        $class .= ' open';
1691        $img   = DOKU_BASE.'lib/images/minus.gif';
1692        $alt   = '&minus;';
1693    }else{
1694        $class .= ' closed';
1695        $img   = DOKU_BASE.'lib/images/plus.gif';
1696        $alt   = '+';
1697    }
1698    // TODO: only deliver an image if it actually has a subtree...
1699    return '<li class="'.$class.'">'.
1700        '<img src="'.$img.'" alt="'.$alt.'" />';
1701}
1702
1703/**
1704 * Resizes the given image to the given size
1705 *
1706 * @author  Andreas Gohr <andi@splitbrain.org>
1707 */
1708function media_resize_image($file, $ext, $w, $h=0){
1709    global $conf;
1710
1711    $info = @getimagesize($file); //get original size
1712    if($info == false) return $file; // that's no image - it's a spaceship!
1713
1714    if(!$h) $h = round(($w * $info[1]) / $info[0]);
1715
1716    // we wont scale up to infinity
1717    if($w > 2000 || $h > 2000) return $file;
1718
1719    //cache
1720    $local = getCacheName($file,'.media.'.$w.'x'.$h.'.'.$ext);
1721    $mtime = @filemtime($local); // 0 if not exists
1722
1723    if( $mtime > filemtime($file) ||
1724            media_resize_imageIM($ext,$file,$info[0],$info[1],$local,$w,$h) ||
1725            media_resize_imageGD($ext,$file,$info[0],$info[1],$local,$w,$h) ){
1726        if($conf['fperm']) chmod($local, $conf['fperm']);
1727        return $local;
1728    }
1729    //still here? resizing failed
1730    return $file;
1731}
1732
1733/**
1734 * Crops the given image to the wanted ratio, then calls media_resize_image to scale it
1735 * to the wanted size
1736 *
1737 * Crops are centered horizontally but prefer the upper third of an vertical
1738 * image because most pics are more interesting in that area (rule of thirds)
1739 *
1740 * @author  Andreas Gohr <andi@splitbrain.org>
1741 */
1742function media_crop_image($file, $ext, $w, $h=0){
1743    global $conf;
1744
1745    if(!$h) $h = $w;
1746    $info = @getimagesize($file); //get original size
1747    if($info == false) return $file; // that's no image - it's a spaceship!
1748
1749    // calculate crop size
1750    $fr = $info[0]/$info[1];
1751    $tr = $w/$h;
1752    if($tr >= 1){
1753        if($tr > $fr){
1754            $cw = $info[0];
1755            $ch = (int) $info[0]/$tr;
1756        }else{
1757            $cw = (int) $info[1]*$tr;
1758            $ch = $info[1];
1759        }
1760    }else{
1761        if($tr < $fr){
1762            $cw = (int) $info[1]*$tr;
1763            $ch = $info[1];
1764        }else{
1765            $cw = $info[0];
1766            $ch = (int) $info[0]/$tr;
1767        }
1768    }
1769    // calculate crop offset
1770    $cx = (int) ($info[0]-$cw)/2;
1771    $cy = (int) ($info[1]-$ch)/3;
1772
1773    //cache
1774    $local = getCacheName($file,'.media.'.$cw.'x'.$ch.'.crop.'.$ext);
1775    $mtime = @filemtime($local); // 0 if not exists
1776
1777    if( $mtime > filemtime($file) ||
1778            media_crop_imageIM($ext,$file,$info[0],$info[1],$local,$cw,$ch,$cx,$cy) ||
1779            media_resize_imageGD($ext,$file,$cw,$ch,$local,$cw,$ch,$cx,$cy) ){
1780        if($conf['fperm']) chmod($local, $conf['fperm']);
1781        return media_resize_image($local,$ext, $w, $h);
1782    }
1783
1784    //still here? cropping failed
1785    return media_resize_image($file,$ext, $w, $h);
1786}
1787
1788/**
1789 * Download a remote file and return local filename
1790 *
1791 * returns false if download fails. Uses cached file if available and
1792 * wanted
1793 *
1794 * @author  Andreas Gohr <andi@splitbrain.org>
1795 * @author  Pavel Vitis <Pavel.Vitis@seznam.cz>
1796 */
1797function media_get_from_URL($url,$ext,$cache){
1798    global $conf;
1799
1800    // if no cache or fetchsize just redirect
1801    if ($cache==0)           return false;
1802    if (!$conf['fetchsize']) return false;
1803
1804    $local = getCacheName(strtolower($url),".media.$ext");
1805    $mtime = @filemtime($local); // 0 if not exists
1806
1807    //decide if download needed:
1808    if( ($mtime == 0) ||                           // cache does not exist
1809            ($cache != -1 && $mtime < time()-$cache)   // 'recache' and cache has expired
1810      ){
1811        if(media_image_download($url,$local)){
1812            return $local;
1813        }else{
1814            return false;
1815        }
1816    }
1817
1818    //if cache exists use it else
1819    if($mtime) return $local;
1820
1821    //else return false
1822    return false;
1823}
1824
1825/**
1826 * Download image files
1827 *
1828 * @author Andreas Gohr <andi@splitbrain.org>
1829 */
1830function media_image_download($url,$file){
1831    global $conf;
1832    $http = new DokuHTTPClient();
1833    $http->max_bodysize = $conf['fetchsize'];
1834    $http->timeout = 25; //max. 25 sec
1835    $http->header_regexp = '!\r\nContent-Type: image/(jpe?g|gif|png)!i';
1836
1837    $data = $http->get($url);
1838    if(!$data) return false;
1839
1840    $fileexists = @file_exists($file);
1841    $fp = @fopen($file,"w");
1842    if(!$fp) return false;
1843    fwrite($fp,$data);
1844    fclose($fp);
1845    if(!$fileexists and $conf['fperm']) chmod($file, $conf['fperm']);
1846
1847    // check if it is really an image
1848    $info = @getimagesize($file);
1849    if(!$info){
1850        @unlink($file);
1851        return false;
1852    }
1853
1854    return true;
1855}
1856
1857/**
1858 * resize images using external ImageMagick convert program
1859 *
1860 * @author Pavel Vitis <Pavel.Vitis@seznam.cz>
1861 * @author Andreas Gohr <andi@splitbrain.org>
1862 */
1863function media_resize_imageIM($ext,$from,$from_w,$from_h,$to,$to_w,$to_h){
1864    global $conf;
1865
1866    // check if convert is configured
1867    if(!$conf['im_convert']) return false;
1868
1869    // prepare command
1870    $cmd  = $conf['im_convert'];
1871    $cmd .= ' -resize '.$to_w.'x'.$to_h.'!';
1872    if ($ext == 'jpg' || $ext == 'jpeg') {
1873        $cmd .= ' -quality '.$conf['jpg_quality'];
1874    }
1875    $cmd .= " $from $to";
1876
1877    @exec($cmd,$out,$retval);
1878    if ($retval == 0) return true;
1879    return false;
1880}
1881
1882/**
1883 * crop images using external ImageMagick convert program
1884 *
1885 * @author Andreas Gohr <andi@splitbrain.org>
1886 */
1887function media_crop_imageIM($ext,$from,$from_w,$from_h,$to,$to_w,$to_h,$ofs_x,$ofs_y){
1888    global $conf;
1889
1890    // check if convert is configured
1891    if(!$conf['im_convert']) return false;
1892
1893    // prepare command
1894    $cmd  = $conf['im_convert'];
1895    $cmd .= ' -crop '.$to_w.'x'.$to_h.'+'.$ofs_x.'+'.$ofs_y;
1896    if ($ext == 'jpg' || $ext == 'jpeg') {
1897        $cmd .= ' -quality '.$conf['jpg_quality'];
1898    }
1899    $cmd .= " $from $to";
1900
1901    @exec($cmd,$out,$retval);
1902    if ($retval == 0) return true;
1903    return false;
1904}
1905
1906/**
1907 * resize or crop images using PHP's libGD support
1908 *
1909 * @author Andreas Gohr <andi@splitbrain.org>
1910 * @author Sebastian Wienecke <s_wienecke@web.de>
1911 */
1912function media_resize_imageGD($ext,$from,$from_w,$from_h,$to,$to_w,$to_h,$ofs_x=0,$ofs_y=0){
1913    global $conf;
1914
1915    if($conf['gdlib'] < 1) return false; //no GDlib available or wanted
1916
1917    // check available memory
1918    if(!is_mem_available(($from_w * $from_h * 4) + ($to_w * $to_h * 4))){
1919        return false;
1920    }
1921
1922    // create an image of the given filetype
1923    if ($ext == 'jpg' || $ext == 'jpeg'){
1924        if(!function_exists("imagecreatefromjpeg")) return false;
1925        $image = @imagecreatefromjpeg($from);
1926    }elseif($ext == 'png') {
1927        if(!function_exists("imagecreatefrompng")) return false;
1928        $image = @imagecreatefrompng($from);
1929
1930    }elseif($ext == 'gif') {
1931        if(!function_exists("imagecreatefromgif")) return false;
1932        $image = @imagecreatefromgif($from);
1933    }
1934    if(!$image) return false;
1935
1936    if(($conf['gdlib']>1) && function_exists("imagecreatetruecolor") && $ext != 'gif'){
1937        $newimg = @imagecreatetruecolor ($to_w, $to_h);
1938    }
1939    if(!$newimg) $newimg = @imagecreate($to_w, $to_h);
1940    if(!$newimg){
1941        imagedestroy($image);
1942        return false;
1943    }
1944
1945    //keep png alpha channel if possible
1946    if($ext == 'png' && $conf['gdlib']>1 && function_exists('imagesavealpha')){
1947        imagealphablending($newimg, false);
1948        imagesavealpha($newimg,true);
1949    }
1950
1951    //keep gif transparent color if possible
1952    if($ext == 'gif' && function_exists('imagefill') && function_exists('imagecolorallocate')) {
1953        if(function_exists('imagecolorsforindex') && function_exists('imagecolortransparent')) {
1954            $transcolorindex = @imagecolortransparent($image);
1955            if($transcolorindex >= 0 ) { //transparent color exists
1956                $transcolor = @imagecolorsforindex($image, $transcolorindex);
1957                $transcolorindex = @imagecolorallocate($newimg, $transcolor['red'], $transcolor['green'], $transcolor['blue']);
1958                @imagefill($newimg, 0, 0, $transcolorindex);
1959                @imagecolortransparent($newimg, $transcolorindex);
1960            }else{ //filling with white
1961                $whitecolorindex = @imagecolorallocate($newimg, 255, 255, 255);
1962                @imagefill($newimg, 0, 0, $whitecolorindex);
1963            }
1964        }else{ //filling with white
1965            $whitecolorindex = @imagecolorallocate($newimg, 255, 255, 255);
1966            @imagefill($newimg, 0, 0, $whitecolorindex);
1967        }
1968    }
1969
1970    //try resampling first
1971    if(function_exists("imagecopyresampled")){
1972        if(!@imagecopyresampled($newimg, $image, 0, 0, $ofs_x, $ofs_y, $to_w, $to_h, $from_w, $from_h)) {
1973            imagecopyresized($newimg, $image, 0, 0, $ofs_x, $ofs_y, $to_w, $to_h, $from_w, $from_h);
1974        }
1975    }else{
1976        imagecopyresized($newimg, $image, 0, 0, $ofs_x, $ofs_y, $to_w, $to_h, $from_w, $from_h);
1977    }
1978
1979    $okay = false;
1980    if ($ext == 'jpg' || $ext == 'jpeg'){
1981        if(!function_exists('imagejpeg')){
1982            $okay = false;
1983        }else{
1984            $okay = imagejpeg($newimg, $to, $conf['jpg_quality']);
1985        }
1986    }elseif($ext == 'png') {
1987        if(!function_exists('imagepng')){
1988            $okay = false;
1989        }else{
1990            $okay =  imagepng($newimg, $to);
1991        }
1992    }elseif($ext == 'gif') {
1993        if(!function_exists('imagegif')){
1994            $okay = false;
1995        }else{
1996            $okay = imagegif($newimg, $to);
1997        }
1998    }
1999
2000    // destroy GD image ressources
2001    if($image) imagedestroy($image);
2002    if($newimg) imagedestroy($newimg);
2003
2004    return $okay;
2005}
2006
2007/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
2008