Skip to content

Commit

Permalink
temporarily disable test integration migration scenarios
Browse files Browse the repository at this point in the history 
  Until the endpoints handlers are re-implemented.
  • Loading branch information
@KtorZ
KtorZ committed Jan 27, 2021
1 parent 971cd17 commit 805e952
Show file tree
Hide file tree
Showing 3 changed files with 27 additions and 2 deletions.
15 changes: 14 additions & 1 deletion lib/core-integration/src/Test/Integration/Scenario/API/Byron/Migrations.hs
View file
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand Down Expand Up @@ -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
Expand All @@ -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
Expand All @@ -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)
Expand All @@ -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
Expand All @@ -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
Expand All @@ -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
Expand All @@ -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.
Expand Down Expand Up @@ -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

Expand Down Expand Up @@ -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
Expand All @@ -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)
Expand Down Expand Up @@ -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

Expand Down Expand Up @@ -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

Expand Down Expand Up @@ -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 =
Expand Down
13 changes: 12 additions & 1 deletion lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Migrations.hs
View file
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand Down Expand Up @@ -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
Expand All @@ -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
Expand All @@ -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
Expand All @@ -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
Expand Down Expand Up @@ -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
Expand All @@ -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)
Expand Down Expand Up @@ -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

Expand Down Expand Up @@ -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

Expand All @@ -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
Expand All @@ -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)
Expand Down Expand Up @@ -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 =
Expand Down
1 change: 1 addition & 0 deletions lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Transactions.hs
View file
Original file line number Diff line number Diff line change
Expand Up @@ -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

Expand Down

0 comments on commit 805e952

Please sign in to comment.