blockchainGenerators.scala

trait BlockchainElementsGenerator {
  def block : Gen[Block] = for {
    header <- blockHeader
    txs <- Gen.listOfN(randomNumber(10), TransactionGenerators.transactions)
  } yield Block(header, txs)


  def blockHeader : Gen[BlockHeader] = for {
    version <- NumberGenerator.uInt32s
    previousBlockHash <- CryptoGenerators.doubleSha256Digest
    merkleRootHash <- CryptoGenerators.doubleSha256Digest
    time <- NumberGenerator.uInt32s
    nBits <- NumberGenerator.uInt32s
    nonce <- NumberGenerator.uInt32s
  } yield BlockHeader(version, previousBlockHash, merkleRootHash, time, nBits, nonce)

  private def randomNumber(lessThan : Int) : Int = (scala.util.Random.nextInt() % lessThan).abs

}