ci: test smp server with postgres backend

.github/workflows/build.yml

@@ -13,6 +13,21 @@ jobs:
   build:
     name: build-${{ matrix.os }}-${{ matrix.ghc }}
     runs-on: ${{ matrix.os }}
+
+    services:
+      postgres:
+        image: postgres:15
+        env:
+          POSTGRES_HOST_AUTH_METHOD: trust # Allows passwordless access
+        options: >-
+          --health-cmd pg_isready
+          --health-interval 10s
+          --health-timeout 5s
+          --health-retries 5
+        ports:
+          # Maps tcp port 5432 on service container to the host
+          - 5432:5432
+
     strategy:
       fail-fast: false
       matrix:
@@ -52,6 +67,8 @@ jobs:
         timeout-minutes: 40
         shell: bash
         run: cabal test --test-show-details=direct
+        env:
+          PGHOST: localhost
 
       - name: Prepare binaries
         if: startsWith(github.ref, 'refs/tags/v')

tests/ServerTests.hs

@@ -56,7 +56,7 @@ import Util (removeFileIfExists)
 serverTests :: SpecWith (ATransport, AStoreType)
 serverTests = do
   describe "SMP queues" $ do
-    describe "NEW and KEY commands, SEND messages" testCreateSecure
+    fdescribe "NEW and KEY commands, SEND messages" testCreateSecure
     describe "NEW and SKEY commands" $ do
       testCreateSndSecure
       testSndSecureProhibited

tests/Test.hs

@@ -23,7 +23,7 @@
 import qualified GHC.IO.Exception as IOException
 import NtfServerTests (ntfServerTests)
 import RemoteControl (remoteControlTests)
 import SMPClient (skipOnCI, testServerDBConnectInfo)
 import SMPProxyTests (smpProxyTests)
 import ServerTests
 import Simplex.Messaging.Agent.Store.Postgres.Util (createDBAndUserIfNotExists, dropDatabaseAndUser)
@@ -78,13 +78,12 @@
           describe "Store log tests" storeLogTests
           describe "TRcvQueues tests" tRcvQueuesTests
           describe "Util tests" utilTests
-        skipOnCI $
-          beforeAll_ (dropDatabaseAndUser testServerDBConnectInfo >> createDBAndUserIfNotExists testServerDBConnectInfo)
-            $ afterAll_ (dropDatabaseAndUser testServerDBConnectInfo)
-            -- TODO [postgres] fix store log tests
-            $ xdescribe "SMP server via TLS, postgres+jornal message store" $ do
-                describe "SMP syntax" $ serverSyntaxTests (transport @TLS)
-                before (pure (transport @TLS, ASType SQSPostgres SMSJournal)) serverTests
+        beforeAll_ (dropDatabaseAndUser testServerDBConnectInfo >> createDBAndUserIfNotExists testServerDBConnectInfo)
+          $ afterAll_ (dropDatabaseAndUser testServerDBConnectInfo)
+          -- TODO [postgres] fix store log tests
+          $ describe "SMP server via TLS, postgres+jornal message store" $ do
+              describe "SMP syntax" $ serverSyntaxTests (transport @TLS)
+              before (pure (transport @TLS, ASType SQSPostgres SMSJournal)) serverTests
         describe "SMP server via TLS, jornal message store" $ do
           describe "SMP syntax" $ serverSyntaxTests (transport @TLS)
           before (pure (transport @TLS, ASType SQSMemory SMSJournal)) serverTests