From 805e95210102d036f6f60e8697565fc878feb134 Mon Sep 17 00:00:00 2001 From: KtorZ Date: Wed, 27 Jan 2021 22:29:02 +0100 Subject: [PATCH] temporarily disable test integration migration scenarios Until the endpoints handlers are re-implemented. --- .../Integration/Scenario/API/Byron/Migrations.hs | 15 ++++++++++++++- .../Scenario/API/Shelley/Migrations.hs | 13 ++++++++++++- .../Scenario/API/Shelley/Transactions.hs | 1 + 3 files changed, 27 insertions(+), 2 deletions(-) diff --git a/lib/core-integration/src/Test/Integration/Scenario/API/Byron/Migrations.hs b/lib/core-integration/src/Test/Integration/Scenario/API/Byron/Migrations.hs index e4d400e64fb..7d1486dd265 100644 --- a/lib/core-integration/src/Test/Integration/Scenario/API/Byron/Migrations.hs +++ b/lib/core-integration/src/Test/Integration/Scenario/API/Byron/Migrations.hs @@ -61,7 +61,7 @@ import Data.Text import Data.Word ( Word64 ) import Test.Hspec - ( SpecWith, describe, shouldBe, shouldSatisfy ) + ( SpecWith, describe, pendingWith, shouldBe, shouldSatisfy ) import Test.Hspec.Extra ( it ) import Test.Integration.Framework.DSL @@ -119,6 +119,7 @@ spec = describe "BYRON_MIGRATIONS" $ do \for non-empty wallet calculated fee is > zero." $ \ctx -> forM_ [fixtureRandomWallet, fixtureIcarusWallet] $ \fixtureByronWallet -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." w <- fixtureByronWallet ctx let ep = Link.getMigrationInfo @'Byron w r <- request @ApiWalletMigrationInfo ctx ep Default Empty @@ -132,6 +133,7 @@ spec = describe "BYRON_MIGRATIONS" $ do \Cannot calculate fee for empty wallet." $ \ctx -> forM_ [emptyRandomWallet, emptyIcarusWallet] $ \emptyByronWallet -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." w <- emptyByronWallet ctx let ep = Link.getMigrationInfo @'Byron w r <- request @ApiWalletMigrationInfo ctx ep Default Empty @@ -143,6 +145,7 @@ spec = describe "BYRON_MIGRATIONS" $ do it "BYRON_CALCULATE_02 - \ \Cannot calculate fee for wallet with dust, that cannot be migrated." $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- NOTE -- Special mnemonic for which wallet with dust -- (5 utxo with 60 lovelace) @@ -166,6 +169,7 @@ spec = describe "BYRON_MIGRATIONS" $ do it "BYRON_CALCULATE_03 - \ \Cannot estimate migration for Shelley wallet using Byron endpoint" $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." w <- emptyWallet ctx let ep = Link.getMigrationInfo @'Byron w r <- request @ApiWalletMigrationInfo ctx ep Default Empty @@ -178,6 +182,7 @@ spec = describe "BYRON_MIGRATIONS" $ do ] $ \(walType, destWallet) -> do it ("From wallet type: " ++ walType) $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." --shelley address wShelley <- emptyWallet ctx addrs <- listAddresses @n ctx wShelley @@ -204,6 +209,7 @@ spec = describe "BYRON_MIGRATIONS" $ do ] it "BYRON_MIGRATE_07 - invalid payload, parser error" $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." sourceWallet <- emptyRandomWallet ctx r <- request @[ApiTransaction n] ctx @@ -224,6 +230,7 @@ spec = describe "BYRON_MIGRATIONS" $ do Hspec.it "BYRON_MIGRATE_01 - \ \ migrate a big wallet requiring more than one tx" $ \ctx -> runResourceT @IO $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- NOTE -- Special mnemonic for which 200 legacy funds are attached to in the -- genesis file. @@ -313,6 +320,7 @@ spec = describe "BYRON_MIGRATIONS" $ do \a migration operation removes all funds from the source wallet." $ \ctx -> forM_ [fixtureRandomWallet, fixtureIcarusWallet] $ \fixtureByronWallet -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- Restore a Byron wallet with funds, to act as a source wallet: sourceWallet <- fixtureByronWallet ctx @@ -345,6 +353,7 @@ spec = describe "BYRON_MIGRATIONS" $ do \migrating an empty wallet should fail." $ \ctx -> forM_ [emptyRandomWallet, emptyIcarusWallet] $ \emptyByronWallet -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." sourceWallet <- emptyByronWallet ctx targetWallet <- emptyWallet ctx addrs <- listAddresses @n ctx targetWallet @@ -365,6 +374,7 @@ spec = describe "BYRON_MIGRATIONS" $ do Hspec.it "BYRON_MIGRATE_02 - \ \migrating wallet with dust should fail." $ \ctx -> runResourceT @IO $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- NOTE -- Special mnemonic for which wallet with dust -- (5 utxos with 60 lovelace in total) @@ -408,6 +418,7 @@ spec = describe "BYRON_MIGRATIONS" $ do \actual fee for migration is the same as the predicted fee." $ \ctx -> forM_ [fixtureRandomWallet, fixtureIcarusWallet] $ \fixtureByronWallet -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- Restore a Byron wallet with funds. sourceWallet <- fixtureByronWallet ctx @@ -445,6 +456,7 @@ spec = describe "BYRON_MIGRATIONS" $ do it "BYRON_MIGRATE_04 - migration fails with a wrong passphrase" $ \ctx -> forM_ [fixtureRandomWallet, fixtureIcarusWallet] $ \fixtureByronWallet -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- Restore a Byron wallet with funds, to act as a source wallet: sourceWallet <- fixtureByronWallet ctx @@ -522,6 +534,7 @@ spec = describe "BYRON_MIGRATIONS" $ do testAddressCycling ctx addrNum = forM_ [fixtureRandomWallet, fixtureIcarusWallet] $ \fixtureByronWallet -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- Restore a Byron wallet with funds, to act as a source wallet: sourceWallet <- fixtureByronWallet ctx let originalBalance = diff --git a/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Migrations.hs b/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Migrations.hs index 428536508ad..978c6e0cc8c 100644 --- a/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Migrations.hs +++ b/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Migrations.hs @@ -60,7 +60,7 @@ import Data.Text import Data.Word ( Word64 ) import Test.Hspec - ( SpecWith, describe ) + ( SpecWith, describe, pendingWith ) import Test.Hspec.Expectations.Lifted ( shouldBe, shouldSatisfy ) import Test.Hspec.Extra @@ -117,6 +117,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do it "SHELLEY_CALCULATE_01 - \ \for non-empty wallet calculated fee is > zero." $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." w <- fixtureWallet ctx let ep = Link.getMigrationInfo @'Shelley w r <- request @ApiWalletMigrationInfo ctx ep Default Empty @@ -129,6 +130,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do it "SHELLEY_CALCULATE_02 - \ \Cannot calculate fee for empty wallet." $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." w <- emptyWallet ctx let ep = Link.getMigrationInfo @'Shelley w r <- request @ApiWalletMigrationInfo ctx ep Default Empty @@ -145,6 +147,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do it ("Cannot calculate Shelley migration using wallet: " ++ walType) $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." w <- byronWallet ctx let ep = Link.getMigrationInfo @'Shelley w r <- request @ApiWalletMigrationInfo ctx ep Default Empty @@ -162,6 +165,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do Hspec.it "SHELLEY_MIGRATE_01_big_wallet - \ \ migrate a big wallet requiring more than one tx" $ \ctx -> runResourceT @IO $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- NOTE -- Special mnemonic for which 200 shelley funds are attached to in the @@ -251,6 +255,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do it "SHELLEY_MIGRATE_02 - \ \migrating an empty wallet should fail." $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." sourceWallet <- emptyWallet ctx targetWallet <- emptyWallet ctx addrs <- listAddresses @n ctx targetWallet @@ -271,6 +276,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do Hspec.it "SHELLEY_MIGRATE_02 - \ \migrating wallet with 'dust' (that complies with minUTxOValue) should pass." $ \ctx -> runResourceT @IO $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- NOTE -- Special mnemonic for which wallet has dust -- (10 utxo with 43 ADA) @@ -335,6 +341,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do it "SHELLEY_MIGRATE_03 - \ \actual fee for migration is the same as the predicted fee." $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- Restore a Shelley wallet with funds. sourceWallet <- fixtureWallet ctx @@ -370,6 +377,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do liftIO $ actualFee `shouldBe` predictedFee it "SHELLEY_MIGRATE_04 - migration fails with a wrong passphrase" $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- Restore a Shelley wallet with funds, to act as a source wallet: sourceWallet <- fixtureWallet ctx @@ -391,6 +399,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do it "SHELLEY_MIGRATE_05 - I could migrate to any valid address" $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." --shelley address wShelley <- emptyWallet ctx addrs <- listAddresses @n ctx wShelley @@ -417,6 +426,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do ] it "SHELLEY_MIGRATE_07 - invalid payload, parser error" $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." sourceWallet <- emptyWallet ctx r <- request @[ApiTransaction n] ctx (Link.migrateWallet @'Shelley sourceWallet) @@ -482,6 +492,7 @@ spec = describe "SHELLEY_MIGRATIONS" $ do testAddressCycling addrNum = it ("Migration from Shelley wallet to " ++ show addrNum ++ " addresses") $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled." -- Restore a Shelley wallet with funds, to act as a source wallet: sourceWallet <- fixtureWallet ctx let originalBalance = diff --git a/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Transactions.hs b/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Transactions.hs index 21d19a6e97a..25c9ad05720 100644 --- a/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Transactions.hs +++ b/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Transactions.hs @@ -2632,6 +2632,7 @@ spec = describe "SHELLEY_TRANSACTIONS" $ do ] it "SHELLEY_TX_REDEEM_06b - Can't redeem rewards if utxo = 0 from self" $ \ctx -> runResourceT $ do + liftIO $ pendingWith "Migration endpoints temporarily disabled" (wRewards, mw) <- rewardWallet ctx wOther <- emptyWallet ctx