blob: 14f5f51b2990cacd8f5434c21b798aedec62e316 (
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
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
#=============================================================================
# Copyright Kitware, Inc.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#=============================================================================
cmake_minimum_required(VERSION 2.8.5)
if(xml)
file(REMOVE "${xml}")
endif()
if(prologue)
include(${prologue})
endif()
execute_process(
COMMAND ${command}
OUTPUT_VARIABLE actual_stdout
ERROR_VARIABLE actual_stderr
RESULT_VARIABLE actual_result
)
if(xml)
set(maybe_xml xml)
if(EXISTS "${xml}")
file(READ "${xml}" actual_xml)
# Filter out arch-specific attributes.
string(REGEX REPLACE "(<(Constructor|Destructor|Method|OperatorMethod|Converter)[^/>]*) attributes=\"__thiscall__\"(/?>)" "\\1\\3" actual_xml "${actual_xml}")
else()
set(actual_xml "(missing)")
endif()
else()
set(maybe_xml)
endif()
set(default_result 0)
set(default_stdout "^$")
set(default_stderr "^$")
foreach(o result stdout stderr ${maybe_xml})
string(REGEX REPLACE "\n+$" "" actual_${o} "${actual_${o}}")
string(REGEX REPLACE "\n" "\n actual-${o}> " actual-${o} " actual-${o}> ${actual_${o}}")
set(actual-${o} "Actual ${o}:\n${actual-${o}}\n")
set(expect-${o} "")
unset(expect_${o})
foreach(e ${expect})
if(EXISTS ${CMAKE_CURRENT_LIST_DIR}/expect/${e}.${o}.txt)
file(READ ${CMAKE_CURRENT_LIST_DIR}/expect/${e}.${o}.txt expect_${o})
set(expect_${o}_file ${CMAKE_CURRENT_LIST_DIR}/expect/${e}.${o}.txt)
break()
endif()
endforeach()
if(NOT DEFINED expect_${o} AND DEFINED default_${o})
set(expect_${o} "${default_${o}}")
endif()
if(DEFINED expect_${o})
string(REGEX REPLACE "\n+$" "" expect_${o} "${expect_${o}}")
if(NOT "${actual_${o}}" MATCHES "${expect_${o}}")
set(msg "${msg}${o} does not match that expected.\n")
string(REGEX REPLACE "\n" "\n expect-${o}> " expect-${o} " expect-${o}> ${expect_${o}}")
set(expect-${o} "Expected ${o} to match:\n${expect-${o}}\n")
endif()
endif()
endforeach()
if(msg)
if("$ENV{TEST_UPDATE}" AND expect_xml_file AND EXISTS "${xml}")
set(update_xml "${actual_xml}")
string(REGEX REPLACE "^<\\?xml version=\"1.0\"\\?>" "^<\\\\?xml version=\"1.0\"\\\\?>" update_xml "${update_xml}")
string(REGEX REPLACE "<GCC_XML[^>]*>" "<GCC_XML[^>]*>" update_xml "${update_xml}")
string(REGEX REPLACE "mangled=\"[^\"]*\"" "mangled=\"[^\"]+\"" update_xml "${update_xml}")
string(REGEX REPLACE "artificial=\"1\"( throw=\"\")?" "artificial=\"1\"( throw=\"\")?" update_xml "${update_xml}")
string(REGEX REPLACE "size=\"[0-9]+\" align=\"[0-9]+\"" "size=\"[0-9]+\" align=\"[0-9]+\"" update_xml "${update_xml}")
string(REGEX REPLACE "<File id=\"(f[0-9]+)\" name=\"[^\"]*/test/input/([^\"]*)\"/>" "<File id=\"\\1\" name=\".*/test/input/\\2\"/>" update_xml "${update_xml}")
string(REGEX REPLACE "</GCC_XML>$" "</GCC_XML>$" update_xml "${update_xml}")
file(WRITE "${expect_xml_file}" "${update_xml}\n")
endif()
string(REPLACE ";" "\" \"" command_string "\"${command}\"")
set(msg "${msg}Command was:\n command> ${command_string}\n")
message(SEND_ERROR
"${msg}"
"${expect-result}"
"${expect-stdout}"
"${expect-stderr}"
"${expect-xml}"
"${actual-result}"
"${actual-stdout}"
"${actual-stderr}"
"${actual-xml}"
)
endif()
if(xmllint AND xml AND EXISTS "${xml}")
execute_process(
COMMAND ${xmllint} --noout --nonet "${xml}"
OUTPUT_VARIABLE xmllint_stdout
ERROR_VARIABLE xmllint_stderr
RESULT_VARIABLE xmllint_result
)
if(xmllint_result)
foreach(o result stdout stderr)
string(REGEX REPLACE "\n+$" "" xmllint_${o} "${xmllint_${o}}")
string(REGEX REPLACE "\n" "\n xmllint-${o}> " xmllint-${o} " xmllint-${o}> ${xmllint_${o}}")
set(xmllint-${o} "xmllint ${o}:\n${xmllint-${o}}\n")
endforeach()
message(SEND_ERROR
"xmllint check failed:\n"
"${msg}"
"${xmllint-result}"
"${xmllint-stdout}"
"${xmllint-stderr}"
)
endif()
endif()
|
