xref: /plugin/dw2pdf/DokuPDF.class.php (revision c00b769a66764f8c476eb1366a6b778adf00a269) 
1<?php
2/**
3 * Wrapper around the mpdf library class
4 *
5 * This class overrides some functions to make mpdf make use of DokuWiki'
6 * standard tools instead of its own.
7 *
8 * @author Andreas Gohr <andi@splitbrain.org>
9 */
10global $conf;
11if(!defined('_MPDF_TEMP_PATH')) define('_MPDF_TEMP_PATH', $conf['tmpdir'].'/dwpdf/'.rand(1,1000).'/');
12if(!defined('_MPDF_TTFONTDATAPATH')) define('_MPDF_TTFONTDATAPATH',$conf['cachedir'].'/mpdf_ttf/');
13
14require_once(dirname(__FILE__)."/mpdf/mpdf.php");
15
16/**
17 * Class DokuPDF
18 * Some DokuWiki specific extentions
19 */
20class DokuPDF extends mpdf {
21
22    function __construct($pagesize='A4', $orientation='portrait'){
23        global $conf;
24
25        io_mkdir_p(_MPDF_TTFONTDATAPATH);
26        io_mkdir_p(_MPDF_TEMP_PATH);
27
28        $format = $pagesize;
29        if($orientation == 'landscape') {
30            $format .= '-L';
31        }
32
33        switch($conf['lang']) {
34            case 'zh':
35            case 'zh-tw':
36            case 'ja':
37            case 'ko':
38                $mode = '+aCJK';
39                break;
40            default:
41                $mode = 'UTF-8-s';
42
43        }
44
45        // we're always UTF-8
46        parent::__construct($mode, $format);
47        // The following replaces $this->SetAutoFont(AUTOFONT_ALL);
48        // Taken from mpdf/examples/example29_multilingual_autofont.php
49        $this->autoScriptToLang = true;
50        $this->baseScript = 1;
51        $this->autoVietnamese = true;
52        $this->autoArabic = true;
53        $this->autoLangToFont = true;
54
55        $this->ignore_invalid_utf8 = true;
56        $this->tabSpaces = 4;
57    }
58
59    /**
60     * Cleanup temp dir
61     */
62    function __destruct(){
63        io_rmdir(_MPDF_TEMP_PATH, true);
64    }
65
66    /**
67     * Decode all paths, since DokuWiki uses XHTML compliant URLs
68     */
69    function GetFullPath(&$path,$basepath=''){
70        $path = htmlspecialchars_decode($path);
71        parent::GetFullPath($path, $basepath);
72    }
73
74    /**
75     * Override the mpdf _getImage function
76     *
77     * This function takes care of gathering the image data from HTTP or
78     * local files before passing the data back to mpdf's original function
79     * making sure that only cached file paths are passed to mpdf. It also
80     * takes care of checking image ACls.
81     */
82    function _getImage(&$file, $firsttime=true, $allowvector=true, $orig_srcpath=false){
83        global $conf;
84
85        // build regex to parse URL back to media info
86        $re = preg_quote(ml('xxx123yyy','',true,'&',true),'/');
87        $re = str_replace('xxx123yyy','([^&\?]*)',$re);
88
89        // extract the real media from a fetch.php uri and determine mime
90        if(preg_match("/^$re/",$file,$m) ||
91            preg_match('/[&\?]media=([^&\?]*)/',$file,$m)){
92            $media = rawurldecode($m[1]);
93            list($ext,$mime) = mimetype($media);
94        }else{
95            list($ext,$mime) = mimetype($file);
96        }
97
98        // local files
99        $local = '';
100        if(substr($file,0,9) == 'dw2pdf://'){
101            // support local files passed from plugins
102            $local = substr($file,9);
103        }elseif(!preg_match('/(\.php|\?)/',$file)){
104            $re = preg_quote(DOKU_URL,'/');
105            // directly access local files instead of using HTTP, skip dynamic content
106            $local = preg_replace("/^$re/i",DOKU_INC,$file);
107        }
108
109        if(substr($mime,0,6) == 'image/'){
110            if(!empty($media)){
111                // any size restrictions?
112                $w = $h = 0;
113                if(preg_match('/[\?&]w=(\d+)/',$file, $m)) $w = $m[1];
114                if(preg_match('/[\?&]h=(\d+)/',$file, $m)) $h = $m[1];
115
116                if(media_isexternal($media)){
117                    $local = media_get_from_URL($media,$ext,-1);
118                    if(!$local) $local = $media; // let mpdf try again
119                }else{
120                    $media = cleanID($media);
121                    //check permissions (namespace only)
122                    if(auth_quickaclcheck(getNS($media).':X') < AUTH_READ){
123                        $file = '';
124                    }
125                    $local  = mediaFN($media);
126                }
127
128                //handle image resizing/cropping
129                if($w && file_exists($local)){
130                    if($h){
131                        $local = media_crop_image($local,$ext,$w,$h);
132                    }else{
133                        $local = media_resize_image($local,$ext,$w,$h);
134                    }
135                }
136            }elseif(media_isexternal($file)){ // fixed external URLs
137                $local = media_get_from_URL($file,$ext,$conf['cachetime']);
138            }
139
140            if($local){
141                $file = $local;
142                $orig_srcpath = $local;
143            }
144        }
145
146        return parent::_getImage($file, $firsttime, $allowvector, $orig_srcpath);
147    }
148
149}
150