Add qemu 2.4.0
[kvmfornfv.git] / qemu / dtc / tests / run_tests.sh
1 #! /bin/sh
2
3 . ./tests.sh
4
5 if [ -z "$CC" ]; then
6     CC=gcc
7 fi
8
9 export QUIET_TEST=1
10
11 export VALGRIND=
12 VGCODE=126
13
14 tot_tests=0
15 tot_pass=0
16 tot_fail=0
17 tot_config=0
18 tot_vg=0
19 tot_strange=0
20
21 base_run_test() {
22     tot_tests=$((tot_tests + 1))
23     if VALGRIND="$VALGRIND" "$@"; then
24         tot_pass=$((tot_pass + 1))
25     else
26         ret="$?"
27         if [ "$ret" -eq 1 ]; then
28             tot_config=$((tot_config + 1))
29         elif [ "$ret" -eq 2 ]; then
30             tot_fail=$((tot_fail + 1))
31         elif [ "$ret" -eq $VGCODE ]; then
32             tot_vg=$((tot_vg + 1))
33         else
34             tot_strange=$((tot_strange + 1))
35         fi
36     fi
37 }
38
39 shorten_echo () {
40     limit=32
41     echo -n "$1"
42     shift
43     for x; do
44         if [ ${#x} -le $limit ]; then
45             echo -n " $x"
46         else
47             short=$(echo "$x" | head -c$limit)
48             echo -n " \"$short\"...<${#x} bytes>"
49         fi
50     done
51 }
52
53 run_test () {
54     echo -n "$@:        "
55     if [ -n "$VALGRIND" -a -f $1.supp ]; then
56         VGSUPP="--suppressions=$1.supp"
57     fi
58     base_run_test $VALGRIND $VGSUPP "./$@"
59 }
60
61 run_sh_test () {
62     echo -n "$@:        "
63     base_run_test sh "$@"
64 }
65
66 wrap_test () {
67     (
68         if verbose_run "$@"; then
69             PASS
70         else
71             ret="$?"
72             if [ "$ret" -gt 127 ]; then
73                 signame=$(kill -l $((ret - 128)))
74                 FAIL "Killed by SIG$signame"
75             else
76                 FAIL "Returned error code $ret"
77             fi
78         fi
79     )
80 }
81
82 run_wrap_test () {
83     shorten_echo "$@:   "
84     base_run_test wrap_test "$@"
85 }
86
87 wrap_error () {
88     (
89         if verbose_run "$@"; then
90             FAIL "Expected non-zero return code"
91         else
92             ret="$?"
93             if [ "$ret" -gt 127 ]; then
94                 signame=$(kill -l $((ret - 128)))
95                 FAIL "Killed by SIG$signame"
96             else
97                 PASS
98             fi
99         fi
100     )
101 }
102
103 run_wrap_error_test () {
104     shorten_echo "$@"
105     echo -n " {!= 0}:   "
106     base_run_test wrap_error "$@"
107 }
108
109 run_dtc_test () {
110     echo -n "dtc $@:    "
111     base_run_test wrap_test $VALGRIND $DTC "$@"
112 }
113
114 asm_to_so () {
115     $CC -shared -o $1.test.so data.S $1.test.s
116 }
117
118 asm_to_so_test () {
119     run_wrap_test asm_to_so "$@"
120 }
121
122 run_fdtget_test () {
123     expect="$1"
124     shift
125     echo -n "fdtget-runtest.sh "$expect" $@:    "
126     base_run_test sh fdtget-runtest.sh "$expect" "$@"
127 }
128
129 run_fdtput_test () {
130     expect="$1"
131     shift
132     shorten_echo fdtput-runtest.sh "$expect" "$@"
133     echo -n ":  "
134     base_run_test sh fdtput-runtest.sh "$expect" "$@"
135 }
136
137 tree1_tests () {
138     TREE=$1
139
140     # Read-only tests
141     run_test get_mem_rsv $TREE
142     run_test root_node $TREE
143     run_test find_property $TREE
144     run_test subnode_offset $TREE
145     run_test path_offset $TREE
146     run_test get_name $TREE
147     run_test getprop $TREE
148     run_test get_phandle $TREE
149     run_test get_path $TREE
150     run_test supernode_atdepth_offset $TREE
151     run_test parent_offset $TREE
152     run_test node_offset_by_prop_value $TREE
153     run_test node_offset_by_phandle $TREE
154     run_test node_check_compatible $TREE
155     run_test node_offset_by_compatible $TREE
156     run_test notfound $TREE
157
158     # Write-in-place tests
159     run_test setprop_inplace $TREE
160     run_test nop_property $TREE
161     run_test nop_node $TREE
162 }
163
164 tree1_tests_rw () {
165     TREE=$1
166
167     # Read-write tests
168     run_test set_name $TREE
169     run_test setprop $TREE
170     run_test del_property $TREE
171     run_test del_node $TREE
172 }
173
174 check_tests () {
175     tree="$1"
176     shift
177     run_sh_test dtc-checkfails.sh "$@" -- -I dts -O dtb $tree
178     run_dtc_test -I dts -O dtb -o $tree.test.dtb -f $tree
179     run_sh_test dtc-checkfails.sh "$@" -- -I dtb -O dtb $tree.test.dtb
180 }
181
182 ALL_LAYOUTS="mts mst tms tsm smt stm"
183
184 libfdt_tests () {
185     tree1_tests test_tree1.dtb
186
187     # Sequential write tests
188     run_test sw_tree1
189     tree1_tests sw_tree1.test.dtb
190     tree1_tests unfinished_tree1.test.dtb
191     run_test dtbs_equal_ordered test_tree1.dtb sw_tree1.test.dtb
192
193     # fdt_move tests
194     for tree in test_tree1.dtb sw_tree1.test.dtb unfinished_tree1.test.dtb; do
195         rm -f moved.$tree shunted.$tree deshunted.$tree
196         run_test move_and_save $tree
197         run_test dtbs_equal_ordered $tree moved.$tree
198         run_test dtbs_equal_ordered $tree shunted.$tree
199         run_test dtbs_equal_ordered $tree deshunted.$tree
200     done
201
202     # v16 and alternate layout tests
203     for tree in test_tree1.dtb; do
204         for version in 17 16; do
205             for layout in $ALL_LAYOUTS; do
206                 run_test mangle-layout $tree $version $layout
207                 tree1_tests v$version.$layout.$tree
208                 run_test dtbs_equal_ordered $tree v$version.$layout.$tree
209             done
210         done
211     done
212
213     # Read-write tests
214     for basetree in test_tree1.dtb; do
215         for version in 17 16; do
216             for layout in $ALL_LAYOUTS; do
217                 tree=v$version.$layout.$basetree
218                 rm -f opened.$tree repacked.$tree
219                 run_test open_pack $tree
220                 tree1_tests opened.$tree
221                 tree1_tests repacked.$tree
222
223                 tree1_tests_rw $tree
224                 tree1_tests_rw opened.$tree
225                 tree1_tests_rw repacked.$tree
226             done
227         done
228     done
229     run_test rw_tree1
230     tree1_tests rw_tree1.test.dtb
231     tree1_tests_rw rw_tree1.test.dtb
232     run_test appendprop1
233     run_test appendprop2 appendprop1.test.dtb
234     run_dtc_test -I dts -O dtb -o appendprop.test.dtb appendprop.dts
235     run_test dtbs_equal_ordered appendprop2.test.dtb appendprop.test.dtb
236
237     for basetree in test_tree1.dtb sw_tree1.test.dtb rw_tree1.test.dtb; do
238         run_test nopulate $basetree
239         run_test dtbs_equal_ordered $basetree noppy.$basetree
240         tree1_tests noppy.$basetree
241         tree1_tests_rw noppy.$basetree
242     done
243
244     run_dtc_test -I dts -O dtb -o subnode_iterate.dtb subnode_iterate.dts
245     run_test subnode_iterate subnode_iterate.dtb
246
247     # Tests for behaviour on various sorts of corrupted trees
248     run_test truncated_property
249
250     # Specific bug tests
251     run_test add_subnode_with_nops
252 }
253
254 dtc_tests () {
255     run_dtc_test -I dts -O dtb -o dtc_tree1.test.dtb test_tree1.dts
256     tree1_tests dtc_tree1.test.dtb
257     tree1_tests_rw dtc_tree1.test.dtb
258     run_test dtbs_equal_ordered dtc_tree1.test.dtb test_tree1.dtb
259
260     run_dtc_test -I dts -O dtb -o dtc_escapes.test.dtb propname_escapes.dts
261     run_test propname_escapes dtc_escapes.test.dtb
262
263     run_dtc_test -I dts -O dtb -o line_directives.test.dtb line_directives.dts
264
265     run_dtc_test -I dts -O dtb -o dtc_escapes.test.dtb escapes.dts
266     run_test string_escapes dtc_escapes.test.dtb
267
268     run_dtc_test -I dts -O dtb -o dtc_char_literal.test.dtb char_literal.dts
269     run_test char_literal dtc_char_literal.test.dtb
270
271     run_dtc_test -I dts -O dtb -o dtc_sized_cells.test.dtb sized_cells.dts
272     run_test sized_cells dtc_sized_cells.test.dtb
273
274     run_dtc_test -I dts -O dtb -o dtc_extra-terminating-null.test.dtb extra-terminating-null.dts
275     run_test extra-terminating-null dtc_extra-terminating-null.test.dtb
276
277     run_dtc_test -I dts -O dtb -o dtc_references.test.dtb references.dts
278     run_test references dtc_references.test.dtb
279
280     run_dtc_test -I dts -O dtb -o dtc_path-references.test.dtb path-references.dts
281     run_test path-references dtc_path-references.test.dtb
282
283     run_test phandle_format dtc_references.test.dtb both
284     for f in legacy epapr both; do
285         run_dtc_test -I dts -O dtb -H $f -o dtc_references.test.$f.dtb references.dts
286         run_test phandle_format dtc_references.test.$f.dtb $f
287     done
288
289     run_dtc_test -I dts -O dtb -o multilabel.test.dtb multilabel.dts
290     run_test references multilabel.test.dtb
291
292     run_dtc_test -I dts -O dtb -o label_repeated.test.dtb label_repeated.dts
293
294     run_dtc_test -I dts -O dtb -o dtc_comments.test.dtb comments.dts
295     run_dtc_test -I dts -O dtb -o dtc_comments-cmp.test.dtb comments-cmp.dts
296     run_test dtbs_equal_ordered dtc_comments.test.dtb dtc_comments-cmp.test.dtb
297
298     # Check aliases support in fdt_path_offset
299     run_dtc_test -I dts -O dtb -o aliases.dtb aliases.dts
300     run_test get_alias aliases.dtb
301     run_test path_offset_aliases aliases.dtb
302
303     # Check /include/ directive
304     run_dtc_test -I dts -O dtb -o includes.test.dtb include0.dts
305     run_test dtbs_equal_ordered includes.test.dtb test_tree1.dtb
306
307     # Check /incbin/ directive
308     run_dtc_test -I dts -O dtb -o incbin.test.dtb incbin.dts
309     run_test incbin incbin.test.dtb
310
311     # Check boot_cpuid_phys handling
312     run_dtc_test -I dts -O dtb -o boot_cpuid.test.dtb boot-cpuid.dts
313     run_test boot-cpuid boot_cpuid.test.dtb 16
314
315     run_dtc_test -I dts -O dtb -b 17 -o boot_cpuid_17.test.dtb boot-cpuid.dts
316     run_test boot-cpuid boot_cpuid_17.test.dtb 17
317
318     run_dtc_test -I dtb -O dtb -o preserve_boot_cpuid.test.dtb boot_cpuid.test.dtb
319     run_test boot-cpuid preserve_boot_cpuid.test.dtb 16
320     run_test dtbs_equal_ordered preserve_boot_cpuid.test.dtb boot_cpuid.test.dtb
321
322     run_dtc_test -I dtb -O dtb -o preserve_boot_cpuid_17.test.dtb boot_cpuid_17.test.dtb
323     run_test boot-cpuid preserve_boot_cpuid_17.test.dtb 17
324     run_test dtbs_equal_ordered preserve_boot_cpuid_17.test.dtb boot_cpuid_17.test.dtb
325
326     run_dtc_test -I dtb -O dtb -b17 -o override17_boot_cpuid.test.dtb boot_cpuid.test.dtb
327     run_test boot-cpuid override17_boot_cpuid.test.dtb 17
328
329     run_dtc_test -I dtb -O dtb -b0 -o override0_boot_cpuid_17.test.dtb boot_cpuid_17.test.dtb
330     run_test boot-cpuid override0_boot_cpuid_17.test.dtb 0
331
332
333     # Check -Oasm mode
334     for tree in test_tree1.dts escapes.dts references.dts path-references.dts \
335         comments.dts aliases.dts include0.dts incbin.dts \
336         value-labels.dts ; do
337         run_dtc_test -I dts -O asm -o oasm_$tree.test.s $tree
338         asm_to_so_test oasm_$tree
339         run_dtc_test -I dts -O dtb -o $tree.test.dtb $tree
340         run_test asm_tree_dump ./oasm_$tree.test.so oasm_$tree.test.dtb
341         run_wrap_test cmp oasm_$tree.test.dtb $tree.test.dtb
342     done
343
344     run_test value-labels ./oasm_value-labels.dts.test.so
345
346     # Check -Odts mode preserve all dtb information
347     for tree in test_tree1.dtb dtc_tree1.test.dtb dtc_escapes.test.dtb \
348         dtc_extra-terminating-null.test.dtb dtc_references.test.dtb; do
349         run_dtc_test -I dtb -O dts -o odts_$tree.test.dts $tree
350         run_dtc_test -I dts -O dtb -o odts_$tree.test.dtb odts_$tree.test.dts
351         run_test dtbs_equal_ordered $tree odts_$tree.test.dtb
352     done
353
354     # Check version conversions
355     for tree in test_tree1.dtb ; do
356          for aver in 1 2 3 16 17; do
357              atree="ov${aver}_$tree.test.dtb"
358              run_dtc_test -I dtb -O dtb -V$aver -o $atree $tree
359              for bver in 16 17; do
360                  btree="ov${bver}_$atree"
361                  run_dtc_test -I dtb -O dtb -V$bver -o $btree $atree
362                  run_test dtbs_equal_ordered $btree $tree
363              done
364          done
365     done
366
367     # Check merge/overlay functionality
368     run_dtc_test -I dts -O dtb -o dtc_tree1_merge.test.dtb test_tree1_merge.dts
369     tree1_tests dtc_tree1_merge.test.dtb test_tree1.dtb
370     run_dtc_test -I dts -O dtb -o dtc_tree1_merge_labelled.test.dtb test_tree1_merge_labelled.dts
371     tree1_tests dtc_tree1_merge_labelled.test.dtb test_tree1.dtb
372     run_dtc_test -I dts -O dtb -o multilabel_merge.test.dtb multilabel_merge.dts
373     run_test references multilabel.test.dtb
374     run_test dtbs_equal_ordered multilabel.test.dtb multilabel_merge.test.dtb
375     run_dtc_test -I dts -O dtb -o dtc_tree1_merge_path.test.dtb test_tree1_merge_path.dts
376     tree1_tests dtc_tree1_merge_path.test.dtb test_tree1.dtb
377
378     # Check prop/node delete functionality
379     run_dtc_test -I dts -O dtb -o dtc_tree1_delete.test.dtb test_tree1_delete.dts
380     tree1_tests dtc_tree1_delete.test.dtb
381
382     run_dtc_test -I dts -O dts -o delete_reinstate_multilabel.dts.test.dts delete_reinstate_multilabel.dts
383     run_wrap_test cmp delete_reinstate_multilabel.dts.test.dts delete_reinstate_multilabel_ref.dts
384
385     # Check some checks
386     check_tests dup-nodename.dts duplicate_node_names
387     check_tests dup-propname.dts duplicate_property_names
388     check_tests dup-phandle.dts explicit_phandles
389     check_tests zero-phandle.dts explicit_phandles
390     check_tests minusone-phandle.dts explicit_phandles
391     run_sh_test dtc-checkfails.sh phandle_references -- -I dts -O dtb nonexist-node-ref.dts
392     run_sh_test dtc-checkfails.sh phandle_references -- -I dts -O dtb nonexist-label-ref.dts
393     run_sh_test dtc-fatal.sh -I dts -O dtb nonexist-node-ref2.dts
394     check_tests bad-name-property.dts name_properties
395
396     check_tests bad-ncells.dts address_cells_is_cell size_cells_is_cell interrupt_cells_is_cell
397     check_tests bad-string-props.dts device_type_is_string model_is_string status_is_string
398     check_tests bad-reg-ranges.dts reg_format ranges_format
399     check_tests bad-empty-ranges.dts ranges_format
400     check_tests reg-ranges-root.dts reg_format ranges_format
401     check_tests default-addr-size.dts avoid_default_addr_size
402     check_tests obsolete-chosen-interrupt-controller.dts obsolete_chosen_interrupt_controller
403     run_sh_test dtc-checkfails.sh node_name_chars -- -I dtb -O dtb bad_node_char.dtb
404     run_sh_test dtc-checkfails.sh node_name_format -- -I dtb -O dtb bad_node_format.dtb
405     run_sh_test dtc-checkfails.sh prop_name_chars -- -I dtb -O dtb bad_prop_char.dtb
406
407     run_sh_test dtc-checkfails.sh duplicate_label -- -I dts -O dtb reuse-label1.dts
408     run_sh_test dtc-checkfails.sh duplicate_label -- -I dts -O dtb reuse-label2.dts
409     run_sh_test dtc-checkfails.sh duplicate_label -- -I dts -O dtb reuse-label3.dts
410     run_sh_test dtc-checkfails.sh duplicate_label -- -I dts -O dtb reuse-label4.dts
411     run_sh_test dtc-checkfails.sh duplicate_label -- -I dts -O dtb reuse-label5.dts
412     run_sh_test dtc-checkfails.sh duplicate_label -- -I dts -O dtb reuse-label6.dts
413
414     # Check warning options
415     run_sh_test dtc-checkfails.sh address_cells_is_cell interrupt_cells_is_cell -n size_cells_is_cell -- -Wno_size_cells_is_cell -I dts -O dtb bad-ncells.dts
416     run_sh_test dtc-fails.sh -n test-warn-output.test.dtb -I dts -O dtb bad-ncells.dts
417     run_sh_test dtc-fails.sh test-error-output.test.dtb -I dts -O dtb bad-ncells.dts -Esize_cells_is_cell
418     run_sh_test dtc-checkfails.sh always_fail -- -Walways_fail -I dts -O dtb test_tree1.dts
419     run_sh_test dtc-checkfails.sh -n always_fail -- -Walways_fail -Wno_always_fail -I dts -O dtb test_tree1.dts
420     run_sh_test dtc-fails.sh test-negation-1.test.dtb -Ealways_fail -I dts -O dtb test_tree1.dts
421     run_sh_test dtc-fails.sh -n test-negation-2.test.dtb -Ealways_fail -Eno_always_fail -I dts -O dtb test_tree1.dts
422     run_sh_test dtc-fails.sh test-negation-3.test.dtb -Ealways_fail -Wno_always_fail -I dts -O dtb test_tree1.dts
423     run_sh_test dtc-fails.sh -n test-negation-4.test.dtb -Esize_cells_is_cell -Eno_size_cells_is_cell -I dts -O dtb bad-ncells.dts
424     run_sh_test dtc-checkfails.sh size_cells_is_cell -- -Esize_cells_is_cell -Eno_size_cells_is_cell -I dts -O dtb bad-ncells.dts
425
426     # Check for proper behaviour reading from stdin
427     run_dtc_test -I dts -O dtb -o stdin_dtc_tree1.test.dtb - < test_tree1.dts
428     run_wrap_test cmp stdin_dtc_tree1.test.dtb dtc_tree1.test.dtb
429     run_dtc_test -I dtb -O dts -o stdin_odts_test_tree1.dtb.test.dts - < test_tree1.dtb
430     run_wrap_test cmp stdin_odts_test_tree1.dtb.test.dts odts_test_tree1.dtb.test.dts
431
432     # Check integer expresisons
433     run_test integer-expressions -g integer-expressions.test.dts
434     run_dtc_test -I dts -O dtb -o integer-expressions.test.dtb integer-expressions.test.dts
435     run_test integer-expressions integer-expressions.test.dtb
436
437     # Check for graceful failure in some error conditions
438     run_sh_test dtc-fatal.sh -I dts -O dtb nosuchfile.dts
439     run_sh_test dtc-fatal.sh -I dtb -O dtb nosuchfile.dtb
440     run_sh_test dtc-fatal.sh -I fs -O dtb nosuchfile
441
442     # Dependencies
443     run_dtc_test -I dts -O dtb -o dependencies.test.dtb -d dependencies.test.d dependencies.dts
444     run_wrap_test cmp dependencies.test.d dependencies.cmp
445
446     # Search paths
447     run_wrap_error_test $DTC -I dts -O dtb -o search_paths.dtb search_paths.dts
448     run_dtc_test -i search_dir -I dts -O dtb -o search_paths.dtb \
449         search_paths.dts
450     run_wrap_error_test $DTC -i search_dir_b -I dts -O dtb \
451         -o search_paths_b.dtb search_paths_b.dts
452     run_dtc_test -i search_dir_b -i search_dir -I dts -O dtb \
453         -o search_paths_b.dtb search_paths_b.dts
454     run_dtc_test -I dts -O dtb -o search_paths_subdir.dtb \
455         search_dir_b/search_paths_subdir.dts
456 }
457
458 cmp_tests () {
459     basetree="$1"
460     shift
461     wrongtrees="$@"
462
463     run_test dtb_reverse $basetree
464
465     # First dtbs_equal_ordered
466     run_test dtbs_equal_ordered $basetree $basetree
467     run_test dtbs_equal_ordered -n $basetree $basetree.reversed.test.dtb
468     for tree in $wrongtrees; do
469         run_test dtbs_equal_ordered -n $basetree $tree
470     done
471
472     # now unordered
473     run_test dtbs_equal_unordered $basetree $basetree
474     run_test dtbs_equal_unordered $basetree $basetree.reversed.test.dtb
475     run_test dtbs_equal_unordered $basetree.reversed.test.dtb $basetree
476     for tree in $wrongtrees; do
477         run_test dtbs_equal_unordered -n $basetree $tree
478     done
479
480     # now dtc --sort
481     run_dtc_test -I dtb -O dtb -s -o $basetree.sorted.test.dtb $basetree
482     run_test dtbs_equal_unordered $basetree $basetree.sorted.test.dtb
483     run_dtc_test -I dtb -O dtb -s -o $basetree.reversed.sorted.test.dtb $basetree.reversed.test.dtb
484     run_test dtbs_equal_unordered $basetree.reversed.test.dtb $basetree.reversed.sorted.test.dtb
485     run_test dtbs_equal_ordered $basetree.sorted.test.dtb $basetree.reversed.sorted.test.dtb
486 }
487
488 dtbs_equal_tests () {
489     WRONG_TREE1=""
490     for x in 1 2 3 4 5 6 7 8 9; do
491         run_dtc_test -I dts -O dtb -o test_tree1_wrong$x.test.dtb test_tree1_wrong$x.dts
492         WRONG_TREE1="$WRONG_TREE1 test_tree1_wrong$x.test.dtb"
493     done
494     cmp_tests test_tree1.dtb $WRONG_TREE1
495 }
496
497 fdtget_tests () {
498     dts=label01.dts
499     dtb=$dts.fdtget.test.dtb
500     run_dtc_test -O dtb -o $dtb $dts
501
502     # run_fdtget_test <expected-result> [<flags>] <file> <node> <property>
503     run_fdtget_test "MyBoardName" $dtb / model
504     run_fdtget_test "MyBoardName MyBoardFamilyName" $dtb / compatible
505     run_fdtget_test "77 121 66 111 \
506 97 114 100 78 97 109 101 0 77 121 66 111 97 114 100 70 97 109 105 \
507 108 121 78 97 109 101 0" -t bu $dtb / compatible
508     run_fdtget_test "MyBoardName MyBoardFamilyName" -t s $dtb / compatible
509     run_fdtget_test 32768 $dtb /cpus/PowerPC,970@1 d-cache-size
510     run_fdtget_test 8000 -tx $dtb /cpus/PowerPC,970@1 d-cache-size
511     run_fdtget_test "61 62 63 0" -tbx $dtb /randomnode tricky1
512     run_fdtget_test "a b c d de ea ad be ef" -tbx $dtb /randomnode blob
513
514     # Here the property size is not a multiple of 4 bytes, so it should fail
515     run_wrap_error_test $DTGET -tlx $dtb /randomnode mixed
516     run_fdtget_test "6162 6300 1234 0 a 0 b 0 c" -thx $dtb /randomnode mixed
517     run_fdtget_test "61 62 63 0 12 34 0 0 0 a 0 0 0 b 0 0 0 c" \
518         -thhx $dtb /randomnode mixed
519     run_wrap_error_test $DTGET -ts $dtb /randomnode doctor-who
520
521     # Test multiple arguments
522     run_fdtget_test "MyBoardName\nmemory" -ts $dtb / model /memory device_type
523
524     # Test defaults
525     run_wrap_error_test $DTGET -tx $dtb /randomnode doctor-who
526     run_fdtget_test "<the dead silence>" -tx \
527         -d "<the dead silence>" $dtb /randomnode doctor-who
528     run_fdtget_test "<blink>" -tx -d "<blink>" $dtb /memory doctor-who
529 }
530
531 fdtput_tests () {
532     dts=label01.dts
533     dtb=$dts.fdtput.test.dtb
534     text=lorem.txt
535
536     # Allow just enough space for $text
537     run_dtc_test -O dtb -p $(stat -c %s $text) -o $dtb $dts
538
539     # run_fdtput_test <expected-result> <file> <node> <property> <flags> <value>
540     run_fdtput_test "a_model" $dtb / model -ts "a_model"
541     run_fdtput_test "board1 board2" $dtb / compatible -ts board1 board2
542     run_fdtput_test "board1 board2" $dtb / compatible -ts "board1 board2"
543     run_fdtput_test "32768" $dtb /cpus/PowerPC,970@1 d-cache-size "" "32768"
544     run_fdtput_test "8001" $dtb /cpus/PowerPC,970@1 d-cache-size -tx 0x8001
545     run_fdtput_test "2 3 12" $dtb /randomnode tricky1 -tbi "02 003 12"
546     run_fdtput_test "a b c ea ad be ef" $dtb /randomnode blob \
547         -tbx "a b c ea ad be ef"
548     run_fdtput_test "a0b0c0d deeaae ef000000" $dtb /randomnode blob \
549         -tx "a0b0c0d deeaae ef000000"
550     run_fdtput_test "$(cat $text)" $dtb /randomnode blob -ts "$(cat $text)"
551
552     # Test expansion of the blob when insufficient room for property
553     run_fdtput_test "$(cat $text $text)" $dtb /randomnode blob -ts "$(cat $text $text)"
554
555     # Start again with a fresh dtb
556     run_dtc_test -O dtb -p $(stat -c %s $text) -o $dtb $dts
557
558     # Node creation
559     run_wrap_error_test $DTPUT $dtb -c /baldrick sod
560     run_wrap_test $DTPUT $dtb -c /chosen/son /chosen/daughter
561     run_fdtput_test "eva" $dtb /chosen/daughter name "" -ts "eva"
562     run_fdtput_test "adam" $dtb /chosen/son name "" -ts "adam"
563
564     # Not allowed to create an existing node
565     run_wrap_error_test $DTPUT $dtb -c /chosen
566     run_wrap_error_test $DTPUT $dtb -c /chosen/son
567
568     # Automatic node creation
569     run_wrap_test $DTPUT $dtb -cp /blackadder/the-second/turnip \
570         /blackadder/the-second/potato
571     run_fdtput_test 1000 $dtb /blackadder/the-second/turnip cost "" 1000
572     run_fdtput_test "fine wine" $dtb /blackadder/the-second/potato drink \
573         "-ts" "fine wine"
574     run_wrap_test $DTPUT $dtb -p /you/are/drunk/sir/winston slurp -ts twice
575
576     # Test expansion of the blob when insufficent room for a new node
577     run_wrap_test $DTPUT $dtb -cp "$(cat $text $text)/longish"
578
579     # Allowed to create an existing node with -p
580     run_wrap_test $DTPUT $dtb -cp /chosen
581     run_wrap_test $DTPUT $dtb -cp /chosen/son
582
583     # TODO: Add tests for verbose mode?
584 }
585
586 utilfdt_tests () {
587     run_test utilfdt_test
588 }
589
590 while getopts "vt:m" ARG ; do
591     case $ARG in
592         "v")
593             unset QUIET_TEST
594             ;;
595         "t")
596             TESTSETS=$OPTARG
597             ;;
598         "m")
599             VALGRIND="valgrind --tool=memcheck -q --error-exitcode=$VGCODE"
600             ;;
601     esac
602 done
603
604 if [ -z "$TESTSETS" ]; then
605     TESTSETS="libfdt utilfdt dtc dtbs_equal fdtget fdtput"
606 fi
607
608 # Make sure we don't have stale blobs lying around
609 rm -f *.test.dtb *.test.dts
610
611 for set in $TESTSETS; do
612     case $set in
613         "libfdt")
614             libfdt_tests
615             ;;
616         "utilfdt")
617             utilfdt_tests
618             ;;
619         "dtc")
620             dtc_tests
621             ;;
622         "dtbs_equal")
623             dtbs_equal_tests
624             ;;
625         "fdtget")
626             fdtget_tests
627             ;;
628         "fdtput")
629             fdtput_tests
630             ;;
631     esac
632 done
633
634 echo "********** TEST SUMMARY"
635 echo "*     Total testcases:    $tot_tests"
636 echo "*                PASS:    $tot_pass"
637 echo "*                FAIL:    $tot_fail"
638 echo "*   Bad configuration:    $tot_config"
639 if [ -n "$VALGRIND" ]; then
640     echo "*    valgrind errors: $tot_vg"
641 fi
642 echo "* Strange test result:    $tot_strange"
643 echo "**********"
644