In 24h sim, make no hard parse/full scan the default

Author: bengsig

oltp/aw_declarations.rwl

@@ -5,6 +5,7 @@
 # This file declares everything used by the
 # various artificial workloads:
 
+# bengsig  16-nov-2023 - Fix hard/scan during 24h sim
 # bengsig   8-aug-2023 - xc_badplan is a probability
 # bengsig   1-aug-2023 - 24h simulation
 # bengsig   9-may-2023 - Gradual badplan and hardparse
@@ -265,7 +266,7 @@ $endif
       # Note that this is very aggressive unless you reduce awindex_query_weight to e.g. 10
       + uniform(10,90)*(uniform(0.0,1.0)<xc_badplan)
     $endif
-    $if s24hour $then
+    $if s24hour and s24h_scan_prb > 0.0 $then
       + (( myrunsec > s24h_scan_beg + s24h_scan_skp*s24h_scan_avg
 	  and
 	  myrunsec%normalrandom(s24h_scan_avg,s24h_scan_std) between s24h_scan_beg and s24h_scan_end

oltp/oe_handle_orders.rwl

@@ -2,6 +2,7 @@
 # Licensed under the Universal Permissive License v 1.0
 # as shown at https://oss.oracle.com/licenses/upl/
 
+# bengsig  16-nov-2023 - Fix hard/scan during 24h sim
 # bengsig   3-oct-2023 - Add parsefailure
 # bengsig  31-jul-2023 - Add experimental 24h simulation
 # bengsig   9-feb-2023 - Check against max_order-5e6
@@ -181,7 +182,7 @@ $else
   $endif
   double myrunsec := runseconds();
   integer do_hardparse := (
-    $if s24hour $then
+    $if s24hour and s24h_hard_prb > 0.0 $then
       uniform(0.0,1.0) < s24h_hard_prb
 	and
       myrunsec > s24h_hard_beg + s24h_hard_skp*s24h_hard_avg

oltp/oltp.rwl

@@ -369,7 +369,8 @@ rwl_daily_html := "daily.html";
 # s24hour := 0 # set to 1 to enable 24h simulation
 # These parameters tell what "day" and "night" is, i.e. when the "day" period
 # begins and ends (relative to runperiod), and how the ratefactor is 
-# set during the two priods.
+# set during the two priods. If the defaults below are fine for you,
+# you only need to set s24hour.
 # s24h_high_beg := 0.30; # Factor applied to runperiod to indicate start of "day"
 # s24h_high_end := 0.85; # Factor applied to runperiod to indicate end of "day"
 # s24h_high_std := 0.05; # stddev of those, the lower, the more rapid the change is
@@ -384,24 +385,28 @@ rwl_daily_html := "daily.html";
 # s24h_hard_beg := 15.0; # runseconds() of begin hard parse
 # s24h_hard_end := 20.0; # runseconds() of end hard parse
 # s24h_hard_skp :=   1; # How many to skip initially in the run
-# s24h_hard_prb :=  0.8; # probability of actually doing hard parse
-# With these default values, there will be a hard parse with 
+# s24h_hard_prb := 0.0; # probability of actually doing hard parse (try e.g. 0.8)
+# With the suggested s24h_hard_prb there will be hard parse
 # a probability of 80% and this will happen during a 5 second
 # period every 90s. The first 5s period will be starting 105s
 # (s24h_hard_beg+s24h_hard_skp*s24h_hard_avg) into the run.
+# If you are happy with the timing of the hard parse injection, just
+# set s24h_hard_prb to any value larger than 0.
 # The hard parse actually impacts the make_order and query_order transactions
 
 # Another "issue" is to change from index lookup to full scan
 # s24h_scan_avg :=130.0; # approximate time between each
 # s24h_scan_std :=  3.0; # the standard deviation
 # s24h_scan_beg := 35.0; # runseconds() of begin full scan
 # s24h_scan_end := 50.0; # runseconds() of end full scan
-# s24h_scan_skp :=   0;  # How many to skip initially in the run
-# s24h_scan_prb := 0.05; # probability of actually doing full scan
-# With these default values, there will be a full scan parse with 
+# s24h_scan_skp :=    0; # How many to skip initially in the run
+# s24h_scan_prb := 0.00; # probability of actually doing full scan (try e.g. 0.05)
+# With the suggested s24h_scan_prb, there will be full scan with
 # a probability of 5% and this will happen during a 15 second
 # period every 130s. The first 15s period will be starting 35s
 # into the run since s24h_scan_skp is 0.
+# If you are happy with the timing of the hard parse injection, just
+# set s24h_scan_prb to any value larger than 0.
 # The actual impact is on the awindex_query transaction
 
 # The following parameters rarely changed

oltp/parameters.rwl

@@ -2,6 +2,7 @@
 # Licensed under the Universal Permissive License v 1.0
 # as shown at https://oss.oracle.com/licenses/upl/
 
+# bengsig  16-nov-2023 - Fix hard/scan during 24h sim
 # bengsig   9-nov-2023 - support multiple application servers
 # bengsig   6-nov-2023 - burst function
 # bengsig   1-nov-2023 - burst can be repeated
@@ -207,14 +208,14 @@ double s24h_hard_std :=  0.5; # the standard deviation
 double s24h_hard_beg := 15.0; # offset of begin hard parse
 double s24h_hard_end := 20.0; # offset of end hard parse
 integer s24h_hard_skp :=   1; # How many to skip initially in the run
-double s24h_hard_prb :=  0.8; # probability of actually doing hard parse
+double s24h_hard_prb :=  0.0; # probability of actually doing hard parse
 # Each thread uses a bad plan (i.e. full scan) for some periods
 double s24h_scan_avg :=130.0; # approximate time between each
 double s24h_scan_std :=  3.0; # the standard deviation
 double s24h_scan_beg := 35.0; # offset of begin full scan
 double s24h_scan_end := 50.0; # offset of end full scan
 integer s24h_scan_skp :=   0; # How many to skip initially in the run
-double s24h_scan_prb := 0.05; # probability of actually doing full scan
+double s24h_scan_prb := 0.00; # probability of actually doing full scan
 
 integer doawr := 1; # set to 0 if you don't want awr to be generated 
 
@@ -539,18 +540,26 @@ if show_changed_values then
       , runperiod * (s24h_high_end+2.0*s24h_high_std);
     printf "Rate low=%.0ftps, high=%.0ftps (stddev %.2f)\n"
       , xeqpsec*s24h_load_lo, xeqpsec*s24h_load_hi, s24h_load_std;
-    printf "Hard parse %.1f%% first interval %.0fs-%.0fs then every %.0fs (stddev %.2f); marked red\n"
-      , 100*s24h_hard_prb
-      , s24h_hard_beg+(s24h_hard_skp*s24h_hard_avg)
-      , s24h_hard_end+(s24h_hard_skp*s24h_hard_avg)
-      , s24h_hard_avg
-      , s24h_hard_std;
-    printf "Full scan %.1f%% first interval %.0fs-%.0fs then every %.0fs (stddev %.2f); marked blue\n"
-      , 100*s24h_scan_prb
-      , s24h_scan_beg+(s24h_scan_skp*s24h_scan_avg)
-      , s24h_scan_end+(s24h_scan_skp*s24h_scan_avg)
-      , s24h_scan_avg
-      , s24h_scan_std;
+    if s24h_hard_prb > 0.0 then
+      printf "Hard parse %.1f%% first interval %.0fs-%.0fs then every %.0fs (stddev %.2f); marked red\n"
+	, 100*s24h_hard_prb
+	, s24h_hard_beg+(s24h_hard_skp*s24h_hard_avg)
+	, s24h_hard_end+(s24h_hard_skp*s24h_hard_avg)
+	, s24h_hard_avg
+	, s24h_hard_std;
+    else
+      printline "No hard parse injection";
+    end if;
+    if s24h_hard_prb > 0.0 then
+      printf "Full scan %.1f%% first interval %.0fs-%.0fs then every %.0fs (stddev %.2f); marked blue\n"
+	, 100*s24h_scan_prb
+	, s24h_scan_beg+(s24h_scan_skp*s24h_scan_avg)
+	, s24h_scan_end+(s24h_scan_skp*s24h_scan_avg)
+	, s24h_scan_avg
+	, s24h_scan_std;
+    else
+      printline "No full scan injection";
+    end if;
   end if;
   printline "\nPooling information:";
   if pool_type = "sessionpool" or pool_type = "connectionpool" then

oltp/run.rwl

@@ -2,6 +2,7 @@
 # Licensed under the Universal Permissive License v 1.0
 # as shown at https://oss.oracle.com/licenses/upl/
 
+# bengsig  16-nov-2023 - Fix hard/scan during 24h sim
 # bengsig   6-nov-2023 - burst function
 # bengsig   1-nov-2023 - burst can be repeated
 # bengsig  11-sep-2023 - max_sessionwait
@@ -122,24 +123,28 @@ if s24hour and procnumber = 1 then
   # the parameters may have changed if we redo oltpplot.
   file s24markers >= resultsdir "/r" runnumber/1000 "/" runnumber "/s24markers.plot";
   double mrkleft, mrklen;
-  writeline s24markers, "# scan markers:";
-  mrkleft := s24h_scan_beg+s24h_scan_skp*s24h_scan_avg;
-  mrklen  := s24h_scan_end-s24h_scan_beg;
-  while mrkleft < runperiod loop
-    fprintf s24markers,
-      "set arrow from %.1f, graph -0.01 to %.1f, graph -0.01 lc rgb 'blue' heads size graph 0.005,90\n"
-      , mrkleft, mrkleft+mrklen;
-    mrkleft += s24h_scan_avg;
-  end loop;
+  if s24h_scan_prb > 0.0 then
+    writeline s24markers, "# scan markers:";
+    mrkleft := s24h_scan_beg+s24h_scan_skp*s24h_scan_avg;
+    mrklen  := s24h_scan_end-s24h_scan_beg;
+    while mrkleft < runperiod loop
+      fprintf s24markers,
+	"set arrow from %.1f, graph -0.01 to %.1f, graph -0.01 lc rgb 'blue' heads size graph 0.005,90\n"
+	, mrkleft, mrkleft+mrklen;
+      mrkleft += s24h_scan_avg;
+    end loop;
+  end if;
+  if s24h_hard_prb > 0.0 then
   writeline s24markers, "# hard parse markers:";
-  mrkleft := s24h_hard_beg+s24h_hard_skp*s24h_hard_avg;
-  mrklen  := s24h_hard_end-s24h_hard_beg;
-  while mrkleft < runperiod loop
-    fprintf s24markers,
-      "set arrow from %.1f, graph -0.02 to %.1f, graph -0.02 lc rgb 'red' heads size graph 0.005,90\n"
-      , mrkleft, mrkleft+mrklen;
-    mrkleft += s24h_hard_avg;
-  end loop;
+    mrkleft := s24h_hard_beg+s24h_hard_skp*s24h_hard_avg;
+    mrklen  := s24h_hard_end-s24h_hard_beg;
+    while mrkleft < runperiod loop
+      fprintf s24markers,
+	"set arrow from %.1f, graph -0.02 to %.1f, graph -0.02 lc rgb 'red' heads size graph 0.005,90\n"
+	, mrkleft, mrkleft+mrklen;
+      mrkleft += s24h_hard_avg;
+    end loop;
+  end if;
   s24markers := null;
 end if;