fix: honor CI override in test-env guard and e2e workflow (fixes #1211)

Author: krystophny

.github/workflows/e2e_pycobertura.yml

@@ -10,6 +10,8 @@ jobs:
     name: Compare FortCov vs Cobertura (gcovr)
     runs-on: ubuntu-latest
     timeout-minutes: 10
+    env:
+      FORTCOV_ALLOW_AUTOTEST: "1"
 
     steps:
       - name: Checkout repository

fpm.toml

@@ -26,3 +26,8 @@ main = "main.f90"
 name = "cli_flags_rejection_minimal"
 source-dir = "test"
 main = "test_cli_flags_rejection_minimal.f90"
+
+[[test]]
+name = "test_env_guard_override"
+source-dir = "test"
+main = "test_test_env_guard_override.f90"

src/utils/runtime/test_env_guard.f90

@@ -18,6 +18,13 @@ function running_under_test_env() result(is_test_env)
 
         is_test_env = .false.
 
+        ! Allow explicit override to enable auto-test/bridge in controlled environments
+        call get_environment_variable('FORTCOV_ALLOW_AUTOTEST', env_value, status=status)
+        if (status == 0 .and. len_trim(env_value) > 0) then
+            is_test_env = .false.
+            return
+        end if
+
         call get_environment_variable('FPM_TEST', env_value, status=status)
         if (status == 0 .and. len_trim(env_value) > 0) then
             is_test_env = .true.
@@ -50,4 +57,3 @@ function running_under_test_env() result(is_test_env)
     end function running_under_test_env
 
 end module test_env_guard
-

test/test_test_env_guard_override.f90

@@ -0,0 +1,42 @@
+program test_test_env_guard_override
+    use iso_fortran_env, only: error_unit
+    use iso_c_binding, only: c_int, c_char
+    use test_env_guard, only: running_under_test_env
+    implicit none
+
+    interface
+        function c_setenv(name, value, overwrite) bind(C, name="setenv") result(ret)
+            import :: c_int, c_char
+            character(kind=c_char), dimension(*) :: name
+            character(kind=c_char), dimension(*) :: value
+            integer(c_int), value :: overwrite
+            integer(c_int) :: ret
+        end function c_setenv
+    end interface
+
+    logical :: is_test
+
+    if (c_setenv('FORTCOV_TEST_MODE' // char(0), '1' // char(0), 1_c_int) /= 0_c_int) then
+        write(error_unit, '(A)') 'Failed to set FORTCOV_TEST_MODE'
+        stop 1
+    end if
+
+    is_test = running_under_test_env()
+    if (.not. is_test) then
+        write(error_unit, '(A)') 'Expected test environment detection to be TRUE'
+        stop 2
+    end if
+
+    if (c_setenv('FORTCOV_ALLOW_AUTOTEST' // char(0), '1' // char(0), 1_c_int) /= 0_c_int) then
+        write(error_unit, '(A)') 'Failed to set FORTCOV_ALLOW_AUTOTEST'
+        stop 3
+    end if
+
+    is_test = running_under_test_env()
+    if (is_test) then
+        write(error_unit, '(A)') 'Override did not bypass test environment guard'
+        stop 4
+    end if
+
+    print *, 'OK: test_env_guard override bypasses test detection when enabled'
+end program test_test_env_guard_override