diff --git a/.yamato/build_linux_x64.yml b/.yamato/build_linux_x64.yml index 493fd0086fe2a0..57cd0c132d1b98 100644 --- a/.yamato/build_linux_x64.yml +++ b/.yamato/build_linux_x64.yml @@ -22,7 +22,7 @@ commands: cmake --build . - ./build.sh -subset clr+libs+libs -a x64 -c release -ci -ninja - cp unity/unitygc/release/libunitygc.so artifacts/bin/microsoft.netcore.app.runtime.linux-x64/Release/runtimes/linux-x64/native - - artifacts/7za-linux-x64/7za a artifacts/unity/$ARTIFACT_FILENAME ./artifacts/bin/microsoft.netcore.app.runtime.linux-x64/Release/runtimes/linux-x64 + - artifacts/7za-linux-x64/7za a artifacts/unity/$ARTIFACT_FILENAME ./artifacts/bin/microsoft.netcore.app.runtime.linux-x64/Release/runtimes/linux-x64/* artifacts: linux-x64-7z: diff --git a/.yamato/build_osx_arm64.yml b/.yamato/build_osx_arm64.yml new file mode 100644 index 00000000000000..ecaaa63b55884d --- /dev/null +++ b/.yamato/build_osx_arm64.yml @@ -0,0 +1,33 @@ +{% metadata_file .yamato/Globals.metafile %} +--- +name: Build OSX ARM64 + +agent: + type: Unity::VM::osx + image: platform-foundation/mac-10.15-bokken:latest + flavor: m1.mac + +variables: + ARTIFACT_FILENAME: {{globals.artifact_base_name}}-osx-arm64.7z + +commands: + - mkdir artifacts + - curl https://public-stevedore.unity3d.com/r/public/7za-mac-x64/e6c75fb7ffda_5bd76652986a0e3756d1cfd7e84ce056a9e1dbfc5f70f0514a001f724c0fbad2.zip --output artifacts/7za-mac-x64.zip + - unzip artifacts/7za-mac-x64.zip -d artifacts/7za-mac-x64 + - | + cd unity/unitygc + mkdir release + cd release + cmake -DCMAKE_OSX_ARCHITECTURES=arm64 -DCMAKE_BUILD_TYPE=Release .. + cmake --build . + - LD_LIBRARY_PATH=/usr/local/opt/openssl/lib ./build.sh -subset clr+libs -a arm64 -c release -cross -ci -ninja /p:CrossBuild=true + - cp unity/unitygc/release/libunitygc.dylib artifacts/bin/microsoft.netcore.app.runtime.osx-arm64/Release/runtimes/osx-arm64/native + - artifacts/7za-mac-x64/7za a artifacts/unity/$ARTIFACT_FILENAME ./artifacts/bin/microsoft.netcore.app.runtime.osx-arm64/Release/runtimes/osx-arm64/* + +artifacts: + osx-arm64-7z: + paths: + - artifacts/unity/** + osx-arm64: + paths: + - artifacts/bin/** diff --git a/.yamato/build_osx_x64.yml b/.yamato/build_osx_x64.yml index d01b77d305e3e6..a53c437118ab65 100644 --- a/.yamato/build_osx_x64.yml +++ b/.yamato/build_osx_x64.yml @@ -22,7 +22,7 @@ commands: cmake --build . - LD_LIBRARY_PATH=/usr/local/opt/openssl/lib ./build.sh -subset clr+libs -a x64 -c release -ci -ninja - cp unity/unitygc/release/libunitygc.dylib artifacts/bin/microsoft.netcore.app.runtime.osx-x64/Release/runtimes/osx-x64/native - - artifacts/7za-mac-x64/7za a artifacts/unity/$ARTIFACT_FILENAME ./artifacts/bin/microsoft.netcore.app.runtime.osx-x64/Release/runtimes/osx-x64 + - artifacts/7za-mac-x64/7za a artifacts/unity/$ARTIFACT_FILENAME ./artifacts/bin/microsoft.netcore.app.runtime.osx-x64/Release/runtimes/osx-x64/* artifacts: osx-x64-7z: diff --git a/.yamato/build_windows.yml b/.yamato/build_windows.yml index 7d3470bbbc427f..4cd3fba3b00072 100644 --- a/.yamato/build_windows.yml +++ b/.yamato/build_windows.yml @@ -18,7 +18,7 @@ commands: - build.cmd -subset clr+libs -a x86 -c release -ci - copy unity\unitygc\Release\unitygc.dll artifacts\bin\microsoft.netcore.app.runtime.win-x86\Release\runtimes\win-x86\native - powershell .yamato\scripts\download_7z.ps1 - - artifacts\7za-win-x64\7za.exe a artifacts\unity\%ARTIFACT_FILENAME% .\artifacts\bin\microsoft.netcore.app.runtime.win-x86\Release\runtimes\win-x86 + - artifacts\7za-win-x64\7za.exe a artifacts\unity\%ARTIFACT_FILENAME% .\artifacts\bin\microsoft.netcore.app.runtime.win-x86\Release\runtimes\win-x86\* artifacts: win-x86-7z: diff --git a/.yamato/build_windows_x64.yml b/.yamato/build_windows_x64.yml index 21f8363220f456..d3b056b7833a19 100644 --- a/.yamato/build_windows_x64.yml +++ b/.yamato/build_windows_x64.yml @@ -18,7 +18,7 @@ commands: - build.cmd -subset clr+libs -a x64 -c release -ci - copy unity\unitygc\Release\unitygc.dll artifacts\bin\microsoft.netcore.app.runtime.win-x64\Release\runtimes\win-x64\native - powershell .yamato\scripts\download_7z.ps1 - - artifacts\7za-win-x64\7za.exe a artifacts\unity\%ARTIFACT_FILENAME% .\artifacts\bin\microsoft.netcore.app.runtime.win-x64\Release\runtimes\win-x64 + - artifacts\7za-win-x64\7za.exe a artifacts\unity\%ARTIFACT_FILENAME% .\artifacts\bin\microsoft.netcore.app.runtime.win-x64\Release\runtimes\win-x64\* artifacts: win-x64-7z: diff --git a/.yamato/test_linux_x64.yml b/.yamato/test_linux_x64.yml index b9eb9970a13ebe..2b4f0d0293971a 100644 --- a/.yamato/test_linux_x64.yml +++ b/.yamato/test_linux_x64.yml @@ -12,6 +12,12 @@ dependencies: commands: # build/run tests +# - dotnet build unity/managed.sln -c Release +# - | +# cd unity/embed_api_tests +# cmake -DCMAKE_BUILD_TYPE=Release . +# cmake --build . +# ./mono_test_app - ./build.sh -subset libs.tests -test -a x64 -c release -ci -ninja - command: ./src/tests/build.sh x64 release ci retries: 1 diff --git a/.yamato/test_osx_arm64.yml b/.yamato/test_osx_arm64.yml new file mode 100644 index 00000000000000..4f316a4a748a1b --- /dev/null +++ b/.yamato/test_osx_arm64.yml @@ -0,0 +1,32 @@ +{% metadata_file .yamato/Globals.metafile %} +--- +name: Test OSX ARM64 + +agent: + type: Unity::VM::osx + image: platform-foundation/mac-bokken:v0.1.8-972754 + flavor: m1.mac + +dependencies: + - path: .yamato/build_osx_arm64.yml + +commands: +# build/run tests + - dotnet build unity/managed.sln -c Release + - | + cd unity/embed_api_tests + cmake -DCMAKE_BUILD_TYPE=Release . + cmake --build . + ./mono_test_app + - LD_LIBRARY_PATH=/usr/local/opt/openssl/lib ./build.sh -subset libs.tests -test -a arm64 -c release -ci -ninja + - ./src/tests/build.sh arm64 release ci + - ./src/tests/run.sh arm64 release + - ./build.sh clr.paltests + - ./artifacts/bin/coreclr/OSX.arm64.Debug/paltests/runpaltests.sh $(pwd)/artifacts/bin/coreclr/OSX.arm64.Debug/paltests + +## Don't run OSX ARM64 tests for PRs until we have hardware to actually run it +# triggers: +# pull_requests: +# - targets: +# only: +# - "unity-main" diff --git a/.yamato/test_osx_x64.yml b/.yamato/test_osx_x64.yml index 5c485bf07d4543..3b4053f7fd3e0a 100644 --- a/.yamato/test_osx_x64.yml +++ b/.yamato/test_osx_x64.yml @@ -12,6 +12,12 @@ dependencies: commands: # build/run tests + - dotnet build unity/managed.sln -c Release + - | + cd unity/embed_api_tests + cmake -DCMAKE_BUILD_TYPE=Release . + cmake --build . + ./mono_test_app - LD_LIBRARY_PATH=/usr/local/opt/openssl/lib ./build.sh -subset libs.tests -test -a x64 -c release -ci -ninja - ./src/tests/build.sh x64 release ci - ./src/tests/run.sh x64 release diff --git a/.yamato/test_windows.yml b/.yamato/test_windows.yml index a57e7be31494ab..627b6245caa450 100644 --- a/.yamato/test_windows.yml +++ b/.yamato/test_windows.yml @@ -12,6 +12,12 @@ dependencies: commands: # build/run tests + - dotnet build unity\managed.sln -c Release +# - | +# cd unity\embed_api_tests +# cmake . -A Win32 +# cmake --build . --config Release +# Release\mono_test_app.exe - build.cmd libs.tests -test -a x86 -c release -ci - src\tests\build.cmd x86 release ci - src\tests\run.cmd x86 release diff --git a/.yamato/test_windows_x64.yml b/.yamato/test_windows_x64.yml index 131d92feb46555..81756b4da08967 100644 --- a/.yamato/test_windows_x64.yml +++ b/.yamato/test_windows_x64.yml @@ -12,6 +12,12 @@ dependencies: commands: # build/run tests + - dotnet build unity\managed.sln -c Release + - | + cd unity\embed_api_tests + cmake . + cmake --build . --config Release + Release\mono_test_app.exe - build.cmd libs.tests -test -a x64 -c release -ci - src\tests\build.cmd x64 release ci - src\tests\run.cmd x64 release diff --git a/src/coreclr/clrdefinitions.cmake b/src/coreclr/clrdefinitions.cmake index 533d5255002b49..d3d7b577da937e 100644 --- a/src/coreclr/clrdefinitions.cmake +++ b/src/coreclr/clrdefinitions.cmake @@ -103,6 +103,15 @@ if(FEATURE_EVENT_TRACE) else(FEATURE_EVENT_TRACE) add_custom_target(eventing_headers) # add a dummy target to avoid checking for FEATURE_EVENT_TRACE in multiple places endif(FEATURE_EVENT_TRACE) +if(FEATURE_UNITY_EMBEDDING_INTERFACE) + add_definitions(-DFEATURE_UNITY_EMBEDDING_INTERFACE) + add_definitions(-DFEATURE_UNITY_GCNAME_API) + add_definitions(-DFEATURE_UNITY_METHODTABLE_USER_DATA) + add_definitions(-DFEATURE_UNITY_ECALL_DYNAMIC_REGISTRATION) + add_definitions(-DFEATURE_UNITY_ASSEMBLY_MEMORY_PATH) + add_definitions(-DFEATURE_UNITY_MODULE_NUM_TYPEDEFS) + add_definitions(-DFEATURE_UNITY_EXPLICIT_LAYOUT_INHERITANCE) +endif() if(FEATURE_GDBJIT) add_definitions(-DFEATURE_GDBJIT) endif() diff --git a/src/coreclr/clrfeatures.cmake b/src/coreclr/clrfeatures.cmake index f82ff1aa4e73e9..356b4630dbdc41 100644 --- a/src/coreclr/clrfeatures.cmake +++ b/src/coreclr/clrfeatures.cmake @@ -39,3 +39,8 @@ endif() if (CLR_CMAKE_TARGET_OSX OR CLR_CMAKE_TARGET_MACCATALYST OR CLR_CMAKE_TARGET_IOS OR CLR_CMAKE_TARGET_TVOS) set(FEATURE_OBJCMARSHAL 1) endif() + +# should default this to 0 once we figure out how to enable in build scripting +if(NOT DEFINED FEATURE_UNITY_EMBEDDING_INTERFACE) + set(FEATURE_UNITY_EMBEDDING_INTERFACE 1) +endif(NOT DEFINED FEATURE_UNITY_EMBEDDING_INTERFACE) diff --git a/src/coreclr/dlls/mscoree/coreclr/CMakeLists.txt b/src/coreclr/dlls/mscoree/coreclr/CMakeLists.txt index 31c5b0151ff7f7..0f2e83633bc27e 100644 --- a/src/coreclr/dlls/mscoree/coreclr/CMakeLists.txt +++ b/src/coreclr/dlls/mscoree/coreclr/CMakeLists.txt @@ -110,6 +110,14 @@ set(CORECLR_LIBRARIES coreclrminipal ) +if(FEATURE_UNITY_EMBEDDING_INTERFACE) + list(APPEND CORECLR_LIBRARIES + ${START_WHOLE_ARCHIVE} # force all PAL objects to be included so all exports are available + mono + ${END_WHOLE_ARCHIVE} + ) +endif(FEATURE_UNITY_EMBEDDING_INTERFACE) + if(CLR_CMAKE_TARGET_WIN32) list(APPEND CORECLR_LIBRARIES ${STATIC_MT_CRT_LIB} diff --git a/src/coreclr/dlls/mscoree/mscorwks_ntdef.src b/src/coreclr/dlls/mscoree/mscorwks_ntdef.src index 987f67bc36aff4..9eff09d9c68a3e 100644 --- a/src/coreclr/dlls/mscoree/mscorwks_ntdef.src +++ b/src/coreclr/dlls/mscoree/mscorwks_ntdef.src @@ -27,3 +27,306 @@ EXPORTS ; Used by profilers MetaDataGetDispenser + + ; mono + coreclr_array_length + coreclr_class_from_systemtypeinstance + mono_add_internal_call + mono_array_addr_with_size + mono_array_class_get + mono_array_element_size + mono_array_new + mono_assembly_close + mono_assembly_fill_assembly_name + mono_assembly_foreach + mono_assembly_get_image + mono_assembly_get_object + mono_assembly_load_from + mono_assembly_load_from_full + mono_assembly_loaded + mono_assembly_name_free + mono_assembly_name_parse + mono_assembly_open + mono_class_array_element_size + mono_class_enum_basetype + mono_class_from_mono_type + mono_class_from_name + mono_class_from_name_case + mono_class_get + mono_class_get_byref_type + mono_class_get_element_class + mono_class_get_field_from_name + mono_class_get_fields + mono_class_get_flags + mono_class_get_image + mono_class_get_interfaces + mono_class_get_method_from_name + mono_class_get_methods + mono_class_get_name + mono_class_get_namespace + mono_class_get_nested_types + mono_class_get_nesting_type + mono_class_get_parent + mono_class_get_properties + mono_class_get_property_from_name + mono_class_get_rank + mono_class_get_type + mono_class_get_type_token + mono_class_get_userdata + mono_class_get_userdata_offset + mono_class_instance_size + mono_class_is_blittable + mono_class_is_enum + mono_class_is_generic + mono_class_is_inflated + mono_class_is_subclass_of + mono_class_is_valuetype + mono_class_set_userdata + mono_class_vtable + mono_config_parse + mono_custom_attrs_construct + mono_custom_attrs_free + mono_custom_attrs_from_assembly + mono_custom_attrs_from_class + mono_custom_attrs_from_field + mono_custom_attrs_from_method + mono_custom_attrs_from_property + mono_custom_attrs_get_attr + mono_custom_attrs_get_attrs + mono_custom_attrs_has_attr + mono_debug_free_source_location + mono_debug_init + mono_debug_lookup_source_location + mono_debug_open_image_from_memory + mono_debugger_install_attach_detach_callback + mono_debugger_set_generate_debug_info + mono_dl_fallback_register + mono_dl_fallback_unregister + mono_dllmap_insert + mono_domain_assembly_open + mono_domain_create_appdomain + mono_domain_finalize + mono_domain_get + mono_domain_get_id + mono_domain_set + mono_domain_unload + mono_enter_internal_call + mono_error_cleanup + mono_error_get_error_code + mono_error_get_message + mono_error_init + mono_error_ok + mono_exception_from_name_msg + mono_exception_from_name_two_strings + mono_exit_internal_call + mono_field_from_token + mono_field_get_flags + mono_field_get_name + mono_field_get_object + mono_field_get_offset + mono_field_get_parent + mono_field_get_type + mono_field_get_type_specific + mono_field_get_value + mono_field_set_value + mono_field_static_get_value + mono_gc_collect + mono_gc_collect_a_little + mono_gc_get_heap_size + mono_gc_get_max_time_slice_ns + mono_gc_get_used_size + mono_gc_is_incremental + mono_gc_set_incremental + mono_gc_set_max_time_slice_ns + mono_gc_max_generation + mono_gc_wbarrier_generic_store + mono_gc_wbarrier_set_field + mono_gchandle_free + mono_gchandle_free_v2 + mono_gchandle_get_target + mono_gchandle_get_target_v2 + mono_gchandle_is_in_domain + mono_gchandle_is_in_domain_v2 + mono_gchandle_new + mono_gchandle_new_v2 + mono_gchandle_new_weakref + mono_gchandle_new_weakref_v2 + mono_get_array_class + mono_get_boolean_class + mono_get_byte_class + mono_get_char_class + mono_get_corlib + mono_get_double_class + mono_get_enum_class + mono_get_exception_argument_null + mono_get_exception_class + mono_get_int16_class + mono_get_int32_class + mono_get_int64_class + mono_get_method + mono_get_object_class + mono_get_root_domain + mono_get_single_class + mono_get_string_class + mono_image_close + mono_image_get_assembly + mono_image_get_filename + mono_image_get_name + mono_image_get_table_info + mono_image_get_table_rows + mono_image_loaded + mono_image_open_from_data_full + mono_image_open_from_data_with_name + mono_image_strerror + mono_is_debugger_attached + mono_jit_info_get_code_size + mono_jit_info_get_code_start + mono_jit_info_table_find + mono_jit_init + mono_jit_init_version + mono_jit_parse_options + mono_metadata_decode_row + mono_metadata_signature_equal + mono_metadata_type_equal + mono_method_full_name + mono_method_get_class + mono_method_get_last_managed + mono_method_get_name + mono_method_get_object + mono_method_signature + mono_method_signature_checked + mono_method_signature_checked_slow + mono_object_get_class + mono_object_get_size + mono_object_get_virtual_method + mono_object_isinst + mono_object_new + mono_object_new_alloc_specific + mono_object_new_specific + mono_object_unbox + mono_parse_default_optimizations + mono_pmip + mono_profiler_create + mono_profiler_install + mono_profiler_install_allocation + mono_profiler_install_enter_leave + mono_profiler_install_gc + mono_profiler_install_jit_end + mono_profiler_install_thread + mono_profiler_load + mono_profiler_set_events + mono_property_get_get_method + mono_raise_exception + mono_reflection_get_custom_attrs_by_type + mono_runtime_cleanup + mono_runtime_delegate_invoke + mono_runtime_exec_main + mono_runtime_invoke + mono_runtime_invoke_array + mono_runtime_invoke_with_nested_object + mono_runtime_is_shutting_down + mono_runtime_object_init + mono_runtime_set_shutting_down + mono_runtime_unhandled_exception_policy_set + mono_set_assemblies_path + mono_set_assemblies_path_null_separated + mono_set_break_policy + mono_set_defaults + mono_set_dirs + mono_set_find_plugin_callback + mono_set_ignore_version_and_key_when_finding_assemblies_already_loaded + mono_set_signal_chaining + mono_signature_get_param_count + mono_signature_get_params + mono_signature_get_return_type + mono_signature_is_instance + mono_stack_walk + mono_stack_walk_no_il + mono_string_from_utf16 + mono_string_new_len + mono_string_new_utf16 + mono_string_new_wrapper + mono_string_to_utf16 + mono_string_to_utf8 + mono_stringify_assembly_name + mono_thread_attach + mono_thread_current + mono_thread_detach + mono_thread_exit + mono_thread_has_sufficient_execution_stack + mono_thread_pool_cleanup + mono_thread_pop_appdomain_ref + mono_thread_push_appdomain_ref + mono_thread_set_main + mono_thread_suspend_all_other_threads + mono_threads_set_shutting_down + mono_trace_set_level_string + mono_trace_set_log_handler + mono_trace_set_mask_string + mono_type_get_attrs + mono_type_get_class + mono_type_get_generic_arg + mono_type_get_name + mono_type_get_name_full + mono_type_get_num_generic_args + mono_type_get_object + mono_type_get_type + mono_type_is_byref + mono_unity_allocation_granularity + mono_unity_array_new_2d + mono_unity_array_new_3d + mono_unity_array_object_header_size + mono_unity_assembly_mempool_chunk_foreach + mono_unity_capture_memory_snapshot + mono_unity_class_field_is_literal + mono_unity_class_for_each + mono_unity_class_get + mono_unity_class_get_data_size + mono_unity_class_get_generic_type_definition + mono_unity_class_has_failure + mono_unity_class_is_abstract + mono_unity_class_is_interface + mono_unity_class_is_open_constructed_type + mono_unity_class_try_get_vtable + mono_unity_custom_attrs_construct + mono_unity_domain_mempool_chunk_foreach + mono_unity_domain_set_config + mono_unity_error_convert_to_exception + mono_unity_field_from_token_checked + mono_unity_free_captured_memory_snapshot + mono_unity_g_free + mono_unity_gc_disable + mono_unity_gc_enable + mono_unity_gc_handles_foreach_get_target + mono_unity_gc_heap_foreach + mono_unity_gc_is_disabled + mono_unity_gc_set_mode + mono_unity_image_set_mempool_chunk_foreach + mono_unity_jit_cleanup + mono_unity_liveness_allocate_struct + mono_unity_liveness_calculation_from_root + mono_unity_liveness_calculation_from_statics + mono_unity_liveness_finalize + mono_unity_liveness_free_struct + mono_unity_loader_get_last_error_and_error_prepare_exception + mono_unity_managed_callstack + mono_unity_object_header_size + mono_unity_offset_of_array_bounds_in_array_object_header + mono_unity_offset_of_array_length_in_array_object_header + mono_unity_root_domain_mempool_chunk_foreach + mono_unity_runtime_set_main_args + mono_unity_set_data_dir + mono_unity_set_embeddinghostname + mono_unity_set_vprintf_func + mono_unity_start_gc_world + mono_unity_stop_gc_world + mono_unity_string_empty_wrapper + mono_unity_type_get_name_full_chunked + mono_unity_type_is_pointer_type + mono_unity_type_is_static + mono_unity_vtable_get_static_field_data + mono_value_box + mono_verifier_set_mode + unity_mono_method_is_generic + unity_mono_method_is_inflated + unity_mono_reflection_method_get_method \ No newline at end of file diff --git a/src/coreclr/dlls/mscoree/mscorwks_unixexports.src b/src/coreclr/dlls/mscoree/mscorwks_unixexports.src index ebf0556e7a870d..e47162061f10fb 100644 --- a/src/coreclr/dlls/mscoree/mscorwks_unixexports.src +++ b/src/coreclr/dlls/mscoree/mscorwks_unixexports.src @@ -13,3 +13,309 @@ g_dacTable ; Used by profilers MetaDataGetDispenser + +; mono +coreclr_array_length +coreclr_class_from_systemtypeinstance +mono_add_internal_call +mono_array_addr_with_size +mono_array_class_get +mono_array_element_size +mono_array_new +mono_assembly_close +mono_assembly_fill_assembly_name +mono_assembly_foreach +mono_assembly_get_image +mono_assembly_get_object +mono_assembly_load_from +mono_assembly_load_from_full +mono_assembly_loaded +mono_assembly_name_free +mono_assembly_name_parse +mono_assembly_open +mono_class_array_element_size +mono_class_enum_basetype +mono_class_from_mono_type +mono_class_from_name +mono_class_from_name_case +mono_class_get +mono_class_get_byref_type +mono_class_get_element_class +mono_class_get_field_from_name +mono_class_get_fields +mono_class_get_flags +mono_class_get_image +mono_class_get_interfaces +mono_class_get_method_from_name +mono_class_get_methods +mono_class_get_name +mono_class_get_namespace +mono_class_get_nested_types +mono_class_get_nesting_type +mono_class_get_parent +mono_class_get_properties +mono_class_get_property_from_name +mono_class_get_rank +mono_class_get_type +mono_class_get_type_token +mono_class_get_userdata +mono_class_get_userdata_offset +mono_class_instance_size +mono_class_is_blittable +mono_class_is_enum +mono_class_is_generic +mono_class_is_inflated +mono_class_is_subclass_of +mono_class_is_valuetype +mono_class_set_userdata +mono_class_vtable +mono_config_parse +mono_custom_attrs_construct +mono_custom_attrs_free +mono_custom_attrs_from_assembly +mono_custom_attrs_from_class +mono_custom_attrs_from_field +mono_custom_attrs_from_method +mono_custom_attrs_from_property +mono_custom_attrs_get_attr +mono_custom_attrs_get_attrs +mono_custom_attrs_has_attr +mono_debug_free_source_location +mono_debug_init +mono_debug_lookup_source_location +mono_debug_open_image_from_memory +mono_debugger_install_attach_detach_callback +mono_debugger_set_generate_debug_info +mono_dl_fallback_register +mono_dl_fallback_unregister +mono_dllmap_insert +mono_domain_assembly_open +mono_domain_create_appdomain +mono_domain_finalize +mono_domain_get +mono_domain_get_id +mono_domain_set +mono_enter_internal_call +mono_error_cleanup +mono_error_get_error_code +mono_error_get_message +mono_error_init +mono_error_ok +mono_exception_from_name_msg +mono_exception_from_name_two_strings +mono_exit_internal_call +mono_field_from_token +mono_field_get_flags +mono_field_get_name +mono_field_get_object +mono_field_get_offset +mono_field_get_parent +mono_field_get_type +mono_field_get_type_specific +mono_field_get_value +mono_field_set_value +mono_field_static_get_value +mono_gc_collect +mono_gc_collect_a_little +mono_gc_get_heap_size +mono_gc_get_max_time_slice_ns +mono_gc_get_used_size +mono_gc_is_incremental +mono_gc_max_generation +mono_gc_set_incremental +mono_gc_set_max_time_slice_ns +mono_gc_wbarrier_generic_store +mono_gc_wbarrier_set_field +mono_gchandle_free +mono_gchandle_free_v2 +mono_gchandle_get_target +mono_gchandle_get_target_v2 +mono_gchandle_is_in_domain +mono_gchandle_is_in_domain_v2 +mono_gchandle_new +mono_gchandle_new_v2 +mono_gchandle_new_weakref +mono_gchandle_new_weakref_v2 +mono_get_array_class +mono_get_boolean_class +mono_get_byte_class +mono_get_char_class +mono_get_corlib +mono_get_double_class +mono_get_enum_class +mono_get_exception_argument_null +mono_get_exception_class +mono_get_int16_class +mono_get_int32_class +mono_get_int64_class +mono_get_method +mono_get_object_class +mono_get_root_domain +mono_get_single_class +mono_get_string_class +mono_image_close +mono_image_get_assembly +mono_image_get_filename +mono_image_get_name +mono_image_get_table_info +mono_image_get_table_rows +mono_image_loaded +mono_image_open_from_data_full +mono_image_open_from_data_with_name +mono_image_strerror +mono_is_debugger_attached +mono_jit_info_get_code_size +mono_jit_info_get_code_start +mono_jit_info_table_find +mono_jit_init +mono_jit_init_version +mono_jit_parse_options +mono_metadata_decode_row +mono_metadata_signature_equal +mono_metadata_type_equal +mono_method_full_name +mono_method_get_class +mono_method_get_last_managed +mono_method_get_name +mono_method_get_object +mono_method_signature +mono_method_signature_checked +mono_method_signature_checked_slow +mono_object_get_class +mono_object_get_size +mono_object_get_virtual_method +mono_object_isinst +mono_object_new +mono_object_new_alloc_specific +mono_object_new_specific +mono_object_unbox +mono_parse_default_optimizations +mono_pmip +mono_profiler_create +mono_profiler_install +mono_profiler_install_allocation +mono_profiler_install_enter_leave +mono_profiler_install_gc +mono_profiler_install_jit_end +mono_profiler_install_thread +mono_profiler_load +mono_profiler_set_events +mono_property_get_get_method +mono_raise_exception +mono_reflection_get_custom_attrs_by_type +mono_runtime_cleanup +mono_runtime_delegate_invoke +mono_runtime_exec_main +mono_runtime_invoke +mono_runtime_invoke_array +mono_runtime_invoke_with_nested_object +mono_runtime_is_shutting_down +mono_runtime_object_init +mono_runtime_set_shutting_down +mono_runtime_unhandled_exception_policy_set +mono_set_assemblies_path +mono_set_assemblies_path_null_separated +mono_set_break_policy +mono_set_crash_chaining +mono_set_defaults +mono_set_dirs +mono_set_find_plugin_callback +mono_set_ignore_version_and_key_when_finding_assemblies_already_loaded +mono_set_signal_chaining +mono_signature_get_param_count +mono_signature_get_params +mono_signature_get_return_type +mono_signature_is_instance +mono_stack_walk +mono_stack_walk_no_il +mono_string_from_utf16 +mono_string_new_len +mono_string_new_utf16 +mono_string_new_wrapper +mono_string_to_utf8 +mono_stringify_assembly_name +mono_thread_attach +mono_thread_current +mono_thread_detach +mono_thread_exit +mono_thread_has_sufficient_execution_stack +mono_thread_pool_cleanup +mono_thread_pop_appdomain_ref +mono_thread_push_appdomain_ref +mono_thread_set_main +mono_thread_suspend_all_other_threads +mono_threads_set_shutting_down +mono_trace_set_level_string +mono_trace_set_log_handler +mono_trace_set_mask_string +mono_type_get_attrs +mono_type_get_class +mono_type_get_generic_arg +mono_type_get_name +mono_type_get_name_full +mono_type_get_num_generic_args +mono_type_get_object +mono_type_get_type +mono_type_is_byref +mono_unity_allocation_granularity +mono_unity_array_new_2d +mono_unity_array_new_3d +mono_unity_array_object_header_size +mono_unity_assembly_mempool_chunk_foreach +mono_unity_backtrace_from_context +mono_unity_capture_memory_snapshot +mono_unity_class_field_is_literal +mono_unity_class_for_each +mono_unity_class_get +mono_unity_class_get_data_size +mono_unity_class_get_generic_type_definition +mono_unity_class_has_failure +mono_unity_class_is_abstract +mono_unity_class_is_interface +mono_unity_class_is_open_constructed_type +mono_unity_class_try_get_vtable +mono_unity_custom_attrs_construct +mono_unity_domain_mempool_chunk_foreach +mono_unity_domain_set_config +mono_unity_domain_unload +mono_unity_error_convert_to_exception +mono_unity_field_from_token_checked +mono_unity_free_captured_memory_snapshot +mono_unity_g_free +mono_unity_gc_disable +mono_unity_gc_enable +mono_unity_gc_handles_foreach_get_target +mono_unity_gc_heap_foreach +mono_unity_gc_is_disabled +mono_unity_gc_set_mode +mono_unity_image_set_mempool_chunk_foreach +mono_unity_jit_cleanup +mono_unity_liveness_allocate_struct +mono_unity_liveness_calculation_from_root +mono_unity_liveness_calculation_from_statics +mono_unity_liveness_finalize +mono_unity_liveness_free_struct +mono_unity_loader_get_last_error_and_error_prepare_exception +mono_unity_managed_callstack +mono_unity_object_header_size +mono_unity_offset_of_array_bounds_in_array_object_header +mono_unity_offset_of_array_length_in_array_object_header +mono_unity_root_domain_mempool_chunk_foreach +mono_unity_runtime_set_main_args +mono_unity_set_data_dir +mono_unity_set_embeddinghostname +mono_unity_set_vprintf_func +mono_unity_start_gc_world +mono_unity_stop_gc_world +mono_unity_string_empty_wrapper +mono_unity_thread_fast_attach +mono_unity_thread_fast_detach +mono_unity_type_get_name_full_chunked +mono_unity_type_is_pointer_type +mono_unity_type_is_static +mono_unity_vtable_get_static_field_data +mono_value_box +mono_verifier_set_mode +unity_mono_method_is_generic +unity_mono_method_is_inflated +unity_mono_reflection_method_get_method diff --git a/src/coreclr/inc/CrstTypes.def b/src/coreclr/inc/CrstTypes.def index 0335e4965f1108..afcebb26183ca7 100644 --- a/src/coreclr/inc/CrstTypes.def +++ b/src/coreclr/inc/CrstTypes.def @@ -580,3 +580,9 @@ End Crst PgoData AcquiredBefore LoaderHeap End + +Crst MonoHandles +End + +Crst MonoICalls +End diff --git a/src/coreclr/inc/crsttypes.h b/src/coreclr/inc/crsttypes.h index d462cbd3c88e1c..04c0e01f0d271a 100644 --- a/src/coreclr/inc/crsttypes.h +++ b/src/coreclr/inc/crsttypes.h @@ -84,57 +84,59 @@ enum CrstType CrstModule = 66, CrstModuleFixup = 67, CrstModuleLookupTable = 68, - CrstMulticoreJitHash = 69, - CrstMulticoreJitManager = 70, - CrstNativeImageEagerFixups = 71, - CrstNativeImageLoad = 72, - CrstNls = 73, - CrstNotifyGdb = 74, - CrstObjectList = 75, - CrstPEImage = 76, - CrstPendingTypeLoadEntry = 77, - CrstPgoData = 78, - CrstPinnedByrefValidation = 79, - CrstProfilerGCRefDataFreeList = 80, - CrstProfilingAPIStatus = 81, - CrstRCWCache = 82, - CrstRCWCleanupList = 83, - CrstReadyToRunEntryPointToMethodDescMap = 84, - CrstReflection = 85, - CrstReJITGlobalRequest = 86, - CrstRetThunkCache = 87, - CrstSavedExceptionInfo = 88, - CrstSaveModuleProfileData = 89, - CrstSecurityStackwalkCache = 90, - CrstSigConvert = 91, - CrstSingleUseLock = 92, - CrstSpecialStatics = 93, - CrstStackSampler = 94, - CrstStressLog = 95, - CrstStubCache = 96, - CrstStubDispatchCache = 97, - CrstStubUnwindInfoHeapSegments = 98, - CrstSyncBlockCache = 99, - CrstSyncHashLock = 100, - CrstSystemBaseDomain = 101, - CrstSystemDomain = 102, - CrstSystemDomainDelayedUnloadList = 103, - CrstThreadIdDispenser = 104, - CrstThreadpoolTimerQueue = 105, - CrstThreadpoolWaitThreads = 106, - CrstThreadpoolWorker = 107, - CrstThreadStore = 108, - CrstTieredCompilation = 109, - CrstTypeEquivalenceMap = 110, - CrstTypeIDMap = 111, - CrstUMEntryThunkCache = 112, - CrstUMEntryThunkFreeListLock = 113, - CrstUniqueStack = 114, - CrstUnresolvedClassLock = 115, - CrstUnwindInfoTableLock = 116, - CrstVSDIndirectionCellLock = 117, - CrstWrapperTemplate = 118, - kNumberOfCrstTypes = 119 + CrstMonoHandles = 69, + CrstMonoICalls = 70, + CrstMulticoreJitHash = 71, + CrstMulticoreJitManager = 72, + CrstNativeImageEagerFixups = 73, + CrstNativeImageLoad = 74, + CrstNls = 75, + CrstNotifyGdb = 76, + CrstObjectList = 77, + CrstPEImage = 78, + CrstPendingTypeLoadEntry = 79, + CrstPgoData = 80, + CrstPinnedByrefValidation = 81, + CrstProfilerGCRefDataFreeList = 82, + CrstProfilingAPIStatus = 83, + CrstRCWCache = 84, + CrstRCWCleanupList = 85, + CrstReadyToRunEntryPointToMethodDescMap = 86, + CrstReflection = 87, + CrstReJITGlobalRequest = 88, + CrstRetThunkCache = 89, + CrstSavedExceptionInfo = 90, + CrstSaveModuleProfileData = 91, + CrstSecurityStackwalkCache = 92, + CrstSigConvert = 93, + CrstSingleUseLock = 94, + CrstSpecialStatics = 95, + CrstStackSampler = 96, + CrstStressLog = 97, + CrstStubCache = 98, + CrstStubDispatchCache = 99, + CrstStubUnwindInfoHeapSegments = 100, + CrstSyncBlockCache = 101, + CrstSyncHashLock = 102, + CrstSystemBaseDomain = 103, + CrstSystemDomain = 104, + CrstSystemDomainDelayedUnloadList = 105, + CrstThreadIdDispenser = 106, + CrstThreadpoolTimerQueue = 107, + CrstThreadpoolWaitThreads = 108, + CrstThreadpoolWorker = 109, + CrstThreadStore = 110, + CrstTieredCompilation = 111, + CrstTypeEquivalenceMap = 112, + CrstTypeIDMap = 113, + CrstUMEntryThunkCache = 114, + CrstUMEntryThunkFreeListLock = 115, + CrstUniqueStack = 116, + CrstUnresolvedClassLock = 117, + CrstUnwindInfoTableLock = 118, + CrstVSDIndirectionCellLock = 119, + CrstWrapperTemplate = 120, + kNumberOfCrstTypes = 121 }; #endif // __CRST_TYPES_INCLUDED @@ -214,6 +216,8 @@ int g_rgCrstLevelMap[] = 5, // CrstModule 15, // CrstModuleFixup 4, // CrstModuleLookupTable + 0, // CrstMonoHandles + 0, // CrstMonoICalls 0, // CrstMulticoreJitHash 13, // CrstMulticoreJitManager 0, // CrstNativeImageEagerFixups @@ -338,6 +342,8 @@ LPCSTR g_rgCrstNameMap[] = "CrstModule", "CrstModuleFixup", "CrstModuleLookupTable", + "CrstMonoHandles", + "CrstMonoICalls", "CrstMulticoreJitHash", "CrstMulticoreJitManager", "CrstNativeImageEagerFixups", diff --git a/src/coreclr/vm/CMakeLists.txt b/src/coreclr/vm/CMakeLists.txt index 08a5bb92a66ed7..26c28528c6624c 100644 --- a/src/coreclr/vm/CMakeLists.txt +++ b/src/coreclr/vm/CMakeLists.txt @@ -952,6 +952,10 @@ target_precompile_headers(cee_dac PRIVATE [["common.h"]]) add_subdirectory(wks) +if(FEATURE_UNITY_EMBEDDING_INTERFACE) + add_subdirectory(mono) +endif(FEATURE_UNITY_EMBEDDING_INTERFACE) + if(FEATURE_PERFTRACING) add_subdirectory(eventing) endif(FEATURE_PERFTRACING) diff --git a/src/coreclr/vm/amd64/asmconstants.h b/src/coreclr/vm/amd64/asmconstants.h index 9d7d3159842b14..e054a81e572f3a 100644 --- a/src/coreclr/vm/amd64/asmconstants.h +++ b/src/coreclr/vm/amd64/asmconstants.h @@ -171,7 +171,11 @@ ASMCONSTANTS_C_ASSERT(OFFSETOF__MethodTable__m_pWriteableData ASMCONSTANTS_C_ASSERT(OFFSETOF__MethodTable__m_pEEClass == offsetof(MethodTable, m_pEEClass)); +#if defined(FEATURE_UNITY_METHODTABLE_USER_DATA) +#define METHODTABLE_OFFSET_VTABLE DBG_FRE(0x50, 0x48) +#else #define METHODTABLE_OFFSET_VTABLE DBG_FRE(0x48, 0x40) +#endif ASMCONSTANTS_C_ASSERT(METHODTABLE_OFFSET_VTABLE == sizeof(MethodTable)); #define OFFSETOF__MethodTable__m_ElementType DBG_FRE(0x38, 0x30) diff --git a/src/coreclr/vm/assemblynative.cpp b/src/coreclr/vm/assemblynative.cpp index dba5110590717c..461c514b814336 100644 --- a/src/coreclr/vm/assemblynative.cpp +++ b/src/coreclr/vm/assemblynative.cpp @@ -331,7 +331,11 @@ extern "C" void QCALLTYPE AssemblyNative_GetLocation(QCall::AssemblyHandle pAsse BEGIN_QCALL; { +#ifdef FEATURE_UNITY_ASSEMBLY_MEMORY_PATH + retString.Set(pAssembly->GetPath()); +#else retString.Set(pAssembly->GetPEAssembly()->GetPath()); +#endif } END_QCALL; diff --git a/src/coreclr/vm/ceeload.h b/src/coreclr/vm/ceeload.h index a97be226fb9fba..904b7fc005c672 100644 --- a/src/coreclr/vm/ceeload.h +++ b/src/coreclr/vm/ceeload.h @@ -943,6 +943,10 @@ class Module return LookupMap::Iterator(&m_TypeDefToMethodTableMap); } +#ifdef FEATURE_UNITY_MODULE_NUM_TYPEDEFS + DWORD GetNumTypeDefs() { LIMITED_METHOD_CONTRACT; return m_TypeDefToMethodTableMap.GetSize(); } +#endif + // Hash of available types by name PTR_EEClassHashTable m_pAvailableClasses; diff --git a/src/coreclr/vm/classlayoutinfo.cpp b/src/coreclr/vm/classlayoutinfo.cpp index b95c6d4108ed45..da31a4d036e888 100644 --- a/src/coreclr/vm/classlayoutinfo.cpp +++ b/src/coreclr/vm/classlayoutinfo.cpp @@ -55,9 +55,17 @@ namespace pfwalk->m_placement.m_offset = ulOffset; pfwalk->m_sequence = (ULONG)-1; +#ifdef FEATURE_UNITY_EXPLICIT_LAYOUT_INHERITANCE + // Unity: This code seems to cause double-compensation for the parent offset, as we already adjust + // for this in dwInstanceSliceOffset in MethodTableBuilder::HandleExplicitLayout. So commenting it out. + // This does not seem to be fixed by the following: + // https://github.com/dotnet/runtime/issues/53542 + // https://github.com/dotnet/runtime/pull/54235 +#else // Treat base class as an initial member. if (!SafeAddUINT32(&(pfwalk->m_placement.m_offset), cbAdjustedParentLayoutNativeSize)) COMPlusThrowOM(); +#endif } } IfFailThrow(hr); diff --git a/src/coreclr/vm/domainassembly.h b/src/coreclr/vm/domainassembly.h index 268c49654253cd..2c8276e9cc8479 100644 --- a/src/coreclr/vm/domainassembly.h +++ b/src/coreclr/vm/domainassembly.h @@ -286,6 +286,25 @@ class DomainAssembly final DynamicMethodTable* GetDynamicMethodTable(); #endif + #ifdef FEATURE_UNITY_ASSEMBLY_MEMORY_PATH + // Unity loads assemblies from memory, so we can modify them on disk while they are loaded when users + // change scripts. But we still want them to point to their location on disk when queried by Assembly.Location. + // + // But CoreCLR does not support assemblies loaded from memory with a custom path atm, so we need to add our own + // support. SA: https://github.com/dotnet/runtime/issues/12822 + const SString &GetPath() + { + if (!m_CustomPath.IsEmpty()) + return m_CustomPath; + return GetPEAssembly()->GetPath(); + } + + void SetCustomPath(LPCSTR path) + { + m_CustomPath.SetUTF8(path); + } +#endif + DomainAssembly* GetNextDomainAssemblyInSameALC() { return m_NextDomainAssemblyInSameALC; @@ -463,6 +482,9 @@ class DomainAssembly final DebuggerAssemblyControlFlags m_debuggerFlags; DWORD m_notifyflags; BOOL m_fDebuggerUnloadStarted; +#ifdef FEATURE_UNITY_ASSEMBLY_MEMORY_PATH + SString m_CustomPath; +#endif }; #endif // _DOMAINASSEMBLY_H_ diff --git a/src/coreclr/vm/ecall.cpp b/src/coreclr/vm/ecall.cpp index ad93743a9cbfac..44fad265e501d9 100644 --- a/src/coreclr/vm/ecall.cpp +++ b/src/coreclr/vm/ecall.cpp @@ -13,6 +13,124 @@ #include "comdelegate.h" +#ifdef FEATURE_UNITY_ECALL_DYNAMIC_REGISTRATION +#include "clr_std/vector" + +struct ICallNameToId +{ + LPCWSTR Name; + DWORD Id; + + ICallNameToId() : Name(nullptr), Id(0) + { + } + + ICallNameToId(LPCWSTR name, DWORD id) : Name(name), Id(id) + { + } +}; + + +class ICallNameToIdTraits : public NoRemoveSHashTraits< DefaultSHashTraits< ICallNameToId > > +{ +public: + typedef PCWSTR key_t; + static const ICallNameToId Null() { ICallNameToId e; e.Name = nullptr; return e; } + static bool IsNull(const ICallNameToId & e) { return e.Name == nullptr; } + static const key_t GetKey(const ICallNameToId & e) + { + key_t key; + key = e.Name; + return key; + } + static count_t Hash(const key_t &str) { return HashiString(str); } + static BOOL Equals(const key_t &lhs, const key_t &rhs) { LIMITED_METHOD_CONTRACT; return (_wcsicmp(lhs, rhs) == 0); } +}; + +SHash g_ICallToId; +std::vector g_ICallIdToCode; + +INT FindICall(MethodDesc *pMD) +{ + // TODO: Lock + auto pMT = pMD->GetMethodTable(); + LPCUTF8 pszNamespace = 0; + LPCUTF8 pszName = pMT->GetFullyQualifiedNameInfo(&pszNamespace); + SString methodName(SString::Utf8Literal, pszName); + + while (pMT->GetClass()->IsNested()) + { + pMT = ClassLoader::LoadTypeDefOrRefOrSpecThrowing(pMT->GetModule(), pMT->GetEnclosingCl(), NULL).AsMethodTable(); + methodName.InsertUTF8(methodName.Begin(), "/"); + methodName.InsertUTF8(methodName.Begin(), pMT->GetFullyQualifiedNameInfo(&pszNamespace)); + } + SString fullMethodName(SString::Utf8Literal, pszNamespace); + fullMethodName.AppendUTF8("."); + fullMethodName.Append(methodName); + fullMethodName.AppendUTF8("::"); + fullMethodName.AppendUTF8(pMD->GetName()); + + auto result = g_ICallToId.LookupPtr(fullMethodName); + if (result) + { + return result->Id; + } + return 0; +} + +bool IsICall(DWORD id) +{ + return (id >> 16) == 0xFFFF; +} + +DWORD GetIndexICall(DWORD id) +{ + assert(IsICall(id)); + return id & 0xFFFF; +} + +void ECall::RegisterICall(const char* fullMethodName, PCODE code) +{ + // CAUTION: THIS METHOD IS NOT THREADSAFE + // PROTECT IT IN THE CALLER + SString* fullMethodNameUTF8 = new SString(SString::Utf8Literal, fullMethodName); + + auto result = g_ICallToId.LookupPtr(*fullMethodNameUTF8); + if (result) + { + auto indexICall = GetIndexICall(result->Id); + g_ICallIdToCode[indexICall]->m_pImplementation = (LPVOID)code; + } + else + { + auto index = g_ICallIdToCode.size(); + auto id = (DWORD)0xFFFF0000 | (DWORD)g_ICallIdToCode.size(); + + g_ICallToId.AddOrReplace(ICallNameToId(fullMethodNameUTF8->GetUnicode(), id)); + + auto eeFuncs = new ECFunc[2]; +#ifdef HOST_64BIT + eeFuncs[0].m_dwFlags = 0xffffffffffff0000; +#else + eeFuncs[0].m_dwFlags = 0xffff0000; +#endif + eeFuncs[0].m_pImplementation = (LPVOID)code; + eeFuncs[0].m_pMethodSig = nullptr; + eeFuncs[0].m_szMethodName = nullptr; +#ifdef HOST_64BIT + eeFuncs[1].m_dwFlags = 0xffffffffffff0000 | FCFuncFlag_EndOfArray; +#else + eeFuncs[1].m_dwFlags = 0xffff0000 | FCFuncFlag_EndOfArray; +#endif + eeFuncs[1].m_pImplementation = 0; + eeFuncs[1].m_pMethodSig = nullptr; + eeFuncs[1].m_szMethodName = nullptr; + g_ICallIdToCode.push_back(&eeFuncs[0]); + } +} + +#endif + #ifndef DACCESS_COMPILE extern const ECClass c_rgECClasses[]; @@ -317,6 +435,15 @@ DWORD ECall::GetIDForMethod(MethodDesc *pMD) } CONTRACTL_END; +#ifdef FEATURE_UNITY_ECALL_DYNAMIC_REGISTRATION + // Check any registered ICalls + auto id = FindICall(pMD); + if (id != 0) + { + return id; + } +#endif + INT ImplsIndex = FindImplsIndexForClass(pMD->GetMethodTable()); if (ImplsIndex < 0) return 0; @@ -333,6 +460,14 @@ static ECFunc *FindECFuncForID(DWORD id) if (id == 0) return NULL; + +#ifdef FEATURE_UNITY_ECALL_DYNAMIC_REGISTRATION + if (IsICall(id)) + { + auto indexICall = GetIndexICall(id); + return g_ICallIdToCode[indexICall]; + } +#endif INT ImplsIndex = (id >> 16); INT ECIndex = (id & 0xffff) - 1; @@ -367,6 +502,45 @@ static ECFunc* FindECFuncForMethod(MethodDesc* pMD) return FindECFuncForID(id); } +#ifdef FEATURE_UNITY_ECALL_DYNAMIC_REGISTRATION + +void UpdateTargetBackToMethodMap(PCODE pTarg, MethodDesc *newMD) +{ + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + MODE_ANY; + HOST_NOCALLS; + SUPPORTS_DAC; + } + CONTRACTL_END; + + // Searching all of the entries is expensive + // and we are often called with pTarg == NULL so + // check for this value and early exit. + + if (!pTarg) + return; + + // Could this possibily be an FCall? + if ((pTarg < gLowestFCall) || (pTarg > gHighestFCall)) + return; + + ECHash * pECHash = gFCallMethods[FCallHash(pTarg)]; + while (pECHash != NULL) + { + if (pECHash->m_pImplementation == pTarg) + { + pECHash->m_pMD = newMD; + return; + } + pECHash = pECHash->m_pNext; + } +} + +#endif + /******************************************************************************* * Returns 0 if it is an ECALL, * Otherwise returns the native entry point (FCALL) @@ -420,8 +594,10 @@ PCODE ECall::GetFCallImpl(MethodDesc * pMD, BOOL * pfSharedOrDynamicFCallImpl /* return GetEEFuncEntryPoint(FCComCtor); } +#ifndef FEATURE_UNITY_ECALL_DYNAMIC_REGISTRATION if (!pMD->GetModule()->IsSystem()) COMPlusThrow(kSecurityException, BFA_ECALLS_MUST_BE_IN_SYS_MOD); +#endif ECFunc* ret = FindECFuncForMethod(pMD); @@ -476,6 +652,9 @@ PCODE ECall::GetFCallImpl(MethodDesc * pMD, BOOL * pfSharedOrDynamicFCallImpl /* { if (pMDinTable != pMD) { +#ifdef FEATURE_UNITY_ECALL_DYNAMIC_REGISTRATION + UpdateTargetBackToMethodMap(pImplementation, pMD); +#else // The fcall entrypoints has to be at unique addresses. If you get failure here, use the following steps // to fix it: // 1. Consider merging the offending fcalls into one fcall. Do they really do different things? @@ -484,6 +663,7 @@ PCODE ECall::GetFCallImpl(MethodDesc * pMD, BOOL * pfSharedOrDynamicFCallImpl /* _ASSERTE(!"Duplicate pImplementation entries found in reverse fcall table"); ThrowHR(E_FAIL); +#endif } } else diff --git a/src/coreclr/vm/ecall.h b/src/coreclr/vm/ecall.h index 538227cf13d6a6..22fe1f4aa491c2 100644 --- a/src/coreclr/vm/ecall.h +++ b/src/coreclr/vm/ecall.h @@ -83,6 +83,10 @@ class ECall static MethodDesc* MapTargetBackToMethod(PCODE pTarg, PCODE * ppAdjustedEntryPoint = NULL); static DWORD GetIDForMethod(MethodDesc *pMD); +#ifdef FEATURE_UNITY_ECALL_DYNAMIC_REGISTRATION + static void RegisterICall(const char* fullMethodName, PCODE code); +#endif + // Some fcalls (delegate ctors and tlbimpl ctors) shared one implementation. // We should never patch vtable for these since they have 1:N mapping between // MethodDesc and the actual implementation diff --git a/src/coreclr/vm/gcheaputilities.cpp b/src/coreclr/vm/gcheaputilities.cpp index 08f864bcc26d7b..53270a6f0ad2f3 100644 --- a/src/coreclr/vm/gcheaputilities.cpp +++ b/src/coreclr/vm/gcheaputilities.cpp @@ -174,7 +174,7 @@ HMODULE LoadStandaloneGc(LPCWSTR libFileName) // // See Documentation/design-docs/standalone-gc-loading.md for details // on the loading protocol in use here. -HRESULT LoadAndInitializeGC(LPWSTR standaloneGcLocation) +HRESULT LoadAndInitializeGC(LPCWSTR standaloneGcLocation) { LIMITED_METHOD_CONTRACT; @@ -300,6 +300,15 @@ HRESULT InitializeDefaultGC() } // anonymous namespace +#ifdef FEATURE_UNITY_GCNAME_API + +static SString g_gc_unity_location; +void GCHeapUtilities::SetGCName(const char* name) +{ + g_gc_unity_location.SetUTF8(name); +} +#endif + // Loads (if necessary) and initializes the GC. If using a standalone GC, // it loads the library containing it and dynamically loads the GC entry point. // If using a non-standalone GC, it invokes the GC entry point directly. @@ -318,6 +327,13 @@ HRESULT GCHeapUtilities::LoadAndInitialize() LPWSTR standaloneGcLocation = nullptr; CLRConfig::GetConfigValue(CLRConfig::EXTERNAL_GCName, &standaloneGcLocation); +#ifdef FEATURE_UNITY_GCNAME_API + if (!g_gc_unity_location.IsEmpty()) + { + return LoadAndInitializeGC(g_gc_unity_location.GetUnicode()); + } + else +#endif if (!standaloneGcLocation) { return InitializeDefaultGC(); diff --git a/src/coreclr/vm/gcheaputilities.h b/src/coreclr/vm/gcheaputilities.h index 3d648862740afb..5bd5cde30c216c 100644 --- a/src/coreclr/vm/gcheaputilities.h +++ b/src/coreclr/vm/gcheaputilities.h @@ -201,6 +201,10 @@ class GCHeapUtilities { // Gets a pointer to the module that contains the GC. static PTR_VOID GetGCModuleBase(); +#ifdef FEATURE_UNITY_GCNAME_API + static void SetGCName(const char* name); +#endif + // Loads (if using a standalone GC) and initializes the GC. static HRESULT LoadAndInitialize(); diff --git a/src/coreclr/vm/i386/asmconstants.h b/src/coreclr/vm/i386/asmconstants.h index b24d70302076f0..1a89fad073320a 100644 --- a/src/coreclr/vm/i386/asmconstants.h +++ b/src/coreclr/vm/i386/asmconstants.h @@ -206,7 +206,11 @@ ASMCONSTANTS_C_ASSERT(MethodTable_m_dwFlags == offsetof(MethodTable, m_dwFlags)) #define MethodTable_m_pInterfaceMap DBG_FRE(0x28, 0x24) ASMCONSTANTS_C_ASSERT(MethodTable_m_pInterfaceMap == offsetof(MethodTable, m_pMultipurposeSlot2)) +#if defined(FEATURE_UNITY_METHODTABLE_USER_DATA) +#define SIZEOF_MethodTable DBG_FRE(0x30, 0x2C) +#else #define SIZEOF_MethodTable DBG_FRE(0x2C, 0x28) +#endif ASMCONSTANTS_C_ASSERT(SIZEOF_MethodTable == sizeof(MethodTable)) #define SIZEOF_InterfaceInfo_t 0x4 diff --git a/src/coreclr/vm/methodtable.h b/src/coreclr/vm/methodtable.h index 76c552a3042849..739752396ce852 100644 --- a/src/coreclr/vm/methodtable.h +++ b/src/coreclr/vm/methodtable.h @@ -1450,7 +1450,11 @@ class MethodTable return pMTParent == NULL ? 0 : pMTParent->GetNumVirtuals(); } +#ifdef FEATURE_UNITY_METHODTABLE_USER_DATA + #define SIZEOF__MethodTable_ (0x10 + (7 INDEBUG(+1)) * TARGET_POINTER_SIZE) +#else #define SIZEOF__MethodTable_ (0x10 + (6 INDEBUG(+1)) * TARGET_POINTER_SIZE) +#endif static inline DWORD GetVtableOffset() { @@ -3655,6 +3659,10 @@ public : TADDR m_pMultipurposeSlot2; }; +#ifdef FEATURE_UNITY_METHODTABLE_USER_DATA + void* m_pUserData; +#endif + // VTable and Non-Virtual slots go here // Overflow multipurpose slots go here diff --git a/src/coreclr/vm/mono/CMakeLists.txt b/src/coreclr/vm/mono/CMakeLists.txt new file mode 100644 index 00000000000000..eb7a761f2a3d23 --- /dev/null +++ b/src/coreclr/vm/mono/CMakeLists.txt @@ -0,0 +1,20 @@ +set(VM_SOURCES_MONO + mono_coreclr.cpp + ) +convert_to_absolute_path(VM_SOURCES_MONO ${VM_SOURCES_MONO}) + +add_definitions(-DENABLE_MONO=1) +add_definitions(-DPLATFORM_STANDALONE=1) +add_definitions(-DUNITY_STANDALONE=1) + +if(WIN32) + add_definitions(-DPLATFORM_WIN=1) +endif() + +if(CLR_CMAKE_PLATFORM_DARWIN) + add_definitions(-DPLATFORM_OSX=1) +endif() + +add_library_clr(mono ${VM_SOURCES_MONO}) + +add_dependencies(mono eventing_headers) diff --git a/src/coreclr/vm/mono/MonoCoreClr.h b/src/coreclr/vm/mono/MonoCoreClr.h new file mode 100644 index 00000000000000..1824deca8cc871 --- /dev/null +++ b/src/coreclr/vm/mono/MonoCoreClr.h @@ -0,0 +1,70 @@ +#ifndef MONOCORECLR_H +#define MONOCORECLR_H + +#include + +// Builtin types used by MonoFunctions.h +typedef signed short SInt16; +typedef unsigned short UInt16; +typedef unsigned char UInt8; +typedef signed char SInt8; +typedef signed int SInt32; +typedef unsigned int UInt32; +typedef signed long long SInt64; +//typedef unsigned long long UInt64; Defined already + +// TODO: Add char (utf8 for mono) +typedef wchar_t mono_char; // used by CoreCLR + +// TODO: Temp def +typedef void* mono_register_object_callback; +typedef void* mono_liveness_world_state_callback; + +#define UNUSED_SYMBOL + +#ifndef DO_API + +//TODO: Use EXPORT_API instead of __declspec +#ifdef WIN32 +#define DO_API(r,n,p) extern "C" __declspec(dllexport) r __cdecl n p; +#else +#define DO_API(r,n,p) extern "C" r n p; +#endif +#endif + +// TODO: Move this to CMake +#define ENABLE_MONO 1 +#define CORECLR 1 + +#if defined(_DEBUG) +#define MONO_PRE_ASSERTE /* if you need to change modes before doing asserts override */ +#define MONO_POST_ASSERTE /* put it back */ + +#if !defined(MONO_ASSERTE_MSG) +#define MONO_ASSERTE_MSG(expr, msg) \ + do { \ + if (!(expr)) { \ + MONO_PRE_ASSERTE \ + mono_debug_assert_dialog(__FILE__, __LINE__, msg); \ + MONO_POST_ASSERTE \ + } \ + } while (0) +#endif // MONO__ASSERTE_MSG + +#if !defined(MONO_ASSERTE) +#define MONO_ASSERTE(expr) MONO_ASSERTE_MSG(expr, #expr) +#endif // !MONO_ASSERTE + +#else // _DEBUG + +#define MONO_ASSERTE(expr) ((void)0) +#define MONO_ASSERTE_MSG(expr, msg) ((void)0) + +#endif // !_DEBUG + + +#include "MonoTypesClr.h" +#include "MonoFunctionsClr.h" +#include "../../../../unity/unity-sources/Runtime/Mono/tabledefs.h" + +#endif //MONOCORECLR_H diff --git a/src/coreclr/vm/mono/MonoFunctionsClr.h b/src/coreclr/vm/mono/MonoFunctionsClr.h new file mode 100644 index 00000000000000..6962131ce95eb3 --- /dev/null +++ b/src/coreclr/vm/mono/MonoFunctionsClr.h @@ -0,0 +1,20 @@ + +#include "../../../../unity/unity-sources/Runtime/Mono/MonoTypes.h" + +// Mono CoreCLR specifics +DO_API(void, mono_gc_mark_stack_slot, (void* objRef)) +DO_API(void, mono_gc_unmark_stack_slot, (void* objRef)) +DO_API(void, mono_debug_assert_dialog, (const char *szFile, int iLine, const char *szExpr)) +DO_API(gboolean, mono_gc_preemptive, (gboolean enable)) +DO_API(MonoObject*, mono_runtime_invoke_with_nested_object, (MonoMethod *method, void *obj, void *parentobj, void **params, MonoException **exc)) +DO_API(int, mono_type_get_num_generic_args, (MonoType *type)) +DO_API(MonoType*, mono_type_get_generic_arg, (MonoType *type, int index)) +DO_API(MonoType*, mono_field_get_type_specific, (MonoClassField *field, MonoClass* owner)) +DO_API(void, mono_enter_internal_call, (MonoInternalCallFrameOpaque *frame)) +DO_API(void, mono_exit_internal_call, (MonoInternalCallFrameOpaque *frame)) +DO_API(void, mono_set_gc_conservative, (bool conservative)) + +#define ENABLE_MONO_MEMORY_PROFILER 1 + +// Include regular Unity Mono functions +#include "../../../../unity/unity-sources/Runtime/Mono/MonoFunctions.h" diff --git a/src/coreclr/vm/mono/MonoTypesClr.h b/src/coreclr/vm/mono/MonoTypesClr.h new file mode 100644 index 00000000000000..74599cc91ecb17 --- /dev/null +++ b/src/coreclr/vm/mono/MonoTypesClr.h @@ -0,0 +1,10 @@ +#ifndef MONOTYPES_CLR_H +#define MONOTYPES_CLR_H +#ifdef ENABLE_MONO + +// Include regular Unity MonoTypes.h header +#include "../../../../unity/unity-sources/Runtime/Mono/MonoTypes.h" +#include "../../../../unity/unity-sources/Runtime/Mono/MonoTypeSignatures.h" + +#endif //ENABLE_MONO +#endif diff --git a/src/coreclr/vm/mono/mono_coreclr.cpp b/src/coreclr/vm/mono/mono_coreclr.cpp new file mode 100644 index 00000000000000..acbd6ebd368fec --- /dev/null +++ b/src/coreclr/vm/mono/mono_coreclr.cpp @@ -0,0 +1,3749 @@ +#include "common.h" +#include "MonoCoreClr.h" +#include + +#include "../../gc/gcscan.h" +#include "../../gc/objecthandle.h" +#include "assembly.hpp" +#include "assemblynative.hpp" +#include "caparser.h" +#include "ecall.h" +#include "mscoree.h" +#include "stringliteralmap.h" +#include "threadlocalpoolallocator.h" +#include "threads.h" +#include "threadsuspend.h" +#include "typeparse.h" +#include "typestring.h" + +#ifdef FEATURE_PAL +#include "pal.h" +#endif // FEATURE_PAL + +// we only need domain reload for Editor +// #define UNITY_SUPPORT_DOMAIN_UNLOAD 1 + + +#ifdef WIN32 +#define EXPORT_API __declspec(dllexport) +#define EXPORT_CC __cdecl +#define PATH_SEPARATOR ';' +#else +#define EXPORT_API __attribute__((visibility("default"))) +#define EXPORT_CC +#define PATH_SEPARATOR ':' +#endif + +//#define TRACE_API(format,...) { printf("%s (" format ")\n", __func__, __VA_ARGS__); fflush(stdout); } +#define TRACE_API(format,...) + +void* g_CLRRuntimeHost; +unsigned int g_RootDomainId; + +struct HostStruct +{ + intptr_t version; + intptr_t (*load_assembly_from_data)(const char* data, int64_t length); + intptr_t (*load_assembly_from_path)(const char* path, int32_t length); +}; +HostStruct* g_HostStruct; + +//MonoImage *gCoreCLRHelperAssembly; +//MonoClass* gALCWrapperClass; +//MonoObject* gALCWrapperObject; +//MonoMethod* gALCWrapperLoadFromAssemblyPathMethod; +//MonoMethod* gALCWrapperLoadFromAssemblyDataMethod; +//MonoMethod* gALCWrapperDomainUnloadNotificationMethod; +//MonoMethod* gALCWrapperInitUnloadMethod; +//MonoMethod* gALCWrapperFinishUnloadMethod; +//MonoMethod* gALCWrapperCheckRootForUnloadingMethod; +//MonoMethod* gALCWrapperCheckAssemblyForUnloadingMethod; +//MonoMethod* gALCWrapperAddPathMethod; + +thread_local MonoDomain *gCurrentDomain = NULL; +MonoDomain *gRootDomain; +EXTERN_C IMAGE_DOS_HEADER __ImageBase; + +typedef const char*(*UnityFindPluginCallback)(const char*); +static UnityFindPluginCallback unity_find_plugin_callback = NULL; + +MonoObject* GetMonoDomainObject(MonoDomain *domain) +{ + return mono_gchandle_get_target((guint32)(intptr_t)domain); +} + +MonoDomain* CreateMonoDomainFromObject(MonoObject *o) +{ + return (MonoDomain*)(intptr_t)mono_gchandle_new(o, false); +} + +CrstStatic g_gc_handles_lock; +CrstStatic g_add_internal_lock; + +static SString* s_AssemblyDir; +static SString* s_EtcDir; +static SString* s_AssemblyPaths; + +// Import this function manually as it is not defined in a header +extern "C" HRESULT GetCLRRuntimeHost(REFIID riid, IUnknown **ppUnk); + +#define ASSERT_NOT_IMPLEMENTED printf("Function not implemented: %s\n", __func__); + +#define kCoreCLRHelpersDll "unity-embed-host.dll" +#define FIELD_ATTRIBUTE_PRIVATE 0x0001 +#define FIELD_ATTRIBUTE_FAMILY 0x0004 +#define FIELD_ATTRIBUTE_PUBLIC 0x0006 +const int MONO_TABLE_TYPEDEF = 2; // mono/metadata/blob.h + +struct MonoCustomAttrInfo_clr +{ + IMDInternalImport *import; + mdToken mdDef; + Assembly *assembly; +}; + +class GCNativeFrame : public Frame +{ + VPTR_VTABLE_CLASS(GCNativeFrame, Frame) + +public: + + GCNativeFrame() { + stackBase = NULL; + }; + + VOID Pop(); + + virtual void GcScanRoots(promote_func *fn, ScanContext* sc) + { + for (UINT32 i=0; i>= 1) + { + if (mask & 1) + { + void *ptr = stackBase - (i * sizeof(UInt64) * 8) - j; + fn ((PTR_PTR_Object)ptr, sc, 0); + } + } + } + } + + void PushStackPtr(void **addr) + { + if (stackBase < addr) + stackBase = addr + 1024; + ptrdiff_t bitOffs = stackBase - addr; + size_t arrayIndex = bitOffs / (sizeof(UInt64) * 8); + UInt64 bitIndex = bitOffs % (sizeof(UInt64) * 8); + size_t count = bits.GetCount(); + if (count < arrayIndex + 1) + { + bits.SetCount((COUNT_T)arrayIndex + 1); + for (size_t i=count;i<=arrayIndex;i++) + bits[(COUNT_T)i] = 0; + } + bits[(COUNT_T)arrayIndex] |= 1LL << bitIndex; + } + + void PopStackPtr(void **addr) + { + ptrdiff_t bitOffs = stackBase - addr; + size_t arrayIndex = bitOffs / (sizeof(UInt64) * 8); + UInt64 bitIndex = bitOffs % (sizeof(UInt64) * 8); + if (bits.GetCount() > arrayIndex) + bits[(COUNT_T)arrayIndex] &= ~(1LL << bitIndex); + } + +private: + void **stackBase; + SArray bits; + + // Keep as last entry in class + DEFINE_VTABLE_GETTER_AND_DTOR(GCNativeFrame) +}; + +#ifndef __GNUC__ +__declspec(thread) GCNativeFrame * pCurrentThreadNativeFrame; +#else // !__GNUC__ +thread_local GCNativeFrame * pCurrentThreadNativeFrame; +#endif // !__GNUC__ + +thread_local int g_isManaged = 0; + +typedef Assembly MonoAssembly_clr; +typedef Assembly MonoImage_clr; +typedef Object MonoObject_clr; +typedef FieldDesc MonoClassField_clr; // struct MonoClassField; +typedef MethodTable MonoClass_clr; //struct MonoClass; +typedef AppDomain MonoDomain_clr; //struct MonoDomain; +typedef MethodDesc MonoMethod_clr; +typedef OBJECTREF MonoObjectRef_clr; +typedef TypeHandle MonoType_clr; +typedef ArrayBase MonoArray_clr; +typedef Thread MonoThread_clr; +typedef MethodDesc MonoMethodSignature_clr; + +static inline MonoType_clr MonoType_clr_from_MonoType(MonoType* type) +{ + return MonoType_clr::FromPtr(type); +} + +static inline MonoType* MonoType_clr_to_MonoType(MonoType_clr type) +{ + return (MonoType*)type.AsPtr(); +} + +static void get_dirname(char* source) +{ + for (size_t i = strlen(source) - 1; i >= 0; i--) + { + if (source[i] == '/' || source[i] == '\\') + { + source[i + 1] = '\0'; + return; + } + } +} + +MonoString* InvokeFindPluginCallback(MonoString* path) +{ + if (unity_find_plugin_callback) + { + const char* result = unity_find_plugin_callback(mono_string_to_utf8(path)); + if (result != NULL) + { + MonoString* result_mono = mono_string_new_wrapper(result); + return result_mono; + } + } + return NULL; +} + +extern "C" EXPORT_API int EXPORT_CC EXPORT_CC coreclr_array_length(MonoArray* array) +{ + ArrayBase* arrayObj = (ArrayBase*)array; + + return arrayObj->GetNumComponents(); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC EXPORT_CC coreclr_class_from_systemtypeinstance (MonoObject* systemTypeInstance) +{ + ReflectClassBaseObject* refClass = (ReflectClassBaseObject*)systemTypeInstance; + { + GCX_COOP(); + return (MonoClass*)refClass->GetType().AsMethodTable(); + } +} + +extern "C" EXPORT_API void EXPORT_CC mono_add_internal_call(const char *name, gconstpointer method) +{ + TRACE_API("%s, %p", name, method); + + assert(name != nullptr); + assert(method != nullptr); + CrstHolder lock(&g_add_internal_lock); + ECall::RegisterICall(name, (PCODE)method); +} + +extern "C" EXPORT_API char* EXPORT_CC mono_array_addr_with_size(MonoArray *array, int size, uintptr_t idx) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_array_class_get(MonoClass *eclass, guint32 rank) +{ + CONTRACTL{ + STANDARD_VM_CHECK; + PRECONDITION(eclass != nullptr); + PRECONDITION(rank > 0); + } CONTRACTL_END; + + // TODO: We do not make any caching here + // Might be a problem compare to mono implem that is caching + // (clients might expect that for a same eclass+rank, we get the same array class pointer) + + TypeHandle typeHandle(reinterpret_cast(eclass)); + auto arrayMT = typeHandle.MakeArray(rank); + + return (MonoClass*)arrayMT.GetMethodTable(); +} + +extern "C" EXPORT_API int EXPORT_CC mono_array_element_size(MonoClass* classOfArray) +{ + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + PRECONDITION(classOfArray != NULL); + } + CONTRACTL_END; + + return reinterpret_cast(classOfArray)->GetArrayElementTypeHandle().GetSize(); +} + +extern "C" EXPORT_API MonoArray* EXPORT_CC mono_array_new(MonoDomain *domain, MonoClass *eclass, guint32 n) +{ + CONTRACTL{ + THROWS; + GC_TRIGGERS; + PRECONDITION(domain != nullptr); + PRECONDITION(eclass != nullptr); + } CONTRACTL_END; + + GCX_COOP(); + // TODO: handle large heap flag? + auto arrayRef = AllocateObjectArray(n, (MonoClass_clr*)eclass); + + auto array_clr = (MonoArray_clr*)OBJECTREFToObject(arrayRef); + //auto offsetValue = (char*)array_clr->GetDataPtr() - (char*)array_clr; + return (MonoArray*)array_clr; +} + +extern "C" EXPORT_API void EXPORT_CC mono_assembly_close (MonoAssembly * assembly) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_assembly_fill_assembly_name (MonoImage * image, MonoAssemblyName * aname) +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API void EXPORT_CC mono_assembly_foreach (GFunc func, gpointer user_data) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API MonoImage* EXPORT_CC mono_assembly_get_image(MonoAssembly *assembly) +{ + TRACE_API("%p", assembly); + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + PRECONDITION(assembly != NULL); + } + CONTRACTL_END; + + // Assume for now that Assembly == Image + return (MonoImage*)assembly; +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_assembly_get_object(MonoDomain *domain, MonoAssembly *assembly) +{ + FCALL_CONTRACT; + GCX_COOP(); + return (MonoObject*)OBJECTREFToObject(reinterpret_cast(assembly)->GetExposedObject()); +} + +extern "C" EXPORT_API MonoAssembly* EXPORT_CC mono_assembly_load_from(MonoImage *image, const char*fname, int *status) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoAssembly* EXPORT_CC mono_assembly_load_from_full(MonoImage *image, const char *fname, int *status, gboolean refonly) +{ + // TODO: As we are making MonoImage == MonoAssembly, return it as-is + return (MonoAssembly*)image; +} + +extern "C" EXPORT_API MonoAssembly* EXPORT_CC mono_assembly_loaded(MonoAssemblyName *aname) +{ + TRACE_API("%p", aname); + + AppDomain::AssemblyIterator assemblyIterator = SystemDomain::GetCurrentDomain()->IterateAssembliesEx((AssemblyIterationFlags)( + kIncludeExecution | kIncludeLoaded | kIncludeCollected)); + + CollectibleAssemblyHolder pDomainAssembly; + while (assemblyIterator.Next(pDomainAssembly.This())) + { + auto simpleName = pDomainAssembly->GetSimpleName(); + if (strcmp(simpleName, aname->name) == 0) + { + return (MonoAssembly*)pDomainAssembly->GetAssembly(); + } + } + return NULL; +} + +extern "C" EXPORT_API void EXPORT_CC mono_assembly_name_free (MonoAssemblyName * assembly) +{ + free((void*)assembly->name); + assembly->name = NULL; +} + +extern "C" EXPORT_API int EXPORT_CC mono_assembly_name_parse(const char* name, MonoAssemblyName *assembly) +{ + assembly->name = _strdup(name); + return 1; +} + +extern "C" EXPORT_API MonoAssembly* EXPORT_CC mono_assembly_open(const char *filename, int *status) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API gint32 EXPORT_CC mono_class_array_element_size(MonoClass *ac) +{ + CONTRACTL{ + STANDARD_VM_CHECK; + PRECONDITION(ac != nullptr); + } CONTRACTL_END; + auto ac_clr = (MonoClass_clr*)ac; + + // TODO: Is it really the method to use? + DWORD s = ac_clr->IsValueType() ? ac_clr->GetNumInstanceFieldBytes() : sizeof(void*);// ac_clr->GetBaseSize(); + return s; +} + +extern "C" EXPORT_API MonoType* EXPORT_CC mono_class_enum_basetype(MonoClass *klass) +{ + // the type loading path now can throw exceptions and trigger GC so comment out for now + CONTRACTL + { + // NOTHROW; + // GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + + CorElementType type = reinterpret_cast(klass)->GetInternalCorElementType(); + switch(type) + { + case ELEMENT_TYPE_CHAR: + return mono_class_get_type(mono_get_char_class()); + case ELEMENT_TYPE_U1: + return mono_class_get_type(mono_get_byte_class()); + case ELEMENT_TYPE_I2: + return mono_class_get_type(mono_get_int16_class()); + case ELEMENT_TYPE_I4: + return mono_class_get_type(mono_get_int32_class()); + case ELEMENT_TYPE_U4: + return mono_class_get_type((MonoClass*)CoreLibBinder::GetClass(CLASS__UINT32)); + case ELEMENT_TYPE_I8: + return mono_class_get_type(mono_get_int64_class()); + default: + printf("mono_class_enum_basetype: Element type %x not implemented!\n", type); + return NULL; + } +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_class_from_mono_type(MonoType *image) +{ + MonoClass_clr* klass = MonoType_clr_from_MonoType(image).GetMethodTable(); + return (MonoClass*)klass; +} + +MonoClass * mono_class_from_name(MonoImage *image, const char* name_space, const char *name, bool ignoreCase) +{ + CONTRACTL + { + THROWS; + GC_TRIGGERS; + // We don't support multiple domains + PRECONDITION(image != nullptr); + PRECONDITION(name_space != nullptr); + PRECONDITION(name != nullptr); + } + CONTRACTL_END; + auto assembly = (MonoAssembly_clr*)image; + DomainAssembly* domainAssembly = assembly->GetDomainAssembly(); + + InlineSString<512> fullTypeName(SString::Utf8, name_space); + fullTypeName.AppendUTF8("."); + fullTypeName.AppendUTF8(name); + SString::Iterator i = fullTypeName.Begin(); + while (fullTypeName.Find(i, W('/'))) + fullTypeName.Replace(i, W('+')); + + TypeHandle retTypeHandle = TypeName::GetTypeManaged(fullTypeName.GetUnicode(), domainAssembly, FALSE, ignoreCase, TRUE, NULL, NULL); + + if (!retTypeHandle.IsNull()) + { + return (MonoClass*)retTypeHandle.AsMethodTable(); + } + return NULL; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_class_from_name(MonoImage *image, const char* name_space, const char *name) +{ + TRACE_API("%x, %s, %s", image, name_space, name); + + return mono_class_from_name(image, name_space, name, false); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_class_from_name_case(MonoImage *image, const char* name_space, const char *name) +{ + TRACE_API("%x, %s, %s", image, name_space, name); + + return mono_class_from_name(image, name_space, name, true); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_class_get(MonoImage *image, guint32 type_token) +{ + TRACE_API("%p, %x", image, type_token); + + DomainAssembly* domainAssembly = reinterpret_cast(image)->GetDomainAssembly(); + MonoClass_clr* klass = ClassLoader::LoadTypeDefOrRefOrSpecThrowing(domainAssembly->GetModule(), (mdToken)type_token, NULL).AsMethodTable(); + return (MonoClass*)klass; +} + +extern "C" EXPORT_API MonoType* EXPORT_CC mono_class_get_byref_type(MonoClass *klass) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_class_get_element_class(MonoClass *klass) +{ + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + return (MonoClass*)reinterpret_cast(klass)->GetArrayElementTypeHandle().GetMethodTable(); +} + +extern "C" EXPORT_API MonoClassField* EXPORT_CC mono_class_get_field_from_name(MonoClass *klass, const char *name) +{ + CONTRACTL + { + GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + MonoClass_clr* mt = reinterpret_cast(klass); + + ApproxFieldDescIterator fieldDescIterator(mt, ApproxFieldDescIterator::ALL_FIELDS); + FieldDesc* pField; + + while ((pField = fieldDescIterator.Next()) != NULL) + { + if(strcmp(pField->GetName(), name) == 0) + { + return (MonoClassField*)pField; + } + } + + return NULL; +} + +thread_local ThreadLocalPoolAllocator g_ApproxFieldDescIteratorAlloc; + +extern "C" EXPORT_API MonoClassField* EXPORT_CC mono_class_get_fields(MonoClass* klass, gpointer *iter) +{ + TRACE_API("%p, %p", klass, iter); + + CONTRACTL + { + THROWS; + GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + if (!iter) + { + return NULL; + } + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + + ApproxFieldDescIterator* iterator = (ApproxFieldDescIterator*)*iter; + if (iterator == nullptr) + { + iterator = g_ApproxFieldDescIteratorAlloc.Alloc(); + iterator->Init(klass_clr, ApproxFieldDescIterator::INSTANCE_FIELDS | ApproxFieldDescIterator::STATIC_FIELDS); + *iter = iterator; + } + + auto nextField = iterator->Next(); + if (nextField == nullptr) + { + *iter = nullptr; + g_ApproxFieldDescIteratorAlloc.Free(iterator); + return nullptr; + } + + return (MonoClassField*)nextField; +} + +extern "C" EXPORT_API guint32 EXPORT_CC mono_class_get_flags(MonoClass *klass) +{ + MonoClass_clr* clrClass = reinterpret_cast(klass); + mdTypeDef token = clrClass->GetCl(); + IMDInternalImport *pImport = clrClass->GetMDImport(); + DWORD dwClassAttrs; + pImport->GetTypeDefProps(token, &dwClassAttrs, NULL); + return dwClassAttrs; +} + +extern "C" EXPORT_API MonoImage* EXPORT_CC mono_class_get_image(MonoClass *klass) +{ + MonoClass_clr* classClr = (MonoClass_clr*)klass; + + return (MonoImage*)classClr->GetAssembly(); +} + +// Wrap iterator value in heap allocated value we can return from embedding API +struct MethodTable_InterfaceMapIteratorWrapper +{ + MethodTable::InterfaceMapIterator iter; + + MethodTable_InterfaceMapIteratorWrapper(MonoClass_clr* klass_clr) : + iter(klass_clr->IterateInterfaceMap()) + { + } +}; + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_class_get_interfaces(MonoClass* klass, gpointer *iter) +{ + TRACE_API("%p, %p", klass, iter); + + CONTRACTL + { + THROWS; + GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + if (!iter) + { + return NULL; + } + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + + MethodTable_InterfaceMapIteratorWrapper* iterator = (MethodTable_InterfaceMapIteratorWrapper*)*iter; + if (iterator == nullptr) + { + iterator = new MethodTable_InterfaceMapIteratorWrapper(klass_clr); + *iter = iterator; + } + + if (!iterator->iter.Next()) + { + *iter = nullptr; + delete iterator; + return nullptr; + } + + // TODO: this used to be a call to GetInterface, not sure of the difference + return (MonoClass*)iterator->iter.GetInterfaceApprox(); +} + +extern "C" EXPORT_API MonoMethod* EXPORT_CC mono_class_get_method_from_name(MonoClass *klass, const char *name, int param_count) +{ + CONTRACTL + { + THROWS; + GC_TRIGGERS; + PRECONDITION(klass != NULL); + PRECONDITION(name != NULL); + } + CONTRACTL_END; + + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + + // TODO: Check if there is an API to perform this more efficiently + while (klass_clr) + { + auto iterator = MethodTable::MethodIterator(klass_clr); + while (iterator.IsValid()) + { + auto method = iterator.GetMethodDesc(); + + if (strcmp(method->GetName(), name) == 0) + { + MetaSig methodSig(method); + + DWORD numArgs = methodSig.NumFixedArgs(); + if (numArgs == param_count) + { + return (MonoMethod*)method; + } + } + iterator.Next(); + } + klass_clr = klass_clr->GetParentMethodTable(); + } + return NULL; +} + +extern "C" EXPORT_API MonoMethod* EXPORT_CC mono_class_get_methods(MonoClass* klass, gpointer *iter) +{ + TRACE_API("%p, %p", klass, iter); + + CONTRACTL + { + THROWS; + GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + if (!iter) + { + return NULL; + } + + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + + MethodTable::IntroducedMethodIterator* iterator = (MethodTable::IntroducedMethodIterator*)*iter; + if (iterator == NULL) + { + // TODO: Using the option FALSE to iterate methods through a non-canonical type. + // Not sure exactly what does this mean + iterator = new MethodTable::IntroducedMethodIterator(klass_clr, 0); + *iter = iterator; + } + + if (!iterator->IsValid()) + { + *iter = NULL; + delete iterator; + return NULL; + } + + auto method = iterator->GetMethodDesc(); + iterator->Next(); + return (MonoMethod*)method; +} + +extern "C" EXPORT_API const char* EXPORT_CC mono_class_get_name(MonoClass *klass) +{ + MonoClass_clr* clazz = (MonoClass_clr*)klass; + if (clazz->IsArray()) + { + const char *elementName = mono_class_get_name(mono_class_get_element_class(klass)); + int rank = clazz->GetRank(); + SString arrayName(SString::Utf8, elementName); + arrayName += '['; + for (int i=0; iGetMDImport()->GetNameOfTypeDef(clazz->GetCl(), &name, &namespaze); + + if (name) + return name; + + DefineFullyQualifiedNameForClass(); + name = GetFullyQualifiedNameForClass(clazz); + return name; +} + +extern "C" EXPORT_API const char* EXPORT_CC mono_class_get_namespace(MonoClass *klass) +{ + MonoClass_clr* clazz = (MonoClass_clr*)klass; + LPCUTF8 name, namespaze; + clazz->GetMDImport()->GetNameOfTypeDef(clazz->GetCl(), &name, &namespaze); + return namespaze; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_class_get_nested_types(MonoClass* klass, gpointer *iter) +{ + TRACE_API("%p, %p", klass, iter); + + CONTRACTL + { + THROWS; // new BYTE + GC_TRIGGERS; // ClassLoader::LoadTypeDefThrowing + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + if (!iter) + { + return NULL; + } + + struct NestedTypesIterator + { + ULONG index; + ULONG count; + mdTypeDef tokens[]; + }; + + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + + NestedTypesIterator* nestedIterator = (NestedTypesIterator*)*iter; + if (nestedIterator == NULL) + { + mdTypeDef token = klass_clr->GetCl(); + IMDInternalImport *pImport = klass_clr->GetMDImport(); + ULONG nestedCount; + pImport->GetCountNestedClasses(token, &nestedCount); + // Early exit if there is no nested classes + if (nestedCount == 0) + { + return NULL; + } + SIZE_T sizeOfIterator = sizeof(NestedTypesIterator) + sizeof(mdTypeDef) * nestedCount; + nestedIterator = (NestedTypesIterator*)new BYTE[sizeOfIterator]; + nestedIterator->index = 0; + nestedIterator->count = nestedCount; + *iter = nestedIterator; + pImport->GetNestedClasses(token, nestedIterator->tokens, nestedCount, &nestedCount); + } + + if (nestedIterator->index < nestedIterator->count) + { + TypeHandle th = ClassLoader::LoadTypeDefThrowing(klass_clr->GetModule(), nestedIterator->tokens[nestedIterator->index]); + nestedIterator->index++; + MONO_ASSERTE(!th.IsNull()); + return (MonoClass*)th.GetMethodTable(); + } + else + { + *iter = NULL; + delete[](BYTE*)nestedIterator; + } + + return NULL; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_class_get_nesting_type(MonoClass *klass) +{ + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + if (!klass_clr->GetClass()->IsNested()) + { + return nullptr; + } + MonoClass_clr* ret = ClassLoader::LoadTypeDefOrRefOrSpecThrowing(klass_clr->GetModule(), klass_clr->GetEnclosingCl(), NULL, ClassLoader::ThrowIfNotFound, ClassLoader::PermitUninstDefOrRef).AsMethodTable(); + return (MonoClass*)ret; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_class_get_parent(MonoClass *klass) +{ + MonoClass_clr* parent = reinterpret_cast(klass)->GetParentMethodTable(); + return (MonoClass*)parent; +} + +extern "C" EXPORT_API MonoProperty* EXPORT_CC mono_class_get_properties(MonoClass* klass, gpointer *iter) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoProperty* EXPORT_CC mono_class_get_property_from_name(MonoClass *klass, const char *name) +{ + // CoreCLR does not have easy support for iterating on properties on a MethodTable. + // So instead, we look for the property's "get" method. This will not work for set-only + // properties, but is sufficient for our needs for now. + SString propertyName(SString::Utf8, "get_"); + propertyName += SString(SString::Utf8, name); + StackScratchBuffer buffer; + return (MonoProperty*)mono_class_get_method_from_name(klass, propertyName.GetUTF8(buffer), 0); +} + +extern "C" EXPORT_API int EXPORT_CC mono_class_get_rank(MonoClass *klass) +{ + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + return klass_clr->IsArray() ? klass_clr->GetRank() : 0; +} + +extern "C" EXPORT_API MonoType* EXPORT_CC mono_class_get_type(MonoClass *klass) +{ + TypeHandle h(reinterpret_cast(klass)); + return (MonoType*)h.AsPtr(); +} + +extern "C" EXPORT_API guint32 EXPORT_CC mono_class_get_type_token(MonoClass *klass) +{ + return (guint32)reinterpret_cast(klass)->GetTypeID(); +} + +extern "C" EXPORT_API void* EXPORT_CC mono_class_get_userdata(MonoClass* klass) +{ + TRACE_API("%p", klass); + + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + return ((MonoClass_clr*)klass)->m_pUserData; +} + +extern "C" EXPORT_API int EXPORT_CC mono_class_get_userdata_offset() +{ + //TRACE_API("", NULL); + + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + } + CONTRACTL_END; + + return offsetof(MethodTable, m_pUserData); +} + +extern "C" EXPORT_API gint32 EXPORT_CC mono_class_instance_size(MonoClass *klass) +{ + return (guint32)reinterpret_cast(klass)->GetNumInstanceFieldBytes() + sizeof(void*); +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_class_is_blittable(MonoClass * klass) +{ + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + return klass_clr->IsBlittable(); +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_class_is_enum(MonoClass *klass) +{ + return (gboolean)reinterpret_cast(klass)->IsEnum() ? TRUE : FALSE; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_class_is_generic(MonoClass* klass) +{ + CONTRACTL{ + PRECONDITION(klass != nullptr); + } CONTRACTL_END; + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + return klass_clr->IsGenericTypeDefinition() ? TRUE : FALSE; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_class_is_inflated(MonoClass* klass) +{ + CONTRACTL{ + PRECONDITION(klass != nullptr); + } CONTRACTL_END; + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + // TODO: is it really the concept behind inflated? (generic instance?) + auto isgeneric = klass_clr->GetNumGenericArgs() > 0 + && !klass_clr->IsGenericTypeDefinition(); + + return isgeneric ? TRUE : FALSE; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_class_is_subclass_of(MonoClass *klass, MonoClass *klassc, gboolean check_interfaces) +{ + MonoClass_clr* clazz = (MonoClass_clr*)klass; + MonoClass_clr* clazzc = (MonoClass_clr*)klassc; + do + { + if (clazz == clazzc) + return TRUE; + if (clazz->IsArray() && clazzc->IsArray()) + { + if (clazz->GetRank() == clazzc->GetRank() && clazz->GetArrayElementTypeHandle() == clazzc->GetArrayElementTypeHandle()) + return TRUE; + } + if (check_interfaces) + { + auto ifaceIter = clazz->IterateInterfaceMap(); + while (ifaceIter.Next()) + if (ifaceIter.GetInterfaceApprox() /* TODO: this used to be GetInterface, is this okay? */ == clazzc) + return TRUE; + } + clazz = clazz->GetParentMethodTable(); + } + while (clazz != NULL); + return FALSE; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_class_is_valuetype(MonoClass *klass) +{ + MonoClass_clr* clazz = (MonoClass_clr*)klass; + return (gboolean)clazz->IsValueType()? TRUE : FALSE; +} + +extern "C" EXPORT_API void EXPORT_CC mono_class_set_userdata(MonoClass* klass, void* userdata) +{ + TRACE_API("%p, %p", klass, userdata); + + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + ((MonoClass_clr*)klass)->m_pUserData = userdata; +} + +extern "C" EXPORT_API MonoVTable* EXPORT_CC mono_class_vtable(MonoDomain *domain, MonoClass *klass) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API void EXPORT_CC mono_config_parse(const char *filename) +{ + // NOP +} + +MonoObject* CreateAttributeInstance(MonoCustomAttrInfo_clr* attributes, mdCustomAttribute mdAttribute, MonoClass *attr_klass) +{ + mdToken tkCtor; + if (attributes->import->GetCustomAttributeProps(mdAttribute, &tkCtor) != S_OK) + return NULL; + + if (attr_klass == NULL) + { + if (TypeFromToken(tkCtor) == mdtMemberRef || TypeFromToken(tkCtor) == mdtMethodDef) + { + mdToken tkType; + if (attributes->import->GetParentToken(tkCtor, &tkType) == S_OK) + { + if (TypeFromToken(tkType) == mdtTypeRef || TypeFromToken(tkType) == mdtTypeDef) + { + DomainAssembly* domainAssembly = attributes->assembly->GetDomainAssembly(); + attr_klass = (MonoClass*)ClassLoader::LoadTypeDefOrRefThrowing(domainAssembly->GetModule(), tkType, + ClassLoader::ReturnNullIfNotFound, + ClassLoader::PermitUninstDefOrRef, + tdNoTypes).AsMethodTable(); + } + } + } + } + + MonoObject* obj = mono_object_new(mono_domain_get(), attr_klass); + + DomainAssembly* domainAssembly = attributes->assembly->GetDomainAssembly(); + + MethodDesc* ctorMethod = NULL; + if (TypeFromToken(tkCtor) == mdtMemberRef) + { + MethodDesc * pMD = NULL; + FieldDesc * pFD = NULL; + TypeHandle th; + MemberLoader::GetDescFromMemberRef(domainAssembly->GetModule(), tkCtor, &ctorMethod, &pFD, NULL, FALSE, &th); + } + else + ctorMethod = domainAssembly->GetModule()->LookupMethodDef(tkCtor); + + const BYTE *pbAttr; // Custom attribute data as a BYTE*. + ULONG cbAttr; // Size of custom attribute data. + + if (attributes->import->GetCustomAttributeAsBlob(mdAttribute, (const void**)&pbAttr, &cbAttr) != S_OK) + return NULL; + + CustomAttributeParser CA(pbAttr, cbAttr); + CA.ValidateProlog(); + + GCX_COOP(); + + MetaSig methodSig(ctorMethod); + DWORD numArgs = methodSig.NumFixedArgs(); + ArgIterator argIt(&methodSig); + + const int MAX_ARG_SLOT = 128; + ARG_SLOT argslots[MAX_ARG_SLOT]; + DWORD slotIndex = 0; + argslots[0] = PtrToArgSlot(obj); + slotIndex++; + + for (DWORD argIndex = 0; argIndex < numArgs; argIndex++, slotIndex++) + { + int ofs = argIt.GetNextOffset(); + _ASSERTE(ofs != TransitionBlock::InvalidOffset); + auto stackSize = argIt.GetArgSize(); + + auto argTH = methodSig.GetLastTypeHandleNT(); + auto argType = argTH.GetInternalCorElementType(); + + switch (argType) + { + case ELEMENT_TYPE_I1: + case ELEMENT_TYPE_U1: + case ELEMENT_TYPE_BOOLEAN: + { + UINT8 u1 = 0; + CA.GetU1(&u1); + argslots[slotIndex] = u1; + break; + } + + case ELEMENT_TYPE_I2: + case ELEMENT_TYPE_U2: + { + UINT16 u2 = 0; + CA.GetU2(&u2); + argslots[slotIndex] = u2; + break; + } + case ELEMENT_TYPE_I4: + case ELEMENT_TYPE_U4: + { + UINT32 u4 = 0; + CA.GetU4(&u4); + argslots[slotIndex] = u4; + break; + } + case ELEMENT_TYPE_I8: + case ELEMENT_TYPE_U8: + { + UINT64 u8 = 0; + CA.GetU8(&u8); + argslots[slotIndex] = u8; + break; + } + case ELEMENT_TYPE_R4: + { + float f = CA.GetR4(); + argslots[slotIndex] = *(INT32*)(&f); + break; + } + case ELEMENT_TYPE_R8: + { + double d = CA.GetR8(); + argslots[slotIndex] = *(INT64*)(&d); + break; + } + case ELEMENT_TYPE_CLASS: + case ELEMENT_TYPE_STRING: + { + ULONG cbVal; + LPCUTF8 pStr; + CA.GetString(&pStr, &cbVal); + argslots[slotIndex] = ObjToArgSlot(ObjectToOBJECTREF((Object*)mono_string_new_len(mono_domain_get(), pStr, cbVal))); + break; + } + default: + assert(false && "This argType is not supported"); + break; + } + } + + g_isManaged++; + EX_TRY + { + OBJECTREF objref = ObjectToOBJECTREF((Object*)obj); + MethodDescCallSite invoker(ctorMethod, &objref); + invoker.Call_RetArgSlot(argslots); + } + EX_CATCH + { + SString sstr; + GET_EXCEPTION()->GetMessage(sstr); + StackScratchBuffer buffer; + printf("Exc: %s %d %x\n", sstr.GetUTF8(buffer), GET_EXCEPTION()->IsType(CLRException::GetType()), GET_EXCEPTION()->GetInstanceType()); + } + EX_END_CATCH(SwallowAllExceptions) + g_isManaged--; + + methodSig.Reset(); + + return obj; +} + + +extern "C" EXPORT_API MonoArray* EXPORT_CC mono_custom_attrs_construct(MonoCustomAttrInfo *ainfo) +{ + MonoCustomAttrInfo_clr* attributes = reinterpret_cast(ainfo); + HENUMInternal iterator; + if (attributes->import->EnumInit(mdtCustomAttribute, attributes->mdDef, &iterator) != S_OK) + return NULL; + + auto count = attributes->import->EnumGetCount(&iterator); + + auto array = mono_array_new(mono_domain_get(), mono_get_object_class(), count); + + mdCustomAttribute mdAttribute; + int arrayIndex = 0; + while (attributes->import->EnumNext(&iterator, &mdAttribute)) + ((MonoObject**)((ArrayBase*)array)->GetDataPtr())[arrayIndex++] = CreateAttributeInstance(attributes, mdAttribute, NULL); + + return (MonoArray*)array; +} + +thread_local ThreadLocalPoolAllocator g_AttributeInfoAlloc; + +extern "C" EXPORT_API void EXPORT_CC mono_custom_attrs_free(MonoCustomAttrInfo* attr) +{ + g_AttributeInfoAlloc.Free((MonoCustomAttrInfo_clr*)attr); +} + +extern "C" EXPORT_API MonoCustomAttrInfo* EXPORT_CC mono_custom_attrs_from_assembly(MonoAssembly *assembly) +{ + TRACE_API("%p", assembly); + MonoCustomAttrInfo_clr *aInfo = g_AttributeInfoAlloc.Alloc(); + auto clrAssembly = (MonoImage_clr*)assembly; + aInfo->import = clrAssembly->GetMDImport(); + aInfo->mdDef = clrAssembly->GetManifestToken(); + aInfo->assembly = clrAssembly; + return (MonoCustomAttrInfo*)aInfo; +} + +extern "C" EXPORT_API MonoCustomAttrInfo* EXPORT_CC mono_custom_attrs_from_class(MonoClass *klass) +{ + TRACE_API("%p", klass); + MonoClass_clr* clrClass = reinterpret_cast(klass); + MonoCustomAttrInfo_clr *aInfo = g_AttributeInfoAlloc.Alloc(); + aInfo->import = clrClass->GetMDImport(); + aInfo->mdDef = clrClass->GetCl(); + aInfo->assembly = clrClass->GetAssembly(); + return (MonoCustomAttrInfo*)aInfo; +} + +extern "C" EXPORT_API MonoCustomAttrInfo* EXPORT_CC mono_custom_attrs_from_field(MonoClass *klass, MonoClassField *field) +{ + TRACE_API("%p, %p", klass, field); + FieldDesc* clrFieldDesc = reinterpret_cast(field); + MonoCustomAttrInfo_clr *aInfo = g_AttributeInfoAlloc.Alloc(); + aInfo->import = clrFieldDesc->GetMDImport(); + aInfo->mdDef = clrFieldDesc->GetMemberDef(); + aInfo->assembly = clrFieldDesc->GetApproxEnclosingMethodTable_NoLogging()->GetAssembly(); + return (MonoCustomAttrInfo*)aInfo; +} + +extern "C" EXPORT_API MonoCustomAttrInfo* EXPORT_CC mono_custom_attrs_from_method(MonoMethod *method) +{ + TRACE_API("%p", method); + MonoMethod_clr* clrMethod = reinterpret_cast(method); + MonoCustomAttrInfo_clr *aInfo = g_AttributeInfoAlloc.Alloc(); + aInfo->import = clrMethod->GetMDImport(); + aInfo->mdDef = clrMethod->GetMemberDef(); + aInfo->assembly = clrMethod->GetAssembly(); + return (MonoCustomAttrInfo*)aInfo; +} + +extern "C" EXPORT_API MonoCustomAttrInfo* EXPORT_CC mono_custom_attrs_from_property (MonoClass * klass, MonoProperty * property) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_custom_attrs_get_attr(MonoCustomAttrInfo *ainfo, MonoClass *requested_klass) +{ + TRACE_API("%p, %p", ainfo, attr_klass); + MonoCustomAttrInfo_clr* attributes = reinterpret_cast(ainfo); + + HENUMInternal iterator; + if (attributes->import->EnumInit(mdtCustomAttribute, attributes->mdDef, &iterator) != S_OK) + return NULL; + + mdCustomAttribute mdAttribute; + while (attributes->import->EnumNext(&iterator, &mdAttribute)) + { + mdToken tkCtor; + if (attributes->import->GetCustomAttributeProps(mdAttribute, &tkCtor) == S_OK) + { + if (TypeFromToken(tkCtor) == mdtMemberRef || TypeFromToken(tkCtor) == mdtMethodDef) + { + mdToken tkType; + if (attributes->import->GetParentToken(tkCtor, &tkType) == S_OK) + { + if (TypeFromToken(tkType) == mdtTypeRef || TypeFromToken(tkType) == mdtTypeDef) + { + DomainAssembly* domainAssembly = attributes->assembly->GetDomainAssembly(); + auto attr_klass = (MonoClass*)ClassLoader::LoadTypeDefOrRefThrowing(domainAssembly->GetModule(), tkType, + ClassLoader::ReturnNullIfNotFound, + ClassLoader::PermitUninstDefOrRef, + tdNoTypes).AsMethodTable(); + + if (mono_class_is_subclass_of(attr_klass, requested_klass, false)) + return CreateAttributeInstance(attributes, mdAttribute, attr_klass); + } + } + } + } + } + + return NULL; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_custom_attrs_get_attrs (MonoCustomAttrInfo * ainfo, void** iterator) +{ + TRACE_API("%p, %p", ainfo, iterator); + + MonoCustomAttrInfo_clr* attributes = reinterpret_cast(ainfo); + if (*iterator == NULL) + { + *iterator = new HENUMInternal(); + if (attributes->import->EnumInit(mdtCustomAttribute, attributes->mdDef, (HENUMInternal*)*iterator) != S_OK) + return NULL; + } + + mdCustomAttribute mdAttribute; + while (attributes->import->EnumNext((HENUMInternal*)*iterator, &mdAttribute)) + { + mdToken tkCtor; + if (attributes->import->GetCustomAttributeProps(mdAttribute, &tkCtor) == S_OK) + { + if (TypeFromToken(tkCtor) == mdtMemberRef || TypeFromToken(tkCtor) == mdtMethodDef) + { + mdToken tkType; + if (attributes->import->GetParentToken(tkCtor, &tkType) == S_OK) + { + if (TypeFromToken(tkType) == mdtTypeRef || TypeFromToken(tkType) == mdtTypeDef) + { + DomainAssembly* domainAssembly = attributes->assembly->GetDomainAssembly(); + MonoClass_clr* klass = ClassLoader::LoadTypeDefOrRefThrowing(domainAssembly->GetModule(), tkType, + ClassLoader::ReturnNullIfNotFound, + ClassLoader::PermitUninstDefOrRef, + tdNoTypes).AsMethodTable(); + if (klass != NULL) + return (MonoClass*)klass; + } + } + } + } + } + + attributes->import->EnumClose((HENUMInternal*)*iterator); + delete (HENUMInternal*)*iterator; + return NULL; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_custom_attrs_has_attr(MonoCustomAttrInfo *ainfo, MonoClass *attr_klass) +{ + TRACE_API("%p, %p", ainfo, attr_klass); + MonoCustomAttrInfo_clr* attributes = reinterpret_cast(ainfo); + MonoClass_clr* attributeClass = reinterpret_cast(attr_klass); + +// Reference implementation. This is about 3x slower, but will likely work for any type of attribute representation, +// so if the optimized version below is suspected to not work correctly, try this one: +/* + LPCUTF8 name, namespaze; + attributeClass->GetMDImport()->GetNameOfTypeDef(attributeClass->GetCl(), &name, &namespaze); + + InlineSString<512> fullTypeName(SString::Utf8, namespaze); + fullTypeName.AppendUTF8("."); + fullTypeName.AppendUTF8(name); + + return S_OK == attributes->import->GetCustomAttributeByName(attributes->mdDef, fullTypeName.GetUTF8NoConvert(), NULL, NULL) ? TRUE : FALSE; +*/ + + HENUMInternal iterator; + if (attributes->import->EnumInit(mdtCustomAttribute, attributes->mdDef, &iterator) != S_OK) + return false; + + mdCustomAttribute mdAttribute; + bool found = false; + while (attributes->import->EnumNext(&iterator, &mdAttribute)) + { + mdToken tkCtor; + if (attributes->import->GetCustomAttributeProps(mdAttribute, &tkCtor) == S_OK) + { + if (TypeFromToken(tkCtor) == mdtMemberRef || TypeFromToken(tkCtor) == mdtMethodDef) + { + mdToken tkType; + if (attributes->import->GetParentToken(tkCtor, &tkType) == S_OK) + { + if (TypeFromToken(tkType) == mdtTypeDef) + { + if (tkType == attributeClass->GetCl()) + { + found = true; + break; + } + } + else if (TypeFromToken(tkType) == mdtTypeRef) + { + DomainAssembly* domainAssembly = attributes->assembly->GetDomainAssembly(); + MonoClass_clr* klass = ClassLoader::LoadTypeDefOrRefThrowing(domainAssembly->GetModule(), tkType, + ClassLoader::ReturnNullIfNotFound, + ClassLoader::PermitUninstDefOrRef, + tdNoTypes).AsMethodTable(); + if (klass == attributeClass) + { + found = true; + break; + } + } + } + } + } + } + + attributes->import->EnumClose(&iterator); + return found; +} + +extern "C" EXPORT_API void EXPORT_CC mono_debug_free_source_location(MonoDebugSourceLocation* location) +{ +} + +extern "C" EXPORT_API void EXPORT_CC mono_debug_init(int format) +{ + // NOP +} + +extern "C" EXPORT_API MonoDebugSourceLocation* EXPORT_CC mono_debug_lookup_source_location(MonoMethod* method, guint32 address, MonoDomain* domain) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API void EXPORT_CC mono_debug_open_image_from_memory(MonoImage *image, const char *raw_contents, int size) +{ + // NOP +} + +typedef void (*MonoDebuggerAttachFunc)(gboolean attached); +extern "C" EXPORT_API void EXPORT_CC mono_debugger_install_attach_detach_callback (MonoDebuggerAttachFunc func) +{ +} + +extern "C" EXPORT_API void EXPORT_CC mono_debugger_set_generate_debug_info(gboolean enable) +{ +} + +// DllImport fallback handling to load native libraries from custom locations +typedef void* (*MonoDlFallbackLoad) (const char *name, int flags, char **err, void *user_data); +typedef void* (*MonoDlFallbackSymbol) (void *handle, const char *name, char **err, void *user_data); +typedef void* (*MonoDlFallbackClose) (void *handle, void *user_data); + +extern "C" EXPORT_API MonoDlFallbackHandler* EXPORT_CC mono_dl_fallback_register(MonoDlFallbackLoad load_func, MonoDlFallbackSymbol symbol_func, MonoDlFallbackClose close_func, void *user_data) +{ + return NULL; +} + +extern "C" EXPORT_API void EXPORT_CC mono_dl_fallback_unregister(MonoDlFallbackHandler *handler) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_dllmap_insert (MonoImage * assembly, const char *dll, const char *func, const char *tdll, const char *tfunc) +{ + ASSERT_NOT_IMPLEMENTED; +} + +struct LoadedImage{ + char* name; + MonoImage *image; + MonoDomain *domain; + LoadedImage(const char* _name, MonoImage* _image, MonoDomain* _domain) + { + image = _image; + domain = _domain; + const char * namepos = strrchr(_name, '/'); + if (namepos) + _name = namepos + 1; + name = (char*)malloc(strlen(_name) + 1); + strcpy(name, _name); + char* suffix = strstr(name, ".dll"); + if (suffix) + *suffix = '\0'; + } + LoadedImage() {} +}; +SArray *g_LoadedImages = NULL; + + +extern "C" EXPORT_API MonoAssembly* EXPORT_CC mono_domain_assembly_open(MonoDomain *domain, const char *name) +{ + TRACE_API("%x, %s", domain, name); + + auto domainAssembly = (DomainAssembly*)g_HostStruct->load_assembly_from_path(name, (int32_t)strlen(name)); + + if (domainAssembly == NULL) + return NULL; + + auto assembly = domainAssembly->GetAssembly(); + assembly->EnsureActive(); + + if (g_LoadedImages == NULL) + g_LoadedImages = new SArray; + g_LoadedImages->Append(LoadedImage(name, (MonoImage*)assembly, domain)); + + return (MonoAssembly*)assembly; +} + +extern "C" EXPORT_API MonoDomain* EXPORT_CC mono_domain_create_appdomain(const char *domainname, const char* configfile) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_domain_finalize(MonoDomain *domain, int timeout) +{ + TRACE_API("%p, %d", domain, timeout); + + GCInterface_WaitForPendingFinalizers(); + return TRUE; +} + +extern "C" EXPORT_API MonoDomain* EXPORT_CC mono_domain_get() +{ + TRACE_API("", NULL); + return GetThreadNULLOk() != NULL ? gCurrentDomain : NULL; +} + +extern "C" EXPORT_API gint32 EXPORT_CC mono_domain_get_id(MonoDomain *domain) +{ + TRACE_API("", NULL); + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_domain_set(MonoDomain *domain, gboolean force) +{ + gCurrentDomain = domain; + return true; +} + +extern "C" EXPORT_API void EXPORT_CC mono_domain_unload(MonoDomain* domain) +{ + TRACE_API("%p", domain); + +#if UNITY_SUPPORT_DOMAIN_UNLOAD + + domain_unload(domain); +#else + ASSERT_NOT_IMPLEMENTED; +#endif +} +struct MonoInternalCallFrame +{ + FrameWithCookie frame; + bool didSetupFrame; +}; + +//static_assert(sizeof(MonoInternalCallFrame) <= sizeof(MonoInternalCallFrameOpaque), "MonoInternalCallFrameOpaque needs to be larger"); + +// We currently need to wrap Unity icalls called from managed code mono_enter/exit_internal_call. +// This has two reasons: +// 1. We want to set up a CoreCLR stack frame for the icall to make call stack unwinding work +// (so we can get managed stack traces which cross native frames, as verified by the +// can_get_full_stack_trace_in_internal_method test). +// 2. We want to switch the thread to preemptive GC mode when running our icalls, to avoid delays and +// deadlocks when the GC waits for the icall to finish. +// +// Now, the problem is that this adds some overhead to calling icalls, which is not insignificant for +// small icalls (like Profiler.BeginSample). In most cases we can run icalls without wrapping them, +// but it is not generally safe to do so. So we need to find a solution to selectively wrap icalls +// only where needed. +extern "C" EXPORT_API void EXPORT_CC mono_enter_internal_call(MonoInternalCallFrameOpaque *_frame) +{ + TRACE_API("%x", _frame); + + FrameWithCookie* frame = (FrameWithCookie*)_frame; + memset((void*)frame, 0, sizeof(MonoInternalCallFrame)); + new(frame) FrameWithCookie(0, 0); + + // Should we set up the frame? We only need to do this when calling the icall from CoreCLR JITed code, but not when + // calling it from Burst code (in which case GetThread() may not be valid if the worker thread is not attached). + ((MonoInternalCallFrame*)_frame)->didSetupFrame = GetThread() != NULL && GetThread()->PreemptiveGCDisabled(); + + // FCalls in CoreCLR always run in cooperative mode, as they are not written in a way which is + // safe to use for the precice GC. However, for Unity ICalls (which use the same transition mechanism), + // we cannot do that. Our icalls may often take non-trivial amounst of time, and in some cases use locking + // mechanisms, which can cause a deadlock, if we need to wait for it to exit to start GC on another thread. + // Because we disable the precise GC in Unity, we should be safe to interrupt our icalls for GC. + if (((MonoInternalCallFrame*)_frame)->didSetupFrame) + { + INDEBUG(static BOOL __haveCheckedRestoreState = FALSE;) + FORLAZYMACHSTATE_DEBUG_OK_TO_RETURN_BEGIN; + FORLAZYMACHSTATE(CAPTURE_STATE(frame->MachineState(), return);) + FORLAZYMACHSTATE_DEBUG_OK_TO_RETURN_END; + INDEBUG(frame->SetAddrOfHaveCheckedRestoreState(&__haveCheckedRestoreState)); + frame->Push(); + + GetThread()->EnablePreemptiveGC(); + } +} + +extern "C" EXPORT_API void EXPORT_CC mono_error_cleanup (MonoError * error) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API unsigned short EXPORT_CC mono_error_get_error_code (MonoError * error) +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API const char* EXPORT_CC mono_error_get_message (MonoError * error) +{ + + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API gint32 EXPORT_CC mono_error_ok (MonoError * error) +{ + return true; +} + +extern "C" EXPORT_API void EXPORT_CC mono_error_init (MonoError * error) +{ + +} + +extern "C" EXPORT_API MonoException* EXPORT_CC mono_exception_from_name_msg(MonoImage *image, const char *name_space, const char *name, const char *msg) +{ + SString sstr(SString::Utf8, msg); + GCX_COOP(); + MonoClass *exclass = mono_class_from_name(image, name_space, name); + MonoObject *exobj = mono_object_new(mono_domain_get(), exclass); + ((ExceptionObject*)exobj)->SetMessage(AllocateString(sstr)); + return (MonoException*)exobj; +} + +extern "C" EXPORT_API MonoException* EXPORT_CC mono_exception_from_name_two_strings(MonoImage *image, const char *name_space, const char *name, const char *msg1, const char *msg2) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API void EXPORT_CC mono_exit_internal_call(MonoInternalCallFrameOpaque *_frame) +{ + TRACE_API("%x", _frame); + + FrameWithCookie* frame = (FrameWithCookie*)_frame; + + if (((MonoInternalCallFrame*)_frame)->didSetupFrame) + { + GetThread()->DisablePreemptiveGC(); + frame->Pop(); + } + frame->~FrameWithCookie(); +} + +extern "C" EXPORT_API MonoClassField* EXPORT_CC mono_field_from_token (MonoImage * image, uint32_t token, MonoClass** retklass, MonoGenericContext * context) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API guint32 EXPORT_CC mono_field_get_flags(MonoClassField *field) +{ + return ((FieldDesc*)field)->GetAttributes(); +} + +extern "C" EXPORT_API const char* EXPORT_CC mono_field_get_name(MonoClassField *field) +{ + CONTRACTL + { + THROWS; + GC_NOTRIGGER; + MODE_ANY; + } + CONTRACTL_END + auto field_clr = (MonoClassField_clr*)field; + return field_clr->GetName(); +} + +extern "C" EXPORT_API MonoReflectionField* EXPORT_CC mono_field_get_object (MonoDomain* domain, MonoClass* klass, MonoClassField* field) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API int EXPORT_CC mono_field_get_offset(MonoClassField *field) +{ + TRACE_API("%p", field); + + auto field_clr = (MonoClassField_clr*)field; + if (field_clr->IsStatic()) + { + return 0; + } + + auto result = field_clr->GetOffset(); + result += sizeof(Object); + + return result; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_field_get_parent(MonoClassField *field) +{ + FieldDesc* fieldDesc = (FieldDesc*)field; + return (MonoClass*)fieldDesc->GetApproxEnclosingMethodTable(); +} + +extern "C" EXPORT_API MonoType* EXPORT_CC mono_field_get_type(MonoClassField *field) +{ + CONTRACTL + { + PRECONDITION(field != NULL); + } + CONTRACTL_END; + + auto field_clr = (MonoClassField_clr*)field; + + MonoType_clr typeHandle = field_clr->GetFieldTypeHandleThrowing(); + + return MonoType_clr_to_MonoType(typeHandle); +} + +extern "C" EXPORT_API MonoType* EXPORT_CC mono_field_get_type_specific(MonoClassField *field, MonoClass* owner) +{ + CONTRACTL + { + PRECONDITION(field != NULL); + } + CONTRACTL_END; + + auto field_clr = (MonoClassField_clr*)field; + auto klass_clr = (MonoClass_clr*)owner; + + MonoType_clr typeHandle = field_clr->GetExactFieldType(klass_clr); + + return MonoType_clr_to_MonoType(typeHandle); +} + +extern "C" EXPORT_API void EXPORT_CC mono_field_get_value(MonoObject *obj, MonoClassField *field, void *value) +{ + TRACE_API("%p, %p, %p", obj, field, value); + + // TODO: Add contact + // TODO: obj not protected? + GCX_COOP(); + OBJECTREF objectRef = ObjectToOBJECTREF((MonoObject_clr*)obj); + GCPROTECT_BEGIN(objectRef); // Is it really necessary in cooperative mode? for a GetInstanceField? + { + auto field_clr = (MonoClassField_clr*)field; + field_clr->GetInstanceField(objectRef, value); + } + GCPROTECT_END(); +} + +extern "C" EXPORT_API void EXPORT_CC mono_field_set_value(MonoObject *obj, MonoClassField *field, void *value) +{ + TRACE_API("%p, %p, %p", obj, field, value); + + // TODO: Add contact + // TODO: obj not protected? + GCX_COOP(); + OBJECTREF objectRef = ObjectToOBJECTREF((MonoObject_clr*)obj); + auto field_clr = ((MonoClassField_clr*)field); + GCPROTECT_BEGIN(objectRef); // Is it really necessary in cooperative mode? for a GetInstanceField? + { + CorElementType fieldType = field_clr->GetFieldType(); + if (fieldType == ELEMENT_TYPE_CLASS) + field_clr->SetInstanceField(objectRef, &value); + else + field_clr->SetInstanceField(objectRef, value); + } + GCPROTECT_END(); +} + +extern "C" EXPORT_API void EXPORT_CC mono_field_static_get_value(MonoVTable *vt, MonoClassField *field, void *value) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_gc_collect(int generation) +{ + FCALL_CONTRACT; + _ASSERTE(generation >= -1); + GCX_COOP(); +#if 0 + if (mono_unity_gc_is_disabled()) + return; +#endif + GCHeapUtilities::GetGCHeap()->GarbageCollect(generation, false, collection_blocking); +} + +extern "C" EXPORT_API int EXPORT_CC mono_gc_collect_a_little () +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API gint64 EXPORT_CC mono_gc_get_heap_size() +{ + FCALL_CONTRACT; + // NOT CORRECT + return GCHeapUtilities::GetGCHeap()->GetTotalBytesInUse(); +} + +extern "C" EXPORT_API gint64 EXPORT_CC mono_gc_get_max_time_slice_ns () +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API gint64 EXPORT_CC mono_gc_get_used_size() +{ + FCALL_CONTRACT; + return GCHeapUtilities::GetGCHeap()->GetTotalBytesInUse(); +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_gc_is_incremental () +{ + return false; +} + +extern "C" EXPORT_API int EXPORT_CC mono_gc_max_generation() +{ + FCALL_CONTRACT; + return GCHeapUtilities::GetGCHeap()->GetMaxGeneration(); +} + +extern "C" EXPORT_API void EXPORT_CC mono_gc_set_incremental (gboolean value) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_gc_set_max_time_slice_ns (gint64 maxTimeSlice) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_gc_wbarrier_generic_store(gpointer ptr, MonoObject* value) +{ +} + +extern "C" EXPORT_API void EXPORT_CC mono_gc_wbarrier_set_field (MonoObject * obj, gpointer field_ptr, MonoObject * value) +{ + GCX_COOP(); + + SetObjectReference((OBJECTREF*)field_ptr, ObjectToOBJECTREF((MonoObject_clr*)value)); +} + + +static guint32 handleId = 0; +struct MonoHandleInfo +{ + MonoHandleInfo() : Handle(0), Type((HandleType)-1) + { + } + MonoHandleInfo(const MonoHandleInfo& copy) : Handle(copy.Handle), Type(copy.Type) + { + } + uintptr_t Handle; + HandleType Type; +}; + +// TODO: Remove once GCHandle changes land in Unity +MapSHashWithRemove g_gc_map_id_to_handle; + + +extern "C" EXPORT_API void EXPORT_CC mono_gchandle_free(guint32 gchandle) +{ + CrstHolder lock(&g_gc_handles_lock); + + MonoHandleInfo handle; + if (g_gc_map_id_to_handle.Lookup(gchandle, &handle)) + { + mono_gchandle_free_v2(handle.Handle); + g_gc_map_id_to_handle.Remove(gchandle); + } +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_gchandle_get_target(guint32 gchandle) +{ + CrstHolder lock(&g_gc_handles_lock); + + MonoHandleInfo handle; + if (g_gc_map_id_to_handle.Lookup(gchandle, &handle)) + { + return mono_gchandle_get_target_v2(handle.Handle); + } + + // throw an error? + return NULL; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_gchandle_is_in_domain(guint32 gchandle, MonoDomain * domain) +{ + CrstHolder lock(&g_gc_handles_lock); + + MonoHandleInfo handle; + if (g_gc_map_id_to_handle.Lookup(gchandle, &handle)) + { + return mono_gchandle_is_in_domain_v2(handle.Handle, domain); + } + + // throw an error? + return FALSE; +} + +extern "C" EXPORT_API guint32 EXPORT_CC mono_gchandle_new(MonoObject * obj, gboolean pinned) +{ + // NOTE + // mono is using a guint32 to identify an GCHandle + // while coreclr is using a OBJECTHANDLE which is a pointer + // so we are maintaining a map here between an generated identifier + // and the OBJECTHANDLE + CrstHolder lock(&g_gc_handles_lock); + + MonoHandleInfo objhandle; + objhandle.Handle = mono_gchandle_new_v2(obj, pinned); + objhandle.Type = pinned ? HNDTYPE_PINNED : HNDTYPE_DEFAULT; + + auto id = ++handleId; + g_gc_map_id_to_handle.Add(id, objhandle); + + return id; +} + +extern "C" EXPORT_API guint32 EXPORT_CC mono_gchandle_new_weakref(MonoObject *obj, gboolean track_resurrection) +{ + CrstHolder lock(&g_gc_handles_lock); + + MonoHandleInfo objhandle; + objhandle.Handle = mono_gchandle_new_weakref_v2(obj, track_resurrection); + objhandle.Type = track_resurrection ? HNDTYPE_WEAK_LONG : HNDTYPE_WEAK_SHORT; + + auto id = ++handleId; + g_gc_map_id_to_handle.Add(id, objhandle); + + return id; +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_gchandle_get_target_v2(uintptr_t gchandle) +{ + GCX_COOP(); + // TODO: This method is not accurate with Cooperative/Preemptive mode + + OBJECTHANDLE objectHandle = (OBJECTHANDLE)gchandle; + OBJECTREF objref = ObjectFromHandle(objectHandle); + return (MonoObject*)OBJECTREFToObject(objref); +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_gchandle_is_in_domain_v2(uintptr_t gchandle, MonoDomain *domain) +{ + // we only support one domain, so this should always be true. + return true; +} + +extern "C" EXPORT_API void EXPORT_CC mono_gchandle_free_v2(uintptr_t gchandle) +{ + OBJECTHANDLE objectHandle = (OBJECTHANDLE)gchandle; + + GCHandleUtilities::GetGCHandleManager()->DestroyHandleOfUnknownType(objectHandle); +} + +extern "C" EXPORT_API uintptr_t EXPORT_CC mono_gchandle_new_v2(MonoObject *obj, gboolean pinned) +{ + TRACE_API("%p, %d", obj, pinned); + CONTRACTL + { + PRECONDITION(obj != NULL); + } + CONTRACTL_END; + + GCX_COOP(); + // TODO: This method is not accurate with Cooperative/Preemptive mode + + auto objref = ObjectToOBJECTREF((MonoObject_clr*)obj); + OBJECTHANDLE rawHandle = pinned ? + GetAppDomain()->CreatePinningHandle(objref) : + GetAppDomain()->CreateHandle(objref); + + return (uintptr_t)rawHandle; +} + +extern "C" EXPORT_API uintptr_t EXPORT_CC mono_gchandle_new_weakref_v2(MonoObject *obj, gboolean track_resurrection) +{ + CONTRACTL + { + PRECONDITION(obj != NULL); + } + CONTRACTL_END; + + GCX_COOP(); + // TODO: This method is not accurate with Cooperative/Preemptive mode + auto objref = ObjectToOBJECTREF((MonoObject_clr*)obj); + OBJECTHANDLE rawHandle = track_resurrection ? + GetAppDomain()->CreateLongWeakHandle(objref) : + GetAppDomain()->CreateShortWeakHandle(objref); + + return (uintptr_t)rawHandle; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_array_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__ARRAY); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_boolean_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__BOOLEAN); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_byte_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__BYTE); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_char_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__CHAR); +} + +extern "C" EXPORT_API MonoImage* EXPORT_CC mono_get_corlib() +{ + return (MonoImage*)CoreLibBinder::GetModule()->GetDomainAssembly()->GetAssembly(); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_double_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__DOUBLE); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_enum_class() +{ + MonoImage* img = mono_get_corlib(); + return mono_class_from_name(img, "System", "Enum"); +} + +extern "C" EXPORT_API MonoException* EXPORT_CC mono_get_exception_argument_null(const char *arg) +{ + GCX_COOP(); + SString sarg(SString::Utf8, arg); + EEArgumentException* ee = new EEArgumentException(kArgumentNullException, sarg.GetUnicode(), W("ArgumentNull_Generic")); + return (MonoException*)OBJECTREFToObject(ee->GetThrowable()); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_exception_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__EXCEPTION); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_int16_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__INT16); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_int32_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__INT32); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_int64_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__INT64); +} + +extern "C" EXPORT_API MonoMethod* EXPORT_CC mono_get_method (MonoImage * image, guint32 token, MonoClass * klass) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_object_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__OBJECT); +} + +extern "C" EXPORT_API MonoDomain* EXPORT_CC mono_get_root_domain() +{ + TRACE_API("", NULL); + return gRootDomain; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_single_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__SINGLE); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_get_string_class() +{ + return (MonoClass*)CoreLibBinder::GetClass(CLASS__STRING); +} + +extern "C" EXPORT_API void EXPORT_CC mono_image_close(MonoImage *image) +{ + // NOP +} + +extern "C" EXPORT_API MonoAssembly* EXPORT_CC mono_image_get_assembly(MonoImage *image) +{ + return (MonoAssembly*)image; +} + +extern "C" EXPORT_API const char* EXPORT_CC mono_image_get_filename(MonoImage *image) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API const char* EXPORT_CC mono_image_get_name(MonoImage *image) +{ + TRACE_API("%p", image); + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + PRECONDITION(image != NULL); + } + CONTRACTL_END; + + return reinterpret_cast(image)->GetSimpleName(); +} + +extern "C" EXPORT_API const MonoTableInfo* EXPORT_CC mono_image_get_table_info (MonoImage * image, int table_id) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API int EXPORT_CC mono_image_get_table_rows(MonoImage *image, int table_id) +{ + if (table_id == MONO_TABLE_TYPEDEF) + { + DomainAssembly* domainAssembly = reinterpret_cast(image)->GetDomainAssembly(); + return domainAssembly->GetModule()->GetNumTypeDefs() - 1; + } + + + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API MonoImage* EXPORT_CC mono_image_loaded(const char *name) +{ + if (g_LoadedImages == NULL) + g_LoadedImages = new SArray; + for (COUNT_T i=0; iGetCount(); i++) + { + if (strcmp((*g_LoadedImages)[i].name, name) == 0) + return (*g_LoadedImages)[i].image; + } + return NULL; +} + +extern "C" EXPORT_API MonoImage* EXPORT_CC mono_image_open_from_data_full(const void *data, guint32 data_len, gboolean need_copy, int *status, gboolean ref_only) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoImage* EXPORT_CC mono_image_open_from_data_with_name(char *data, guint32 data_len, gboolean need_copy, int *status, gboolean refonly, const char *name) +{ + TRACE_API("%p, %d, %d, %p, %d, %s", data, data_len, need_copy, status, refonly, name); + + gint64 len = data_len; + auto domainAssembly = (DomainAssembly*)g_HostStruct->load_assembly_from_data(data, len); + if (domainAssembly == NULL) + return NULL; + + auto assembly = domainAssembly->GetAssembly(); + + assembly->GetDomainAssembly()->SetCustomPath(name); + + assembly->EnsureActive(); + + if (g_LoadedImages == NULL) + g_LoadedImages = new SArray; + g_LoadedImages->Append(LoadedImage(name, (MonoImage*)assembly, mono_domain_get())); + + return (MonoImage*)assembly; +} + +extern "C" EXPORT_API const char* EXPORT_CC mono_image_strerror (int status) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_is_debugger_attached(void) +{ + return FALSE; +} + + +extern "C" EXPORT_API int EXPORT_CC mono_jit_info_get_code_size(void* jit) +{ + ASSERT_NOT_IMPLEMENTED; + // TODO used 1 by instrumentation unity/mono profiler + // Runtime\Profiler\Instrumentation\InstrumentationProfiler.cpp(292) + return 0; +} + +extern "C" EXPORT_API void* EXPORT_CC mono_jit_info_get_code_start(void* jit) +{ + ASSERT_NOT_IMPLEMENTED; + // TODO used 1 by instrumentation unity/mono profiler + // Runtime\Profiler\Instrumentation\InstrumentationProfiler.cpp(292) + return NULL; +} + +extern "C" EXPORT_API MonoJitInfo* EXPORT_CC mono_jit_info_table_find(MonoDomain* domain, void* ip) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoDomain* EXPORT_CC mono_jit_init(const char *file) +{ + TRACE_API("%s", file); + + return mono_jit_init_version(file, "4.0"); +} + +typedef int32_t (*initialize_func)(HostStruct* s, int32_t size); + +void list_tpa(const SString& searchPath, SString& tpa) +{ + SString searchPattern = searchPath; + searchPattern += W("/*.dll"); + WIN32_FIND_DATAW findData; + HANDLE fileHandle = FindFirstFileW(searchPattern.GetUnicode(), &findData); + + if (fileHandle != INVALID_HANDLE_VALUE) + { + do + { + tpa.Append(searchPath); + tpa.Append(W("/")); + tpa.Append(findData.cFileName); + tpa += PATH_SEPARATOR; + } while (FindNextFileW(fileHandle, &findData)); + FindClose(fileHandle); + } +} + +extern "C" EXPORT_API MonoDomain* EXPORT_CC mono_jit_init_version(const char *file, const char* runtime_version) +{ + #if defined(TARGET_UNIX) +#if defined(__APPLE__) + GCHeapUtilities::SetGCName("libunitygc.dylib"); +#else + GCHeapUtilities::SetGCName("libunitygc.so"); +#endif +#else + GCHeapUtilities::SetGCName("unitygc.dll"); +#endif + + g_gc_handles_lock.Init(CrstMonoHandles); + g_add_internal_lock.Init(CrstMonoICalls); + + HRESULT hr; + + if (!g_CLRRuntimeHost) + { + const char* entrypointExecutable = "/dev/null"; +#if defined(__APPLE__) || defined(__linux__) + uint32_t lenActualPath = 0; + /*if (_NSGetExecutablePath(nullptr, &lenActualPath) == -1) + { + // OSX has placed the actual path length in lenActualPath, + // so re-attempt the operation + entrypointExecutable = new char[lenActualPath + 1]; + entrypointExecutable[lenActualPath] = '\0'; + if (_NSGetExecutablePath(entrypointExecutable, &lenActualPath) == -1) + { + delete [] entrypointExecutable; + return nullptr; + } + } + else + { + return nullptr; + }*/ +#endif + + SString appPath (*s_AssemblyDir); + + SString etcPath (*s_EtcDir); + + SString assemblyPaths (*s_AssemblyPaths); + + SString tpa; + list_tpa(appPath, tpa); + + SString appPaths; + appPaths += appPath; + appPaths += PATH_SEPARATOR; + appPaths += assemblyPaths; + + SString appNiPaths; + appNiPaths += appPath; + appNiPaths+= PATH_SEPARATOR; + appNiPaths += appPath; + + SString nativeDllSearchDirs; + nativeDllSearchDirs += appPath; + nativeDllSearchDirs += PATH_SEPARATOR; + nativeDllSearchDirs += etcPath; + + LPCSTR property_keys2[] = { + "TRUSTED_PLATFORM_ASSEMBLIES", + "APP_PATHS", + "APP_NI_PATHS", + "NATIVE_DLL_SEARCH_DIRECTORIES" + }; + + StackScratchBuffer buf1; + StackScratchBuffer buf2; + StackScratchBuffer buf3; + StackScratchBuffer buf4; + LPCSTR property_values2[] = { + tpa.GetUTF8(buf1), + appPaths.GetUTF8(buf2), + appNiPaths.GetUTF8(buf3), + nativeDllSearchDirs.GetUTF8(buf4) + }; + + hr = coreclr_initialize (entrypointExecutable, file, 4, property_keys2, property_values2, &g_CLRRuntimeHost, &g_RootDomainId); + + if(FAILED(hr)) + { + return nullptr; + } + } + + initialize_func init_func; + hr = coreclr_create_delegate(g_CLRRuntimeHost, g_RootDomainId, "unity-embed-host", "Unity.CoreCLRHelpers.CoreCLRHost", "InitMethod", (void**)&init_func); + if(FAILED(hr)) + { + return nullptr; + } + + g_HostStruct = (HostStruct*)malloc(sizeof(HostStruct)); + memset(g_HostStruct, 0, sizeof(HostStruct)); + g_HostStruct->version = 1; + + size_t size = sizeof(HostStruct); + hr = init_func(g_HostStruct, (int32_t)size); + + AppDomain *pCurDomain = SystemDomain::GetCurrentDomain(); + gRootDomain = gCurrentDomain = (MonoDomain*)pCurDomain; + + + //coreClrHelperAssembly->EnsureActive(); + //gCoreCLRHelperAssembly = (MonoImage*)coreClrHelperAssembly; + //gALCWrapperClass = mono_class_from_name(gCoreCLRHelperAssembly, "Unity.CoreCLRHelpers", "ALCWrapper"); + //gALCWrapperObject = mono_object_new(NULL, gALCWrapperClass); + //mono_runtime_object_init(gALCWrapperObject); + //gALCWrapperLoadFromAssemblyPathMethod = mono_class_get_method_from_name(gALCWrapperClass, "CallLoadFromAssemblyPath", 1); + //gALCWrapperLoadFromAssemblyDataMethod = mono_class_get_method_from_name(gALCWrapperClass, "CallLoadFromAssemblyData", 2); + //gALCWrapperDomainUnloadNotificationMethod = mono_class_get_method_from_name(gALCWrapperClass, "DomainUnloadNotification", 0); + //gALCWrapperInitUnloadMethod = mono_class_get_method_from_name(gALCWrapperClass, "InitUnload", 0); + //gALCWrapperFinishUnloadMethod = mono_class_get_method_from_name(gALCWrapperClass, "FinishUnload", 1); + //gALCWrapperCheckRootForUnloadingMethod = mono_class_get_method_from_name(gALCWrapperClass, "CheckRootForUnloading", 2); + //gALCWrapperCheckAssemblyForUnloadingMethod = mono_class_get_method_from_name(gALCWrapperClass, "CheckAssemblyForUnloading", 1); + //gALCWrapperAddPathMethod = mono_class_get_method_from_name(gALCWrapperClass, "AddPath", 2); + + //gCurrentDomain = CreateMonoDomainFromObject(gALCWrapperObject); + //SetupDomainPaths(gALCWrapperObject); + //gRootDomain = gCurrentDomain; + + mono_add_internal_call("Unity.CoreCLRHelpers.ALCWrapper::InvokeFindPluginCallback", (gconstpointer)InvokeFindPluginCallback); + +/* + FrameWithCookie* frame = (FrameWithCookie*)malloc(sizeof(FrameWithCookie)); + new (frame) FrameWithCookie (); + pCurrentThreadNativeFrame = &(*frame); + frame->Push();*/ + + + TRACE_API("%s, %s", file, runtime_version); + return gCurrentDomain; +} + +extern "C" EXPORT_API void EXPORT_CC mono_jit_parse_options(int argc, char * argv[]) +{ +} + +extern "C" EXPORT_API void EXPORT_CC mono_metadata_decode_row (const MonoTableInfo * t, int idx, guint32 * res, int res_size) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_metadata_signature_equal(MonoMethodSignature *sig1, MonoMethodSignature *sig2) +{ + if (mono_signature_get_param_count(sig1) != mono_signature_get_param_count(sig2)) + return FALSE; + if (mono_signature_get_return_type(sig1) != mono_signature_get_return_type(sig2)) + return FALSE; + if (mono_signature_is_instance(sig1) != mono_signature_is_instance(sig2)) + return FALSE; + + gpointer iter1 = NULL; + gpointer iter2 = NULL; + bool match = true; + while (MonoType *paramType1 = mono_signature_get_params(sig1, &iter1)) + { + MonoType *paramType2 = mono_signature_get_params(sig2, &iter2); + if (paramType1 != paramType2) + match = false; + } + return match; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_metadata_type_equal (MonoType * t1, MonoType * t2) +{ + ASSERT_NOT_IMPLEMENTED; + return FALSE; +} + +extern "C" EXPORT_API char* EXPORT_CC mono_method_full_name(MonoMethod* method, gboolean signature) +{ + auto methodclr = reinterpret_cast(method); + LPCUTF8 name, namespaze; + auto mt = methodclr->GetMethodTable(); + mt->GetMDImport()->GetNameOfTypeDef(mt->GetCl(), &name, &namespaze); + + InlineSString<256> fullName(SString::Utf8); + if (namespaze != NULL) + { + fullName += InlineSString<256>(SString::Utf8, namespaze); + fullName += '.'; + } + fullName += InlineSString<256>(SString::Utf8, name); + fullName += ':'; + fullName += InlineSString<256>(SString::Utf8, methodclr->GetName()); + + if (signature) + { + fullName += InlineSString<2>(SString::Utf8, " ("); + + MonoMethodSignature* sig = mono_method_signature(method); + gpointer iter = NULL; + + MonoType *paramType = mono_signature_get_params(sig, &iter); + if (paramType) + { + fullName += InlineSString<256>(SString::Utf8, mono_type_get_name(paramType)); + while ((paramType = mono_signature_get_params(sig, &iter))) + { + fullName += ','; + fullName += InlineSString<256>(SString::Utf8, mono_type_get_name(paramType)); + } + } + + fullName += ')'; + } + StackScratchBuffer buffer; + return _strdup(fullName.GetUTF8(buffer)); +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_method_get_class(MonoMethod *method) +{ + auto method_clr = (MonoMethod_clr*)method; + auto class_clr = (MonoClass_clr*)method_clr->GetClass()->GetMethodTable(); + return (MonoClass*)class_clr; +} + +extern "C" EXPORT_API MonoMethod* EXPORT_CC mono_method_get_last_managed() +{ + return (MonoMethod*)(intptr_t)g_isManaged; +} + +extern "C" EXPORT_API const char* EXPORT_CC mono_method_get_name(MonoMethod *method) +{ + return reinterpret_cast(method)->GetName(); +} + +extern "C" EXPORT_API MonoReflectionMethod* EXPORT_CC mono_method_get_object(MonoDomain *domain, MonoMethod *method, MonoClass *refclass) +{ + GCX_COOP(); + + MonoMethod_clr* clrMethod = reinterpret_cast(method); + + REFLECTMETHODREF refRet = clrMethod->GetStubMethodInfo(); + _ASSERTE(clrMethod->IsRuntimeMethodHandle()); + MonoObject* stubMethodInfo = (MonoObject*)OBJECTREFToObject(refRet); + MonoClass* runtimeType = (MonoClass*)ClassLoader::LoadTypeByNameThrowing(CoreLibBinder::GetModule()->GetAssembly(), "System", "RuntimeType").AsMethodTable(); + MonoMethod* getmethodbase = mono_class_get_method_from_name(runtimeType, "GetMethodBase", 1); + void* params[1] = { stubMethodInfo }; + MonoObject* returnValue = mono_runtime_invoke(getmethodbase, nullptr, params, nullptr); + return (MonoReflectionMethod*)returnValue; +} + +extern "C" EXPORT_API MonoMethodSignature* EXPORT_CC mono_method_signature(MonoMethod *method) +{ + return (MonoMethodSignature*)method; +} + +extern "C" EXPORT_API MonoMethodSignature* EXPORT_CC mono_method_signature_checked (MonoMethod * method, MonoError * error) +{ + return (MonoMethodSignature*)method; +} + +extern "C" EXPORT_API MonoMethodSignature* EXPORT_CC mono_method_signature_checked_slow (MonoMethod * method, MonoError * error) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_object_get_class(MonoObject *obj) +{ + MonoClass_clr* klass = reinterpret_cast(obj)->GetMethodTable(); + return (MonoClass*)klass; +} + +extern "C" EXPORT_API guint32 EXPORT_CC mono_object_get_size(MonoObject *obj) +{ + return (guint32)reinterpret_cast(obj)->GetSize(); +} + +extern "C" EXPORT_API MonoMethod* EXPORT_CC mono_object_get_virtual_method(MonoObject *obj, MonoMethod *method) +{ + TRACE_API("%x, %x", obj, method); + + MonoClass * klass = mono_object_get_class(obj); + MonoType * type = mono_class_get_type(klass); + if (mono_type_get_type(type) == MONO_TYPE_CLASS) + return method; + + MonoClass_clr* klass_clr = (MonoClass_clr*)klass; + MonoMethodSignature* sig = mono_method_signature(method); + MonoMethod *m2 = mono_class_get_method_from_name(klass, mono_method_get_name(method), mono_signature_get_param_count(sig)); + + return m2; +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_object_isinst(MonoObject *obj, MonoClass* klass) +{ + MonoClass* clazz = mono_object_get_class(obj); + if (mono_class_is_subclass_of(clazz, klass, TRUE)) + return obj; + return NULL; +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_object_new(MonoDomain *domain, MonoClass *klass) +{ + TRACE_API("%x, %x", domain, klass); + + CONTRACTL + { + THROWS; + GC_TRIGGERS; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + { + GCX_COOP(); + OBJECTREF objectRef = AllocateObject((MethodTable*)klass); + return (MonoObject*)OBJECTREFToObject(objectRef); + } +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_object_new_alloc_specific(MonoVTable *vtable) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_object_new_specific(MonoVTable *vtable) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API gpointer EXPORT_CC mono_object_unbox(MonoObject* o) +{ + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + PRECONDITION(o != NULL); + } + CONTRACTL_END; + + return (gpointer)reinterpret_cast(o)-> UnBox(); +} + +extern "C" EXPORT_API int EXPORT_CC mono_parse_default_optimizations(const char* p) +{ + // NOP + return 0; +} + +extern "C" EXPORT_API char* EXPORT_CC mono_pmip(void *ip) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API void* EXPORT_CC mono_profiler_create (MonoProfiler* prof) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API void EXPORT_CC mono_profiler_install(void *prof, MonoProfileFunc shutdown_callback) +{ + // NOP +} + +extern "C" EXPORT_API void EXPORT_CC mono_profiler_install_allocation(MonoProfileAllocFunc callback) +{ + // NOP +} + +extern "C" EXPORT_API void EXPORT_CC mono_profiler_install_enter_leave(MonoProfileMethodFunc enter, MonoProfileMethodFunc fleave) +{ + // NOP +} + +extern "C" EXPORT_API void EXPORT_CC mono_profiler_install_gc(MonoProfileGCFunc callback, MonoProfileGCResizeFunc heap_resize_callback) +{ +} + +extern "C" EXPORT_API void EXPORT_CC mono_profiler_install_jit_end(MonoProfileJitResult jit_end) +{ + // NOP +} + +extern "C" EXPORT_API void EXPORT_CC mono_profiler_install_thread(MonoProfileThreadFunc start, MonoProfileThreadFunc end) +{ + // NOP +} + +extern "C" EXPORT_API void EXPORT_CC mono_profiler_load (const char *desc) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_profiler_set_events(int events) +{ + // NOP +} + + +extern "C" EXPORT_API MonoMethod* EXPORT_CC mono_property_get_get_method(MonoProperty *prop) +{ + return (MonoMethod*)prop; +} + +extern "C" EXPORT_API void EXPORT_CC mono_raise_exception(MonoException *ex) +{ + ASSERT_NOT_IMPLEMENTED; +} + + +extern "C" EXPORT_API MonoArray* EXPORT_CC mono_reflection_get_custom_attrs_by_type(MonoObject* object, MonoClass* klass) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + + +extern "C" EXPORT_API void EXPORT_CC mono_runtime_cleanup(MonoDomain *domain) +{ + ASSERT_NOT_IMPLEMENTED; + //TODO not used +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_runtime_delegate_invoke(MonoObject *delegate, void **params, MonoException **exc) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API int EXPORT_CC mono_runtime_exec_main(MonoMethod *method, MonoArray *args, MonoObject **exc) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_runtime_invoke(MonoMethod *method, void *obj, void **params, MonoException **exc) +{ + TRACE_API("%p, %p, %p, %p", method, obj, params, exc); + + if (obj == nullptr) + return mono_runtime_invoke_with_nested_object(method, nullptr, nullptr, params, exc); + MonoClass_clr * klass = (MonoClass_clr*)mono_object_get_class((MonoObject*)obj); + auto method_clr = (MonoMethod_clr*)method; + if (klass->IsValueType())// && !method_clr->IsVtableMethod()) + return mono_runtime_invoke_with_nested_object(method, (char*)obj + sizeof(Object), obj, params, exc); + else + return mono_runtime_invoke_with_nested_object(method, obj, obj, params, exc); +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_runtime_invoke_array(MonoMethod *method, void *obj, MonoArray *params, MonoException **exc) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_runtime_invoke_with_nested_object(MonoMethod *method, void *obj, void *parentobj, void **params, MonoException **exc) +{ + TRACE_API("%p, %p, %p, %p, %p", method, obj, parentobj, params, exc); + + GCX_COOP(); + + auto method_clr = (MonoMethod_clr*)method; + + MetaSig methodSig(method_clr); + DWORD numArgs = methodSig.NumFixedArgs(); + ArgIterator argIt(&methodSig); + + const int MAX_ARG_SLOT = 128; + ARG_SLOT argslots[MAX_ARG_SLOT]; + + DWORD slotIndex = 0; + if (methodSig.HasThis()) + { + if (obj != parentobj && method_clr->IsVtableMethod()) + obj = (char*)obj - sizeof(Object) ; + argslots[0] = PtrToArgSlot(obj); + slotIndex++; + } + + PVOID pRetBufStackCopy = NULL; + auto retTH = methodSig.GetRetTypeHandleNT(); + CorElementType retType = retTH.GetInternalCorElementType(); + + auto hasReturnBufferArg = argIt.HasRetBuffArg(); + if (hasReturnBufferArg) + { + SIZE_T sz = retTH.GetMethodTable()->GetNumInstanceFieldBytes(); + pRetBufStackCopy = _alloca(sz); + memset(pRetBufStackCopy, 0, sz); + argslots[slotIndex] = PtrToArgSlot(pRetBufStackCopy); + slotIndex++; + } + + for (DWORD argIndex = 0; argIndex < numArgs; argIndex++, slotIndex++) + { + int ofs = argIt.GetNextOffset(); + _ASSERTE(ofs != TransitionBlock::InvalidOffset); + auto stackSize = argIt.GetArgSize(); + + auto argTH = methodSig.GetLastTypeHandleNT(); + auto argType = argTH.GetInternalCorElementType(); + + // TODO: Factorize ValueType detection and Managed detection + switch (argType) + { + case ELEMENT_TYPE_VALUETYPE: + case ELEMENT_TYPE_BOOLEAN: // boolean + case ELEMENT_TYPE_I1: // byte + case ELEMENT_TYPE_U1: + case ELEMENT_TYPE_I2: // short + case ELEMENT_TYPE_U2: + case ELEMENT_TYPE_CHAR: // char + case ELEMENT_TYPE_I4: // int + case ELEMENT_TYPE_U4: + case ELEMENT_TYPE_I8: // long + case ELEMENT_TYPE_U8: + case ELEMENT_TYPE_R4: // float + case ELEMENT_TYPE_R8: // double + case ELEMENT_TYPE_I: + case ELEMENT_TYPE_U: + switch (stackSize) + { + case 1: + case 2: + case 4: + argslots[slotIndex] = *(INT32*)params[argIndex]; + break; + + case 8: + argslots[slotIndex] = *(INT64*)params[argIndex]; + break; + + default: + if (stackSize > sizeof(ARG_SLOT)) + { + argslots[slotIndex] = PtrToArgSlot(params[argIndex]); + } + else + { + CopyMemory(&argslots[slotIndex], params[argIndex], stackSize); + } + break; + } + break; + case ELEMENT_TYPE_BYREF: + argslots[slotIndex] = PtrToArgSlot(params[argIndex]); + break; + case ELEMENT_TYPE_PTR: + argslots[slotIndex] = PtrToArgSlot(params[argIndex]); + break; + case ELEMENT_TYPE_STRING: + case ELEMENT_TYPE_OBJECT: + case ELEMENT_TYPE_CLASS: + case ELEMENT_TYPE_ARRAY: + case ELEMENT_TYPE_SZARRAY: + case ELEMENT_TYPE_VAR: + argslots[slotIndex] = ObjToArgSlot(ObjectToOBJECTREF((MonoObject_clr*)params[argIndex])); + break; + default: + assert(false && "This argType is not supported"); + break; + } + } + + // TODO: Convert params to ARG_SLOT + + g_isManaged++; + ARG_SLOT result = NULL; + EX_TRY + { + MonoClass_clr * klass = (MonoClass_clr*)mono_method_get_class(method); + + OBJECTREF objref = ObjectToOBJECTREF((Object*)parentobj); + MethodDescCallSite invoker((MonoMethod_clr*)method, &objref); + result = invoker.Call_RetArgSlot(argslots); + } + EX_CATCH + { + SString sstr; + GET_EXCEPTION()->GetMessage(sstr); + StackScratchBuffer buffer; + printf("Exception calling %s: %s\n", mono_method_get_name(method), sstr.GetUTF8(buffer)); + fflush(stdout); + + if (exc && GET_EXCEPTION()->IsType(CLRException::GetType())) + *exc = (MonoException*)OBJECTREFToObject(((CLRException*)GET_EXCEPTION())->GetThrowable()); + } + EX_END_CATCH(SwallowAllExceptions) + g_isManaged--; + + methodSig.Reset(); + if (methodSig.IsReturnTypeVoid()) + { + return nullptr; + } + + // Check reflectioninvocation.cpp + // TODO: Handle + switch (retType) + { + case ELEMENT_TYPE_VALUETYPE: + case ELEMENT_TYPE_BOOLEAN: // boolean + case ELEMENT_TYPE_I1: // byte + case ELEMENT_TYPE_U1: + case ELEMENT_TYPE_I2: // short + case ELEMENT_TYPE_U2: + case ELEMENT_TYPE_CHAR: // char + case ELEMENT_TYPE_I4: // int + case ELEMENT_TYPE_U4: + case ELEMENT_TYPE_I8: // long + case ELEMENT_TYPE_U8: + case ELEMENT_TYPE_R4: // float + case ELEMENT_TYPE_R8: // double + case ELEMENT_TYPE_I: + case ELEMENT_TYPE_U: + case ELEMENT_TYPE_PTR: + if (hasReturnBufferArg) + { + return (MonoObject*)OBJECTREFToObject(retTH.GetMethodTable()->Box(pRetBufStackCopy)); + } + else + { + return (MonoObject*)OBJECTREFToObject(retTH.GetMethodTable()->Box(&result)); + } + break; + case ELEMENT_TYPE_STRING: + case ELEMENT_TYPE_OBJECT: + case ELEMENT_TYPE_CLASS: + case ELEMENT_TYPE_ARRAY: + case ELEMENT_TYPE_SZARRAY: + case ELEMENT_TYPE_VAR: + return (MonoObject*)OBJECTREFToObject(ArgSlotToObj(result)); + break; + default: + assert(false && "This retType is not supported"); + break; + } + return nullptr; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_runtime_is_shutting_down() +{ + ASSERT_NOT_IMPLEMENTED; + //TODO not used + return FALSE; +} + +extern "C" EXPORT_API void EXPORT_CC mono_runtime_object_init(MonoObject *this_obj) +{ + TRACE_API("%x", this_obj); + + CONTRACTL + { + THROWS; + GC_TRIGGERS; + PRECONDITION(this_obj != NULL); + } + CONTRACTL_END; + + GCX_COOP(); + + // TODO check what to do with the exception thrown by CallDefaultConstructor + OBJECTREF objref = ObjectToOBJECTREF((MonoObject_clr*)this_obj); + GCPROTECT_BEGIN(objref); + { + CallDefaultConstructor(objref); + } + GCPROTECT_END(); +} + +extern "C" EXPORT_API void EXPORT_CC mono_runtime_set_shutting_down() +{ + ASSERT_NOT_IMPLEMENTED; + //TODO used once in Runtime\Mono\MonoManager.cpp CleanupMono() +} + +extern "C" EXPORT_API void EXPORT_CC mono_runtime_unhandled_exception_policy_set(MonoRuntimeUnhandledExceptionPolicy policy) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_set_assemblies_path(const char* name) +{ + s_AssemblyPaths = new SString(SString::Utf8, name); +} + +extern "C" EXPORT_API void EXPORT_CC mono_set_assemblies_path_null_separated (const char* name) +{ + s_AssemblyPaths = new SString(); + while (*name != NULL) + { + size_t l = strlen(name); + s_AssemblyPaths->AppendUTF8(name); + s_AssemblyPaths->AppendUTF8(PATH_SEPARATOR); + name += l+1; + } +} + +extern "C" EXPORT_API void EXPORT_CC mono_set_break_policy(MonoBreakPolicyFunc policy_callback) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_set_crash_chaining (gboolean) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_set_defaults(int verbose_level, guint32 opts) +{ + // NOP +} + +extern "C" EXPORT_API void EXPORT_CC mono_set_dirs(const char *assembly_dir, const char *config_dir) +{ + s_AssemblyDir = new SString(SString::Utf8, assembly_dir); + s_EtcDir = new SString(SString::Utf8, config_dir); +} + +extern "C" EXPORT_API void EXPORT_CC +mono_set_find_plugin_callback (gconstpointer find) +{ + unity_find_plugin_callback = (UnityFindPluginCallback)find; +} + +extern "C" EXPORT_API void EXPORT_CC mono_set_ignore_version_and_key_when_finding_assemblies_already_loaded(gboolean value) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_set_signal_chaining(gboolean) +{ + // NOP +} + +extern "C" EXPORT_API guint32 EXPORT_CC mono_signature_get_param_count(MonoMethodSignature *sig) +{ + MonoMethodSignature_clr* msig = (MonoMethodSignature_clr*)sig; + MetaSig metasig(msig); + return metasig.NumFixedArgs(); +} + +extern "C" EXPORT_API MonoType* EXPORT_CC mono_signature_get_params(MonoMethodSignature *sig, gpointer *iter) +{ + MonoMethodSignature_clr* signature = (MonoMethodSignature_clr*)sig; + MetaSig* metasig = (MetaSig*)*iter; + if (metasig == NULL) + { + metasig = new MetaSig(signature); + *iter = metasig; + } + + CorElementType argType = metasig->NextArg(); + if (argType == ELEMENT_TYPE_END) + { + delete metasig; + //*iter = NULL; // match mono behavior + return NULL; + } + + TypeHandle typeHandle = metasig->GetLastTypeHandleThrowing(); + return (MonoType*)typeHandle.AsPtr(); +} + +extern "C" EXPORT_API MonoType* EXPORT_CC mono_signature_get_return_type(MonoMethodSignature *sig) +{ + MonoMethodSignature_clr* signature = (MonoMethodSignature_clr*)sig; + MetaSig msig(signature); + TypeHandle reth = msig.GetRetTypeHandleThrowing(); + return (MonoType*)reth.AsPtr(); +} + +extern "C" EXPORT_API char EXPORT_CC mono_signature_is_instance(MonoMethodSignature *sig) +{ + MonoMethodSignature_clr* sig_clr = (MonoMethodSignature_clr*)sig; + MetaSig msig(sig_clr); + return msig.HasThis(); +} + +typedef gboolean(*MonoStackWalk) (MonoMethod *method, gint32 native_offset, gint32 il_offset, gboolean managed, gpointer data); +extern "C" EXPORT_API void EXPORT_CC mono_stack_walk(MonoStackWalk func, gpointer user_data) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_stack_walk_no_il (MonoStackWalk start, void* user_data) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API MonoString* EXPORT_CC mono_string_from_utf16(const gunichar2* text) +{ + assert(text != nullptr); + InlineSString<256> sstr((const WCHAR*)text); + GCX_COOP(); + return (MonoString*)OBJECTREFToObject(AllocateString(sstr)); +} + +extern "C" EXPORT_API MonoString* EXPORT_CC mono_string_new_len(MonoDomain *domain, const char *text, guint32 length) +{ + assert(text != nullptr); + InlineSString<256> sstr(SString::Utf8, text, length); + GCX_COOP(); + STRINGREF strObj = AllocateString(length); + memcpyNoGCRefs(strObj->GetBuffer(), sstr.GetUnicode(), sstr.GetCount() * sizeof(WCHAR)); + return (MonoString*)OBJECTREFToObject(strObj); +} + +extern "C" EXPORT_API MonoString* EXPORT_CC mono_string_new_utf16(MonoDomain * domain, const guint16 * text, gint32 length) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoString* EXPORT_CC mono_string_new_wrapper(const char* text) +{ + assert(text != nullptr); + InlineSString<256> sstr(SString::Utf8, text); + GCX_COOP(); + return (MonoString*)OBJECTREFToObject(AllocateString(sstr)); +} + +extern "C" EXPORT_API gunichar2* EXPORT_CC mono_string_to_utf16(MonoString *string_obj) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API char* EXPORT_CC mono_string_to_utf8(MonoString *string_obj) +{ + SString sstr; + ((StringObject*)string_obj)->GetSString(sstr); + StackScratchBuffer buffer; + return _strdup(sstr.GetUTF8(buffer)); +} + +extern "C" EXPORT_API char* EXPORT_CC mono_stringify_assembly_name(MonoAssemblyName *aname) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoThread* EXPORT_CC mono_thread_attach(MonoDomain *domain) +{ + auto domain_clr = (MonoDomain_clr*)domain; + MonoThread_clr* currentThread = GetThreadNULLOk(); + + if (currentThread == nullptr) + { + currentThread = SetupThreadNoThrow(); + } + + assert(currentThread != nullptr); + //assert(domain_clr->CanThreadEnter(currentThread)); + gCurrentDomain = domain; + + return (MonoThread*)currentThread; +} + +extern "C" EXPORT_API MonoThread* EXPORT_CC mono_thread_current(void) +{ + return (MonoThread*)GetThread(); +} + +extern "C" EXPORT_API void EXPORT_CC mono_thread_detach(MonoThread *thread) +{ + CONTRACTL{ + PRECONDITION(thread != nullptr); + } CONTRACTL_END; + auto thread_clr = (MonoThread_clr*)thread; + gCurrentDomain = NULL; + // TODO: FALSE or TRUE there? + thread_clr->DetachThread(FALSE); +} + +extern "C" EXPORT_API MonoThread* EXPORT_CC mono_thread_exit() +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_thread_has_sufficient_execution_stack (void) +{ + ASSERT_NOT_IMPLEMENTED; + return FALSE; +} + +extern "C" EXPORT_API void EXPORT_CC mono_thread_pool_cleanup() +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_thread_pop_appdomain_ref() +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_thread_push_appdomain_ref(MonoDomain *domain) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_thread_set_main(MonoThread* thread) +{ + CONTRACTL{ + PRECONDITION(thread != nullptr); + } CONTRACTL_END; + auto thread_clr = (MonoThread_clr*)thread; + // almost NOP + //assert(AppDomain::GetCurrentDomain()->CanThreadEnter(thread_clr)); +} + +extern "C" EXPORT_API void EXPORT_CC mono_thread_suspend_all_other_threads() +{ + ASSERT_NOT_IMPLEMENTED; + //TODO used once in Runtime\Mono\MonoManager.cpp CleanupMono() +} + +extern "C" EXPORT_API void EXPORT_CC mono_threads_set_shutting_down() +{ + ASSERT_NOT_IMPLEMENTED; + //TODO used once in Runtime\Mono\MonoManager.cpp CleanupMono() +} + +extern "C" EXPORT_API void EXPORT_CC mono_trace_set_level_string(const char *value) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_trace_set_log_handler (MonoLogCallback callback, void *user_data) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_trace_set_mask_string(const char *value) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API guint32 EXPORT_CC mono_type_get_attrs (MonoType * type) +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_type_get_class(MonoType *type) +{ + TypeHandle handle = TypeHandle::FromPtr((PTR_VOID)type); + return (MonoClass*)handle.AsMethodTable(); +} + +extern "C" EXPORT_API MonoType* EXPORT_CC mono_type_get_generic_arg(MonoType *type, int index) +{ + TypeHandle handle = TypeHandle::FromPtr((PTR_VOID)type); + Instantiation inst = handle.GetInstantiation(); + return (MonoType*)inst[index].AsPtr(); +} + +extern "C" EXPORT_API char* EXPORT_CC mono_type_get_name(MonoType *type) +{ + TypeHandle handle = TypeHandle::FromPtr((PTR_VOID)type); + SString ssBuf; + handle.GetName(ssBuf); + StackScratchBuffer buffer; + return _strdup(ssBuf.GetUTF8(buffer)); +} + +extern "C" EXPORT_API char* EXPORT_CC mono_type_get_name_full(MonoType *type, MonoTypeNameFormat format) +{ + TRACE_API("%p %d", type, format); + if (format != MonoTypeNameFormat::MONO_TYPE_NAME_FORMAT_ASSEMBLY_QUALIFIED) + { + ASSERT_NOT_IMPLEMENTED; + return NULL; + } + + TypeHandle handle = TypeHandle::FromPtr((PTR_VOID)type); + SString ssBuf; + TypeString::AppendType(ssBuf, handle, TypeString::FormatNamespace | TypeString::FormatAssembly | TypeString::FormatFullInst); + + StackScratchBuffer buffer; + return _strdup(ssBuf.GetUTF8(buffer)); +} + +extern "C" EXPORT_API int EXPORT_CC mono_type_get_num_generic_args(MonoType *type) +{ + TypeHandle handle = TypeHandle::FromPtr((PTR_VOID)type); + Instantiation inst = handle.GetInstantiation(); + return inst.GetNumArgs(); +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_type_get_object(MonoDomain *domain, MonoType *type) +{ + TypeHandle clrType = TypeHandle::FromPtr(reinterpret_cast(type)); + GCX_COOP(); + return (MonoObject*) OBJECTREFToObject(clrType.GetManagedClassObject()); +} + +extern "C" EXPORT_API int EXPORT_CC mono_type_get_type(MonoType *type) +{ +retry: + + if (type == mono_class_get_type(mono_get_string_class())) + return MONO_TYPE_STRING; + if (type == mono_class_get_type(mono_get_object_class())) + return MONO_TYPE_OBJECT; + + TypeHandle typeHandle = TypeHandle::FromPtr((PTR_VOID)type); + + // TODO: not sure this is correct, but without this + // generic instance types map to MONO_TYPE_CLASS + if (typeHandle.HasInstantiation()) + return MONO_TYPE_GENERICINST; + + // TODO: Different behavior than mono + // It seems that CLR is collapsing type like + // ELEMENT_TYPE_OBJECT into ELEMENT_TYPE_CLASS + auto elementType = typeHandle.GetVerifierCorElementType(); + + switch(elementType) + { + case ELEMENT_TYPE_VOID: + return MONO_TYPE_VOID; + case ELEMENT_TYPE_END: + return MONO_TYPE_END; + case ELEMENT_TYPE_PTR: + return MONO_TYPE_PTR; + case ELEMENT_TYPE_BYREF: + // mono exposes this as the underlying type + type = (MonoType*)typeHandle.GetTypeParam().AsPtr(); + goto retry; + //return MONO_TYPE_BYREF; + case ELEMENT_TYPE_STRING: + return MONO_TYPE_STRING; + case ELEMENT_TYPE_R4: + return MONO_TYPE_R4; + case ELEMENT_TYPE_R8: + return MONO_TYPE_R8; + case ELEMENT_TYPE_I8: + return MONO_TYPE_I8; + case ELEMENT_TYPE_I4: + return MONO_TYPE_I4; + case ELEMENT_TYPE_I2: + return MONO_TYPE_I2; + case ELEMENT_TYPE_I1: + return MONO_TYPE_I1; + case ELEMENT_TYPE_U8: + return MONO_TYPE_U8; + case ELEMENT_TYPE_U4: + return MONO_TYPE_U4; + case ELEMENT_TYPE_U2: + return MONO_TYPE_U2; + case ELEMENT_TYPE_U1: + return MONO_TYPE_U1; + case ELEMENT_TYPE_CLASS: + return MONO_TYPE_CLASS; + case ELEMENT_TYPE_BOOLEAN: + return MONO_TYPE_BOOLEAN; + case ELEMENT_TYPE_CHAR: + return MONO_TYPE_CHAR; + case ELEMENT_TYPE_VALUETYPE: + return MONO_TYPE_VALUETYPE; + case ELEMENT_TYPE_VAR: + return MONO_TYPE_VAR; + case ELEMENT_TYPE_ARRAY: + return MONO_TYPE_ARRAY; + case ELEMENT_TYPE_GENERICINST: + return MONO_TYPE_GENERICINST; + case ELEMENT_TYPE_TYPEDBYREF: + return MONO_TYPE_TYPEDBYREF; + case ELEMENT_TYPE_I: + return MONO_TYPE_I; + case ELEMENT_TYPE_U: + return MONO_TYPE_U; + case ELEMENT_TYPE_FNPTR: + return MONO_TYPE_FNPTR; + case ELEMENT_TYPE_OBJECT: + return MONO_TYPE_OBJECT; + case ELEMENT_TYPE_SZARRAY: + return MONO_TYPE_SZARRAY; + case ELEMENT_TYPE_MVAR: + return MONO_TYPE_MVAR; + case ELEMENT_TYPE_CMOD_REQD: + return MONO_TYPE_CMOD_REQD; + case ELEMENT_TYPE_CMOD_OPT: + return MONO_TYPE_CMOD_OPT; + case ELEMENT_TYPE_INTERNAL: + return MONO_TYPE_INTERNAL; + case ELEMENT_TYPE_MODIFIER: + return MONO_TYPE_MODIFIER; + case ELEMENT_TYPE_SENTINEL: + return MONO_TYPE_SENTINEL; + case ELEMENT_TYPE_PINNED: + return MONO_TYPE_PINNED; + default: + return 0; + } +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_type_is_byref (MonoType * type) +{ + TypeHandle clrType = TypeHandle::FromPtr(reinterpret_cast(type)); + return clrType.IsByRef(); +} + +extern "C" EXPORT_API uint32_t EXPORT_CC mono_unity_allocation_granularity () +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API MonoArray* EXPORT_CC mono_unity_array_new_2d(MonoDomain * domain, MonoClass * eclass, size_t size0, size_t size1) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + + +extern "C" EXPORT_API MonoArray* EXPORT_CC mono_unity_array_new_3d(MonoDomain * domain, MonoClass * eclass, size_t size0, size_t size1, size_t size2) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API uint32_t EXPORT_CC mono_unity_array_object_header_size () +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_assembly_mempool_chunk_foreach (MonoAssembly * assembly, MonoDataFunc callback, void* userData) +{ + ASSERT_NOT_IMPLEMENTED; +} + +#if defined(HOST_OSX) || defined(HOST_UNIX) +extern "C" EXPORT_API int EXPORT_CC mono_unity_backtrace_from_context(void* context, void* array[], int count) +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} +#endif + +extern "C" EXPORT_API MonoManagedMemorySnapshot* EXPORT_CC mono_unity_capture_memory_snapshot () +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_unity_class_field_is_literal (MonoClassField * field) +{ + ASSERT_NOT_IMPLEMENTED; + return FALSE; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_class_for_each (MonoClassFunc callback, void* userData) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_unity_class_get(MonoImage * image, guint32 type_token) +{ + DomainAssembly* domainAssembly = reinterpret_cast(image)->GetDomainAssembly(); + TypeHandle th = domainAssembly->GetModule()->LookupTypeDef(type_token); + if (th.IsNull()) + th = domainAssembly->GetModule()->LookupFullyCanonicalInstantiation(type_token); + if (th.IsNull()) + { + return (MonoClass*)ClassLoader::LoadTypeDefOrRefThrowing(domainAssembly->GetModule(), type_token, + ClassLoader::ReturnNullIfNotFound, + ClassLoader::PermitUninstDefOrRef, + tdNoTypes).AsMethodTable(); + + } + return (MonoClass*)th.AsMethodTable(); +} + +extern "C" EXPORT_API uint32_t EXPORT_CC mono_unity_class_get_data_size (MonoClass * klass) +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API MonoClass* EXPORT_CC mono_unity_class_get_generic_type_definition (MonoClass * klass) +{ + CONTRACTL{ + PRECONDITION(klass != nullptr); + } CONTRACTL_END; + // there must be a better way! + return mono_class_from_name(mono_class_get_image(klass), mono_class_get_namespace(klass), mono_class_get_name(klass)); +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_unity_class_has_failure (MonoClass * klass) +{ + ASSERT_NOT_IMPLEMENTED; + return FALSE; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_unity_class_is_abstract(MonoClass* klass) +{ + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + return reinterpret_cast(klass)->IsAbstract() ? TRUE : FALSE; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_unity_class_is_interface(MonoClass* klass) +{ + CONTRACTL + { + NOTHROW; + GC_NOTRIGGER; + PRECONDITION(klass != NULL); + } + CONTRACTL_END; + + return reinterpret_cast(klass)->IsInterface() ? TRUE : FALSE; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_unity_class_is_open_constructed_type (MonoClass * klass) +{ + ASSERT_NOT_IMPLEMENTED; + return FALSE; +} + +extern "C" EXPORT_API MonoVTable* EXPORT_CC mono_unity_class_try_get_vtable (MonoDomain * domain, MonoClass * klass) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoArray* EXPORT_CC mono_unity_custom_attrs_construct (MonoCustomAttrInfo * cinfo, MonoError * error) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_domain_mempool_chunk_foreach (MonoDomain * domain, MonoDataFunc callback, void* userData) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_domain_set_config(MonoDomain * domain, const char *base_dir, const char *config_file_name) +{ + // NOP +} + +extern "C" EXPORT_API MonoException* EXPORT_CC mono_unity_error_convert_to_exception (MonoError * error) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoClassField* EXPORT_CC mono_unity_field_from_token_checked (MonoImage * image, guint32 token, MonoClass** retklass, MonoGenericContext * context, MonoError * error) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_free_captured_memory_snapshot (MonoManagedMemorySnapshot * snapshot) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_g_free(void* p) +{ + free(p); +} + +int gc_disabled = 0; + +extern "C" EXPORT_API void EXPORT_CC mono_unity_gc_disable () +{ + TRACE_API("", NULL); + + FCALL_CONTRACT; + GCX_COOP(); + if (gc_disabled == 0) + GCHeapUtilities::GetGCHeap()->StartNoGCRegion(16*1024*1024, false, 0, true); + gc_disabled++; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_gc_enable () +{ + TRACE_API("", NULL); + + FCALL_CONTRACT; + GCX_COOP(); + if (gc_disabled == 1) + GCHeapUtilities::GetGCHeap()->EndNoGCRegion(); + gc_disabled--; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_gc_handles_foreach_get_target (MonoDataFunc callback, void* userData) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_gc_heap_foreach (MonoDataFunc callback, void* userData) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API int EXPORT_CC mono_unity_gc_is_disabled () +{ + return gc_disabled != 0; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_gc_set_mode (MonoGCMode mode) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_image_set_mempool_chunk_foreach (MonoDataFunc callback, void* userdata) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_jit_cleanup(MonoDomain *domain) +{ +} + +extern "C" EXPORT_API void* EXPORT_CC mono_unity_liveness_allocate_struct(MonoClass* filter, int max_object_count, mono_register_object_callback callback, void* userdata, mono_liveness_reallocate_callback reallocate) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_liveness_calculation_from_root(MonoObject* root, void* state) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_liveness_calculation_from_statics(void* state) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_liveness_finalize(void* state) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_liveness_free_struct(void* state) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API MonoException* EXPORT_CC mono_unity_loader_get_last_error_and_error_prepare_exception() +{ + //ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API int EXPORT_CC mono_unity_managed_callstack(unsigned char* buffer, int bufferSize, const MonoUnityCallstackOptions * opts) +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API uint32_t EXPORT_CC mono_unity_object_header_size() +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API uint32_t EXPORT_CC mono_unity_offset_of_array_bounds_in_array_object_header() +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API uint32_t EXPORT_CC mono_unity_offset_of_array_length_in_array_object_header() +{ + ASSERT_NOT_IMPLEMENTED; + return 0; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_root_domain_mempool_chunk_foreach(MonoDataFunc callback, void* userdata) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_runtime_set_main_args(int, const char* argv[]) +{ + // NOP +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_set_data_dir (const char * dir) +{ +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_set_embeddinghostname(const char* name) +{ + // NOP +} + +typedef void(*vprintf_func)(const char* msg, va_list args); +extern "C" EXPORT_API void EXPORT_CC mono_unity_set_vprintf_func(vprintf_func func) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_start_gc_world() +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_stop_gc_world() +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API MonoString* EXPORT_CC mono_unity_string_empty_wrapper() +{ + return mono_string_new_wrapper(""); +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_type_get_name_full_chunked(MonoType * type, MonoDataFunc appendCallback, void* userData) +{ + ASSERT_NOT_IMPLEMENTED; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_unity_type_is_pointer_type(MonoType * type) +{ + ASSERT_NOT_IMPLEMENTED; + return FALSE; +} + +extern "C" EXPORT_API gboolean EXPORT_CC mono_unity_type_is_static(MonoType * type) +{ + ASSERT_NOT_IMPLEMENTED; + return FALSE; +} + +extern "C" EXPORT_API void* EXPORT_CC mono_unity_vtable_get_static_field_data(MonoVTable * vTable) +{ + ASSERT_NOT_IMPLEMENTED; + return NULL; +} + +extern "C" EXPORT_API MonoObject* EXPORT_CC mono_value_box(MonoDomain *domain, MonoClass *klass, gpointer val) +{ + GCX_COOP(); + + TRACE_API("%p, %p, %p", domain, klass, val); + + MonoClass_clr* classClr = (MonoClass_clr*)klass; + + return (MonoObject*)OBJECTREFToObject(classClr->Box(val)); +} + +extern "C" EXPORT_API void EXPORT_CC mono_verifier_set_mode(MiniVerifierMode) +{ + // NOP + //TODO used in Runtime\Mono\MonoManager.cpp SetSecurityMode() +} + + +extern "C" EXPORT_API gboolean EXPORT_CC unity_mono_method_is_generic(MonoMethod* method) +{ + CONTRACTL{ + PRECONDITION(method != nullptr); + } CONTRACTL_END; + auto method_clr = (MonoMethod_clr*)method; + + return method_clr->IsGenericMethodDefinition() ? TRUE : FALSE; +} + +extern "C" EXPORT_API gboolean EXPORT_CC unity_mono_method_is_inflated(MonoMethod* method) +{ + CONTRACTL{ + PRECONDITION(method != nullptr); + } CONTRACTL_END; + auto method_clr = (MonoMethod_clr*)method; + // TODO: is it really the concept behind inflated? (generic instance?) + auto isgeneric = method_clr->GetNumGenericMethodArgs() > 0 + && !method_clr->IsGenericMethodDefinition(); + + return isgeneric ? TRUE : FALSE; +} + + +extern "C" EXPORT_API MonoMethod* EXPORT_CC unity_mono_reflection_method_get_method(MonoReflectionMethod* mrf) +{ + return (MonoMethod*)((ReflectMethodObject*)mrf)->GetMethod(); +} + +#ifdef _DEBUG +extern "C" void EXPORT_CC mono_debug_assert_dialog(const char *szFile, int iLine, const char *szExpr) +{ + DbgAssertDialog(szFile, iLine, szExpr); +} +#endif + + +extern "C" EXPORT_API void EXPORT_CC mono_unity_domain_unload(MonoDomain * domain, MonoUnityExceptionFunc callback) +{ + TRACE_API("%p %p", domain, callback); + +#if UNITY_SUPPORT_DOMAIN_UNLOAD + MonoObject *exc = domain_unload(domain); + if (exc) + callback(exc); +#else + ASSERT_NOT_IMPLEMENTED; +#endif +} + + +// mono_thread_attach/mono_thread_detach does a full managed thread setup each time. +// This is too slow for wrapping it around any managed job. So, in the "fast" versions, +// we don't actually bother with detaching and attaching the thread at all. However, +// we need to make sure we leave GC in preemptive modewhen detaching, so the thread +// can be suspended by the GC at any point. +extern "C" EXPORT_API void EXPORT_CC mono_unity_thread_fast_attach (MonoDomain * domain) +{ + gCurrentDomain = domain; +} + +extern "C" EXPORT_API void EXPORT_CC mono_unity_thread_fast_detach () +{ + gCurrentDomain = NULL; + GetThread()->EnablePreemptiveGC(); +} + diff --git a/src/coreclr/vm/mono/threadlocalpoolallocator.h b/src/coreclr/vm/mono/threadlocalpoolallocator.h new file mode 100644 index 00000000000000..2e3a482562295e --- /dev/null +++ b/src/coreclr/vm/mono/threadlocalpoolallocator.h @@ -0,0 +1,36 @@ +#ifndef _THREADLOCALPOOLALLOCATOR_H_ +#define _THREADLOCALPOOLALLOCATOR_H_ + +// Some mono embed APIs allocate an iterator object to iterate over attributes or fields. +// Usually these are short-lived, and only used from one thread, one at a time. But some +// of these are used frequently enough for these allocations to become a performance bottleneck. +// So we build a custom, per-thread pool allocator, which can keep `size` objects alive for reuse. +// This requires that the object will be freed from the same thread it is used in. +template +class ThreadLocalPoolAllocator +{ + T* freeList[size]; + int numFree; +public: + ThreadLocalPoolAllocator() + { + numFree = 0; + } + + T* Alloc() + { + if (numFree > 0) + return freeList[--numFree]; + return new T(); + } + + void Free(T* t) + { + if (numFree < size) + freeList[numFree++] = t; + else + delete t; + } +}; + +#endif \ No newline at end of file diff --git a/unity/coreclr-test/build.cmd b/unity/coreclr-test/build.cmd new file mode 100644 index 00000000000000..793ff8195ea218 --- /dev/null +++ b/unity/coreclr-test/build.cmd @@ -0,0 +1,2 @@ +dotnet restore +dotnet build \ No newline at end of file diff --git a/unity/coreclr-test/coreclr-test.csproj b/unity/coreclr-test/coreclr-test.csproj new file mode 100644 index 00000000000000..89181d4bee9282 --- /dev/null +++ b/unity/coreclr-test/coreclr-test.csproj @@ -0,0 +1,10 @@ + + + + library + true + net6.0 + false + + + diff --git a/unity/coreclr-test/test.cs b/unity/coreclr-test/test.cs new file mode 100644 index 00000000000000..cc17ad41f959bc --- /dev/null +++ b/unity/coreclr-test/test.cs @@ -0,0 +1,529 @@ +using System; +using System.Diagnostics; +using System.Runtime.CompilerServices; +using System.Runtime.InteropServices; +using System.Security; +using System.Threading; +using System.IO; +using System.Xml.Linq; + +[assembly: TestDll.TestAttribute] + +namespace TestDll +{ + enum TestEnum + { + A, + B, + C + } + + enum TestEnumCustomSize: byte + { + A, + B, + C + } + + class TestAttribute : Attribute + { + + } + + class InheritedTestAttribute : TestAttribute + { + + } + + class TestWithParamsAttribute : Attribute + { + public TestWithParamsAttribute(int _i, string _s, bool _b, float _f) + { + i = _i; + s = _s; + b = _b; + f = _f; + } + + public int i; + public string s; + public bool b; + public float f; + } + + class AnotherTestAttribute : Attribute + { + + } + + public interface TestInterface + { + int Method(); + } + + public class ClassImplementingInterface : TestInterface + { + public int Method() + { + return 42; + } + } + + public class ClassDerivingFromClassImplementingInterface : ClassImplementingInterface + { + } + + [StructLayout(LayoutKind.Sequential)] + public class ClassWithSequentialLayout + { + public int a; + public object b; + public bool c; + public float d; + public string e; + } + + [StructLayout(LayoutKind.Explicit)] + public class ClassWithExplicitLayout + { + [FieldOffset(0)] public int a; + [FieldOffset(8)] public object b; + [FieldOffset(16)] public bool c; + [FieldOffset(20)] public float d; + [FieldOffset(24)] public string e; + } + + [StructLayout(LayoutKind.Explicit)] + public class DerivedClassWithExplicitLayout : ClassWithExplicitLayout + { + [FieldOffset(32+0)] public int a; + [FieldOffset(32+8)] public object b; + [FieldOffset(32+16)] public bool c; + [FieldOffset(32+20)] public float d; + [FieldOffset(32+24)] public string e; + } + + public struct StructImplementingInterface : TestInterface + { + public int i; + + public void Setup() + { + i = 42; + } + + public int Method() + { + return i; + } + } + + public abstract class BaseClass + { + public abstract int Method(); + } + + public class InheritedClass : BaseClass + { + public override int Method() + { + return 42; + } + } + + public class GenericClass + { + public T genericField; + public T[] genericArrayField; + } + + public class GenericStringInstance : GenericClass + { + } + + public class ClassWithNestedClass + { + public class NestedClass + { + + } + } + + public class GenericClassWithNestedClass + { + public class NestedClass + { + + } + } + + [TestAttribute] + [InheritedTestAttribute] + [TestWithParamsAttribute(42, "foo", true, 1.0f)] + public class ClassWithAttribute + { + [TestAttribute] + public void MethodWithAttribute() + { + + } + } + + [InheritedTestAttribute] + public class ClassWithInheritedAttribute + { + } + + public class TestClassWithMethods + { + void A() + { + } + + int B() + { + return 0; + } + + float C(float a, float b) + { + return a + b; + } + } + + public class TestClassWithConstructor + { + private int i; + + TestClassWithConstructor() + { + i = 42; + } + + int GetI() + { + return i; + } + } + + public class TestClassWithFields + { + public int x = 123; + private int y = 456; + private static int z; + [NonSerialized] + protected int w; + + void SetupFields() + { + x = 123; + y = 456; + } + } + + public class TestClassWithReferenceField + { + public TestClassWithReferenceField reference = null; + + TestClassWithReferenceField GetField() + { + return reference; + } + } + + public struct TestStructWithFields + { + public int x; + private int y; + private static int z; + + void SetupFields() + { + x = 123; + y = 456; + } + + int SumFields() + { + return x + y; + } + } + + public class ClassWithStructFields + { + private TestStructWithFields a, b; + private StructImplementingInterface c; + private StructImplementingInterface d, e, f, g; + + public void Setup() + { + c.i = 42; + d.i = 43; + e.i = 44; + f.i = 45; + g.i = 46; + } + } + + public class TestException : Exception + { + } + + public class TestClassWithFinalizer + { + [MethodImpl(MethodImplOptions.InternalCall)] + private static extern void FinalizerCalled(); + + ~TestClassWithFinalizer() + { + FinalizerCalled(); + } + } + + public class ICallTest + { + public class NestedClass + { + [MethodImpl(MethodImplOptions.InternalCall)] + public static extern int InternalMethodInNestedClass(); + } + + [MethodImpl(MethodImplOptions.InternalCall)] + private static extern int InternalMethod(); + + [MethodImpl(MethodImplOptions.InternalCall)] + private static extern string InternalMethodReturnsStackTrace(); + + [MethodImpl(MethodImplOptions.InternalCall)] + private static extern void InternalMethodWhichThrows(); + + [MethodImpl(MethodImplOptions.InternalCall)] + private static extern void InternalMethodWhichBlocks(); + + [MethodImpl(MethodImplOptions.InternalCall)] + private static extern void InternalMethodWhichReturnsExceptionInRefParam(ref Exception e); + + [DllImport("foo.lib", CallingConvention = CallingConvention.Cdecl)] + private static extern int DllImportFunction(int a, int b); + + static string ReturnStackTrace() + { + var s = new StackTrace(); + return s.ToString(); + } + + static int CallInternalMethod() + { + return InternalMethod(); + } + + static public void CallInternalMethodWhichBlocks() + { + InternalMethodWhichBlocks(); + } + + static string CallInternalMethodReturnsStackTrace() + { + return InternalMethodReturnsStackTrace(); + } + + static int CallInternalMethodInNestedClass() + { + return NestedClass.InternalMethodInNestedClass(); + } + + static string CallInternalMethodWhichThrowsAndCatchExceptionMono() + { + try + { + InternalMethodWhichThrows(); + return null; + } + catch (Exception e) + { + return e.Message; + } + } + + static string CallInternalMethodWhichThrowsAndCatchExceptionCoreCLR() + { + try + { + Exception e = null; + InternalMethodWhichReturnsExceptionInRefParam(ref e); + if (e != null) + throw e; + return null; + } + catch (Exception e) + { + return e.Message; + } + } + + static int CallDllImportFunction(int a, int b) + { + return DllImportFunction(a, b); + } + } + + public class ThreadTest + { + static void ThrowException() + { + throw new Exception("Exception thrown"); + } + + static bool RunThreadWhichThrows() + { + var thread = new Thread(ThrowException) { IsBackground = true }; + thread.Start(); + thread.Join(); + return true; + } + + static void RunThreadWhichBlocksInInternalMethod() + { + var thread = new Thread(ICallTest.CallInternalMethodWhichBlocks) { IsBackground = true }; + thread.Start(); + } + } + + public class TestClass + { + static public int StaticMethodReturningInt() + { + return 42; + } + + static public int StaticPrivateMethodReturningInt() + { + return 42; + } + + static public int StaticMethodWithTwoArgsReturningInt(int a, int b) + { + return a + b; + } + + static public float StaticMethodWithTwoArgsReturningFloat(float a, float b) + { + return a + b; + } + + static public Object StaticMethodWithTwoArgsReturningObject(Object o) + { + return o; + } + + public float MethodWithTwoArgsReturningFloat(float a, float b) + { + return a + b; + } + + public int MethodWithTwoArgsReturningInt(float a, float b) + { + return (int)(a + b); + } + + public float AnotherMethodWithTwoArgsReturningFloat(float a, float b) + { + return a + b; + } + + static public Guid StaticMethodReturningGUID() + { + return Guid.Parse("81a130d2-502f-4cf1-a376-63edeb000e9f"); + } + + static public Guid StaticMethodWithGUIDArg(Guid arg) + { + return arg; + } + + static public unsafe void* StaticMethodWithPtrArg(void* ptr) + { + return ptr; + } + + static public void StaticMethodWithObjectOutArg(Object a, out Object b) + { + b = a; + } + + static public int StaticMethodWithStringArg(string s) + { + return s.Length; + } + + static int[] StaticMethodReturningArray() + { + return new[] {1, 2, 3, 4, 5, 6}; + } + + static int[,] StaticMethodReturning2DArray() + { + return new[,] {{1, 2, 3}, {4, 5, 6}}; + } + + private static int StaticIntProperty { get; set; } + internal int IntProperty + { + get { return 0; } + } + + public static string ReadAllTextSafe(string path) + { + if (File.Exists(path)) + return File.ReadAllText(path); + + return null; + } + } + + public class DerivedClass : TestClass + { + } + + public class XmlTest + { + static bool TestParseXmlWithWin1252Encoding() + { + try + { + XDocument.Load("Test.xml", LoadOptions.SetLineInfo); + } + catch (Exception e) + { + Console.WriteLine(e); + return false; + } + + return true; + } + } + + public class ClassWithFields + { + public sbyte _sbyte; + public byte _byte; + public short _short; + public ushort _ushort; + public int _int; + public uint _uint; + public long _long; + public ulong _ulong; + + public float _float; + public double _double; + + public bool _bool; + public char _char; + + public string _string; + public object _object; + + public ClassWithFields _class; + + } +} diff --git a/unity/embed_api_tests/.gitignore b/unity/embed_api_tests/.gitignore new file mode 100644 index 00000000000000..2bf91163f38e6c --- /dev/null +++ b/unity/embed_api_tests/.gitignore @@ -0,0 +1,2 @@ +a.out +coreclr-test.dll \ No newline at end of file diff --git a/unity/embed_api_tests/CMakeLists.txt b/unity/embed_api_tests/CMakeLists.txt new file mode 100644 index 00000000000000..558952220c7425 --- /dev/null +++ b/unity/embed_api_tests/CMakeLists.txt @@ -0,0 +1,14 @@ +# Require at least version 2.8.12 of CMake +cmake_minimum_required(VERSION 2.8.12) + +set(PROJECT_NAME_STR mono_test_app) +project(${PROJECT_NAME_STR}) + +file(GLOB PROJECT_SRC_FILES ${PROJECT_SOURCE_DIR}/*.cpp) + +include_directories(${CLR_DIR}/src/inc) + +add_executable(${PROJECT_NAME_STR} ${PROJECT_SRC_FILES}) +target_link_libraries(${PROJECT_NAME_STR} ${CMAKE_DL_LIBS}) +target_compile_features(${PROJECT_NAME_STR} PRIVATE cxx_range_for) +target_compile_definitions(${PROJECT_NAME_STR} PRIVATE ENABLE_MONO=1 PLATFORM_STANDALONE=1) diff --git a/unity/embed_api_tests/Hello.txt b/unity/embed_api_tests/Hello.txt new file mode 100644 index 00000000000000..e965047ad7c578 --- /dev/null +++ b/unity/embed_api_tests/Hello.txt @@ -0,0 +1 @@ +Hello diff --git a/unity/embed_api_tests/Test.xml b/unity/embed_api_tests/Test.xml new file mode 100644 index 00000000000000..6d2bb57282fd6a --- /dev/null +++ b/unity/embed_api_tests/Test.xml @@ -0,0 +1,7 @@ + + + + + + + diff --git a/unity/embed_api_tests/build_windows.cmd b/unity/embed_api_tests/build_windows.cmd new file mode 100644 index 00000000000000..9978cb76d2e8af --- /dev/null +++ b/unity/embed_api_tests/build_windows.cmd @@ -0,0 +1,19 @@ +@echo off +rmdir /Q /S %~dp0\build +mkdir build +cd build +if %ERRORLEVEL% == 1 ( + echo "Unable to change directory to build" + goto :exit_error +) +cmake -G "Visual Studio 14 2015 Win64" .. +if %ERRORLEVEL% == 1 ( + echo "Cmake failed" + goto :exit_error +) +cmake --build . +exit /b %errorlevel% + +goto :EOF +:exit_error +exit /b %errorlevel% \ No newline at end of file diff --git a/unity/embed_api_tests/catch/catch.hpp b/unity/embed_api_tests/catch/catch.hpp new file mode 100644 index 00000000000000..f619f237e6b136 --- /dev/null +++ b/unity/embed_api_tests/catch/catch.hpp @@ -0,0 +1,11685 @@ +/* + * Catch v1.12.1 + * Generated: 2018-03-02 21:17:41.036711 + * ---------------------------------------------------------- + * This file has been merged from multiple headers. Please don't edit it directly + * Copyright (c) 2012 Two Blue Cubes Ltd. All rights reserved. + * + * Distributed under the Boost Software License, Version 1.0. (See accompanying + * file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt) + */ +#ifndef TWOBLUECUBES_SINGLE_INCLUDE_CATCH_HPP_INCLUDED +#define TWOBLUECUBES_SINGLE_INCLUDE_CATCH_HPP_INCLUDED + +#define TWOBLUECUBES_CATCH_HPP_INCLUDED + +#ifdef __clang__ +# pragma clang system_header +#elif defined __GNUC__ +# pragma GCC system_header +#endif + +// #included from: internal/catch_suppress_warnings.h + +#ifdef __clang__ +# ifdef __ICC // icpc defines the __clang__ macro +# pragma warning(push) +# pragma warning(disable: 161 1682) +# else // __ICC +# pragma clang diagnostic ignored "-Wglobal-constructors" +# pragma clang diagnostic ignored "-Wvariadic-macros" +# pragma clang diagnostic ignored "-Wc99-extensions" +# pragma clang diagnostic ignored "-Wunused-variable" +# pragma clang diagnostic push +# pragma clang diagnostic ignored "-Wpadded" +# pragma clang diagnostic ignored "-Wc++98-compat" +# pragma clang diagnostic ignored "-Wc++98-compat-pedantic" +# pragma clang diagnostic ignored "-Wswitch-enum" +# pragma clang diagnostic ignored "-Wcovered-switch-default" +# endif +#elif defined __GNUC__ +# pragma GCC diagnostic ignored "-Wvariadic-macros" +# pragma GCC diagnostic ignored "-Wunused-variable" +# pragma GCC diagnostic ignored "-Wparentheses" + +# pragma GCC diagnostic push +# pragma GCC diagnostic ignored "-Wpadded" +#endif +#if defined(CATCH_CONFIG_MAIN) || defined(CATCH_CONFIG_RUNNER) +# define CATCH_IMPL +#endif + +#ifdef CATCH_IMPL +# ifndef CLARA_CONFIG_MAIN +# define CLARA_CONFIG_MAIN_NOT_DEFINED +# define CLARA_CONFIG_MAIN +# endif +#endif + +// #included from: internal/catch_notimplemented_exception.h +#define TWOBLUECUBES_CATCH_NOTIMPLEMENTED_EXCEPTION_H_INCLUDED + +// #included from: catch_common.h +#define TWOBLUECUBES_CATCH_COMMON_H_INCLUDED + +// #included from: catch_compiler_capabilities.h +#define TWOBLUECUBES_CATCH_COMPILER_CAPABILITIES_HPP_INCLUDED + +// Detect a number of compiler features - mostly C++11/14 conformance - by compiler +// The following features are defined: +// +// CATCH_CONFIG_CPP11_NULLPTR : is nullptr supported? +// CATCH_CONFIG_CPP11_NOEXCEPT : is noexcept supported? +// CATCH_CONFIG_CPP11_GENERATED_METHODS : The delete and default keywords for compiler generated methods +// CATCH_CONFIG_CPP11_IS_ENUM : std::is_enum is supported? +// CATCH_CONFIG_CPP11_TUPLE : std::tuple is supported +// CATCH_CONFIG_CPP11_LONG_LONG : is long long supported? +// CATCH_CONFIG_CPP11_OVERRIDE : is override supported? +// CATCH_CONFIG_CPP11_UNIQUE_PTR : is unique_ptr supported (otherwise use auto_ptr) +// CATCH_CONFIG_CPP11_SHUFFLE : is std::shuffle supported? +// CATCH_CONFIG_CPP11_TYPE_TRAITS : are type_traits and enable_if supported? + +// CATCH_CONFIG_CPP11_OR_GREATER : Is C++11 supported? + +// CATCH_CONFIG_VARIADIC_MACROS : are variadic macros supported? +// CATCH_CONFIG_COUNTER : is the __COUNTER__ macro supported? +// CATCH_CONFIG_WINDOWS_SEH : is Windows SEH supported? +// CATCH_CONFIG_POSIX_SIGNALS : are POSIX signals supported? +// **************** +// Note to maintainers: if new toggles are added please document them +// in configuration.md, too +// **************** + +// In general each macro has a _NO_ form +// (e.g. CATCH_CONFIG_CPP11_NO_NULLPTR) which disables the feature. +// Many features, at point of detection, define an _INTERNAL_ macro, so they +// can be combined, en-mass, with the _NO_ forms later. + +// All the C++11 features can be disabled with CATCH_CONFIG_NO_CPP11 + +#ifdef __cplusplus + +# if __cplusplus >= 201103L +# define CATCH_CPP11_OR_GREATER +# endif + +# if __cplusplus >= 201402L +# define CATCH_CPP14_OR_GREATER +# endif + +#endif + +#ifdef __clang__ + +# if __has_feature(cxx_nullptr) +# define CATCH_INTERNAL_CONFIG_CPP11_NULLPTR +# endif + +# if __has_feature(cxx_noexcept) +# define CATCH_INTERNAL_CONFIG_CPP11_NOEXCEPT +# endif + +# if defined(CATCH_CPP11_OR_GREATER) +# define CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS \ + _Pragma( "clang diagnostic push" ) \ + _Pragma( "clang diagnostic ignored \"-Wexit-time-destructors\"" ) +# define CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS \ + _Pragma( "clang diagnostic pop" ) + +# define CATCH_INTERNAL_SUPPRESS_PARENTHESES_WARNINGS \ + _Pragma( "clang diagnostic push" ) \ + _Pragma( "clang diagnostic ignored \"-Wparentheses\"" ) +# define CATCH_INTERNAL_UNSUPPRESS_PARENTHESES_WARNINGS \ + _Pragma( "clang diagnostic pop" ) +# endif + +#endif // __clang__ + +//////////////////////////////////////////////////////////////////////////////// +// We know some environments not to support full POSIX signals +#if defined(__CYGWIN__) || defined(__QNX__) + +# if !defined(CATCH_CONFIG_POSIX_SIGNALS) +# define CATCH_INTERNAL_CONFIG_NO_POSIX_SIGNALS +# endif + +#endif + +#ifdef __OS400__ +# define CATCH_INTERNAL_CONFIG_NO_POSIX_SIGNALS +# define CATCH_CONFIG_COLOUR_NONE +#endif + +//////////////////////////////////////////////////////////////////////////////// +// Cygwin +#ifdef __CYGWIN__ + +// Required for some versions of Cygwin to declare gettimeofday +// see: http://stackoverflow.com/questions/36901803/gettimeofday-not-declared-in-this-scope-cygwin +# define _BSD_SOURCE + +#endif // __CYGWIN__ + +//////////////////////////////////////////////////////////////////////////////// +// Borland +#ifdef __BORLANDC__ + +#endif // __BORLANDC__ + +//////////////////////////////////////////////////////////////////////////////// +// EDG +#ifdef __EDG_VERSION__ + +#endif // __EDG_VERSION__ + +//////////////////////////////////////////////////////////////////////////////// +// Digital Mars +#ifdef __DMC__ + +#endif // __DMC__ + +//////////////////////////////////////////////////////////////////////////////// +// GCC +#ifdef __GNUC__ + +# if __GNUC__ == 4 && __GNUC_MINOR__ >= 6 && defined(__GXX_EXPERIMENTAL_CXX0X__) +# define CATCH_INTERNAL_CONFIG_CPP11_NULLPTR +# endif + +// - otherwise more recent versions define __cplusplus >= 201103L +// and will get picked up below + +#endif // __GNUC__ + +//////////////////////////////////////////////////////////////////////////////// +// Visual C++ +#ifdef _MSC_VER + +#define CATCH_INTERNAL_CONFIG_WINDOWS_SEH + +#if (_MSC_VER >= 1600) +# define CATCH_INTERNAL_CONFIG_CPP11_NULLPTR +# define CATCH_INTERNAL_CONFIG_CPP11_UNIQUE_PTR +#endif + +#if (_MSC_VER >= 1900 ) // (VC++ 13 (VS2015)) +#define CATCH_INTERNAL_CONFIG_CPP11_NOEXCEPT +#define CATCH_INTERNAL_CONFIG_CPP11_GENERATED_METHODS +#define CATCH_INTERNAL_CONFIG_CPP11_SHUFFLE +#define CATCH_INTERNAL_CONFIG_CPP11_TYPE_TRAITS +#endif + +#endif // _MSC_VER + +//////////////////////////////////////////////////////////////////////////////// + +// Use variadic macros if the compiler supports them +#if ( defined _MSC_VER && _MSC_VER > 1400 && !defined __EDGE__) || \ + ( defined __WAVE__ && __WAVE_HAS_VARIADICS ) || \ + ( defined __GNUC__ && __GNUC__ >= 3 ) || \ + ( !defined __cplusplus && __STDC_VERSION__ >= 199901L || __cplusplus >= 201103L ) + +#define CATCH_INTERNAL_CONFIG_VARIADIC_MACROS + +#endif + +// Use __COUNTER__ if the compiler supports it +#if ( defined _MSC_VER && _MSC_VER >= 1300 ) || \ + ( defined __GNUC__ && ( __GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 3 )) ) || \ + ( defined __clang__ && __clang_major__ >= 3 ) + +// Use of __COUNTER__ is suppressed during code analysis in CLion/AppCode 2017.2.x and former, +// because __COUNTER__ is not properly handled by it. +// This does not affect compilation +#if ( !defined __JETBRAINS_IDE__ || __JETBRAINS_IDE__ >= 20170300L ) + #define CATCH_INTERNAL_CONFIG_COUNTER +#endif + +#endif + +//////////////////////////////////////////////////////////////////////////////// +// C++ language feature support + +// catch all support for C++11 +#if defined(CATCH_CPP11_OR_GREATER) + +# if !defined(CATCH_INTERNAL_CONFIG_CPP11_NULLPTR) +# define CATCH_INTERNAL_CONFIG_CPP11_NULLPTR +# endif + +# ifndef CATCH_INTERNAL_CONFIG_CPP11_NOEXCEPT +# define CATCH_INTERNAL_CONFIG_CPP11_NOEXCEPT +# endif + +# ifndef CATCH_INTERNAL_CONFIG_CPP11_GENERATED_METHODS +# define CATCH_INTERNAL_CONFIG_CPP11_GENERATED_METHODS +# endif + +# ifndef CATCH_INTERNAL_CONFIG_CPP11_IS_ENUM +# define CATCH_INTERNAL_CONFIG_CPP11_IS_ENUM +# endif + +# ifndef CATCH_INTERNAL_CONFIG_CPP11_TUPLE +# define CATCH_INTERNAL_CONFIG_CPP11_TUPLE +# endif + +# ifndef CATCH_INTERNAL_CONFIG_VARIADIC_MACROS +# define CATCH_INTERNAL_CONFIG_VARIADIC_MACROS +# endif + +# if !defined(CATCH_INTERNAL_CONFIG_CPP11_LONG_LONG) +# define CATCH_INTERNAL_CONFIG_CPP11_LONG_LONG +# endif + +# if !defined(CATCH_INTERNAL_CONFIG_CPP11_OVERRIDE) +# define CATCH_INTERNAL_CONFIG_CPP11_OVERRIDE +# endif +# if !defined(CATCH_INTERNAL_CONFIG_CPP11_UNIQUE_PTR) +# define CATCH_INTERNAL_CONFIG_CPP11_UNIQUE_PTR +# endif +# if !defined(CATCH_INTERNAL_CONFIG_CPP11_SHUFFLE) +# define CATCH_INTERNAL_CONFIG_CPP11_SHUFFLE +# endif +# if !defined(CATCH_INTERNAL_CONFIG_CPP11_TYPE_TRAITS) +# define CATCH_INTERNAL_CONFIG_CPP11_TYPE_TRAITS +# endif + +#endif // __cplusplus >= 201103L + +// Now set the actual defines based on the above + anything the user has configured +#if defined(CATCH_INTERNAL_CONFIG_CPP11_NULLPTR) && !defined(CATCH_CONFIG_CPP11_NO_NULLPTR) && !defined(CATCH_CONFIG_CPP11_NULLPTR) && !defined(CATCH_CONFIG_NO_CPP11) +# define CATCH_CONFIG_CPP11_NULLPTR +#endif +#if defined(CATCH_INTERNAL_CONFIG_CPP11_NOEXCEPT) && !defined(CATCH_CONFIG_CPP11_NO_NOEXCEPT) && !defined(CATCH_CONFIG_CPP11_NOEXCEPT) && !defined(CATCH_CONFIG_NO_CPP11) +# define CATCH_CONFIG_CPP11_NOEXCEPT +#endif +#if defined(CATCH_INTERNAL_CONFIG_CPP11_GENERATED_METHODS) && !defined(CATCH_CONFIG_CPP11_NO_GENERATED_METHODS) && !defined(CATCH_CONFIG_CPP11_GENERATED_METHODS) && !defined(CATCH_CONFIG_NO_CPP11) +# define CATCH_CONFIG_CPP11_GENERATED_METHODS +#endif +#if defined(CATCH_INTERNAL_CONFIG_CPP11_IS_ENUM) && !defined(CATCH_CONFIG_CPP11_NO_IS_ENUM) && !defined(CATCH_CONFIG_CPP11_IS_ENUM) && !defined(CATCH_CONFIG_NO_CPP11) +# define CATCH_CONFIG_CPP11_IS_ENUM +#endif +#if defined(CATCH_INTERNAL_CONFIG_CPP11_TUPLE) && !defined(CATCH_CONFIG_CPP11_NO_TUPLE) && !defined(CATCH_CONFIG_CPP11_TUPLE) && !defined(CATCH_CONFIG_NO_CPP11) +# define CATCH_CONFIG_CPP11_TUPLE +#endif +#if defined(CATCH_INTERNAL_CONFIG_VARIADIC_MACROS) && !defined(CATCH_CONFIG_NO_VARIADIC_MACROS) && !defined(CATCH_CONFIG_VARIADIC_MACROS) +# define CATCH_CONFIG_VARIADIC_MACROS +#endif +#if defined(CATCH_INTERNAL_CONFIG_CPP11_LONG_LONG) && !defined(CATCH_CONFIG_CPP11_NO_LONG_LONG) && !defined(CATCH_CONFIG_CPP11_LONG_LONG) && !defined(CATCH_CONFIG_NO_CPP11) +# define CATCH_CONFIG_CPP11_LONG_LONG +#endif +#if defined(CATCH_INTERNAL_CONFIG_CPP11_OVERRIDE) && !defined(CATCH_CONFIG_CPP11_NO_OVERRIDE) && !defined(CATCH_CONFIG_CPP11_OVERRIDE) && !defined(CATCH_CONFIG_NO_CPP11) +# define CATCH_CONFIG_CPP11_OVERRIDE +#endif +#if defined(CATCH_INTERNAL_CONFIG_CPP11_UNIQUE_PTR) && !defined(CATCH_CONFIG_CPP11_NO_UNIQUE_PTR) && !defined(CATCH_CONFIG_CPP11_UNIQUE_PTR) && !defined(CATCH_CONFIG_NO_CPP11) +# define CATCH_CONFIG_CPP11_UNIQUE_PTR +#endif +#if defined(CATCH_INTERNAL_CONFIG_COUNTER) && !defined(CATCH_CONFIG_NO_COUNTER) && !defined(CATCH_CONFIG_COUNTER) +# define CATCH_CONFIG_COUNTER +#endif +#if defined(CATCH_INTERNAL_CONFIG_CPP11_SHUFFLE) && !defined(CATCH_CONFIG_CPP11_NO_SHUFFLE) && !defined(CATCH_CONFIG_CPP11_SHUFFLE) && !defined(CATCH_CONFIG_NO_CPP11) +# define CATCH_CONFIG_CPP11_SHUFFLE +#endif +# if defined(CATCH_INTERNAL_CONFIG_CPP11_TYPE_TRAITS) && !defined(CATCH_CONFIG_CPP11_NO_TYPE_TRAITS) && !defined(CATCH_CONFIG_CPP11_TYPE_TRAITS) && !defined(CATCH_CONFIG_NO_CPP11) +# define CATCH_CONFIG_CPP11_TYPE_TRAITS +# endif +#if defined(CATCH_INTERNAL_CONFIG_WINDOWS_SEH) && !defined(CATCH_CONFIG_NO_WINDOWS_SEH) && !defined(CATCH_CONFIG_WINDOWS_SEH) +# define CATCH_CONFIG_WINDOWS_SEH +#endif +// This is set by default, because we assume that unix compilers are posix-signal-compatible by default. +#if !defined(CATCH_INTERNAL_CONFIG_NO_POSIX_SIGNALS) && !defined(CATCH_CONFIG_NO_POSIX_SIGNALS) && !defined(CATCH_CONFIG_POSIX_SIGNALS) +# define CATCH_CONFIG_POSIX_SIGNALS +#endif + +#if !defined(CATCH_INTERNAL_SUPPRESS_PARENTHESES_WARNINGS) +# define CATCH_INTERNAL_SUPPRESS_PARENTHESES_WARNINGS +# define CATCH_INTERNAL_UNSUPPRESS_PARENTHESES_WARNINGS +#endif +#if !defined(CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS) +# define CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS +# define CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS +#endif + +// noexcept support: +#if defined(CATCH_CONFIG_CPP11_NOEXCEPT) && !defined(CATCH_NOEXCEPT) +# define CATCH_NOEXCEPT noexcept +# define CATCH_NOEXCEPT_IS(x) noexcept(x) +#else +# define CATCH_NOEXCEPT throw() +# define CATCH_NOEXCEPT_IS(x) +#endif + +// nullptr support +#ifdef CATCH_CONFIG_CPP11_NULLPTR +# define CATCH_NULL nullptr +#else +# define CATCH_NULL NULL +#endif + +// override support +#ifdef CATCH_CONFIG_CPP11_OVERRIDE +# define CATCH_OVERRIDE override +#else +# define CATCH_OVERRIDE +#endif + +// unique_ptr support +#ifdef CATCH_CONFIG_CPP11_UNIQUE_PTR +# define CATCH_AUTO_PTR( T ) std::unique_ptr +#else +# define CATCH_AUTO_PTR( T ) std::auto_ptr +#endif + +#define INTERNAL_CATCH_UNIQUE_NAME_LINE2( name, line ) name##line +#define INTERNAL_CATCH_UNIQUE_NAME_LINE( name, line ) INTERNAL_CATCH_UNIQUE_NAME_LINE2( name, line ) +#ifdef CATCH_CONFIG_COUNTER +# define INTERNAL_CATCH_UNIQUE_NAME( name ) INTERNAL_CATCH_UNIQUE_NAME_LINE( name, __COUNTER__ ) +#else +# define INTERNAL_CATCH_UNIQUE_NAME( name ) INTERNAL_CATCH_UNIQUE_NAME_LINE( name, __LINE__ ) +#endif + +#define INTERNAL_CATCH_STRINGIFY2( expr ) #expr +#define INTERNAL_CATCH_STRINGIFY( expr ) INTERNAL_CATCH_STRINGIFY2( expr ) + +#include +#include + +namespace Catch { + + struct IConfig; + + struct CaseSensitive { enum Choice { + Yes, + No + }; }; + + class NonCopyable { +#ifdef CATCH_CONFIG_CPP11_GENERATED_METHODS + NonCopyable( NonCopyable const& ) = delete; + NonCopyable( NonCopyable && ) = delete; + NonCopyable& operator = ( NonCopyable const& ) = delete; + NonCopyable& operator = ( NonCopyable && ) = delete; +#else + NonCopyable( NonCopyable const& info ); + NonCopyable& operator = ( NonCopyable const& ); +#endif + + protected: + NonCopyable() {} + virtual ~NonCopyable(); + }; + + class SafeBool { + public: + typedef void (SafeBool::*type)() const; + + static type makeSafe( bool value ) { + return value ? &SafeBool::trueValue : 0; + } + private: + void trueValue() const {} + }; + + template + void deleteAll( ContainerT& container ) { + typename ContainerT::const_iterator it = container.begin(); + typename ContainerT::const_iterator itEnd = container.end(); + for(; it != itEnd; ++it ) + delete *it; + } + template + void deleteAllValues( AssociativeContainerT& container ) { + typename AssociativeContainerT::const_iterator it = container.begin(); + typename AssociativeContainerT::const_iterator itEnd = container.end(); + for(; it != itEnd; ++it ) + delete it->second; + } + + bool startsWith( std::string const& s, std::string const& prefix ); + bool startsWith( std::string const& s, char prefix ); + bool endsWith( std::string const& s, std::string const& suffix ); + bool endsWith( std::string const& s, char suffix ); + bool contains( std::string const& s, std::string const& infix ); + void toLowerInPlace( std::string& s ); + std::string toLower( std::string const& s ); + std::string trim( std::string const& str ); + bool replaceInPlace( std::string& str, std::string const& replaceThis, std::string const& withThis ); + + struct pluralise { + pluralise( std::size_t count, std::string const& label ); + + friend std::ostream& operator << ( std::ostream& os, pluralise const& pluraliser ); + + std::size_t m_count; + std::string m_label; + }; + + struct SourceLineInfo { + + SourceLineInfo(); + SourceLineInfo( char const* _file, std::size_t _line ); +# ifdef CATCH_CONFIG_CPP11_GENERATED_METHODS + SourceLineInfo(SourceLineInfo const& other) = default; + SourceLineInfo( SourceLineInfo && ) = default; + SourceLineInfo& operator = ( SourceLineInfo const& ) = default; + SourceLineInfo& operator = ( SourceLineInfo && ) = default; +# endif + bool empty() const; + bool operator == ( SourceLineInfo const& other ) const; + bool operator < ( SourceLineInfo const& other ) const; + + char const* file; + std::size_t line; + }; + + std::ostream& operator << ( std::ostream& os, SourceLineInfo const& info ); + + // This is just here to avoid compiler warnings with macro constants and boolean literals + inline bool isTrue( bool value ){ return value; } + inline bool alwaysTrue() { return true; } + inline bool alwaysFalse() { return false; } + + void throwLogicError( std::string const& message, SourceLineInfo const& locationInfo ); + + void seedRng( IConfig const& config ); + unsigned int rngSeed(); + + // Use this in variadic streaming macros to allow + // >> +StreamEndStop + // as well as + // >> stuff +StreamEndStop + struct StreamEndStop { + std::string operator+() { + return std::string(); + } + }; + template + T const& operator + ( T const& value, StreamEndStop ) { + return value; + } +} + +#define CATCH_INTERNAL_LINEINFO ::Catch::SourceLineInfo( __FILE__, static_cast( __LINE__ ) ) +#define CATCH_INTERNAL_ERROR( msg ) ::Catch::throwLogicError( msg, CATCH_INTERNAL_LINEINFO ); + +namespace Catch { + + class NotImplementedException : public std::exception + { + public: + NotImplementedException( SourceLineInfo const& lineInfo ); + + virtual ~NotImplementedException() CATCH_NOEXCEPT {} + + virtual const char* what() const CATCH_NOEXCEPT; + + private: + std::string m_what; + SourceLineInfo m_lineInfo; + }; + +} // end namespace Catch + +/////////////////////////////////////////////////////////////////////////////// +#define CATCH_NOT_IMPLEMENTED throw Catch::NotImplementedException( CATCH_INTERNAL_LINEINFO ) + +// #included from: internal/catch_context.h +#define TWOBLUECUBES_CATCH_CONTEXT_H_INCLUDED + +// #included from: catch_interfaces_generators.h +#define TWOBLUECUBES_CATCH_INTERFACES_GENERATORS_H_INCLUDED + +#include + +namespace Catch { + + struct IGeneratorInfo { + virtual ~IGeneratorInfo(); + virtual bool moveNext() = 0; + virtual std::size_t getCurrentIndex() const = 0; + }; + + struct IGeneratorsForTest { + virtual ~IGeneratorsForTest(); + + virtual IGeneratorInfo& getGeneratorInfo( std::string const& fileInfo, std::size_t size ) = 0; + virtual bool moveNext() = 0; + }; + + IGeneratorsForTest* createGeneratorsForTest(); + +} // end namespace Catch + +// #included from: catch_ptr.hpp +#define TWOBLUECUBES_CATCH_PTR_HPP_INCLUDED + +#ifdef __clang__ +#pragma clang diagnostic push +#pragma clang diagnostic ignored "-Wpadded" +#endif + +namespace Catch { + + // An intrusive reference counting smart pointer. + // T must implement addRef() and release() methods + // typically implementing the IShared interface + template + class Ptr { + public: + Ptr() : m_p( CATCH_NULL ){} + Ptr( T* p ) : m_p( p ){ + if( m_p ) + m_p->addRef(); + } + Ptr( Ptr const& other ) : m_p( other.m_p ){ + if( m_p ) + m_p->addRef(); + } + ~Ptr(){ + if( m_p ) + m_p->release(); + } + void reset() { + if( m_p ) + m_p->release(); + m_p = CATCH_NULL; + } + Ptr& operator = ( T* p ){ + Ptr temp( p ); + swap( temp ); + return *this; + } + Ptr& operator = ( Ptr const& other ){ + Ptr temp( other ); + swap( temp ); + return *this; + } + void swap( Ptr& other ) { std::swap( m_p, other.m_p ); } + T* get() const{ return m_p; } + T& operator*() const { return *m_p; } + T* operator->() const { return m_p; } + bool operator !() const { return m_p == CATCH_NULL; } + operator SafeBool::type() const { return SafeBool::makeSafe( m_p != CATCH_NULL ); } + + private: + T* m_p; + }; + + struct IShared : NonCopyable { + virtual ~IShared(); + virtual void addRef() const = 0; + virtual void release() const = 0; + }; + + template + struct SharedImpl : T { + + SharedImpl() : m_rc( 0 ){} + + virtual void addRef() const { + ++m_rc; + } + virtual void release() const { + if( --m_rc == 0 ) + delete this; + } + + mutable unsigned int m_rc; + }; + +} // end namespace Catch + +#ifdef __clang__ +#pragma clang diagnostic pop +#endif + +namespace Catch { + + class TestCase; + class Stream; + struct IResultCapture; + struct IRunner; + struct IGeneratorsForTest; + struct IConfig; + + struct IContext + { + virtual ~IContext(); + + virtual IResultCapture* getResultCapture() = 0; + virtual IRunner* getRunner() = 0; + virtual size_t getGeneratorIndex( std::string const& fileInfo, size_t totalSize ) = 0; + virtual bool advanceGeneratorsForCurrentTest() = 0; + virtual Ptr getConfig() const = 0; + }; + + struct IMutableContext : IContext + { + virtual ~IMutableContext(); + virtual void setResultCapture( IResultCapture* resultCapture ) = 0; + virtual void setRunner( IRunner* runner ) = 0; + virtual void setConfig( Ptr const& config ) = 0; + }; + + IContext& getCurrentContext(); + IMutableContext& getCurrentMutableContext(); + void cleanUpContext(); + Stream createStream( std::string const& streamName ); + +} + +// #included from: internal/catch_test_registry.hpp +#define TWOBLUECUBES_CATCH_TEST_REGISTRY_HPP_INCLUDED + +// #included from: catch_interfaces_testcase.h +#define TWOBLUECUBES_CATCH_INTERFACES_TESTCASE_H_INCLUDED + +#include + +namespace Catch { + + class TestSpec; + + struct ITestCase : IShared { + virtual void invoke () const = 0; + protected: + virtual ~ITestCase(); + }; + + class TestCase; + struct IConfig; + + struct ITestCaseRegistry { + virtual ~ITestCaseRegistry(); + virtual std::vector const& getAllTests() const = 0; + virtual std::vector const& getAllTestsSorted( IConfig const& config ) const = 0; + }; + + bool matchTest( TestCase const& testCase, TestSpec const& testSpec, IConfig const& config ); + std::vector filterTests( std::vector const& testCases, TestSpec const& testSpec, IConfig const& config ); + std::vector const& getAllTestCasesSorted( IConfig const& config ); + +} + +namespace Catch { + +template +class MethodTestCase : public SharedImpl { + +public: + MethodTestCase( void (C::*method)() ) : m_method( method ) {} + + virtual void invoke() const { + C obj; + (obj.*m_method)(); + } + +private: + virtual ~MethodTestCase() {} + + void (C::*m_method)(); +}; + +typedef void(*TestFunction)(); + +struct NameAndDesc { + NameAndDesc( const char* _name = "", const char* _description= "" ) + : name( _name ), description( _description ) + {} + + const char* name; + const char* description; +}; + +void registerTestCase + ( ITestCase* testCase, + char const* className, + NameAndDesc const& nameAndDesc, + SourceLineInfo const& lineInfo ); + +struct AutoReg { + + AutoReg + ( TestFunction function, + SourceLineInfo const& lineInfo, + NameAndDesc const& nameAndDesc ); + + template + AutoReg + ( void (C::*method)(), + char const* className, + NameAndDesc const& nameAndDesc, + SourceLineInfo const& lineInfo ) { + + registerTestCase + ( new MethodTestCase( method ), + className, + nameAndDesc, + lineInfo ); + } + + ~AutoReg(); + +private: + AutoReg( AutoReg const& ); + void operator= ( AutoReg const& ); +}; + +void registerTestCaseFunction + ( TestFunction function, + SourceLineInfo const& lineInfo, + NameAndDesc const& nameAndDesc ); + +} // end namespace Catch + +#ifdef CATCH_CONFIG_VARIADIC_MACROS + /////////////////////////////////////////////////////////////////////////////// + #define INTERNAL_CATCH_TESTCASE2( TestName, ... ) \ + static void TestName(); \ + CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS \ + namespace{ Catch::AutoReg INTERNAL_CATCH_UNIQUE_NAME( autoRegistrar )( &TestName, CATCH_INTERNAL_LINEINFO, Catch::NameAndDesc( __VA_ARGS__ ) ); } /* NOLINT */ \ + CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS \ + static void TestName() + #define INTERNAL_CATCH_TESTCASE( ... ) \ + INTERNAL_CATCH_TESTCASE2( INTERNAL_CATCH_UNIQUE_NAME( ____C_A_T_C_H____T_E_S_T____ ), __VA_ARGS__ ) + + /////////////////////////////////////////////////////////////////////////////// + #define INTERNAL_CATCH_METHOD_AS_TEST_CASE( QualifiedMethod, ... ) \ + CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS \ + namespace{ Catch::AutoReg INTERNAL_CATCH_UNIQUE_NAME( autoRegistrar )( &QualifiedMethod, "&" #QualifiedMethod, Catch::NameAndDesc( __VA_ARGS__ ), CATCH_INTERNAL_LINEINFO ); } /* NOLINT */ \ + CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS + + /////////////////////////////////////////////////////////////////////////////// + #define INTERNAL_CATCH_TEST_CASE_METHOD2( TestName, ClassName, ... )\ + CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS \ + namespace{ \ + struct TestName : ClassName{ \ + void test(); \ + }; \ + Catch::AutoReg INTERNAL_CATCH_UNIQUE_NAME( autoRegistrar ) ( &TestName::test, #ClassName, Catch::NameAndDesc( __VA_ARGS__ ), CATCH_INTERNAL_LINEINFO ); /* NOLINT */ \ + } \ + CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS \ + void TestName::test() + #define INTERNAL_CATCH_TEST_CASE_METHOD( ClassName, ... ) \ + INTERNAL_CATCH_TEST_CASE_METHOD2( INTERNAL_CATCH_UNIQUE_NAME( ____C_A_T_C_H____T_E_S_T____ ), ClassName, __VA_ARGS__ ) + + /////////////////////////////////////////////////////////////////////////////// + #define INTERNAL_CATCH_REGISTER_TESTCASE( Function, ... ) \ + CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS \ + Catch::AutoReg( Function, CATCH_INTERNAL_LINEINFO, Catch::NameAndDesc( __VA_ARGS__ ) ); /* NOLINT */ \ + CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS + +#else + /////////////////////////////////////////////////////////////////////////////// + #define INTERNAL_CATCH_TESTCASE2( TestName, Name, Desc ) \ + static void TestName(); \ + CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS \ + namespace{ Catch::AutoReg INTERNAL_CATCH_UNIQUE_NAME( autoRegistrar )( &TestName, CATCH_INTERNAL_LINEINFO, Catch::NameAndDesc( Name, Desc ) ); } /* NOLINT */ \ + CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS \ + static void TestName() + #define INTERNAL_CATCH_TESTCASE( Name, Desc ) \ + INTERNAL_CATCH_TESTCASE2( INTERNAL_CATCH_UNIQUE_NAME( ____C_A_T_C_H____T_E_S_T____ ), Name, Desc ) + + /////////////////////////////////////////////////////////////////////////////// + #define INTERNAL_CATCH_METHOD_AS_TEST_CASE( QualifiedMethod, Name, Desc ) \ + CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS \ + namespace{ Catch::AutoReg INTERNAL_CATCH_UNIQUE_NAME( autoRegistrar )( &QualifiedMethod, "&" #QualifiedMethod, Catch::NameAndDesc( Name, Desc ), CATCH_INTERNAL_LINEINFO ); } /* NOLINT */ \ + CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS + + /////////////////////////////////////////////////////////////////////////////// + #define INTERNAL_CATCH_TEST_CASE_METHOD2( TestCaseName, ClassName, TestName, Desc )\ + CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS \ + namespace{ \ + struct TestCaseName : ClassName{ \ + void test(); \ + }; \ + Catch::AutoReg INTERNAL_CATCH_UNIQUE_NAME( autoRegistrar ) ( &TestCaseName::test, #ClassName, Catch::NameAndDesc( TestName, Desc ), CATCH_INTERNAL_LINEINFO ); /* NOLINT */ \ + } \ + CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS \ + void TestCaseName::test() + #define INTERNAL_CATCH_TEST_CASE_METHOD( ClassName, TestName, Desc )\ + INTERNAL_CATCH_TEST_CASE_METHOD2( INTERNAL_CATCH_UNIQUE_NAME( ____C_A_T_C_H____T_E_S_T____ ), ClassName, TestName, Desc ) + + /////////////////////////////////////////////////////////////////////////////// + #define INTERNAL_CATCH_REGISTER_TESTCASE( Function, Name, Desc ) \ + CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS \ + Catch::AutoReg( Function, CATCH_INTERNAL_LINEINFO, Catch::NameAndDesc( Name, Desc ) ); /* NOLINT */ \ + CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS + +#endif + +// #included from: internal/catch_capture.hpp +#define TWOBLUECUBES_CATCH_CAPTURE_HPP_INCLUDED + +// #included from: catch_result_builder.h +#define TWOBLUECUBES_CATCH_RESULT_BUILDER_H_INCLUDED + +// #included from: catch_result_type.h +#define TWOBLUECUBES_CATCH_RESULT_TYPE_H_INCLUDED + +namespace Catch { + + // ResultWas::OfType enum + struct ResultWas { enum OfType { + Unknown = -1, + Ok = 0, + Info = 1, + Warning = 2, + + FailureBit = 0x10, + + ExpressionFailed = FailureBit | 1, + ExplicitFailure = FailureBit | 2, + + Exception = 0x100 | FailureBit, + + ThrewException = Exception | 1, + DidntThrowException = Exception | 2, + + FatalErrorCondition = 0x200 | FailureBit + + }; }; + + inline bool isOk( ResultWas::OfType resultType ) { + return ( resultType & ResultWas::FailureBit ) == 0; + } + inline bool isJustInfo( int flags ) { + return flags == ResultWas::Info; + } + + // ResultDisposition::Flags enum + struct ResultDisposition { enum Flags { + Normal = 0x01, + + ContinueOnFailure = 0x02, // Failures fail test, but execution continues + FalseTest = 0x04, // Prefix expression with ! + SuppressFail = 0x08 // Failures are reported but do not fail the test + }; }; + + inline ResultDisposition::Flags operator | ( ResultDisposition::Flags lhs, ResultDisposition::Flags rhs ) { + return static_cast( static_cast( lhs ) | static_cast( rhs ) ); + } + + inline bool shouldContinueOnFailure( int flags ) { return ( flags & ResultDisposition::ContinueOnFailure ) != 0; } + inline bool isFalseTest( int flags ) { return ( flags & ResultDisposition::FalseTest ) != 0; } + inline bool shouldSuppressFailure( int flags ) { return ( flags & ResultDisposition::SuppressFail ) != 0; } + +} // end namespace Catch + +// #included from: catch_assertionresult.h +#define TWOBLUECUBES_CATCH_ASSERTIONRESULT_H_INCLUDED + +#include + +namespace Catch { + + struct STATIC_ASSERT_Expression_Too_Complex_Please_Rewrite_As_Binary_Comparison; + + struct DecomposedExpression + { + virtual ~DecomposedExpression() {} + virtual bool isBinaryExpression() const { + return false; + } + virtual void reconstructExpression( std::string& dest ) const = 0; + + // Only simple binary comparisons can be decomposed. + // If more complex check is required then wrap sub-expressions in parentheses. + template STATIC_ASSERT_Expression_Too_Complex_Please_Rewrite_As_Binary_Comparison& operator + ( T const& ); + template STATIC_ASSERT_Expression_Too_Complex_Please_Rewrite_As_Binary_Comparison& operator - ( T const& ); + template STATIC_ASSERT_Expression_Too_Complex_Please_Rewrite_As_Binary_Comparison& operator * ( T const& ); + template STATIC_ASSERT_Expression_Too_Complex_Please_Rewrite_As_Binary_Comparison& operator / ( T const& ); + template STATIC_ASSERT_Expression_Too_Complex_Please_Rewrite_As_Binary_Comparison& operator % ( T const& ); + template STATIC_ASSERT_Expression_Too_Complex_Please_Rewrite_As_Binary_Comparison& operator && ( T const& ); + template STATIC_ASSERT_Expression_Too_Complex_Please_Rewrite_As_Binary_Comparison& operator || ( T const& ); + + private: + DecomposedExpression& operator = (DecomposedExpression const&); + }; + + struct AssertionInfo + { + AssertionInfo(); + AssertionInfo( char const * _macroName, + SourceLineInfo const& _lineInfo, + char const * _capturedExpression, + ResultDisposition::Flags _resultDisposition, + char const * _secondArg = ""); + + char const * macroName; + SourceLineInfo lineInfo; + char const * capturedExpression; + ResultDisposition::Flags resultDisposition; + char const * secondArg; + }; + + struct AssertionResultData + { + AssertionResultData() : decomposedExpression( CATCH_NULL ) + , resultType( ResultWas::Unknown ) + , negated( false ) + , parenthesized( false ) {} + + void negate( bool parenthesize ) { + negated = !negated; + parenthesized = parenthesize; + if( resultType == ResultWas::Ok ) + resultType = ResultWas::ExpressionFailed; + else if( resultType == ResultWas::ExpressionFailed ) + resultType = ResultWas::Ok; + } + + std::string const& reconstructExpression() const { + if( decomposedExpression != CATCH_NULL ) { + decomposedExpression->reconstructExpression( reconstructedExpression ); + if( parenthesized ) { + reconstructedExpression.insert( 0, 1, '(' ); + reconstructedExpression.append( 1, ')' ); + } + if( negated ) { + reconstructedExpression.insert( 0, 1, '!' ); + } + decomposedExpression = CATCH_NULL; + } + return reconstructedExpression; + } + + mutable DecomposedExpression const* decomposedExpression; + mutable std::string reconstructedExpression; + std::string message; + ResultWas::OfType resultType; + bool negated; + bool parenthesized; + }; + + class AssertionResult { + public: + AssertionResult(); + AssertionResult( AssertionInfo const& info, AssertionResultData const& data ); + ~AssertionResult(); +# ifdef CATCH_CONFIG_CPP11_GENERATED_METHODS + AssertionResult( AssertionResult const& ) = default; + AssertionResult( AssertionResult && ) = default; + AssertionResult& operator = ( AssertionResult const& ) = default; + AssertionResult& operator = ( AssertionResult && ) = default; +# endif + + bool isOk() const; + bool succeeded() const; + ResultWas::OfType getResultType() const; + bool hasExpression() const; + bool hasMessage() const; + std::string getExpression() const; + std::string getExpressionInMacro() const; + bool hasExpandedExpression() const; + std::string getExpandedExpression() const; + std::string getMessage() const; + SourceLineInfo getSourceInfo() const; + std::string getTestMacroName() const; + void discardDecomposedExpression() const; + void expandDecomposedExpression() const; + + protected: + AssertionInfo m_info; + AssertionResultData m_resultData; + }; + +} // end namespace Catch + +// #included from: catch_matchers.hpp +#define TWOBLUECUBES_CATCH_MATCHERS_HPP_INCLUDED + +namespace Catch { +namespace Matchers { + namespace Impl { + + template struct MatchAllOf; + template struct MatchAnyOf; + template struct MatchNotOf; + + class MatcherUntypedBase { + public: + std::string toString() const { + if( m_cachedToString.empty() ) + m_cachedToString = describe(); + return m_cachedToString; + } + + protected: + virtual ~MatcherUntypedBase(); + virtual std::string describe() const = 0; + mutable std::string m_cachedToString; + private: + MatcherUntypedBase& operator = ( MatcherUntypedBase const& ); + }; + + template + struct MatcherMethod { + virtual bool match( ObjectT const& arg ) const = 0; + }; + template + struct MatcherMethod { + virtual bool match( PtrT* arg ) const = 0; + }; + + template + struct MatcherBase : MatcherUntypedBase, MatcherMethod { + + MatchAllOf operator && ( MatcherBase const& other ) const; + MatchAnyOf operator || ( MatcherBase const& other ) const; + MatchNotOf operator ! () const; + }; + + template + struct MatchAllOf : MatcherBase { + virtual bool match( ArgT const& arg ) const CATCH_OVERRIDE { + for( std::size_t i = 0; i < m_matchers.size(); ++i ) { + if (!m_matchers[i]->match(arg)) + return false; + } + return true; + } + virtual std::string describe() const CATCH_OVERRIDE { + std::string description; + description.reserve( 4 + m_matchers.size()*32 ); + description += "( "; + for( std::size_t i = 0; i < m_matchers.size(); ++i ) { + if( i != 0 ) + description += " and "; + description += m_matchers[i]->toString(); + } + description += " )"; + return description; + } + + MatchAllOf& operator && ( MatcherBase const& other ) { + m_matchers.push_back( &other ); + return *this; + } + + std::vector const*> m_matchers; + }; + template + struct MatchAnyOf : MatcherBase { + + virtual bool match( ArgT const& arg ) const CATCH_OVERRIDE { + for( std::size_t i = 0; i < m_matchers.size(); ++i ) { + if (m_matchers[i]->match(arg)) + return true; + } + return false; + } + virtual std::string describe() const CATCH_OVERRIDE { + std::string description; + description.reserve( 4 + m_matchers.size()*32 ); + description += "( "; + for( std::size_t i = 0; i < m_matchers.size(); ++i ) { + if( i != 0 ) + description += " or "; + description += m_matchers[i]->toString(); + } + description += " )"; + return description; + } + + MatchAnyOf& operator || ( MatcherBase const& other ) { + m_matchers.push_back( &other ); + return *this; + } + + std::vector const*> m_matchers; + }; + + template + struct MatchNotOf : MatcherBase { + + MatchNotOf( MatcherBase const& underlyingMatcher ) : m_underlyingMatcher( underlyingMatcher ) {} + + virtual bool match( ArgT const& arg ) const CATCH_OVERRIDE { + return !m_underlyingMatcher.match( arg ); + } + + virtual std::string describe() const CATCH_OVERRIDE { + return "not " + m_underlyingMatcher.toString(); + } + MatcherBase const& m_underlyingMatcher; + }; + + template + MatchAllOf MatcherBase::operator && ( MatcherBase const& other ) const { + return MatchAllOf() && *this && other; + } + template + MatchAnyOf MatcherBase::operator || ( MatcherBase const& other ) const { + return MatchAnyOf() || *this || other; + } + template + MatchNotOf MatcherBase::operator ! () const { + return MatchNotOf( *this ); + } + + } // namespace Impl + + // The following functions create the actual matcher objects. + // This allows the types to be inferred + // - deprecated: prefer ||, && and ! + template + Impl::MatchNotOf Not( Impl::MatcherBase const& underlyingMatcher ) { + return Impl::MatchNotOf( underlyingMatcher ); + } + template + Impl::MatchAllOf AllOf( Impl::MatcherBase const& m1, Impl::MatcherBase const& m2 ) { + return Impl::MatchAllOf() && m1 && m2; + } + template + Impl::MatchAllOf AllOf( Impl::MatcherBase const& m1, Impl::MatcherBase const& m2, Impl::MatcherBase const& m3 ) { + return Impl::MatchAllOf() && m1 && m2 && m3; + } + template + Impl::MatchAnyOf AnyOf( Impl::MatcherBase const& m1, Impl::MatcherBase const& m2 ) { + return Impl::MatchAnyOf() || m1 || m2; + } + template + Impl::MatchAnyOf AnyOf( Impl::MatcherBase const& m1, Impl::MatcherBase const& m2, Impl::MatcherBase const& m3 ) { + return Impl::MatchAnyOf() || m1 || m2 || m3; + } + +} // namespace Matchers + +using namespace Matchers; +using Matchers::Impl::MatcherBase; + +} // namespace Catch + +namespace Catch { + + struct TestFailureException{}; + + template class ExpressionLhs; + + struct CopyableStream { + CopyableStream() {} + CopyableStream( CopyableStream const& other ) { + oss << other.oss.str(); + } + CopyableStream& operator=( CopyableStream const& other ) { + oss.str(std::string()); + oss << other.oss.str(); + return *this; + } + std::ostringstream oss; + }; + + class ResultBuilder : public DecomposedExpression { + public: + ResultBuilder( char const* macroName, + SourceLineInfo const& lineInfo, + char const* capturedExpression, + ResultDisposition::Flags resultDisposition, + char const* secondArg = "" ); + ~ResultBuilder(); + + template + ExpressionLhs operator <= ( T const& operand ); + ExpressionLhs operator <= ( bool value ); + + template + ResultBuilder& operator << ( T const& value ) { + stream().oss << value; + return *this; + } + + ResultBuilder& setResultType( ResultWas::OfType result ); + ResultBuilder& setResultType( bool result ); + + void endExpression( DecomposedExpression const& expr ); + + virtual void reconstructExpression( std::string& dest ) const CATCH_OVERRIDE; + + AssertionResult build() const; + AssertionResult build( DecomposedExpression const& expr ) const; + + void useActiveException( ResultDisposition::Flags resultDisposition = ResultDisposition::Normal ); + void captureResult( ResultWas::OfType resultType ); + void captureExpression(); + void captureExpectedException( std::string const& expectedMessage ); + void captureExpectedException( Matchers::Impl::MatcherBase const& matcher ); + void handleResult( AssertionResult const& result ); + void react(); + bool shouldDebugBreak() const; + bool allowThrows() const; + + template + void captureMatch( ArgT const& arg, MatcherT const& matcher, char const* matcherString ); + + void setExceptionGuard(); + void unsetExceptionGuard(); + + private: + AssertionInfo m_assertionInfo; + AssertionResultData m_data; + + CopyableStream &stream() + { + if(!m_usedStream) + { + m_usedStream = true; + m_stream().oss.str(""); + } + return m_stream(); + } + + static CopyableStream &m_stream() + { + static CopyableStream s; + return s; + } + + bool m_shouldDebugBreak; + bool m_shouldThrow; + bool m_guardException; + bool m_usedStream; + }; + +} // namespace Catch + +// Include after due to circular dependency: +// #included from: catch_expression_lhs.hpp +#define TWOBLUECUBES_CATCH_EXPRESSION_LHS_HPP_INCLUDED + +// #included from: catch_evaluate.hpp +#define TWOBLUECUBES_CATCH_EVALUATE_HPP_INCLUDED + +#ifdef _MSC_VER +#pragma warning(push) +#pragma warning(disable:4389) // '==' : signed/unsigned mismatch +#pragma warning(disable:4018) // more "signed/unsigned mismatch" +#pragma warning(disable:4312) // Converting int to T* using reinterpret_cast (issue on x64 platform) +#endif + +#include + +namespace Catch { +namespace Internal { + + enum Operator { + IsEqualTo, + IsNotEqualTo, + IsLessThan, + IsGreaterThan, + IsLessThanOrEqualTo, + IsGreaterThanOrEqualTo + }; + + template struct OperatorTraits { static const char* getName(){ return "*error*"; } }; + template<> struct OperatorTraits { static const char* getName(){ return "=="; } }; + template<> struct OperatorTraits { static const char* getName(){ return "!="; } }; + template<> struct OperatorTraits { static const char* getName(){ return "<"; } }; + template<> struct OperatorTraits { static const char* getName(){ return ">"; } }; + template<> struct OperatorTraits { static const char* getName(){ return "<="; } }; + template<> struct OperatorTraits{ static const char* getName(){ return ">="; } }; + + template + T& opCast(T const& t) { return const_cast(t); } + +// nullptr_t support based on pull request #154 from Konstantin Baumann +#ifdef CATCH_CONFIG_CPP11_NULLPTR + inline std::nullptr_t opCast(std::nullptr_t) { return nullptr; } +#endif // CATCH_CONFIG_CPP11_NULLPTR + + // So the compare overloads can be operator agnostic we convey the operator as a template + // enum, which is used to specialise an Evaluator for doing the comparison. + template + struct Evaluator{}; + + template + struct Evaluator { + static bool evaluate( T1 const& lhs, T2 const& rhs) { + return bool( opCast( lhs ) == opCast( rhs ) ); + } + }; + template + struct Evaluator { + static bool evaluate( T1 const& lhs, T2 const& rhs ) { + return bool( opCast( lhs ) != opCast( rhs ) ); + } + }; + template + struct Evaluator { + static bool evaluate( T1 const& lhs, T2 const& rhs ) { + return bool( opCast( lhs ) < opCast( rhs ) ); + } + }; + template + struct Evaluator { + static bool evaluate( T1 const& lhs, T2 const& rhs ) { + return bool( opCast( lhs ) > opCast( rhs ) ); + } + }; + template + struct Evaluator { + static bool evaluate( T1 const& lhs, T2 const& rhs ) { + return bool( opCast( lhs ) >= opCast( rhs ) ); + } + }; + template + struct Evaluator { + static bool evaluate( T1 const& lhs, T2 const& rhs ) { + return bool( opCast( lhs ) <= opCast( rhs ) ); + } + }; + + template + bool applyEvaluator( T1 const& lhs, T2 const& rhs ) { + return Evaluator::evaluate( lhs, rhs ); + } + + // This level of indirection allows us to specialise for integer types + // to avoid signed/ unsigned warnings + + // "base" overload + template + bool compare( T1 const& lhs, T2 const& rhs ) { + return Evaluator::evaluate( lhs, rhs ); + } + + // unsigned X to int + template bool compare( unsigned int lhs, int rhs ) { + return applyEvaluator( lhs, static_cast( rhs ) ); + } + template bool compare( unsigned long lhs, int rhs ) { + return applyEvaluator( lhs, static_cast( rhs ) ); + } + template bool compare( unsigned char lhs, int rhs ) { + return applyEvaluator( lhs, static_cast( rhs ) ); + } + + // unsigned X to long + template bool compare( unsigned int lhs, long rhs ) { + return applyEvaluator( lhs, static_cast( rhs ) ); + } + template bool compare( unsigned long lhs, long rhs ) { + return applyEvaluator( lhs, static_cast( rhs ) ); + } + template bool compare( unsigned char lhs, long rhs ) { + return applyEvaluator( lhs, static_cast( rhs ) ); + } + + // int to unsigned X + template bool compare( int lhs, unsigned int rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + template bool compare( int lhs, unsigned long rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + template bool compare( int lhs, unsigned char rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + + // long to unsigned X + template bool compare( long lhs, unsigned int rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + template bool compare( long lhs, unsigned long rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + template bool compare( long lhs, unsigned char rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + + // pointer to long (when comparing against NULL) + template bool compare( long lhs, T* rhs ) { + return Evaluator::evaluate( reinterpret_cast( lhs ), rhs ); + } + template bool compare( T* lhs, long rhs ) { + return Evaluator::evaluate( lhs, reinterpret_cast( rhs ) ); + } + + // pointer to int (when comparing against NULL) + template bool compare( int lhs, T* rhs ) { + return Evaluator::evaluate( reinterpret_cast( lhs ), rhs ); + } + template bool compare( T* lhs, int rhs ) { + return Evaluator::evaluate( lhs, reinterpret_cast( rhs ) ); + } + +#ifdef CATCH_CONFIG_CPP11_LONG_LONG + // long long to unsigned X + template bool compare( long long lhs, unsigned int rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + template bool compare( long long lhs, unsigned long rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + template bool compare( long long lhs, unsigned long long rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + template bool compare( long long lhs, unsigned char rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + + // unsigned long long to X + template bool compare( unsigned long long lhs, int rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + template bool compare( unsigned long long lhs, long rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + template bool compare( unsigned long long lhs, long long rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + template bool compare( unsigned long long lhs, char rhs ) { + return applyEvaluator( static_cast( lhs ), rhs ); + } + + // pointer to long long (when comparing against NULL) + template bool compare( long long lhs, T* rhs ) { + return Evaluator::evaluate( reinterpret_cast( lhs ), rhs ); + } + template bool compare( T* lhs, long long rhs ) { + return Evaluator::evaluate( lhs, reinterpret_cast( rhs ) ); + } +#endif // CATCH_CONFIG_CPP11_LONG_LONG + +#ifdef CATCH_CONFIG_CPP11_NULLPTR + // pointer to nullptr_t (when comparing against nullptr) + template bool compare( std::nullptr_t, T* rhs ) { + return Evaluator::evaluate( nullptr, rhs ); + } + template bool compare( T* lhs, std::nullptr_t ) { + return Evaluator::evaluate( lhs, nullptr ); + } +#endif // CATCH_CONFIG_CPP11_NULLPTR + +} // end of namespace Internal +} // end of namespace Catch + +#ifdef _MSC_VER +#pragma warning(pop) +#endif + +// #included from: catch_tostring.h +#define TWOBLUECUBES_CATCH_TOSTRING_H_INCLUDED + +#include +#include +#include +#include +#include + +#ifdef __OBJC__ +// #included from: catch_objc_arc.hpp +#define TWOBLUECUBES_CATCH_OBJC_ARC_HPP_INCLUDED + +#import + +#ifdef __has_feature +#define CATCH_ARC_ENABLED __has_feature(objc_arc) +#else +#define CATCH_ARC_ENABLED 0 +#endif + +void arcSafeRelease( NSObject* obj ); +id performOptionalSelector( id obj, SEL sel ); + +#if !CATCH_ARC_ENABLED +inline void arcSafeRelease( NSObject* obj ) { + [obj release]; +} +inline id performOptionalSelector( id obj, SEL sel ) { + if( [obj respondsToSelector: sel] ) + return [obj performSelector: sel]; + return nil; +} +#define CATCH_UNSAFE_UNRETAINED +#define CATCH_ARC_STRONG +#else +inline void arcSafeRelease( NSObject* ){} +inline id performOptionalSelector( id obj, SEL sel ) { +#ifdef __clang__ +#pragma clang diagnostic push +#pragma clang diagnostic ignored "-Warc-performSelector-leaks" +#endif + if( [obj respondsToSelector: sel] ) + return [obj performSelector: sel]; +#ifdef __clang__ +#pragma clang diagnostic pop +#endif + return nil; +} +#define CATCH_UNSAFE_UNRETAINED __unsafe_unretained +#define CATCH_ARC_STRONG __strong +#endif + +#endif + +#ifdef CATCH_CONFIG_CPP11_TUPLE +#include +#endif + +#ifdef CATCH_CONFIG_CPP11_IS_ENUM +#include +#endif + +namespace Catch { + +// Why we're here. +template +std::string toString( T const& value ); + +// Built in overloads + +std::string toString( std::string const& value ); +std::string toString( std::wstring const& value ); +std::string toString( const char* const value ); +std::string toString( char* const value ); +std::string toString( const wchar_t* const value ); +std::string toString( wchar_t* const value ); +std::string toString( int value ); +std::string toString( unsigned long value ); +std::string toString( unsigned int value ); +std::string toString( const double value ); +std::string toString( const float value ); +std::string toString( bool value ); +std::string toString( char value ); +std::string toString( signed char value ); +std::string toString( unsigned char value ); + +#ifdef CATCH_CONFIG_CPP11_LONG_LONG +std::string toString( long long value ); +std::string toString( unsigned long long value ); +#endif + +#ifdef CATCH_CONFIG_CPP11_NULLPTR +std::string toString( std::nullptr_t ); +#endif + +#ifdef __OBJC__ + std::string toString( NSString const * const& nsstring ); + std::string toString( NSString * CATCH_ARC_STRONG & nsstring ); + std::string toString( NSObject* const& nsObject ); +#endif + +namespace Detail { + + extern const std::string unprintableString; + + #if !defined(CATCH_CONFIG_CPP11_STREAM_INSERTABLE_CHECK) + struct BorgType { + template BorgType( T const& ); + }; + + struct TrueType { char sizer[1]; }; + struct FalseType { char sizer[2]; }; + + TrueType& testStreamable( std::ostream& ); + FalseType testStreamable( FalseType ); + + FalseType operator<<( std::ostream const&, BorgType const& ); + + template + struct IsStreamInsertable { + static std::ostream &s; + static T const&t; + enum { value = sizeof( testStreamable(s << t) ) == sizeof( TrueType ) }; + }; +#else + template + class IsStreamInsertable { + template + static auto test(int) + -> decltype( std::declval() << std::declval(), std::true_type() ); + + template + static auto test(...) -> std::false_type; + + public: + static const bool value = decltype(test(0))::value; + }; +#endif + +#if defined(CATCH_CONFIG_CPP11_IS_ENUM) + template::value + > + struct EnumStringMaker + { + static std::string convert( T const& ) { return unprintableString; } + }; + + template + struct EnumStringMaker + { + static std::string convert( T const& v ) + { + return ::Catch::toString( + static_cast::type>(v) + ); + } + }; +#endif + template + struct StringMakerBase { +#if defined(CATCH_CONFIG_CPP11_IS_ENUM) + template + static std::string convert( T const& v ) + { + return EnumStringMaker::convert( v ); + } +#else + template + static std::string convert( T const& ) { return unprintableString; } +#endif + }; + + template<> + struct StringMakerBase { + template + static std::string convert( T const& _value ) { + std::ostringstream oss; + oss << _value; + return oss.str(); + } + }; + + std::string rawMemoryToString( const void *object, std::size_t size ); + + template + std::string rawMemoryToString( const T& object ) { + return rawMemoryToString( &object, sizeof(object) ); + } + +} // end namespace Detail + +template +struct StringMaker : + Detail::StringMakerBase::value> {}; + +template +struct StringMaker { + template + static std::string convert( U* p ) { + if( !p ) + return "NULL"; + else + return Detail::rawMemoryToString( p ); + } +}; + +template +struct StringMaker { + static std::string convert( R C::* p ) { + if( !p ) + return "NULL"; + else + return Detail::rawMemoryToString( p ); + } +}; + +namespace Detail { + template + std::string rangeToString( InputIterator first, InputIterator last ); +} + +//template +//struct StringMaker > { +// static std::string convert( std::vector const& v ) { +// return Detail::rangeToString( v.begin(), v.end() ); +// } +//}; + +template +std::string toString( std::vector const& v ) { + return Detail::rangeToString( v.begin(), v.end() ); +} + +#ifdef CATCH_CONFIG_CPP11_TUPLE + +// toString for tuples +namespace TupleDetail { + template< + typename Tuple, + std::size_t N = 0, + bool = (N < std::tuple_size::value) + > + struct ElementPrinter { + static void print( const Tuple& tuple, std::ostream& os ) + { + os << ( N ? ", " : " " ) + << Catch::toString(std::get(tuple)); + ElementPrinter::print(tuple,os); + } + }; + + template< + typename Tuple, + std::size_t N + > + struct ElementPrinter { + static void print( const Tuple&, std::ostream& ) {} + }; + +} + +template +struct StringMaker> { + + static std::string convert( const std::tuple& tuple ) + { + std::ostringstream os; + os << '{'; + TupleDetail::ElementPrinter>::print( tuple, os ); + os << " }"; + return os.str(); + } +}; +#endif // CATCH_CONFIG_CPP11_TUPLE + +namespace Detail { + template + std::string makeString( T const& value ) { + return StringMaker::convert( value ); + } +} // end namespace Detail + +/// \brief converts any type to a string +/// +/// The default template forwards on to ostringstream - except when an +/// ostringstream overload does not exist - in which case it attempts to detect +/// that and writes {?}. +/// Overload (not specialise) this template for custom typs that you don't want +/// to provide an ostream overload for. +template +std::string toString( T const& value ) { + return StringMaker::convert( value ); +} + + namespace Detail { + template + std::string rangeToString( InputIterator first, InputIterator last ) { + std::ostringstream oss; + oss << "{ "; + if( first != last ) { + oss << Catch::toString( *first ); + for( ++first ; first != last ; ++first ) + oss << ", " << Catch::toString( *first ); + } + oss << " }"; + return oss.str(); + } +} + +} // end namespace Catch + +namespace Catch { + +template +class BinaryExpression; + +template +class MatchExpression; + +// Wraps the LHS of an expression and overloads comparison operators +// for also capturing those and RHS (if any) +template +class ExpressionLhs : public DecomposedExpression { +public: + ExpressionLhs( ResultBuilder& rb, T lhs ) : m_rb( rb ), m_lhs( lhs ), m_truthy(false) {} + + ExpressionLhs& operator = ( const ExpressionLhs& ); + + template + BinaryExpression + operator == ( RhsT const& rhs ) { + return captureExpression( rhs ); + } + + template + BinaryExpression + operator != ( RhsT const& rhs ) { + return captureExpression( rhs ); + } + + template + BinaryExpression + operator < ( RhsT const& rhs ) { + return captureExpression( rhs ); + } + + template + BinaryExpression + operator > ( RhsT const& rhs ) { + return captureExpression( rhs ); + } + + template + BinaryExpression + operator <= ( RhsT const& rhs ) { + return captureExpression( rhs ); + } + + template + BinaryExpression + operator >= ( RhsT const& rhs ) { + return captureExpression( rhs ); + } + + BinaryExpression operator == ( bool rhs ) { + return captureExpression( rhs ); + } + + BinaryExpression operator != ( bool rhs ) { + return captureExpression( rhs ); + } + + void endExpression() { + m_truthy = m_lhs ? true : false; + m_rb + .setResultType( m_truthy ) + .endExpression( *this ); + } + + virtual void reconstructExpression( std::string& dest ) const CATCH_OVERRIDE { + dest = Catch::toString( m_lhs ); + } + +private: + template + BinaryExpression captureExpression( RhsT& rhs ) const { + return BinaryExpression( m_rb, m_lhs, rhs ); + } + + template + BinaryExpression captureExpression( bool rhs ) const { + return BinaryExpression( m_rb, m_lhs, rhs ); + } + +private: + ResultBuilder& m_rb; + T m_lhs; + bool m_truthy; +}; + +template +class BinaryExpression : public DecomposedExpression { +public: + BinaryExpression( ResultBuilder& rb, LhsT lhs, RhsT rhs ) + : m_rb( rb ), m_lhs( lhs ), m_rhs( rhs ) {} + + BinaryExpression& operator = ( BinaryExpression& ); + + void endExpression() const { + m_rb + .setResultType( Internal::compare( m_lhs, m_rhs ) ) + .endExpression( *this ); + } + + virtual bool isBinaryExpression() const CATCH_OVERRIDE { + return true; + } + + virtual void reconstructExpression( std::string& dest ) const CATCH_OVERRIDE { + std::string lhs = Catch::toString( m_lhs ); + std::string rhs = Catch::toString( m_rhs ); + char delim = lhs.size() + rhs.size() < 40 && + lhs.find('\n') == std::string::npos && + rhs.find('\n') == std::string::npos ? ' ' : '\n'; + dest.reserve( 7 + lhs.size() + rhs.size() ); + // 2 for spaces around operator + // 2 for operator + // 2 for parentheses (conditionally added later) + // 1 for negation (conditionally added later) + dest = lhs; + dest += delim; + dest += Internal::OperatorTraits::getName(); + dest += delim; + dest += rhs; + } + +private: + ResultBuilder& m_rb; + LhsT m_lhs; + RhsT m_rhs; +}; + +template +class MatchExpression : public DecomposedExpression { +public: + MatchExpression( ArgT arg, MatcherT matcher, char const* matcherString ) + : m_arg( arg ), m_matcher( matcher ), m_matcherString( matcherString ) {} + + virtual bool isBinaryExpression() const CATCH_OVERRIDE { + return true; + } + + virtual void reconstructExpression( std::string& dest ) const CATCH_OVERRIDE { + std::string matcherAsString = m_matcher.toString(); + dest = Catch::toString( m_arg ); + dest += ' '; + if( matcherAsString == Detail::unprintableString ) + dest += m_matcherString; + else + dest += matcherAsString; + } + +private: + ArgT m_arg; + MatcherT m_matcher; + char const* m_matcherString; +}; + +} // end namespace Catch + + +namespace Catch { + + template + ExpressionLhs ResultBuilder::operator <= ( T const& operand ) { + return ExpressionLhs( *this, operand ); + } + + inline ExpressionLhs ResultBuilder::operator <= ( bool value ) { + return ExpressionLhs( *this, value ); + } + + template + void ResultBuilder::captureMatch( ArgT const& arg, MatcherT const& matcher, + char const* matcherString ) { + MatchExpression expr( arg, matcher, matcherString ); + setResultType( matcher.match( arg ) ); + endExpression( expr ); + } + +} // namespace Catch + +// #included from: catch_message.h +#define TWOBLUECUBES_CATCH_MESSAGE_H_INCLUDED + +#include + +namespace Catch { + + struct MessageInfo { + MessageInfo( std::string const& _macroName, + SourceLineInfo const& _lineInfo, + ResultWas::OfType _type ); + + std::string macroName; + SourceLineInfo lineInfo; + ResultWas::OfType type; + std::string message; + unsigned int sequence; + + bool operator == ( MessageInfo const& other ) const { + return sequence == other.sequence; + } + bool operator < ( MessageInfo const& other ) const { + return sequence < other.sequence; + } + private: + static unsigned int globalCount; + }; + + struct MessageBuilder { + MessageBuilder( std::string const& macroName, + SourceLineInfo const& lineInfo, + ResultWas::OfType type ) + : m_info( macroName, lineInfo, type ) + {} + + template + MessageBuilder& operator << ( T const& value ) { + m_stream << value; + return *this; + } + + MessageInfo m_info; + std::ostringstream m_stream; + }; + + class ScopedMessage { + public: + ScopedMessage( MessageBuilder const& builder ); + ScopedMessage( ScopedMessage const& other ); + ~ScopedMessage(); + + MessageInfo m_info; + }; + +} // end namespace Catch + +// #included from: catch_interfaces_capture.h +#define TWOBLUECUBES_CATCH_INTERFACES_CAPTURE_H_INCLUDED + +#include + +namespace Catch { + + class TestCase; + class AssertionResult; + struct AssertionInfo; + struct SectionInfo; + struct SectionEndInfo; + struct MessageInfo; + class ScopedMessageBuilder; + struct Counts; + + struct IResultCapture { + + virtual ~IResultCapture(); + + virtual void assertionEnded( AssertionResult const& result ) = 0; + virtual bool sectionStarted( SectionInfo const& sectionInfo, + Counts& assertions ) = 0; + virtual void sectionEnded( SectionEndInfo const& endInfo ) = 0; + virtual void sectionEndedEarly( SectionEndInfo const& endInfo ) = 0; + virtual void pushScopedMessage( MessageInfo const& message ) = 0; + virtual void popScopedMessage( MessageInfo const& message ) = 0; + + virtual std::string getCurrentTestName() const = 0; + virtual const AssertionResult* getLastResult() const = 0; + + virtual void exceptionEarlyReported() = 0; + + virtual void handleFatalErrorCondition( std::string const& message ) = 0; + + virtual bool lastAssertionPassed() = 0; + virtual void assertionPassed() = 0; + virtual void assertionRun() = 0; + }; + + IResultCapture& getResultCapture(); +} + +// #included from: catch_debugger.h +#define TWOBLUECUBES_CATCH_DEBUGGER_H_INCLUDED + +// #included from: catch_platform.h +#define TWOBLUECUBES_CATCH_PLATFORM_H_INCLUDED + +#if defined(__MAC_OS_X_VERSION_MIN_REQUIRED) +# define CATCH_PLATFORM_MAC +#elif defined(__IPHONE_OS_VERSION_MIN_REQUIRED) +# define CATCH_PLATFORM_IPHONE +#elif defined(linux) || defined(__linux) || defined(__linux__) +# define CATCH_PLATFORM_LINUX +#elif defined(WIN32) || defined(__WIN32__) || defined(_WIN32) || defined(_MSC_VER) +# define CATCH_PLATFORM_WINDOWS +# if !defined(NOMINMAX) && !defined(CATCH_CONFIG_NO_NOMINMAX) +# define CATCH_DEFINES_NOMINMAX +# endif +# if !defined(WIN32_LEAN_AND_MEAN) && !defined(CATCH_CONFIG_NO_WIN32_LEAN_AND_MEAN) +# define CATCH_DEFINES_WIN32_LEAN_AND_MEAN +# endif +#endif + +#include + +namespace Catch{ + + bool isDebuggerActive(); + void writeToDebugConsole( std::string const& text ); +} + +#ifdef CATCH_PLATFORM_MAC + + // The following code snippet based on: + // http://cocoawithlove.com/2008/03/break-into-debugger.html + #if defined(__ppc64__) || defined(__ppc__) + #define CATCH_TRAP() \ + __asm__("li r0, 20\nsc\nnop\nli r0, 37\nli r4, 2\nsc\nnop\n" \ + : : : "memory","r0","r3","r4" ) /* NOLINT */ + #else + #define CATCH_TRAP() __asm__("int $3\n" : : /* NOLINT */ ) + #endif + +#elif defined(CATCH_PLATFORM_LINUX) + // If we can use inline assembler, do it because this allows us to break + // directly at the location of the failing check instead of breaking inside + // raise() called from it, i.e. one stack frame below. + #if defined(__GNUC__) && (defined(__i386) || defined(__x86_64)) + #define CATCH_TRAP() asm volatile ("int $3") /* NOLINT */ + #else // Fall back to the generic way. + #include + + #define CATCH_TRAP() raise(SIGTRAP) + #endif +#elif defined(_MSC_VER) + #define CATCH_TRAP() __debugbreak() +#elif defined(__MINGW32__) + extern "C" __declspec(dllimport) void __stdcall DebugBreak(); + #define CATCH_TRAP() DebugBreak() +#endif + +#ifdef CATCH_TRAP + #define CATCH_BREAK_INTO_DEBUGGER() if( Catch::isDebuggerActive() ) { CATCH_TRAP(); } +#else + #define CATCH_BREAK_INTO_DEBUGGER() Catch::alwaysTrue(); +#endif + +// #included from: catch_interfaces_runner.h +#define TWOBLUECUBES_CATCH_INTERFACES_RUNNER_H_INCLUDED + +namespace Catch { + class TestCase; + + struct IRunner { + virtual ~IRunner(); + virtual bool aborting() const = 0; + }; +} + +#if !defined(CATCH_CONFIG_DISABLE_STRINGIFICATION) +# define CATCH_INTERNAL_STRINGIFY(expr) #expr +#else +# define CATCH_INTERNAL_STRINGIFY(expr) "Disabled by CATCH_CONFIG_DISABLE_STRINGIFICATION" +#endif + +#if defined(CATCH_CONFIG_FAST_COMPILE) +/////////////////////////////////////////////////////////////////////////////// +// We can speedup compilation significantly by breaking into debugger lower in +// the callstack, because then we don't have to expand CATCH_BREAK_INTO_DEBUGGER +// macro in each assertion +#define INTERNAL_CATCH_REACT( resultBuilder ) \ + resultBuilder.react(); + +/////////////////////////////////////////////////////////////////////////////// +// Another way to speed-up compilation is to omit local try-catch for REQUIRE* +// macros. +// This can potentially cause false negative, if the test code catches +// the exception before it propagates back up to the runner. +#define INTERNAL_CATCH_TEST_NO_TRY( macroName, resultDisposition, expr ) \ + do { \ + Catch::ResultBuilder __catchResult( macroName, CATCH_INTERNAL_LINEINFO, CATCH_INTERNAL_STRINGIFY(expr), resultDisposition ); \ + __catchResult.setExceptionGuard(); \ + CATCH_INTERNAL_SUPPRESS_PARENTHESES_WARNINGS \ + ( __catchResult <= expr ).endExpression(); \ + CATCH_INTERNAL_UNSUPPRESS_PARENTHESES_WARNINGS \ + __catchResult.unsetExceptionGuard(); \ + INTERNAL_CATCH_REACT( __catchResult ) \ + } while( Catch::isTrue( false && static_cast( !!(expr) ) ) ) // expr here is never evaluated at runtime but it forces the compiler to give it a look +// The double negation silences MSVC's C4800 warning, the static_cast forces short-circuit evaluation if the type has overloaded &&. + +#define INTERNAL_CHECK_THAT_NO_TRY( macroName, matcher, resultDisposition, arg ) \ + do { \ + Catch::ResultBuilder __catchResult( macroName, CATCH_INTERNAL_LINEINFO, CATCH_INTERNAL_STRINGIFY(arg) ", " CATCH_INTERNAL_STRINGIFY(matcher), resultDisposition ); \ + __catchResult.setExceptionGuard(); \ + __catchResult.captureMatch( arg, matcher, CATCH_INTERNAL_STRINGIFY(matcher) ); \ + __catchResult.unsetExceptionGuard(); \ + INTERNAL_CATCH_REACT( __catchResult ) \ + } while( Catch::alwaysFalse() ) + +#else +/////////////////////////////////////////////////////////////////////////////// +// In the event of a failure works out if the debugger needs to be invoked +// and/or an exception thrown and takes appropriate action. +// This needs to be done as a macro so the debugger will stop in the user +// source code rather than in Catch library code +#define INTERNAL_CATCH_REACT( resultBuilder ) \ + if( resultBuilder.shouldDebugBreak() ) CATCH_BREAK_INTO_DEBUGGER(); \ + resultBuilder.react(); +#endif + +/////////////////////////////////////////////////////////////////////////////// +#define INTERNAL_CATCH_TEST( macroName, resultDisposition, expr ) \ + do { \ + Catch::ResultBuilder __catchResult( macroName, CATCH_INTERNAL_LINEINFO, CATCH_INTERNAL_STRINGIFY(expr), resultDisposition ); \ + try { \ + CATCH_INTERNAL_SUPPRESS_PARENTHESES_WARNINGS \ + ( __catchResult <= expr ).endExpression(); \ + CATCH_INTERNAL_UNSUPPRESS_PARENTHESES_WARNINGS \ + } \ + catch( ... ) { \ + __catchResult.useActiveException( resultDisposition ); \ + } \ + INTERNAL_CATCH_REACT( __catchResult ) \ + } while( Catch::isTrue( false && static_cast( !!(expr) ) ) ) // expr here is never evaluated at runtime but it forces the compiler to give it a look + // The double negation silences MSVC's C4800 warning, the static_cast forces short-circuit evaluation if the type has overloaded &&. + +/////////////////////////////////////////////////////////////////////////////// +#define INTERNAL_CATCH_IF( macroName, resultDisposition, expr ) \ + INTERNAL_CATCH_TEST( macroName, resultDisposition, expr ); \ + if( Catch::getResultCapture().lastAssertionPassed() ) + +/////////////////////////////////////////////////////////////////////////////// +#define INTERNAL_CATCH_ELSE( macroName, resultDisposition, expr ) \ + INTERNAL_CATCH_TEST( macroName, resultDisposition, expr ); \ + if( !Catch::getResultCapture().lastAssertionPassed() ) + +/////////////////////////////////////////////////////////////////////////////// +#define INTERNAL_CATCH_NO_THROW( macroName, resultDisposition, expr ) \ + do { \ + Catch::ResultBuilder __catchResult( macroName, CATCH_INTERNAL_LINEINFO, CATCH_INTERNAL_STRINGIFY(expr), resultDisposition ); \ + try { \ + static_cast(expr); \ + __catchResult.captureResult( Catch::ResultWas::Ok ); \ + } \ + catch( ... ) { \ + __catchResult.useActiveException( resultDisposition ); \ + } \ + INTERNAL_CATCH_REACT( __catchResult ) \ + } while( Catch::alwaysFalse() ) + +/////////////////////////////////////////////////////////////////////////////// +#define INTERNAL_CATCH_THROWS( macroName, resultDisposition, matcher, expr ) \ + do { \ + Catch::ResultBuilder __catchResult( macroName, CATCH_INTERNAL_LINEINFO, CATCH_INTERNAL_STRINGIFY(expr), resultDisposition, CATCH_INTERNAL_STRINGIFY(matcher) ); \ + if( __catchResult.allowThrows() ) \ + try { \ + static_cast(expr); \ + __catchResult.captureResult( Catch::ResultWas::DidntThrowException ); \ + } \ + catch( ... ) { \ + __catchResult.captureExpectedException( matcher ); \ + } \ + else \ + __catchResult.captureResult( Catch::ResultWas::Ok ); \ + INTERNAL_CATCH_REACT( __catchResult ) \ + } while( Catch::alwaysFalse() ) + +/////////////////////////////////////////////////////////////////////////////// +#define INTERNAL_CATCH_THROWS_AS( macroName, exceptionType, resultDisposition, expr ) \ + do { \ + Catch::ResultBuilder __catchResult( macroName, CATCH_INTERNAL_LINEINFO, CATCH_INTERNAL_STRINGIFY(expr) ", " CATCH_INTERNAL_STRINGIFY(exceptionType), resultDisposition ); \ + if( __catchResult.allowThrows() ) \ + try { \ + static_cast(expr); \ + __catchResult.captureResult( Catch::ResultWas::DidntThrowException ); \ + } \ + catch( exceptionType ) { \ + __catchResult.captureResult( Catch::ResultWas::Ok ); \ + } \ + catch( ... ) { \ + __catchResult.useActiveException( resultDisposition ); \ + } \ + else \ + __catchResult.captureResult( Catch::ResultWas::Ok ); \ + INTERNAL_CATCH_REACT( __catchResult ) \ + } while( Catch::alwaysFalse() ) + +/////////////////////////////////////////////////////////////////////////////// +#ifdef CATCH_CONFIG_VARIADIC_MACROS + #define INTERNAL_CATCH_MSG( macroName, messageType, resultDisposition, ... ) \ + do { \ + Catch::ResultBuilder __catchResult( macroName, CATCH_INTERNAL_LINEINFO, "", resultDisposition ); \ + __catchResult << __VA_ARGS__ + ::Catch::StreamEndStop(); \ + __catchResult.captureResult( messageType ); \ + INTERNAL_CATCH_REACT( __catchResult ) \ + } while( Catch::alwaysFalse() ) +#else + #define INTERNAL_CATCH_MSG( macroName, messageType, resultDisposition, log ) \ + do { \ + Catch::ResultBuilder __catchResult( macroName, CATCH_INTERNAL_LINEINFO, "", resultDisposition ); \ + __catchResult << log + ::Catch::StreamEndStop(); \ + __catchResult.captureResult( messageType ); \ + INTERNAL_CATCH_REACT( __catchResult ) \ + } while( Catch::alwaysFalse() ) +#endif + +/////////////////////////////////////////////////////////////////////////////// +#define INTERNAL_CATCH_INFO( macroName, log ) \ + Catch::ScopedMessage INTERNAL_CATCH_UNIQUE_NAME( scopedMessage ) = Catch::MessageBuilder( macroName, CATCH_INTERNAL_LINEINFO, Catch::ResultWas::Info ) << log; + +/////////////////////////////////////////////////////////////////////////////// +#define INTERNAL_CHECK_THAT( macroName, matcher, resultDisposition, arg ) \ + do { \ + Catch::ResultBuilder __catchResult( macroName, CATCH_INTERNAL_LINEINFO, CATCH_INTERNAL_STRINGIFY(arg) ", " CATCH_INTERNAL_STRINGIFY(matcher), resultDisposition ); \ + try { \ + __catchResult.captureMatch( arg, matcher, CATCH_INTERNAL_STRINGIFY(matcher) ); \ + } catch( ... ) { \ + __catchResult.useActiveException( resultDisposition | Catch::ResultDisposition::ContinueOnFailure ); \ + } \ + INTERNAL_CATCH_REACT( __catchResult ) \ + } while( Catch::alwaysFalse() ) + +// #included from: internal/catch_section.h +#define TWOBLUECUBES_CATCH_SECTION_H_INCLUDED + +// #included from: catch_section_info.h +#define TWOBLUECUBES_CATCH_SECTION_INFO_H_INCLUDED + +// #included from: catch_totals.hpp +#define TWOBLUECUBES_CATCH_TOTALS_HPP_INCLUDED + +#include + +namespace Catch { + + struct Counts { + Counts() : passed( 0 ), failed( 0 ), failedButOk( 0 ) {} + + Counts operator - ( Counts const& other ) const { + Counts diff; + diff.passed = passed - other.passed; + diff.failed = failed - other.failed; + diff.failedButOk = failedButOk - other.failedButOk; + return diff; + } + Counts& operator += ( Counts const& other ) { + passed += other.passed; + failed += other.failed; + failedButOk += other.failedButOk; + return *this; + } + + std::size_t total() const { + return passed + failed + failedButOk; + } + bool allPassed() const { + return failed == 0 && failedButOk == 0; + } + bool allOk() const { + return failed == 0; + } + + std::size_t passed; + std::size_t failed; + std::size_t failedButOk; + }; + + struct Totals { + + Totals operator - ( Totals const& other ) const { + Totals diff; + diff.assertions = assertions - other.assertions; + diff.testCases = testCases - other.testCases; + return diff; + } + + Totals delta( Totals const& prevTotals ) const { + Totals diff = *this - prevTotals; + if( diff.assertions.failed > 0 ) + ++diff.testCases.failed; + else if( diff.assertions.failedButOk > 0 ) + ++diff.testCases.failedButOk; + else + ++diff.testCases.passed; + return diff; + } + + Totals& operator += ( Totals const& other ) { + assertions += other.assertions; + testCases += other.testCases; + return *this; + } + + Counts assertions; + Counts testCases; + }; +} + +#include + +namespace Catch { + + struct SectionInfo { + SectionInfo + ( SourceLineInfo const& _lineInfo, + std::string const& _name, + std::string const& _description = std::string() ); + + std::string name; + std::string description; + SourceLineInfo lineInfo; + }; + + struct SectionEndInfo { + SectionEndInfo( SectionInfo const& _sectionInfo, Counts const& _prevAssertions, double _durationInSeconds ) + : sectionInfo( _sectionInfo ), prevAssertions( _prevAssertions ), durationInSeconds( _durationInSeconds ) + {} + + SectionInfo sectionInfo; + Counts prevAssertions; + double durationInSeconds; + }; + +} // end namespace Catch + +// #included from: catch_timer.h +#define TWOBLUECUBES_CATCH_TIMER_H_INCLUDED + +#ifdef _MSC_VER + +namespace Catch { + typedef unsigned long long UInt64; +} +#else +#include +namespace Catch { + typedef uint64_t UInt64; +} +#endif + +namespace Catch { + class Timer { + public: + Timer() : m_ticks( 0 ) {} + void start(); + unsigned int getElapsedMicroseconds() const; + unsigned int getElapsedMilliseconds() const; + double getElapsedSeconds() const; + + private: + UInt64 m_ticks; + }; + +} // namespace Catch + +#include + +namespace Catch { + + class Section : NonCopyable { + public: + Section( SectionInfo const& info ); + ~Section(); + + // This indicates whether the section should be executed or not + operator bool() const; + + private: + SectionInfo m_info; + + std::string m_name; + Counts m_assertions; + bool m_sectionIncluded; + Timer m_timer; + }; + +} // end namespace Catch + +#ifdef CATCH_CONFIG_VARIADIC_MACROS + #define INTERNAL_CATCH_SECTION( ... ) \ + if( Catch::Section const& INTERNAL_CATCH_UNIQUE_NAME( catch_internal_Section ) = Catch::SectionInfo( CATCH_INTERNAL_LINEINFO, __VA_ARGS__ ) ) +#else + #define INTERNAL_CATCH_SECTION( name, desc ) \ + if( Catch::Section const& INTERNAL_CATCH_UNIQUE_NAME( catch_internal_Section ) = Catch::SectionInfo( CATCH_INTERNAL_LINEINFO, name, desc ) ) +#endif + +// #included from: internal/catch_generators.hpp +#define TWOBLUECUBES_CATCH_GENERATORS_HPP_INCLUDED + +#include +#include +#include + +namespace Catch { + +template +struct IGenerator { + virtual ~IGenerator() {} + virtual T getValue( std::size_t index ) const = 0; + virtual std::size_t size () const = 0; +}; + +template +class BetweenGenerator : public IGenerator { +public: + BetweenGenerator( T from, T to ) : m_from( from ), m_to( to ){} + + virtual T getValue( std::size_t index ) const { + return m_from+static_cast( index ); + } + + virtual std::size_t size() const { + return static_cast( 1+m_to-m_from ); + } + +private: + + T m_from; + T m_to; +}; + +template +class ValuesGenerator : public IGenerator { +public: + ValuesGenerator(){} + + void add( T value ) { + m_values.push_back( value ); + } + + virtual T getValue( std::size_t index ) const { + return m_values[index]; + } + + virtual std::size_t size() const { + return m_values.size(); + } + +private: + std::vector m_values; +}; + +template +class CompositeGenerator { +public: + CompositeGenerator() : m_totalSize( 0 ) {} + + // *** Move semantics, similar to auto_ptr *** + CompositeGenerator( CompositeGenerator& other ) + : m_fileInfo( other.m_fileInfo ), + m_totalSize( 0 ) + { + move( other ); + } + + CompositeGenerator& setFileInfo( const char* fileInfo ) { + m_fileInfo = fileInfo; + return *this; + } + + ~CompositeGenerator() { + deleteAll( m_composed ); + } + + operator T () const { + size_t overallIndex = getCurrentContext().getGeneratorIndex( m_fileInfo, m_totalSize ); + + typename std::vector*>::const_iterator it = m_composed.begin(); + typename std::vector*>::const_iterator itEnd = m_composed.end(); + for( size_t index = 0; it != itEnd; ++it ) + { + const IGenerator* generator = *it; + if( overallIndex >= index && overallIndex < index + generator->size() ) + { + return generator->getValue( overallIndex-index ); + } + index += generator->size(); + } + CATCH_INTERNAL_ERROR( "Indexed past end of generated range" ); + return T(); // Suppress spurious "not all control paths return a value" warning in Visual Studio - if you know how to fix this please do so + } + + void add( const IGenerator* generator ) { + m_totalSize += generator->size(); + m_composed.push_back( generator ); + } + + CompositeGenerator& then( CompositeGenerator& other ) { + move( other ); + return *this; + } + + CompositeGenerator& then( T value ) { + ValuesGenerator* valuesGen = new ValuesGenerator(); + valuesGen->add( value ); + add( valuesGen ); + return *this; + } + +private: + + void move( CompositeGenerator& other ) { + m_composed.insert( m_composed.end(), other.m_composed.begin(), other.m_composed.end() ); + m_totalSize += other.m_totalSize; + other.m_composed.clear(); + } + + std::vector*> m_composed; + std::string m_fileInfo; + size_t m_totalSize; +}; + +namespace Generators +{ + template + CompositeGenerator between( T from, T to ) { + CompositeGenerator generators; + generators.add( new BetweenGenerator( from, to ) ); + return generators; + } + + template + CompositeGenerator values( T val1, T val2 ) { + CompositeGenerator generators; + ValuesGenerator* valuesGen = new ValuesGenerator(); + valuesGen->add( val1 ); + valuesGen->add( val2 ); + generators.add( valuesGen ); + return generators; + } + + template + CompositeGenerator values( T val1, T val2, T val3 ){ + CompositeGenerator generators; + ValuesGenerator* valuesGen = new ValuesGenerator(); + valuesGen->add( val1 ); + valuesGen->add( val2 ); + valuesGen->add( val3 ); + generators.add( valuesGen ); + return generators; + } + + template + CompositeGenerator values( T val1, T val2, T val3, T val4 ) { + CompositeGenerator generators; + ValuesGenerator* valuesGen = new ValuesGenerator(); + valuesGen->add( val1 ); + valuesGen->add( val2 ); + valuesGen->add( val3 ); + valuesGen->add( val4 ); + generators.add( valuesGen ); + return generators; + } + +} // end namespace Generators + +using namespace Generators; + +} // end namespace Catch + +#define INTERNAL_CATCH_LINESTR2( line ) #line +#define INTERNAL_CATCH_LINESTR( line ) INTERNAL_CATCH_LINESTR2( line ) + +#define INTERNAL_CATCH_GENERATE( expr ) expr.setFileInfo( __FILE__ "(" INTERNAL_CATCH_LINESTR( __LINE__ ) ")" ) + +// #included from: internal/catch_interfaces_exception.h +#define TWOBLUECUBES_CATCH_INTERFACES_EXCEPTION_H_INCLUDED + +#include +#include + +// #included from: catch_interfaces_registry_hub.h +#define TWOBLUECUBES_CATCH_INTERFACES_REGISTRY_HUB_H_INCLUDED + +#include + +namespace Catch { + + class TestCase; + struct ITestCaseRegistry; + struct IExceptionTranslatorRegistry; + struct IExceptionTranslator; + struct IReporterRegistry; + struct IReporterFactory; + struct ITagAliasRegistry; + + struct IRegistryHub { + virtual ~IRegistryHub(); + + virtual IReporterRegistry const& getReporterRegistry() const = 0; + virtual ITestCaseRegistry const& getTestCaseRegistry() const = 0; + virtual ITagAliasRegistry const& getTagAliasRegistry() const = 0; + + virtual IExceptionTranslatorRegistry& getExceptionTranslatorRegistry() = 0; + }; + + struct IMutableRegistryHub { + virtual ~IMutableRegistryHub(); + virtual void registerReporter( std::string const& name, Ptr const& factory ) = 0; + virtual void registerListener( Ptr const& factory ) = 0; + virtual void registerTest( TestCase const& testInfo ) = 0; + virtual void registerTranslator( const IExceptionTranslator* translator ) = 0; + virtual void registerTagAlias( std::string const& alias, std::string const& tag, SourceLineInfo const& lineInfo ) = 0; + }; + + IRegistryHub& getRegistryHub(); + IMutableRegistryHub& getMutableRegistryHub(); + void cleanUp(); + std::string translateActiveException(); + +} + +namespace Catch { + + typedef std::string(*exceptionTranslateFunction)(); + + struct IExceptionTranslator; + typedef std::vector ExceptionTranslators; + + struct IExceptionTranslator { + virtual ~IExceptionTranslator(); + virtual std::string translate( ExceptionTranslators::const_iterator it, ExceptionTranslators::const_iterator itEnd ) const = 0; + }; + + struct IExceptionTranslatorRegistry { + virtual ~IExceptionTranslatorRegistry(); + + virtual std::string translateActiveException() const = 0; + }; + + class ExceptionTranslatorRegistrar { + template + class ExceptionTranslator : public IExceptionTranslator { + public: + + ExceptionTranslator( std::string(*translateFunction)( T& ) ) + : m_translateFunction( translateFunction ) + {} + + virtual std::string translate( ExceptionTranslators::const_iterator it, ExceptionTranslators::const_iterator itEnd ) const CATCH_OVERRIDE { + try { + if( it == itEnd ) + throw; + else + return (*it)->translate( it+1, itEnd ); + } + catch( T& ex ) { + return m_translateFunction( ex ); + } + } + + protected: + std::string(*m_translateFunction)( T& ); + }; + + public: + template + ExceptionTranslatorRegistrar( std::string(*translateFunction)( T& ) ) { + getMutableRegistryHub().registerTranslator + ( new ExceptionTranslator( translateFunction ) ); + } + }; +} + +/////////////////////////////////////////////////////////////////////////////// +#define INTERNAL_CATCH_TRANSLATE_EXCEPTION2( translatorName, signature ) \ + static std::string translatorName( signature ); \ + namespace{ Catch::ExceptionTranslatorRegistrar INTERNAL_CATCH_UNIQUE_NAME( catch_internal_ExceptionRegistrar )( &translatorName ); }\ + static std::string translatorName( signature ) + +#define INTERNAL_CATCH_TRANSLATE_EXCEPTION( signature ) INTERNAL_CATCH_TRANSLATE_EXCEPTION2( INTERNAL_CATCH_UNIQUE_NAME( catch_internal_ExceptionTranslator ), signature ) + +// #included from: internal/catch_approx.hpp +#define TWOBLUECUBES_CATCH_APPROX_HPP_INCLUDED + +#include +#include + +#if defined(CATCH_CONFIG_CPP11_TYPE_TRAITS) +#include +#endif + +namespace Catch { +namespace Detail { + + class Approx { + public: + explicit Approx ( double value ) + : m_epsilon( std::numeric_limits::epsilon()*100 ), + m_margin( 0.0 ), + m_scale( 1.0 ), + m_value( value ) + {} + + static Approx custom() { + return Approx( 0 ); + } + +#if defined(CATCH_CONFIG_CPP11_TYPE_TRAITS) + + template ::value>::type> + Approx operator()( T value ) { + Approx approx( static_cast(value) ); + approx.epsilon( m_epsilon ); + approx.margin( m_margin ); + approx.scale( m_scale ); + return approx; + } + + template ::value>::type> + explicit Approx( T value ): Approx(static_cast(value)) + {} + + template ::value>::type> + friend bool operator == ( const T& lhs, Approx const& rhs ) { + // Thanks to Richard Harris for his help refining this formula + auto lhs_v = double(lhs); + bool relativeOK = std::fabs(lhs_v - rhs.m_value) < rhs.m_epsilon * (rhs.m_scale + (std::max)(std::fabs(lhs_v), std::fabs(rhs.m_value))); + if (relativeOK) { + return true; + } + + return std::fabs(lhs_v - rhs.m_value) <= rhs.m_margin; + } + + template ::value>::type> + friend bool operator == ( Approx const& lhs, const T& rhs ) { + return operator==( rhs, lhs ); + } + + template ::value>::type> + friend bool operator != ( T lhs, Approx const& rhs ) { + return !operator==( lhs, rhs ); + } + + template ::value>::type> + friend bool operator != ( Approx const& lhs, T rhs ) { + return !operator==( rhs, lhs ); + } + + template ::value>::type> + friend bool operator <= ( T lhs, Approx const& rhs ) { + return double(lhs) < rhs.m_value || lhs == rhs; + } + + template ::value>::type> + friend bool operator <= ( Approx const& lhs, T rhs ) { + return lhs.m_value < double(rhs) || lhs == rhs; + } + + template ::value>::type> + friend bool operator >= ( T lhs, Approx const& rhs ) { + return double(lhs) > rhs.m_value || lhs == rhs; + } + + template ::value>::type> + friend bool operator >= ( Approx const& lhs, T rhs ) { + return lhs.m_value > double(rhs) || lhs == rhs; + } + + template ::value>::type> + Approx& epsilon( T newEpsilon ) { + m_epsilon = double(newEpsilon); + return *this; + } + + template ::value>::type> + Approx& margin( T newMargin ) { + m_margin = double(newMargin); + return *this; + } + + template ::value>::type> + Approx& scale( T newScale ) { + m_scale = double(newScale); + return *this; + } + +#else + + Approx operator()( double value ) { + Approx approx( value ); + approx.epsilon( m_epsilon ); + approx.margin( m_margin ); + approx.scale( m_scale ); + return approx; + } + + friend bool operator == ( double lhs, Approx const& rhs ) { + // Thanks to Richard Harris for his help refining this formula + bool relativeOK = std::fabs( lhs - rhs.m_value ) < rhs.m_epsilon * (rhs.m_scale + (std::max)( std::fabs(lhs), std::fabs(rhs.m_value) ) ); + if (relativeOK) { + return true; + } + return std::fabs(lhs - rhs.m_value) <= rhs.m_margin; + } + + friend bool operator == ( Approx const& lhs, double rhs ) { + return operator==( rhs, lhs ); + } + + friend bool operator != ( double lhs, Approx const& rhs ) { + return !operator==( lhs, rhs ); + } + + friend bool operator != ( Approx const& lhs, double rhs ) { + return !operator==( rhs, lhs ); + } + + friend bool operator <= ( double lhs, Approx const& rhs ) { + return lhs < rhs.m_value || lhs == rhs; + } + + friend bool operator <= ( Approx const& lhs, double rhs ) { + return lhs.m_value < rhs || lhs == rhs; + } + + friend bool operator >= ( double lhs, Approx const& rhs ) { + return lhs > rhs.m_value || lhs == rhs; + } + + friend bool operator >= ( Approx const& lhs, double rhs ) { + return lhs.m_value > rhs || lhs == rhs; + } + + Approx& epsilon( double newEpsilon ) { + m_epsilon = newEpsilon; + return *this; + } + + Approx& margin( double newMargin ) { + m_margin = newMargin; + return *this; + } + + Approx& scale( double newScale ) { + m_scale = newScale; + return *this; + } +#endif + + std::string toString() const { + std::ostringstream oss; + oss << "Approx( " << Catch::toString( m_value ) << " )"; + return oss.str(); + } + + private: + double m_epsilon; + double m_margin; + double m_scale; + double m_value; + }; +} + +template<> +inline std::string toString( Detail::Approx const& value ) { + return value.toString(); +} + +} // end namespace Catch + +// #included from: internal/catch_matchers_string.h +#define TWOBLUECUBES_CATCH_MATCHERS_STRING_H_INCLUDED + +namespace Catch { +namespace Matchers { + + namespace StdString { + + struct CasedString + { + CasedString( std::string const& str, CaseSensitive::Choice caseSensitivity ); + std::string adjustString( std::string const& str ) const; + std::string caseSensitivitySuffix() const; + + CaseSensitive::Choice m_caseSensitivity; + std::string m_str; + }; + + struct StringMatcherBase : MatcherBase { + StringMatcherBase( std::string const& operation, CasedString const& comparator ); + virtual std::string describe() const CATCH_OVERRIDE; + + CasedString m_comparator; + std::string m_operation; + }; + + struct EqualsMatcher : StringMatcherBase { + EqualsMatcher( CasedString const& comparator ); + virtual bool match( std::string const& source ) const CATCH_OVERRIDE; + }; + struct ContainsMatcher : StringMatcherBase { + ContainsMatcher( CasedString const& comparator ); + virtual bool match( std::string const& source ) const CATCH_OVERRIDE; + }; + struct StartsWithMatcher : StringMatcherBase { + StartsWithMatcher( CasedString const& comparator ); + virtual bool match( std::string const& source ) const CATCH_OVERRIDE; + }; + struct EndsWithMatcher : StringMatcherBase { + EndsWithMatcher( CasedString const& comparator ); + virtual bool match( std::string const& source ) const CATCH_OVERRIDE; + }; + + } // namespace StdString + + // The following functions create the actual matcher objects. + // This allows the types to be inferred + + StdString::EqualsMatcher Equals( std::string const& str, CaseSensitive::Choice caseSensitivity = CaseSensitive::Yes ); + StdString::ContainsMatcher Contains( std::string const& str, CaseSensitive::Choice caseSensitivity = CaseSensitive::Yes ); + StdString::EndsWithMatcher EndsWith( std::string const& str, CaseSensitive::Choice caseSensitivity = CaseSensitive::Yes ); + StdString::StartsWithMatcher StartsWith( std::string const& str, CaseSensitive::Choice caseSensitivity = CaseSensitive::Yes ); + +} // namespace Matchers +} // namespace Catch + +// #included from: internal/catch_matchers_vector.h +#define TWOBLUECUBES_CATCH_MATCHERS_VECTOR_H_INCLUDED + +namespace Catch { +namespace Matchers { + + namespace Vector { + + template + struct ContainsElementMatcher : MatcherBase, T> { + + ContainsElementMatcher(T const &comparator) : m_comparator( comparator) {} + + bool match(std::vector const &v) const CATCH_OVERRIDE { + return std::find(v.begin(), v.end(), m_comparator) != v.end(); + } + + virtual std::string describe() const CATCH_OVERRIDE { + return "Contains: " + Catch::toString( m_comparator ); + } + + T const& m_comparator; + }; + + template + struct ContainsMatcher : MatcherBase, std::vector > { + + ContainsMatcher(std::vector const &comparator) : m_comparator( comparator ) {} + + bool match(std::vector const &v) const CATCH_OVERRIDE { + // !TBD: see note in EqualsMatcher + if (m_comparator.size() > v.size()) + return false; + for (size_t i = 0; i < m_comparator.size(); ++i) + if (std::find(v.begin(), v.end(), m_comparator[i]) == v.end()) + return false; + return true; + } + virtual std::string describe() const CATCH_OVERRIDE { + return "Contains: " + Catch::toString( m_comparator ); + } + + std::vector const& m_comparator; + }; + + template + struct EqualsMatcher : MatcherBase, std::vector > { + + EqualsMatcher(std::vector const &comparator) : m_comparator( comparator ) {} + + bool match(std::vector const &v) const CATCH_OVERRIDE { + // !TBD: This currently works if all elements can be compared using != + // - a more general approach would be via a compare template that defaults + // to using !=. but could be specialised for, e.g. std::vector etc + // - then just call that directly + if (m_comparator.size() != v.size()) + return false; + for (size_t i = 0; i < v.size(); ++i) + if (m_comparator[i] != v[i]) + return false; + return true; + } + virtual std::string describe() const CATCH_OVERRIDE { + return "Equals: " + Catch::toString( m_comparator ); + } + std::vector const& m_comparator; + }; + + } // namespace Vector + + // The following functions create the actual matcher objects. + // This allows the types to be inferred + + template + Vector::ContainsMatcher Contains( std::vector const& comparator ) { + return Vector::ContainsMatcher( comparator ); + } + + template + Vector::ContainsElementMatcher VectorContains( T const& comparator ) { + return Vector::ContainsElementMatcher( comparator ); + } + + template + Vector::EqualsMatcher Equals( std::vector const& comparator ) { + return Vector::EqualsMatcher( comparator ); + } + +} // namespace Matchers +} // namespace Catch + +// #included from: internal/catch_interfaces_tag_alias_registry.h +#define TWOBLUECUBES_CATCH_INTERFACES_TAG_ALIAS_REGISTRY_H_INCLUDED + +// #included from: catch_tag_alias.h +#define TWOBLUECUBES_CATCH_TAG_ALIAS_H_INCLUDED + +#include + +namespace Catch { + + struct TagAlias { + TagAlias( std::string const& _tag, SourceLineInfo _lineInfo ) : tag( _tag ), lineInfo( _lineInfo ) {} + + std::string tag; + SourceLineInfo lineInfo; + }; + + struct RegistrarForTagAliases { + RegistrarForTagAliases( char const* alias, char const* tag, SourceLineInfo const& lineInfo ); + }; + +} // end namespace Catch + +#define CATCH_REGISTER_TAG_ALIAS( alias, spec ) namespace{ Catch::RegistrarForTagAliases INTERNAL_CATCH_UNIQUE_NAME( AutoRegisterTagAlias )( alias, spec, CATCH_INTERNAL_LINEINFO ); } +// #included from: catch_option.hpp +#define TWOBLUECUBES_CATCH_OPTION_HPP_INCLUDED + +namespace Catch { + + // An optional type + template + class Option { + public: + Option() : nullableValue( CATCH_NULL ) {} + Option( T const& _value ) + : nullableValue( new( storage ) T( _value ) ) + {} + Option( Option const& _other ) + : nullableValue( _other ? new( storage ) T( *_other ) : CATCH_NULL ) + {} + + ~Option() { + reset(); + } + + Option& operator= ( Option const& _other ) { + if( &_other != this ) { + reset(); + if( _other ) + nullableValue = new( storage ) T( *_other ); + } + return *this; + } + Option& operator = ( T const& _value ) { + reset(); + nullableValue = new( storage ) T( _value ); + return *this; + } + + void reset() { + if( nullableValue ) + nullableValue->~T(); + nullableValue = CATCH_NULL; + } + + T& operator*() { return *nullableValue; } + T const& operator*() const { return *nullableValue; } + T* operator->() { return nullableValue; } + const T* operator->() const { return nullableValue; } + + T valueOr( T const& defaultValue ) const { + return nullableValue ? *nullableValue : defaultValue; + } + + bool some() const { return nullableValue != CATCH_NULL; } + bool none() const { return nullableValue == CATCH_NULL; } + + bool operator !() const { return nullableValue == CATCH_NULL; } + operator SafeBool::type() const { + return SafeBool::makeSafe( some() ); + } + + private: + T *nullableValue; + union { + char storage[sizeof(T)]; + + // These are here to force alignment for the storage + long double dummy1; + void (*dummy2)(); + long double dummy3; +#ifdef CATCH_CONFIG_CPP11_LONG_LONG + long long dummy4; +#endif + }; + }; + +} // end namespace Catch + +namespace Catch { + + struct ITagAliasRegistry { + virtual ~ITagAliasRegistry(); + virtual Option find( std::string const& alias ) const = 0; + virtual std::string expandAliases( std::string const& unexpandedTestSpec ) const = 0; + + static ITagAliasRegistry const& get(); + }; + +} // end namespace Catch + +// These files are included here so the single_include script doesn't put them +// in the conditionally compiled sections +// #included from: internal/catch_test_case_info.h +#define TWOBLUECUBES_CATCH_TEST_CASE_INFO_H_INCLUDED + +#include +#include + +#ifdef __clang__ +#pragma clang diagnostic push +#pragma clang diagnostic ignored "-Wpadded" +#endif + +namespace Catch { + + struct ITestCase; + + struct TestCaseInfo { + enum SpecialProperties{ + None = 0, + IsHidden = 1 << 1, + ShouldFail = 1 << 2, + MayFail = 1 << 3, + Throws = 1 << 4, + NonPortable = 1 << 5 + }; + + TestCaseInfo( std::string const& _name, + std::string const& _className, + std::string const& _description, + std::set const& _tags, + SourceLineInfo const& _lineInfo ); + + TestCaseInfo( TestCaseInfo const& other ); + + friend void setTags( TestCaseInfo& testCaseInfo, std::set const& tags ); + + bool isHidden() const; + bool throws() const; + bool okToFail() const; + bool expectedToFail() const; + + std::string name; + std::string className; + std::string description; + std::set tags; + std::set lcaseTags; + std::string tagsAsString; + SourceLineInfo lineInfo; + SpecialProperties properties; + }; + + class TestCase : public TestCaseInfo { + public: + + TestCase( ITestCase* testCase, TestCaseInfo const& info ); + TestCase( TestCase const& other ); + + TestCase withName( std::string const& _newName ) const; + + void invoke() const; + + TestCaseInfo const& getTestCaseInfo() const; + + void swap( TestCase& other ); + bool operator == ( TestCase const& other ) const; + bool operator < ( TestCase const& other ) const; + TestCase& operator = ( TestCase const& other ); + + private: + Ptr test; + }; + + TestCase makeTestCase( ITestCase* testCase, + std::string const& className, + std::string const& name, + std::string const& description, + SourceLineInfo const& lineInfo ); +} + +#ifdef __clang__ +#pragma clang diagnostic pop +#endif + + +#ifdef __OBJC__ +// #included from: internal/catch_objc.hpp +#define TWOBLUECUBES_CATCH_OBJC_HPP_INCLUDED + +#import + +#include + +// NB. Any general catch headers included here must be included +// in catch.hpp first to make sure they are included by the single +// header for non obj-usage + +/////////////////////////////////////////////////////////////////////////////// +// This protocol is really only here for (self) documenting purposes, since +// all its methods are optional. +@protocol OcFixture + +@optional + +-(void) setUp; +-(void) tearDown; + +@end + +namespace Catch { + + class OcMethod : public SharedImpl { + + public: + OcMethod( Class cls, SEL sel ) : m_cls( cls ), m_sel( sel ) {} + + virtual void invoke() const { + id obj = [[m_cls alloc] init]; + + performOptionalSelector( obj, @selector(setUp) ); + performOptionalSelector( obj, m_sel ); + performOptionalSelector( obj, @selector(tearDown) ); + + arcSafeRelease( obj ); + } + private: + virtual ~OcMethod() {} + + Class m_cls; + SEL m_sel; + }; + + namespace Detail{ + + inline std::string getAnnotation( Class cls, + std::string const& annotationName, + std::string const& testCaseName ) { + NSString* selStr = [[NSString alloc] initWithFormat:@"Catch_%s_%s", annotationName.c_str(), testCaseName.c_str()]; + SEL sel = NSSelectorFromString( selStr ); + arcSafeRelease( selStr ); + id value = performOptionalSelector( cls, sel ); + if( value ) + return [(NSString*)value UTF8String]; + return ""; + } + } + + inline size_t registerTestMethods() { + size_t noTestMethods = 0; + int noClasses = objc_getClassList( CATCH_NULL, 0 ); + + Class* classes = (CATCH_UNSAFE_UNRETAINED Class *)malloc( sizeof(Class) * noClasses); + objc_getClassList( classes, noClasses ); + + for( int c = 0; c < noClasses; c++ ) { + Class cls = classes[c]; + { + u_int count; + Method* methods = class_copyMethodList( cls, &count ); + for( u_int m = 0; m < count ; m++ ) { + SEL selector = method_getName(methods[m]); + std::string methodName = sel_getName(selector); + if( startsWith( methodName, "Catch_TestCase_" ) ) { + std::string testCaseName = methodName.substr( 15 ); + std::string name = Detail::getAnnotation( cls, "Name", testCaseName ); + std::string desc = Detail::getAnnotation( cls, "Description", testCaseName ); + const char* className = class_getName( cls ); + + getMutableRegistryHub().registerTest( makeTestCase( new OcMethod( cls, selector ), className, name.c_str(), desc.c_str(), SourceLineInfo() ) ); + noTestMethods++; + } + } + free(methods); + } + } + return noTestMethods; + } + + namespace Matchers { + namespace Impl { + namespace NSStringMatchers { + + struct StringHolder : MatcherBase{ + StringHolder( NSString* substr ) : m_substr( [substr copy] ){} + StringHolder( StringHolder const& other ) : m_substr( [other.m_substr copy] ){} + StringHolder() { + arcSafeRelease( m_substr ); + } + + virtual bool match( NSString* arg ) const CATCH_OVERRIDE { + return false; + } + + NSString* m_substr; + }; + + struct Equals : StringHolder { + Equals( NSString* substr ) : StringHolder( substr ){} + + virtual bool match( NSString* str ) const CATCH_OVERRIDE { + return (str != nil || m_substr == nil ) && + [str isEqualToString:m_substr]; + } + + virtual std::string describe() const CATCH_OVERRIDE { + return "equals string: " + Catch::toString( m_substr ); + } + }; + + struct Contains : StringHolder { + Contains( NSString* substr ) : StringHolder( substr ){} + + virtual bool match( NSString* str ) const { + return (str != nil || m_substr == nil ) && + [str rangeOfString:m_substr].location != NSNotFound; + } + + virtual std::string describe() const CATCH_OVERRIDE { + return "contains string: " + Catch::toString( m_substr ); + } + }; + + struct StartsWith : StringHolder { + StartsWith( NSString* substr ) : StringHolder( substr ){} + + virtual bool match( NSString* str ) const { + return (str != nil || m_substr == nil ) && + [str rangeOfString:m_substr].location == 0; + } + + virtual std::string describe() const CATCH_OVERRIDE { + return "starts with: " + Catch::toString( m_substr ); + } + }; + struct EndsWith : StringHolder { + EndsWith( NSString* substr ) : StringHolder( substr ){} + + virtual bool match( NSString* str ) const { + return (str != nil || m_substr == nil ) && + [str rangeOfString:m_substr].location == [str length] - [m_substr length]; + } + + virtual std::string describe() const CATCH_OVERRIDE { + return "ends with: " + Catch::toString( m_substr ); + } + }; + + } // namespace NSStringMatchers + } // namespace Impl + + inline Impl::NSStringMatchers::Equals + Equals( NSString* substr ){ return Impl::NSStringMatchers::Equals( substr ); } + + inline Impl::NSStringMatchers::Contains + Contains( NSString* substr ){ return Impl::NSStringMatchers::Contains( substr ); } + + inline Impl::NSStringMatchers::StartsWith + StartsWith( NSString* substr ){ return Impl::NSStringMatchers::StartsWith( substr ); } + + inline Impl::NSStringMatchers::EndsWith + EndsWith( NSString* substr ){ return Impl::NSStringMatchers::EndsWith( substr ); } + + } // namespace Matchers + + using namespace Matchers; + +} // namespace Catch + +/////////////////////////////////////////////////////////////////////////////// +#define OC_TEST_CASE( name, desc )\ ++(NSString*) INTERNAL_CATCH_UNIQUE_NAME( Catch_Name_test ) \ +{\ +return @ name; \ +}\ ++(NSString*) INTERNAL_CATCH_UNIQUE_NAME( Catch_Description_test ) \ +{ \ +return @ desc; \ +} \ +-(void) INTERNAL_CATCH_UNIQUE_NAME( Catch_TestCase_test ) + +#endif + +#ifdef CATCH_IMPL + +// !TBD: Move the leak detector code into a separate header +#ifdef CATCH_CONFIG_WINDOWS_CRTDBG +#include +class LeakDetector { +public: + LeakDetector() { + int flag = _CrtSetDbgFlag(_CRTDBG_REPORT_FLAG); + flag |= _CRTDBG_LEAK_CHECK_DF; + flag |= _CRTDBG_ALLOC_MEM_DF; + _CrtSetDbgFlag(flag); + _CrtSetReportMode(_CRT_WARN, _CRTDBG_MODE_FILE | _CRTDBG_MODE_DEBUG); + _CrtSetReportFile(_CRT_WARN, _CRTDBG_FILE_STDERR); + // Change this to leaking allocation's number to break there + _CrtSetBreakAlloc(-1); + } +}; +#else +class LeakDetector {}; +#endif + +LeakDetector leakDetector; + +// #included from: internal/catch_impl.hpp +#define TWOBLUECUBES_CATCH_IMPL_HPP_INCLUDED + +// Collect all the implementation files together here +// These are the equivalent of what would usually be cpp files + +#ifdef __clang__ +#pragma clang diagnostic push +#pragma clang diagnostic ignored "-Wweak-vtables" +#endif + +// #included from: ../catch_session.hpp +#define TWOBLUECUBES_CATCH_RUNNER_HPP_INCLUDED + +// #included from: internal/catch_commandline.hpp +#define TWOBLUECUBES_CATCH_COMMANDLINE_HPP_INCLUDED + +// #included from: catch_config.hpp +#define TWOBLUECUBES_CATCH_CONFIG_HPP_INCLUDED + +// #included from: catch_test_spec_parser.hpp +#define TWOBLUECUBES_CATCH_TEST_SPEC_PARSER_HPP_INCLUDED + +#ifdef __clang__ +#pragma clang diagnostic push +#pragma clang diagnostic ignored "-Wpadded" +#endif + +// #included from: catch_test_spec.hpp +#define TWOBLUECUBES_CATCH_TEST_SPEC_HPP_INCLUDED + +#ifdef __clang__ +#pragma clang diagnostic push +#pragma clang diagnostic ignored "-Wpadded" +#endif + +// #included from: catch_wildcard_pattern.hpp +#define TWOBLUECUBES_CATCH_WILDCARD_PATTERN_HPP_INCLUDED + +#include + +namespace Catch +{ + class WildcardPattern { + enum WildcardPosition { + NoWildcard = 0, + WildcardAtStart = 1, + WildcardAtEnd = 2, + WildcardAtBothEnds = WildcardAtStart | WildcardAtEnd + }; + + public: + + WildcardPattern( std::string const& pattern, CaseSensitive::Choice caseSensitivity ) + : m_caseSensitivity( caseSensitivity ), + m_wildcard( NoWildcard ), + m_pattern( adjustCase( pattern ) ) + { + if( startsWith( m_pattern, '*' ) ) { + m_pattern = m_pattern.substr( 1 ); + m_wildcard = WildcardAtStart; + } + if( endsWith( m_pattern, '*' ) ) { + m_pattern = m_pattern.substr( 0, m_pattern.size()-1 ); + m_wildcard = static_cast( m_wildcard | WildcardAtEnd ); + } + } + virtual ~WildcardPattern(); + virtual bool matches( std::string const& str ) const { + switch( m_wildcard ) { + case NoWildcard: + return m_pattern == adjustCase( str ); + case WildcardAtStart: + return endsWith( adjustCase( str ), m_pattern ); + case WildcardAtEnd: + return startsWith( adjustCase( str ), m_pattern ); + case WildcardAtBothEnds: + return contains( adjustCase( str ), m_pattern ); + } + +#ifdef __clang__ +#pragma clang diagnostic push +#pragma clang diagnostic ignored "-Wunreachable-code" +#endif + throw std::logic_error( "Unknown enum" ); +#ifdef __clang__ +#pragma clang diagnostic pop +#endif + } + private: + std::string adjustCase( std::string const& str ) const { + return m_caseSensitivity == CaseSensitive::No ? toLower( str ) : str; + } + CaseSensitive::Choice m_caseSensitivity; + WildcardPosition m_wildcard; + std::string m_pattern; + }; +} + +#include +#include + +namespace Catch { + + class TestSpec { + struct Pattern : SharedImpl<> { + virtual ~Pattern(); + virtual bool matches( TestCaseInfo const& testCase ) const = 0; + }; + class NamePattern : public Pattern { + public: + NamePattern( std::string const& name ) + : m_wildcardPattern( toLower( name ), CaseSensitive::No ) + {} + virtual ~NamePattern(); + virtual bool matches( TestCaseInfo const& testCase ) const { + return m_wildcardPattern.matches( toLower( testCase.name ) ); + } + private: + WildcardPattern m_wildcardPattern; + }; + + class TagPattern : public Pattern { + public: + TagPattern( std::string const& tag ) : m_tag( toLower( tag ) ) {} + virtual ~TagPattern(); + virtual bool matches( TestCaseInfo const& testCase ) const { + return testCase.lcaseTags.find( m_tag ) != testCase.lcaseTags.end(); + } + private: + std::string m_tag; + }; + + class ExcludedPattern : public Pattern { + public: + ExcludedPattern( Ptr const& underlyingPattern ) : m_underlyingPattern( underlyingPattern ) {} + virtual ~ExcludedPattern(); + virtual bool matches( TestCaseInfo const& testCase ) const { return !m_underlyingPattern->matches( testCase ); } + private: + Ptr m_underlyingPattern; + }; + + struct Filter { + std::vector > m_patterns; + + bool matches( TestCaseInfo const& testCase ) const { + // All patterns in a filter must match for the filter to be a match + for( std::vector >::const_iterator it = m_patterns.begin(), itEnd = m_patterns.end(); it != itEnd; ++it ) { + if( !(*it)->matches( testCase ) ) + return false; + } + return true; + } + }; + + public: + bool hasFilters() const { + return !m_filters.empty(); + } + bool matches( TestCaseInfo const& testCase ) const { + // A TestSpec matches if any filter matches + for( std::vector::const_iterator it = m_filters.begin(), itEnd = m_filters.end(); it != itEnd; ++it ) + if( it->matches( testCase ) ) + return true; + return false; + } + + private: + std::vector m_filters; + + friend class TestSpecParser; + }; +} + +#ifdef __clang__ +#pragma clang diagnostic pop +#endif + +namespace Catch { + + class TestSpecParser { + enum Mode{ None, Name, QuotedName, Tag, EscapedName }; + Mode m_mode; + bool m_exclusion; + std::size_t m_start, m_pos; + std::string m_arg; + std::vector m_escapeChars; + TestSpec::Filter m_currentFilter; + TestSpec m_testSpec; + ITagAliasRegistry const* m_tagAliases; + + public: + TestSpecParser( ITagAliasRegistry const& tagAliases ) :m_mode(None), m_exclusion(false), m_start(0), m_pos(0), m_tagAliases( &tagAliases ) {} + + TestSpecParser& parse( std::string const& arg ) { + m_mode = None; + m_exclusion = false; + m_start = std::string::npos; + m_arg = m_tagAliases->expandAliases( arg ); + m_escapeChars.clear(); + for( m_pos = 0; m_pos < m_arg.size(); ++m_pos ) + visitChar( m_arg[m_pos] ); + if( m_mode == Name ) + addPattern(); + return *this; + } + TestSpec testSpec() { + addFilter(); + return m_testSpec; + } + private: + void visitChar( char c ) { + if( m_mode == None ) { + switch( c ) { + case ' ': return; + case '~': m_exclusion = true; return; + case '[': return startNewMode( Tag, ++m_pos ); + case '"': return startNewMode( QuotedName, ++m_pos ); + case '\\': return escape(); + default: startNewMode( Name, m_pos ); break; + } + } + if( m_mode == Name ) { + if( c == ',' ) { + addPattern(); + addFilter(); + } + else if( c == '[' ) { + if( subString() == "exclude:" ) + m_exclusion = true; + else + addPattern(); + startNewMode( Tag, ++m_pos ); + } + else if( c == '\\' ) + escape(); + } + else if( m_mode == EscapedName ) + m_mode = Name; + else if( m_mode == QuotedName && c == '"' ) + addPattern(); + else if( m_mode == Tag && c == ']' ) + addPattern(); + } + void startNewMode( Mode mode, std::size_t start ) { + m_mode = mode; + m_start = start; + } + void escape() { + if( m_mode == None ) + m_start = m_pos; + m_mode = EscapedName; + m_escapeChars.push_back( m_pos ); + } + std::string subString() const { return m_arg.substr( m_start, m_pos - m_start ); } + template + void addPattern() { + std::string token = subString(); + for( size_t i = 0; i < m_escapeChars.size(); ++i ) + token = token.substr( 0, m_escapeChars[i]-m_start-i ) + token.substr( m_escapeChars[i]-m_start-i+1 ); + m_escapeChars.clear(); + if( startsWith( token, "exclude:" ) ) { + m_exclusion = true; + token = token.substr( 8 ); + } + if( !token.empty() ) { + Ptr pattern = new T( token ); + if( m_exclusion ) + pattern = new TestSpec::ExcludedPattern( pattern ); + m_currentFilter.m_patterns.push_back( pattern ); + } + m_exclusion = false; + m_mode = None; + } + void addFilter() { + if( !m_currentFilter.m_patterns.empty() ) { + m_testSpec.m_filters.push_back( m_currentFilter ); + m_currentFilter = TestSpec::Filter(); + } + } + }; + inline TestSpec parseTestSpec( std::string const& arg ) { + return TestSpecParser( ITagAliasRegistry::get() ).parse( arg ).testSpec(); + } + +} // namespace Catch + +#ifdef __clang__ +#pragma clang diagnostic pop +#endif + +// #included from: catch_interfaces_config.h +#define TWOBLUECUBES_CATCH_INTERFACES_CONFIG_H_INCLUDED + +#include +#include +#include + +namespace Catch { + + struct Verbosity { enum Level { + NoOutput = 0, + Quiet, + Normal + }; }; + + struct WarnAbout { enum What { + Nothing = 0x00, + NoAssertions = 0x01 + }; }; + + struct ShowDurations { enum OrNot { + DefaultForReporter, + Always, + Never + }; }; + struct RunTests { enum InWhatOrder { + InDeclarationOrder, + InLexicographicalOrder, + InRandomOrder + }; }; + struct UseColour { enum YesOrNo { + Auto, + Yes, + No + }; }; + struct WaitForKeypress { enum When { + Never, + BeforeStart = 1, + BeforeExit = 2, + BeforeStartAndExit = BeforeStart | BeforeExit + }; }; + + class TestSpec; + + struct IConfig : IShared { + + virtual ~IConfig(); + + virtual bool allowThrows() const = 0; + virtual std::ostream& stream() const = 0; + virtual std::string name() const = 0; + virtual bool includeSuccessfulResults() const = 0; + virtual bool shouldDebugBreak() const = 0; + virtual bool warnAboutMissingAssertions() const = 0; + virtual int abortAfter() const = 0; + virtual bool showInvisibles() const = 0; + virtual ShowDurations::OrNot showDurations() const = 0; + virtual TestSpec const& testSpec() const = 0; + virtual RunTests::InWhatOrder runOrder() const = 0; + virtual unsigned int rngSeed() const = 0; + virtual UseColour::YesOrNo useColour() const = 0; + virtual std::vector const& getSectionsToRun() const = 0; + + }; +} + +// #included from: catch_stream.h +#define TWOBLUECUBES_CATCH_STREAM_H_INCLUDED + +// #included from: catch_streambuf.h +#define TWOBLUECUBES_CATCH_STREAMBUF_H_INCLUDED + +#include + +namespace Catch { + + class StreamBufBase : public std::streambuf { + public: + virtual ~StreamBufBase() CATCH_NOEXCEPT; + }; +} + +#include +#include +#include +#include + +namespace Catch { + + std::ostream& cout(); + std::ostream& cerr(); + std::ostream& clog(); + + struct IStream { + virtual ~IStream() CATCH_NOEXCEPT; + virtual std::ostream& stream() const = 0; + }; + + class FileStream : public IStream { + mutable std::ofstream m_ofs; + public: + FileStream( std::string const& filename ); + virtual ~FileStream() CATCH_NOEXCEPT; + public: // IStream + virtual std::ostream& stream() const CATCH_OVERRIDE; + }; + + class CoutStream : public IStream { + mutable std::ostream m_os; + public: + CoutStream(); + virtual ~CoutStream() CATCH_NOEXCEPT; + + public: // IStream + virtual std::ostream& stream() const CATCH_OVERRIDE; + }; + + class DebugOutStream : public IStream { + CATCH_AUTO_PTR( StreamBufBase ) m_streamBuf; + mutable std::ostream m_os; + public: + DebugOutStream(); + virtual ~DebugOutStream() CATCH_NOEXCEPT; + + public: // IStream + virtual std::ostream& stream() const CATCH_OVERRIDE; + }; +} + +#include +#include +#include +#include + +#ifndef CATCH_CONFIG_CONSOLE_WIDTH +#define CATCH_CONFIG_CONSOLE_WIDTH 80 +#endif + +namespace Catch { + + struct ConfigData { + + ConfigData() + : listTests( false ), + listTags( false ), + listReporters( false ), + listTestNamesOnly( false ), + listExtraInfo( false ), + showSuccessfulTests( false ), + shouldDebugBreak( false ), + noThrow( false ), + showHelp( false ), + showInvisibles( false ), + filenamesAsTags( false ), + libIdentify( false ), + abortAfter( -1 ), + rngSeed( 0 ), + verbosity( Verbosity::Normal ), + warnings( WarnAbout::Nothing ), + showDurations( ShowDurations::DefaultForReporter ), + runOrder( RunTests::InDeclarationOrder ), + useColour( UseColour::Auto ), + waitForKeypress( WaitForKeypress::Never ) + {} + + bool listTests; + bool listTags; + bool listReporters; + bool listTestNamesOnly; + bool listExtraInfo; + + bool showSuccessfulTests; + bool shouldDebugBreak; + bool noThrow; + bool showHelp; + bool showInvisibles; + bool filenamesAsTags; + bool libIdentify; + + int abortAfter; + unsigned int rngSeed; + + Verbosity::Level verbosity; + WarnAbout::What warnings; + ShowDurations::OrNot showDurations; + RunTests::InWhatOrder runOrder; + UseColour::YesOrNo useColour; + WaitForKeypress::When waitForKeypress; + + std::string outputFilename; + std::string name; + std::string processName; + + std::vector reporterNames; + std::vector testsOrTags; + std::vector sectionsToRun; + }; + + class Config : public SharedImpl { + private: + Config( Config const& other ); + Config& operator = ( Config const& other ); + virtual void dummy(); + public: + + Config() + {} + + Config( ConfigData const& data ) + : m_data( data ), + m_stream( openStream() ) + { + if( !data.testsOrTags.empty() ) { + TestSpecParser parser( ITagAliasRegistry::get() ); + for( std::size_t i = 0; i < data.testsOrTags.size(); ++i ) + parser.parse( data.testsOrTags[i] ); + m_testSpec = parser.testSpec(); + } + } + + virtual ~Config() {} + + std::string const& getFilename() const { + return m_data.outputFilename ; + } + + bool listTests() const { return m_data.listTests; } + bool listTestNamesOnly() const { return m_data.listTestNamesOnly; } + bool listTags() const { return m_data.listTags; } + bool listReporters() const { return m_data.listReporters; } + bool listExtraInfo() const { return m_data.listExtraInfo; } + + std::string getProcessName() const { return m_data.processName; } + + std::vector const& getReporterNames() const { return m_data.reporterNames; } + std::vector const& getSectionsToRun() const CATCH_OVERRIDE { return m_data.sectionsToRun; } + + virtual TestSpec const& testSpec() const CATCH_OVERRIDE { return m_testSpec; } + + bool showHelp() const { return m_data.showHelp; } + + // IConfig interface + virtual bool allowThrows() const CATCH_OVERRIDE { return !m_data.noThrow; } + virtual std::ostream& stream() const CATCH_OVERRIDE { return m_stream->stream(); } + virtual std::string name() const CATCH_OVERRIDE { return m_data.name.empty() ? m_data.processName : m_data.name; } + virtual bool includeSuccessfulResults() const CATCH_OVERRIDE { return m_data.showSuccessfulTests; } + virtual bool warnAboutMissingAssertions() const CATCH_OVERRIDE { return m_data.warnings & WarnAbout::NoAssertions; } + virtual ShowDurations::OrNot showDurations() const CATCH_OVERRIDE { return m_data.showDurations; } + virtual RunTests::InWhatOrder runOrder() const CATCH_OVERRIDE { return m_data.runOrder; } + virtual unsigned int rngSeed() const CATCH_OVERRIDE { return m_data.rngSeed; } + virtual UseColour::YesOrNo useColour() const CATCH_OVERRIDE { return m_data.useColour; } + virtual bool shouldDebugBreak() const CATCH_OVERRIDE { return m_data.shouldDebugBreak; } + virtual int abortAfter() const CATCH_OVERRIDE { return m_data.abortAfter; } + virtual bool showInvisibles() const CATCH_OVERRIDE { return m_data.showInvisibles; } + + private: + + IStream const* openStream() { + if( m_data.outputFilename.empty() ) + return new CoutStream(); + else if( m_data.outputFilename[0] == '%' ) { + if( m_data.outputFilename == "%debug" ) + return new DebugOutStream(); + else + throw std::domain_error( "Unrecognised stream: " + m_data.outputFilename ); + } + else + return new FileStream( m_data.outputFilename ); + } + ConfigData m_data; + + CATCH_AUTO_PTR( IStream const ) m_stream; + TestSpec m_testSpec; + }; + +} // end namespace Catch + +// #included from: catch_clara.h +#define TWOBLUECUBES_CATCH_CLARA_H_INCLUDED + +// Use Catch's value for console width (store Clara's off to the side, if present) +#ifdef CLARA_CONFIG_CONSOLE_WIDTH +#define CATCH_TEMP_CLARA_CONFIG_CONSOLE_WIDTH CLARA_CONFIG_CONSOLE_WIDTH +#undef CLARA_CONFIG_CONSOLE_WIDTH +#endif +#define CLARA_CONFIG_CONSOLE_WIDTH CATCH_CONFIG_CONSOLE_WIDTH + +// Declare Clara inside the Catch namespace +#define STITCH_CLARA_OPEN_NAMESPACE namespace Catch { +// #included from: ../external/clara.h + +// Version 0.0.2.4 + +// Only use header guard if we are not using an outer namespace +#if !defined(TWOBLUECUBES_CLARA_H_INCLUDED) || defined(STITCH_CLARA_OPEN_NAMESPACE) + +#ifndef STITCH_CLARA_OPEN_NAMESPACE +#define TWOBLUECUBES_CLARA_H_INCLUDED +#define STITCH_CLARA_OPEN_NAMESPACE +#define STITCH_CLARA_CLOSE_NAMESPACE +#else +#define STITCH_CLARA_CLOSE_NAMESPACE } +#endif + +#define STITCH_TBC_TEXT_FORMAT_OPEN_NAMESPACE STITCH_CLARA_OPEN_NAMESPACE + +// ----------- #included from tbc_text_format.h ----------- + +// Only use header guard if we are not using an outer namespace +#if !defined(TBC_TEXT_FORMAT_H_INCLUDED) || defined(STITCH_TBC_TEXT_FORMAT_OUTER_NAMESPACE) +#ifndef STITCH_TBC_TEXT_FORMAT_OUTER_NAMESPACE +#define TBC_TEXT_FORMAT_H_INCLUDED +#endif + +#include +#include +#include +#include +#include + +// Use optional outer namespace +#ifdef STITCH_TBC_TEXT_FORMAT_OUTER_NAMESPACE +namespace STITCH_TBC_TEXT_FORMAT_OUTER_NAMESPACE { +#endif + +namespace Tbc { + +#ifdef TBC_TEXT_FORMAT_CONSOLE_WIDTH + const unsigned int consoleWidth = TBC_TEXT_FORMAT_CONSOLE_WIDTH; +#else + const unsigned int consoleWidth = 80; +#endif + + struct TextAttributes { + TextAttributes() + : initialIndent( std::string::npos ), + indent( 0 ), + width( consoleWidth-1 ), + tabChar( '\t' ) + {} + + TextAttributes& setInitialIndent( std::size_t _value ) { initialIndent = _value; return *this; } + TextAttributes& setIndent( std::size_t _value ) { indent = _value; return *this; } + TextAttributes& setWidth( std::size_t _value ) { width = _value; return *this; } + TextAttributes& setTabChar( char _value ) { tabChar = _value; return *this; } + + std::size_t initialIndent; // indent of first line, or npos + std::size_t indent; // indent of subsequent lines, or all if initialIndent is npos + std::size_t width; // maximum width of text, including indent. Longer text will wrap + char tabChar; // If this char is seen the indent is changed to current pos + }; + + class Text { + public: + Text( std::string const& _str, TextAttributes const& _attr = TextAttributes() ) + : attr( _attr ) + { + std::string wrappableChars = " [({.,/|\\-"; + std::size_t indent = _attr.initialIndent != std::string::npos + ? _attr.initialIndent + : _attr.indent; + std::string remainder = _str; + + while( !remainder.empty() ) { + if( lines.size() >= 1000 ) { + lines.push_back( "... message truncated due to excessive size" ); + return; + } + std::size_t tabPos = std::string::npos; + std::size_t width = (std::min)( remainder.size(), _attr.width - indent ); + std::size_t pos = remainder.find_first_of( '\n' ); + if( pos <= width ) { + width = pos; + } + pos = remainder.find_last_of( _attr.tabChar, width ); + if( pos != std::string::npos ) { + tabPos = pos; + if( remainder[width] == '\n' ) + width--; + remainder = remainder.substr( 0, tabPos ) + remainder.substr( tabPos+1 ); + } + + if( width == remainder.size() ) { + spliceLine( indent, remainder, width ); + } + else if( remainder[width] == '\n' ) { + spliceLine( indent, remainder, width ); + if( width <= 1 || remainder.size() != 1 ) + remainder = remainder.substr( 1 ); + indent = _attr.indent; + } + else { + pos = remainder.find_last_of( wrappableChars, width ); + if( pos != std::string::npos && pos > 0 ) { + spliceLine( indent, remainder, pos ); + if( remainder[0] == ' ' ) + remainder = remainder.substr( 1 ); + } + else { + spliceLine( indent, remainder, width-1 ); + lines.back() += "-"; + } + if( lines.size() == 1 ) + indent = _attr.indent; + if( tabPos != std::string::npos ) + indent += tabPos; + } + } + } + + void spliceLine( std::size_t _indent, std::string& _remainder, std::size_t _pos ) { + lines.push_back( std::string( _indent, ' ' ) + _remainder.substr( 0, _pos ) ); + _remainder = _remainder.substr( _pos ); + } + + typedef std::vector::const_iterator const_iterator; + + const_iterator begin() const { return lines.begin(); } + const_iterator end() const { return lines.end(); } + std::string const& last() const { return lines.back(); } + std::size_t size() const { return lines.size(); } + std::string const& operator[]( std::size_t _index ) const { return lines[_index]; } + std::string toString() const { + std::ostringstream oss; + oss << *this; + return oss.str(); + } + + friend std::ostream& operator << ( std::ostream& _stream, Text const& _text ) { + for( Text::const_iterator it = _text.begin(), itEnd = _text.end(); + it != itEnd; ++it ) { + if( it != _text.begin() ) + _stream << "\n"; + _stream << *it; + } + return _stream; + } + + private: + std::string str; + TextAttributes attr; + std::vector lines; + }; + +} // end namespace Tbc + +#ifdef STITCH_TBC_TEXT_FORMAT_OUTER_NAMESPACE +} // end outer namespace +#endif + +#endif // TBC_TEXT_FORMAT_H_INCLUDED + +// ----------- end of #include from tbc_text_format.h ----------- +// ........... back in clara.h + +#undef STITCH_TBC_TEXT_FORMAT_OPEN_NAMESPACE + +// ----------- #included from clara_compilers.h ----------- + +#ifndef TWOBLUECUBES_CLARA_COMPILERS_H_INCLUDED +#define TWOBLUECUBES_CLARA_COMPILERS_H_INCLUDED + +// Detect a number of compiler features - mostly C++11/14 conformance - by compiler +// The following features are defined: +// +// CLARA_CONFIG_CPP11_NULLPTR : is nullptr supported? +// CLARA_CONFIG_CPP11_NOEXCEPT : is noexcept supported? +// CLARA_CONFIG_CPP11_GENERATED_METHODS : The delete and default keywords for compiler generated methods +// CLARA_CONFIG_CPP11_OVERRIDE : is override supported? +// CLARA_CONFIG_CPP11_UNIQUE_PTR : is unique_ptr supported (otherwise use auto_ptr) + +// CLARA_CONFIG_CPP11_OR_GREATER : Is C++11 supported? + +// CLARA_CONFIG_VARIADIC_MACROS : are variadic macros supported? + +// In general each macro has a _NO_ form +// (e.g. CLARA_CONFIG_CPP11_NO_NULLPTR) which disables the feature. +// Many features, at point of detection, define an _INTERNAL_ macro, so they +// can be combined, en-mass, with the _NO_ forms later. + +// All the C++11 features can be disabled with CLARA_CONFIG_NO_CPP11 + +#ifdef __clang__ + +#if __has_feature(cxx_nullptr) +#define CLARA_INTERNAL_CONFIG_CPP11_NULLPTR +#endif + +#if __has_feature(cxx_noexcept) +#define CLARA_INTERNAL_CONFIG_CPP11_NOEXCEPT +#endif + +#endif // __clang__ + +//////////////////////////////////////////////////////////////////////////////// +// GCC +#ifdef __GNUC__ + +#if __GNUC__ == 4 && __GNUC_MINOR__ >= 6 && defined(__GXX_EXPERIMENTAL_CXX0X__) +#define CLARA_INTERNAL_CONFIG_CPP11_NULLPTR +#endif + +// - otherwise more recent versions define __cplusplus >= 201103L +// and will get picked up below + +#endif // __GNUC__ + +//////////////////////////////////////////////////////////////////////////////// +// Visual C++ +#ifdef _MSC_VER + +#if (_MSC_VER >= 1600) +#define CLARA_INTERNAL_CONFIG_CPP11_NULLPTR +#define CLARA_INTERNAL_CONFIG_CPP11_UNIQUE_PTR +#endif + +#if (_MSC_VER >= 1900 ) // (VC++ 13 (VS2015)) +#define CLARA_INTERNAL_CONFIG_CPP11_NOEXCEPT +#define CLARA_INTERNAL_CONFIG_CPP11_GENERATED_METHODS +#endif + +#endif // _MSC_VER + +//////////////////////////////////////////////////////////////////////////////// +// C++ language feature support + +// catch all support for C++11 +#if defined(__cplusplus) && __cplusplus >= 201103L + +#define CLARA_CPP11_OR_GREATER + +#if !defined(CLARA_INTERNAL_CONFIG_CPP11_NULLPTR) +#define CLARA_INTERNAL_CONFIG_CPP11_NULLPTR +#endif + +#ifndef CLARA_INTERNAL_CONFIG_CPP11_NOEXCEPT +#define CLARA_INTERNAL_CONFIG_CPP11_NOEXCEPT +#endif + +#ifndef CLARA_INTERNAL_CONFIG_CPP11_GENERATED_METHODS +#define CLARA_INTERNAL_CONFIG_CPP11_GENERATED_METHODS +#endif + +#if !defined(CLARA_INTERNAL_CONFIG_CPP11_OVERRIDE) +#define CLARA_INTERNAL_CONFIG_CPP11_OVERRIDE +#endif +#if !defined(CLARA_INTERNAL_CONFIG_CPP11_UNIQUE_PTR) +#define CLARA_INTERNAL_CONFIG_CPP11_UNIQUE_PTR +#endif + +#endif // __cplusplus >= 201103L + +// Now set the actual defines based on the above + anything the user has configured +#if defined(CLARA_INTERNAL_CONFIG_CPP11_NULLPTR) && !defined(CLARA_CONFIG_CPP11_NO_NULLPTR) && !defined(CLARA_CONFIG_CPP11_NULLPTR) && !defined(CLARA_CONFIG_NO_CPP11) +#define CLARA_CONFIG_CPP11_NULLPTR +#endif +#if defined(CLARA_INTERNAL_CONFIG_CPP11_NOEXCEPT) && !defined(CLARA_CONFIG_CPP11_NO_NOEXCEPT) && !defined(CLARA_CONFIG_CPP11_NOEXCEPT) && !defined(CLARA_CONFIG_NO_CPP11) +#define CLARA_CONFIG_CPP11_NOEXCEPT +#endif +#if defined(CLARA_INTERNAL_CONFIG_CPP11_GENERATED_METHODS) && !defined(CLARA_CONFIG_CPP11_NO_GENERATED_METHODS) && !defined(CLARA_CONFIG_CPP11_GENERATED_METHODS) && !defined(CLARA_CONFIG_NO_CPP11) +#define CLARA_CONFIG_CPP11_GENERATED_METHODS +#endif +#if defined(CLARA_INTERNAL_CONFIG_CPP11_OVERRIDE) && !defined(CLARA_CONFIG_NO_OVERRIDE) && !defined(CLARA_CONFIG_CPP11_OVERRIDE) && !defined(CLARA_CONFIG_NO_CPP11) +#define CLARA_CONFIG_CPP11_OVERRIDE +#endif +#if defined(CLARA_INTERNAL_CONFIG_CPP11_UNIQUE_PTR) && !defined(CLARA_CONFIG_NO_UNIQUE_PTR) && !defined(CLARA_CONFIG_CPP11_UNIQUE_PTR) && !defined(CLARA_CONFIG_NO_CPP11) +#define CLARA_CONFIG_CPP11_UNIQUE_PTR +#endif + +// noexcept support: +#if defined(CLARA_CONFIG_CPP11_NOEXCEPT) && !defined(CLARA_NOEXCEPT) +#define CLARA_NOEXCEPT noexcept +# define CLARA_NOEXCEPT_IS(x) noexcept(x) +#else +#define CLARA_NOEXCEPT throw() +# define CLARA_NOEXCEPT_IS(x) +#endif + +// nullptr support +#ifdef CLARA_CONFIG_CPP11_NULLPTR +#define CLARA_NULL nullptr +#else +#define CLARA_NULL NULL +#endif + +// override support +#ifdef CLARA_CONFIG_CPP11_OVERRIDE +#define CLARA_OVERRIDE override +#else +#define CLARA_OVERRIDE +#endif + +// unique_ptr support +#ifdef CLARA_CONFIG_CPP11_UNIQUE_PTR +# define CLARA_AUTO_PTR( T ) std::unique_ptr +#else +# define CLARA_AUTO_PTR( T ) std::auto_ptr +#endif + +#endif // TWOBLUECUBES_CLARA_COMPILERS_H_INCLUDED + +// ----------- end of #include from clara_compilers.h ----------- +// ........... back in clara.h + +#include +#include +#include + +#if defined(WIN32) || defined(__WIN32__) || defined(_WIN32) || defined(_MSC_VER) +#define CLARA_PLATFORM_WINDOWS +#endif + +// Use optional outer namespace +#ifdef STITCH_CLARA_OPEN_NAMESPACE +STITCH_CLARA_OPEN_NAMESPACE +#endif + +namespace Clara { + + struct UnpositionalTag {}; + + extern UnpositionalTag _; + +#ifdef CLARA_CONFIG_MAIN + UnpositionalTag _; +#endif + + namespace Detail { + +#ifdef CLARA_CONSOLE_WIDTH + const unsigned int consoleWidth = CLARA_CONFIG_CONSOLE_WIDTH; +#else + const unsigned int consoleWidth = 80; +#endif + + using namespace Tbc; + + inline bool startsWith( std::string const& str, std::string const& prefix ) { + return str.size() >= prefix.size() && str.substr( 0, prefix.size() ) == prefix; + } + + template struct RemoveConstRef{ typedef T type; }; + template struct RemoveConstRef{ typedef T type; }; + template struct RemoveConstRef{ typedef T type; }; + template struct RemoveConstRef{ typedef T type; }; + + template struct IsBool { static const bool value = false; }; + template<> struct IsBool { static const bool value = true; }; + + template + void convertInto( std::string const& _source, T& _dest ) { + std::stringstream ss; + ss << _source; + ss >> _dest; + if( ss.fail() ) + throw std::runtime_error( "Unable to convert " + _source + " to destination type" ); + } + inline void convertInto( std::string const& _source, std::string& _dest ) { + _dest = _source; + } + char toLowerCh(char c) { + return static_cast( std::tolower( c ) ); + } + inline void convertInto( std::string const& _source, bool& _dest ) { + std::string sourceLC = _source; + std::transform( sourceLC.begin(), sourceLC.end(), sourceLC.begin(), toLowerCh ); + if( sourceLC == "y" || sourceLC == "1" || sourceLC == "true" || sourceLC == "yes" || sourceLC == "on" ) + _dest = true; + else if( sourceLC == "n" || sourceLC == "0" || sourceLC == "false" || sourceLC == "no" || sourceLC == "off" ) + _dest = false; + else + throw std::runtime_error( "Expected a boolean value but did not recognise:\n '" + _source + "'" ); + } + + template + struct IArgFunction { + virtual ~IArgFunction() {} +#ifdef CLARA_CONFIG_CPP11_GENERATED_METHODS + IArgFunction() = default; + IArgFunction( IArgFunction const& ) = default; +#endif + virtual void set( ConfigT& config, std::string const& value ) const = 0; + virtual bool takesArg() const = 0; + virtual IArgFunction* clone() const = 0; + }; + + template + class BoundArgFunction { + public: + BoundArgFunction() : functionObj( CLARA_NULL ) {} + BoundArgFunction( IArgFunction* _functionObj ) : functionObj( _functionObj ) {} + BoundArgFunction( BoundArgFunction const& other ) : functionObj( other.functionObj ? other.functionObj->clone() : CLARA_NULL ) {} + BoundArgFunction& operator = ( BoundArgFunction const& other ) { + IArgFunction* newFunctionObj = other.functionObj ? other.functionObj->clone() : CLARA_NULL; + delete functionObj; + functionObj = newFunctionObj; + return *this; + } + ~BoundArgFunction() { delete functionObj; } + + void set( ConfigT& config, std::string const& value ) const { + functionObj->set( config, value ); + } + bool takesArg() const { return functionObj->takesArg(); } + + bool isSet() const { + return functionObj != CLARA_NULL; + } + private: + IArgFunction* functionObj; + }; + + template + struct NullBinder : IArgFunction{ + virtual void set( C&, std::string const& ) const {} + virtual bool takesArg() const { return true; } + virtual IArgFunction* clone() const { return new NullBinder( *this ); } + }; + + template + struct BoundDataMember : IArgFunction{ + BoundDataMember( M C::* _member ) : member( _member ) {} + virtual void set( C& p, std::string const& stringValue ) const { + convertInto( stringValue, p.*member ); + } + virtual bool takesArg() const { return !IsBool::value; } + virtual IArgFunction* clone() const { return new BoundDataMember( *this ); } + M C::* member; + }; + template + struct BoundUnaryMethod : IArgFunction{ + BoundUnaryMethod( void (C::*_member)( M ) ) : member( _member ) {} + virtual void set( C& p, std::string const& stringValue ) const { + typename RemoveConstRef::type value; + convertInto( stringValue, value ); + (p.*member)( value ); + } + virtual bool takesArg() const { return !IsBool::value; } + virtual IArgFunction* clone() const { return new BoundUnaryMethod( *this ); } + void (C::*member)( M ); + }; + template + struct BoundNullaryMethod : IArgFunction{ + BoundNullaryMethod( void (C::*_member)() ) : member( _member ) {} + virtual void set( C& p, std::string const& stringValue ) const { + bool value; + convertInto( stringValue, value ); + if( value ) + (p.*member)(); + } + virtual bool takesArg() const { return false; } + virtual IArgFunction* clone() const { return new BoundNullaryMethod( *this ); } + void (C::*member)(); + }; + + template + struct BoundUnaryFunction : IArgFunction{ + BoundUnaryFunction( void (*_function)( C& ) ) : function( _function ) {} + virtual void set( C& obj, std::string const& stringValue ) const { + bool value; + convertInto( stringValue, value ); + if( value ) + function( obj ); + } + virtual bool takesArg() const { return false; } + virtual IArgFunction* clone() const { return new BoundUnaryFunction( *this ); } + void (*function)( C& ); + }; + + template + struct BoundBinaryFunction : IArgFunction{ + BoundBinaryFunction( void (*_function)( C&, T ) ) : function( _function ) {} + virtual void set( C& obj, std::string const& stringValue ) const { + typename RemoveConstRef::type value; + convertInto( stringValue, value ); + function( obj, value ); + } + virtual bool takesArg() const { return !IsBool::value; } + virtual IArgFunction* clone() const { return new BoundBinaryFunction( *this ); } + void (*function)( C&, T ); + }; + + } // namespace Detail + + inline std::vector argsToVector( int argc, char const* const* const argv ) { + std::vector args( static_cast( argc ) ); + for( std::size_t i = 0; i < static_cast( argc ); ++i ) + args[i] = argv[i]; + + return args; + } + + class Parser { + enum Mode { None, MaybeShortOpt, SlashOpt, ShortOpt, LongOpt, Positional }; + Mode mode; + std::size_t from; + bool inQuotes; + public: + + struct Token { + enum Type { Positional, ShortOpt, LongOpt }; + Token( Type _type, std::string const& _data ) : type( _type ), data( _data ) {} + Type type; + std::string data; + }; + + Parser() : mode( None ), from( 0 ), inQuotes( false ){} + + void parseIntoTokens( std::vector const& args, std::vector& tokens ) { + const std::string doubleDash = "--"; + for( std::size_t i = 1; i < args.size() && args[i] != doubleDash; ++i ) + parseIntoTokens( args[i], tokens); + } + + void parseIntoTokens( std::string const& arg, std::vector& tokens ) { + for( std::size_t i = 0; i < arg.size(); ++i ) { + char c = arg[i]; + if( c == '"' ) + inQuotes = !inQuotes; + mode = handleMode( i, c, arg, tokens ); + } + mode = handleMode( arg.size(), '\0', arg, tokens ); + } + Mode handleMode( std::size_t i, char c, std::string const& arg, std::vector& tokens ) { + switch( mode ) { + case None: return handleNone( i, c ); + case MaybeShortOpt: return handleMaybeShortOpt( i, c ); + case ShortOpt: + case LongOpt: + case SlashOpt: return handleOpt( i, c, arg, tokens ); + case Positional: return handlePositional( i, c, arg, tokens ); + default: throw std::logic_error( "Unknown mode" ); + } + } + + Mode handleNone( std::size_t i, char c ) { + if( inQuotes ) { + from = i; + return Positional; + } + switch( c ) { + case '-': return MaybeShortOpt; +#ifdef CLARA_PLATFORM_WINDOWS + case '/': from = i+1; return SlashOpt; +#endif + default: from = i; return Positional; + } + } + Mode handleMaybeShortOpt( std::size_t i, char c ) { + switch( c ) { + case '-': from = i+1; return LongOpt; + default: from = i; return ShortOpt; + } + } + + Mode handleOpt( std::size_t i, char c, std::string const& arg, std::vector& tokens ) { + if( std::string( ":=\0", 3 ).find( c ) == std::string::npos ) + return mode; + + std::string optName = arg.substr( from, i-from ); + if( mode == ShortOpt ) + for( std::size_t j = 0; j < optName.size(); ++j ) + tokens.push_back( Token( Token::ShortOpt, optName.substr( j, 1 ) ) ); + else if( mode == SlashOpt && optName.size() == 1 ) + tokens.push_back( Token( Token::ShortOpt, optName ) ); + else + tokens.push_back( Token( Token::LongOpt, optName ) ); + return None; + } + Mode handlePositional( std::size_t i, char c, std::string const& arg, std::vector& tokens ) { + if( inQuotes || std::string( "\0", 1 ).find( c ) == std::string::npos ) + return mode; + + std::string data = arg.substr( from, i-from ); + tokens.push_back( Token( Token::Positional, data ) ); + return None; + } + }; + + template + struct CommonArgProperties { + CommonArgProperties() {} + CommonArgProperties( Detail::BoundArgFunction const& _boundField ) : boundField( _boundField ) {} + + Detail::BoundArgFunction boundField; + std::string description; + std::string detail; + std::string placeholder; // Only value if boundField takes an arg + + bool takesArg() const { + return !placeholder.empty(); + } + void validate() const { + if( !boundField.isSet() ) + throw std::logic_error( "option not bound" ); + } + }; + struct OptionArgProperties { + std::vector shortNames; + std::string longName; + + bool hasShortName( std::string const& shortName ) const { + return std::find( shortNames.begin(), shortNames.end(), shortName ) != shortNames.end(); + } + bool hasLongName( std::string const& _longName ) const { + return _longName == longName; + } + }; + struct PositionalArgProperties { + PositionalArgProperties() : position( -1 ) {} + int position; // -1 means non-positional (floating) + + bool isFixedPositional() const { + return position != -1; + } + }; + + template + class CommandLine { + + struct Arg : CommonArgProperties, OptionArgProperties, PositionalArgProperties { + Arg() {} + Arg( Detail::BoundArgFunction const& _boundField ) : CommonArgProperties( _boundField ) {} + + using CommonArgProperties::placeholder; // !TBD + + std::string dbgName() const { + if( !longName.empty() ) + return "--" + longName; + if( !shortNames.empty() ) + return "-" + shortNames[0]; + return "positional args"; + } + std::string commands() const { + std::ostringstream oss; + bool first = true; + std::vector::const_iterator it = shortNames.begin(), itEnd = shortNames.end(); + for(; it != itEnd; ++it ) { + if( first ) + first = false; + else + oss << ", "; + oss << "-" << *it; + } + if( !longName.empty() ) { + if( !first ) + oss << ", "; + oss << "--" << longName; + } + if( !placeholder.empty() ) + oss << " <" << placeholder << ">"; + return oss.str(); + } + }; + + typedef CLARA_AUTO_PTR( Arg ) ArgAutoPtr; + + friend void addOptName( Arg& arg, std::string const& optName ) + { + if( optName.empty() ) + return; + if( Detail::startsWith( optName, "--" ) ) { + if( !arg.longName.empty() ) + throw std::logic_error( "Only one long opt may be specified. '" + + arg.longName + + "' already specified, now attempting to add '" + + optName + "'" ); + arg.longName = optName.substr( 2 ); + } + else if( Detail::startsWith( optName, "-" ) ) + arg.shortNames.push_back( optName.substr( 1 ) ); + else + throw std::logic_error( "option must begin with - or --. Option was: '" + optName + "'" ); + } + friend void setPositionalArg( Arg& arg, int position ) + { + arg.position = position; + } + + class ArgBuilder { + public: + ArgBuilder( Arg* arg ) : m_arg( arg ) {} + + // Bind a non-boolean data member (requires placeholder string) + template + void bind( M C::* field, std::string const& placeholder ) { + m_arg->boundField = new Detail::BoundDataMember( field ); + m_arg->placeholder = placeholder; + } + // Bind a boolean data member (no placeholder required) + template + void bind( bool C::* field ) { + m_arg->boundField = new Detail::BoundDataMember( field ); + } + + // Bind a method taking a single, non-boolean argument (requires a placeholder string) + template + void bind( void (C::* unaryMethod)( M ), std::string const& placeholder ) { + m_arg->boundField = new Detail::BoundUnaryMethod( unaryMethod ); + m_arg->placeholder = placeholder; + } + + // Bind a method taking a single, boolean argument (no placeholder string required) + template + void bind( void (C::* unaryMethod)( bool ) ) { + m_arg->boundField = new Detail::BoundUnaryMethod( unaryMethod ); + } + + // Bind a method that takes no arguments (will be called if opt is present) + template + void bind( void (C::* nullaryMethod)() ) { + m_arg->boundField = new Detail::BoundNullaryMethod( nullaryMethod ); + } + + // Bind a free function taking a single argument - the object to operate on (no placeholder string required) + template + void bind( void (* unaryFunction)( C& ) ) { + m_arg->boundField = new Detail::BoundUnaryFunction( unaryFunction ); + } + + // Bind a free function taking a single argument - the object to operate on (requires a placeholder string) + template + void bind( void (* binaryFunction)( C&, T ), std::string const& placeholder ) { + m_arg->boundField = new Detail::BoundBinaryFunction( binaryFunction ); + m_arg->placeholder = placeholder; + } + + ArgBuilder& describe( std::string const& description ) { + m_arg->description = description; + return *this; + } + ArgBuilder& detail( std::string const& detail ) { + m_arg->detail = detail; + return *this; + } + + protected: + Arg* m_arg; + }; + + class OptBuilder : public ArgBuilder { + public: + OptBuilder( Arg* arg ) : ArgBuilder( arg ) {} + OptBuilder( OptBuilder& other ) : ArgBuilder( other ) {} + + OptBuilder& operator[]( std::string const& optName ) { + addOptName( *ArgBuilder::m_arg, optName ); + return *this; + } + }; + + public: + + CommandLine() + : m_boundProcessName( new Detail::NullBinder() ), + m_highestSpecifiedArgPosition( 0 ), + m_throwOnUnrecognisedTokens( false ) + {} + CommandLine( CommandLine const& other ) + : m_boundProcessName( other.m_boundProcessName ), + m_options ( other.m_options ), + m_positionalArgs( other.m_positionalArgs ), + m_highestSpecifiedArgPosition( other.m_highestSpecifiedArgPosition ), + m_throwOnUnrecognisedTokens( other.m_throwOnUnrecognisedTokens ) + { + if( other.m_floatingArg.get() ) + m_floatingArg.reset( new Arg( *other.m_floatingArg ) ); + } + + CommandLine& setThrowOnUnrecognisedTokens( bool shouldThrow = true ) { + m_throwOnUnrecognisedTokens = shouldThrow; + return *this; + } + + OptBuilder operator[]( std::string const& optName ) { + m_options.push_back( Arg() ); + addOptName( m_options.back(), optName ); + OptBuilder builder( &m_options.back() ); + return builder; + } + + ArgBuilder operator[]( int position ) { + m_positionalArgs.insert( std::make_pair( position, Arg() ) ); + if( position > m_highestSpecifiedArgPosition ) + m_highestSpecifiedArgPosition = position; + setPositionalArg( m_positionalArgs[position], position ); + ArgBuilder builder( &m_positionalArgs[position] ); + return builder; + } + + // Invoke this with the _ instance + ArgBuilder operator[]( UnpositionalTag ) { + if( m_floatingArg.get() ) + throw std::logic_error( "Only one unpositional argument can be added" ); + m_floatingArg.reset( new Arg() ); + ArgBuilder builder( m_floatingArg.get() ); + return builder; + } + + template + void bindProcessName( M C::* field ) { + m_boundProcessName = new Detail::BoundDataMember( field ); + } + template + void bindProcessName( void (C::*_unaryMethod)( M ) ) { + m_boundProcessName = new Detail::BoundUnaryMethod( _unaryMethod ); + } + + void optUsage( std::ostream& os, std::size_t indent = 0, std::size_t width = Detail::consoleWidth ) const { + typename std::vector::const_iterator itBegin = m_options.begin(), itEnd = m_options.end(), it; + std::size_t maxWidth = 0; + for( it = itBegin; it != itEnd; ++it ) + maxWidth = (std::max)( maxWidth, it->commands().size() ); + + for( it = itBegin; it != itEnd; ++it ) { + Detail::Text usage( it->commands(), Detail::TextAttributes() + .setWidth( maxWidth+indent ) + .setIndent( indent ) ); + Detail::Text desc( it->description, Detail::TextAttributes() + .setWidth( width - maxWidth - 3 ) ); + + for( std::size_t i = 0; i < (std::max)( usage.size(), desc.size() ); ++i ) { + std::string usageCol = i < usage.size() ? usage[i] : ""; + os << usageCol; + + if( i < desc.size() && !desc[i].empty() ) + os << std::string( indent + 2 + maxWidth - usageCol.size(), ' ' ) + << desc[i]; + os << "\n"; + } + } + } + std::string optUsage() const { + std::ostringstream oss; + optUsage( oss ); + return oss.str(); + } + + void argSynopsis( std::ostream& os ) const { + for( int i = 1; i <= m_highestSpecifiedArgPosition; ++i ) { + if( i > 1 ) + os << " "; + typename std::map::const_iterator it = m_positionalArgs.find( i ); + if( it != m_positionalArgs.end() ) + os << "<" << it->second.placeholder << ">"; + else if( m_floatingArg.get() ) + os << "<" << m_floatingArg->placeholder << ">"; + else + throw std::logic_error( "non consecutive positional arguments with no floating args" ); + } + // !TBD No indication of mandatory args + if( m_floatingArg.get() ) { + if( m_highestSpecifiedArgPosition > 1 ) + os << " "; + os << "[<" << m_floatingArg->placeholder << "> ...]"; + } + } + std::string argSynopsis() const { + std::ostringstream oss; + argSynopsis( oss ); + return oss.str(); + } + + void usage( std::ostream& os, std::string const& procName ) const { + validate(); + os << "usage:\n " << procName << " "; + argSynopsis( os ); + if( !m_options.empty() ) { + os << " [options]\n\nwhere options are: \n"; + optUsage( os, 2 ); + } + os << "\n"; + } + std::string usage( std::string const& procName ) const { + std::ostringstream oss; + usage( oss, procName ); + return oss.str(); + } + + ConfigT parse( std::vector const& args ) const { + ConfigT config; + parseInto( args, config ); + return config; + } + + std::vector parseInto( std::vector const& args, ConfigT& config ) const { + std::string processName = args.empty() ? std::string() : args[0]; + std::size_t lastSlash = processName.find_last_of( "/\\" ); + if( lastSlash != std::string::npos ) + processName = processName.substr( lastSlash+1 ); + m_boundProcessName.set( config, processName ); + std::vector tokens; + Parser parser; + parser.parseIntoTokens( args, tokens ); + return populate( tokens, config ); + } + + std::vector populate( std::vector const& tokens, ConfigT& config ) const { + validate(); + std::vector unusedTokens = populateOptions( tokens, config ); + unusedTokens = populateFixedArgs( unusedTokens, config ); + unusedTokens = populateFloatingArgs( unusedTokens, config ); + return unusedTokens; + } + + std::vector populateOptions( std::vector const& tokens, ConfigT& config ) const { + std::vector unusedTokens; + std::vector errors; + for( std::size_t i = 0; i < tokens.size(); ++i ) { + Parser::Token const& token = tokens[i]; + typename std::vector::const_iterator it = m_options.begin(), itEnd = m_options.end(); + for(; it != itEnd; ++it ) { + Arg const& arg = *it; + + try { + if( ( token.type == Parser::Token::ShortOpt && arg.hasShortName( token.data ) ) || + ( token.type == Parser::Token::LongOpt && arg.hasLongName( token.data ) ) ) { + if( arg.takesArg() ) { + if( i == tokens.size()-1 || tokens[i+1].type != Parser::Token::Positional ) + errors.push_back( "Expected argument to option: " + token.data ); + else + arg.boundField.set( config, tokens[++i].data ); + } + else { + arg.boundField.set( config, "true" ); + } + break; + } + } + catch( std::exception& ex ) { + errors.push_back( std::string( ex.what() ) + "\n- while parsing: (" + arg.commands() + ")" ); + } + } + if( it == itEnd ) { + if( token.type == Parser::Token::Positional || !m_throwOnUnrecognisedTokens ) + unusedTokens.push_back( token ); + else if( errors.empty() && m_throwOnUnrecognisedTokens ) + errors.push_back( "unrecognised option: " + token.data ); + } + } + if( !errors.empty() ) { + std::ostringstream oss; + for( std::vector::const_iterator it = errors.begin(), itEnd = errors.end(); + it != itEnd; + ++it ) { + if( it != errors.begin() ) + oss << "\n"; + oss << *it; + } + throw std::runtime_error( oss.str() ); + } + return unusedTokens; + } + std::vector populateFixedArgs( std::vector const& tokens, ConfigT& config ) const { + std::vector unusedTokens; + int position = 1; + for( std::size_t i = 0; i < tokens.size(); ++i ) { + Parser::Token const& token = tokens[i]; + typename std::map::const_iterator it = m_positionalArgs.find( position ); + if( it != m_positionalArgs.end() ) + it->second.boundField.set( config, token.data ); + else + unusedTokens.push_back( token ); + if( token.type == Parser::Token::Positional ) + position++; + } + return unusedTokens; + } + std::vector populateFloatingArgs( std::vector const& tokens, ConfigT& config ) const { + if( !m_floatingArg.get() ) + return tokens; + std::vector unusedTokens; + for( std::size_t i = 0; i < tokens.size(); ++i ) { + Parser::Token const& token = tokens[i]; + if( token.type == Parser::Token::Positional ) + m_floatingArg->boundField.set( config, token.data ); + else + unusedTokens.push_back( token ); + } + return unusedTokens; + } + + void validate() const + { + if( m_options.empty() && m_positionalArgs.empty() && !m_floatingArg.get() ) + throw std::logic_error( "No options or arguments specified" ); + + for( typename std::vector::const_iterator it = m_options.begin(), + itEnd = m_options.end(); + it != itEnd; ++it ) + it->validate(); + } + + private: + Detail::BoundArgFunction m_boundProcessName; + std::vector m_options; + std::map m_positionalArgs; + ArgAutoPtr m_floatingArg; + int m_highestSpecifiedArgPosition; + bool m_throwOnUnrecognisedTokens; + }; + +} // end namespace Clara + +STITCH_CLARA_CLOSE_NAMESPACE +#undef STITCH_CLARA_OPEN_NAMESPACE +#undef STITCH_CLARA_CLOSE_NAMESPACE + +#endif // TWOBLUECUBES_CLARA_H_INCLUDED +#undef STITCH_CLARA_OPEN_NAMESPACE + +// Restore Clara's value for console width, if present +#ifdef CATCH_TEMP_CLARA_CONFIG_CONSOLE_WIDTH +#define CLARA_CONFIG_CONSOLE_WIDTH CATCH_TEMP_CLARA_CONFIG_CONSOLE_WIDTH +#undef CATCH_TEMP_CLARA_CONFIG_CONSOLE_WIDTH +#endif + +#include +#include + +namespace Catch { + + inline void abortAfterFirst( ConfigData& config ) { config.abortAfter = 1; } + inline void abortAfterX( ConfigData& config, int x ) { + if( x < 1 ) + throw std::runtime_error( "Value after -x or --abortAfter must be greater than zero" ); + config.abortAfter = x; + } + inline void addTestOrTags( ConfigData& config, std::string const& _testSpec ) { config.testsOrTags.push_back( _testSpec ); } + inline void addSectionToRun( ConfigData& config, std::string const& sectionName ) { config.sectionsToRun.push_back( sectionName ); } + inline void addReporterName( ConfigData& config, std::string const& _reporterName ) { config.reporterNames.push_back( _reporterName ); } + + inline void addWarning( ConfigData& config, std::string const& _warning ) { + if( _warning == "NoAssertions" ) + config.warnings = static_cast( config.warnings | WarnAbout::NoAssertions ); + else + throw std::runtime_error( "Unrecognised warning: '" + _warning + '\'' ); + } + inline void setOrder( ConfigData& config, std::string const& order ) { + if( startsWith( "declared", order ) ) + config.runOrder = RunTests::InDeclarationOrder; + else if( startsWith( "lexical", order ) ) + config.runOrder = RunTests::InLexicographicalOrder; + else if( startsWith( "random", order ) ) + config.runOrder = RunTests::InRandomOrder; + else + throw std::runtime_error( "Unrecognised ordering: '" + order + '\'' ); + } + inline void setRngSeed( ConfigData& config, std::string const& seed ) { + if( seed == "time" ) { + config.rngSeed = static_cast( std::time(0) ); + } + else { + std::stringstream ss; + ss << seed; + ss >> config.rngSeed; + if( ss.fail() ) + throw std::runtime_error( "Argument to --rng-seed should be the word 'time' or a number" ); + } + } + inline void setVerbosity( ConfigData& config, int level ) { + // !TBD: accept strings? + config.verbosity = static_cast( level ); + } + inline void setShowDurations( ConfigData& config, bool _showDurations ) { + config.showDurations = _showDurations + ? ShowDurations::Always + : ShowDurations::Never; + } + inline void setUseColour( ConfigData& config, std::string const& value ) { + std::string mode = toLower( value ); + + if( mode == "yes" ) + config.useColour = UseColour::Yes; + else if( mode == "no" ) + config.useColour = UseColour::No; + else if( mode == "auto" ) + config.useColour = UseColour::Auto; + else + throw std::runtime_error( "colour mode must be one of: auto, yes or no" ); + } + inline void setWaitForKeypress( ConfigData& config, std::string const& keypress ) { + std::string keypressLc = toLower( keypress ); + if( keypressLc == "start" ) + config.waitForKeypress = WaitForKeypress::BeforeStart; + else if( keypressLc == "exit" ) + config.waitForKeypress = WaitForKeypress::BeforeExit; + else if( keypressLc == "both" ) + config.waitForKeypress = WaitForKeypress::BeforeStartAndExit; + else + throw std::runtime_error( "keypress argument must be one of: start, exit or both. '" + keypress + "' not recognised" ); + }; + + inline void forceColour( ConfigData& config ) { + config.useColour = UseColour::Yes; + } + inline void loadTestNamesFromFile( ConfigData& config, std::string const& _filename ) { + std::ifstream f( _filename.c_str() ); + if( !f.is_open() ) + throw std::domain_error( "Unable to load input file: " + _filename ); + + std::string line; + while( std::getline( f, line ) ) { + line = trim(line); + if( !line.empty() && !startsWith( line, '#' ) ) { + if( !startsWith( line, '"' ) ) + line = '"' + line + '"'; + addTestOrTags( config, line + ',' ); + } + } + } + + inline Clara::CommandLine makeCommandLineParser() { + + using namespace Clara; + CommandLine cli; + + cli.bindProcessName( &ConfigData::processName ); + + cli["-?"]["-h"]["--help"] + .describe( "display usage information" ) + .bind( &ConfigData::showHelp ); + + cli["-l"]["--list-tests"] + .describe( "list all/matching test cases" ) + .bind( &ConfigData::listTests ); + + cli["-t"]["--list-tags"] + .describe( "list all/matching tags" ) + .bind( &ConfigData::listTags ); + + cli["-s"]["--success"] + .describe( "include successful tests in output" ) + .bind( &ConfigData::showSuccessfulTests ); + + cli["-b"]["--break"] + .describe( "break into debugger on failure" ) + .bind( &ConfigData::shouldDebugBreak ); + + cli["-e"]["--nothrow"] + .describe( "skip exception tests" ) + .bind( &ConfigData::noThrow ); + + cli["-i"]["--invisibles"] + .describe( "show invisibles (tabs, newlines)" ) + .bind( &ConfigData::showInvisibles ); + + cli["-o"]["--out"] + .describe( "output filename" ) + .bind( &ConfigData::outputFilename, "filename" ); + + cli["-r"]["--reporter"] +// .placeholder( "name[:filename]" ) + .describe( "reporter to use (defaults to console)" ) + .bind( &addReporterName, "name" ); + + cli["-n"]["--name"] + .describe( "suite name" ) + .bind( &ConfigData::name, "name" ); + + cli["-a"]["--abort"] + .describe( "abort at first failure" ) + .bind( &abortAfterFirst ); + + cli["-x"]["--abortx"] + .describe( "abort after x failures" ) + .bind( &abortAfterX, "no. failures" ); + + cli["-w"]["--warn"] + .describe( "enable warnings" ) + .bind( &addWarning, "warning name" ); + +// - needs updating if reinstated +// cli.into( &setVerbosity ) +// .describe( "level of verbosity (0=no output)" ) +// .shortOpt( "v") +// .longOpt( "verbosity" ) +// .placeholder( "level" ); + + cli[_] + .describe( "which test or tests to use" ) + .bind( &addTestOrTags, "test name, pattern or tags" ); + + cli["-d"]["--durations"] + .describe( "show test durations" ) + .bind( &setShowDurations, "yes|no" ); + + cli["-f"]["--input-file"] + .describe( "load test names to run from a file" ) + .bind( &loadTestNamesFromFile, "filename" ); + + cli["-#"]["--filenames-as-tags"] + .describe( "adds a tag for the filename" ) + .bind( &ConfigData::filenamesAsTags ); + + cli["-c"]["--section"] + .describe( "specify section to run" ) + .bind( &addSectionToRun, "section name" ); + + // Less common commands which don't have a short form + cli["--list-test-names-only"] + .describe( "list all/matching test cases names only" ) + .bind( &ConfigData::listTestNamesOnly ); + + cli["--list-extra-info"] + .describe( "list all/matching test cases with more info" ) + .bind( &ConfigData::listExtraInfo ); + + cli["--list-reporters"] + .describe( "list all reporters" ) + .bind( &ConfigData::listReporters ); + + cli["--order"] + .describe( "test case order (defaults to decl)" ) + .bind( &setOrder, "decl|lex|rand" ); + + cli["--rng-seed"] + .describe( "set a specific seed for random numbers" ) + .bind( &setRngSeed, "'time'|number" ); + + cli["--force-colour"] + .describe( "force colourised output (deprecated)" ) + .bind( &forceColour ); + + cli["--use-colour"] + .describe( "should output be colourised" ) + .bind( &setUseColour, "yes|no" ); + + cli["--libidentify"] + .describe( "report name and version according to libidentify standard" ) + .bind( &ConfigData::libIdentify ); + + cli["--wait-for-keypress"] + .describe( "waits for a keypress before exiting" ) + .bind( &setWaitForKeypress, "start|exit|both" ); + + return cli; + } + +} // end namespace Catch + +// #included from: internal/catch_list.hpp +#define TWOBLUECUBES_CATCH_LIST_HPP_INCLUDED + +// #included from: catch_text.h +#define TWOBLUECUBES_CATCH_TEXT_H_INCLUDED + +#define TBC_TEXT_FORMAT_CONSOLE_WIDTH CATCH_CONFIG_CONSOLE_WIDTH + +#define CLICHE_TBC_TEXT_FORMAT_OUTER_NAMESPACE Catch +// #included from: ../external/tbc_text_format.h +// Only use header guard if we are not using an outer namespace +#ifndef CLICHE_TBC_TEXT_FORMAT_OUTER_NAMESPACE +# ifdef TWOBLUECUBES_TEXT_FORMAT_H_INCLUDED +# ifndef TWOBLUECUBES_TEXT_FORMAT_H_ALREADY_INCLUDED +# define TWOBLUECUBES_TEXT_FORMAT_H_ALREADY_INCLUDED +# endif +# else +# define TWOBLUECUBES_TEXT_FORMAT_H_INCLUDED +# endif +#endif +#ifndef TWOBLUECUBES_TEXT_FORMAT_H_ALREADY_INCLUDED +#include +#include +#include + +// Use optional outer namespace +#ifdef CLICHE_TBC_TEXT_FORMAT_OUTER_NAMESPACE +namespace CLICHE_TBC_TEXT_FORMAT_OUTER_NAMESPACE { +#endif + +namespace Tbc { + +#ifdef TBC_TEXT_FORMAT_CONSOLE_WIDTH + const unsigned int consoleWidth = TBC_TEXT_FORMAT_CONSOLE_WIDTH; +#else + const unsigned int consoleWidth = 80; +#endif + + struct TextAttributes { + TextAttributes() + : initialIndent( std::string::npos ), + indent( 0 ), + width( consoleWidth-1 ) + {} + + TextAttributes& setInitialIndent( std::size_t _value ) { initialIndent = _value; return *this; } + TextAttributes& setIndent( std::size_t _value ) { indent = _value; return *this; } + TextAttributes& setWidth( std::size_t _value ) { width = _value; return *this; } + + std::size_t initialIndent; // indent of first line, or npos + std::size_t indent; // indent of subsequent lines, or all if initialIndent is npos + std::size_t width; // maximum width of text, including indent. Longer text will wrap + }; + + class Text { + public: + Text( std::string const& _str, TextAttributes const& _attr = TextAttributes() ) + : attr( _attr ) + { + const std::string wrappableBeforeChars = "[({<\t"; + const std::string wrappableAfterChars = "])}>-,./|\\"; + const std::string wrappableInsteadOfChars = " \n\r"; + std::string indent = _attr.initialIndent != std::string::npos + ? std::string( _attr.initialIndent, ' ' ) + : std::string( _attr.indent, ' ' ); + + typedef std::string::const_iterator iterator; + iterator it = _str.begin(); + const iterator strEnd = _str.end(); + + while( it != strEnd ) { + + if( lines.size() >= 1000 ) { + lines.push_back( "... message truncated due to excessive size" ); + return; + } + + std::string suffix; + std::size_t width = (std::min)( static_cast( strEnd-it ), _attr.width-static_cast( indent.size() ) ); + iterator itEnd = it+width; + iterator itNext = _str.end(); + + iterator itNewLine = std::find( it, itEnd, '\n' ); + if( itNewLine != itEnd ) + itEnd = itNewLine; + + if( itEnd != strEnd ) { + bool foundWrapPoint = false; + iterator findIt = itEnd; + do { + if( wrappableAfterChars.find( *findIt ) != std::string::npos && findIt != itEnd ) { + itEnd = findIt+1; + itNext = findIt+1; + foundWrapPoint = true; + } + else if( findIt > it && wrappableBeforeChars.find( *findIt ) != std::string::npos ) { + itEnd = findIt; + itNext = findIt; + foundWrapPoint = true; + } + else if( wrappableInsteadOfChars.find( *findIt ) != std::string::npos ) { + itNext = findIt+1; + itEnd = findIt; + foundWrapPoint = true; + } + if( findIt == it ) + break; + else + --findIt; + } + while( !foundWrapPoint ); + + if( !foundWrapPoint ) { + // No good wrap char, so we'll break mid word and add a hyphen + --itEnd; + itNext = itEnd; + suffix = "-"; + } + else { + while( itEnd > it && wrappableInsteadOfChars.find( *(itEnd-1) ) != std::string::npos ) + --itEnd; + } + } + lines.push_back( indent + std::string( it, itEnd ) + suffix ); + + if( indent.size() != _attr.indent ) + indent = std::string( _attr.indent, ' ' ); + it = itNext; + } + } + + typedef std::vector::const_iterator const_iterator; + + const_iterator begin() const { return lines.begin(); } + const_iterator end() const { return lines.end(); } + std::string const& last() const { return lines.back(); } + std::size_t size() const { return lines.size(); } + std::string const& operator[]( std::size_t _index ) const { return lines[_index]; } + std::string toString() const { + std::ostringstream oss; + oss << *this; + return oss.str(); + } + + inline friend std::ostream& operator << ( std::ostream& _stream, Text const& _text ) { + for( Text::const_iterator it = _text.begin(), itEnd = _text.end(); + it != itEnd; ++it ) { + if( it != _text.begin() ) + _stream << "\n"; + _stream << *it; + } + return _stream; + } + + private: + std::string str; + TextAttributes attr; + std::vector lines; + }; + +} // end namespace Tbc + +#ifdef CLICHE_TBC_TEXT_FORMAT_OUTER_NAMESPACE +} // end outer namespace +#endif + +#endif // TWOBLUECUBES_TEXT_FORMAT_H_ALREADY_INCLUDED +#undef CLICHE_TBC_TEXT_FORMAT_OUTER_NAMESPACE + +namespace Catch { + using Tbc::Text; + using Tbc::TextAttributes; +} + +// #included from: catch_console_colour.hpp +#define TWOBLUECUBES_CATCH_CONSOLE_COLOUR_HPP_INCLUDED + +namespace Catch { + + struct Colour { + enum Code { + None = 0, + + White, + Red, + Green, + Blue, + Cyan, + Yellow, + Grey, + + Bright = 0x10, + + BrightRed = Bright | Red, + BrightGreen = Bright | Green, + LightGrey = Bright | Grey, + BrightWhite = Bright | White, + + // By intention + FileName = LightGrey, + Warning = Yellow, + ResultError = BrightRed, + ResultSuccess = BrightGreen, + ResultExpectedFailure = Warning, + + Error = BrightRed, + Success = Green, + + OriginalExpression = Cyan, + ReconstructedExpression = Yellow, + + SecondaryText = LightGrey, + Headers = White + }; + + // Use constructed object for RAII guard + Colour( Code _colourCode ); + Colour( Colour const& other ); + ~Colour(); + + // Use static method for one-shot changes + static void use( Code _colourCode ); + + private: + bool m_moved; + }; + + inline std::ostream& operator << ( std::ostream& os, Colour const& ) { return os; } + +} // end namespace Catch + +// #included from: catch_interfaces_reporter.h +#define TWOBLUECUBES_CATCH_INTERFACES_REPORTER_H_INCLUDED + +#include +#include +#include + +namespace Catch +{ + struct ReporterConfig { + explicit ReporterConfig( Ptr const& _fullConfig ) + : m_stream( &_fullConfig->stream() ), m_fullConfig( _fullConfig ) {} + + ReporterConfig( Ptr const& _fullConfig, std::ostream& _stream ) + : m_stream( &_stream ), m_fullConfig( _fullConfig ) {} + + std::ostream& stream() const { return *m_stream; } + Ptr fullConfig() const { return m_fullConfig; } + + private: + std::ostream* m_stream; + Ptr m_fullConfig; + }; + + struct ReporterPreferences { + ReporterPreferences() + : shouldRedirectStdOut( false ) + {} + + bool shouldRedirectStdOut; + }; + + template + struct LazyStat : Option { + LazyStat() : used( false ) {} + LazyStat& operator=( T const& _value ) { + Option::operator=( _value ); + used = false; + return *this; + } + void reset() { + Option::reset(); + used = false; + } + bool used; + }; + + struct TestRunInfo { + TestRunInfo( std::string const& _name ) : name( _name ) {} + std::string name; + }; + struct GroupInfo { + GroupInfo( std::string const& _name, + std::size_t _groupIndex, + std::size_t _groupsCount ) + : name( _name ), + groupIndex( _groupIndex ), + groupsCounts( _groupsCount ) + {} + + std::string name; + std::size_t groupIndex; + std::size_t groupsCounts; + }; + + struct AssertionStats { + AssertionStats( AssertionResult const& _assertionResult, + std::vector const& _infoMessages, + Totals const& _totals ) + : assertionResult( _assertionResult ), + infoMessages( _infoMessages ), + totals( _totals ) + { + if( assertionResult.hasMessage() ) { + // Copy message into messages list. + // !TBD This should have been done earlier, somewhere + MessageBuilder builder( assertionResult.getTestMacroName(), assertionResult.getSourceInfo(), assertionResult.getResultType() ); + builder << assertionResult.getMessage(); + builder.m_info.message = builder.m_stream.str(); + + infoMessages.push_back( builder.m_info ); + } + } + virtual ~AssertionStats(); + +# ifdef CATCH_CONFIG_CPP11_GENERATED_METHODS + AssertionStats( AssertionStats const& ) = default; + AssertionStats( AssertionStats && ) = default; + AssertionStats& operator = ( AssertionStats const& ) = default; + AssertionStats& operator = ( AssertionStats && ) = default; +# endif + + AssertionResult assertionResult; + std::vector infoMessages; + Totals totals; + }; + + struct SectionStats { + SectionStats( SectionInfo const& _sectionInfo, + Counts const& _assertions, + double _durationInSeconds, + bool _missingAssertions ) + : sectionInfo( _sectionInfo ), + assertions( _assertions ), + durationInSeconds( _durationInSeconds ), + missingAssertions( _missingAssertions ) + {} + virtual ~SectionStats(); +# ifdef CATCH_CONFIG_CPP11_GENERATED_METHODS + SectionStats( SectionStats const& ) = default; + SectionStats( SectionStats && ) = default; + SectionStats& operator = ( SectionStats const& ) = default; + SectionStats& operator = ( SectionStats && ) = default; +# endif + + SectionInfo sectionInfo; + Counts assertions; + double durationInSeconds; + bool missingAssertions; + }; + + struct TestCaseStats { + TestCaseStats( TestCaseInfo const& _testInfo, + Totals const& _totals, + std::string const& _stdOut, + std::string const& _stdErr, + bool _aborting ) + : testInfo( _testInfo ), + totals( _totals ), + stdOut( _stdOut ), + stdErr( _stdErr ), + aborting( _aborting ) + {} + virtual ~TestCaseStats(); + +# ifdef CATCH_CONFIG_CPP11_GENERATED_METHODS + TestCaseStats( TestCaseStats const& ) = default; + TestCaseStats( TestCaseStats && ) = default; + TestCaseStats& operator = ( TestCaseStats const& ) = default; + TestCaseStats& operator = ( TestCaseStats && ) = default; +# endif + + TestCaseInfo testInfo; + Totals totals; + std::string stdOut; + std::string stdErr; + bool aborting; + }; + + struct TestGroupStats { + TestGroupStats( GroupInfo const& _groupInfo, + Totals const& _totals, + bool _aborting ) + : groupInfo( _groupInfo ), + totals( _totals ), + aborting( _aborting ) + {} + TestGroupStats( GroupInfo const& _groupInfo ) + : groupInfo( _groupInfo ), + aborting( false ) + {} + virtual ~TestGroupStats(); + +# ifdef CATCH_CONFIG_CPP11_GENERATED_METHODS + TestGroupStats( TestGroupStats const& ) = default; + TestGroupStats( TestGroupStats && ) = default; + TestGroupStats& operator = ( TestGroupStats const& ) = default; + TestGroupStats& operator = ( TestGroupStats && ) = default; +# endif + + GroupInfo groupInfo; + Totals totals; + bool aborting; + }; + + struct TestRunStats { + TestRunStats( TestRunInfo const& _runInfo, + Totals const& _totals, + bool _aborting ) + : runInfo( _runInfo ), + totals( _totals ), + aborting( _aborting ) + {} + virtual ~TestRunStats(); + +# ifndef CATCH_CONFIG_CPP11_GENERATED_METHODS + TestRunStats( TestRunStats const& _other ) + : runInfo( _other.runInfo ), + totals( _other.totals ), + aborting( _other.aborting ) + {} +# else + TestRunStats( TestRunStats const& ) = default; + TestRunStats( TestRunStats && ) = default; + TestRunStats& operator = ( TestRunStats const& ) = default; + TestRunStats& operator = ( TestRunStats && ) = default; +# endif + + TestRunInfo runInfo; + Totals totals; + bool aborting; + }; + + class MultipleReporters; + + struct IStreamingReporter : IShared { + virtual ~IStreamingReporter(); + + // Implementing class must also provide the following static method: + // static std::string getDescription(); + + virtual ReporterPreferences getPreferences() const = 0; + + virtual void noMatchingTestCases( std::string const& spec ) = 0; + + virtual void testRunStarting( TestRunInfo const& testRunInfo ) = 0; + virtual void testGroupStarting( GroupInfo const& groupInfo ) = 0; + + virtual void testCaseStarting( TestCaseInfo const& testInfo ) = 0; + virtual void sectionStarting( SectionInfo const& sectionInfo ) = 0; + + virtual void assertionStarting( AssertionInfo const& assertionInfo ) = 0; + + // The return value indicates if the messages buffer should be cleared: + virtual bool assertionEnded( AssertionStats const& assertionStats ) = 0; + + virtual void sectionEnded( SectionStats const& sectionStats ) = 0; + virtual void testCaseEnded( TestCaseStats const& testCaseStats ) = 0; + virtual void testGroupEnded( TestGroupStats const& testGroupStats ) = 0; + virtual void testRunEnded( TestRunStats const& testRunStats ) = 0; + + virtual void skipTest( TestCaseInfo const& testInfo ) = 0; + + virtual MultipleReporters* tryAsMulti() { return CATCH_NULL; } + }; + + struct IReporterFactory : IShared { + virtual ~IReporterFactory(); + virtual IStreamingReporter* create( ReporterConfig const& config ) const = 0; + virtual std::string getDescription() const = 0; + }; + + struct IReporterRegistry { + typedef std::map > FactoryMap; + typedef std::vector > Listeners; + + virtual ~IReporterRegistry(); + virtual IStreamingReporter* create( std::string const& name, Ptr const& config ) const = 0; + virtual FactoryMap const& getFactories() const = 0; + virtual Listeners const& getListeners() const = 0; + }; + + Ptr addReporter( Ptr const& existingReporter, Ptr const& additionalReporter ); + +} + +#include +#include + +namespace Catch { + + inline std::size_t listTests( Config const& config ) { + + TestSpec testSpec = config.testSpec(); + if( config.testSpec().hasFilters() ) + Catch::cout() << "Matching test cases:\n"; + else { + Catch::cout() << "All available test cases:\n"; + testSpec = TestSpecParser( ITagAliasRegistry::get() ).parse( "*" ).testSpec(); + } + + std::size_t matchedTests = 0; + TextAttributes nameAttr, descAttr, tagsAttr; + nameAttr.setInitialIndent( 2 ).setIndent( 4 ); + descAttr.setIndent( 4 ); + tagsAttr.setIndent( 6 ); + + std::vector matchedTestCases = filterTests( getAllTestCasesSorted( config ), testSpec, config ); + for( std::vector::const_iterator it = matchedTestCases.begin(), itEnd = matchedTestCases.end(); + it != itEnd; + ++it ) { + matchedTests++; + TestCaseInfo const& testCaseInfo = it->getTestCaseInfo(); + Colour::Code colour = testCaseInfo.isHidden() + ? Colour::SecondaryText + : Colour::None; + Colour colourGuard( colour ); + + Catch::cout() << Text( testCaseInfo.name, nameAttr ) << std::endl; + if( config.listExtraInfo() ) { + Catch::cout() << " " << testCaseInfo.lineInfo << std::endl; + std::string description = testCaseInfo.description; + if( description.empty() ) + description = "(NO DESCRIPTION)"; + Catch::cout() << Text( description, descAttr ) << std::endl; + } + if( !testCaseInfo.tags.empty() ) + Catch::cout() << Text( testCaseInfo.tagsAsString, tagsAttr ) << std::endl; + } + + if( !config.testSpec().hasFilters() ) + Catch::cout() << pluralise( matchedTests, "test case" ) << '\n' << std::endl; + else + Catch::cout() << pluralise( matchedTests, "matching test case" ) << '\n' << std::endl; + return matchedTests; + } + + inline std::size_t listTestsNamesOnly( Config const& config ) { + TestSpec testSpec = config.testSpec(); + if( !config.testSpec().hasFilters() ) + testSpec = TestSpecParser( ITagAliasRegistry::get() ).parse( "*" ).testSpec(); + std::size_t matchedTests = 0; + std::vector matchedTestCases = filterTests( getAllTestCasesSorted( config ), testSpec, config ); + for( std::vector::const_iterator it = matchedTestCases.begin(), itEnd = matchedTestCases.end(); + it != itEnd; + ++it ) { + matchedTests++; + TestCaseInfo const& testCaseInfo = it->getTestCaseInfo(); + if( startsWith( testCaseInfo.name, '#' ) ) + Catch::cout() << '"' << testCaseInfo.name << '"'; + else + Catch::cout() << testCaseInfo.name; + if ( config.listExtraInfo() ) + Catch::cout() << "\t@" << testCaseInfo.lineInfo; + Catch::cout() << std::endl; + } + return matchedTests; + } + + struct TagInfo { + TagInfo() : count ( 0 ) {} + void add( std::string const& spelling ) { + ++count; + spellings.insert( spelling ); + } + std::string all() const { + std::string out; + for( std::set::const_iterator it = spellings.begin(), itEnd = spellings.end(); + it != itEnd; + ++it ) + out += "[" + *it + "]"; + return out; + } + std::set spellings; + std::size_t count; + }; + + inline std::size_t listTags( Config const& config ) { + TestSpec testSpec = config.testSpec(); + if( config.testSpec().hasFilters() ) + Catch::cout() << "Tags for matching test cases:\n"; + else { + Catch::cout() << "All available tags:\n"; + testSpec = TestSpecParser( ITagAliasRegistry::get() ).parse( "*" ).testSpec(); + } + + std::map tagCounts; + + std::vector matchedTestCases = filterTests( getAllTestCasesSorted( config ), testSpec, config ); + for( std::vector::const_iterator it = matchedTestCases.begin(), itEnd = matchedTestCases.end(); + it != itEnd; + ++it ) { + for( std::set::const_iterator tagIt = it->getTestCaseInfo().tags.begin(), + tagItEnd = it->getTestCaseInfo().tags.end(); + tagIt != tagItEnd; + ++tagIt ) { + std::string tagName = *tagIt; + std::string lcaseTagName = toLower( tagName ); + std::map::iterator countIt = tagCounts.find( lcaseTagName ); + if( countIt == tagCounts.end() ) + countIt = tagCounts.insert( std::make_pair( lcaseTagName, TagInfo() ) ).first; + countIt->second.add( tagName ); + } + } + + for( std::map::const_iterator countIt = tagCounts.begin(), + countItEnd = tagCounts.end(); + countIt != countItEnd; + ++countIt ) { + std::ostringstream oss; + oss << " " << std::setw(2) << countIt->second.count << " "; + Text wrapper( countIt->second.all(), TextAttributes() + .setInitialIndent( 0 ) + .setIndent( oss.str().size() ) + .setWidth( CATCH_CONFIG_CONSOLE_WIDTH-10 ) ); + Catch::cout() << oss.str() << wrapper << '\n'; + } + Catch::cout() << pluralise( tagCounts.size(), "tag" ) << '\n' << std::endl; + return tagCounts.size(); + } + + inline std::size_t listReporters( Config const& /*config*/ ) { + Catch::cout() << "Available reporters:\n"; + IReporterRegistry::FactoryMap const& factories = getRegistryHub().getReporterRegistry().getFactories(); + IReporterRegistry::FactoryMap::const_iterator itBegin = factories.begin(), itEnd = factories.end(), it; + std::size_t maxNameLen = 0; + for(it = itBegin; it != itEnd; ++it ) + maxNameLen = (std::max)( maxNameLen, it->first.size() ); + + for(it = itBegin; it != itEnd; ++it ) { + Text wrapper( it->second->getDescription(), TextAttributes() + .setInitialIndent( 0 ) + .setIndent( 7+maxNameLen ) + .setWidth( CATCH_CONFIG_CONSOLE_WIDTH - maxNameLen-8 ) ); + Catch::cout() << " " + << it->first + << ':' + << std::string( maxNameLen - it->first.size() + 2, ' ' ) + << wrapper << '\n'; + } + Catch::cout() << std::endl; + return factories.size(); + } + + inline Option list( Config const& config ) { + Option listedCount; + if( config.listTests() || ( config.listExtraInfo() && !config.listTestNamesOnly() ) ) + listedCount = listedCount.valueOr(0) + listTests( config ); + if( config.listTestNamesOnly() ) + listedCount = listedCount.valueOr(0) + listTestsNamesOnly( config ); + if( config.listTags() ) + listedCount = listedCount.valueOr(0) + listTags( config ); + if( config.listReporters() ) + listedCount = listedCount.valueOr(0) + listReporters( config ); + return listedCount; + } + +} // end namespace Catch + +// #included from: internal/catch_run_context.hpp +#define TWOBLUECUBES_CATCH_RUNNER_IMPL_HPP_INCLUDED + +// #included from: catch_test_case_tracker.hpp +#define TWOBLUECUBES_CATCH_TEST_CASE_TRACKER_HPP_INCLUDED + +#include +#include +#include +#include +#include + +CATCH_INTERNAL_SUPPRESS_ETD_WARNINGS + +namespace Catch { +namespace TestCaseTracking { + + struct NameAndLocation { + std::string name; + SourceLineInfo location; + + NameAndLocation( std::string const& _name, SourceLineInfo const& _location ) + : name( _name ), + location( _location ) + {} + }; + + struct ITracker : SharedImpl<> { + virtual ~ITracker(); + + // static queries + virtual NameAndLocation const& nameAndLocation() const = 0; + + // dynamic queries + virtual bool isComplete() const = 0; // Successfully completed or failed + virtual bool isSuccessfullyCompleted() const = 0; + virtual bool isOpen() const = 0; // Started but not complete + virtual bool hasChildren() const = 0; + + virtual ITracker& parent() = 0; + + // actions + virtual void close() = 0; // Successfully complete + virtual void fail() = 0; + virtual void markAsNeedingAnotherRun() = 0; + + virtual void addChild( Ptr const& child ) = 0; + virtual ITracker* findChild( NameAndLocation const& nameAndLocation ) = 0; + virtual void openChild() = 0; + + // Debug/ checking + virtual bool isSectionTracker() const = 0; + virtual bool isIndexTracker() const = 0; + }; + + class TrackerContext { + + enum RunState { + NotStarted, + Executing, + CompletedCycle + }; + + Ptr m_rootTracker; + ITracker* m_currentTracker; + RunState m_runState; + + public: + + static TrackerContext& instance() { + static TrackerContext s_instance; + return s_instance; + } + + TrackerContext() + : m_currentTracker( CATCH_NULL ), + m_runState( NotStarted ) + {} + + ITracker& startRun(); + + void endRun() { + m_rootTracker.reset(); + m_currentTracker = CATCH_NULL; + m_runState = NotStarted; + } + + void startCycle() { + m_currentTracker = m_rootTracker.get(); + m_runState = Executing; + } + void completeCycle() { + m_runState = CompletedCycle; + } + + bool completedCycle() const { + return m_runState == CompletedCycle; + } + ITracker& currentTracker() { + return *m_currentTracker; + } + void setCurrentTracker( ITracker* tracker ) { + m_currentTracker = tracker; + } + }; + + class TrackerBase : public ITracker { + protected: + enum CycleState { + NotStarted, + Executing, + ExecutingChildren, + NeedsAnotherRun, + CompletedSuccessfully, + Failed + }; + class TrackerHasName { + NameAndLocation m_nameAndLocation; + public: + TrackerHasName( NameAndLocation const& nameAndLocation ) : m_nameAndLocation( nameAndLocation ) {} + bool operator ()( Ptr const& tracker ) { + return + tracker->nameAndLocation().name == m_nameAndLocation.name && + tracker->nameAndLocation().location == m_nameAndLocation.location; + } + }; + typedef std::vector > Children; + NameAndLocation m_nameAndLocation; + TrackerContext& m_ctx; + ITracker* m_parent; + Children m_children; + CycleState m_runState; + public: + TrackerBase( NameAndLocation const& nameAndLocation, TrackerContext& ctx, ITracker* parent ) + : m_nameAndLocation( nameAndLocation ), + m_ctx( ctx ), + m_parent( parent ), + m_runState( NotStarted ) + {} + virtual ~TrackerBase(); + + virtual NameAndLocation const& nameAndLocation() const CATCH_OVERRIDE { + return m_nameAndLocation; + } + virtual bool isComplete() const CATCH_OVERRIDE { + return m_runState == CompletedSuccessfully || m_runState == Failed; + } + virtual bool isSuccessfullyCompleted() const CATCH_OVERRIDE { + return m_runState == CompletedSuccessfully; + } + virtual bool isOpen() const CATCH_OVERRIDE { + return m_runState != NotStarted && !isComplete(); + } + virtual bool hasChildren() const CATCH_OVERRIDE { + return !m_children.empty(); + } + + virtual void addChild( Ptr const& child ) CATCH_OVERRIDE { + m_children.push_back( child ); + } + + virtual ITracker* findChild( NameAndLocation const& nameAndLocation ) CATCH_OVERRIDE { + Children::const_iterator it = std::find_if( m_children.begin(), m_children.end(), TrackerHasName( nameAndLocation ) ); + return( it != m_children.end() ) + ? it->get() + : CATCH_NULL; + } + virtual ITracker& parent() CATCH_OVERRIDE { + assert( m_parent ); // Should always be non-null except for root + return *m_parent; + } + + virtual void openChild() CATCH_OVERRIDE { + if( m_runState != ExecutingChildren ) { + m_runState = ExecutingChildren; + if( m_parent ) + m_parent->openChild(); + } + } + + virtual bool isSectionTracker() const CATCH_OVERRIDE { return false; } + virtual bool isIndexTracker() const CATCH_OVERRIDE { return false; } + + void open() { + m_runState = Executing; + moveToThis(); + if( m_parent ) + m_parent->openChild(); + } + + virtual void close() CATCH_OVERRIDE { + + // Close any still open children (e.g. generators) + while( &m_ctx.currentTracker() != this ) + m_ctx.currentTracker().close(); + + switch( m_runState ) { + case NotStarted: + case CompletedSuccessfully: + case Failed: + throw std::logic_error( "Illogical state" ); + + case NeedsAnotherRun: + break;; + + case Executing: + m_runState = CompletedSuccessfully; + break; + case ExecutingChildren: + if( m_children.empty() || m_children.back()->isComplete() ) + m_runState = CompletedSuccessfully; + break; + + default: + throw std::logic_error( "Unexpected state" ); + } + moveToParent(); + m_ctx.completeCycle(); + } + virtual void fail() CATCH_OVERRIDE { + m_runState = Failed; + if( m_parent ) + m_parent->markAsNeedingAnotherRun(); + moveToParent(); + m_ctx.completeCycle(); + } + virtual void markAsNeedingAnotherRun() CATCH_OVERRIDE { + m_runState = NeedsAnotherRun; + } + private: + void moveToParent() { + assert( m_parent ); + m_ctx.setCurrentTracker( m_parent ); + } + void moveToThis() { + m_ctx.setCurrentTracker( this ); + } + }; + + class SectionTracker : public TrackerBase { + std::vector m_filters; + public: + SectionTracker( NameAndLocation const& nameAndLocation, TrackerContext& ctx, ITracker* parent ) + : TrackerBase( nameAndLocation, ctx, parent ) + { + if( parent ) { + while( !parent->isSectionTracker() ) + parent = &parent->parent(); + + SectionTracker& parentSection = static_cast( *parent ); + addNextFilters( parentSection.m_filters ); + } + } + virtual ~SectionTracker(); + + virtual bool isSectionTracker() const CATCH_OVERRIDE { return true; } + + static SectionTracker& acquire( TrackerContext& ctx, NameAndLocation const& nameAndLocation ) { + SectionTracker* section = CATCH_NULL; + + ITracker& currentTracker = ctx.currentTracker(); + if( ITracker* childTracker = currentTracker.findChild( nameAndLocation ) ) { + assert( childTracker ); + assert( childTracker->isSectionTracker() ); + section = static_cast( childTracker ); + } + else { + section = new SectionTracker( nameAndLocation, ctx, ¤tTracker ); + currentTracker.addChild( section ); + } + if( !ctx.completedCycle() ) + section->tryOpen(); + return *section; + } + + void tryOpen() { + if( !isComplete() && (m_filters.empty() || m_filters[0].empty() || m_filters[0] == m_nameAndLocation.name ) ) + open(); + } + + void addInitialFilters( std::vector const& filters ) { + if( !filters.empty() ) { + m_filters.push_back(""); // Root - should never be consulted + m_filters.push_back(""); // Test Case - not a section filter + m_filters.insert( m_filters.end(), filters.begin(), filters.end() ); + } + } + void addNextFilters( std::vector const& filters ) { + if( filters.size() > 1 ) + m_filters.insert( m_filters.end(), ++filters.begin(), filters.end() ); + } + }; + + class IndexTracker : public TrackerBase { + int m_size; + int m_index; + public: + IndexTracker( NameAndLocation const& nameAndLocation, TrackerContext& ctx, ITracker* parent, int size ) + : TrackerBase( nameAndLocation, ctx, parent ), + m_size( size ), + m_index( -1 ) + {} + virtual ~IndexTracker(); + + virtual bool isIndexTracker() const CATCH_OVERRIDE { return true; } + + static IndexTracker& acquire( TrackerContext& ctx, NameAndLocation const& nameAndLocation, int size ) { + IndexTracker* tracker = CATCH_NULL; + + ITracker& currentTracker = ctx.currentTracker(); + if( ITracker* childTracker = currentTracker.findChild( nameAndLocation ) ) { + assert( childTracker ); + assert( childTracker->isIndexTracker() ); + tracker = static_cast( childTracker ); + } + else { + tracker = new IndexTracker( nameAndLocation, ctx, ¤tTracker, size ); + currentTracker.addChild( tracker ); + } + + if( !ctx.completedCycle() && !tracker->isComplete() ) { + if( tracker->m_runState != ExecutingChildren && tracker->m_runState != NeedsAnotherRun ) + tracker->moveNext(); + tracker->open(); + } + + return *tracker; + } + + int index() const { return m_index; } + + void moveNext() { + m_index++; + m_children.clear(); + } + + virtual void close() CATCH_OVERRIDE { + TrackerBase::close(); + if( m_runState == CompletedSuccessfully && m_index < m_size-1 ) + m_runState = Executing; + } + }; + + inline ITracker& TrackerContext::startRun() { + m_rootTracker = new SectionTracker( NameAndLocation( "{root}", CATCH_INTERNAL_LINEINFO ), *this, CATCH_NULL ); + m_currentTracker = CATCH_NULL; + m_runState = Executing; + return *m_rootTracker; + } + +} // namespace TestCaseTracking + +using TestCaseTracking::ITracker; +using TestCaseTracking::TrackerContext; +using TestCaseTracking::SectionTracker; +using TestCaseTracking::IndexTracker; + +} // namespace Catch + +CATCH_INTERNAL_UNSUPPRESS_ETD_WARNINGS + +// #included from: catch_fatal_condition.hpp +#define TWOBLUECUBES_CATCH_FATAL_CONDITION_H_INCLUDED + +namespace Catch { + + // Report the error condition + inline void reportFatal( std::string const& message ) { + IContext& context = Catch::getCurrentContext(); + IResultCapture* resultCapture = context.getResultCapture(); + resultCapture->handleFatalErrorCondition( message ); + } + +} // namespace Catch + +#if defined ( CATCH_PLATFORM_WINDOWS ) ///////////////////////////////////////// +// #included from: catch_windows_h_proxy.h + +#define TWOBLUECUBES_CATCH_WINDOWS_H_PROXY_H_INCLUDED + +#ifdef CATCH_DEFINES_NOMINMAX +# define NOMINMAX +#endif +#ifdef CATCH_DEFINES_WIN32_LEAN_AND_MEAN +# define WIN32_LEAN_AND_MEAN +#endif + +#ifdef __AFXDLL +#include +#else +#include +#endif + +#ifdef CATCH_DEFINES_NOMINMAX +# undef NOMINMAX +#endif +#ifdef CATCH_DEFINES_WIN32_LEAN_AND_MEAN +# undef WIN32_LEAN_AND_MEAN +#endif + + +# if !defined ( CATCH_CONFIG_WINDOWS_SEH ) + +namespace Catch { + struct FatalConditionHandler { + void reset() {} + }; +} + +# else // CATCH_CONFIG_WINDOWS_SEH is defined + +namespace Catch { + + struct SignalDefs { DWORD id; const char* name; }; + extern SignalDefs signalDefs[]; + // There is no 1-1 mapping between signals and windows exceptions. + // Windows can easily distinguish between SO and SigSegV, + // but SigInt, SigTerm, etc are handled differently. + SignalDefs signalDefs[] = { + { EXCEPTION_ILLEGAL_INSTRUCTION, "SIGILL - Illegal instruction signal" }, + { EXCEPTION_STACK_OVERFLOW, "SIGSEGV - Stack overflow" }, + { EXCEPTION_ACCESS_VIOLATION, "SIGSEGV - Segmentation violation signal" }, + { EXCEPTION_INT_DIVIDE_BY_ZERO, "Divide by zero error" }, + }; + + struct FatalConditionHandler { + + static LONG CALLBACK handleVectoredException(PEXCEPTION_POINTERS ExceptionInfo) { + for (int i = 0; i < sizeof(signalDefs) / sizeof(SignalDefs); ++i) { + if (ExceptionInfo->ExceptionRecord->ExceptionCode == signalDefs[i].id) { + reportFatal(signalDefs[i].name); + } + } + // If its not an exception we care about, pass it along. + // This stops us from eating debugger breaks etc. + return EXCEPTION_CONTINUE_SEARCH; + } + + FatalConditionHandler() { + isSet = true; + // 32k seems enough for Catch to handle stack overflow, + // but the value was found experimentally, so there is no strong guarantee + guaranteeSize = 32 * 1024; + exceptionHandlerHandle = CATCH_NULL; + // Register as first handler in current chain + exceptionHandlerHandle = AddVectoredExceptionHandler(1, handleVectoredException); + // Pass in guarantee size to be filled + SetThreadStackGuarantee(&guaranteeSize); + } + + static void reset() { + if (isSet) { + // Unregister handler and restore the old guarantee + RemoveVectoredExceptionHandler(exceptionHandlerHandle); + SetThreadStackGuarantee(&guaranteeSize); + exceptionHandlerHandle = CATCH_NULL; + isSet = false; + } + } + + ~FatalConditionHandler() { + reset(); + } + private: + static bool isSet; + static ULONG guaranteeSize; + static PVOID exceptionHandlerHandle; + }; + + bool FatalConditionHandler::isSet = false; + ULONG FatalConditionHandler::guaranteeSize = 0; + PVOID FatalConditionHandler::exceptionHandlerHandle = CATCH_NULL; + +} // namespace Catch + +# endif // CATCH_CONFIG_WINDOWS_SEH + +#else // Not Windows - assumed to be POSIX compatible ////////////////////////// + +# if !defined(CATCH_CONFIG_POSIX_SIGNALS) + +namespace Catch { + struct FatalConditionHandler { + void reset() {} + }; +} + +# else // CATCH_CONFIG_POSIX_SIGNALS is defined + +#include + +namespace Catch { + + struct SignalDefs { + int id; + const char* name; + }; + extern SignalDefs signalDefs[]; + SignalDefs signalDefs[] = { + { SIGINT, "SIGINT - Terminal interrupt signal" }, + { SIGILL, "SIGILL - Illegal instruction signal" }, + { SIGFPE, "SIGFPE - Floating point error signal" }, + { SIGSEGV, "SIGSEGV - Segmentation violation signal" }, + { SIGTERM, "SIGTERM - Termination request signal" }, + { SIGABRT, "SIGABRT - Abort (abnormal termination) signal" } + }; + + struct FatalConditionHandler { + + static bool isSet; + static struct sigaction oldSigActions [sizeof(signalDefs)/sizeof(SignalDefs)]; + static stack_t oldSigStack; + static char altStackMem[SIGSTKSZ]; + + static void handleSignal( int sig ) { + std::string name = ""; + for (std::size_t i = 0; i < sizeof(signalDefs) / sizeof(SignalDefs); ++i) { + SignalDefs &def = signalDefs[i]; + if (sig == def.id) { + name = def.name; + break; + } + } + reset(); + reportFatal(name); + raise( sig ); + } + + FatalConditionHandler() { + isSet = true; + stack_t sigStack; + sigStack.ss_sp = altStackMem; + sigStack.ss_size = SIGSTKSZ; + sigStack.ss_flags = 0; + sigaltstack(&sigStack, &oldSigStack); + struct sigaction sa = { 0 }; + + sa.sa_handler = handleSignal; + sa.sa_flags = SA_ONSTACK; + for (std::size_t i = 0; i < sizeof(signalDefs)/sizeof(SignalDefs); ++i) { + sigaction(signalDefs[i].id, &sa, &oldSigActions[i]); + } + } + + ~FatalConditionHandler() { + reset(); + } + static void reset() { + if( isSet ) { + // Set signals back to previous values -- hopefully nobody overwrote them in the meantime + for( std::size_t i = 0; i < sizeof(signalDefs)/sizeof(SignalDefs); ++i ) { + sigaction(signalDefs[i].id, &oldSigActions[i], CATCH_NULL); + } + // Return the old stack + sigaltstack(&oldSigStack, CATCH_NULL); + isSet = false; + } + } + }; + + bool FatalConditionHandler::isSet = false; + struct sigaction FatalConditionHandler::oldSigActions[sizeof(signalDefs)/sizeof(SignalDefs)] = {}; + stack_t FatalConditionHandler::oldSigStack = {}; + char FatalConditionHandler::altStackMem[SIGSTKSZ] = {}; + +} // namespace Catch + +# endif // CATCH_CONFIG_POSIX_SIGNALS + +#endif // not Windows + +#include +#include + +namespace Catch { + + class StreamRedirect { + + public: + StreamRedirect( std::ostream& stream, std::string& targetString ) + : m_stream( stream ), + m_prevBuf( stream.rdbuf() ), + m_targetString( targetString ) + { + stream.rdbuf( m_oss.rdbuf() ); + } + + ~StreamRedirect() { + m_targetString += m_oss.str(); + m_stream.rdbuf( m_prevBuf ); + } + + private: + std::ostream& m_stream; + std::streambuf* m_prevBuf; + std::ostringstream m_oss; + std::string& m_targetString; + }; + + // StdErr has two constituent streams in C++, std::cerr and std::clog + // This means that we need to redirect 2 streams into 1 to keep proper + // order of writes and cannot use StreamRedirect on its own + class StdErrRedirect { + public: + StdErrRedirect(std::string& targetString) + :m_cerrBuf( cerr().rdbuf() ), m_clogBuf(clog().rdbuf()), + m_targetString(targetString){ + cerr().rdbuf(m_oss.rdbuf()); + clog().rdbuf(m_oss.rdbuf()); + } + ~StdErrRedirect() { + m_targetString += m_oss.str(); + cerr().rdbuf(m_cerrBuf); + clog().rdbuf(m_clogBuf); + } + private: + std::streambuf* m_cerrBuf; + std::streambuf* m_clogBuf; + std::ostringstream m_oss; + std::string& m_targetString; + }; + + /////////////////////////////////////////////////////////////////////////// + + class RunContext : public IResultCapture, public IRunner { + + RunContext( RunContext const& ); + void operator =( RunContext const& ); + + public: + + explicit RunContext( Ptr const& _config, Ptr const& reporter ) + : m_runInfo( _config->name() ), + m_context( getCurrentMutableContext() ), + m_activeTestCase( CATCH_NULL ), + m_config( _config ), + m_reporter( reporter ), + m_shouldReportUnexpected ( true ) + { + m_context.setRunner( this ); + m_context.setConfig( m_config ); + m_context.setResultCapture( this ); + m_reporter->testRunStarting( m_runInfo ); + } + + virtual ~RunContext() { + m_reporter->testRunEnded( TestRunStats( m_runInfo, m_totals, aborting() ) ); + } + + void testGroupStarting( std::string const& testSpec, std::size_t groupIndex, std::size_t groupsCount ) { + m_reporter->testGroupStarting( GroupInfo( testSpec, groupIndex, groupsCount ) ); + } + void testGroupEnded( std::string const& testSpec, Totals const& totals, std::size_t groupIndex, std::size_t groupsCount ) { + m_reporter->testGroupEnded( TestGroupStats( GroupInfo( testSpec, groupIndex, groupsCount ), totals, aborting() ) ); + } + + Totals runTest( TestCase const& testCase ) { + Totals prevTotals = m_totals; + + std::string redirectedCout; + std::string redirectedCerr; + + TestCaseInfo testInfo = testCase.getTestCaseInfo(); + + m_reporter->testCaseStarting( testInfo ); + + m_activeTestCase = &testCase; + + do { + ITracker& rootTracker = m_trackerContext.startRun(); + assert( rootTracker.isSectionTracker() ); + static_cast( rootTracker ).addInitialFilters( m_config->getSectionsToRun() ); + do { + m_trackerContext.startCycle(); + m_testCaseTracker = &SectionTracker::acquire( m_trackerContext, TestCaseTracking::NameAndLocation( testInfo.name, testInfo.lineInfo ) ); + runCurrentTest( redirectedCout, redirectedCerr ); + } + while( !m_testCaseTracker->isSuccessfullyCompleted() && !aborting() ); + } + // !TBD: deprecated - this will be replaced by indexed trackers + while( getCurrentContext().advanceGeneratorsForCurrentTest() && !aborting() ); + + Totals deltaTotals = m_totals.delta( prevTotals ); + if( testInfo.expectedToFail() && deltaTotals.testCases.passed > 0 ) { + deltaTotals.assertions.failed++; + deltaTotals.testCases.passed--; + deltaTotals.testCases.failed++; + } + m_totals.testCases += deltaTotals.testCases; + m_reporter->testCaseEnded( TestCaseStats( testInfo, + deltaTotals, + redirectedCout, + redirectedCerr, + aborting() ) ); + + m_activeTestCase = CATCH_NULL; + m_testCaseTracker = CATCH_NULL; + + return deltaTotals; + } + + Ptr config() const { + return m_config; + } + + private: // IResultCapture + + virtual void assertionEnded( AssertionResult const& result ) { + if( result.getResultType() == ResultWas::Ok ) { + m_totals.assertions.passed++; + } + else if( !result.isOk() ) { + if( m_activeTestCase->getTestCaseInfo().okToFail() ) + m_totals.assertions.failedButOk++; + else + m_totals.assertions.failed++; + } + + // We have no use for the return value (whether messages should be cleared), because messages were made scoped + // and should be let to clear themselves out. + static_cast(m_reporter->assertionEnded(AssertionStats(result, m_messages, m_totals))); + + // Reset working state + m_lastAssertionInfo = AssertionInfo( "", m_lastAssertionInfo.lineInfo, "{Unknown expression after the reported line}" , m_lastAssertionInfo.resultDisposition ); + m_lastResult = result; + } + + virtual bool lastAssertionPassed() + { + return m_totals.assertions.passed == (m_prevPassed + 1); + } + + virtual void assertionPassed() + { + m_totals.assertions.passed++; + m_lastAssertionInfo.capturedExpression = "{Unknown expression after the reported line}"; + m_lastAssertionInfo.macroName = ""; + } + + virtual void assertionRun() + { + m_prevPassed = m_totals.assertions.passed; + } + + virtual bool sectionStarted ( + SectionInfo const& sectionInfo, + Counts& assertions + ) + { + ITracker& sectionTracker = SectionTracker::acquire( m_trackerContext, TestCaseTracking::NameAndLocation( sectionInfo.name, sectionInfo.lineInfo ) ); + if( !sectionTracker.isOpen() ) + return false; + m_activeSections.push_back( §ionTracker ); + + m_lastAssertionInfo.lineInfo = sectionInfo.lineInfo; + + m_reporter->sectionStarting( sectionInfo ); + + assertions = m_totals.assertions; + + return true; + } + bool testForMissingAssertions( Counts& assertions ) { + if( assertions.total() != 0 ) + return false; + if( !m_config->warnAboutMissingAssertions() ) + return false; + if( m_trackerContext.currentTracker().hasChildren() ) + return false; + m_totals.assertions.failed++; + assertions.failed++; + return true; + } + + virtual void sectionEnded( SectionEndInfo const& endInfo ) { + Counts assertions = m_totals.assertions - endInfo.prevAssertions; + bool missingAssertions = testForMissingAssertions( assertions ); + + if( !m_activeSections.empty() ) { + m_activeSections.back()->close(); + m_activeSections.pop_back(); + } + + m_reporter->sectionEnded( SectionStats( endInfo.sectionInfo, assertions, endInfo.durationInSeconds, missingAssertions ) ); + m_messages.clear(); + } + + virtual void sectionEndedEarly( SectionEndInfo const& endInfo ) { + if( m_unfinishedSections.empty() ) + m_activeSections.back()->fail(); + else + m_activeSections.back()->close(); + m_activeSections.pop_back(); + + m_unfinishedSections.push_back( endInfo ); + } + + virtual void pushScopedMessage( MessageInfo const& message ) { + m_messages.push_back( message ); + } + + virtual void popScopedMessage( MessageInfo const& message ) { + m_messages.erase( std::remove( m_messages.begin(), m_messages.end(), message ), m_messages.end() ); + } + + virtual std::string getCurrentTestName() const { + return m_activeTestCase + ? m_activeTestCase->getTestCaseInfo().name + : std::string(); + } + + virtual const AssertionResult* getLastResult() const { + return &m_lastResult; + } + + virtual void exceptionEarlyReported() { + m_shouldReportUnexpected = false; + } + + virtual void handleFatalErrorCondition( std::string const& message ) { + // Don't rebuild the result -- the stringification itself can cause more fatal errors + // Instead, fake a result data. + AssertionResultData tempResult; + tempResult.resultType = ResultWas::FatalErrorCondition; + tempResult.message = message; + AssertionResult result(m_lastAssertionInfo, tempResult); + + getResultCapture().assertionEnded(result); + + handleUnfinishedSections(); + + // Recreate section for test case (as we will lose the one that was in scope) + TestCaseInfo const& testCaseInfo = m_activeTestCase->getTestCaseInfo(); + SectionInfo testCaseSection( testCaseInfo.lineInfo, testCaseInfo.name, testCaseInfo.description ); + + Counts assertions; + assertions.failed = 1; + SectionStats testCaseSectionStats( testCaseSection, assertions, 0, false ); + m_reporter->sectionEnded( testCaseSectionStats ); + + TestCaseInfo testInfo = m_activeTestCase->getTestCaseInfo(); + + Totals deltaTotals; + deltaTotals.testCases.failed = 1; + deltaTotals.assertions.failed = 1; + m_reporter->testCaseEnded( TestCaseStats( testInfo, + deltaTotals, + std::string(), + std::string(), + false ) ); + m_totals.testCases.failed++; + testGroupEnded( std::string(), m_totals, 1, 1 ); + m_reporter->testRunEnded( TestRunStats( m_runInfo, m_totals, false ) ); + } + + public: + // !TBD We need to do this another way! + bool aborting() const { + return m_totals.assertions.failed == static_cast( m_config->abortAfter() ); + } + + private: + + void runCurrentTest( std::string& redirectedCout, std::string& redirectedCerr ) { + TestCaseInfo const& testCaseInfo = m_activeTestCase->getTestCaseInfo(); + SectionInfo testCaseSection( testCaseInfo.lineInfo, testCaseInfo.name, testCaseInfo.description ); + m_reporter->sectionStarting( testCaseSection ); + Counts prevAssertions = m_totals.assertions; + double duration = 0; + m_shouldReportUnexpected = true; + try { + m_lastAssertionInfo = AssertionInfo( "TEST_CASE", testCaseInfo.lineInfo, "", ResultDisposition::Normal ); + + seedRng( *m_config ); + + Timer timer; + timer.start(); + if( m_reporter->getPreferences().shouldRedirectStdOut ) { + StreamRedirect coutRedir( Catch::cout(), redirectedCout ); + StdErrRedirect errRedir( redirectedCerr ); + invokeActiveTestCase(); + } + else { + invokeActiveTestCase(); + } + duration = timer.getElapsedSeconds(); + } + catch( TestFailureException& ) { + // This just means the test was aborted due to failure + } + catch(...) { + // Under CATCH_CONFIG_FAST_COMPILE, unexpected exceptions under REQUIRE assertions + // are reported without translation at the point of origin. + if (m_shouldReportUnexpected) { + makeUnexpectedResultBuilder().useActiveException(); + } + } + m_testCaseTracker->close(); + handleUnfinishedSections(); + m_messages.clear(); + + Counts assertions = m_totals.assertions - prevAssertions; + bool missingAssertions = testForMissingAssertions( assertions ); + + SectionStats testCaseSectionStats( testCaseSection, assertions, duration, missingAssertions ); + m_reporter->sectionEnded( testCaseSectionStats ); + } + + void invokeActiveTestCase() { + FatalConditionHandler fatalConditionHandler; // Handle signals + m_activeTestCase->invoke(); + fatalConditionHandler.reset(); + } + + private: + + ResultBuilder makeUnexpectedResultBuilder() const { + return ResultBuilder( m_lastAssertionInfo.macroName, + m_lastAssertionInfo.lineInfo, + m_lastAssertionInfo.capturedExpression, + m_lastAssertionInfo.resultDisposition ); + } + + void handleUnfinishedSections() { + // If sections ended prematurely due to an exception we stored their + // infos here so we can tear them down outside the unwind process. + for( std::vector::const_reverse_iterator it = m_unfinishedSections.rbegin(), + itEnd = m_unfinishedSections.rend(); + it != itEnd; + ++it ) + sectionEnded( *it ); + m_unfinishedSections.clear(); + } + + TestRunInfo m_runInfo; + IMutableContext& m_context; + TestCase const* m_activeTestCase; + ITracker* m_testCaseTracker; + ITracker* m_currentSectionTracker; + AssertionResult m_lastResult; + + Ptr m_config; + Totals m_totals; + Ptr m_reporter; + std::vector m_messages; + AssertionInfo m_lastAssertionInfo; + std::vector m_unfinishedSections; + std::vector m_activeSections; + TrackerContext m_trackerContext; + size_t m_prevPassed; + bool m_shouldReportUnexpected; + }; + + IResultCapture& getResultCapture() { + if( IResultCapture* capture = getCurrentContext().getResultCapture() ) + return *capture; + else + throw std::logic_error( "No result capture instance" ); + } + +} // end namespace Catch + +// #included from: internal/catch_version.h +#define TWOBLUECUBES_CATCH_VERSION_H_INCLUDED + +namespace Catch { + + // Versioning information + struct Version { + Version( unsigned int _majorVersion, + unsigned int _minorVersion, + unsigned int _patchNumber, + char const * const _branchName, + unsigned int _buildNumber ); + + unsigned int const majorVersion; + unsigned int const minorVersion; + unsigned int const patchNumber; + + // buildNumber is only used if branchName is not null + char const * const branchName; + unsigned int const buildNumber; + + friend std::ostream& operator << ( std::ostream& os, Version const& version ); + + private: + void operator=( Version const& ); + }; + + inline Version libraryVersion(); +} + +#include +#include +#include + +namespace Catch { + + Ptr createReporter( std::string const& reporterName, Ptr const& config ) { + Ptr reporter = getRegistryHub().getReporterRegistry().create( reporterName, config.get() ); + if( !reporter ) { + std::ostringstream oss; + oss << "No reporter registered with name: '" << reporterName << "'"; + throw std::domain_error( oss.str() ); + } + return reporter; + } + +#if !defined(CATCH_CONFIG_DEFAULT_REPORTER) +#define CATCH_CONFIG_DEFAULT_REPORTER "console" +#endif + + Ptr makeReporter( Ptr const& config ) { + std::vector reporters = config->getReporterNames(); + if( reporters.empty() ) + reporters.push_back( CATCH_CONFIG_DEFAULT_REPORTER ); + + Ptr reporter; + for( std::vector::const_iterator it = reporters.begin(), itEnd = reporters.end(); + it != itEnd; + ++it ) + reporter = addReporter( reporter, createReporter( *it, config ) ); + return reporter; + } + Ptr addListeners( Ptr const& config, Ptr reporters ) { + IReporterRegistry::Listeners listeners = getRegistryHub().getReporterRegistry().getListeners(); + for( IReporterRegistry::Listeners::const_iterator it = listeners.begin(), itEnd = listeners.end(); + it != itEnd; + ++it ) + reporters = addReporter(reporters, (*it)->create( ReporterConfig( config ) ) ); + return reporters; + } + + Totals runTests( Ptr const& config ) { + + Ptr iconfig = config.get(); + + Ptr reporter = makeReporter( config ); + reporter = addListeners( iconfig, reporter ); + + RunContext context( iconfig, reporter ); + + Totals totals; + + context.testGroupStarting( config->name(), 1, 1 ); + + TestSpec testSpec = config->testSpec(); + if( !testSpec.hasFilters() ) + testSpec = TestSpecParser( ITagAliasRegistry::get() ).parse( "~[.]" ).testSpec(); // All not hidden tests + + std::vector const& allTestCases = getAllTestCasesSorted( *iconfig ); + for( std::vector::const_iterator it = allTestCases.begin(), itEnd = allTestCases.end(); + it != itEnd; + ++it ) { + if( !context.aborting() && matchTest( *it, testSpec, *iconfig ) ) + totals += context.runTest( *it ); + else + reporter->skipTest( *it ); + } + + context.testGroupEnded( iconfig->name(), totals, 1, 1 ); + return totals; + } + + void applyFilenamesAsTags( IConfig const& config ) { + std::vector const& tests = getAllTestCasesSorted( config ); + for(std::size_t i = 0; i < tests.size(); ++i ) { + TestCase& test = const_cast( tests[i] ); + std::set tags = test.tags; + + std::string filename = test.lineInfo.file; + std::string::size_type lastSlash = filename.find_last_of( "\\/" ); + if( lastSlash != std::string::npos ) + filename = filename.substr( lastSlash+1 ); + + std::string::size_type lastDot = filename.find_last_of( '.' ); + if( lastDot != std::string::npos ) + filename = filename.substr( 0, lastDot ); + + tags.insert( '#' + filename ); + setTags( test, tags ); + } + } + + class Session : NonCopyable { + static bool alreadyInstantiated; + + public: + + struct OnUnusedOptions { enum DoWhat { Ignore, Fail }; }; + + Session() + : m_cli( makeCommandLineParser() ) { + if( alreadyInstantiated ) { + std::string msg = "Only one instance of Catch::Session can ever be used"; + Catch::cerr() << msg << std::endl; + throw std::logic_error( msg ); + } + alreadyInstantiated = true; + } + ~Session() { + Catch::cleanUp(); + } + + void showHelp( std::string const& processName ) { + Catch::cout() << "\nCatch v" << libraryVersion() << "\n"; + + m_cli.usage( Catch::cout(), processName ); + Catch::cout() << "For more detail usage please see the project docs\n" << std::endl; + } + void libIdentify() { + Catch::cout() + << std::left << std::setw(16) << "description: " << "A Catch test executable\n" + << std::left << std::setw(16) << "category: " << "testframework\n" + << std::left << std::setw(16) << "framework: " << "Catch Test\n" + << std::left << std::setw(16) << "version: " << libraryVersion() << std::endl; + } + + int applyCommandLine( int argc, char const* const* const argv, OnUnusedOptions::DoWhat unusedOptionBehaviour = OnUnusedOptions::Fail ) { + try { + m_cli.setThrowOnUnrecognisedTokens( unusedOptionBehaviour == OnUnusedOptions::Fail ); + m_unusedTokens = m_cli.parseInto( Clara::argsToVector( argc, argv ), m_configData ); + if( m_configData.showHelp ) + showHelp( m_configData.processName ); + if( m_configData.libIdentify ) + libIdentify(); + m_config.reset(); + } + catch( std::exception& ex ) { + { + Colour colourGuard( Colour::Red ); + Catch::cerr() + << "\nError(s) in input:\n" + << Text( ex.what(), TextAttributes().setIndent(2) ) + << "\n\n"; + } + m_cli.usage( Catch::cout(), m_configData.processName ); + return (std::numeric_limits::max)(); + } + return 0; + } + + void useConfigData( ConfigData const& _configData ) { + m_configData = _configData; + m_config.reset(); + } + + int run( int argc, char const* const* const argv ) { + + int returnCode = applyCommandLine( argc, argv ); + if( returnCode == 0 ) + returnCode = run(); + return returnCode; + } + + #if defined(WIN32) && defined(UNICODE) + int run( int argc, wchar_t const* const* const argv ) { + + char **utf8Argv = new char *[ argc ]; + + for ( int i = 0; i < argc; ++i ) { + int bufSize = WideCharToMultiByte( CP_UTF8, 0, argv[i], -1, NULL, 0, NULL, NULL ); + + utf8Argv[ i ] = new char[ bufSize ]; + + WideCharToMultiByte( CP_UTF8, 0, argv[i], -1, utf8Argv[i], bufSize, NULL, NULL ); + } + + int returnCode = applyCommandLine( argc, utf8Argv ); + if( returnCode == 0 ) + returnCode = run(); + + for ( int i = 0; i < argc; ++i ) + delete [] utf8Argv[ i ]; + + delete [] utf8Argv; + + return returnCode; + } + #endif + + int run() { + if( ( m_configData.waitForKeypress & WaitForKeypress::BeforeStart ) != 0 ) { + Catch::cout() << "...waiting for enter/ return before starting" << std::endl; + static_cast(std::getchar()); + } + int exitCode = runInternal(); + if( ( m_configData.waitForKeypress & WaitForKeypress::BeforeExit ) != 0 ) { + Catch::cout() << "...waiting for enter/ return before exiting, with code: " << exitCode << std::endl; + static_cast(std::getchar()); + } + return exitCode; + } + + Clara::CommandLine const& cli() const { + return m_cli; + } + std::vector const& unusedTokens() const { + return m_unusedTokens; + } + ConfigData& configData() { + return m_configData; + } + Config& config() { + if( !m_config ) + m_config = new Config( m_configData ); + return *m_config; + } + private: + + int runInternal() { + if( m_configData.showHelp || m_configData.libIdentify ) + return 0; + + try + { + config(); // Force config to be constructed + + seedRng( *m_config ); + + if( m_configData.filenamesAsTags ) + applyFilenamesAsTags( *m_config ); + + // Handle list request + if( Option listed = list( config() ) ) + return static_cast( *listed ); + + return static_cast( runTests( m_config ).assertions.failed ); + } + catch( std::exception& ex ) { + Catch::cerr() << ex.what() << std::endl; + return (std::numeric_limits::max)(); + } + } + + Clara::CommandLine m_cli; + std::vector m_unusedTokens; + ConfigData m_configData; + Ptr m_config; + }; + + bool Session::alreadyInstantiated = false; + +} // end namespace Catch + +// #included from: catch_registry_hub.hpp +#define TWOBLUECUBES_CATCH_REGISTRY_HUB_HPP_INCLUDED + +// #included from: catch_test_case_registry_impl.hpp +#define TWOBLUECUBES_CATCH_TEST_CASE_REGISTRY_IMPL_HPP_INCLUDED + +#include +#include +#include +#include + +namespace Catch { + + struct RandomNumberGenerator { + typedef unsigned int result_type; + + result_type operator()( result_type n ) const { return std::rand() % n; } + +#ifdef CATCH_CONFIG_CPP11_SHUFFLE + static constexpr result_type (min)() { return 0; } + static constexpr result_type (max)() { return 1000000; } + result_type operator()() const { return std::rand() % (max)(); } +#endif + template + static void shuffle( V& vector ) { + RandomNumberGenerator rng; +#ifdef CATCH_CONFIG_CPP11_SHUFFLE + std::shuffle( vector.begin(), vector.end(), rng ); +#else + std::random_shuffle( vector.begin(), vector.end(), rng ); +#endif + } + }; + + inline std::vector sortTests( IConfig const& config, std::vector const& unsortedTestCases ) { + + std::vector sorted = unsortedTestCases; + + switch( config.runOrder() ) { + case RunTests::InLexicographicalOrder: + std::sort( sorted.begin(), sorted.end() ); + break; + case RunTests::InRandomOrder: + { + seedRng( config ); + RandomNumberGenerator::shuffle( sorted ); + } + break; + case RunTests::InDeclarationOrder: + // already in declaration order + break; + } + return sorted; + } + bool matchTest( TestCase const& testCase, TestSpec const& testSpec, IConfig const& config ) { + return testSpec.matches( testCase ) && ( config.allowThrows() || !testCase.throws() ); + } + + void enforceNoDuplicateTestCases( std::vector const& functions ) { + std::set seenFunctions; + for( std::vector::const_iterator it = functions.begin(), itEnd = functions.end(); + it != itEnd; + ++it ) { + std::pair::const_iterator, bool> prev = seenFunctions.insert( *it ); + if( !prev.second ) { + std::ostringstream ss; + + ss << Colour( Colour::Red ) + << "error: TEST_CASE( \"" << it->name << "\" ) already defined.\n" + << "\tFirst seen at " << prev.first->getTestCaseInfo().lineInfo << '\n' + << "\tRedefined at " << it->getTestCaseInfo().lineInfo << std::endl; + + throw std::runtime_error(ss.str()); + } + } + } + + std::vector filterTests( std::vector const& testCases, TestSpec const& testSpec, IConfig const& config ) { + std::vector filtered; + filtered.reserve( testCases.size() ); + for( std::vector::const_iterator it = testCases.begin(), itEnd = testCases.end(); + it != itEnd; + ++it ) + if( matchTest( *it, testSpec, config ) ) + filtered.push_back( *it ); + return filtered; + } + std::vector const& getAllTestCasesSorted( IConfig const& config ) { + return getRegistryHub().getTestCaseRegistry().getAllTestsSorted( config ); + } + + class TestRegistry : public ITestCaseRegistry { + public: + TestRegistry() + : m_currentSortOrder( RunTests::InDeclarationOrder ), + m_unnamedCount( 0 ) + {} + virtual ~TestRegistry(); + + virtual void registerTest( TestCase const& testCase ) { + std::string name = testCase.getTestCaseInfo().name; + if( name.empty() ) { + std::ostringstream oss; + oss << "Anonymous test case " << ++m_unnamedCount; + return registerTest( testCase.withName( oss.str() ) ); + } + m_functions.push_back( testCase ); + } + + virtual std::vector const& getAllTests() const { + return m_functions; + } + virtual std::vector const& getAllTestsSorted( IConfig const& config ) const { + if( m_sortedFunctions.empty() ) + enforceNoDuplicateTestCases( m_functions ); + + if( m_currentSortOrder != config.runOrder() || m_sortedFunctions.empty() ) { + m_sortedFunctions = sortTests( config, m_functions ); + m_currentSortOrder = config.runOrder(); + } + return m_sortedFunctions; + } + + private: + std::vector m_functions; + mutable RunTests::InWhatOrder m_currentSortOrder; + mutable std::vector m_sortedFunctions; + size_t m_unnamedCount; + std::ios_base::Init m_ostreamInit; // Forces cout/ cerr to be initialised + }; + + /////////////////////////////////////////////////////////////////////////// + + class FreeFunctionTestCase : public SharedImpl { + public: + + FreeFunctionTestCase( TestFunction fun ) : m_fun( fun ) {} + + virtual void invoke() const { + m_fun(); + } + + private: + virtual ~FreeFunctionTestCase(); + + TestFunction m_fun; + }; + + inline std::string extractClassName( std::string const& classOrQualifiedMethodName ) { + std::string className = classOrQualifiedMethodName; + if( startsWith( className, '&' ) ) + { + std::size_t lastColons = className.rfind( "::" ); + std::size_t penultimateColons = className.rfind( "::", lastColons-1 ); + if( penultimateColons == std::string::npos ) + penultimateColons = 1; + className = className.substr( penultimateColons, lastColons-penultimateColons ); + } + return className; + } + + void registerTestCase + ( ITestCase* testCase, + char const* classOrQualifiedMethodName, + NameAndDesc const& nameAndDesc, + SourceLineInfo const& lineInfo ) { + + getMutableRegistryHub().registerTest + ( makeTestCase + ( testCase, + extractClassName( classOrQualifiedMethodName ), + nameAndDesc.name, + nameAndDesc.description, + lineInfo ) ); + } + void registerTestCaseFunction + ( TestFunction function, + SourceLineInfo const& lineInfo, + NameAndDesc const& nameAndDesc ) { + registerTestCase( new FreeFunctionTestCase( function ), "", nameAndDesc, lineInfo ); + } + + /////////////////////////////////////////////////////////////////////////// + + AutoReg::AutoReg + ( TestFunction function, + SourceLineInfo const& lineInfo, + NameAndDesc const& nameAndDesc ) { + registerTestCaseFunction( function, lineInfo, nameAndDesc ); + } + + AutoReg::~AutoReg() {} + +} // end namespace Catch + +// #included from: catch_reporter_registry.hpp +#define TWOBLUECUBES_CATCH_REPORTER_REGISTRY_HPP_INCLUDED + +#include + +namespace Catch { + + class ReporterRegistry : public IReporterRegistry { + + public: + + virtual ~ReporterRegistry() CATCH_OVERRIDE {} + + virtual IStreamingReporter* create( std::string const& name, Ptr const& config ) const CATCH_OVERRIDE { + FactoryMap::const_iterator it = m_factories.find( name ); + if( it == m_factories.end() ) + return CATCH_NULL; + return it->second->create( ReporterConfig( config ) ); + } + + void registerReporter( std::string const& name, Ptr const& factory ) { + m_factories.insert( std::make_pair( name, factory ) ); + } + void registerListener( Ptr const& factory ) { + m_listeners.push_back( factory ); + } + + virtual FactoryMap const& getFactories() const CATCH_OVERRIDE { + return m_factories; + } + virtual Listeners const& getListeners() const CATCH_OVERRIDE { + return m_listeners; + } + + private: + FactoryMap m_factories; + Listeners m_listeners; + }; +} + +// #included from: catch_exception_translator_registry.hpp +#define TWOBLUECUBES_CATCH_EXCEPTION_TRANSLATOR_REGISTRY_HPP_INCLUDED + +#ifdef __OBJC__ +#import "Foundation/Foundation.h" +#endif + +namespace Catch { + + class ExceptionTranslatorRegistry : public IExceptionTranslatorRegistry { + public: + ~ExceptionTranslatorRegistry() { + deleteAll( m_translators ); + } + + virtual void registerTranslator( const IExceptionTranslator* translator ) { + m_translators.push_back( translator ); + } + + virtual std::string translateActiveException() const { + try { +#ifdef __OBJC__ + // In Objective-C try objective-c exceptions first + @try { + return tryTranslators(); + } + @catch (NSException *exception) { + return Catch::toString( [exception description] ); + } +#else + return tryTranslators(); +#endif + } + catch( TestFailureException& ) { + throw; + } + catch( std::exception& ex ) { + return ex.what(); + } + catch( std::string& msg ) { + return msg; + } + catch( const char* msg ) { + return msg; + } + catch(...) { + return "Unknown exception"; + } + } + + std::string tryTranslators() const { + if( m_translators.empty() ) + throw; + else + return m_translators[0]->translate( m_translators.begin()+1, m_translators.end() ); + } + + private: + std::vector m_translators; + }; +} + +// #included from: catch_tag_alias_registry.h +#define TWOBLUECUBES_CATCH_TAG_ALIAS_REGISTRY_H_INCLUDED + +#include + +namespace Catch { + + class TagAliasRegistry : public ITagAliasRegistry { + public: + virtual ~TagAliasRegistry(); + virtual Option find( std::string const& alias ) const; + virtual std::string expandAliases( std::string const& unexpandedTestSpec ) const; + void add( std::string const& alias, std::string const& tag, SourceLineInfo const& lineInfo ); + + private: + std::map m_registry; + }; + +} // end namespace Catch + +namespace Catch { + + namespace { + + class RegistryHub : public IRegistryHub, public IMutableRegistryHub { + + RegistryHub( RegistryHub const& ); + void operator=( RegistryHub const& ); + + public: // IRegistryHub + RegistryHub() { + } + virtual IReporterRegistry const& getReporterRegistry() const CATCH_OVERRIDE { + return m_reporterRegistry; + } + virtual ITestCaseRegistry const& getTestCaseRegistry() const CATCH_OVERRIDE { + return m_testCaseRegistry; + } + virtual IExceptionTranslatorRegistry& getExceptionTranslatorRegistry() CATCH_OVERRIDE { + return m_exceptionTranslatorRegistry; + } + virtual ITagAliasRegistry const& getTagAliasRegistry() const CATCH_OVERRIDE { + return m_tagAliasRegistry; + } + + public: // IMutableRegistryHub + virtual void registerReporter( std::string const& name, Ptr const& factory ) CATCH_OVERRIDE { + m_reporterRegistry.registerReporter( name, factory ); + } + virtual void registerListener( Ptr const& factory ) CATCH_OVERRIDE { + m_reporterRegistry.registerListener( factory ); + } + virtual void registerTest( TestCase const& testInfo ) CATCH_OVERRIDE { + m_testCaseRegistry.registerTest( testInfo ); + } + virtual void registerTranslator( const IExceptionTranslator* translator ) CATCH_OVERRIDE { + m_exceptionTranslatorRegistry.registerTranslator( translator ); + } + virtual void registerTagAlias( std::string const& alias, std::string const& tag, SourceLineInfo const& lineInfo ) CATCH_OVERRIDE { + m_tagAliasRegistry.add( alias, tag, lineInfo ); + } + + private: + TestRegistry m_testCaseRegistry; + ReporterRegistry m_reporterRegistry; + ExceptionTranslatorRegistry m_exceptionTranslatorRegistry; + TagAliasRegistry m_tagAliasRegistry; + }; + + // Single, global, instance + inline RegistryHub*& getTheRegistryHub() { + static RegistryHub* theRegistryHub = CATCH_NULL; + if( !theRegistryHub ) + theRegistryHub = new RegistryHub(); + return theRegistryHub; + } + } + + IRegistryHub& getRegistryHub() { + return *getTheRegistryHub(); + } + IMutableRegistryHub& getMutableRegistryHub() { + return *getTheRegistryHub(); + } + void cleanUp() { + delete getTheRegistryHub(); + getTheRegistryHub() = CATCH_NULL; + cleanUpContext(); + } + std::string translateActiveException() { + return getRegistryHub().getExceptionTranslatorRegistry().translateActiveException(); + } + +} // end namespace Catch + +// #included from: catch_notimplemented_exception.hpp +#define TWOBLUECUBES_CATCH_NOTIMPLEMENTED_EXCEPTION_HPP_INCLUDED + +#include + +namespace Catch { + + NotImplementedException::NotImplementedException( SourceLineInfo const& lineInfo ) + : m_lineInfo( lineInfo ) { + std::ostringstream oss; + oss << lineInfo << ": function "; + oss << "not implemented"; + m_what = oss.str(); + } + + const char* NotImplementedException::what() const CATCH_NOEXCEPT { + return m_what.c_str(); + } + +} // end namespace Catch + +// #included from: catch_context_impl.hpp +#define TWOBLUECUBES_CATCH_CONTEXT_IMPL_HPP_INCLUDED + +// #included from: catch_stream.hpp +#define TWOBLUECUBES_CATCH_STREAM_HPP_INCLUDED + +#include +#include +#include + +namespace Catch { + + template + class StreamBufImpl : public StreamBufBase { + char data[bufferSize]; + WriterF m_writer; + + public: + StreamBufImpl() { + setp( data, data + sizeof(data) ); + } + + ~StreamBufImpl() CATCH_NOEXCEPT { + sync(); + } + + private: + int overflow( int c ) { + sync(); + + if( c != EOF ) { + if( pbase() == epptr() ) + m_writer( std::string( 1, static_cast( c ) ) ); + else + sputc( static_cast( c ) ); + } + return 0; + } + + int sync() { + if( pbase() != pptr() ) { + m_writer( std::string( pbase(), static_cast( pptr() - pbase() ) ) ); + setp( pbase(), epptr() ); + } + return 0; + } + }; + + /////////////////////////////////////////////////////////////////////////// + + FileStream::FileStream( std::string const& filename ) { + m_ofs.open( filename.c_str() ); + if( m_ofs.fail() ) { + std::ostringstream oss; + oss << "Unable to open file: '" << filename << '\''; + throw std::domain_error( oss.str() ); + } + } + + std::ostream& FileStream::stream() const { + return m_ofs; + } + + struct OutputDebugWriter { + + void operator()( std::string const&str ) { + writeToDebugConsole( str ); + } + }; + + DebugOutStream::DebugOutStream() + : m_streamBuf( new StreamBufImpl() ), + m_os( m_streamBuf.get() ) + {} + + std::ostream& DebugOutStream::stream() const { + return m_os; + } + + // Store the streambuf from cout up-front because + // cout may get redirected when running tests + CoutStream::CoutStream() + : m_os( Catch::cout().rdbuf() ) + {} + + std::ostream& CoutStream::stream() const { + return m_os; + } + +#ifndef CATCH_CONFIG_NOSTDOUT // If you #define this you must implement these functions + std::ostream& cout() { + return std::cout; + } + std::ostream& cerr() { + return std::cerr; + } + std::ostream& clog() { + return std::clog; + } +#endif +} + +namespace Catch { + + class Context : public IMutableContext { + + Context() : m_config( CATCH_NULL ), m_runner( CATCH_NULL ), m_resultCapture( CATCH_NULL ) {} + Context( Context const& ); + void operator=( Context const& ); + + public: + virtual ~Context() { + deleteAllValues( m_generatorsByTestName ); + } + + public: // IContext + virtual IResultCapture* getResultCapture() { + return m_resultCapture; + } + virtual IRunner* getRunner() { + return m_runner; + } + virtual size_t getGeneratorIndex( std::string const& fileInfo, size_t totalSize ) { + return getGeneratorsForCurrentTest() + .getGeneratorInfo( fileInfo, totalSize ) + .getCurrentIndex(); + } + virtual bool advanceGeneratorsForCurrentTest() { + IGeneratorsForTest* generators = findGeneratorsForCurrentTest(); + return generators && generators->moveNext(); + } + + virtual Ptr getConfig() const { + return m_config; + } + + public: // IMutableContext + virtual void setResultCapture( IResultCapture* resultCapture ) { + m_resultCapture = resultCapture; + } + virtual void setRunner( IRunner* runner ) { + m_runner = runner; + } + virtual void setConfig( Ptr const& config ) { + m_config = config; + } + + friend IMutableContext& getCurrentMutableContext(); + + private: + IGeneratorsForTest* findGeneratorsForCurrentTest() { + std::string testName = getResultCapture()->getCurrentTestName(); + + std::map::const_iterator it = + m_generatorsByTestName.find( testName ); + return it != m_generatorsByTestName.end() + ? it->second + : CATCH_NULL; + } + + IGeneratorsForTest& getGeneratorsForCurrentTest() { + IGeneratorsForTest* generators = findGeneratorsForCurrentTest(); + if( !generators ) { + std::string testName = getResultCapture()->getCurrentTestName(); + generators = createGeneratorsForTest(); + m_generatorsByTestName.insert( std::make_pair( testName, generators ) ); + } + return *generators; + } + + private: + Ptr m_config; + IRunner* m_runner; + IResultCapture* m_resultCapture; + std::map m_generatorsByTestName; + }; + + namespace { + Context* currentContext = CATCH_NULL; + } + IMutableContext& getCurrentMutableContext() { + if( !currentContext ) + currentContext = new Context(); + return *currentContext; + } + IContext& getCurrentContext() { + return getCurrentMutableContext(); + } + + void cleanUpContext() { + delete currentContext; + currentContext = CATCH_NULL; + } +} + +// #included from: catch_console_colour_impl.hpp +#define TWOBLUECUBES_CATCH_CONSOLE_COLOUR_IMPL_HPP_INCLUDED + +// #included from: catch_errno_guard.hpp +#define TWOBLUECUBES_CATCH_ERRNO_GUARD_HPP_INCLUDED + +#include + +namespace Catch { + + class ErrnoGuard { + public: + ErrnoGuard():m_oldErrno(errno){} + ~ErrnoGuard() { errno = m_oldErrno; } + private: + int m_oldErrno; + }; + +} + +namespace Catch { + namespace { + + struct IColourImpl { + virtual ~IColourImpl() {} + virtual void use( Colour::Code _colourCode ) = 0; + }; + + struct NoColourImpl : IColourImpl { + void use( Colour::Code ) {} + + static IColourImpl* instance() { + static NoColourImpl s_instance; + return &s_instance; + } + }; + + } // anon namespace +} // namespace Catch + +#if !defined( CATCH_CONFIG_COLOUR_NONE ) && !defined( CATCH_CONFIG_COLOUR_WINDOWS ) && !defined( CATCH_CONFIG_COLOUR_ANSI ) +# ifdef CATCH_PLATFORM_WINDOWS +# define CATCH_CONFIG_COLOUR_WINDOWS +# else +# define CATCH_CONFIG_COLOUR_ANSI +# endif +#endif + +#if defined ( CATCH_CONFIG_COLOUR_WINDOWS ) ///////////////////////////////////////// + +namespace Catch { +namespace { + + class Win32ColourImpl : public IColourImpl { + public: + Win32ColourImpl() : stdoutHandle( GetStdHandle(STD_OUTPUT_HANDLE) ) + { + CONSOLE_SCREEN_BUFFER_INFO csbiInfo; + GetConsoleScreenBufferInfo( stdoutHandle, &csbiInfo ); + originalForegroundAttributes = csbiInfo.wAttributes & ~( BACKGROUND_GREEN | BACKGROUND_RED | BACKGROUND_BLUE | BACKGROUND_INTENSITY ); + originalBackgroundAttributes = csbiInfo.wAttributes & ~( FOREGROUND_GREEN | FOREGROUND_RED | FOREGROUND_BLUE | FOREGROUND_INTENSITY ); + } + + virtual void use( Colour::Code _colourCode ) { + switch( _colourCode ) { + case Colour::None: return setTextAttribute( originalForegroundAttributes ); + case Colour::White: return setTextAttribute( FOREGROUND_GREEN | FOREGROUND_RED | FOREGROUND_BLUE ); + case Colour::Red: return setTextAttribute( FOREGROUND_RED ); + case Colour::Green: return setTextAttribute( FOREGROUND_GREEN ); + case Colour::Blue: return setTextAttribute( FOREGROUND_BLUE ); + case Colour::Cyan: return setTextAttribute( FOREGROUND_BLUE | FOREGROUND_GREEN ); + case Colour::Yellow: return setTextAttribute( FOREGROUND_RED | FOREGROUND_GREEN ); + case Colour::Grey: return setTextAttribute( 0 ); + + case Colour::LightGrey: return setTextAttribute( FOREGROUND_INTENSITY ); + case Colour::BrightRed: return setTextAttribute( FOREGROUND_INTENSITY | FOREGROUND_RED ); + case Colour::BrightGreen: return setTextAttribute( FOREGROUND_INTENSITY | FOREGROUND_GREEN ); + case Colour::BrightWhite: return setTextAttribute( FOREGROUND_INTENSITY | FOREGROUND_GREEN | FOREGROUND_RED | FOREGROUND_BLUE ); + + case Colour::Bright: throw std::logic_error( "not a colour" ); + } + } + + private: + void setTextAttribute( WORD _textAttribute ) { + SetConsoleTextAttribute( stdoutHandle, _textAttribute | originalBackgroundAttributes ); + } + HANDLE stdoutHandle; + WORD originalForegroundAttributes; + WORD originalBackgroundAttributes; + }; + + IColourImpl* platformColourInstance() { + static Win32ColourImpl s_instance; + + Ptr config = getCurrentContext().getConfig(); + UseColour::YesOrNo colourMode = config + ? config->useColour() + : UseColour::Auto; + if( colourMode == UseColour::Auto ) + colourMode = !isDebuggerActive() + ? UseColour::Yes + : UseColour::No; + return colourMode == UseColour::Yes + ? &s_instance + : NoColourImpl::instance(); + } + +} // end anon namespace +} // end namespace Catch + +#elif defined( CATCH_CONFIG_COLOUR_ANSI ) ////////////////////////////////////// + +#include + +namespace Catch { +namespace { + + // use POSIX/ ANSI console terminal codes + // Thanks to Adam Strzelecki for original contribution + // (http://github.com/nanoant) + // https://github.com/philsquared/Catch/pull/131 + class PosixColourImpl : public IColourImpl { + public: + virtual void use( Colour::Code _colourCode ) { + switch( _colourCode ) { + case Colour::None: + case Colour::White: return setColour( "[0m" ); + case Colour::Red: return setColour( "[0;31m" ); + case Colour::Green: return setColour( "[0;32m" ); + case Colour::Blue: return setColour( "[0;34m" ); + case Colour::Cyan: return setColour( "[0;36m" ); + case Colour::Yellow: return setColour( "[0;33m" ); + case Colour::Grey: return setColour( "[1;30m" ); + + case Colour::LightGrey: return setColour( "[0;37m" ); + case Colour::BrightRed: return setColour( "[1;31m" ); + case Colour::BrightGreen: return setColour( "[1;32m" ); + case Colour::BrightWhite: return setColour( "[1;37m" ); + + case Colour::Bright: throw std::logic_error( "not a colour" ); + } + } + static IColourImpl* instance() { + static PosixColourImpl s_instance; + return &s_instance; + } + + private: + void setColour( const char* _escapeCode ) { + Catch::cout() << '\033' << _escapeCode; + } + }; + + IColourImpl* platformColourInstance() { + ErrnoGuard guard; + Ptr config = getCurrentContext().getConfig(); + UseColour::YesOrNo colourMode = config + ? config->useColour() + : UseColour::Auto; + if( colourMode == UseColour::Auto ) + colourMode = (!isDebuggerActive() && isatty(STDOUT_FILENO) ) + ? UseColour::Yes + : UseColour::No; + return colourMode == UseColour::Yes + ? PosixColourImpl::instance() + : NoColourImpl::instance(); + } + +} // end anon namespace +} // end namespace Catch + +#else // not Windows or ANSI /////////////////////////////////////////////// + +namespace Catch { + + static IColourImpl* platformColourInstance() { return NoColourImpl::instance(); } + +} // end namespace Catch + +#endif // Windows/ ANSI/ None + +namespace Catch { + + Colour::Colour( Code _colourCode ) : m_moved( false ) { use( _colourCode ); } + Colour::Colour( Colour const& _other ) : m_moved( false ) { const_cast( _other ).m_moved = true; } + Colour::~Colour(){ if( !m_moved ) use( None ); } + + void Colour::use( Code _colourCode ) { + static IColourImpl* impl = platformColourInstance(); + impl->use( _colourCode ); + } + +} // end namespace Catch + +// #included from: catch_generators_impl.hpp +#define TWOBLUECUBES_CATCH_GENERATORS_IMPL_HPP_INCLUDED + +#include +#include +#include + +namespace Catch { + + struct GeneratorInfo : IGeneratorInfo { + + GeneratorInfo( std::size_t size ) + : m_size( size ), + m_currentIndex( 0 ) + {} + + bool moveNext() { + if( ++m_currentIndex == m_size ) { + m_currentIndex = 0; + return false; + } + return true; + } + + std::size_t getCurrentIndex() const { + return m_currentIndex; + } + + std::size_t m_size; + std::size_t m_currentIndex; + }; + + /////////////////////////////////////////////////////////////////////////// + + class GeneratorsForTest : public IGeneratorsForTest { + + public: + ~GeneratorsForTest() { + deleteAll( m_generatorsInOrder ); + } + + IGeneratorInfo& getGeneratorInfo( std::string const& fileInfo, std::size_t size ) { + std::map::const_iterator it = m_generatorsByName.find( fileInfo ); + if( it == m_generatorsByName.end() ) { + IGeneratorInfo* info = new GeneratorInfo( size ); + m_generatorsByName.insert( std::make_pair( fileInfo, info ) ); + m_generatorsInOrder.push_back( info ); + return *info; + } + return *it->second; + } + + bool moveNext() { + std::vector::const_iterator it = m_generatorsInOrder.begin(); + std::vector::const_iterator itEnd = m_generatorsInOrder.end(); + for(; it != itEnd; ++it ) { + if( (*it)->moveNext() ) + return true; + } + return false; + } + + private: + std::map m_generatorsByName; + std::vector m_generatorsInOrder; + }; + + IGeneratorsForTest* createGeneratorsForTest() + { + return new GeneratorsForTest(); + } + +} // end namespace Catch + +// #included from: catch_assertionresult.hpp +#define TWOBLUECUBES_CATCH_ASSERTIONRESULT_HPP_INCLUDED + +namespace Catch { + + AssertionInfo::AssertionInfo():macroName(""), capturedExpression(""), resultDisposition(ResultDisposition::Normal), secondArg(""){} + + AssertionInfo::AssertionInfo( char const * _macroName, + SourceLineInfo const& _lineInfo, + char const * _capturedExpression, + ResultDisposition::Flags _resultDisposition, + char const * _secondArg) + : macroName( _macroName ), + lineInfo( _lineInfo ), + capturedExpression( _capturedExpression ), + resultDisposition( _resultDisposition ), + secondArg( _secondArg ) + {} + + AssertionResult::AssertionResult() {} + + AssertionResult::AssertionResult( AssertionInfo const& info, AssertionResultData const& data ) + : m_info( info ), + m_resultData( data ) + {} + + AssertionResult::~AssertionResult() {} + + // Result was a success + bool AssertionResult::succeeded() const { + return Catch::isOk( m_resultData.resultType ); + } + + // Result was a success, or failure is suppressed + bool AssertionResult::isOk() const { + return Catch::isOk( m_resultData.resultType ) || shouldSuppressFailure( m_info.resultDisposition ); + } + + ResultWas::OfType AssertionResult::getResultType() const { + return m_resultData.resultType; + } + + bool AssertionResult::hasExpression() const { + return m_info.capturedExpression[0] != 0; + } + + bool AssertionResult::hasMessage() const { + return !m_resultData.message.empty(); + } + + std::string capturedExpressionWithSecondArgument( char const * capturedExpression, char const * secondArg ) { + return (secondArg[0] == 0 || secondArg[0] == '"' && secondArg[1] == '"') + ? capturedExpression + : std::string(capturedExpression) + ", " + secondArg; + } + + std::string AssertionResult::getExpression() const { + if( isFalseTest( m_info.resultDisposition ) ) + return "!(" + capturedExpressionWithSecondArgument(m_info.capturedExpression, m_info.secondArg) + ")"; + else + return capturedExpressionWithSecondArgument(m_info.capturedExpression, m_info.secondArg); + } + std::string AssertionResult::getExpressionInMacro() const { + if( m_info.macroName[0] == 0 ) + return capturedExpressionWithSecondArgument(m_info.capturedExpression, m_info.secondArg); + else + return std::string(m_info.macroName) + "( " + capturedExpressionWithSecondArgument(m_info.capturedExpression, m_info.secondArg) + " )"; + } + + bool AssertionResult::hasExpandedExpression() const { + return hasExpression() && getExpandedExpression() != getExpression(); + } + + std::string AssertionResult::getExpandedExpression() const { + return m_resultData.reconstructExpression(); + } + + std::string AssertionResult::getMessage() const { + return m_resultData.message; + } + SourceLineInfo AssertionResult::getSourceInfo() const { + return m_info.lineInfo; + } + + std::string AssertionResult::getTestMacroName() const { + return m_info.macroName; + } + + void AssertionResult::discardDecomposedExpression() const { + m_resultData.decomposedExpression = CATCH_NULL; + } + + void AssertionResult::expandDecomposedExpression() const { + m_resultData.reconstructExpression(); + } + +} // end namespace Catch + +// #included from: catch_test_case_info.hpp +#define TWOBLUECUBES_CATCH_TEST_CASE_INFO_HPP_INCLUDED + +#include + +namespace Catch { + + inline TestCaseInfo::SpecialProperties parseSpecialTag( std::string const& tag ) { + if( startsWith( tag, '.' ) || + tag == "hide" || + tag == "!hide" ) + return TestCaseInfo::IsHidden; + else if( tag == "!throws" ) + return TestCaseInfo::Throws; + else if( tag == "!shouldfail" ) + return TestCaseInfo::ShouldFail; + else if( tag == "!mayfail" ) + return TestCaseInfo::MayFail; + else if( tag == "!nonportable" ) + return TestCaseInfo::NonPortable; + else + return TestCaseInfo::None; + } + inline bool isReservedTag( std::string const& tag ) { + return parseSpecialTag( tag ) == TestCaseInfo::None && tag.size() > 0 && !std::isalnum( tag[0] ); + } + inline void enforceNotReservedTag( std::string const& tag, SourceLineInfo const& _lineInfo ) { + if( isReservedTag( tag ) ) { + std::ostringstream ss; + ss << Colour(Colour::Red) + << "Tag name [" << tag << "] not allowed.\n" + << "Tag names starting with non alpha-numeric characters are reserved\n" + << Colour(Colour::FileName) + << _lineInfo << '\n'; + throw std::runtime_error(ss.str()); + } + } + + TestCase makeTestCase( ITestCase* _testCase, + std::string const& _className, + std::string const& _name, + std::string const& _descOrTags, + SourceLineInfo const& _lineInfo ) + { + bool isHidden( startsWith( _name, "./" ) ); // Legacy support + + // Parse out tags + std::set tags; + std::string desc, tag; + bool inTag = false; + for( std::size_t i = 0; i < _descOrTags.size(); ++i ) { + char c = _descOrTags[i]; + if( !inTag ) { + if( c == '[' ) + inTag = true; + else + desc += c; + } + else { + if( c == ']' ) { + TestCaseInfo::SpecialProperties prop = parseSpecialTag( tag ); + if( prop == TestCaseInfo::IsHidden ) + isHidden = true; + else if( prop == TestCaseInfo::None ) + enforceNotReservedTag( tag, _lineInfo ); + + tags.insert( tag ); + tag.clear(); + inTag = false; + } + else + tag += c; + } + } + if( isHidden ) { + tags.insert( "hide" ); + tags.insert( "." ); + } + + TestCaseInfo info( _name, _className, desc, tags, _lineInfo ); + return TestCase( _testCase, info ); + } + + void setTags( TestCaseInfo& testCaseInfo, std::set const& tags ) + { + testCaseInfo.tags = tags; + testCaseInfo.lcaseTags.clear(); + + std::ostringstream oss; + for( std::set::const_iterator it = tags.begin(), itEnd = tags.end(); it != itEnd; ++it ) { + oss << '[' << *it << ']'; + std::string lcaseTag = toLower( *it ); + testCaseInfo.properties = static_cast( testCaseInfo.properties | parseSpecialTag( lcaseTag ) ); + testCaseInfo.lcaseTags.insert( lcaseTag ); + } + testCaseInfo.tagsAsString = oss.str(); + } + + TestCaseInfo::TestCaseInfo( std::string const& _name, + std::string const& _className, + std::string const& _description, + std::set const& _tags, + SourceLineInfo const& _lineInfo ) + : name( _name ), + className( _className ), + description( _description ), + lineInfo( _lineInfo ), + properties( None ) + { + setTags( *this, _tags ); + } + + TestCaseInfo::TestCaseInfo( TestCaseInfo const& other ) + : name( other.name ), + className( other.className ), + description( other.description ), + tags( other.tags ), + lcaseTags( other.lcaseTags ), + tagsAsString( other.tagsAsString ), + lineInfo( other.lineInfo ), + properties( other.properties ) + {} + + bool TestCaseInfo::isHidden() const { + return ( properties & IsHidden ) != 0; + } + bool TestCaseInfo::throws() const { + return ( properties & Throws ) != 0; + } + bool TestCaseInfo::okToFail() const { + return ( properties & (ShouldFail | MayFail ) ) != 0; + } + bool TestCaseInfo::expectedToFail() const { + return ( properties & (ShouldFail ) ) != 0; + } + + TestCase::TestCase( ITestCase* testCase, TestCaseInfo const& info ) : TestCaseInfo( info ), test( testCase ) {} + + TestCase::TestCase( TestCase const& other ) + : TestCaseInfo( other ), + test( other.test ) + {} + + TestCase TestCase::withName( std::string const& _newName ) const { + TestCase other( *this ); + other.name = _newName; + return other; + } + + void TestCase::swap( TestCase& other ) { + test.swap( other.test ); + name.swap( other.name ); + className.swap( other.className ); + description.swap( other.description ); + tags.swap( other.tags ); + lcaseTags.swap( other.lcaseTags ); + tagsAsString.swap( other.tagsAsString ); + std::swap( TestCaseInfo::properties, static_cast( other ).properties ); + std::swap( lineInfo, other.lineInfo ); + } + + void TestCase::invoke() const { + test->invoke(); + } + + bool TestCase::operator == ( TestCase const& other ) const { + return test.get() == other.test.get() && + name == other.name && + className == other.className; + } + + bool TestCase::operator < ( TestCase const& other ) const { + return name < other.name; + } + TestCase& TestCase::operator = ( TestCase const& other ) { + TestCase temp( other ); + swap( temp ); + return *this; + } + + TestCaseInfo const& TestCase::getTestCaseInfo() const + { + return *this; + } + +} // end namespace Catch + +// #included from: catch_version.hpp +#define TWOBLUECUBES_CATCH_VERSION_HPP_INCLUDED + +namespace Catch { + + Version::Version + ( unsigned int _majorVersion, + unsigned int _minorVersion, + unsigned int _patchNumber, + char const * const _branchName, + unsigned int _buildNumber ) + : majorVersion( _majorVersion ), + minorVersion( _minorVersion ), + patchNumber( _patchNumber ), + branchName( _branchName ), + buildNumber( _buildNumber ) + {} + + std::ostream& operator << ( std::ostream& os, Version const& version ) { + os << version.majorVersion << '.' + << version.minorVersion << '.' + << version.patchNumber; + // branchName is never null -> 0th char is \0 if it is empty + if (version.branchName[0]) { + os << '-' << version.branchName + << '.' << version.buildNumber; + } + return os; + } + + inline Version libraryVersion() { + static Version version( 1, 12, 1, "", 0 ); + return version; + } + +} + +// #included from: catch_message.hpp +#define TWOBLUECUBES_CATCH_MESSAGE_HPP_INCLUDED + +namespace Catch { + + MessageInfo::MessageInfo( std::string const& _macroName, + SourceLineInfo const& _lineInfo, + ResultWas::OfType _type ) + : macroName( _macroName ), + lineInfo( _lineInfo ), + type( _type ), + sequence( ++globalCount ) + {} + + // This may need protecting if threading support is added + unsigned int MessageInfo::globalCount = 0; + + //////////////////////////////////////////////////////////////////////////// + + ScopedMessage::ScopedMessage( MessageBuilder const& builder ) + : m_info( builder.m_info ) + { + m_info.message = builder.m_stream.str(); + getResultCapture().pushScopedMessage( m_info ); + } + ScopedMessage::ScopedMessage( ScopedMessage const& other ) + : m_info( other.m_info ) + {} + +#if defined(_MSC_VER) +#pragma warning(push) +#pragma warning(disable:4996) // std::uncaught_exception is deprecated in C++17 +#endif + ScopedMessage::~ScopedMessage() { + if ( !std::uncaught_exception() ){ + getResultCapture().popScopedMessage(m_info); + } + } +#if defined(_MSC_VER) +#pragma warning(pop) +#endif + +} // end namespace Catch + +// #included from: catch_legacy_reporter_adapter.hpp +#define TWOBLUECUBES_CATCH_LEGACY_REPORTER_ADAPTER_HPP_INCLUDED + +// #included from: catch_legacy_reporter_adapter.h +#define TWOBLUECUBES_CATCH_LEGACY_REPORTER_ADAPTER_H_INCLUDED + +namespace Catch +{ + // Deprecated + struct IReporter : IShared { + virtual ~IReporter(); + + virtual bool shouldRedirectStdout() const = 0; + + virtual void StartTesting() = 0; + virtual void EndTesting( Totals const& totals ) = 0; + virtual void StartGroup( std::string const& groupName ) = 0; + virtual void EndGroup( std::string const& groupName, Totals const& totals ) = 0; + virtual void StartTestCase( TestCaseInfo const& testInfo ) = 0; + virtual void EndTestCase( TestCaseInfo const& testInfo, Totals const& totals, std::string const& stdOut, std::string const& stdErr ) = 0; + virtual void StartSection( std::string const& sectionName, std::string const& description ) = 0; + virtual void EndSection( std::string const& sectionName, Counts const& assertions ) = 0; + virtual void NoAssertionsInSection( std::string const& sectionName ) = 0; + virtual void NoAssertionsInTestCase( std::string const& testName ) = 0; + virtual void Aborted() = 0; + virtual void Result( AssertionResult const& result ) = 0; + }; + + class LegacyReporterAdapter : public SharedImpl + { + public: + LegacyReporterAdapter( Ptr const& legacyReporter ); + virtual ~LegacyReporterAdapter(); + + virtual ReporterPreferences getPreferences() const; + virtual void noMatchingTestCases( std::string const& ); + virtual void testRunStarting( TestRunInfo const& ); + virtual void testGroupStarting( GroupInfo const& groupInfo ); + virtual void testCaseStarting( TestCaseInfo const& testInfo ); + virtual void sectionStarting( SectionInfo const& sectionInfo ); + virtual void assertionStarting( AssertionInfo const& ); + virtual bool assertionEnded( AssertionStats const& assertionStats ); + virtual void sectionEnded( SectionStats const& sectionStats ); + virtual void testCaseEnded( TestCaseStats const& testCaseStats ); + virtual void testGroupEnded( TestGroupStats const& testGroupStats ); + virtual void testRunEnded( TestRunStats const& testRunStats ); + virtual void skipTest( TestCaseInfo const& ); + + private: + Ptr m_legacyReporter; + }; +} + +namespace Catch +{ + LegacyReporterAdapter::LegacyReporterAdapter( Ptr const& legacyReporter ) + : m_legacyReporter( legacyReporter ) + {} + LegacyReporterAdapter::~LegacyReporterAdapter() {} + + ReporterPreferences LegacyReporterAdapter::getPreferences() const { + ReporterPreferences prefs; + prefs.shouldRedirectStdOut = m_legacyReporter->shouldRedirectStdout(); + return prefs; + } + + void LegacyReporterAdapter::noMatchingTestCases( std::string const& ) {} + void LegacyReporterAdapter::testRunStarting( TestRunInfo const& ) { + m_legacyReporter->StartTesting(); + } + void LegacyReporterAdapter::testGroupStarting( GroupInfo const& groupInfo ) { + m_legacyReporter->StartGroup( groupInfo.name ); + } + void LegacyReporterAdapter::testCaseStarting( TestCaseInfo const& testInfo ) { + m_legacyReporter->StartTestCase( testInfo ); + } + void LegacyReporterAdapter::sectionStarting( SectionInfo const& sectionInfo ) { + m_legacyReporter->StartSection( sectionInfo.name, sectionInfo.description ); + } + void LegacyReporterAdapter::assertionStarting( AssertionInfo const& ) { + // Not on legacy interface + } + + bool LegacyReporterAdapter::assertionEnded( AssertionStats const& assertionStats ) { + if( assertionStats.assertionResult.getResultType() != ResultWas::Ok ) { + for( std::vector::const_iterator it = assertionStats.infoMessages.begin(), itEnd = assertionStats.infoMessages.end(); + it != itEnd; + ++it ) { + if( it->type == ResultWas::Info ) { + ResultBuilder rb( it->macroName.c_str(), it->lineInfo, "", ResultDisposition::Normal ); + rb << it->message; + rb.setResultType( ResultWas::Info ); + AssertionResult result = rb.build(); + m_legacyReporter->Result( result ); + } + } + } + m_legacyReporter->Result( assertionStats.assertionResult ); + return true; + } + void LegacyReporterAdapter::sectionEnded( SectionStats const& sectionStats ) { + if( sectionStats.missingAssertions ) + m_legacyReporter->NoAssertionsInSection( sectionStats.sectionInfo.name ); + m_legacyReporter->EndSection( sectionStats.sectionInfo.name, sectionStats.assertions ); + } + void LegacyReporterAdapter::testCaseEnded( TestCaseStats const& testCaseStats ) { + m_legacyReporter->EndTestCase + ( testCaseStats.testInfo, + testCaseStats.totals, + testCaseStats.stdOut, + testCaseStats.stdErr ); + } + void LegacyReporterAdapter::testGroupEnded( TestGroupStats const& testGroupStats ) { + if( testGroupStats.aborting ) + m_legacyReporter->Aborted(); + m_legacyReporter->EndGroup( testGroupStats.groupInfo.name, testGroupStats.totals ); + } + void LegacyReporterAdapter::testRunEnded( TestRunStats const& testRunStats ) { + m_legacyReporter->EndTesting( testRunStats.totals ); + } + void LegacyReporterAdapter::skipTest( TestCaseInfo const& ) { + } +} + +// #included from: catch_timer.hpp + +#ifdef __clang__ +#pragma clang diagnostic push +#pragma clang diagnostic ignored "-Wc++11-long-long" +#endif + +#ifdef CATCH_PLATFORM_WINDOWS + +#else + +#include + +#endif + +namespace Catch { + + namespace { +#ifdef CATCH_PLATFORM_WINDOWS + UInt64 getCurrentTicks() { + static UInt64 hz=0, hzo=0; + if (!hz) { + QueryPerformanceFrequency( reinterpret_cast( &hz ) ); + QueryPerformanceCounter( reinterpret_cast( &hzo ) ); + } + UInt64 t; + QueryPerformanceCounter( reinterpret_cast( &t ) ); + return ((t-hzo)*1000000)/hz; + } +#else + UInt64 getCurrentTicks() { + timeval t; + gettimeofday(&t,CATCH_NULL); + return static_cast( t.tv_sec ) * 1000000ull + static_cast( t.tv_usec ); + } +#endif + } + + void Timer::start() { + m_ticks = getCurrentTicks(); + } + unsigned int Timer::getElapsedMicroseconds() const { + return static_cast(getCurrentTicks() - m_ticks); + } + unsigned int Timer::getElapsedMilliseconds() const { + return static_cast(getElapsedMicroseconds()/1000); + } + double Timer::getElapsedSeconds() const { + return getElapsedMicroseconds()/1000000.0; + } + +} // namespace Catch + +#ifdef __clang__ +#pragma clang diagnostic pop +#endif +// #included from: catch_common.hpp +#define TWOBLUECUBES_CATCH_COMMON_HPP_INCLUDED + +#include +#include + +namespace Catch { + + bool startsWith( std::string const& s, std::string const& prefix ) { + return s.size() >= prefix.size() && std::equal(prefix.begin(), prefix.end(), s.begin()); + } + bool startsWith( std::string const& s, char prefix ) { + return !s.empty() && s[0] == prefix; + } + bool endsWith( std::string const& s, std::string const& suffix ) { + return s.size() >= suffix.size() && std::equal(suffix.rbegin(), suffix.rend(), s.rbegin()); + } + bool endsWith( std::string const& s, char suffix ) { + return !s.empty() && s[s.size()-1] == suffix; + } + bool contains( std::string const& s, std::string const& infix ) { + return s.find( infix ) != std::string::npos; + } + char toLowerCh(char c) { + return static_cast( std::tolower( c ) ); + } + void toLowerInPlace( std::string& s ) { + std::transform( s.begin(), s.end(), s.begin(), toLowerCh ); + } + std::string toLower( std::string const& s ) { + std::string lc = s; + toLowerInPlace( lc ); + return lc; + } + std::string trim( std::string const& str ) { + static char const* whitespaceChars = "\n\r\t "; + std::string::size_type start = str.find_first_not_of( whitespaceChars ); + std::string::size_type end = str.find_last_not_of( whitespaceChars ); + + return start != std::string::npos ? str.substr( start, 1+end-start ) : std::string(); + } + + bool replaceInPlace( std::string& str, std::string const& replaceThis, std::string const& withThis ) { + bool replaced = false; + std::size_t i = str.find( replaceThis ); + while( i != std::string::npos ) { + replaced = true; + str = str.substr( 0, i ) + withThis + str.substr( i+replaceThis.size() ); + if( i < str.size()-withThis.size() ) + i = str.find( replaceThis, i+withThis.size() ); + else + i = std::string::npos; + } + return replaced; + } + + pluralise::pluralise( std::size_t count, std::string const& label ) + : m_count( count ), + m_label( label ) + {} + + std::ostream& operator << ( std::ostream& os, pluralise const& pluraliser ) { + os << pluraliser.m_count << ' ' << pluraliser.m_label; + if( pluraliser.m_count != 1 ) + os << 's'; + return os; + } + + SourceLineInfo::SourceLineInfo() : file(""), line( 0 ){} + SourceLineInfo::SourceLineInfo( char const* _file, std::size_t _line ) + : file( _file ), + line( _line ) + {} + bool SourceLineInfo::empty() const { + return file[0] == '\0'; + } + bool SourceLineInfo::operator == ( SourceLineInfo const& other ) const { + return line == other.line && (file == other.file || std::strcmp(file, other.file) == 0); + } + bool SourceLineInfo::operator < ( SourceLineInfo const& other ) const { + return line < other.line || ( line == other.line && (std::strcmp(file, other.file) < 0)); + } + + void seedRng( IConfig const& config ) { + if( config.rngSeed() != 0 ) + std::srand( config.rngSeed() ); + } + unsigned int rngSeed() { + return getCurrentContext().getConfig()->rngSeed(); + } + + std::ostream& operator << ( std::ostream& os, SourceLineInfo const& info ) { +#ifndef __GNUG__ + os << info.file << '(' << info.line << ')'; +#else + os << info.file << ':' << info.line; +#endif + return os; + } + + void throwLogicError( std::string const& message, SourceLineInfo const& locationInfo ) { + std::ostringstream oss; + oss << locationInfo << ": Internal Catch error: '" << message << '\''; + if( alwaysTrue() ) + throw std::logic_error( oss.str() ); + } +} + +// #included from: catch_section.hpp +#define TWOBLUECUBES_CATCH_SECTION_HPP_INCLUDED + +namespace Catch { + + SectionInfo::SectionInfo + ( SourceLineInfo const& _lineInfo, + std::string const& _name, + std::string const& _description ) + : name( _name ), + description( _description ), + lineInfo( _lineInfo ) + {} + + Section::Section( SectionInfo const& info ) + : m_info( info ), + m_sectionIncluded( getResultCapture().sectionStarted( m_info, m_assertions ) ) + { + m_timer.start(); + } + +#if defined(_MSC_VER) +#pragma warning(push) +#pragma warning(disable:4996) // std::uncaught_exception is deprecated in C++17 +#endif + Section::~Section() { + if( m_sectionIncluded ) { + SectionEndInfo endInfo( m_info, m_assertions, m_timer.getElapsedSeconds() ); + if( std::uncaught_exception() ) + getResultCapture().sectionEndedEarly( endInfo ); + else + getResultCapture().sectionEnded( endInfo ); + } + } +#if defined(_MSC_VER) +#pragma warning(pop) +#endif + + // This indicates whether the section should be executed or not + Section::operator bool() const { + return m_sectionIncluded; + } + +} // end namespace Catch + +// #included from: catch_debugger.hpp +#define TWOBLUECUBES_CATCH_DEBUGGER_HPP_INCLUDED + +#ifdef CATCH_PLATFORM_MAC + + #include + #include + #include + #include + #include + + namespace Catch{ + + // The following function is taken directly from the following technical note: + // http://developer.apple.com/library/mac/#qa/qa2004/qa1361.html + + // Returns true if the current process is being debugged (either + // running under the debugger or has a debugger attached post facto). + bool isDebuggerActive(){ + + int mib[4]; + struct kinfo_proc info; + size_t size; + + // Initialize the flags so that, if sysctl fails for some bizarre + // reason, we get a predictable result. + + info.kp_proc.p_flag = 0; + + // Initialize mib, which tells sysctl the info we want, in this case + // we're looking for information about a specific process ID. + + mib[0] = CTL_KERN; + mib[1] = KERN_PROC; + mib[2] = KERN_PROC_PID; + mib[3] = getpid(); + + // Call sysctl. + + size = sizeof(info); + if( sysctl(mib, sizeof(mib) / sizeof(*mib), &info, &size, CATCH_NULL, 0) != 0 ) { + Catch::cerr() << "\n** Call to sysctl failed - unable to determine if debugger is active **\n" << std::endl; + return false; + } + + // We're being debugged if the P_TRACED flag is set. + + return ( (info.kp_proc.p_flag & P_TRACED) != 0 ); + } + } // namespace Catch + +#elif defined(CATCH_PLATFORM_LINUX) + #include + #include + + namespace Catch{ + // The standard POSIX way of detecting a debugger is to attempt to + // ptrace() the process, but this needs to be done from a child and not + // this process itself to still allow attaching to this process later + // if wanted, so is rather heavy. Under Linux we have the PID of the + // "debugger" (which doesn't need to be gdb, of course, it could also + // be strace, for example) in /proc/$PID/status, so just get it from + // there instead. + bool isDebuggerActive(){ + // Libstdc++ has a bug, where std::ifstream sets errno to 0 + // This way our users can properly assert over errno values + ErrnoGuard guard; + std::ifstream in("/proc/self/status"); + for( std::string line; std::getline(in, line); ) { + static const int PREFIX_LEN = 11; + if( line.compare(0, PREFIX_LEN, "TracerPid:\t") == 0 ) { + // We're traced if the PID is not 0 and no other PID starts + // with 0 digit, so it's enough to check for just a single + // character. + return line.length() > PREFIX_LEN && line[PREFIX_LEN] != '0'; + } + } + + return false; + } + } // namespace Catch +#elif defined(_MSC_VER) + extern "C" __declspec(dllimport) int __stdcall IsDebuggerPresent(); + namespace Catch { + bool isDebuggerActive() { + return IsDebuggerPresent() != 0; + } + } +#elif defined(__MINGW32__) + extern "C" __declspec(dllimport) int __stdcall IsDebuggerPresent(); + namespace Catch { + bool isDebuggerActive() { + return IsDebuggerPresent() != 0; + } + } +#else + namespace Catch { + inline bool isDebuggerActive() { return false; } + } +#endif // Platform + +#ifdef CATCH_PLATFORM_WINDOWS + + namespace Catch { + void writeToDebugConsole( std::string const& text ) { + ::OutputDebugStringA( text.c_str() ); + } + } +#else + namespace Catch { + void writeToDebugConsole( std::string const& text ) { + // !TBD: Need a version for Mac/ XCode and other IDEs + Catch::cout() << text; + } + } +#endif // Platform + +// #included from: catch_tostring.hpp +#define TWOBLUECUBES_CATCH_TOSTRING_HPP_INCLUDED + +namespace Catch { + +namespace Detail { + + const std::string unprintableString = "{?}"; + + namespace { + const int hexThreshold = 255; + + struct Endianness { + enum Arch { Big, Little }; + + static Arch which() { + union _{ + int asInt; + char asChar[sizeof (int)]; + } u; + + u.asInt = 1; + return ( u.asChar[sizeof(int)-1] == 1 ) ? Big : Little; + } + }; + } + + std::string rawMemoryToString( const void *object, std::size_t size ) + { + // Reverse order for little endian architectures + int i = 0, end = static_cast( size ), inc = 1; + if( Endianness::which() == Endianness::Little ) { + i = end-1; + end = inc = -1; + } + + unsigned char const *bytes = static_cast(object); + std::ostringstream os; + os << "0x" << std::setfill('0') << std::hex; + for( ; i != end; i += inc ) + os << std::setw(2) << static_cast(bytes[i]); + return os.str(); + } +} + +std::string toString( std::string const& value ) { + std::string s = value; + if( getCurrentContext().getConfig()->showInvisibles() ) { + for(size_t i = 0; i < s.size(); ++i ) { + std::string subs; + switch( s[i] ) { + case '\n': subs = "\\n"; break; + case '\t': subs = "\\t"; break; + default: break; + } + if( !subs.empty() ) { + s = s.substr( 0, i ) + subs + s.substr( i+1 ); + ++i; + } + } + } + return '"' + s + '"'; +} +std::string toString( std::wstring const& value ) { + + std::string s; + s.reserve( value.size() ); + for(size_t i = 0; i < value.size(); ++i ) + s += value[i] <= 0xff ? static_cast( value[i] ) : '?'; + return Catch::toString( s ); +} + +std::string toString( const char* const value ) { + return value ? Catch::toString( std::string( value ) ) : std::string( "{null string}" ); +} + +std::string toString( char* const value ) { + return Catch::toString( static_cast( value ) ); +} + +std::string toString( const wchar_t* const value ) +{ + return value ? Catch::toString( std::wstring(value) ) : std::string( "{null string}" ); +} + +std::string toString( wchar_t* const value ) +{ + return Catch::toString( static_cast( value ) ); +} + +std::string toString( int value ) { + std::ostringstream oss; + oss << value; + if( value > Detail::hexThreshold ) + oss << " (0x" << std::hex << value << ')'; + return oss.str(); +} + +std::string toString( unsigned long value ) { + std::ostringstream oss; + oss << value; + if( value > Detail::hexThreshold ) + oss << " (0x" << std::hex << value << ')'; + return oss.str(); +} + +std::string toString( unsigned int value ) { + return Catch::toString( static_cast( value ) ); +} + +template +std::string fpToString( T value, int precision ) { + std::ostringstream oss; + oss << std::setprecision( precision ) + << std::fixed + << value; + std::string d = oss.str(); + std::size_t i = d.find_last_not_of( '0' ); + if( i != std::string::npos && i != d.size()-1 ) { + if( d[i] == '.' ) + i++; + d = d.substr( 0, i+1 ); + } + return d; +} + +std::string toString( const double value ) { + return fpToString( value, 10 ); +} +std::string toString( const float value ) { + return fpToString( value, 5 ) + 'f'; +} + +std::string toString( bool value ) { + return value ? "true" : "false"; +} + +std::string toString( char value ) { + if ( value == '\r' ) + return "'\\r'"; + if ( value == '\f' ) + return "'\\f'"; + if ( value == '\n' ) + return "'\\n'"; + if ( value == '\t' ) + return "'\\t'"; + if ( '\0' <= value && value < ' ' ) + return toString( static_cast( value ) ); + char chstr[] = "' '"; + chstr[1] = value; + return chstr; +} + +std::string toString( signed char value ) { + return toString( static_cast( value ) ); +} + +std::string toString( unsigned char value ) { + return toString( static_cast( value ) ); +} + +#ifdef CATCH_CONFIG_CPP11_LONG_LONG +std::string toString( long long value ) { + std::ostringstream oss; + oss << value; + if( value > Detail::hexThreshold ) + oss << " (0x" << std::hex << value << ')'; + return oss.str(); +} +std::string toString( unsigned long long value ) { + std::ostringstream oss; + oss << value; + if( value > Detail::hexThreshold ) + oss << " (0x" << std::hex << value << ')'; + return oss.str(); +} +#endif + +#ifdef CATCH_CONFIG_CPP11_NULLPTR +std::string toString( std::nullptr_t ) { + return "nullptr"; +} +#endif + +#ifdef __OBJC__ + std::string toString( NSString const * const& nsstring ) { + if( !nsstring ) + return "nil"; + return "@" + toString([nsstring UTF8String]); + } + std::string toString( NSString * CATCH_ARC_STRONG & nsstring ) { + if( !nsstring ) + return "nil"; + return "@" + toString([nsstring UTF8String]); + } + std::string toString( NSObject* const& nsObject ) { + return toString( [nsObject description] ); + } +#endif + +} // end namespace Catch + +// #included from: catch_result_builder.hpp +#define TWOBLUECUBES_CATCH_RESULT_BUILDER_HPP_INCLUDED + +namespace Catch { + + ResultBuilder::ResultBuilder( char const* macroName, + SourceLineInfo const& lineInfo, + char const* capturedExpression, + ResultDisposition::Flags resultDisposition, + char const* secondArg ) + : m_assertionInfo( macroName, lineInfo, capturedExpression, resultDisposition, secondArg ), + m_shouldDebugBreak( false ), + m_shouldThrow( false ), + m_guardException( false ), + m_usedStream( false ) + {} + + ResultBuilder::~ResultBuilder() { +#if defined(CATCH_CONFIG_FAST_COMPILE) + if ( m_guardException ) { + stream().oss << "Exception translation was disabled by CATCH_CONFIG_FAST_COMPILE"; + captureResult( ResultWas::ThrewException ); + getCurrentContext().getResultCapture()->exceptionEarlyReported(); + } +#endif + } + + ResultBuilder& ResultBuilder::setResultType( ResultWas::OfType result ) { + m_data.resultType = result; + return *this; + } + ResultBuilder& ResultBuilder::setResultType( bool result ) { + m_data.resultType = result ? ResultWas::Ok : ResultWas::ExpressionFailed; + return *this; + } + + void ResultBuilder::endExpression( DecomposedExpression const& expr ) { + // Flip bool results if FalseTest flag is set + if( isFalseTest( m_assertionInfo.resultDisposition ) ) { + m_data.negate( expr.isBinaryExpression() ); + } + + getResultCapture().assertionRun(); + + if(getCurrentContext().getConfig()->includeSuccessfulResults() || m_data.resultType != ResultWas::Ok) + { + AssertionResult result = build( expr ); + handleResult( result ); + } + else + getResultCapture().assertionPassed(); + } + + void ResultBuilder::useActiveException( ResultDisposition::Flags resultDisposition ) { + m_assertionInfo.resultDisposition = resultDisposition; + stream().oss << Catch::translateActiveException(); + captureResult( ResultWas::ThrewException ); + } + + void ResultBuilder::captureResult( ResultWas::OfType resultType ) { + setResultType( resultType ); + captureExpression(); + } + + void ResultBuilder::captureExpectedException( std::string const& expectedMessage ) { + if( expectedMessage.empty() ) + captureExpectedException( Matchers::Impl::MatchAllOf() ); + else + captureExpectedException( Matchers::Equals( expectedMessage ) ); + } + + void ResultBuilder::captureExpectedException( Matchers::Impl::MatcherBase const& matcher ) { + + assert( !isFalseTest( m_assertionInfo.resultDisposition ) ); + AssertionResultData data = m_data; + data.resultType = ResultWas::Ok; + data.reconstructedExpression = capturedExpressionWithSecondArgument(m_assertionInfo.capturedExpression, m_assertionInfo.secondArg); + + std::string actualMessage = Catch::translateActiveException(); + if( !matcher.match( actualMessage ) ) { + data.resultType = ResultWas::ExpressionFailed; + data.reconstructedExpression = actualMessage; + } + AssertionResult result( m_assertionInfo, data ); + handleResult( result ); + } + + void ResultBuilder::captureExpression() { + AssertionResult result = build(); + handleResult( result ); + } + + void ResultBuilder::handleResult( AssertionResult const& result ) + { + getResultCapture().assertionEnded( result ); + + if( !result.isOk() ) { + if( getCurrentContext().getConfig()->shouldDebugBreak() ) + m_shouldDebugBreak = true; + if( getCurrentContext().getRunner()->aborting() || (m_assertionInfo.resultDisposition & ResultDisposition::Normal) ) + m_shouldThrow = true; + } + } + + void ResultBuilder::react() { +#if defined(CATCH_CONFIG_FAST_COMPILE) + if (m_shouldDebugBreak) { + /////////////////////////////////////////////////////////////////// + // To inspect the state during test, you need to go one level up the callstack + // To go back to the test and change execution, jump over the throw statement + /////////////////////////////////////////////////////////////////// + CATCH_BREAK_INTO_DEBUGGER(); + } +#endif + if( m_shouldThrow ) + throw Catch::TestFailureException(); + } + + bool ResultBuilder::shouldDebugBreak() const { return m_shouldDebugBreak; } + bool ResultBuilder::allowThrows() const { return getCurrentContext().getConfig()->allowThrows(); } + + AssertionResult ResultBuilder::build() const + { + return build( *this ); + } + + // CAVEAT: The returned AssertionResult stores a pointer to the argument expr, + // a temporary DecomposedExpression, which in turn holds references to + // operands, possibly temporary as well. + // It should immediately be passed to handleResult; if the expression + // needs to be reported, its string expansion must be composed before + // the temporaries are destroyed. + AssertionResult ResultBuilder::build( DecomposedExpression const& expr ) const + { + assert( m_data.resultType != ResultWas::Unknown ); + AssertionResultData data = m_data; + + if(m_usedStream) + data.message = m_stream().oss.str(); + data.decomposedExpression = &expr; // for lazy reconstruction + return AssertionResult( m_assertionInfo, data ); + } + + void ResultBuilder::reconstructExpression( std::string& dest ) const { + dest = capturedExpressionWithSecondArgument(m_assertionInfo.capturedExpression, m_assertionInfo.secondArg); + } + + void ResultBuilder::setExceptionGuard() { + m_guardException = true; + } + void ResultBuilder::unsetExceptionGuard() { + m_guardException = false; + } + +} // end namespace Catch + +// #included from: catch_tag_alias_registry.hpp +#define TWOBLUECUBES_CATCH_TAG_ALIAS_REGISTRY_HPP_INCLUDED + +namespace Catch { + + TagAliasRegistry::~TagAliasRegistry() {} + + Option TagAliasRegistry::find( std::string const& alias ) const { + std::map::const_iterator it = m_registry.find( alias ); + if( it != m_registry.end() ) + return it->second; + else + return Option(); + } + + std::string TagAliasRegistry::expandAliases( std::string const& unexpandedTestSpec ) const { + std::string expandedTestSpec = unexpandedTestSpec; + for( std::map::const_iterator it = m_registry.begin(), itEnd = m_registry.end(); + it != itEnd; + ++it ) { + std::size_t pos = expandedTestSpec.find( it->first ); + if( pos != std::string::npos ) { + expandedTestSpec = expandedTestSpec.substr( 0, pos ) + + it->second.tag + + expandedTestSpec.substr( pos + it->first.size() ); + } + } + return expandedTestSpec; + } + + void TagAliasRegistry::add( std::string const& alias, std::string const& tag, SourceLineInfo const& lineInfo ) { + + if( !startsWith( alias, "[@" ) || !endsWith( alias, ']' ) ) { + std::ostringstream oss; + oss << Colour( Colour::Red ) + << "error: tag alias, \"" << alias << "\" is not of the form [@alias name].\n" + << Colour( Colour::FileName ) + << lineInfo << '\n'; + throw std::domain_error( oss.str().c_str() ); + } + if( !m_registry.insert( std::make_pair( alias, TagAlias( tag, lineInfo ) ) ).second ) { + std::ostringstream oss; + oss << Colour( Colour::Red ) + << "error: tag alias, \"" << alias << "\" already registered.\n" + << "\tFirst seen at " + << Colour( Colour::Red ) << find(alias)->lineInfo << '\n' + << Colour( Colour::Red ) << "\tRedefined at " + << Colour( Colour::FileName) << lineInfo << '\n'; + throw std::domain_error( oss.str().c_str() ); + } + } + + ITagAliasRegistry::~ITagAliasRegistry() {} + + ITagAliasRegistry const& ITagAliasRegistry::get() { + return getRegistryHub().getTagAliasRegistry(); + } + + RegistrarForTagAliases::RegistrarForTagAliases( char const* alias, char const* tag, SourceLineInfo const& lineInfo ) { + getMutableRegistryHub().registerTagAlias( alias, tag, lineInfo ); + } + +} // end namespace Catch + +// #included from: catch_matchers_string.hpp + +namespace Catch { +namespace Matchers { + + namespace StdString { + + CasedString::CasedString( std::string const& str, CaseSensitive::Choice caseSensitivity ) + : m_caseSensitivity( caseSensitivity ), + m_str( adjustString( str ) ) + {} + std::string CasedString::adjustString( std::string const& str ) const { + return m_caseSensitivity == CaseSensitive::No + ? toLower( str ) + : str; + } + std::string CasedString::caseSensitivitySuffix() const { + return m_caseSensitivity == CaseSensitive::No + ? " (case insensitive)" + : std::string(); + } + + StringMatcherBase::StringMatcherBase( std::string const& operation, CasedString const& comparator ) + : m_comparator( comparator ), + m_operation( operation ) { + } + + std::string StringMatcherBase::describe() const { + std::string description; + description.reserve(5 + m_operation.size() + m_comparator.m_str.size() + + m_comparator.caseSensitivitySuffix().size()); + description += m_operation; + description += ": \""; + description += m_comparator.m_str; + description += "\""; + description += m_comparator.caseSensitivitySuffix(); + return description; + } + + EqualsMatcher::EqualsMatcher( CasedString const& comparator ) : StringMatcherBase( "equals", comparator ) {} + + bool EqualsMatcher::match( std::string const& source ) const { + return m_comparator.adjustString( source ) == m_comparator.m_str; + } + + ContainsMatcher::ContainsMatcher( CasedString const& comparator ) : StringMatcherBase( "contains", comparator ) {} + + bool ContainsMatcher::match( std::string const& source ) const { + return contains( m_comparator.adjustString( source ), m_comparator.m_str ); + } + + StartsWithMatcher::StartsWithMatcher( CasedString const& comparator ) : StringMatcherBase( "starts with", comparator ) {} + + bool StartsWithMatcher::match( std::string const& source ) const { + return startsWith( m_comparator.adjustString( source ), m_comparator.m_str ); + } + + EndsWithMatcher::EndsWithMatcher( CasedString const& comparator ) : StringMatcherBase( "ends with", comparator ) {} + + bool EndsWithMatcher::match( std::string const& source ) const { + return endsWith( m_comparator.adjustString( source ), m_comparator.m_str ); + } + + } // namespace StdString + + StdString::EqualsMatcher Equals( std::string const& str, CaseSensitive::Choice caseSensitivity ) { + return StdString::EqualsMatcher( StdString::CasedString( str, caseSensitivity) ); + } + StdString::ContainsMatcher Contains( std::string const& str, CaseSensitive::Choice caseSensitivity ) { + return StdString::ContainsMatcher( StdString::CasedString( str, caseSensitivity) ); + } + StdString::EndsWithMatcher EndsWith( std::string const& str, CaseSensitive::Choice caseSensitivity ) { + return StdString::EndsWithMatcher( StdString::CasedString( str, caseSensitivity) ); + } + StdString::StartsWithMatcher StartsWith( std::string const& str, CaseSensitive::Choice caseSensitivity ) { + return StdString::StartsWithMatcher( StdString::CasedString( str, caseSensitivity) ); + } + +} // namespace Matchers +} // namespace Catch +// #included from: ../reporters/catch_reporter_multi.hpp +#define TWOBLUECUBES_CATCH_REPORTER_MULTI_HPP_INCLUDED + +namespace Catch { + +class MultipleReporters : public SharedImpl { + typedef std::vector > Reporters; + Reporters m_reporters; + +public: + void add( Ptr const& reporter ) { + m_reporters.push_back( reporter ); + } + +public: // IStreamingReporter + + virtual ReporterPreferences getPreferences() const CATCH_OVERRIDE { + return m_reporters[0]->getPreferences(); + } + + virtual void noMatchingTestCases( std::string const& spec ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->noMatchingTestCases( spec ); + } + + virtual void testRunStarting( TestRunInfo const& testRunInfo ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->testRunStarting( testRunInfo ); + } + + virtual void testGroupStarting( GroupInfo const& groupInfo ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->testGroupStarting( groupInfo ); + } + + virtual void testCaseStarting( TestCaseInfo const& testInfo ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->testCaseStarting( testInfo ); + } + + virtual void sectionStarting( SectionInfo const& sectionInfo ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->sectionStarting( sectionInfo ); + } + + virtual void assertionStarting( AssertionInfo const& assertionInfo ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->assertionStarting( assertionInfo ); + } + + // The return value indicates if the messages buffer should be cleared: + virtual bool assertionEnded( AssertionStats const& assertionStats ) CATCH_OVERRIDE { + bool clearBuffer = false; + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + clearBuffer |= (*it)->assertionEnded( assertionStats ); + return clearBuffer; + } + + virtual void sectionEnded( SectionStats const& sectionStats ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->sectionEnded( sectionStats ); + } + + virtual void testCaseEnded( TestCaseStats const& testCaseStats ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->testCaseEnded( testCaseStats ); + } + + virtual void testGroupEnded( TestGroupStats const& testGroupStats ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->testGroupEnded( testGroupStats ); + } + + virtual void testRunEnded( TestRunStats const& testRunStats ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->testRunEnded( testRunStats ); + } + + virtual void skipTest( TestCaseInfo const& testInfo ) CATCH_OVERRIDE { + for( Reporters::const_iterator it = m_reporters.begin(), itEnd = m_reporters.end(); + it != itEnd; + ++it ) + (*it)->skipTest( testInfo ); + } + + virtual MultipleReporters* tryAsMulti() CATCH_OVERRIDE { + return this; + } + +}; + +Ptr addReporter( Ptr const& existingReporter, Ptr const& additionalReporter ) { + Ptr resultingReporter; + + if( existingReporter ) { + MultipleReporters* multi = existingReporter->tryAsMulti(); + if( !multi ) { + multi = new MultipleReporters; + resultingReporter = Ptr( multi ); + if( existingReporter ) + multi->add( existingReporter ); + } + else + resultingReporter = existingReporter; + multi->add( additionalReporter ); + } + else + resultingReporter = additionalReporter; + + return resultingReporter; +} + +} // end namespace Catch + +// #included from: ../reporters/catch_reporter_xml.hpp +#define TWOBLUECUBES_CATCH_REPORTER_XML_HPP_INCLUDED + +// #included from: catch_reporter_bases.hpp +#define TWOBLUECUBES_CATCH_REPORTER_BASES_HPP_INCLUDED + +#include +#include +#include +#include + +namespace Catch { + + namespace { + // Because formatting using c++ streams is stateful, drop down to C is required + // Alternatively we could use stringstream, but its performance is... not good. + std::string getFormattedDuration( double duration ) { + // Max exponent + 1 is required to represent the whole part + // + 1 for decimal point + // + 3 for the 3 decimal places + // + 1 for null terminator + const size_t maxDoubleSize = DBL_MAX_10_EXP + 1 + 1 + 3 + 1; + char buffer[maxDoubleSize]; + + // Save previous errno, to prevent sprintf from overwriting it + ErrnoGuard guard; +#ifdef _MSC_VER + sprintf_s(buffer, "%.3f", duration); +#else + sprintf(buffer, "%.3f", duration); +#endif + return std::string(buffer); + } + } + + struct StreamingReporterBase : SharedImpl { + + StreamingReporterBase( ReporterConfig const& _config ) + : m_config( _config.fullConfig() ), + stream( _config.stream() ) + { + m_reporterPrefs.shouldRedirectStdOut = false; + } + + virtual ReporterPreferences getPreferences() const CATCH_OVERRIDE { + return m_reporterPrefs; + } + + virtual ~StreamingReporterBase() CATCH_OVERRIDE; + + virtual void noMatchingTestCases( std::string const& ) CATCH_OVERRIDE {} + + virtual void testRunStarting( TestRunInfo const& _testRunInfo ) CATCH_OVERRIDE { + currentTestRunInfo = _testRunInfo; + } + virtual void testGroupStarting( GroupInfo const& _groupInfo ) CATCH_OVERRIDE { + currentGroupInfo = _groupInfo; + } + + virtual void testCaseStarting( TestCaseInfo const& _testInfo ) CATCH_OVERRIDE { + currentTestCaseInfo = _testInfo; + } + virtual void sectionStarting( SectionInfo const& _sectionInfo ) CATCH_OVERRIDE { + m_sectionStack.push_back( _sectionInfo ); + } + + virtual void sectionEnded( SectionStats const& /* _sectionStats */ ) CATCH_OVERRIDE { + m_sectionStack.pop_back(); + } + virtual void testCaseEnded( TestCaseStats const& /* _testCaseStats */ ) CATCH_OVERRIDE { + currentTestCaseInfo.reset(); + } + virtual void testGroupEnded( TestGroupStats const& /* _testGroupStats */ ) CATCH_OVERRIDE { + currentGroupInfo.reset(); + } + virtual void testRunEnded( TestRunStats const& /* _testRunStats */ ) CATCH_OVERRIDE { + currentTestCaseInfo.reset(); + currentGroupInfo.reset(); + currentTestRunInfo.reset(); + } + + virtual void skipTest( TestCaseInfo const& ) CATCH_OVERRIDE { + // Don't do anything with this by default. + // It can optionally be overridden in the derived class. + } + + Ptr m_config; + std::ostream& stream; + + LazyStat currentTestRunInfo; + LazyStat currentGroupInfo; + LazyStat currentTestCaseInfo; + + std::vector m_sectionStack; + ReporterPreferences m_reporterPrefs; + }; + + struct CumulativeReporterBase : SharedImpl { + template + struct Node : SharedImpl<> { + explicit Node( T const& _value ) : value( _value ) {} + virtual ~Node() {} + + typedef std::vector > ChildNodes; + T value; + ChildNodes children; + }; + struct SectionNode : SharedImpl<> { + explicit SectionNode( SectionStats const& _stats ) : stats( _stats ) {} + virtual ~SectionNode(); + + bool operator == ( SectionNode const& other ) const { + return stats.sectionInfo.lineInfo == other.stats.sectionInfo.lineInfo; + } + bool operator == ( Ptr const& other ) const { + return operator==( *other ); + } + + SectionStats stats; + typedef std::vector > ChildSections; + typedef std::vector Assertions; + ChildSections childSections; + Assertions assertions; + std::string stdOut; + std::string stdErr; + }; + + struct BySectionInfo { + BySectionInfo( SectionInfo const& other ) : m_other( other ) {} + BySectionInfo( BySectionInfo const& other ) : m_other( other.m_other ) {} + bool operator() ( Ptr const& node ) const { + return ((node->stats.sectionInfo.name == m_other.name) && + (node->stats.sectionInfo.lineInfo == m_other.lineInfo)); + } + private: + void operator=( BySectionInfo const& ); + SectionInfo const& m_other; + }; + + typedef Node TestCaseNode; + typedef Node TestGroupNode; + typedef Node TestRunNode; + + CumulativeReporterBase( ReporterConfig const& _config ) + : m_config( _config.fullConfig() ), + stream( _config.stream() ) + { + m_reporterPrefs.shouldRedirectStdOut = false; + } + ~CumulativeReporterBase(); + + virtual ReporterPreferences getPreferences() const CATCH_OVERRIDE { + return m_reporterPrefs; + } + + virtual void testRunStarting( TestRunInfo const& ) CATCH_OVERRIDE {} + virtual void testGroupStarting( GroupInfo const& ) CATCH_OVERRIDE {} + + virtual void testCaseStarting( TestCaseInfo const& ) CATCH_OVERRIDE {} + + virtual void sectionStarting( SectionInfo const& sectionInfo ) CATCH_OVERRIDE { + SectionStats incompleteStats( sectionInfo, Counts(), 0, false ); + Ptr node; + if( m_sectionStack.empty() ) { + if( !m_rootSection ) + m_rootSection = new SectionNode( incompleteStats ); + node = m_rootSection; + } + else { + SectionNode& parentNode = *m_sectionStack.back(); + SectionNode::ChildSections::const_iterator it = + std::find_if( parentNode.childSections.begin(), + parentNode.childSections.end(), + BySectionInfo( sectionInfo ) ); + if( it == parentNode.childSections.end() ) { + node = new SectionNode( incompleteStats ); + parentNode.childSections.push_back( node ); + } + else + node = *it; + } + m_sectionStack.push_back( node ); + m_deepestSection = node; + } + + virtual void assertionStarting( AssertionInfo const& ) CATCH_OVERRIDE {} + + virtual bool assertionEnded( AssertionStats const& assertionStats ) CATCH_OVERRIDE { + assert( !m_sectionStack.empty() ); + SectionNode& sectionNode = *m_sectionStack.back(); + sectionNode.assertions.push_back( assertionStats ); + // AssertionResult holds a pointer to a temporary DecomposedExpression, + // which getExpandedExpression() calls to build the expression string. + // Our section stack copy of the assertionResult will likely outlive the + // temporary, so it must be expanded or discarded now to avoid calling + // a destroyed object later. + prepareExpandedExpression( sectionNode.assertions.back().assertionResult ); + return true; + } + virtual void sectionEnded( SectionStats const& sectionStats ) CATCH_OVERRIDE { + assert( !m_sectionStack.empty() ); + SectionNode& node = *m_sectionStack.back(); + node.stats = sectionStats; + m_sectionStack.pop_back(); + } + virtual void testCaseEnded( TestCaseStats const& testCaseStats ) CATCH_OVERRIDE { + Ptr node = new TestCaseNode( testCaseStats ); + assert( m_sectionStack.size() == 0 ); + node->children.push_back( m_rootSection ); + m_testCases.push_back( node ); + m_rootSection.reset(); + + assert( m_deepestSection ); + m_deepestSection->stdOut = testCaseStats.stdOut; + m_deepestSection->stdErr = testCaseStats.stdErr; + } + virtual void testGroupEnded( TestGroupStats const& testGroupStats ) CATCH_OVERRIDE { + Ptr node = new TestGroupNode( testGroupStats ); + node->children.swap( m_testCases ); + m_testGroups.push_back( node ); + } + virtual void testRunEnded( TestRunStats const& testRunStats ) CATCH_OVERRIDE { + Ptr node = new TestRunNode( testRunStats ); + node->children.swap( m_testGroups ); + m_testRuns.push_back( node ); + testRunEndedCumulative(); + } + virtual void testRunEndedCumulative() = 0; + + virtual void skipTest( TestCaseInfo const& ) CATCH_OVERRIDE {} + + virtual void prepareExpandedExpression( AssertionResult& result ) const { + if( result.isOk() ) + result.discardDecomposedExpression(); + else + result.expandDecomposedExpression(); + } + + Ptr m_config; + std::ostream& stream; + std::vector m_assertions; + std::vector > > m_sections; + std::vector > m_testCases; + std::vector > m_testGroups; + + std::vector > m_testRuns; + + Ptr m_rootSection; + Ptr m_deepestSection; + std::vector > m_sectionStack; + ReporterPreferences m_reporterPrefs; + + }; + + template + char const* getLineOfChars() { + static char line[CATCH_CONFIG_CONSOLE_WIDTH] = {0}; + if( !*line ) { + std::memset( line, C, CATCH_CONFIG_CONSOLE_WIDTH-1 ); + line[CATCH_CONFIG_CONSOLE_WIDTH-1] = 0; + } + return line; + } + + struct TestEventListenerBase : StreamingReporterBase { + TestEventListenerBase( ReporterConfig const& _config ) + : StreamingReporterBase( _config ) + {} + + virtual void assertionStarting( AssertionInfo const& ) CATCH_OVERRIDE {} + virtual bool assertionEnded( AssertionStats const& ) CATCH_OVERRIDE { + return false; + } + }; + +} // end namespace Catch + +// #included from: ../internal/catch_reporter_registrars.hpp +#define TWOBLUECUBES_CATCH_REPORTER_REGISTRARS_HPP_INCLUDED + +namespace Catch { + + template + class LegacyReporterRegistrar { + + class ReporterFactory : public IReporterFactory { + virtual IStreamingReporter* create( ReporterConfig const& config ) const { + return new LegacyReporterAdapter( new T( config ) ); + } + + virtual std::string getDescription() const { + return T::getDescription(); + } + }; + + public: + + LegacyReporterRegistrar( std::string const& name ) { + getMutableRegistryHub().registerReporter( name, new ReporterFactory() ); + } + }; + + template + class ReporterRegistrar { + + class ReporterFactory : public SharedImpl { + + // *** Please Note ***: + // - If you end up here looking at a compiler error because it's trying to register + // your custom reporter class be aware that the native reporter interface has changed + // to IStreamingReporter. The "legacy" interface, IReporter, is still supported via + // an adapter. Just use REGISTER_LEGACY_REPORTER to take advantage of the adapter. + // However please consider updating to the new interface as the old one is now + // deprecated and will probably be removed quite soon! + // Please contact me via github if you have any questions at all about this. + // In fact, ideally, please contact me anyway to let me know you've hit this - as I have + // no idea who is actually using custom reporters at all (possibly no-one!). + // The new interface is designed to minimise exposure to interface changes in the future. + virtual IStreamingReporter* create( ReporterConfig const& config ) const { + return new T( config ); + } + + virtual std::string getDescription() const { + return T::getDescription(); + } + }; + + public: + + ReporterRegistrar( std::string const& name ) { + getMutableRegistryHub().registerReporter( name, new ReporterFactory() ); + } + }; + + template + class ListenerRegistrar { + + class ListenerFactory : public SharedImpl { + + virtual IStreamingReporter* create( ReporterConfig const& config ) const { + return new T( config ); + } + virtual std::string getDescription() const { + return std::string(); + } + }; + + public: + + ListenerRegistrar() { + getMutableRegistryHub().registerListener( new ListenerFactory() ); + } + }; +} + +#define INTERNAL_CATCH_REGISTER_LEGACY_REPORTER( name, reporterType ) \ + namespace{ Catch::LegacyReporterRegistrar catch_internal_RegistrarFor##reporterType( name ); } + +#define INTERNAL_CATCH_REGISTER_REPORTER( name, reporterType ) \ + namespace{ Catch::ReporterRegistrar catch_internal_RegistrarFor##reporterType( name ); } + +// Deprecated - use the form without INTERNAL_ +#define INTERNAL_CATCH_REGISTER_LISTENER( listenerType ) \ + namespace{ Catch::ListenerRegistrar catch_internal_RegistrarFor##listenerType; } + +#define CATCH_REGISTER_LISTENER( listenerType ) \ + namespace{ Catch::ListenerRegistrar catch_internal_RegistrarFor##listenerType; } + +// #included from: ../internal/catch_xmlwriter.hpp +#define TWOBLUECUBES_CATCH_XMLWRITER_HPP_INCLUDED + +#include +#include +#include +#include + +namespace Catch { + + class XmlEncode { + public: + enum ForWhat { ForTextNodes, ForAttributes }; + + XmlEncode( std::string const& str, ForWhat forWhat = ForTextNodes ) + : m_str( str ), + m_forWhat( forWhat ) + {} + + void encodeTo( std::ostream& os ) const { + + // Apostrophe escaping not necessary if we always use " to write attributes + // (see: http://www.w3.org/TR/xml/#syntax) + + for( std::size_t i = 0; i < m_str.size(); ++ i ) { + char c = m_str[i]; + switch( c ) { + case '<': os << "<"; break; + case '&': os << "&"; break; + + case '>': + // See: http://www.w3.org/TR/xml/#syntax + if( i > 2 && m_str[i-1] == ']' && m_str[i-2] == ']' ) + os << ">"; + else + os << c; + break; + + case '\"': + if( m_forWhat == ForAttributes ) + os << """; + else + os << c; + break; + + default: + // Escape control chars - based on contribution by @espenalb in PR #465 and + // by @mrpi PR #588 + if ( ( c >= 0 && c < '\x09' ) || ( c > '\x0D' && c < '\x20') || c=='\x7F' ) { + // see http://stackoverflow.com/questions/404107/why-are-control-characters-illegal-in-xml-1-0 + os << "\\x" << std::uppercase << std::hex << std::setfill('0') << std::setw(2) + << static_cast( c ); + } + else + os << c; + } + } + } + + friend std::ostream& operator << ( std::ostream& os, XmlEncode const& xmlEncode ) { + xmlEncode.encodeTo( os ); + return os; + } + + private: + std::string m_str; + ForWhat m_forWhat; + }; + + class XmlWriter { + public: + + class ScopedElement { + public: + ScopedElement( XmlWriter* writer ) + : m_writer( writer ) + {} + + ScopedElement( ScopedElement const& other ) + : m_writer( other.m_writer ){ + other.m_writer = CATCH_NULL; + } + + ~ScopedElement() { + if( m_writer ) + m_writer->endElement(); + } + + ScopedElement& writeText( std::string const& text, bool indent = true ) { + m_writer->writeText( text, indent ); + return *this; + } + + template + ScopedElement& writeAttribute( std::string const& name, T const& attribute ) { + m_writer->writeAttribute( name, attribute ); + return *this; + } + + private: + mutable XmlWriter* m_writer; + }; + + XmlWriter() + : m_tagIsOpen( false ), + m_needsNewline( false ), + m_os( Catch::cout() ) + { + writeDeclaration(); + } + + XmlWriter( std::ostream& os ) + : m_tagIsOpen( false ), + m_needsNewline( false ), + m_os( os ) + { + writeDeclaration(); + } + + ~XmlWriter() { + while( !m_tags.empty() ) + endElement(); + } + + XmlWriter& startElement( std::string const& name ) { + ensureTagClosed(); + newlineIfNecessary(); + m_os << m_indent << '<' << name; + m_tags.push_back( name ); + m_indent += " "; + m_tagIsOpen = true; + return *this; + } + + ScopedElement scopedElement( std::string const& name ) { + ScopedElement scoped( this ); + startElement( name ); + return scoped; + } + + XmlWriter& endElement() { + newlineIfNecessary(); + m_indent = m_indent.substr( 0, m_indent.size()-2 ); + if( m_tagIsOpen ) { + m_os << "/>"; + m_tagIsOpen = false; + } + else { + m_os << m_indent << ""; + } + m_os << std::endl; + m_tags.pop_back(); + return *this; + } + + XmlWriter& writeAttribute( std::string const& name, std::string const& attribute ) { + if( !name.empty() && !attribute.empty() ) + m_os << ' ' << name << "=\"" << XmlEncode( attribute, XmlEncode::ForAttributes ) << '"'; + return *this; + } + + XmlWriter& writeAttribute( std::string const& name, bool attribute ) { + m_os << ' ' << name << "=\"" << ( attribute ? "true" : "false" ) << '"'; + return *this; + } + + template + XmlWriter& writeAttribute( std::string const& name, T const& attribute ) { + std::ostringstream oss; + oss << attribute; + return writeAttribute( name, oss.str() ); + } + + XmlWriter& writeText( std::string const& text, bool indent = true ) { + if( !text.empty() ){ + bool tagWasOpen = m_tagIsOpen; + ensureTagClosed(); + if( tagWasOpen && indent ) + m_os << m_indent; + m_os << XmlEncode( text ); + m_needsNewline = true; + } + return *this; + } + + XmlWriter& writeComment( std::string const& text ) { + ensureTagClosed(); + m_os << m_indent << ""; + m_needsNewline = true; + return *this; + } + + void writeStylesheetRef( std::string const& url ) { + m_os << "\n"; + } + + XmlWriter& writeBlankLine() { + ensureTagClosed(); + m_os << '\n'; + return *this; + } + + void ensureTagClosed() { + if( m_tagIsOpen ) { + m_os << ">" << std::endl; + m_tagIsOpen = false; + } + } + + private: + XmlWriter( XmlWriter const& ); + void operator=( XmlWriter const& ); + + void writeDeclaration() { + m_os << "\n"; + } + + void newlineIfNecessary() { + if( m_needsNewline ) { + m_os << std::endl; + m_needsNewline = false; + } + } + + bool m_tagIsOpen; + bool m_needsNewline; + std::vector m_tags; + std::string m_indent; + std::ostream& m_os; + }; + +} + +namespace Catch { + class XmlReporter : public StreamingReporterBase { + public: + XmlReporter( ReporterConfig const& _config ) + : StreamingReporterBase( _config ), + m_xml(_config.stream()), + m_sectionDepth( 0 ) + { + m_reporterPrefs.shouldRedirectStdOut = true; + } + + virtual ~XmlReporter() CATCH_OVERRIDE; + + static std::string getDescription() { + return "Reports test results as an XML document"; + } + + virtual std::string getStylesheetRef() const { + return std::string(); + } + + void writeSourceInfo( SourceLineInfo const& sourceInfo ) { + m_xml + .writeAttribute( "filename", sourceInfo.file ) + .writeAttribute( "line", sourceInfo.line ); + } + + public: // StreamingReporterBase + + virtual void noMatchingTestCases( std::string const& s ) CATCH_OVERRIDE { + StreamingReporterBase::noMatchingTestCases( s ); + } + + virtual void testRunStarting( TestRunInfo const& testInfo ) CATCH_OVERRIDE { + StreamingReporterBase::testRunStarting( testInfo ); + std::string stylesheetRef = getStylesheetRef(); + if( !stylesheetRef.empty() ) + m_xml.writeStylesheetRef( stylesheetRef ); + m_xml.startElement( "Catch" ); + if( !m_config->name().empty() ) + m_xml.writeAttribute( "name", m_config->name() ); + } + + virtual void testGroupStarting( GroupInfo const& groupInfo ) CATCH_OVERRIDE { + StreamingReporterBase::testGroupStarting( groupInfo ); + m_xml.startElement( "Group" ) + .writeAttribute( "name", groupInfo.name ); + } + + virtual void testCaseStarting( TestCaseInfo const& testInfo ) CATCH_OVERRIDE { + StreamingReporterBase::testCaseStarting(testInfo); + m_xml.startElement( "TestCase" ) + .writeAttribute( "name", trim( testInfo.name ) ) + .writeAttribute( "description", testInfo.description ) + .writeAttribute( "tags", testInfo.tagsAsString ); + + writeSourceInfo( testInfo.lineInfo ); + + if ( m_config->showDurations() == ShowDurations::Always ) + m_testCaseTimer.start(); + m_xml.ensureTagClosed(); + } + + virtual void sectionStarting( SectionInfo const& sectionInfo ) CATCH_OVERRIDE { + StreamingReporterBase::sectionStarting( sectionInfo ); + if( m_sectionDepth++ > 0 ) { + m_xml.startElement( "Section" ) + .writeAttribute( "name", trim( sectionInfo.name ) ) + .writeAttribute( "description", sectionInfo.description ); + writeSourceInfo( sectionInfo.lineInfo ); + m_xml.ensureTagClosed(); + } + } + + virtual void assertionStarting( AssertionInfo const& ) CATCH_OVERRIDE { } + + virtual bool assertionEnded( AssertionStats const& assertionStats ) CATCH_OVERRIDE { + + AssertionResult const& result = assertionStats.assertionResult; + + bool includeResults = m_config->includeSuccessfulResults() || !result.isOk(); + + if( includeResults || result.getResultType() == ResultWas::Warning ) { + // Print any info messages in tags. + for( std::vector::const_iterator it = assertionStats.infoMessages.begin(), itEnd = assertionStats.infoMessages.end(); + it != itEnd; + ++it ) { + if( it->type == ResultWas::Info && includeResults ) { + m_xml.scopedElement( "Info" ) + .writeText( it->message ); + } else if ( it->type == ResultWas::Warning ) { + m_xml.scopedElement( "Warning" ) + .writeText( it->message ); + } + } + } + + // Drop out if result was successful but we're not printing them. + if( !includeResults && result.getResultType() != ResultWas::Warning ) + return true; + + // Print the expression if there is one. + if( result.hasExpression() ) { + m_xml.startElement( "Expression" ) + .writeAttribute( "success", result.succeeded() ) + .writeAttribute( "type", result.getTestMacroName() ); + + writeSourceInfo( result.getSourceInfo() ); + + m_xml.scopedElement( "Original" ) + .writeText( result.getExpression() ); + m_xml.scopedElement( "Expanded" ) + .writeText( result.getExpandedExpression() ); + } + + // And... Print a result applicable to each result type. + switch( result.getResultType() ) { + case ResultWas::ThrewException: + m_xml.startElement( "Exception" ); + writeSourceInfo( result.getSourceInfo() ); + m_xml.writeText( result.getMessage() ); + m_xml.endElement(); + break; + case ResultWas::FatalErrorCondition: + m_xml.startElement( "FatalErrorCondition" ); + writeSourceInfo( result.getSourceInfo() ); + m_xml.writeText( result.getMessage() ); + m_xml.endElement(); + break; + case ResultWas::Info: + m_xml.scopedElement( "Info" ) + .writeText( result.getMessage() ); + break; + case ResultWas::Warning: + // Warning will already have been written + break; + case ResultWas::ExplicitFailure: + m_xml.startElement( "Failure" ); + writeSourceInfo( result.getSourceInfo() ); + m_xml.writeText( result.getMessage() ); + m_xml.endElement(); + break; + default: + break; + } + + if( result.hasExpression() ) + m_xml.endElement(); + + return true; + } + + virtual void sectionEnded( SectionStats const& sectionStats ) CATCH_OVERRIDE { + StreamingReporterBase::sectionEnded( sectionStats ); + if( --m_sectionDepth > 0 ) { + XmlWriter::ScopedElement e = m_xml.scopedElement( "OverallResults" ); + e.writeAttribute( "successes", sectionStats.assertions.passed ); + e.writeAttribute( "failures", sectionStats.assertions.failed ); + e.writeAttribute( "expectedFailures", sectionStats.assertions.failedButOk ); + + if ( m_config->showDurations() == ShowDurations::Always ) + e.writeAttribute( "durationInSeconds", sectionStats.durationInSeconds ); + + m_xml.endElement(); + } + } + + virtual void testCaseEnded( TestCaseStats const& testCaseStats ) CATCH_OVERRIDE { + StreamingReporterBase::testCaseEnded( testCaseStats ); + XmlWriter::ScopedElement e = m_xml.scopedElement( "OverallResult" ); + e.writeAttribute( "success", testCaseStats.totals.assertions.allOk() ); + + if ( m_config->showDurations() == ShowDurations::Always ) + e.writeAttribute( "durationInSeconds", m_testCaseTimer.getElapsedSeconds() ); + + if( !testCaseStats.stdOut.empty() ) + m_xml.scopedElement( "StdOut" ).writeText( trim( testCaseStats.stdOut ), false ); + if( !testCaseStats.stdErr.empty() ) + m_xml.scopedElement( "StdErr" ).writeText( trim( testCaseStats.stdErr ), false ); + + m_xml.endElement(); + } + + virtual void testGroupEnded( TestGroupStats const& testGroupStats ) CATCH_OVERRIDE { + StreamingReporterBase::testGroupEnded( testGroupStats ); + // TODO: Check testGroupStats.aborting and act accordingly. + m_xml.scopedElement( "OverallResults" ) + .writeAttribute( "successes", testGroupStats.totals.assertions.passed ) + .writeAttribute( "failures", testGroupStats.totals.assertions.failed ) + .writeAttribute( "expectedFailures", testGroupStats.totals.assertions.failedButOk ); + m_xml.endElement(); + } + + virtual void testRunEnded( TestRunStats const& testRunStats ) CATCH_OVERRIDE { + StreamingReporterBase::testRunEnded( testRunStats ); + m_xml.scopedElement( "OverallResults" ) + .writeAttribute( "successes", testRunStats.totals.assertions.passed ) + .writeAttribute( "failures", testRunStats.totals.assertions.failed ) + .writeAttribute( "expectedFailures", testRunStats.totals.assertions.failedButOk ); + m_xml.endElement(); + } + + private: + Timer m_testCaseTimer; + XmlWriter m_xml; + int m_sectionDepth; + }; + + INTERNAL_CATCH_REGISTER_REPORTER( "xml", XmlReporter ) + +} // end namespace Catch + +// #included from: ../reporters/catch_reporter_junit.hpp +#define TWOBLUECUBES_CATCH_REPORTER_JUNIT_HPP_INCLUDED + +#include + +namespace Catch { + + namespace { + std::string getCurrentTimestamp() { + // Beware, this is not reentrant because of backward compatibility issues + // Also, UTC only, again because of backward compatibility (%z is C++11) + time_t rawtime; + std::time(&rawtime); + const size_t timeStampSize = sizeof("2017-01-16T17:06:45Z"); + +#ifdef _MSC_VER + std::tm timeInfo = {}; + gmtime_s(&timeInfo, &rawtime); +#else + std::tm* timeInfo; + timeInfo = std::gmtime(&rawtime); +#endif + + char timeStamp[timeStampSize]; + const char * const fmt = "%Y-%m-%dT%H:%M:%SZ"; + +#ifdef _MSC_VER + std::strftime(timeStamp, timeStampSize, fmt, &timeInfo); +#else + std::strftime(timeStamp, timeStampSize, fmt, timeInfo); +#endif + return std::string(timeStamp); + } + + } + + class JunitReporter : public CumulativeReporterBase { + public: + JunitReporter( ReporterConfig const& _config ) + : CumulativeReporterBase( _config ), + xml( _config.stream() ), + unexpectedExceptions( 0 ), + m_okToFail( false ) + { + m_reporterPrefs.shouldRedirectStdOut = true; + } + + virtual ~JunitReporter() CATCH_OVERRIDE; + + static std::string getDescription() { + return "Reports test results in an XML format that looks like Ant's junitreport target"; + } + + virtual void noMatchingTestCases( std::string const& /*spec*/ ) CATCH_OVERRIDE {} + + virtual void testRunStarting( TestRunInfo const& runInfo ) CATCH_OVERRIDE { + CumulativeReporterBase::testRunStarting( runInfo ); + xml.startElement( "testsuites" ); + } + + virtual void testGroupStarting( GroupInfo const& groupInfo ) CATCH_OVERRIDE { + suiteTimer.start(); + stdOutForSuite.str(""); + stdErrForSuite.str(""); + unexpectedExceptions = 0; + CumulativeReporterBase::testGroupStarting( groupInfo ); + } + + virtual void testCaseStarting( TestCaseInfo const& testCaseInfo ) CATCH_OVERRIDE { + m_okToFail = testCaseInfo.okToFail(); + } + virtual bool assertionEnded( AssertionStats const& assertionStats ) CATCH_OVERRIDE { + if( assertionStats.assertionResult.getResultType() == ResultWas::ThrewException && !m_okToFail ) + unexpectedExceptions++; + return CumulativeReporterBase::assertionEnded( assertionStats ); + } + + virtual void testCaseEnded( TestCaseStats const& testCaseStats ) CATCH_OVERRIDE { + stdOutForSuite << testCaseStats.stdOut; + stdErrForSuite << testCaseStats.stdErr; + CumulativeReporterBase::testCaseEnded( testCaseStats ); + } + + virtual void testGroupEnded( TestGroupStats const& testGroupStats ) CATCH_OVERRIDE { + double suiteTime = suiteTimer.getElapsedSeconds(); + CumulativeReporterBase::testGroupEnded( testGroupStats ); + writeGroup( *m_testGroups.back(), suiteTime ); + } + + virtual void testRunEndedCumulative() CATCH_OVERRIDE { + xml.endElement(); + } + + void writeGroup( TestGroupNode const& groupNode, double suiteTime ) { + XmlWriter::ScopedElement e = xml.scopedElement( "testsuite" ); + TestGroupStats const& stats = groupNode.value; + xml.writeAttribute( "name", stats.groupInfo.name ); + xml.writeAttribute( "errors", unexpectedExceptions ); + xml.writeAttribute( "failures", stats.totals.assertions.failed-unexpectedExceptions ); + xml.writeAttribute( "tests", stats.totals.assertions.total() ); + xml.writeAttribute( "hostname", "tbd" ); // !TBD + if( m_config->showDurations() == ShowDurations::Never ) + xml.writeAttribute( "time", "" ); + else + xml.writeAttribute( "time", suiteTime ); + xml.writeAttribute( "timestamp", getCurrentTimestamp() ); + + // Write test cases + for( TestGroupNode::ChildNodes::const_iterator + it = groupNode.children.begin(), itEnd = groupNode.children.end(); + it != itEnd; + ++it ) + writeTestCase( **it ); + + xml.scopedElement( "system-out" ).writeText( trim( stdOutForSuite.str() ), false ); + xml.scopedElement( "system-err" ).writeText( trim( stdErrForSuite.str() ), false ); + } + + void writeTestCase( TestCaseNode const& testCaseNode ) { + TestCaseStats const& stats = testCaseNode.value; + + // All test cases have exactly one section - which represents the + // test case itself. That section may have 0-n nested sections + assert( testCaseNode.children.size() == 1 ); + SectionNode const& rootSection = *testCaseNode.children.front(); + + std::string className = stats.testInfo.className; + + if( className.empty() ) { + if( rootSection.childSections.empty() ) + className = "global"; + } + writeSection( className, "", rootSection ); + } + + void writeSection( std::string const& className, + std::string const& rootName, + SectionNode const& sectionNode ) { + std::string name = trim( sectionNode.stats.sectionInfo.name ); + if( !rootName.empty() ) + name = rootName + '/' + name; + + if( !sectionNode.assertions.empty() || + !sectionNode.stdOut.empty() || + !sectionNode.stdErr.empty() ) { + XmlWriter::ScopedElement e = xml.scopedElement( "testcase" ); + if( className.empty() ) { + xml.writeAttribute( "classname", name ); + xml.writeAttribute( "name", "root" ); + } + else { + xml.writeAttribute( "classname", className ); + xml.writeAttribute( "name", name ); + } + xml.writeAttribute( "time", Catch::toString( sectionNode.stats.durationInSeconds ) ); + + writeAssertions( sectionNode ); + + if( !sectionNode.stdOut.empty() ) + xml.scopedElement( "system-out" ).writeText( trim( sectionNode.stdOut ), false ); + if( !sectionNode.stdErr.empty() ) + xml.scopedElement( "system-err" ).writeText( trim( sectionNode.stdErr ), false ); + } + for( SectionNode::ChildSections::const_iterator + it = sectionNode.childSections.begin(), + itEnd = sectionNode.childSections.end(); + it != itEnd; + ++it ) + if( className.empty() ) + writeSection( name, "", **it ); + else + writeSection( className, name, **it ); + } + + void writeAssertions( SectionNode const& sectionNode ) { + for( SectionNode::Assertions::const_iterator + it = sectionNode.assertions.begin(), itEnd = sectionNode.assertions.end(); + it != itEnd; + ++it ) + writeAssertion( *it ); + } + void writeAssertion( AssertionStats const& stats ) { + AssertionResult const& result = stats.assertionResult; + if( !result.isOk() ) { + std::string elementName; + switch( result.getResultType() ) { + case ResultWas::ThrewException: + case ResultWas::FatalErrorCondition: + elementName = "error"; + break; + case ResultWas::ExplicitFailure: + elementName = "failure"; + break; + case ResultWas::ExpressionFailed: + elementName = "failure"; + break; + case ResultWas::DidntThrowException: + elementName = "failure"; + break; + + // We should never see these here: + case ResultWas::Info: + case ResultWas::Warning: + case ResultWas::Ok: + case ResultWas::Unknown: + case ResultWas::FailureBit: + case ResultWas::Exception: + elementName = "internalError"; + break; + } + + XmlWriter::ScopedElement e = xml.scopedElement( elementName ); + + xml.writeAttribute( "message", result.getExpandedExpression() ); + xml.writeAttribute( "type", result.getTestMacroName() ); + + std::ostringstream oss; + if( !result.getMessage().empty() ) + oss << result.getMessage() << '\n'; + for( std::vector::const_iterator + it = stats.infoMessages.begin(), + itEnd = stats.infoMessages.end(); + it != itEnd; + ++it ) + if( it->type == ResultWas::Info ) + oss << it->message << '\n'; + + oss << "at " << result.getSourceInfo(); + xml.writeText( oss.str(), false ); + } + } + + XmlWriter xml; + Timer suiteTimer; + std::ostringstream stdOutForSuite; + std::ostringstream stdErrForSuite; + unsigned int unexpectedExceptions; + bool m_okToFail; + }; + + INTERNAL_CATCH_REGISTER_REPORTER( "junit", JunitReporter ) + +} // end namespace Catch + +// #included from: ../reporters/catch_reporter_console.hpp +#define TWOBLUECUBES_CATCH_REPORTER_CONSOLE_HPP_INCLUDED + +#include +#include + +namespace Catch { + + struct ConsoleReporter : StreamingReporterBase { + ConsoleReporter( ReporterConfig const& _config ) + : StreamingReporterBase( _config ), + m_headerPrinted( false ) + {} + + virtual ~ConsoleReporter() CATCH_OVERRIDE; + static std::string getDescription() { + return "Reports test results as plain lines of text"; + } + + virtual void noMatchingTestCases( std::string const& spec ) CATCH_OVERRIDE { + stream << "No test cases matched '" << spec << '\'' << std::endl; + } + + virtual void assertionStarting( AssertionInfo const& ) CATCH_OVERRIDE { + } + + virtual bool assertionEnded( AssertionStats const& _assertionStats ) CATCH_OVERRIDE { + AssertionResult const& result = _assertionStats.assertionResult; + + bool includeResults = m_config->includeSuccessfulResults() || !result.isOk(); + + // Drop out if result was successful but we're not printing them. + if( !includeResults && result.getResultType() != ResultWas::Warning ) + return false; + + lazyPrint(); + + AssertionPrinter printer( stream, _assertionStats, includeResults ); + printer.print(); + stream << std::endl; + return true; + } + + virtual void sectionStarting( SectionInfo const& _sectionInfo ) CATCH_OVERRIDE { + m_headerPrinted = false; + StreamingReporterBase::sectionStarting( _sectionInfo ); + } + virtual void sectionEnded( SectionStats const& _sectionStats ) CATCH_OVERRIDE { + if( _sectionStats.missingAssertions ) { + lazyPrint(); + Colour colour( Colour::ResultError ); + if( m_sectionStack.size() > 1 ) + stream << "\nNo assertions in section"; + else + stream << "\nNo assertions in test case"; + stream << " '" << _sectionStats.sectionInfo.name << "'\n" << std::endl; + } + if( m_config->showDurations() == ShowDurations::Always ) { + stream << getFormattedDuration(_sectionStats.durationInSeconds) << " s: " << _sectionStats.sectionInfo.name << std::endl; + } + if( m_headerPrinted ) { + m_headerPrinted = false; + } + StreamingReporterBase::sectionEnded( _sectionStats ); + } + + virtual void testCaseEnded( TestCaseStats const& _testCaseStats ) CATCH_OVERRIDE { + StreamingReporterBase::testCaseEnded( _testCaseStats ); + m_headerPrinted = false; + } + virtual void testGroupEnded( TestGroupStats const& _testGroupStats ) CATCH_OVERRIDE { + if( currentGroupInfo.used ) { + printSummaryDivider(); + stream << "Summary for group '" << _testGroupStats.groupInfo.name << "':\n"; + printTotals( _testGroupStats.totals ); + stream << '\n' << std::endl; + } + StreamingReporterBase::testGroupEnded( _testGroupStats ); + } + virtual void testRunEnded( TestRunStats const& _testRunStats ) CATCH_OVERRIDE { + printTotalsDivider( _testRunStats.totals ); + printTotals( _testRunStats.totals ); + stream << std::endl; + StreamingReporterBase::testRunEnded( _testRunStats ); + } + + private: + + class AssertionPrinter { + void operator= ( AssertionPrinter const& ); + public: + AssertionPrinter( std::ostream& _stream, AssertionStats const& _stats, bool _printInfoMessages ) + : stream( _stream ), + stats( _stats ), + result( _stats.assertionResult ), + colour( Colour::None ), + message( result.getMessage() ), + messages( _stats.infoMessages ), + printInfoMessages( _printInfoMessages ) + { + switch( result.getResultType() ) { + case ResultWas::Ok: + colour = Colour::Success; + passOrFail = "PASSED"; + //if( result.hasMessage() ) + if( _stats.infoMessages.size() == 1 ) + messageLabel = "with message"; + if( _stats.infoMessages.size() > 1 ) + messageLabel = "with messages"; + break; + case ResultWas::ExpressionFailed: + if( result.isOk() ) { + colour = Colour::Success; + passOrFail = "FAILED - but was ok"; + } + else { + colour = Colour::Error; + passOrFail = "FAILED"; + } + if( _stats.infoMessages.size() == 1 ) + messageLabel = "with message"; + if( _stats.infoMessages.size() > 1 ) + messageLabel = "with messages"; + break; + case ResultWas::ThrewException: + colour = Colour::Error; + passOrFail = "FAILED"; + messageLabel = "due to unexpected exception with "; + if (_stats.infoMessages.size() == 1) + messageLabel += "message"; + if (_stats.infoMessages.size() > 1) + messageLabel += "messages"; + break; + case ResultWas::FatalErrorCondition: + colour = Colour::Error; + passOrFail = "FAILED"; + messageLabel = "due to a fatal error condition"; + break; + case ResultWas::DidntThrowException: + colour = Colour::Error; + passOrFail = "FAILED"; + messageLabel = "because no exception was thrown where one was expected"; + break; + case ResultWas::Info: + messageLabel = "info"; + break; + case ResultWas::Warning: + messageLabel = "warning"; + break; + case ResultWas::ExplicitFailure: + passOrFail = "FAILED"; + colour = Colour::Error; + if( _stats.infoMessages.size() == 1 ) + messageLabel = "explicitly with message"; + if( _stats.infoMessages.size() > 1 ) + messageLabel = "explicitly with messages"; + break; + // These cases are here to prevent compiler warnings + case ResultWas::Unknown: + case ResultWas::FailureBit: + case ResultWas::Exception: + passOrFail = "** internal error **"; + colour = Colour::Error; + break; + } + } + + void print() const { + printSourceInfo(); + if( stats.totals.assertions.total() > 0 ) { + if( result.isOk() ) + stream << '\n'; + printResultType(); + printOriginalExpression(); + printReconstructedExpression(); + } + else { + stream << '\n'; + } + printMessage(); + } + + private: + void printResultType() const { + if( !passOrFail.empty() ) { + Colour colourGuard( colour ); + stream << passOrFail << ":\n"; + } + } + void printOriginalExpression() const { + if( result.hasExpression() ) { + Colour colourGuard( Colour::OriginalExpression ); + stream << " "; + stream << result.getExpressionInMacro(); + stream << '\n'; + } + } + void printReconstructedExpression() const { + if( result.hasExpandedExpression() ) { + stream << "with expansion:\n"; + Colour colourGuard( Colour::ReconstructedExpression ); + stream << Text( result.getExpandedExpression(), TextAttributes().setIndent(2) ) << '\n'; + } + } + void printMessage() const { + if( !messageLabel.empty() ) + stream << messageLabel << ':' << '\n'; + for( std::vector::const_iterator it = messages.begin(), itEnd = messages.end(); + it != itEnd; + ++it ) { + // If this assertion is a warning ignore any INFO messages + if( printInfoMessages || it->type != ResultWas::Info ) + stream << Text( it->message, TextAttributes().setIndent(2) ) << '\n'; + } + } + void printSourceInfo() const { + Colour colourGuard( Colour::FileName ); + stream << result.getSourceInfo() << ": "; + } + + std::ostream& stream; + AssertionStats const& stats; + AssertionResult const& result; + Colour::Code colour; + std::string passOrFail; + std::string messageLabel; + std::string message; + std::vector messages; + bool printInfoMessages; + }; + + void lazyPrint() { + + if( !currentTestRunInfo.used ) + lazyPrintRunInfo(); + if( !currentGroupInfo.used ) + lazyPrintGroupInfo(); + + if( !m_headerPrinted ) { + printTestCaseAndSectionHeader(); + m_headerPrinted = true; + } + } + void lazyPrintRunInfo() { + stream << '\n' << getLineOfChars<'~'>() << '\n'; + Colour colour( Colour::SecondaryText ); + stream << currentTestRunInfo->name + << " is a Catch v" << libraryVersion() << " host application.\n" + << "Run with -? for options\n\n"; + + if( m_config->rngSeed() != 0 ) + stream << "Randomness seeded to: " << m_config->rngSeed() << "\n\n"; + + currentTestRunInfo.used = true; + } + void lazyPrintGroupInfo() { + if( !currentGroupInfo->name.empty() && currentGroupInfo->groupsCounts > 1 ) { + printClosedHeader( "Group: " + currentGroupInfo->name ); + currentGroupInfo.used = true; + } + } + void printTestCaseAndSectionHeader() { + assert( !m_sectionStack.empty() ); + printOpenHeader( currentTestCaseInfo->name ); + + if( m_sectionStack.size() > 1 ) { + Colour colourGuard( Colour::Headers ); + + std::vector::const_iterator + it = m_sectionStack.begin()+1, // Skip first section (test case) + itEnd = m_sectionStack.end(); + for( ; it != itEnd; ++it ) + printHeaderString( it->name, 2 ); + } + + SourceLineInfo lineInfo = m_sectionStack.back().lineInfo; + + if( !lineInfo.empty() ){ + stream << getLineOfChars<'-'>() << '\n'; + Colour colourGuard( Colour::FileName ); + stream << lineInfo << '\n'; + } + stream << getLineOfChars<'.'>() << '\n' << std::endl; + } + + void printClosedHeader( std::string const& _name ) { + printOpenHeader( _name ); + stream << getLineOfChars<'.'>() << '\n'; + } + void printOpenHeader( std::string const& _name ) { + stream << getLineOfChars<'-'>() << '\n'; + { + Colour colourGuard( Colour::Headers ); + printHeaderString( _name ); + } + } + + // if string has a : in first line will set indent to follow it on + // subsequent lines + void printHeaderString( std::string const& _string, std::size_t indent = 0 ) { + std::size_t i = _string.find( ": " ); + if( i != std::string::npos ) + i+=2; + else + i = 0; + stream << Text( _string, TextAttributes() + .setIndent( indent+i) + .setInitialIndent( indent ) ) << '\n'; + } + + struct SummaryColumn { + + SummaryColumn( std::string const& _label, Colour::Code _colour ) + : label( _label ), + colour( _colour ) + {} + SummaryColumn addRow( std::size_t count ) { + std::ostringstream oss; + oss << count; + std::string row = oss.str(); + for( std::vector::iterator it = rows.begin(); it != rows.end(); ++it ) { + while( it->size() < row.size() ) + *it = ' ' + *it; + while( it->size() > row.size() ) + row = ' ' + row; + } + rows.push_back( row ); + return *this; + } + + std::string label; + Colour::Code colour; + std::vector rows; + + }; + + void printTotals( Totals const& totals ) { + if( totals.testCases.total() == 0 ) { + stream << Colour( Colour::Warning ) << "No tests ran\n"; + } + else if( totals.assertions.total() > 0 && totals.testCases.allPassed() ) { + stream << Colour( Colour::ResultSuccess ) << "All tests passed"; + stream << " (" + << pluralise( totals.assertions.passed, "assertion" ) << " in " + << pluralise( totals.testCases.passed, "test case" ) << ')' + << '\n'; + } + else { + + std::vector columns; + columns.push_back( SummaryColumn( "", Colour::None ) + .addRow( totals.testCases.total() ) + .addRow( totals.assertions.total() ) ); + columns.push_back( SummaryColumn( "passed", Colour::Success ) + .addRow( totals.testCases.passed ) + .addRow( totals.assertions.passed ) ); + columns.push_back( SummaryColumn( "failed", Colour::ResultError ) + .addRow( totals.testCases.failed ) + .addRow( totals.assertions.failed ) ); + columns.push_back( SummaryColumn( "failed as expected", Colour::ResultExpectedFailure ) + .addRow( totals.testCases.failedButOk ) + .addRow( totals.assertions.failedButOk ) ); + + printSummaryRow( "test cases", columns, 0 ); + printSummaryRow( "assertions", columns, 1 ); + } + } + void printSummaryRow( std::string const& label, std::vector const& cols, std::size_t row ) { + for( std::vector::const_iterator it = cols.begin(); it != cols.end(); ++it ) { + std::string value = it->rows[row]; + if( it->label.empty() ) { + stream << label << ": "; + if( value != "0" ) + stream << value; + else + stream << Colour( Colour::Warning ) << "- none -"; + } + else if( value != "0" ) { + stream << Colour( Colour::LightGrey ) << " | "; + stream << Colour( it->colour ) + << value << ' ' << it->label; + } + } + stream << '\n'; + } + + static std::size_t makeRatio( std::size_t number, std::size_t total ) { + std::size_t ratio = total > 0 ? CATCH_CONFIG_CONSOLE_WIDTH * number/ total : 0; + return ( ratio == 0 && number > 0 ) ? 1 : ratio; + } + static std::size_t& findMax( std::size_t& i, std::size_t& j, std::size_t& k ) { + if( i > j && i > k ) + return i; + else if( j > k ) + return j; + else + return k; + } + + void printTotalsDivider( Totals const& totals ) { + if( totals.testCases.total() > 0 ) { + std::size_t failedRatio = makeRatio( totals.testCases.failed, totals.testCases.total() ); + std::size_t failedButOkRatio = makeRatio( totals.testCases.failedButOk, totals.testCases.total() ); + std::size_t passedRatio = makeRatio( totals.testCases.passed, totals.testCases.total() ); + while( failedRatio + failedButOkRatio + passedRatio < CATCH_CONFIG_CONSOLE_WIDTH-1 ) + findMax( failedRatio, failedButOkRatio, passedRatio )++; + while( failedRatio + failedButOkRatio + passedRatio > CATCH_CONFIG_CONSOLE_WIDTH-1 ) + findMax( failedRatio, failedButOkRatio, passedRatio )--; + + stream << Colour( Colour::Error ) << std::string( failedRatio, '=' ); + stream << Colour( Colour::ResultExpectedFailure ) << std::string( failedButOkRatio, '=' ); + if( totals.testCases.allPassed() ) + stream << Colour( Colour::ResultSuccess ) << std::string( passedRatio, '=' ); + else + stream << Colour( Colour::Success ) << std::string( passedRatio, '=' ); + } + else { + stream << Colour( Colour::Warning ) << std::string( CATCH_CONFIG_CONSOLE_WIDTH-1, '=' ); + } + stream << '\n'; + } + void printSummaryDivider() { + stream << getLineOfChars<'-'>() << '\n'; + } + + private: + bool m_headerPrinted; + }; + + INTERNAL_CATCH_REGISTER_REPORTER( "console", ConsoleReporter ) + +} // end namespace Catch + +// #included from: ../reporters/catch_reporter_compact.hpp +#define TWOBLUECUBES_CATCH_REPORTER_COMPACT_HPP_INCLUDED + +namespace Catch { + + struct CompactReporter : StreamingReporterBase { + + CompactReporter( ReporterConfig const& _config ) + : StreamingReporterBase( _config ) + {} + + virtual ~CompactReporter(); + + static std::string getDescription() { + return "Reports test results on a single line, suitable for IDEs"; + } + + virtual ReporterPreferences getPreferences() const { + ReporterPreferences prefs; + prefs.shouldRedirectStdOut = false; + return prefs; + } + + virtual void noMatchingTestCases( std::string const& spec ) { + stream << "No test cases matched '" << spec << '\'' << std::endl; + } + + virtual void assertionStarting( AssertionInfo const& ) {} + + virtual bool assertionEnded( AssertionStats const& _assertionStats ) { + AssertionResult const& result = _assertionStats.assertionResult; + + bool printInfoMessages = true; + + // Drop out if result was successful and we're not printing those + if( !m_config->includeSuccessfulResults() && result.isOk() ) { + if( result.getResultType() != ResultWas::Warning ) + return false; + printInfoMessages = false; + } + + AssertionPrinter printer( stream, _assertionStats, printInfoMessages ); + printer.print(); + + stream << std::endl; + return true; + } + + virtual void sectionEnded(SectionStats const& _sectionStats) CATCH_OVERRIDE { + if (m_config->showDurations() == ShowDurations::Always) { + stream << getFormattedDuration(_sectionStats.durationInSeconds) << " s: " << _sectionStats.sectionInfo.name << std::endl; + } + } + + virtual void testRunEnded( TestRunStats const& _testRunStats ) { + printTotals( _testRunStats.totals ); + stream << '\n' << std::endl; + StreamingReporterBase::testRunEnded( _testRunStats ); + } + + private: + class AssertionPrinter { + void operator= ( AssertionPrinter const& ); + public: + AssertionPrinter( std::ostream& _stream, AssertionStats const& _stats, bool _printInfoMessages ) + : stream( _stream ) + , stats( _stats ) + , result( _stats.assertionResult ) + , messages( _stats.infoMessages ) + , itMessage( _stats.infoMessages.begin() ) + , printInfoMessages( _printInfoMessages ) + {} + + void print() { + printSourceInfo(); + + itMessage = messages.begin(); + + switch( result.getResultType() ) { + case ResultWas::Ok: + printResultType( Colour::ResultSuccess, passedString() ); + printOriginalExpression(); + printReconstructedExpression(); + if ( ! result.hasExpression() ) + printRemainingMessages( Colour::None ); + else + printRemainingMessages(); + break; + case ResultWas::ExpressionFailed: + if( result.isOk() ) + printResultType( Colour::ResultSuccess, failedString() + std::string( " - but was ok" ) ); + else + printResultType( Colour::Error, failedString() ); + printOriginalExpression(); + printReconstructedExpression(); + printRemainingMessages(); + break; + case ResultWas::ThrewException: + printResultType( Colour::Error, failedString() ); + printIssue( "unexpected exception with message:" ); + printMessage(); + printExpressionWas(); + printRemainingMessages(); + break; + case ResultWas::FatalErrorCondition: + printResultType( Colour::Error, failedString() ); + printIssue( "fatal error condition with message:" ); + printMessage(); + printExpressionWas(); + printRemainingMessages(); + break; + case ResultWas::DidntThrowException: + printResultType( Colour::Error, failedString() ); + printIssue( "expected exception, got none" ); + printExpressionWas(); + printRemainingMessages(); + break; + case ResultWas::Info: + printResultType( Colour::None, "info" ); + printMessage(); + printRemainingMessages(); + break; + case ResultWas::Warning: + printResultType( Colour::None, "warning" ); + printMessage(); + printRemainingMessages(); + break; + case ResultWas::ExplicitFailure: + printResultType( Colour::Error, failedString() ); + printIssue( "explicitly" ); + printRemainingMessages( Colour::None ); + break; + // These cases are here to prevent compiler warnings + case ResultWas::Unknown: + case ResultWas::FailureBit: + case ResultWas::Exception: + printResultType( Colour::Error, "** internal error **" ); + break; + } + } + + private: + // Colour::LightGrey + + static Colour::Code dimColour() { return Colour::FileName; } + +#ifdef CATCH_PLATFORM_MAC + static const char* failedString() { return "FAILED"; } + static const char* passedString() { return "PASSED"; } +#else + static const char* failedString() { return "failed"; } + static const char* passedString() { return "passed"; } +#endif + + void printSourceInfo() const { + Colour colourGuard( Colour::FileName ); + stream << result.getSourceInfo() << ':'; + } + + void printResultType( Colour::Code colour, std::string const& passOrFail ) const { + if( !passOrFail.empty() ) { + { + Colour colourGuard( colour ); + stream << ' ' << passOrFail; + } + stream << ':'; + } + } + + void printIssue( std::string const& issue ) const { + stream << ' ' << issue; + } + + void printExpressionWas() { + if( result.hasExpression() ) { + stream << ';'; + { + Colour colour( dimColour() ); + stream << " expression was:"; + } + printOriginalExpression(); + } + } + + void printOriginalExpression() const { + if( result.hasExpression() ) { + stream << ' ' << result.getExpression(); + } + } + + void printReconstructedExpression() const { + if( result.hasExpandedExpression() ) { + { + Colour colour( dimColour() ); + stream << " for: "; + } + stream << result.getExpandedExpression(); + } + } + + void printMessage() { + if ( itMessage != messages.end() ) { + stream << " '" << itMessage->message << '\''; + ++itMessage; + } + } + + void printRemainingMessages( Colour::Code colour = dimColour() ) { + if ( itMessage == messages.end() ) + return; + + // using messages.end() directly yields compilation error: + std::vector::const_iterator itEnd = messages.end(); + const std::size_t N = static_cast( std::distance( itMessage, itEnd ) ); + + { + Colour colourGuard( colour ); + stream << " with " << pluralise( N, "message" ) << ':'; + } + + for(; itMessage != itEnd; ) { + // If this assertion is a warning ignore any INFO messages + if( printInfoMessages || itMessage->type != ResultWas::Info ) { + stream << " '" << itMessage->message << '\''; + if ( ++itMessage != itEnd ) { + Colour colourGuard( dimColour() ); + stream << " and"; + } + } + } + } + + private: + std::ostream& stream; + AssertionStats const& stats; + AssertionResult const& result; + std::vector messages; + std::vector::const_iterator itMessage; + bool printInfoMessages; + }; + + // Colour, message variants: + // - white: No tests ran. + // - red: Failed [both/all] N test cases, failed [both/all] M assertions. + // - white: Passed [both/all] N test cases (no assertions). + // - red: Failed N tests cases, failed M assertions. + // - green: Passed [both/all] N tests cases with M assertions. + + std::string bothOrAll( std::size_t count ) const { + return count == 1 ? std::string() : count == 2 ? "both " : "all " ; + } + + void printTotals( const Totals& totals ) const { + if( totals.testCases.total() == 0 ) { + stream << "No tests ran."; + } + else if( totals.testCases.failed == totals.testCases.total() ) { + Colour colour( Colour::ResultError ); + const std::string qualify_assertions_failed = + totals.assertions.failed == totals.assertions.total() ? + bothOrAll( totals.assertions.failed ) : std::string(); + stream << + "Failed " << bothOrAll( totals.testCases.failed ) + << pluralise( totals.testCases.failed, "test case" ) << ", " + "failed " << qualify_assertions_failed << + pluralise( totals.assertions.failed, "assertion" ) << '.'; + } + else if( totals.assertions.total() == 0 ) { + stream << + "Passed " << bothOrAll( totals.testCases.total() ) + << pluralise( totals.testCases.total(), "test case" ) + << " (no assertions)."; + } + else if( totals.assertions.failed ) { + Colour colour( Colour::ResultError ); + stream << + "Failed " << pluralise( totals.testCases.failed, "test case" ) << ", " + "failed " << pluralise( totals.assertions.failed, "assertion" ) << '.'; + } + else { + Colour colour( Colour::ResultSuccess ); + stream << + "Passed " << bothOrAll( totals.testCases.passed ) + << pluralise( totals.testCases.passed, "test case" ) << + " with " << pluralise( totals.assertions.passed, "assertion" ) << '.'; + } + } + }; + + INTERNAL_CATCH_REGISTER_REPORTER( "compact", CompactReporter ) + +} // end namespace Catch + +namespace Catch { + // These are all here to avoid warnings about not having any out of line + // virtual methods + NonCopyable::~NonCopyable() {} + IShared::~IShared() {} + IStream::~IStream() CATCH_NOEXCEPT {} + FileStream::~FileStream() CATCH_NOEXCEPT {} + CoutStream::~CoutStream() CATCH_NOEXCEPT {} + DebugOutStream::~DebugOutStream() CATCH_NOEXCEPT {} + StreamBufBase::~StreamBufBase() CATCH_NOEXCEPT {} + IContext::~IContext() {} + IResultCapture::~IResultCapture() {} + ITestCase::~ITestCase() {} + ITestCaseRegistry::~ITestCaseRegistry() {} + IRegistryHub::~IRegistryHub() {} + IMutableRegistryHub::~IMutableRegistryHub() {} + IExceptionTranslator::~IExceptionTranslator() {} + IExceptionTranslatorRegistry::~IExceptionTranslatorRegistry() {} + IReporter::~IReporter() {} + IReporterFactory::~IReporterFactory() {} + IReporterRegistry::~IReporterRegistry() {} + IStreamingReporter::~IStreamingReporter() {} + AssertionStats::~AssertionStats() {} + SectionStats::~SectionStats() {} + TestCaseStats::~TestCaseStats() {} + TestGroupStats::~TestGroupStats() {} + TestRunStats::~TestRunStats() {} + CumulativeReporterBase::SectionNode::~SectionNode() {} + CumulativeReporterBase::~CumulativeReporterBase() {} + + StreamingReporterBase::~StreamingReporterBase() {} + ConsoleReporter::~ConsoleReporter() {} + CompactReporter::~CompactReporter() {} + IRunner::~IRunner() {} + IMutableContext::~IMutableContext() {} + IConfig::~IConfig() {} + XmlReporter::~XmlReporter() {} + JunitReporter::~JunitReporter() {} + TestRegistry::~TestRegistry() {} + FreeFunctionTestCase::~FreeFunctionTestCase() {} + IGeneratorInfo::~IGeneratorInfo() {} + IGeneratorsForTest::~IGeneratorsForTest() {} + WildcardPattern::~WildcardPattern() {} + TestSpec::Pattern::~Pattern() {} + TestSpec::NamePattern::~NamePattern() {} + TestSpec::TagPattern::~TagPattern() {} + TestSpec::ExcludedPattern::~ExcludedPattern() {} + Matchers::Impl::MatcherUntypedBase::~MatcherUntypedBase() {} + + void Config::dummy() {} + + namespace TestCaseTracking { + ITracker::~ITracker() {} + TrackerBase::~TrackerBase() {} + SectionTracker::~SectionTracker() {} + IndexTracker::~IndexTracker() {} + } +} + +#ifdef __clang__ +#pragma clang diagnostic pop +#endif + +#endif + +#ifdef CATCH_CONFIG_MAIN +// #included from: internal/catch_default_main.hpp +#define TWOBLUECUBES_CATCH_DEFAULT_MAIN_HPP_INCLUDED + +#ifndef __OBJC__ + +#if defined(WIN32) && defined(_UNICODE) && !defined(DO_NOT_USE_WMAIN) +// Standard C/C++ Win32 Unicode wmain entry point +extern "C" int wmain (int argc, wchar_t * argv[], wchar_t * []) { +#else +// Standard C/C++ main entry point +int main (int argc, char * argv[]) { +#endif + + int result = Catch::Session().run( argc, argv ); + return ( result < 0xff ? result : 0xff ); +} + +#else // __OBJC__ + +// Objective-C entry point +int main (int argc, char * const argv[]) { +#if !CATCH_ARC_ENABLED + NSAutoreleasePool * pool = [[NSAutoreleasePool alloc] init]; +#endif + + Catch::registerTestMethods(); + int result = Catch::Session().run( argc, (char* const*)argv ); + +#if !CATCH_ARC_ENABLED + [pool drain]; +#endif + + return ( result < 0xff ? result : 0xff ); +} + +#endif // __OBJC__ + +#endif + +#ifdef CLARA_CONFIG_MAIN_NOT_DEFINED +# undef CLARA_CONFIG_MAIN +#endif + +////// + +// If this config identifier is defined then all CATCH macros are prefixed with CATCH_ +#ifdef CATCH_CONFIG_PREFIX_ALL + +#if defined(CATCH_CONFIG_FAST_COMPILE) +#define CATCH_REQUIRE( expr ) INTERNAL_CATCH_TEST_NO_TRY( "CATCH_REQUIRE", Catch::ResultDisposition::Normal, expr ) +#define CATCH_REQUIRE_FALSE( expr ) INTERNAL_CATCH_TEST_NO_TRY( "CATCH_REQUIRE_FALSE", Catch::ResultDisposition::Normal | Catch::ResultDisposition::FalseTest, expr ) +#else +#define CATCH_REQUIRE( expr ) INTERNAL_CATCH_TEST( "CATCH_REQUIRE", Catch::ResultDisposition::Normal, expr ) +#define CATCH_REQUIRE_FALSE( expr ) INTERNAL_CATCH_TEST( "CATCH_REQUIRE_FALSE", Catch::ResultDisposition::Normal | Catch::ResultDisposition::FalseTest, expr ) +#endif + +#define CATCH_REQUIRE_THROWS( expr ) INTERNAL_CATCH_THROWS( "CATCH_REQUIRE_THROWS", Catch::ResultDisposition::Normal, "", expr ) +#define CATCH_REQUIRE_THROWS_AS( expr, exceptionType ) INTERNAL_CATCH_THROWS_AS( "CATCH_REQUIRE_THROWS_AS", exceptionType, Catch::ResultDisposition::Normal, expr ) +#define CATCH_REQUIRE_THROWS_WITH( expr, matcher ) INTERNAL_CATCH_THROWS( "CATCH_REQUIRE_THROWS_WITH", Catch::ResultDisposition::Normal, matcher, expr ) +#define CATCH_REQUIRE_NOTHROW( expr ) INTERNAL_CATCH_NO_THROW( "CATCH_REQUIRE_NOTHROW", Catch::ResultDisposition::Normal, expr ) + +#define CATCH_CHECK( expr ) INTERNAL_CATCH_TEST( "CATCH_CHECK", Catch::ResultDisposition::ContinueOnFailure, expr ) +#define CATCH_CHECK_FALSE( expr ) INTERNAL_CATCH_TEST( "CATCH_CHECK_FALSE", Catch::ResultDisposition::ContinueOnFailure | Catch::ResultDisposition::FalseTest, expr ) +#define CATCH_CHECKED_IF( expr ) INTERNAL_CATCH_IF( "CATCH_CHECKED_IF", Catch::ResultDisposition::ContinueOnFailure, expr ) +#define CATCH_CHECKED_ELSE( expr ) INTERNAL_CATCH_ELSE( "CATCH_CHECKED_ELSE", Catch::ResultDisposition::ContinueOnFailure, expr ) +#define CATCH_CHECK_NOFAIL( expr ) INTERNAL_CATCH_TEST( "CATCH_CHECK_NOFAIL", Catch::ResultDisposition::ContinueOnFailure | Catch::ResultDisposition::SuppressFail, expr ) + +#define CATCH_CHECK_THROWS( expr ) INTERNAL_CATCH_THROWS( "CATCH_CHECK_THROWS", Catch::ResultDisposition::ContinueOnFailure, "", expr ) +#define CATCH_CHECK_THROWS_AS( expr, exceptionType ) INTERNAL_CATCH_THROWS_AS( "CATCH_CHECK_THROWS_AS", exceptionType, Catch::ResultDisposition::ContinueOnFailure, expr ) +#define CATCH_CHECK_THROWS_WITH( expr, matcher ) INTERNAL_CATCH_THROWS( "CATCH_CHECK_THROWS_WITH", Catch::ResultDisposition::ContinueOnFailure, matcher, expr ) +#define CATCH_CHECK_NOTHROW( expr ) INTERNAL_CATCH_NO_THROW( "CATCH_CHECK_NOTHROW", Catch::ResultDisposition::ContinueOnFailure, expr ) + +#define CATCH_CHECK_THAT( arg, matcher ) INTERNAL_CHECK_THAT( "CATCH_CHECK_THAT", matcher, Catch::ResultDisposition::ContinueOnFailure, arg ) + +#if defined(CATCH_CONFIG_FAST_COMPILE) +#define CATCH_REQUIRE_THAT( arg, matcher ) INTERNAL_CHECK_THAT_NO_TRY( "CATCH_REQUIRE_THAT", matcher, Catch::ResultDisposition::Normal, arg ) +#else +#define CATCH_REQUIRE_THAT( arg, matcher ) INTERNAL_CHECK_THAT( "CATCH_REQUIRE_THAT", matcher, Catch::ResultDisposition::Normal, arg ) +#endif + +#define CATCH_INFO( msg ) INTERNAL_CATCH_INFO( "CATCH_INFO", msg ) +#define CATCH_WARN( msg ) INTERNAL_CATCH_MSG( "CATCH_WARN", Catch::ResultWas::Warning, Catch::ResultDisposition::ContinueOnFailure, msg ) +#define CATCH_SCOPED_INFO( msg ) INTERNAL_CATCH_INFO( "CATCH_INFO", msg ) +#define CATCH_CAPTURE( msg ) INTERNAL_CATCH_INFO( "CATCH_CAPTURE", #msg " := " << Catch::toString(msg) ) +#define CATCH_SCOPED_CAPTURE( msg ) INTERNAL_CATCH_INFO( "CATCH_CAPTURE", #msg " := " << Catch::toString(msg) ) + +#ifdef CATCH_CONFIG_VARIADIC_MACROS + #define CATCH_TEST_CASE( ... ) INTERNAL_CATCH_TESTCASE( __VA_ARGS__ ) + #define CATCH_TEST_CASE_METHOD( className, ... ) INTERNAL_CATCH_TEST_CASE_METHOD( className, __VA_ARGS__ ) + #define CATCH_METHOD_AS_TEST_CASE( method, ... ) INTERNAL_CATCH_METHOD_AS_TEST_CASE( method, __VA_ARGS__ ) + #define CATCH_REGISTER_TEST_CASE( Function, ... ) INTERNAL_CATCH_REGISTER_TESTCASE( Function, __VA_ARGS__ ) + #define CATCH_SECTION( ... ) INTERNAL_CATCH_SECTION( __VA_ARGS__ ) + #define CATCH_FAIL( ... ) INTERNAL_CATCH_MSG( "CATCH_FAIL", Catch::ResultWas::ExplicitFailure, Catch::ResultDisposition::Normal, __VA_ARGS__ ) + #define CATCH_FAIL_CHECK( ... ) INTERNAL_CATCH_MSG( "CATCH_FAIL_CHECK", Catch::ResultWas::ExplicitFailure, Catch::ResultDisposition::ContinueOnFailure, __VA_ARGS__ ) + #define CATCH_SUCCEED( ... ) INTERNAL_CATCH_MSG( "CATCH_SUCCEED", Catch::ResultWas::Ok, Catch::ResultDisposition::ContinueOnFailure, __VA_ARGS__ ) +#else + #define CATCH_TEST_CASE( name, description ) INTERNAL_CATCH_TESTCASE( name, description ) + #define CATCH_TEST_CASE_METHOD( className, name, description ) INTERNAL_CATCH_TEST_CASE_METHOD( className, name, description ) + #define CATCH_METHOD_AS_TEST_CASE( method, name, description ) INTERNAL_CATCH_METHOD_AS_TEST_CASE( method, name, description ) + #define CATCH_REGISTER_TEST_CASE( function, name, description ) INTERNAL_CATCH_REGISTER_TESTCASE( function, name, description ) + #define CATCH_SECTION( name, description ) INTERNAL_CATCH_SECTION( name, description ) + #define CATCH_FAIL( msg ) INTERNAL_CATCH_MSG( "CATCH_FAIL", Catch::ResultWas::ExplicitFailure, Catch::ResultDisposition::Normal, msg ) + #define CATCH_FAIL_CHECK( msg ) INTERNAL_CATCH_MSG( "CATCH_FAIL_CHECK", Catch::ResultWas::ExplicitFailure, Catch::ResultDisposition::ContinueOnFailure, msg ) + #define CATCH_SUCCEED( msg ) INTERNAL_CATCH_MSG( "CATCH_SUCCEED", Catch::ResultWas::Ok, Catch::ResultDisposition::ContinueOnFailure, msg ) +#endif +#define CATCH_ANON_TEST_CASE() INTERNAL_CATCH_TESTCASE( "", "" ) + +#define CATCH_REGISTER_REPORTER( name, reporterType ) INTERNAL_CATCH_REGISTER_REPORTER( name, reporterType ) +#define CATCH_REGISTER_LEGACY_REPORTER( name, reporterType ) INTERNAL_CATCH_REGISTER_LEGACY_REPORTER( name, reporterType ) + +#define CATCH_GENERATE( expr) INTERNAL_CATCH_GENERATE( expr ) + +// "BDD-style" convenience wrappers +#ifdef CATCH_CONFIG_VARIADIC_MACROS +#define CATCH_SCENARIO( ... ) CATCH_TEST_CASE( "Scenario: " __VA_ARGS__ ) +#define CATCH_SCENARIO_METHOD( className, ... ) INTERNAL_CATCH_TEST_CASE_METHOD( className, "Scenario: " __VA_ARGS__ ) +#else +#define CATCH_SCENARIO( name, tags ) CATCH_TEST_CASE( "Scenario: " name, tags ) +#define CATCH_SCENARIO_METHOD( className, name, tags ) INTERNAL_CATCH_TEST_CASE_METHOD( className, "Scenario: " name, tags ) +#endif +#define CATCH_GIVEN( desc ) CATCH_SECTION( std::string( "Given: ") + desc, "" ) +#define CATCH_WHEN( desc ) CATCH_SECTION( std::string( " When: ") + desc, "" ) +#define CATCH_AND_WHEN( desc ) CATCH_SECTION( std::string( " And: ") + desc, "" ) +#define CATCH_THEN( desc ) CATCH_SECTION( std::string( " Then: ") + desc, "" ) +#define CATCH_AND_THEN( desc ) CATCH_SECTION( std::string( " And: ") + desc, "" ) + +// If CATCH_CONFIG_PREFIX_ALL is not defined then the CATCH_ prefix is not required +#else + +#if defined(CATCH_CONFIG_FAST_COMPILE) +#define REQUIRE( expr ) INTERNAL_CATCH_TEST_NO_TRY( "REQUIRE", Catch::ResultDisposition::Normal, expr ) +#define REQUIRE_FALSE( expr ) INTERNAL_CATCH_TEST_NO_TRY( "REQUIRE_FALSE", Catch::ResultDisposition::Normal | Catch::ResultDisposition::FalseTest, expr ) + +#else +#define REQUIRE( expr ) INTERNAL_CATCH_TEST( "REQUIRE", Catch::ResultDisposition::Normal, expr ) +#define REQUIRE_FALSE( expr ) INTERNAL_CATCH_TEST( "REQUIRE_FALSE", Catch::ResultDisposition::Normal | Catch::ResultDisposition::FalseTest, expr ) +#endif + +#define REQUIRE_THROWS( expr ) INTERNAL_CATCH_THROWS( "REQUIRE_THROWS", Catch::ResultDisposition::Normal, "", expr ) +#define REQUIRE_THROWS_AS( expr, exceptionType ) INTERNAL_CATCH_THROWS_AS( "REQUIRE_THROWS_AS", exceptionType, Catch::ResultDisposition::Normal, expr ) +#define REQUIRE_THROWS_WITH( expr, matcher ) INTERNAL_CATCH_THROWS( "REQUIRE_THROWS_WITH", Catch::ResultDisposition::Normal, matcher, expr ) +#define REQUIRE_NOTHROW( expr ) INTERNAL_CATCH_NO_THROW( "REQUIRE_NOTHROW", Catch::ResultDisposition::Normal, expr ) + +#define CHECK( expr ) INTERNAL_CATCH_TEST( "CHECK", Catch::ResultDisposition::ContinueOnFailure, expr ) +#define CHECK_FALSE( expr ) INTERNAL_CATCH_TEST( "CHECK_FALSE", Catch::ResultDisposition::ContinueOnFailure | Catch::ResultDisposition::FalseTest, expr ) +#define CHECKED_IF( expr ) INTERNAL_CATCH_IF( "CHECKED_IF", Catch::ResultDisposition::ContinueOnFailure, expr ) +#define CHECKED_ELSE( expr ) INTERNAL_CATCH_ELSE( "CHECKED_ELSE", Catch::ResultDisposition::ContinueOnFailure, expr ) +#define CHECK_NOFAIL( expr ) INTERNAL_CATCH_TEST( "CHECK_NOFAIL", Catch::ResultDisposition::ContinueOnFailure | Catch::ResultDisposition::SuppressFail, expr ) + +#define CHECK_THROWS( expr ) INTERNAL_CATCH_THROWS( "CHECK_THROWS", Catch::ResultDisposition::ContinueOnFailure, "", expr ) +#define CHECK_THROWS_AS( expr, exceptionType ) INTERNAL_CATCH_THROWS_AS( "CHECK_THROWS_AS", exceptionType, Catch::ResultDisposition::ContinueOnFailure, expr ) +#define CHECK_THROWS_WITH( expr, matcher ) INTERNAL_CATCH_THROWS( "CHECK_THROWS_WITH", Catch::ResultDisposition::ContinueOnFailure, matcher, expr ) +#define CHECK_NOTHROW( expr ) INTERNAL_CATCH_NO_THROW( "CHECK_NOTHROW", Catch::ResultDisposition::ContinueOnFailure, expr ) + +#define CHECK_THAT( arg, matcher ) INTERNAL_CHECK_THAT( "CHECK_THAT", matcher, Catch::ResultDisposition::ContinueOnFailure, arg ) + +#if defined(CATCH_CONFIG_FAST_COMPILE) +#define REQUIRE_THAT( arg, matcher ) INTERNAL_CHECK_THAT_NO_TRY( "REQUIRE_THAT", matcher, Catch::ResultDisposition::Normal, arg ) +#else +#define REQUIRE_THAT( arg, matcher ) INTERNAL_CHECK_THAT( "REQUIRE_THAT", matcher, Catch::ResultDisposition::Normal, arg ) +#endif + +#define INFO( msg ) INTERNAL_CATCH_INFO( "INFO", msg ) +#define WARN( msg ) INTERNAL_CATCH_MSG( "WARN", Catch::ResultWas::Warning, Catch::ResultDisposition::ContinueOnFailure, msg ) +#define SCOPED_INFO( msg ) INTERNAL_CATCH_INFO( "INFO", msg ) +#define CAPTURE( msg ) INTERNAL_CATCH_INFO( "CAPTURE", #msg " := " << Catch::toString(msg) ) +#define SCOPED_CAPTURE( msg ) INTERNAL_CATCH_INFO( "CAPTURE", #msg " := " << Catch::toString(msg) ) + +#ifdef CATCH_CONFIG_VARIADIC_MACROS +#define TEST_CASE( ... ) INTERNAL_CATCH_TESTCASE( __VA_ARGS__ ) +#define TEST_CASE_METHOD( className, ... ) INTERNAL_CATCH_TEST_CASE_METHOD( className, __VA_ARGS__ ) +#define METHOD_AS_TEST_CASE( method, ... ) INTERNAL_CATCH_METHOD_AS_TEST_CASE( method, __VA_ARGS__ ) +#define REGISTER_TEST_CASE( Function, ... ) INTERNAL_CATCH_REGISTER_TESTCASE( Function, __VA_ARGS__ ) +#define SECTION( ... ) INTERNAL_CATCH_SECTION( __VA_ARGS__ ) +#define FAIL( ... ) INTERNAL_CATCH_MSG( "FAIL", Catch::ResultWas::ExplicitFailure, Catch::ResultDisposition::Normal, __VA_ARGS__ ) +#define FAIL_CHECK( ... ) INTERNAL_CATCH_MSG( "FAIL_CHECK", Catch::ResultWas::ExplicitFailure, Catch::ResultDisposition::ContinueOnFailure, __VA_ARGS__ ) +#define SUCCEED( ... ) INTERNAL_CATCH_MSG( "SUCCEED", Catch::ResultWas::Ok, Catch::ResultDisposition::ContinueOnFailure, __VA_ARGS__ ) +#else +#define TEST_CASE( name, description ) INTERNAL_CATCH_TESTCASE( name, description ) + #define TEST_CASE_METHOD( className, name, description ) INTERNAL_CATCH_TEST_CASE_METHOD( className, name, description ) + #define METHOD_AS_TEST_CASE( method, name, description ) INTERNAL_CATCH_METHOD_AS_TEST_CASE( method, name, description ) + #define REGISTER_TEST_CASE( method, name, description ) INTERNAL_CATCH_REGISTER_TESTCASE( method, name, description ) + #define SECTION( name, description ) INTERNAL_CATCH_SECTION( name, description ) + #define FAIL( msg ) INTERNAL_CATCH_MSG( "FAIL", Catch::ResultWas::ExplicitFailure, Catch::ResultDisposition::Normal, msg ) + #define FAIL_CHECK( msg ) INTERNAL_CATCH_MSG( "FAIL_CHECK", Catch::ResultWas::ExplicitFailure, Catch::ResultDisposition::ContinueOnFailure, msg ) + #define SUCCEED( msg ) INTERNAL_CATCH_MSG( "SUCCEED", Catch::ResultWas::Ok, Catch::ResultDisposition::ContinueOnFailure, msg ) +#endif +#define ANON_TEST_CASE() INTERNAL_CATCH_TESTCASE( "", "" ) + +#define REGISTER_REPORTER( name, reporterType ) INTERNAL_CATCH_REGISTER_REPORTER( name, reporterType ) +#define REGISTER_LEGACY_REPORTER( name, reporterType ) INTERNAL_CATCH_REGISTER_LEGACY_REPORTER( name, reporterType ) + +#define GENERATE( expr) INTERNAL_CATCH_GENERATE( expr ) + +#endif + +#define CATCH_TRANSLATE_EXCEPTION( signature ) INTERNAL_CATCH_TRANSLATE_EXCEPTION( signature ) + +// "BDD-style" convenience wrappers +#ifdef CATCH_CONFIG_VARIADIC_MACROS +#define SCENARIO( ... ) TEST_CASE( "Scenario: " __VA_ARGS__ ) +#define SCENARIO_METHOD( className, ... ) INTERNAL_CATCH_TEST_CASE_METHOD( className, "Scenario: " __VA_ARGS__ ) +#else +#define SCENARIO( name, tags ) TEST_CASE( "Scenario: " name, tags ) +#define SCENARIO_METHOD( className, name, tags ) INTERNAL_CATCH_TEST_CASE_METHOD( className, "Scenario: " name, tags ) +#endif +#define GIVEN( desc ) SECTION( std::string(" Given: ") + desc, "" ) +#define WHEN( desc ) SECTION( std::string(" When: ") + desc, "" ) +#define AND_WHEN( desc ) SECTION( std::string("And when: ") + desc, "" ) +#define THEN( desc ) SECTION( std::string(" Then: ") + desc, "" ) +#define AND_THEN( desc ) SECTION( std::string(" And: ") + desc, "" ) + +using Catch::Detail::Approx; + +// #included from: internal/catch_reenable_warnings.h + +#define TWOBLUECUBES_CATCH_REENABLE_WARNINGS_H_INCLUDED + +#ifdef __clang__ +# ifdef __ICC // icpc defines the __clang__ macro +# pragma warning(pop) +# else +# pragma clang diagnostic pop +# endif +#elif defined __GNUC__ +# pragma GCC diagnostic pop +#endif + +#endif // TWOBLUECUBES_SINGLE_INCLUDE_CATCH_HPP_INCLUDED + diff --git a/unity/embed_api_tests/main.cpp b/unity/embed_api_tests/main.cpp new file mode 100644 index 00000000000000..01a5691b88a815 --- /dev/null +++ b/unity/embed_api_tests/main.cpp @@ -0,0 +1,2432 @@ +#include +#include +#include +#include +#include +#include +#include +#include +#include +#ifndef WIN32 +#include +#include +#endif +//#include "unittest-cpp/UnitTest++/UnitTest++.h" +#define CATCH_CONFIG_RUNNER +#include "catch/catch.hpp" + +#define UNITY_EDITOR 1 +#define USE_CORECLR + +typedef signed short SInt16; +typedef unsigned short UInt16; +typedef unsigned char UInt8; +typedef signed char SInt8; +typedef signed int SInt32; +typedef unsigned int UInt32; +typedef signed long long SInt64; +typedef unsigned long long UInt64; +typedef void* mono_register_object_callback; +typedef void* mono_liveness_world_state_callback; +const int MONO_TABLE_TYPEDEF = 2; // mono/metadata/blob.h +const int MONO_TOKEN_TYPE_DEF = 0x02000000; // mono/metadata/tokentype.h + +void* s_MonoLibrary = nullptr; +std::string g_monoDllPath; + +enum Mode +{ + CoreCLR, + Mono, +}; + +Mode g_Mode; + +#ifdef WIN32 +#include +const int RTLD_LAZY = 0; // not used +void* dlopen(const char* path, int flags) +{ + return ::LoadLibraryA(path); +} +void dlclose(void* handle) +{ + ::FreeLibrary((HMODULE)handle); +} +void* dlsym(void* handle, const char* funcname) +{ + auto sym = ::GetProcAddress((HMODULE)handle, funcname); + if (!sym) + { + printf("Failing to dlsym '%s'\n", funcname); + //exit(1); + } + return sym; +} + +static const std::string kNewLine = "\r\n"; + +#else +static const std::string kNewLine = "\n"; +#endif + +void* get_handle() +{ + if(s_MonoLibrary == nullptr) + { + printf("Loading Mono from '%s'...\n", g_monoDllPath.c_str()); + s_MonoLibrary = dlopen(g_monoDllPath.c_str(), RTLD_LAZY); + + if(s_MonoLibrary == nullptr) + { + assert(false && "Failed to load mono\n"); + exit(1); + } + } + return s_MonoLibrary; +} + +typedef wchar_t mono_char; // used by CoreCLR + +void* get_method(const char* functionName) +{ + void* func = dlsym(get_handle(), functionName); + if(func == nullptr) + { + printf("Failed to load function '%s'\n", functionName); + // Don't hard exit as some functions are not exported while still exposed by MonoFunctions.h + // So we might get a null access exception if we are using a function + // that was not found, but we can identify them when it is failing + // exit(1); + return nullptr; + } + return func; +} + +#define DO_API(r,n,p) typedef r (*type_##n)p; type_##n n; + +#include "../../src/coreclr/vm/mono/MonoCoreClr.h" + +#undef DO_API + +MonoDomain *g_domain; +MonoAssembly *g_assembly; + +// shim to map UnitTest++ to Catch +#define TEST(x) TEST_CASE(#x) +#define CHECK_EQUAL(x, y) REQUIRE((x) == (y)) + + +#define CHECK_EQUAL_STR(x, y) REQUIRE(strcmp((x), (y)) == 0) + +TEST(Sanity) +{ + CHECK_EQUAL(1, 1); +} + +#define kTestDLLNameSpace "TestDll" +#define kTestClassName "TestClass" +#define kInvalidName "DoesNotExist" + +#define GET_AND_CHECK(what, code) \ + auto what = code; \ + CHECK(what != nullptr) + +static void get_dirname(char* source) +{ + for (int i = strlen(source) - 1; i >= 0; i--) + { + if (source[i] == '/' || source[i] == '\\') + { + source[i] = '\0'; + return; + } + } +} + +#if WIN32 +char* realpath(const char *path, char *resolved_path) +{ + char* result = (char*)malloc(1024); + if (GetFullPathNameA((LPCSTR)path, 1024, result, NULL) == 0) + { + fprintf(stderr, "Fontconfig warning: GetFullPathNameA failed.\n"); + return NULL; + } + return result; +} +#endif + +static std::string abs_path_from_unity_root(const char* relative_to_this_file) +{ + char* base = getenv("UNITY_ROOT"); + if (base == nullptr) + { + printf("Please supply UNITY_ROOT environment variable, so we can find your mono installation.\n"); + exit(1); + } + char* concat = new char[strlen(base) + strlen(relative_to_this_file) + 2]; + strcpy(concat, base); + strcat(concat, "/"); + strcat(concat, relative_to_this_file); + char* resolved = realpath(concat, nullptr); + delete[] concat; + if (resolved == nullptr) { + perror("Failed to get absolute path"); + return ""; + } + std::string result(resolved); + free(resolved); + return result; +} + +static std::string abs_path_from_file(const char* relative_to_this_file) +{ + char* base = strdup(__FILE__); + get_dirname(base); + char* concat = new char[strlen(base) + strlen(relative_to_this_file) + 2]; + strcpy(concat, base); + strcat(concat, "/"); + strcat(concat, relative_to_this_file); + char* resolved = realpath(concat, nullptr); + free(base); + delete[] concat; + if (resolved == nullptr) + { + perror("Failed to get absolute path"); + return ""; + } + std::string result(resolved); + free(resolved); + return result; +} + +MonoClass* GetClassHelper(const char* namespaze, const char* classname) +{ + GET_AND_CHECK(image, mono_assembly_get_image(g_assembly)); + GET_AND_CHECK(klass, mono_class_from_name(image, namespaze, classname)); + return klass; +} +MonoMethod* GetMethodHelper(const char* namespaze, const char* classname, const char* methodname, int args) +{ + GET_AND_CHECK(method, mono_class_get_method_from_name (GetClassHelper(namespaze, classname), methodname, args)); + return method; +} + +MonoObject* CreateObjectHelper(const char* namespaze, const char* classname) +{ + GET_AND_CHECK(obj, mono_object_new(g_domain, GetClassHelper(namespaze, classname))); + return obj; +} + +void* scripting_array_element_ptr(MonoArray* array, int i, size_t element_size) +{ + GET_AND_CHECK(arrayClass, mono_object_get_class((MonoObject*)array)); + + size_t SCRIPTING_ARRAY_HEADERSIZE = g_Mode == CoreCLR ? sizeof(void*) * 2 * mono_class_get_rank(arrayClass): sizeof(void*) * 4; + return SCRIPTING_ARRAY_HEADERSIZE + i * element_size + (char*)array; +} + +TEST(mono_assembly_get_image_returns_value) +{ + GET_AND_CHECK(image, mono_assembly_get_image(g_assembly)); + CHECK_EQUAL(g_assembly, mono_image_get_assembly(image)); +} + +TEST(mono_assembly_loaded_works) +{ + MonoAssemblyName assemblyName; + mono_assembly_name_parse("coreclr-test", &assemblyName); + CHECK_EQUAL(g_assembly, mono_assembly_loaded (&assemblyName)); + + mono_assembly_name_parse("not loaded", &assemblyName); + CHECK(mono_assembly_loaded (&assemblyName) == nullptr); + + mono_assembly_name_free(&assemblyName); +} + +TEST(mono_class_from_name_returns_class) +{ + GET_AND_CHECK(image, mono_assembly_get_image(g_assembly)); + GET_AND_CHECK(klass, mono_class_from_name(image, kTestDLLNameSpace, kTestClassName)); + CHECK(strcmp(kTestDLLNameSpace, mono_class_get_namespace(klass)) == 0); + CHECK(strcmp(kTestClassName, mono_class_get_name(klass)) == 0); + CHECK_EQUAL(image, mono_class_get_image(klass)); +} + +TEST(mono_class_from_returns_null_if_class_does_not_exist) +{ + GET_AND_CHECK(image, mono_assembly_get_image(g_assembly)); + MonoClass* klass = mono_class_from_name(image, kTestDLLNameSpace, kInvalidName); + CHECK(klass == NULL); +} + +TEST(mono_class_get_method_from_name_returns_method) +{ + const char* methodname = "StaticMethodReturningInt"; + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, methodname, 0)); + CHECK(strcmp(methodname, mono_method_get_name(method)) == 0); + CHECK(klass == mono_method_get_class(method)); +} + +TEST(mono_method_full_name_returns_full_name) +{ + const char* methodname = "StaticMethodWithObjectOutArg"; + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, methodname, 2)); + CHECK(strcmp("TestDll.TestClass:StaticMethodWithObjectOutArg", mono_method_full_name(method, false)) == 0); + if (g_Mode == CoreCLR) + CHECK(strcmp("TestDll.TestClass:StaticMethodWithObjectOutArg (System.Object,System.Object&)", mono_method_full_name(method, true)) == 0); + else + CHECK(strcmp("TestDll.TestClass:StaticMethodWithObjectOutArg (object,object&)", mono_method_full_name(method, true)) == 0); +} + +TEST(mono_class_get_method_from_name_returns_null_if_method_does_not_exist) +{ + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + MonoMethod* method = mono_class_get_method_from_name (klass, kInvalidName, 0); + CHECK(method == NULL); +} + +TEST(mono_class_get_property_from_name_returns_static_property) +{ + const char* propertyname = "StaticIntProperty"; + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + GET_AND_CHECK(property, mono_class_get_property_from_name (klass, propertyname)); + GET_AND_CHECK(method, mono_property_get_get_method(property)); + CHECK(strcmp("get_StaticIntProperty", mono_method_get_name(method)) == 0); + CHECK_EQUAL(klass, mono_method_get_class(method)); +} + +TEST(mono_class_get_property_from_name_returns_instance_property) +{ + const char* propertyname = "IntProperty"; + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + GET_AND_CHECK(property, mono_class_get_property_from_name (klass, propertyname)); + GET_AND_CHECK(method, mono_property_get_get_method(property)); + CHECK(strcmp("get_IntProperty", mono_method_get_name(method)) == 0); + CHECK_EQUAL(klass, mono_method_get_class(method)); +} + +TEST(mono_class_get_property_from_name_returns_instance_property_of_base_class) +{ + const char* propertyname = "IntProperty"; + MonoClass *base = GetClassHelper(kTestDLLNameSpace, kTestClassName); + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, "DerivedClass"); + GET_AND_CHECK(property, mono_class_get_property_from_name (klass, propertyname)); + GET_AND_CHECK(method, mono_property_get_get_method(property)); + CHECK(strcmp("get_IntProperty", mono_method_get_name(method)) == 0); + CHECK_EQUAL(base, mono_method_get_class(method)); +} + +TEST(mono_type_get_name_returns_name) +{ + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + GET_AND_CHECK(type, mono_class_get_type(klass)); + GET_AND_CHECK(name , mono_type_get_name(type)); + CHECK(strcmp("TestDll.TestClass", name) == 0); + mono_unity_g_free(name); +} + +TEST(mono_type_get_name_full_returns_assembly_qualified_name) +{ + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + GET_AND_CHECK(type, mono_class_get_type(klass)); + GET_AND_CHECK(name , mono_type_get_name_full(type, MonoTypeNameFormat::MONO_TYPE_NAME_FORMAT_ASSEMBLY_QUALIFIED)); + CHECK(strcmp("TestDll.TestClass, coreclr-test, Version=7.0.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35", name) == 0); + mono_unity_g_free(name); +} + +TEST(mono_runtime_object_init_calls_constructor) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, "TestClassWithConstructor", "GetI", 0); + MonoObject* obj = CreateObjectHelper(kTestDLLNameSpace, "TestClassWithConstructor"); + { + MonoObject* returnValue = mono_runtime_invoke(method, obj, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + CHECK_EQUAL(0, int_result); + } + mono_runtime_object_init(obj); + { + MonoObject* returnValue = mono_runtime_invoke(method, obj, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + CHECK_EQUAL(42, int_result); + } +} + +TEST(mono_runtime_invoke_can_invoke_static_method_with_no_args) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodReturningInt", 0); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + + CHECK_EQUAL(42, int_result); +} + +TEST(mono_runtime_invoke_can_invoke_private_method) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticPrivateMethodReturningInt", 0); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + + CHECK_EQUAL(42, int_result); +} + +TEST(mono_runtime_invoke_can_invoke_static_method_with_two_args) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithTwoArgsReturningInt", 2); + int param1 = 10; + int param2 = 15; + void* params[2] = { ¶m1, ¶m2 }; + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, params, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + + CHECK_EQUAL(25, int_result); +} + +TEST(mono_runtime_invoke_can_invoke_static_method_with_two_float_args) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithTwoArgsReturningFloat", 2); + float param1 = 10.0f; + float param2 = 15.0f; + void* params[2] = { ¶m1, ¶m2 }; + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, params, nullptr); + float result = *(float*)mono_object_unbox(returnValue); + + CHECK_EQUAL(25.0f, result); +} + +TEST(mono_runtime_invoke_can_invoke_static_method_returning_object) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithTwoArgsReturningObject", 1); + MonoObject* testObj = CreateObjectHelper(kTestDLLNameSpace, kTestClassName); + void* params[1] = { testObj }; + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, params, nullptr); + + CHECK_EQUAL(testObj, returnValue); +} + +TEST(mono_runtime_invoke_can_invoke_instance_method_with_two_float_args) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "MethodWithTwoArgsReturningFloat", 2); + MonoObject* testObj = CreateObjectHelper(kTestDLLNameSpace, kTestClassName); + float param1 = 10.0f; + float param2 = 15.0f; + void* params[2] = { ¶m1, ¶m2 }; + MonoObject* returnValue = mono_runtime_invoke(method, testObj, params, nullptr); + float result = *(float*)mono_object_unbox(returnValue); + + CHECK_EQUAL(25.0f, result); +} + +typedef struct { + uint32_t Data1; + uint16_t Data2; + uint16_t Data3; + uint8_t Data4[8]; +} MYGUID; + +TEST(mono_runtime_invoke_can_invoke_method_returning_struct) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodReturningGUID", 0); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + MYGUID result = *(MYGUID*)mono_object_unbox(returnValue); + + CHECK_EQUAL(0x81a130d2, result.Data1); +} + +TEST(mono_runtime_invoke_can_invoke_with_struct_arg) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithGUIDArg", 1); + MYGUID guid; + memset(&guid, 0, sizeof(guid)); + guid.Data1 = 123; + guid.Data2 = 456; + guid.Data3 = 789; + void* params[1] = { &guid }; + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, params, nullptr); + MYGUID result = *(MYGUID*)mono_object_unbox(returnValue); + + CHECK_EQUAL(guid.Data1, result.Data1); + CHECK_EQUAL(guid.Data2, result.Data2); + CHECK_EQUAL(guid.Data3, result.Data3); +} + +TEST(mono_runtime_invoke_can_invoke_with_ptr_arg) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithPtrArg", 1); + void* param1 = (void*)0x123456789FFFFLL; + void* params[1] = { param1 }; + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, params, nullptr); + void* result = *(void**)mono_object_unbox(returnValue); + + CHECK_EQUAL(param1, result); +} + +TEST(mono_runtime_invoke_can_invoke_with_out_arg) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithObjectOutArg", 2); + MonoObject* testObj = CreateObjectHelper(kTestDLLNameSpace, kTestClassName); + void* param1 = testObj; + void* param2 = nullptr; + void* params[2] = { param1, ¶m2 }; + mono_runtime_invoke(method, nullptr, params, nullptr); + + CHECK_EQUAL(testObj, param2); +} + +TEST(mono_method_get_object_works) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithObjectOutArg", 2); + GET_AND_CHECK(methodInfoClass, mono_class_from_name(mono_get_corlib(), "System.Reflection", "MethodInfo")); + GET_AND_CHECK(methodObject, mono_method_get_object(g_domain, method, klass)); + GET_AND_CHECK(methodObjectClass, mono_object_get_class((MonoObject*)methodObject)); + CHECK(mono_class_is_subclass_of(methodObjectClass, methodInfoClass, false)); +} + +TEST(unity_mono_reflection_method_get_method_works) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithObjectOutArg", 2); + GET_AND_CHECK(methodInfoClass, mono_class_from_name(mono_get_corlib(), "System.Reflection", "MethodInfo")); + GET_AND_CHECK(methodObject, mono_method_get_object(g_domain, method, klass)); + GET_AND_CHECK(methodFromObject, unity_mono_reflection_method_get_method(methodObject)); + CHECK_EQUAL(method, methodFromObject); +} + +TEST(mono_object_isinst_works_with_same_class) +{ + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, "BaseClass"); + MonoObject* testobj = mono_object_new(g_domain, klass); + CHECK(mono_object_isinst(testobj, klass) != NULL); + + MonoClass* unrelatedclass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + CHECK(mono_object_isinst(testobj, unrelatedclass) == NULL); + + unrelatedclass = GetClassHelper(kTestDLLNameSpace, "InheritedClass"); + CHECK(mono_object_isinst(testobj, unrelatedclass) == NULL); +} + +TEST(mono_class_get_parent_returns_base_class) +{ + GET_AND_CHECK(objectClass, mono_class_from_name(mono_get_corlib(), "System", "Object")); + MonoClass *base = GetClassHelper(kTestDLLNameSpace, "BaseClass"); + MonoClass *inherited = GetClassHelper(kTestDLLNameSpace, "InheritedClass"); + + CHECK_EQUAL(base, mono_class_get_parent(inherited)); + CHECK_EQUAL(objectClass, mono_class_get_parent(base)); + CHECK(mono_class_get_parent(objectClass) == nullptr); +} + +TEST(mono_unity_class_is_abstract_works) +{ + MonoClass *base = GetClassHelper(kTestDLLNameSpace, "BaseClass"); + MonoClass *inherited = GetClassHelper(kTestDLLNameSpace, "InheritedClass"); + CHECK(mono_unity_class_is_abstract(base)); + CHECK(!mono_unity_class_is_abstract(inherited)); +} + +TEST(mono_class_is_generic_works) +{ + MonoClass *nongeneric = GetClassHelper(kTestDLLNameSpace, kTestClassName); + MonoClass *generic = GetClassHelper(kTestDLLNameSpace, "GenericClass`1"); + CHECK(mono_class_is_generic(generic)); + CHECK(!mono_class_is_generic(nongeneric)); +} + +TEST(mono_class_is_blittable_works) +{ + CHECK(mono_class_is_blittable(mono_get_int32_class())); + // Mono has a different definition of "blittable". This should be fine for now, + // as we special-case these in the editor. + CHECK_EQUAL(g_Mode == CoreCLR, mono_class_is_blittable(GetClassHelper(kTestDLLNameSpace, "TestStructWithFields"))); + CHECK(!mono_class_is_blittable(GetClassHelper(kTestDLLNameSpace, "TestClass"))); +} + +TEST(mono_class_is_subclass_of_works_with_base_class) +{ + MonoClass *base = GetClassHelper(kTestDLLNameSpace, "BaseClass"); + MonoClass *inherited = GetClassHelper(kTestDLLNameSpace, "InheritedClass"); + CHECK(mono_class_is_subclass_of(inherited, base, false)); + CHECK(mono_class_is_subclass_of(base, base, false)); + CHECK(!mono_class_is_subclass_of(base, inherited, false)); +} + +TEST(type_forwarder_lookup_results_in_identical_class) +{ + MonoClass *directLookup = GetClassHelper(kTestDLLNameSpace, kTestClassName); +#if defined(_DEBUG) + std::string testDllPath = abs_path_from_file("../../artifacts/bin/forwarder-test/Debug/net6.0/forwarder-test.dll"); +#else + std::string testDllPath = abs_path_from_file("../../artifacts/bin/forwarder-test/Release/net6.0/forwarder-test.dll"); +#endif + MonoAssembly *forwarderAssembly = mono_domain_assembly_open (g_domain, testDllPath.c_str()); + GET_AND_CHECK(forwarderImage, mono_assembly_get_image(forwarderAssembly)); + GET_AND_CHECK(directImage, mono_assembly_get_image(g_assembly)); + GET_AND_CHECK(forwarderLookup, mono_class_from_name(forwarderImage, kTestDLLNameSpace, kTestClassName)); + CHECK_EQUAL(directLookup, forwarderLookup); + CHECK_EQUAL(directImage, mono_class_get_image(forwarderLookup)); + CHECK(forwarderImage != directImage); +} + +#if 0 //JON +TEST(will_find_dependency_assembly_next_to_loaded_assembly) +{ + // Calls a method which calls a method from another assembly which we did not explictly load. + // We need to make sure that we can load any assemblies next to the one we loaded. + std::string testDllPath = abs_path_from_file("../dll-with-dependency/bin/Debug/netcoreapp3.0/dll-with-dependency.dll"); + GET_AND_CHECK(dll_with_dependency_assembly, mono_domain_assembly_open (g_domain, testDllPath.c_str())); + GET_AND_CHECK(dll_with_dependency_image, mono_assembly_get_image(dll_with_dependency_assembly)); + GET_AND_CHECK(class_with_dependency, mono_class_from_name(dll_with_dependency_image, "dll_with_dependency", "ClassWithDependency")); + GET_AND_CHECK(obj, mono_object_new(g_domain, class_with_dependency)); + mono_runtime_object_init(obj); + GET_AND_CHECK(method, mono_class_get_method_from_name (class_with_dependency, "ToString", 0)); + GET_AND_CHECK(virtualmethod, mono_object_get_virtual_method (obj, method)); + MonoObject* returnValue = mono_runtime_invoke(virtualmethod, obj, nullptr, nullptr); + char* str = mono_string_to_utf8((MonoString*)returnValue); + CHECK_EQUAL("Hello", str); + mono_unity_g_free(str); +} +#endif + +TEST(can_get_types_from_image_table) +{ + MonoClass *testclass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + GET_AND_CHECK(image, mono_assembly_get_image(g_assembly)); + int rows = mono_image_get_table_rows(image, MONO_TABLE_TYPEDEF); + CHECK(rows > 0); + bool found = false; + for (int i=0; i" + , mono_type_get_name(genericinstanceparent_type) + ) == 0); + + CHECK(strcmp("GenericClass`1", mono_class_get_name(generic_type)) == 0); + + GET_AND_CHECK(generic_type_type, mono_class_get_type(generic_type)); + CHECK( + strcmp( + g_Mode == CoreCLR ? "TestDll.GenericClass`1[T]" : "TestDll.GenericClass" + , mono_type_get_name(generic_type_type) + ) == 0); + + CHECK(mono_class_is_inflated(genericinstanceparent)); + CHECK(!mono_class_is_inflated(generic_type)); + CHECK(!mono_class_is_generic(genericinstanceparent)); + CHECK(mono_class_is_generic(generic_type)); +} + +TEST(mono_class_get_flags_works) +{ + CHECK_EQUAL(TYPE_ATTRIBUTE_PUBLIC | TYPE_ATTRIBUTE_BEFORE_FIELD_INIT, + mono_class_get_flags(GetClassHelper(kTestDLLNameSpace, kTestClassName))); + CHECK_EQUAL(TYPE_ATTRIBUTE_PUBLIC | TYPE_ATTRIBUTE_ABSTRACT | TYPE_ATTRIBUTE_BEFORE_FIELD_INIT, + mono_class_get_flags(GetClassHelper(kTestDLLNameSpace, "BaseClass"))); + CHECK_EQUAL(TYPE_ATTRIBUTE_BEFORE_FIELD_INIT, + mono_class_get_flags(GetClassHelper(kTestDLLNameSpace, "TestAttribute"))); +} + +TEST(mono_class_instance_size_works) +{ + size_t objectsize = g_Mode == CoreCLR ? 8 : 16; + CHECK_EQUAL(objectsize + 1, mono_class_instance_size(mono_get_byte_class())); + CHECK_EQUAL(objectsize + 2, mono_class_instance_size(mono_get_int16_class())); + CHECK_EQUAL(objectsize + 4, mono_class_instance_size(mono_get_int32_class())); + CHECK_EQUAL(objectsize, mono_class_instance_size(mono_get_object_class())); + CHECK_EQUAL(objectsize + 12, mono_class_instance_size(GetClassHelper(kTestDLLNameSpace, "TestClassWithFields"))); +} + +TEST(can_get_base_classes) +{ + CHECK(strcmp("Boolean", mono_class_get_name(mono_get_boolean_class())) == 0); + CHECK(strcmp("Char", mono_class_get_name(mono_get_char_class())) == 0); + CHECK(strcmp("Byte", mono_class_get_name(mono_get_byte_class())) == 0); + CHECK(strcmp("Int16", mono_class_get_name(mono_get_int16_class())) == 0); + CHECK(strcmp("Int32", mono_class_get_name(mono_get_int32_class())) == 0); + CHECK(strcmp("Int64", mono_class_get_name(mono_get_int64_class())) == 0); + CHECK(strcmp("Single", mono_class_get_name(mono_get_single_class())) == 0); + CHECK(strcmp("Double", mono_class_get_name(mono_get_double_class())) == 0); + CHECK(strcmp("Object", mono_class_get_name(mono_get_object_class())) == 0); + CHECK(strcmp("String", mono_class_get_name(mono_get_string_class())) == 0); + CHECK(strcmp("Array", mono_class_get_name(mono_get_array_class())) == 0); + CHECK(strcmp("Exception", mono_class_get_name(mono_get_exception_class())) == 0); +} + +TEST(mono_string_new_wrapper_creates_valid_string) +{ + const char* cstr = "Hello, World!"; + MonoString *str = mono_string_new_wrapper(cstr); + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithStringArg", 1); + void* param1 = str; + void* params[1] = { param1 }; + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, params, nullptr); + int result = *(int*)mono_object_unbox(returnValue); + + CHECK_EQUAL(strlen(cstr), result); +} + +TEST(mono_class_get_fields_retrieves_all_fields) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "TestClassWithFields"); + + gpointer ptr = nullptr; + int count = 0; + std::string fieldnames; + MonoClassField* field; + while ((field = mono_class_get_fields(klass, &ptr)) != nullptr) + { + GET_AND_CHECK(fieldname, mono_field_get_name(field)); + CHECK(strcmp("System.Int32", mono_type_get_name(mono_field_get_type(field))) == 0); + fieldnames += fieldname; + count++; + } + CHECK_EQUAL(4, count); + // CoreCLR reports static fields after non-static fields. + CHECK(strcmp(g_Mode == CoreCLR ? "xywz" : "xyzw", fieldnames.c_str()) == 0); +} + +TEST(can_get_type_of_generic_field) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "GenericClass`1"); + + gpointer ptr = nullptr; + GET_AND_CHECK(field, mono_class_get_fields(klass, &ptr)); + CHECK(strcmp("genericField", mono_field_get_name(field)) == 0); + CHECK(strcmp(g_Mode == CoreCLR ? "!0" : "T", mono_type_get_name(mono_field_get_type(field))) == 0); + field = mono_class_get_fields(klass, &ptr); + CHECK(field != NULL); + CHECK(strcmp("genericArrayField", mono_field_get_name(field)) == 0); + CHECK(strcmp(g_Mode == CoreCLR ? "!0[]" : "T[]", mono_type_get_name(mono_field_get_type(field))) == 0); + field = mono_class_get_fields(klass, &ptr); + CHECK(field == NULL); +} + +TEST(can_get_type_of_generic_instance_field) +{ + MonoClass* instanceklass = GetClassHelper(kTestDLLNameSpace, "GenericStringInstance"); + GET_AND_CHECK(klass, mono_class_get_parent(instanceklass)); + + GET_AND_CHECK(klass_type, mono_class_get_type(klass)); + CHECK(MONO_TYPE_GENERICINST == mono_type_get_type(klass_type)); + + gpointer ptr = nullptr; + GET_AND_CHECK(field, mono_class_get_fields(klass, &ptr)); + CHECK(field != NULL); + CHECK(strcmp("genericField", mono_field_get_name(field)) == 0); + if (g_Mode == CoreCLR ) + { + CHECK(strcmp("System.String", mono_type_get_name(mono_field_get_type_specific(field, klass))) == 0); + CHECK(strcmp("System.__Canon", mono_type_get_name(mono_field_get_type(field))) == 0); + } + else + CHECK(strcmp("System.String", mono_type_get_name(mono_field_get_type(field))) == 0); + field = mono_class_get_fields(klass, &ptr); + CHECK(field != NULL); + CHECK(strcmp("genericArrayField", mono_field_get_name(field)) == 0); + if (g_Mode == CoreCLR ) + { + CHECK(strcmp("System.String[]", mono_type_get_name(mono_field_get_type_specific(field, klass))) == 0); + CHECK(strcmp("System.__Canon[]", mono_type_get_name(mono_field_get_type(field))) == 0); + } + else + CHECK(strcmp("System.String[]", mono_type_get_name(mono_field_get_type(field))) == 0); + field = mono_class_get_fields(klass, &ptr); + CHECK(field == NULL); +} + +TEST(mono_class_get_interfaces_retrieves_all_interfaces) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "ClassImplementingInterface"); + MonoClass* testInterface = GetClassHelper(kTestDLLNameSpace, "TestInterface"); + + gpointer ptr = nullptr; + MonoClass* monoInterface = mono_class_get_interfaces(klass, &ptr); + CHECK_EQUAL(testInterface, monoInterface); + monoInterface = mono_class_get_interfaces(klass, &ptr); + CHECK(monoInterface == NULL); +} + +TEST(mono_class_get_interfaces_may_retrieve_parent_interfaces) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "ClassDerivingFromClassImplementingInterface"); + + gpointer ptr = nullptr; + MonoClass* monoInterface = mono_class_get_interfaces(klass, &ptr); + + // Behavior here is different between mono and coreclr. + // Mono will not report parent interfaces. CoreCLR will. It is not easy to make CoreCLR + // match mono, as the information is not available to CoreCLR at that point. + if (g_Mode == CoreCLR ) + CHECK(monoInterface != NULL); + else + CHECK(monoInterface == NULL); +} + +TEST(can_get_type_of_generic_parameter) +{ + if (g_Mode == CoreCLR ) + { + MonoClass* instanceklass = GetClassHelper(kTestDLLNameSpace, "GenericStringInstance"); + GET_AND_CHECK(klass, mono_class_get_parent(instanceklass)); + GET_AND_CHECK(instance_type, mono_class_get_type(klass)); + CHECK(strcmp("TestDll.GenericClass`1[System.String]", mono_type_get_name(instance_type)) == 0); + CHECK_EQUAL(1, mono_type_get_num_generic_args(instance_type)); + GET_AND_CHECK(genericarg, mono_type_get_generic_arg(instance_type, 0)); + CHECK(strcmp("System.String", mono_type_get_name(genericarg)) == 0); + } +} + +TEST(mono_field_get_offset_retrieves_field_offset) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "TestClassWithFields"); + GET_AND_CHECK(field0, mono_class_get_field_from_name(klass, "x")); + GET_AND_CHECK(field1, mono_class_get_field_from_name(klass, "y")); + size_t field0_offset = mono_field_get_offset(field0); + size_t field1_offset = mono_field_get_offset(field1); + GET_AND_CHECK(obj, mono_object_new(g_domain, klass)); + GET_AND_CHECK(method, mono_class_get_method_from_name(klass, "SetupFields", 0)); + mono_runtime_invoke(method, obj, nullptr, nullptr); + CHECK_EQUAL(123, *(int*)((char*)obj + field0_offset)); + CHECK_EQUAL(456, *(int*)((char*)obj + field1_offset)); +} + +TEST(sequential_layout_is_respected) +{ + // CoreCLR does not respect sequential layout for non-blittable types + if (g_Mode == CoreCLR) + return; + + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "ClassWithSequentialLayout"); + gpointer ptr = nullptr; + int count = 0; + MonoClassField* field; + size_t lastOffset = 0; + while ((field = mono_class_get_fields(klass, &ptr)) != nullptr) + { + size_t offset = mono_field_get_offset(field); + CHECK(offset > lastOffset); + lastOffset = offset; + } + CHECK(lastOffset > 0); +} + +TEST(explicit_layout_is_respected) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "ClassWithExplicitLayout"); + gpointer ptr = nullptr; + MonoClassField* field; + size_t offset = 0; + size_t SCRIPTING_OBJECT_HEADERSIZE = g_Mode == CoreCLR ? sizeof(void*) : sizeof(void*) * 2; + + field = mono_class_get_fields(klass, &ptr); + offset = mono_field_get_offset(field); + CHECK_EQUAL(SCRIPTING_OBJECT_HEADERSIZE + 0, offset); + + field = mono_class_get_fields(klass, &ptr); + offset = mono_field_get_offset(field); + CHECK_EQUAL(SCRIPTING_OBJECT_HEADERSIZE + 8, offset); + + field = mono_class_get_fields(klass, &ptr); + offset = mono_field_get_offset(field); + CHECK_EQUAL(SCRIPTING_OBJECT_HEADERSIZE + 16, offset); + + field = mono_class_get_fields(klass, &ptr); + offset = mono_field_get_offset(field); + CHECK_EQUAL(SCRIPTING_OBJECT_HEADERSIZE + 20, offset); + + field = mono_class_get_fields(klass, &ptr); + offset = mono_field_get_offset(field); + CHECK_EQUAL(SCRIPTING_OBJECT_HEADERSIZE + 24, offset); + + field = mono_class_get_fields(klass, &ptr); + CHECK(field == NULL); +} + +TEST(explicit_layout_is_correctly_calculated_for_derived_class) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "DerivedClassWithExplicitLayout"); + gpointer ptr = nullptr; + MonoClassField* field; + size_t offset = 0; + size_t SCRIPTING_OBJECT_HEADERSIZE = g_Mode == CoreCLR ? sizeof(void*) : sizeof(void*) * 2; + size_t parentSize = 32; + + // CoreCLR treats explicit layout for derived classes different than mono or il2cpp do. + // It will add the base type size to the offset. This is a problem, because it causes a + // different layout than with mono. So, in this case, where the FieldOffset attributes + // already include the parent size, we need to add the parent size a second time for CoreCLR. + // We need to figure out how we want to deal with this, but for now, we test the behavior we have. + if (g_Mode == CoreCLR) + parentSize *= 2; + + field = mono_class_get_fields(klass, &ptr); + offset = mono_field_get_offset(field); + CHECK_EQUAL(SCRIPTING_OBJECT_HEADERSIZE + parentSize + 0, offset); + + field = mono_class_get_fields(klass, &ptr); + offset = mono_field_get_offset(field); + CHECK_EQUAL(SCRIPTING_OBJECT_HEADERSIZE + parentSize + 8, offset); + + field = mono_class_get_fields(klass, &ptr); + offset = mono_field_get_offset(field); + CHECK_EQUAL(SCRIPTING_OBJECT_HEADERSIZE + parentSize + 16, offset); + + field = mono_class_get_fields(klass, &ptr); + offset = mono_field_get_offset(field); + CHECK_EQUAL(SCRIPTING_OBJECT_HEADERSIZE + parentSize + 20, offset); + + field = mono_class_get_fields(klass, &ptr); + offset = mono_field_get_offset(field); + CHECK_EQUAL(SCRIPTING_OBJECT_HEADERSIZE + parentSize + 24, offset); + + field = mono_class_get_fields(klass, &ptr); + CHECK(field == NULL); +} + +TEST(mono_gc_wbarrier_set_field_can_set_reference_field) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "TestClassWithReferenceField"); + GET_AND_CHECK(obj, mono_object_new(g_domain, klass)); + GET_AND_CHECK(method, mono_class_get_method_from_name(klass, "GetField", 0)); + MonoObject* returnValue = mono_runtime_invoke(method, obj, nullptr, nullptr); + CHECK(returnValue == nullptr); + + GET_AND_CHECK(field, mono_class_get_field_from_name(klass, "reference")); + int field_offset = mono_field_get_offset(field); + mono_gc_wbarrier_set_field(obj, (char*)obj + field_offset, obj); + + returnValue = mono_runtime_invoke(method, obj, nullptr, nullptr); + CHECK_EQUAL(obj, returnValue); +} + +TEST(mono_field_set_value_can_set_reference_field) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "TestClassWithReferenceField"); + GET_AND_CHECK(obj, mono_object_new(g_domain, klass)); + GET_AND_CHECK(method, mono_class_get_method_from_name(klass, "GetField", 0)); + MonoObject* returnValue = mono_runtime_invoke(method, obj, nullptr, nullptr); + CHECK(returnValue == nullptr); + + GET_AND_CHECK(field, mono_class_get_field_from_name(klass, "reference")); + mono_field_set_value(obj, field, obj); + + returnValue = mono_runtime_invoke(method, obj, nullptr, nullptr); + CHECK_EQUAL(obj, returnValue); +} + +TEST(mono_field_get_value_can_get_reference_field) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "TestClassWithReferenceField"); + GET_AND_CHECK(obj, mono_object_new(g_domain, klass)); + + GET_AND_CHECK(field, mono_class_get_field_from_name(klass, "reference")); + int field_offset = mono_field_get_offset(field); + mono_gc_wbarrier_set_field(obj, (char*)obj + field_offset, obj); + + MonoObject* returnValue; + mono_field_get_value(obj, field, &returnValue); + CHECK_EQUAL(obj, returnValue); +} + +TEST(mono_field_set_value_can_set_value_field) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "TestClassWithFields"); + GET_AND_CHECK(obj, mono_object_new(g_domain, klass)); + + GET_AND_CHECK(field, mono_class_get_field_from_name(klass, "y")); + int value = 23; + mono_field_set_value(obj, field, &value); + + size_t field_offset = mono_field_get_offset(field); + CHECK_EQUAL(23, *(int*)((char*)obj + field_offset)); +} + +TEST(mono_field_get_value_can_get_value_field) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "TestClassWithFields"); + GET_AND_CHECK(obj, mono_object_new(g_domain, klass)); + + GET_AND_CHECK(field, mono_class_get_field_from_name(klass, "y")); + + size_t field_offset = mono_field_get_offset(field); + *(int*)((char*)obj + field_offset) = 23; + + MonoObject* returnValue = NULL; + mono_field_get_value(obj, field, &returnValue); + CHECK_EQUAL((void*)23, returnValue); +} + +TEST(mono_field_get_offset_retrieves_field_offset_from_struct) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "TestStructWithFields"); + GET_AND_CHECK(field0, mono_class_get_field_from_name(klass, "x")); + GET_AND_CHECK(field1, mono_class_get_field_from_name(klass, "y")); + size_t field0_offset = mono_field_get_offset(field0); + size_t field1_offset = mono_field_get_offset(field1); + GET_AND_CHECK(obj, mono_object_new(g_domain, klass)); + GET_AND_CHECK(method, mono_class_get_method_from_name(klass, "SetupFields", 0)); + auto structInObject = (MonoObject*)((char*)obj + field0_offset); + if (g_Mode == CoreCLR) + mono_runtime_invoke_with_nested_object(method, structInObject, obj, nullptr, nullptr); + else + mono_runtime_invoke(method, structInObject, nullptr, nullptr); + CHECK_EQUAL(123, *(int*)((char*)obj + field0_offset)); + CHECK_EQUAL(456, *(int*)((char*)obj + field1_offset)); +} + +TEST(mono_field_get_flags_works) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "TestClassWithFields"); + GET_AND_CHECK(field0, mono_class_get_field_from_name(klass, "x")); + CHECK_EQUAL(FIELD_ATTRIBUTE_PUBLIC, mono_field_get_flags(field0)); + GET_AND_CHECK(field1, mono_class_get_field_from_name(klass, "y")); + CHECK_EQUAL(FIELD_ATTRIBUTE_PRIVATE, mono_field_get_flags(field1)); + GET_AND_CHECK(field2, mono_class_get_field_from_name(klass, "z")); + CHECK_EQUAL(FIELD_ATTRIBUTE_PRIVATE | FIELD_ATTRIBUTE_STATIC, mono_field_get_flags(field2)); + GET_AND_CHECK(field3, mono_class_get_field_from_name(klass, "w")); + CHECK_EQUAL(FIELD_ATTRIBUTE_FAMILY | FIELD_ATTRIBUTE_NOT_SERIALIZED, mono_field_get_flags(field3)); +} + +TEST(mono_class_get_methods_retrieves_all_methods) +{ + MonoClass* klass = GetClassHelper(kTestDLLNameSpace, "TestClassWithMethods"); + + gpointer ptr = nullptr; + int count = 0; + std::string methodnames; + MonoMethod* method; + while((method = mono_class_get_methods(klass, &ptr)) != nullptr) + { + GET_AND_CHECK(methodname, mono_method_get_name(method)); + methodnames += methodname; + count++; + } + + CHECK_EQUAL(4, count); + CHECK_EQUAL("ABC.ctor", methodnames); +} + +TEST(mono_method_signature_gets_parameters_from_static_method) +{ + GET_AND_CHECK(method, GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithObjectOutArg", 2)); + GET_AND_CHECK(signature, mono_method_signature(method)); + CHECK_EQUAL(2, mono_signature_get_param_count(signature)); + GET_AND_CHECK(returnType, mono_signature_get_return_type(signature)); + CHECK_EQUAL(MONO_TYPE_VOID, mono_type_get_type(returnType)); + CHECK(!mono_signature_is_instance(signature)); + gpointer iter = NULL; + MonoType *paramType = mono_signature_get_params(signature, &iter); + CHECK_EQUAL(MONO_TYPE_OBJECT, mono_type_get_type(paramType)); + CHECK(mono_type_is_byref(paramType) == false); + paramType = mono_signature_get_params(signature, &iter); + CHECK_EQUAL(MONO_TYPE_OBJECT, mono_type_get_type(paramType)); + CHECK(mono_type_is_byref(paramType) == true); + paramType = mono_signature_get_params(signature, &iter); + CHECK(paramType == nullptr); +} + +TEST(mono_method_signature_gets_parameters_from_instance_method) +{ + GET_AND_CHECK(method, GetMethodHelper(kTestDLLNameSpace, kTestClassName, "MethodWithTwoArgsReturningFloat", 2)); + GET_AND_CHECK(signature, mono_method_signature(method)); + CHECK_EQUAL(2, mono_signature_get_param_count(signature)); + GET_AND_CHECK(returnType, mono_signature_get_return_type(signature)); + CHECK_EQUAL(MONO_TYPE_R4, mono_type_get_type(returnType)); + CHECK(mono_signature_is_instance(signature)); + gpointer iter = NULL; + MonoType *paramType = mono_signature_get_params(signature, &iter); + CHECK_EQUAL(MONO_TYPE_R4, mono_type_get_type(paramType)); + paramType = mono_signature_get_params(signature, &iter); + CHECK_EQUAL(MONO_TYPE_R4, mono_type_get_type(paramType)); + paramType = mono_signature_get_params(signature, &iter); + CHECK(paramType == nullptr); +} + +TEST(mono_metadata_signature_equal_can_compare_signatures) +{ + GET_AND_CHECK(method1, GetMethodHelper(kTestDLLNameSpace, kTestClassName, "MethodWithTwoArgsReturningFloat", 2)); + GET_AND_CHECK(signature1, mono_method_signature(method1)); + GET_AND_CHECK(method2, GetMethodHelper(kTestDLLNameSpace, kTestClassName, "AnotherMethodWithTwoArgsReturningFloat", 2)); + GET_AND_CHECK(signature2, mono_method_signature(method2)); + GET_AND_CHECK(method3, GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithTwoArgsReturningFloat", 2)); + GET_AND_CHECK(signature3, mono_method_signature(method3)); + GET_AND_CHECK(method4, GetMethodHelper(kTestDLLNameSpace, kTestClassName, "MethodWithTwoArgsReturningInt", 2)); + GET_AND_CHECK(signature4, mono_method_signature(method4)); + + CHECK(mono_metadata_signature_equal(signature1, signature1)); + CHECK(mono_metadata_signature_equal(signature1, signature2)); + CHECK(!mono_metadata_signature_equal(signature1, signature3)); + CHECK(!mono_metadata_signature_equal(signature1, signature4)); +} + +TEST(mono_object_get_virtual_method_can_call_virtual_method) +{ + MonoMethod *method = GetMethodHelper(kTestDLLNameSpace, "BaseClass", "Method", 0); + MonoClass *inherited = GetClassHelper(kTestDLLNameSpace, "InheritedClass"); + GET_AND_CHECK(obj, mono_object_new(g_domain, inherited)); + GET_AND_CHECK(virtualmethod, mono_object_get_virtual_method (obj, method)); + MonoObject* returnValue = mono_runtime_invoke(virtualmethod, obj, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + CHECK_EQUAL(42, int_result); +} + +TEST(mono_object_get_virtual_method_can_call_interface_method) +{ + MonoMethod *method = GetMethodHelper(kTestDLLNameSpace, "TestInterface", "Method", 0); + MonoClass *inherited = GetClassHelper(kTestDLLNameSpace, "ClassImplementingInterface"); + GET_AND_CHECK(obj, mono_object_new(g_domain, inherited)); + GET_AND_CHECK(virtualmethod, mono_object_get_virtual_method (obj, method)); + MonoObject* returnValue = mono_runtime_invoke(virtualmethod, obj, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + CHECK_EQUAL(42, int_result); +} + +TEST(can_call_method_on_member_struct) +{ + MonoMethod *method1 = GetMethodHelper(kTestDLLNameSpace, "TestStructWithFields", "SetupFields", 0); + MonoMethod *method2 = GetMethodHelper(kTestDLLNameSpace, "TestStructWithFields", "SumFields", 0); + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, "ClassWithStructFields"); + GET_AND_CHECK(obj, mono_object_new(g_domain, klass)); + GET_AND_CHECK(field0, mono_class_get_field_from_name(klass, "a")); + int field0_offset = mono_field_get_offset(field0); + MonoObject* embeddedObjectA = (MonoObject*)((char*)obj + field0_offset); + MonoObject* returnValue; + if (g_Mode == Mono) + { + mono_runtime_invoke(method1, embeddedObjectA, nullptr, nullptr); + returnValue = mono_runtime_invoke(method2, embeddedObjectA, nullptr, nullptr); + } + else + { + mono_runtime_invoke_with_nested_object(method1, embeddedObjectA, obj, nullptr, nullptr); + returnValue = mono_runtime_invoke_with_nested_object(method2, embeddedObjectA, obj, nullptr, nullptr); + } + int int_result = *(int*)mono_object_unbox(returnValue); + CHECK_EQUAL(579, int_result); +} + +#if 0 // JON + +TEST(can_call_interface_method_on_member_struct) +{ + MonoMethod *method = GetMethodHelper(kTestDLLNameSpace, "TestInterface", "Method", 0); + MonoMethod *setupmethod = GetMethodHelper(kTestDLLNameSpace, "ClassWithStructFields", "Setup", 0); + MonoClass *inherited = GetClassHelper(kTestDLLNameSpace, "StructImplementingInterface"); + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, "ClassWithStructFields"); + GET_AND_CHECK(obj, mono_object_new(g_domain, klass)); + GET_AND_CHECK(field0, mono_class_get_field_from_name(klass, "c")); + int field0_offset = mono_field_get_offset(field0); + GET_AND_CHECK(fieldType, mono_field_get_type(field0)); + GET_AND_CHECK(fieldKlass, mono_type_get_class(fieldType)); + GET_AND_CHECK(fieldDummyObject, mono_object_new(g_domain, fieldKlass)); + GET_AND_CHECK(virtualmethod, mono_object_get_virtual_method (fieldDummyObject, method)); + mono_runtime_invoke(setupmethod, obj, nullptr, nullptr); + MonoObject* embeddedObjectA = (MonoObject*)((char*)obj + field0_offset); + MonoObject* returnValue; + if (g_Mode == Mono) + returnValue = mono_runtime_invoke(virtualmethod, embeddedObjectA, nullptr, nullptr); + else + returnValue = mono_runtime_invoke_with_nested_object(virtualmethod, embeddedObjectA, obj, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + CHECK_EQUAL(42, int_result); +} + +TEST(mono_object_get_virtual_method_can_call_interface_method_on_struct) +{ + MonoMethod *method = GetMethodHelper(kTestDLLNameSpace, "TestInterface", "Method", 0); + MonoClass *inherited = GetClassHelper(kTestDLLNameSpace, "StructImplementingInterface"); + MonoMethod *setupmethod = GetMethodHelper(kTestDLLNameSpace, "StructImplementingInterface", "Setup", 0); + MonoMethod *setupmethod2 = GetMethodHelper(kTestDLLNameSpace, "StructImplementingInterface", "Method", 0); + GET_AND_CHECK(obj, mono_object_new(g_domain, inherited)); + GET_AND_CHECK(virtualmethod, mono_object_get_virtual_method (obj, method)); + mono_runtime_invoke(setupmethod, obj, nullptr, nullptr); + mono_runtime_invoke(setupmethod2, obj, nullptr, nullptr); + MonoObject* returnValue = mono_runtime_invoke(virtualmethod, obj, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + CHECK_EQUAL(42, int_result); +} +#endif + +TEST(mono_type_is_byref_works) +{ + MonoMethod *method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodWithObjectOutArg", 2); + GET_AND_CHECK(signature, mono_method_signature(method)); + gpointer iter = NULL; + MonoType *paramType = mono_signature_get_params(signature, &iter); + CHECK(!mono_type_is_byref(paramType)); + paramType = mono_signature_get_params(signature, &iter); + CHECK(mono_type_is_byref(paramType)); +} + +TEST(mono_get_corlib_returns_corlib_image) +{ + MonoImage *corlib = mono_get_corlib(); + CHECK(mono_image_get_assembly(corlib) != NULL); + if (g_Mode == CoreCLR) + CHECK_EQUAL_STR("System.Private.CoreLib", mono_image_get_name(corlib)); + else + CHECK_EQUAL_STR("mscorlib", mono_image_get_name(corlib)); +} + +TEST(mono_get_enum_class_returns_enum_class) +{ + GET_AND_CHECK(enumClass, mono_get_enum_class()); + CHECK_EQUAL_STR("Enum", mono_class_get_name(enumClass)); +} + +TEST(mono_get_corlib_can_get_corlib_type) +{ + GET_AND_CHECK(int32Class, mono_class_from_name(mono_get_corlib(), "System", "Int32")); + CHECK_EQUAL_STR("Int32", mono_class_get_name(int32Class)); +} + +TEST(mono_array_class_get_creates_array_class) +{ + GET_AND_CHECK(int32Class, mono_class_from_name(mono_get_corlib(), "System", "Int32")); + GET_AND_CHECK(int64Class, mono_class_from_name(mono_get_corlib(), "System", "Int64")); + + GET_AND_CHECK(arrayInt32Class, mono_array_class_get(int32Class, 1)); + GET_AND_CHECK(arrayInt64Class, mono_array_class_get(int64Class, 2)); + + CHECK_EQUAL(4, mono_array_element_size(arrayInt32Class)); + CHECK_EQUAL(8, mono_array_element_size(arrayInt64Class)); + + CHECK_EQUAL(1, mono_class_get_rank(arrayInt32Class)); + CHECK_EQUAL(2, mono_class_get_rank(arrayInt64Class)); + + CHECK_EQUAL(int32Class, mono_class_get_element_class(arrayInt32Class)); + CHECK_EQUAL(int64Class, mono_class_get_element_class(arrayInt64Class)); + + CHECK_EQUAL_STR("Int32[]", mono_class_get_name(arrayInt32Class)); + CHECK_EQUAL_STR("Int64[,]", mono_class_get_name(arrayInt64Class)); +} + +TEST(mono_array_new_creates_array_instance) +{ + GET_AND_CHECK(int32Class, mono_class_from_name(mono_get_corlib(), "System", "Int32")); + GET_AND_CHECK(arrayInt32Class, mono_array_class_get(int32Class, 1)); + GET_AND_CHECK(arrayInt32Instance, mono_array_new(g_domain, int32Class, 5)); + +// Todo +// if (coreclr_array_length) + // CHECK_EQUAL(5, coreclr_array_length(arrayInt32Instance)); +} + +TEST(mono_gchandle_new_creates_gc_handle) +{ + MonoObject* testObj = CreateObjectHelper(kTestDLLNameSpace, kTestClassName); + + // Normal + uintptr_t handle1 = mono_gchandle_new_v2(testObj, false); + CHECK(handle1 != 0); + CHECK_EQUAL(testObj, mono_gchandle_get_target_v2(handle1)); + mono_gchandle_free_v2(handle1); + CHECK(mono_gchandle_get_target_v2(handle1) == nullptr); + + // Pinned + uintptr_t handle2 = mono_gchandle_new_v2(testObj, true); + CHECK(handle2 != 0); + CHECK_EQUAL(testObj, mono_gchandle_get_target_v2(handle2)); + mono_gchandle_free_v2(handle2); + CHECK(mono_gchandle_get_target_v2(handle2) == nullptr); + + CHECK(handle1 != handle2); +} + +TEST(mono_gchandle_new_weakref_creates_weakref) +{ + MonoObject* testObj = CreateObjectHelper(kTestDLLNameSpace, kTestClassName); + + // Normal + uintptr_t handle1 = mono_gchandle_new_weakref_v2(testObj, false); + CHECK(handle1 != 0); + CHECK_EQUAL(testObj, mono_gchandle_get_target_v2(handle1)); + mono_gchandle_free_v2(handle1); + CHECK(mono_gchandle_get_target_v2(handle1) == nullptr); + + // Track resurrection + uintptr_t handle2 = mono_gchandle_new_weakref_v2(testObj, true); + CHECK(handle2 != 0); + CHECK_EQUAL(testObj, mono_gchandle_get_target_v2(handle2)); + mono_gchandle_free_v2(handle2); + CHECK(mono_gchandle_get_target_v2(handle2) == nullptr); + + CHECK(handle1 != handle2); +} + +#if WIN32 +#define NOINLINE __declspec(noinline) +#else +#define NOINLINE __attribute__((noinline)) +#endif + +// This needs to be a separate function, so the object itself is not alive on the stack +// and can be collected when the function exits. +NOINLINE +uintptr_t SetupTestObjectWeakHandle(const char* _namespace, const char* _class) +{ + MonoObject* testObj = CreateObjectHelper(_namespace, _class); + uintptr_t handle = mono_gchandle_new_weakref_v2(testObj, false); + return handle; +} + +NOINLINE +uintptr_t SetupTestObjectHandle(const char* _namespace, const char* _class) +{ + MonoObject* testObj = CreateObjectHelper(_namespace, _class); + uintptr_t handle = mono_gchandle_new_v2(testObj, false); + CHECK_EQUAL(testObj, mono_gchandle_get_target_v2(handle)); + return handle; +} + +NOINLINE +void VerifyCollectTestObjectHandle(guint32 handle, bool shouldBeAlive) +{ + // Clear 10kb of stack memory to avoid any stale stack slots + // left over from creating the object keeping it alive. + memset(alloca(1024*10), 0, 1024*10); + + // Since the above is not always reliable: + // If in CoreCLR, turn off conservative GC for this collection to avoid any + // stale stack slots left over from creating the object keeping it alive. + // In mono, we don't have this function, so check for it's existance. + if (mono_set_gc_conservative) + mono_set_gc_conservative(false); + mono_gc_collect(mono_gc_max_generation()); + if (mono_set_gc_conservative) + mono_set_gc_conservative(true); + if (shouldBeAlive) + CHECK(mono_gchandle_get_target_v2(handle) != NULL); + else + CHECK(mono_gchandle_get_target_v2(handle) == NULL); +} + +#if 0 +TEST(weakref_can_be_collected) +{ + uintptr_t handle = SetupTestObjectWeakHandle(kTestDLLNameSpace, kTestClassName); + VerifyCollectTestObjectHandle(handle, false); +} + +TEST(handle_cannot_be_collected) +{ + uintptr_t handle = SetupTestObjectHandle(kTestDLLNameSpace, kTestClassName); + VerifyCollectTestObjectHandle(handle, true); +} + +bool gFinalizedCalled = false; +void FinalizerCalled() +{ + gFinalizedCalled = true; +} + +TEST(mono_domain_finalize_calls_finalizers) +{ + mono_add_internal_call("TestDll.TestClassWithFinalizer::FinalizerCalled", reinterpret_cast(FinalizerCalled)); + uintptr_t handle = SetupTestObjectWeakHandle(kTestDLLNameSpace, "TestClassWithFinalizer"); + VerifyCollectTestObjectHandle(handle, false); + mono_domain_finalize(g_domain, -1); + CHECK(gFinalizedCalled); + gFinalizedCalled = false; +} + +TEST(mono_unity_gc_disable_works) +{ + uintptr_t handle = SetupTestObjectWeakHandle(kTestDLLNameSpace, kTestClassName); + mono_unity_gc_disable(); + VerifyCollectTestObjectHandle(handle, true); + mono_unity_gc_enable(); +} + +TEST(mono_unity_gc_disable_can_be_nested) +{ + CHECK(!mono_unity_gc_is_disabled()); + mono_unity_gc_disable(); + CHECK(mono_unity_gc_is_disabled()); + mono_unity_gc_disable(); + CHECK(mono_unity_gc_is_disabled()); + mono_unity_gc_enable(); + CHECK(mono_unity_gc_is_disabled()); + mono_unity_gc_enable(); + CHECK(!mono_unity_gc_is_disabled()); +} + +#endif + +TEST(mono_class_enum_basetype_works) +{ + MonoClass *testEnum = GetClassHelper(kTestDLLNameSpace, "TestEnum"); + GET_AND_CHECK(testEnumType, mono_class_enum_basetype(testEnum)); + GET_AND_CHECK(testEnumBaseClass, mono_type_get_class(testEnumType)); + CHECK_EQUAL(mono_get_int32_class(), testEnumBaseClass); + + MonoClass *testEnumCustomSize = GetClassHelper(kTestDLLNameSpace, "TestEnumCustomSize"); + GET_AND_CHECK(testEnumCustomSizeType, mono_class_enum_basetype(testEnumCustomSize)); + GET_AND_CHECK(testEnumCustomSizeBaseClass, mono_type_get_class(testEnumCustomSizeType)); + CHECK_EQUAL(mono_get_byte_class(), testEnumCustomSizeBaseClass); +} + +int GetCoreLibClassTypeHelper(const char* namespaze, const char* name) +{ + GET_AND_CHECK(klass, mono_class_from_name(mono_get_corlib(), namespaze, name)); + GET_AND_CHECK(type, mono_class_get_type(klass)); + return mono_type_get_type(type); +} + +TEST(mono_type_get_type_returns_expected_values) +{ + CHECK_EQUAL(MONO_TYPE_OBJECT, GetCoreLibClassTypeHelper ("System", "Object")); + CHECK_EQUAL(MONO_TYPE_STRING, GetCoreLibClassTypeHelper ("System", "String")); + CHECK_EQUAL(MONO_TYPE_I4, GetCoreLibClassTypeHelper ("System", "Int32")); +} + +static int get_field_type(MonoClass* klass,const char* fieldName) +{ + return mono_type_get_type(mono_field_get_type( mono_class_get_field_from_name (klass, fieldName))); +} + +TEST(mono_type_get_type_returns_expected_values2) +{ + MonoClass* classWithFields = GetClassHelper(kTestDLLNameSpace, "ClassWithFields"); + CHECK_EQUAL(MONO_TYPE_I1, get_field_type (classWithFields, "_sbyte")); + CHECK_EQUAL(MONO_TYPE_U1, get_field_type (classWithFields, "_byte")); + CHECK_EQUAL(MONO_TYPE_I2, get_field_type (classWithFields, "_short")); + CHECK_EQUAL(MONO_TYPE_U2, get_field_type (classWithFields, "_ushort")); + CHECK_EQUAL(MONO_TYPE_I4, get_field_type (classWithFields, "_int")); + CHECK_EQUAL(MONO_TYPE_U4, get_field_type (classWithFields, "_uint")); + CHECK_EQUAL(MONO_TYPE_I8, get_field_type (classWithFields, "_long")); + CHECK_EQUAL(MONO_TYPE_U8, get_field_type (classWithFields, "_ulong")); + + + CHECK_EQUAL(MONO_TYPE_R4, get_field_type (classWithFields, "_float")); + CHECK_EQUAL(MONO_TYPE_R8, get_field_type (classWithFields, "_double")); + + CHECK_EQUAL(MONO_TYPE_BOOLEAN, get_field_type (classWithFields, "_bool")); + CHECK_EQUAL(MONO_TYPE_CHAR, get_field_type (classWithFields, "_char")); + + CHECK_EQUAL(MONO_TYPE_STRING, get_field_type (classWithFields, "_string")); + CHECK_EQUAL(MONO_TYPE_OBJECT, get_field_type (classWithFields, "_object")); + CHECK_EQUAL(MONO_TYPE_CLASS, get_field_type (classWithFields, "_class")); + +} + +TEST(mono_class_from_mono_type_returns_class) +{ + GET_AND_CHECK(objectClass, mono_class_from_name(mono_get_corlib(), "System", "Object")); + GET_AND_CHECK(objectType, mono_class_get_type(objectClass)); + CHECK_EQUAL(objectClass, mono_class_from_mono_type(objectType)); +} + +TEST(mono_type_get_object_returns_type_object) +{ + GET_AND_CHECK(objectClass, mono_class_from_name(mono_get_corlib(), "System", "Object")); + GET_AND_CHECK(objectType, mono_class_get_type(objectClass)); + GET_AND_CHECK(objectTypeObject, mono_type_get_object(g_domain, objectType)); +} + +TEST(mono_class_get_nesting_type_returns_nesting_class) +{ + MonoClass *containingClass = GetClassHelper(kTestDLLNameSpace, "ClassWithNestedClass"); + MonoClass *nestedClass = GetClassHelper(kTestDLLNameSpace, "ClassWithNestedClass/NestedClass"); + CHECK_EQUAL(containingClass, mono_class_get_nesting_type(nestedClass)); + CHECK(mono_class_get_nesting_type(containingClass) == nullptr); +} + +TEST(mono_class_get_nesting_type_returns_generic_nesting_class) +{ + MonoClass *containingClass = GetClassHelper(kTestDLLNameSpace, "GenericClassWithNestedClass`1"); + MonoClass *nestedClass = GetClassHelper(kTestDLLNameSpace, "GenericClassWithNestedClass`1/NestedClass"); + CHECK_EQUAL(containingClass, mono_class_get_nesting_type(nestedClass)); + CHECK(mono_class_get_nesting_type(containingClass) == nullptr); +} + +TEST(mono_object_get_class_returns_class) +{ + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + GET_AND_CHECK(obj, mono_object_new(g_domain, klass)); + CHECK_EQUAL(klass, mono_object_get_class(obj)); +} + +TEST(mono_class_set_userdata_can_be_retrieved) +{ + int userData = 100; + MonoClass *klass = GetClassHelper(kTestDLLNameSpace, kTestClassName); + mono_class_set_userdata(klass, &userData); + + CHECK_EQUAL(&userData, (int*)mono_class_get_userdata(klass)); + CHECK_EQUAL(&userData, *(int**)(((char*)klass) + mono_class_get_userdata_offset())); +} + +TEST(mono_value_box_works) +{ + bool b = true; + GET_AND_CHECK(bool_class, mono_get_boolean_class()); + GET_AND_CHECK(bool_obj, mono_value_box(g_domain, bool_class, &b)); + CHECK_EQUAL(bool_class, mono_object_get_class(bool_obj)); + CHECK_EQUAL(b, *(bool*)mono_object_unbox(bool_obj)); + + int i = 23; + GET_AND_CHECK(int_class, mono_get_int32_class()); + GET_AND_CHECK(int_obj, mono_value_box(g_domain, int_class, &i)); + CHECK_EQUAL(int_class, mono_object_get_class(int_obj)); + CHECK_EQUAL(i, *(int*)mono_object_unbox(int_obj)); +} + +TEST(mono_custom_attrs_has_attr_can_check_class_attribute) +{ + MonoClass *klassClassWithAttribute = GetClassHelper(kTestDLLNameSpace, "ClassWithAttribute"); + MonoClass *klassTestAttribute = GetClassHelper(kTestDLLNameSpace, "TestAttribute"); + MonoClass *klassTestWithParamsAttribute = GetClassHelper(kTestDLLNameSpace, "TestWithParamsAttribute"); + MonoClass *klassAnotherTestAttribute = GetClassHelper(kTestDLLNameSpace, "AnotherTestAttribute"); + + GET_AND_CHECK(customAttrInfo, mono_custom_attrs_from_class(klassClassWithAttribute)); + + CHECK(mono_custom_attrs_has_attr(customAttrInfo, klassTestAttribute)); + CHECK(mono_custom_attrs_has_attr(customAttrInfo, klassTestWithParamsAttribute)); + CHECK(!mono_custom_attrs_has_attr(customAttrInfo, klassAnotherTestAttribute)); + + mono_custom_attrs_free(customAttrInfo); +} + +TEST(mono_custom_attrs_get_attrs_can_enumerate_attributes) +{ + MonoClass *klassClassWithAttribute = GetClassHelper(kTestDLLNameSpace, "ClassWithAttribute"); + MonoClass *klassTestAttribute = GetClassHelper(kTestDLLNameSpace, "TestAttribute"); + MonoClass *klassInheritedTestAttribute = GetClassHelper(kTestDLLNameSpace, "InheritedTestAttribute"); + MonoClass *klassTestWithParamsAttribute = GetClassHelper(kTestDLLNameSpace, "TestWithParamsAttribute"); + + GET_AND_CHECK(customAttrInfo, mono_custom_attrs_from_class(klassClassWithAttribute)); + + void* iterator = NULL; + MonoClass* attributeClass; + attributeClass = mono_custom_attrs_get_attrs(customAttrInfo, &iterator); + CHECK_EQUAL(klassTestAttribute, attributeClass); + attributeClass = mono_custom_attrs_get_attrs(customAttrInfo, &iterator); + CHECK_EQUAL(klassInheritedTestAttribute, attributeClass); + attributeClass = mono_custom_attrs_get_attrs(customAttrInfo, &iterator); + CHECK_EQUAL(klassTestWithParamsAttribute, attributeClass); + attributeClass = mono_custom_attrs_get_attrs(customAttrInfo, &iterator); + CHECK(attributeClass == NULL); + + mono_custom_attrs_free(customAttrInfo); +} + +TEST(mono_custom_attrs_get_attr_can_get_attribute_instance) +{ + MonoClass *klassClassWithAttribute = GetClassHelper(kTestDLLNameSpace, "ClassWithAttribute"); + MonoClass *klassTestWithParamsAttribute = GetClassHelper(kTestDLLNameSpace, "TestWithParamsAttribute"); + + GET_AND_CHECK(customAttrInfo, mono_custom_attrs_from_class(klassClassWithAttribute)); + GET_AND_CHECK(attributeInstance, mono_custom_attrs_get_attr(customAttrInfo, klassTestWithParamsAttribute)); + CHECK_EQUAL(klassTestWithParamsAttribute, mono_object_get_class(attributeInstance)); + mono_custom_attrs_free(customAttrInfo); +} + +TEST(mono_custom_attrs_get_attr_can_get_attribute_instance_for_inherited_attribute_from_base) +{ + MonoClass *klassClassWithAttribute = GetClassHelper(kTestDLLNameSpace, "ClassWithInheritedAttribute"); + MonoClass *klassTestAttribute = GetClassHelper(kTestDLLNameSpace, "TestAttribute"); + MonoClass *klassInheritedTestAttribute = GetClassHelper(kTestDLLNameSpace, "InheritedTestAttribute"); + + GET_AND_CHECK(customAttrInfo, mono_custom_attrs_from_class(klassClassWithAttribute)); + GET_AND_CHECK(attributeInstance, mono_custom_attrs_get_attr(customAttrInfo, klassTestAttribute)); + CHECK_EQUAL(klassInheritedTestAttribute, mono_object_get_class(attributeInstance)); + mono_custom_attrs_free(customAttrInfo); +} + +TEST(mono_custom_attrs_construct_can_get_attribute_instances) +{ + MonoClass *klassClassWithAttribute = GetClassHelper(kTestDLLNameSpace, "ClassWithAttribute"); + MonoClass *klassTestAttribute = GetClassHelper(kTestDLLNameSpace, "TestAttribute"); + MonoClass *klassInheritedTestAttribute = GetClassHelper(kTestDLLNameSpace, "InheritedTestAttribute"); + MonoClass *klassTestWithParamsAttribute = GetClassHelper(kTestDLLNameSpace, "TestWithParamsAttribute"); + + GET_AND_CHECK(customAttrInfo, mono_custom_attrs_from_class(klassClassWithAttribute)); + GET_AND_CHECK(attributeArray, mono_custom_attrs_construct(customAttrInfo)); + + GET_AND_CHECK(attribute1Instance, *(MonoObject**)scripting_array_element_ptr(attributeArray, 0, sizeof(MonoObject*))); + CHECK_EQUAL(klassTestAttribute, mono_object_get_class(attribute1Instance)); + + GET_AND_CHECK(attribute2Instance, *(MonoObject**)scripting_array_element_ptr(attributeArray, 1, sizeof(MonoObject*))); + CHECK_EQUAL(klassInheritedTestAttribute, mono_object_get_class(attribute2Instance)); + + GET_AND_CHECK(attribute3Instance, *(MonoObject**)scripting_array_element_ptr(attributeArray, 2, sizeof(MonoObject*))); + CHECK_EQUAL(klassTestWithParamsAttribute, mono_object_get_class(attribute3Instance)); + + mono_custom_attrs_free(customAttrInfo); +} + +void GetFieldHelper(MonoClass *klass, MonoObject *obj, const char* fieldName, void* value) +{ + GET_AND_CHECK(field, mono_class_get_field_from_name(klass, fieldName)); + size_t field_offset = mono_field_get_offset(field); + mono_field_get_value(obj, field, value); +} + +TEST(mono_custom_attrs_get_attr_attribute_instance_has_correct_parameters) +{ + MonoClass *klassClassWithAttribute = GetClassHelper(kTestDLLNameSpace, "ClassWithAttribute"); + MonoClass *klassTestWithParamsAttribute = GetClassHelper(kTestDLLNameSpace, "TestWithParamsAttribute"); + + GET_AND_CHECK(customAttrInfo, mono_custom_attrs_from_class(klassClassWithAttribute)); + GET_AND_CHECK(attributeInstance, mono_custom_attrs_get_attr(customAttrInfo, klassTestWithParamsAttribute)); + + int i; + GetFieldHelper(klassTestWithParamsAttribute, attributeInstance, "i", &i); + CHECK_EQUAL(42, i); + + MonoString* s; + GetFieldHelper(klassTestWithParamsAttribute, attributeInstance, "s", &s); + char *utf8 = mono_string_to_utf8(s); + CHECK_EQUAL_STR("foo", utf8); + mono_unity_g_free(utf8); + + bool b; + GetFieldHelper(klassTestWithParamsAttribute, attributeInstance, "b", &b); + CHECK_EQUAL(true, b); + + float f; + GetFieldHelper(klassTestWithParamsAttribute, attributeInstance, "f", &f); + CHECK_EQUAL(1.0f, f); + + mono_custom_attrs_free(customAttrInfo); +} + +TEST(mono_custom_attrs_has_attr_can_check_method_attribute) +{ + MonoMethod *methodWithAttribute = GetMethodHelper(kTestDLLNameSpace, "ClassWithAttribute", "MethodWithAttribute", 0); + MonoClass *klassTestAttribute = GetClassHelper(kTestDLLNameSpace, "TestAttribute"); + MonoClass *klassAnotherTestAttribute = GetClassHelper(kTestDLLNameSpace, "AnotherTestAttribute"); + + GET_AND_CHECK(customAttrInfo, mono_custom_attrs_from_method(methodWithAttribute)); + + CHECK(mono_custom_attrs_has_attr(customAttrInfo, klassTestAttribute)); + CHECK(!mono_custom_attrs_has_attr(customAttrInfo, klassAnotherTestAttribute)); + + mono_custom_attrs_free(customAttrInfo); +} + +TEST(mono_custom_attrs_has_attr_can_check_field_attribute) +{ + // TODO +} + +TEST(mono_custom_attrs_has_attr_can_check_property_attribute) +{ + // TODO +} + +TEST(mono_custom_attrs_has_attr_can_check_assembly_attribute) +{ + MonoClass *klassTestAttribute = GetClassHelper(kTestDLLNameSpace, "TestAttribute"); + MonoClass *klassAnotherTestAttribute = GetClassHelper(kTestDLLNameSpace, "AnotherTestAttribute"); + + GET_AND_CHECK(customAttrInfo, mono_custom_attrs_from_assembly(g_assembly)); + + CHECK(mono_custom_attrs_has_attr(customAttrInfo, klassTestAttribute)); + CHECK(!mono_custom_attrs_has_attr(customAttrInfo, klassAnotherTestAttribute)); + + mono_custom_attrs_free(customAttrInfo); +} + +#define kHelloString "Hello" +#define kHelloWorldString "Hello, World!" +#define kHelloWorldStringWithEmbeddedNull "Hello\0World" + +void CheckString(MonoString* str, const char* expected, size_t len) +{ + GET_AND_CHECK(stringclass, mono_object_get_class((MonoObject*)str)); + CHECK_EQUAL(mono_get_string_class(), stringclass); + char *utf8 = mono_string_to_utf8(str); + CHECK_EQUAL(0, strcmp(expected, utf8)); + + // mono_string_to_utf8 returns a C string, so it cannot contain \0 characters. + // Also check if the length of the string matches, to see if we got the characters + // after the \0 in the kHelloWorldStringWithEmbeddedNull test. + GET_AND_CHECK(property, mono_class_get_property_from_name (mono_get_string_class(), "Length")); + GET_AND_CHECK(method, mono_property_get_get_method(property)); + MonoObject* returnValue = mono_runtime_invoke(method, str, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + CHECK_EQUAL(len, int_result); + + mono_unity_g_free(utf8); +} + +TEST(mono_string_new_wrapper_creates_string) +{ + CheckString(mono_string_new_wrapper(kHelloWorldString), kHelloWorldString, 13); +} + +TEST(mono_string_new_len_creates_string) +{ + CheckString(mono_string_new_len(mono_domain_get(), kHelloWorldString, 13), kHelloWorldString, 13); + CheckString(mono_string_new_len(mono_domain_get(), kHelloWorldString, 5), kHelloString, 5); + CheckString(mono_string_new_len(mono_domain_get(), kHelloWorldStringWithEmbeddedNull, 11), kHelloWorldStringWithEmbeddedNull, 11); +} + +void *ThreadFunc(void *arguments) +{ + CHECK(mono_domain_get() == NULL); + GET_AND_CHECK(thread, mono_thread_attach(mono_get_root_domain())); + CHECK_EQUAL(mono_get_root_domain(), mono_domain_get()); + mono_thread_detach(thread); + CHECK(mono_domain_get() == NULL); + return NULL; +} + +#if !WIN32 +TEST(can_use_mono_domain_get_to_check_if_thread_is_attached) +{ + pthread_t thread; + pthread_create(&thread, NULL, ThreadFunc, NULL); + pthread_join(thread, NULL); +} +#endif + +TEST(can_access_array_elements) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodReturningArray", 0); + MonoArray* returnValue = (MonoArray*)mono_runtime_invoke(method, nullptr, nullptr, nullptr); + GET_AND_CHECK(arrayInt32Class, mono_object_get_class((MonoObject*)returnValue)); + CHECK_EQUAL(sizeof(int), mono_array_element_size(arrayInt32Class)); + for (int i=0; i<6; i++) + CHECK_EQUAL(i + 1, *(int*)scripting_array_element_ptr(returnValue, i, sizeof(int))); +} + +TEST(can_access_array_elements_2d) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "StaticMethodReturning2DArray", 0); + MonoArray* returnValue = (MonoArray*)mono_runtime_invoke(method, nullptr, nullptr, nullptr); + GET_AND_CHECK(arrayInt32Class, mono_object_get_class((MonoObject*)returnValue)); + CHECK_EQUAL(sizeof(int), mono_array_element_size(arrayInt32Class)); + for (int i=0; i<6; i++) + CHECK_EQUAL(i + 1, *(int*)scripting_array_element_ptr(returnValue, i, sizeof(int))); +} + +int InternalMethod() +{ + return 42; +} + +int InternalMethodInNestedClass() +{ + return 23; +} + +TEST(can_call_internal_method) +{ + mono_add_internal_call("TestDll.ICallTest::InternalMethod", reinterpret_cast(InternalMethod)); + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, "ICallTest", "CallInternalMethod", 0); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + + CHECK_EQUAL(42, int_result); +} + +TEST(can_call_internal_method_in_nested_class) +{ + mono_add_internal_call("TestDll.ICallTest/NestedClass::InternalMethodInNestedClass", reinterpret_cast(InternalMethodInNestedClass)); + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, "ICallTest", "CallInternalMethodInNestedClass", 0); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + + CHECK_EQUAL(23, int_result); +} + +MonoString* InternalMethodReturnsStackTrace() +{ + MonoInternalCallFrameOpaque frame; + // In mono, we don't have (or need) this function, so check for it's existance. + if (mono_enter_internal_call) + mono_enter_internal_call(&frame); + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, "ICallTest", "ReturnStackTrace", 0); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + if (mono_exit_internal_call) + mono_exit_internal_call(&frame); + return (MonoString*)returnValue; +} + +#if ENABLE_FAILING_TESTS +TEST(can_get_full_stack_trace_in_internal_method) +{ + mono_add_internal_call("TestDll.ICallTest::InternalMethodReturnsStackTrace", reinterpret_cast(InternalMethodReturnsStackTrace)); + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, "ICallTest", "CallInternalMethodReturnsStackTrace", 0); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + char* str = mono_string_to_utf8((MonoString*)returnValue); + CHECK(strstr(str, "ReturnStackTrace")); + CHECK(strstr(str, "InternalMethodReturnsStackTrace")); + CHECK(strstr(str, "CallInternalMethodReturnsStackTrace")); + mono_unity_g_free(str); +} +#endif + +static const char* find_plugin_callback(const char* name) +{ + printf("Load plugin %s\n", name); + + if (strcmp(name, "foo.lib") == 0) + return abs_path_from_file("nativelib/nativelib.dylib").c_str(); + + return NULL; +} + +#if ENABLE_FAILING_TESTS +TEST(can_call_dllimport_method_with_custom_dlopen_callback) +{ + mono_set_find_plugin_callback((gconstpointer)find_plugin_callback); + + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, "ICallTest", "CallDllImportFunction", 2); + int param1 = 10; + int param2 = 15; + void* params[2] = { ¶m1, ¶m2 }; + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, params, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + + CHECK_EQUAL(25, int_result); +} + +TEST(mono_runtime_unhandled_exception_policy_set_exception_on_thread_will_not_kill_app) +{ + mono_runtime_unhandled_exception_policy_set(MONO_UNHANDLED_POLICY_LEGACY); + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, "ThreadTest", "RunThreadWhichThrows", 0); + MonoObject* returnValue = (MonoObject*)mono_runtime_invoke(method, nullptr, nullptr, nullptr); + bool bool_result = *(bool*)mono_object_unbox(returnValue); + CHECK(bool_result); +} +#endif + +#if WIN32 +#define sleep Sleep; +#endif + +bool g_WaitForGC; +void InternalMethodWhichBlocks() +{ + MonoInternalCallFrameOpaque frame; + // In mono, we don't have (or need) this function, so check for it's existance. + if (mono_enter_internal_call) + mono_enter_internal_call(&frame); + + g_WaitForGC = true; + while (g_WaitForGC) + sleep(1); + + if (mono_exit_internal_call) + mono_exit_internal_call(&frame); +} +#if ENABLE_FAILING_TESTS +// This test simulates a scenario where an icall on a thread needs to be interrupted by the GC or we get a deadlock. +// We have situations like this in Unity. For this reason, our icalls need to be in preemtive mode in CoreCLR. +TEST(internal_method_can_be_interrupted_by_gc) +{ + mono_add_internal_call("TestDll.ICallTest::InternalMethodWhichBlocks", reinterpret_cast(InternalMethodWhichBlocks)); + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, "ThreadTest", "RunThreadWhichBlocksInInternalMethod", 0); + mono_runtime_invoke(method, nullptr, nullptr, nullptr); + while (!g_WaitForGC) + sleep(1); + mono_gc_collect(mono_gc_max_generation()); + g_WaitForGC = false; +} +#endif + +TEST(can_parse_xml_with_win1252_encoding) +{ + MonoMethod* method = GetMethodHelper(kTestDLLNameSpace, "XmlTest", "TestParseXmlWithWin1252Encoding", 0); + MonoObject* returnValue = (MonoObject*)mono_runtime_invoke(method, nullptr, nullptr, nullptr); + bool bool_result = *(bool*)mono_object_unbox(returnValue); + CHECK(bool_result); +} + +#if DOMAIN_UNLOAD_TESTS + +MonoObject* g_UnloadException = nullptr; +static void UnityDomainUnloadCallback(MonoObject* exc) +{ + g_UnloadException = exc; +} + +MonoDomain* LoadTestDllIntoDomain(MonoImage **image) +{ + std::string testDllPath = abs_path_from_file("../unloadable-test-dll/bin/Debug/net461/unloadable-test-dll.dll"); + + GET_AND_CHECK(domain, mono_domain_create_appdomain("domain", NULL)); + + // Like in the Unity Editor, we use mono_image_open_from_data_with_name to load the reloadable assembly from memory, + // instead of mono_domain_assembly_open. This allows the editor to change the assembly on disk without causing issues. + long lSize; + GET_AND_CHECK(pFile, fopen (testDllPath.c_str() , "rb")); + + fseek (pFile , 0 , SEEK_END); + lSize = ftell (pFile); + rewind (pFile); + + GET_AND_CHECK(buffer, (char*) malloc (lSize)); + CHECK_EQUAL(lSize, fread (buffer, 1, lSize, pFile)); + fclose (pFile); + + int status = 0; + mono_domain_set(domain, true); + *image = mono_image_open_from_data_with_name((char*)buffer, lSize, true, &status, false, testDllPath.c_str()); + CHECK(*image != NULL); + CHECK_EQUAL(0, status); + GET_AND_CHECK(assembly, mono_assembly_load_from_full(*image, testDllPath.c_str(), &status, false)); + CHECK_EQUAL(0, status); + mono_domain_set(g_domain, true); + + return domain; +} + +TEST(can_load_assembly_into_domain_and_call_into_it) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, "MethodReturningInt", 0)); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + + CHECK_EQUAL(42, int_result); + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); +} + +// Since we are loading the unloadable test dll from memory using mono_image_open_from_data_with_name, +// we need to make sure that we correctly associate the path we pass to mono_image_open_from_data_with_name +// as the assembly Location. +TEST(can_load_assembly_into_domain_and_get_assembly_location) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, "GetAssemblyLocation", 0)); + MonoString* returnValue = (MonoString*)mono_runtime_invoke(method, nullptr, nullptr, nullptr); + char *utf8 = mono_string_to_utf8(returnValue); + CHECK(strstr(utf8, "unloadable-test-dll.dll")); + mono_unity_g_free(utf8); + + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); +} + +// Unmodified CoreCLR would assert when a new MethodDesc points to the same internal call +// implementation as an existing entry in the table. But when we reload the ALC containing the +// internal call definition, we get a new MethodDesc, so we need to modify CoreCLR to allow this. +// This test verifies that. +TEST(can_call_internal_method_after_reloading_domain) +{ + mono_add_internal_call("UnloadableTestDll.ICallTest::InternalMethod", reinterpret_cast(InternalMethod)); + + for (int i=0; i<2; i++) + { + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "ICallTest")); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, "CallInternalMethod", 0)); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + int int_result = *(int*)mono_object_unbox(returnValue); + CHECK_EQUAL(42, int_result); + + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); + } +} + +// This needs to be a separate function, so the object itself is not alive on the stack +// and can be collected when the function exits. +NOINLINE +guint32 SetupDomainTestObjectHandle(MonoDomain* domain, MonoClass* klass, bool weak, bool pinned = false) +{ + GET_AND_CHECK(obj, mono_object_new(domain, klass)); + guint32 handle = weak ? mono_gchandle_new_weakref_v2(obj, false) : mono_gchandle_new_v2(obj, false); + CHECK_EQUAL(obj, mono_gchandle_get_target_v2(handle)); + return handle; +} + +NOINLINE +guint32 SetupDomainTestTypeObjectHandle(MonoDomain* domain, MonoClass* klass, bool weak, bool pinned = false) +{ + GET_AND_CHECK(obj, mono_type_get_object(domain, mono_class_get_type(klass))); + guint32 handle = weak ? mono_gchandle_new_weakref_v2(obj, false) : mono_gchandle_new_v2(obj, pinned); + CHECK_EQUAL(obj, mono_gchandle_get_target_v2(handle)); + return handle; +} + +TEST(unloading_domain_unloads_its_objects) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + guint32 gchandle = SetupDomainTestObjectHandle(domain, klass, true); + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); + CHECK(mono_gchandle_get_target_v2(gchandle) == NULL); +} + +TEST(unloading_domain_unloads_its_objects_even_if_object_creates_handle_in_finalizer) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "ClassWhichCreatesGCHandleToItselfInFinalizer")); + guint32 gchandle = SetupDomainTestObjectHandle(domain, klass, true); + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); + CHECK(mono_gchandle_get_target_v2(gchandle) == NULL); +} + +TEST(unloading_domain_unloads_type_objects) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + guint32 gchandle = SetupDomainTestTypeObjectHandle(domain, klass, true); + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); + CHECK(mono_gchandle_get_target_v2(gchandle) == NULL); +} + +TEST(unloading_domain_unloads_its_objects_even_if_protected_by_gchandle) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + guint32 gchandle = SetupDomainTestObjectHandle(domain, klass, false); + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); + CHECK(mono_gchandle_get_target_v2(gchandle) == NULL); +} + +TEST(unloading_domain_unloads_its_objects_even_if_protected_by_pinned_gchandle) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + guint32 gchandle = SetupDomainTestObjectHandle(domain, klass, false, true); + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); + CHECK(mono_gchandle_get_target_v2(gchandle) == NULL); +} + +TEST(unloading_domain_unloads_its_objects_even_if_in_static_reference) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, "SetupStaticRef", 0)); + mono_runtime_invoke(method, nullptr, nullptr, nullptr); + + guint32 gchandle = SetupDomainTestObjectHandle(domain, klass, false); + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); + CHECK(mono_gchandle_get_target_v2(gchandle) == NULL); +} + +TEST(unloading_domain_unloads_its_objects_even_if_protected_by_gchandle_indirectly) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, "SetupGCHandleIndirect", 0)); + mono_runtime_invoke(method, nullptr, nullptr, nullptr); + + guint32 gchandle = SetupDomainTestObjectHandle(domain, klass, false); + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); + CHECK(mono_gchandle_get_target_v2(gchandle) == NULL); +} + +TEST(unloading_domain_unloads_its_objects_even_if_protected_by_stack_slot) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + GET_AND_CHECK(obj, mono_object_new(domain, klass)); + guint32 handle = mono_gchandle_new_weakref_v2(obj, false); + CHECK_EQUAL(obj, mono_gchandle_get_target_v2(handle)); + + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); + CHECK(mono_gchandle_get_target_v2(handle) == NULL); + CHECK(obj != nullptr); // Stack slot now points to invalid memory +} + +bool gUnloadNotificationWasCalled; +void UnloadNotification() +{ + gUnloadNotificationWasCalled = true; +} + +TEST(unloading_domain_calls_unload_event) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + mono_domain_set(domain, true); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, "SetupUnloadCallback", 0)); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + mono_add_internal_call("UnloadableTestDll.TestClass::UnloadNotification", reinterpret_cast(UnloadNotification)); + + mono_domain_set(g_domain, true); + gUnloadNotificationWasCalled = false; + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); + CHECK(gUnloadNotificationWasCalled); +} + +TEST(unloading_domain_works_even_if_it_sets_up_an_exception_handler) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, "SetupUnhandledExceptionHandler", 0)); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); +} + +#if DOMAIN_UNLOAD_THREAD_TESTS +TEST(unloading_domain_works_even_if_a_thread_is_running) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, "CreateThread", 0)); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); +} + +TEST(unloading_domain_works_even_if_a_thread_is_running_an_infinite_loop) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, "CreateThreadInfiniteLoop", 0)); + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, nullptr, nullptr); + + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); +} + +TEST(unloading_domain_works_even_if_it_sets_up_a_filesystem_watcher) +{ + MonoImage* image; + MonoDomain* domain = LoadTestDllIntoDomain(&image); + GET_AND_CHECK(klass, mono_class_from_name(image, "UnloadableTestDll", "TestClass")); + GET_AND_CHECK(method, mono_class_get_method_from_name (klass, "SetupFileSystemWatcher", 1)); + void* params[1] = { mono_string_new_wrapper(abs_path_from_file("../").c_str())}; + MonoObject* returnValue = mono_runtime_invoke(method, nullptr, params, nullptr); + + g_UnloadException = nullptr; + mono_unity_domain_unload(domain, UnityDomainUnloadCallback); + CHECK(g_UnloadException == nullptr); +} +#endif // DOMAIN_UNLOAD_THREAD_TESTS +#endif // DOMAIN_UNLOAD_TESTS + +#if ENABLE_FAILING_TESTS +TEST(can_create_exception_from_name) +{ + GET_AND_CHECK(image, mono_assembly_get_image(g_assembly)); + GET_AND_CHECK(ex, mono_exception_from_name_msg(image, kTestDLLNameSpace, "TestException", "Hello")); + CHECK(mono_class_is_subclass_of(mono_object_get_class((MonoObject*)ex), mono_get_exception_class(), false)); +} +#endif + +TEST(can_create_argument_null_exception) +{ + GET_AND_CHECK(ex, mono_get_exception_argument_null("MyArg")); + CHECK(mono_class_is_subclass_of(mono_object_get_class((MonoObject*)ex), mono_get_exception_class(), false)); +} + +void InternalMethodWhichThrows() +{ + GET_AND_CHECK(image, mono_assembly_get_image(g_assembly)); + GET_AND_CHECK(ex, mono_exception_from_name_msg(image, kTestDLLNameSpace, "TestException", "Hello")); + mono_raise_exception(ex); +} + +void InternalMethodWhichReturnsExceptionInRefParam(MonoException **e) +{ + GET_AND_CHECK(image, mono_assembly_get_image(g_assembly)); + GET_AND_CHECK(ex, mono_exception_from_name_msg(image, kTestDLLNameSpace, "TestException", "Hello")); + *e = ex; +} + +#if ENABLE_FAILING_TESTS +TEST(can_throw_exception_from_internal_method) +{ + MonoMethod* method; + if (g_Mode == Mono) + { + mono_add_internal_call("TestDll.ICallTest::InternalMethodWhichThrows", reinterpret_cast(InternalMethodWhichThrows)); + method = GetMethodHelper(kTestDLLNameSpace, "ICallTest", "CallInternalMethodWhichThrowsAndCatchExceptionMono", 0); + } + else + { + mono_add_internal_call("TestDll.ICallTest::InternalMethodWhichReturnsExceptionInRefParam", reinterpret_cast(InternalMethodWhichReturnsExceptionInRefParam)); + method = GetMethodHelper(kTestDLLNameSpace, "ICallTest", "CallInternalMethodWhichThrowsAndCatchExceptionCoreCLR", 0); + } + MonoString* returnValue = (MonoString*)mono_runtime_invoke(method, nullptr, nullptr, nullptr); + char *utf8 = mono_string_to_utf8(returnValue); + CHECK_EQUAL("Hello", utf8); + mono_unity_g_free(utf8); +} +#endif // ENABLE_FAILING_TESTS + +#if ENABLE_FAILING_TESTS +#define REMAP_TEST_SRC_PATH_NAME "Foo.txt" +#define REMAP_TEST_SRC_ASSEMBLY_NAME "Foo.dll" + +size_t RemapMonoPath(const char* path, char* buffer, size_t bufferLen) +{ + const char* remapped; + std::string remappedString; + if (strstr(path, REMAP_TEST_SRC_PATH_NAME) != NULL) + { + remappedString = abs_path_from_file("Hello.txt"); + } + + if (strstr(path, REMAP_TEST_SRC_ASSEMBLY_NAME) != NULL) + { + remappedString = abs_path_from_file("../unloadable-test-dll/bin/Debug/net461/unloadable-test-dll.dll"); + } + + if (remappedString.empty()) + return 0; + + remapped = remappedString.c_str(); + + printf("Remap %s to %s\n", path, remapped); + size_t lenNeeded = strlen(remapped); + if (bufferLen >= lenNeeded) + strcpy(buffer, remapped); + return lenNeeded; +} + +TEST(mono_unity_register_path_remapper_can_remap_file_read) +{ + mono_unity_register_path_remapper (RemapMonoPath); + + MonoMethod* readAllTextMethod = GetMethodHelper(kTestDLLNameSpace, kTestClassName, "ReadAllTextSafe", 1); + + void* params[1] = { mono_string_new_wrapper(REMAP_TEST_SRC_PATH_NAME)}; + MonoString* returnValue = (MonoString*)mono_runtime_invoke(readAllTextMethod, nullptr, params, nullptr); + CHECK(returnValue != NULL); + char* utf8 = mono_string_to_utf8(returnValue); + + CHECK_EQUAL("Hello" + kNewLine, utf8); + mono_unity_g_free(utf8); + + + mono_unity_register_path_remapper (NULL); + + returnValue = (MonoString*)mono_runtime_invoke(readAllTextMethod, nullptr, params, nullptr); + CHECK(returnValue == NULL); +} + +TEST(mono_unity_register_path_remapper_can_remap_assembly_load) +{ + MonoAssembly *forwarderAssembly = mono_domain_assembly_open (g_domain, "Foo.dll"); + CHECK(forwarderAssembly == NULL); + + mono_unity_register_path_remapper (RemapMonoPath); + + forwarderAssembly = mono_domain_assembly_open (g_domain, "Foo.dll"); + CHECK(forwarderAssembly != NULL); + + mono_unity_register_path_remapper (NULL); +} +#endif // ENABLE_FAILING_TESTS + +void SetupMono(Mode mode) +{ + g_Mode = mode; +#if defined(_DEBUG) + std::string testDllPath = abs_path_from_file("../../artifacts/bin/coreclr-test/Debug/net6.0/coreclr-test.dll"); +#else + std::string testDllPath = abs_path_from_file("../../artifacts/bin/coreclr-test/Release/net6.0/coreclr-test.dll"); +#endif + + std::string monoLibFolder; + std::string assembliesPaths; + if (mode == CoreCLR) + { +#if defined(__APPLE__) +#if defined(_DEBUG) +#ifdef __aarch64__ + monoLibFolder = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.osx-arm64/Debug/runtimes/osx-arm64/lib/net7.0"); + g_monoDllPath = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.osx-arm64/Debug/runtimes/osx-arm64/native/libcoreclr.dylib"); +#else + monoLibFolder = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.osx-x64/Debug/runtimes/osx-x64/lib/net7.0"); + g_monoDllPath = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.osx-x64/Debug/runtimes/osx-x64/native/libcoreclr.dylib"); +#endif // __aarch64__ +#else +#ifdef __aarch64__ + monoLibFolder = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.osx-arm64/Release/runtimes/osx-arm64/lib/net7.0"); + g_monoDllPath = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.osx-arm64/Release/runtimes/osx-arm64/native/libcoreclr.dylib"); +#else + monoLibFolder = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.osx-x64/Release/runtimes/osx-x64/lib/net7.0"); + g_monoDllPath = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.osx-x64/Release/runtimes/osx-x64/native/libcoreclr.dylib"); +#endif // __aarch64__ +#endif +#elif defined(__linux__) + monoLibFolder = "/usr/share/dotnet/shared/Microsoft.NETCore.App/3.1.0"; + g_monoDllPath = "../../bin/Product/Linux.x64.Debug/libcoreclr.so"; +#elif defined(WIN32) +#if defined(_DEBUG) +#ifdef _M_AMD64 + monoLibFolder = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.win-x64/Debug/runtimes/win-x64/lib/net7.0"); + g_monoDllPath = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.win-x64/Debug/runtimes/win-x64/native/coreclr.dll"); +#else + monoLibFolder = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.win-x86/Debug/runtimes/win-x86/lib/net7.0"); + g_monoDllPath = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.win-x86/Debug/runtimes/win-x86/native/coreclr.dll"); +#endif +#else +#ifdef _M_AMD64 + monoLibFolder = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.win-x64/Release/runtimes/win-x64/lib/net7.0"); + g_monoDllPath = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.win-x64/Release/runtimes/win-x64/native/coreclr.dll"); +#else + monoLibFolder = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.win-x86/Release/runtimes/win-x86/lib/net7.0"); + g_monoDllPath = abs_path_from_file("../../artifacts/bin/microsoft.netcore.app.runtime.win-x86/Release/runtimes/win-x86/native/coreclr.dll"); +#endif +#endif +#else + printf("Unsupported platform\n"); + g_monoDllPath = ""; +#endif + } + else + { + monoLibFolder = abs_path_from_unity_root("External/MonoBleedingEdge/builds/monodistribution/lib"); +#if defined(__APPLE__) + g_monoDllPath = abs_path_from_unity_root("External/MonoBleedingEdge/builds/embedruntimes/osx/libmonobdwgc-2.0.dylib"); +#elif defined(__linux__) + g_monoDllPath = abs_path_from_unity_root("External/MonoBleedingEdge/builds/embedruntimes/linux64/libmonobdwgc-2.0.so"); +#elif defined(WIN32) + g_monoDllPath = abs_path_from_unity_root("External/MonoBleedingEdge/builds/embedruntimes/win64/mono-2.0-bdwgc.dll"); +#endif + } + + #define DO_API(r,n,p) typedef r (*type_##n)p; n = (type_##n)get_method(#n); + #include "../../src/coreclr/vm/mono/MonoFunctionsClr.h" + #undef DO_API + + printf("Setting up directories for Mono...\n"); + mono_set_dirs(monoLibFolder.c_str(), ""); + + char* assembliesPathsNullTerm; + + if (mode == CoreCLR) + { +#if defined(_DEBUG) + assembliesPaths = abs_path_from_file("../../artifacts/bin/unity-embed-host/Debug/net6.0"); +#else + assembliesPaths = abs_path_from_file("../../artifacts/bin/unity-embed-host/Release/net6.0"); +#endif + auto assembliesPathsChar = assembliesPaths.c_str(); + assembliesPathsNullTerm = new char[strlen(assembliesPathsChar) + 2]; + strcpy(assembliesPathsNullTerm, assembliesPathsChar); + assembliesPathsNullTerm[strlen(assembliesPathsChar) + 1] = '\0'; + mono_set_assemblies_path_null_separated(assembliesPathsNullTerm); + delete [] assembliesPathsNullTerm; + } + + g_domain = mono_jit_init_version("myapp", "v4.0.30319"); + g_assembly = mono_domain_assembly_open(g_domain, testDllPath.c_str()); +} + +void ShutdownMono() +{ + printf("Cleaning up...\n"); + mono_unity_jit_cleanup(g_domain); + +#if JON + // we cannot close the coreclr library + dlclose(s_MonoLibrary); +#endif + s_MonoLibrary = NULL; +} + +int RunTests(Mode mode) +{ + SetupMono(mode); + + Catch::Session session; + int result = session.run(); + + ShutdownMono(); + + return result; +} + +int main(int argc, char * argv[]) +{ + if (getenv("UNITY_ROOT") != NULL) + return RunTests(Mono); + + return RunTests(CoreCLR); +} diff --git a/unity/forwarder-test/forwarder-test.csproj b/unity/forwarder-test/forwarder-test.csproj new file mode 100644 index 00000000000000..5117e1ef729341 --- /dev/null +++ b/unity/forwarder-test/forwarder-test.csproj @@ -0,0 +1,14 @@ + + + + library + true + net6.0 + false + + + + + + + diff --git a/unity/forwarder-test/test.cs b/unity/forwarder-test/test.cs new file mode 100644 index 00000000000000..7fcabae1ddf176 --- /dev/null +++ b/unity/forwarder-test/test.cs @@ -0,0 +1,3 @@ +using System.Runtime.CompilerServices; + +[assembly:TypeForwardedTo(typeof(TestDll.TestClass))] \ No newline at end of file diff --git a/unity/managed.sln b/unity/managed.sln new file mode 100644 index 00000000000000..0a6f6720bca1f7 --- /dev/null +++ b/unity/managed.sln @@ -0,0 +1,37 @@ + +Microsoft Visual Studio Solution File, Format Version 12.00 +# Visual Studio Version 17 +VisualStudioVersion = 17.0.32014.148 +MinimumVisualStudioVersion = 10.0.40219.1 +Project("{9A19103F-16F7-4668-BE54-9A1E7A4F7556}") = "coreclr-test", "coreclr-test\coreclr-test.csproj", "{BB4607A8-7EC8-4821-835F-9CCB6DB05B47}" +EndProject +Project("{9A19103F-16F7-4668-BE54-9A1E7A4F7556}") = "unity-embed-host", "unity-embed-host\unity-embed-host.csproj", "{5EDB2E60-0AF3-4691-B1ED-CEF193A998F6}" +EndProject +Project("{9A19103F-16F7-4668-BE54-9A1E7A4F7556}") = "forwarder-test", "forwarder-test\forwarder-test.csproj", "{E64EA1ED-731D-4391-86A2-764487F0D8AF}" +EndProject +Global + GlobalSection(SolutionConfigurationPlatforms) = preSolution + Debug|Any CPU = Debug|Any CPU + Release|Any CPU = Release|Any CPU + EndGlobalSection + GlobalSection(ProjectConfigurationPlatforms) = postSolution + {BB4607A8-7EC8-4821-835F-9CCB6DB05B47}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {BB4607A8-7EC8-4821-835F-9CCB6DB05B47}.Debug|Any CPU.Build.0 = Debug|Any CPU + {BB4607A8-7EC8-4821-835F-9CCB6DB05B47}.Release|Any CPU.ActiveCfg = Release|Any CPU + {BB4607A8-7EC8-4821-835F-9CCB6DB05B47}.Release|Any CPU.Build.0 = Release|Any CPU + {5EDB2E60-0AF3-4691-B1ED-CEF193A998F6}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {5EDB2E60-0AF3-4691-B1ED-CEF193A998F6}.Debug|Any CPU.Build.0 = Debug|Any CPU + {5EDB2E60-0AF3-4691-B1ED-CEF193A998F6}.Release|Any CPU.ActiveCfg = Release|Any CPU + {5EDB2E60-0AF3-4691-B1ED-CEF193A998F6}.Release|Any CPU.Build.0 = Release|Any CPU + {E64EA1ED-731D-4391-86A2-764487F0D8AF}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {E64EA1ED-731D-4391-86A2-764487F0D8AF}.Debug|Any CPU.Build.0 = Debug|Any CPU + {E64EA1ED-731D-4391-86A2-764487F0D8AF}.Release|Any CPU.ActiveCfg = Release|Any CPU + {E64EA1ED-731D-4391-86A2-764487F0D8AF}.Release|Any CPU.Build.0 = Release|Any CPU + EndGlobalSection + GlobalSection(SolutionProperties) = preSolution + HideSolutionNode = FALSE + EndGlobalSection + GlobalSection(ExtensibilityGlobals) = postSolution + SolutionGuid = {AA978808-F77C-4353-8554-06F85D63CFE0} + EndGlobalSection +EndGlobal diff --git a/unity/unity-embed-host/unity-embed-host.cs b/unity/unity-embed-host/unity-embed-host.cs new file mode 100644 index 00000000000000..a22a8c3d9acc0b --- /dev/null +++ b/unity/unity-embed-host/unity-embed-host.cs @@ -0,0 +1,271 @@ +#undef DEBUG_ALC_WRAPPER + +using System; +using System.Collections.Generic; +using System.IO; +using System.Linq; +using System.Net.WebSockets; +using System.Reflection; +using System.Runtime.CompilerServices; +using System.Runtime.InteropServices; +using System.Runtime.Loader; +using System.Text; + +namespace Unity.CoreCLRHelpers +{ + internal class AssemblyLoadContextUnloadException : Exception + { + } + + unsafe delegate IntPtr CallLoadFromAssemblyData2(byte* data, long size); + unsafe delegate IntPtr CallLoadFromAssemblyPath2(byte* path, int length); + + struct HostStruct + { + public IntPtr version; + + public IntPtr/*CallLoadFromAssemblyData2*/ loadFromMemory; + public IntPtr/*CallLoadFromAssemblyPath2*/ loadFromPath; + } + + unsafe static class CoreCLRHost + { + static ALCWrapper alcWrapper; + static FieldInfo assemblyHandleField; + public unsafe static int InitMethod(HostStruct* functionStruct, int structSize) + { + if (Marshal.SizeOf() != structSize) + throw new Exception("Invalid struct size"); + + alcWrapper = new ALCWrapper(); + assemblyHandleField = typeof(Assembly).Assembly.GetType("System.Reflection.RuntimeAssembly").GetField("m_assembly", BindingFlags.Instance | BindingFlags.NonPublic); + if (assemblyHandleField == null) + throw new Exception("Failed to find RuntimeAssembly.m_assembly field."); + + var loadAssemblyFromData = (CallLoadFromAssemblyData2)CallLoadFromAssemblyData; + GCHandle.Alloc(loadAssemblyFromData, GCHandleType.Normal); + functionStruct->loadFromMemory = Marshal.GetFunctionPointerForDelegate(loadAssemblyFromData); + + var loadAssemblyFromPath = (CallLoadFromAssemblyPath2)CallLoadFromAssemblyPath; + GCHandle.Alloc(loadAssemblyFromPath, GCHandleType.Normal); + functionStruct->loadFromPath = Marshal.GetFunctionPointerForDelegate(loadAssemblyFromPath); + + return 0; + } + + static IntPtr /*Assembly*/ CallLoadFromAssemblyData(byte* data, long size) + { + var assembly = alcWrapper.CallLoadFromAssemblyData(data, size); + return (IntPtr)assemblyHandleField.GetValue(assembly); + } + + static IntPtr /*Assembly*/ CallLoadFromAssemblyPath(byte* path, int length) + { + var assembly = alcWrapper.CallLoadFromAssemblyPath(Encoding.UTF8.GetString(path, length)); + return (IntPtr)assemblyHandleField.GetValue(assembly); + + } + } + + + internal class ALCWrapper : AssemblyLoadContext + { + private static ALCWrapper rootDomain; + private List systemPaths; + private List userPaths; + private static int idCount = 0; + private int id; + + static ALCWrapper() + { + // .NET Core by default only supports ASCII and UTF-* encodings. + // Assemblies built for .NET 4.6.1 assume a wider set of supported encodings. + // Register a CodePagesEncodingProvider to get full support. + Encoding.RegisterProvider(CodePagesEncodingProvider.Instance); + } + + public ALCWrapper() : base(isCollectible: false) + { + // If this is the first ALC we create, we consider this the root domain, which + // should load all "System" assemblies. + if (rootDomain == null) + rootDomain = this; + id = idCount++; + #if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] Created"); + #endif + systemPaths = new List(); + userPaths = new List(); + } + + ~ALCWrapper() + { + #if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] Finalize"); + #endif + } + + void AddPath(string inpaths, bool isSystemPath) + { + #if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] AddPath {inpaths} isSystemPath {isSystemPath}"); + #endif + foreach (var p in inpaths.Split(Path.PathSeparator)) + (isSystemPath ? systemPaths : userPaths).Add(p); + } + + [MethodImpl(MethodImplOptions.InternalCall)] + private static extern string InvokeFindPluginCallback(string path); + + protected override IntPtr LoadUnmanagedDll(string unmanagedDllName) + { + string pluginPath = InvokeFindPluginCallback(unmanagedDllName); +#if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] LoadUnmanagedDll {unmanagedDllName} -> {pluginPath}"); +#endif + if (!string.IsNullOrEmpty(pluginPath) && Path.IsPathRooted(pluginPath)) + return LoadUnmanagedDllFromPath(pluginPath); + + return IntPtr.Zero; + } + + internal unsafe Assembly CallLoadFromAssemblyData(byte* data, long size) + { +#if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] CallLoadFromAssemblyData {(IntPtr)data} {size}"); +#endif + using (var mem = new UnmanagedMemoryStream(data, size, size, FileAccess.Read)) + { + return LoadFromStream(mem); + } + } + + internal Assembly CallLoadFromAssemblyPath(string path) + { + #if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] CallLoadFromAssemblyPath {path}"); + #endif + Assembly asm = LoadFromAssemblyPath(path); + + // If the directory containing the assembly we want to load has not been added to user or system paths yet, + // add it to user paths, so we can resolve any potential dlls next to it, which this assembly might depend on. + var parent = Path.GetDirectoryName(path); + if (!string.IsNullOrEmpty(parent) && !userPaths.Contains(parent) && !systemPaths.Contains(parent)) + userPaths.Add(parent); + + return asm; + } + + protected override Assembly Load(AssemblyName name) + { +#if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] Load assembly {name}"); +#endif + string assemblyPath = null; + foreach (var p in systemPaths) + { + assemblyPath = Path.Combine(p, $"{name.Name}.dll"); + if (File.Exists(assemblyPath)) + { +#if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] is System assembly {name}"); +#endif + // This is a system assembly - those cannot be cleanly unloaded - load it into the root ALC. + if (this != rootDomain) + return rootDomain.Load(name); + break; + } + assemblyPath = null; + } + + if (assemblyPath == null) + { + foreach (var p in userPaths) + { + assemblyPath = Path.Combine(p, $"{name.Name}.dll"); + if (File.Exists(assemblyPath)) + break; + assemblyPath = null; + } + } + + if (assemblyPath == null) + { + #if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] assembly {name} not found."); + #endif + return null; + } + + + try + { +#if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] Load assembly {name} from {assemblyPath}"); +#endif + var result = LoadFromAssemblyPath(assemblyPath); + return result; + } + catch (Exception e) + { + Console.WriteLine($"[ALCWrapper:#{id}] Failed loading {name} from {assemblyPath}:\n{e}"); + return null; + } + } + + void DomainUnloadNotification() + { + try + { + var domainUnloadField = + typeof(AppDomain).GetField("DomainUnload", BindingFlags.Instance | BindingFlags.NonPublic); + var eventDelegate = (EventHandler) domainUnloadField?.GetValue(AppDomain.CurrentDomain); + if (eventDelegate != null) + { + eventDelegate(AppDomain.CurrentDomain, EventArgs.Empty); + domainUnloadField?.SetValue(AppDomain.CurrentDomain, null); + } + } + catch (System.Exception e) + { + Console.WriteLine($"Caught {e} calling AppDomain.CurrentDomain.DomainUnload."); + } + } + + [MethodImpl(MethodImplOptions.NoInlining)] + WeakReference InitUnload() + { + systemPaths = null; + userPaths = null; + #if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper:#{id}] Unload"); + #endif + + var alcWeakRef = new WeakReference(this); + Unload(); + return alcWeakRef; + } + + static Exception FinishUnload(WeakReference alcWeakRef) + { + for (int i = 0; alcWeakRef.IsAlive && (i < 10); i++) + { + #if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper] Unload attempt: {i}"); + #endif + GC.Collect(); + GC.WaitForPendingFinalizers(); + } + + #if DEBUG_ALC_WRAPPER + Console.WriteLine($"[ALCWrapper] FinishUnload success: {!alcWeakRef.IsAlive}"); + #endif + + if (alcWeakRef.IsAlive) + { + return new AssemblyLoadContextUnloadException(); + } + return null; + } + } +} diff --git a/unity/unity-embed-host/unity-embed-host.csproj b/unity/unity-embed-host/unity-embed-host.csproj new file mode 100644 index 00000000000000..89181d4bee9282 --- /dev/null +++ b/unity/unity-embed-host/unity-embed-host.csproj @@ -0,0 +1,10 @@ + + + + library + true + net6.0 + false + + + diff --git a/unity/unity-sources/Runtime/Mono/MonoFunctions.h b/unity/unity-sources/Runtime/Mono/MonoFunctions.h new file mode 100644 index 00000000000000..f5eb346a9dbfbe --- /dev/null +++ b/unity/unity-sources/Runtime/Mono/MonoFunctions.h @@ -0,0 +1,532 @@ +#ifndef DO_API_NO_RETURN +#define DO_API_NO_RETURN(a, b, c) DO_API(a,b,c) +#endif + +#ifndef DO_API_OPTIONAL +#define DO_API_OPTIONAL(a, b, c) DO_API(a,b,c) +#endif + +typedef UNUSED_SYMBOL void(*MonoUnityExceptionFunc) (MonoObject* exc); + +// If you add functions to this file you also need to expose them in MonoBundle.exp +// Otherwise they wont be exported in the web plugin! +DO_API(gboolean, mono_unity_class_has_failure, (MonoClass * klass)) +DO_API(void, mono_thread_suspend_all_other_threads, ()) +DO_API(void, mono_thread_pool_cleanup, ()) +DO_API(void, mono_threads_set_shutting_down, ()) +DO_API(void, mono_runtime_set_shutting_down, ()) +DO_API(gboolean, mono_runtime_is_shutting_down, ()) +DO_API(gboolean, mono_domain_finalize, (MonoDomain * domain, int timeout)) +DO_API(void, mono_runtime_cleanup, (MonoDomain * domain)) +DO_API(MonoMethod*, mono_object_get_virtual_method, (MonoObject * obj, MonoMethod * method)) + +DO_API(void, mono_add_internal_call, (const char *name, gconstpointer method)) +DO_API(void, mono_unity_jit_cleanup, (MonoDomain * domain)) +DO_API(MonoDomain*, mono_jit_init_version, (const char *file, const char* runtime_version)) +DO_API(void*, mono_jit_info_get_code_start, (void* jit)) +DO_API(int, mono_jit_info_get_code_size, (void* jit)) +DO_API(MonoClass *, mono_class_from_name, (MonoImage * image, const char* name_space, const char *name)) +DO_API(MonoClass *, mono_class_from_name_case, (MonoImage * image, const char* name_space, const char *name)) +DO_API(MonoAssembly *, mono_domain_assembly_open, (MonoDomain * domain, const char *name)) +DO_API(MonoDomain *, mono_domain_create_appdomain, (const char *domainname, const char* configfile)) +DO_API(void, mono_domain_unload, (MonoDomain * domain)) +#if UNITY_EDITOR +DO_API(void, mono_unity_domain_unload, (MonoDomain * domain, MonoUnityExceptionFunc callback)) +#endif +DO_API(gboolean, mono_unity_class_is_open_constructed_type, (MonoClass * klass)) +DO_API(MonoException*, mono_unity_error_convert_to_exception, (MonoError * error)) +DO_API(MonoObject*, mono_object_new, (MonoDomain * domain, MonoClass * klass)) +DO_API(void, mono_runtime_object_init, (MonoObject * this_obj)) +DO_API(MonoObject*, mono_runtime_invoke, (MonoMethod * method, void *obj, void **params, MonoException **exc)) +DO_API(void, mono_field_set_value, (MonoObject * obj, MonoClassField * field, void *value)) +DO_API(void, mono_field_get_value, (MonoObject * obj, MonoClassField * field, void *value)) +DO_API(int, mono_field_get_offset, (MonoClassField * field)) +DO_API(MonoClassField*, mono_class_get_fields, (MonoClass * klass, gpointer * iter)) +DO_API(MonoClass*, mono_class_get_nested_types, (MonoClass * klass, gpointer * iter)) +DO_API(MonoMethod*, mono_class_get_methods, (MonoClass * klass, gpointer * iter)) +DO_API(int, mono_class_get_userdata_offset, ()) +DO_API(void*, mono_class_get_userdata, (MonoClass * klass)) +DO_API(void, mono_class_set_userdata, (MonoClass * klass, void* userdata)) +DO_API(MonoDomain*, mono_domain_get, ()) +DO_API(MonoDomain*, mono_get_root_domain, ()) +DO_API(gint32, mono_domain_get_id, (MonoDomain * domain)) +DO_API(void, mono_assembly_foreach, (GFunc func, gpointer user_data)) +DO_API(void, mono_image_close, (MonoImage * image)) +DO_API(const char*, mono_image_get_name, (MonoImage * image)) +DO_API(MonoClass*, mono_get_object_class, ()) +#if PLATFORM_WIN || PLATFORM_OSX || PLATFORM_ANDROID || PLATFORM_LINUX +DO_API(void, mono_set_signal_chaining, (gboolean)) +#endif + +DO_API(void, mono_unity_runtime_set_main_args, (int, const char* argv[])) +DO_API(void, mono_dllmap_insert, (MonoImage * assembly, const char *dll, const char *func, const char *tdll, const char *tfunc)) + +#if USE_MONO_AOT +DO_API(void*, mono_aot_get_method, (MonoDomain * domain, MonoMethod * method)) +#endif + +DO_API(void, mono_gc_wbarrier_set_field, (MonoObject * obj, gpointer field_ptr, MonoObject * value)) + +// Type-safe way of looking up methods based on method signatures +DO_API(MonoObject*, mono_runtime_invoke_array, (MonoMethod * method, void *obj, MonoArray * params, MonoException **exc)) +DO_API(char*, mono_array_addr_with_size, (MonoArray * array, int size, uintptr_t idx)); +#define mono_array_addr(array, type, index) ((type*)(void*) mono_array_addr_with_size (array, sizeof (type), index)) + +#if UNITY_EDITOR +DO_API(MonoMethodDesc*, mono_method_desc_new, (const char *name, gboolean include_namespace)) +DO_API(MonoMethod*, mono_method_desc_search_in_class, (MonoMethodDesc * desc, MonoClass * klass)) +DO_API(void, mono_method_desc_free, (MonoMethodDesc * desc)) +DO_API(gboolean, mono_type_generic_inst_is_valuetype, (MonoType*)) +#endif +DO_API(char*, mono_type_get_name_full, (MonoType * type, MonoTypeNameFormat format)) + +#if PLATFORM_WIN +DO_API(gunichar2*, mono_string_to_utf16, (MonoString * string_obj)) +#endif + +DO_API(const char*, mono_field_get_name, (MonoClassField * field)) +DO_API(MonoClass*, mono_field_get_parent, (MonoClassField * field)) +DO_API(MonoType*, mono_field_get_type, (MonoClassField * field)) +DO_API(gboolean, mono_type_is_byref, (MonoType * type)) +DO_API(guint32, mono_type_get_attrs, (MonoType * type)) +DO_API(int, mono_type_get_type, (MonoType * type)) +DO_API(const char*, mono_method_get_name, (MonoMethod * method)) +DO_API(char*, mono_method_full_name, (MonoMethod * method, gboolean signature)) +DO_API(MonoImage*, mono_assembly_get_image, (MonoAssembly * assembly)) +DO_API(MonoClass*, mono_method_get_class, (MonoMethod * method)) +DO_API(MonoClass*, mono_object_get_class, (MonoObject * obj)) +DO_API(MonoClass*, mono_class_get, (MonoImage * image, guint32 type_token)) +DO_API(MonoObject*, mono_object_isinst, (MonoObject * obj, MonoClass * klass)) +DO_API(gboolean, mono_class_is_valuetype, (MonoClass * klass)) +DO_API(gboolean, mono_class_is_blittable, (MonoClass * klass)) +DO_API(guint32, mono_signature_get_param_count, (MonoMethodSignature * sig)) +DO_API(char*, mono_string_to_utf8, (MonoString * string_obj)) +DO_API(MonoString*, mono_unity_string_empty_wrapper, ()) +DO_API(MonoString*, mono_string_new_wrapper, (const char* text)) +DO_API(MonoString*, mono_string_new_len, (MonoDomain * domain, const char *text, guint32 length)) +DO_API(MonoString*, mono_string_new_utf16, (MonoDomain * domain, const guint16 * text, gint32 length)) +DO_API(MonoString*, mono_string_from_utf16, (const gunichar2 * text)) +DO_API(MonoClass*, mono_class_get_parent, (MonoClass * klass)) +DO_API(const char*, mono_class_get_namespace, (MonoClass * klass)) +DO_API(gboolean, mono_class_is_subclass_of, (MonoClass * klass, MonoClass * klassc, gboolean check_interfaces)) +DO_API(const char*, mono_class_get_name, (MonoClass * klass)) +DO_API(char*, mono_type_get_name, (MonoType * type)) +DO_API(MonoClass*, mono_type_get_class, (MonoType * type)) +DO_API(gboolean, mono_metadata_type_equal, (MonoType * t1, MonoType * t2)) +DO_API(void, mono_metadata_decode_row, (const MonoTableInfo * t, int idx, guint32 * res, int res_size)) +DO_API(MonoException *, mono_exception_from_name_msg, (MonoImage * image, const char *name_space, const char *name, const char *msg)) +DO_API(MonoException *, mono_exception_from_name_two_strings, (MonoImage * image, const char *name_space, const char *name, const char *msg1, const char *msg2)) +DO_API(MonoException *, mono_get_exception_argument_null, (const char *arg)) +DO_API_NO_RETURN(void, mono_raise_exception, (MonoException * ex)) +DO_API(MonoClass*, mono_get_exception_class, ()) +DO_API(MonoClass*, mono_get_array_class, ()) +DO_API(MonoClass*, mono_get_string_class, ()) +DO_API(MonoClass*, mono_get_boolean_class, ()) +DO_API(MonoClass*, mono_get_byte_class, ()) +DO_API(MonoClass*, mono_get_char_class, ()) +DO_API(MonoClass*, mono_get_int16_class, ()) +DO_API(MonoClass*, mono_get_int32_class, ()) +DO_API(MonoClass*, mono_get_int64_class, ()) +DO_API(MonoClass*, mono_get_single_class, ()) +DO_API(MonoClass*, mono_get_double_class, ()) +DO_API(MonoArray*, mono_array_new, (MonoDomain * domain, MonoClass * eclass, guint32 n)) +DO_API(MonoArray*, mono_unity_array_new_2d, (MonoDomain * domain, MonoClass * eclass, size_t size0, size_t size1)) +DO_API(MonoArray*, mono_unity_array_new_3d, (MonoDomain * domain, MonoClass * eclass, size_t size0, size_t size1, size_t size2)) + +DO_API(MonoClass *, mono_array_class_get, (MonoClass * eclass, guint32 rank)) + +DO_API(gint32, mono_class_array_element_size, (MonoClass * ac)) +DO_API(MonoObject*, mono_type_get_object, (MonoDomain * domain, MonoType * type)) +DO_API(gboolean, mono_class_is_generic, (MonoClass * klass)) +DO_API(gboolean, mono_class_is_inflated, (MonoClass * klass)) + +DO_API(gboolean, unity_mono_method_is_generic, (MonoMethod * method)) +DO_API(gboolean, unity_mono_method_is_inflated, (MonoMethod * method)) + +DO_API(MonoThread *, mono_thread_attach, (MonoDomain * domain)) + +DO_API(void, mono_thread_detach, (MonoThread * thread)) +DO_API(gboolean, mono_thread_has_sufficient_execution_stack, (void)) + +#if USE_MONO_DOMAINS +DO_API(void, mono_unity_thread_fast_attach, (MonoDomain * domain)) +DO_API(void, mono_unity_thread_fast_detach, ()) +#endif + +DO_API(MonoThread *, mono_thread_exit, ()) + +DO_API(MonoThread *, mono_thread_current, (void)) +DO_API(void, mono_thread_set_main, (MonoThread * thread)) +DO_API(void, mono_set_find_plugin_callback, (gconstpointer method)) + +DO_API(void, mono_runtime_unhandled_exception_policy_set, (MonoRuntimeUnhandledExceptionPolicy policy)) + +DO_API(MonoClass*, mono_class_get_nesting_type, (MonoClass * klass)) +DO_API(MonoVTable*, mono_class_vtable, (MonoDomain * domain, MonoClass * klass)) +DO_API(MonoReflectionMethod*, mono_method_get_object, (MonoDomain * domain, MonoMethod * method, MonoClass * refclass)) +DO_API(MonoReflectionField*, mono_field_get_object, (MonoDomain * domain, MonoClass * klass, MonoClassField * field)) +DO_API(MonoClassField* , mono_field_from_token, (MonoImage * image, uint32_t token, MonoClass** retklass, MonoGenericContext * context)) +DO_API(MonoClassField*, mono_unity_field_from_token_checked, (MonoImage * image, guint32 token, MonoClass** retklass, MonoGenericContext * context, MonoError * error)) + +DO_API(MonoMethodSignature*, mono_method_signature, (MonoMethod * method)) +DO_API(MonoMethodSignature*, mono_method_signature_checked_slow, (MonoMethod * method, MonoError * error)) +DO_API(MonoType*, mono_signature_get_params, (MonoMethodSignature * sig, gpointer * iter)) +DO_API(MonoType*, mono_signature_get_return_type, (MonoMethodSignature * sig)) +DO_API(MonoType*, mono_class_get_type, (MonoClass * klass)) + +DO_API(void, mono_debug_init, (int format)) + +DO_API(gboolean, mono_is_debugger_attached, (void)) + +DO_API(void, mono_debug_open_image_from_memory, (MonoImage * image, const char *raw_contents, int size)) +DO_API(guint32, mono_field_get_flags, (MonoClassField * field)) +DO_API(MonoImage*, mono_image_open_from_data_full, (const void *data, guint32 data_len, gboolean need_copy, int *status, gboolean ref_only)) +DO_API(const char*, mono_image_strerror, (int status)) +DO_API(MonoImage*, mono_image_open_from_data_with_name, (char *data, guint32 data_len, gboolean need_copy, int *status, gboolean refonly, const char *name)) +DO_API(MonoAssembly *, mono_assembly_load_from, (MonoImage * image, const char*fname, int *status)) +DO_API(gboolean, mono_assembly_fill_assembly_name, (MonoImage * image, MonoAssemblyName * aname)) +DO_API(char*, mono_stringify_assembly_name, (MonoAssemblyName * aname)) +DO_API(int, mono_assembly_name_parse, (const char* name, MonoAssemblyName * assembly)) +DO_API(void, mono_assembly_name_free, (MonoAssemblyName * assembly)) +DO_API(MonoAssembly*, mono_assembly_loaded, (MonoAssemblyName * aname)) +DO_API(const MonoTableInfo*, mono_image_get_table_info, (MonoImage * image, int table_id)) +DO_API(int, mono_image_get_table_rows, (MonoImage * image, int table_id)) +DO_API(MonoClass*, mono_unity_class_get, (MonoImage * image, guint32 type_token)) +DO_API(gboolean, mono_metadata_signature_equal, (MonoMethodSignature * sig1, MonoMethodSignature * sig2)) + +DO_API(MonoObject *, mono_value_box, (MonoDomain * domain, MonoClass * klass, gpointer val)) +DO_API(MonoImage*, mono_class_get_image, (MonoClass * klass)) +DO_API(char, mono_signature_is_instance, (MonoMethodSignature * signature)) +DO_API(MonoMethod*, mono_method_get_last_managed, ()) +DO_API(MonoClass*, mono_get_enum_class, ()) +DO_API(MonoType*, mono_class_get_byref_type, (MonoClass * klass)) + +DO_API(void, mono_field_static_get_value, (MonoVTable * vt, MonoClassField * field, void *value)) +DO_API(void, mono_unity_set_embeddinghostname, (const char* name)) +DO_API(void, mono_set_assemblies_path_null_separated, (const char* name)) + +DO_API(void, mono_unity_gc_set_mode, (MonoGCMode mode)); + +DO_API_OPTIONAL(gint64, mono_gc_get_max_time_slice_ns, ()); +DO_API_OPTIONAL(void, mono_gc_set_max_time_slice_ns, (gint64 maxTimeSlice)); +DO_API_OPTIONAL(gboolean, mono_gc_is_incremental, ()); +DO_API_OPTIONAL(void, mono_gc_set_incremental, (gboolean value)); + +DO_API(guint32, mono_gchandle_new, (MonoObject * obj, gboolean pinned)) +DO_API(guint32, mono_gchandle_new_weakref, (MonoObject * obj, gboolean track_resurrection)) +DO_API(MonoObject*, mono_gchandle_get_target, (guint32 gchandle)) +DO_API(void, mono_gchandle_free, (guint32 gchandle)) +DO_API(gboolean, mono_gchandle_is_in_domain, (guint32 gchandle, MonoDomain * domain)) + +DO_API(uintptr_t, mono_gchandle_new_v2, (MonoObject * obj, gboolean pinned)) +DO_API(uintptr_t, mono_gchandle_new_weakref_v2, (MonoObject * obj, gboolean track_resurrection)) +DO_API(MonoObject*, mono_gchandle_get_target_v2, (uintptr_t gchandle)) +DO_API(void, mono_gchandle_free_v2, (uintptr_t gchandle)) +DO_API(gboolean, mono_gchandle_is_in_domain_v2, (uintptr_t gchandle, MonoDomain * domain)) + +DO_API(MonoObject*, mono_assembly_get_object, (MonoDomain * domain, MonoAssembly * assembly)) + +typedef UNUSED_SYMBOL gboolean(*MonoStackWalk) (MonoMethod *method, gint32 native_offset, gint32 il_offset, gboolean managed, gpointer data); +DO_API(void, mono_stack_walk, (MonoStackWalk func, gpointer user_data)); +DO_API(void, mono_stack_walk_no_il, (MonoStackWalk start, void* user_data)); + +DO_API(char*, mono_pmip, (void *ip)); +DO_API(MonoObject*, mono_runtime_delegate_invoke, (MonoObject * delegate, void** params, MonoException** exc)) + +DO_API(MonoJitInfo*, mono_jit_info_table_find, (MonoDomain * domain, void* ip)) + +DO_API(int, mono_unity_managed_callstack, (unsigned char* buffer, int bufferSize, const MonoUnityCallstackOptions * opts)); + +DO_API_OPTIONAL(MonoDebugSourceLocation*, mono_debug_lookup_source_location_by_il, (MonoMethod * method, guint32 il_offset, MonoDomain * domain)) +DO_API(MonoDebugSourceLocation*, mono_debug_lookup_source_location, (MonoMethod * method, guint32 address, MonoDomain * domain)) +DO_API(void, mono_debug_free_source_location, (MonoDebugSourceLocation * location)) +DO_API_OPTIONAL(MonoDebugMethodJitInfo*, mono_debug_find_method, (MonoMethod * method, MonoDomain * domain)) +DO_API_OPTIONAL(void, mono_debug_free_method_jit_info, (MonoDebugMethodJitInfo * jit)) + +// We need to hook into the Boehm GC internals to perform validation of write barriers +#if ENABLE_SCRIPTING_GC_WBARRIERS && UNITY_DEVELOPER_BUILD +DO_API_OPTIONAL(void, GC_dirty_inner, (void **ptr)) +DO_API_OPTIONAL(void*, GC_malloc, (size_t size)) +DO_API_OPTIONAL(void*, GC_malloc_uncollectable, (size_t size)) +DO_API_OPTIONAL(void*, GC_malloc_kind, (size_t size, int k)) +DO_API_OPTIONAL(void*, GC_malloc_atomic, (size_t size)) +DO_API_OPTIONAL(void*, GC_gcj_malloc, (size_t size, void *)) +DO_API_OPTIONAL(void*, GC_free, (void*)) +#endif + +DO_API(MonoProperty*, mono_class_get_properties, (MonoClass * klass, gpointer * iter)) +DO_API(MonoMethod*, mono_property_get_get_method, (MonoProperty * prop)) +DO_API(MonoObject *, mono_object_new_alloc_specific, (MonoVTable * vtable)) +DO_API(MonoObject *, mono_object_new_specific, (MonoVTable * vtable)) +//DO_API(MonoDomain*, mono_object_get_domain, (MonoObject *obj)) + +DO_API(void, mono_gc_collect, (int generation)) +DO_API_OPTIONAL(int, mono_gc_collect_a_little, ()) +DO_API_OPTIONAL(void, mono_gc_start_incremental_collection, ()) +DO_API(int, mono_gc_max_generation, ()) + +DO_API(gint64, mono_gc_get_used_size, ()) +DO_API(gint64, mono_gc_get_heap_size, ()) + +DO_API(void, mono_gc_wbarrier_generic_store, (gpointer ptr, MonoObject * value)) + +DO_API(MonoAssembly*, mono_image_get_assembly, (MonoImage * image)) +DO_API(MonoAssembly*, mono_assembly_open, (const char *filename, int *status)) + +DO_API(gboolean, mono_class_is_enum, (MonoClass * klass)) +DO_API(MonoType*, mono_class_enum_basetype, (MonoClass * klass)) +DO_API(gint32, mono_class_instance_size, (MonoClass * klass)) +DO_API(guint32, mono_object_get_size, (MonoObject * obj)) +DO_API(guint32, mono_class_get_type_token, (MonoClass * klass)) +DO_API(const char*, mono_image_get_filename, (MonoImage * image)) +DO_API(MonoAssembly*, mono_assembly_load_from_full, (MonoImage * image, const char *fname, int *status, gboolean refonly)) +DO_API(MonoClass*, mono_class_get_interfaces, (MonoClass * klass, gpointer * iter)) +DO_API(void, mono_assembly_close, (MonoAssembly * assembly)) +DO_API(MonoProperty*, mono_class_get_property_from_name, (MonoClass * klass, const char *name)) +DO_API(MonoMethod*, mono_class_get_method_from_name, (MonoClass * klass, const char *name, int param_count)) +DO_API(MonoClass*, mono_class_from_mono_type, (MonoType * image)) +DO_API(int, mono_class_get_rank, (MonoClass * klass)); +DO_API(MonoClass*, mono_class_get_element_class, (MonoClass * klass)); +DO_API(gboolean, mono_unity_class_is_interface, (MonoClass * klass)) +DO_API(gboolean, mono_unity_class_is_abstract, (MonoClass * klass)) +DO_API(MonoClass*, mono_unity_class_get_generic_type_definition, (MonoClass * klass)) +DO_API(MonoMethod*, mono_get_method, (MonoImage * image, guint32 token, MonoClass * klass)) + +DO_API(int, mono_array_element_size, (MonoClass * classOfArray)) + +DO_API(gboolean, mono_domain_set, (MonoDomain * domain, gboolean force)) +DO_API(void, mono_unity_domain_set_config, (MonoDomain * domain, const char *base_dir, const char *config_file_name)) +DO_API(void, mono_thread_push_appdomain_ref, (MonoDomain * domain)) +DO_API(void, mono_thread_pop_appdomain_ref, ()) + +DO_API(int, mono_runtime_exec_main, (MonoMethod * method, MonoArray * args, MonoObject **exc)) + +DO_API(MonoImage*, mono_get_corlib, ()) +DO_API(MonoImage*, mono_image_loaded, (const char *name)) +DO_API(MonoClassField*, mono_class_get_field_from_name, (MonoClass * klass, const char *name)) +DO_API(guint32, mono_class_get_flags, (MonoClass * klass)) + +DO_API(int, mono_parse_default_optimizations, (const char* p)) +DO_API(void, mono_set_defaults, (int verbose_level, guint32 opts)) +DO_API(void, mono_config_parse, (const char *filename)) +DO_API(void, mono_set_dirs, (const char *assembly_dir, const char *config_dir)) + +#if UNITY_EDITOR +DO_API(void, mono_set_break_policy, (MonoBreakPolicyFunc policy_callback)) +#endif + +DO_API(void, mono_set_ignore_version_and_key_when_finding_assemblies_already_loaded, (gboolean value)) +DO_API(void, mono_verifier_set_mode, (MiniVerifierMode mode)) +DO_API(void, mono_jit_parse_options, (int argc, char * argv[])) +DO_API(gpointer, mono_object_unbox, (MonoObject * o)) + +DO_API(MonoObject*, mono_custom_attrs_get_attr, (MonoCustomAttrInfo * ainfo, MonoClass * attr_klass)) + +DO_API(MonoArray*, mono_custom_attrs_construct, (MonoCustomAttrInfo * cinfo)) +DO_API(MonoArray*, mono_unity_custom_attrs_construct, (MonoCustomAttrInfo * cinfo, MonoError * error)) + +DO_API(gboolean, mono_custom_attrs_has_attr, (MonoCustomAttrInfo * ainfo, MonoClass * attr_klass)) +DO_API(MonoCustomAttrInfo*, mono_custom_attrs_from_field, (MonoClass * klass, MonoClassField * field)) +DO_API(MonoCustomAttrInfo*, mono_custom_attrs_from_method, (MonoMethod * method)) +DO_API(MonoCustomAttrInfo*, mono_custom_attrs_from_property, (MonoClass * klass, MonoProperty * property)) +DO_API(MonoCustomAttrInfo*, mono_custom_attrs_from_class, (MonoClass * klass)) +DO_API(MonoCustomAttrInfo*, mono_custom_attrs_from_assembly, (MonoAssembly * assembly)) +DO_API(MonoArray*, mono_reflection_get_custom_attrs_by_type, (MonoObject * object, MonoClass * klass)) +DO_API(void, mono_custom_attrs_free, (MonoCustomAttrInfo * attr)) + +DO_API(void, mono_unity_set_data_dir, (const char * dir)); +DO_API(MonoClass*, mono_custom_attrs_get_attrs, (MonoCustomAttrInfo * ainfo, void** iterator)) + +DO_API(MonoException*, mono_unity_loader_get_last_error_and_error_prepare_exception, (void)) + +#if PLATFORM_STANDALONE || UNITY_EDITOR +// DllImport fallback handling to load native libraries from custom locations +typedef UNUSED_SYMBOL void* (*MonoDlFallbackLoad) (const char *name, int flags, char **err, void *user_data); +typedef UNUSED_SYMBOL void* (*MonoDlFallbackSymbol) (void *handle, const char *name, char **err, void *user_data); +typedef UNUSED_SYMBOL void* (*MonoDlFallbackClose) (void *handle, void *user_data); + +DO_API(MonoDlFallbackHandler*, mono_dl_fallback_register, (MonoDlFallbackLoad load_func, MonoDlFallbackSymbol symbol_func, MonoDlFallbackClose close_func, void *user_data)) +DO_API(void, mono_dl_fallback_unregister, (MonoDlFallbackHandler * handler)) + +#endif + +typedef UNUSED_SYMBOL void(*vprintf_func)(const char* msg, va_list args); +DO_API(void, mono_unity_set_vprintf_func, (vprintf_func func)) + +DO_API(void*, mono_unity_liveness_allocate_struct, (MonoClass * filter, int max_object_count, mono_register_object_callback callback, void* userdata, mono_liveness_reallocate_callback reallocate)) +DO_API(void, mono_unity_liveness_finalize, (void* state)) +DO_API(void, mono_unity_liveness_free_struct, (void* state)) +DO_API(void, mono_unity_liveness_calculation_from_root, (MonoObject * root, void* state)) +DO_API(void, mono_unity_liveness_calculation_from_statics, (void* state)) + +DO_API(MonoMethod*, unity_mono_reflection_method_get_method, (MonoReflectionMethod * mrf)) + +// Profiler +#if ENABLE_MONO +typedef UNUSED_SYMBOL void(*MonoProfileFunc) (void *prof); +typedef UNUSED_SYMBOL void(*MonoProfileGCFunc) (void *prof, int event, int generation); +typedef UNUSED_SYMBOL void(*MonoProfileGCResizeFunc) (void *prof, SInt64 new_size); +typedef UNUSED_SYMBOL gboolean(*MonoProfilerCoverageFilterCallback) (void *prof, MonoMethod *method); +typedef UNUSED_SYMBOL void(*MonoProfilerCoverageCallback) (void *prof, const MonoProfilerCoverageData *data); +DO_API(void, mono_profiler_install, (void *prof, MonoProfileFunc shutdown_callback)) +DO_API(void, mono_profiler_install_gc, (MonoProfileGCFunc callback, MonoProfileGCResizeFunc heap_resize_callback)) +DO_API(void, mono_profiler_set_events, (int events)) + +DO_API_OPTIONAL(gboolean, mono_profiler_enable_coverage, ()) +DO_API_OPTIONAL(void, mono_profiler_set_coverage_filter_callback, (void* handle, MonoProfilerCoverageFilterCallback cb)) +DO_API_OPTIONAL(gboolean, mono_profiler_get_coverage_data, (void* handle, MonoMethod * method, MonoProfilerCoverageCallback cb)) +DO_API_OPTIONAL(void, mono_profiler_reset_coverage, (MonoMethod * method)) +DO_API_OPTIONAL(gboolean, mono_profiler_get_all_coverage_data, (void* handle, MonoProfilerCoverageCallback cb)) +DO_API_OPTIONAL(void, mono_profiler_reset_all_coverage, ()) + +#if LOAD_MONO_DYNAMICALLY +DO_API_OPTIONAL(void*, mono_profiler_create, (MonoProfiler * prof)) +DO_API_OPTIONAL(void, mono_profiler_load, (const char *desc)) +DO_API_OPTIONAL(void, mono_set_crash_chaining, (gboolean)) +#endif +#endif + +#if ENABLE_MONO_MEMORY_PROFILER +typedef UNUSED_SYMBOL void(*MonoProfileMethodFunc) (void *prof, MonoMethod *method); +typedef UNUSED_SYMBOL void(*MonoProfileObjectFunc) (void *prof, MonoObject *object); +typedef UNUSED_SYMBOL void(*MonoProfileExceptionClauseFunc) (void *prof, MonoMethod *method, int clause_type, int clause_num); +typedef UNUSED_SYMBOL void(*MonoProfileAllocFunc) (void *prof, MonoObject* obj, MonoClass* klass); +typedef UNUSED_SYMBOL void(*MonoProfileStatCallChainFunc) (void *prof, int call_chain_depth, guchar **ip, void *context); +typedef UNUSED_SYMBOL void(*MonoProfileStatFunc) (void *prof, guchar *ip, void *context); +typedef UNUSED_SYMBOL void(*MonoProfileJitResult) (void *prof, MonoMethod *method, void* jinfo, int result); +typedef UNUSED_SYMBOL void(*MonoProfileThreadFunc) (void *prof, unsigned long tid); +typedef UNUSED_SYMBOL void(*MonoProfileThreadNameFunc) (void *prof, uintptr_t tid, const char *name); +typedef UNUSED_SYMBOL void(*MonoProfileJitDoneFunc) (void *prof, MonoMethod *method, MonoJitInfo *jinfo); +typedef UNUSED_SYMBOL void(*MonoProfileJitCodeBufferFunc) (void *prof, void *buffer, uint64_t size, MonoProfilerCodeBufferType type, const void *data); +typedef UNUSED_SYMBOL void(*MonoProfileMethodEnterLeaveFunc) (void *prof, MonoMethod *method, void *context); +typedef UNUSED_SYMBOL void(*MonoProfileMethodTailCall) (void *prof, MonoMethod *method, MonoMethod *target); +typedef UNUSED_SYMBOL void(*MonoProfileMethodExceptionLeave) (void *prof, MonoMethod *method, MonoObject *exception); +typedef UNUSED_SYMBOL int(*MonoProfilerCallInstrumentationFilterCallback) (void *prof, MonoMethod *method); +typedef UNUSED_SYMBOL void(*MonoProfileDomainFunc) (void *prof, MonoDomain *domain); + +DO_API(void, mono_profiler_install_enter_leave, (MonoProfileMethodFunc enter, MonoProfileMethodFunc leave)) +DO_API(void, mono_profiler_install_allocation, (MonoProfileAllocFunc callback)) +DO_API(void, mono_profiler_install_jit_end, (MonoProfileJitResult jit_end)) +DO_API(void, mono_profiler_install_thread, (MonoProfileThreadFunc start, MonoProfileThreadFunc end)) + +#if LOAD_MONO_DYNAMICALLY +DO_API_OPTIONAL(void, mono_profiler_set_thread_name_callback, (void *handle, MonoProfileThreadNameFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_gc_allocation_callback, (void *handle, MonoProfileObjectFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_gc_finalizing_callback, (void *handle, MonoProfileFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_gc_finalized_callback, (void *handle, MonoProfileFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_gc_finalizing_object_callback, (void *handle, MonoProfileObjectFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_gc_finalized_object_callback, (void *handle, MonoProfileObjectFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_jit_begin_callback, (void *handle, MonoProfileMethodFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_jit_failed_callback, (void *handle, MonoProfileMethodFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_jit_done_callback, (void *handle, MonoProfileJitDoneFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_jit_code_buffer_callback, (void *handle, MonoProfileJitCodeBufferFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_method_enter_callback, (void *handle, MonoProfileMethodEnterLeaveFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_method_leave_callback, (void *handle, MonoProfileMethodEnterLeaveFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_method_tail_call_callback, (void *handle, MonoProfileMethodTailCall callback)) +DO_API_OPTIONAL(void, mono_profiler_set_method_exception_leave_callback, (void *handle, MonoProfileMethodExceptionLeave callback)) +DO_API_OPTIONAL(void, mono_profiler_set_call_instrumentation_filter_callback, (void *handle, MonoProfilerCallInstrumentationFilterCallback callback)) +DO_API_OPTIONAL(void, mono_profiler_set_domain_unloading_callback, (void *handle, MonoProfileDomainFunc callback)) +DO_API_OPTIONAL(void, mono_profiler_set_domain_unloaded_callback, (void *handle, MonoProfileDomainFunc callback)) +#endif +#endif + +typedef void(*MonoDataFunc) (void *data, void *userData); +typedef void(*MonoClassFunc) (MonoClass *klass, void *userData); + +DO_API(void, mono_unity_image_set_mempool_chunk_foreach, (MonoDataFunc callback, void* userdata)) +DO_API(void, mono_unity_root_domain_mempool_chunk_foreach, (MonoDataFunc callback, void* userdata)) +DO_API(void, mono_unity_domain_mempool_chunk_foreach, (MonoDomain * domain, MonoDataFunc callback, void* userData)) +DO_API(void, mono_unity_assembly_mempool_chunk_foreach, (MonoAssembly * assembly, MonoDataFunc callback, void* userData)) +DO_API(void, mono_unity_gc_heap_foreach, (MonoDataFunc callback, void* userData)) +DO_API(void, mono_unity_gc_handles_foreach_get_target, (MonoDataFunc callback, void* userData)) +DO_API(uint32_t, mono_unity_object_header_size, ()) +DO_API(uint32_t, mono_unity_array_object_header_size, ()) +DO_API(uint32_t, mono_unity_offset_of_array_length_in_array_object_header, ()) +DO_API(uint32_t, mono_unity_offset_of_array_bounds_in_array_object_header, ()) +DO_API(uint32_t, mono_unity_allocation_granularity, ()) +DO_API(uint32_t, mono_unity_class_get_data_size, (MonoClass * klass)) +DO_API(void, mono_unity_type_get_name_full_chunked, (MonoType * type, MonoDataFunc appendCallback, void* userData)) +DO_API(MonoVTable*, mono_unity_class_try_get_vtable, (MonoDomain * domain, MonoClass * klass)) +DO_API(gboolean, mono_unity_type_is_pointer_type, (MonoType * type)) +DO_API(gboolean, mono_unity_type_is_static, (MonoType * type)) +DO_API(gboolean, mono_unity_class_field_is_literal, (MonoClassField * field)) +DO_API(void*, mono_unity_vtable_get_static_field_data, (MonoVTable * vTable)) +DO_API(void, mono_unity_class_for_each, (MonoClassFunc callback, void* userData)) +DO_API(void, mono_unity_stop_gc_world, ()) +DO_API(void, mono_unity_start_gc_world, ()) + +DO_API(MonoManagedMemorySnapshot*, mono_unity_capture_memory_snapshot, ()); +DO_API(void, mono_unity_free_captured_memory_snapshot, (MonoManagedMemorySnapshot * snapshot)); + +// GLib functions +#define g_free mono_unity_g_free +DO_API(void, mono_unity_g_free, (void* p)) + +typedef UNUSED_SYMBOL void (*MonoLogCallback) (const char *log_domain, const char *log_level, const char *message, bool fatal, void *user_data); +DO_API(void, mono_trace_set_log_handler, (MonoLogCallback callback, void *user_data)) +DO_API(void, mono_trace_set_level_string, (const char *value)) +DO_API(void, mono_trace_set_mask_string, (const char *value)) + +#if PLATFORM_OSX +DO_API(int, mono_unity_backtrace_from_context, (void* context, void* array[], int count)) +#endif + +#if UNITY_ANDROID +DO_API(void, mono_file_map_override, (MonoFileMapOpen open_func, MonoFileMapSize size_func, MonoFileMapFd fd_func, MonoFileMapClose close_func, MonoFileMapMap map_func, MonoFileMapUnmap unmap_func)) +DO_API(void, mono_register_machine_config, (const char *config_xml)) + +DO_API(void, mono_sigctx_to_monoctx, (void *sigctx, MonoContext * mctx)) +DO_API(void, mono_walk_stack_with_ctx, (MonoJitStackWalk func, MonoContext * start_ctx, MonoUnwindOptions options, void *user_data)) +DO_API(char *, mono_debug_print_stack_frame, (MonoMethod * method, guint32 native_offset, MonoDomain * domain)) +#endif + +#if ENABLE_MONO_MEMORY_CALLBACKS +DO_API(void, mono_unity_install_memory_callbacks, (MonoMemoryCallbacks * callbacks)) +#endif + +#if UNITY_EDITOR +typedef UNUSED_SYMBOL size_t(*RemapPathFunction)(const char* path, char* buffer, size_t buffer_len); +DO_API(void, mono_unity_register_path_remapper, (RemapPathFunction func)) +DO_API_OPTIONAL(void, mono_unity_set_enable_handler_block_guards, (gboolean allow)) +#endif + +DO_API_OPTIONAL(void, mono_unity_install_unitytls_interface, (void* callbacks)) + +#if ENABLE_OUT_OF_PROCESS_CRASH_HANDLER && UNITY_64 && PLATFORM_WIN && ENABLE_MONO && !PLATFORM_XBOXONE +DO_API_OPTIONAL(void*, mono_unity_lock_dynamic_function_access_tables64, (unsigned int)) +DO_API_OPTIONAL(void, mono_unity_unlock_dynamic_function_access_tables64, (void)) +#endif + +#if LOAD_MONO_DYNAMICALLY +DO_API_OPTIONAL(void, mono_error_init, (MonoError * error)) +DO_API_OPTIONAL(void, mono_error_cleanup, (MonoError * error)) +DO_API_OPTIONAL(gint32, mono_error_ok, (MonoError * error)) +DO_API_OPTIONAL(unsigned short, mono_error_get_error_code, (MonoError * error)) +DO_API_OPTIONAL(const char*, mono_error_get_message, (MonoError * error)) +#endif + +#if UNITY_EDITOR +DO_API_OPTIONAL(void, mono_debugger_set_generate_debug_info, (gboolean enable)) +DO_API_OPTIONAL(gboolean, mono_debugger_get_generate_debug_info, ()) +DO_API_OPTIONAL(void, mono_debugger_disconnect, ()) +typedef void (*MonoDebuggerAttachFunc)(gboolean attached); +DO_API_OPTIONAL(void, mono_debugger_install_attach_detach_callback, (MonoDebuggerAttachFunc func)) +typedef UNUSED_SYMBOL void (*UnityLogErrorCallback) (const char* message); +DO_API(void, mono_unity_set_editor_logging_callback, (UnityLogErrorCallback callback)) +#endif + +#if ENABLE_CORECLR +DO_API(int, coreclr_array_length, (MonoArray * array)) +DO_API(void, mono_gc_mark_stack_slot, (void* objRef)) +DO_API(void, mono_gc_unmark_stack_slot, (void* objRef)) +DO_API(MonoObject*, mono_runtime_invoke_with_nested_object, (MonoMethod * method, void *obj, void *parentobj, void **params, MonoException **exc)); +DO_API(int, mono_type_get_num_generic_args, (MonoType * type)) +DO_API(MonoType*, mono_type_get_generic_arg, (MonoType * type, int index)) +DO_API(MonoType*, mono_field_get_type_specific, (MonoClassField * field, MonoClass * owner)) +DO_API(void, mono_enter_internal_call, (MonoInternalCallFrameOpaque * frame)) +DO_API(void, mono_exit_internal_call, (MonoInternalCallFrameOpaque * frame)) +#endif + +#undef DO_API +#undef DO_API_NO_RETURN +#undef DO_API_OPTIONAL diff --git a/unity/unity-sources/Runtime/Mono/MonoTypeSignatures.h b/unity/unity-sources/Runtime/Mono/MonoTypeSignatures.h new file mode 100644 index 00000000000000..d3f490a9fa51a4 --- /dev/null +++ b/unity/unity-sources/Runtime/Mono/MonoTypeSignatures.h @@ -0,0 +1,176 @@ +/* + * blob.h: Definitions used to pull information out of the Blob + * + */ +#ifndef _MONO_METADATA_BLOB_H_ +#define _MONO_METADATA_BLOB_H_ + +#if ENABLE_MONO + +#define SIGNATURE_HAS_THIS 0x20 +#define SIGNATURE_EXPLICIT_THIS 0x40 +#define SIGNATURE_VARARG 0x05 + +/* + * Encoding for type signatures used in the Metadata + */ +typedef enum +{ + MONO_TYPE_END = 0x00, /* End of List */ + MONO_TYPE_VOID = 0x01, + MONO_TYPE_BOOLEAN = 0x02, + MONO_TYPE_CHAR = 0x03, + MONO_TYPE_I1 = 0x04, + MONO_TYPE_U1 = 0x05, + MONO_TYPE_I2 = 0x06, + MONO_TYPE_U2 = 0x07, + MONO_TYPE_I4 = 0x08, + MONO_TYPE_U4 = 0x09, + MONO_TYPE_I8 = 0x0a, + MONO_TYPE_U8 = 0x0b, + MONO_TYPE_R4 = 0x0c, + MONO_TYPE_R8 = 0x0d, + MONO_TYPE_STRING = 0x0e, + MONO_TYPE_PTR = 0x0f, /* arg: token */ + MONO_TYPE_BYREF = 0x10, /* arg: token */ + MONO_TYPE_VALUETYPE = 0x11, /* arg: token */ + MONO_TYPE_CLASS = 0x12, /* arg: token */ + MONO_TYPE_VAR = 0x13, /* number */ + MONO_TYPE_ARRAY = 0x14, /* type, rank, boundsCount, bound1, loCount, lo1 */ + MONO_TYPE_GENERICINST = 0x15, /* \x{2026} */ + MONO_TYPE_TYPEDBYREF = 0x16, + MONO_TYPE_I = 0x18, + MONO_TYPE_U = 0x19, + MONO_TYPE_FNPTR = 0x1b, /* arg: full method signature */ + MONO_TYPE_OBJECT = 0x1c, + MONO_TYPE_SZARRAY = 0x1d, /* 0-based one-dim-array */ + MONO_TYPE_MVAR = 0x1e, /* number */ + MONO_TYPE_CMOD_REQD = 0x1f, /* arg: typedef or typeref token */ + MONO_TYPE_CMOD_OPT = 0x20, /* optional arg: typedef or typref token */ + MONO_TYPE_INTERNAL = 0x21, /* CLR internal type */ + + MONO_TYPE_MODIFIER = 0x40, /* Or with the following types */ + MONO_TYPE_SENTINEL = 0x41, /* Sentinel for varargs method signature */ + MONO_TYPE_PINNED = 0x45 /* Local var that points to pinned object */ +} MonoTypeEnum; + +typedef enum +{ + MONO_PROFILE_NONE = 0, + MONO_PROFILE_APPDOMAIN_EVENTS = 1 << 0, + MONO_PROFILE_ASSEMBLY_EVENTS = 1 << 1, + MONO_PROFILE_MODULE_EVENTS = 1 << 2, + MONO_PROFILE_CLASS_EVENTS = 1 << 3, + MONO_PROFILE_JIT_COMPILATION = 1 << 4, + MONO_PROFILE_INLINING = 1 << 5, + MONO_PROFILE_EXCEPTIONS = 1 << 6, + MONO_PROFILE_ALLOCATIONS = 1 << 7, + MONO_PROFILE_GC = 1 << 8, + MONO_PROFILE_THREADS = 1 << 9, + MONO_PROFILE_REMOTING = 1 << 10, + MONO_PROFILE_TRANSITIONS = 1 << 11, + MONO_PROFILE_ENTER_LEAVE = 1 << 12, + MONO_PROFILE_COVERAGE = 1 << 13, + MONO_PROFILE_INS_COVERAGE = 1 << 14, + MONO_PROFILE_STATISTICAL = 1 << 15 +} MonoProfileFlags; + +/* + * Type Attributes (23.1.15). + */ +enum +{ + MONO_TYPE_ATTR_VISIBILITY_MASK = 0x00000007, + MONO_TYPE_ATTR_NOT_PUBLIC = 0x00000000, + MONO_TYPE_ATTR_PUBLIC = 0x00000001, + MONO_TYPE_ATTR_NESTED_PUBLIC = 0x00000002, + MONO_TYPE_ATTR_NESTED_PRIVATE = 0x00000003, + MONO_TYPE_ATTR_NESTED_FAMILY = 0x00000004, + MONO_TYPE_ATTR_NESTED_ASSEMBLY = 0x00000005, + MONO_TYPE_ATTR_NESTED_FAM_AND_ASSEM = 0x00000006, + MONO_TYPE_ATTR_NESTED_FAM_OR_ASSEM = 0x00000007, + + MONO_TYPE_ATTR_LAYOUT_MASK = 0x00000018, + MONO_TYPE_ATTR_AUTO_LAYOUT = 0x00000000, + MONO_TYPE_ATTR_SEQUENTIAL_LAYOUT = 0x00000008, + MONO_TYPE_ATTR_EXPLICIT_LAYOUT = 0x00000010, + + MONO_TYPE_ATTR_CLASS_SEMANTIC_MASK = 0x00000020, + MONO_TYPE_ATTR_CLASS = 0x00000000, + MONO_TYPE_ATTR_INTERFACE = 0x00000020, + + MONO_TYPE_ATTR_ABSTRACT = 0x00000080, + MONO_TYPE_ATTR_SEALED = 0x00000100, + MONO_TYPE_ATTR_SPECIAL_NAME = 0x00000400, + + MONO_TYPE_ATTR_IMPORT = 0x00001000, + MONO_TYPE_ATTR_SERIALIZABLE = 0x00002000, + + MONO_TYPE_ATTR_STRING_FORMAT_MASK = 0x00030000, + MONO_TYPE_ATTR_ANSI_CLASS = 0x00000000, + MONO_TYPE_ATTR_UNICODE_CLASS = 0x00010000, + MONO_TYPE_ATTR_AUTO_CLASS = 0x00020000, + MONO_TYPE_ATTR_CUSTOM_CLASS = 0x00030000, + MONO_TYPE_ATTR_CUSTOM_MASK = 0x00c00000, + + MONO_TYPE_ATTR_BEFORE_FIELD_INIT = 0x00100000, + MONO_TYPE_ATTR_FORWARDER = 0x00200000, + + MONO_TYPE_ATTR_RESERVED_MASK = 0x00040800, + MONO_TYPE_ATTR_RT_SPECIAL_NAME = 0x00000800, + MONO_TYPE_ATTR_HAS_SECURITY = 0x00040000 +}; + + +/* + * Method Attributes (22.1.9) + */ +enum +{ + METHOD_IMPL_ATTRIBUTE_CODE_TYPE_MASK = 0x0003, + METHOD_IMPL_ATTRIBUTE_IL = 0x0000, + METHOD_IMPL_ATTRIBUTE_NATIVE = 0x0001, + METHOD_IMPL_ATTRIBUTE_OPTIL = 0x0002, + METHOD_IMPL_ATTRIBUTE_RUNTIME = 0x0003, + + METHOD_IMPL_ATTRIBUTE_MANAGED_MASK = 0x0004, + METHOD_IMPL_ATTRIBUTE_UNMANAGED = 0x0004, + METHOD_IMPL_ATTRIBUTE_MANAGED = 0x0000, + + METHOD_IMPL_ATTRIBUTE_FORWARD_REF = 0x0010, + METHOD_IMPL_ATTRIBUTE_PRESERVE_SIG = 0x0080, + METHOD_IMPL_ATTRIBUTE_INTERNAL_CALL = 0x1000, + METHOD_IMPL_ATTRIBUTE_SYNCHRONIZED = 0x0020, + METHOD_IMPL_ATTRIBUTE_NOINLINING = 0x0008, + METHOD_IMPL_ATTRIBUTE_MAX_METHOD_IMPL_VAL = 0xffff, + + METHOD_ATTRIBUTE_MEMBER_ACCESS_MASK = 0x0007, + METHOD_ATTRIBUTE_COMPILER_CONTROLLED = 0x0000, + METHOD_ATTRIBUTE_PRIVATE = 0x0001, + METHOD_ATTRIBUTE_FAM_AND_ASSEM = 0x0002, + METHOD_ATTRIBUTE_ASSEM = 0x0003, + METHOD_ATTRIBUTE_FAMILY = 0x0004, + METHOD_ATTRIBUTE_FAM_OR_ASSEM = 0x0005, + METHOD_ATTRIBUTE_PUBLIC = 0x0006, + + METHOD_ATTRIBUTE_STATIC = 0x0010, + METHOD_ATTRIBUTE_FINAL = 0x0020, + METHOD_ATTRIBUTE_VIRTUAL = 0x0040, + METHOD_ATTRIBUTE_HIDE_BY_SIG = 0x0080, + + METHOD_ATTRIBUTE_VTABLE_LAYOUT_MASK = 0x0100, + METHOD_ATTRIBUTE_REUSE_SLOT = 0x0000, + METHOD_ATTRIBUTE_NEW_SLOT = 0x0100, + + METHOD_ATTRIBUTE_ABSTRACT = 0x0400, + METHOD_ATTRIBUTE_SPECIAL_NAME = 0x0800, + + METHOD_ATTRIBUTE_PINVOKE_IMPL = 0x2000, + METHOD_ATTRIBUTE_UNMANAGED_EXPORT = 0x0008, +}; + +inline bool IsMonoBuiltinType(int type) { return type >= MONO_TYPE_BOOLEAN && type <= MONO_TYPE_R8; } + +#endif + +#endif diff --git a/unity/unity-sources/Runtime/Mono/MonoTypes.h b/unity/unity-sources/Runtime/Mono/MonoTypes.h new file mode 100644 index 00000000000000..fec7d8d710ecff --- /dev/null +++ b/unity/unity-sources/Runtime/Mono/MonoTypes.h @@ -0,0 +1,395 @@ +#pragma once + +//TODO use mono headers directly, so we don't get burned when the struct definitions in this file +//go out of sync with mono's. +//this is not done yet, because it's tricky, as the mono headers define symbols that we also define in UnityFunctions.h, +//so we'd need to find some way to either remove those defines from the mono headers, or somehow mangle them. +#if ENABLE_MONO + +struct MonoException; +struct MonoAssembly; +struct MonoObject; +struct MonoClassField; +struct MonoClass; +struct MonoDomain; +struct MonoImage; +struct MonoType; +struct MonoMethodSignature; +struct MonoArray; +struct MonoThread; +struct MonoVTable; +struct MonoProperty; +struct MonoReflectionAssembly; +struct MonoReflectionMethod; +struct MonoReflectionField; +struct MonoAppDomain; +struct MonoCustomAttrInfo; +struct MonoDl; +struct MonoManagedMemorySnapshot; +struct MonoProfiler; +struct MonoMethod; +struct MonoTableInfo; +struct MonoGenericContext; + +#if UNITY_STANDALONE || UNITY_EDITOR +struct MonoDlFallbackHandler; +#endif + +#if UNITY_EDITOR +struct MonoMethodDesc; +#endif + +typedef const void* gconstpointer; +typedef void* gpointer; +typedef int gboolean; +typedef unsigned char guint8; +typedef UInt16 guint16; +typedef unsigned int guint32; +typedef int gint32; +typedef UInt64 guint64; +typedef SInt64 gint64; +typedef unsigned long gulong; +typedef unsigned char guchar; +typedef UInt16 gunichar2; +struct MonoString +{ + void* monoObjectPart1; +#if !ENABLE_CORECLR + void* monoObjectPart2; +#endif + gint32 length; + gunichar2 firstCharacter; +}; + +struct MonoInternalCallFrameOpaque +{ + // in release builds, this is only 248 bytes - but it does not matter if we make it + // larger, that just means some extra unused bytes on the stack. + char data[256]; // Debug +}; + +struct MonoMethod +{ + UInt16 flags; + UInt16 iflags; +}; + +struct GPtrArray +{ + gpointer *pdata; + guint32 len; +}; + +typedef enum +{ + MONO_VERIFIER_MODE_OFF, + MONO_VERIFIER_PE_ONLY, + MONO_VERIFIER_MODE_VALID, + MONO_VERIFIER_MODE_VERIFIABLE, + MONO_VERIFIER_MODE_STRICT +} MiniVerifierMode; + +typedef enum +{ + MONO_TYPE_NAME_FORMAT_IL, + MONO_TYPE_NAME_FORMAT_REFLECTION, + MONO_TYPE_NAME_FORMAT_FULL_NAME, + MONO_TYPE_NAME_FORMAT_ASSEMBLY_QUALIFIED +} MonoTypeNameFormat; + +typedef enum +{ + MONO_GC_MODE_DISABLED = 0, + MONO_GC_MODE_ENABLED = 1, + MONO_GC_MODE_MANUAL = 2 +} MonoGCMode; + +typedef struct +{ + const char *name; + const char *culture; + const char *hash_value; + const UInt8* public_key; + // string of 16 hex chars + 1 NULL + guchar public_key_token[17]; + guint32 hash_alg; + guint32 hash_len; + guint32 flags; + UInt16 major, minor, build, revision; + // only used and populated by newer Mono + UInt16 arch; + UInt8 without_version; + UInt8 without_culture; + UInt8 without_public_key_token; +} MonoAssemblyName; + +typedef void GFuncRef (void*, void*); +typedef GFuncRef* GFunc; + +typedef enum +{ + MONO_UNHANDLED_POLICY_LEGACY, + MONO_UNHANDLED_POLICY_CURRENT +} MonoRuntimeUnhandledExceptionPolicy; + +#if ENABLE_MONO_MEMORY_CALLBACKS +struct MonoMemoryCallbacks; +#endif + +// mono/metadata/profiler.h +typedef enum +{ + MONO_PROFILER_CALL_INSTRUMENTATION_NONE = 0, + MONO_PROFILER_CALL_INSTRUMENTATION_ENTER = 1 << 1, + MONO_PROFILER_CALL_INSTRUMENTATION_ENTER_CONTEXT = 1 << 2, + MONO_PROFILER_CALL_INSTRUMENTATION_LEAVE = 1 << 3, + MONO_PROFILER_CALL_INSTRUMENTATION_LEAVE_CONTEXT = 1 << 4, + MONO_PROFILER_CALL_INSTRUMENTATION_TAIL_CALL = 1 << 5, + MONO_PROFILER_CALL_INSTRUMENTATION_EXCEPTION_LEAVE = 1 << 6, +} MonoProfilerCallInstrumentationFlags; + +typedef enum +{ + MONO_PROFILER_CODE_BUFFER_METHOD = 0, + MONO_PROFILER_CODE_BUFFER_METHOD_TRAMPOLINE = 1, + MONO_PROFILER_CODE_BUFFER_UNBOX_TRAMPOLINE = 2, + MONO_PROFILER_CODE_BUFFER_IMT_TRAMPOLINE = 3, + MONO_PROFILER_CODE_BUFFER_GENERICS_TRAMPOLINE = 4, + MONO_PROFILER_CODE_BUFFER_SPECIFIC_TRAMPOLINE = 5, + MONO_PROFILER_CODE_BUFFER_HELPER = 6, + MONO_PROFILER_CODE_BUFFER_MONITOR = 7, + MONO_PROFILER_CODE_BUFFER_DELEGATE_INVOKE = 8, + MONO_PROFILER_CODE_BUFFER_EXCEPTION_HANDLING = 9, +} MonoProfilerCodeBufferType; + +struct MonoJitInfo +{ + MonoMethod* method; + void* next_jit_code_hash; + gpointer code_start; + guint32 unwind_info; + int code_size; +}; + +struct MonoDebugLineNumberEntry +{ + uint32_t il_offset; + uint32_t native_offset; +}; +struct MonoDebugMethodJitInfo +{ + gpointer code_start; + uint32_t code_size; + uint32_t prologue_end; + uint32_t epilogue_begin; + gpointer wrapper_addr; + uint32_t num_line_numbers; + MonoDebugLineNumberEntry *line_numbers; +}; + +struct MonoDebugSourceLocation +{ + char* source_file; + UInt32 row; + UInt32 column; + UInt32 il_offset; +}; + +typedef enum +{ + /* the default is to always obey the breakpoint */ + MONO_BREAK_POLICY_ALWAYS, + /* a nop is inserted instead of a breakpoint */ + MONO_BREAK_POLICY_NEVER, + /* the breakpoint is executed only if the program has ben started under + * the debugger (that is if a debugger was attached at the time the method + * was compiled). + */ + MONO_BREAK_POLICY_ON_DBG +} MonoBreakPolicy; + +typedef MonoBreakPolicy (*MonoBreakPolicyFunc) (MonoMethod *method); + +typedef struct +{ + MonoMethod *method; + uint32_t il_offset; + uint32_t counter; + const char *file_name; + uint32_t line; + uint32_t column; +} MonoProfilerCoverageData; + +#if UNITY_ANDROID +struct MonoFileMap; + +typedef MonoFileMap* (*MonoFileMapOpen) (const char* name); +typedef guint64 (*MonoFileMapSize) (MonoFileMap *fmap); +typedef int (*MonoFileMapFd) (MonoFileMap *fmap); +typedef int (*MonoFileMapClose) (MonoFileMap *fmap); +typedef void * (*MonoFileMapMap) (size_t length, int flags, int fd, guint64 offset, void **ret_handle); +typedef int (*MonoFileMapUnmap) (void *addr, void *handle); + +#if PLATFORM_ARCH_32 +typedef gint32 mgreg_t; +#elif PLATFORM_ARCH_64 +typedef gint64 mgreg_t; +#endif + +#if defined(__arm__) +typedef struct +{ + mgreg_t pc; + mgreg_t regs[16]; + double fregs[16]; + mgreg_t cpsr; +} MonoContext; +#elif defined(i386) +typedef struct +{ + mgreg_t eax; + mgreg_t ebx; + mgreg_t ecx; + mgreg_t edx; + mgreg_t ebp; + mgreg_t esp; + mgreg_t esi; + mgreg_t edi; + mgreg_t eip; +#ifdef __APPLE__ + MonoContextSimdReg fregs[X86_XMM_NREG]; +#endif +} MonoContext; +#endif + +/* + * Possible frame types returned by the stack walker. + */ +typedef enum +{ + /* Normal managed frames */ + FRAME_TYPE_MANAGED = 0, + /* Pseudo frame marking the start of a method invocation done by the soft debugger */ + FRAME_TYPE_DEBUGGER_INVOKE = 1, + /* Frame for transitioning to native code */ + FRAME_TYPE_MANAGED_TO_NATIVE = 2, + FRAME_TYPE_TRAMPOLINE = 3, + /* Interpreter frame */ + FRAME_TYPE_INTERP = 4, + /* Frame for transitioning from interpreter to managed code */ + FRAME_TYPE_INTERP_TO_MANAGED = 5, + /* same, but with MonoContext */ + FRAME_TYPE_INTERP_TO_MANAGED_WITH_CTX = 6, + FRAME_TYPE_NUM = 7 +} MonoStackFrameType; + +typedef struct +{ + MonoStackFrameType type; + /* + * For FRAME_TYPE_MANAGED, otherwise NULL. + */ + /*MonoJitInfo*/ void *ji; + /* + * Same as ji->method. + * Not valid if ASYNC_CONTEXT is true. + */ + MonoMethod *method; + /* + * If ji->method is a gshared method, this is the actual method instance. + * This is only filled if lookup for actual method was requested (MONO_UNWIND_LOOKUP_ACTUAL_METHOD) + * Not valid if ASYNC_CONTEXT is true. + */ + MonoMethod *actual_method; + /* The domain containing the code executed by this frame */ + MonoDomain *domain; + /* Whenever method is a user level method */ + gboolean managed; + /* + * Whenever this frame was loaded in async context. + */ + gboolean async_context; + int native_offset; + /* + * IL offset of this frame. + * Only available if the runtime have debugging enabled (--debug switch) and + * il offset resultion was requested (MONO_UNWIND_LOOKUP_IL_OFFSET) + */ + int il_offset; + + /* For FRAME_TYPE_INTERP_EXIT */ + gpointer interp_exit_data; + + /* For FRAME_TYPE_INTERP */ + gpointer interp_frame; + + /* + * A stack address associated with the frame which can be used + * to compare frames. + * This is needed because ctx is not changed when unwinding through + * interpreter frames, it still refers to the last native interpreter + * frame. + */ + gpointer frame_addr; + + /* The next fields are only useful for the jit */ + gpointer lmf; + guint32 unwind_info_len; + guint8 *unwind_info; + + mgreg_t **reg_locations; +} MonoStackFrameInfo; + +typedef MonoStackFrameInfo StackFrameInfo; + +typedef gboolean(*MonoJitStackWalk)(StackFrameInfo *frame, MonoContext *ctx, gpointer data); + +typedef enum +{ + MONO_UNWIND_NONE = 0x0, + MONO_UNWIND_LOOKUP_IL_OFFSET = 0x1, + /* NOT signal safe */ + MONO_UNWIND_LOOKUP_ACTUAL_METHOD = 0x2, + /* + * Store the locations where caller-saved registers are saved on the stack in + * frame->reg_locations. The pointer is only valid during the call to the unwind + * callback. + */ + MONO_UNWIND_REG_LOCATIONS = 0x4, + MONO_UNWIND_DEFAULT = MONO_UNWIND_LOOKUP_ACTUAL_METHOD, + MONO_UNWIND_SIGNAL_SAFE = MONO_UNWIND_NONE, + MONO_UNWIND_LOOKUP_ALL = MONO_UNWIND_LOOKUP_IL_OFFSET | MONO_UNWIND_LOOKUP_ACTUAL_METHOD, +} MonoUnwindOptions; + +#endif // UNITY_ANDROID + +struct MonoUnityCallstackFilter +{ + const char* name_space; + const char* class_name; + const char* method_name; +}; + +struct MonoUnityCallstackOptions +{ + const char *path_prefix_filter; + int filter_count; + const MonoUnityCallstackFilter *line_filters; +}; + + +/*Keep in sync with MonoErrorInternal*/ +typedef struct _MonoError +{ + unsigned short error_code; + unsigned short hidden_0; /*DON'T TOUCH */ + + void *hidden_1[12]; /*DON'T TOUCH */ +} MonoError; + +typedef uintptr_t MonoGCHandle; + + +typedef void*(*mono_liveness_reallocate_callback)(void* ptr, size_t size, void* state); + +#endif //ENABLE_MONO diff --git a/unity/unity-sources/Runtime/Mono/tabledefs.h b/unity/unity-sources/Runtime/Mono/tabledefs.h new file mode 100644 index 00000000000000..c081c40eaa3fc0 --- /dev/null +++ b/unity/unity-sources/Runtime/Mono/tabledefs.h @@ -0,0 +1,235 @@ +/* + * tabledefs.h: This file contains the various definitions for constants + * found on the metadata tables + * + * Author: + * Miguel de Icaza (miguel@ximian.com) + * + * (C) 2001 Ximian, Inc. + * + * From the ECMA documentation + */ + +#ifndef _MONO_METADATA_TABLEDEFS_H_ +#define _MONO_METADATA_TABLEDEFS_H_ + +/* + * 22.1.1 Values for AssemblyHashAlgorithm + */ + +enum +{ + ASSEMBLY_HASH_NONE, + ASSEMBLY_HASH_MD5 = 0x8003, + ASSEMBLY_HASH_SHA1 = 0x8004 +}; + +/* + * 22.1.4 Flags for Event.EventAttributes + */ + +enum +{ + EVENT_SPECIALNAME = 0x0200, + EVENT_RTSPECIALNAME = 0x0400 +}; + +/* + * 22.1.6 Flags for FileAttributes + */ + +enum +{ + FILE_CONTAINS_METADATA = 0, + FILE_CONTAINS_NO_METADATA = 1 +}; + +enum +{ + SECURITY_ACTION_DEMAND = 2, + SECURITY_ACTION_ASSERT = 3, + SECURITY_ACTION_DENY = 4, + SECURITY_ACTION_PERMITONLY = 5, + SECURITY_ACTION_LINKDEMAND = 6, + SECURITY_ACTION_INHERITDEMAND = 7, + SECURITY_ACTION_REQMIN = 8, + SECURITY_ACTION_REQOPT = 9, + SECURITY_ACTION_REQREFUSE = 10 +}; + +/* + * Field Attributes (21.1.5). + */ + +#define FIELD_ATTRIBUTE_FIELD_ACCESS_MASK 0x0007 +#define FIELD_ATTRIBUTE_COMPILER_CONTROLLED 0x0000 +#define FIELD_ATTRIBUTE_PRIVATE 0x0001 +#define FIELD_ATTRIBUTE_FAM_AND_ASSEM 0x0002 +#define FIELD_ATTRIBUTE_ASSEMBLY 0x0003 +#define FIELD_ATTRIBUTE_FAMILY 0x0004 +#define FIELD_ATTRIBUTE_FAM_OR_ASSEM 0x0005 +#define FIELD_ATTRIBUTE_PUBLIC 0x0006 + +#define FIELD_ATTRIBUTE_STATIC 0x0010 +#define FIELD_ATTRIBUTE_INIT_ONLY 0x0020 +#define FIELD_ATTRIBUTE_LITERAL 0x0040 +#define FIELD_ATTRIBUTE_NOT_SERIALIZED 0x0080 +#define FIELD_ATTRIBUTE_SPECIAL_NAME 0x0200 +#define FIELD_ATTRIBUTE_PINVOKE_IMPL 0x2000 + +/* For runtime use only */ +#define FIELD_ATTRIBUTE_RESERVED_MASK 0x9500 +#define FIELD_ATTRIBUTE_RT_SPECIAL_NAME 0x0400 +#define FIELD_ATTRIBUTE_HAS_FIELD_MARSHAL 0x1000 +#define FIELD_ATTRIBUTE_HAS_DEFAULT 0x8000 +#define FIELD_ATTRIBUTE_HAS_FIELD_RVA 0x0100 + +/* + * Type Attributes (21.1.13). + */ +#define TYPE_ATTRIBUTE_VISIBILITY_MASK 0x00000007 +#define TYPE_ATTRIBUTE_NOT_PUBLIC 0x00000000 +#define TYPE_ATTRIBUTE_PUBLIC 0x00000001 +#define TYPE_ATTRIBUTE_NESTED_PUBLIC 0x00000002 +#define TYPE_ATTRIBUTE_NESTED_PRIVATE 0x00000003 +#define TYPE_ATTRIBUTE_NESTED_FAMILY 0x00000004 +#define TYPE_ATTRIBUTE_NESTED_ASSEMBLY 0x00000005 +#define TYPE_ATTRIBUTE_NESTED_FAM_AND_ASSEM 0x00000006 +#define TYPE_ATTRIBUTE_NESTED_FAM_OR_ASSEM 0x00000007 + +#define TYPE_ATTRIBUTE_LAYOUT_MASK 0x00000018 +#define TYPE_ATTRIBUTE_AUTO_LAYOUT 0x00000000 +#define TYPE_ATTRIBUTE_SEQUENTIAL_LAYOUT 0x00000008 +#define TYPE_ATTRIBUTE_EXPLICIT_LAYOUT 0x00000010 + +#define TYPE_ATTRIBUTE_CLASS_SEMANTIC_MASK 0x00000020 +#define TYPE_ATTRIBUTE_CLASS 0x00000000 +#define TYPE_ATTRIBUTE_INTERFACE 0x00000020 + +#define TYPE_ATTRIBUTE_ABSTRACT 0x00000080 +#define TYPE_ATTRIBUTE_SEALED 0x00000100 +#define TYPE_ATTRIBUTE_SPECIAL_NAME 0x00000400 + +#define TYPE_ATTRIBUTE_IMPORT 0x00001000 +#define TYPE_ATTRIBUTE_SERIALIZABLE 0x00002000 + +#define TYPE_ATTRIBUTE_STRING_FORMAT_MASK 0x00030000 +#define TYPE_ATTRIBUTE_ANSI_CLASS 0x00000000 +#define TYPE_ATTRIBUTE_UNICODE_CLASS 0x00010000 +#define TYPE_ATTRIBUTE_AUTO_CLASS 0x00020000 + +#define TYPE_ATTRIBUTE_BEFORE_FIELD_INIT 0x00100000 + +#define TYPE_ATTRIBUTE_RESERVED_MASK 0x00040800 +#define TYPE_ATTRIBUTE_RT_SPECIAL_NAME 0x00000800 +#define TYPE_ATTRIBUTE_HAS_SECURITY 0x00040000 + +/* + * Method Attributes (22.1.9) + */ + +#define METHOD_IMPL_ATTRIBUTE_CODE_TYPE_MASK 0x0003 +#define METHOD_IMPL_ATTRIBUTE_IL 0x0000 +#define METHOD_IMPL_ATTRIBUTE_NATIVE 0x0001 +#define METHOD_IMPL_ATTRIBUTE_OPTIL 0x0002 +#define METHOD_IMPL_ATTRIBUTE_RUNTIME 0x0003 + +#define METHOD_IMPL_ATTRIBUTE_MANAGED_MASK 0x0004 +#define METHOD_IMPL_ATTRIBUTE_UNMANAGED 0x0004 +#define METHOD_IMPL_ATTRIBUTE_MANAGED 0x0000 + +#define METHOD_IMPL_ATTRIBUTE_FORWARD_REF 0x0010 +#define METHOD_IMPL_ATTRIBUTE_PRESERVE_SIG 0x0080 +#define METHOD_IMPL_ATTRIBUTE_INTERNAL_CALL 0x1000 +#define METHOD_IMPL_ATTRIBUTE_SYNCHRONIZED 0x0020 +#define METHOD_IMPL_ATTRIBUTE_NOINLINING 0x0008 +#define METHOD_IMPL_ATTRIBUTE_MAX_METHOD_IMPL_VAL 0xffff + +#define METHOD_ATTRIBUTE_MEMBER_ACCESS_MASK 0x0007 +#define METHOD_ATTRIBUTE_COMPILER_CONTROLLED 0x0000 +#define METHOD_ATTRIBUTE_PRIVATE 0x0001 +#define METHOD_ATTRIBUTE_FAM_AND_ASSEM 0x0002 +#define METHOD_ATTRIBUTE_ASSEM 0x0003 +#define METHOD_ATTRIBUTE_FAMILY 0x0004 +#define METHOD_ATTRIBUTE_FAM_OR_ASSEM 0x0005 +#define METHOD_ATTRIBUTE_PUBLIC 0x0006 + +#define METHOD_ATTRIBUTE_STATIC 0x0010 +#define METHOD_ATTRIBUTE_FINAL 0x0020 +#define METHOD_ATTRIBUTE_VIRTUAL 0x0040 +#define METHOD_ATTRIBUTE_HIDE_BY_SIG 0x0080 + +#define METHOD_ATTRIBUTE_VTABLE_LAYOUT_MASK 0x0100 +#define METHOD_ATTRIBUTE_REUSE_SLOT 0x0000 +#define METHOD_ATTRIBUTE_NEW_SLOT 0x0100 + +#define METHOD_ATTRIBUTE_ABSTRACT 0x0400 +#define METHOD_ATTRIBUTE_SPECIAL_NAME 0x0800 + +#define METHOD_ATTRIBUTE_PINVOKE_IMPL 0x2000 +#define METHOD_ATTRIBUTE_UNMANAGED_EXPORT 0x0008 + +/* + * For runtime use only + */ +#define METHOD_ATTRIBUTE_RESERVED_MASK 0xd000 +#define METHOD_ATTRIBUTE_RT_SPECIAL_NAME 0x1000 +#define METHOD_ATTRIBUTE_HAS_SECURITY 0x4000 +#define METHOD_ATTRIBUTE_REQUIRE_SEC_OBJECT 0x8000 + + +/* + * Method Semantics ([MethodSemanticAttributes]) 22.1.10 + */ + +#define METHOD_SEMANTIC_SETTER 0x0001 +#define METHOD_SEMANTIC_GETTER 0x0002 +#define METHOD_SEMANTIC_OTHER 0x0004 +#define METHOD_SEMANTIC_ADD_ON 0x0008 +#define METHOD_SEMANTIC_REMOVE_ON 0x0010 +#define METHOD_SEMANTIC_FIRE 0x0020 + +/* + * Flags for Params (22.1.11) + */ +#define PARAM_ATTRIBUTE_IN 0x0001 +#define PARAM_ATTRIBUTE_OUT 0x0002 +#define PARAM_ATTRIBUTE_OPTIONAL 0x0004 +#define PARAM_ATTRIBUTE_RESERVED_MASK 0xf000 +#define PARAM_ATTRIBUTE_HAS_DEFAULT 0x1000 +#define PARAM_ATTRIBUTE_HAS_FIELD_MARSHAL 0x2000 +#define PARAM_ATTRIBUTE_UNUSED 0xcfe0 + +/* + * 22.1.12 PropertyAttributes + */ +#define PROPERTY_ATTRIBUTE_SPECIAL_NAME 0x0200 +#define PROPERTY_ATTRIBUTE_RESERVED_MASK 0xf400 +#define PROPERTY_ATTRIBUTE_RT_SPECIAL_NAME 0x0400 +#define PROPERTY_ATTRIBUTE_HAS_DEFAULT 0x1000 +#define PROPERTY_ATTRIBUTE_UNUSED 0xe9ff + +/* + * 22.1.7 Flags for ImplMap [PInvokeAttributes] + */ +#define PINVOKE_ATTRIBUTE_NO_MANGLE 0x0001 +#define PINVOKE_ATTRIBUTE_CHAR_SET_MASK 0x0006 +#define PINVOKE_ATTRIBUTE_CHAR_SET_NOT_SPEC 0x0000 +#define PINVOKE_ATTRIBUTE_CHAR_SET_ANSI 0x0002 +#define PINVOKE_ATTRIBUTE_CHAR_SET_UNICODE 0x0004 +#define PINVOKE_ATTRIBUTE_CHAR_SET_AUTO 0x0006 +#define PINVOKE_ATTRIBUTE_SUPPORTS_LAST_ERROR 0x0040 +#define PINVOKE_ATTRIBUTE_CALL_CONV_MASK 0x0700 +#define PINVOKE_ATTRIBUTE_CALL_CONV_WINAPI 0x0100 +#define PINVOKE_ATTRIBUTE_CALL_CONV_CDECL 0x0200 +#define PINVOKE_ATTRIBUTE_CALL_CONV_STDCALL 0x0300 +#define PINVOKE_ATTRIBUTE_CALL_CONV_THISCALL 0x0400 +#define PINVOKE_ATTRIBUTE_CALL_CONV_FASTCALL 0x0500 +#define PINVOKE_ATTRIBUTE_CALL_CONV_GENERIC 0x0010 +#define PINVOKE_ATTRIBUTE_CALL_CONV_GENERICINST 0x000a + +/** + * 21.5 AssemblyRefs + */ +#define ASSEMBLYREF_FULL_PUBLIC_KEY_FLAG 0x00000001 +#endif diff --git a/unity/unitygc/unitygc.cpp b/unity/unitygc/unitygc.cpp index 95ab1068985f7f..103f432f739109 100644 --- a/unity/unitygc/unitygc.cpp +++ b/unity/unitygc/unitygc.cpp @@ -807,6 +807,11 @@ class GCHandleStore : public IGCHandleStore return NULL; } + void DestroyHandle(OBJECTHANDLE handle) + { + *(Object**)handle = nullptr; + } + void StoreObjectInHandle(OBJECTHANDLE handle, Object* object) { @@ -873,11 +878,12 @@ class GCHandleManager : public IGCHandleManager virtual void DestroyHandleOfType(OBJECTHANDLE handle, HandleType type) { + m_pHandleStore->DestroyHandle(handle); } virtual void DestroyHandleOfUnknownType(OBJECTHANDLE handle) { - assert(0); + m_pHandleStore->DestroyHandle(handle); } virtual void SetExtraInfoForHandle(OBJECTHANDLE handle, HandleType type, void* pExtraInfo)