1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
|
# encoding: UTF-8
require 'tc_helper.rb'
class TestPackage < Test::Unit::TestCase
def setup
@package = Axlsx::Package.new
ws = @package.workbook.add_worksheet
ws.add_row ['Can', 'we', 'build it?']
ws.add_row ['Yes!', 'We', 'can!']
ws.outline_level_rows 0, 1
ws.outline_level_columns 0, 1
ws.add_hyperlink :ref => ws.rows.first.cells.last, :location => 'https://github.com/randym'
ws.workbook.add_defined_name("#{ws.name}!A1:C2", :name => '_xlnm.Print_Titles', :hidden => true)
ws.protect_range('A1:C1')
ws.protect_range(ws.rows.last.cells)
ws.add_comment :author => 'alice', :text => 'Hi Bob', :ref => 'A12'
ws.add_comment :author => 'bob', :text => 'Hi Alice', :ref => 'F19'
ws.sheet_view do |vs|
vs.pane do |p|
p.active_pane = :top_right
p.state = :split
p.x_split = 11080
p.y_split = 5000
p.top_left_cell = 'C44'
end
vs.add_selection(:top_left, { :active_cell => 'A2', :sqref => 'A2' })
vs.add_selection(:top_right, { :active_cell => 'I10', :sqref => 'I10' })
vs.add_selection(:bottom_left, { :active_cell => 'E55', :sqref => 'E55' })
vs.add_selection(:bottom_right, { :active_cell => 'I57', :sqref => 'I57' })
end
ws.add_chart(Axlsx::Pie3DChart, :title => "これは?", :start_at => [0,3]) do |chart|
chart.add_series :data=>[1,2,3], :labels=>["a", "b", "c"]
chart.d_lbls.show_val = true
chart.d_lbls.d_lbl_pos = :outEnd
chart.d_lbls.show_percent = true
end
ws.add_chart(Axlsx::Line3DChart, :title => "axis labels") do |chart|
chart.valAxis.title = 'bob'
chart.d_lbls.show_val = true
end
ws.add_chart(Axlsx::Bar3DChart, :title => 'bar chart') do |chart|
chart.add_series :data => [1,4,5], :labels => %w(A B C)
chart.d_lbls.show_percent = true
end
ws.add_chart(Axlsx::ScatterChart, :title => 'scat man') do |chart|
chart.add_series :xData => [1,2,3,4], :yData => [4,3,2,1]
chart.d_lbls.show_val = true
end
@fname = 'axlsx_test_serialization.xlsx'
img = File.expand_path('../../examples/image1.jpeg', __FILE__)
ws.add_image(:image_src => img, :noSelect => true, :noMove => true, :hyperlink=>"http://axlsx.blogspot.com") do |image|
image.width=720
image.height=666
image.hyperlink.tooltip = "Labeled Link"
image.start_at 5, 5
end
ws.add_image :image_src => File.expand_path('../../examples/image1.gif', __FILE__) do |image|
image.start_at 0, 20
image.width=360
image.height=333
end
ws.add_image :image_src => File.expand_path('../../examples/image1.png', __FILE__) do |image|
image.start_at 9, 20
image.width = 180
image.height = 167
end
ws.add_table 'A1:C1'
ws.add_pivot_table 'G5:G6', 'A1:B3'
end
def test_use_autowidth
@package.use_autowidth = false
assert(@package.workbook.use_autowidth == false)
end
def test_core_accessor
assert_equal(@package.core, @package.instance_values["core"])
assert_raise(NoMethodError) {@package.core = nil }
end
def test_app_accessor
assert_equal(@package.app, @package.instance_values["app"])
assert_raise(NoMethodError) {@package.app = nil }
end
def test_use_shared_strings
assert_equal(@package.use_shared_strings, nil)
assert_raise(ArgumentError) {@package.use_shared_strings 9}
assert_nothing_raised {@package.use_shared_strings = true}
assert_equal(@package.use_shared_strings, @package.workbook.use_shared_strings)
end
def test_default_objects_are_created
assert(@package.instance_values["app"].is_a?(Axlsx::App), 'App object not created')
assert(@package.instance_values["core"].is_a?(Axlsx::Core), 'Core object not created')
assert(@package.workbook.is_a?(Axlsx::Workbook), 'Workbook object not created')
assert(Axlsx::Package.new.workbook.worksheets.size == 0, 'Workbook should not have sheets by default')
end
def test_created_at_is_propagated_to_core
time = Time.utc(2013, 1, 1, 12, 0)
p = Axlsx::Package.new :created_at => time
assert_equal(time, p.core.created)
end
def test_serialization
assert_nothing_raised do
begin
@package.serialize(@fname)
zf = Zip::ZipFile.open(@fname)
@package.send(:parts).each{ |part| zf.get_entry(part[:entry]) }
File.delete(@fname)
rescue Errno::EACCES
puts "WARNING:: test_serialization requires write access."
end
end
end
# See comment for Package#zip_entry_for_part
def test_serialization_creates_identical_files_at_any_time_if_created_at_is_set
@package.core.created = Time.now
zip_content_now = @package.to_stream.string
Timecop.travel(3600) do
zip_content_then = @package.to_stream.string
assert zip_content_then == zip_content_now, "zip files are not identical"
end
end
def test_validation
assert_equal(@package.validate.size, 0, @package.validate)
Axlsx::Workbook.send(:class_variable_set, :@@date1904, 9900)
assert(@package.validate.size > 0)
end
def test_parts
p = @package.send(:parts)
#all parts have an entry
assert_equal(p.select{ |part| part[:entry] =~ /_rels\/\.rels/ }.size, 1, "rels missing")
assert_equal(p.select{ |part| part[:entry] =~ /docProps\/core\.xml/ }.size, 1, "core missing")
assert_equal(p.select{ |part| part[:entry] =~ /docProps\/app\.xml/ }.size, 1, "app missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/_rels\/workbook\.xml\.rels/ }.size, 1, "workbook rels missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/workbook\.xml/ }.size, 1, "workbook missing")
assert_equal(p.select{ |part| part[:entry] =~ /\[Content_Types\]\.xml/ }.size, 1, "content types missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/styles\.xml/ }.size, 1, "styles missin")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/drawings\/_rels\/drawing\d\.xml\.rels/ }.size, @package.workbook.drawings.size, "one or more drawing rels missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/drawings\/drawing\d\.xml/ }.size, @package.workbook.drawings.size, "one or more drawings missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/charts\/chart\d\.xml/ }.size, @package.workbook.charts.size, "one or more charts missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/worksheets\/sheet\d\.xml/ }.size, @package.workbook.worksheets.size, "one or more sheet missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/worksheets\/_rels\/sheet\d\.xml\.rels/ }.size, @package.workbook.worksheets.size, "one or more sheet rels missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/comments\d\.xml/ }.size, @package.workbook.worksheets.size, "one or more sheet rels missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/pivotTables\/pivotTable\d\.xml/ }.size, @package.workbook.worksheets.first.pivot_tables.size, "one or more pivot tables missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/pivotTables\/_rels\/pivotTable\d\.xml.rels/ }.size, @package.workbook.worksheets.first.pivot_tables.size, "one or more pivot tables rels missing")
assert_equal(p.select{ |part| part[:entry] =~ /xl\/pivotCache\/pivotCacheDefinition\d\.xml/ }.size, @package.workbook.worksheets.first.pivot_tables.size, "one or more pivot tables missing")
#no mystery parts
assert_equal(24, p.size)
end
def test_shared_strings_requires_part
@package.use_shared_strings = true
p = @package.send(:parts)
assert_equal(p.select{ |part| part[:entry] =~/xl\/sharedStrings.xml/}.size, 1, "shared strings table missing")
end
def test_workbook_is_a_workbook
assert @package.workbook.is_a? Axlsx::Workbook
end
def test_base_content_types
ct = @package.send(:base_content_types)
assert(ct.select { |c| c.ContentType == Axlsx::RELS_CT }.size == 1, "rels content type missing")
assert(ct.select { |c| c.ContentType == Axlsx::XML_CT }.size == 1, "xml content type missing")
assert(ct.select { |c| c.ContentType == Axlsx::APP_CT }.size == 1, "app content type missing")
assert(ct.select { |c| c.ContentType == Axlsx::CORE_CT }.size == 1, "core content type missing")
assert(ct.select { |c| c.ContentType == Axlsx::STYLES_CT }.size == 1, "styles content type missing")
assert(ct.select { |c| c.ContentType == Axlsx::WORKBOOK_CT }.size == 1, "workbook content type missing")
assert(ct.size == 6)
end
def test_content_type_added_with_shared_strings
@package.use_shared_strings = true
ct = @package.send(:content_types)
assert(ct.select { |type| type.ContentType == Axlsx::SHARED_STRINGS_CT }.size == 1)
end
def test_name_to_indices
assert(Axlsx::name_to_indices('A1') == [0,0])
assert(Axlsx::name_to_indices('A100') == [0,99], 'needs to axcept rows that contain 0')
end
def test_to_stream
stream = @package.to_stream
assert(stream.is_a?(StringIO))
# this is just a roundabout guess for a package as it is build now
# in testing.
assert(stream.size > 80000)
end
def test_encrypt
# this is no where near close to ready yet
assert(@package.encrypt('your_mom.xlsxl', 'has a password') == false)
end
end
|