Compare commits
110 Commits
267f85ae27
...
egormayoro
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
e9d5a2ee70 | ||
|
|
2746d072d4 | ||
| f7005a2735 | |||
|
|
a86a76705e | ||
|
|
7fed8f13c3 | ||
|
|
2aba5e07bf | ||
|
|
601c6b6e88 | ||
|
|
97689d999b | ||
|
|
a85cf28965 | ||
|
|
3c6f5a7a56 | ||
|
|
e7661998fe | ||
|
|
01d769f38b | ||
|
|
63e6d22d49 | ||
| 47e2b961e2 | |||
|
|
b95b336372 | ||
| f35d7cb4bd | |||
| 54615e34d4 | |||
| 8752f4a139 | |||
| 453105d273 | |||
| cad0a0b217 | |||
| 9c0fd40e7b | |||
| c7a31c8bbb | |||
|
|
9900929349 | ||
|
|
e1ba299159 | ||
|
|
8de18d1788 | ||
| 06aabdbee6 | |||
|
|
c6f290bb56 | ||
| 49d3b9b96e | |||
| 280beb13cc | |||
| 3bc9351641 | |||
| 16b2c6b42b | |||
| fe31df0ef2 | |||
|
|
4c8681bfe2 | ||
|
|
d330a6ee23 | ||
|
|
b439759e9b | ||
| b11973cb64 | |||
|
|
df9a9a30bb | ||
|
|
2cd02c295f | ||
|
|
278fc1ff9c | ||
|
|
80eac5b957 | ||
|
|
0c9eed4bb7 | ||
|
|
d3d6d0bec7 | ||
|
|
3095510826 | ||
|
|
85e2a60183 | ||
|
|
68bd21b7b0 | ||
|
|
177433a95b | ||
|
|
29ece9072e | ||
|
|
feafa43f32 | ||
|
|
b8f429256f | ||
|
|
2f53d6ae2e | ||
|
|
65237e4d63 | ||
|
|
7533739488 | ||
| c1d31b809b | |||
| 537f3eb6e9 | |||
| f5f99f6e8a | |||
|
|
fc47a1685c | ||
| 383d8df826 | |||
| ebc5a1cbc1 | |||
|
|
0eee799867 | ||
|
|
50dd54cec1 | ||
|
|
6a59bc0e09 | ||
|
|
9e777ceeab | ||
|
|
10636427ed | ||
|
|
a0704038db | ||
| 623f6c0d73 | |||
|
|
622159cba6 | ||
|
|
db26a2c332 | ||
|
|
8ad19cbfa5 | ||
|
|
1895a4b02a | ||
|
|
623898d913 | ||
|
|
a96a4bcaa6 | ||
|
|
a7764847c4 | ||
|
|
fca4f632e4 | ||
|
|
f53d514a47 | ||
| ae9cc2bf3b | |||
| c6a0c73287 | |||
|
|
db32a3e2b2 | ||
|
|
a0a401c42a | ||
| 8161609173 | |||
| a2e6269508 | |||
|
|
72a1c1d853 | ||
| 5c89299ad5 | |||
|
|
26e36bed46 | ||
|
|
8dcbd587ec | ||
|
|
f7a78f9626 | ||
| fbe22fca43 | |||
| bbb9823f1d | |||
| b454858647 | |||
|
|
ad99446b12 | ||
|
|
d3e8c481d2 | ||
| 4e16638c36 | |||
| 6742932862 | |||
| 8b2e59356a | |||
| f9d52c0c3e | |||
| 537d60222f | |||
| 4eb057731f | |||
| 402ae91c33 | |||
| ba632b29ce | |||
| 18edf55d15 | |||
| c347f56e47 | |||
| 11e9fab482 | |||
| 73d0b201f2 | |||
| 1973d095f5 | |||
|
|
f679666d01 | ||
| 0df1d3d5fe | |||
| 54eb1ecc95 | |||
| b7ebccf045 | |||
| 738f2c5d12 | |||
|
|
29a8c30370 | ||
|
|
99f5febd58 |
2
.gitignore
vendored
2
.gitignore
vendored
@@ -74,6 +74,8 @@ Sapfor/Sapc++/Sapc++/x64/
|
|||||||
Sapfor/Sapc++/x64/
|
Sapfor/Sapc++/x64/
|
||||||
|
|
||||||
/build
|
/build
|
||||||
|
/cmake-build-debug
|
||||||
|
|
||||||
Sapfor/out/
|
Sapfor/out/
|
||||||
Sapfor/_bin/*
|
Sapfor/_bin/*
|
||||||
|
_bin/*
|
||||||
|
|||||||
132
CMakeLists.txt
132
CMakeLists.txt
@@ -12,6 +12,7 @@ add_definitions("-D SYS5")
|
|||||||
add_definitions("-D YYDEBUG")
|
add_definitions("-D YYDEBUG")
|
||||||
|
|
||||||
set(CMAKE_CXX_STANDARD 17)
|
set(CMAKE_CXX_STANDARD 17)
|
||||||
|
set(CMAKE_C_STANDARD 17)
|
||||||
|
|
||||||
set(fdvm_include projects/dvm/fdvmh/include/fdvmh/)
|
set(fdvm_include projects/dvm/fdvmh/include/fdvmh/)
|
||||||
set(fdvm_sources projects/dvm/fdvmh/tools/fdvmh/)
|
set(fdvm_sources projects/dvm/fdvmh/tools/fdvmh/)
|
||||||
@@ -27,6 +28,14 @@ set(libpred_sources projects/libpredictor/src/)
|
|||||||
set(libpred_include projects/libpredictor/include/)
|
set(libpred_include projects/libpredictor/include/)
|
||||||
|
|
||||||
include_directories(src)
|
include_directories(src)
|
||||||
|
include_directories(src/Utils)
|
||||||
|
include_directories(src/SgUtils)
|
||||||
|
include_directories(src/Distribution)
|
||||||
|
include_directories(src/GraphCall)
|
||||||
|
include_directories(src/GraphLoop)
|
||||||
|
include_directories(src/Transformations/ExpressionSubstitution)
|
||||||
|
include_directories(src/Transformations)
|
||||||
|
|
||||||
#Sage lib includes
|
#Sage lib includes
|
||||||
include_directories(${fdvm_include})
|
include_directories(${fdvm_include})
|
||||||
include_directories(${sage_include_1})
|
include_directories(${sage_include_1})
|
||||||
@@ -113,7 +122,13 @@ set(OMEGA src/SageAnalysisTool/OmegaForSage/add-assert.cpp
|
|||||||
src/SageAnalysisTool/set.cpp)
|
src/SageAnalysisTool/set.cpp)
|
||||||
|
|
||||||
set(PRIV src/PrivateAnalyzer/private_analyzer.cpp
|
set(PRIV src/PrivateAnalyzer/private_analyzer.cpp
|
||||||
src/PrivateAnalyzer/private_analyzer.h)
|
src/PrivateAnalyzer/private_analyzer.h
|
||||||
|
src/PrivateAnalyzer/private_arrays_search.cpp
|
||||||
|
src/PrivateAnalyzer/private_arrays_search.h
|
||||||
|
src/PrivateAnalyzer/range_structures.cpp
|
||||||
|
src/PrivateAnalyzer/range_structures.h
|
||||||
|
src/PrivateAnalyzer/region.cpp
|
||||||
|
src/PrivateAnalyzer/region.h)
|
||||||
|
|
||||||
set(FDVM ${fdvm_sources}/acc.cpp
|
set(FDVM ${fdvm_sources}/acc.cpp
|
||||||
${fdvm_sources}/acc_across.cpp
|
${fdvm_sources}/acc_across.cpp
|
||||||
@@ -148,40 +163,49 @@ set(PARALLEL_REG src/ParallelizationRegions/ParRegions.cpp
|
|||||||
src/ParallelizationRegions/resolve_par_reg_conflicts.cpp
|
src/ParallelizationRegions/resolve_par_reg_conflicts.cpp
|
||||||
src/ParallelizationRegions/resolve_par_reg_conflicts.h)
|
src/ParallelizationRegions/resolve_par_reg_conflicts.h)
|
||||||
|
|
||||||
set(TR_DEAD_CODE src/Transformations/dead_code.cpp
|
set(TR_DEAD_CODE src/Transformations/DeadCodeRemoving/dead_code.cpp
|
||||||
src/Transformations/dead_code.h)
|
src/Transformations/DeadCodeRemoving/dead_code.h)
|
||||||
set(TR_CP src/Transformations/checkpoints.cpp
|
set(TR_CP src/Transformations/CheckPoints/checkpoints.cpp
|
||||||
src/Transformations/checkpoints.h)
|
src/Transformations/CheckPoints/checkpoints.h)
|
||||||
set(TR_VECTOR src/Transformations/array_assign_to_loop.cpp
|
set(TR_VECTOR src/Transformations/VectorAssignToLoop/array_assign_to_loop.cpp
|
||||||
src/Transformations/array_assign_to_loop.h)
|
src/Transformations/VectorAssignToLoop/array_assign_to_loop.h)
|
||||||
set(TR_ENDDO_LOOP src/Transformations/enddo_loop_converter.cpp
|
set(TR_ENDDO_LOOP src/Transformations/LoopEndDoConverter/enddo_loop_converter.cpp
|
||||||
src/Transformations/enddo_loop_converter.h)
|
src/Transformations/LoopEndDoConverter/enddo_loop_converter.h)
|
||||||
set(TR_LOOP_NEST src/Transformations/loop_transform.cpp
|
set(TR_LOOP_NEST src/Transformations/LoopNesting/loop_transform.cpp
|
||||||
src/Transformations/loop_transform.h)
|
src/Transformations/LoopNesting/loop_transform.h)
|
||||||
set(TR_LOOP_COMB src/Transformations/loops_combiner.cpp
|
set(TR_LOOP_COMB src/Transformations/LoopCombining/loops_combiner.cpp
|
||||||
src/Transformations/loops_combiner.h)
|
src/Transformations/LoopCombining/loops_combiner.h)
|
||||||
set(TR_LOOP_SPLIT src/Transformations/loops_splitter.cpp
|
set(TR_LOOP_SPLIT src/Transformations/LoopSplitting/loops_splitter.cpp
|
||||||
src/Transformations/loops_splitter.h)
|
src/Transformations/LoopSplitting/loops_splitter.h)
|
||||||
set(TR_LOOP_UNROLL src/Transformations/loops_unrolling.cpp
|
set(TR_LOOP_UNROLL src/Transformations/LoopUnrolling/loops_unrolling.cpp
|
||||||
src/Transformations/loops_unrolling.h)
|
src/Transformations/LoopUnrolling/loops_unrolling.h)
|
||||||
set(TR_PRIV_BR src/Transformations/private_arrays_resizing.cpp
|
set(TR_PRIV_BR src/Transformations/PrivateArrayResizing/private_arrays_resizing.cpp
|
||||||
src/Transformations/private_arrays_resizing.h)
|
src/Transformations/PrivateArrayResizing/private_arrays_resizing.h)
|
||||||
set(TR_PRIV_DEL src/Transformations/private_removing.cpp
|
set(TR_PRIV_DEL src/Transformations/PrivateArrayRemoving/private_removing.cpp
|
||||||
src/Transformations/private_removing.h)
|
src/Transformations/PrivateArrayRemoving/private_removing.h)
|
||||||
set(TR_SWAP_ARR_DIMS src/Transformations/swap_array_dims.cpp
|
set(TR_SWAP_ARR_DIMS src/Transformations/ArrayDimsSwapping/swap_array_dims.cpp
|
||||||
src/Transformations/swap_array_dims.h)
|
src/Transformations/ArrayDimsSwapping/swap_array_dims.h)
|
||||||
set(TR_FUNC_DUP src/Transformations/uniq_call_chain_dup.cpp
|
set(TR_FUNC_DUP src/Transformations/FunctionDuplication/uniq_call_chain_dup.cpp
|
||||||
src/Transformations/uniq_call_chain_dup.h)
|
src/Transformations/FunctionDuplication/uniq_call_chain_dup.h)
|
||||||
set(TR_FUNC_PURE src/Transformations/function_purifying.cpp
|
set(TR_FUNC_PURE src/Transformations/FunctionPurifying/function_purifying.cpp
|
||||||
src/Transformations/function_purifying.h)
|
src/Transformations/FunctionPurifying/function_purifying.h)
|
||||||
set(TR_GV src/Transformations/fix_common_blocks.cpp
|
set(TR_GV src/Transformations/GlobalVariables/fix_common_blocks.cpp
|
||||||
src/Transformations/fix_common_blocks.h)
|
src/Transformations/GlobalVariables/fix_common_blocks.h)
|
||||||
set(TR_CONV src/Transformations/convert_to_c.cpp
|
set(TR_CONV src/Transformations/ConvertToC/convert_to_c.cpp
|
||||||
src/Transformations/convert_to_c.h)
|
src/Transformations/ConvertToC/convert_to_c.h)
|
||||||
set(TR_IMPLICIT_NONE src/Transformations/set_implicit_none.cpp
|
set(TR_IMPLICIT_NONE src/Transformations/SetImplicitNone/set_implicit_none.cpp
|
||||||
src/Transformations/set_implicit_none.h)
|
src/Transformations/SetImplicitNone/set_implicit_none.h)
|
||||||
set(TR_REPLACE_ARRAYS_IN_IO src/Transformations/replace_dist_arrays_in_io.cpp
|
set(TR_REPLACE_ARRAYS_IN_IO src/Transformations/ReplaceArraysInIO/replace_dist_arrays_in_io.cpp
|
||||||
src/Transformations/replace_dist_arrays_in_io.h)
|
src/Transformations/ReplaceArraysInIO/replace_dist_arrays_in_io.h)
|
||||||
|
set(TR_EXPR_TRANSFORM src/Transformations/ExpressionSubstitution/control_flow_graph_part.cpp
|
||||||
|
src/Transformations/ExpressionSubstitution/expr_transform.cpp
|
||||||
|
src/Transformations/ExpressionSubstitution/expr_transform.h)
|
||||||
|
set(TR_INLINER src/Transformations/FunctionInlining/inliner.cpp
|
||||||
|
src/Transformations/FunctionInlining/inliner.h)
|
||||||
|
set(TR_RENAME_SYMBOLS src/Transformations/RenameSymbols/rename_symbols.cpp
|
||||||
|
src/Transformations/RenameSymbols/rename_symbols.h)
|
||||||
|
SET(TR_SWAP_OPERATORS src/Transformations/SwapOperators/swap_operators.cpp
|
||||||
|
src/Transformations/SwapOperators/swap_operators.h)
|
||||||
|
|
||||||
set(TRANSFORMS
|
set(TRANSFORMS
|
||||||
${TR_DEAD_CODE}
|
${TR_DEAD_CODE}
|
||||||
@@ -201,11 +225,16 @@ set(TRANSFORMS
|
|||||||
${TR_CONV}
|
${TR_CONV}
|
||||||
${TR_PRIV_DEL}
|
${TR_PRIV_DEL}
|
||||||
${TR_IMPLICIT_NONE}
|
${TR_IMPLICIT_NONE}
|
||||||
${TR_REPLACE_ARRAYS_IN_IO})
|
${TR_REPLACE_ARRAYS_IN_IO}
|
||||||
|
${TR_EXPR_TRANSFORM}
|
||||||
|
${TR_INLINER}
|
||||||
|
${TR_RENAME_SYMBOLS}
|
||||||
|
${TR_SWAP_OPERATORS})
|
||||||
|
|
||||||
set(CFG
|
set(CFG src/CFGraph/IR.cpp
|
||||||
src/CFGraph/IR.cpp
|
|
||||||
src/CFGraph/IR.h
|
src/CFGraph/IR.h
|
||||||
|
src/CFGraph/IR_domTree.cpp
|
||||||
|
src/CFGraph/IR_domTree.h
|
||||||
src/CFGraph/CFGraph.cpp
|
src/CFGraph/CFGraph.cpp
|
||||||
src/CFGraph/CFGraph.h
|
src/CFGraph/CFGraph.h
|
||||||
src/CFGraph/RD_subst.cpp
|
src/CFGraph/RD_subst.cpp
|
||||||
@@ -214,8 +243,6 @@ set(CFG
|
|||||||
src/CFGraph/live_variable_analysis.h
|
src/CFGraph/live_variable_analysis.h
|
||||||
src/CFGraph/private_variables_analysis.cpp
|
src/CFGraph/private_variables_analysis.cpp
|
||||||
src/CFGraph/private_variables_analysis.h
|
src/CFGraph/private_variables_analysis.h
|
||||||
src/CFGraph/IRSSAForm.cpp
|
|
||||||
src/CFGraph/IRSSAForm.h
|
|
||||||
)
|
)
|
||||||
|
|
||||||
set(DATA_FLOW
|
set(DATA_FLOW
|
||||||
@@ -286,10 +313,6 @@ set(DYNA src/DynamicAnalysis/createParallelRegions.cpp
|
|||||||
src/DynamicAnalysis/gCov_parser.cpp
|
src/DynamicAnalysis/gCov_parser.cpp
|
||||||
src/DynamicAnalysis/gCov_parser_func.h)
|
src/DynamicAnalysis/gCov_parser_func.h)
|
||||||
|
|
||||||
set(EXPR_TRANSFORM src/ExpressionTransform/control_flow_graph_part.cpp
|
|
||||||
src/ExpressionTransform/expr_transform.cpp
|
|
||||||
src/ExpressionTransform/expr_transform.h)
|
|
||||||
|
|
||||||
set(GR_CALL src/GraphCall/graph_calls.cpp
|
set(GR_CALL src/GraphCall/graph_calls.cpp
|
||||||
src/GraphCall/graph_calls.h
|
src/GraphCall/graph_calls.h
|
||||||
src/GraphCall/graph_calls_base.cpp
|
src/GraphCall/graph_calls_base.cpp
|
||||||
@@ -300,18 +323,11 @@ set(GR_LOOP src/GraphLoop/graph_loops_base.cpp
|
|||||||
src/GraphLoop/graph_loops.h
|
src/GraphLoop/graph_loops.h
|
||||||
src/GraphLoop/graph_loops_func.h)
|
src/GraphLoop/graph_loops_func.h)
|
||||||
|
|
||||||
set(INLINER src/Inliner/inliner.cpp
|
|
||||||
src/Inliner/inliner.h)
|
|
||||||
|
|
||||||
set(LOOP_ANALYZER src/LoopAnalyzer/allocations_prepoc.cpp
|
set(LOOP_ANALYZER src/LoopAnalyzer/allocations_prepoc.cpp
|
||||||
src/LoopAnalyzer/dep_analyzer.cpp
|
src/LoopAnalyzer/dep_analyzer.cpp
|
||||||
src/LoopAnalyzer/loop_analyzer.cpp
|
src/LoopAnalyzer/loop_analyzer.cpp
|
||||||
src/LoopAnalyzer/loop_analyzer.h)
|
src/LoopAnalyzer/loop_analyzer.h)
|
||||||
|
|
||||||
set(RENAME_SYMBOLS src/RenameSymbols/rename_symbols.cpp
|
|
||||||
src/RenameSymbols/rename_symbols.h)
|
|
||||||
|
|
||||||
|
|
||||||
set(MAIN src/Sapfor.cpp
|
set(MAIN src/Sapfor.cpp
|
||||||
src/Sapfor.h
|
src/Sapfor.h
|
||||||
src/SapforData.h
|
src/SapforData.h
|
||||||
@@ -401,12 +417,9 @@ set(SOURCE_EXE
|
|||||||
${DISTR}
|
${DISTR}
|
||||||
${DVMH_REG}
|
${DVMH_REG}
|
||||||
${DYNA}
|
${DYNA}
|
||||||
${EXPR_TRANSFORM}
|
|
||||||
${GR_CALL}
|
${GR_CALL}
|
||||||
${GR_LOOP}
|
${GR_LOOP}
|
||||||
${INLINER}
|
|
||||||
${LOOP_ANALYZER}
|
${LOOP_ANALYZER}
|
||||||
${RENAME_SYMBOLS}
|
|
||||||
${TRANSFORMS}
|
${TRANSFORMS}
|
||||||
${PARALLEL_REG}
|
${PARALLEL_REG}
|
||||||
${PRIV}
|
${PRIV}
|
||||||
@@ -430,7 +443,7 @@ source_group (CFGraph FILES ${CFG})
|
|||||||
source_group (CFGraph\\DataFlow FILES ${DATA_FLOW})
|
source_group (CFGraph\\DataFlow FILES ${DATA_FLOW})
|
||||||
|
|
||||||
source_group (Transformations\\DeadCodeRemoving FILES ${TR_DEAD_CODE})
|
source_group (Transformations\\DeadCodeRemoving FILES ${TR_DEAD_CODE})
|
||||||
source_group (Transformations\\ExpressionSubstitution FILES ${EXPR_TRANSFORM})
|
source_group (Transformations\\ExpressionSubstitution FILES ${TR_EXPR_TRANSFORM})
|
||||||
source_group (Transformations\\CheckPoints FILES ${TR_CP})
|
source_group (Transformations\\CheckPoints FILES ${TR_CP})
|
||||||
source_group (Transformations\\LoopEndDoConverter FILES ${TR_ENDDO_LOOP})
|
source_group (Transformations\\LoopEndDoConverter FILES ${TR_ENDDO_LOOP})
|
||||||
source_group (Transformations\\LoopNesting FILES ${TR_LOOP_NEST})
|
source_group (Transformations\\LoopNesting FILES ${TR_LOOP_NEST})
|
||||||
@@ -438,17 +451,18 @@ source_group (Transformations\\LoopCombining FILES ${TR_LOOP_COMB})
|
|||||||
source_group (Transformations\\LoopSplitting FILES ${TR_LOOP_SPLIT})
|
source_group (Transformations\\LoopSplitting FILES ${TR_LOOP_SPLIT})
|
||||||
source_group (Transformations\\LoopUnrolling FILES ${TR_LOOP_UNROLL})
|
source_group (Transformations\\LoopUnrolling FILES ${TR_LOOP_UNROLL})
|
||||||
source_group (Transformations\\FunctionDuplication FILES ${TR_FUNC_DUP})
|
source_group (Transformations\\FunctionDuplication FILES ${TR_FUNC_DUP})
|
||||||
source_group (Transformations\\FunctionInlining FILES ${INLINER})
|
source_group (Transformations\\FunctionInlining FILES ${TR_INLINER})
|
||||||
source_group (Transformations\\FunctionPurifying FILES ${TR_FUNC_PURE})
|
source_group (Transformations\\FunctionPurifying FILES ${TR_FUNC_PURE})
|
||||||
source_group (Transformations\\ArrayDimsSwapping FILES ${TR_SWAP_ARR_DIMS})
|
source_group (Transformations\\ArrayDimsSwapping FILES ${TR_SWAP_ARR_DIMS})
|
||||||
source_group (Transformations\\PrivateArrayResizing FILES ${TR_PRIV_BR})
|
source_group (Transformations\\PrivateArrayResizing FILES ${TR_PRIV_BR})
|
||||||
source_group (Transformations\\PrivateArrayRemoving FILES ${TR_PRIV_DEL})
|
source_group (Transformations\\PrivateArrayRemoving FILES ${TR_PRIV_DEL})
|
||||||
source_group (Transformations\\VectorAssignToLoop FILES ${TR_VECTOR})
|
source_group (Transformations\\VectorAssignToLoop FILES ${TR_VECTOR})
|
||||||
source_group (Transformations\\RenameSymbols FILES ${RENAME_SYMBOLS})
|
source_group (Transformations\\RenameSymbols FILES ${TR_RENAME_SYMBOLS})
|
||||||
source_group (Transformations\\GlobalVariables FILES ${TR_GV})
|
source_group (Transformations\\GlobalVariables FILES ${TR_GV})
|
||||||
source_group (Transformations\\ConvertToC FILES ${TR_CONV})
|
source_group (Transformations\\ConvertToC FILES ${TR_CONV})
|
||||||
source_group (Transformations\\SetImplicitNone FILES ${TR_IMPLICIT_NONE})
|
source_group (Transformations\\SetImplicitNone FILES ${TR_IMPLICIT_NONE})
|
||||||
source_group (Transformations\\ReplaceArraysInIO FILES ${TR_REPLACE_ARRAYS_IN_IO})
|
source_group (Transformations\\ReplaceArraysInIO FILES ${TR_REPLACE_ARRAYS_IN_IO})
|
||||||
|
source_group (Transformations\\SwapOperators FILES ${TR_SWAP_OPERATORS})
|
||||||
|
|
||||||
|
|
||||||
source_group (CreateIntervals FILES ${CREATE_INTER_T})
|
source_group (CreateIntervals FILES ${CREATE_INTER_T})
|
||||||
@@ -486,7 +500,9 @@ else()
|
|||||||
else()
|
else()
|
||||||
set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} -std=c++11")
|
set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} -std=c++11")
|
||||||
endif()
|
endif()
|
||||||
set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} -O2")
|
if(NOT CMAKE_BUILD_TYPE)
|
||||||
|
set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} -O3")
|
||||||
|
endif()
|
||||||
endif()
|
endif()
|
||||||
|
|
||||||
add_subdirectory(projects/Fdvm)
|
add_subdirectory(projects/Fdvm)
|
||||||
|
|||||||
Submodule projects/dvm updated: 3a567d7582...4b7ef11871
@@ -1,5 +1,5 @@
|
|||||||
#define _LEAK_
|
#define _LEAK_
|
||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
@@ -8,9 +8,9 @@
|
|||||||
#include <chrono>
|
#include <chrono>
|
||||||
#include <functional>
|
#include <functional>
|
||||||
|
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/CommonBlock.h"
|
#include "CommonBlock.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "IR.h"
|
#include "IR.h"
|
||||||
@@ -56,23 +56,6 @@ void BBlock::addInstruction(IR_Block* item)
|
|||||||
item->setBasicBlock(this);
|
item->setBasicBlock(this);
|
||||||
}
|
}
|
||||||
|
|
||||||
void BBlock::addInstructionInFront(IR_Block* item)
|
|
||||||
{
|
|
||||||
instructions.insert(instructions.begin(), item);
|
|
||||||
item->setBasicBlock(this);
|
|
||||||
}
|
|
||||||
|
|
||||||
void BBlock::addInstructionBeforeInstruction(IR_Block* item, Instruction* instruction)
|
|
||||||
{
|
|
||||||
for (auto it = instructions.begin(); it != instructions.end(); ++it) {
|
|
||||||
if ((*it)->getInstruction() == instruction) {
|
|
||||||
instructions.insert(it, item);
|
|
||||||
item->setBasicBlock(this);
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
int BBlock::removePrev(BBlock* removed)
|
int BBlock::removePrev(BBlock* removed)
|
||||||
{
|
{
|
||||||
auto it = std::remove(prev.begin(), prev.end(), removed);
|
auto it = std::remove(prev.begin(), prev.end(), removed);
|
||||||
@@ -529,7 +512,7 @@ static int buildReachingDefs(const vector<BBlock*>& CFG, const FuncInfo* currF,
|
|||||||
return iter;
|
return iter;
|
||||||
}
|
}
|
||||||
|
|
||||||
//Kosaraju<6A>Sharir algorithm
|
//Kosaraju<6A>Sharir algorithm
|
||||||
static vector<int> getStronglyConnectedComps(vector<vector<int>>& g) {
|
static vector<int> getStronglyConnectedComps(vector<vector<int>>& g) {
|
||||||
// 1. For each vertex u of the graph, mark u as unvisited. Let l be empty.
|
// 1. For each vertex u of the graph, mark u as unvisited. Let l be empty.
|
||||||
auto size = g.size();
|
auto size = g.size();
|
||||||
@@ -1166,9 +1149,22 @@ map<FuncInfo*, vector<BBlock*>> buildCFG(const map<string, CommonBlock*>& common
|
|||||||
if (settings.withRD)
|
if (settings.withRD)
|
||||||
buildReachingDefs(result, settings);
|
buildReachingDefs(result, settings);
|
||||||
|
|
||||||
|
if (settings.withDominators)
|
||||||
|
{
|
||||||
|
auto t = high_resolution_clock::now();
|
||||||
|
for (auto& [func, bblocks] : result)
|
||||||
|
SAPFOR::buildDominatorTree(bblocks);
|
||||||
|
|
||||||
|
auto msec = duration_cast<milliseconds>(high_resolution_clock::now() - t).count();
|
||||||
|
__spf_print(1, " dominator build time is %.3f sec\n", msec / 1000.);
|
||||||
|
}
|
||||||
|
|
||||||
if (SgFile::switchToFile(oldFile) == -1)
|
if (SgFile::switchToFile(oldFile) == -1)
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
||||||
|
|
||||||
|
for (auto& [func, blocks] : result)
|
||||||
|
removedUnreachableBlocks(blocks);
|
||||||
|
|
||||||
return result;
|
return result;
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -1244,3 +1240,48 @@ map<FuncInfo*, vector<SAPFOR::BasicBlock*>>
|
|||||||
|
|
||||||
return buildCFG(commonBlocks, fileFuncInfoMap, settings);
|
return buildCFG(commonBlocks, fileFuncInfoMap, settings);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
void removedUnreachableBlocks(vector<SAPFOR::BasicBlock*>& blocks)
|
||||||
|
{
|
||||||
|
set<SAPFOR::BasicBlock*> reachable;
|
||||||
|
|
||||||
|
for (auto& b : blocks)
|
||||||
|
if (b->getInstructions().front()->isHeader() ||
|
||||||
|
b->getInstructions().front()->getInstruction()->getOperation() == SAPFOR::CFG_OP::ENTRY)
|
||||||
|
reachable.insert(b);
|
||||||
|
|
||||||
|
set<SAPFOR::BasicBlock*> worklist = reachable;
|
||||||
|
while (worklist.size() != 0)
|
||||||
|
{
|
||||||
|
set<SAPFOR::BasicBlock*> to_insert;
|
||||||
|
|
||||||
|
for (auto& b : worklist)
|
||||||
|
for (auto& next : b->getNext())
|
||||||
|
if (reachable.insert(next).second)
|
||||||
|
to_insert.insert(next);
|
||||||
|
|
||||||
|
worklist = to_insert;
|
||||||
|
}
|
||||||
|
|
||||||
|
auto remove_unreachable_it = remove_if(blocks.begin(), blocks.end(),
|
||||||
|
[&reachable](SAPFOR::BasicBlock* b)
|
||||||
|
{
|
||||||
|
if (reachable.find(b) == reachable.end())
|
||||||
|
{
|
||||||
|
for (auto& next : b->getNext())
|
||||||
|
if (reachable.find(next) != reachable.end())
|
||||||
|
next->removePrev(b);
|
||||||
|
|
||||||
|
delete b;
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
);
|
||||||
|
|
||||||
|
reachable.clear();
|
||||||
|
|
||||||
|
blocks.erase(remove_unreachable_it, blocks.end());
|
||||||
|
}
|
||||||
@@ -6,6 +6,7 @@
|
|||||||
#include <vector>
|
#include <vector>
|
||||||
|
|
||||||
#include "IR.h"
|
#include "IR.h"
|
||||||
|
#include "IR_domTree.h"
|
||||||
|
|
||||||
namespace SAPFOR
|
namespace SAPFOR
|
||||||
{
|
{
|
||||||
@@ -24,7 +25,7 @@ namespace SAPFOR
|
|||||||
|
|
||||||
std::vector<BasicBlock*> next;
|
std::vector<BasicBlock*> next;
|
||||||
std::vector<BasicBlock*> prev;
|
std::vector<BasicBlock*> prev;
|
||||||
|
BasicBlock* directDominator = NULL;
|
||||||
//reaching definition
|
//reaching definition
|
||||||
std::map<SAPFOR::Argument*, std::set<int>> RD_in, RD_out;
|
std::map<SAPFOR::Argument*, std::set<int>> RD_in, RD_out;
|
||||||
|
|
||||||
@@ -34,16 +35,16 @@ namespace SAPFOR
|
|||||||
bool addLive(const std::map<SAPFOR::Argument*, std::vector<SAPFOR::BasicBlock*>>& to_add, bool in);
|
bool addLive(const std::map<SAPFOR::Argument*, std::vector<SAPFOR::BasicBlock*>>& to_add, bool in);
|
||||||
std::map<SAPFOR::Argument*, std::vector<SAPFOR::BasicBlock*>> getLive(bool in) const;
|
std::map<SAPFOR::Argument*, std::vector<SAPFOR::BasicBlock*>> getLive(bool in) const;
|
||||||
bool removeLive(SAPFOR::Argument* to_remove, bool in);
|
bool removeLive(SAPFOR::Argument* to_remove, bool in);
|
||||||
|
|
||||||
public:
|
public:
|
||||||
BasicBlock() { num = lastNumBlock++; }
|
BasicBlock() { num = lastNumBlock++; }
|
||||||
BasicBlock(IR_Block* item);
|
BasicBlock(IR_Block* item);
|
||||||
BasicBlock(const BasicBlock& copyFrom);
|
BasicBlock(const BasicBlock& copyFrom);
|
||||||
|
|
||||||
void addInstructionBeforeInstruction(IR_Block* item, Instruction* istruction);
|
|
||||||
void addInstructionInFront(IR_Block* item);
|
|
||||||
void addInstruction(IR_Block* item);
|
void addInstruction(IR_Block* item);
|
||||||
void addPrev(BasicBlock* prev_) { prev.push_back(prev_); }
|
void addPrev(BasicBlock* prev_) { prev.push_back(prev_); }
|
||||||
void addNext(BasicBlock* next_) { next.push_back(next_); }
|
void addNext(BasicBlock* next_) { next.push_back(next_); }
|
||||||
|
void setDom(BasicBlock* dom) { directDominator = dom; }
|
||||||
|
|
||||||
int removePrev(BasicBlock* removed);
|
int removePrev(BasicBlock* removed);
|
||||||
int removeNext(BasicBlock* removed);
|
int removeNext(BasicBlock* removed);
|
||||||
@@ -71,6 +72,10 @@ namespace SAPFOR
|
|||||||
const std::vector<IR_Block*>& getInstructions() const { return instructions; }
|
const std::vector<IR_Block*>& getInstructions() const { return instructions; }
|
||||||
const std::vector<BasicBlock*>& getNext() const { return next; }
|
const std::vector<BasicBlock*>& getNext() const { return next; }
|
||||||
const std::vector<BasicBlock*>& getPrev() const { return prev; }
|
const std::vector<BasicBlock*>& getPrev() const { return prev; }
|
||||||
|
BasicBlock* getDom() const
|
||||||
|
{
|
||||||
|
return directDominator;
|
||||||
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* FOR LIVE ANALYSIS
|
* FOR LIVE ANALYSIS
|
||||||
@@ -107,13 +112,15 @@ namespace SAPFOR
|
|||||||
bool withDVM = false;
|
bool withDVM = false;
|
||||||
bool withCallsInBlocks = false; // separate each F_CALL to own BasicBlock
|
bool withCallsInBlocks = false; // separate each F_CALL to own BasicBlock
|
||||||
bool withCallFrom = true;
|
bool withCallFrom = true;
|
||||||
|
bool withDominators = true;
|
||||||
|
|
||||||
explicit CFG_Settings(int) { }
|
explicit CFG_Settings(int) { }
|
||||||
|
|
||||||
explicit CFG_Settings(bool atLeastOneIterInLoop = false, bool withRD = true, bool withRegisters = false,
|
explicit CFG_Settings(bool atLeastOneIterInLoop = false, bool withRD = true, bool withRegisters = false,
|
||||||
bool withDVM = false, bool withSPF = false, bool withCallsInBlocks = false, bool withCallFrom = true) :
|
bool withDVM = false, bool withSPF = false, bool withCallsInBlocks = false,
|
||||||
|
bool withCallFrom = true, bool withDominators = true) :
|
||||||
atLeastOneIterInLoop(atLeastOneIterInLoop), withRD(withRD), withRegisters(withRegisters), withDVM(withDVM), withSPF(withSPF),
|
atLeastOneIterInLoop(atLeastOneIterInLoop), withRD(withRD), withRegisters(withRegisters), withDVM(withDVM), withSPF(withSPF),
|
||||||
withCallsInBlocks(withCallsInBlocks), withCallFrom(withCallFrom)
|
withCallsInBlocks(withCallsInBlocks), withCallFrom(withCallFrom), withDominators(withDominators)
|
||||||
{ }
|
{ }
|
||||||
};
|
};
|
||||||
}
|
}
|
||||||
@@ -149,3 +156,5 @@ static inline void deleteCFG(std::map<FuncInfo*, std::vector<SAPFOR::BasicBlock*
|
|||||||
}
|
}
|
||||||
cfg.clear();
|
cfg.clear();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
void removedUnreachableBlocks(std::vector<SAPFOR::BasicBlock*>& blocks);
|
||||||
|
|||||||
@@ -5,7 +5,7 @@
|
|||||||
#include <set>
|
#include <set>
|
||||||
#include <algorithm>
|
#include <algorithm>
|
||||||
|
|
||||||
#include "../../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../CFGraph.h"
|
#include "../CFGraph.h"
|
||||||
#include "../IR.h"
|
#include "../IR.h"
|
||||||
|
|
||||||
|
|||||||
@@ -5,7 +5,7 @@
|
|||||||
#include <set>
|
#include <set>
|
||||||
#include <algorithm>
|
#include <algorithm>
|
||||||
|
|
||||||
#include "../../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../CFGraph.h"
|
#include "../CFGraph.h"
|
||||||
#include "../IR.h"
|
#include "../IR.h"
|
||||||
#include "../RD_subst.h"
|
#include "../RD_subst.h"
|
||||||
|
|||||||
@@ -2,7 +2,7 @@
|
|||||||
#include<vector>
|
#include<vector>
|
||||||
#include<set>
|
#include<set>
|
||||||
|
|
||||||
#include "../../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../CFGraph.h"
|
#include "../CFGraph.h"
|
||||||
#include "../IR.h"
|
#include "../IR.h"
|
||||||
|
|
||||||
|
|||||||
@@ -4,7 +4,7 @@
|
|||||||
#include<vector>
|
#include<vector>
|
||||||
#include<set>
|
#include<set>
|
||||||
|
|
||||||
#include "../../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../CFGraph.h"
|
#include "../CFGraph.h"
|
||||||
#include "../IR.h"
|
#include "../IR.h"
|
||||||
|
|
||||||
|
|||||||
@@ -1,14 +1,14 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include <vector>
|
#include <vector>
|
||||||
#include <set>
|
#include <set>
|
||||||
|
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/CommonBlock.h"
|
#include "CommonBlock.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "IR.h"
|
#include "IR.h"
|
||||||
@@ -395,7 +395,7 @@ static SAPFOR::Argument* processExpression(SgExpression* ex, vector<IR_Block*>&
|
|||||||
if (ex)
|
if (ex)
|
||||||
{
|
{
|
||||||
const int var = ex->variant();
|
const int var = ex->variant();
|
||||||
if ((var == VAR_REF || var == CONST_REF || var == LABEL_REF) && !ex->lhs() && !ex->rhs()) // обращение к переменной
|
if ((var == VAR_REF || var == CONST_REF || var == LABEL_REF) && !ex->lhs() && !ex->rhs()) // variable reference
|
||||||
{
|
{
|
||||||
if (var == CONST_REF)
|
if (var == CONST_REF)
|
||||||
{
|
{
|
||||||
@@ -450,7 +450,7 @@ static SAPFOR::Argument* processExpression(SgExpression* ex, vector<IR_Block*>&
|
|||||||
return arg1;
|
return arg1;
|
||||||
|
|
||||||
auto reg = isLeft ? NULL : createRegister();
|
auto reg = isLeft ? NULL : createRegister();
|
||||||
Instruction* instr = new Instruction(isLeft ? CFG_OP::STORE : CFG_OP::LOAD, arg1, createConstArg(numArgs), isLeft ? isLeft : reg);
|
Instruction* instr = new Instruction(isLeft ? CFG_OP::STORE : CFG_OP::LOAD, arg1, createConstArg(numArgs), isLeft ? isLeft : reg, NULL, ex);
|
||||||
blocks.push_back(new IR_Block(instr));
|
blocks.push_back(new IR_Block(instr));
|
||||||
return reg;
|
return reg;
|
||||||
}
|
}
|
||||||
@@ -485,7 +485,7 @@ static SAPFOR::Argument* processExpression(SgExpression* ex, vector<IR_Block*>&
|
|||||||
auto arg1 = arrayRef ? arrayRef : createArrayArg(ref, blocks, func, numArgs, commonVars);
|
auto arg1 = arrayRef ? arrayRef : createArrayArg(ref, blocks, func, numArgs, commonVars);
|
||||||
|
|
||||||
auto reg = isLeft ? NULL : createRegister();
|
auto reg = isLeft ? NULL : createRegister();
|
||||||
instr = new Instruction(isLeft ? CFG_OP::STORE : CFG_OP::LOAD, arg1, createConstArg(1), isLeft ? isLeft : reg);
|
instr = new Instruction(isLeft ? CFG_OP::STORE : CFG_OP::LOAD, arg1, createConstArg(1), isLeft ? isLeft : reg, NULL, ex);
|
||||||
blocks.push_back(new IR_Block(instr));
|
blocks.push_back(new IR_Block(instr));
|
||||||
return reg;
|
return reg;
|
||||||
}
|
}
|
||||||
@@ -602,7 +602,7 @@ static SAPFOR::Argument* processExpression(SgExpression* ex, vector<IR_Block*>&
|
|||||||
{
|
{
|
||||||
if (returnReg == NULL)
|
if (returnReg == NULL)
|
||||||
{
|
{
|
||||||
Instruction* instr = new Instruction(CFG_OP::LOAD, arg, NULL, reg);
|
Instruction* instr = new Instruction(CFG_OP::LOAD, arg, NULL, reg, NULL, ex);
|
||||||
blocks.push_back(new IR_Block(instr));
|
blocks.push_back(new IR_Block(instr));
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
@@ -1572,7 +1572,7 @@ vector<IR_Block*> buildIR(SgStatement* function, const FuncInfo* func, const vec
|
|||||||
else
|
else
|
||||||
findReturn(0, blocks.size(), blocks, blocks.back()->getNumber());
|
findReturn(0, blocks.size(), blocks, blocks.back()->getNumber());
|
||||||
|
|
||||||
// добавление связей по GOTO и переходам
|
// adding links by GOTO and jumps
|
||||||
for (int z = 0; z < blocks.size(); ++z)
|
for (int z = 0; z < blocks.size(); ++z)
|
||||||
{
|
{
|
||||||
auto op = blocks[z]->getInstruction()->getOperation();
|
auto op = blocks[z]->getInstruction()->getOperation();
|
||||||
@@ -1592,7 +1592,7 @@ vector<IR_Block*> buildIR(SgStatement* function, const FuncInfo* func, const vec
|
|||||||
|
|
||||||
blocks[z]->setJump(it->second);
|
blocks[z]->setJump(it->second);
|
||||||
|
|
||||||
// заменим метку на номер инструкции
|
// replacing the label with the instruction number
|
||||||
arg->setValue(to_string(it->second->getNumber()));
|
arg->setValue(to_string(it->second->getNumber()));
|
||||||
arg->setType(CFG_ARG_TYPE::INSTR);
|
arg->setType(CFG_ARG_TYPE::INSTR);
|
||||||
}
|
}
|
||||||
@@ -1613,429 +1613,3 @@ vector<IR_Block*> buildIR(SgStatement* function, const FuncInfo* func, const vec
|
|||||||
|
|
||||||
return blocks;
|
return blocks;
|
||||||
}
|
}
|
||||||
|
|
||||||
enum VisitState { UNVISITED = 0, VISITING = 1, VISITED = 2 };
|
|
||||||
|
|
||||||
void dfs(SAPFOR::BasicBlock* block, map<int, int>& visit, vector<pair<SAPFOR::BasicBlock*, SAPFOR::BasicBlock*>>& startAndEnd, SAPFOR::BasicBlock* prev) {
|
|
||||||
if (!block) return;
|
|
||||||
|
|
||||||
if (visit[block->getNumber()] == VISITED) {
|
|
||||||
cout << "error";
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (visit[block->getNumber()] == VISITING) {
|
|
||||||
visit[block->getNumber()] = VISITED;
|
|
||||||
startAndEnd.push_back(make_pair(prev, block));
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
|
|
||||||
visit[block->getNumber()] = VISITING;
|
|
||||||
for (auto i : block->getNext()) {
|
|
||||||
dfs(i, visit, startAndEnd, block);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
static void printBlock(SAPFOR::BasicBlock* block) {
|
|
||||||
cout << "block - " << block->getNumber() << endl;
|
|
||||||
cout << "next -";
|
|
||||||
for (auto i : block->getNext())
|
|
||||||
{
|
|
||||||
cout << " " << i->getNumber();
|
|
||||||
}
|
|
||||||
cout << endl << "prev -";
|
|
||||||
for (auto i : block->getPrev())
|
|
||||||
{
|
|
||||||
cout << " " << i->getNumber();
|
|
||||||
}
|
|
||||||
cout << endl;
|
|
||||||
|
|
||||||
for (auto i : block->getInstructions())
|
|
||||||
{
|
|
||||||
string resValue = "";
|
|
||||||
string arg1Value = "";
|
|
||||||
string arg2Value = "";
|
|
||||||
if (i->getInstruction()->getResult() != nullptr && i->getInstruction()->getResult()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
resValue = i->getInstruction()->getResult()->getValue();
|
|
||||||
i->getInstruction()->getResult()->setValue(i->getInstruction()->getResult()->getValue() + to_string(i->getInstruction()->getResult()->getNumber()));
|
|
||||||
}
|
|
||||||
if (i->getInstruction()->getArg1() != nullptr && i->getInstruction()->getArg1()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
arg1Value = i->getInstruction()->getArg1()->getValue();
|
|
||||||
i->getInstruction()->getArg1()->setValue(i->getInstruction()->getArg1()->getValue() + to_string(i->getInstruction()->getArg1()->getNumber()));
|
|
||||||
}
|
|
||||||
if (i->getInstruction()->getArg2() != nullptr && i->getInstruction()->getArg2()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
arg2Value = i->getInstruction()->getArg2()->getValue();
|
|
||||||
i->getInstruction()->getArg2()->setValue(i->getInstruction()->getArg2()->getValue() + to_string(i->getInstruction()->getArg2()->getNumber()));
|
|
||||||
}
|
|
||||||
|
|
||||||
cout << i->getNumber() << " " << i->getInstruction()->dump() << endl;
|
|
||||||
|
|
||||||
if (i->getInstruction()->getResult() != nullptr && i->getInstruction()->getResult()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
i->getInstruction()->getResult()->setValue(resValue);
|
|
||||||
}
|
|
||||||
if (i->getInstruction()->getArg1() != nullptr && i->getInstruction()->getArg1()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
i->getInstruction()->getArg1()->setValue(arg1Value);
|
|
||||||
}
|
|
||||||
if (i->getInstruction()->getArg2() != nullptr && i->getInstruction()->getArg2()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
i->getInstruction()->getArg2()->setValue(arg2Value);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
cout << endl;
|
|
||||||
}
|
|
||||||
|
|
||||||
void getLoopBody(SAPFOR::BasicBlock* loopHeader, const std::set<SAPFOR::BasicBlock*>& loopExits, std::vector<SAPFOR::BasicBlock*>& loopBody) {
|
|
||||||
std::set<SAPFOR::BasicBlock*> visited;
|
|
||||||
std::stack<SAPFOR::BasicBlock*> stack;
|
|
||||||
|
|
||||||
stack.push(loopHeader);
|
|
||||||
|
|
||||||
while (!stack.empty()) {
|
|
||||||
auto block = stack.top();
|
|
||||||
stack.pop();
|
|
||||||
|
|
||||||
if (visited.count(block)) continue;
|
|
||||||
visited.insert(block);
|
|
||||||
|
|
||||||
for (auto succ : block->getNext()) {
|
|
||||||
if (loopExits.count(succ)) continue;
|
|
||||||
if (!visited.count(succ)) {
|
|
||||||
stack.push(succ);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
std::set<SAPFOR::BasicBlock*> backReachable;
|
|
||||||
std::stack<SAPFOR::BasicBlock*> reverseStack;
|
|
||||||
reverseStack.push(loopHeader);
|
|
||||||
|
|
||||||
while (!reverseStack.empty()) {
|
|
||||||
auto block = reverseStack.top();
|
|
||||||
reverseStack.pop();
|
|
||||||
|
|
||||||
if (backReachable.count(block)) continue;
|
|
||||||
backReachable.insert(block);
|
|
||||||
|
|
||||||
for (auto pred : block->getPrev()) {
|
|
||||||
if (visited.count(pred) && !backReachable.count(pred)) {
|
|
||||||
reverseStack.push(pred);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
for (auto block : visited) {
|
|
||||||
if (backReachable.count(block)) {
|
|
||||||
loopBody.push_back(block);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
set<SAPFOR::Argument*> findRegisterSourceVariables(const std::vector<SAPFOR::BasicBlock*>& blocks, SAPFOR::Argument* var) {
|
|
||||||
std::set<SAPFOR::Argument*> result;
|
|
||||||
std::set<SAPFOR::Argument*> visited;
|
|
||||||
std::stack<SAPFOR::Argument*> workStack;
|
|
||||||
workStack.push(var);
|
|
||||||
|
|
||||||
auto isBinaryOp = [](SAPFOR::CFG_OP op) {
|
|
||||||
return op == SAPFOR::CFG_OP::ADD || op == SAPFOR::CFG_OP::SUBT ||
|
|
||||||
op == SAPFOR::CFG_OP::MULT || op == SAPFOR::CFG_OP::DIV ||
|
|
||||||
op == SAPFOR::CFG_OP::POW ||
|
|
||||||
op == SAPFOR::CFG_OP::GE || op == SAPFOR::CFG_OP::LE ||
|
|
||||||
op == SAPFOR::CFG_OP::GT || op == SAPFOR::CFG_OP::LT ||
|
|
||||||
op == SAPFOR::CFG_OP::EQ || op == SAPFOR::CFG_OP::NEQV ||
|
|
||||||
op == SAPFOR::CFG_OP::EQV || op == SAPFOR::CFG_OP::EMPTY ||
|
|
||||||
op == SAPFOR::CFG_OP::OR || op == SAPFOR::CFG_OP::AND;
|
|
||||||
};
|
|
||||||
|
|
||||||
auto isUnaryOp = [](SAPFOR::CFG_OP op) {
|
|
||||||
return op == SAPFOR::CFG_OP::UN_ADD || op == SAPFOR::CFG_OP::UN_MINUS ||
|
|
||||||
op == SAPFOR::CFG_OP::NOT || op == SAPFOR::CFG_OP::ASSIGN;
|
|
||||||
};
|
|
||||||
|
|
||||||
while (!workStack.empty()) {
|
|
||||||
auto variable = workStack.top();
|
|
||||||
workStack.pop();
|
|
||||||
if (!variable || visited.count(variable))
|
|
||||||
continue;
|
|
||||||
|
|
||||||
visited.insert(variable);
|
|
||||||
|
|
||||||
for (auto block : blocks) {
|
|
||||||
for (auto instrWrapper : block->getInstructions()) {
|
|
||||||
auto instr = instrWrapper->getInstruction();
|
|
||||||
if (!instr || instr->getResult() != variable)
|
|
||||||
continue;
|
|
||||||
|
|
||||||
auto op = instr->getOperation();
|
|
||||||
auto arg1 = instr->getArg1();
|
|
||||||
auto arg2 = instr->getArg2();
|
|
||||||
|
|
||||||
if (isBinaryOp(op) && arg1 && arg2) {
|
|
||||||
if (arg1->getType() == CFG_ARG_TYPE::VAR)
|
|
||||||
result.insert(arg1);
|
|
||||||
else if (arg1->getType() == CFG_ARG_TYPE::REG)
|
|
||||||
workStack.push(arg1);
|
|
||||||
|
|
||||||
if (arg2->getType() == CFG_ARG_TYPE::VAR)
|
|
||||||
result.insert(arg2);
|
|
||||||
else if (arg2->getType() == CFG_ARG_TYPE::REG)
|
|
||||||
workStack.push(arg2);
|
|
||||||
}
|
|
||||||
else if (isUnaryOp(op) && arg1) {
|
|
||||||
if (arg1->getType() == CFG_ARG_TYPE::VAR)
|
|
||||||
result.insert(arg1);
|
|
||||||
else if (arg1->getType() == CFG_ARG_TYPE::REG)
|
|
||||||
workStack.push(arg1);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return result;
|
|
||||||
}
|
|
||||||
|
|
||||||
std::vector<SAPFOR::Instruction*> getPhiArguments(SAPFOR::BasicBlock* block, SAPFOR::Instruction* phiInstr) {
|
|
||||||
std::vector<SAPFOR::Instruction*> result;
|
|
||||||
|
|
||||||
auto& instructions = block->getInstructions();
|
|
||||||
bool collecting = false;
|
|
||||||
for (int i = instructions.size() - 1; i >= 0; --i) {
|
|
||||||
auto instr = instructions[i]->getInstruction();
|
|
||||||
|
|
||||||
if (collecting) {
|
|
||||||
if (instr->getOperation() == SAPFOR::CFG_OP::PARAM) {
|
|
||||||
auto arg = instr->getArg1();
|
|
||||||
if (arg) {
|
|
||||||
result.push_back(instr);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
else {
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!instr) continue;
|
|
||||||
|
|
||||||
if (instr == phiInstr) {
|
|
||||||
collecting = true;
|
|
||||||
continue;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
std::reverse(result.begin(), result.end());
|
|
||||||
return result;
|
|
||||||
}
|
|
||||||
|
|
||||||
SAPFOR::BasicBlock* findInstructionBlock(SAPFOR::Instruction* targetInstr, const std::vector<SAPFOR::BasicBlock*>& blocks) {
|
|
||||||
for (auto block : blocks) {
|
|
||||||
for (auto instrWrapper : block->getInstructions()) {
|
|
||||||
auto instr = instrWrapper->getInstruction();
|
|
||||||
if (instr == targetInstr) {
|
|
||||||
return block;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return nullptr;
|
|
||||||
}
|
|
||||||
|
|
||||||
SAPFOR::BasicBlock* findInstructionBlockByNumber(int number, const std::vector<SAPFOR::BasicBlock*>& blocks) {
|
|
||||||
for (auto block : blocks) {
|
|
||||||
for (auto instrWrapper : block->getInstructions()) {
|
|
||||||
auto instr = instrWrapper->getInstruction();
|
|
||||||
if (instr->getNumber() == number) {
|
|
||||||
return block;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return nullptr;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
void findInductiveVars(const std::vector<SAPFOR::BasicBlock*>& blocks, const std::vector<SAPFOR::BasicBlock*>& Loopblocks, SAPFOR::BasicBlock* loopHeader, const std::set<SAPFOR::BasicBlock*>& loopExits) {
|
|
||||||
std::set<string> inductiveVars;
|
|
||||||
std::set<SAPFOR::BasicBlock*> relevantBlocks = { loopHeader };
|
|
||||||
|
|
||||||
for (auto block : relevantBlocks) {
|
|
||||||
|
|
||||||
for (auto instrWrapper : block->getInstructions()) {
|
|
||||||
auto instr = instrWrapper->getInstruction();
|
|
||||||
if (!instr) continue;
|
|
||||||
|
|
||||||
auto op = instr->getOperation();
|
|
||||||
auto res = instr->getResult();
|
|
||||||
auto arg1 = instr->getArg1();
|
|
||||||
auto arg2 = instr->getArg2();
|
|
||||||
|
|
||||||
if (op == CFG_OP::JUMP_IF) {
|
|
||||||
if (arg1 && arg1->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
inductiveVars.insert(arg1->getValue());
|
|
||||||
}
|
|
||||||
if (arg1 && arg1->getType() == CFG_ARG_TYPE::REG) {
|
|
||||||
auto foundVariables = findRegisterSourceVariables(blocks, arg1);
|
|
||||||
for (auto var : foundVariables) {
|
|
||||||
inductiveVars.insert(var->getValue());
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
std::set<string> finalInductiveVars;
|
|
||||||
|
|
||||||
for (auto instrWrapper : loopHeader->getInstructions()) {
|
|
||||||
auto instr = instrWrapper->getInstruction();
|
|
||||||
if (!instr || instr->getOperation() != SAPFOR::CFG_OP::F_CALL || !instr->getArg1() || instr->getArg1()->getValue() != "FI_FUNCTION") continue;
|
|
||||||
|
|
||||||
auto phiRes = instr->getResult();
|
|
||||||
if (!phiRes || !inductiveVars.count(phiRes->getValue())) continue;
|
|
||||||
|
|
||||||
auto currentBlock = findInstructionBlock(instr, blocks);
|
|
||||||
if (!currentBlock) continue;
|
|
||||||
|
|
||||||
auto phiArgs = getPhiArguments(currentBlock, instr);
|
|
||||||
|
|
||||||
bool hasInLoopDefinition = false;
|
|
||||||
|
|
||||||
for (const auto& argInstr : phiArgs) {
|
|
||||||
if (!argInstr) continue;
|
|
||||||
|
|
||||||
int definitionInstrNumber = stoi(argInstr->getArg1()->getValue());
|
|
||||||
if (definitionInstrNumber == -1) continue;
|
|
||||||
|
|
||||||
auto phiBlock = findInstructionBlockByNumber(definitionInstrNumber, blocks);
|
|
||||||
if (!phiBlock) continue;
|
|
||||||
|
|
||||||
if (std::find(Loopblocks.begin(), Loopblocks.end(), phiBlock) != Loopblocks.end()) {
|
|
||||||
hasInLoopDefinition = true;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if (hasInLoopDefinition) {
|
|
||||||
finalInductiveVars.insert(phiRes->getValue());
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
for (auto i : finalInductiveVars) {
|
|
||||||
std::cout << "Confirmed inductive variable: " << i << std::endl;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (finalInductiveVars.empty()) {
|
|
||||||
std::cout << "No confirmed inductive variables found." << std::endl;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
Instruction* findInstructionAfterLoop(const std::vector<SAPFOR::BasicBlock*>& loopBody) {
|
|
||||||
std::set<SAPFOR::BasicBlock*> loopSet(loopBody.begin(), loopBody.end());
|
|
||||||
|
|
||||||
for (auto block : loopBody) {
|
|
||||||
for (auto succ : block->getNext()) {
|
|
||||||
if (!loopSet.count(succ)) {
|
|
||||||
// Нашли выход из цикла — возьмём первую инструкцию
|
|
||||||
auto instructions = succ->getInstructions();
|
|
||||||
for (auto wrapper : instructions) {
|
|
||||||
if (auto instr = wrapper->getInstruction()) {
|
|
||||||
return instr;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return nullptr; // не нашли
|
|
||||||
}
|
|
||||||
|
|
||||||
bool isEqual(const char* cstr, const std::string& str) {
|
|
||||||
return str == cstr;
|
|
||||||
}
|
|
||||||
|
|
||||||
void exploreLoops(map<FuncInfo*, vector<SAPFOR::BasicBlock*>>* fullIR, const char* fileName) {
|
|
||||||
for (auto& i : *fullIR)
|
|
||||||
{
|
|
||||||
//for (auto j : i.second)
|
|
||||||
// printblock(j);
|
|
||||||
|
|
||||||
if (!isEqual(fileName, i.first->fileName))
|
|
||||||
continue;
|
|
||||||
|
|
||||||
map<int, int> visited;
|
|
||||||
for (auto i : i.second)
|
|
||||||
visited[i->getNumber()] = UNVISITED;
|
|
||||||
|
|
||||||
//vector<int> visited(i.second.size(), UNVISITED);
|
|
||||||
vector<pair<SAPFOR::BasicBlock*, SAPFOR::BasicBlock*>> startAndEnd;
|
|
||||||
dfs(i.second[0], visited, startAndEnd, NULL);
|
|
||||||
|
|
||||||
vector<LoopGraph*> loops;
|
|
||||||
|
|
||||||
for (auto& [tail, header] : startAndEnd) {
|
|
||||||
set<SAPFOR::BasicBlock*> loopExits;
|
|
||||||
|
|
||||||
for (auto succ : tail->getNext()) {
|
|
||||||
if (succ != header) {
|
|
||||||
loopExits.insert(succ);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
vector<SAPFOR::BasicBlock*> loopBody;
|
|
||||||
getLoopBody(header, loopExits, loopBody);
|
|
||||||
|
|
||||||
cout << "LOOP DETECTED:" << endl;
|
|
||||||
cout << " Header: " << header->getNumber() << endl;
|
|
||||||
cout << " Tail: " << tail->getNumber() << endl;
|
|
||||||
cout << " Body blocks: ";
|
|
||||||
for (auto block : loopBody) {
|
|
||||||
cout << block->getNumber() << " ";
|
|
||||||
}
|
|
||||||
cout << endl;
|
|
||||||
|
|
||||||
findInductiveVars(i.second, loopBody, header, loopExits);
|
|
||||||
|
|
||||||
|
|
||||||
Instruction* instructionAfterLoop = findInstructionAfterLoop(loopBody);
|
|
||||||
|
|
||||||
if (instructionAfterLoop == NULL) {
|
|
||||||
cout << "Warning: instruction after loop not found!" << endl;
|
|
||||||
continue;
|
|
||||||
}
|
|
||||||
auto firstInstruction = header->getInstructions()[0]->getInstruction();
|
|
||||||
auto lastInstruction = tail->getInstructions().back()->getInstruction();
|
|
||||||
|
|
||||||
cout << "first - " << firstInstruction->getNumber() << " last - " << lastInstruction->getNumber() << " after - " << instructionAfterLoop->getNumber() << endl;
|
|
||||||
auto x = firstInstruction->getOperator();
|
|
||||||
|
|
||||||
auto tmpLoop = new LoopGraph();
|
|
||||||
tmpLoop->isFor = true;
|
|
||||||
tmpLoop->lineNum = firstInstruction->getOperator()->lineNumber();
|
|
||||||
tmpLoop->lineNumAfterLoop = instructionAfterLoop->getOperator()->lineNumber();
|
|
||||||
|
|
||||||
if (firstInstruction->getOperator()->variant() == FOR_NODE) {
|
|
||||||
SgForStmt* stmt = isSgForStmt(firstInstruction->getOperator());
|
|
||||||
|
|
||||||
cout << "for loop" << endl;// << stmt->sunparse() << endl;
|
|
||||||
}
|
|
||||||
else if (firstInstruction->getOperator()->variant() == WHILE_NODE) {
|
|
||||||
SgWhileStmt* stmt = isSgWhileStmt(firstInstruction->getOperator());
|
|
||||||
|
|
||||||
cout << (stmt->conditional() == NULL ? "infinit" : "") << "while loop" << endl;//<< stmt->sunparse() << endl;
|
|
||||||
}
|
|
||||||
else if (firstInstruction->getOperator()->variant() == DO_WHILE_NODE) {
|
|
||||||
SgWhileStmt* stmt = isSgDoWhileStmt(firstInstruction->getOperator());
|
|
||||||
|
|
||||||
cout << "do while loop" << endl;// << stmt->sunparse() << endl;
|
|
||||||
}
|
|
||||||
else if (firstInstruction->getOperator()->variant() == LOOP_NODE) {
|
|
||||||
cout << "not known loop" << endl;// << firstInstruction->getOperator()->sunparse() << endl;
|
|
||||||
}
|
|
||||||
else {
|
|
||||||
|
|
||||||
cout << "goto loop" << endl;// firstInstruction->getOperator()->sunparse() << endl;
|
|
||||||
}
|
|
||||||
|
|
||||||
cout << "loop start line " << tmpLoop->lineNum << endl;
|
|
||||||
cout << "after loop line " << tmpLoop->lineNumAfterLoop << endl << endl;
|
|
||||||
|
|
||||||
loops.push_back(tmpLoop);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
@@ -6,7 +6,7 @@
|
|||||||
#include <algorithm>
|
#include <algorithm>
|
||||||
|
|
||||||
#include "CFGraph.h"
|
#include "CFGraph.h"
|
||||||
#include "../Utils/CommonBlock.h"
|
#include "CommonBlock.h"
|
||||||
|
|
||||||
namespace SAPFOR
|
namespace SAPFOR
|
||||||
{
|
{
|
||||||
@@ -42,7 +42,6 @@ namespace SAPFOR
|
|||||||
Argument() : number(lastNumArg++), type(CFG_ARG_TYPE::NONE), value(""), mType(CFG_MEM_TYPE::NONE_) { }
|
Argument() : number(lastNumArg++), type(CFG_ARG_TYPE::NONE), value(""), mType(CFG_MEM_TYPE::NONE_) { }
|
||||||
Argument(CFG_ARG_TYPE type, CFG_MEM_TYPE mType) : number(lastNumArg++), type(type), mType(mType), value("") { }
|
Argument(CFG_ARG_TYPE type, CFG_MEM_TYPE mType) : number(lastNumArg++), type(type), mType(mType), value("") { }
|
||||||
Argument(CFG_ARG_TYPE type, CFG_MEM_TYPE mType, const std::string& value) : number(lastNumArg++), type(type), mType(mType), value(value) { }
|
Argument(CFG_ARG_TYPE type, CFG_MEM_TYPE mType, const std::string& value) : number(lastNumArg++), type(type), mType(mType), value(value) { }
|
||||||
Argument(CFG_ARG_TYPE type, CFG_MEM_TYPE mType, const std::string& value, int num) : number(num), type(type), mType(mType), value(value) { }
|
|
||||||
Argument(CFG_ARG_TYPE type, const std::string& value) : number(lastNumArg++), type(type), mType(CFG_MEM_TYPE::NONE_), value(value)
|
Argument(CFG_ARG_TYPE type, const std::string& value) : number(lastNumArg++), type(type), mType(CFG_MEM_TYPE::NONE_), value(value)
|
||||||
{
|
{
|
||||||
if (type != CFG_ARG_TYPE::INSTR && type == CFG_ARG_TYPE::LAB &&
|
if (type != CFG_ARG_TYPE::INSTR && type == CFG_ARG_TYPE::LAB &&
|
||||||
@@ -51,12 +50,6 @@ namespace SAPFOR
|
|||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
Argument(const Argument& other)
|
|
||||||
: number(other.number),
|
|
||||||
type(other.type),
|
|
||||||
mType(other.mType),
|
|
||||||
value(other.value)
|
|
||||||
{ }
|
|
||||||
|
|
||||||
void setType(CFG_ARG_TYPE newType) { type = newType; }
|
void setType(CFG_ARG_TYPE newType) { type = newType; }
|
||||||
CFG_ARG_TYPE getType() const { return type; }
|
CFG_ARG_TYPE getType() const { return type; }
|
||||||
@@ -351,5 +344,3 @@ SAPFOR::Instruction* getInstructionByNumber(const std::vector<SAPFOR::IR_Block*>
|
|||||||
std::pair<SAPFOR::Instruction*, SAPFOR::BasicBlock*> getInstructionAndBlockByNumber(const std::map<FuncInfo*, std::vector<SAPFOR::BasicBlock*>>& CFGraph, int num);
|
std::pair<SAPFOR::Instruction*, SAPFOR::BasicBlock*> getInstructionAndBlockByNumber(const std::map<FuncInfo*, std::vector<SAPFOR::BasicBlock*>>& CFGraph, int num);
|
||||||
std::pair<SAPFOR::Instruction*, SAPFOR::BasicBlock*> getInstructionAndBlockByStatement(const std::map<FuncInfo*, std::vector<SAPFOR::BasicBlock*>>& CFGraph, SgStatement* stmt);
|
std::pair<SAPFOR::Instruction*, SAPFOR::BasicBlock*> getInstructionAndBlockByStatement(const std::map<FuncInfo*, std::vector<SAPFOR::BasicBlock*>>& CFGraph, SgStatement* stmt);
|
||||||
int getParamIndex(SAPFOR::Argument* func_param, int max_index);
|
int getParamIndex(SAPFOR::Argument* func_param, int max_index);
|
||||||
|
|
||||||
void exploreLoops(std::map<FuncInfo*, std::vector<SAPFOR::BasicBlock*>>* fullIR, const char* fileName);
|
|
||||||
@@ -1,633 +0,0 @@
|
|||||||
#include <stdlib.h>
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <vector>
|
|
||||||
#include <set>
|
|
||||||
|
|
||||||
#include "../Utils/SgUtils.h"
|
|
||||||
#include "../Utils/CommonBlock.h"
|
|
||||||
#include "../GraphCall/graph_calls.h"
|
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
|
||||||
|
|
||||||
#include "dvm.h"
|
|
||||||
#include "IR.h"
|
|
||||||
#include "CFGraph.h"
|
|
||||||
|
|
||||||
using namespace std;
|
|
||||||
using namespace SAPFOR;
|
|
||||||
|
|
||||||
typedef SAPFOR::BasicBlock BBlock;
|
|
||||||
typedef SAPFOR::Argument BArgument;
|
|
||||||
|
|
||||||
static void printBlock(BBlock* block) {
|
|
||||||
cout << "block - " << block->getNumber() << endl;
|
|
||||||
cout << "next -";
|
|
||||||
for (auto i : block->getNext())
|
|
||||||
{
|
|
||||||
cout << " " << i->getNumber();
|
|
||||||
}
|
|
||||||
cout << endl << "prev -";
|
|
||||||
for (auto i : block->getPrev())
|
|
||||||
{
|
|
||||||
cout << " " << i->getNumber();
|
|
||||||
}
|
|
||||||
cout << endl;
|
|
||||||
|
|
||||||
for (auto i : block->getInstructions())
|
|
||||||
{
|
|
||||||
string resValue = "";
|
|
||||||
string arg1Value = "";
|
|
||||||
string arg2Value = "";
|
|
||||||
if (i->getInstruction()->getResult() != nullptr && i->getInstruction()->getResult()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
resValue = i->getInstruction()->getResult()->getValue();
|
|
||||||
i->getInstruction()->getResult()->setValue(i->getInstruction()->getResult()->getValue() + to_string(i->getInstruction()->getResult()->getNumber()));
|
|
||||||
}
|
|
||||||
if (i->getInstruction()->getArg1() != nullptr && i->getInstruction()->getArg1()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
arg1Value = i->getInstruction()->getArg1()->getValue();
|
|
||||||
i->getInstruction()->getArg1()->setValue(i->getInstruction()->getArg1()->getValue() + to_string(i->getInstruction()->getArg1()->getNumber()));
|
|
||||||
}
|
|
||||||
if (i->getInstruction()->getArg2() != nullptr && i->getInstruction()->getArg2()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
arg2Value = i->getInstruction()->getArg2()->getValue();
|
|
||||||
i->getInstruction()->getArg2()->setValue(i->getInstruction()->getArg2()->getValue() + to_string(i->getInstruction()->getArg2()->getNumber()));
|
|
||||||
}
|
|
||||||
|
|
||||||
cout << i->getNumber() << " " << i->getInstruction()->dump() << endl;
|
|
||||||
|
|
||||||
if (i->getInstruction()->getResult() != nullptr && i->getInstruction()->getResult()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
i->getInstruction()->getResult()->setValue(resValue);
|
|
||||||
}
|
|
||||||
if (i->getInstruction()->getArg1() != nullptr && i->getInstruction()->getArg1()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
i->getInstruction()->getArg1()->setValue(arg1Value);
|
|
||||||
}
|
|
||||||
if (i->getInstruction()->getArg2() != nullptr && i->getInstruction()->getArg2()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
i->getInstruction()->getArg2()->setValue(arg2Value);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
cout << endl;
|
|
||||||
}
|
|
||||||
|
|
||||||
template <typename T>
|
|
||||||
static bool compareVectors(const vector<T>* vec1, const vector<T>* vec2) {
|
|
||||||
if (vec1 == vec2) {
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!vec1 || !vec2) {
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
vector<T> sortedVec1 = *vec1;
|
|
||||||
vector<T> sortedVec2 = *vec2;
|
|
||||||
|
|
||||||
sort(sortedVec1.begin(), sortedVec1.end());
|
|
||||||
sort(sortedVec2.begin(), sortedVec2.end());
|
|
||||||
|
|
||||||
return sortedVec1 == sortedVec2;
|
|
||||||
}
|
|
||||||
|
|
||||||
template <typename T>
|
|
||||||
static vector<T>* getCommonElements(const vector<vector<T>>* vectors) {
|
|
||||||
if (!vectors || vectors->empty()) {
|
|
||||||
return new vector<T>(); // Return an empty vector if input is null or empty
|
|
||||||
}
|
|
||||||
|
|
||||||
// Start with the first vector
|
|
||||||
vector<T>* commonElements = new vector<T>((*vectors)[0]);
|
|
||||||
|
|
||||||
for (size_t i = 1; i < vectors->size(); ++i) {
|
|
||||||
vector<T> tempCommon;
|
|
||||||
|
|
||||||
// Sort the current vector and common result for intersection
|
|
||||||
vector<T> sortedVec = (*vectors)[i];
|
|
||||||
sort(commonElements->begin(), commonElements->end());
|
|
||||||
sort(sortedVec.begin(), sortedVec.end());
|
|
||||||
|
|
||||||
// Find the intersection
|
|
||||||
set_intersection(
|
|
||||||
commonElements->begin(), commonElements->end(),
|
|
||||||
sortedVec.begin(), sortedVec.end(),
|
|
||||||
back_inserter(tempCommon)
|
|
||||||
);
|
|
||||||
|
|
||||||
// Update common result
|
|
||||||
*commonElements = tempCommon;
|
|
||||||
|
|
||||||
// If no common elements left, break early
|
|
||||||
if (commonElements->empty()) {
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return commonElements;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
static map<BBlock*, vector<BBlock*>> findDominators(vector<BBlock*> blocks) {
|
|
||||||
map<BBlock*, vector<BBlock*>> result;
|
|
||||||
|
|
||||||
bool changed = true;
|
|
||||||
while (changed) {
|
|
||||||
changed = false;
|
|
||||||
|
|
||||||
for (auto currentBlock : blocks) {
|
|
||||||
auto pred = currentBlock->getPrev();
|
|
||||||
auto prevDominators = new vector<vector<BBlock*>>();
|
|
||||||
|
|
||||||
for (auto predBlock : pred)
|
|
||||||
prevDominators->push_back(result.find(predBlock) != result.end() ? result[predBlock] : blocks);
|
|
||||||
|
|
||||||
auto currentBlockResult = getCommonElements(prevDominators);
|
|
||||||
currentBlockResult->push_back(currentBlock);
|
|
||||||
|
|
||||||
if (result.find(currentBlock) == result.end() || !compareVectors(currentBlockResult, &result[currentBlock])) {
|
|
||||||
result[currentBlock] = *currentBlockResult;
|
|
||||||
changed = true;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return result;
|
|
||||||
}
|
|
||||||
|
|
||||||
static void RenumberBlocks(BBlock* current, int* n, map<int, int>* res, set<BBlock*>* visited) {
|
|
||||||
if (visited->find(current) != visited->end()) {
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
|
|
||||||
visited->insert(current);
|
|
||||||
|
|
||||||
vector<BBlock*> nextBlocks = current->getNext();
|
|
||||||
|
|
||||||
sort(nextBlocks.begin(), nextBlocks.end(), [](BBlock* a, BBlock* b) {
|
|
||||||
return a->getInstructions()[0]->getInstruction()->getOperator()->lineNumber() > b->getInstructions()[0]->getInstruction()->getOperator()->lineNumber();
|
|
||||||
});
|
|
||||||
|
|
||||||
for (auto i : nextBlocks) {
|
|
||||||
RenumberBlocks(i, n, res, visited);
|
|
||||||
}
|
|
||||||
|
|
||||||
(*res)[current->getNumber()] = *n;
|
|
||||||
*n -= 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static map<BBlock*, vector<BBlock*>> findDominatorBorders(vector<BBlock*>& blocks, map<BBlock*, BBlock*>& iDominators) {
|
|
||||||
map<BBlock*, vector<BBlock*>> result;
|
|
||||||
|
|
||||||
for (auto block : blocks) {
|
|
||||||
result[block] = *(new vector<BBlock*>());
|
|
||||||
}
|
|
||||||
|
|
||||||
for (auto block : blocks) {
|
|
||||||
if (block->getPrev().size() > 1) {
|
|
||||||
for (auto prev : block->getPrev()) {
|
|
||||||
auto tmpBlock = prev;
|
|
||||||
auto test = iDominators[block];
|
|
||||||
auto test2 = iDominators[prev];
|
|
||||||
|
|
||||||
while (tmpBlock != iDominators[block]) {
|
|
||||||
result[tmpBlock].push_back(block);
|
|
||||||
tmpBlock = iDominators[tmpBlock];
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return result;
|
|
||||||
}
|
|
||||||
|
|
||||||
static BBlock* findImmediateDominatorsDfsHelper(BBlock* block, BBlock* currentBlock, BBlock* currentImmediateDominator, vector<BBlock*> &visited, map<BBlock*, vector<BBlock*>>& dominators) {
|
|
||||||
if (block == currentBlock) {
|
|
||||||
return currentImmediateDominator;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (find(visited.begin(), visited.end(), currentBlock) != visited.end()) {
|
|
||||||
return nullptr;
|
|
||||||
}
|
|
||||||
|
|
||||||
visited.push_back(currentBlock);
|
|
||||||
|
|
||||||
if (find(dominators[block].begin(), dominators[block].end(), currentBlock) != dominators[block].end()) {
|
|
||||||
currentImmediateDominator = currentBlock;
|
|
||||||
}
|
|
||||||
|
|
||||||
for (auto nextBlock : currentBlock->getNext()) {
|
|
||||||
auto result = findImmediateDominatorsDfsHelper(block, nextBlock, currentImmediateDominator, visited, dominators);
|
|
||||||
|
|
||||||
if (result) {
|
|
||||||
return result;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return nullptr;
|
|
||||||
}
|
|
||||||
|
|
||||||
static map<BBlock*, BBlock*> findImmediateDominators1(const map<BBlock*, vector<BBlock*>>& dominators, BBlock* entry) {
|
|
||||||
map<BBlock*, BBlock*> iDom;
|
|
||||||
|
|
||||||
for (const auto& pair : dominators) {
|
|
||||||
BBlock* b = pair.first;
|
|
||||||
|
|
||||||
if (b == entry) continue;
|
|
||||||
|
|
||||||
const auto& doms = pair.second;
|
|
||||||
|
|
||||||
BBlock* candidate = nullptr;
|
|
||||||
for (auto d : doms) {
|
|
||||||
if (d == b) continue;
|
|
||||||
bool isImmediate = true;
|
|
||||||
|
|
||||||
for (auto other : doms) {
|
|
||||||
if (other == b || other == d) continue;
|
|
||||||
const auto& domsOfOther = dominators.at(other);
|
|
||||||
if (std::find(domsOfOther.begin(), domsOfOther.end(), d) != domsOfOther.end()) {
|
|
||||||
isImmediate = false;
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if (isImmediate) {
|
|
||||||
candidate = d;
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if (candidate) {
|
|
||||||
iDom[b] = candidate;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return iDom;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
static map<BBlock*, BBlock*> findImmediateDominators(map<BBlock*, vector<BBlock*>>& dominators, BBlock* fistBlock) {
|
|
||||||
map<BBlock*, BBlock*> iDominators;
|
|
||||||
|
|
||||||
for (const auto& domPair : dominators) {
|
|
||||||
BBlock* block = domPair.first;
|
|
||||||
const vector<BBlock*>& domBlocks = domPair.second;
|
|
||||||
vector<BBlock*> visited;
|
|
||||||
|
|
||||||
if (block == fistBlock) {
|
|
||||||
continue;
|
|
||||||
}
|
|
||||||
|
|
||||||
iDominators[block] = findImmediateDominatorsDfsHelper(block, fistBlock, fistBlock, visited, dominators);
|
|
||||||
}
|
|
||||||
|
|
||||||
return iDominators;
|
|
||||||
}
|
|
||||||
|
|
||||||
static vector<BArgument*> getDefForBlock(const BBlock& block) {
|
|
||||||
vector<BArgument*> def;
|
|
||||||
const auto& instructions = block.getInstructions();
|
|
||||||
|
|
||||||
for (const auto& irBlock : instructions) {
|
|
||||||
if (irBlock) {
|
|
||||||
Instruction* instr = irBlock->getInstruction();
|
|
||||||
|
|
||||||
if (instr) {
|
|
||||||
BArgument* result = instr->getResult();
|
|
||||||
if (result) {
|
|
||||||
def.push_back(result);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return def;
|
|
||||||
}
|
|
||||||
|
|
||||||
static pair<set<BArgument*>, map<BArgument*, set<BBlock*>>> getGlobalsAndVarBlocks(vector<BBlock*> blocks) {
|
|
||||||
set<BArgument*> globals;
|
|
||||||
map<BArgument*, set<BBlock*>> varBlocks;
|
|
||||||
|
|
||||||
for (auto block : blocks) {
|
|
||||||
set<BArgument*> def;
|
|
||||||
const auto& instructions = block->getInstructions();
|
|
||||||
|
|
||||||
for (const auto& irBlock : instructions) {
|
|
||||||
if (irBlock) {
|
|
||||||
Instruction* instr = irBlock->getInstruction();
|
|
||||||
|
|
||||||
if (instr) {
|
|
||||||
auto arg1 = instr->getArg1();
|
|
||||||
auto arg2 = instr->getArg2();
|
|
||||||
auto res = instr->getResult();
|
|
||||||
|
|
||||||
if (arg1 && arg1->getType() == CFG_ARG_TYPE::VAR && find(def.begin(), def.end(), arg1) == def.end()) {
|
|
||||||
globals.insert(arg1);
|
|
||||||
}
|
|
||||||
if (arg2 && arg2->getType() == CFG_ARG_TYPE::VAR && find(def.begin(), def.end(), arg2) == def.end()) {
|
|
||||||
globals.insert(arg2);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (res && res->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
def.insert(res);
|
|
||||||
varBlocks[res].insert(block);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return make_pair(globals, varBlocks);
|
|
||||||
}
|
|
||||||
|
|
||||||
static void getBlocksWithFiFunctions(vector<BBlock*> blocks, set<BArgument*> globals, map<BArgument*, set<BBlock*>> varBlocks, map<BBlock*, vector<BBlock*>> dominatorBorders) {
|
|
||||||
vector<BBlock*> blocksWithFiFunctions;
|
|
||||||
auto fiFunc = new BArgument(CFG_ARG_TYPE::FUNC, CFG_MEM_TYPE::NONE_, "FI_FUNCTION");
|
|
||||||
auto paramCount = new BArgument(CFG_ARG_TYPE::CONST, CFG_MEM_TYPE::LOCAL_, "0");
|
|
||||||
|
|
||||||
for (auto var : globals) {
|
|
||||||
auto worklist = varBlocks[var];
|
|
||||||
set<BBlock*> hasFiFunction;
|
|
||||||
|
|
||||||
while (!worklist.empty()) {
|
|
||||||
auto block = *worklist.begin();
|
|
||||||
worklist.erase(block);
|
|
||||||
|
|
||||||
for (auto dfBlock : dominatorBorders[block]) {
|
|
||||||
if (hasFiFunction.find(dfBlock) == hasFiFunction.end()) {
|
|
||||||
hasFiFunction.insert(dfBlock);
|
|
||||||
|
|
||||||
Instruction* phiInstruction = new Instruction(CFG_OP::F_CALL, new BArgument(*fiFunc), new BArgument(*paramCount), var, dfBlock->getInstructions()[0]->getInstruction()->getOperator());
|
|
||||||
|
|
||||||
IR_Block* phiBlock = new IR_Block(phiInstruction);
|
|
||||||
dfBlock->addInstructionInFront(phiBlock);
|
|
||||||
|
|
||||||
//blocksWithFiFunctions.push_back(dfBlock);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
//return blocksWithFiFunctions;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
string ToString(CFG_ARG_TYPE type) {
|
|
||||||
switch (type) {
|
|
||||||
case CFG_ARG_TYPE::NONE: return "NONE";
|
|
||||||
case CFG_ARG_TYPE::REG: return "REG";
|
|
||||||
case CFG_ARG_TYPE::VAR: return "VAR";
|
|
||||||
case CFG_ARG_TYPE::ARRAY: return "ARRAY";
|
|
||||||
case CFG_ARG_TYPE::CONST: return "CONST";
|
|
||||||
case CFG_ARG_TYPE::FUNC: return "FUNC";
|
|
||||||
case CFG_ARG_TYPE::LAB: return "LAB";
|
|
||||||
case CFG_ARG_TYPE::INSTR: return "INSTR";
|
|
||||||
case CFG_ARG_TYPE::CONST_STR: return "CONST_STR";
|
|
||||||
case CFG_ARG_TYPE::RECORD: return "RECORD";
|
|
||||||
case CFG_ARG_TYPE::CONSTR_REF: return "CONSTR_REF";
|
|
||||||
default: return "UNKNOWN";
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
void restoreConnections(const vector<BBlock*>& originalBlocks, vector<BBlock*>& copiedBlocks) {
|
|
||||||
// Создаем отображение оригинальных блоков в их копии
|
|
||||||
map<BBlock*, BBlock*> blockMapping;
|
|
||||||
for (size_t i = 0; i < originalBlocks.size(); ++i) {
|
|
||||||
blockMapping[originalBlocks[i]] = copiedBlocks[i];
|
|
||||||
}
|
|
||||||
|
|
||||||
// Восстанавливаем связи между копиями
|
|
||||||
for (size_t i = 0; i < originalBlocks.size(); ++i) {
|
|
||||||
BBlock* originalBlock = originalBlocks[i];
|
|
||||||
BBlock* copiedBlock = copiedBlocks[i];
|
|
||||||
|
|
||||||
auto prevCopy = copiedBlock->getPrev();
|
|
||||||
for (auto j : prevCopy) {
|
|
||||||
copiedBlock->removePrev(j);
|
|
||||||
}
|
|
||||||
|
|
||||||
// Копируем, затем удаляем next связи
|
|
||||||
auto nextCopy = copiedBlock->getNext();
|
|
||||||
for (auto j : nextCopy) {
|
|
||||||
copiedBlock->removeNext(j);
|
|
||||||
}
|
|
||||||
|
|
||||||
// Восстанавливаем связи succ (следующих блоков)
|
|
||||||
for (auto* succ : originalBlock->getNext()) {
|
|
||||||
copiedBlock->addNext(blockMapping[succ]);
|
|
||||||
}
|
|
||||||
|
|
||||||
// Восстанавливаем связи prev (предыдущих блоков)
|
|
||||||
for (auto* prev : originalBlock->getPrev()) {
|
|
||||||
copiedBlock->addPrev(blockMapping[prev]);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
BArgument* NewName(BArgument* var, map<string, int>& counter, map<string, stack<BArgument*>>& stack, int number) {
|
|
||||||
//int index = counter[var->getValue()];
|
|
||||||
counter[var->getValue()]++;
|
|
||||||
|
|
||||||
BArgument* newName = new BArgument(var->getType(), var->getMemType(), var->getValue(), number);
|
|
||||||
stack[var->getValue()].push(newName);
|
|
||||||
return newName;
|
|
||||||
}
|
|
||||||
|
|
||||||
void RenameFiFunctionResultVar(BBlock* block, map<string, int>& counter, map<string, stack<BArgument*>>& stack) {
|
|
||||||
for (auto irBlock : block->getInstructions()) {
|
|
||||||
auto instruction = irBlock->getInstruction();
|
|
||||||
if (instruction->getOperation() == CFG_OP::F_CALL && instruction->getArg1() != nullptr && instruction->getArg1()->getValue() == "FI_FUNCTION" && instruction->getResult() != nullptr) {
|
|
||||||
instruction->setResult(NewName(instruction->getResult(), counter, stack, instruction->getNumber()));
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
void RenameInstructionVars(BBlock* block, map<string, int>& counter, map<string, stack<BArgument*>>& stack) {
|
|
||||||
for (auto irBlock : block->getInstructions()) {
|
|
||||||
auto instruction = irBlock->getInstruction();
|
|
||||||
|
|
||||||
if (instruction->getArg1() != nullptr && instruction->getArg1()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
instruction->setArg1(stack[instruction->getArg1()->getValue()].top());
|
|
||||||
}
|
|
||||||
|
|
||||||
if (instruction->getArg2() != nullptr && instruction->getArg2()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
instruction->setArg2(stack[instruction->getArg2()->getValue()].top());
|
|
||||||
}
|
|
||||||
|
|
||||||
if (instruction->getResult() != nullptr && instruction->getResult()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
instruction->setResult(NewName(instruction->getResult(), counter, stack, instruction->getNumber()));
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
void RenameFiFunctionArgsVar(BBlock* block, map<string, stack<BArgument*>>& stack) {
|
|
||||||
auto size = block->getInstructions().size();
|
|
||||||
auto& instructions = block->getInstructions();
|
|
||||||
for (auto i = 0; i < size; i++) {
|
|
||||||
auto irBlock = instructions[i];
|
|
||||||
auto instruction = irBlock->getInstruction();
|
|
||||||
if (instruction->getOperation() == CFG_OP::F_CALL && instruction->getArg1() != nullptr && instruction->getArg1()->getValue() == "FI_FUNCTION" && instruction->getResult() != nullptr && instruction->getArg2() != nullptr) {
|
|
||||||
|
|
||||||
Instruction* paramInstruction;
|
|
||||||
|
|
||||||
if (stack[instruction->getResult()->getValue()].size() > 0) {
|
|
||||||
BArgument* tmp = new BArgument(CFG_ARG_TYPE::CONST, CFG_MEM_TYPE::COMMON_, to_string(stack[instruction->getResult()->getValue()].top()->getNumber()));
|
|
||||||
paramInstruction = new Instruction(CFG_OP::PARAM, tmp);
|
|
||||||
}
|
|
||||||
else {
|
|
||||||
BArgument* tmp = new BArgument(CFG_ARG_TYPE::CONST, CFG_MEM_TYPE::COMMON_, "-1");
|
|
||||||
paramInstruction = new Instruction(CFG_OP::PARAM, tmp);
|
|
||||||
}
|
|
||||||
|
|
||||||
paramInstruction->setOperator(block->getInstructions()[0]->getInstruction()->getOperator());
|
|
||||||
block->addInstructionBeforeInstruction(new IR_Block(paramInstruction), instruction);
|
|
||||||
|
|
||||||
instruction->getArg2()->setValue(to_string(stoi(instruction->getArg2()->getValue()) + 1));
|
|
||||||
i++;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
vector<BBlock*> findBlocksWithValue(map<BBlock*, BBlock*>& iDominators, BBlock* x) {
|
|
||||||
vector<BBlock*> result;
|
|
||||||
|
|
||||||
// Проходим по всем элементам map
|
|
||||||
for (auto& pair : iDominators) {
|
|
||||||
// Если значение равно x, добавляем ключ в результат
|
|
||||||
if (pair.second == x) {
|
|
||||||
result.push_back(pair.first);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return result;
|
|
||||||
}
|
|
||||||
|
|
||||||
void RenameIR(BBlock* block, map<BBlock*, BBlock*>& iDominators, map<string, int>& counter, map<string, stack<BArgument*>>& stack) {
|
|
||||||
|
|
||||||
RenameFiFunctionResultVar(block, counter, stack);
|
|
||||||
|
|
||||||
RenameInstructionVars(block, counter, stack);
|
|
||||||
|
|
||||||
for (auto* successor : block->getNext()) {
|
|
||||||
RenameFiFunctionArgsVar(successor, stack);
|
|
||||||
}
|
|
||||||
|
|
||||||
for (auto* child : findBlocksWithValue(iDominators, block)) {
|
|
||||||
RenameIR(child, iDominators, counter, stack);
|
|
||||||
}
|
|
||||||
|
|
||||||
for (auto& irBlock : block->getInstructions()) {
|
|
||||||
auto instruction = irBlock->getInstruction();
|
|
||||||
if (instruction->getResult() != nullptr && instruction->getResult()->getType() == CFG_ARG_TYPE::VAR) {
|
|
||||||
string varName = instruction->getResult()->getValue();
|
|
||||||
stack[varName].pop();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
for (auto& irBlock : block->getInstructions()) {
|
|
||||||
auto instruction = irBlock->getInstruction();
|
|
||||||
if (instruction->getOperation() == CFG_OP::F_CALL && instruction->getArg1() != nullptr && instruction->getArg1()->getValue() == "FI_FUNCTION" && instruction->getResult() != nullptr) {
|
|
||||||
string varName = instruction->getResult()->getValue();
|
|
||||||
stack[varName].pop();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
void buildIRSSAForm(map<FuncInfo*, vector<BBlock*>> fullIR, map<FuncInfo*, vector<BBlock*>>* result) {
|
|
||||||
|
|
||||||
for (auto item : fullIR) {
|
|
||||||
|
|
||||||
auto funcinfo = item.first;
|
|
||||||
auto funcIRConst = item.second;
|
|
||||||
|
|
||||||
cout << "Testing " << item.first->funcName << endl;
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
vector<BBlock*> funcIR;
|
|
||||||
|
|
||||||
for (auto i : funcIRConst) {
|
|
||||||
funcIR.push_back(new BBlock(*i));
|
|
||||||
}
|
|
||||||
restoreConnections(funcIRConst, funcIR);
|
|
||||||
|
|
||||||
for (auto i : funcIR) {
|
|
||||||
//printBlock(i);
|
|
||||||
}
|
|
||||||
auto dominators = findDominators(funcIR);
|
|
||||||
|
|
||||||
/*cout << endl << endl << endl << "DOMINATORS" << endl << endl << endl;
|
|
||||||
|
|
||||||
for (auto i : dominators) {
|
|
||||||
cout << "block - " << i.first->getNumber() << endl;
|
|
||||||
for (auto j : i.second) {
|
|
||||||
cout << "dominators - " << j->getNumber() << endl;
|
|
||||||
}
|
|
||||||
|
|
||||||
cout << endl;
|
|
||||||
}*/
|
|
||||||
|
|
||||||
auto iDominators = findImmediateDominators1(dominators, funcIR[0]);
|
|
||||||
|
|
||||||
/*for (auto i : iDominators) {
|
|
||||||
cout << "block - " << i.first->getNumber() << endl;
|
|
||||||
cout << "Idominators - " << i.second->getNumber() << endl;
|
|
||||||
cout << endl;
|
|
||||||
}
|
|
||||||
*/
|
|
||||||
auto dominatorBorders = findDominatorBorders(funcIR, iDominators);
|
|
||||||
|
|
||||||
|
|
||||||
/*for (auto i : dominatorBorders) {
|
|
||||||
cout << "block - " << i.first->getNumber() << endl;
|
|
||||||
for (auto j : i.second) {
|
|
||||||
cout << "border - " << j->getNumber() << endl;
|
|
||||||
}
|
|
||||||
|
|
||||||
cout << endl;
|
|
||||||
}*/
|
|
||||||
|
|
||||||
|
|
||||||
auto globalsAndVarBlocks = getGlobalsAndVarBlocks(funcIR);
|
|
||||||
auto globals = globalsAndVarBlocks.first;
|
|
||||||
auto varBlocks = globalsAndVarBlocks.second;
|
|
||||||
|
|
||||||
/*for (auto i : globals) {
|
|
||||||
cout << i->getValue() << " " << ToString(i->getType()) << " " << i->getNumber() << endl;
|
|
||||||
|
|
||||||
}
|
|
||||||
cout << endl;
|
|
||||||
for (auto i : varBlocks) {
|
|
||||||
cout << i.first->getValue() << " - ";
|
|
||||||
for (auto j : i.second) {
|
|
||||||
cout << j->getNumber() << ", ";
|
|
||||||
}
|
|
||||||
cout << endl;
|
|
||||||
}
|
|
||||||
cout << endl;
|
|
||||||
*/
|
|
||||||
|
|
||||||
getBlocksWithFiFunctions(funcIR, globals, varBlocks, dominatorBorders);
|
|
||||||
|
|
||||||
map<string, int> count;
|
|
||||||
map<string, stack<BArgument*>> varStack;
|
|
||||||
|
|
||||||
for (auto var : globals) {
|
|
||||||
count[var->getValue()] = 0;
|
|
||||||
|
|
||||||
stack<BArgument*> tmp;
|
|
||||||
BArgument* tmpArgument = new BArgument(CFG_ARG_TYPE::CONST, CFG_MEM_TYPE::COMMON_, "-1");
|
|
||||||
tmp.push(tmpArgument);
|
|
||||||
varStack[var->getValue()] = tmp;
|
|
||||||
}
|
|
||||||
|
|
||||||
RenameIR(funcIR[0], iDominators, count, varStack);
|
|
||||||
|
|
||||||
for (auto i : funcIR) {
|
|
||||||
//printBlock(i);
|
|
||||||
}
|
|
||||||
//cout << endl << endl << endl << endl << endl;
|
|
||||||
//for (auto i : funcIRConst) {
|
|
||||||
// printBlock(i);
|
|
||||||
//}
|
|
||||||
|
|
||||||
(*result)[funcinfo] = funcIR;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
@@ -1,6 +0,0 @@
|
|||||||
#pragma once
|
|
||||||
|
|
||||||
#include "CFGraph.h"
|
|
||||||
#include "IR.h"
|
|
||||||
|
|
||||||
void buildIRSSAForm(std::map<FuncInfo*, std::vector<SAPFOR::BasicBlock*>> fullIR, std::map<FuncInfo*, std::vector<SAPFOR::BasicBlock*>>* result);
|
|
||||||
102
src/CFGraph/IR_domTree.cpp
Normal file
102
src/CFGraph/IR_domTree.cpp
Normal file
@@ -0,0 +1,102 @@
|
|||||||
|
#include "dvm.h"
|
||||||
|
#include "IR_domTree.h"
|
||||||
|
|
||||||
|
namespace SAPFOR {
|
||||||
|
void DominatorFinder::DFS(BasicBlock* v, int parent_num) {
|
||||||
|
dfs_num[v] = n;
|
||||||
|
vertex[n] = n;
|
||||||
|
semi[n] = n;
|
||||||
|
label[n] = n;
|
||||||
|
ancestor[n] = -1;
|
||||||
|
parent[n] = parent_num;
|
||||||
|
vertices[n++] = v;
|
||||||
|
|
||||||
|
for (const auto& w : v->getNext()) {
|
||||||
|
if (dfs_num[w] == -1)
|
||||||
|
DFS(w, dfs_num[v]);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void DominatorFinder::Compress(int v) {
|
||||||
|
if (ancestor[ancestor[v]] != -1) {
|
||||||
|
Compress(ancestor[v]);
|
||||||
|
|
||||||
|
if (semi[label[ancestor[v]]] < semi[label[v]])
|
||||||
|
label[v] = label[ancestor[v]];
|
||||||
|
ancestor[v] = ancestor[ancestor[v]];
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
int DominatorFinder::Eval(int v) {
|
||||||
|
if (ancestor[v] == -1)
|
||||||
|
return v;
|
||||||
|
|
||||||
|
Compress(v);
|
||||||
|
return label[v];
|
||||||
|
}
|
||||||
|
|
||||||
|
void DominatorFinder::Link(int v, int w) {
|
||||||
|
ancestor[w] = v;
|
||||||
|
}
|
||||||
|
|
||||||
|
DominatorFinder::DominatorFinder(std::vector<BasicBlock*>& blocks) {
|
||||||
|
if (blocks.empty())
|
||||||
|
return;
|
||||||
|
|
||||||
|
entry = blocks[0];
|
||||||
|
n = 0;
|
||||||
|
|
||||||
|
for (auto block : blocks)
|
||||||
|
dfs_num[block] = -1;
|
||||||
|
|
||||||
|
int max_size = blocks.size();
|
||||||
|
vertices.resize(max_size);
|
||||||
|
parent.assign(max_size, -1);
|
||||||
|
semi.assign(max_size, -1);
|
||||||
|
vertex.assign(max_size, -1);
|
||||||
|
ancestor.assign(max_size, -1);
|
||||||
|
label.assign(max_size, -1);
|
||||||
|
bucket.resize(max_size);
|
||||||
|
|
||||||
|
DFS(entry, -1);
|
||||||
|
|
||||||
|
for (int i = n - 1; i > 0; --i) {
|
||||||
|
int w = vertex[i];
|
||||||
|
|
||||||
|
for (BasicBlock* v : vertices[w]->getPrev()) {
|
||||||
|
if (dfs_num[v] == -1)
|
||||||
|
continue;
|
||||||
|
int u = Eval(dfs_num[v]);
|
||||||
|
|
||||||
|
if (semi[u] < semi[w])
|
||||||
|
semi[w] = semi[u];
|
||||||
|
}
|
||||||
|
|
||||||
|
bucket[vertex[semi[w]]].push_back(w);
|
||||||
|
Link(parent[w], w);
|
||||||
|
|
||||||
|
for (int v : bucket[parent[w]])
|
||||||
|
{
|
||||||
|
int u = Eval(v);
|
||||||
|
if (semi[u] < semi[v])
|
||||||
|
vertices[v]->setDom(vertices[u]);
|
||||||
|
else
|
||||||
|
vertices[v]->setDom(vertices[parent[w]]);
|
||||||
|
}
|
||||||
|
bucket[parent[w]].clear();
|
||||||
|
}
|
||||||
|
|
||||||
|
for (int i = 1; i < n; ++i) {
|
||||||
|
int w = vertex[i];
|
||||||
|
|
||||||
|
if (vertices[w]->getDom() != vertices[vertex[semi[w]]])
|
||||||
|
vertices[w]->setDom(vertices[w]->getDom()->getDom());
|
||||||
|
}
|
||||||
|
|
||||||
|
entry->setDom(nullptr);
|
||||||
|
}
|
||||||
|
|
||||||
|
void buildDominatorTree(std::vector<BasicBlock*>& blocks) {
|
||||||
|
DominatorFinder finder(blocks);
|
||||||
|
}
|
||||||
|
}
|
||||||
35
src/CFGraph/IR_domTree.h
Normal file
35
src/CFGraph/IR_domTree.h
Normal file
@@ -0,0 +1,35 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include <vector>
|
||||||
|
#include <map>
|
||||||
|
#include <unordered_map>
|
||||||
|
|
||||||
|
#include "CFGraph.h"
|
||||||
|
|
||||||
|
// Lengauer, Thomas. A fast algorithm for finding dominators in a flowgraph / Thomas Lengauer, Robert Endre Tarjan
|
||||||
|
// ACM Transactions on Programming Languages and Systems (TOPLAS). <20> 1979. <20> Vol. 1, no. 1. <20> Pp. 121<32>141.
|
||||||
|
|
||||||
|
namespace SAPFOR {
|
||||||
|
|
||||||
|
class BasicBlock;
|
||||||
|
|
||||||
|
class DominatorFinder {
|
||||||
|
private:
|
||||||
|
BasicBlock* entry;
|
||||||
|
std::vector<BasicBlock*> vertices;
|
||||||
|
std::unordered_map<BasicBlock*, int> dfs_num;
|
||||||
|
std::vector<int> parent, semi, vertex, ancestor, label;
|
||||||
|
std::vector<std::vector<int>> bucket;
|
||||||
|
int n;
|
||||||
|
|
||||||
|
void DFS(BasicBlock* v, int parent_num);
|
||||||
|
void Compress(int v);
|
||||||
|
int Eval(int v);
|
||||||
|
void Link(int v, int w);
|
||||||
|
|
||||||
|
public:
|
||||||
|
DominatorFinder(std::vector<BasicBlock*>& blocks);
|
||||||
|
};
|
||||||
|
|
||||||
|
void buildDominatorTree(std::vector<BasicBlock*>& blocks);
|
||||||
|
}
|
||||||
@@ -8,10 +8,10 @@
|
|||||||
#include <unordered_map>
|
#include <unordered_map>
|
||||||
#include <unordered_set>
|
#include <unordered_set>
|
||||||
|
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/CommonBlock.h"
|
#include "CommonBlock.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
|
|
||||||
#define PRINT_PROF_INFO 0
|
#define PRINT_PROF_INFO 0
|
||||||
#define DEBUG_CHECKS 0
|
#define DEBUG_CHECKS 0
|
||||||
|
|||||||
@@ -2,9 +2,9 @@
|
|||||||
|
|
||||||
#include<unordered_map>
|
#include<unordered_map>
|
||||||
|
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/CommonBlock.h"
|
#include "CommonBlock.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
|
|
||||||
#include "CFGraph.h"
|
#include "CFGraph.h"
|
||||||
#include "IR.h"
|
#include "IR.h"
|
||||||
|
|||||||
@@ -1,6 +1,6 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "CFGraph.h"
|
#include "CFGraph.h"
|
||||||
|
|
||||||
namespace LIVE_VARIABLES
|
namespace LIVE_VARIABLES
|
||||||
|
|||||||
@@ -1,6 +1,6 @@
|
|||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "private_variables_analysis.h"
|
#include "private_variables_analysis.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
#include "../SageAnalysisTool/depGraph.h"
|
#include "../SageAnalysisTool/depGraph.h"
|
||||||
#include "../DirectiveProcessing/directive_parser.h"
|
#include "../DirectiveProcessing/directive_parser.h"
|
||||||
@@ -250,7 +250,7 @@ static set<SAPFOR::BasicBlock*> analyzeLoop(LoopGraph* loop, const set<SAPFOR::B
|
|||||||
const map<string, SgSymbol*>& commonArgs, FuncInfo* func,
|
const map<string, SgSymbol*>& commonArgs, FuncInfo* func,
|
||||||
map<string, vector<Messages>>& messages)
|
map<string, vector<Messages>>& messages)
|
||||||
{
|
{
|
||||||
if (!loop->isFor)
|
if (!loop->isFor())
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__); //should be called only with FOR loops
|
printInternalError(convertFileName(__FILE__).c_str(), __LINE__); //should be called only with FOR loops
|
||||||
|
|
||||||
SgStatement* loop_operator = loop->loop->GetOriginal();
|
SgStatement* loop_operator = loop->loop->GetOriginal();
|
||||||
@@ -450,7 +450,7 @@ static void recAnalyzeLoop(LoopGraph* loop, const set<SAPFOR::BasicBlock*>& bloc
|
|||||||
const map<string, SgSymbol*>& commonArgs,
|
const map<string, SgSymbol*>& commonArgs,
|
||||||
FuncInfo* func, map<string, vector<Messages>>& messages)
|
FuncInfo* func, map<string, vector<Messages>>& messages)
|
||||||
{
|
{
|
||||||
const auto& loop_body = loop->isFor ? analyzeLoop(loop, blocks, commonVars, commonArgs, func, messages) : blocks;
|
const auto& loop_body = loop->isFor() ? analyzeLoop(loop, blocks, commonVars, commonArgs, func, messages) : blocks;
|
||||||
|
|
||||||
for (const auto& inner_loop : loop->children)
|
for (const auto& inner_loop : loop->children)
|
||||||
recAnalyzeLoop(inner_loop, loop_body, commonVars, commonArgs, func, messages);
|
recAnalyzeLoop(inner_loop, loop_body, commonVars, commonArgs, func, messages);
|
||||||
|
|||||||
@@ -1,5 +1,5 @@
|
|||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "CFGraph.h"
|
#include "CFGraph.h"
|
||||||
|
|
||||||
#include <string>
|
#include <string>
|
||||||
|
|||||||
@@ -1,7 +1,7 @@
|
|||||||
#include "CreateInterTree.h"
|
#include "CreateInterTree.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
|
|
||||||
using std::string;
|
using std::string;
|
||||||
using std::wstring;
|
using std::wstring;
|
||||||
|
|||||||
@@ -8,7 +8,7 @@
|
|||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
|
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
|
|
||||||
struct SpfInterval
|
struct SpfInterval
|
||||||
{
|
{
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -16,9 +16,9 @@
|
|||||||
#include <assert.h>
|
#include <assert.h>
|
||||||
|
|
||||||
#include "../Distribution/DvmhDirective.h"
|
#include "../Distribution/DvmhDirective.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "directive_analyzer.h"
|
#include "directive_analyzer.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
|
|
||||||
using std::vector;
|
using std::vector;
|
||||||
using std::map;
|
using std::map;
|
||||||
|
|||||||
@@ -1,6 +1,6 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include <vector>
|
#include <vector>
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
|
|
||||||
void UniteNestedDirectives(std::vector<LoopGraph*> &loopGraph);
|
void UniteNestedDirectives(std::vector<LoopGraph*> &loopGraph);
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -15,18 +15,18 @@
|
|||||||
#include "../Distribution/Distribution.h"
|
#include "../Distribution/Distribution.h"
|
||||||
#include "../Distribution/DvmhDirective_func.h"
|
#include "../Distribution/DvmhDirective_func.h"
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
#include "directive_parser.h"
|
#include "directive_parser.h"
|
||||||
#include "directive_creator.h"
|
#include "directive_creator.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Sapfor.h"
|
#include "../Sapfor.h"
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
#include "../Transformations/loop_transform.h"
|
#include "LoopNesting/loop_transform.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
|
|
||||||
#include "../Utils/AstWrapper.h"
|
#include "AstWrapper.h"
|
||||||
|
|
||||||
#define PRINT_DIR_RESULT 0
|
#define PRINT_DIR_RESULT 0
|
||||||
|
|
||||||
|
|||||||
@@ -1,9 +1,9 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "../Distribution/Distribution.h"
|
#include "../Distribution/Distribution.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../Utils/types.h"
|
#include "types.h"
|
||||||
|
|
||||||
void createParallelDirectives(const std::map<LoopGraph*, std::map<DIST::Array*, ArrayInfo*>> &loopInfo,
|
void createParallelDirectives(const std::map<LoopGraph*, std::map<DIST::Array*, ArrayInfo*>> &loopInfo,
|
||||||
const std::vector<ParallelRegion*>& regions,
|
const std::vector<ParallelRegion*>& regions,
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -10,9 +10,9 @@
|
|||||||
|
|
||||||
#include "../ParallelizationRegions/ParRegions.h"
|
#include "../ParallelizationRegions/ParRegions.h"
|
||||||
#include "../Distribution/Arrays.h"
|
#include "../Distribution/Arrays.h"
|
||||||
#include "../Transformations/loop_transform.h"
|
#include "LoopNesting/loop_transform.h"
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "directive_parser.h"
|
#include "directive_parser.h"
|
||||||
#include "directive_creator.h"
|
#include "directive_creator.h"
|
||||||
|
|
||||||
@@ -75,7 +75,7 @@ static LoopGraph* createDirectiveForLoop(LoopGraph *currentLoop, MapToArray &mai
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
directive->parallel.push_back(currentLoop->loopSymbol);
|
directive->parallel.push_back(currentLoop->loopSymbol());
|
||||||
directive->arrayRef = mainArray.arrayRef;
|
directive->arrayRef = mainArray.arrayRef;
|
||||||
|
|
||||||
DIST::Array *tmp = mainArray.arrayRef;
|
DIST::Array *tmp = mainArray.arrayRef;
|
||||||
@@ -84,7 +84,7 @@ static LoopGraph* createDirectiveForLoop(LoopGraph *currentLoop, MapToArray &mai
|
|||||||
for (int i = 0; i < tmp->GetDimSize(); ++i)
|
for (int i = 0; i < tmp->GetDimSize(); ++i)
|
||||||
{
|
{
|
||||||
if (i == pos)
|
if (i == pos)
|
||||||
directive->on.push_back(make_pair(currentLoop->loopSymbol, mainAccess));
|
directive->on.push_back(make_pair(currentLoop->loopSymbol(), mainAccess));
|
||||||
else
|
else
|
||||||
directive->on.push_back(make_pair("*", make_pair(0, 0)));
|
directive->on.push_back(make_pair("*", make_pair(0, 0)));
|
||||||
}
|
}
|
||||||
@@ -808,7 +808,7 @@ void createParallelDirectives(const map<LoopGraph*, map<DIST::Array*, ArrayInfo*
|
|||||||
for (int i = 0; i < mainArrayOfLoop->GetDimSize(); ++i)
|
for (int i = 0; i < mainArrayOfLoop->GetDimSize(); ++i)
|
||||||
{
|
{
|
||||||
if (i == dimPos)
|
if (i == dimPos)
|
||||||
parDir->on2.push_back(make_pair(currLoop->loopSymbol, mainAccess));
|
parDir->on2.push_back(make_pair(currLoop->loopSymbol(), mainAccess));
|
||||||
else
|
else
|
||||||
parDir->on2.push_back(make_pair("*", make_pair(0, 0)));
|
parDir->on2.push_back(make_pair("*", make_pair(0, 0)));
|
||||||
}
|
}
|
||||||
@@ -1100,7 +1100,7 @@ static bool tryToResolveUnmatchedDims(const map<DIST::Array*, vector<bool>> &dim
|
|||||||
LoopGraph* tmpL = loop;
|
LoopGraph* tmpL = loop;
|
||||||
for (int z = 0; z < nested; ++z)
|
for (int z = 0; z < nested; ++z)
|
||||||
{
|
{
|
||||||
deprecateToMatch.insert(tmpL->loopSymbol);
|
deprecateToMatch.insert(tmpL->loopSymbol());
|
||||||
if (tmpL->children.size())
|
if (tmpL->children.size())
|
||||||
tmpL = tmpL->children[0];
|
tmpL = tmpL->children[0];
|
||||||
else if (z != nested - 1)
|
else if (z != nested - 1)
|
||||||
@@ -1113,7 +1113,7 @@ static bool tryToResolveUnmatchedDims(const map<DIST::Array*, vector<bool>> &dim
|
|||||||
tmpL = loop->parent;
|
tmpL = loop->parent;
|
||||||
while (tmpL)
|
while (tmpL)
|
||||||
{
|
{
|
||||||
if (!tmpL->isFor) // TODO: need to add all inductive variables!
|
if (tmpL->isWhile()) // TODO: need to add all inductive variables!
|
||||||
{
|
{
|
||||||
SgWhileStmt* dow = isSgWhileStmt(tmpL->loop->GetOriginal());
|
SgWhileStmt* dow = isSgWhileStmt(tmpL->loop->GetOriginal());
|
||||||
if (dow->conditional())
|
if (dow->conditional())
|
||||||
@@ -1124,7 +1124,7 @@ static bool tryToResolveUnmatchedDims(const map<DIST::Array*, vector<bool>> &dim
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
deprecateToMatch.insert(tmpL->loopSymbol);
|
deprecateToMatch.insert(tmpL->loopSymbol());
|
||||||
tmpL = tmpL->parent;
|
tmpL = tmpL->parent;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -9,7 +9,7 @@
|
|||||||
#include "directive_omp_parser.h"
|
#include "directive_omp_parser.h"
|
||||||
#include "directive_parser.h"
|
#include "directive_parser.h"
|
||||||
|
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
|
|
||||||
using std::vector;
|
using std::vector;
|
||||||
using std::map;
|
using std::map;
|
||||||
|
|||||||
@@ -4,7 +4,7 @@
|
|||||||
#include <map>
|
#include <map>
|
||||||
#include <vector>
|
#include <vector>
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
|
|
||||||
#define SPF_USER_DIR 777
|
#define SPF_USER_DIR 777
|
||||||
#define SPF_USER_DIR_COPY 999
|
#define SPF_USER_DIR_COPY 999
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstring>
|
#include <cstring>
|
||||||
@@ -12,10 +12,10 @@
|
|||||||
#include <assert.h>
|
#include <assert.h>
|
||||||
|
|
||||||
#include "directive_parser.h"
|
#include "directive_parser.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
#include "../Utils/AstWrapper.h"
|
#include "AstWrapper.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
|
|
||||||
using std::string;
|
using std::string;
|
||||||
using std::vector;
|
using std::vector;
|
||||||
|
|||||||
@@ -4,8 +4,8 @@
|
|||||||
#include <set>
|
#include <set>
|
||||||
#include <map>
|
#include <map>
|
||||||
|
|
||||||
#include "../Utils/AstWrapper.h"
|
#include "AstWrapper.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../Distribution/DvmhDirective.h"
|
#include "../Distribution/DvmhDirective.h"
|
||||||
|
|
||||||
struct DvmDirective
|
struct DvmDirective
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -16,13 +16,13 @@
|
|||||||
#include "../Distribution/Arrays.h"
|
#include "../Distribution/Arrays.h"
|
||||||
#include "../Distribution/Distribution.h"
|
#include "../Distribution/Distribution.h"
|
||||||
#include "../Distribution/DvmhDirective_func.h"
|
#include "../Distribution/DvmhDirective_func.h"
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
#include "directive_parser.h"
|
#include "directive_parser.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Sapfor.h"
|
#include "../Sapfor.h"
|
||||||
#include "directive_creator.h"
|
#include "directive_creator.h"
|
||||||
#include "insert_directive.h"
|
#include "insert_directive.h"
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -18,13 +18,13 @@
|
|||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
#include "../Utils/types.h"
|
#include "types.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Distribution/Arrays.h"
|
#include "../Distribution/Arrays.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
#include "remote_access.h"
|
#include "remote_access.h"
|
||||||
|
|
||||||
using std::vector;
|
using std::vector;
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -17,8 +17,8 @@
|
|||||||
#include <assert.h>
|
#include <assert.h>
|
||||||
|
|
||||||
#include "../Distribution/Arrays.h"
|
#include "../Distribution/Arrays.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../ParallelizationRegions/ParRegions.h"
|
#include "../ParallelizationRegions/ParRegions.h"
|
||||||
#include "remote_access.h"
|
#include "remote_access.h"
|
||||||
|
|
||||||
|
|||||||
@@ -1,21 +1,21 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <set>
|
#include <set>
|
||||||
#include <map>
|
#include <map>
|
||||||
#include <string>
|
#include <string>
|
||||||
#include <vector>
|
#include <vector>
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
#include "directive_parser.h"
|
#include "directive_parser.h"
|
||||||
#include "../Distribution/DvmhDirective_func.h"
|
#include "../Distribution/DvmhDirective_func.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
|
|
||||||
#include "../CFGraph/CFGraph.h"
|
#include "CFGraph/CFGraph.h"
|
||||||
|
|
||||||
#include "shadow.h"
|
#include "shadow.h"
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -12,13 +12,13 @@
|
|||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../Sapfor.h"
|
#include "../Sapfor.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
#include "../SageAnalysisTool/depInterfaceExt.h"
|
#include "../SageAnalysisTool/depInterfaceExt.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "directive_parser.h"
|
#include "directive_parser.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
#include "../DirectiveProcessing/directive_omp_parser.h"
|
#include "../DirectiveProcessing/directive_omp_parser.h"
|
||||||
|
|
||||||
|
|||||||
@@ -1,7 +1,7 @@
|
|||||||
#include "Array.h"
|
#include "Array.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
|
|
||||||
using namespace std;
|
using namespace std;
|
||||||
|
|
||||||
|
|||||||
@@ -7,9 +7,9 @@
|
|||||||
#include <algorithm>
|
#include <algorithm>
|
||||||
#include <climits>
|
#include <climits>
|
||||||
#include "DvmhDirectiveBase.h"
|
#include "DvmhDirectiveBase.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/json.hpp"
|
#include "json.hpp"
|
||||||
|
|
||||||
class Symbol;
|
class Symbol;
|
||||||
class Expression;
|
class Expression;
|
||||||
|
|||||||
@@ -1,8 +1,8 @@
|
|||||||
#include "Array.h"
|
#include "Array.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../DirectiveProcessing/directive_parser.h"
|
#include "../DirectiveProcessing/directive_parser.h"
|
||||||
#include "../DirectiveProcessing/directive_omp_parser.h"
|
#include "../DirectiveProcessing/directive_omp_parser.h"
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
@@ -241,13 +241,15 @@ static void findArrayRefs (SgExpression* ex, SgStatement* st, string fName, int
|
|||||||
itNew->second.first->SetRegionPlace(reg);
|
itNew->second.first->SetRegionPlace(reg);
|
||||||
|
|
||||||
const auto oldVal = itNew->second.first->GetDistributeFlagVal();
|
const auto oldVal = itNew->second.first->GetDistributeFlagVal();
|
||||||
bool isarrayInModule = (itNew->second.first->GetLocation().first == DIST::l_MODULE);
|
bool isArrayInModule = (itNew->second.first->GetLocation().first == DIST::l_MODULE);
|
||||||
|
|
||||||
if (oldVal == DIST::DISTR || oldVal == DIST::NO_DISTR)
|
if (oldVal == DIST::DISTR || oldVal == DIST::NO_DISTR)
|
||||||
{
|
{
|
||||||
if (itNew->second.first->IsOmpThreadPrivate())
|
if (itNew->second.first->IsOmpThreadPrivate())
|
||||||
itNew->second.first->SetDistributeFlag(DIST::SPF_PRIV);
|
itNew->second.first->SetDistributeFlag(DIST::SPF_PRIV);
|
||||||
else if (privates.find(symb->identifier()) != privates.end() || isarrayInModule)
|
else if (deprecatedByIO.find(symb->identifier()) != deprecatedByIO.end())
|
||||||
|
itNew->second.first->SetDistributeFlag(DIST::IO_PRIV);
|
||||||
|
else if (isArrayInModule || privates.find(symb->identifier()) != privates.end())
|
||||||
{
|
{
|
||||||
//check in module
|
//check in module
|
||||||
if (itNew->second.first->GetLocation().first == DIST::l_MODULE)
|
if (itNew->second.first->GetLocation().first == DIST::l_MODULE)
|
||||||
@@ -274,8 +276,6 @@ static void findArrayRefs (SgExpression* ex, SgStatement* st, string fName, int
|
|||||||
else
|
else
|
||||||
itNew->second.first->SetDistributeFlag(DIST::SPF_PRIV);
|
itNew->second.first->SetDistributeFlag(DIST::SPF_PRIV);
|
||||||
}
|
}
|
||||||
else if (deprecatedByIO.find(symb->identifier()) != deprecatedByIO.end())
|
|
||||||
itNew->second.first->SetDistributeFlag(DIST::IO_PRIV);
|
|
||||||
else if (isSgConstantSymb(symb) || inDataStat)
|
else if (isSgConstantSymb(symb) || inDataStat)
|
||||||
itNew->second.first->SetDistributeFlag(DIST::SPF_PRIV);
|
itNew->second.first->SetDistributeFlag(DIST::SPF_PRIV);
|
||||||
else
|
else
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
@@ -14,9 +14,9 @@
|
|||||||
#include "GraphCSR.h"
|
#include "GraphCSR.h"
|
||||||
#include "Arrays.h"
|
#include "Arrays.h"
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
|
|
||||||
using std::vector;
|
using std::vector;
|
||||||
using std::set;
|
using std::set;
|
||||||
|
|||||||
@@ -1,7 +1,7 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
|
|
||||||
void createDistributionDirs(DIST::GraphCSR<int, double, attrType> &reducedG, DIST::Arrays<int> &allArrays,
|
void createDistributionDirs(DIST::GraphCSR<int, double, attrType> &reducedG, DIST::Arrays<int> &allArrays,
|
||||||
DataDirective &dataDirectives, std::map<std::string, std::vector<Messages>> &allMessages,
|
DataDirective &dataDirectives, std::map<std::string, std::vector<Messages>> &allMessages,
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <vector>
|
#include <vector>
|
||||||
#include <algorithm>
|
#include <algorithm>
|
||||||
|
|||||||
@@ -3,7 +3,7 @@
|
|||||||
#include <vector>
|
#include <vector>
|
||||||
#include <algorithm>
|
#include <algorithm>
|
||||||
|
|
||||||
#include "../Utils/types.h"
|
#include "types.h"
|
||||||
|
|
||||||
namespace Distribution
|
namespace Distribution
|
||||||
{
|
{
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -30,9 +30,9 @@ using namespace std::chrono;
|
|||||||
#include "Arrays.h"
|
#include "Arrays.h"
|
||||||
#include "Array.h"
|
#include "Array.h"
|
||||||
#include "Distribution.h"
|
#include "Distribution.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/types.h"
|
#include "types.h"
|
||||||
#include "../Distribution/Cycle.h"
|
#include "../Distribution/Cycle.h"
|
||||||
#include "../VisualizerCalls/get_information.h"
|
#include "../VisualizerCalls/get_information.h"
|
||||||
#include "../VisualizerCalls/SendMessage.h"
|
#include "../VisualizerCalls/SendMessage.h"
|
||||||
@@ -455,15 +455,7 @@ namespace Distribution
|
|||||||
}
|
}
|
||||||
|
|
||||||
if (needPrint)
|
if (needPrint)
|
||||||
{
|
sendMessage_2lvl(4, k, (int)AllCycles.size());
|
||||||
#if _WIN32
|
|
||||||
wstring treeM = L"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> " + std::to_wstring(k + 1) + L"/" + std::to_wstring(AllCycles.size());
|
|
||||||
#else
|
|
||||||
wstring treeM = L"conflict resolution, processing group " + std::to_wstring(k + 1) + L"/" + std::to_wstring(AllCycles.size());
|
|
||||||
#endif
|
|
||||||
sendMessage_2lvl(treeM);
|
|
||||||
|
|
||||||
}
|
|
||||||
|
|
||||||
auto timeR = steady_clock::now();
|
auto timeR = steady_clock::now();
|
||||||
if (countConflicts != 0)
|
if (countConflicts != 0)
|
||||||
@@ -516,7 +508,7 @@ namespace Distribution
|
|||||||
}
|
}
|
||||||
|
|
||||||
if (needPrint)
|
if (needPrint)
|
||||||
sendMessage_2lvl(L"");
|
sendMessage_2lvl(2);
|
||||||
|
|
||||||
return make_pair(allOnlySecondType, globalSum);
|
return make_pair(allOnlySecondType, globalSum);
|
||||||
}
|
}
|
||||||
@@ -572,13 +564,7 @@ namespace Distribution
|
|||||||
for (int z = 0; z < arraysV.size(); ++z)
|
for (int z = 0; z < arraysV.size(); ++z)
|
||||||
{
|
{
|
||||||
const DIST::Array *array = arraysV[z];
|
const DIST::Array *array = arraysV[z];
|
||||||
|
sendMessage_2lvl(5, z, (int)arrays.size());
|
||||||
#ifdef _WIN32
|
|
||||||
wstring treeM = L"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> " + std::to_wstring(z + 1) + L"/" + std::to_wstring(arrays.size());
|
|
||||||
#else
|
|
||||||
wstring treeM = L"conflict resolution, processing array " + std::to_wstring(z + 1) + L"/" + std::to_wstring(arrays.size());
|
|
||||||
#endif
|
|
||||||
sendMessage_2lvl(treeM);
|
|
||||||
|
|
||||||
vector<vType> verts;
|
vector<vType> verts;
|
||||||
|
|
||||||
@@ -605,7 +591,7 @@ namespace Distribution
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
sendMessage_2lvl(L"");
|
sendMessage_2lvl(2);
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
@@ -7,12 +7,12 @@
|
|||||||
#include <string>
|
#include <string>
|
||||||
#include <algorithm>
|
#include <algorithm>
|
||||||
|
|
||||||
#include "../Utils/types.h"
|
#include "types.h"
|
||||||
#include "DvmhDirective.h"
|
#include "DvmhDirective.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Sapfor.h"
|
#include "../Sapfor.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
|
|
||||||
@@ -346,7 +346,7 @@ static vector<SgExpression*>
|
|||||||
{
|
{
|
||||||
needToAdd = true;
|
needToAdd = true;
|
||||||
dim_found = true;
|
dim_found = true;
|
||||||
subs[i] = new SgVarRefExp(findSymbolOrCreate(file, currLoop->loopSymbol));
|
subs[i] = new SgVarRefExp(findSymbolOrCreate(file, currLoop->loopSymbol()));
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -7,9 +7,9 @@
|
|||||||
|
|
||||||
#include "Array.h"
|
#include "Array.h"
|
||||||
#include "DvmhDirectiveBase.h"
|
#include "DvmhDirectiveBase.h"
|
||||||
#include "../Utils/AstWrapper.h"
|
#include "AstWrapper.h"
|
||||||
#include "../Utils/types.h"
|
#include "types.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
|
|
||||||
extern int sharedMemoryParallelization;
|
extern int sharedMemoryParallelization;
|
||||||
|
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
@@ -10,11 +10,11 @@
|
|||||||
#include "../Distribution/Array.h"
|
#include "../Distribution/Array.h"
|
||||||
#include "../Distribution/Arrays.h"
|
#include "../Distribution/Arrays.h"
|
||||||
#include "../Distribution/GraphCSR.h"
|
#include "../Distribution/GraphCSR.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../Utils/json.hpp"
|
#include "json.hpp"
|
||||||
|
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
|
|
||||||
using std::vector;
|
using std::vector;
|
||||||
using std::tuple;
|
using std::tuple;
|
||||||
|
|||||||
@@ -3,7 +3,7 @@
|
|||||||
#include <vector>
|
#include <vector>
|
||||||
#include <string>
|
#include <string>
|
||||||
|
|
||||||
#include "../Utils/json.hpp"
|
#include "json.hpp"
|
||||||
|
|
||||||
typedef enum lang : int { LANG_C, LANG_F } language;
|
typedef enum lang : int { LANG_C, LANG_F } language;
|
||||||
typedef enum dist : int { BLOCK, NONE } distType;
|
typedef enum dist : int { BLOCK, NONE } distType;
|
||||||
|
|||||||
@@ -4,7 +4,7 @@
|
|||||||
#include <string>
|
#include <string>
|
||||||
#include <set>
|
#include <set>
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../Utils/types.h"
|
#include "types.h"
|
||||||
|
|
||||||
SgExpression* createAndSetNext(const int side, const int variant, SgExpression *p);
|
SgExpression* createAndSetNext(const int side, const int variant, SgExpression *p);
|
||||||
std::vector<SgExpression*> genSubscripts(const std::vector<std::pair<int, int>> &shadowRenew, const std::vector<std::pair<int, int>> &shadowRenewShifts);
|
std::vector<SgExpression*> genSubscripts(const std::vector<std::pair<int, int>> &shadowRenew, const std::vector<std::pair<int, int>> &shadowRenewShifts);
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <algorithm>
|
#include <algorithm>
|
||||||
#include <string>
|
#include <string>
|
||||||
@@ -19,8 +19,8 @@ extern int passDone;
|
|||||||
#include "Cycle.h"
|
#include "Cycle.h"
|
||||||
#include "Arrays.h"
|
#include "Arrays.h"
|
||||||
#include "Array.h"
|
#include "Array.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../VisualizerCalls/get_information.h"
|
#include "../VisualizerCalls/get_information.h"
|
||||||
#include "../VisualizerCalls/SendMessage.h"
|
#include "../VisualizerCalls/SendMessage.h"
|
||||||
|
|
||||||
@@ -830,13 +830,13 @@ namespace Distribution
|
|||||||
color[k] = WHITE;
|
color[k] = WHITE;
|
||||||
|
|
||||||
findFrom = currentV;
|
findFrom = currentV;
|
||||||
#ifdef _WIN32
|
/*#ifdef _WIN32
|
||||||
if (needPrint)
|
if (needPrint)
|
||||||
{
|
{
|
||||||
wstring vertexM = std::to_wstring(k + 1) + L"/" + std::to_wstring(vertByTrees[t].size());
|
wstring vertexM = std::to_wstring(k + 1) + L"/" + std::to_wstring(vertByTrees[t].size());
|
||||||
sendMessage_2lvl(wstring(L"<22><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ") + wstring(treeM.begin(), treeM.end()) + L" <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> " + wstring(vertexM.begin(), vertexM.end()));
|
sendMessage_2lvl(wstring(L"<22><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ") + wstring(treeM.begin(), treeM.end()) + L" <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> " + wstring(vertexM.begin(), vertexM.end()));
|
||||||
}
|
}
|
||||||
#endif
|
#endif*/
|
||||||
__spf_print(PRINT_TIMES && needPrint, "v (tree %d) = %d (with neighb %d) ", t, i, neighbors[i + 1] - neighbors[i]);
|
__spf_print(PRINT_TIMES && needPrint, "v (tree %d) = %d (with neighb %d) ", t, i, neighbors[i + 1] - neighbors[i]);
|
||||||
activeV[activeCounter++] = currentV;
|
activeV[activeCounter++] = currentV;
|
||||||
FindLoop(cyclesTmp[t], currentV, currentV, numbers);
|
FindLoop(cyclesTmp[t], currentV, currentV, numbers);
|
||||||
@@ -847,8 +847,8 @@ namespace Distribution
|
|||||||
maxLoopDim = wasMaxLoopDim;
|
maxLoopDim = wasMaxLoopDim;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (needPrint)
|
/*if (needPrint)
|
||||||
sendMessage_2lvl(L"");
|
sendMessage_2lvl(2);*/
|
||||||
}
|
}
|
||||||
catch (int code)
|
catch (int code)
|
||||||
{
|
{
|
||||||
|
|||||||
@@ -5,7 +5,7 @@
|
|||||||
#include <set>
|
#include <set>
|
||||||
#include <tuple>
|
#include <tuple>
|
||||||
|
|
||||||
#include "../Utils/RationalNum.h"
|
#include "RationalNum.h"
|
||||||
|
|
||||||
typedef enum links { RR_link, WR_link, WW_link } LinkType;
|
typedef enum links { RR_link, WR_link, WW_link } LinkType;
|
||||||
|
|
||||||
|
|||||||
@@ -1,6 +1,6 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
|
|
||||||
#include <string>
|
#include <string>
|
||||||
|
|
||||||
|
|||||||
@@ -11,9 +11,9 @@
|
|||||||
#include "DvmhRegionInserter.h"
|
#include "DvmhRegionInserter.h"
|
||||||
#include "DvmhRegions/RegionsMerger.h"
|
#include "DvmhRegions/RegionsMerger.h"
|
||||||
#include "../VerificationCode/verifications.h"
|
#include "../VerificationCode/verifications.h"
|
||||||
#include "../Transformations/function_purifying.h"
|
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
#include "../DirectiveProcessing/directive_parser.h"
|
#include "../DirectiveProcessing/directive_parser.h"
|
||||||
|
#include "FunctionPurifying/function_purifying.h"
|
||||||
|
|
||||||
using namespace std;
|
using namespace std;
|
||||||
|
|
||||||
@@ -794,154 +794,6 @@ ArraySet DvmhRegionInserter::get_used_arrs_for_block(SgStatement* st, int usage_
|
|||||||
return usages;
|
return usages;
|
||||||
}
|
}
|
||||||
|
|
||||||
static bool filterFromList(SgStatement* st, const set<string>& idents, bool exclude = false)
|
|
||||||
{
|
|
||||||
bool empty = false;
|
|
||||||
SgExpression* list = st->expr(0);
|
|
||||||
vector<SgExpression*> newList;
|
|
||||||
|
|
||||||
int total = 0;
|
|
||||||
while (list)
|
|
||||||
{
|
|
||||||
if (exclude)
|
|
||||||
{
|
|
||||||
if (idents.find(list->lhs()->symbol()->identifier()) == idents.end())
|
|
||||||
newList.push_back(list->lhs());
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
if (idents.find(list->lhs()->symbol()->identifier()) != idents.end())
|
|
||||||
newList.push_back(list->lhs());
|
|
||||||
}
|
|
||||||
total++;
|
|
||||||
list = list->rhs();
|
|
||||||
}
|
|
||||||
|
|
||||||
if (newList.size() == 0)
|
|
||||||
empty = true;
|
|
||||||
else if (total != newList.size())
|
|
||||||
st->setExpression(0, makeExprList(newList));
|
|
||||||
|
|
||||||
return empty;
|
|
||||||
}
|
|
||||||
|
|
||||||
static string getInterfaceBlock(SgStatement* func, const FuncParam& pars)
|
|
||||||
{
|
|
||||||
string oldFile = current_file->filename();
|
|
||||||
if (!func->switchToFile())
|
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
|
||||||
|
|
||||||
auto copy = duplicateProcedure(func, NULL, false, false, false, true);
|
|
||||||
const set<string> idents(pars.identificators.begin(), pars.identificators.end());
|
|
||||||
|
|
||||||
bool need = (func->symbol()->identifier() == string("bl182"));
|
|
||||||
|
|
||||||
//remove all exec
|
|
||||||
SgStatement* st = copy->lexNext();
|
|
||||||
SgStatement* last = copy->lastNodeOfStmt();
|
|
||||||
vector<SgStatement*> toExtract;
|
|
||||||
|
|
||||||
while (st != last)
|
|
||||||
{
|
|
||||||
if (isDVM_stat(st) || isSPF_stat(st))
|
|
||||||
{
|
|
||||||
if (st->variant() != ACC_ROUTINE_DIR)
|
|
||||||
{
|
|
||||||
toExtract.push_back(st);
|
|
||||||
st = st->lexNext();
|
|
||||||
}
|
|
||||||
else
|
|
||||||
st = st->lexNext();
|
|
||||||
}
|
|
||||||
else if (isSgExecutableStatement(st))
|
|
||||||
{
|
|
||||||
SgStatement* next = st->lastNodeOfStmt();
|
|
||||||
if (next != last)
|
|
||||||
next = next->lexNext();
|
|
||||||
toExtract.push_back(st);
|
|
||||||
st = next;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
st = st->lexNext();
|
|
||||||
}
|
|
||||||
|
|
||||||
//remove unused declarations
|
|
||||||
st = copy->lexNext();
|
|
||||||
while (st != last)
|
|
||||||
{
|
|
||||||
const int var = st->variant();
|
|
||||||
|
|
||||||
if (var == VAR_DECL
|
|
||||||
|| var == VAR_DECL_90
|
|
||||||
|| var == DIM_STAT
|
|
||||||
|| var == INTENT_STMT
|
|
||||||
|| var == EXTERN_STAT)
|
|
||||||
{
|
|
||||||
bool empty = filterFromList(st, idents);
|
|
||||||
if (empty)
|
|
||||||
{
|
|
||||||
toExtract.push_back(st);
|
|
||||||
st = st->lexNext();
|
|
||||||
continue;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
else if (!isDVM_stat(st) && !isSPF_stat(st))
|
|
||||||
toExtract.push_back(st);
|
|
||||||
|
|
||||||
if (st->variant() == CONTAINS_STMT)
|
|
||||||
break;
|
|
||||||
st = st->lexNext();
|
|
||||||
}
|
|
||||||
|
|
||||||
for (auto& elem : toExtract)
|
|
||||||
elem->extractStmt();
|
|
||||||
|
|
||||||
string retVal = copy->unparse();
|
|
||||||
|
|
||||||
if (SgFile::switchToFile(oldFile) == -1)
|
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
|
||||||
|
|
||||||
return retVal;
|
|
||||||
}
|
|
||||||
|
|
||||||
static void insertInterface(SgStatement* func, const string& iface, const string& fName)
|
|
||||||
{
|
|
||||||
string oldFile = current_file->filename();
|
|
||||||
if (!func->switchToFile())
|
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
|
||||||
|
|
||||||
SgStatement* st = func->lexNext();
|
|
||||||
SgStatement* last = func->lastNodeOfStmt();
|
|
||||||
while (st != last)
|
|
||||||
{
|
|
||||||
if (st->variant() == VAR_DECL || st->variant() == VAR_DECL_90)
|
|
||||||
{
|
|
||||||
bool empty = filterFromList(st, { fName }, true);
|
|
||||||
if (empty)
|
|
||||||
{
|
|
||||||
SgStatement* next = st->lexNext();
|
|
||||||
st->extractStmt();
|
|
||||||
st = next;
|
|
||||||
continue;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if (isSgExecutableStatement(st))
|
|
||||||
break;
|
|
||||||
st = st->lexNext();
|
|
||||||
}
|
|
||||||
SgStatement* ifaceBlock = new SgStatement(INTERFACE_STMT);
|
|
||||||
addControlEndToStmt(ifaceBlock->thebif);
|
|
||||||
|
|
||||||
ifaceBlock->setlineNumber(getNextNegativeLineNumber()); // st->lineNumber()
|
|
||||||
ifaceBlock->setFileName(st->fileName());
|
|
||||||
st->insertStmtBefore(*ifaceBlock, *st->controlParent());
|
|
||||||
ifaceBlock->lastNodeOfStmt()->addComment(iface.c_str());
|
|
||||||
|
|
||||||
if (SgFile::switchToFile(oldFile) == -1)
|
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
|
||||||
}
|
|
||||||
|
|
||||||
static LoopGraph* getParallelLoop(LoopGraph* loop)
|
static LoopGraph* getParallelLoop(LoopGraph* loop)
|
||||||
{
|
{
|
||||||
auto prev_st = loop->loop->lexPrev();
|
auto prev_st = loop->loop->lexPrev();
|
||||||
@@ -1172,7 +1024,7 @@ static bool isPure(SgStatement* func)
|
|||||||
|
|
||||||
void DvmhRegionInserter::createInterfaceBlockForOutCall(FuncInfo* func, FuncInfo* callFrom)
|
void DvmhRegionInserter::createInterfaceBlockForOutCall(FuncInfo* func, FuncInfo* callFrom)
|
||||||
{
|
{
|
||||||
insertInterface(func->funcPointer, getInterfaceBlock(callFrom->funcPointer->GetOriginal(), callFrom->funcParams), callFrom->funcName);
|
insertInterface(func->funcPointer, callFrom);
|
||||||
}
|
}
|
||||||
|
|
||||||
void DvmhRegionInserter::createInterfaceBlockForParallelFunctions(bool onlyRoutine)
|
void DvmhRegionInserter::createInterfaceBlockForParallelFunctions(bool onlyRoutine)
|
||||||
@@ -1446,6 +1298,9 @@ static set<DIST::Array*>
|
|||||||
declStat = SgStatement::getStatementByFileAndLine(decl.first, decl.second);
|
declStat = SgStatement::getStatementByFileAndLine(decl.first, decl.second);
|
||||||
if (declStat == NULL) // check in inlcudes
|
if (declStat == NULL) // check in inlcudes
|
||||||
{
|
{
|
||||||
|
if (!main->switchToFile())
|
||||||
|
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
||||||
|
|
||||||
for (auto st = main; st != main->lastNodeOfStmt() && !declStat; st = st->lexNext())
|
for (auto st = main; st != main->lastNodeOfStmt() && !declStat; st = st->lexNext())
|
||||||
{
|
{
|
||||||
if (st->fileName() == decl.first && st->lineNumber() == decl.second)
|
if (st->fileName() == decl.first && st->lineNumber() == decl.second)
|
||||||
@@ -1457,7 +1312,7 @@ static set<DIST::Array*>
|
|||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
declStat = getFuncStat(declStat);
|
declStat = getFuncStat(declStat, { BLOCK_DATA });
|
||||||
if (declStat != main)
|
if (declStat != main)
|
||||||
{
|
{
|
||||||
declStat = NULL;
|
declStat = NULL;
|
||||||
|
|||||||
@@ -1,10 +1,10 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
#include "../ParallelizationRegions/ParRegions.h"
|
#include "../ParallelizationRegions/ParRegions.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "ReadWriteAnalyzer.h"
|
#include "ReadWriteAnalyzer.h"
|
||||||
#include "DvmhRegion.h"
|
#include "DvmhRegion.h"
|
||||||
|
|
||||||
|
|||||||
@@ -1,7 +1,7 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
|
|
||||||
#include <vector>
|
#include <vector>
|
||||||
#include <string>
|
#include <string>
|
||||||
|
|||||||
@@ -1,7 +1,7 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "VarUsages.h"
|
#include "VarUsages.h"
|
||||||
#include <set>
|
#include <set>
|
||||||
#include <tuple>
|
#include <tuple>
|
||||||
|
|||||||
@@ -1,7 +1,7 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include <string>
|
#include <string>
|
||||||
|
|
||||||
enum class VAR_TYPE { VAR_ARR, VAR_DISTR_ARR, VAR_SCALAR, VAR_ANY, VAR_UNDEFINED };
|
enum class VAR_TYPE { VAR_ARR, VAR_DISTR_ARR, VAR_SCALAR, VAR_ANY, VAR_UNDEFINED };
|
||||||
|
|||||||
@@ -5,10 +5,10 @@
|
|||||||
#include "./createParallelRegions.h"
|
#include "./createParallelRegions.h"
|
||||||
|
|
||||||
#include "../CreateInterTree/CreateInterTree.h"
|
#include "../CreateInterTree/CreateInterTree.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "./gcov_info.h"
|
#include "./gcov_info.h"
|
||||||
#include "./gCov_parser_func.h"
|
#include "./gCov_parser_func.h"
|
||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <map>
|
#include <map>
|
||||||
#include <vector>
|
#include <vector>
|
||||||
|
|||||||
@@ -1,10 +1,10 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
|
|
||||||
#include "./gcov_info.h"
|
#include "./gcov_info.h"
|
||||||
#include "../CreateInterTree/CreateInterTree.h"
|
#include "../CreateInterTree/CreateInterTree.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
|
|
||||||
#include <map>
|
#include <map>
|
||||||
#include <vector>
|
#include <vector>
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include <fstream>
|
#include <fstream>
|
||||||
@@ -8,7 +8,7 @@
|
|||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "gCov_parser_func.h"
|
#include "gCov_parser_func.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
|
|
||||||
using namespace std;
|
using namespace std;
|
||||||
|
|
||||||
|
|||||||
@@ -5,7 +5,7 @@
|
|||||||
#include <vector>
|
#include <vector>
|
||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "gcov_info.h"
|
#include "gcov_info.h"
|
||||||
#include "../CreateInterTree/CreateInterTree.h"
|
#include "../CreateInterTree/CreateInterTree.h"
|
||||||
|
|
||||||
|
|||||||
@@ -1,10 +1,10 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <iostream>
|
#include <iostream>
|
||||||
#include <map>
|
#include <map>
|
||||||
#include <algorithm>
|
#include <algorithm>
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
|
|
||||||
#include "gcov_info.h"
|
#include "gcov_info.h"
|
||||||
|
|
||||||
|
|||||||
@@ -5,7 +5,7 @@
|
|||||||
#include <map>
|
#include <map>
|
||||||
#include <stdint.h>
|
#include <stdint.h>
|
||||||
|
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
|
|
||||||
//make 'class' - need friend for Gcov_info
|
//make 'class' - need friend for Gcov_info
|
||||||
struct Perform
|
struct Perform
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -14,14 +14,14 @@
|
|||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
|
|
||||||
#include "../CFGraph/CFGraph.h"
|
#include "CFGraph/CFGraph.h"
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
#include "../DirectiveProcessing/directive_parser.h"
|
#include "../DirectiveProcessing/directive_parser.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/json.hpp"
|
#include "json.hpp"
|
||||||
#include "../ParallelizationRegions/ParRegions_func.h"
|
#include "../ParallelizationRegions/ParRegions_func.h"
|
||||||
#include "../DynamicAnalysis/gCov_parser_func.h"
|
#include "../DynamicAnalysis/gCov_parser_func.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
#include "../VerificationCode/verifications.h"
|
#include "../VerificationCode/verifications.h"
|
||||||
|
|
||||||
@@ -779,6 +779,20 @@ static void checkSpecList(SgExpression *spec, FuncInfo* currF, const map<string,
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static void checkInTypeDescription(SgExpression *ex, FuncInfo* currF, const map<string, int>& parNames)
|
||||||
|
{
|
||||||
|
if (ex)
|
||||||
|
{
|
||||||
|
if (ex->variant() == ARRAY_REF)
|
||||||
|
fillIn(currF, ex->lhs(), parNames, false);
|
||||||
|
else
|
||||||
|
{
|
||||||
|
checkInTypeDescription(ex->lhs(), currF, parNames);
|
||||||
|
checkInTypeDescription(ex->rhs(), currF, parNames);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
static void fillInOut(FuncInfo *currF, SgStatement *start, SgStatement *last, const set<SgStatement*>& activeOps)
|
static void fillInOut(FuncInfo *currF, SgStatement *start, SgStatement *last, const set<SgStatement*>& activeOps)
|
||||||
{
|
{
|
||||||
if (currF->funcParams.countOfPars == 0)
|
if (currF->funcParams.countOfPars == 0)
|
||||||
@@ -799,7 +813,12 @@ static void fillInOut(FuncInfo *currF, SgStatement *start, SgStatement *last, co
|
|||||||
if (st->variant() == ENTRY_STAT)
|
if (st->variant() == ENTRY_STAT)
|
||||||
continue;
|
continue;
|
||||||
|
|
||||||
if (isSgExecutableStatement(st) == NULL || st->lineNumber() <= 0)
|
if (isSgExecutableStatement(st) == NULL) {
|
||||||
|
checkInTypeDescription(st->expr(0), currF, parNames);
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (st->lineNumber() <= 0)
|
||||||
continue;
|
continue;
|
||||||
|
|
||||||
if (activeOps.size() && activeOps.find(st) == activeOps.end())
|
if (activeOps.size() && activeOps.find(st) == activeOps.end())
|
||||||
|
|||||||
@@ -3,10 +3,10 @@
|
|||||||
#include <string>
|
#include <string>
|
||||||
#include <set>
|
#include <set>
|
||||||
|
|
||||||
#include "../Utils/AstWrapper.h"
|
#include "AstWrapper.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../DirectiveProcessing/shadow.h"
|
#include "../DirectiveProcessing/shadow.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
|
|
||||||
static const char* paramNames[] =
|
static const char* paramNames[] =
|
||||||
{ "NONE_T", "ARRAY_T", "STRING_ARRAY_T", "STRING_T", "SCALAR_CHAR_T", "SCALAR_BOOL_T", "SCALAR_SHORT_T", "SCALAR_INT_T", "SCALAR_LONG_INT_T",
|
{ "NONE_T", "ARRAY_T", "STRING_ARRAY_T", "STRING_T", "SCALAR_CHAR_T", "SCALAR_BOOL_T", "SCALAR_SHORT_T", "SCALAR_INT_T", "SCALAR_LONG_INT_T",
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -10,10 +10,10 @@
|
|||||||
#include <set>
|
#include <set>
|
||||||
#include <string>
|
#include <string>
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../Distribution/Distribution.h"
|
#include "../Distribution/Distribution.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../ParallelizationRegions/ParRegions.h"
|
#include "../ParallelizationRegions/ParRegions.h"
|
||||||
|
|
||||||
using std::vector;
|
using std::vector;
|
||||||
|
|||||||
@@ -5,7 +5,7 @@
|
|||||||
#include <set>
|
#include <set>
|
||||||
|
|
||||||
#include "graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../ParallelizationRegions/ParRegions.h"
|
#include "../ParallelizationRegions/ParRegions.h"
|
||||||
#include "Utils/json.hpp"
|
#include "Utils/json.hpp"
|
||||||
|
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -12,26 +12,26 @@
|
|||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../Sapfor.h"
|
#include "../Sapfor.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
#include "../ParallelizationRegions/ParRegions_func.h"
|
#include "../ParallelizationRegions/ParRegions_func.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
|
|
||||||
#include "../Distribution/GraphCSR.h"
|
#include "../Distribution/GraphCSR.h"
|
||||||
#include "../Distribution/Arrays.h"
|
#include "../Distribution/Arrays.h"
|
||||||
#include "../Distribution/Distribution.h"
|
#include "../Distribution/Distribution.h"
|
||||||
|
|
||||||
#include "graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/AstWrapper.h"
|
#include "AstWrapper.h"
|
||||||
#include "../Utils/json.hpp"
|
#include "json.hpp"
|
||||||
|
|
||||||
#include "../DirectiveProcessing/directive_parser.h"
|
#include "../DirectiveProcessing/directive_parser.h"
|
||||||
#include "../DynamicAnalysis/gCov_parser_func.h"
|
#include "../DynamicAnalysis/gCov_parser_func.h"
|
||||||
|
|
||||||
#include "../Transformations/array_assign_to_loop.h"
|
#include "VectorAssignToLoop/array_assign_to_loop.h"
|
||||||
|
|
||||||
using std::vector;
|
using std::vector;
|
||||||
using std::map;
|
using std::map;
|
||||||
@@ -520,7 +520,7 @@ static void findArrayRef(SgExpression *exp, bool isWirte, set<DIST::Array*>& use
|
|||||||
{
|
{
|
||||||
if (exp)
|
if (exp)
|
||||||
{
|
{
|
||||||
if (exp->variant() == ARRAY_REF)
|
if (isArrayRef(exp))
|
||||||
{
|
{
|
||||||
DIST::Array *arrayRef = NULL;
|
DIST::Array *arrayRef = NULL;
|
||||||
SgSymbol *symbS = OriginalSymbol(exp->symbol());
|
SgSymbol *symbS = OriginalSymbol(exp->symbol());
|
||||||
@@ -699,7 +699,12 @@ void loopGraphAnalyzer(SgFile *file, vector<LoopGraph*> &loopGraph, const vector
|
|||||||
newLoop->hasPrints = hasThisIds(st, newLoop->linesOfIO, { WRITE_STAT, READ_STAT, OPEN_STAT, CLOSE_STAT, PRINT_STAT } ); // FORMAT_STAT
|
newLoop->hasPrints = hasThisIds(st, newLoop->linesOfIO, { WRITE_STAT, READ_STAT, OPEN_STAT, CLOSE_STAT, PRINT_STAT } ); // FORMAT_STAT
|
||||||
newLoop->hasStops = hasThisIds(st, newLoop->linesOfStop, { STOP_STAT, PAUSE_NODE });
|
newLoop->hasStops = hasThisIds(st, newLoop->linesOfStop, { STOP_STAT, PAUSE_NODE });
|
||||||
newLoop->hasDvmIntervals = hasThisIds(st, tmpLines, { DVM_INTERVAL_DIR, DVM_ENDINTERVAL_DIR, DVM_EXIT_INTERVAL_DIR });
|
newLoop->hasDvmIntervals = hasThisIds(st, tmpLines, { DVM_INTERVAL_DIR, DVM_ENDINTERVAL_DIR, DVM_EXIT_INTERVAL_DIR });
|
||||||
newLoop->isFor = isSgForStmt(st) ? true : false;
|
if (isSgForStmt(st))
|
||||||
|
newLoop->loopType = LoopType::FOR;
|
||||||
|
else if (isSgWhileStmt(st))
|
||||||
|
newLoop->loopType = LoopType::WHILE;
|
||||||
|
else
|
||||||
|
newLoop->loopType = LoopType::NONE;
|
||||||
newLoop->inCanonicalFrom = isSgForStmt(st) ? true : false;
|
newLoop->inCanonicalFrom = isSgForStmt(st) ? true : false;
|
||||||
newLoop->hasSubstringRefs = hasSubstringRef(st);
|
newLoop->hasSubstringRefs = hasSubstringRef(st);
|
||||||
|
|
||||||
@@ -777,7 +782,7 @@ void loopGraphAnalyzer(SgFile *file, vector<LoopGraph*> &loopGraph, const vector
|
|||||||
newLoop->startEndExpr = std::make_pair((Expression*)NULL, (Expression*)NULL);
|
newLoop->startEndExpr = std::make_pair((Expression*)NULL, (Expression*)NULL);
|
||||||
|
|
||||||
newLoop->loop = new Statement(st);
|
newLoop->loop = new Statement(st);
|
||||||
newLoop->loopSymbol = st->symbol() ? st->symbol()->identifier() : "unknown";
|
newLoop->loopSymbols.addMainVar(st->symbol() ? st->symbol()->identifier() : "unknown");
|
||||||
findArrayRefs(newLoop);
|
findArrayRefs(newLoop);
|
||||||
|
|
||||||
SgStatement *lexPrev = st->lexPrev();
|
SgStatement *lexPrev = st->lexPrev();
|
||||||
|
|||||||
@@ -5,8 +5,8 @@
|
|||||||
#include <map>
|
#include <map>
|
||||||
#include <set>
|
#include <set>
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/types.h"
|
#include "types.h"
|
||||||
#include "../Distribution/DvmhDirective.h"
|
#include "../Distribution/DvmhDirective.h"
|
||||||
#include "../Distribution/Distribution.h"
|
#include "../Distribution/Distribution.h"
|
||||||
|
|
||||||
@@ -25,6 +25,33 @@ namespace DIST = Distribution;
|
|||||||
void getRealArrayRefs(DIST::Array* addTo, DIST::Array* curr, std::set<DIST::Array*>& realArrayRefs, const std::map<DIST::Array*, std::set<DIST::Array*>>& arrayLinksByFuncCalls);
|
void getRealArrayRefs(DIST::Array* addTo, DIST::Array* curr, std::set<DIST::Array*>& realArrayRefs, const std::map<DIST::Array*, std::set<DIST::Array*>>& arrayLinksByFuncCalls);
|
||||||
void getAllArrayRefs(DIST::Array* addTo, DIST::Array* curr, std::set<DIST::Array*>& realArrayRefs, const std::map<DIST::Array*, std::set<DIST::Array*>>& arrayLinksByFuncCalls);
|
void getAllArrayRefs(DIST::Array* addTo, DIST::Array* curr, std::set<DIST::Array*>& realArrayRefs, const std::map<DIST::Array*, std::set<DIST::Array*>>& arrayLinksByFuncCalls);
|
||||||
|
|
||||||
|
enum class LoopType { NONE, FOR, WHILE, IMPLICIT };
|
||||||
|
|
||||||
|
struct InductiveVariables
|
||||||
|
{
|
||||||
|
private:
|
||||||
|
std::string mainVar;
|
||||||
|
std::set<std::string> allVars;
|
||||||
|
|
||||||
|
public:
|
||||||
|
InductiveVariables() { }
|
||||||
|
|
||||||
|
explicit InductiveVariables(const std::string& mainVar, const std::set<std::string>& allVars) : mainVar(mainVar), allVars(allVars) { };
|
||||||
|
|
||||||
|
std::string getMainVar() const { return mainVar; }
|
||||||
|
std::set<std::string> getAllVars() const { return allVars; }
|
||||||
|
|
||||||
|
void addVar(const std::string& var) { allVars.insert(var); }
|
||||||
|
void addMainVar(const std::string& var) { mainVar = var; allVars.insert(var); }
|
||||||
|
|
||||||
|
void replaceMainVar(const std::string& var)
|
||||||
|
{
|
||||||
|
allVars.erase(mainVar);
|
||||||
|
|
||||||
|
addMainVar(var);
|
||||||
|
}
|
||||||
|
};
|
||||||
|
|
||||||
struct LoopGraph
|
struct LoopGraph
|
||||||
{
|
{
|
||||||
private:
|
private:
|
||||||
@@ -70,7 +97,7 @@ public:
|
|||||||
calculatedCountOfIters = 0;
|
calculatedCountOfIters = 0;
|
||||||
executionTimeInSec = -1.0;
|
executionTimeInSec = -1.0;
|
||||||
inDvmhRegion = 0;
|
inDvmhRegion = 0;
|
||||||
isFor = false;
|
loopType = LoopType::NONE;
|
||||||
inCanonicalFrom = false;
|
inCanonicalFrom = false;
|
||||||
hasAccessToSubArray = false;
|
hasAccessToSubArray = false;
|
||||||
hasSubstringRefs = false;
|
hasSubstringRefs = false;
|
||||||
@@ -113,21 +140,24 @@ public:
|
|||||||
{
|
{
|
||||||
return hasUnknownArrayDep || hasUnknownScalarDep || hasGoto || hasPrints || (hasConflicts.size() != 0) || hasStops || hasNonPureProcedures ||
|
return hasUnknownArrayDep || hasUnknownScalarDep || hasGoto || hasPrints || (hasConflicts.size() != 0) || hasStops || hasNonPureProcedures ||
|
||||||
hasUnknownArrayAssigns || hasNonRectangularBounds || hasIndirectAccess || hasWritesToNonDistribute || hasDifferentAlignRules || hasDvmIntervals ||
|
hasUnknownArrayAssigns || hasNonRectangularBounds || hasIndirectAccess || hasWritesToNonDistribute || hasDifferentAlignRules || hasDvmIntervals ||
|
||||||
!isFor || lastprivateScalars.size() || hasAccessToSubArray || hasSubstringRefs;
|
!isFor() || lastprivateScalars.size() || hasAccessToSubArray || hasSubstringRefs;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool hasLimitsToSplit() const
|
bool hasLimitsToSplit() const
|
||||||
{
|
{
|
||||||
return hasGoto || hasStops || !isFor || hasPrints;
|
return hasGoto || hasStops || !isFor() || hasPrints;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool hasLimitsToCombine() const
|
bool hasLimitsToCombine() const
|
||||||
{
|
{
|
||||||
return hasGoto || hasStops || !isFor || hasPrints || linesOfCycle.size();
|
return hasGoto || hasStops || !isFor() || hasPrints || linesOfCycle.size();
|
||||||
}
|
}
|
||||||
|
|
||||||
void addConflictMessages(std::vector<Messages> *messages)
|
void addConflictMessages(std::vector<Messages> *messages)
|
||||||
{
|
{
|
||||||
|
if (messages == NULL)
|
||||||
|
return;
|
||||||
|
|
||||||
const int line = altLineNum > 0 ? altLineNum : lineNum;
|
const int line = altLineNum > 0 ? altLineNum : lineNum;
|
||||||
if (hasUnknownArrayDep)
|
if (hasUnknownArrayDep)
|
||||||
messages->push_back(Messages(NOTE, line, R113, L"unknown array dependency prevents parallelization of this loop", 3006));
|
messages->push_back(Messages(NOTE, line, R113, L"unknown array dependency prevents parallelization of this loop", 3006));
|
||||||
@@ -168,7 +198,7 @@ public:
|
|||||||
if (hasDvmIntervals)
|
if (hasDvmIntervals)
|
||||||
messages->push_back(Messages(NOTE, line, R145, L"DVM intervals prevent parallelization of this loop", 3006));
|
messages->push_back(Messages(NOTE, line, R145, L"DVM intervals prevent parallelization of this loop", 3006));
|
||||||
|
|
||||||
if (!isFor || !inCanonicalFrom)
|
if (!isFor() || !inCanonicalFrom)
|
||||||
messages->push_back(Messages(NOTE, line, R178, L"This type of loop is not supported by the system", 3006));
|
messages->push_back(Messages(NOTE, line, R178, L"This type of loop is not supported by the system", 3006));
|
||||||
|
|
||||||
if (lastprivateScalars.size())
|
if (lastprivateScalars.size())
|
||||||
@@ -393,6 +423,14 @@ public:
|
|||||||
|
|
||||||
void* getRealStat(const char* file) const;
|
void* getRealStat(const char* file) const;
|
||||||
|
|
||||||
|
bool isFor() const { return loopType == LoopType::FOR; }
|
||||||
|
|
||||||
|
bool isWhile() const { return loopType == LoopType::WHILE; }
|
||||||
|
|
||||||
|
bool isImplicit() const { return loopType == LoopType::IMPLICIT; }
|
||||||
|
|
||||||
|
std::string loopSymbol() const { return loopSymbols.getMainVar(); }
|
||||||
|
|
||||||
public:
|
public:
|
||||||
int lineNum;
|
int lineNum;
|
||||||
int altLineNum;
|
int altLineNum;
|
||||||
@@ -407,7 +445,7 @@ public:
|
|||||||
int startVal, endVal, stepVal;
|
int startVal, endVal, stepVal;
|
||||||
std::tuple<Expression*, Expression*, Expression*> startEndStepVals;
|
std::tuple<Expression*, Expression*, Expression*> startEndStepVals;
|
||||||
|
|
||||||
std::string loopSymbol;
|
InductiveVariables loopSymbols;
|
||||||
std::pair<Expression*, Expression*> startEndExpr;
|
std::pair<Expression*, Expression*> startEndExpr;
|
||||||
|
|
||||||
bool hasGoto;
|
bool hasGoto;
|
||||||
@@ -448,7 +486,7 @@ public:
|
|||||||
|
|
||||||
bool hasSubstringRefs;
|
bool hasSubstringRefs;
|
||||||
|
|
||||||
bool isFor;
|
LoopType loopType;
|
||||||
|
|
||||||
bool inCanonicalFrom;
|
bool inCanonicalFrom;
|
||||||
|
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -23,8 +23,8 @@ using std::make_pair;
|
|||||||
using std::get;
|
using std::get;
|
||||||
|
|
||||||
#include "graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Distribution/Distribution.h"
|
#include "../Distribution/Distribution.h"
|
||||||
#include "../Distribution/CreateDistributionDirs.h"
|
#include "../Distribution/CreateDistributionDirs.h"
|
||||||
#include "../ParallelizationRegions/ParRegions.h"
|
#include "../ParallelizationRegions/ParRegions.h"
|
||||||
@@ -551,7 +551,7 @@ void addToDistributionGraph(const map<LoopGraph*, map<DIST::Array*, ArrayInfo*>>
|
|||||||
continue;
|
continue;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (!loopAccess.first->isFor)
|
if (!loopAccess.first->isFor())
|
||||||
continue;
|
continue;
|
||||||
|
|
||||||
DIST::GraphCSR<int, double, attrType>& G = currReg->GetGraphToModify();
|
DIST::GraphCSR<int, double, attrType>& G = currReg->GetGraphToModify();
|
||||||
@@ -775,7 +775,7 @@ static void isAllOk(const vector<LoopGraph*> &loops, vector<Messages> &currMessa
|
|||||||
{
|
{
|
||||||
if (loops[i]->region)
|
if (loops[i]->region)
|
||||||
{
|
{
|
||||||
if (loops[i]->countOfIters == 0 && loops[i]->region && loops[i]->isFor)
|
if (loops[i]->countOfIters == 0 && loops[i]->region && loops[i]->isFor())
|
||||||
{
|
{
|
||||||
wstring bufE, bufR;
|
wstring bufE, bufR;
|
||||||
__spf_printToLongBuf(bufE, L" Can not calculate count of iterations for this loop, information about iterations in all loops in parallel regions '%s' will be ignored",
|
__spf_printToLongBuf(bufE, L" Can not calculate count of iterations for this loop, information about iterations in all loops in parallel regions '%s' will be ignored",
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -8,8 +8,8 @@
|
|||||||
#include <set>
|
#include <set>
|
||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
|
|
||||||
using std::set;
|
using std::set;
|
||||||
using std::pair;
|
using std::pair;
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -20,8 +20,8 @@
|
|||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "loop_analyzer.h"
|
#include "loop_analyzer.h"
|
||||||
|
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../ParallelizationRegions/ParRegions_func.h"
|
#include "../ParallelizationRegions/ParRegions_func.h"
|
||||||
#include "../SageAnalysisTool/depGraph.h"
|
#include "../SageAnalysisTool/depGraph.h"
|
||||||
#include "../SageAnalysisTool/OmegaForSage/include/lang-interf.h"
|
#include "../SageAnalysisTool/OmegaForSage/include/lang-interf.h"
|
||||||
|
|||||||
@@ -18,7 +18,7 @@
|
|||||||
#include <tuple>
|
#include <tuple>
|
||||||
#include <stack>
|
#include <stack>
|
||||||
|
|
||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#if _WIN32 && NDEBUG && __BOOST
|
#if _WIN32 && NDEBUG && __BOOST
|
||||||
#include <boost/thread.hpp>
|
#include <boost/thread.hpp>
|
||||||
@@ -30,25 +30,25 @@ extern int passDone;
|
|||||||
#include "../Distribution/Arrays.h"
|
#include "../Distribution/Arrays.h"
|
||||||
#include "../ParallelizationRegions/ParRegions.h"
|
#include "../ParallelizationRegions/ParRegions.h"
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../DirectiveProcessing/directive_parser.h"
|
#include "../DirectiveProcessing/directive_parser.h"
|
||||||
#include "../DirectiveProcessing/directive_creator.h"
|
#include "../DirectiveProcessing/directive_creator.h"
|
||||||
|
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/AstWrapper.h"
|
#include "AstWrapper.h"
|
||||||
|
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
#include "../ParallelizationRegions/ParRegions_func.h"
|
#include "../ParallelizationRegions/ParRegions_func.h"
|
||||||
#include "../DynamicAnalysis/gCov_parser_func.h"
|
#include "../DynamicAnalysis/gCov_parser_func.h"
|
||||||
|
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
#include "../SageAnalysisTool/depInterfaceExt.h"
|
#include "../SageAnalysisTool/depInterfaceExt.h"
|
||||||
|
|
||||||
#include "../VisualizerCalls/get_information.h"
|
#include "../VisualizerCalls/get_information.h"
|
||||||
#include "../VisualizerCalls/SendMessage.h"
|
#include "../VisualizerCalls/SendMessage.h"
|
||||||
|
|
||||||
#include "../Transformations/enddo_loop_converter.h"
|
#include "LoopEndDoConverter/enddo_loop_converter.h"
|
||||||
|
|
||||||
#include "../DirectiveProcessing/remote_access.h"
|
#include "../DirectiveProcessing/remote_access.h"
|
||||||
#include "../DirectiveProcessing/directive_omp_parser.h"
|
#include "../DirectiveProcessing/directive_omp_parser.h"
|
||||||
@@ -1633,17 +1633,7 @@ void loopAnalyzer(SgFile *file, vector<ParallelRegion*> ®ions, map<tuple<int,
|
|||||||
createNeededException();
|
createNeededException();
|
||||||
|
|
||||||
string fName = file->functions(i)->symbol()->identifier();
|
string fName = file->functions(i)->symbol()->identifier();
|
||||||
#if _WIN32
|
sendMessage_2lvl(0, (file->functions(i)->variant() != MODULE_STMT), fName);
|
||||||
if (file->functions(i)->variant() != MODULE_STMT)
|
|
||||||
sendMessage_2lvl(wstring(L"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> '") + wstring(fName.begin(), fName.end()) + L"'");
|
|
||||||
else
|
|
||||||
sendMessage_2lvl(wstring(L"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> '") + wstring(fName.begin(), fName.end()) + L"'");
|
|
||||||
#else
|
|
||||||
if (file->functions(i)->variant() != MODULE_STMT)
|
|
||||||
sendMessage_2lvl(wstring(L"processing function '") + wstring(fName.begin(), fName.end()) + L"'");
|
|
||||||
else
|
|
||||||
sendMessage_2lvl(wstring(L"processing module '") + wstring(fName.begin(), fName.end()) + L"'");
|
|
||||||
#endif
|
|
||||||
|
|
||||||
set<SgSymbol*> delcsSymbViewed;
|
set<SgSymbol*> delcsSymbViewed;
|
||||||
set<SgStatement*> delcsStatViewed;
|
set<SgStatement*> delcsStatViewed;
|
||||||
@@ -1710,7 +1700,10 @@ void loopAnalyzer(SgFile *file, vector<ParallelRegion*> ®ions, map<tuple<int,
|
|||||||
map<string, pair<SgSymbol*, SgStatement*>> notMappedDistributedArrays;
|
map<string, pair<SgSymbol*, SgStatement*>> notMappedDistributedArrays;
|
||||||
set<string> mappedDistrbutedArrays;
|
set<string> mappedDistrbutedArrays;
|
||||||
|
|
||||||
|
const ParallelRegionLines* prevParLines = NULL;
|
||||||
|
double prevLinesWeight = 1.0;
|
||||||
double currentWeight = 1.0;
|
double currentWeight = 1.0;
|
||||||
|
|
||||||
while (st != lastNode)
|
while (st != lastNode)
|
||||||
{
|
{
|
||||||
createNeededException();
|
createNeededException();
|
||||||
@@ -1733,13 +1726,31 @@ void loopAnalyzer(SgFile *file, vector<ParallelRegion*> ®ions, map<tuple<int,
|
|||||||
}
|
}
|
||||||
|
|
||||||
const int currentLine = st->lineNumber() < -1 ? st->localLineNumber() : st->lineNumber();
|
const int currentLine = st->lineNumber() < -1 ? st->localLineNumber() : st->lineNumber();
|
||||||
ParallelRegion *currReg = getRegionByLine(regions, st->fileName(), currentLine);
|
auto regAndLines = getRegionAndLinesByLine(regions, st->fileName(), currentLine);
|
||||||
|
|
||||||
|
auto *currReg = regAndLines.first;
|
||||||
|
auto *parLines = regAndLines.second;
|
||||||
if (currReg == NULL)
|
if (currReg == NULL)
|
||||||
{
|
{
|
||||||
st = st->lexNext();
|
st = st->lexNext();
|
||||||
continue;
|
continue;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
if (parLines != prevParLines)
|
||||||
|
{
|
||||||
|
prevParLines = parLines;
|
||||||
|
auto newParLinesWeight = parLines ? parLines->weight : 1.0;
|
||||||
|
|
||||||
|
if (prevParLines)
|
||||||
|
currentWeight /= prevLinesWeight;
|
||||||
|
|
||||||
|
if (parLines)
|
||||||
|
currentWeight *= newParLinesWeight;
|
||||||
|
|
||||||
|
prevLinesWeight = newParLinesWeight;
|
||||||
|
prevParLines = parLines;
|
||||||
|
}
|
||||||
|
|
||||||
if (isSgExecutableStatement(st) == NULL)
|
if (isSgExecutableStatement(st) == NULL)
|
||||||
delcsStatViewed.insert(st);
|
delcsStatViewed.insert(st);
|
||||||
else if (!sharedMemoryParallelization &&
|
else if (!sharedMemoryParallelization &&
|
||||||
@@ -2167,11 +2178,8 @@ void loopAnalyzer(SgFile *file, vector<ParallelRegion*> ®ions, map<tuple<int,
|
|||||||
if (!skipDeps)
|
if (!skipDeps)
|
||||||
{
|
{
|
||||||
string fName = file->functions(i)->symbol()->identifier();
|
string fName = file->functions(i)->symbol()->identifier();
|
||||||
#ifdef _WIN32
|
sendMessage_2lvl(1, idx, (int)convertedLoopInfo.size());
|
||||||
sendMessage_2lvl(wstring(L"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> ") + std::to_wstring(idx) + L"/" + std::to_wstring(convertedLoopInfo.size()));
|
|
||||||
#else
|
|
||||||
sendMessage_2lvl(wstring(L"processing loop ") + std::to_wstring(idx) + L"/" + std::to_wstring(convertedLoopInfo.size()));
|
|
||||||
#endif
|
|
||||||
tryToFindDependencies(loop.first, allLoops, funcWasInit, file, regions, currMessages, collection, funcByName, defUseByPlace);
|
tryToFindDependencies(loop.first, allLoops, funcWasInit, file, regions, currMessages, collection, funcByName, defUseByPlace);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@@ -2191,7 +2199,7 @@ void loopAnalyzer(SgFile *file, vector<ParallelRegion*> ®ions, map<tuple<int,
|
|||||||
LoopGraph *tmpLoop = new LoopGraph();
|
LoopGraph *tmpLoop = new LoopGraph();
|
||||||
|
|
||||||
tmpLoop->region = reg;
|
tmpLoop->region = reg;
|
||||||
tmpLoop->isFor = true;
|
tmpLoop->loopType = LoopType::FOR;
|
||||||
|
|
||||||
tmpLoops.push_back(tmpLoop);
|
tmpLoops.push_back(tmpLoop);
|
||||||
|
|
||||||
@@ -2319,7 +2327,7 @@ void loopAnalyzer(SgFile *file, vector<ParallelRegion*> ®ions, map<tuple<int,
|
|||||||
if (parallizeFreeLoops)
|
if (parallizeFreeLoops)
|
||||||
selectFreeLoopsForParallelization(loopsForFunction, funcName, (regime == DATA_DISTR), regions, messagesForFile);
|
selectFreeLoopsForParallelization(loopsForFunction, funcName, (regime == DATA_DISTR), regions, messagesForFile);
|
||||||
}
|
}
|
||||||
sendMessage_2lvl(L"");
|
sendMessage_2lvl(2);
|
||||||
}
|
}
|
||||||
else if (regime == COMP_DISTR)
|
else if (regime == COMP_DISTR)
|
||||||
{
|
{
|
||||||
|
|||||||
@@ -5,12 +5,12 @@
|
|||||||
#include <tuple>
|
#include <tuple>
|
||||||
#include <vector>
|
#include <vector>
|
||||||
#include <set>
|
#include <set>
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../ParallelizationRegions/ParRegions.h"
|
#include "../ParallelizationRegions/ParRegions.h"
|
||||||
#include "../SageAnalysisTool/depInterfaceExt.h"
|
#include "../SageAnalysisTool/depInterfaceExt.h"
|
||||||
#include "../Utils/AstWrapper.h"
|
#include "AstWrapper.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
|
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
@@ -10,12 +10,12 @@
|
|||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "ParRegions.h"
|
#include "ParRegions.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
#include "../Distribution/Distribution.h"
|
#include "../Distribution/Distribution.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
|
|
||||||
using std::vector;
|
using std::vector;
|
||||||
using std::string;
|
using std::string;
|
||||||
@@ -93,8 +93,10 @@ static inline SgStatement* getParentStat(SgStatement *st)
|
|||||||
return iterator;
|
return iterator;
|
||||||
}
|
}
|
||||||
|
|
||||||
static void updateRegionInfo(SgStatement *st, map<string, pair<Statement*, Statement*>> &startEnd, map<string, pair<int, int>> &lines_,
|
static void updateRegionInfo(SgStatement *st, map<string, pair<Statement*, Statement*>> &startEnd,
|
||||||
set<string> &funcCallFromReg, const map<string, FuncInfo*> &mapFuncs)
|
map<string, pair<int, int>> &lines_,
|
||||||
|
map<string, map<string, set<int>>> &funcCallFromReg,
|
||||||
|
const map<string, FuncInfo*> &mapFuncs)
|
||||||
{
|
{
|
||||||
string containsPrefix = "";
|
string containsPrefix = "";
|
||||||
SgStatement *st_ps = getParentStat(st);
|
SgStatement *st_ps = getParentStat(st);
|
||||||
@@ -103,17 +105,26 @@ static void updateRegionInfo(SgStatement *st, map<string, pair<Statement*, State
|
|||||||
containsPrefix = st_ps->symbol()->identifier() + string(".");
|
containsPrefix = st_ps->symbol()->identifier() + string(".");
|
||||||
|
|
||||||
extendRegionInfo(st, startEnd, lines_);
|
extendRegionInfo(st, startEnd, lines_);
|
||||||
|
|
||||||
|
set<string> callsFromStatement;
|
||||||
|
|
||||||
if (st->variant() == PROC_STAT)
|
if (st->variant() == PROC_STAT)
|
||||||
{
|
{
|
||||||
string fullName = st->symbol()->identifier();
|
string fullName = st->symbol()->identifier();
|
||||||
//check contains
|
//check contains
|
||||||
if (mapFuncs.find(containsPrefix + fullName) != mapFuncs.end())
|
if (mapFuncs.find(containsPrefix + fullName) != mapFuncs.end())
|
||||||
fullName = containsPrefix + fullName;
|
fullName = containsPrefix + fullName;
|
||||||
funcCallFromReg.insert(fullName);
|
callsFromStatement.insert(fullName);
|
||||||
}
|
}
|
||||||
|
|
||||||
for (int z = 0; z < 3; ++z)
|
for (int z = 0; z < 3; ++z)
|
||||||
findFuncCalls(st->expr(z), funcCallFromReg, containsPrefix, mapFuncs);
|
findFuncCalls(st->expr(z), callsFromStatement, containsPrefix, mapFuncs);
|
||||||
|
|
||||||
|
string filename = st->fileName();
|
||||||
|
int line = st->lineNumber();
|
||||||
|
|
||||||
|
for (const auto &func_name : callsFromStatement)
|
||||||
|
funcCallFromReg[func_name][filename].insert(line);
|
||||||
}
|
}
|
||||||
|
|
||||||
static void fillArrayNamesInReg(set<string> &usedArrayInRegion, SgExpression *exp)
|
static void fillArrayNamesInReg(set<string> &usedArrayInRegion, SgExpression *exp)
|
||||||
@@ -318,8 +329,9 @@ void fillRegionLines(SgFile *file, vector<ParallelRegion*> ®ions, vector<Mess
|
|||||||
string regionName = "";
|
string regionName = "";
|
||||||
map<string, pair<Statement*, Statement*>> startEnd;
|
map<string, pair<Statement*, Statement*>> startEnd;
|
||||||
map<string, pair<int, int>> lines_;
|
map<string, pair<int, int>> lines_;
|
||||||
set<string> funcCallFromReg;
|
map<string, map<string, set<int>>> funcCallFromReg;
|
||||||
bool regionStarted = false;
|
bool regionStarted = false;
|
||||||
|
double fragmentWeight = 1.0;
|
||||||
|
|
||||||
vector<SgStatement*> toDel;
|
vector<SgStatement*> toDel;
|
||||||
for (int i = 0; i < funcNum; ++i)
|
for (int i = 0; i < funcNum; ++i)
|
||||||
@@ -368,6 +380,33 @@ void fillRegionLines(SgFile *file, vector<ParallelRegion*> ®ions, vector<Mess
|
|||||||
itFunc->second->callRegions.insert(0);
|
itFunc->second->callRegions.insert(0);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// parse SPF_APPLY_FRAGMENT clause
|
||||||
|
auto *apply_fragment = data->expr(1);
|
||||||
|
fragmentWeight = 1.0;
|
||||||
|
|
||||||
|
while (apply_fragment)
|
||||||
|
{
|
||||||
|
auto *curr = apply_fragment->lhs();
|
||||||
|
if (curr)
|
||||||
|
{
|
||||||
|
__spf_print(1, "%s %d\n", curr->unparse(), curr->variant());
|
||||||
|
|
||||||
|
if (curr->variant() == SPF_WEIGHT_OP)
|
||||||
|
{
|
||||||
|
if (curr->lhs() &&
|
||||||
|
isSgValueExp(curr->lhs()) &&
|
||||||
|
isSgValueExp(curr->lhs())->doubleValue())
|
||||||
|
{
|
||||||
|
fragmentWeight = strtod(isSgValueExp(curr->lhs())->doubleValue(), NULL);
|
||||||
|
__spf_print(1, "->> %lf\n", fragmentWeight);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
__spf_print(1, "WEIGHT clause without double argument\n");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
apply_fragment = apply_fragment->rhs();
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
if (next && next->variant() == SPF_END_PARALLEL_REG_DIR)
|
if (next && next->variant() == SPF_END_PARALLEL_REG_DIR)
|
||||||
@@ -400,10 +439,12 @@ void fillRegionLines(SgFile *file, vector<ParallelRegion*> ®ions, vector<Mess
|
|||||||
|
|
||||||
extendRegionInfo(st, startEnd, lines_, true);
|
extendRegionInfo(st, startEnd, lines_, true);
|
||||||
for (auto itRegInfo = startEnd.begin(); itRegInfo != startEnd.end(); ++itRegInfo)
|
for (auto itRegInfo = startEnd.begin(); itRegInfo != startEnd.end(); ++itRegInfo)
|
||||||
currReg->AddLines(lines_[itRegInfo->first], itRegInfo->first, &itRegInfo->second);
|
currReg->AddLines(lines_[itRegInfo->first], itRegInfo->first, &itRegInfo->second, fragmentWeight);
|
||||||
|
|
||||||
for (auto &func : funcCallFromReg)
|
for (auto &by_func : funcCallFromReg)
|
||||||
currReg->AddFuncCalls(func);
|
for (auto &by_file : by_func.second)
|
||||||
|
for(auto &by_line : by_file.second)
|
||||||
|
currReg->AddFuncCalls(by_func.first, by_file.first, by_line);
|
||||||
|
|
||||||
filterUserDirectives(currReg, usedArrayInRegion, userDvmRedistrDirs, userDvmRealignDirs, userDvmShadowDirs);
|
filterUserDirectives(currReg, usedArrayInRegion, userDvmRedistrDirs, userDvmRealignDirs, userDvmShadowDirs);
|
||||||
currReg->AddUserDirectives(userDvmRealignDirs, DVM_REALIGN_DIR);
|
currReg->AddUserDirectives(userDvmRealignDirs, DVM_REALIGN_DIR);
|
||||||
@@ -496,34 +537,48 @@ void fillRegionLinesStep2(vector<ParallelRegion*> ®ions, const map<string, ve
|
|||||||
{
|
{
|
||||||
if (regions[i]->GetName() != "DEFAULT")
|
if (regions[i]->GetName() != "DEFAULT")
|
||||||
for (auto &func : regions[i]->GetFuncCalls())
|
for (auto &func : regions[i]->GetFuncCalls())
|
||||||
setExplicitFlag(func, funcMap);
|
setExplicitFlag(func.first, funcMap);
|
||||||
}
|
}
|
||||||
|
|
||||||
for (int i = 0; i < regions.size(); ++i)
|
for (int i = 0; i < regions.size(); ++i)
|
||||||
{
|
{
|
||||||
if (regions[i]->GetName() != "DEFAULT")
|
if (regions[i]->GetName() != "DEFAULT")
|
||||||
{
|
{
|
||||||
set<string> uniqFuncCalls;
|
map<string, double> uniqFuncCalls;
|
||||||
for (auto &elem : regions[i]->GetFuncCalls())
|
map<string, map<string, set<int>>> callPlaces;
|
||||||
uniqFuncCalls.insert(elem);
|
|
||||||
|
for (auto &elem : regions[i]->GetFuncCalls())
|
||||||
|
{
|
||||||
|
double max_weight = 0;
|
||||||
|
for (auto* fragment : elem.second)
|
||||||
|
if (fragment->weight > max_weight)
|
||||||
|
max_weight = fragment->weight;
|
||||||
|
|
||||||
|
uniqFuncCalls[elem.first] = max_weight;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool wasChanged = true;
|
||||||
|
auto funcsBefore = uniqFuncCalls;
|
||||||
|
|
||||||
bool wasChanged = 1;
|
|
||||||
while (wasChanged)
|
while (wasChanged)
|
||||||
{
|
{
|
||||||
wasChanged = 0;
|
wasChanged = false;
|
||||||
|
auto updated = uniqFuncCalls;
|
||||||
|
|
||||||
for (auto &uniqF : uniqFuncCalls)
|
for (auto &uniqF : uniqFuncCalls)
|
||||||
{
|
{
|
||||||
auto func = funcMap.find(uniqF);
|
auto func = funcMap.find(uniqF.first);
|
||||||
if (func != funcMap.end())
|
if (func != funcMap.end())
|
||||||
{
|
{
|
||||||
for (auto &calls : func->second->callsFrom)
|
for (auto &call : func->second->callsFromDetailed)
|
||||||
{
|
{
|
||||||
auto it = uniqFuncCalls.find(calls);
|
auto it = updated.find(call.detailCallsFrom.first);
|
||||||
if (it == uniqFuncCalls.end())
|
if (it == updated.end())
|
||||||
{
|
updated.insert({call.detailCallsFrom.first, uniqF.second});
|
||||||
uniqFuncCalls.insert(it, calls);
|
else
|
||||||
wasChanged = 1;
|
it->second = std::max(it->second, uniqF.second);
|
||||||
}
|
|
||||||
|
callPlaces[call.detailCallsFrom.first][func->second->fileName].insert(call.detailCallsFrom.second);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@@ -532,21 +587,27 @@ void fillRegionLinesStep2(vector<ParallelRegion*> ®ions, const map<string, ve
|
|||||||
string toPrint = "";
|
string toPrint = "";
|
||||||
for (auto &elem : uniqFuncCalls)
|
for (auto &elem : uniqFuncCalls)
|
||||||
{
|
{
|
||||||
auto it = funcMap.find(elem);
|
auto it = funcMap.find(elem.first);
|
||||||
if (it != funcMap.end())
|
if (it != funcMap.end())
|
||||||
{
|
{
|
||||||
regions[i]->AddLines(it->second->linesNum, it->second->fileName);
|
regions[i]->AddLines(it->second->linesNum, it->second->fileName, NULL, elem.second);
|
||||||
regions[i]->AddFuncCallsToAllCalls(it->second);
|
|
||||||
|
|
||||||
if (it->second->inRegion == 0)
|
if (it->second->inRegion == 0)
|
||||||
it->second->inRegion = 2;
|
it->second->inRegion = 2;
|
||||||
|
|
||||||
it->second->callRegions.insert(i);
|
it->second->callRegions.insert(i);
|
||||||
|
|
||||||
toPrint += elem + " ";
|
toPrint += elem.first + " ";
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
for (auto &elem : callPlaces)
|
||||||
|
{
|
||||||
|
for (const auto &byFile : elem.second)
|
||||||
|
for (auto byLine : byFile.second)
|
||||||
|
regions[i]->AddFuncCalls(elem.first, byFile.first, byLine);
|
||||||
|
}
|
||||||
|
|
||||||
if (toPrint != "")
|
if (toPrint != "")
|
||||||
__spf_print(1, "[%s]: funcs: %s\n", regions[i]->GetName().c_str(), toPrint.c_str());
|
__spf_print(1, "[%s]: funcs: %s\n", regions[i]->GetName().c_str(), toPrint.c_str());
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -9,17 +9,17 @@
|
|||||||
#include "../Distribution/DvmhDirective.h"
|
#include "../Distribution/DvmhDirective.h"
|
||||||
#include "../Distribution/GraphCSR.h"
|
#include "../Distribution/GraphCSR.h"
|
||||||
#include "../Distribution/Distribution.h"
|
#include "../Distribution/Distribution.h"
|
||||||
#include "../Utils/AstWrapper.h"
|
#include "AstWrapper.h"
|
||||||
|
|
||||||
#include "../Utils/json.hpp"
|
#include "json.hpp"
|
||||||
|
|
||||||
#if __SPF
|
#if __SPF
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
struct ParallelRegionLines
|
struct ParallelRegionLines
|
||||||
{
|
{
|
||||||
ParallelRegionLines()
|
ParallelRegionLines(double weight = 1.0) : weight(weight)
|
||||||
{
|
{
|
||||||
lines = std::make_pair(-1, -1);
|
lines = std::make_pair(-1, -1);
|
||||||
stats = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
stats = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
||||||
@@ -27,14 +27,15 @@ struct ParallelRegionLines
|
|||||||
intervalAfter = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
intervalAfter = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
||||||
}
|
}
|
||||||
|
|
||||||
ParallelRegionLines(const std::pair<int, int> &lines) : lines(lines)
|
ParallelRegionLines(const std::pair<int, int> &lines, double weight = 1.0) : lines(lines), weight(weight)
|
||||||
{
|
{
|
||||||
stats = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
stats = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
||||||
intervalBefore = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
intervalBefore = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
||||||
intervalAfter = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
intervalAfter = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
||||||
}
|
}
|
||||||
|
|
||||||
ParallelRegionLines(const std::pair<int, int> &lines, const std::pair<Statement*, Statement*> stats) : lines(lines), stats(stats)
|
ParallelRegionLines(const std::pair<int, int> &lines, const std::pair<Statement*, Statement*> stats, double weight = 1.0)
|
||||||
|
: lines(lines), stats(stats), weight(weight)
|
||||||
{
|
{
|
||||||
intervalBefore = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
intervalBefore = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
||||||
intervalAfter = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
intervalAfter = std::make_pair<Statement*, Statement*>(NULL, NULL);
|
||||||
@@ -62,6 +63,8 @@ struct ParallelRegionLines
|
|||||||
// <start, end> interval
|
// <start, end> interval
|
||||||
std::pair<Statement*, Statement*> intervalBefore;
|
std::pair<Statement*, Statement*> intervalBefore;
|
||||||
std::pair<Statement*, Statement*> intervalAfter;
|
std::pair<Statement*, Statement*> intervalAfter;
|
||||||
|
|
||||||
|
double weight; // weight of the fragment among all fragments of this region
|
||||||
};
|
};
|
||||||
|
|
||||||
#if __SPF
|
#if __SPF
|
||||||
@@ -116,7 +119,7 @@ public:
|
|||||||
currentVariant = copy.currentVariant;
|
currentVariant = copy.currentVariant;
|
||||||
}
|
}
|
||||||
|
|
||||||
int AddLines(const std::pair<int, int> &linesToAdd, const std::string &file, const std::pair<Statement*, Statement*> *startEnd = NULL)
|
int AddLines(const std::pair<int, int> &linesToAdd, const std::string &file, const std::pair<Statement*, Statement*> *startEnd = NULL, double weight = 1.0)
|
||||||
{
|
{
|
||||||
if (linesToAdd.first > linesToAdd.second)
|
if (linesToAdd.first > linesToAdd.second)
|
||||||
return -1;
|
return -1;
|
||||||
@@ -126,17 +129,29 @@ public:
|
|||||||
it = lines.insert(it, make_pair(file, std::vector<ParallelRegionLines>()));
|
it = lines.insert(it, make_pair(file, std::vector<ParallelRegionLines>()));
|
||||||
|
|
||||||
if (startEnd)
|
if (startEnd)
|
||||||
it->second.push_back(ParallelRegionLines(linesToAdd, *startEnd));
|
it->second.push_back(ParallelRegionLines(linesToAdd, *startEnd, weight));
|
||||||
else
|
else
|
||||||
it->second.push_back(ParallelRegionLines(linesToAdd));
|
it->second.push_back(ParallelRegionLines(linesToAdd, weight));
|
||||||
|
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
void AddFuncCalls(const std::string &func) { functionsCall.insert(func); }
|
void AddFuncCalls(const std::string &func, const std::string &file, const int line)
|
||||||
|
{
|
||||||
|
auto *found_lines = GetLinesByLine(file, line);
|
||||||
|
|
||||||
|
if (found_lines)
|
||||||
|
functionsCall[func].insert(found_lines);
|
||||||
|
}
|
||||||
|
|
||||||
#if __SPF
|
#if __SPF
|
||||||
void AddFuncCallsToAllCalls(FuncInfo *func) { allFunctionsCall.insert(func); }
|
void AddFuncCallsToAllCalls(FuncInfo *func, const std::string &file, const int line)
|
||||||
|
{
|
||||||
|
auto *found_lines = GetLinesByLine(file, line);
|
||||||
|
|
||||||
|
if (found_lines)
|
||||||
|
allFunctionsCall[func].insert(found_lines);
|
||||||
|
}
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
uint64_t GetId() const { return regionId; }
|
uint64_t GetId() const { return regionId; }
|
||||||
@@ -176,10 +191,10 @@ public:
|
|||||||
const DataDirective& GetDataDir() const { return dataDirectives; }
|
const DataDirective& GetDataDir() const { return dataDirectives; }
|
||||||
DataDirective& GetDataDirToModify() { return dataDirectives; }
|
DataDirective& GetDataDirToModify() { return dataDirectives; }
|
||||||
|
|
||||||
const std::set<std::string>& GetFuncCalls() const { return functionsCall; }
|
const std::map<std::string, std::set<const ParallelRegionLines*>>& GetFuncCalls() const { return functionsCall; }
|
||||||
|
|
||||||
#if __SPF
|
#if __SPF
|
||||||
const std::set<FuncInfo*>& GetAllFuncCalls() const { return allFunctionsCall; }
|
const std::map<FuncInfo*, std::set<const ParallelRegionLines*>>& GetAllFuncCalls() const { return allFunctionsCall; }
|
||||||
const std::map<FuncInfo*, std::map<DIST::Array*, std::vector<ParallelRegionLines>>>& GetUsedLocalArrays() const { return usedLocalArrays; }
|
const std::map<FuncInfo*, std::map<DIST::Array*, std::vector<ParallelRegionLines>>>& GetUsedLocalArrays() const { return usedLocalArrays; }
|
||||||
const std::map<FuncInfo*, std::map<DIST::Array*, std::vector<ParallelRegionLines>>>& GetUsedCommonArrays() const { return usedCommonArrays; }
|
const std::map<FuncInfo*, std::map<DIST::Array*, std::vector<ParallelRegionLines>>>& GetUsedCommonArrays() const { return usedCommonArrays; }
|
||||||
|
|
||||||
@@ -218,7 +233,7 @@ public:
|
|||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
bool HasThisLine(const int line, const std::string &file) const
|
bool HasThisLine(const int line, const std::string &file, const ParallelRegionLines** found = nullptr) const
|
||||||
{
|
{
|
||||||
bool retVal = false;
|
bool retVal = false;
|
||||||
auto it = lines.find(file);
|
auto it = lines.find(file);
|
||||||
@@ -229,6 +244,9 @@ public:
|
|||||||
if (it->second[i].lines.first <= line && it->second[i].lines.second >= line)
|
if (it->second[i].lines.first <= line && it->second[i].lines.second >= line)
|
||||||
{
|
{
|
||||||
retVal = true;
|
retVal = true;
|
||||||
|
if (found)
|
||||||
|
*found = &(it->second[i]);
|
||||||
|
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@@ -292,7 +310,7 @@ public:
|
|||||||
fprintf(fileOut, " originalName '%s'\n", originalName.c_str());
|
fprintf(fileOut, " originalName '%s'\n", originalName.c_str());
|
||||||
fprintf(fileOut, " functions call from %d:\n", (int)functionsCall.size());
|
fprintf(fileOut, " functions call from %d:\n", (int)functionsCall.size());
|
||||||
for (auto &func : functionsCall)
|
for (auto &func : functionsCall)
|
||||||
fprintf(fileOut, " '%s'\n", func.c_str());
|
fprintf(fileOut, " '%s'\n", func.first.c_str());
|
||||||
fprintf(fileOut, " total lines %d:\n", (int)lines.size());
|
fprintf(fileOut, " total lines %d:\n", (int)lines.size());
|
||||||
for (auto &line : lines)
|
for (auto &line : lines)
|
||||||
{
|
{
|
||||||
@@ -362,11 +380,11 @@ private:
|
|||||||
std::string originalName;
|
std::string originalName;
|
||||||
// file -> lines info
|
// file -> lines info
|
||||||
std::map<std::string, std::vector<ParallelRegionLines>> lines;
|
std::map<std::string, std::vector<ParallelRegionLines>> lines;
|
||||||
std::set<std::string> functionsCall;
|
std::map<std::string, std::set<const ParallelRegionLines*>> functionsCall; // func name -> fragments with calls
|
||||||
|
|
||||||
#if __SPF
|
#if __SPF
|
||||||
// for RESOLVE_PAR_REGIONS
|
// for RESOLVE_PAR_REGIONS
|
||||||
std::set<FuncInfo*> allFunctionsCall;
|
std::map<FuncInfo*, std::set<const ParallelRegionLines*>> allFunctionsCall; // function -> fragments with calls
|
||||||
std::map<FuncInfo*, std::map<DIST::Array*, std::vector<ParallelRegionLines>>> usedLocalArrays; // func -> array -> lines
|
std::map<FuncInfo*, std::map<DIST::Array*, std::vector<ParallelRegionLines>>> usedLocalArrays; // func -> array -> lines
|
||||||
std::map<FuncInfo*, std::map<DIST::Array*, std::vector<ParallelRegionLines>>> usedCommonArrays; // func -> array -> lines
|
std::map<FuncInfo*, std::map<DIST::Array*, std::vector<ParallelRegionLines>>> usedCommonArrays; // func -> array -> lines
|
||||||
//
|
//
|
||||||
@@ -408,4 +426,5 @@ private:
|
|||||||
ParallelRegion* getRegionById(const std::vector<ParallelRegion*>& regions, const uint64_t regionId);
|
ParallelRegion* getRegionById(const std::vector<ParallelRegion*>& regions, const uint64_t regionId);
|
||||||
ParallelRegion* getRegionByName(const std::vector<ParallelRegion*>& regions, const std::string& regionName);
|
ParallelRegion* getRegionByName(const std::vector<ParallelRegion*>& regions, const std::string& regionName);
|
||||||
ParallelRegion* getRegionByLine(const std::vector<ParallelRegion*>& regions, const std::string& file, const int line);
|
ParallelRegion* getRegionByLine(const std::vector<ParallelRegion*>& regions, const std::string& file, const int line);
|
||||||
|
std::pair<ParallelRegion*, const ParallelRegionLines*> getRegionAndLinesByLine(const std::vector<ParallelRegion*>& regions, const std::string& file, const int line);
|
||||||
std::set<ParallelRegion*> getAllRegionsByLine(const std::vector<ParallelRegion*>& regions, const std::string& file, const int line);
|
std::set<ParallelRegion*> getAllRegionsByLine(const std::vector<ParallelRegion*>& regions, const std::string& file, const int line);
|
||||||
@@ -1,8 +1,8 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "ParRegions.h"
|
#include "ParRegions.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../GraphLoop/graph_loops.h"
|
#include "graph_loops.h"
|
||||||
|
|
||||||
void fillRegionLines(SgFile *file, std::vector<ParallelRegion*> ®ions, std::vector<Messages>& messagesForFile, std::vector<LoopGraph*> *loops = NULL, std::vector<FuncInfo*> *funcs = NULL);
|
void fillRegionLines(SgFile *file, std::vector<ParallelRegion*> ®ions, std::vector<Messages>& messagesForFile, std::vector<LoopGraph*> *loops = NULL, std::vector<FuncInfo*> *funcs = NULL);
|
||||||
void fillRegionLinesStep2(std::vector<ParallelRegion*> ®ions, const std::map<std::string, std::vector<FuncInfo*>> &allFuncInfo, std::map<std::string, std::vector<LoopGraph*>> *loopGraph = NULL);
|
void fillRegionLinesStep2(std::vector<ParallelRegion*> ®ions, const std::map<std::string, std::vector<FuncInfo*>> &allFuncInfo, std::map<std::string, std::vector<LoopGraph*>> *loopGraph = NULL);
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <map>
|
#include <map>
|
||||||
#include <string>
|
#include <string>
|
||||||
|
|||||||
@@ -1,7 +1,7 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "ParRegions.h"
|
#include "ParRegions.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
|
|
||||||
bool expandExtractReg(const std::string &fileName, const int startLine, const int endLine, const std::vector<ParallelRegion*> ®ions, std::vector<Messages> &messagesForFile, const bool toDelete = false);
|
bool expandExtractReg(const std::string &fileName, const int startLine, const int endLine, const std::vector<ParallelRegion*> ®ions, std::vector<Messages> &messagesForFile, const bool toDelete = false);
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <string>
|
#include <string>
|
||||||
#include <vector>
|
#include <vector>
|
||||||
@@ -11,14 +11,14 @@
|
|||||||
#include "ParRegions_func.h"
|
#include "ParRegions_func.h"
|
||||||
#include "resolve_par_reg_conflicts.h"
|
#include "resolve_par_reg_conflicts.h"
|
||||||
|
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls_func.h"
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
#include "../DirectiveProcessing/directive_creator.h"
|
#include "../DirectiveProcessing/directive_creator.h"
|
||||||
#include "../DirectiveProcessing/insert_directive.h"
|
#include "../DirectiveProcessing/insert_directive.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
#include "../Transformations/function_purifying.h"
|
#include "FunctionPurifying/function_purifying.h"
|
||||||
|
|
||||||
using std::map;
|
using std::map;
|
||||||
using std::pair;
|
using std::pair;
|
||||||
|
|||||||
@@ -1,9 +1,9 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#include "ParRegions.h"
|
#include "ParRegions.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
|
|
||||||
void fillRegionIntervals(std::vector<ParallelRegion*> ®ions);
|
void fillRegionIntervals(std::vector<ParallelRegion*> ®ions);
|
||||||
void fillRegionArrays(std::vector<ParallelRegion*> ®ions, const std::map<std::string, std::vector<FuncInfo*>> &allFuncInfo, const std::map<std::string, CommonBlock*> &commonBlocks);
|
void fillRegionArrays(std::vector<ParallelRegion*> ®ions, const std::map<std::string, std::vector<FuncInfo*>> &allFuncInfo, const std::map<std::string, CommonBlock*> &commonBlocks);
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -16,13 +16,13 @@
|
|||||||
#include "../DynamicAnalysis/gcov_info.h"
|
#include "../DynamicAnalysis/gcov_info.h"
|
||||||
#include "../DynamicAnalysis/gCov_parser_func.h"
|
#include "../DynamicAnalysis/gCov_parser_func.h"
|
||||||
#include "PredictScheme.h"
|
#include "PredictScheme.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../DirectiveProcessing/directive_parser.h"
|
#include "../DirectiveProcessing/directive_parser.h"
|
||||||
#include "../Distribution/DvmhDirective.h"
|
#include "../Distribution/DvmhDirective.h"
|
||||||
#include "../GraphLoop/graph_loops_func.h"
|
#include "graph_loops_func.h"
|
||||||
#include "../ExpressionTransform/expr_transform.h"
|
#include "expr_transform.h"
|
||||||
#include "../LoopAnalyzer/loop_analyzer.h"
|
#include "../LoopAnalyzer/loop_analyzer.h"
|
||||||
#include "../CFGraph/CFGraph.h"
|
#include "CFGraph/CFGraph.h"
|
||||||
|
|
||||||
#include "json.hpp"
|
#include "json.hpp"
|
||||||
|
|
||||||
|
|||||||
@@ -1,8 +1,8 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
#include <vector>
|
#include <vector>
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../Utils/json.hpp"
|
#include "json.hpp"
|
||||||
|
|
||||||
class ParallelStats
|
class ParallelStats
|
||||||
{
|
{
|
||||||
|
|||||||
@@ -1,5 +1,5 @@
|
|||||||
#define _LEAK_
|
#define _LEAK_
|
||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstring>
|
#include <cstring>
|
||||||
@@ -9,10 +9,10 @@
|
|||||||
#include <vector>
|
#include <vector>
|
||||||
#include <fstream>
|
#include <fstream>
|
||||||
|
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "private_analyzer.h"
|
#include "private_analyzer.h"
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../CFGraph/CFGraph.h"
|
#include "CFGraph/CFGraph.h"
|
||||||
|
|
||||||
using std::vector;
|
using std::vector;
|
||||||
|
|
||||||
|
|||||||
@@ -3,7 +3,7 @@
|
|||||||
#include <vector>
|
#include <vector>
|
||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
|
|
||||||
extern void Private_Vars_Analyzer(SgStatement* start);
|
extern void Private_Vars_Analyzer(SgStatement* start);
|
||||||
void PrivateAnalyzer(SgFile *file, std::vector<FuncInfo*> &funcs);
|
void PrivateAnalyzer(SgFile *file, std::vector<FuncInfo*> &funcs);
|
||||||
|
|||||||
141
src/PrivateAnalyzer/private_arrays_search.cpp
Normal file
141
src/PrivateAnalyzer/private_arrays_search.cpp
Normal file
@@ -0,0 +1,141 @@
|
|||||||
|
#include <map>
|
||||||
|
#include <unordered_set>
|
||||||
|
#include <unordered_map>
|
||||||
|
#include <vector>
|
||||||
|
#include <queue>
|
||||||
|
#include <numeric>
|
||||||
|
#include <iostream>
|
||||||
|
|
||||||
|
#include "private_arrays_search.h"
|
||||||
|
#include "range_structures.h"
|
||||||
|
#include "region.h"
|
||||||
|
#include "SgUtils.h"
|
||||||
|
#include "graph_loops.h"
|
||||||
|
#include "CFGraph/CFGraph.h"
|
||||||
|
|
||||||
|
using namespace std;
|
||||||
|
|
||||||
|
static void Collapse(Region* region)
|
||||||
|
{
|
||||||
|
if (region->getBasickBlocks().empty())
|
||||||
|
return;
|
||||||
|
|
||||||
|
for (auto& [arrayName, arrayRanges] : region->getHeader()->array_out)
|
||||||
|
{
|
||||||
|
for (Region* byBlock : region->getBasickBlocks())
|
||||||
|
{
|
||||||
|
AccessingSet intersection = byBlock->array_def[arrayName].Intersect(arrayRanges);
|
||||||
|
region->array_def[arrayName] = region->array_def[arrayName].Union(intersection);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
for (auto& byBlock : region->getBasickBlocks())
|
||||||
|
{
|
||||||
|
for (auto& [arrayName, arrayRanges] : byBlock->array_use)
|
||||||
|
{
|
||||||
|
AccessingSet diff = byBlock->array_use[arrayName].Diff(byBlock->array_in[arrayName]);
|
||||||
|
region->array_use[arrayName] = region->array_use[arrayName].Union(diff);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
ArrayAccessingIndexes useUnion;
|
||||||
|
for (auto& byBlock : region->getBasickBlocks())
|
||||||
|
for (auto& [arrayName, arrayRanges] : byBlock->array_use)
|
||||||
|
useUnion[arrayName] = useUnion[arrayName].Union(byBlock->array_use[arrayName]);
|
||||||
|
|
||||||
|
for (auto& [arrayName, arrayRanges] : useUnion)
|
||||||
|
region->array_priv[arrayName] = useUnion[arrayName].Diff(region->array_use[arrayName]);
|
||||||
|
|
||||||
|
for (Region* prevBlock : region->getHeader()->getPrevRegions())
|
||||||
|
prevBlock->replaceInNextRegions(region, region->getHeader());
|
||||||
|
|
||||||
|
for (Region* nextBlock : region->getHeader()->getNextRegions())
|
||||||
|
nextBlock->replaceInPrevRegions(region, region->getHeader());
|
||||||
|
}
|
||||||
|
|
||||||
|
static void SolveDataFlowIteratively(Region* DFG)
|
||||||
|
{
|
||||||
|
unordered_set<Region*> worklist(DFG->getBasickBlocks());
|
||||||
|
do
|
||||||
|
{
|
||||||
|
Region* b = *worklist.begin();
|
||||||
|
ArrayAccessingIndexes newIn;
|
||||||
|
bool flagFirst = true;
|
||||||
|
for (Region* prevBlock : b->getPrevRegions())
|
||||||
|
{
|
||||||
|
if (flagFirst)
|
||||||
|
{
|
||||||
|
newIn = prevBlock->array_out;
|
||||||
|
flagFirst = false;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
if (prevBlock->array_out.empty())
|
||||||
|
{
|
||||||
|
newIn.clear();
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
for (const auto& [arrayName, accessSet] : prevBlock->array_out)
|
||||||
|
{
|
||||||
|
if (newIn.find(arrayName) != newIn.end())
|
||||||
|
newIn[arrayName] = newIn[arrayName].Intersect(accessSet);
|
||||||
|
else
|
||||||
|
newIn[arrayName] = AccessingSet();
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
b->array_in = move(newIn);
|
||||||
|
ArrayAccessingIndexes newOut;
|
||||||
|
if (b->array_def.empty())
|
||||||
|
newOut = b->array_in;
|
||||||
|
else if (b->array_in.empty())
|
||||||
|
newOut = b->array_def;
|
||||||
|
else
|
||||||
|
{
|
||||||
|
for (auto& [arrayName, accessSet] : b->array_def)
|
||||||
|
{
|
||||||
|
if (newOut.find(arrayName) != newOut.end())
|
||||||
|
newOut[arrayName] = b->array_def[arrayName].Union(b->array_in[arrayName]);
|
||||||
|
else
|
||||||
|
newOut[arrayName] = accessSet;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* can not differ */
|
||||||
|
if (newOut != b->array_out)
|
||||||
|
b->array_out = newOut;
|
||||||
|
else
|
||||||
|
worklist.erase(b);
|
||||||
|
}
|
||||||
|
while (!worklist.empty());
|
||||||
|
}
|
||||||
|
|
||||||
|
static void SolveDataFlow(Region* DFG)
|
||||||
|
{
|
||||||
|
if (!DFG)
|
||||||
|
return;
|
||||||
|
|
||||||
|
SolveDataFlowIteratively(DFG);
|
||||||
|
for (Region* subRegion : DFG->getSubRegions())
|
||||||
|
SolveDataFlow(subRegion);
|
||||||
|
Collapse(DFG);
|
||||||
|
}
|
||||||
|
|
||||||
|
map<LoopGraph*, ArrayAccessingIndexes> FindPrivateArrays(map<string, vector<LoopGraph*>> &loopGraph, map<FuncInfo*, vector<SAPFOR::BasicBlock*>>& FullIR)
|
||||||
|
{
|
||||||
|
map<LoopGraph*, ArrayAccessingIndexes> result;
|
||||||
|
for (const auto& [loopName, loops] : loopGraph)
|
||||||
|
{
|
||||||
|
for (const auto& loop : loops)
|
||||||
|
{
|
||||||
|
for (const auto& [funcInfo, blocks]: FullIR)
|
||||||
|
{
|
||||||
|
Region* loopRegion = new Region(loop, blocks);
|
||||||
|
SolveDataFlow(loopRegion);
|
||||||
|
result[loop] = loopRegion->array_priv;
|
||||||
|
delete(loopRegion);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return result;
|
||||||
|
}
|
||||||
12
src/PrivateAnalyzer/private_arrays_search.h
Normal file
12
src/PrivateAnalyzer/private_arrays_search.h
Normal file
@@ -0,0 +1,12 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include <vector>
|
||||||
|
#include <map>
|
||||||
|
#include <unordered_set>
|
||||||
|
|
||||||
|
#include "range_structures.h"
|
||||||
|
#include "graph_loops.h"
|
||||||
|
#include "CFGraph/CFGraph.h"
|
||||||
|
|
||||||
|
std::map<LoopGraph*, ArrayAccessingIndexes> FindPrivateArrays(std::map<std::string, std::vector<LoopGraph*>>& loopGraph, std::map<FuncInfo*, std::vector<SAPFOR::BasicBlock*>>& FullIR);
|
||||||
|
std::pair<SAPFOR::BasicBlock*, std::unordered_set<SAPFOR::BasicBlock*>> GetBasicBlocksForLoop(const LoopGraph* loop, const std::vector<SAPFOR::BasicBlock*> blocks);
|
||||||
293
src/PrivateAnalyzer/range_structures.cpp
Normal file
293
src/PrivateAnalyzer/range_structures.cpp
Normal file
@@ -0,0 +1,293 @@
|
|||||||
|
#include <vector>
|
||||||
|
#include <map>
|
||||||
|
#include <unordered_set>
|
||||||
|
#include <string>
|
||||||
|
|
||||||
|
#include "utils.h"
|
||||||
|
#include "range_structures.h"
|
||||||
|
|
||||||
|
using namespace std;
|
||||||
|
|
||||||
|
static vector<uint64_t> FindParticularSolution(const ArrayDimension& dim1, const ArrayDimension& dim2)
|
||||||
|
{
|
||||||
|
for (uint64_t i = 0; i < dim1.tripCount; i++)
|
||||||
|
{
|
||||||
|
uint64_t leftPart = dim1.start + i * dim1.step;
|
||||||
|
for (uint64_t j = 0; j < dim2.tripCount; j++)
|
||||||
|
{
|
||||||
|
uint64_t rightPart = dim2.start + j * dim2.step;
|
||||||
|
if (leftPart == rightPart)
|
||||||
|
return { i, j };
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return {};
|
||||||
|
}
|
||||||
|
|
||||||
|
/* dim1 /\ dim2 */
|
||||||
|
static ArrayDimension* DimensionIntersection(const ArrayDimension& dim1, const ArrayDimension& dim2)
|
||||||
|
{
|
||||||
|
vector<uint64_t> partSolution = FindParticularSolution(dim1, dim2);
|
||||||
|
if (partSolution.empty())
|
||||||
|
return NULL;
|
||||||
|
|
||||||
|
int64_t x0 = partSolution[0], y0 = partSolution[1];
|
||||||
|
/* x = x_0 + c * t */
|
||||||
|
/* y = y_0 + d * t */
|
||||||
|
int64_t c = dim2.step / gcd(dim1.step, dim2.step);
|
||||||
|
int64_t d = dim1.step / gcd(dim1.step, dim2.step);
|
||||||
|
int64_t tXMin, tXMax, tYMin, tYMax;
|
||||||
|
tXMin = -x0 / c;
|
||||||
|
tXMax = (dim1.tripCount - 1 - x0) / c;
|
||||||
|
tYMin = -y0 / d;
|
||||||
|
tYMax = (dim2.tripCount - 1 - y0) / d;
|
||||||
|
int64_t tMin = max(tXMin, tYMin);
|
||||||
|
uint64_t tMax = min(tXMax, tYMax);
|
||||||
|
if (tMin > tMax)
|
||||||
|
return NULL;
|
||||||
|
|
||||||
|
uint64_t start3 = dim1.start + x0 * dim1.step;
|
||||||
|
uint64_t step3 = c * dim1.step;
|
||||||
|
ArrayDimension* result = new(ArrayDimension){ start3, step3, tMax + 1 };
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* dim1 / dim2 */
|
||||||
|
static vector<ArrayDimension> DimensionDifference(const ArrayDimension& dim1, const ArrayDimension& dim2)
|
||||||
|
{
|
||||||
|
ArrayDimension* intersection = DimensionIntersection(dim1, dim2);
|
||||||
|
if (!intersection)
|
||||||
|
return { dim1 };
|
||||||
|
|
||||||
|
vector<ArrayDimension> result;
|
||||||
|
/* add the part before intersection */
|
||||||
|
if (dim1.start < intersection->start)
|
||||||
|
result.push_back({ dim1.start, dim1.step, (intersection->start - dim1.start) / dim1.step });
|
||||||
|
|
||||||
|
/* add the parts between intersection steps */
|
||||||
|
uint64_t start = (intersection->start - dim1.start) / dim1.step;
|
||||||
|
uint64_t interValue = intersection->start;
|
||||||
|
for (int64_t i = start; dim1.start + i * dim1.step <= intersection->start + intersection->step * (intersection->tripCount - 1); i++)
|
||||||
|
{
|
||||||
|
uint64_t centerValue = dim1.start + i * dim1.step;
|
||||||
|
if (centerValue == interValue)
|
||||||
|
{
|
||||||
|
if (i - start > 1)
|
||||||
|
{
|
||||||
|
result.push_back({ dim1.start + (start + 1) * dim1.step, dim1.step, i - start - 1 });
|
||||||
|
start = i;
|
||||||
|
}
|
||||||
|
interValue += intersection->step;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
/* add the part after intersection */
|
||||||
|
if (intersection->start + intersection->step * (intersection->tripCount - 1) < dim1.start + dim1.step * (dim1.tripCount - 1))
|
||||||
|
{
|
||||||
|
/* first value after intersection */
|
||||||
|
uint64_t right_start = intersection->start + intersection->step * (intersection->tripCount - 1) + dim1.step;
|
||||||
|
uint64_t tripCount = (dim1.start + dim1.step * dim1.tripCount - right_start) / dim1.step;
|
||||||
|
result.push_back({ right_start, dim1.step, tripCount });
|
||||||
|
}
|
||||||
|
delete(intersection);
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static vector<ArrayDimension> DimensionUnion(const ArrayDimension& dim1, const ArrayDimension& dim2)
|
||||||
|
{
|
||||||
|
vector<ArrayDimension> res;
|
||||||
|
ArrayDimension* inter = DimensionIntersection(dim1, dim2);
|
||||||
|
if (!inter)
|
||||||
|
return { dim1, dim2 };
|
||||||
|
|
||||||
|
res.push_back(*inter);
|
||||||
|
delete(inter);
|
||||||
|
|
||||||
|
vector<ArrayDimension> diff1, diff2;
|
||||||
|
diff1 = DimensionDifference(dim1, dim2);
|
||||||
|
diff2 = DimensionDifference(dim2, dim1);
|
||||||
|
res.insert(res.end(), diff1.begin(), diff1.end());
|
||||||
|
res.insert(res.end(), diff2.begin(), diff2.end());
|
||||||
|
return res;
|
||||||
|
}
|
||||||
|
|
||||||
|
static vector<ArrayDimension> ElementsIntersection(const vector<ArrayDimension>& firstElement, const vector<ArrayDimension>& secondElement)
|
||||||
|
{
|
||||||
|
if (firstElement.empty() || secondElement.empty())
|
||||||
|
return {};
|
||||||
|
|
||||||
|
size_t dimAmount = firstElement.size();
|
||||||
|
/* check if there is no intersecction */
|
||||||
|
for (size_t i = 0; i < dimAmount; i++)
|
||||||
|
if (FindParticularSolution(firstElement[i], secondElement[i]).empty())
|
||||||
|
return {};
|
||||||
|
|
||||||
|
vector<ArrayDimension> result(dimAmount);
|
||||||
|
for (size_t i = 0; i < dimAmount; i++)
|
||||||
|
{
|
||||||
|
ArrayDimension* resPtr = DimensionIntersection(firstElement[i], secondElement[i]);
|
||||||
|
if (resPtr)
|
||||||
|
result[i] = *resPtr;
|
||||||
|
else
|
||||||
|
return {};
|
||||||
|
|
||||||
|
}
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
|
||||||
|
static vector<vector<ArrayDimension>> ElementsDifference(const vector<ArrayDimension>& firstElement,
|
||||||
|
const vector<ArrayDimension>& secondElement)
|
||||||
|
{
|
||||||
|
if (firstElement.empty() || secondElement.empty())
|
||||||
|
return {};
|
||||||
|
|
||||||
|
vector<ArrayDimension> intersection = ElementsIntersection(firstElement, secondElement);
|
||||||
|
vector<vector<ArrayDimension>> result;
|
||||||
|
if (intersection.empty())
|
||||||
|
return { firstElement };
|
||||||
|
|
||||||
|
for (int i = 0; i < firstElement.size(); i++)
|
||||||
|
{
|
||||||
|
auto dimDiff = DimensionDifference(firstElement[i], secondElement[i]);
|
||||||
|
if (!dimDiff.empty())
|
||||||
|
{
|
||||||
|
vector<ArrayDimension> firstCopy = firstElement;
|
||||||
|
for (const auto& range : dimDiff)
|
||||||
|
{
|
||||||
|
firstCopy[i] = range;
|
||||||
|
result.push_back(firstCopy);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
|
||||||
|
static void ElementsUnion(const vector<ArrayDimension>& firstElement, const vector<ArrayDimension>& secondElement,
|
||||||
|
vector<vector<ArrayDimension>>& lc, vector<vector<ArrayDimension>>& rc,
|
||||||
|
vector<ArrayDimension>& intersection)
|
||||||
|
{
|
||||||
|
/* lc(rc) is a set of ranges, which only exist in first(second) element*/
|
||||||
|
intersection = ElementsIntersection(firstElement, secondElement);
|
||||||
|
lc = ElementsDifference(firstElement, intersection);
|
||||||
|
rc = ElementsDifference(secondElement, intersection);
|
||||||
|
}
|
||||||
|
|
||||||
|
void AccessingSet::FindUncovered(const vector<ArrayDimension>& element, vector<vector<ArrayDimension>>& result) const {
|
||||||
|
vector<vector<ArrayDimension>> newTails;
|
||||||
|
result.push_back(element);
|
||||||
|
for (const auto& currentElement : allElements)
|
||||||
|
{
|
||||||
|
for (const auto& tailLoc : result)
|
||||||
|
{
|
||||||
|
auto intersection = ElementsIntersection(tailLoc, currentElement);
|
||||||
|
auto diff = ElementsDifference(tailLoc, intersection);
|
||||||
|
if (!diff.empty()) {
|
||||||
|
newTails.insert(newTails.end(), diff.begin(), diff.end());
|
||||||
|
}
|
||||||
|
}
|
||||||
|
result = newTails;
|
||||||
|
newTails.clear();
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
bool AccessingSet::ContainsElement(const vector<ArrayDimension>& element) const
|
||||||
|
{
|
||||||
|
vector<vector<ArrayDimension>> tails;
|
||||||
|
FindUncovered(element, tails);
|
||||||
|
return !tails.empty();
|
||||||
|
}
|
||||||
|
|
||||||
|
void AccessingSet::FindCoveredBy(const vector<ArrayDimension>& element, vector<vector<ArrayDimension>>& result) const
|
||||||
|
{
|
||||||
|
for (const auto& currentElement : allElements)
|
||||||
|
{
|
||||||
|
auto intersection = ElementsIntersection(element, currentElement);
|
||||||
|
if (!intersection.empty())
|
||||||
|
result.push_back(intersection);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
vector<vector<ArrayDimension>> AccessingSet::GetElements() const { return allElements; }
|
||||||
|
|
||||||
|
void AccessingSet::Insert(const vector<ArrayDimension>& element)
|
||||||
|
{
|
||||||
|
vector<vector<ArrayDimension>> tails;
|
||||||
|
FindUncovered(element, tails);
|
||||||
|
allElements.insert(allElements.end(), tails.begin(), tails.end());
|
||||||
|
}
|
||||||
|
|
||||||
|
AccessingSet AccessingSet::Union(const AccessingSet& source) {
|
||||||
|
AccessingSet result;
|
||||||
|
for (auto& element : source.GetElements())
|
||||||
|
result.Insert(element);
|
||||||
|
|
||||||
|
for (auto& element : allElements)
|
||||||
|
result.Insert(element);
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
|
||||||
|
AccessingSet AccessingSet::Intersect(const AccessingSet& secondSet) const
|
||||||
|
{
|
||||||
|
vector<vector<ArrayDimension>> result;
|
||||||
|
if (secondSet.GetElements().empty() || this->allElements.empty())
|
||||||
|
return AccessingSet(result);
|
||||||
|
|
||||||
|
for (const auto& element : allElements)
|
||||||
|
{
|
||||||
|
if (secondSet.ContainsElement(element))
|
||||||
|
result.push_back(element);
|
||||||
|
else
|
||||||
|
{
|
||||||
|
vector<vector<ArrayDimension>> coveredBy;
|
||||||
|
secondSet.FindCoveredBy(element, coveredBy);
|
||||||
|
if (!coveredBy.empty())
|
||||||
|
result.insert(result.end(), coveredBy.begin(), coveredBy.end());
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return AccessingSet(result);
|
||||||
|
}
|
||||||
|
|
||||||
|
AccessingSet AccessingSet::Diff(const AccessingSet& secondSet) const
|
||||||
|
{
|
||||||
|
if (secondSet.GetElements().empty() || allElements.empty())
|
||||||
|
return *this;
|
||||||
|
|
||||||
|
AccessingSet intersection = this->Intersect(secondSet);
|
||||||
|
AccessingSet uncovered = *this;
|
||||||
|
vector<vector<ArrayDimension>> result;
|
||||||
|
for (const auto& element : intersection.GetElements())
|
||||||
|
{
|
||||||
|
vector<vector<ArrayDimension>> current_uncovered;
|
||||||
|
uncovered.FindUncovered(element, current_uncovered);
|
||||||
|
uncovered = AccessingSet(current_uncovered);
|
||||||
|
}
|
||||||
|
return uncovered;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool operator!=(const ArrayDimension& lhs, const ArrayDimension& rhs)
|
||||||
|
{
|
||||||
|
return !(lhs.start == rhs.start && lhs.step == rhs.step && lhs.tripCount == rhs.tripCount);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
bool operator!=(const AccessingSet& lhs, const AccessingSet& rhs)
|
||||||
|
{
|
||||||
|
for (size_t i = 0; i < lhs.allElements.size(); i++)
|
||||||
|
for (size_t j = 0; j < lhs.allElements[i].size(); j++)
|
||||||
|
if (lhs.allElements[i][j] != rhs.allElements[i][j])
|
||||||
|
return true;
|
||||||
|
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool operator!=(const ArrayAccessingIndexes& lhs, const ArrayAccessingIndexes& rhs)
|
||||||
|
{
|
||||||
|
if (lhs.size() != rhs.size())
|
||||||
|
return true;
|
||||||
|
|
||||||
|
for (auto& [key, value] : lhs)
|
||||||
|
if (rhs.find(key) == rhs.end())
|
||||||
|
return true;
|
||||||
|
|
||||||
|
return false;
|
||||||
|
}
|
||||||
37
src/PrivateAnalyzer/range_structures.h
Normal file
37
src/PrivateAnalyzer/range_structures.h
Normal file
@@ -0,0 +1,37 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include <vector>
|
||||||
|
#include <map>
|
||||||
|
#include <unordered_set>
|
||||||
|
#include <string>
|
||||||
|
#include <cstdint>
|
||||||
|
|
||||||
|
struct ArrayDimension
|
||||||
|
{
|
||||||
|
uint64_t start, step, tripCount;
|
||||||
|
};
|
||||||
|
|
||||||
|
class AccessingSet {
|
||||||
|
private:
|
||||||
|
std::vector<std::vector<ArrayDimension>> allElements;
|
||||||
|
|
||||||
|
public:
|
||||||
|
AccessingSet(std::vector<std::vector<ArrayDimension>> input) : allElements(input) {};
|
||||||
|
AccessingSet() {};
|
||||||
|
AccessingSet(const AccessingSet& a) { allElements = a.GetElements(); };
|
||||||
|
std::vector<std::vector<ArrayDimension>> GetElements() const;
|
||||||
|
void Insert(const std::vector<ArrayDimension>& element);
|
||||||
|
AccessingSet Union(const AccessingSet& source);
|
||||||
|
AccessingSet Intersect(const AccessingSet& secondSet) const;
|
||||||
|
AccessingSet Diff(const AccessingSet& secondSet) const;
|
||||||
|
bool ContainsElement(const std::vector<ArrayDimension>& element) const;
|
||||||
|
void FindCoveredBy(const std::vector<ArrayDimension>& element, std::vector<std::vector<ArrayDimension>>& result) const;
|
||||||
|
void FindUncovered(const std::vector<ArrayDimension>& element, std::vector<std::vector<ArrayDimension>>& result) const;
|
||||||
|
friend bool operator!=(const AccessingSet& lhs, const AccessingSet& rhs);
|
||||||
|
};
|
||||||
|
|
||||||
|
using ArrayAccessingIndexes = std::map<std::string, AccessingSet>;
|
||||||
|
|
||||||
|
bool operator!=(const ArrayDimension& lhs, const ArrayDimension& rhs);
|
||||||
|
bool operator!=(const AccessingSet& lhs, const AccessingSet& rhs);
|
||||||
|
bool operator!=(const ArrayAccessingIndexes& lhs, const ArrayAccessingIndexes& rhs);
|
||||||
251
src/PrivateAnalyzer/region.cpp
Normal file
251
src/PrivateAnalyzer/region.cpp
Normal file
@@ -0,0 +1,251 @@
|
|||||||
|
#include<vector>
|
||||||
|
#include<map>
|
||||||
|
#include<unordered_set>
|
||||||
|
#include<unordered_map>
|
||||||
|
#include<string>
|
||||||
|
#include <numeric>
|
||||||
|
|
||||||
|
#include "range_structures.h"
|
||||||
|
#include "region.h"
|
||||||
|
|
||||||
|
#include "SgUtils.h"
|
||||||
|
|
||||||
|
using namespace std;
|
||||||
|
|
||||||
|
static bool isParentStmt(SgStatement* stmt, SgStatement* parent)
|
||||||
|
{
|
||||||
|
for (; stmt; stmt = stmt->controlParent())
|
||||||
|
if (stmt == parent)
|
||||||
|
return true;
|
||||||
|
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*returns head block and loop*/
|
||||||
|
pair<SAPFOR::BasicBlock*, unordered_set<SAPFOR::BasicBlock*>> GetBasicBlocksForLoop(const LoopGraph* loop, const vector<SAPFOR::BasicBlock*> blocks)
|
||||||
|
{
|
||||||
|
unordered_set<SAPFOR::BasicBlock*> block_loop;
|
||||||
|
SAPFOR::BasicBlock* head_block = nullptr;
|
||||||
|
auto loop_operator = loop->loop->GetOriginal();
|
||||||
|
for (const auto& block : blocks)
|
||||||
|
{
|
||||||
|
if (!block || (block->getInstructions().size() == 0))
|
||||||
|
continue;
|
||||||
|
|
||||||
|
SgStatement* first = block->getInstructions().front()->getInstruction()->getOperator();
|
||||||
|
SgStatement* last = block->getInstructions().back()->getInstruction()->getOperator();
|
||||||
|
if (isParentStmt(first, loop_operator) && isParentStmt(last, loop_operator))
|
||||||
|
{
|
||||||
|
block_loop.insert(block);
|
||||||
|
|
||||||
|
if ((!head_block) && (first == loop_operator) && (last == loop_operator) &&
|
||||||
|
(block->getInstructions().size() == 2) &&
|
||||||
|
(block->getInstructions().back()->getInstruction()->getOperation() == SAPFOR::CFG_OP::JUMP_IF))
|
||||||
|
{
|
||||||
|
head_block = block;
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return { head_block, block_loop };
|
||||||
|
}
|
||||||
|
|
||||||
|
static void BuildLoopIndex(map<string, LoopGraph*>& loopForIndex, LoopGraph* loop) {
|
||||||
|
string index = loop->loopSymbol();
|
||||||
|
loopForIndex[index] = loop;
|
||||||
|
|
||||||
|
for (const auto& childLoop : loop->children)
|
||||||
|
BuildLoopIndex(loopForIndex, childLoop);
|
||||||
|
}
|
||||||
|
|
||||||
|
static string FindIndexName(int pos, SAPFOR::BasicBlock* block, map<string, LoopGraph*>& loopForIndex) {
|
||||||
|
unordered_set<SAPFOR::Argument*> args = { block->getInstructions()[pos]->getInstruction()->getArg1() };
|
||||||
|
|
||||||
|
for (int i = pos - 1; i >= 0; i--)
|
||||||
|
{
|
||||||
|
SAPFOR::Argument* res = block->getInstructions()[i]->getInstruction()->getResult();
|
||||||
|
if (res && args.find(res) != args.end())
|
||||||
|
{
|
||||||
|
SAPFOR::Argument* arg1 = block->getInstructions()[i]->getInstruction()->getArg1();
|
||||||
|
SAPFOR::Argument* arg2 = block->getInstructions()[i]->getInstruction()->getArg2();
|
||||||
|
if (arg1)
|
||||||
|
{
|
||||||
|
string name = arg1->getValue();
|
||||||
|
int idx = name.find('%');
|
||||||
|
if (idx != -1 && loopForIndex.find(name.substr(idx + 1)) != loopForIndex.end())
|
||||||
|
return name.substr(idx + 1);
|
||||||
|
else
|
||||||
|
args.insert(arg1);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (arg2)
|
||||||
|
{
|
||||||
|
string name = arg2->getValue();
|
||||||
|
int idx = name.find('%');
|
||||||
|
if (idx != -1 && loopForIndex.find(name.substr(idx + 1)) != loopForIndex.end())
|
||||||
|
return name.substr(idx + 1);
|
||||||
|
else
|
||||||
|
args.insert(arg2);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return "";
|
||||||
|
}
|
||||||
|
|
||||||
|
static int GetDefUseArray(SAPFOR::BasicBlock* block, LoopGraph* loop, ArrayAccessingIndexes& def, ArrayAccessingIndexes& use) {
|
||||||
|
auto instructions = block->getInstructions();
|
||||||
|
map<string, LoopGraph*> loopForIndex;
|
||||||
|
BuildLoopIndex(loopForIndex, loop);
|
||||||
|
for (int i = 0; i < instructions.size(); i++)
|
||||||
|
{
|
||||||
|
auto instruction = instructions[i];
|
||||||
|
if (!instruction->getInstruction()->getArg1())
|
||||||
|
continue;
|
||||||
|
|
||||||
|
auto operation = instruction->getInstruction()->getOperation();
|
||||||
|
auto type = instruction->getInstruction()->getArg1()->getType();
|
||||||
|
if ((operation == SAPFOR::CFG_OP::STORE || operation == SAPFOR::CFG_OP::LOAD) && type == SAPFOR::CFG_ARG_TYPE::ARRAY)
|
||||||
|
{
|
||||||
|
vector<SAPFOR::Argument*> index_vars;
|
||||||
|
vector<int> refPos;
|
||||||
|
string array_name;
|
||||||
|
if (operation == SAPFOR::CFG_OP::STORE)
|
||||||
|
array_name = instruction->getInstruction()->getArg1()->getValue();
|
||||||
|
else
|
||||||
|
array_name = instruction->getInstruction()->getArg2()->getValue();
|
||||||
|
|
||||||
|
int j = i - 1;
|
||||||
|
while (j >= 0 && instructions[j]->getInstruction()->getOperation() == SAPFOR::CFG_OP::REF)
|
||||||
|
{
|
||||||
|
index_vars.push_back(instructions[j]->getInstruction()->getArg1());
|
||||||
|
refPos.push_back(j);
|
||||||
|
j--;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*to choose correct dimension*/
|
||||||
|
int n = index_vars.size();
|
||||||
|
vector<ArrayDimension> accessPoint(n);
|
||||||
|
|
||||||
|
auto* ref = isSgArrayRefExp(instruction->getInstruction()->getExpression());
|
||||||
|
vector<pair<int, int>> coefsForDims;
|
||||||
|
for (int i = 0; ref && i < ref->numberOfSubscripts(); ++i)
|
||||||
|
{
|
||||||
|
const vector<int*>& coefs = getAttributes<SgExpression*, int*>(ref->subscript(i), set<int>{ INT_VAL });
|
||||||
|
if (coefs.size() == 1)
|
||||||
|
{
|
||||||
|
const pair<int, int> coef(coefs[0][0], coefs[0][1]);
|
||||||
|
coefsForDims.push_back(coef);
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
if(coefsForDims.empty())
|
||||||
|
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
||||||
|
|
||||||
|
while (!index_vars.empty())
|
||||||
|
{
|
||||||
|
auto var = index_vars.back();
|
||||||
|
int currentVarPos = refPos.back();
|
||||||
|
pair<int, int> currentCoefs = coefsForDims.back();
|
||||||
|
ArrayDimension current_dim;
|
||||||
|
if (var->getType() == SAPFOR::CFG_ARG_TYPE::CONST)
|
||||||
|
current_dim = { stoul(var->getValue()), 1, 1 };
|
||||||
|
else
|
||||||
|
{
|
||||||
|
string name, full_name = var->getValue();
|
||||||
|
int pos = full_name.find('%');
|
||||||
|
LoopGraph* currentLoop;
|
||||||
|
if (pos != -1)
|
||||||
|
{
|
||||||
|
name = full_name.substr(pos + 1);
|
||||||
|
if (loopForIndex.find(name) != loopForIndex.end())
|
||||||
|
currentLoop = loopForIndex[name];
|
||||||
|
else
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
name = FindIndexName(currentVarPos, block, loopForIndex);
|
||||||
|
if (name == "")
|
||||||
|
return -1;
|
||||||
|
|
||||||
|
if (loopForIndex.find(name) != loopForIndex.end())
|
||||||
|
currentLoop = loopForIndex[name];
|
||||||
|
else
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
uint64_t start = currentLoop->startVal * currentCoefs.first + currentCoefs.second;
|
||||||
|
uint64_t step = currentCoefs.first;
|
||||||
|
current_dim = { start, step, (uint64_t)currentLoop->calculatedCountOfIters };
|
||||||
|
}
|
||||||
|
|
||||||
|
accessPoint[n - index_vars.size()] = current_dim;
|
||||||
|
index_vars.pop_back();
|
||||||
|
refPos.pop_back();
|
||||||
|
coefsForDims.pop_back();
|
||||||
|
}
|
||||||
|
|
||||||
|
if (operation == SAPFOR::CFG_OP::STORE)
|
||||||
|
def[array_name].Insert(accessPoint);
|
||||||
|
else
|
||||||
|
use[array_name].Insert(accessPoint);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
static void SetConnections(unordered_map<SAPFOR::BasicBlock*, Region*>& bbToRegion, const unordered_set<SAPFOR::BasicBlock*>& blockSet)
|
||||||
|
{
|
||||||
|
for (SAPFOR::BasicBlock* block : blockSet)
|
||||||
|
{
|
||||||
|
for (SAPFOR::BasicBlock* nextBlock : block->getNext())
|
||||||
|
if (bbToRegion.find(nextBlock) != bbToRegion.end())
|
||||||
|
bbToRegion[block]->addNextRegion(bbToRegion[nextBlock]);
|
||||||
|
|
||||||
|
for (SAPFOR::BasicBlock* prevBlock : block->getPrev())
|
||||||
|
if (bbToRegion.find(prevBlock) != bbToRegion.end())
|
||||||
|
bbToRegion[block]->addPrevRegion(bbToRegion[prevBlock]);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
static Region* CreateSubRegion(LoopGraph* loop, const vector<SAPFOR::BasicBlock*>& Blocks, const unordered_map<SAPFOR::BasicBlock*, Region*>& bbToRegion)
|
||||||
|
{
|
||||||
|
Region* region = new Region;
|
||||||
|
auto [header, blockSet] = GetBasicBlocksForLoop(loop, Blocks);
|
||||||
|
if (bbToRegion.find(header) != bbToRegion.end())
|
||||||
|
region->setHeader(bbToRegion.at(header));
|
||||||
|
else
|
||||||
|
{
|
||||||
|
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
||||||
|
return NULL;
|
||||||
|
}
|
||||||
|
|
||||||
|
for (SAPFOR::BasicBlock* block : blockSet)
|
||||||
|
if (bbToRegion.find(block) != bbToRegion.end())
|
||||||
|
region->addBasickBlocks(bbToRegion.at(block));
|
||||||
|
|
||||||
|
for (LoopGraph* childLoop : loop->children)
|
||||||
|
region->addSubRegions(CreateSubRegion(childLoop, Blocks, bbToRegion));
|
||||||
|
|
||||||
|
return region;
|
||||||
|
}
|
||||||
|
|
||||||
|
Region::Region(LoopGraph* loop, const vector<SAPFOR::BasicBlock*>& Blocks)
|
||||||
|
{
|
||||||
|
auto [header, blockSet] = GetBasicBlocksForLoop(loop, Blocks);
|
||||||
|
unordered_map<SAPFOR::BasicBlock*, Region*> bbToRegion;
|
||||||
|
for (auto poiner : blockSet)
|
||||||
|
{
|
||||||
|
bbToRegion[poiner] = new Region(*poiner);
|
||||||
|
this->basickBlocks.insert(bbToRegion[poiner]);
|
||||||
|
GetDefUseArray(poiner, loop, bbToRegion[poiner]->array_def, bbToRegion[poiner]->array_use);
|
||||||
|
|
||||||
|
}
|
||||||
|
this->header = bbToRegion[header];
|
||||||
|
SetConnections(bbToRegion, blockSet);
|
||||||
|
//create subRegions
|
||||||
|
for (LoopGraph* childLoop : loop->children)
|
||||||
|
subRegions.insert(CreateSubRegion(childLoop, Blocks, bbToRegion));
|
||||||
|
}
|
||||||
60
src/PrivateAnalyzer/region.h
Normal file
60
src/PrivateAnalyzer/region.h
Normal file
@@ -0,0 +1,60 @@
|
|||||||
|
#pragma once
|
||||||
|
|
||||||
|
#include <vector>
|
||||||
|
#include <map>
|
||||||
|
#include <unordered_set>
|
||||||
|
#include <string>
|
||||||
|
|
||||||
|
#include "graph_loops.h"
|
||||||
|
#include "CFGraph/CFGraph.h"
|
||||||
|
|
||||||
|
class Region : public SAPFOR::BasicBlock {
|
||||||
|
public:
|
||||||
|
Region() { header = nullptr; }
|
||||||
|
|
||||||
|
Region(SAPFOR::BasicBlock block) : SAPFOR::BasicBlock::BasicBlock(block) { header = nullptr; }
|
||||||
|
|
||||||
|
Region(LoopGraph* loop, const std::vector<SAPFOR::BasicBlock*>& Blocks);
|
||||||
|
|
||||||
|
Region* getHeader() { return header; }
|
||||||
|
|
||||||
|
void setHeader(Region* region) { header = region; }
|
||||||
|
|
||||||
|
std::unordered_set<Region*>& getBasickBlocks() { return basickBlocks; }
|
||||||
|
|
||||||
|
void addBasickBlocks(Region* region) { basickBlocks.insert(region); }
|
||||||
|
|
||||||
|
const std::unordered_set<Region*>& getPrevRegions() { return prevRegions; }
|
||||||
|
|
||||||
|
std::unordered_set<Region*> getNextRegions() { return nextRegions; }
|
||||||
|
|
||||||
|
void addPrevRegion(Region* region) { prevRegions.insert(region); }
|
||||||
|
|
||||||
|
void addNextRegion(Region* region) { nextRegions.insert(region); }
|
||||||
|
|
||||||
|
void replaceInPrevRegions(Region* source, Region* destination)
|
||||||
|
{
|
||||||
|
prevRegions.erase(destination);
|
||||||
|
prevRegions.insert(source);
|
||||||
|
}
|
||||||
|
|
||||||
|
void replaceInNextRegions(Region* source, Region* destination)
|
||||||
|
{
|
||||||
|
nextRegions.erase(destination);
|
||||||
|
nextRegions.insert(source);
|
||||||
|
}
|
||||||
|
|
||||||
|
std::unordered_set<Region*> getSubRegions() { return subRegions; }
|
||||||
|
|
||||||
|
void addSubRegions(Region* region) { subRegions.insert(region); }
|
||||||
|
|
||||||
|
ArrayAccessingIndexes array_def, array_use, array_out, array_in, array_priv;
|
||||||
|
|
||||||
|
private:
|
||||||
|
std::unordered_set<Region*> subRegions, basickBlocks;
|
||||||
|
/*next Region which is BB for current BB Region*/
|
||||||
|
std::unordered_set<Region*> nextRegions;
|
||||||
|
/*prev Regions which is BBs for current BB Region*/
|
||||||
|
std::unordered_set<Region*> prevRegions;
|
||||||
|
Region* header;
|
||||||
|
};
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -6,9 +6,9 @@
|
|||||||
#include <string>
|
#include <string>
|
||||||
#include <vector>
|
#include <vector>
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
|
|
||||||
#include "../VerificationCode/verifications.h"
|
#include "../VerificationCode/verifications.h"
|
||||||
|
|
||||||
@@ -403,7 +403,7 @@ static int convertFile(int argc, char* argv[], const set<string>& filesInProj, c
|
|||||||
fprintf(stderr, "<<<<< Unparsing %s >>>>>\n", fout_name);
|
fprintf(stderr, "<<<<< Unparsing %s >>>>>\n", fout_name);
|
||||||
|
|
||||||
if (mod_gpu) /*ACC*/
|
if (mod_gpu) /*ACC*/
|
||||||
UnparseTo_CufAndCu_Files(file, fout_cuf, fout_C_cu, fout_info);
|
UnparseTo_CufAndCu_Files(file, fout_cuf, fout_C_cu, fout_info, fout_name);
|
||||||
|
|
||||||
const string fileN = file->filename();
|
const string fileN = file->filename();
|
||||||
set<SgStatement*> toRemove;
|
set<SgStatement*> toRemove;
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -7,8 +7,8 @@
|
|||||||
#include <vector>
|
#include <vector>
|
||||||
|
|
||||||
#include "FileInfo.h"
|
#include "FileInfo.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
|
|
||||||
using namespace std;
|
using namespace std;
|
||||||
|
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -22,8 +22,8 @@
|
|||||||
#include <thread>
|
#include <thread>
|
||||||
#include <stack>
|
#include <stack>
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
#include "../VisualizerCalls/get_information.h"
|
#include "../VisualizerCalls/get_information.h"
|
||||||
#include "../VisualizerCalls/SendMessage.h"
|
#include "../VisualizerCalls/SendMessage.h"
|
||||||
|
|
||||||
@@ -34,6 +34,7 @@
|
|||||||
using namespace std;
|
using namespace std;
|
||||||
|
|
||||||
extern "C" int parse_file(int argc, char* argv[], char* proj_name);
|
extern "C" int parse_file(int argc, char* argv[], char* proj_name);
|
||||||
|
extern const char* VISUALIZER_DATA_PATH;
|
||||||
|
|
||||||
static void findModuleDeclInProject(const string& name, const vector<string>& files, map<string, string>& modDecls)
|
static void findModuleDeclInProject(const string& name, const vector<string>& files, map<string, string>& modDecls)
|
||||||
{
|
{
|
||||||
@@ -293,11 +294,8 @@ static vector<string> parseList(vector<FileInfo>& listOfProject,
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
#ifdef _WIN32
|
sendMessage_2lvl(3, file);
|
||||||
sendMessage_2lvl(L" <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> '" + to_wstring(file) + L"'");
|
|
||||||
#else
|
|
||||||
sendMessage_2lvl(L" processing file '" + to_wstring(file) + L"'");
|
|
||||||
#endif
|
|
||||||
StdCapture::Init();
|
StdCapture::Init();
|
||||||
string errorMessage = "";
|
string errorMessage = "";
|
||||||
try
|
try
|
||||||
@@ -443,20 +441,12 @@ static int dumpErrors(const vector<FileInfo>& listOfProject, const vector<string
|
|||||||
if (errors[z] == "")
|
if (errors[z] == "")
|
||||||
{
|
{
|
||||||
FILE* ferr = fopen(file.errPath.c_str(), "w");
|
FILE* ferr = fopen(file.errPath.c_str(), "w");
|
||||||
if (!ferr)
|
if (ferr)
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
fclose(ferr);
|
||||||
fclose(ferr);
|
|
||||||
++z;
|
++z;
|
||||||
continue;
|
continue;
|
||||||
}
|
}
|
||||||
|
|
||||||
FILE* ferr = fopen(file.errPath.c_str(), "w");
|
|
||||||
FILE* fout = fopen(file.outPath.c_str(), "w");
|
|
||||||
if (!ferr)
|
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
|
||||||
if (!fout)
|
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
|
||||||
|
|
||||||
string errS = "", outS = "";
|
string errS = "", outS = "";
|
||||||
vector<string> splited;
|
vector<string> splited;
|
||||||
splitString(errors[z], '\n', splited);
|
splitString(errors[z], '\n', splited);
|
||||||
@@ -475,13 +465,22 @@ static int dumpErrors(const vector<FileInfo>& listOfProject, const vector<string
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
fprintf(fout, "%s", outS.c_str());
|
|
||||||
fprintf(ferr, "%s", errS.c_str());
|
FILE* ferr = fopen(file.errPath.c_str(), "w");
|
||||||
|
FILE* fout = fopen(file.outPath.c_str(), "w");
|
||||||
|
if (ferr)
|
||||||
|
{
|
||||||
|
fprintf(ferr, "%s", errS.c_str());
|
||||||
|
fclose(ferr);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (fout)
|
||||||
|
{
|
||||||
|
fprintf(fout, "%s", outS.c_str());
|
||||||
|
fclose(fout);
|
||||||
|
}
|
||||||
|
|
||||||
fflush(NULL);
|
fflush(NULL);
|
||||||
|
|
||||||
fclose(fout);
|
|
||||||
fclose(ferr);
|
|
||||||
++z;
|
++z;
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -576,11 +575,8 @@ static void parseFiles(int& iters, vector<string>& errors, vector<FileInfo>& lis
|
|||||||
|
|
||||||
do
|
do
|
||||||
{
|
{
|
||||||
#ifdef _WIN32
|
sendMessage_1lvl(0, iters + 1);
|
||||||
sendMessage_1lvl(L"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> " + std::to_wstring((iters + 1)) + L" <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
|
||||||
#else
|
|
||||||
sendMessage_1lvl(L"running " + std::to_wstring((iters + 1)) + L" iteration of syntax analisys");
|
|
||||||
#endif
|
|
||||||
errors = parseList(listOfProject, iters != 0, parseForInlining, mapModuleDeps, moduleDelc, modDirectOrder, isFromConsole);
|
errors = parseList(listOfProject, iters != 0, parseForInlining, mapModuleDeps, moduleDelc, modDirectOrder, isFromConsole);
|
||||||
changed = createMapOfUse(errors, listOfProject, mapModuleDeps);
|
changed = createMapOfUse(errors, listOfProject, mapModuleDeps);
|
||||||
if (iters != 0)
|
if (iters != 0)
|
||||||
@@ -713,7 +709,7 @@ int parseFiles(const char* proj, vector<string>& filesCompilationOrder, int pars
|
|||||||
|
|
||||||
if (pathSplit.size() < 2)
|
if (pathSplit.size() < 2)
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
||||||
if (pathSplit[pathSplit.size() - 2] != "visualiser_data")
|
if (pathSplit[pathSplit.size() - 2] != VISUALIZER_DATA_PATH)
|
||||||
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
||||||
string fullPath = "";
|
string fullPath = "";
|
||||||
for (int z = 0; z < pathSplit.size() - 2; ++z)
|
for (int z = 0; z < pathSplit.size() - 2; ++z)
|
||||||
@@ -745,9 +741,9 @@ int parseFiles(const char* proj, vector<string>& filesCompilationOrder, int pars
|
|||||||
else
|
else
|
||||||
fileNameFixed = (toAdd.substr(0, 2) == "./") ? toAdd.substr(2) : toAdd;
|
fileNameFixed = (toAdd.substr(0, 2) == "./") ? toAdd.substr(2) : toAdd;
|
||||||
|
|
||||||
const string optPath = fullPath + "visualiser_data/options/" + fileNameFixed + ".opt";
|
const string optPath = fullPath + VISUALIZER_DATA_PATH + "/options/" + fileNameFixed + ".opt";
|
||||||
const string errPath = fullPath + "visualiser_data/options/" + fileNameFixed + ".err";
|
const string errPath = fullPath + VISUALIZER_DATA_PATH + "/options/" + fileNameFixed + ".err";
|
||||||
const string outPath = fullPath + "visualiser_data/options/" + fileNameFixed + ".out";
|
const string outPath = fullPath + VISUALIZER_DATA_PATH + "/options/" + fileNameFixed + ".out";
|
||||||
|
|
||||||
const string fileText = readFileToStr(toAdd);
|
const string fileText = readFileToStr(toAdd);
|
||||||
|
|
||||||
@@ -809,6 +805,8 @@ void parseFiles(int argc, char** argv)
|
|||||||
printf(" run parsing for inlining\n");
|
printf(" run parsing for inlining\n");
|
||||||
|
|
||||||
int rethrow = parseFiles(errors, listOfProject, filesCompilationOrder, isInline, true);
|
int rethrow = parseFiles(errors, listOfProject, filesCompilationOrder, isInline, true);
|
||||||
|
int errCount = dumpErrors(listOfProject, errors, messages);
|
||||||
|
|
||||||
if (rethrow == 0)
|
if (rethrow == 0)
|
||||||
{
|
{
|
||||||
for (auto& err : errors)
|
for (auto& err : errors)
|
||||||
@@ -838,5 +836,7 @@ void parseFiles(int argc, char** argv)
|
|||||||
}
|
}
|
||||||
else
|
else
|
||||||
printf("Parsing was completed with errors, throw code %d, errors count %d\n", rethrow, code);
|
printf("Parsing was completed with errors, throw code %d, errors count %d\n", rethrow, code);
|
||||||
|
|
||||||
|
dumpMessages(false, messages, VISUALIZER_DATA_PATH);
|
||||||
exit(0);
|
exit(0);
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
@@ -6,8 +6,8 @@
|
|||||||
#include <string>
|
#include <string>
|
||||||
#include <vector>
|
#include <vector>
|
||||||
|
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/SgUtils.h"
|
#include "SgUtils.h"
|
||||||
|
|
||||||
#include "StdCapture.h"
|
#include "StdCapture.h"
|
||||||
|
|
||||||
|
|||||||
@@ -1,33 +1,443 @@
|
|||||||
#include "../Utils/leak_detector.h"
|
#include "leak_detector.h"
|
||||||
|
|
||||||
#include <cstdio>
|
#include <cstdio>
|
||||||
#include <cstring>
|
#include <cstring>
|
||||||
#include <cstring>
|
|
||||||
#include <fstream>
|
#include <fstream>
|
||||||
#include <iostream>
|
#include <iostream>
|
||||||
#include <cstdlib>
|
#include <cstdlib>
|
||||||
#include <set>
|
#include <set>
|
||||||
|
#include <string>
|
||||||
#include <vector>
|
#include <vector>
|
||||||
#include <algorithm>
|
#include <algorithm>
|
||||||
#include <tuple>
|
#include <tuple>
|
||||||
|
|
||||||
|
#include "CFGraph/CFGraph.h"
|
||||||
|
#include "CFGraph/IR.h"
|
||||||
|
#include "Distribution/Array.h"
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "../Utils/errors.h"
|
|
||||||
#include "../Utils/SgUtils.h"
|
#include "errors.h"
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "SgUtils.h"
|
||||||
#include "../GraphCall/graph_calls_func.h"
|
#include "graph_calls.h"
|
||||||
|
#include "graph_calls_func.h"
|
||||||
|
|
||||||
#include "projectParameters.h"
|
#include "projectParameters.h"
|
||||||
|
|
||||||
using namespace std;
|
using std::set;
|
||||||
|
using std::map;
|
||||||
|
using std::string;
|
||||||
|
using std::vector;
|
||||||
|
using std::tuple;
|
||||||
|
using std::pair;
|
||||||
|
using std::make_tuple;
|
||||||
|
using std::find_if;
|
||||||
|
|
||||||
map< pair<string, int>, set<string>>
|
static map<FuncInfo*, vector<SAPFOR::Instruction*>> call_sites;
|
||||||
findParameters(const map<string, vector<DefUseList>> &defUseByFunctions,
|
|
||||||
const map<string, CommonBlock*> &commonBlocks,
|
enum class MODE
|
||||||
const map<string, vector<FuncInfo*>> &allFuncInfo)
|
|
||||||
{
|
{
|
||||||
map< pair<string, int>, set<string>> foundParameters;
|
BEFORE,
|
||||||
|
AFTER
|
||||||
|
};
|
||||||
|
|
||||||
|
template<typename Iterator>
|
||||||
|
static void extract_vars_from_reg(set<SAPFOR::Argument*>& worklist, SAPFOR::Argument* reg, Iterator instr, Iterator first_instr);
|
||||||
|
|
||||||
return foundParameters;
|
static tuple<FuncInfo*, SAPFOR::Instruction*, SAPFOR::BasicBlock*>
|
||||||
|
stmtToIR(const map<FuncInfo*, vector<SAPFOR::BasicBlock*>>& CFGraph, SgStatement* stmt)
|
||||||
|
{
|
||||||
|
SgStatement* cur = stmt;
|
||||||
|
cur->switchToFile();
|
||||||
|
while (cur->variant() != PROC_HEDR && cur->variant() != PROG_HEDR && cur->variant() != FUNC_HEDR)
|
||||||
|
cur = cur->controlParent();
|
||||||
|
|
||||||
|
string funcName = ((SgProcHedrStmt*)cur)->nameWithContains();
|
||||||
|
|
||||||
|
int stmtID = stmt->id();
|
||||||
|
for (const auto& [func, bblocks] : CFGraph)
|
||||||
|
{
|
||||||
|
if (func->funcName != funcName)
|
||||||
|
continue;
|
||||||
|
|
||||||
|
for (auto basicBlock : bblocks)
|
||||||
|
for (auto ins : basicBlock->getInstructions())
|
||||||
|
if (stmtID == ins->getInstruction()->getOperator()->id())
|
||||||
|
return make_tuple(func, ins->getInstruction(), basicBlock);
|
||||||
|
}
|
||||||
|
|
||||||
|
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
||||||
|
return { NULL, NULL, NULL };
|
||||||
|
}
|
||||||
|
|
||||||
|
static tuple<FuncInfo*, SAPFOR::Instruction*, SAPFOR::BasicBlock*>
|
||||||
|
IRByNumber(const map<FuncInfo*, vector<SAPFOR::BasicBlock*>>& CFGraph, int num)
|
||||||
|
{
|
||||||
|
if (num < 0)
|
||||||
|
return { NULL, NULL, NULL };
|
||||||
|
|
||||||
|
for (const auto& [func, bblocks] : CFGraph)
|
||||||
|
for (auto byBB : bblocks)
|
||||||
|
if (byBB->getInstructions().front()->getNumber() <= num && byBB->getInstructions().back()->getNumber() >= num)
|
||||||
|
return make_tuple(func, getInstructionByNumber(byBB->getInstructions(), num), byBB);
|
||||||
|
|
||||||
|
printInternalError(convertFileName(__FILE__).c_str(), __LINE__);
|
||||||
|
return { NULL, NULL, NULL };
|
||||||
|
}
|
||||||
|
|
||||||
|
template<typename Iterator>
|
||||||
|
static void processArgument(set<SAPFOR::Argument*>& worklist,
|
||||||
|
SAPFOR::Argument* arg,
|
||||||
|
Iterator instr, Iterator first_instr)
|
||||||
|
{
|
||||||
|
if (arg == NULL)
|
||||||
|
return;
|
||||||
|
|
||||||
|
if (arg->getType() == SAPFOR::CFG_ARG_TYPE::REG)
|
||||||
|
extract_vars_from_reg(worklist, arg, instr, first_instr);
|
||||||
|
else if (arg->getType() == SAPFOR::CFG_ARG_TYPE::VAR)
|
||||||
|
worklist.insert(arg);
|
||||||
|
}
|
||||||
|
|
||||||
|
template<typename Iterator>
|
||||||
|
static void extract_vars_from_reg(set<SAPFOR::Argument*>& worklist,
|
||||||
|
SAPFOR::Argument* reg,
|
||||||
|
Iterator instr, Iterator first_instr)
|
||||||
|
{
|
||||||
|
for (; instr >= first_instr; instr--)
|
||||||
|
{
|
||||||
|
if ((*instr)->getInstruction()->getResult() == reg)
|
||||||
|
{
|
||||||
|
processArgument(worklist, (*instr)->getInstruction()->getArg1(), instr, first_instr);
|
||||||
|
processArgument(worklist, (*instr)->getInstruction()->getArg2(), instr, first_instr);
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
static void lookup_for_vars(set<tuple<SgStatement*, string, MODE>>& where_to_add,
|
||||||
|
set<SAPFOR::Argument*>& worklist,
|
||||||
|
SAPFOR::Instruction* instr,
|
||||||
|
SAPFOR::BasicBlock* bblock,
|
||||||
|
FuncInfo* cur_func,
|
||||||
|
const map<FuncInfo*, vector<SAPFOR::BasicBlock*>>& fullIR)
|
||||||
|
{
|
||||||
|
while (bblock)
|
||||||
|
{
|
||||||
|
auto first_instr = bblock->getInstructions().begin();
|
||||||
|
auto cur_instr = find_if(first_instr, bblock->getInstructions().end(), [instr](SAPFOR::IR_Block* i) {
|
||||||
|
return i->getInstruction() == instr;
|
||||||
|
});
|
||||||
|
|
||||||
|
for (; cur_instr >= bblock->getInstructions().begin(); --cur_instr)
|
||||||
|
{
|
||||||
|
auto instr = (*cur_instr)->getInstruction();
|
||||||
|
auto result_arg = instr->getResult();
|
||||||
|
auto arg1 = instr->getArg1();
|
||||||
|
auto arg2 = instr->getArg2();
|
||||||
|
|
||||||
|
if (worklist.count(result_arg))
|
||||||
|
{
|
||||||
|
worklist.erase(result_arg);
|
||||||
|
processArgument(worklist, arg1, cur_instr, first_instr);
|
||||||
|
processArgument(worklist, arg2, cur_instr, first_instr);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (instr->getOperation() == SAPFOR::CFG_OP::PARAM && worklist.count(arg1))
|
||||||
|
{
|
||||||
|
// skip to F_CALL
|
||||||
|
auto f_call_instr = cur_instr;
|
||||||
|
while ((*f_call_instr)->getInstruction()->getOperation() != SAPFOR::CFG_OP::F_CALL)
|
||||||
|
f_call_instr++;
|
||||||
|
|
||||||
|
if ((*f_call_instr)->getInstruction()->getArg1()->getValue() == "_READ")
|
||||||
|
{
|
||||||
|
auto stmt_before = (*f_call_instr)->getInstruction()->getOperator();
|
||||||
|
auto filename = stmt_before->fileName();
|
||||||
|
auto line = stmt_before->lineNumber();
|
||||||
|
auto var_name = arg1->getValue().substr(arg1->getValue().find('%') + 1);
|
||||||
|
__spf_print(1, "Please specify value of variable %s on line %d of file %s\n", arg1->getValue().c_str(), line, filename);
|
||||||
|
auto toAdd = make_tuple(stmt_before, var_name, MODE::AFTER);
|
||||||
|
where_to_add.insert(toAdd);
|
||||||
|
worklist.erase(arg1);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
const auto& RD = bblock->getRD_In();
|
||||||
|
map<SAPFOR::BasicBlock*, SAPFOR::Instruction*> group_by_block;
|
||||||
|
|
||||||
|
set<SAPFOR::Argument*> to_erase;
|
||||||
|
for (auto& arg : worklist)
|
||||||
|
{
|
||||||
|
if (RD.count(arg))
|
||||||
|
{
|
||||||
|
if (RD.at(arg).size() == 1 && *RD.at(arg).begin() == SAPFOR::CFG_VAL::UNINIT)
|
||||||
|
__spf_print(1, "variable %s has no definition\n", arg->getValue().c_str());
|
||||||
|
else if (RD.at(arg).size() > 1)
|
||||||
|
{
|
||||||
|
auto stmt_after = (*first_instr)->getInstruction()->getOperator();
|
||||||
|
auto filename = stmt_after->fileName();
|
||||||
|
auto line = stmt_after->lineNumber();
|
||||||
|
auto var_name = arg->getValue().substr(arg->getValue().find('%') + 1);
|
||||||
|
__spf_print(1, "variable %s has multiple reaching definitions, further analysis is impossible\n", arg->getValue().c_str());
|
||||||
|
__spf_print(1, "Please specify value of variable %s on line %d of file %s\n", arg->getValue().c_str(), line, filename);
|
||||||
|
auto toAdd = make_tuple(stmt_after, var_name, MODE::BEFORE);
|
||||||
|
where_to_add.insert(toAdd);
|
||||||
|
to_erase.insert(arg);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
auto instr_num = *RD.at(arg).begin();
|
||||||
|
auto [func, instr, bblock] = IRByNumber(fullIR, instr_num);
|
||||||
|
if (cur_func == func && (group_by_block[bblock] == NULL || group_by_block[bblock]->getNumber() < instr_num))
|
||||||
|
group_by_block[bblock] = instr;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
for (const auto& arg : to_erase)
|
||||||
|
worklist.erase(arg);
|
||||||
|
|
||||||
|
while (bblock && group_by_block.find(bblock) == group_by_block.end())
|
||||||
|
bblock = bblock->getDom();
|
||||||
|
|
||||||
|
if (bblock)
|
||||||
|
instr = group_by_block[bblock];
|
||||||
|
}
|
||||||
|
|
||||||
|
// other variables are from global scope
|
||||||
|
const auto& RD = fullIR.at(cur_func).front()->getRD_In();
|
||||||
|
for (auto& arg : worklist)
|
||||||
|
{
|
||||||
|
if (arg->isMemGlobal())
|
||||||
|
{
|
||||||
|
set<int> found_rd;
|
||||||
|
if (RD.count(arg))
|
||||||
|
found_rd = RD.at(arg);
|
||||||
|
|
||||||
|
if (found_rd.size() == 0)
|
||||||
|
{
|
||||||
|
auto call_instr = call_sites[cur_func].size() ? call_sites[cur_func].front() : NULL;
|
||||||
|
while (call_instr && found_rd.size() == 0)
|
||||||
|
{
|
||||||
|
auto [call_func, _, call_bblock] = IRByNumber(fullIR, call_instr->getNumber());
|
||||||
|
if (call_bblock->getRD_Out().count(arg))
|
||||||
|
found_rd = call_bblock->getRD_Out().at(arg);
|
||||||
|
|
||||||
|
|
||||||
|
call_instr = call_sites[call_func].size() ? call_sites[call_func].front() : NULL;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (found_rd.size() == 1 && *found_rd.begin() == SAPFOR::CFG_VAL::UNINIT)
|
||||||
|
__spf_print(1, "variable %s has no definition\n", arg->getValue().c_str());
|
||||||
|
else if (found_rd.size() > 1)
|
||||||
|
{
|
||||||
|
auto first_instr = fullIR.at(cur_func).front()->getInstructions().begin();
|
||||||
|
auto stmt_after = (*first_instr)->getInstruction()->getOperator();
|
||||||
|
auto filename = stmt_after->fileName();
|
||||||
|
auto line = stmt_after->lineNumber();
|
||||||
|
auto var_name = arg->getValue().substr(arg->getValue().find('%') + 1);
|
||||||
|
__spf_print(1, "variable %s has multiple reaching definitions, further analysis is impossible\n", arg->getValue().c_str());
|
||||||
|
__spf_print(1, "Please specify value of variable %s on line %d of file %s\n", arg->getValue().c_str(), line, filename);
|
||||||
|
auto toAdd = make_tuple(stmt_after, var_name, MODE::BEFORE);
|
||||||
|
where_to_add.insert(toAdd);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
auto instr_num = *found_rd.begin();
|
||||||
|
auto [func, instr, bblock] = IRByNumber(fullIR, instr_num);
|
||||||
|
set<SAPFOR::Argument*> new_worklist = { arg };
|
||||||
|
|
||||||
|
lookup_for_vars(where_to_add, new_worklist, instr, bblock, func, fullIR);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
for (const auto& call_instr : call_sites[cur_func])
|
||||||
|
{
|
||||||
|
set<SAPFOR::Argument*> new_worklist;
|
||||||
|
auto params_num = cur_func->funcParams.countOfPars;
|
||||||
|
|
||||||
|
auto [call_func, _, call_bblock] = IRByNumber(fullIR, call_instr->getNumber());
|
||||||
|
auto first_instr = call_bblock->getInstructions().begin();
|
||||||
|
auto cur_instr = find_if(first_instr, call_bblock->getInstructions().end(), [call_instr](SAPFOR::IR_Block* i) {
|
||||||
|
return i->getInstruction() == call_instr;
|
||||||
|
});
|
||||||
|
|
||||||
|
for (auto& arg : worklist)
|
||||||
|
{
|
||||||
|
if (arg->getMemType() == SAPFOR::CFG_MEM_TYPE::FUNC_PARAM_)
|
||||||
|
{
|
||||||
|
auto param_num = stoi(arg->getValue().substr(arg->getValue().find('%', arg->getValue().find('%') + 1) + 1));
|
||||||
|
auto param_instr = (cur_instr - (params_num - param_num));
|
||||||
|
auto param_arg = (*param_instr)->getInstruction()->getArg1();
|
||||||
|
processArgument(new_worklist, param_arg, param_instr, first_instr);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
lookup_for_vars(where_to_add, new_worklist, call_instr, call_bblock, call_func, fullIR);
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
static void handle_single_allocate(set<tuple<SgStatement*, string, MODE>>& where_to_add,
|
||||||
|
SgStatement* alloc_statement,
|
||||||
|
const map<FuncInfo*, vector<SAPFOR::BasicBlock*>>& fullIR)
|
||||||
|
{
|
||||||
|
auto [func, instr, bblock] = stmtToIR(fullIR, alloc_statement);
|
||||||
|
|
||||||
|
auto first_instr = bblock->getInstructions().begin();
|
||||||
|
auto cur_instr = find_if(first_instr, bblock->getInstructions().end(), [instr](SAPFOR::IR_Block* i) {
|
||||||
|
return i->getInstruction() == instr;
|
||||||
|
});
|
||||||
|
auto alloc_instr = cur_instr;
|
||||||
|
|
||||||
|
// skip to F_CALL _ALLOC n
|
||||||
|
while ((*alloc_instr)->getInstruction()->getOperation() != SAPFOR::CFG_OP::F_CALL ||
|
||||||
|
(*alloc_instr)->getInstruction()->getArg1()->getValue() != "_ALLOC")
|
||||||
|
alloc_instr++;
|
||||||
|
|
||||||
|
auto arrays_num = stoi((*alloc_instr)->getInstruction()->getArg2()->getValue());
|
||||||
|
|
||||||
|
set<SAPFOR::Argument*> worklist;
|
||||||
|
for (int i = 0; i < arrays_num; i++)
|
||||||
|
{
|
||||||
|
auto param_instr = --alloc_instr;
|
||||||
|
auto param_reg = (*param_instr)->getInstruction()->getArg1();
|
||||||
|
|
||||||
|
while ((*param_instr)->getInstruction()->getOperation() != SAPFOR::CFG_OP::LOAD ||
|
||||||
|
(*param_instr)->getInstruction()->getResult() != param_reg)
|
||||||
|
param_instr--;
|
||||||
|
|
||||||
|
|
||||||
|
auto dimensions_num = stoi((*param_instr)->getInstruction()->getArg2()->getValue());
|
||||||
|
|
||||||
|
for (int j = 0; j < dimensions_num; j++)
|
||||||
|
{
|
||||||
|
auto ref_instr = --param_instr;
|
||||||
|
if ((*ref_instr)->getInstruction()->getOperation() == SAPFOR::CFG_OP::RANGE)
|
||||||
|
{
|
||||||
|
vector<SAPFOR::Argument*> range_args = { (*ref_instr)->getInstruction()->getArg1(),
|
||||||
|
(*ref_instr)->getInstruction()->getArg2(),
|
||||||
|
(*ref_instr)->getInstruction()->getResult() };
|
||||||
|
for (auto& arg : range_args)
|
||||||
|
processArgument(worklist, arg, ref_instr, first_instr);
|
||||||
|
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
auto arg = (*ref_instr)->getInstruction()->getArg1();
|
||||||
|
processArgument(worklist, arg, ref_instr, first_instr);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
lookup_for_vars(where_to_add, worklist, instr, bblock, func, fullIR);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static void handle_single_loop(set<tuple<SgStatement*, string, MODE>>& where_to_add,
|
||||||
|
SgStatement* loop_stmt,
|
||||||
|
const map<FuncInfo*, vector<SAPFOR::BasicBlock*>>& fullIR)
|
||||||
|
{
|
||||||
|
auto [func, instr, bblock] = stmtToIR(fullIR, loop_stmt);
|
||||||
|
auto cur_instr = bblock->getInstructions().end() - 1;
|
||||||
|
|
||||||
|
set<SAPFOR::Argument*> worklist;
|
||||||
|
extract_vars_from_reg(worklist, (*cur_instr)->getInstruction()->getResult(), cur_instr, bblock->getInstructions().begin());
|
||||||
|
|
||||||
|
lookup_for_vars(where_to_add, worklist, (*cur_instr)->getInstruction(), bblock, func, fullIR);
|
||||||
|
}
|
||||||
|
|
||||||
|
void findParameters(ResultSet& foundParameters,
|
||||||
|
map<FuncInfo*, vector<SAPFOR::BasicBlock*>>& fullIR,
|
||||||
|
const map<tuple<int, string, string>, pair<DIST::Array*, DIST::ArrayAccessInfo*>>& declaredArrays)
|
||||||
|
{
|
||||||
|
set<tuple<SgStatement*, string, MODE>> where_to_add;
|
||||||
|
|
||||||
|
map<string, FuncInfo*> name_to_func;
|
||||||
|
for (const auto& [func, _] : fullIR)
|
||||||
|
name_to_func[func->funcName] = func;
|
||||||
|
|
||||||
|
for (auto& [func, bblocks] : fullIR)
|
||||||
|
{
|
||||||
|
for (const auto& block : bblocks)
|
||||||
|
{
|
||||||
|
for (const auto& ir_block : block->getInstructions())
|
||||||
|
{
|
||||||
|
auto instr = ir_block->getInstruction();
|
||||||
|
if (instr->getOperation() == SAPFOR::CFG_OP::F_CALL)
|
||||||
|
{
|
||||||
|
auto func_name = instr->getArg1()->getValue();
|
||||||
|
auto func_info = name_to_func.find(func_name);
|
||||||
|
|
||||||
|
if (func_info != name_to_func.end())
|
||||||
|
call_sites[func_info->second].push_back(instr);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
set<SgStatement*> alloc_statements;
|
||||||
|
for (const auto& [func, bblocks] : fullIR)
|
||||||
|
{
|
||||||
|
for (const auto& block : bblocks)
|
||||||
|
{
|
||||||
|
for (auto instr = block->getInstructions().begin(); instr != block->getInstructions().end(); ++instr)
|
||||||
|
{
|
||||||
|
auto op = (*instr)->getInstruction()->getOperator();
|
||||||
|
if (op && op->variant() == ALLOCATE_STMT)
|
||||||
|
alloc_statements.insert(op);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
set<SgStatement*> for_statements;
|
||||||
|
// Find all FOR statements in the program
|
||||||
|
for (const auto& [func, bblocks] : fullIR)
|
||||||
|
{
|
||||||
|
for (const auto& block : bblocks)
|
||||||
|
{
|
||||||
|
for (auto instr = block->getInstructions().begin(); instr != block->getInstructions().end(); ++instr)
|
||||||
|
{
|
||||||
|
auto op = (*instr)->getInstruction()->getOperator();
|
||||||
|
if (op && op->variant() == FOR_NODE)
|
||||||
|
for_statements.insert(op);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
for (const auto& alloc_statement : alloc_statements)
|
||||||
|
handle_single_allocate(where_to_add, alloc_statement, fullIR);
|
||||||
|
|
||||||
|
for (const auto& stmt : for_statements)
|
||||||
|
handle_single_loop(where_to_add, stmt, fullIR);
|
||||||
|
|
||||||
|
for (const auto& [stmt_before, var_name, mode] : where_to_add)
|
||||||
|
{
|
||||||
|
stmt_before->switchToFile();
|
||||||
|
|
||||||
|
SgVariableSymb* var_symb = new SgVariableSymb(var_name.c_str());
|
||||||
|
SgVarRefExp* var = new SgVarRefExp(var_symb);
|
||||||
|
SgExprListExp* ex = new SgExprListExp();
|
||||||
|
auto assgn_op = new SgExpression(ASSGN_OP, var, NULL);
|
||||||
|
ex->setLhs(assgn_op);
|
||||||
|
|
||||||
|
SgExpression* parameter_op = new SgExpression(SPF_PARAMETER_OP, ex);
|
||||||
|
auto dir_list = new SgExprListExp();
|
||||||
|
dir_list->setLhs(parameter_op);
|
||||||
|
SgStatement* toAdd = new SgStatement(SPF_ANALYSIS_DIR, NULL, NULL, dir_list, NULL, NULL);
|
||||||
|
|
||||||
|
toAdd->setlineNumber(stmt_before->lineNumber());
|
||||||
|
toAdd->setLocalLineNumber(stmt_before->lineNumber());
|
||||||
|
toAdd->setFileId(stmt_before->getFileId());
|
||||||
|
toAdd->setProject(stmt_before->getProject());
|
||||||
|
|
||||||
|
//NOTE: only for debbuging, results will be transferred to the visualizer
|
||||||
|
/*if (mode == MODE::AFTER)
|
||||||
|
stmt_before->insertStmtAfter(*toAdd, *stmt_before->controlParent());
|
||||||
|
else
|
||||||
|
stmt_before->insertStmtBefore(*toAdd, *stmt_before->controlParent());*/
|
||||||
|
|
||||||
|
foundParameters.insert(make_tuple(stmt_before->fileName(), stmt_before->lineNumber(), var_name));
|
||||||
|
}
|
||||||
}
|
}
|
||||||
@@ -1,3 +1,14 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
std::map< std::pair<std::string, int>, std::set<std::string>> findParameters(const std::map<std::string, std::vector<DefUseList>> &defUseByFunctions, const std::map<std::string, CommonBlock*> &commonBlocks, const std::map<std::string, std::vector<FuncInfo*>> &allFuncInfo);
|
#include <map>
|
||||||
|
#include <string>
|
||||||
|
#include <set>
|
||||||
|
#include <vector>
|
||||||
|
|
||||||
|
#include "../GraphCall/graph_calls.h"
|
||||||
|
|
||||||
|
using ResultSet = std::set<std::tuple<std::string, int, std::string>>;
|
||||||
|
|
||||||
|
void findParameters(ResultSet& foundParameters,
|
||||||
|
std::map<FuncInfo*, std::vector<SAPFOR::BasicBlock*>>& fullIR,
|
||||||
|
const std::map<std::tuple<int, std::string, std::string>, std::pair<DIST::Array*, DIST::ArrayAccessInfo*>>& declaredArrays);
|
||||||
|
|||||||
@@ -4,9 +4,9 @@
|
|||||||
#include <map>
|
#include <map>
|
||||||
#include <string>
|
#include <string>
|
||||||
|
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../Utils/utils.h"
|
#include "utils.h"
|
||||||
#include "sage++user.h"
|
#include "sage++user.h"
|
||||||
#include "definesValues.h"
|
#include "definesValues.h"
|
||||||
#include "set.h"
|
#include "set.h"
|
||||||
|
|||||||
@@ -15,8 +15,8 @@ extern "C" void removeFromCollection(void *pointer);
|
|||||||
#endif
|
#endif
|
||||||
extern int passDone;
|
extern int passDone;
|
||||||
|
|
||||||
#include "../GraphCall/graph_calls.h"
|
#include "graph_calls.h"
|
||||||
#include "../Utils/errors.h"
|
#include "errors.h"
|
||||||
#include "../VisualizerCalls/get_information.h"
|
#include "../VisualizerCalls/get_information.h"
|
||||||
|
|
||||||
#include "sage++user.h"
|
#include "sage++user.h"
|
||||||
|
|||||||
120
src/Sapfor.cpp
120
src/Sapfor.cpp
@@ -24,8 +24,6 @@
|
|||||||
#include "ParallelizationRegions/resolve_par_reg_conflicts.h"
|
#include "ParallelizationRegions/resolve_par_reg_conflicts.h"
|
||||||
#include "ParallelizationRegions/expand_extract_reg.h"
|
#include "ParallelizationRegions/expand_extract_reg.h"
|
||||||
|
|
||||||
#include "Transformations/replace_dist_arrays_in_io.h"
|
|
||||||
|
|
||||||
#include "Distribution/Distribution.h"
|
#include "Distribution/Distribution.h"
|
||||||
#include "Distribution/GraphCSR.h"
|
#include "Distribution/GraphCSR.h"
|
||||||
#include "Distribution/Arrays.h"
|
#include "Distribution/Arrays.h"
|
||||||
@@ -55,7 +53,8 @@
|
|||||||
#include "VerificationCode/verifications.h"
|
#include "VerificationCode/verifications.h"
|
||||||
#include "Distribution/CreateDistributionDirs.h"
|
#include "Distribution/CreateDistributionDirs.h"
|
||||||
#include "PrivateAnalyzer/private_analyzer.h"
|
#include "PrivateAnalyzer/private_analyzer.h"
|
||||||
#include "ExpressionTransform/expr_transform.h"
|
#include "PrivateAnalyzer/private_arrays_search.h"
|
||||||
|
#include "expr_transform.h"
|
||||||
|
|
||||||
#include "Predictor/PredictScheme.h"
|
#include "Predictor/PredictScheme.h"
|
||||||
#include "Predictor/PredictorModel.h"
|
#include "Predictor/PredictorModel.h"
|
||||||
@@ -71,36 +70,36 @@
|
|||||||
#include "VisualizerCalls/SendMessage.h"
|
#include "VisualizerCalls/SendMessage.h"
|
||||||
#include "VisualizerCalls/BuildGraph.h"
|
#include "VisualizerCalls/BuildGraph.h"
|
||||||
|
|
||||||
#include "Transformations/enddo_loop_converter.h"
|
#include "Transformations/ReplaceArraysInIO/replace_dist_arrays_in_io.h"
|
||||||
#include "Transformations/loop_transform.h"
|
#include "Transformations/LoopEndDoConverter/enddo_loop_converter.h"
|
||||||
#include "Transformations/array_assign_to_loop.h"
|
#include "Transformations/LoopNesting/loop_transform.h"
|
||||||
#include "Transformations/private_arrays_resizing.h"
|
#include "Transformations/VectorAssignToLoop/array_assign_to_loop.h"
|
||||||
#include "Transformations/loops_splitter.h"
|
#include "Transformations/PrivateArrayResizing/private_arrays_resizing.h"
|
||||||
#include "Transformations/loops_combiner.h"
|
#include "Transformations/LoopSplitting/loops_splitter.h"
|
||||||
#include "Transformations/loops_unrolling.h"
|
#include "Transformations/LoopCombining/loops_combiner.h"
|
||||||
#include "Transformations/uniq_call_chain_dup.h"
|
#include "Transformations/LoopUnrolling/loops_unrolling.h"
|
||||||
#include "Transformations/checkpoints.h"
|
#include "Transformations/FunctionDuplication/uniq_call_chain_dup.h"
|
||||||
#include "Transformations/swap_array_dims.h"
|
#include "Transformations/CheckPoints/checkpoints.h"
|
||||||
#include "Transformations/function_purifying.h"
|
#include "Transformations/ArrayDimsSwapping/swap_array_dims.h"
|
||||||
#include "Transformations/private_removing.h"
|
#include "Transformations/FunctionPurifying/function_purifying.h"
|
||||||
#include "Transformations/fix_common_blocks.h"
|
#include "Transformations/PrivateArrayRemoving/private_removing.h"
|
||||||
#include "Transformations/convert_to_c.h"
|
#include "Transformations/GlobalVariables/fix_common_blocks.h"
|
||||||
#include "Transformations/set_implicit_none.h"
|
#include "Transformations/ConvertToC/convert_to_c.h"
|
||||||
#include "Transformations/dead_code.h"
|
#include "Transformations/SetImplicitNone/set_implicit_none.h"
|
||||||
|
#include "Transformations/DeadCodeRemoving/dead_code.h"
|
||||||
|
#include "Transformations/RenameSymbols/rename_symbols.h"
|
||||||
|
#include "Transformations/FunctionInlining/inliner.h"
|
||||||
|
#include "Transformations/SwapOperators/swap_operators.h"
|
||||||
|
|
||||||
#include "RenameSymbols/rename_symbols.h"
|
|
||||||
#include "ProjectParameters/projectParameters.h"
|
#include "ProjectParameters/projectParameters.h"
|
||||||
|
|
||||||
#include "CFGraph/IR.h"
|
#include "CFGraph/IR.h"
|
||||||
#include "CFGraph/RD_subst.h"
|
#include "CFGraph/RD_subst.h"
|
||||||
#include "CFGraph/CFGraph.h"
|
#include "CFGraph/CFGraph.h"
|
||||||
#include "CFGraph/IRSSAForm.h"
|
|
||||||
|
|
||||||
#include "CFGraph/live_variable_analysis.h"
|
#include "CFGraph/live_variable_analysis.h"
|
||||||
#include "CFGraph/private_variables_analysis.h"
|
#include "CFGraph/private_variables_analysis.h"
|
||||||
|
|
||||||
#include "Inliner/inliner.h"
|
|
||||||
|
|
||||||
#include "dvm.h"
|
#include "dvm.h"
|
||||||
#include "Sapfor.h"
|
#include "Sapfor.h"
|
||||||
#include "Utils/PassManager.h"
|
#include "Utils/PassManager.h"
|
||||||
@@ -400,11 +399,7 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
__spf_print(DEBUG_LVL1, "RUN PASS with name %s\n", passNames[curr_regime]);
|
__spf_print(DEBUG_LVL1, "RUN PASS with name %s\n", passNames[curr_regime]);
|
||||||
|
|
||||||
auto toSendStrMessage = string(passNames[curr_regime]);
|
auto toSendStrMessage = string(passNames[curr_regime]);
|
||||||
#ifdef _WIN32
|
sendMessage_1lvl(1, toSendStrMessage);
|
||||||
sendMessage_1lvl(wstring(L"выполняется проход '") + wstring(toSendStrMessage.begin(), toSendStrMessage.end()) + L"'");
|
|
||||||
#else
|
|
||||||
sendMessage_1lvl(wstring(L"running pass '") + wstring(toSendStrMessage.begin(), toSendStrMessage.end()) + L"'");
|
|
||||||
#endif
|
|
||||||
|
|
||||||
const int n = project.numberOfFiles();
|
const int n = project.numberOfFiles();
|
||||||
bool verifyOK = true;
|
bool verifyOK = true;
|
||||||
@@ -452,11 +447,7 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
SgFile *file = &(project.file(i));
|
SgFile *file = &(project.file(i));
|
||||||
|
|
||||||
toSendStrMessage = file->filename();
|
toSendStrMessage = file->filename();
|
||||||
#ifdef _WIN32
|
sendMessage_2lvl(3, toSendStrMessage);
|
||||||
sendMessage_2lvl(wstring(L"обработка файла '") + wstring(toSendStrMessage.begin(), toSendStrMessage.end()) + L"'");
|
|
||||||
#else
|
|
||||||
sendMessage_2lvl(wstring(L"processing file '") + wstring(toSendStrMessage.begin(), toSendStrMessage.end()) + L"'");
|
|
||||||
#endif
|
|
||||||
sendMessage_progress(std::to_wstring((int)(((double)(n - i) / n) * 100)));
|
sendMessage_progress(std::to_wstring((int)(((double)(n - i) / n) * 100)));
|
||||||
|
|
||||||
const char *file_name = file->filename();
|
const char *file_name = file->filename();
|
||||||
@@ -910,7 +901,7 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
else if (curr_regime == ADD_TEMPL_TO_USE_ONLY)
|
else if (curr_regime == ADD_TEMPL_TO_USE_ONLY)
|
||||||
fixUseOnlyStmt(file, parallelRegions);
|
fixUseOnlyStmt(file, parallelRegions);
|
||||||
else if (curr_regime == GCOV_PARSER)
|
else if (curr_regime == GCOV_PARSER)
|
||||||
parse_gcovfile(file, consoleMode == 1 ? file_name : "./visualiser_data/gcov/" + string(file_name), getObjectForFileFromMap(file_name, gCovInfo), keepFiles);
|
parse_gcovfile(file, consoleMode == 1 ? file_name : string(VISUALIZER_DATA_PATH) + "/gcov/" + file_name, getObjectForFileFromMap(file_name, gCovInfo), keepFiles);
|
||||||
else if(curr_regime == PRIVATE_ARRAYS_EXPANSION)
|
else if(curr_regime == PRIVATE_ARRAYS_EXPANSION)
|
||||||
{
|
{
|
||||||
auto founded = loopGraph.find(file->filename());
|
auto founded = loopGraph.find(file->filename());
|
||||||
@@ -949,6 +940,8 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
internalExit = err;
|
internalExit = err;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
else if (curr_regime == SWAP_OPERATORS)
|
||||||
|
runSwapOperators(file, loopGraph, fullIR, countOfTransform);
|
||||||
else if (curr_regime == PRIVATE_REMOVING_ANALYSIS)
|
else if (curr_regime == PRIVATE_REMOVING_ANALYSIS)
|
||||||
{
|
{
|
||||||
auto itFound = loopGraph.find(file->filename());
|
auto itFound = loopGraph.find(file->filename());
|
||||||
@@ -962,7 +955,7 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
vector<string> include_functions;
|
vector<string> include_functions;
|
||||||
|
|
||||||
createInterTree(file, getObjectForFileFromMap(file_name, intervals), removeNestedIntervals, getObjectForFileFromMap(file_name, SPF_messages));
|
createInterTree(file, getObjectForFileFromMap(file_name, intervals), removeNestedIntervals, getObjectForFileFromMap(file_name, SPF_messages));
|
||||||
assignCallsToFile(consoleMode == 1 ? file_name : "./visualiser_data/gcov/" + string(file_name), getObjectForFileFromMap(file_name, intervals));
|
assignCallsToFile(consoleMode == 1 ? file_name : string(VISUALIZER_DATA_PATH) + "/gcov/" + file_name, getObjectForFileFromMap(file_name, intervals));
|
||||||
removeNodes(intervals_threshold, getObjectForFileFromMap(file_name, intervals), include_functions);
|
removeNodes(intervals_threshold, getObjectForFileFromMap(file_name, intervals), include_functions);
|
||||||
}
|
}
|
||||||
else if (curr_regime == INSERT_INTER_TREE)
|
else if (curr_regime == INSERT_INTER_TREE)
|
||||||
@@ -1029,17 +1022,8 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
if(func->funcPointer->variant() != ENTRY_STAT)
|
if(func->funcPointer->variant() != ENTRY_STAT)
|
||||||
countOfTransform += removeDeadCode(func->funcPointer, allFuncInfo, commonBlocks);
|
countOfTransform += removeDeadCode(func->funcPointer, allFuncInfo, commonBlocks);
|
||||||
}
|
}
|
||||||
else if (curr_regime == BUILD_IR_SSA_FORM)
|
else if (curr_regime == FIND_PRIVATE_ARRAYS)
|
||||||
{
|
FindPrivateArrays(loopGraph, fullIR);
|
||||||
if (ssaFormIR.size() == 0) {
|
|
||||||
buildIRSSAForm(fullIR, &ssaFormIR);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
else if (curr_regime == EXPLORE_IR_LOOPS)
|
|
||||||
{
|
|
||||||
exploreLoops(&ssaFormIR, file_name);
|
|
||||||
}
|
|
||||||
|
|
||||||
else if (curr_regime == TEST_PASS)
|
else if (curr_regime == TEST_PASS)
|
||||||
{
|
{
|
||||||
//test pass
|
//test pass
|
||||||
@@ -1056,7 +1040,8 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
PRIVATE_REMOVING,
|
PRIVATE_REMOVING,
|
||||||
PRIVATE_ARRAYS_EXPANSION,
|
PRIVATE_ARRAYS_EXPANSION,
|
||||||
PRIVATE_ARRAYS_SHRINKING,
|
PRIVATE_ARRAYS_SHRINKING,
|
||||||
REMOVE_DEAD_CODE };
|
REMOVE_DEAD_CODE,
|
||||||
|
SWAP_OPERATORS };
|
||||||
|
|
||||||
if ((countOfTransform == 0 || internalExit > 0) && applyFor.find(curr_regime) != applyFor.end())
|
if ((countOfTransform == 0 || internalExit > 0) && applyFor.find(curr_regime) != applyFor.end())
|
||||||
{
|
{
|
||||||
@@ -1068,7 +1053,7 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
throw -11;
|
throw -11;
|
||||||
}
|
}
|
||||||
|
|
||||||
sendMessage_2lvl(wstring(L""));
|
sendMessage_2lvl(2);
|
||||||
// ********************************** ///
|
// ********************************** ///
|
||||||
/// SECOND AGGREGATION STEP ///
|
/// SECOND AGGREGATION STEP ///
|
||||||
// ********************************** ///
|
// ********************************** ///
|
||||||
@@ -1300,7 +1285,6 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
detectCopies(allFuncInfo);
|
detectCopies(allFuncInfo);
|
||||||
fillInterfaceBlock(allFuncInfo);
|
fillInterfaceBlock(allFuncInfo);
|
||||||
intentInsertToInterfaces(allFuncInfo);
|
intentInsertToInterfaces(allFuncInfo);
|
||||||
createInterfacesForAssumedSize(allFuncInfo);
|
|
||||||
|
|
||||||
//this call is only for testing
|
//this call is only for testing
|
||||||
//setPureStatus(allFuncInfo);
|
//setPureStatus(allFuncInfo);
|
||||||
@@ -1724,7 +1708,7 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
}
|
}
|
||||||
else if (curr_regime == GCOV_PARSER)
|
else if (curr_regime == GCOV_PARSER)
|
||||||
{
|
{
|
||||||
parseTimesDvmStatisticFile((consoleMode == 1) ? string("statistic.txt") : "./visualiser_data/statistic/" + string("statistic.txt"), intervals);
|
parseTimesDvmStatisticFile((consoleMode == 1) ? string("statistic.txt") : string(VISUALIZER_DATA_PATH) + "/statistic/statistic.txt", intervals);
|
||||||
|
|
||||||
//fixed count, devide by value from PROG_HEDR
|
//fixed count, devide by value from PROG_HEDR
|
||||||
SgStatement* mainUnit = findMainUnit(&project, SPF_messages);
|
SgStatement* mainUnit = findMainUnit(&project, SPF_messages);
|
||||||
@@ -1906,7 +1890,7 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
else if (curr_regime == RENAME_SYMBOLS)
|
else if (curr_regime == RENAME_SYMBOLS)
|
||||||
runRenameSymbols(&project, commonBlocks);
|
runRenameSymbols(&project, commonBlocks);
|
||||||
else if (curr_regime == FIND_PARAMETERS)
|
else if (curr_regime == FIND_PARAMETERS)
|
||||||
parametersOfProject = findParameters(defUseByFunctions, commonBlocks, allFuncInfo);
|
findParameters(parametersOfProject, fullIR, declaredArrays);
|
||||||
else if (curr_regime == BUILD_IR)
|
else if (curr_regime == BUILD_IR)
|
||||||
{
|
{
|
||||||
auto CFG_forFile = buildCFG(commonBlocks, allFuncInfo_IR, SAPFOR::CFG_Settings(0));
|
auto CFG_forFile = buildCFG(commonBlocks, allFuncInfo_IR, SAPFOR::CFG_Settings(0));
|
||||||
@@ -1934,12 +1918,14 @@ static bool runAnalysis(SgProject &project, const int curr_regime, const bool ne
|
|||||||
calculateStatsForPredictor(allFuncInfo, gCovInfo);
|
calculateStatsForPredictor(allFuncInfo, gCovInfo);
|
||||||
parseDvmDirForPredictor(declaredArrays, commonBlocks, allFuncInfo, gCovInfo);
|
parseDvmDirForPredictor(declaredArrays, commonBlocks, allFuncInfo, gCovInfo);
|
||||||
}
|
}
|
||||||
|
else if (curr_regime == TRANSFORM_ASSUMED_SIZE_PARAMETERS)
|
||||||
|
transformAssumedSizeParameters(allFuncInfo);
|
||||||
|
|
||||||
const float elapsed = duration_cast<milliseconds>(high_resolution_clock::now() - timeForPass).count() / 1000.;
|
const float elapsed = duration_cast<milliseconds>(high_resolution_clock::now() - timeForPass).count() / 1000.;
|
||||||
const float elapsedGlobal = duration_cast<milliseconds>(high_resolution_clock::now() - globalTime).count() / 1000.;
|
const float elapsedGlobal = duration_cast<milliseconds>(high_resolution_clock::now() - globalTime).count() / 1000.;
|
||||||
__spf_print(1, "PROFILE: time for this pass = %f sec (total %f sec)\n", elapsed, elapsedGlobal);
|
__spf_print(1, "PROFILE: time for this pass = %f sec (total %f sec)\n", elapsed, elapsedGlobal);
|
||||||
|
|
||||||
sendMessage_2lvl(wstring(L""));
|
sendMessage_2lvl(2);
|
||||||
if (internalExit != 0)
|
if (internalExit != 0)
|
||||||
throw -1;
|
throw -1;
|
||||||
|
|
||||||
@@ -2169,6 +2155,8 @@ void runPass(const int curr_regime, const char *proj_name, const char *folderNam
|
|||||||
runAnalysis(*project, REMOVE_COPIES, false);
|
runAnalysis(*project, REMOVE_COPIES, false);
|
||||||
runAnalysis(*project, SWAP_LOOPS, false);
|
runAnalysis(*project, SWAP_LOOPS, false);
|
||||||
|
|
||||||
|
runPass(TRANSFORM_ASSUMED_SIZE_PARAMETERS, proj_name, folderName);
|
||||||
|
|
||||||
if (folderName || consoleMode)
|
if (folderName || consoleMode)
|
||||||
runAnalysis(*project, UNPARSE_FILE, true, additionalName.c_str(), folderName);
|
runAnalysis(*project, UNPARSE_FILE, true, additionalName.c_str(), folderName);
|
||||||
}
|
}
|
||||||
@@ -2350,6 +2338,7 @@ void runPass(const int curr_regime, const char *proj_name, const char *folderNam
|
|||||||
case INSERT_NO_DISTR_FLAGS_FROM_GUI:
|
case INSERT_NO_DISTR_FLAGS_FROM_GUI:
|
||||||
case PRIVATE_REMOVING:
|
case PRIVATE_REMOVING:
|
||||||
case RENAME_INLCUDES:
|
case RENAME_INLCUDES:
|
||||||
|
case SWAP_OPERATORS:
|
||||||
runAnalysis(*project, curr_regime, true, "", folderName);
|
runAnalysis(*project, curr_regime, true, "", folderName);
|
||||||
break;
|
break;
|
||||||
case INLINE_PROCEDURES:
|
case INLINE_PROCEDURES:
|
||||||
@@ -2651,7 +2640,10 @@ int main(int argc, char **argv)
|
|||||||
}
|
}
|
||||||
|
|
||||||
if (curr_regime == INSERT_PARALLEL_DIRS_NODIST)
|
if (curr_regime == INSERT_PARALLEL_DIRS_NODIST)
|
||||||
|
{
|
||||||
ignoreArrayDistributeState = true;
|
ignoreArrayDistributeState = true;
|
||||||
|
sharedMemoryParallelization = 1;
|
||||||
|
}
|
||||||
|
|
||||||
if (runAsClient)
|
if (runAsClient)
|
||||||
{
|
{
|
||||||
@@ -2673,32 +2665,12 @@ int main(int argc, char **argv)
|
|||||||
printStackTrace();
|
printStackTrace();
|
||||||
printf("exception occurred\n");
|
printf("exception occurred\n");
|
||||||
|
|
||||||
json byFileArray = json::array();
|
dumpMessages(true, SPF_messages, VISUALIZER_DATA_PATH);
|
||||||
for (auto& byFile : SPF_messages)
|
|
||||||
{
|
|
||||||
json inFile;
|
|
||||||
inFile["file"] = byFile.first;
|
|
||||||
|
|
||||||
json messages = json::array();
|
|
||||||
for (auto& message : byFile.second)
|
|
||||||
{
|
|
||||||
message.print(byFile.first);
|
|
||||||
messages.push_back(message.toJson());
|
|
||||||
}
|
|
||||||
inFile["messages"] = messages;
|
|
||||||
byFileArray.push_back(inFile);
|
|
||||||
}
|
|
||||||
json allMessages;
|
|
||||||
allMessages["allMessage"] = byFileArray;
|
|
||||||
|
|
||||||
FILE* outF = fopen("dump_messages.json", "w");
|
|
||||||
fprintf(outF, "%s", allMessages.dump().c_str());
|
|
||||||
fclose(outF);
|
|
||||||
}
|
}
|
||||||
|
dumpMessages(false, SPF_messages, VISUALIZER_DATA_PATH);
|
||||||
|
|
||||||
deleteAllAllocatedData(withDel);
|
deleteAllAllocatedData(withDel);
|
||||||
|
|
||||||
|
|
||||||
#if _WIN32 && _DEBUG
|
#if _WIN32 && _DEBUG
|
||||||
if (leakMemDump)
|
if (leakMemDump)
|
||||||
{
|
{
|
||||||
|
|||||||
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user