// Copyright 2017-2018 DERO Project. All rights reserved.
// Use of this source code in any form is governed by RESEARCH license.
// license can be found in the LICENSE file.
// GPG: 0F39 E425 8C65 3947 702A  8234 08B2 0360 A03A 9DE8
//
//
// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY
// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
// MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
// THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
// SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
// INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
// STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF
// THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

package main

import "os"
import "fmt"
import "time"

//import "io/ioutil"
import "testing"

import "path/filepath"

import "github.com/deroproject/derohe/globals"
import "github.com/deroproject/derohe/config"
import "github.com/deroproject/derohe/transaction"
import "github.com/deroproject/derohe/walletapi"
import "github.com/deroproject/derohe/blockchain"

//import "github.com/deroproject/derohe/cryptography/crypto"

// test some consensus rules
func Test_Blockchain_Miniblock_Deviation(t *testing.T) {

	time.Sleep(time.Millisecond)

	walletapi.Initialize_LookupTable(1, 1<<17)

	wsrc_temp_db := filepath.Join(os.TempDir(), "dero_temporary_test_wallet_src.db")
	wdst_temp_db := filepath.Join(os.TempDir(), "dero_temporary_test_wallet_dst.db")

	os.Remove(wsrc_temp_db)
	os.Remove(wdst_temp_db)

	wsrc, err := walletapi.Create_Encrypted_Wallet_From_Recovery_Words(wsrc_temp_db, "QWER", "sequence atlas unveil summon pebbles tuesday beer rudely snake rockets different fuselage woven tagged bested dented vegan hover rapid fawns obvious muppet randomly seasons randomly")
	if err != nil {
		t.Fatalf("Cannot create encrypted wallet, err %s", err)
	}

	wdst, err := walletapi.Create_Encrypted_Wallet_From_Recovery_Words(wdst_temp_db, "QWER", "Dekade Spagat Bereich Radclub Yeti Dialekt Unimog Nomade Anlage Hirte Besitz Märzluft Krabbe Nabel Halsader Chefarzt Hering tauchen Neuerung Reifen Umgang Hürde Alchimie Amnesie Reifen")
	if err != nil {
		t.Fatalf("Cannot create encrypted wallet, err %s", err)
	}

	wgenesis, err := walletapi.Create_Encrypted_Wallet_From_Recovery_Words(wdst_temp_db, "QWER", "perfil lujo faja puma favor pedir detalle doble carbón neón paella cuarto ánimo cuento conga correr dental moneda león donar entero logro realidad acceso doble")
	if err != nil {
		t.Fatalf("Cannot create encrypted wallet, err %s", err)
	}

	// fix genesis tx and genesis tx hash
	genesis_tx := transaction.Transaction{Transaction_Prefix: transaction.Transaction_Prefix{Version: 1, Value: 2012345}}
	copy(genesis_tx.MinerAddress[:], wgenesis.GetAddress().PublicKey.EncodeCompressed())

	config.Testnet.Genesis_Tx = fmt.Sprintf("%x", genesis_tx.Serialize())
	config.Mainnet.Genesis_Tx = fmt.Sprintf("%x", genesis_tx.Serialize())

	genesis_block := blockchain.Generate_Genesis_Block()
	config.Testnet.Genesis_Block_Hash = genesis_block.GetHash()
	config.Mainnet.Genesis_Block_Hash = genesis_block.GetHash()

	chain, rpcserver, _ := simulator_chain_start()
	defer simulator_chain_stop(chain, rpcserver)

	globals.Arguments["--daemon-address"] = rpcport_test

	t.Logf("src %s\n", wsrc.GetAddress())
	t.Logf("dst %s\n", wdst.GetAddress())

	if err := chain.Add_TX_To_Pool(wsrc.GetRegistrationTX()); err != nil {
		t.Fatalf("Cannot add regtx to pool err %s", err)
	}
	if err := chain.Add_TX_To_Pool(wdst.GetRegistrationTX()); err != nil {
		t.Fatalf("Cannot add regtx to pool err %s", err)
	}

	simulator_chain_mineblock(chain, wgenesis.GetAddress(), t) // mine a block at tip

	defer os.Remove(wsrc_temp_db) // cleanup after test
	defer os.Remove(wdst_temp_db) // cleanup after test

	// we do not need wallets any more, start the tests

	cbl_next, _, err := chain.Create_new_miner_block(wgenesis.GetAddress())
	if err != nil {
		panic(err)
	}

	mblside := blockchain.ConvertBlockToMiniblock(*cbl_next.Bl, wgenesis.GetAddress())

	mbl := blockchain.ConvertBlockToMiniblock(*cbl_next.Bl, wgenesis.GetAddress())
	if mbl.PastCount != 1 {
		t.Fatalf("miniblock should have 1 tips but has %d past", mbl.PastCount)
	}
	if len(cbl_next.Bl.MiniBlocks) != 0 {
		t.Fatalf("Expecting %d blocks but have %d", 0, len(cbl_next.Bl.MiniBlocks))
	}

	if err, ok := chain.InsertMiniBlock(mbl); !ok || err != nil {
		t.Fatalf("miniblock should be inserted")
	}

	if cbl_next, _, err = chain.Create_new_miner_block(wgenesis.GetAddress()); err != nil {
		panic(err)
	}

	mbl = blockchain.ConvertBlockToMiniblock(*cbl_next.Bl, wgenesis.GetAddress())
	if mbl.PastCount != 1 {
		t.Fatalf("miniblock should have 1 tips but has %d past", mbl.PastCount)
	}
	if len(cbl_next.Bl.MiniBlocks) != 1 {
		t.Fatalf("Expecting %d blocks but have %d", 1, len(cbl_next.Bl.MiniBlocks))
	}

	if err, ok := chain.InsertMiniBlock(mbl); !ok || err != nil {
		t.Fatalf("miniblock should be inserted")
	}

	if err, ok := chain.InsertMiniBlock(mblside); !ok || err != nil {
		t.Fatalf("miniblock should be inserted")
	}

	if cbl_next, _, err = chain.Create_new_miner_block(wgenesis.GetAddress()); err != nil {
		panic(err)
	}

	//ioutil.WriteFile("/tmp/minidag.dot", []byte(chain.MiniBlocks.Graph()), 0644)

	mbl = blockchain.ConvertBlockToMiniblock(*cbl_next.Bl, wgenesis.GetAddress())
	if mbl.PastCount != 1 {
		t.Fatalf("miniblock should have 1 past but has %d past", mbl.PastCount)
	}
	if len(cbl_next.Bl.MiniBlocks) != 2 {
		t.Fatalf("Expecting %d blocks but have %d", 2, len(cbl_next.Bl.MiniBlocks))
	}

}