| 
      1
     | 
    
      # Copyright (c) 2006 4ssoM LLC <www.4ssoM.com>
 
     | 
  
  
    | 
      2
     | 
    
      # 1.12 contributed by Ed Moss.
 
     | 
  
  
    | 
      3
     | 
    
      #
 
     | 
  
  
    | 
      4
     | 
    
      # The MIT License
 
     | 
  
  
    | 
      5
     | 
    
      #
 
     | 
  
  
    | 
      6
     | 
    
      # Permission is hereby granted, free of charge, to any person obtaining a copy
 
     | 
  
  
    | 
      7
     | 
    
      # of this software and associated documentation files (the "Software"), to deal
 
     | 
  
  
    | 
      8
     | 
    
      # in the Software without restriction, including without limitation the rights
 
     | 
  
  
    | 
      9
     | 
    
      # to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 
     | 
  
  
    | 
      10
     | 
    
      # copies of the Software, and to permit persons to whom the Software is
 
     | 
  
  
    | 
      11
     | 
    
      # furnished to do so, subject to the following conditions:
 
     | 
  
  
    | 
      12
     | 
    
      #
 
     | 
  
  
    | 
      13
     | 
    
      # The above copyright notice and this permission notice shall be included in
 
     | 
  
  
    | 
      14
     | 
    
      # all copies or substantial portions of the Software.
 
     | 
  
  
    | 
      15
     | 
    
      #
 
     | 
  
  
    | 
      16
     | 
    
      # THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 
     | 
  
  
    | 
      17
     | 
    
      # IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 
     | 
  
  
    | 
      18
     | 
    
      # FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
 
     | 
  
  
    | 
      19
     | 
    
      # AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 
     | 
  
  
    | 
      20
     | 
    
      # LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 
     | 
  
  
    | 
      21
     | 
    
      # OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 
     | 
  
  
    | 
      22
     | 
    
      # THE SOFTWARE.
 
     | 
  
  
    | 
      23
     | 
    
      #
 
     | 
  
  
    | 
      24
     | 
    
      # This is direct port of chinese.php
 
     | 
  
  
    | 
      25
     | 
    
      #
 
     | 
  
  
    | 
      26
     | 
    
      # Chinese PDF support.
 
     | 
  
  
    | 
      27
     | 
    
      #
 
     | 
  
  
    | 
      28
     | 
    
      # Usage is as follows:
 
     | 
  
  
    | 
      29
     | 
    
      #
 
     | 
  
  
    | 
      30
     | 
    
      # require 'fpdf'
 
     | 
  
  
    | 
      31
     | 
    
      # require 'chinese'
 
     | 
  
  
    | 
      32
     | 
    
      # pdf = FPDF.new
 
     | 
  
  
    | 
      33
     | 
    
      # pdf.extend(PDF_Chinese)
 
     | 
  
  
    | 
      34
     | 
    
      #
 
     | 
  
  
    | 
      35
     | 
    
      # This allows it to be combined with other extensions, such as the bookmark
 
     | 
  
  
    | 
      36
     | 
    
      # module.
 
     | 
  
  
    | 
      37
     | 
    
      
 
     | 
  
  
    | 
      38
     | 
    
      module PDF_Chinese
 
     | 
  
  
    | 
      39
     | 
    
      
 
     | 
  
  
    | 
      40
     | 
    
        Big5_widths={' '=>250,'!'=>250,'"'=>408,'#'=>668,''=>490,'%'=>875,'&'=>698,'\''=>250,
     | 
  
  
    | 
      41
     | 
    
        	'('=>240,')'=>240,'*'=>417,'+'=>667,','=>250,'-'=>313,'.'=>250,'/'=>520,'0'=>500,'1'=>500,
     | 
  
  
    | 
      42
     | 
    
        	'2'=>500,'3'=>500,'4'=>500,'5'=>500,'6'=>500,'7'=>500,'8'=>500,'9'=>500,':'=>250,''=>250,
 
     | 
  
  
    | 
      43
     | 
    
        	'<'=>667,'='=>667,'>'=>667,'?'=>396,'@'=>921,'A'=>677,'B'=>615,'C'=>719,'D'=>760,'E'=>625,
 
     | 
  
  
    | 
      44
     | 
    
        	'F'=>552,'G'=>771,'H'=>802,'I'=>354,'J'=>354,'K'=>781,'L'=>604,'M'=>927,'N'=>750,'O'=>823,
 
     | 
  
  
    | 
      45
     | 
    
        	'P'=>563,'Q'=>823,'R'=>729,'S'=>542,'T'=>698,'U'=>771,'V'=>729,'W'=>948,'X'=>771,'Y'=>677,
 
     | 
  
  
    | 
      46
     | 
    
        	'Z'=>635,'['=>344,'\\'=>520,']'=>344,'^'=>469,'_'=>500,'`'=>250,'a'=>469,'b'=>521,'c'=>427,
 
     | 
  
  
    | 
      47
     | 
    
        	'd'=>521,'e'=>438,'f'=>271,'g'=>469,'h'=>531,'i'=>250,'j'=>250,'k'=>458,'l'=>240,'m'=>802,
 
     | 
  
  
    | 
      48
     | 
    
        	'n'=>531,'o'=>500,'p'=>521,'q'=>521,'r'=>365,'s'=>333,'t'=>292,'u'=>521,'v'=>458,'w'=>677,
 
     | 
  
  
    | 
      49
     | 
    
        	'x'=>479,'y'=>458,'z'=>427,'{'=>480,'|'=>496,'end'=>480,'~'=>667}
     | 
  
  
    | 
      50
     | 
    
      
 
     | 
  
  
    | 
      51
     | 
    
        GB_widths={' '=>207,'!'=>270,'"'=>342,'#'=>467,''=>462,'%'=>797,'&'=>710,'\''=>239,
     | 
  
  
    | 
      52
     | 
    
        	'('=>374,')'=>374,'*'=>423,'+'=>605,','=>238,'-'=>375,'.'=>238,'/'=>334,'0'=>462,'1'=>462,
     | 
  
  
    | 
      53
     | 
    
        	'2'=>462,'3'=>462,'4'=>462,'5'=>462,'6'=>462,'7'=>462,'8'=>462,'9'=>462,':'=>238,''=>238,
 
     | 
  
  
    | 
      54
     | 
    
        	'<'=>605,'='=>605,'>'=>605,'?'=>344,'@'=>748,'A'=>684,'B'=>560,'C'=>695,'D'=>739,'E'=>563,
 
     | 
  
  
    | 
      55
     | 
    
        	'F'=>511,'G'=>729,'H'=>793,'I'=>318,'J'=>312,'K'=>666,'L'=>526,'M'=>896,'N'=>758,'O'=>772,
 
     | 
  
  
    | 
      56
     | 
    
        	'P'=>544,'Q'=>772,'R'=>628,'S'=>465,'T'=>607,'U'=>753,'V'=>711,'W'=>972,'X'=>647,'Y'=>620,
 
     | 
  
  
    | 
      57
     | 
    
        	'Z'=>607,'['=>374,'\\'=>333,']'=>374,'^'=>606,'_'=>500,'`'=>239,'a'=>417,'b'=>503,'c'=>427,
 
     | 
  
  
    | 
      58
     | 
    
        	'd'=>529,'e'=>415,'f'=>264,'g'=>444,'h'=>518,'i'=>241,'j'=>230,'k'=>495,'l'=>228,'m'=>793,
 
     | 
  
  
    | 
      59
     | 
    
        	'n'=>527,'o'=>524,'p'=>524,'q'=>504,'r'=>338,'s'=>336,'t'=>277,'u'=>517,'v'=>450,'w'=>652,
 
     | 
  
  
    | 
      60
     | 
    
        	'x'=>466,'y'=>452,'z'=>407,'{'=>370,'|'=>258,'end'=>370,'~'=>605}
     | 
  
  
    | 
      61
     | 
    
      
 
     | 
  
  
    | 
      62
     | 
    
        def AddCIDFont(family,style,name,cw,cMap,registry)
 
     | 
  
  
    | 
      63
     | 
    
      #ActionController::Base::logger.debug registry.to_a.join(":").to_s
     | 
  
  
    | 
      64
     | 
    
        	fontkey=family.downcase+style.upcase
 
     | 
  
  
    | 
      65
     | 
    
        	unless @fonts[fontkey].nil?
 
     | 
  
  
    | 
      66
     | 
    
        		Error("Font already added: family style")
     | 
  
  
    | 
      67
     | 
    
      		end
 
     | 
  
  
    | 
      68
     | 
    
        	i=@fonts.length+1
 
     | 
  
  
    | 
      69
     | 
    
        	name=name.gsub(' ','')
     | 
  
  
    | 
      70
     | 
    
          @fonts[fontkey]={'i'=>i,'type'=>'Type0','name'=>name,'up'=>-130,'ut'=>40,'cw'=>cw, 'CMap'=>cMap,'registry'=>registry}
     | 
  
  
    | 
      71
     | 
    
        end
 
     | 
  
  
    | 
      72
     | 
    
      
 
     | 
  
  
    | 
      73
     | 
    
        def AddCIDFonts(family,name,cw,cMap,registry)
 
     | 
  
  
    | 
      74
     | 
    
        	AddCIDFont(family,'',name,cw,cMap,registry)
 
     | 
  
  
    | 
      75
     | 
    
        	AddCIDFont(family,'B',name+',Bold',cw,cMap,registry)
 
     | 
  
  
    | 
      76
     | 
    
        	AddCIDFont(family,'I',name+',Italic',cw,cMap,registry)
 
     | 
  
  
    | 
      77
     | 
    
        	AddCIDFont(family,'BI',name+',BoldItalic',cw,cMap,registry)
 
     | 
  
  
    | 
      78
     | 
    
        end
 
     | 
  
  
    | 
      79
     | 
    
      
 
     | 
  
  
    | 
      80
     | 
    
        def AddBig5Font(family='Big5',name='MSungStd-Light-Acro')
 
     | 
  
  
    | 
      81
     | 
    
        	#Add Big5 font with proportional Latin
 
     | 
  
  
    | 
      82
     | 
    
        	cw=Big5_widths
 
     | 
  
  
    | 
      83
     | 
    
        	cMap='ETenms-B5-H'
 
     | 
  
  
    | 
      84
     | 
    
        	registry={'ordering'=>'CNS1','supplement'=>0}
     | 
  
  
    | 
      85
     | 
    
      #ActionController::Base::logger.debug registry.to_a.join(":").to_s
     | 
  
  
    | 
      86
     | 
    
        	AddCIDFonts(family,name,cw,cMap,registry)
 
     | 
  
  
    | 
      87
     | 
    
        end
 
     | 
  
  
    | 
      88
     | 
    
      
 
     | 
  
  
    | 
      89
     | 
    
        def AddBig5hwFont(family='Big5-hw',name='MSungStd-Light-Acro')
 
     | 
  
  
    | 
      90
     | 
    
        	#Add Big5 font with half-witdh Latin
 
     | 
  
  
    | 
      91
     | 
    
          cw = {}
     | 
  
  
    | 
      92
     | 
    
          32.upto(126) do |i|
 
     | 
  
  
    | 
      93
     | 
    
        		cw[i.chr]=500
 
     | 
  
  
    | 
      94
     | 
    
      		end
 
     | 
  
  
    | 
      95
     | 
    
        	cMap='ETen-B5-H'
 
     | 
  
  
    | 
      96
     | 
    
        	registry={'ordering'=>'CNS1','supplement'=>0}
     | 
  
  
    | 
      97
     | 
    
        	AddCIDFonts(family,name,cw,cMap,registry)
 
     | 
  
  
    | 
      98
     | 
    
        end
 
     | 
  
  
    | 
      99
     | 
    
      
 
     | 
  
  
    | 
      100
     | 
    
        def AddGBFont(family='GB',name='STSongStd-Light-Acro')
 
     | 
  
  
    | 
      101
     | 
    
        	#Add GB font with proportional Latin
 
     | 
  
  
    | 
      102
     | 
    
        	cw=GB_widths
 
     | 
  
  
    | 
      103
     | 
    
        	cMap='GBKp-EUC-H'
 
     | 
  
  
    | 
      104
     | 
    
        	registry={'ordering'=>'GB1','supplement'=>2}
     | 
  
  
    | 
      105
     | 
    
        	AddCIDFonts(family,name,cw,cMap,registry)
 
     | 
  
  
    | 
      106
     | 
    
        end
 
     | 
  
  
    | 
      107
     | 
    
      
 
     | 
  
  
    | 
      108
     | 
    
        def AddGBhwFont(family='GB-hw',name='STSongStd-Light-Acro')
 
     | 
  
  
    | 
      109
     | 
    
        	#Add GB font with half-width Latin
 
     | 
  
  
    | 
      110
     | 
    
          32.upto(126) do |i|
 
     | 
  
  
    | 
      111
     | 
    
        		cw[i.chr]=500
 
     | 
  
  
    | 
      112
     | 
    
      		end
 
     | 
  
  
    | 
      113
     | 
    
        	cMap='GBK-EUC-H'
 
     | 
  
  
    | 
      114
     | 
    
        	registry={'ordering'=>'GB1','supplement'=>2}
     | 
  
  
    | 
      115
     | 
    
        	AddCIDFonts(family,name,cw,cMap,registry)
 
     | 
  
  
    | 
      116
     | 
    
        end
 
     | 
  
  
    | 
      117
     | 
    
      
 
     | 
  
  
    | 
      118
     | 
    
        def GetStringWidth(s)
 
     | 
  
  
    | 
      119
     | 
    
        	if(@CurrentFont['type']=='Type0')
 
     | 
  
  
    | 
      120
     | 
    
        		return GetMBStringWidth(s)
 
     | 
  
  
    | 
      121
     | 
    
        	else
 
     | 
  
  
    | 
      122
     | 
    
        		return super(s)
 
     | 
  
  
    | 
      123
     | 
    
      		end
 
     | 
  
  
    | 
      124
     | 
    
        end
 
     | 
  
  
    | 
      125
     | 
    
      
 
     | 
  
  
    | 
      126
     | 
    
        def GetMBStringWidth(s)
 
     | 
  
  
    | 
      127
     | 
    
        	#Multi-byte version of GetStringWidth()
 
     | 
  
  
    | 
      128
     | 
    
        	l=0
 
     | 
  
  
    | 
      129
     | 
    
        	cw=@CurrentFont['cw']
 
     | 
  
  
    | 
      130
     | 
    
        	nb=s.length
 
     | 
  
  
    | 
      131
     | 
    
        	i=0
 
     | 
  
  
    | 
      132
     | 
    
        	while(i<nb)
 
     | 
  
  
    | 
      133
     | 
    
        		c=s[i]
 
     | 
  
  
    | 
      134
     | 
    
        		if(c<128)
 
     | 
  
  
    | 
      135
     | 
    
        			l+=cw[c.chr] if cw[c.chr]
 
     | 
  
  
    | 
      136
     | 
    
        			i+=1
 
     | 
  
  
    | 
      137
     | 
    
        		else
 
     | 
  
  
    | 
      138
     | 
    
        			l+=1000
 
     | 
  
  
    | 
      139
     | 
    
        			i+=2
 
     | 
  
  
    | 
      140
     | 
    
        		end
 
     | 
  
  
    | 
      141
     | 
    
        	end
 
     | 
  
  
    | 
      142
     | 
    
        	return l*@FontSize/1000
 
     | 
  
  
    | 
      143
     | 
    
        end
 
     | 
  
  
    | 
      144
     | 
    
      
 
     | 
  
  
    | 
      145
     | 
    
        def MultiCell(w,h,txt,border=0,align='L',fill=0)
 
     | 
  
  
    | 
      146
     | 
    
        	if(@CurrentFont['type']=='Type0')
 
     | 
  
  
    | 
      147
     | 
    
        		MBMultiCell(w,h,txt,border,align,fill)
 
     | 
  
  
    | 
      148
     | 
    
        	else
 
     | 
  
  
    | 
      149
     | 
    
        		super(w,h,txt,border,align,fill)
 
     | 
  
  
    | 
      150
     | 
    
      		end
 
     | 
  
  
    | 
      151
     | 
    
        end
 
     | 
  
  
    | 
      152
     | 
    
      
 
     | 
  
  
    | 
      153
     | 
    
        def MBMultiCell(w,h,txt,border=0,align='L',fill=0)
 
     | 
  
  
    | 
      154
     | 
    
        	#Multi-byte version of MultiCell()
 
     | 
  
  
    | 
      155
     | 
    
        	cw=@CurrentFont['cw']
 
     | 
  
  
    | 
      156
     | 
    
        	if(w==0)
 
     | 
  
  
    | 
      157
     | 
    
        		w=@w-@rMargin-@x
 
     | 
  
  
    | 
      158
     | 
    
      		end
 
     | 
  
  
    | 
      159
     | 
    
        	wmax=(w-2*@cMargin)*1000/@FontSize
 
     | 
  
  
    | 
      160
     | 
    
        	s=txt.gsub("\r",'')
     | 
  
  
    | 
      161
     | 
    
        	nb=s.length
 
     | 
  
  
    | 
      162
     | 
    
        	if(nb>0 and s[nb-1]=="\n")
 
     | 
  
  
    | 
      163
     | 
    
        		nb-=1
 
     | 
  
  
    | 
      164
     | 
    
      		end
 
     | 
  
  
    | 
      165
     | 
    
        	b=0
 
     | 
  
  
    | 
      166
     | 
    
        	if(border)
 
     | 
  
  
    | 
      167
     | 
    
        		if(border==1)
 
     | 
  
  
    | 
      168
     | 
    
        			border='LTRB'
 
     | 
  
  
    | 
      169
     | 
    
        			b='LRT'
 
     | 
  
  
    | 
      170
     | 
    
        			b2='LR'
 
     | 
  
  
    | 
      171
     | 
    
        		else
 
     | 
  
  
    | 
      172
     | 
    
        			b2=''
 
     | 
  
  
    | 
      173
     | 
    
        			if(border.to_s.index('L'))
     | 
  
  
    | 
      174
     | 
    
        				b2+='L'
 
     | 
  
  
    | 
      175
     | 
    
      				end
 
     | 
  
  
    | 
      176
     | 
    
        			if(border.to_s.index('R'))
     | 
  
  
    | 
      177
     | 
    
        				b2+='R'
 
     | 
  
  
    | 
      178
     | 
    
      				end
 
     | 
  
  
    | 
      179
     | 
    
        			b=border.to_s.index('T') ? b2+'T' : b2
     | 
  
  
    | 
      180
     | 
    
        		end
 
     | 
  
  
    | 
      181
     | 
    
        	end
 
     | 
  
  
    | 
      182
     | 
    
        	sep=-1
 
     | 
  
  
    | 
      183
     | 
    
        	i=0
 
     | 
  
  
    | 
      184
     | 
    
        	j=0
 
     | 
  
  
    | 
      185
     | 
    
        	l=0
 
     | 
  
  
    | 
      186
     | 
    
        	nl=1
 
     | 
  
  
    | 
      187
     | 
    
        	while(i<nb)
 
     | 
  
  
    | 
      188
     | 
    
        		#Get next character
 
     | 
  
  
    | 
      189
     | 
    
        		c=s[i]
 
     | 
  
  
    | 
      190
     | 
    
        		#Check if ASCII or MB
 
     | 
  
  
    | 
      191
     | 
    
        		ascii=(c<128)
 
     | 
  
  
    | 
      192
     | 
    
        		if(c.chr=="\n")
 
     | 
  
  
    | 
      193
     | 
    
        			#Explicit line break
 
     | 
  
  
    | 
      194
     | 
    
        			Cell(w,h,s[j,i-j],b,2,align,fill)
 
     | 
  
  
    | 
      195
     | 
    
        			i+=1
 
     | 
  
  
    | 
      196
     | 
    
        			sep=-1
 
     | 
  
  
    | 
      197
     | 
    
        			j=i
 
     | 
  
  
    | 
      198
     | 
    
        			l=0
 
     | 
  
  
    | 
      199
     | 
    
        			nl+=1
 
     | 
  
  
    | 
      200
     | 
    
        			if(border and nl==2)
 
     | 
  
  
    | 
      201
     | 
    
        				b=b2
 
     | 
  
  
    | 
      202
     | 
    
      				end
 
     | 
  
  
    | 
      203
     | 
    
        			next
 
     | 
  
  
    | 
      204
     | 
    
        		end
 
     | 
  
  
    | 
      205
     | 
    
        		if(!ascii)
 
     | 
  
  
    | 
      206
     | 
    
        			sep=i
 
     | 
  
  
    | 
      207
     | 
    
        			ls=l
 
     | 
  
  
    | 
      208
     | 
    
        		elsif(c==' ')
 
     | 
  
  
    | 
      209
     | 
    
        			sep=i
 
     | 
  
  
    | 
      210
     | 
    
        			ls=l
 
     | 
  
  
    | 
      211
     | 
    
        		end
 
     | 
  
  
    | 
      212
     | 
    
        		l+=ascii ? (cw[c.chr] || 0) : 1100
 
     | 
  
  
    | 
      213
     | 
    
        		if(l>wmax)
 
     | 
  
  
    | 
      214
     | 
    
        			#Automatic line break
 
     | 
  
  
    | 
      215
     | 
    
        			if(sep==-1 or i==j)
 
     | 
  
  
    | 
      216
     | 
    
        				if(i==j)
 
     | 
  
  
    | 
      217
     | 
    
        					i+=ascii ? 1 : 3
 
     | 
  
  
    | 
      218
     | 
    
      					end
 
     | 
  
  
    | 
      219
     | 
    
        				Cell(w,h,s[j,i-j],b,2,align,fill)
 
     | 
  
  
    | 
      220
     | 
    
        			else
 
     | 
  
  
    | 
      221
     | 
    
        				Cell(w,h,s[j,sep-j],b,2,align,fill)
 
     | 
  
  
    | 
      222
     | 
    
        				i=(s[sep]==' ') ? sep+1 : sep
 
     | 
  
  
    | 
      223
     | 
    
        			end
 
     | 
  
  
    | 
      224
     | 
    
        			sep=-1
 
     | 
  
  
    | 
      225
     | 
    
        			j=i
 
     | 
  
  
    | 
      226
     | 
    
        			l=0
 
     | 
  
  
    | 
      227
     | 
    
      #  			nl+=1
 
     | 
  
  
    | 
      228
     | 
    
        			if(border and nl==2)
 
     | 
  
  
    | 
      229
     | 
    
        				b=b2
 
     | 
  
  
    | 
      230
     | 
    
        			end
 
     | 
  
  
    | 
      231
     | 
    
        		else
 
     | 
  
  
    | 
      232
     | 
    
        			i+=ascii ? 1 : 3
 
     | 
  
  
    | 
      233
     | 
    
        		end
 
     | 
  
  
    | 
      234
     | 
    
        	end
 
     | 
  
  
    | 
      235
     | 
    
        	#Last chunk
 
     | 
  
  
    | 
      236
     | 
    
        	if(border and not border.to_s.index('B').nil?)
     | 
  
  
    | 
      237
     | 
    
        		b+='B'
 
     | 
  
  
    | 
      238
     | 
    
      		end
 
     | 
  
  
    | 
      239
     | 
    
        	Cell(w,h,s[j,i-j],b,2,align,fill)
 
     | 
  
  
    | 
      240
     | 
    
        	@x=@lMargin
 
     | 
  
  
    | 
      241
     | 
    
        end
 
     | 
  
  
    | 
      242
     | 
    
      
 
     | 
  
  
    | 
      243
     | 
    
        def Write(h,txt,link='')
 
     | 
  
  
    | 
      244
     | 
    
        	if(@CurrentFont['type']=='Type0')
 
     | 
  
  
    | 
      245
     | 
    
        		MBWrite(h,txt,link)
 
     | 
  
  
    | 
      246
     | 
    
        	else
 
     | 
  
  
    | 
      247
     | 
    
        		super(h,txt,link)
 
     | 
  
  
    | 
      248
     | 
    
      		end
 
     | 
  
  
    | 
      249
     | 
    
        end
 
     | 
  
  
    | 
      250
     | 
    
      
 
     | 
  
  
    | 
      251
     | 
    
        def MBWrite(h,txt,link)
 
     | 
  
  
    | 
      252
     | 
    
        	#Multi-byte version of Write()
 
     | 
  
  
    | 
      253
     | 
    
        	cw=@CurrentFont['cw']
 
     | 
  
  
    | 
      254
     | 
    
        	w=@w-@rMargin-@x
 
     | 
  
  
    | 
      255
     | 
    
        	wmax=(w-2*@cMargin)*1000/@FontSize
 
     | 
  
  
    | 
      256
     | 
    
        	s=txt.gsub("\r",'')
     | 
  
  
    | 
      257
     | 
    
        	nb=s.length
 
     | 
  
  
    | 
      258
     | 
    
        	sep=-1
 
     | 
  
  
    | 
      259
     | 
    
        	i=0
 
     | 
  
  
    | 
      260
     | 
    
        	j=0
 
     | 
  
  
    | 
      261
     | 
    
        	l=0
 
     | 
  
  
    | 
      262
     | 
    
        	nl=1
 
     | 
  
  
    | 
      263
     | 
    
        	while(i<nb)
 
     | 
  
  
    | 
      264
     | 
    
        		#Get next character
 
     | 
  
  
    | 
      265
     | 
    
        		c=s[i]
 
     | 
  
  
    | 
      266
     | 
    
        		#Check if ASCII or MB
 
     | 
  
  
    | 
      267
     | 
    
        		ascii=(c<128)
 
     | 
  
  
    | 
      268
     | 
    
        		if(c.chr=="\n")
 
     | 
  
  
    | 
      269
     | 
    
        			#Explicit line break
 
     | 
  
  
    | 
      270
     | 
    
        			Cell(w,h,s[j,i-j],0,2,'',0,link)
 
     | 
  
  
    | 
      271
     | 
    
        			i+=1
 
     | 
  
  
    | 
      272
     | 
    
        			sep=-1
 
     | 
  
  
    | 
      273
     | 
    
        			j=i
 
     | 
  
  
    | 
      274
     | 
    
        			l=0
 
     | 
  
  
    | 
      275
     | 
    
        			if(nl==1)
 
     | 
  
  
    | 
      276
     | 
    
        				@x=@lMargin
 
     | 
  
  
    | 
      277
     | 
    
        				w=@w-@rMargin-@x
 
     | 
  
  
    | 
      278
     | 
    
        				wmax=(w-2*@cMargin)*1000/@FontSize
 
     | 
  
  
    | 
      279
     | 
    
        			end
 
     | 
  
  
    | 
      280
     | 
    
        			nl+=1
 
     | 
  
  
    | 
      281
     | 
    
        			next
 
     | 
  
  
    | 
      282
     | 
    
        		end
 
     | 
  
  
    | 
      283
     | 
    
        		if(!ascii or c==' ')
 
     | 
  
  
    | 
      284
     | 
    
        			sep=i
 
     | 
  
  
    | 
      285
     | 
    
      			end
 
     | 
  
  
    | 
      286
     | 
    
        		l+=ascii ? cw[c.chr] : 1100
 
     | 
  
  
    | 
      287
     | 
    
        		if(l>wmax)
 
     | 
  
  
    | 
      288
     | 
    
        			#Automatic line break
 
     | 
  
  
    | 
      289
     | 
    
        			if(sep==-1 or i==j)
 
     | 
  
  
    | 
      290
     | 
    
        				if(@x>@lMargin)
 
     | 
  
  
    | 
      291
     | 
    
        					#Move to next line
 
     | 
  
  
    | 
      292
     | 
    
        					@x=@lMargin
 
     | 
  
  
    | 
      293
     | 
    
        					@y+=h
 
     | 
  
  
    | 
      294
     | 
    
        					w=@w-@rMargin-@x
 
     | 
  
  
    | 
      295
     | 
    
        					wmax=(w-2*@cMargin)*1000/@FontSize
 
     | 
  
  
    | 
      296
     | 
    
        					i+=1
 
     | 
  
  
    | 
      297
     | 
    
        					nl+=1
 
     | 
  
  
    | 
      298
     | 
    
        					next
 
     | 
  
  
    | 
      299
     | 
    
        				end
 
     | 
  
  
    | 
      300
     | 
    
        				if(i==j)
 
     | 
  
  
    | 
      301
     | 
    
        					i+=ascii ? 1 : 3
 
     | 
  
  
    | 
      302
     | 
    
      					end
 
     | 
  
  
    | 
      303
     | 
    
        				Cell(w,h,s[j,i-j],0,2,'',0,link)
 
     | 
  
  
    | 
      304
     | 
    
        			else
 
     | 
  
  
    | 
      305
     | 
    
        				Cell(w,h,s[j,sep-j],0,2,'',0,link)
 
     | 
  
  
    | 
      306
     | 
    
        				i=(s[sep]==' ') ? sep+1 : sep
 
     | 
  
  
    | 
      307
     | 
    
        			end
 
     | 
  
  
    | 
      308
     | 
    
        			sep=-1
 
     | 
  
  
    | 
      309
     | 
    
        			j=i
 
     | 
  
  
    | 
      310
     | 
    
        			l=0
 
     | 
  
  
    | 
      311
     | 
    
        			if(nl==1)
 
     | 
  
  
    | 
      312
     | 
    
        				@x=@lMargin
 
     | 
  
  
    | 
      313
     | 
    
        				w=@w-@rMargin-@x
 
     | 
  
  
    | 
      314
     | 
    
        				wmax=(w-2*@cMargin)*1000/@FontSize
 
     | 
  
  
    | 
      315
     | 
    
        			end
 
     | 
  
  
    | 
      316
     | 
    
        			nl+=1
 
     | 
  
  
    | 
      317
     | 
    
        		else
 
     | 
  
  
    | 
      318
     | 
    
        			i+=ascii ? 1 : 3
 
     | 
  
  
    | 
      319
     | 
    
      			end
 
     | 
  
  
    | 
      320
     | 
    
        	end
 
     | 
  
  
    | 
      321
     | 
    
        	#Last chunk
 
     | 
  
  
    | 
      322
     | 
    
        	if(i!=j)
 
     | 
  
  
    | 
      323
     | 
    
        		Cell(l/1000*@FontSize,h,s[j,i-j],0,0,'',0,link)
 
     | 
  
  
    | 
      324
     | 
    
      		end
 
     | 
  
  
    | 
      325
     | 
    
        end
 
     | 
  
  
    | 
      326
     | 
    
      
 
     | 
  
  
    | 
      327
     | 
    
      private
 
     | 
  
  
    | 
      328
     | 
    
      
 
     | 
  
  
    | 
      329
     | 
    
        def putfonts()
 
     | 
  
  
    | 
      330
     | 
    
        	nf=@n
 
     | 
  
  
    | 
      331
     | 
    
          @diffs.each do |diff|
 
     | 
  
  
    | 
      332
     | 
    
        		#Encodings
 
     | 
  
  
    | 
      333
     | 
    
        		newobj()
 
     | 
  
  
    | 
      334
     | 
    
        		out('<</Type /Encoding /BaseEncoding /WinAnsiEncoding /Differences ['+diff+']>>')
     | 
  
  
    | 
      335
     | 
    
        		out('endobj')
     | 
  
  
    | 
      336
     | 
    
        	end
 
     | 
  
  
    | 
      337
     | 
    
        	# mqr=get_magic_quotes_runtime()
 
     | 
  
  
    | 
      338
     | 
    
        	# set_magic_quotes_runtime(0)
 
     | 
  
  
    | 
      339
     | 
    
          @FontFiles.each_pair do |file, info|
 
     | 
  
  
    | 
      340
     | 
    
        		#Font file embedding
 
     | 
  
  
    | 
      341
     | 
    
        		newobj()
 
     | 
  
  
    | 
      342
     | 
    
        		@FontFiles[file]['n']=@n
 
     | 
  
  
    | 
      343
     | 
    
        		if(defined('FPDF_FONTPATH'))
     | 
  
  
    | 
      344
     | 
    
        			file=FPDF_FONTPATH+file
 
     | 
  
  
    | 
      345
     | 
    
      			end
 
     | 
  
  
    | 
      346
     | 
    
        		size=filesize(file)
 
     | 
  
  
    | 
      347
     | 
    
        		if(!size)
 
     | 
  
  
    | 
      348
     | 
    
        			Error('Font file not found')
     | 
  
  
    | 
      349
     | 
    
      			end
 
     | 
  
  
    | 
      350
     | 
    
        		out('<</Length '+size)
     | 
  
  
    | 
      351
     | 
    
        		if(file[-2]=='.z')
 
     | 
  
  
    | 
      352
     | 
    
        			out('/Filter /FlateDecode')
     | 
  
  
    | 
      353
     | 
    
      			end
 
     | 
  
  
    | 
      354
     | 
    
        		out('/Length1 '+info['length1'])
     | 
  
  
    | 
      355
     | 
    
        		unless info['length2'].nil?
 
     | 
  
  
    | 
      356
     | 
    
        			out('/Length2 '+info['length2']+' /Length3 0')
     | 
  
  
    | 
      357
     | 
    
      			end
 
     | 
  
  
    | 
      358
     | 
    
        		out('>>')
     | 
  
  
    | 
      359
     | 
    
        		f=fopen(file,'rb')
 
     | 
  
  
    | 
      360
     | 
    
        		putstream(fread(f,size))
 
     | 
  
  
    | 
      361
     | 
    
        		fclose(f)
 
     | 
  
  
    | 
      362
     | 
    
        		out('endobj')
     | 
  
  
    | 
      363
     | 
    
        	end
 
     | 
  
  
    | 
      364
     | 
    
      #
 
     | 
  
  
    | 
      365
     | 
    
        	# set_magic_quotes_runtime(mqr)
 
     | 
  
  
    | 
      366
     | 
    
      #
 
     | 
  
  
    | 
      367
     | 
    
          @fonts.each_pair do |k, font|
 
     | 
  
  
    | 
      368
     | 
    
        		#Font objects
 
     | 
  
  
    | 
      369
     | 
    
        		newobj()
 
     | 
  
  
    | 
      370
     | 
    
        		@fonts[k]['n']=@n
 
     | 
  
  
    | 
      371
     | 
    
        		out('<</Type /Font')
     | 
  
  
    | 
      372
     | 
    
        		if(font['type']=='Type0')
 
     | 
  
  
    | 
      373
     | 
    
        			putType0(font)
 
     | 
  
  
    | 
      374
     | 
    
        		else
 
     | 
  
  
    | 
      375
     | 
    
        			name=font['name']
 
     | 
  
  
    | 
      376
     | 
    
        			out('/BaseFont /'+name)
     | 
  
  
    | 
      377
     | 
    
        			if(font['type']=='core')
 
     | 
  
  
    | 
      378
     | 
    
        				#Standard font
 
     | 
  
  
    | 
      379
     | 
    
        				out('/Subtype /Type1')
     | 
  
  
    | 
      380
     | 
    
        				if(name!='Symbol' and name!='ZapfDingbats')
 
     | 
  
  
    | 
      381
     | 
    
        					out('/Encoding /WinAnsiEncoding')
     | 
  
  
    | 
      382
     | 
    
        			end
 
     | 
  
  
    | 
      383
     | 
    
        			else
 
     | 
  
  
    | 
      384
     | 
    
        				#Additional font
 
     | 
  
  
    | 
      385
     | 
    
        				out('/Subtype /'+font['type'])
     | 
  
  
    | 
      386
     | 
    
        				out('/FirstChar 32')
     | 
  
  
    | 
      387
     | 
    
        				out('/LastChar 255')
     | 
  
  
    | 
      388
     | 
    
        				out('/Widths '+(@n+1)+' 0 R')
     | 
  
  
    | 
      389
     | 
    
        				out('/FontDescriptor '+(@n+2)+' 0 R')
     | 
  
  
    | 
      390
     | 
    
        				if(font['enc'])
 
     | 
  
  
    | 
      391
     | 
    
        					if !font['diff'].nil?
 
     | 
  
  
    | 
      392
     | 
    
        						out('/Encoding '+(nf+font['diff'])+' 0 R')
     | 
  
  
    | 
      393
     | 
    
        					else
 
     | 
  
  
    | 
      394
     | 
    
        						out('/Encoding /WinAnsiEncoding')
     | 
  
  
    | 
      395
     | 
    
        					end
 
     | 
  
  
    | 
      396
     | 
    
        				end
 
     | 
  
  
    | 
      397
     | 
    
        			end
 
     | 
  
  
    | 
      398
     | 
    
        			out('>>')
     | 
  
  
    | 
      399
     | 
    
        			out('endobj')
     | 
  
  
    | 
      400
     | 
    
        			if(font['type']!='core')
 
     | 
  
  
    | 
      401
     | 
    
        				#Widths
 
     | 
  
  
    | 
      402
     | 
    
        				newobj()
 
     | 
  
  
    | 
      403
     | 
    
        				cw=font['cw']
 
     | 
  
  
    | 
      404
     | 
    
        				s='['
 
     | 
  
  
    | 
      405
     | 
    
                32.upto(255) do |i|
 
     | 
  
  
    | 
      406
     | 
    
        					s+=cw[i.chr]+' '
 
     | 
  
  
    | 
      407
     | 
    
        				end
 
     | 
  
  
    | 
      408
     | 
    
        				out(s+']')
 
     | 
  
  
    | 
      409
     | 
    
        				out('endobj')
     | 
  
  
    | 
      410
     | 
    
        				#Descriptor
 
     | 
  
  
    | 
      411
     | 
    
        				newobj()
 
     | 
  
  
    | 
      412
     | 
    
        				s='<</Type /FontDescriptor /FontName /'+name
 
     | 
  
  
    | 
      413
     | 
    
        				font['desc'].each_pair do |k, v|
 
     | 
  
  
    | 
      414
     | 
    
        					s+=' /'+k+' '+v
 
     | 
  
  
    | 
      415
     | 
    
        				end
 
     | 
  
  
    | 
      416
     | 
    
        				file=font['file']
 
     | 
  
  
    | 
      417
     | 
    
        				if(file)
 
     | 
  
  
    | 
      418
     | 
    
        					s+=' /FontFile'+(font['type']=='Type1' ? '' : '2')+' '+@FontFiles[file]['n']+' 0 R'
 
     | 
  
  
    | 
      419
     | 
    
        				end
 
     | 
  
  
    | 
      420
     | 
    
        				out(s+'>>')
 
     | 
  
  
    | 
      421
     | 
    
        				out('endobj')
     | 
  
  
    | 
      422
     | 
    
        			end
 
     | 
  
  
    | 
      423
     | 
    
        		end
 
     | 
  
  
    | 
      424
     | 
    
        	end
 
     | 
  
  
    | 
      425
     | 
    
        end
 
     | 
  
  
    | 
      426
     | 
    
      
 
     | 
  
  
    | 
      427
     | 
    
        def putType0(font)
 
     | 
  
  
    | 
      428
     | 
    
        	#Type0
 
     | 
  
  
    | 
      429
     | 
    
        	out('/Subtype /Type0')
     | 
  
  
    | 
      430
     | 
    
        	out('/BaseFont /'+font['name']+'-'+font['CMap'])
     | 
  
  
    | 
      431
     | 
    
        	out('/Encoding /'+font['CMap'])
     | 
  
  
    | 
      432
     | 
    
        	out('/DescendantFonts ['+(@n+1).to_s+' 0 R]')
     | 
  
  
    | 
      433
     | 
    
        	out('>>')
     | 
  
  
    | 
      434
     | 
    
        	out('endobj')
     | 
  
  
    | 
      435
     | 
    
        	#CIDFont
 
     | 
  
  
    | 
      436
     | 
    
        	newobj()
 
     | 
  
  
    | 
      437
     | 
    
        	out('<</Type /Font')
     | 
  
  
    | 
      438
     | 
    
        	out('/Subtype /CIDFontType0')
     | 
  
  
    | 
      439
     | 
    
        	out('/BaseFont /'+font['name'])
     | 
  
  
    | 
      440
     | 
    
        	out('/CIDSystemInfo <</Registry '+textstring('Adobe')+' /Ordering '+textstring(font['registry']['ordering'])+' /Supplement '+font['registry']['supplement'].to_s+'>>')
     | 
  
  
    | 
      441
     | 
    
        	out('/FontDescriptor '+(@n+1).to_s+' 0 R')
     | 
  
  
    | 
      442
     | 
    
        	if(font['CMap']=='ETen-B5-H')
 
     | 
  
  
    | 
      443
     | 
    
        		w='13648 13742 500'
 
     | 
  
  
    | 
      444
     | 
    
        	elsif(font['CMap']=='GBK-EUC-H')
 
     | 
  
  
    | 
      445
     | 
    
        		w='814 907 500 7716 [500]'
 
     | 
  
  
    | 
      446
     | 
    
        	else
 
     | 
  
  
    | 
      447
     | 
    
            # ActionController::Base::logger.debug font['cw'].keys.sort.join(' ').to_s
     | 
  
  
    | 
      448
     | 
    
            # ActionController::Base::logger.debug font['cw'].values.join(' ').to_s
     | 
  
  
    | 
      449
     | 
    
        		w='1 ['
 
     | 
  
  
    | 
      450
     | 
    
        		font['cw'].keys.sort.each {|key|
     | 
  
  
    | 
      451
     | 
    
        		  w+=font['cw'][key].to_s + " "
 
     | 
  
  
    | 
      452
     | 
    
      # ActionController::Base::logger.debug key.to_s
 
     | 
  
  
    | 
      453
     | 
    
      # ActionController::Base::logger.debug font['cw'][key].to_s
 
     | 
  
  
    | 
      454
     | 
    
        		}
 
     | 
  
  
    | 
      455
     | 
    
        		w +=']'
 
     | 
  
  
    | 
      456
     | 
    
        	end
 
     | 
  
  
    | 
      457
     | 
    
        	out('/W ['+w+']>>')
     | 
  
  
    | 
      458
     | 
    
        	out('endobj')
     | 
  
  
    | 
      459
     | 
    
        	#Font descriptor
 
     | 
  
  
    | 
      460
     | 
    
        	newobj()
 
     | 
  
  
    | 
      461
     | 
    
        	out('<</Type /FontDescriptor')
     | 
  
  
    | 
      462
     | 
    
        	out('/FontName /'+font['name'])
     | 
  
  
    | 
      463
     | 
    
        	out('/Flags 6')
     | 
  
  
    | 
      464
     | 
    
        	out('/FontBBox [0 -200 1000 900]')
     | 
  
  
    | 
      465
     | 
    
        	out('/ItalicAngle 0')
     | 
  
  
    | 
      466
     | 
    
        	out('/Ascent 800')
     | 
  
  
    | 
      467
     | 
    
        	out('/Descent -200')
     | 
  
  
    | 
      468
     | 
    
        	out('/CapHeight 800')
     | 
  
  
    | 
      469
     | 
    
        	out('/StemV 50')
     | 
  
  
    | 
      470
     | 
    
        	out('>>')
     | 
  
  
    | 
      471
     | 
    
        	out('endobj')
     | 
  
  
    | 
      472
     | 
    
        end
 
     | 
  
  
    | 
      473
     | 
    
      end
 
     |