66 |
|
|
67 |
|
|
68 |
|
|
69 |
## ----------------------------------- ## |
## ---------------------------- ## |
70 |
## --module-directory: absolute path. ## |
## Exercising the test module. ## |
71 |
## ----------------------------------- ## |
## ---------------------------- ## |
72 |
|
|
73 |
|
# AT_CHECK_M4_MODTEST(TITLE, ENV-VARS, M4-OPTIONS, [STDOUT], [STDERR]) |
74 |
|
# -------------------------------------------------------------------- |
75 |
|
# Skip this test if modtest is not present (we are not in the build tree). |
76 |
|
m4_define([AT_CHECK_M4_MODTEST], |
77 |
|
[AT_SETUP([$1]) |
78 |
|
AT_KEYWORDS([module]) |
79 |
|
|
80 |
AT_SETUP([--module-directory: absolute path]) |
AT_CHECK([test -f $top_builddir/modules/modtest.la || exit 77]) |
81 |
|
|
82 |
AT_CHECK(M4PATH=$top_srcdir [m4 -M `cd $top_builddir/modules; pwd` -m load -d modules/modtest.m4], 0, |
AT_DATA([input.m4], |
83 |
[[Test module loaded. |
[[load(`modtest') |
84 |
Test module called. |
test |
85 |
Dumpdef: . |
Dumpdef: dumpdef(`test'). |
|
]], |
|
|
[[test: <test> |
|
86 |
]]) |
]]) |
87 |
|
|
88 |
AT_CLEANUP |
AT_CHECK([$2 m4 -m load -d input.m4 $3], 0, |
89 |
|
m4_default([$4], |
|
|
|
|
|
|
|
## -------- ## |
|
|
## modpath2 ## |
|
|
## -------- ## |
|
|
|
|
|
AT_SETUP([modpath2]) |
|
|
|
|
|
AT_CHECK([M4PATH=$top_srcdir LTDL_LIBRARY_PATH=$top_builddir/modules m4 -m load -d modules/modtest.m4], 0, |
|
90 |
[[Test module loaded. |
[[Test module loaded. |
91 |
Test module called. |
Test module called. |
92 |
Dumpdef: . |
Dumpdef: . |
93 |
]], |
]]), |
94 |
|
m4_default([$5], |
95 |
[[test: <test> |
[[test: <test> |
96 |
]]) |
]])) |
97 |
|
|
98 |
AT_CLEANUP |
AT_CLEANUP |
99 |
|
]) |
100 |
|
|
101 |
|
|
102 |
|
|
103 |
## -------- ## |
AT_CHECK_M4_MODTEST([--module-directory: absolute path], |
104 |
## modpath3 ## |
[], [-M $top_buildpath/modules]) |
|
## -------- ## |
|
|
|
|
|
AT_SETUP([modpath3]) |
|
105 |
|
|
106 |
AT_DATA([[in]], |
AT_CHECK_M4_MODTEST([--module-directory: relative path], |
107 |
[[test |
[], [-M $top_builddir/modules]) |
|
Dumpdef: dumpdef(`test'). |
|
|
]]) |
|
108 |
|
|
109 |
AT_CHECK([M4PATH=$top_srcdir m4 -m load -m modtest -M $top_builddir/modules -d in], 0, |
AT_CHECK_M4_MODTEST([LTDL_LIBRARY_PATH: absolute path], |
110 |
[[Test module called. |
[LTDL_LIBRARY_PATH=$top_buildpath/modules], []) |
|
Dumpdef: . |
|
|
]], |
|
|
[[test: <test> |
|
|
]]) |
|
|
|
|
|
AT_CLEANUP |
|
111 |
|
|
112 |
|
AT_CHECK_M4_MODTEST([LTDL_LIBRARY_PATH: relative path], |
113 |
|
[LTDL_LIBRARY_PATH=$top_builddir/modules], []) |
114 |
|
|
115 |
|
AT_CHECK_M4_MODTEST([M4MODPATH: absolute path], |
116 |
|
[M4MODPATH=$top_buildpath/modules], []) |
117 |
|
|
118 |
## -------- ## |
AT_CHECK_M4_MODTEST([M4MODPATH: relative path], |
119 |
## modpath4 ## |
[M4MODPATH=$top_builddir/modules], []) |
|
## -------- ## |
|
|
|
|
|
AT_SETUP([M4MODPATH: absolute path]) |
|
|
|
|
|
AT_CHECK([M4MODPATH=`cd $top_builddir/modules; pwd` M4PATH=$top_srcdir m4 -m load -d modules/modtest.m4], 0, |
|
|
[[Test module loaded. |
|
|
Test module called. |
|
|
Dumpdef: . |
|
|
]], |
|
|
[[test: <test> |
|
|
]]) |
|
|
|
|
|
AT_CLEANUP |
|
|
|
|
|
|
|
|
|
|
|
## ------- ## |
|
|
## modtest ## |
|
|
## ------- ## |
|
|
|
|
|
AT_SETUP([modtest]) |
|
|
|
|
|
AT_CHECK([M4PATH=$top_srcdir m4 -M $top_builddir/modules -m load -d modules/modtest.m4], 0, |
|
|
[[Test module loaded. |
|
|
Test module called. |
|
|
Dumpdef: . |
|
|
]], |
|
|
[[test: <test> |
|
|
]]) |
|
|
|
|
|
AT_CLEANUP |
|
120 |
|
|
121 |
|
|
122 |
|
|
126 |
|
|
127 |
AT_SETUP([shadow]) |
AT_SETUP([shadow]) |
128 |
|
|
129 |
AT_DATA([[shadow.m4]], |
AT_DATA([[input.m4]], |
130 |
[[# no modules loaded yet |
[[# no modules loaded yet |
131 |
test |
test |
132 |
shadow |
shadow |
251 |
shadow: <shadow> |
shadow: <shadow> |
252 |
]]) |
]]) |
253 |
|
|
254 |
AT_CHECK_M4([-m load shadow.m4], 0, |
AT_CHECK_M4([-m load input.m4], 0, |
255 |
[expout], [experr]) |
[expout], [experr]) |
256 |
|
|
257 |
AT_CLEANUP |
AT_CLEANUP |
264 |
|
|
265 |
AT_SETUP([unload]) |
AT_SETUP([unload]) |
266 |
|
|
267 |
AT_DATA([[in]], |
AT_DATA([[input.m4]], |
268 |
[[test |
[[test |
269 |
__test__ |
__test__ |
270 |
load(`modtest') |
load(`modtest') |
310 |
__test__ |
__test__ |
311 |
]]) |
]]) |
312 |
|
|
313 |
AT_CHECK_M4([-m load in], 0, expout) |
AT_CHECK_M4([-m load input.m4], 0, expout) |
314 |
|
|
315 |
AT_CLEANUP |
AT_CLEANUP |