#
# This file contains implementations of the LLDB display panes in VIM
#
# The most generic way to define a new window is to inherit from VimPane
# and to implement:
# - get_content() - returns a string with the pane contents
#
# Optionally, to highlight text, implement:
# - get_highlights() - returns a map
#
# And call:
# - define_highlight(unique_name, colour)
# at some point in the constructor.
#
#
# If the pane shows some key-value data that is in the context of a
# single frame, inherit from FrameKeyValuePane and implement:
# - get_frame_content(self, SBFrame frame)
#
#
# If the pane presents some information that can be retrieved with
# a simple LLDB command while the subprocess is stopped, inherit
# from StoppedCommandPane and call:
# - self.setCommand(command, command_args)
# at some point in the constructor.
#
# Optionally, you can implement:
# - get_selected_line()
# to highlight a selected line and place the cursor there.
#
#
# FIXME: implement WatchlistPane to displayed watched expressions
# FIXME: define interface for interactive panes, like catching enter
#        presses to change selected frame/thread...
#

import lldb
import vim

import sys

# ==============================================================
# Get the description of an lldb object or None if not available
# ==============================================================

# Shamelessly copy/pasted from lldbutil.py in the test suite


def get_description(obj, option=None):
    """Calls lldb_obj.GetDescription() and returns a string, or None.

    For SBTarget, SBBreakpointLocation, and SBWatchpoint lldb objects, an extra
    option can be passed in to describe the detailed level of description
    desired:
        o lldb.eDescriptionLevelBrief
        o lldb.eDescriptionLevelFull
        o lldb.eDescriptionLevelVerbose
    """
    method = getattr(obj, 'GetDescription')
    if not method:
        return None
    tuple = (lldb.SBTarget, lldb.SBBreakpointLocation, lldb.SBWatchpoint)
    if isinstance(obj, tuple):
        if option is None:
            option = lldb.eDescriptionLevelBrief

    stream = lldb.SBStream()
    if option is None:
        success = method(stream)
    else:
        success = method(stream, option)
    if not success:
        return None
    return stream.GetData()


def get_selected_thread(target):
    """ Returns a tuple with (thread, error) where thread == None if error occurs """
    process = target.GetProcess()
    if process is None or not process.IsValid():
        return (None, VimPane.MSG_NO_PROCESS)

    thread = process.GetSelectedThread()
    if thread is None or not thread.IsValid():
        return (None, VimPane.MSG_NO_THREADS)
    return (thread, "")


def get_selected_frame(target):
    """ Returns a tuple with (frame, error) where frame == None if error occurs """
    (thread, error) = get_selected_thread(target)
    if thread is None:
        return (None, error)

    frame = thread.GetSelectedFrame()
    if frame is None or not frame.IsValid():
        return (None, VimPane.MSG_NO_FRAME)
    return (frame, "")


def _cmd(cmd):
    vim.command("call confirm('%s')" % cmd)
    vim.command(cmd)


def move_cursor(line, col=0):
    """ moves cursor to specified line and col """
    cw = vim.current.window
    if cw.cursor[0] != line:
        vim.command("execute \"normal %dgg\"" % line)


def winnr():
    """ Returns currently selected window number """
    return int(vim.eval("winnr()"))


def bufwinnr(name):
    """ Returns window number corresponding with buffer name """
    return int(vim.eval("bufwinnr('%s')" % name))


def goto_window(nr):
    """ go to window number nr"""
    if nr != winnr():
        vim.command(str(nr) + ' wincmd w')


def goto_next_window():
    """ go to next window. """
    vim.command('wincmd w')
    return (winnr(), vim.current.buffer.name)


def goto_previous_window():
    """ go to previously selected window """
    vim.command("execute \"normal \\<c-w>p\"")


def have_gui():
    """ Returns True if vim is in a gui (Gvim/MacVim), False otherwise. """
    return int(vim.eval("has('gui_running')")) == 1


class PaneLayout(object):
    """ A container for a (vertical) group layout of VimPanes """

    def __init__(self):
        self.panes = {}

    def havePane(self, name):
        """ Returns true if name is a registered pane, False otherwise """
        return name in self.panes

    def prepare(self, panes=[]):
        """ Draw panes on screen. If empty list is provided, show all. """

        # If we can't select a window contained in the layout, we are doing a
        # first draw
        first_draw = not self.selectWindow(True)
        did_first_draw = False

        # Prepare each registered pane
        for name in self.panes:
            if name in panes or len(panes) == 0:
                if first_draw:
                    # First window in layout will be created with :vsp, and
                    # closed later
                    vim.command(":vsp")
                    first_draw = False
                    did_first_draw = True
                self.panes[name].prepare()

        if did_first_draw:
            # Close the split window
            vim.command(":q")

        self.selectWindow(False)

    def contains(self, bufferName=None):
        """ Returns True if window with name bufferName is contained in the layout, False otherwise.
            If bufferName is None, the currently selected window is checked.
        """
        if not bufferName:
            bufferName = vim.current.buffer.name

        for p in self.panes:
            if bufferName is not None and bufferName.endswith(p):
                return True
        return False

    def selectWindow(self, select_contained=True):
        """ Selects a window contained in the layout (if select_contained = True) and returns True.
            If select_contained = False, a window that is not contained is selected. Returns False
            if no group windows can be selected.
        """
        if select_contained == self.contains():
            # Simple case: we are already selected
            return True

        # Otherwise, switch to next window until we find a contained window, or
        # reach the first window again.
        first = winnr()
        (curnum, curname) = goto_next_window()

        while not select_contained == self.contains(
                curname) and curnum != first:
            (curnum, curname) = goto_next_window()

        return self.contains(curname) == select_contained

    def hide(self, panes=[]):
        """ Hide panes specified. If empty list provided, hide all. """
        for name in self.panes:
            if name in panes or len(panes) == 0:
                self.panes[name].destroy()

    def registerForUpdates(self, p):
        self.panes[p.name] = p

    def update(self, target, controller):
        for name in self.panes:
            self.panes[name].update(target, controller)


class VimPane(object):
    """ A generic base class for a pane that displays stuff """
    CHANGED_VALUE_HIGHLIGHT_NAME_GUI = 'ColorColumn'
    CHANGED_VALUE_HIGHLIGHT_NAME_TERM = 'lldb_changed'
    CHANGED_VALUE_HIGHLIGHT_COLOUR_TERM = 'darkred'

    SELECTED_HIGHLIGHT_NAME_GUI = 'Cursor'
    SELECTED_HIGHLIGHT_NAME_TERM = 'lldb_selected'
    SELECTED_HIGHLIGHT_COLOUR_TERM = 'darkblue'

    MSG_NO_TARGET = "Target does not exist."
    MSG_NO_PROCESS = "Process does not exist."
    MSG_NO_THREADS = "No valid threads."
    MSG_NO_FRAME = "No valid frame."

    # list of defined highlights, so we avoid re-defining them
    highlightTypes = []

    def __init__(self, owner, name, open_below=False, height=3):
        self.owner = owner
        self.name = name
        self.buffer = None
        self.maxHeight = 20
        self.openBelow = open_below
        self.height = height
        self.owner.registerForUpdates(self)

    def isPrepared(self):
        """ check window is OK """
        if self.buffer is None or len(
                dir(self.buffer)) == 0 or bufwinnr(self.name) == -1:
            return False
        return True

    def prepare(self, method='new'):
        """ check window is OK, if not then create """
        if not self.isPrepared():
            self.create(method)

    def on_create(self):
        pass

    def destroy(self):
        """ destroy window """
        if self.buffer is None or len(dir(self.buffer)) == 0:
            return
        vim.command('bdelete ' + self.name)

    def create(self, method):
        """ create window """

        if method != 'edit':
            belowcmd = "below" if self.openBelow else ""
            vim.command('silent %s %s %s' % (belowcmd, method, self.name))
        else:
            vim.command('silent %s %s' % (method, self.name))

        self.window = vim.current.window

        # Set LLDB pane options
        vim.command("setlocal buftype=nofile")  # Don't try to open a file
        vim.command("setlocal noswapfile")     # Don't use a swap file
        vim.command("set nonumber")            # Don't display line numbers
        # vim.command("set nowrap")              # Don't wrap text

        # Save some parameters and reference to buffer
        self.buffer = vim.current.buffer
        self.width = int(vim.eval("winwidth(0)"))
        self.height = int(vim.eval("winheight(0)"))

        self.on_create()
        goto_previous_window()

    def update(self, target, controller):
        """ updates buffer contents """
        self.target = target
        if not self.isPrepared():
            # Window is hidden, or otherwise not ready for an update
            return

        original_cursor = self.window.cursor

        # Select pane
        goto_window(bufwinnr(self.name))

        # Clean and update content, and apply any highlights.
        self.clean()

        if self.write(self.get_content(target, controller)):
            self.apply_highlights()

            cursor = self.get_selected_line()
            if cursor is None:
                # Place the cursor at its original position in the window
                cursor_line = min(original_cursor[0], len(self.buffer))
                cursor_col = min(
                    original_cursor[1], len(
                        self.buffer[
                            cursor_line - 1]))
            else:
                # Place the cursor at the location requested by a VimPane
                # implementation
                cursor_line = min(cursor, len(self.buffer))
                cursor_col = self.window.cursor[1]

            self.window.cursor = (cursor_line, cursor_col)

        goto_previous_window()

    def get_selected_line(self):
        """ Returns the line number to move the cursor to, or None to leave
            it where the user last left it.
            Subclasses implement this to define custom behaviour.
        """
        return None

    def apply_highlights(self):
        """ Highlights each set of lines in  each highlight group """
        highlights = self.get_highlights()
        for highlightType in highlights:
            lines = highlights[highlightType]
            if len(lines) == 0:
                continue

            cmd = 'match %s /' % highlightType
            lines = ['\%' + '%d' % line + 'l' for line in lines]
            cmd += '\\|'.join(lines)
            cmd += '/'
            vim.command(cmd)

    def define_highlight(self, name, colour):
        """ Defines highlihght """
        if name in VimPane.highlightTypes:
            # highlight already defined
            return

        vim.command(
            "highlight %s ctermbg=%s guibg=%s" %
            (name, colour, colour))
        VimPane.highlightTypes.append(name)

    def write(self, msg):
        """ replace buffer with msg"""
        self.prepare()

        msg = str(msg.encode("utf-8", "replace")).split('\n')
        try:
            self.buffer.append(msg)
            vim.command("execute \"normal ggdd\"")
        except vim.error:
            # cannot update window; happens when vim is exiting.
            return False

        move_cursor(1, 0)
        return True

    def clean(self):
        """ clean all datas in buffer """
        self.prepare()
        vim.command(':%d')
        #self.buffer[:] = None

    def get_content(self, target, controller):
        """ subclasses implement this to provide pane content """
        assert(0 and "pane subclass must implement this")
        pass

    def get_highlights(self):
        """ Subclasses implement this to provide pane highlights.
            This function is expected to return a map of:
              { highlight_name ==> [line_number, ...], ... }
        """
        return {}


class FrameKeyValuePane(VimPane):

    def __init__(self, owner, name, open_below):
        """ Initialize parent, define member variables, choose which highlight
            to use based on whether or not we have a gui (MacVim/Gvim).
        """

        VimPane.__init__(self, owner, name, open_below)

        # Map-of-maps key/value history { frame --> { variable_name,
        # variable_value } }
        self.frameValues = {}

        if have_gui():
            self.changedHighlight = VimPane.CHANGED_VALUE_HIGHLIGHT_NAME_GUI
        else:
            self.changedHighlight = VimPane.CHANGED_VALUE_HIGHLIGHT_NAME_TERM
            self.define_highlight(VimPane.CHANGED_VALUE_HIGHLIGHT_NAME_TERM,
                                  VimPane.CHANGED_VALUE_HIGHLIGHT_COLOUR_TERM)

    def format_pair(self, key, value, changed=False):
        """ Formats a key/value pair. Appends a '*' if changed == True """
        marker = '*' if changed else ' '
        return "%s %s = %s\n" % (marker, key, value)

    def get_content(self, target, controller):
        """ Get content for a frame-aware pane. Also builds the list of lines that
            need highlighting (i.e. changed values.)
        """
        if target is None or not target.IsValid():
            return VimPane.MSG_NO_TARGET

        self.changedLines = []

        (frame, err) = get_selected_frame(target)
        if frame is None:
            return err

        output = get_description(frame)
        lineNum = 1

        # Retrieve the last values displayed for this frame
        frameId = get_description(frame.GetBlock())
        if frameId in self.frameValues:
            frameOldValues = self.frameValues[frameId]
        else:
            frameOldValues = {}

        # Read the frame variables
        vals = self.get_frame_content(frame)
        for (key, value) in vals:
            lineNum += 1
            if len(frameOldValues) == 0 or (
                    key in frameOldValues and frameOldValues[key] == value):
                output += self.format_pair(key, value)
            else:
                output += self.format_pair(key, value, True)
                self.changedLines.append(lineNum)

        # Save values as oldValues
        newValues = {}
        for (key, value) in vals:
            newValues[key] = value
        self.frameValues[frameId] = newValues

        return output

    def get_highlights(self):
        ret = {}
        ret[self.changedHighlight] = self.changedLines
        return ret


class LocalsPane(FrameKeyValuePane):
    """ Pane that displays local variables """

    def __init__(self, owner, name='locals'):
        FrameKeyValuePane.__init__(self, owner, name, open_below=True)

        # FIXME: allow users to customize display of args/locals/statics/scope
        self.arguments = True
        self.show_locals = True
        self.show_statics = True
        self.show_in_scope_only = True

    def format_variable(self, var):
        """ Returns a Tuple of strings "(Type) Name", "Value" for SBValue var """
        val = var.GetValue()
        if val is None:
            # If the value is too big, SBValue.GetValue() returns None; replace
            # with ...
            val = "..."

        return ("(%s) %s" % (var.GetTypeName(), var.GetName()), "%s" % val)

    def get_frame_content(self, frame):
        """ Returns list of key-value pairs of local variables in frame """
        vals = frame.GetVariables(self.arguments,
                                  self.show_locals,
                                  self.show_statics,
                                  self.show_in_scope_only)
        return [self.format_variable(x) for x in vals]


class RegistersPane(FrameKeyValuePane):
    """ Pane that displays the contents of registers """

    def __init__(self, owner, name='registers'):
        FrameKeyValuePane.__init__(self, owner, name, open_below=True)

    def format_register(self, reg):
        """ Returns a tuple of strings ("name", "value") for SBRegister reg. """
        name = reg.GetName()
        val = reg.GetValue()
        if val is None:
            val = "..."
        return (name, val.strip())

    def get_frame_content(self, frame):
        """ Returns a list of key-value pairs ("name", "value") of registers in frame """

        result = []
        for register_sets in frame.GetRegisters():
            # hack the register group name into the list of registers...
            result.append((" = = %s =" % register_sets.GetName(), ""))

            for reg in register_sets:
                result.append(self.format_register(reg))
        return result


class CommandPane(VimPane):
    """ Pane that displays the output of an LLDB command """

    def __init__(self, owner, name, open_below, process_required=True):
        VimPane.__init__(self, owner, name, open_below)
        self.process_required = process_required

    def setCommand(self, command, args=""):
        self.command = command
        self.args = args

    def get_content(self, target, controller):
        output = ""
        if not target:
            output = VimPane.MSG_NO_TARGET
        elif self.process_required and not target.GetProcess():
            output = VimPane.MSG_NO_PROCESS
        else:
            (success, output) = controller.getCommandOutput(
                self.command, self.args)
        return output


class StoppedCommandPane(CommandPane):
    """ Pane that displays the output of an LLDB command when the process is
        stopped; otherwise displays process status. This class also implements
        highlighting for a single line (to show a single-line selected entity.)
    """

    def __init__(self, owner, name, open_below):
        """ Initialize parent and define highlight to use for selected line. """
        CommandPane.__init__(self, owner, name, open_below)
        if have_gui():
            self.selectedHighlight = VimPane.SELECTED_HIGHLIGHT_NAME_GUI
        else:
            self.selectedHighlight = VimPane.SELECTED_HIGHLIGHT_NAME_TERM
            self.define_highlight(VimPane.SELECTED_HIGHLIGHT_NAME_TERM,
                                  VimPane.SELECTED_HIGHLIGHT_COLOUR_TERM)

    def get_content(self, target, controller):
        """ Returns the output of a command that relies on the process being stopped.
            If the process is not in 'stopped' state, the process status is returned.
        """
        output = ""
        if not target or not target.IsValid():
            output = VimPane.MSG_NO_TARGET
        elif not target.GetProcess() or not target.GetProcess().IsValid():
            output = VimPane.MSG_NO_PROCESS
        elif target.GetProcess().GetState() == lldb.eStateStopped:
            (success, output) = controller.getCommandOutput(
                self.command, self.args)
        else:
            (success, output) = controller.getCommandOutput("process", "status")
        return output

    def get_highlights(self):
        """ Highlight the line under the cursor. Users moving the cursor has
            no effect on the selected line.
        """
        ret = {}
        line = self.get_selected_line()
        if line is not None:
            ret[self.selectedHighlight] = [line]
            return ret
        return ret

    def get_selected_line(self):
        """ Subclasses implement this to control where the cursor (and selected highlight)
            is placed.
        """
        return None


class DisassemblyPane(CommandPane):
    """ Pane that displays disassembly around PC """

    def __init__(self, owner, name='disassembly'):
        CommandPane.__init__(self, owner, name, open_below=True)

        # FIXME: let users customize the number of instructions to disassemble
        self.setCommand("disassemble", "-c %d -p" % self.maxHeight)


class ThreadPane(StoppedCommandPane):
    """ Pane that displays threads list """

    def __init__(self, owner, name='threads'):
        StoppedCommandPane.__init__(self, owner, name, open_below=False)
        self.setCommand("thread", "list")

# FIXME: the function below assumes threads are listed in sequential order,
#        which turns out to not be the case. Highlighting of selected thread
#        will be disabled until this can be fixed. LLDB prints a '*' anyways
#        beside the selected thread, so this is not too big of a problem.
#  def get_selected_line(self):
#    """ Place the cursor on the line with the selected entity.
#        Subclasses should override this to customize selection.
#        Formula: selected_line = selected_thread_id + 1
#    """
#    (thread, err) = get_selected_thread(self.target)
#    if thread is None:
#      return None
#    else:
#      return thread.GetIndexID() + 1


class BacktracePane(StoppedCommandPane):
    """ Pane that displays backtrace """

    def __init__(self, owner, name='backtrace'):
        StoppedCommandPane.__init__(self, owner, name, open_below=False)
        self.setCommand("bt", "")

    def get_selected_line(self):
        """ Returns the line number in the buffer with the selected frame.
            Formula: selected_line = selected_frame_id + 2
            FIXME: the above formula hack does not work when the function return
                   value is printed in the bt window; the wrong line is highlighted.
        """

        (frame, err) = get_selected_frame(self.target)
        if frame is None:
            return None
        else:
            return frame.GetFrameID() + 2


class BreakpointsPane(CommandPane):

    def __init__(self, owner, name='breakpoints'):
        super(
            BreakpointsPane,
            self).__init__(
            owner,
            name,
            open_below=False,
            process_required=False)
        self.setCommand("breakpoint", "list")