99c662b8cf5772cad9f691d029215513d7059e73
[pspp] / tests / language / data-io / get-data-spreadsheet.at
1
2 m4_define([SPREADSHEET_TEST_PREP],[dnl
3  m4_if($1,[GNM],[dnl
4     AT_CHECK([gzip -c $top_srcdir/tests/language/data-io/Book1.gnm.unzipped > Book1.gnumeric])dnl
5     m4_define([testsheet],[Book1.gnumeric])dnl
6     AT_SKIP_IF([test n$GNM_READ_SUPPORT != nyes])dnl
7     ]) dnl
8  m4_if($1,[ODS],[dnl
9     AT_CHECK([cp $top_srcdir/tests/language/data-io/test.ods test.ods])dnl
10     m4_define([testsheet],[test.ods])dnl
11     AT_SKIP_IF([test n$ODF_READ_SUPPORT != nyes])dnl
12     ])dnl
13 ])
14
15 m4_define([CHECK_SPREADSHEET_READER],
16  [dnl
17 AT_SETUP([GET DATA /TYPE=$1 with CELLRANGE])
18 SPREADSHEET_TEST_PREP($1)
19 AT_DATA([get-data.sps], [dnl
20 GET DATA /TYPE=$1 /FILE='testsheet'  /READNAMES=off /SHEET=name 'This' /CELLRANGE=range 'g9:i13' .
21 DISPLAY VARIABLES.
22 LIST.
23 ])
24 AT_CHECK([pspp -o pspp.csv get-data.sps])
25 AT_CHECK([cat pspp.csv], [0], [dnl
26 Variable,Description,,Position
27 VAR001,Format: F8.2,,1
28 ,Measure: Scale,,
29 ,Display Alignment: Right,,
30 ,Display Width: 8,,
31 VAR002,Format: A8,,2
32 ,Measure: Nominal,,
33 ,Display Alignment: Left,,
34 ,Display Width: 8,,
35 VAR003,Format: F8.2,,3
36 ,Measure: Scale,,
37 ,Display Alignment: Right,,
38 ,Display Width: 8,,
39
40 Table: Data List
41 VAR001,VAR002,VAR003
42 .00,fred    ,20.00
43 1.00,11      ,21.00
44 2.00,twelve  ,22.00
45 3.00,13      ,23.00
46 4.00,14      ,24.00
47 ])
48 AT_CLEANUP
49
50 AT_SETUP([GET DATA /TYPE=$1 with CELLRANGE and READNAMES])
51 SPREADSHEET_TEST_PREP($1)
52 AT_DATA([get-data.sps], [dnl
53 GET DATA /TYPE=$1 /FILE='testsheet'  /READNAMES=on /SHEET=name 'This' /CELLRANGE=range 'g8:i13' .
54 DISPLAY VARIABLES.
55 LIST.
56 ])
57 AT_CHECK([pspp -o pspp.csv get-data.sps])
58 AT_CHECK([cat pspp.csv], [0], [dnl
59 Variable,Description,,Position
60 V1,Format: F8.2,,1
61 ,Measure: Scale,,
62 ,Display Alignment: Right,,
63 ,Display Width: 8,,
64 V2,Format: A8,,2
65 ,Measure: Nominal,,
66 ,Display Alignment: Left,,
67 ,Display Width: 8,,
68 VAR001,Format: F8.2,,3
69 ,Measure: Scale,,
70 ,Display Alignment: Right,,
71 ,Display Width: 8,,
72
73 Table: Data List
74 V1,V2,VAR001
75 .00,fred    ,20.00
76 1.00,11      ,21.00
77 2.00,twelve  ,22.00
78 3.00,13      ,23.00
79 4.00,14      ,24.00
80 ])
81 AT_CLEANUP
82
83 AT_SETUP([GET DATA /TYPE=$1 without CELLRANGE])
84 SPREADSHEET_TEST_PREP($1)
85 AT_DATA([get-data.sps], [dnl
86 GET DATA /TYPE=$1 /FILE='testsheet' /SHEET=index 3.
87 DISPLAY VARIABLES.
88 LIST.
89 ])
90 AT_CHECK([pspp -O format=csv get-data.sps], [0], [dnl
91 Variable,Description,,Position
92 name,Format: A8,,1
93 ,Measure: Nominal,,
94 ,Display Alignment: Left,,
95 ,Display Width: 8,,
96 id,Format: F8.2,,2
97 ,Measure: Scale,,
98 ,Display Alignment: Right,,
99 ,Display Width: 8,,
100 height,Format: F8.2,,3
101 ,Measure: Scale,,
102 ,Display Alignment: Right,,
103 ,Display Width: 8,,
104
105 warning: Cannot convert the value in the spreadsheet cell C4 to format (F8.2): Field contents are not numeric.
106
107 Table: Data List
108 name,id,height
109 fred    ,.00,23.40
110 bert    ,1.00,.56
111 charlie ,2.00,.  @&t@
112 dick    ,3.00,-34.09
113 ])
114 AT_CLEANUP
115
116 AT_SETUP([GET DATA /TYPE=$1 with missing data])
117 SPREADSHEET_TEST_PREP($1)
118 AT_DATA([get-data.sps], [dnl
119 * This sheet has no data in one of its variables
120 GET DATA /TYPE=$1 /FILE='testsheet' /READNAMES=on /SHEET=index 5.
121 DISPLAY VARIABLES.
122 LIST.
123 ])
124 AT_CHECK([pspp -o pspp.csv get-data.sps])
125 AT_CHECK([cat pspp.csv], [0], [dnl
126 Variable,Description,,Position
127 vone,Format: F8.2,,1
128 ,Measure: Scale,,
129 ,Display Alignment: Right,,
130 ,Display Width: 8,,
131 vtwo,Format: F8.2,,2
132 ,Measure: Scale,,
133 ,Display Alignment: Right,,
134 ,Display Width: 8,,
135 vthree,Format: A8,,3
136 ,Measure: Nominal,,
137 ,Display Alignment: Left,,
138 ,Display Width: 8,,
139 v4,Format: F8.2,,4
140 ,Measure: Scale,,
141 ,Display Alignment: Right,,
142 ,Display Width: 8,,
143
144 Table: Data List
145 vone,vtwo,vthree,v4
146 1.00,3.00,,5.00
147 2.00,4.00,,6.00
148 ])
149 AT_CLEANUP
150
151 dnl This syntax doesn't do anything particularly useful.
152 dnl It has been seen to cause a few crashes, so we check here that it
153 dnl doesn't do anthing bad.
154 AT_SETUP([GET DATA /TYPE=$1 with no options])
155 SPREADSHEET_TEST_PREP($1)
156 AT_DATA([get-data.sps], [dnl
157 * This sheet is empty
158 GET DATA /TYPE=$1 /FILE='testsheet'.
159 DISPLAY DICTIONARY.
160 LIST.
161 ])
162 AT_CHECK([pspp -o pspp.csv get-data.sps], [0], [ignore])
163 AT_CLEANUP
164
165
166
167 AT_SETUP([GET DATA /TYPE=$1 with empty sheet])
168 SPREADSHEET_TEST_PREP($1)
169 AT_DATA([get-data.sps], [dnl
170 * This sheet is empty
171 GET DATA /TYPE=$1 /FILE='testsheet' /SHEET=name 'Empty'.
172 ])
173 AT_CHECK([pspp -o pspp.csv get-data.sps], [0], [dnl
174 warning: Selected sheet or range of spreadsheet `testsheet' is empty.
175 ])
176 AT_CLEANUP
177
178 AT_SETUP([GET DATA /TYPE=$1 with nonexistent sheet])
179 SPREADSHEET_TEST_PREP($1)
180 AT_DATA([get-data.sps], [dnl
181 * This sheet doesnt exist.
182 GET DATA /TYPE=$1 /FILE='testsheet' /SHEET=name 'foobarxx'.
183 ])
184 AT_CHECK([pspp -o pspp.csv get-data.sps], [0], [dnl
185 warning: Selected sheet or range of spreadsheet `testsheet' is empty.
186 ])
187 AT_CLEANUP
188 ])
189
190
191 AT_BANNER([GET DATA Spreadsheet /TYPE=GNM])
192
193 CHECK_SPREADSHEET_READER([GNM])
194
195 dnl Check for a bug where gnumeric files were interpreted incorrectly
196 AT_SETUP([GET DATA /TYPE=GNM sheet index bug])
197 AT_DATA([minimal3.gnumeric],[dnl
198 <?xml version="1.0" encoding="UTF-8"?>
199 <gnm:Workbook xmlns:gnm="http://www.gnumeric.org/v10.dtd" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.gnumeric.org/v9.xsd">
200   <gnm:Version Epoch="1" Major="10" Minor="8" Full="1.10.8"/>
201   <gnm:SheetNameIndex>
202     <gnm:SheetName gnm:Cols="256" gnm:Rows="65536">Sheet1</gnm:SheetName>
203     <gnm:SheetName gnm:Cols="256" gnm:Rows="65536">Sheet2</gnm:SheetName>
204     <gnm:SheetName gnm:Cols="256" gnm:Rows="65536">Sheet3</gnm:SheetName>
205   </gnm:SheetNameIndex>
206   <gnm:Sheets>
207     <gnm:Sheet DisplayFormulas="0" HideZero="0" HideGrid="0" HideColHeader="0" HideRowHeader="0" DisplayOutlines="1" OutlineSymbolsBelow="1" OutlineSymbolsRight="1" Visibility="GNM_SHEET_VISIBILITY_VISIBLE" GridColor="0:0:0">
208       <gnm:Name>Sheet1</gnm:Name>
209       <gnm:MaxCol>2</gnm:MaxCol>
210       <gnm:MaxRow>3</gnm:MaxRow>
211       <gnm:Names>
212         <gnm:Name>
213           <gnm:name>Print_Area</gnm:name>
214           <gnm:value>#REF!</gnm:value>
215           <gnm:position>A1</gnm:position>
216         </gnm:Name>
217         <gnm:Name>
218           <gnm:name>Sheet_Title</gnm:name>
219           <gnm:value>&quot;Sheet1&quot;</gnm:value>
220           <gnm:position>A1</gnm:position>
221         </gnm:Name>
222       </gnm:Names>
223       <gnm:Cols DefaultSizePts="48">
224         <gnm:ColInfo No="0" Unit="94.5" HardSize="1"/>
225         <gnm:ColInfo No="1" Unit="48" Count="2"/>
226       </gnm:Cols>
227       <gnm:Rows DefaultSizePts="12.75">
228         <gnm:RowInfo No="0" Unit="13.5" Count="4"/>
229       </gnm:Rows>
230       <gnm:Cells>
231         <gnm:Cell Row="0" Col="0" ValueType="60">Name</gnm:Cell>
232         <gnm:Cell Row="0" Col="1" ValueType="60">x</gnm:Cell>
233         <gnm:Cell Row="0" Col="2" ValueType="60">y</gnm:Cell>
234         <gnm:Cell Row="1" Col="0" ValueType="60">Sheet One</gnm:Cell>
235         <gnm:Cell Row="1" Col="1" ValueType="40">1</gnm:Cell>
236         <gnm:Cell Row="1" Col="2" ValueType="40">2</gnm:Cell>
237         <gnm:Cell Row="2" Col="0" ValueType="60">foo</gnm:Cell>
238         <gnm:Cell Row="2" Col="1" ValueType="40">3</gnm:Cell>
239         <gnm:Cell Row="2" Col="2" ValueType="40">4</gnm:Cell>
240         <gnm:Cell Row="3" Col="0" ValueType="60">bar</gnm:Cell>
241         <gnm:Cell Row="3" Col="1" ValueType="40">5</gnm:Cell>
242         <gnm:Cell Row="3" Col="2" ValueType="40">6</gnm:Cell>
243       </gnm:Cells>
244     </gnm:Sheet>
245     <gnm:Sheet DisplayFormulas="0" HideZero="0" HideGrid="0" HideColHeader="0" HideRowHeader="0" DisplayOutlines="1" OutlineSymbolsBelow="1" OutlineSymbolsRight="1" Visibility="GNM_SHEET_VISIBILITY_VISIBLE" GridColor="0:0:0">
246       <gnm:Name>Sheet2</gnm:Name>
247       <gnm:MaxCol>2</gnm:MaxCol>
248       <gnm:MaxRow>2</gnm:MaxRow>
249       <gnm:Names>
250         <gnm:Name>
251           <gnm:name>Print_Area</gnm:name>
252           <gnm:value>#REF!</gnm:value>
253           <gnm:position>A1</gnm:position>
254         </gnm:Name>
255         <gnm:Name>
256           <gnm:name>Sheet_Title</gnm:name>
257           <gnm:value>&quot;Sheet2&quot;</gnm:value>
258           <gnm:position>A1</gnm:position>
259         </gnm:Name>
260       </gnm:Names>
261       <gnm:Cols DefaultSizePts="48">
262         <gnm:ColInfo No="0" Unit="48"/>
263         <gnm:ColInfo No="1" Unit="57.75"/>
264         <gnm:ColInfo No="2" Unit="54.75"/>
265       </gnm:Cols>
266       <gnm:Rows DefaultSizePts="12.75">
267         <gnm:RowInfo No="0" Unit="13.5" Count="3"/>
268       </gnm:Rows>
269       <gnm:Cells>
270         <gnm:Cell Row="0" Col="0" ValueType="60">Comment</gnm:Cell>
271         <gnm:Cell Row="0" Col="1" ValueType="60">DOB</gnm:Cell>
272         <gnm:Cell Row="0" Col="2" ValueType="60">wealth</gnm:Cell>
273         <gnm:Cell Row="1" Col="0" ValueType="60">Sheet Two</gnm:Cell>
274         <gnm:Cell Row="1" Col="1" ValueType="60">24/5/1966</gnm:Cell>
275         <gnm:Cell Row="1" Col="2" ValueType="40" ValueFormat="_($* 0.00_);_($* (0.00);_($* &quot;-&quot;??_);_(@_)">0.02</gnm:Cell>
276         <gnm:Cell Row="2" Col="0" ValueType="60">wee</gnm:Cell>
277         <gnm:Cell Row="2" Col="1" ValueType="40" ValueFormat="dd/mm/yyyy">37145</gnm:Cell>
278         <gnm:Cell Row="2" Col="2" ValueType="40" ValueFormat="_($* 0.00_);_($* (0.00);_($* &quot;-&quot;??_);_(@_)">3000</gnm:Cell>
279       </gnm:Cells>
280     </gnm:Sheet>
281     <gnm:Sheet DisplayFormulas="0" HideZero="0" HideGrid="0" HideColHeader="0" HideRowHeader="0" DisplayOutlines="1" OutlineSymbolsBelow="1" OutlineSymbolsRight="1" Visibility="GNM_SHEET_VISIBILITY_VISIBLE" GridColor="0:0:0">
282       <gnm:Name>Sheet3</gnm:Name>
283       <gnm:MaxCol>2</gnm:MaxCol>
284       <gnm:MaxRow>2</gnm:MaxRow>
285       <gnm:Names>
286         <gnm:Name>
287           <gnm:name>Print_Area</gnm:name>
288           <gnm:value>#REF!</gnm:value>
289           <gnm:position>A1</gnm:position>
290         </gnm:Name>
291         <gnm:Name>
292           <gnm:name>Sheet_Title</gnm:name>
293           <gnm:value>&quot;Sheet3&quot;</gnm:value>
294           <gnm:position>A1</gnm:position>
295         </gnm:Name>
296       </gnm:Names>
297       <gnm:Cols DefaultSizePts="48">
298         <gnm:ColInfo No="0" Unit="48" Count="3"/>
299       </gnm:Cols>
300       <gnm:Rows DefaultSizePts="12.75">
301         <gnm:RowInfo No="0" Unit="13.5"/>
302         <gnm:RowInfo No="1" Unit="12.75" Count="2"/>
303       </gnm:Rows>
304       <gnm:Cells>
305         <gnm:Cell Row="0" Col="0" ValueType="40">3</gnm:Cell>
306         <gnm:Cell Row="0" Col="1" ValueType="40">4</gnm:Cell>
307         <gnm:Cell Row="0" Col="2" ValueType="40">5</gnm:Cell>
308         <gnm:Cell Row="1" Col="0" ValueType="40">6</gnm:Cell>
309         <gnm:Cell Row="1" Col="1" ValueType="40">7</gnm:Cell>
310         <gnm:Cell Row="1" Col="2" ValueType="40">8</gnm:Cell>
311         <gnm:Cell Row="2" Col="0" ValueType="40">9</gnm:Cell>
312         <gnm:Cell Row="2" Col="1" ValueType="40">10</gnm:Cell>
313         <gnm:Cell Row="2" Col="2" ValueType="40">11</gnm:Cell>
314       </gnm:Cells>
315     </gnm:Sheet>
316   </gnm:Sheets>
317 </gnm:Workbook>
318 ])
319
320 AT_DATA([gnum.sps], [dnl
321 GET DATA        
322         /TYPE=GNM
323         /FILE='minimal3.gnumeric'
324         /SHEET=index 3
325         /READNAMES=off
326         .
327
328 LIST.
329 ])
330
331 AT_CHECK([pspp -O format=csv gnum.sps], [0], [dnl
332 Table: Data List
333 VAR001,VAR002,VAR003
334 3       ,4.00,5.00
335 6       ,7.00,8.00
336 9       ,10.00,11.00
337 ])
338
339
340 AT_CLEANUP
341
342
343 dnl Check for a bug where certain gnumeric files failed an assertion
344 AT_SETUP([GET DATA /TYPE=GNM assert-fail])
345 AT_DATA([read.sps],[dnl
346 GET DATA 
347         /TYPE=GNM
348         /FILE='crash.gnumeric' 
349         .
350 list.
351 ])
352
353
354 AT_DATA([crash.gnumeric],[dnl
355 <?xml version="1.0" encoding="UTF-8"?>
356 <gnm:Workbook xmlns:gnm="http://www.gnumeric.org/v10.dtd" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.gnumeric.org/v9.xsd">
357   <office:document-meta xmlns:office="urn:oasis:names:tc:opendocument:xmlns:office:1.0" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:meta="urn:oasis:names:tc:opendocument:xmlns:meta:1.0" xmlns:ooo="http://openoffice.org/2004/office" office:version="1.1">
358   </office:document-meta>
359   <gnm:SheetNameIndex>
360     <gnm:SheetName gnm:Cols="256" gnm:Rows="65536">Sheet1</gnm:SheetName>
361   </gnm:SheetNameIndex>
362   <gnm:Sheets>
363     <gnm:Sheet DisplayFormulas="0" HideZero="0" HideGrid="0" HideColHeader="0" HideRowHeader="0" DisplayOutlines="1" OutlineSymbolsBelow="1" OutlineSymbolsRight="1" Visibility="GNM_SHEET_VISIBILITY_VISIBLE" GridColor="0:0:0">
364       <gnm:Name>Sheet1</gnm:Name>
365       <gnm:MaxCol>2</gnm:MaxCol>
366       <gnm:MaxRow>4</gnm:MaxRow>
367       <gnm:Styles>
368         <gnm:StyleRegion startCol="0" startRow="0" endCol="255" endRow="65535">
369           <gnm:Style HAlign="1" VAlign="2" WrapText="0" ShrinkToFit="0" Rotation="0" Shade="0" Indent="0" Locked="1" Hidden="0" Fore="0:0:0" Back="FFFF:FFFF:FFFF" PatternColor="0:0:0" Format="General">
370           </gnm:Style>
371         </gnm:StyleRegion>
372       </gnm:Styles>
373       <gnm:Cells>
374         <gnm:Cell Row="1" Col="1" ValueType="60">one</gnm:Cell>
375         <gnm:Cell Row="1" Col="2" ValueType="60">two</gnm:Cell>
376         <gnm:Cell Row="2" Col="1" ValueType="40">1</gnm:Cell>
377         <gnm:Cell Row="2" Col="2" ValueType="40">2</gnm:Cell>
378         <gnm:Cell Row="3" Col="1" ValueType="40">1</gnm:Cell>
379         <gnm:Cell Row="3" Col="2" ValueType="40">2</gnm:Cell>
380         <gnm:Cell Row="4" Col="1" ValueType="40">1</gnm:Cell>
381         <gnm:Cell Row="4" Col="2" ValueType="40">2</gnm:Cell>
382       </gnm:Cells>
383     </gnm:Sheet>
384   </gnm:Sheets>
385 </gnm:Workbook>
386 ])
387
388 AT_CHECK([pspp -O format=csv read.sps], [0], [ignore])
389
390
391 AT_CLEANUP
392
393
394
395 AT_BANNER([GET DATA Spreadsheet /TYPE=ODS])
396
397 CHECK_SPREADSHEET_READER([ODS])
398