only check for lib directory for architectures which have multiple ABIs (Solaris...
[wxWidgets.git] / tests / fileconf / fileconftest.cpp
CommitLineData
17c24d37
VZ
1///////////////////////////////////////////////////////////////////////////////
2// Name: tests/fileconf/fileconf.cpp
3// Purpose: wxFileConf unit test
4// Author: Vadim Zeitlin
5// Created: 2004-09-19
6// RCS-ID: $Id$
7// Copyright: (c) 2004 Vadim Zeitlin
8///////////////////////////////////////////////////////////////////////////////
9
10// ----------------------------------------------------------------------------
11// headers
12// ----------------------------------------------------------------------------
13
8899b155 14#include "testprec.h"
17c24d37
VZ
15
16#ifdef __BORLANDC__
17 #pragma hdrstop
18#endif
19
20#if wxUSE_FILECONFIG
21
22#ifndef WX_PRECOMP
23#endif // WX_PRECOMP
24
25#include "wx/fileconf.h"
26#include "wx/sstream.h"
ca7766b4 27#include "wx/log.h"
17c24d37
VZ
28
29static const wxChar *testconfig =
30_T("[root]\n")
31_T("entry=value\n")
32_T("[root/group1]\n")
33_T("[root/group1/subgroup]\n")
34_T("subentry=subvalue\n")
9db6158a 35_T("subentry2=subvalue2\n")
17c24d37
VZ
36_T("[root/group2]\n")
37;
38
39// ----------------------------------------------------------------------------
40// test class
41// ----------------------------------------------------------------------------
42
43class FileConfigTestCase : public CppUnit::TestCase
44{
45public:
8899b155 46 FileConfigTestCase() { }
17c24d37
VZ
47
48private:
49 CPPUNIT_TEST_SUITE( FileConfigTestCase );
9db6158a 50 CPPUNIT_TEST( Path );
bd2fe27e 51 CPPUNIT_TEST( AddEntries );
9db6158a
VZ
52 CPPUNIT_TEST( GetEntries );
53 CPPUNIT_TEST( GetGroups );
54 CPPUNIT_TEST( HasEntry );
17c24d37 55 CPPUNIT_TEST( HasGroup );
94139118
VZ
56 CPPUNIT_TEST( Save );
57 CPPUNIT_TEST( DeleteEntry );
58 CPPUNIT_TEST( DeleteGroup );
59 CPPUNIT_TEST( DeleteAll );
60 CPPUNIT_TEST( RenameEntry );
61 CPPUNIT_TEST( RenameGroup );
c406cd3d
VZ
62 CPPUNIT_TEST( CreateEntriesAndSubgroup );
63 CPPUNIT_TEST( CreateSubgroupAndEntries );
cbc9c06f 64 CPPUNIT_TEST( DeleteLastGroup );
17c24d37
VZ
65 CPPUNIT_TEST_SUITE_END();
66
9db6158a 67 void Path();
bd2fe27e 68 void AddEntries();
9db6158a
VZ
69 void GetEntries();
70 void GetGroups();
71 void HasEntry();
17c24d37 72 void HasGroup();
94139118
VZ
73 void Save();
74 void DeleteEntry();
75 void DeleteGroup();
76 void DeleteAll();
77 void RenameEntry();
78 void RenameGroup();
c406cd3d
VZ
79 void CreateEntriesAndSubgroup();
80 void CreateSubgroupAndEntries();
cbc9c06f 81 void DeleteLastGroup();
17c24d37 82
9db6158a
VZ
83 static wxString ChangePath(wxFileConfig& fc, const wxChar *path)
84 {
85 fc.SetPath(path);
86
87 return fc.GetPath();
88 }
89
94139118
VZ
90 static wxString Dump(wxFileConfig& fc)
91 {
8899b155
RN
92 wxStringOutputStream sos;
93 fc.Save(sos);
94 return wxTextFile::Translate(sos.GetString(), wxTextFileType_Unix);
94139118
VZ
95 }
96
9db6158a
VZ
97 void CheckGroupEntries(const wxFileConfig& fc,
98 const wxChar *path,
99 size_t nEntries,
100 ...);
101 void CheckGroupSubgroups(const wxFileConfig& fc,
102 const wxChar *path,
103 size_t nGroups,
104 ...);
105
17c24d37
VZ
106 DECLARE_NO_COPY_CLASS(FileConfigTestCase)
107};
108
109// register in the unnamed registry so that these tests are run by default
110CPPUNIT_TEST_SUITE_REGISTRATION( FileConfigTestCase );
111
112// also include in it's own registry so that these tests can be run alone
113CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( FileConfigTestCase, "FileConfigTestCase" );
114
9db6158a
VZ
115void FileConfigTestCase::Path()
116{
117 wxStringInputStream sis(testconfig);
118 wxFileConfig fc(sis);
119
120 CPPUNIT_ASSERT( ChangePath(fc, _T("")) == _T("") );
121 CPPUNIT_ASSERT( ChangePath(fc, _T("/")) == _T("") );
122 CPPUNIT_ASSERT( ChangePath(fc, _T("root")) == _T("/root") );
123 CPPUNIT_ASSERT( ChangePath(fc, _T("/root")) == _T("/root") );
124 CPPUNIT_ASSERT( ChangePath(fc, _T("/root/group1/subgroup")) == _T("/root/group1/subgroup") );
125 CPPUNIT_ASSERT( ChangePath(fc, _T("/root/group2")) == _T("/root/group2") );
126}
127
bd2fe27e
VZ
128void FileConfigTestCase::AddEntries()
129{
130 wxFileConfig fc;
131
132 CPPUNIT_ASSERT( Dump(fc) == _T("") );
133
134 fc.Write(_T("/Foo"), _T("foo"));
135 CPPUNIT_ASSERT( Dump(fc) == _T("Foo=foo\n") );
136
137 fc.Write(_T("/Bar/Baz"), _T("baz"));
138 CPPUNIT_ASSERT( Dump(fc) == _T("Foo=foo\n[Bar]\nBaz=baz\n") );
139
140 fc.DeleteAll();
141 CPPUNIT_ASSERT( Dump(fc) == _T("") );
142
143 fc.Write(_T("/Bar/Baz"), _T("baz"));
144 CPPUNIT_ASSERT( Dump(fc) == _T("[Bar]\nBaz=baz\n") );
145
146 fc.Write(_T("/Foo"), _T("foo"));
147 CPPUNIT_ASSERT( Dump(fc) == _T("Foo=foo\n[Bar]\nBaz=baz\n") );
148}
149
9db6158a
VZ
150void
151FileConfigTestCase::CheckGroupEntries(const wxFileConfig& fc,
152 const wxChar *path,
153 size_t nEntries,
154 ...)
155{
156 wxConfigPathChanger change(&fc, wxString(path) + _T("/"));
157
158 CPPUNIT_ASSERT( fc.GetNumberOfEntries() == nEntries );
159
160 va_list ap;
161 va_start(ap, nEntries);
162
163 long cookie;
164 wxString name;
165 for ( bool cont = fc.GetFirstEntry(name, cookie);
166 cont;
167 cont = fc.GetNextEntry(name, cookie), nEntries-- )
168 {
169 CPPUNIT_ASSERT( name == va_arg(ap, wxChar *) );
170 }
171
172 CPPUNIT_ASSERT( nEntries == 0 );
173
174 va_end(ap);
175}
176
177void
178FileConfigTestCase::CheckGroupSubgroups(const wxFileConfig& fc,
179 const wxChar *path,
180 size_t nGroups,
181 ...)
182{
183 wxConfigPathChanger change(&fc, wxString(path) + _T("/"));
184
185 CPPUNIT_ASSERT( fc.GetNumberOfGroups() == nGroups );
186
187 va_list ap;
188 va_start(ap, nGroups);
189
190 long cookie;
191 wxString name;
192 for ( bool cont = fc.GetFirstGroup(name, cookie);
193 cont;
194 cont = fc.GetNextGroup(name, cookie), nGroups-- )
195 {
196 CPPUNIT_ASSERT( name == va_arg(ap, wxChar *) );
197 }
198
199 CPPUNIT_ASSERT( nGroups == 0 );
200
201 va_end(ap);
202}
203
204void FileConfigTestCase::GetEntries()
205{
206 wxStringInputStream sis(testconfig);
207 wxFileConfig fc(sis);
208
209 CheckGroupEntries(fc, _T(""), 0);
210 CheckGroupEntries(fc, _T("/root"), 1, _T("entry"));
211 CheckGroupEntries(fc, _T("/root/group1"), 0);
212 CheckGroupEntries(fc, _T("/root/group1/subgroup"),
213 2, _T("subentry"), _T("subentry2"));
214}
215
216void FileConfigTestCase::GetGroups()
217{
218 wxStringInputStream sis(testconfig);
219 wxFileConfig fc(sis);
220
221 CheckGroupSubgroups(fc, _T(""), 1, _T("root"));
222 CheckGroupSubgroups(fc, _T("/root"), 2, _T("group1"), _T("group2"));
223 CheckGroupSubgroups(fc, _T("/root/group1"), 1, _T("subgroup"));
224 CheckGroupSubgroups(fc, _T("/root/group2"), 0);
225}
226
227void FileConfigTestCase::HasEntry()
228{
229 wxStringInputStream sis(testconfig);
230 wxFileConfig fc(sis);
231
232 CPPUNIT_ASSERT( !fc.HasEntry(_T("root")) );
233 CPPUNIT_ASSERT( fc.HasEntry(_T("root/entry")) );
234 CPPUNIT_ASSERT( fc.HasEntry(_T("/root/entry")) );
235 CPPUNIT_ASSERT( fc.HasEntry(_T("root/group1/subgroup/subentry")) );
236 CPPUNIT_ASSERT( !fc.HasEntry(_T("")) );
237 CPPUNIT_ASSERT( !fc.HasEntry(_T("root/group1")) );
238 CPPUNIT_ASSERT( !fc.HasEntry(_T("subgroup/subentry")) );
239}
240
17c24d37
VZ
241void FileConfigTestCase::HasGroup()
242{
243 wxStringInputStream sis(testconfig);
244 wxFileConfig fc(sis);
245
246 CPPUNIT_ASSERT( fc.HasGroup(_T("root")) );
247 CPPUNIT_ASSERT( fc.HasGroup(_T("root/group1")) );
248 CPPUNIT_ASSERT( fc.HasGroup(_T("root/group1/subgroup")) );
249 CPPUNIT_ASSERT( fc.HasGroup(_T("root/group2")) );
17c24d37
VZ
250 CPPUNIT_ASSERT( !fc.HasGroup(_T("")) );
251 CPPUNIT_ASSERT( !fc.HasGroup(_T("root/group")) );
252 CPPUNIT_ASSERT( !fc.HasGroup(_T("root//subgroup")) );
993896f1
VZ
253 CPPUNIT_ASSERT( !fc.HasGroup(_T("foot/subgroup")) );
254 CPPUNIT_ASSERT( !fc.HasGroup(_T("foot")) );
17c24d37
VZ
255}
256
94139118
VZ
257void FileConfigTestCase::Save()
258{
259 wxStringInputStream sis(testconfig);
260 wxFileConfig fc(sis);
261 CPPUNIT_ASSERT( Dump(fc) == testconfig );
262}
263
264void FileConfigTestCase::DeleteEntry()
265{
266 wxStringInputStream sis(testconfig);
267 wxFileConfig fc(sis);
268
269 CPPUNIT_ASSERT( !fc.DeleteEntry(_T("foo")) );
270
271 CPPUNIT_ASSERT( fc.DeleteEntry(_T("root/group1/subgroup/subentry")) );
272 CPPUNIT_ASSERT( Dump(fc) == _T("[root]\n")
273 _T("entry=value\n")
274 _T("[root/group1]\n")
275 _T("[root/group1/subgroup]\n")
276 _T("subentry2=subvalue2\n")
277 _T("[root/group2]\n") );
278
279 // group should be deleted now as well as it became empty
280 wxConfigPathChanger change(&fc, _T("root/group1/subgroup/subentry2"));
281 CPPUNIT_ASSERT( fc.DeleteEntry(_T("subentry2")) );
282 CPPUNIT_ASSERT( Dump(fc) == _T("[root]\n")
283 _T("entry=value\n")
284 _T("[root/group1]\n")
285 _T("[root/group2]\n") );
286}
287
288void FileConfigTestCase::DeleteGroup()
289{
290 wxStringInputStream sis(testconfig);
291 wxFileConfig fc(sis);
292
293 CPPUNIT_ASSERT( !fc.DeleteGroup(_T("foo")) );
294
295 CPPUNIT_ASSERT( fc.DeleteGroup(_T("root/group1")) );
296 CPPUNIT_ASSERT( Dump(fc) == _T("[root]\n")
297 _T("entry=value\n")
298 _T("[root/group2]\n") );
299
300 CPPUNIT_ASSERT( fc.DeleteGroup(_T("root/group2")) );
301 CPPUNIT_ASSERT( Dump(fc) == _T("[root]\n")
302 _T("entry=value\n") );
303
304 CPPUNIT_ASSERT( fc.DeleteGroup(_T("root")) );
305 CPPUNIT_ASSERT( Dump(fc).empty() );
306}
307
308void FileConfigTestCase::DeleteAll()
309{
310 wxStringInputStream sis(testconfig);
311 wxFileConfig fc(sis);
312
313 CPPUNIT_ASSERT( fc.DeleteAll() );
314 CPPUNIT_ASSERT( Dump(fc).empty() );
315}
316
317void FileConfigTestCase::RenameEntry()
318{
319 wxStringInputStream sis(testconfig);
320 wxFileConfig fc(sis);
321
322 fc.SetPath(_T("root"));
323 CPPUNIT_ASSERT( fc.RenameEntry(_T("entry"), _T("newname")) );
324 CPPUNIT_ASSERT( Dump(fc) == _T("[root]\n")
325 _T("newname=value\n")
326 _T("[root/group1]\n")
327 _T("[root/group1/subgroup]\n")
328 _T("subentry=subvalue\n")
329 _T("subentry2=subvalue2\n")
330 _T("[root/group2]\n") );
331
332 fc.SetPath(_T("group1/subgroup"));
333 CPPUNIT_ASSERT( !fc.RenameEntry(_T("entry"), _T("newname")) );
334 CPPUNIT_ASSERT( !fc.RenameEntry(_T("subentry"), _T("subentry2")) );
335
336 CPPUNIT_ASSERT( fc.RenameEntry(_T("subentry"), _T("subentry1")) );
337 CPPUNIT_ASSERT( Dump(fc) == _T("[root]\n")
338 _T("newname=value\n")
339 _T("[root/group1]\n")
340 _T("[root/group1/subgroup]\n")
341 _T("subentry2=subvalue2\n")
342 _T("subentry1=subvalue\n")
343 _T("[root/group2]\n") );
344}
345
346void FileConfigTestCase::RenameGroup()
347{
348 wxStringInputStream sis(testconfig);
349 wxFileConfig fc(sis);
350
351 CPPUNIT_ASSERT( fc.RenameGroup(_T("root"), _T("foot")) );
352 CPPUNIT_ASSERT( Dump(fc) == _T("[foot]\n")
353 _T("entry=value\n")
354 _T("[foot/group1]\n")
355 _T("[foot/group1/subgroup]\n")
356 _T("subentry=subvalue\n")
357 _T("subentry2=subvalue2\n")
358 _T("[foot/group2]\n") );
359}
360
c406cd3d
VZ
361void FileConfigTestCase::CreateSubgroupAndEntries()
362{
363 wxFileConfig fc;
364 fc.Write(_T("sub/sub_first"), _T("sub_one"));
365 fc.Write(_T("first"), _T("one"));
366
367 CPPUNIT_ASSERT( Dump(fc) == _T("first=one\n")
368 _T("[sub]\n")
369 _T("sub_first=sub_one\n"));
370}
371
372void FileConfigTestCase::CreateEntriesAndSubgroup()
373{
374 wxFileConfig fc;
375 fc.Write(_T("first"), _T("one"));
376 fc.Write(_T("second"), _T("two"));
377 fc.Write(_T("sub/sub_first"), _T("sub_one"));
378
379 CPPUNIT_ASSERT( Dump(fc) == _T("first=one\n")
380 _T("second=two\n")
381 _T("[sub]\n")
382 _T("sub_first=sub_one\n"));
383}
cbc9c06f
DS
384
385static void EmptyConfigAndWriteKey()
386{
387 wxFileConfig fc(_T("deleteconftest"));
388
389 const wxString groupPath = _T("/root");
390
c406cd3d 391 if ( fc.Exists(groupPath) )
cbc9c06f
DS
392 {
393 // using DeleteGroup exposes the problem, using DeleteAll doesn't
394 CPPUNIT_ASSERT( fc.DeleteGroup(groupPath) );
395 }
396
397 // the config must be empty for the problem to arise
398 CPPUNIT_ASSERT( !fc.GetNumberOfEntries(true) );
399 CPPUNIT_ASSERT( !fc.GetNumberOfGroups(true) );
400
401
402 // this crashes on second call of this function
403 CPPUNIT_ASSERT( fc.Write(groupPath + _T("/entry"), _T("value")) );
404}
405
406void FileConfigTestCase::DeleteLastGroup()
407{
408 /*
409 We make 2 of the same calls, first to create a file config with a single
410 group and key...
411 */
412 ::EmptyConfigAndWriteKey();
413
414 /*
415 ... then the same but this time the key's group is deleted before the
416 key is written again. This causes a crash.
417 */
418 ::EmptyConfigAndWriteKey();
419
420
421 // clean up
422 wxLogNull noLogging;
c406cd3d 423 (void) ::wxRemoveFile(wxFileConfig::GetLocalFileName(_T("deleteconftest")));
cbc9c06f
DS
424}
425
17c24d37
VZ
426#endif // wxUSE_FILECONFIG
427