[WPB-15037] fix flaky test migration to new index

changelog.d/5-internal/stabilize-es-migration-test

@@ -0,0 +1 @@
+Stabilize `index migration` tests by fixing a race on index names.

services/brig/src/Brig/API/Internal.hs

@@ -428,7 +428,7 @@ getVerificationCode uid action = runMaybeT do
 
 internalSearchIndexAPI :: forall r. ServerT BrigIRoutes.ISearchIndexAPI (Handler r)
 internalSearchIndexAPI =
-  Named @"indexRefresh" (NoContent <$ lift (wrapClient Search.refreshIndex))
+  Named @"indexRefresh" (NoContent <$ lift (wrapClient Search.refreshIndexes))
 
 enterpriseLoginApi :: (Member EnterpriseLoginSubsystem r) => ServerT BrigIRoutes.EnterpriseLoginApi (Handler r)
 enterpriseLoginApi =

services/brig/src/Brig/User/Search/Index.hs

@@ -31,7 +31,7 @@ module Brig.User.Search.Index
     createIndex,
     createIndexIfNotPresent,
     resetIndex,
-    refreshIndex,
+    refreshIndexes,
     updateMapping,
 
     -- * Re-exports
@@ -122,10 +122,14 @@ instance MonadHttp IndexIO where
 --------------------------------------------------------------------------------
 -- Administrative
 
-refreshIndex :: (MonadIndexIO m) => m ()
-refreshIndex = liftIndexIO $ do
+-- | Refresh ElasticSearch index and the additional one if it's configured
+-- Only used in tests. In production, the addtional index is used write-only.
+refreshIndexes :: (MonadIndexIO m) => m ()
+refreshIndexes = liftIndexIO $ do
   idx <- asks idxName
   void $ ES.refreshIndex idx
+  mbAddIdx <- asks idxAdditionalName
+  mapM_ ES.refreshIndex mbAddIdx
 
 createIndexIfNotPresent ::
   (MonadIndexIO m) =>