vendor/mpdf/mpdf/includes/functions.php

   1 <?php
   2
   3
   4 // mPDF 6
   5 // Function only available PHP >=5.5.0
   6 if(!function_exists('imagepalettetotruecolor')) {
   7     function imagepalettetotruecolor(&$src) {
   8         if(imageistruecolor($src)) {
   9             return(true);
  10         }
  11         $dst = imagecreatetruecolor(imagesx($src), imagesy($src));
  12
  13         imagecopy($dst, $src, 0, 0, 0, 0, imagesx($src), imagesy($src));
  14         imagedestroy($src);
  15
  16         $src = $dst;
  17
  18         return(true);
  19     }
  20 }
  21
  22 // mPDF 5.7
  23 // Replace a section of an array with the elements in reverse
  24 function array_splice_reverse(&$arr, $offset, $length) {
  25         $tmp = (array_reverse(array_slice($arr, $offset, $length)));
  26         array_splice($arr, $offset, $length, $tmp);
  27 }
  28
  29
  30 // mPDF 5.7.4 URLs
  31 function urldecode_parts($url) {
  32         $file=$url;
  33         $query='';
  34         if (preg_match('/[?]/',$url)) {
  35                 $bits = preg_split('/[?]/',$url,2);
  36                 $file=$bits[0];
  37                 $query='?'.$bits[1];
  38         }
  39         $file = rawurldecode($file);
  40         $query = urldecode($query);
  41         return $file.$query;
  42 }
  43
  44
  45 function _strspn($str1, $str2, $start=null, $length=null) {
  46         $numargs = func_num_args();
  47         if ($numargs == 2) {
  48                 return strspn($str1, $str2);
  49         }
  50         else if ($numargs == 3) {
  51                 return strspn($str1, $str2, $start);
  52         }
  53         else {
  54                 return strspn($str1, $str2, $start, $length);
  55         }
  56 }
  57
  58
  59 function _strcspn($str1, $str2, $start=null, $length=null) {
  60         $numargs = func_num_args();
  61         if ($numargs == 2) {
  62                 return strcspn($str1, $str2);
  63         }
  64         else if ($numargs == 3) {
  65                 return strcspn($str1, $str2, $start);
  66         }
  67         else {
  68                 return strcspn($str1, $str2, $start, $length);
  69         }
  70 }
  71
  72 function _fgets (&$h, $force=false) {
  73         $startpos = ftell($h);
  74         $s = fgets($h, 1024);
  75         if ($force && preg_match("/^([^\r\n]*[\r\n]{1,2})(.)/",trim($s), $ns)) {
  76                 $s = $ns[1];
  77                 fseek($h,$startpos+strlen($s));
  78         }
  79         return $s;
  80 }
  81
  82
  83 // For PHP4 compatability
  84 if(!function_exists('str_ireplace')) {
  85   function str_ireplace($search,$replace,$subject) {
  86         $search = preg_quote($search, "/");
  87         return preg_replace("/".$search."/i", $replace, $subject);
  88   }
  89 }
  90 if(!function_exists('htmlspecialchars_decode')) {
  91         function htmlspecialchars_decode ($str) {
  92                 return strtr($str, array_flip(get_html_translation_table(HTML_SPECIALCHARS)));
  93         }
  94 }
  95
  96 function PreparePreText($text,$ff='//FF//') {
  97         $text = htmlspecialchars($text);
  98         if ($ff) { $text = str_replace($ff,'</pre><formfeed /><pre>',$text); }
  99         return ('<pre>'.$text.'</pre>');
 100 }
 101
 102 if(!function_exists('strcode2utf')){
 103   function strcode2utf($str,$lo=true) {
 104         //converts all the &#nnn; and &#xhhh; in a string to Unicode
 105         // mPDF 5.7
 106         if ($lo) {
 107                 $str = preg_replace_callback('/\&\#([0-9]+)\;/m', 'code2utf_lo_callback', $str);
 108                 $str = preg_replace_callback('/\&\#x([0-9a-fA-F]+)\;/m', 'codeHex2utf_lo_callback', $str);
 109         }
 110         else {
 111                 $str = preg_replace_callback('/\&\#([0-9]+)\;/m', 'code2utf_callback', $str);
 112                 $str = preg_replace_callback('/\&\#x([0-9a-fA-F]+)\;/m', 'codeHex2utf_callback', $str);
 113         }
 114         return $str;
 115   }
 116 }
 117 function code2utf_callback($matches) {
 118         return code2utf($matches[1], 0);
 119 }
 120 function code2utf_lo_callback($matches) {
 121         return code2utf($matches[1], 1);
 122 }
 123 function codeHex2utf_callback($matches) {
 124         return codeHex2utf($matches[1], 0);
 125 }
 126 function codeHex2utf_lo_callback($matches) {
 127         return codeHex2utf($matches[1], 1);
 128 }
 129
 130
 131 if(!function_exists('code2utf')){
 132   function code2utf($num,$lo=true){
 133         //Returns the utf string corresponding to the unicode value
 134         if ($num<128) {
 135                 if ($lo) return chr($num);
 136                 else return '&#'.$num.';';
 137         }
 138         if ($num<2048) return chr(($num>>6)+192).chr(($num&63)+128);
 139         if ($num<65536) return chr(($num>>12)+224).chr((($num>>6)&63)+128).chr(($num&63)+128);
 140         if ($num<2097152) return chr(($num>>18)+240).chr((($num>>12)&63)+128).chr((($num>>6)&63)+128) .chr(($num&63)+128);
 141         return '?';
 142   }
 143 }
 144
 145
 146 if(!function_exists('codeHex2utf')){
 147   function codeHex2utf($hex,$lo=true){
 148         $num = hexdec($hex);
 149         if (($num<128) && !$lo) return '&#x'.$hex.';';
 150         return code2utf($num,$lo);
 151   }
 152 }