# Copyright (c) 2016, Neil Booth
#
# All rights reserved.
#
# See the file "LICENCE" for information about the copyright
# and warranty status of this software.

'''Transaction-related classes and functions.'''


from collections import namedtuple
import struct

from lib.util import cachedproperty
from lib.hash import double_sha256, hash_to_str


class Tx(namedtuple("Tx", "version inputs outputs locktime")):
    '''Class representing a transaction.'''

    @cachedproperty
    def is_coinbase(self):
        return self.inputs[0].is_coinbase

    # FIXME: add hash as a cached property?

class TxInput(namedtuple("TxInput", "prev_hash prev_idx script sequence")):
    '''Class representing a transaction input.'''

    ZERO = bytes(32)
    MINUS_1 = 4294967295

    @cachedproperty
    def is_coinbase(self):
        return (self.prev_hash == TxInput.ZERO
                and self.prev_idx == TxInput.MINUS_1)

    @cachedproperty
    def script_sig_info(self):
        # No meaning for coinbases
        if self.is_coinbase:
            return None
        return Script.parse_script_sig(self.script)

    def __str__(self):
        script = self.script.hex()
        prev_hash = hash_to_str(self.prev_hash)
        return ("Input({}, {:d}, script={}, sequence={:d})"
                .format(prev_hash, self.prev_idx, script, self.sequence))


class TxOutput(namedtuple("TxOutput", "value pk_script")):
    '''Class representing a transaction output.'''

    @cachedproperty
    def pay_to(self):
        return Script.parse_pk_script(self.pk_script)


class Deserializer(object):
    '''Deserializes blocks into transactions.'''

    def __init__(self, binary):
        assert isinstance(binary, bytes)
        self.binary = binary
        self.cursor = 0

    def read_tx(self):
        return Tx(
            self.read_le_int32(),  # version
            self.read_inputs(),    # inputs
            self.read_outputs(),   # outputs
            self.read_le_uint32()  # locktime
        )

    def read_block(self):
        tx_hashes = []
        txs = []
        tx_count = self.read_varint()
        for n in range(tx_count):
            start = self.cursor
            tx = self.read_tx()
            # Note this hash needs to be reversed for human display
            # For efficiency we store it in the natural serialized order
            tx_hash = double_sha256(self.binary[start:self.cursor])
            tx_hashes.append(tx_hash)
            txs.append(tx)
        return tx_hashes, txs

    def read_inputs(self):
        n = self.read_varint()
        return [self.read_input() for i in range(n)]

    def read_input(self):
        return TxInput(
            self.read_nbytes(32),  # prev_hash
            self.read_le_uint32(), # prev_idx
            self.read_varbytes(),  # script
            self.read_le_uint32()  # sequence
        )

    def read_outputs(self):
        n = self.read_varint()
        return [self.read_output() for i in range(n)]

    def read_output(self):
        value = self.read_le_int64()
        pk_script = self.read_varbytes()
        return TxOutput(value, pk_script)

    def read_nbytes(self, n):
        result = self.binary[self.cursor:self.cursor + n]
        self.cursor += n
        return result

    def read_varbytes(self):
        return self.read_nbytes(self.read_varint())

    def read_varint(self):
        b = self.binary[self.cursor]
        self.cursor += 1
        if b < 253:
            return b
        if b == 253:
            return self.read_le_uint16()
        if b == 254:
            return self.read_le_uint32()
        return self.read_le_uint64()

    def read_le_int32(self):
        return self.read_format('<i')

    def read_le_int64(self):
        return self.read_format('<q')

    def read_le_uint16(self):
        return self.read_format('<H')

    def read_le_uint32(self):
        return self.read_format('<I')

    def read_le_uint64(self):
        return self.read_format('<Q')

    def read_format(self, fmt):
        (result,) = struct.unpack_from(fmt, self.binary, self.cursor)
        self.cursor += struct.calcsize(fmt)
        return result