from board import Board

class Printer(object):
    ERASE_CHAR = ' '
    EMPTY_CHAR = ' '

    def __init__(self):
        self.__boards__ = []
        self.__wide__ = 10
        self.__tall__ = 6

    def __add_board__(self, board):
        # We may need to verify if its a printable board
        self.__boards__.append(board)

    def __get_last_filled_board_position__(
        self, index_j, index_i, initial_board_index = None
    ):
        if initial_board_index is None:
            initial_board_index = len(self.__boards__) - 1

        # Iterate boards from last to first
        for board_index in range(initial_board_index, -1, -1):
            board_area = self.__boards__[board_index].area()
            if board_area[index_i][index_j] is not None:
                return board_area[index_i][index_j]

        return Printer.EMPTY_CHAR

    def __extract_last_filled_board_position__(
        self, index_j, index_i, initial_board_index = None
    ):
        if initial_board_index is None:
            initial_board_index = len(self.__boards__) - 1

        # Iterate boards from last to first
        for board_index in range(initial_board_index, -1, -1):
            board_area = self.__boards__[board_index].area()
            if board_area[index_i][index_j] is not None:
                char = board_area[index_i][index_j]
                self.__boards__[board_index].clear_position(index_j, index_i)
                return char

        return None

    def draw_rectangle(self, char, left, top, right, bottom):
        # Each draw will create a new board
        board = Board(self.__wide__, self.__tall__)
        board.fill_area(char, left, top, right, bottom)
        self.__add_board__(board)

    def erase_area(self, left, top, right, bottom):
        for index_i in range(top, bottom + 1):
            for index_j in range(left, right + 1):
                for board in self.__boards__:
                    board.clear_position(index_j, index_i)

    def print_canvas(self):
        x_axis = ['{0}'.format(index_j) for index_j in range(self.__wide__)]
        print('  ' + ' '.join(x_axis))

        for index_i in range(self.__tall__):
            # Y axis
            row = '{0} '.format(index_i)
            for index_j in range(self.__wide__):
                row += self.__get_last_filled_board_position__(index_j, index_i)
                row += ' '
            print(row)

    def drag_and_drop(self, initial_left, initial_top, final_left, final_top):
        board = Board(self.__wide__, self.__tall__)

        for index_i in range(initial_top, self.__tall__):
            for index_j in range(initial_left, self.__wide__):
                char = self.__extract_last_filled_board_position__(
                    index_j, index_i
                )

                if char is None:
                    continue

                try:
                    left = index_j + final_left - initial_left
                    top = index_i + final_top - initial_top
                    board.fill_position(char, left, top)
                except:
                    pass

        self.__add_board__(board)

    def bring_to_front(self, left, top, right, bottom):
        board = Board(self.__wide__, self.__tall__)

        for index_i in range(top, bottom + 1):
            for index_j in range(left, right + 1):
                char = self.__extract_last_filled_board_position__(
                    index_j, index_i, initial_board_index=len(self.__boards__) - 2
                )

                if char is None:
                    self.__boards__[-1].clear_position(index_j, index_i)
                else:
                    board.fill_position(char, index_j, index_i)

        self.__add_board__(board)