blob: cac08104f69be130fdc2f33f3c6e4b70a14aa940 (
plain)
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
|
source [expr {[info exists ::env(TESTS_DIR)] ? "$env(TESTS_DIR)/interactive/ly.tcl" : "ly.tcl"}]
set mdir $::env(YANG_MODULES_DIR)
set ddir $::env(TESTS_DIR)/data
test clear_searchpath {searchpath is also deleted} {
-setup $ly_setup -cleanup $ly_cleanup -body {
ly_cmd "searchpath ./"
ly_cmd "clear"
ly_cmd "searchpath" "List of the searchpaths:" -ex
}}
test clear_make_implemented_once {clear --make-implemented} {
-setup $ly_setup -cleanup $ly_cleanup -body {
ly_cmd "clear -i"
ly_cmd "add $mdir/modmust.yang"
ly_cmd "list" "I modmust\r.*I modleaf"
}}
test clear_make_implemented_twice {clear -i -i} {
-setup $ly_setup -cleanup $ly_cleanup -body {
ly_cmd "clear -i -i"
ly_cmd "add $mdir/modmust.yang"
ly_cmd "list" "I modmust\r.*I modleaf"
}}
test clear_ietf_yang_library {clear --yang-library} {
-setup $ly_setup -cleanup $ly_cleanup -body {
# add models
ly_cmd "clear -y"
ly_cmd "list" "I ietf-yang-library"
}}
test clear_ylf_list {apply --yang-library-file and check result by --list} {
-setup $ly_setup -cleanup $ly_cleanup -body {
ly_cmd "clear -Y $ddir/modimp_type_ctx.xml"
ly_cmd "list" "I modimp-type.*i modtypedef"
}}
test clear_ylf_make_implemented {apply --yang-library-file and --make-implemented} {
-setup $ly_setup -cleanup $ly_cleanup -body {
ly_cmd "clear -Y $ddir/modimp_type_ctx.xml -i -i"
ly_cmd "list" "I modimp-type.*I modtypedef"
}}
test clear_ylf_augment_ctx {Setup context by yang-library-file and augment module} {
-setup $ly_setup -cleanup $ly_cleanup -body {
ly_cmd "clear -Y $ddir/modconfig_ctx.xml"
ly_cmd "add $mdir/modconfig-augment.yang"
ly_cmd "print -f tree modconfig" "mca:alf"
}}
cleanupTests
|
