##// END OF EJS Templates
jro_apps » redmine
RSS
PDF: replace converting error characters instead of returning UTF-8 in FPDF ANSI on Ruby 1.8 (#61)....
Toshi MARUYAMA -
r5231:2f2cdfd96a9c
parent child
Show More
Side by Side Unified
Context file:
r5231:2f2cdfd96a9c Loading diff...:
Show file before | Show file after | Hide comments
@@ -1,406 +1,412
1 1 # encoding: utf-8
2 2 #
3 3 # Redmine - project management software
4 4 # Copyright (C) 2006-2009 Jean-Philippe Lang
5 5 #
6 6 # This program is free software; you can redistribute it and/or
7 7 # modify it under the terms of the GNU General Public License
8 8 # as published by the Free Software Foundation; either version 2
9 9 # of the License, or (at your option) any later version.
10 10 #
11 11 # This program is distributed in the hope that it will be useful,
12 12 # but WITHOUT ANY WARRANTY; without even the implied warranty of
13 13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 14 # GNU General Public License for more details.
15 15 #
16 16 # You should have received a copy of the GNU General Public License
17 17 # along with this program; if not, write to the Free Software
18 18 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
19 19
20 20 require 'iconv'
21 21 require 'rfpdf/fpdf'
22 22 require 'fpdf/chinese'
23 23 require 'fpdf/japanese'
24 24 require 'fpdf/korean'
25 25
26 26 module Redmine
27 27 module Export
28 28 module PDF
29 29 include ActionView::Helpers::TextHelper
30 30 include ActionView::Helpers::NumberHelper
31 31
32 32 class ITCPDF < TCPDF
33 33 include Redmine::I18n
34 34 attr_accessor :footer_date
35 35
36 36 def initialize(lang)
37 37 super()
38 38 set_language_if_valid lang
39 39 @font_for_content = 'FreeSans'
40 40 @font_for_footer = 'FreeSans'
41 41 SetCreator(Redmine::Info.app_name)
42 42 SetFont(@font_for_content)
43 43 end
44 44
45 45 def SetFontStyle(style, size)
46 46 SetFont(@font_for_content, style, size)
47 47 end
48 48
49 49 def SetTitle(txt)
50 50 txt = begin
51 51 utf16txt = Iconv.conv('UTF-16BE', 'UTF-8', txt)
52 52 hextxt = "<FEFF" # FEFF is BOM
53 53 hextxt << utf16txt.unpack("C*").map {|x| sprintf("%02X",x) }.join
54 54 hextxt << ">"
55 55 rescue
56 56 txt
57 57 end || ''
58 58 super(txt)
59 59 end
60 60
61 61 def textstring(s)
62 62 # Format a text string
63 63 if s =~ /^</ # This means the string is hex-dumped.
64 64 return s
65 65 else
66 66 return '('+escape(s)+')'
67 67 end
68 68 end
69 69
70 70 alias RDMCell Cell
71 71 alias RDMMultiCell MultiCell
72 72
73 73 def Footer
74 74 SetFont(@font_for_footer, 'I', 8)
75 75 SetY(-15)
76 76 SetX(15)
77 77 RDMCell(0, 5, @footer_date, 0, 0, 'L')
78 78 SetY(-15)
79 79 SetX(-30)
80 80 RDMCell(0, 5, PageNo().to_s + '/{nb}', 0, 0, 'C')
81 81 end
82 82 end
83 83
84 84 class IFPDF < FPDF
85 85 include Redmine::I18n
86 86 attr_accessor :footer_date
87 87
88 88 def initialize(lang)
89 89 super()
90 90 set_language_if_valid lang
91 91 case current_language.to_s.downcase
92 92 when 'ko'
93 93 extend(PDF_Korean)
94 94 AddUHCFont()
95 95 @font_for_content = 'UHC'
96 96 @font_for_footer = 'UHC'
97 97 when 'ja'
98 98 extend(PDF_Japanese)
99 99 AddSJISFont()
100 100 @font_for_content = 'SJIS'
101 101 @font_for_footer = 'SJIS'
102 102 when 'zh'
103 103 extend(PDF_Chinese)
104 104 AddGBFont()
105 105 @font_for_content = 'GB'
106 106 @font_for_footer = 'GB'
107 107 when 'zh-tw'
108 108 extend(PDF_Chinese)
109 109 AddBig5Font()
110 110 @font_for_content = 'Big5'
111 111 @font_for_footer = 'Big5'
112 112 else
113 113 @font_for_content = 'Arial'
114 114 @font_for_footer = 'Helvetica'
115 115 end
116 116 SetCreator(Redmine::Info.app_name)
117 117 SetFont(@font_for_content)
118 118 end
119 119
120 120 def SetFontStyle(style, size)
121 121 SetFont(@font_for_content, style, size)
122 122 end
123 123
124 124 def SetTitle(txt)
125 125 txt = begin
126 126 utf16txt = Iconv.conv('UTF-16BE', 'UTF-8', txt)
127 127 hextxt = "<FEFF" # FEFF is BOM
128 128 hextxt << utf16txt.unpack("C*").map {|x| sprintf("%02X",x) }.join
129 129 hextxt << ">"
130 130 rescue
131 131 txt
132 132 end || ''
133 133 super(txt)
134 134 end
135 135
136 136 def textstring(s)
137 137 # Format a text string
138 138 if s =~ /^</ # This means the string is hex-dumped.
139 139 return s
140 140 else
141 141 return '('+escape(s)+')'
142 142 end
143 143 end
144 144
145 145 def fix_text_encoding(txt)
146 146 txt ||= ''
147 147 if txt.respond_to?(:force_encoding)
148 148 txt.force_encoding('UTF-8')
149 149 txt = txt.encode(l(:general_pdf_encoding), :invalid => :replace,
150 150 :undef => :replace, :replace => '?')
151 151 txt.force_encoding('ASCII-8BIT')
152 152 else
153 153 @ic ||= Iconv.new(l(:general_pdf_encoding), 'UTF-8')
154 txt = begin
155 @ic.iconv(txt)
154 txtar = ""
155 begin
156 txtar += @ic.iconv(txt)
157 rescue Iconv::IllegalSequence
158 txtar += $!.success
159 txt = '?' + $!.failed[1,$!.failed.length]
160 retry
156 161 rescue
157 txt
162 txtar += $!.success
158 163 end
164 txt = txtar
159 165 end
160 166 # 0x5c char handling
161 167 txt.gsub(/\\/, "\\\\\\\\")
162 168 end
163 169
164 170 def RDMCell(w,h=0,txt='',border=0,ln=0,align='',fill=0,link='')
165 171 Cell(w,h,fix_text_encoding(txt),border,ln,align,fill,link)
166 172 end
167 173
168 174 def RDMMultiCell(w,h=0,txt='',border=0,align='',fill=0)
169 175 MultiCell(w,h,fix_text_encoding(txt),border,align,fill)
170 176 end
171 177
172 178 def Footer
173 179 SetFont(@font_for_footer, 'I', 8)
174 180 SetY(-15)
175 181 SetX(15)
176 182 RDMCell(0, 5, @footer_date, 0, 0, 'L')
177 183 SetY(-15)
178 184 SetX(-30)
179 185 RDMCell(0, 5, PageNo().to_s + '/{nb}', 0, 0, 'C')
180 186 end
181 187 alias alias_nb_pages AliasNbPages
182 188 end
183 189
184 190 # Returns a PDF string of a list of issues
185 191 def issues_to_pdf(issues, project, query)
186 192 if ( current_language.to_s.downcase == 'ko' ||
187 193 current_language.to_s.downcase == 'ja' ||
188 194 current_language.to_s.downcase == 'zh' ||
189 195 current_language.to_s.downcase == 'zh-tw' ||
190 196 current_language.to_s.downcase == 'th' )
191 197 pdf = IFPDF.new(current_language)
192 198 else
193 199 pdf = ITCPDF.new(current_language)
194 200 end
195 201 title = query.new_record? ? l(:label_issue_plural) : query.name
196 202 title = "#{project} - #{title}" if project
197 203 pdf.SetTitle(title)
198 204 pdf.alias_nb_pages
199 205 pdf.footer_date = format_date(Date.today)
200 206 pdf.AddPage("L")
201 207
202 208 row_height = 6
203 209 col_width = []
204 210 unless query.columns.empty?
205 211 col_width = query.columns.collect {|column| column.name == :subject ? 4.0 : 1.0 }
206 212 ratio = 262.0 / col_width.inject(0) {|s,w| s += w}
207 213 col_width = col_width.collect {|w| w * ratio}
208 214 end
209 215
210 216 # title
211 217 pdf.SetFontStyle('B',11)
212 218 pdf.RDMCell(190,10, title)
213 219 pdf.Ln
214 220
215 221 # headers
216 222 pdf.SetFontStyle('B',8)
217 223 pdf.SetFillColor(230, 230, 230)
218 224 pdf.RDMCell(15, row_height, "#", 1, 0, 'L', 1)
219 225 query.columns.each_with_index do |column, i|
220 226 pdf.RDMCell(col_width[i], row_height, column.caption, 1, 0, 'L', 1)
221 227 end
222 228 pdf.Ln
223 229
224 230 # rows
225 231 pdf.SetFontStyle('',8)
226 232 pdf.SetFillColor(255, 255, 255)
227 233 previous_group = false
228 234 issues.each do |issue|
229 235 if query.grouped? &&
230 236 (group = query.group_by_column.value(issue)) != previous_group
231 237 pdf.SetFontStyle('B',9)
232 238 pdf.RDMCell(277, row_height,
233 239 (group.blank? ? 'None' : group.to_s) + " (#{query.issue_count_by_group[group]})",
234 240 1, 1, 'L')
235 241 pdf.SetFontStyle('',8)
236 242 previous_group = group
237 243 end
238 244 pdf.RDMCell(15, row_height, issue.id.to_s, 1, 0, 'L', 1)
239 245 query.columns.each_with_index do |column, i|
240 246 s = if column.is_a?(QueryCustomFieldColumn)
241 247 cv = issue.custom_values.detect {|v| v.custom_field_id == column.custom_field.id}
242 248 show_value(cv)
243 249 else
244 250 value = issue.send(column.name)
245 251 if value.is_a?(Date)
246 252 format_date(value)
247 253 elsif value.is_a?(Time)
248 254 format_time(value)
249 255 else
250 256 value
251 257 end
252 258 end
253 259 pdf.RDMCell(col_width[i], row_height, s.to_s, 1, 0, 'L', 1)
254 260 end
255 261 pdf.Ln
256 262 end
257 263 if issues.size == Setting.issues_export_limit.to_i
258 264 pdf.SetFontStyle('B',10)
259 265 pdf.RDMCell(0, row_height, '...')
260 266 end
261 267 pdf.Output
262 268 end
263 269
264 270 # Returns a PDF string of a single issue
265 271 def issue_to_pdf(issue)
266 272 if ( current_language.to_s.downcase == 'ko' ||
267 273 current_language.to_s.downcase == 'ja' ||
268 274 current_language.to_s.downcase == 'zh' ||
269 275 current_language.to_s.downcase == 'zh-tw' ||
270 276 current_language.to_s.downcase == 'th' )
271 277 pdf = IFPDF.new(current_language)
272 278 else
273 279 pdf = ITCPDF.new(current_language)
274 280 end
275 281 pdf.SetTitle("#{issue.project} - ##{issue.tracker} #{issue.id}")
276 282 pdf.alias_nb_pages
277 283 pdf.footer_date = format_date(Date.today)
278 284 pdf.AddPage
279 285
280 286 pdf.SetFontStyle('B',11)
281 287 pdf.RDMCell(190,10,
282 288 "#{issue.project} - #{issue.tracker} # #{issue.id}: #{issue.subject}")
283 289 pdf.Ln
284 290
285 291 y0 = pdf.GetY
286 292
287 293 pdf.SetFontStyle('B',9)
288 294 pdf.RDMCell(35,5, l(:field_status) + ":","LT")
289 295 pdf.SetFontStyle('',9)
290 296 pdf.RDMCell(60,5, issue.status.to_s,"RT")
291 297 pdf.SetFontStyle('B',9)
292 298 pdf.RDMCell(35,5, l(:field_priority) + ":","LT")
293 299 pdf.SetFontStyle('',9)
294 300 pdf.RDMCell(60,5, issue.priority.to_s,"RT")
295 301 pdf.Ln
296 302
297 303 pdf.SetFontStyle('B',9)
298 304 pdf.RDMCell(35,5, l(:field_author) + ":","L")
299 305 pdf.SetFontStyle('',9)
300 306 pdf.RDMCell(60,5, issue.author.to_s,"R")
301 307 pdf.SetFontStyle('B',9)
302 308 pdf.RDMCell(35,5, l(:field_category) + ":","L")
303 309 pdf.SetFontStyle('',9)
304 310 pdf.RDMCell(60,5, issue.category.to_s,"R")
305 311 pdf.Ln
306 312
307 313 pdf.SetFontStyle('B',9)
308 314 pdf.RDMCell(35,5, l(:field_created_on) + ":","L")
309 315 pdf.SetFontStyle('',9)
310 316 pdf.RDMCell(60,5, format_date(issue.created_on),"R")
311 317 pdf.SetFontStyle('B',9)
312 318 pdf.RDMCell(35,5, l(:field_assigned_to) + ":","L")
313 319 pdf.SetFontStyle('',9)
314 320 pdf.RDMCell(60,5, issue.assigned_to.to_s,"R")
315 321 pdf.Ln
316 322
317 323 pdf.SetFontStyle('B',9)
318 324 pdf.RDMCell(35,5, l(:field_updated_on) + ":","LB")
319 325 pdf.SetFontStyle('',9)
320 326 pdf.RDMCell(60,5, format_date(issue.updated_on),"RB")
321 327 pdf.SetFontStyle('B',9)
322 328 pdf.RDMCell(35,5, l(:field_due_date) + ":","LB")
323 329 pdf.SetFontStyle('',9)
324 330 pdf.RDMCell(60,5, format_date(issue.due_date),"RB")
325 331 pdf.Ln
326 332
327 333 for custom_value in issue.custom_field_values
328 334 pdf.SetFontStyle('B',9)
329 335 pdf.RDMCell(35,5, custom_value.custom_field.name + ":","L")
330 336 pdf.SetFontStyle('',9)
331 337 pdf.RDMMultiCell(155,5, (show_value custom_value),"R")
332 338 end
333 339
334 340 pdf.SetFontStyle('B',9)
335 341 pdf.RDMCell(35,5, l(:field_subject) + ":","LTB")
336 342 pdf.SetFontStyle('',9)
337 343 pdf.RDMCell(155,5, issue.subject,"RTB")
338 344 pdf.Ln
339 345
340 346 pdf.SetFontStyle('B',9)
341 347 pdf.RDMCell(35,5, l(:field_description) + ":")
342 348 pdf.SetFontStyle('',9)
343 349 pdf.RDMMultiCell(155,5, issue.description.to_s,"BR")
344 350
345 351 pdf.Line(pdf.GetX, y0, pdf.GetX, pdf.GetY)
346 352 pdf.Line(pdf.GetX, pdf.GetY, 170, pdf.GetY)
347 353 pdf.Ln
348 354
349 355 if issue.changesets.any? &&
350 356 User.current.allowed_to?(:view_changesets, issue.project)
351 357 pdf.SetFontStyle('B',9)
352 358 pdf.RDMCell(190,5, l(:label_associated_revisions), "B")
353 359 pdf.Ln
354 360 for changeset in issue.changesets
355 361 pdf.SetFontStyle('B',8)
356 362 pdf.RDMCell(190,5,
357 363 format_time(changeset.committed_on) + " - " + changeset.author.to_s)
358 364 pdf.Ln
359 365 unless changeset.comments.blank?
360 366 pdf.SetFontStyle('',8)
361 367 pdf.RDMMultiCell(190,5, changeset.comments.to_s)
362 368 end
363 369 pdf.Ln
364 370 end
365 371 end
366 372
367 373 pdf.SetFontStyle('B',9)
368 374 pdf.RDMCell(190,5, l(:label_history), "B")
369 375 pdf.Ln
370 376 for journal in issue.journals.find(
371 377 :all, :include => [:user, :details],
372 378 :order => "#{Journal.table_name}.created_on ASC")
373 379 pdf.SetFontStyle('B',8)
374 380 pdf.RDMCell(190,5,
375 381 format_time(journal.created_on) + " - " + journal.user.name)
376 382 pdf.Ln
377 383 pdf.SetFontStyle('I',8)
378 384 for detail in journal.details
379 385 pdf.RDMCell(190,5, "- " + show_detail(detail, true))
380 386 pdf.Ln
381 387 end
382 388 if journal.notes?
383 389 pdf.SetFontStyle('',8)
384 390 pdf.RDMMultiCell(190,5, journal.notes.to_s)
385 391 end
386 392 pdf.Ln
387 393 end
388 394
389 395 if issue.attachments.any?
390 396 pdf.SetFontStyle('B',9)
391 397 pdf.RDMCell(190,5, l(:label_attachment_plural), "B")
392 398 pdf.Ln
393 399 for attachment in issue.attachments
394 400 pdf.SetFontStyle('',8)
395 401 pdf.RDMCell(80,5, attachment.filename)
396 402 pdf.RDMCell(20,5, number_to_human_size(attachment.filesize),0,0,"R")
397 403 pdf.RDMCell(25,5, format_date(attachment.created_on),0,0,"R")
398 404 pdf.RDMCell(65,5, attachment.author.name,0,0,"R")
399 405 pdf.Ln
400 406 end
401 407 end
402 408 pdf.Output
403 409 end
404 410 end
405 411 end
406 412 end
General Comments 0
You need to be logged in to leave comments. Login now