unikernel/duniverse/ocaml-caqti/testsuite/dune

@@ -0,0 +1,186 @@
+; Generate default file containing DB URIs to test against, if not present.
+
+(rule
+  (targets uris.conf)
+  (mode fallback)
+  (action (write-file %{targets} "sqlite3:test.db?busy_timeout=60000\n")))
+
+(executable
+  (name deps_of_uris)
+  (modules deps_of_uris)
+  (libraries testlib testlib_tls uri))
+
+(rule
+  (target dune.uri-deps-blocking)
+  (deps
+    (:U %{env:CAQTI_TEST_URIS_FILE=uris.conf})
+    (env_var CAQTI_TEST_X509_AUTHENTICATOR))
+  (action
+    ; FIXME: Do we need to work around missing TLS?
+    (with-stdout-to %{target}
+      (run %{dep:deps_of_uris.exe} --profile %{profile} -U %{U}))))
+(rule
+  (target dune.uri-deps-eio)
+  (deps
+    (:U %{env:CAQTI_TEST_URIS_FILE=uris.conf})
+    (env_var CAQTI_TEST_X509_AUTHENTICATOR))
+  (action
+    (with-stdout-to %{target}
+      (run %{dep:deps_of_uris.exe} --profile %{profile} -U %{U}
+           --tls-library caqti-tls-eio))))
+(rule
+  (target dune.uri-deps-lwt)
+  (deps
+    (:U %{env:CAQTI_TEST_URIS_FILE=uris.conf})
+    (env_var CAQTI_TEST_X509_AUTHENTICATOR))
+  (action
+    (with-stdout-to %{target}
+      (run %{dep:deps_of_uris.exe} --profile %{profile} -U %{U}
+           --tls-library caqti-tls-lwt.unix))))
+(rule
+  (target dune.uri-deps-async)
+  (deps
+    (:U %{env:CAQTI_TEST_URIS_FILE=uris.conf})
+    (env_var CAQTI_TEST_X509_AUTHENTICATOR))
+  (action
+    (with-stdout-to %{target}
+      (run %{dep:deps_of_uris.exe} --profile %{profile} -U %{U}
+           --tls-library caqti-tls-async))))
+
+(rule
+ (target dune.uri-deps-miou-unix)
+ (deps
+  (:U %{env:CAQTI_TEST_URIS_FILE=uris.conf})
+  (env_var CAQTI_TEST_X509_AUTHENTICATOR))
+ (action
+  (with-stdout-to
+   %{target}
+   (run
+    %{dep:deps_of_uris.exe}
+    --profile
+    %{profile}
+    -U
+    %{U}
+    --tls-library
+    caqti-tls-miou))))
+
+; The generic testsuite as a library.
+
+(library
+  (name testsuite)
+  (wrapped false)
+  (flags (:standard -alert -caqti_unstable))
+  (modules
+    test_connect
+    test_error_cause
+    test_failure
+    test_parallel
+    test_param
+    test_sql)
+  (libraries caqti caqti.platform ptime.clock.os testlib testlib_tls))
+
+; Instantiations of the testsuite.
+
+(executable
+  (name main_blocking)
+  (modules main_blocking)
+  (libraries
+    caqti caqti.blocking caqti.plugin
+    alcotest testlib testlib_blocking testsuite))
+
+(rule
+  (alias runtest)
+  ; This breaks the scheme of placing tests under the platform packages in order
+  ; to avoid a cyclic with-test dependency.
+  (package caqti-driver-sqlite3)
+  (deps
+    (:test main_blocking.exe)
+    (:U %{env:CAQTI_TEST_URIS_FILE=uris.conf})
+    (include dune.uri-deps-blocking)
+    (env_var CAQTI_TEST_X509_AUTHENTICATOR))
+  (locks /db/testsuite)
+  (action (run %{test} -U %{U})))
+
+(executable
+  (name main_eio_unix)
+  (enabled_if (>= %{ocaml_version} "5.0"))
+  (modules main_eio_unix)
+  (libraries
+    caqti caqti-eio.unix caqti.plugin
+    alcotest eio eio_main mirage-crypto-rng.unix
+    testlib testlib_eio_unix testsuite))
+
+(rule
+  (alias runtest)
+  (package caqti-eio)
+  (enabled_if (>= %{ocaml_version} "5.0"))
+  (deps
+    (:test main_eio_unix.exe)
+    (:U %{env:CAQTI_TEST_URIS_FILE=uris.conf})
+    (include dune.uri-deps-eio)
+    (env_var CAQTI_TEST_X509_AUTHENTICATOR))
+  (locks /db/testsuite)
+  (action (run %{test} -U %{U})))
+
+(executable
+ (name main_miou_unix)
+ (enabled_if
+  (>= %{ocaml_version} "5.0"))
+ (modules main_miou_unix)
+ (libraries
+  caqti
+  caqti-miou.unix
+  caqti.plugin
+  alcotest
+  threads
+  mirage-crypto-rng-miou-unix
+  testlib
+  testlib_miou_unix
+  testsuite))
+
+(rule
+ (alias runtest)
+ (package caqti-miou)
+ (enabled_if
+  (>= %{ocaml_version} "5.0"))
+ (deps
+  (:test main_miou_unix.exe)
+  (:U %{env:CAQTI_TEST_URIS_FILE=uris.conf})
+  (include dune.uri-deps-miou-unix)
+  (env_var CAQTI_TEST_X509_AUTHENTICATOR))
+ (locks /db/testsuite)
+ (action
+  (run %{test} -U %{U})))
+
+(executable
+  (name main_async)
+  (modules main_async)
+  (libraries
+    caqti caqti.platform caqti.plugin caqti-async
+    alcotest-async testlib testlib_async testsuite))
+
+(rule
+  (alias runtest)
+  (package caqti-async)
+  (deps
+    (:test main_async.exe)
+    (:U %{env:CAQTI_TEST_URIS_FILE=uris.conf})
+    (include dune.uri-deps-async)
+    (env_var CAQTI_TEST_X509_AUTHENTICATOR))
+  (locks /db/testsuite)
+  (action (run %{test} -U %{U})))
+
+(executable
+  (name main_lwt_unix)
+  (modules main_lwt_unix)
+  (libraries
+    caqti caqti.platform caqti.plugin
+    caqti-lwt caqti-lwt.unix
+    alcotest-lwt testlib testlib_lwt_unix testsuite))
+
+(rule
+  (alias runtest)
+  (package caqti-lwt)
+  (deps (:test main_lwt_unix.exe) (include dune.uri-deps-lwt) uris.conf)
+  (locks /db/testsuite)
+  (action (run %{test})))