Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Autotune: Conditionally activate congruence integer domain #911

Merged
merged 4 commits into from
Nov 22, 2022
Merged

Autotune: Conditionally activate congruence integer domain #911

Changes from all commits
Commits
Show all changes
4 commits
Select commit Hold shift + click to select a range
444e89b
Autotuner: add check that globally conditionally enables congruences …
jerhard Nov 17, 2022
48cb8dd
svcopm23 configuration: Add congruence option to autotune.
jerhard Nov 17, 2022
5585a56
svcomp23: Remove "congruence" from ana.autotune.activated.
jerhard Nov 17, 2022
6e18daf
Add congruence annotations to functions only when totalTarget is not …
jerhard Nov 21, 2022
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
36 changes: 26 additions & 10 deletions src/autoTune.ml
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -315,6 +315,21 @@ class octagonFunctionVisitor(list, amount) = object

end

let congruenceOption factors file =
let locals, globals = factors.integralVars in
let cost = (locals + globals) * (factors.instructions / 12) + 5 * factors.functionCalls in
let value = 5 * locals + globals in
let activate () =
print_endline @@ "Congruence: " ^ string_of_int cost;
set_bool "ana.int.congruence" true;
print_endline "Enabled congruence domain.";
in
{
value;
cost;
activate;
michael-schwarz marked this conversation as resolved.
Show resolved Hide resolved
}

let apronOctagonOption factors file =
let locals =
if List.mem "specification" (get_string_list "ana.autotune.activated" ) && get_string "ana.specification" <> "" then
Expand Down Expand Up @@ -398,7 +413,16 @@ let chooseFromOptions costTarget options =
let isActivated a = get_bool "ana.autotune.enabled" && List.mem a @@ get_string_list "ana.autotune.activated"

let chooseConfig file =
if isActivated "congruence" then
let factors = collectFactors visitCilFileSameGlobals file in
let fileCompplexity = estimateComplexity factors file in

print_endline "Collected factors:";
printFactors factors;
print_endline "";
print_endline "Complexity estimates:";
print_endline @@ "File: " ^ string_of_int fileCompplexity;

if fileCompplexity < totalTarget && isActivated "congruence" then
addModAttributes file;

if isActivated "noRecursiveIntervals" then
Expand All @@ -419,16 +443,8 @@ let chooseConfig file =
if isActivated "arrayDomain" then
selectArrayDomains file;

let factors = collectFactors visitCilFileSameGlobals file in
let fileCompplexity = estimateComplexity factors file in

print_endline "Collected factors:";
printFactors factors;
print_endline "";
print_endline "Complexity estimates:";
print_endline @@ "File: " ^ string_of_int fileCompplexity;

let options = [] in
let options = if isActivated "congruence" then (congruenceOption factors file)::options else options in
let options = if isActivated "octagon" then (apronOctagonOption factors file)::options else options in
let options = if isActivated "wideningThresholds" then (wideningOption factors file)::options else options in

Expand Down