# Copyright 2011 Peter Arrenbrecht <peter.arrenbrecht@gmail.com>

#                Logilab SA        <contact@logilab.fr>

#                Pierre-Yves David <pierre-yves.david@ens-lyon.org>

#                Patrick Mezard <patrick@mezard.eu>

#

# This software may be used and distributed according to the terms of the

# GNU General Public License version 2 or any later version.

"""logic related to hg evolve command"""

import collections

import re

from mercurial import (

    bookmarks as bookmarksmod,

    cmdutil,

    commands,

    context,

    copies,

    error,

    hg,

    lock as lockmod,

    merge,

    mergeutil,

    node as nodemod,

    obsolete,

    obsutil,

    phases,

    repair,

    scmutil,

    simplemerge,

    util,

)

from mercurial.i18n import _

from . import (

    cmdrewrite,

    compat,

    exthelper,

    rewriteutil,

    state,

    utility,

)

TROUBLES = compat.TROUBLES

shorttemplate = utility.shorttemplate

stacktemplate = utility.stacktemplate

_bookmarksupdater = rewriteutil.bookmarksupdater

sha1re = re.compile(r'\b[0-9a-f]{6,40}\b')

eh = exthelper.exthelper()

mergetoolopts = commands.mergetoolopts

abortmessage = _("see `hg help evolve.interrupted`\n")

def _solveone(ui, repo, ctx, evolvestate, dryrun, confirm,

              progresscb, category, lastsolved=None, stacktmplt=False):

    """Resolve the troubles affecting one revision

    returns a tuple (bool, newnode) where,

        bool: a boolean value indicating whether the instability was solved

        newnode: if bool is True, then the newnode of the resultant commit

                 formed. newnode can be node, when resolution led to no new

                 commit. If bool is False, this is ".".

    """

    displayer = None

    if stacktmplt:

        displayer = compat.changesetdisplayer(ui, repo,

                                              {'template': stacktemplate})

    else:

        displayer = compat.changesetdisplayer(ui, repo,

                                              {'template': shorttemplate})

    wlock = lock = tr = None

    try:

        wlock = repo.wlock()

        lock = repo.lock()

        tr = repo.transaction("evolve")

        if 'orphan' == category:

            result = _solveunstable(ui, repo, ctx, evolvestate, displayer,

                                    dryrun, confirm, progresscb,

                                    lastsolved=lastsolved)

        elif 'phasedivergent' == category:

            result = _solvephasedivergence(ui, repo, ctx, evolvestate,

                                           displayer, dryrun, confirm,

                                           progresscb)

        elif 'contentdivergent' == category:

            result = _solvedivergent(ui, repo, ctx, evolvestate, displayer,

                                     dryrun, confirm, progresscb)

        else:

            assert False, "unknown trouble category: %s" % (category)

        tr.close()

        return result

    finally:

        lockmod.release(tr, lock, wlock)

def _solveunstable(ui, repo, orig, evolvestate, displayer, dryrun=False,

                   confirm=False, progresscb=None, lastsolved=None):

    """ Tries to stabilize the changeset orig which is orphan.

    returns a tuple (bool, newnode) where,

        bool: a boolean value indicating whether the instability was solved

        newnode: if bool is True, then the newnode of the resultant commit

                 formed. newnode can be node, when resolution led to no new

                 commit. If bool is False, this is ".".

    """

    pctx = orig.p1()

    keepbranch = orig.p1().branch() != orig.branch()

    if len(orig.parents()) == 2:

        p1obs = orig.p1().obsolete()

        p2obs = orig.p2().obsolete()

        if not p1obs and p2obs:

            pctx = orig.p2()  # second parent is obsolete ?

            keepbranch = orig.p2().branch() != orig.branch()

        elif not p2obs and p1obs:

            pass

        else:

            # store that we are resolving an orphan merge with both parents

            # obsolete and proceed with first parent

            evolvestate['orphanmerge'] = True

            # we should process the second parent first, so that in case of

            # no-conflicts the first parent is processed later and preserved as

            # first parent

            pctx = orig.p2()

            keepbranch = orig.p2().branch() != orig.branch()

    if not pctx.obsolete():

        ui.warn(_("cannot solve instability of %s, skipping\n") % orig)

        return (False, ".")

    obs = pctx

    newer = obsutil.successorssets(repo, obs.node())

    # search of a parent which is not killed

    while not newer or newer == [()]:

        ui.debug("stabilize target %s is plain dead,"

                 " trying to stabilize on its parent\n" %

                 obs)

        obs = obs.parents()[0]

        newer = obsutil.successorssets(repo, obs.node())

    if len(newer) > 1:

        msg = _("skipping %s: divergent rewriting. can't choose "

                "destination\n") % obs

        ui.write_err(msg)

        return (False, ".")

    targets = newer[0]

    assert targets

    if len(targets) > 1:

        # split target, figure out which one to pick, are they all in line?

        targetrevs = [repo[r].rev() for r in targets]

        roots = repo.revs('roots(%ld)', targetrevs)

        heads = repo.revs('heads(%ld)', targetrevs)

        if len(roots) > 1 or len(heads) > 1:

            cheader = _("ancestor '%s' split over multiple topological"

                        " branches.\nchoose an evolve destination:") % orig

            selectedrev = utility.revselectionprompt(ui, repo, list(heads),

                                                     cheader)

            if selectedrev is None:

                msg = _("could not solve instability, "

                        "ambiguous destination: "

                        "parent split across two branches\n")

                ui.write_err(msg)

                return (False, ".")

            target = repo[selectedrev]

        else:

            target = repo[heads.first()]

    else:

        target = targets[0]

    target = repo[target]

    if not ui.quiet or confirm:

        repo.ui.write(_('move:'), label='evolve.operation')

        displayer.show(orig)

        if lastsolved is None or target != repo[lastsolved]:

            repo.ui.write(_('atop:'))

            displayer.show(target)

    if confirm and ui.prompt('perform evolve? [Ny]', 'n') != 'y':

            raise error.Abort(_('evolve aborted by user'))

    if progresscb:

        progresscb()

    todo = 'hg rebase -r %s -d %s\n' % (orig, target)

    if dryrun:

        repo.ui.write(todo)

        return (False, ".")

    else:

        repo.ui.note(todo)

        if progresscb:

            progresscb()

        try:

            newid = relocate(repo, orig, target, evolvestate, pctx,

                             keepbranch, 'orphan')

            return (True, newid)

        except MergeFailure:

            ops = {'current': orig.node()}

            evolvestate.addopts(ops)

            evolvestate.save()

            raise error.InterventionRequired(_("fix conflicts and see `hg help "

                                               "evolve.interrupted`"))

def _solvephasedivergence(ui, repo, bumped, evolvestate, displayer,

                          dryrun=False, confirm=False, progresscb=None):

    """Stabilize a phase divergent changeset

    returns a tuple (bool, newnode) where,

        bool: a boolean value indicating whether the instability was solved

        newnode: if bool is True, then the newnode of the resultant commit

                 formed. newnode can be node, when resolution led to no new

                 commit. If bool is False, this is ".".

    """

    repo = repo.unfiltered()

    bumped = repo[bumped.rev()]

    # For now we deny bumped merge

    if len(bumped.parents()) > 1:

        msg = _('skipping %s : we do not handle merge yet\n') % bumped

        ui.write_err(msg)

        return (False, ".")

    prec = repo.set('last(allprecursors(%d) and public())', bumped.rev()).next()

    # For now we deny target merge

    if len(prec.parents()) > 1:

        msg = _('skipping: %s: public version is a merge, '

                'this is not handled yet\n') % prec

        ui.write_err(msg)

        return (False, ".")

    if not ui.quiet or confirm:

        repo.ui.write(_('recreate:'), label='evolve.operation')

        displayer.show(bumped)

        repo.ui.write(_('atop:'))

        displayer.show(prec)

    if confirm and ui.prompt('perform evolve? [Ny]', 'n') != 'y':

        raise error.Abort(_('evolve aborted by user'))

    if dryrun:

        todo = 'hg rebase --rev %s --dest %s;\n' % (bumped, prec.p1())

        repo.ui.write(todo)

        repo.ui.write(('hg update %s;\n' % prec))

        repo.ui.write(('hg revert --all --rev %s;\n' % bumped))

        repo.ui.write(('hg commit --msg "%s update to %s"\n' %

                       (TROUBLES['PHASEDIVERGENT'], bumped)))

        return (False, ".")

    if progresscb:

        progresscb()

    tmpctx = bumped

    # Checking for whether the phase-divergent changeset has common parents as

    # it's precursors. Phase-divergent changeset and precursor having different

    # parents is a result of when the changeset is rebased, picked, histedit or

    # evolved or any other operation which can change parent. In such cases,

    # when parents are not same, we first rebase the divergent changeset onto

    # parent or precursor and then perform later steps

    if not list(repo.set('parents(%d) and parents(%d)', bumped.rev(), prec.rev())):

        # Need to rebase the changeset at the right place

        repo.ui.status(

            _('rebasing to destination parent: %s\n') % prec.p1())

        try:

            tmpid = relocate(repo, bumped, prec.p1(), evolvestate,

                             category='phasedivergent')

            if tmpid is not None:

                tmpctx = repo[tmpid]

                obsolete.createmarkers(repo, [(bumped, (tmpctx,))],

                                       operation='evolve')

                evolvestate['temprevs'].append(tmpid)

        except MergeFailure:

            evolvestate['current'] = bumped.hex()

            evolvestate['precursor'] = prec.hex()

            evolvestate.save()

            raise error.InterventionRequired(_("fix conflicts and see `hg help "

                                               "evolve.interrupted`"))

    return _resolvephasedivergent(ui, repo, prec, bumped, tmpctx)

def _resolvephasedivergent(ui, repo, prec, bumped, tmpctx=None):

    tr = repo.currenttransaction()

    assert tr is not None

    bmupdate = _bookmarksupdater(repo, bumped.node(), tr)

    newid = None

    replacementnode = None

    # function to update the bookmark from the rebased changeset to new resolved

    # changeset

    rebasedbmupdate = None

    if tmpctx and tmpctx.node() != bumped.node():

        rebasedbmupdate = _bookmarksupdater(repo, tmpctx.node(), tr)

        bumped = tmpctx

    # Create the new commit context

    repo.ui.status(_('computing new diff\n'))

    files = set()

    copied = copies.pathcopies(prec, bumped)

    precmanifest = prec.manifest().copy()

    # 3.3.2 needs a list.

    # future 3.4 don't detect the size change during iteration

    # this is fishy

    for key, val in list(bumped.manifest().iteritems()):

        precvalue = precmanifest.get(key, None)

        if precvalue is not None:

            del precmanifest[key]

        if precvalue != val:

            files.add(key)

    files.update(precmanifest)  # add missing files

    # commit it

    if files: # something to commit!

        def filectxfn(repo, ctx, path):

            if path in bumped:

                fctx = bumped[path]

                flags = fctx.flags()

                mctx = compat.memfilectx(repo, ctx, fctx, flags, copied, path)

                return mctx

            return None

        text = '%s update to %s:\n\n' % (TROUBLES['PHASEDIVERGENT'], prec)

        text += bumped.description()

        new = context.memctx(repo,

                             parents=[prec.node(), nodemod.nullid],

                             text=text,

                             files=files,

                             filectxfn=filectxfn,

                             user=bumped.user(),

                             date=bumped.date(),

                             extra=bumped.extra())

        newid = repo.commitctx(new)

        replacementnode = newid

    if newid is None:

        obsolete.createmarkers(repo, [(tmpctx, ())], operation='evolve')

        newid = prec.node()

    else:

        phases.retractboundary(repo, tr, bumped.phase(), [newid])

        obsolete.createmarkers(repo, [(tmpctx, (repo[newid],))],

                               flag=obsolete.bumpedfix, operation='evolve')

    bmupdate(newid)

    # if rebased happened, update bookmarks from there too

    if rebasedbmupdate:

        rebasedbmupdate(newid)

    repo.ui.status(_('committed as %s\n') % nodemod.short(newid))

    # reroute the working copy parent to the new changeset

    with repo.dirstate.parentchange():

        repo.dirstate.setparents(newid, nodemod.nullid)

    return (True, replacementnode)

def _solvedivergent(ui, repo, divergent, evolvestate, displayer, dryrun=False,

                    confirm=False, progresscb=None):

    """tries to solve content-divergence of a changeset

    returns a tuple (bool, newnode) where,

        bool: a boolean value indicating whether the instability was solved

        newnode: if bool is True, then the newnode of the resultant commit

                 formed. newnode can be node, when resolution led to no new

                 commit. If bool is False, this is ".".

    """

    repo = repo.unfiltered()

    divergent = repo[divergent.rev()]

    evolvestate['divergent'] = divergent.node()

    # sometimes we will relocate a node in case of different parents and we can

    # encounter conflicts after relocation is done while solving

    # content-divergence and if the user calls `hg evolve --stop`, we need to

    # strip that relocated commit. However if `--all` is passed, we need to

    # reset this value for each content-divergence resolution which we are doing

    # below.

    evolvestate['relocated'] = None

    evolvestate['relocating'] = False

    # in case or relocation we get a new other node, we need to store the old

    # other for purposes like `--abort` or `--stop`

    evolvestate['old-other'] = None

    base, others = divergentdata(divergent)

    # we don't handle split in content-divergence yet

    if len(others) > 1:

        othersstr = "[%s]" % (','.join([str(i) for i in others]))