Initial commit of foodsoft 2

vendor/plugins/rfpdf/lib/fonts/ttf2ufm/README.TXT

@@ -0,0 +1,25 @@
+To embed TrueType fonts (.TTF) files, you need to extract the font metrics and 
+build the required tables using the provided utility (/fonts/ttf2ufm). 
+
+TTF2UFM is a modified version of Mark Heath's TTF 2 PT1 converter 
+(http://ttf2pt1.sourceforge.net/) by Steven Wittens <steven@acko.net> 
+(http://www.acko.net/blog/ufpdf). ttf2ufm, is included in /ttf2ufm-src. 
+The /fonts/ttf2ufm folder contains a compiled Windows binary. 
+TTF 2 UFM is identical to TTF 2 PT1 except that it also generates a .ufm file 
+for usage with makefontuni.php or makefontuni.rb.
+
+
+Setting up a Truetype font for usage with UFPDF:
+  1) Generate the font's .ufm metrics file by processing it with the provided 
+     ttf2ufm program (modified ttf2pt1). For example:
+     $ ttf2ufm -a -F myfont.ttf
+  2a) Run makefontuni.php with the .ttf and .ufm filenames as argument:
+     $ php -q makefontuni.php myfont.ttf myfont.ufm
+  2b) or run makefontuni.rb with the .ttf and .ufm filenames as argument:
+    $ php -q makefontuni.rb myfont.ttf myfont.ufm
+  3) Copy the resulting .rb, .z and .ctg.z file to the TCPDF font directory.
+  4) Rename php font files variations for bold and italic using the following schema:
+  	[basic-font-name]b.rb for bold variation
+  	[basic-font-name]i.rb for oblique variation
+  	[basic-font-name]bi.rb for bold oblique variation
+  	

vendor/plugins/rfpdf/lib/fonts/ttf2ufm/makefontuni.php

@@ -0,0 +1,314 @@
+<?php
+/*******************************************************************************
+* Utility to generate font definition files for Unicode Truetype fonts         *
+* Version: 1.12                                                                *
+* Date:    2003-12-30                                                          *
+*******************************************************************************/
+
+function ReadUFM($file, &$cidtogidmap)
+{
+  //Prepare empty CIDToGIDMap
+  $cidtogidmap = str_pad('', 256*256*2, "\x00");
+  
+  //Read a font metric file
+  $a=file($file);
+  if(empty($a))
+    die('File not found');
+  $widths=array();
+  $fm=array();
+  foreach($a as $l)
+  {
+    $e=explode(' ',chop($l));
+    if(count($e)<2)
+      continue;
+    $code=$e[0];
+    $param=$e[1];
+    if($code=='U')
+    {
+      // U 827 ; WX 0 ; N squaresubnosp ; G 675 ;
+      //Character metrics
+      $cc=(int)$e[1];
+      if ($cc != -1) {
+        $gn = $e[7];
+        $w = $e[4];
+        $glyph = $e[10];
+        $widths[$cc] = $w;
+        if($cc == ord('X'))
+          $fm['CapXHeight'] = $e[13];
+          
+        // Set GID
+        if ($cc >= 0 && $cc < 0xFFFF && $glyph) {
+          $cidtogidmap{$cc*2} = chr($glyph >> 8);
+          $cidtogidmap{$cc*2 + 1} = chr($glyph & 0xFF);
+        }        
+      }
+      if($gn=='.notdef' && !isset($fm['MissingWidth']))
+        $fm['MissingWidth']=$w;
+    }
+    elseif($code=='FontName')
+      $fm['FontName']=$param;
+    elseif($code=='Weight')
+      $fm['Weight']=$param;
+    elseif($code=='ItalicAngle')
+      $fm['ItalicAngle']=(double)$param;
+    elseif($code=='Ascender')
+      $fm['Ascender']=(int)$param;
+    elseif($code=='Descender')
+      $fm['Descender']=(int)$param;
+    elseif($code=='UnderlineThickness')
+      $fm['UnderlineThickness']=(int)$param;
+    elseif($code=='UnderlinePosition')
+      $fm['UnderlinePosition']=(int)$param;
+    elseif($code=='IsFixedPitch')
+      $fm['IsFixedPitch']=($param=='true');
+    elseif($code=='FontBBox')
+      $fm['FontBBox']=array($e[1],$e[2],$e[3],$e[4]);
+    elseif($code=='CapHeight')
+      $fm['CapHeight']=(int)$param;
+    elseif($code=='StdVW')
+      $fm['StdVW']=(int)$param;
+  }
+  if(!isset($fm['MissingWidth']))
+    $fm['MissingWidth']=600;
+
+  if(!isset($fm['FontName']))
+    die('FontName not found');
+
+  $fm['Widths']=$widths;
+  
+  return $fm;
+}
+
+function MakeFontDescriptor($fm)
+{
+  //Ascent
+  $asc=(isset($fm['Ascender']) ? $fm['Ascender'] : 1000);
+  $fd="array('Ascent'=>".$asc;
+  //Descent
+  $desc=(isset($fm['Descender']) ? $fm['Descender'] : -200);
+  $fd.=",'Descent'=>".$desc;
+  //CapHeight
+  if(isset($fm['CapHeight']))
+    $ch=$fm['CapHeight'];
+  elseif(isset($fm['CapXHeight']))
+    $ch=$fm['CapXHeight'];
+  else
+    $ch=$asc;
+  $fd.=",'CapHeight'=>".$ch;
+  //Flags
+  $flags=0;
+  if(isset($fm['IsFixedPitch']) and $fm['IsFixedPitch'])
+    $flags+=1<<0;
+  $flags+=1<<5;
+  if(isset($fm['ItalicAngle']) and $fm['ItalicAngle']!=0)
+    $flags+=1<<6;
+  $fd.=",'Flags'=>".$flags;
+  //FontBBox
+  if(isset($fm['FontBBox']))
+    $fbb=$fm['FontBBox'];
+  else
+    $fbb=array(0,$des-100,1000,$asc+100);
+  $fd.=",'FontBBox'=>'[".$fbb[0].' '.$fbb[1].' '.$fbb[2].' '.$fbb[3]."]'";
+  //ItalicAngle
+  $ia=(isset($fm['ItalicAngle']) ? $fm['ItalicAngle'] : 0);
+  $fd.=",'ItalicAngle'=>".$ia;
+  //StemV
+  if(isset($fm['StdVW']))
+    $stemv=$fm['StdVW'];
+  elseif(isset($fm['Weight']) and eregi('(bold|black)',$fm['Weight']))
+    $stemv=120;
+  else
+    $stemv=70;
+  $fd.=",'StemV'=>".$stemv;
+  //MissingWidth
+  if(isset($fm['MissingWidth']))
+    $fd.=",'MissingWidth'=>".$fm['MissingWidth'];
+  $fd.=')';
+  return $fd;
+}
+
+function MakeWidthArray($fm)
+{
+  //Make character width array
+  $s="array(";
+  $cw=$fm['Widths'];
+  $els=array();
+  $c=0;
+  foreach ($cw as $i => $w)
+  {
+    $els[] = ((($c++)%16==0)?"\n\t":'').$i.'=>'.$w;
+  }
+  $s .= implode(', ', $els);
+  $s.=')';
+  return $s;
+}
+
+function SaveToFile($file,$s,$mode='t')
+{
+  $f=fopen($file,'w'.$mode);
+  if(!$f)
+    die('Can\'t write to file '.$file);
+  fwrite($f,$s,strlen($s));
+  fclose($f);
+}
+
+function ReadShort($f)
+{
+  $a=unpack('n1n',fread($f,2));
+  return $a['n'];
+}
+
+function ReadLong($f)
+{
+  $a=unpack('N1N',fread($f,4));
+  return $a['N'];
+}
+
+function CheckTTF($file)
+{
+  //Check if font license allows embedding
+  $f=fopen($file,'rb');
+  if(!$f)
+    die('<B>Error:</B> Can\'t open '.$file);
+  //Extract number of tables
+  fseek($f,4,SEEK_CUR);
+  $nb=ReadShort($f);
+  fseek($f,6,SEEK_CUR);
+  //Seek OS/2 table
+  $found=false;
+  for($i=0;$i<$nb;$i++)
+  {
+    if(fread($f,4)=='OS/2')
+    {
+      $found=true;
+      break;
+    }
+    fseek($f,12,SEEK_CUR);
+  }
+  if(!$found)
+  {
+    fclose($f);
+    return;
+  }
+  fseek($f,4,SEEK_CUR);
+  $offset=ReadLong($f);
+  fseek($f,$offset,SEEK_SET);
+  //Extract fsType flags
+  fseek($f,8,SEEK_CUR);
+  $fsType=ReadShort($f);
+  $rl=($fsType & 0x02)!=0;
+  $pp=($fsType & 0x04)!=0;
+  $e=($fsType & 0x08)!=0;
+  fclose($f);
+  if($rl and !$pp and !$e)
+    echo '<B>Warning:</B> font license does not allow embedding';
+}
+
+/*******************************************************************************
+* $fontfile: path to TTF file (or empty string if not to be embedded)          *
+* $ufmfile:  path to UFM file                                                  *
+*******************************************************************************/
+function MakeFont($fontfile,$ufmfile)
+{
+  //Generate a font definition file
+  set_magic_quotes_runtime(0);
+  if(!file_exists($ufmfile))
+    die('<B>Error:</B> UFM file not found: '.$ufmfile);
+  $cidtogidmap = '';
+  $fm=ReadUFM($ufmfile, $cidtogidmap);
+  $fd=MakeFontDescriptor($fm);
+  //Find font type
+  if($fontfile)
+  {
+    $ext=strtolower(substr($fontfile,-3));
+    if($ext=='ttf')
+      $type='TrueTypeUnicode';
+    else
+      die('<B>Error:</B> not a truetype font: '.$ext);
+  }
+  else
+  {
+    if($type!='TrueTypeUnicode')
+      die('<B>Error:</B> incorrect font type: '.$type);
+  }
+  //Start generation
+  $s='<?php'."\n";
+  $s.='$type=\''.$type."';\n";
+  $s.='$name=\''.$fm['FontName']."';\n";
+  $s.='$desc='.$fd.";\n";
+  if(!isset($fm['UnderlinePosition']))
+    $fm['UnderlinePosition']=-100;
+  if(!isset($fm['UnderlineThickness']))
+    $fm['UnderlineThickness']=50;
+  $s.='$up='.$fm['UnderlinePosition'].";\n";
+  $s.='$ut='.$fm['UnderlineThickness'].";\n";
+  $w=MakeWidthArray($fm);
+  $s.='$cw='.$w.";\n";
+  $s.="\$enc='';\n";
+  $s.="\$diff='';\n";
+  $basename=substr(basename($ufmfile),0,-4);
+  if($fontfile)
+  {
+    //Embedded font
+    if(!file_exists($fontfile))
+      die('<B>Error:</B> font file not found: '.$fontfile);
+    CheckTTF($fontfile);
+    $f=fopen($fontfile,'rb');
+    if(!$f)
+      die('<B>Error:</B> Can\'t open '.$fontfile);
+    $file=fread($f,filesize($fontfile));
+    fclose($f);
+    if(function_exists('gzcompress'))
+    {
+      $cmp=$basename.'.z';
+      SaveToFile($cmp,gzcompress($file),'b');
+      $s.='$file=\''.$cmp."';\n";
+      echo 'Font file compressed ('.$cmp.')<BR>';
+
+      $cmp=$basename.'.ctg.z';
+      SaveToFile($cmp,gzcompress($cidtogidmap),'b');
+      echo 'CIDToGIDMap created and compressed ('.$cmp.')<BR>';     
+      $s.='$ctg=\''.$cmp."';\n";
+    }
+    else
+    {
+      $s.='$file=\''.basename($fontfile)."';\n";
+      echo '<B>Notice:</B> font file could not be compressed (gzcompress not available)<BR>';
+      
+      $cmp=$basename.'.ctg';
+      $f = fopen($cmp, 'wb');
+      fwrite($f, $cidtogidmap);
+      fclose($f);
+      echo 'CIDToGIDMap created ('.$cmp.')<BR>';
+      $s.='$ctg=\''.$cmp."';\n";
+    }
+    if($type=='Type1')
+    {
+      $s.='$size1='.$size1.";\n";
+      $s.='$size2='.$size2.";\n";
+    }
+    else
+      $s.='$originalsize='.filesize($fontfile).";\n";
+  }
+  else
+  {
+    //Not embedded font
+    $s.='$file='."'';\n";
+  }
+  $s.="?>\n";
+  SaveToFile($basename.'.php',$s);
+  echo 'Font definition file generated ('.$basename.'.php'.')<BR>';
+}
+
+$arg = $GLOBALS['argv'];
+if (count($arg) >= 3) {
+  ob_start();
+  array_shift($arg);
+  MakeFont($arg[0], $arg[1]);
+  $t = ob_get_clean();
+  print preg_replace('!<BR( /)?>!i', "\n", $t);
+}
+else {
+  print "Usage: makefontuni.php <ttf-file> <ufm-file>\n";
+}
+?>

vendor/plugins/rfpdf/lib/fonts/ttf2ufm/makefontuni.rb

@@ -0,0 +1,313 @@
+
+#*****************************************************************************
+# Utility to generate font definition files for Unicode Truetype fonts        #
+# Version: 1.12                                                               #
+# Date:    2003-12-30                                                         #
+******************************************************************************#
+
+function ReadUFM($file, &$cidtogidmap)
+{
+  #Prepare empty CIDToGIDMap
+  $cidtogidmap = str_pad('', 256*256*2, "\x00");
+  
+  #Read a font metric file
+  $a=file($file);
+  if ($a.empty?)
+    die('File not found');
+  $widths = []
+  $fm = []
+  foreach($a as $l)
+  {
+    $e=explode(' ',chop($l));
+    if ($e.length<2)
+      continue;
+    $code=$e[0];
+    $param=$e[1];
+    if ($code=='U')
+    {
+      # U 827 ; WX 0 ; N squaresubnosp ; G 675 ;
+      #Character metrics
+      $cc=(int)$e[1];
+      if ($cc != -1)
+        $gn = $e[7];
+        $w = $e[4];
+        $glyph = $e[10];
+        $widths[$cc] = $w;
+        if ($cc == ?('X'))
+          $fm['CapXHeight'] = $e[13];
+          
+        # Set GID
+        if ($cc >= 0 && $cc < 0xFFFF && $glyph)
+          $cidtogidmap{$cc*2} = ($glyph >> 8).chr;
+          $cidtogidmap{$cc*2 + 1} = ($glyph & 0xFF).chr;
+        }        
+      }
+      if ($gn=='.notdef' && !$fm['MissingWidth'].nil?)
+        $fm['MissingWidth']=$w;
+    }
+    elsif ($code=='FontName')
+      $fm['FontName']=$param;
+    elsif ($code=='Weight')
+      $fm['Weight']=$param;
+    elsif ($code=='ItalicAngle')
+      $fm['ItalicAngle']=(double)$param;
+    elsif ($code=='Ascender')
+      $fm['Ascender']=(int)$param;
+    elsif ($code=='Descender')
+      $fm['Descender']=(int)$param;
+    elsif ($code=='UnderlineThickness')
+      $fm['UnderlineThickness']=(int)$param;
+    elsif ($code=='UnderlinePosition')
+      $fm['UnderlinePosition']=(int)$param;
+    elsif ($code=='IsFixedPitch')
+      $fm['IsFixedPitch']=($param=='true');
+    elsif ($code=='FontBBox')
+      $fm['FontBBox']=Hash.new($e[1],$e[2],$e[3],$e[4]);
+    elsif ($code=='CapHeight')
+      $fm['CapHeight']=(int)$param;
+    elsif ($code=='StdVW')
+      $fm['StdVW']=(int)$param;
+  }
+  if (!$fm['MissingWidth'].nil?)
+    $fm['MissingWidth']=600;
+
+  if (!$fm['FontName'].nil?)
+    die('FontName not found');
+
+  $fm['Widths']=$widths;
+  
+  return $fm;
+}
+
+function MakeFontDescriptor($fm)
+{
+  #Ascent
+  $asc=($fm['Ascender'].nil? ? $fm['Ascender'] : 1000);
+  $fd="Hash.new('Ascent'=>".$asc;
+  #Descent
+  $desc=($fm['Descender'].nil? ? $fm['Descender'] : -200);
+  $fd<<",'Descent'=>".$desc;
+  #CapHeight
+  if ($fm['CapHeight'].nil?)
+    $ch=$fm['CapHeight'];
+  elsif ($fm['CapXHeight'].nil?)
+    $ch=$fm['CapXHeight'];
+  else
+    $ch=$asc;
+  $fd<<",'CapHeight'=>".$ch;
+  #Flags
+  $flags=0;
+  if ($fm['IsFixedPitch'].nil? and $fm['IsFixedPitch'])
+    $flags+=1<<0;
+  $flags+=1<<5;
+  if ($fm['ItalicAngle'].nil? and $fm['ItalicAngle']!=0)
+    $flags+=1<<6;
+  $fd<<",'Flags'=>".$flags;
+  #FontBBox
+  if ($fm['FontBBox'].nil?)
+    $fbb=$fm['FontBBox'];
+  else
+    $fbb=Hash.new(0,$des-100,1000,$asc+100);
+  $fd<<",'FontBBox'=>'[".$fbb[0].' '.$fbb[1].' '.$fbb[2].' '.$fbb[3]."]'";
+  #ItalicAngle
+  $ia=($fm['ItalicAngle'].nil? ? $fm['ItalicAngle'] : 0);
+  $fd<<",'ItalicAngle'=>".$ia;
+  #StemV
+  if ($fm['StdVW'].nil?)
+    $stemv=$fm['StdVW'];
+  elsif ($fm['Weight'].nil? and eregi('(bold|black)',$fm['Weight']))
+    $stemv=120;
+  else
+    $stemv=70;
+  $fd<<",'StemV'=>".$stemv;
+  #MissingWidth
+  if ($fm['MissingWidth'].nil?)
+    $fd<<",'MissingWidth'=>".$fm['MissingWidth'];
+  $fd<<')';
+  return $fd;
+}
+
+function MakeWidthArray($fm)
+{
+  #Make character width array
+  $s="Hash.new(";
+  $cw=$fm['Widths'];
+  $els = []
+  $c=0;
+  foreach ($cw as $i => $w)
+  {
+    $els[] = ((($c++)%16==0)?"\n\t":'').$i.'=>'.$w;
+  }
+  $s << implode(', ', $els);
+  $s<<')';
+  return $s;
+}
+
+function SaveToFile($file,$s,$mode='t')
+{
+  $f=fopen($file,'w'.$mode);
+  if (!$f)
+    die('Can\'t write to file '.$file);
+  fwrite($f,$s,$s.length);
+  fclose($f);
+}
+
+function ReadShort($f)
+{
+  $a=unpack('n1n',fread($f,2));
+  return $a['n'];
+}
+
+function ReadLong($f)
+{
+  $a=unpack('N1N',fread($f,4));
+  return $a['N'];
+}
+
+function CheckTTF($file)
+{
+  #Check if font license allows embedding
+  $f=fopen($file,'rb');
+  if (!$f)
+    die('<B>Error:</B> Can\'t open '.$file);
+  #Extract number of tables
+  fseek($f,4,SEEK_CUR);
+  $nb=ReadShort($f);
+  fseek($f,6,SEEK_CUR);
+  #Seek OS/2 table
+  $found=false;
+  for($i=0;$i<$nb;$i++)
+  {
+    if (fread($f,4)=='OS/2')
+    {
+      $found=true;
+      break;
+    }
+    fseek($f,12,SEEK_CUR);
+  }
+  if (!$found)
+  {
+    fclose($f);
+    return;
+  }
+  fseek($f,4,SEEK_CUR);
+  $offset=ReadLong($f);
+  fseek($f,$offset,SEEK_SET);
+  #Extract fsType flags
+  fseek($f,8,SEEK_CUR);
+  $fsType=ReadShort($f);
+  $rl=($fsType & 0x02)!=0;
+  $pp=($fsType & 0x04)!=0;
+  $e=($fsType & 0x08)!=0;
+  fclose($f);
+  if ($rl and !$pp and !$e)
+    echo '<B>Warning:</B> font license does not allow embedding';
+}
+
+#*****************************************************************************
+# $fontfile: path to TTF file (or empty string if not to be embedded)         #
+# $ufmfile:  path to UFM file                                                 #
+******************************************************************************#
+function MakeFont($fontfile,$ufmfile)
+{
+  #Generate a font definition file
+  set_magic_quotes_runtime(0);
+  if (!file_exists($ufmfile))
+    die('<B>Error:</B> UFM file not found: '.$ufmfile);
+  $cidtogidmap = '';
+  $fm=ReadUFM($ufmfile, $cidtogidmap);
+  $fd=MakeFontDescriptor($fm);
+  #Find font type
+  if ($fontfile)
+  {
+    $ext=strtolower(substr($fontfile,-3));
+    if ($ext=='ttf')
+      $type='TrueTypeUnicode';
+    else
+      die('<B>Error:</B> not a truetype font: '.$ext);
+  }
+  else
+  {
+    if ($type!='TrueTypeUnicode')
+      die('<B>Error:</B> incorrect font type: '.$type);
+  }
+  #Start generation
+  $s=''."\n";
+  $s<<'$type=\''.$type."';\n";
+  $s<<'$name=\''.$fm['FontName']."';\n";
+  $s<<'$desc='.$fd.";\n";
+  if (!$fm['UnderlinePosition'].nil?)
+    $fm['UnderlinePosition']=-100;
+  if (!$fm['UnderlineThickness'].nil?)
+    $fm['UnderlineThickness']=50;
+  $s<<'$up='.$fm['UnderlinePosition'].";\n";
+  $s<<'$ut='.$fm['UnderlineThickness'].";\n";
+  $w=MakeWidthArray($fm);
+  $s<<'$cw='.$w.";\n";
+  $s<<"\$enc='';\n";
+  $s<<"\$diff='';\n";
+  $basename=substr(basename($ufmfile),0,-4);
+  if ($fontfile)
+  {
+    #Embedded font
+    if (!file_exists($fontfile))
+      die('<B>Error:</B> font file not found: '.$fontfile);
+    CheckTTF($fontfile);
+    $f=fopen($fontfile,'rb');
+    if (!$f)
+      die('<B>Error:</B> Can\'t open '.$fontfile);
+    $file=fread($f,filesize($fontfile));
+    fclose($f);
+    if (respond_to('gzcompress'))
+    {
+      $cmp=$basename.'.z';
+      SaveToFile($cmp,gzcompress($file),'b');
+      $s<<'$file=\''.$cmp."';\n";
+      echo 'Font file compressed ('.$cmp.')<BR>';
+
+      $cmp=$basename.'.ctg.z';
+      SaveToFile($cmp,gzcompress($cidtogidmap),'b');
+      echo 'CIDToGIDMap created and compressed ('.$cmp.')<BR>';     
+      $s<<'$ctg=\''.$cmp."';\n";
+    }
+    else
+    {
+      $s<<'$file=\''.basename($fontfile)."';\n";
+      echo '<B>Notice:</B> font file could not be compressed (gzcompress not available)<BR>';
+      
+      $cmp=$basename.'.ctg';
+      $f = fopen($cmp, 'wb');
+      fwrite($f, $cidtogidmap);
+      fclose($f);
+      echo 'CIDToGIDMap created ('.$cmp.')<BR>';
+      $s<<'$ctg=\''.$cmp."';\n";
+    }
+    if ($type=='Type1')
+    {
+      $s<<'$size1='.$size1.";\n";
+      $s<<'$size2='.$size2.";\n";
+    }
+    else
+      $s<<'$originalsize='.filesize($fontfile).";\n";
+  }
+  else
+  {
+    #Not embedded font
+    $s<<'$file='."'';\n";
+  }
+  $s<<"\n";
+  SaveToFile($basename.'.rb',$s);
+  echo 'Font definition file generated ('.$basename.'.rb'.')<BR>';
+}
+
+$arg = $GLOBALS['argv'];
+if ($arg.length >= 3)
+  ob_start();
+  array_shift($arg);
+  MakeFont($arg[0], $arg[1]);
+  $t = ob_get_clean();
+  print preg_replace('!<BR( /)!i', "\n", $t);
+}
+else
+  print "Usage: makefontuni.rb <ttf-file> <ufm-file>\n";
+}