#!/usr/bin/env python

# ------------------------------------------------------------------------------
# Verification Framework
# ------------------------------------------------------------------------------

from __future__ import print_function

import gdb
import re
import sys
import importlib
from time import *
from colorama import *
import arrow

sys.path.append("./test")
import tc
from tc import *

LINE_LENGTH = 80

class Tests():

    def printf(self, string):
        """All writes go to stderr"""
        print (string, file=sys.stderr)

    def print_info(self, string):
        """Prints an info line"""
        self.printf(Fore.CYAN + "INFO    " + Fore.RESET + string + Fore.RESET)

    def print_good(self, string):
        """Prints an good line"""
        self.printf(Fore.GREEN + "GOOD    " + Fore.RESET + string + Fore.RESET)

    def print_error(self, string):
        """Prints an error line"""
        self.printf(Fore.RED + "ERROR    " + Fore.RESET + string + Fore.RESET)

    def print_centre(self, string):
        """Prints something in the centre of the line"""
        count = (LINE_LENGTH - len(string)) / 2
        self.printf ((" " * count) + string)

    def print_header_line(self):
        """Prints a yellow line. Yo"""
        self.printf (Fore.YELLOW + ("*" * LINE_LENGTH) + Fore.RESET)

    def print_header(self, string):
        """Prints a pretty header"""
        self.printf ("")
        self.print_header_line()
        self.print_centre(string)
        self.print_header_line()

    def print_pass(self, tc_name, time):
        """Nice green pass notice"""
        offset = (LINE_LENGTH / 2) - len(tc_name)

        self.printf("")
        self.printf(Fore.GREEN + "    " + tc_name + " - PASS" \
               + (" " * offset) + "CLOCK " + str(time) + Fore.RESET)

    def print_fail(self, tc_name, time):
        """Evil red pass notice"""
        offset = (LINE_LENGTH / 2) - len(tc_name)

        self.printf("")
        self.printf(Fore.RED + "  p  " + tc_name + "- FAIL" \
               + (" " * offset) + "CLOCK " + str(time) + Fore.RESET)

    def print_summary(self, results):
        passes = 0
        for result in results:
            (passed) = result
            if passed:
                passes += 1

        self.print_header("SUMMARY - %d%% PASS"%(100*passes/len(results)))

        for result in results:
            (passed, name, time) = result
            if passed:
                self.print_pass(name, time)
            else:
                self.print_fail(name, time)

        self.print_header("")

    #### GDB

    def __init__(self):
        self.inferior = gdb.selected_inferior()

        # Pagination is not helpful here
        gdb.execute("set pagination off")
        # Connect to our target
        gdb.execute("att 1")
        # Load everything into gdb and run
        gdb.execute("load")
        gdb.execute("b main")
        gdb.execute("run")
        # Stopped at the top of main. Go to tc_main via tc_prelude
        gdb.execute("del 1")
        gdb.execute("b tc_main")
        gdb.execute("set $pc=tc_prelude")
        gdb.execute("c")

    def __del__(self):
        self.print_info("quit")
        gdb.execute("quit")


    def hw_run_tc(self, tc_name, parameters):
        """Runs a test case on hardware"""
        # If we're stopped where we'd expect
        if self.read_variable("($pc == tc_main + 4)"):
            # Write the parameters
            self.write_varible(tc_name+"_params", parameters)
            # Presuming there"s a breakpoint at the top of tc_main
            gdb.execute("set tc_ptr="+tc_name+"+1")
            gdb.execute("c")
            # Test case done. Return results
            return self.read_variable(tc_name+"_results")
        else:
            return None

    #### Read / Write

    def read_variable(self, name):
        gdb.execute("p " + name, to_string=True)
        return gdb.history(0)

    def write_varible(self, name, value):
        pvar = self.read_variable(name)
        self.inferior.write_memory(pvar.address, value)

    #### Test Case
    def run_test_case(self, test_case):
        tc_name = test_case.__class__.__name__
        self.print_header(tc_name)
        fail = False

        start = arrow.now()

        if hasattr(test_case, 'iterations'):
            """This is for test cases that need to be run multiple time to check
            the result is always correct

            """
            for i in range(test_case.iterations):
                params = test_case.get_test()
                result = self.hw_run_tc(tc_name, params)

                if result:
                    if not test_case.is_correct(params, result, self.print_info):
                        fail = True
                else: # No result, Failure
                    fail = True
        else:
            """This is for test cases that only run once or that use a pre-set
            list of cases

            """
            params = test_case.get_test()
            while (params):
                result = self.hw_run_tc(tc_name, params)

                if result:
                    if not test_case.is_correct(params, result, self.print_info):
                        fail = True
                else: # No result, Failure
                    fail = True

                params = test_case.get_test()

        # Teardown testcase if required
        if hasattr(test_case, 'teardown'):
            test_case.teardown()

        # Calculate time taken
        ttime = (arrow.now()-start)

        if not fail:
            self.print_pass(tc_name, ttime)
        else:
            self.print_fail(tc_name, ttime)

        # Return data tuple
        return (not fail, tc_name, ttime)

    def get_testcase_from_name(self, name):
        tc_module = importlib.import_module('tc.'+name)
        return getattr(tc_module, name+'_tc')

    def print_testcases(self):
        for tc_name in tc.__all__:
            self.print_header(tc_name)



# ------------------------------------------------------------------------------
# Entry Point
# ------------------------------------------------------------------------------

if __name__ == '__main__':
    t = Tests()

    # Read in our command file
    with open("./test/.testcommand") as f:
        tc_name = f.readline().strip('\n')

    if tc_name in tc.__all__:
        # If we've been commanded to run a test
         t.run_test_case(t.get_testcase_from_name(tc_name)())

    else:
         # Run all testcases
         for tc_name in tc.__all__:
             t.run_test_case(t.get_testcase_from_name(tc_name)())

    del t