From 4c24a8bfdf376ca8a008e619f5e2339fb85193c9 Mon Sep 17 00:00:00 2001
From: marta-lokhova <marta@stellar.org>
Date: Thu, 23 Apr 2026 16:21:12 -0700
Subject: [PATCH] Add support for ignoring time bounds for block time
 validation

---
 src/App/Program.fs                     | 6 ++++--
 src/FSLibrary.Tests/Tests.fs           | 3 ++-
 src/FSLibrary/MinBlockTimeTest.fs      | 1 +
 src/FSLibrary/StellarCoreCfg.fs        | 3 +++
 src/FSLibrary/StellarMissionContext.fs | 3 ++-
 5 files changed, 12 insertions(+), 4 deletions(-)

diff --git a/src/App/Program.fs b/src/App/Program.fs
index b88b3e64..ce4ce79b 100644
--- a/src/App/Program.fs
+++ b/src/App/Program.fs
@@ -756,7 +756,8 @@ let main argv =
                   benchmarkDurationSeconds = Some 30
                   enableTcpTuning = false
                   minBlockTimeMs = 4000
-                  maxBlockTimeMs = 5000 }
+                  maxBlockTimeMs = 5000
+                  runForMinBlockTime = false }
 
             let nCfg = MakeNetworkCfg ctx [] None
             use formation = kube.MakeEmptyFormation(nCfg)
@@ -926,7 +927,8 @@ let main argv =
                                benchmarkDurationSeconds = Some mission.BenchmarkDurationSeconds
                                enableTcpTuning = mission.EnableTcpTuning
                                minBlockTimeMs = mission.MinBlockTimeMs
-                               maxBlockTimeMs = mission.MaxBlockTimeMs }
+                               maxBlockTimeMs = mission.MaxBlockTimeMs
+                               runForMinBlockTime = false }
 
                          allMissions.[m] missionContext
 
diff --git a/src/FSLibrary.Tests/Tests.fs b/src/FSLibrary.Tests/Tests.fs
index a003e6bd..4c0d9581 100644
--- a/src/FSLibrary.Tests/Tests.fs
+++ b/src/FSLibrary.Tests/Tests.fs
@@ -139,7 +139,8 @@ let ctx : MissionContext =
       benchmarkDurationSeconds = None
       enableTcpTuning = false
       minBlockTimeMs = 4000
-      maxBlockTimeMs = 5000 }
+      maxBlockTimeMs = 5000
+      runForMinBlockTime = false }
 
 let netdata = __SOURCE_DIRECTORY__ + "/../../../data/public-network-data-2024-08-01.json"
 let pubkeys = __SOURCE_DIRECTORY__ + "/../../../data/tier1keys.json"
diff --git a/src/FSLibrary/MinBlockTimeTest.fs b/src/FSLibrary/MinBlockTimeTest.fs
index 877f717e..2092c609 100644
--- a/src/FSLibrary/MinBlockTimeTest.fs
+++ b/src/FSLibrary/MinBlockTimeTest.fs
@@ -84,6 +84,7 @@ let minBlockTimeTest (context: MissionContext) (baseLoadGen: LoadGen) (setupCfg:
 
     let context =
         { context with
+              runForMinBlockTime = true
               genesisTestAccountCount = Some(context.genesisTestAccountCount |> Option.defaultValue 100000)
               numPregeneratedTxs =
                   if baseLoadGen.mode = PayPregenerated then
diff --git a/src/FSLibrary/StellarCoreCfg.fs b/src/FSLibrary/StellarCoreCfg.fs
index 1e6f4cbf..2978bb80 100644
--- a/src/FSLibrary/StellarCoreCfg.fs
+++ b/src/FSLibrary/StellarCoreCfg.fs
@@ -226,6 +226,9 @@ type StellarCoreCfg =
         t.Add("COMMANDS", logLevelCommands) |> ignore
         t.Add("CATCHUP_COMPLETE", self.catchupMode = CatchupComplete) |> ignore
 
+        if self.network.missionContext.runForMinBlockTime then
+            t.Add("TESTING_IGNORE_LEDGER_TIME_UPGRADE_BOUNDS", true) |> ignore
+
         match self.network.missionContext.runForMaxTps with
         | Some "classic" ->
             t.Add("TESTING_MAX_CLASSIC_BYTE_ALLOWANCE", 1024 * 1024 * 9) |> ignore
diff --git a/src/FSLibrary/StellarMissionContext.fs b/src/FSLibrary/StellarMissionContext.fs
index 53bbda95..0bb339ae 100644
--- a/src/FSLibrary/StellarMissionContext.fs
+++ b/src/FSLibrary/StellarMissionContext.fs
@@ -134,4 +134,5 @@ type MissionContext =
       benchmarkDurationSeconds: int option
       enableTcpTuning: bool
       minBlockTimeMs: int
-      maxBlockTimeMs: int }
+      maxBlockTimeMs: int
+      runForMinBlockTime: bool }