Fix light token Solana 4 tests

Author: sergeytimoshin

program-tests/compressed-token-test/tests/light_token/approve_revoke.rs

@@ -274,7 +274,18 @@ async fn test_revoke_fails() {
             .await
             .unwrap();
 
-        // Get the valid Light Token account data
+        // Revoke only mutates accounts that have an active delegate. Without a
+        // delegate, wrong-owner data can pass because no external data changes.
+        let delegate = Keypair::new();
+        approve_and_assert(
+            &mut context,
+            delegate.pubkey(),
+            100,
+            "approve_before_wrong_owner_revoke",
+        )
+        .await;
+
+        // Get the valid delegated Light Token account data.
         let valid_account = context
             .rpc
             .get_account(context.token_account_keypair.pubkey())

program-tests/compressed-token-test/tests/light_token/create.rs

@@ -241,11 +241,19 @@ async fn test_create_compressible_token_account_failing() {
     // This will fail during the transfer_lamports_via_cpi call.
     // Error: 1 (InsufficientFunds from system program)
     {
-        // Create a payer with insufficient funds (only enough for tx fees + account creation)
+        // Solana 4 rejects dust transfers to new system accounts, so fund the
+        // poor payer above the zero-data rent floor while keeping it below the
+        // amount required for token-account rent and top-ups.
         let poor_payer = Keypair::new();
+        let poor_payer_lamports = context
+            .rpc
+            .get_minimum_balance_for_rent_exemption(0)
+            .await
+            .unwrap()
+            + 20_000;
         context
             .rpc
-            .airdrop_lamports(&poor_payer.pubkey(), 10000) // Not enough for additional rent
+            .airdrop_lamports(&poor_payer.pubkey(), poor_payer_lamports)
             .await
             .unwrap();
 

program-tests/compressed-token-test/tests/light_token/create_ata.rs

@@ -453,11 +453,19 @@ async fn test_create_ata_failing() {
     // Payer doesn't have enough lamports for rent payment.
     // Error: 1 (InsufficientFunds from system program)
     {
-        // Create a payer with insufficient funds (only enough for tx fees)
+        // Solana 4 rejects dust transfers to new system accounts, so fund the
+        // poor payer above the zero-data rent floor while keeping it below the
+        // amount required for ATA rent and top-ups.
         let poor_payer = solana_sdk::signature::Keypair::new();
+        let poor_payer_lamports = context
+            .rpc
+            .get_minimum_balance_for_rent_exemption(0)
+            .await
+            .unwrap()
+            + 20_000;
         context
             .rpc
-            .airdrop_lamports(&poor_payer.pubkey(), 10000) // Not enough for rent
+            .airdrop_lamports(&poor_payer.pubkey(), poor_payer_lamports)
             .await
             .unwrap();
 

program-tests/compressed-token-test/tests/light_token/functional_ata.rs

@@ -274,8 +274,14 @@ async fn test_create_ata_with_prefunded_lamports() {
     // Derive ATA address
     let ata = derive_token_ata(&owner_pubkey, &context.mint_pubkey);
 
-    // Pre-fund the ATA address with lamports (simulating attacker donation DoS attempt)
-    let prefund_amount = 1_000; // 1000 lamports
+    // Pre-fund the ATA address with enough lamports for Solana 4 to allow the
+    // transfer to create a zero-data system account.
+    let prefund_amount = context
+        .rpc
+        .get_minimum_balance_for_rent_exemption(0)
+        .await
+        .unwrap()
+        + 1_000;
     let transfer_ix =
         solana_system_interface::instruction::transfer(&payer_pubkey, &ata, prefund_amount);
 
@@ -362,8 +368,14 @@ async fn test_create_token_account_with_prefunded_lamports() {
     let payer_pubkey = context.payer.pubkey();
     let token_account_pubkey = context.token_account_keypair.pubkey();
 
-    // Pre-fund the token account address with lamports (simulating attacker donation DoS attempt)
-    let prefund_amount = 1_000; // 1000 lamports
+    // Pre-fund the token account address with enough lamports for Solana 4 to
+    // allow the transfer to create a zero-data system account.
+    let prefund_amount = context
+        .rpc
+        .get_minimum_balance_for_rent_exemption(0)
+        .await
+        .unwrap()
+        + 1_000;
     let transfer_ix = solana_system_interface::instruction::transfer(
         &payer_pubkey,
         &token_account_pubkey,