Finalizing tests so that test vectors match Sage outputs

Author: nougzarm

Cargo.toml

@@ -36,7 +36,7 @@ sha2 = "0.10"
 subtle = "2.6.1"
 num-bigint = "0.4.6"
 num-traits = "0.2.19"
-tiny-keccak = { version = "2.0.2", features = ["keccak"] }
+tiny-keccak = { version = "2.0.2", features = ["fips202"] }
 bls12_381 = "0.8.0"
 
 [dev-dependencies]

src/toolbox/sigma/transcript/keccak_transcript.rs

@@ -135,11 +135,11 @@ impl DuplexSpongeInterface for KeccakDuplexSponge {
             }
 
             let chunk_size = usize::min(self.rate - self.squeeze_index, length);
-            output.extend_from_slice(
-                &self.state.state[self.squeeze_index..self.squeeze_index + chunk_size],
-            );
             self.squeeze_index += chunk_size;
             length -= chunk_size;
+            output.extend_from_slice(
+                &self.state.state[self.squeeze_index..self.squeeze_index + chunk_size]
+            );
         }
 
         output

tests/spec/bls12_381.rs

@@ -65,4 +65,10 @@ impl SRandom for G1Projective {
         }
         G1Projective::scalar_from_hex_be(&hex_string).unwrap()
     }
+
+    fn prandom(
+        rng: &mut (impl Rng + CryptoRng)
+    ) -> Self {
+        Self::generator() * Self::srandom(rng)
+    }
 }

tests/spec/custom_schnorr_proof.rs

@@ -83,7 +83,9 @@ where
         }
 
         for response in response.iter().take(scalar_nb) {
-            bytes.extend_from_slice(&G::serialize_scalar(response));
+            let mut scalar_bytes = G::serialize_scalar(response);
+            scalar_bytes.reverse();
+            bytes.extend_from_slice(&scalar_bytes);
         }
         bytes
     }
@@ -119,8 +121,9 @@ where
             let start = point_nb * point_size + i * scalar_size;
             let end = start + scalar_size;
 
-            let slice = &data[start..end];
-            let scalar = G::deserialize_scalar(slice)?;
+            let mut slice = data[start..end].to_vec();
+            slice.reverse();
+            let scalar = G::deserialize_scalar(&slice)?;
             responses.push(scalar);
         }
 

tests/spec/low_level_tests.rs

@@ -18,5 +18,9 @@ pub trait SRandom: Group {
     fn srandom(
         rng: &mut (impl Rng + CryptoRng)
     ) -> Self::Scalar;
+
+    fn prandom(
+        rng: &mut (impl Rng + CryptoRng)
+    ) -> Self;
 }