4 * Copyright (C) 2009 Red Hat Inc.
7 * Luiz Capitulino <lcapitulino@redhat.com>
9 * This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
10 * See the COPYING.LIB file in the top-level directory.
17 #include "qemu-common.h"
20 * Public Interface test-cases
22 * (with some violations to access 'private' data)
25 START_TEST(qdict_new_test
)
30 fail_unless(qdict
!= NULL
);
31 fail_unless(qdict_size(qdict
) == 0);
32 fail_unless(qdict
->base
.refcnt
== 1);
33 fail_unless(qobject_type(QOBJECT(qdict
)) == QTYPE_QDICT
);
35 // destroy doesn't exit yet
40 START_TEST(qdict_put_obj_test
)
49 // key "" will have tdb hash 12345
50 qdict_put_obj(qdict
, "", QOBJECT(qint_from_int(num
)));
52 fail_unless(qdict_size(qdict
) == 1);
53 ent
= QLIST_FIRST(&qdict
->table
[12345 % QDICT_BUCKET_MAX
]);
54 qi
= qobject_to_qint(ent
->value
);
55 fail_unless(qint_get_int(qi
) == num
);
57 // destroy doesn't exit yet
65 START_TEST(qdict_destroy_simple_test
)
70 qdict_put_obj(qdict
, "num", QOBJECT(qint_from_int(0)));
71 qdict_put_obj(qdict
, "str", QOBJECT(qstring_from_str("foo")));
77 static QDict
*tests_dict
= NULL
;
79 static void qdict_setup(void)
81 tests_dict
= qdict_new();
82 fail_unless(tests_dict
!= NULL
);
85 static void qdict_teardown(void)
91 START_TEST(qdict_get_test
)
95 const int value
= -42;
96 const char *key
= "test";
98 qdict_put(tests_dict
, key
, qint_from_int(value
));
100 obj
= qdict_get(tests_dict
, key
);
101 fail_unless(obj
!= NULL
);
103 qi
= qobject_to_qint(obj
);
104 fail_unless(qint_get_int(qi
) == value
);
108 START_TEST(qdict_get_int_test
)
111 const int value
= 100;
112 const char *key
= "int";
114 qdict_put(tests_dict
, key
, qint_from_int(value
));
116 ret
= qdict_get_int(tests_dict
, key
);
117 fail_unless(ret
== value
);
121 START_TEST(qdict_get_try_int_test
)
124 const int value
= 100;
125 const char *key
= "int";
127 qdict_put(tests_dict
, key
, qint_from_int(value
));
129 ret
= qdict_get_try_int(tests_dict
, key
, 0);
130 fail_unless(ret
== value
);
134 START_TEST(qdict_get_str_test
)
137 const char *key
= "key";
138 const char *str
= "string";
140 qdict_put(tests_dict
, key
, qstring_from_str(str
));
142 p
= qdict_get_str(tests_dict
, key
);
143 fail_unless(p
!= NULL
);
144 fail_unless(strcmp(p
, str
) == 0);
148 START_TEST(qdict_get_try_str_test
)
151 const char *key
= "key";
152 const char *str
= "string";
154 qdict_put(tests_dict
, key
, qstring_from_str(str
));
156 p
= qdict_get_try_str(tests_dict
, key
);
157 fail_unless(p
!= NULL
);
158 fail_unless(strcmp(p
, str
) == 0);
162 START_TEST(qdict_haskey_not_test
)
164 fail_unless(qdict_haskey(tests_dict
, "test") == 0);
168 START_TEST(qdict_haskey_test
)
170 const char *key
= "test";
172 qdict_put(tests_dict
, key
, qint_from_int(0));
173 fail_unless(qdict_haskey(tests_dict
, key
) == 1);
177 START_TEST(qdict_del_test
)
179 const char *key
= "key test";
181 qdict_put(tests_dict
, key
, qstring_from_str("foo"));
182 fail_unless(qdict_size(tests_dict
) == 1);
184 qdict_del(tests_dict
, key
);
186 fail_unless(qdict_size(tests_dict
) == 0);
187 fail_unless(qdict_haskey(tests_dict
, key
) == 0);
191 START_TEST(qobject_to_qdict_test
)
193 fail_unless(qobject_to_qdict(QOBJECT(tests_dict
)) == tests_dict
);
197 START_TEST(qdict_iterapi_test
)
200 const QDictEntry
*ent
;
202 fail_unless(qdict_first(tests_dict
) == NULL
);
204 qdict_put(tests_dict
, "key1", qint_from_int(1));
205 qdict_put(tests_dict
, "key2", qint_from_int(2));
206 qdict_put(tests_dict
, "key3", qint_from_int(3));
209 for (ent
= qdict_first(tests_dict
); ent
; ent
= qdict_next(tests_dict
, ent
)){
210 fail_unless(qdict_haskey(tests_dict
, qdict_entry_key(ent
)) == 1);
214 fail_unless(count
== qdict_size(tests_dict
));
216 /* Do it again to test restarting */
218 for (ent
= qdict_first(tests_dict
); ent
; ent
= qdict_next(tests_dict
, ent
)){
219 fail_unless(qdict_haskey(tests_dict
, qdict_entry_key(ent
)) == 1);
223 fail_unless(count
== qdict_size(tests_dict
));
231 START_TEST(qdict_put_exists_test
)
234 const char *key
= "exists";
236 qdict_put(tests_dict
, key
, qint_from_int(1));
237 qdict_put(tests_dict
, key
, qint_from_int(2));
239 value
= qdict_get_int(tests_dict
, key
);
240 fail_unless(value
== 2);
242 fail_unless(qdict_size(tests_dict
) == 1);
246 START_TEST(qdict_get_not_exists_test
)
248 fail_unless(qdict_get(tests_dict
, "foo") == NULL
);
255 * This is a lot big for a unit-test, but there is no other place
259 static void remove_dots(char *string
)
261 char *p
= strchr(string
, ':');
266 static QString
*read_line(FILE *file
, char *key
)
270 if (fscanf(file
, "%s%s", key
, value
) == EOF
)
273 return qstring_from_str(value
);
276 #define reset_file(file) fseek(file, 0L, SEEK_SET)
278 START_TEST(qdict_stress_test
)
285 const char *test_file_path
= "qdict-test-data.txt";
287 test_file
= fopen(test_file_path
, "r");
288 fail_unless(test_file
!= NULL
);
292 fail_unless(qdict
!= NULL
);
294 // Add everything from the test file
295 for (lines
= 0;; lines
++) {
296 value
= read_line(test_file
, key
);
300 qdict_put(qdict
, key
, value
);
302 fail_unless(qdict_size(qdict
) == lines
);
304 // Check if everything is really in there
305 reset_file(test_file
);
307 const char *str1
, *str2
;
309 value
= read_line(test_file
, key
);
313 str1
= qstring_get_str(value
);
315 str2
= qdict_get_str(qdict
, key
);
316 fail_unless(str2
!= NULL
);
318 fail_unless(strcmp(str1
, str2
) == 0);
324 reset_file(test_file
);
326 value
= read_line(test_file
, key
);
330 qdict_del(qdict
, key
);
333 fail_unless(qdict_haskey(qdict
, key
) == 0);
337 fail_unless(qdict_size(qdict
) == 0);
342 static Suite
*qdict_suite(void)
345 TCase
*qdict_public_tcase
;
346 TCase
*qdict_public2_tcase
;
347 TCase
*qdict_stress_tcase
;
348 TCase
*qdict_errors_tcase
;
350 s
= suite_create("QDict test-suite");
352 qdict_public_tcase
= tcase_create("Public Interface");
353 suite_add_tcase(s
, qdict_public_tcase
);
354 tcase_add_test(qdict_public_tcase
, qdict_new_test
);
355 tcase_add_test(qdict_public_tcase
, qdict_put_obj_test
);
356 tcase_add_test(qdict_public_tcase
, qdict_destroy_simple_test
);
358 /* Continue, but now with fixtures */
359 qdict_public2_tcase
= tcase_create("Public Interface (2)");
360 suite_add_tcase(s
, qdict_public2_tcase
);
361 tcase_add_checked_fixture(qdict_public2_tcase
, qdict_setup
, qdict_teardown
);
362 tcase_add_test(qdict_public2_tcase
, qdict_get_test
);
363 tcase_add_test(qdict_public2_tcase
, qdict_get_int_test
);
364 tcase_add_test(qdict_public2_tcase
, qdict_get_try_int_test
);
365 tcase_add_test(qdict_public2_tcase
, qdict_get_str_test
);
366 tcase_add_test(qdict_public2_tcase
, qdict_get_try_str_test
);
367 tcase_add_test(qdict_public2_tcase
, qdict_haskey_not_test
);
368 tcase_add_test(qdict_public2_tcase
, qdict_haskey_test
);
369 tcase_add_test(qdict_public2_tcase
, qdict_del_test
);
370 tcase_add_test(qdict_public2_tcase
, qobject_to_qdict_test
);
371 tcase_add_test(qdict_public2_tcase
, qdict_iterapi_test
);
373 qdict_errors_tcase
= tcase_create("Errors");
374 suite_add_tcase(s
, qdict_errors_tcase
);
375 tcase_add_checked_fixture(qdict_errors_tcase
, qdict_setup
, qdict_teardown
);
376 tcase_add_test(qdict_errors_tcase
, qdict_put_exists_test
);
377 tcase_add_test(qdict_errors_tcase
, qdict_get_not_exists_test
);
380 qdict_stress_tcase
= tcase_create("Stress Test");
381 suite_add_tcase(s
, qdict_stress_tcase
);
382 tcase_add_test(qdict_stress_tcase
, qdict_stress_test
);
394 sr
= srunner_create(s
);
396 srunner_run_all(sr
, CK_NORMAL
);
397 nf
= srunner_ntests_failed(sr
);
400 return (nf
== 0) ? EXIT_SUCCESS
: EXIT_FAILURE
;