[rubygems/rubygems] Use a constant empty tar header to avoid extra allocations
[ruby.git] / test / psych / helper.rb
blob4e82887c6d1c2c70c3dcdcab93d4ac9d2f844c09
1 # frozen_string_literal: true
2 require 'test/unit'
3 require 'stringio'
4 require 'tempfile'
5 require 'date'
7 require 'psych'
9 module Psych
10   class TestCase < Test::Unit::TestCase
11     def self.suppress_warning
12       verbose, $VERBOSE = $VERBOSE, nil
13       yield
14     ensure
15       $VERBOSE = verbose
16     end
18     def with_default_external(enc)
19       verbose, $VERBOSE = $VERBOSE, nil
20       origenc, Encoding.default_external = Encoding.default_external, enc
21       $VERBOSE = verbose
22       yield
23     ensure
24       verbose, $VERBOSE = $VERBOSE, nil
25       Encoding.default_external = origenc
26       $VERBOSE = verbose
27     end
29     def with_default_internal(enc)
30       verbose, $VERBOSE = $VERBOSE, nil
31       origenc, Encoding.default_internal = Encoding.default_internal, enc
32       $VERBOSE = verbose
33       yield
34     ensure
35       verbose, $VERBOSE = $VERBOSE, nil
36       Encoding.default_internal = origenc
37       $VERBOSE = verbose
38     end
40     #
41     # Convert between Psych and the object to verify correct parsing and
42     # emitting
43     #
44     def assert_to_yaml( obj, yaml, loader = :load )
45       assert_equal( obj, Psych.send(loader, yaml) )
46       assert_equal( obj, Psych::parse( yaml ).transform )
47       assert_equal( obj, Psych.send(loader, obj.to_yaml) )
48       assert_equal( obj, Psych::parse( obj.to_yaml ).transform )
49       assert_equal( obj, Psych.send(loader,
50         obj.to_yaml(
51           :UseVersion => true, :UseHeader => true, :SortKeys => true
52         )
53       ))
54     rescue Psych::DisallowedClass, Psych::BadAlias, Psych::AliasesNotEnabled
55       assert_to_yaml obj, yaml, :unsafe_load
56     end
58     #
59     # Test parser only
60     #
61     def assert_parse_only( obj, yaml )
62       begin
63         assert_equal obj, Psych::load( yaml )
64       rescue Psych::DisallowedClass, Psych::BadAlias, Psych::AliasesNotEnabled
65         assert_equal obj, Psych::unsafe_load( yaml )
66       end
67       assert_equal obj, Psych::parse( yaml ).transform
68     end
70     def assert_cycle( obj )
71       v = Visitors::YAMLTree.create
72       v << obj
73       if obj.nil?
74         assert_nil Psych.load(v.tree.yaml)
75         assert_nil Psych::load(Psych.dump(obj))
76         assert_nil Psych::load(obj.to_yaml)
77       else
78         begin
79           assert_equal(obj, Psych.load(v.tree.yaml))
80           assert_equal(obj, Psych::load(Psych.dump(obj)))
81           assert_equal(obj, Psych::load(obj.to_yaml))
82         rescue Psych::DisallowedClass, Psych::BadAlias, Psych::AliasesNotEnabled
83           assert_equal(obj, Psych.unsafe_load(v.tree.yaml))
84           assert_equal(obj, Psych::unsafe_load(Psych.dump(obj)))
85           assert_equal(obj, Psych::unsafe_load(obj.to_yaml))
86         end
87       end
88     end
90     #
91     # Make a time with the time zone
92     #
93     def mktime( year, mon, day, hour, min, sec, usec, zone = "Z" )
94       usec = Rational(usec.to_s) * 1000000
95       val = Time::utc( year.to_i, mon.to_i, day.to_i, hour.to_i, min.to_i, sec.to_i, usec )
96       if zone != "Z"
97         hour = zone[0,3].to_i * 3600
98         min = zone[3,2].to_i * 60
99         ofs = (hour + min)
100         val = Time.at( val.tv_sec - ofs, val.tv_nsec / 1000.0 )
101       end
102       return val
103     end
104   end
107 # backport so that tests will run on 2.0.0
108 unless Tempfile.respond_to? :create
109   def Tempfile.create(basename, *rest)
110     tmpfile = nil
111     Dir::Tmpname.create(basename, *rest) do |tmpname, n, opts|
112       mode = File::RDWR|File::CREAT|File::EXCL
113       perm = 0600
114       if opts
115         mode |= opts.delete(:mode) || 0
116         opts[:perm] = perm
117         perm = nil
118       else
119         opts = perm
120       end
121       tmpfile = File.open(tmpname, mode, opts)
122     end
123     if block_given?
124       begin
125         yield tmpfile
126       ensure
127         tmpfile.close if !tmpfile.closed?
128         File.unlink tmpfile
129       end
130     else
131       tmpfile
132     end
133   end