StringTestScript.cmake 9.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282
  1. message(STATUS "testname='${testname}'")
  2. if(testname STREQUAL empty) # fail
  3. string()
  4. elseif(testname STREQUAL bogus) # fail
  5. string(BOGUS)
  6. elseif(testname STREQUAL random) # pass
  7. string(RANDOM r)
  8. message(STATUS "r='${r}'")
  9. elseif(testname STREQUAL toupper_no_variable) # fail
  10. string(TOUPPER)
  11. elseif(testname STREQUAL ascii_no_variable) # fail
  12. string(ASCII)
  13. elseif(testname STREQUAL ascii_code_too_small) # fail
  14. string(ASCII -1 bummer)
  15. elseif(testname STREQUAL ascii_code_too_large) # fail
  16. string(ASCII 288 bummer)
  17. elseif(testname STREQUAL configure_no_input) # fail
  18. string(CONFIGURE)
  19. elseif(testname STREQUAL configure_no_variable) # fail
  20. string(CONFIGURE "this is @testname@")
  21. elseif(testname STREQUAL configure_escape_quotes) # pass
  22. string(CONFIGURE "this is @testname@" v ESCAPE_QUOTES)
  23. message(STATUS "v='${v}'")
  24. elseif(testname STREQUAL configure_bogus) # fail
  25. string(CONFIGURE "this is @testname@" v ESCAPE_QUOTES BOGUS)
  26. elseif(testname STREQUAL regex_no_mode) # fail
  27. string(REGEX)
  28. elseif(testname STREQUAL regex_match_not_enough_args) # fail
  29. string(REGEX MATCH)
  30. elseif(testname STREQUAL regex_matchall_not_enough_args) # fail
  31. string(REGEX MATCHALL)
  32. elseif(testname STREQUAL regex_replace_not_enough_args) # fail
  33. string(REGEX REPLACE)
  34. elseif(testname STREQUAL regex_bogus_mode) # fail
  35. string(REGEX BOGUS)
  36. elseif(testname STREQUAL regex_match_multiple_inputs) # pass
  37. string(REGEX MATCH ".*" v input1 input2 input3 input4)
  38. message(STATUS "v='${v}'")
  39. elseif(testname STREQUAL regex_match_bad_regex) # fail
  40. string(REGEX MATCH "(.*" v input)
  41. elseif(testname STREQUAL regex_match_empty_string) # fail
  42. string(REGEX MATCH "x*" v "")
  43. elseif(testname STREQUAL regex_match_no_match) # pass
  44. string(REGEX MATCH "xyz" v "abc")
  45. message(STATUS "v='${v}'")
  46. elseif(testname STREQUAL regex_matchall_multiple_inputs) # pass
  47. string(REGEX MATCHALL "input" v input1 input2 input3 input4)
  48. message(STATUS "v='${v}'")
  49. elseif(testname STREQUAL regex_matchall_bad_regex) # fail
  50. string(REGEX MATCHALL "(.*" v input)
  51. elseif(testname STREQUAL regex_matchall_empty_string) # fail
  52. string(REGEX MATCHALL "x*" v "")
  53. elseif(testname STREQUAL regex_replace_ends_with_backslash) # fail
  54. string(REGEX REPLACE "input" "output\\" v input1 input2 input3 input4)
  55. elseif(testname STREQUAL regex_replace_ends_with_escaped_backslash) # pass
  56. string(REGEX REPLACE "input" "output\\\\" v input1 input2 input3 input4)
  57. message(STATUS "v='${v}'")
  58. elseif(testname STREQUAL regex_replace_has_linefeed) # pass
  59. string(REGEX REPLACE "input" "output\\n" v input1 input2 input3 input4)
  60. message(STATUS "v='${v}'")
  61. elseif(testname STREQUAL regex_replace_has_bogus_escape) # fail
  62. string(REGEX REPLACE "input" "output\\a" v input1 input2 input3 input4)
  63. elseif(testname STREQUAL regex_replace_bad_regex) # fail
  64. string(REGEX REPLACE "this (.*" "with that" v input)
  65. elseif(testname STREQUAL regex_replace_empty_string) # fail
  66. string(REGEX REPLACE "x*" "that" v "")
  67. elseif(testname STREQUAL regex_replace_index_too_small) # fail
  68. string(REGEX REPLACE "^this (.*)$" "with \\1 \\-1" v "this input")
  69. elseif(testname STREQUAL regex_replace_index_too_large) # fail
  70. string(REGEX REPLACE "^this (.*)$" "with \\1 \\2" v "this input")
  71. elseif(testname STREQUAL compare_no_mode) # fail
  72. string(COMPARE)
  73. elseif(testname STREQUAL compare_bogus_mode) # fail
  74. string(COMPARE BOGUS)
  75. elseif(testname STREQUAL compare_not_enough_args) # fail
  76. string(COMPARE EQUAL)
  77. elseif(testname STREQUAL replace_not_enough_args) # fail
  78. string(REPLACE)
  79. elseif(testname STREQUAL replace_multiple_inputs) # pass
  80. string(REPLACE "input" "output" v input1 input2 input3 input4)
  81. message(STATUS "v='${v}'")
  82. elseif(testname STREQUAL substring_not_enough_args) # fail
  83. string(SUBSTRING)
  84. elseif(testname STREQUAL substring_begin_too_large) # fail
  85. string(SUBSTRING "abcdefg" 25 100 v)
  86. elseif(testname STREQUAL substring_end_larger_than_strlen) # pass
  87. string(SUBSTRING "abcdefg" 1 100 v)
  88. elseif(testname STREQUAL substring_begin_less_than_zero) # fail
  89. string(SUBSTRING "abcdefg" -1 4 v)
  90. elseif(testname STREQUAL substring_end_less_than_zero) # pass
  91. string(SUBSTRING "abcdefg" 0 -1 v)
  92. elseif(testname STREQUAL substring_end_less_than_begin) # pass
  93. string(SUBSTRING "abcdefg" 6 0 v)
  94. elseif(testname STREQUAL length_not_enough_args) # fail
  95. string(LENGTH)
  96. elseif(testname STREQUAL strip_not_enough_args) # fail
  97. string(STRIP)
  98. elseif(testname STREQUAL random_not_enough_args) # fail
  99. string(RANDOM)
  100. elseif(testname STREQUAL random_3_args) # fail
  101. string(RANDOM LENGTH 9)
  102. elseif(testname STREQUAL random_5_args) # fail
  103. string(RANDOM LENGTH 9 ALPHABET "aceimnorsuvwxz")
  104. elseif(testname STREQUAL random_with_length) # pass
  105. string(RANDOM LENGTH 9 v)
  106. message(STATUS "v='${v}'")
  107. elseif(testname STREQUAL random_with_alphabet) # pass
  108. string(RANDOM ALPHABET "aceimnorsuvwxz" v)
  109. message(STATUS "v='${v}'")
  110. elseif(testname STREQUAL random_bad_length) # fail
  111. string(RANDOM LENGTH 0 v)
  112. elseif(testname STREQUAL random_empty_alphabet) # pass
  113. string(RANDOM ALPHABET "" v)
  114. message(STATUS "v='${v}'")
  115. elseif(testname STREQUAL random_with_length_and_alphabet) # pass
  116. string(RANDOM LENGTH 9 ALPHABET "aceimnorsuvwxz" v)
  117. message(STATUS "v='${v}'")
  118. elseif(testname STREQUAL random_with_various_alphabets) # pass
  119. # small alphabet
  120. string(RANDOM LENGTH 32 ALPHABET "ACGT" v)
  121. message(STATUS "v='${v}'")
  122. # smaller alphabet
  123. string(RANDOM LENGTH 32 ALPHABET "AB" v)
  124. message(STATUS "v='${v}'")
  125. # smallest alphabet
  126. string(RANDOM LENGTH 32 ALPHABET "Z" v)
  127. message(STATUS "v='${v}'")
  128. # smallest length and alphabet
  129. string(RANDOM LENGTH 1 ALPHABET "Q" v)
  130. message(STATUS "v='${v}'")
  131. # seed values -- 2 same, then 1 different
  132. string(RANDOM LENGTH 32 ALPHABET "ACGT" RANDOM_SEED 987654 v)
  133. message(STATUS "v='${v}'")
  134. string(RANDOM LENGTH 32 ALPHABET "ACGT" RANDOM_SEED 987654 v)
  135. message(STATUS "v='${v}'")
  136. string(RANDOM LENGTH 32 ALPHABET "ACGT" RANDOM_SEED 876543 v)
  137. message(STATUS "v='${v}'")
  138. # alphabet of many colors - use all the crazy keyboard characters
  139. string(RANDOM LENGTH 78 ALPHABET "~`!@#$%^&*()_-+={}[]\\|:\\;'\",.<>/?" v)
  140. message(STATUS "v='${v}'")
  141. message(STATUS "CMAKE_SCRIPT_MODE_FILE='${CMAKE_SCRIPT_MODE_FILE}'")
  142. elseif(testname STREQUAL string_find_with_no_parameter) # fail
  143. string(FIND)
  144. elseif(testname STREQUAL string_find_with_one_parameter) # fail
  145. string(FIND "CMake is great.")
  146. elseif(testname STREQUAL string_find_with_two_parameters) # fail
  147. string(FIND "CMake is great." "a")
  148. elseif(testname STREQUAL string_find_with_three_parameters) # pass
  149. string(FIND "CMake is great." "a" v)
  150. message(STATUS "v='${v}'")
  151. elseif(testname STREQUAL string_find_with_four_parameters) # fail
  152. string(FIND "CMake is great." "a" v v2)
  153. elseif(testname STREQUAL string_find_reverse_with_no_parameter) # fail
  154. string(FIND REVERSE)
  155. elseif(testname STREQUAL string_find_reverse_with_one_parameter) # fail
  156. string(FIND "CMake is great." REVERSE)
  157. elseif(testname STREQUAL string_find_reverse_with_two_parameters) # fail
  158. string(FIND "CMake is great." "a" REVERSE)
  159. elseif(testname STREQUAL string_find_reverse_with_three_parameters) # pass
  160. string(FIND "CMake is great." "a" v REVERSE)
  161. message(STATUS "v='${v}'")
  162. elseif(testname STREQUAL string_find_reverse_with_four_parameters_part1) # fail
  163. string(FIND "CMake is great." "a" v v2 REVERSE)
  164. elseif(testname STREQUAL string_find_reverse_with_four_parameters_part2) # fail
  165. string(FIND "CMake is great." "a" v REVERSE v2)
  166. elseif(testname STREQUAL string_find_with_no_possible_result) # pass
  167. string(FIND "CMake is a great application." "z" v)
  168. message(STATUS "v='${v}'")
  169. if(NOT(-1 EQUAL ${v}))
  170. message(SEND_ERROR "FIND sub-command should return -1 but returned ${v}.")
  171. endif()
  172. elseif(testname STREQUAL string_find_reverse_with_no_possible_result) # pass
  173. string(FIND "CMake is a great application." "z" v REVERSE)
  174. message(STATUS "v='${v}'")
  175. if(NOT(-1 EQUAL ${v}))
  176. message(SEND_ERROR "FIND REVERSE sub-command should return -1 but returned ${v}.")
  177. endif()
  178. elseif(testname STREQUAL string_find_with_required_result) # pass
  179. string(FIND "CMake is a great application." "g" v)
  180. message(STATUS "v='${v}'")
  181. if(NOT(11 EQUAL ${v}))
  182. message(SEND_ERROR "FIND sub-command should return 11 but returned ${v}.")
  183. endif()
  184. elseif(testname STREQUAL string_find_reverse_with_required_result) # pass
  185. string(FIND "CMake is a great application." "e" v REVERSE)
  186. message(STATUS "v='${v}'")
  187. if(NOT(13 EQUAL ${v}))
  188. message(SEND_ERROR "FIND REVERSE sub-command should return 13 but returned ${v}.")
  189. endif()
  190. elseif(testname STREQUAL string_find_word_reverse_with_required_result) # pass
  191. string(FIND "The command should find REVERSE in this string. Or maybe this REVERSE?!" "REVERSE" v)
  192. message(STATUS "v='${v}'")
  193. if(NOT(24 EQUAL ${v}))
  194. message(SEND_ERROR "FIND sub-command should return 24 but returned ${v}.")
  195. endif()
  196. elseif(testname STREQUAL string_find_reverse_word_reverse_with_required_result) # pass
  197. string(FIND "The command should find REVERSE in this string. Or maybe this REVERSE?!" "REVERSE" v REVERSE)
  198. message(STATUS "v='${v}'")
  199. if(NOT(62 EQUAL ${v}))
  200. message(SEND_ERROR "FIND sub-command should return 62 but returned ${v}.")
  201. endif()
  202. else() # fail
  203. message(FATAL_ERROR "testname='${testname}' - error: no such test in '${CMAKE_CURRENT_LIST_FILE}'")
  204. endif()