5 class WrongColor < Exception
10 "Wrong color at #{@pixel}"
13 class AreaError < Exception
14 def initialize(area,problem)
15 @area,@problem = area,problem
18 "Area at #{@area} #{@problem}"
21 class PixelError < Exception
22 def initialize(p1, relation,p2)
23 @p1,@p2,@relation = p1,p2,relation
26 "Pixel #{@p1} #{@relation} #{@p2}"
29 class ConversionFailed < Exception
30 def initialize(output,file)
33 @exists = File.exists?(file)
36 puts "-"*26+" Conversion failed "+"-"*27
37 (puts @output) if @output
38 puts "file #{@file} doesn't exist" if not @exists
44 def initialize(x1,y1,x2,y2,file)
45 @x1,@y1,@x2,@y2,@file = x1,y1,x2,y2,file
47 def should_be_plain_colored
48 @rgb = @file.get_area(@x1,@y1,@x2,@y2) unless @rgb
49 @rgb.minmax == [@rgb[0],@rgb[0]] or raise AreaError.new(self,"is not plain colored")
51 def should_not_be_plain_colored
52 @rgb = @file.get_area(@x1,@y1,@x2,@y2) unless @rgb
53 @rgb.minmax != [@rgb[0],@rgb[0]] or raise AreaError.new(self,"is plain colored")
55 def should_contain_text(text)
56 @file.get_text(@x1,@y1,@x2,@y2) == text or raise AreaError.new(self, "doesn't contain text #{text}")
59 "(#{@x1},#{@y1},#{@x2},#{@y2})"
64 # ImageMagick rgb triples are 16 bit
65 (rgb.reverse+[0]).map {|c| c>>8}.pack("CCCC").unpack("i")[0]
70 def initialize(x,y,rgb)
73 def should_be_of_color(color2)
74 color1 = rgb_to_int(@rgb)
75 color1 == color2 or raise WrongColor.new(self)
77 def should_be_brighter_than(pixel)
78 gray1 = @rgb.inject(0) {|sum,e| sum+e}
79 gray2 = pixel.rgb.inject(0) {|sum,e| sum+e}
80 gray1 > gray2 or raise PixelError.new(self,"is not brighter than",pixel)
82 def should_be_darker_than(pixel)
83 gray1 = @rgb.inject(0) {|sum,e| sum+e}
84 gray2 = pixel.rgb.inject(0) {|sum,e| sum+e}
85 gray1 < gray2 or raise PixelError.new(self,"is not less bright than",pixel)
87 def should_be_the_same_as(pixel)
88 @rgb == pixel.rgb or raise PixelError.new(self,"is not the same as",pixel)
97 $tempfiles.each do |file|
103 def initialize(filename, page)
109 @swfname = @filename.gsub(/.pdf$/i,"")+".swf"
110 $tempfiles += [@swfname]
111 `pdfinfo #{@filename}` =~ /Page size:\s*([0-9]+) x ([0-9]+) pts/
113 dpi = (72.0 * 612 / width.to_i).to_i
114 output = `pdf2swf --flatten -s zoom=#{dpi} -p #{@page} #{@filename} -o #{@swfname} 2>&1`
115 #output = `pdf2swf -s zoom=#{dpi} --flatten -p #{@page} #{@filename} -o #{@swfname} 2>&1`
116 raise ConversionFailed.new(output,@swfname) unless File.exists?(@swfname)
121 @pngname = @filename.gsub(/.pdf$/i,"")+".png"
123 output = `swfrender --legacy #{@swfname} -o #{@pngname} 2>&1`
124 raise ConversionFailed.new(output,@pngname) unless File.exists?(@pngname)
125 @img = Magick::Image.read(@pngname).first
130 def get_text(x1,y1,x2,y2)
132 #puts "swfstrings -x #{x1} -y #{y1} -W #{x2-x1} -H #{y2-y1} #{@swfname}"
133 #puts `swfstrings -x #{x1} -y #{y1} -W #{x2-x1} -H #{y2-y1} #{@swfname}`
134 `swfstrings -x #{x1} -y #{y1} -W #{x2-x1} -H #{y2-y1} #{@swfname}`.chomp
136 def get_area(x1,y1,x2,y2)
138 data = @img.export_pixels(x1, y1, x2-x1, y2-y1, "RGB")
139 Array.new(data.size/3) do |i| data.slice(i*3,3) end
141 def area_at(x1,y1,x2,y2)
142 return Area.new(x1,y1,x2,y2,self)
154 data = @img.export_pixels(x, y, 1, 1, "RGB")
155 return Pixel.new(x,y,data)
161 module ExampleMethods
162 def area_at(x1,y1,x2,y2)
163 @file.area_at(x1,y1,x2,y2)
174 def initialize(proxy,&impl)
176 # overriding the initialize() function saves us from having to
177 # set up the document in the test. The bad news, however, is that
178 # we have to be very careful not to raise exceptions here-
179 # rspec would miss those.
182 @_implementation = impl
184 @file = DocFile.new(proxy.description, (proxy.options[:page] or 1))
187 module ExampleGroupMethods
188 alias :convert_file :example