Bitcoin.BlockChain.Chain

In-memory cache for blockchain metadata

blockchain

data Chain

The block-chain as an (inverted) tree.

Note: The Ord instance compares the block hash (it defined only for internal reasons)

Constructors

Chain

Fields

• _chainPrev :: Maybe Chain

  the previous block

• _chainHeader :: !BlockHeader

  the block header

• _chainLocation :: !BlockLocation

  the physical location on the harddisk where this block can be found

• _chainHeight :: !Int

  the height of the block (the genesis block has height 0)

• _chainTotalDiff :: !Double

  the total summed difficulty on this branch

Instances

Eq Chain

Methods

(==) :: Chain -> Chain -> Bool

(/=) :: Chain -> Chain -> Bool

Ord Chain

Methods

compare :: Chain -> Chain -> Ordering

(<) :: Chain -> Chain -> Bool

(<=) :: Chain -> Chain -> Bool

(>) :: Chain -> Chain -> Bool

(>=) :: Chain -> Chain -> Bool

max :: Chain -> Chain -> Chain

min :: Chain -> Chain -> Chain

Show Chain

Methods

showsPrec :: Int -> Chain -> ShowS

show :: Chain -> String

showList :: [Chain] -> ShowS

chainBlockHash :: Chain -> Hash256

chainPrevHash :: Chain -> Hash256

building the chain and related metadata

data ChainTable

BlockChain metadata

Constructors

ChainTable

Fields

• _tablePrev :: !(Map Hash256 Hash256)

  lookup table for the previous block hash (this is somewhat redundant)

• _tableNext :: !(Map Hash256 [Hash256])

  lookup table for the next block(s) hash(es)

• _tableBlock :: !(Map Hash256 Chain)

  lookup table for the blocks

• _tableHeight :: !(Map Hash256 Int)

  reverse lookup table for the longest chain

• _tableLongest :: !(Array Int Chain)

  the longest chain itself

Instances

Show ChainTable

Methods

showsPrec :: Int -> ChainTable -> ShowS

show :: ChainTable -> String

showList :: [ChainTable] -> ShowS

buildChainTable :: IO ChainTable

buildChainTable' :: FilePath -> IO ChainTable

The argument is the block directory

conveniance functions

forAllBlocks_ :: ChainTable -> (Int -> Block (Tx RawScript RawScript) -> IO ()) -> IO ()

Calls a user action for all blocks in the longest chain. The Int is the block height (with the genesis block having height zero).

forAllBlocks :: ChainTable -> (Int -> Block (Tx RawScript RawScript) -> IO a) -> IO [a]

misc helper functions (to be moved to some Misc.XXX modules)

buildMap :: Ord k => (b -> a) -> (b -> a -> a) -> [(k, b)] -> Map k a

sortNub :: Ord a => [a] -> [a]

setNub :: Ord a => [a] -> [a]

forceList_ :: [a] -> ()

unfoldr' :: (b -> Maybe (a, b)) -> b -> [a]