# Mercurial bookmark support code

#

# Copyright 2008 David Soria Parra <dsp@php.net>

#

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

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

import os

from mercurial.i18n import _

from mercurial.node import hex, bin

from mercurial import encoding, error, util, obsolete, lock as lockmod

import errno

class bmstore(dict):

    """Storage for bookmarks.

    This object should do all bookmark reads and writes, so that it's

    fairly simple to replace the storage underlying bookmarks without

    having to clone the logic surrounding bookmarks.

    This particular bmstore implementation stores bookmarks as

    {hash}\s{name}\n (the same format as localtags) in

    .hg/bookmarks. The mapping is stored as {name: nodeid}.

    This class does NOT handle the "current" bookmark state at this

    time.

    """

    def __init__(self, repo):

        dict.__init__(self)

        self._repo = repo

        try:

            bkfile = self.getbkfile(repo)

            for line in bkfile:

                line = line.strip()

                if not line:

                    continue

                if ' ' not in line:

                    repo.ui.warn(_('malformed line in .hg/bookmarks: %r\n')

                                 % line)

                    continue

                sha, refspec = line.split(' ', 1)

                refspec = encoding.tolocal(refspec)

                try:

                    self[refspec] = repo.changelog.lookup(sha)

                except LookupError:

                    pass

        except IOError, inst:

            if inst.errno != errno.ENOENT:

                raise

    def getbkfile(self, repo):

        bkfile = None

        if 'HG_PENDING' in os.environ:

            try:

                bkfile = repo.vfs('bookmarks.pending')

            except IOError, inst:

                if inst.errno != errno.ENOENT:

                    raise

        if bkfile is None:

            bkfile = repo.vfs('bookmarks')

        return bkfile

    def recordchange(self, tr):

        """record that bookmarks have been changed in a transaction

        The transaction is then responsible for updating the file content."""

        tr.addfilegenerator('bookmarks', ('bookmarks',), self._write,

                            location='plain')

        tr.hookargs['bookmark_moved'] = '1'

    def write(self):

        '''Write bookmarks

        Write the given bookmark => hash dictionary to the .hg/bookmarks file

        in a format equal to those of localtags.

        We also store a backup of the previous state in undo.bookmarks that

        can be copied back on rollback.

        '''

        repo = self._repo

        self._writerepo(repo)

    def _writerepo(self, repo):

        """Factored out for extensibility"""

        if repo._bookmarkcurrent not in self:

            unsetcurrent(repo)

        wlock = repo.wlock()

        try:

            file = repo.vfs('bookmarks', 'w', atomictemp=True)

            self._write(file)

            file.close()

            # touch 00changelog.i so hgweb reloads bookmarks (no lock needed)

            try:

                repo.svfs.utime('00changelog.i', None)

            except OSError:

                pass

        finally:

            wlock.release()

    def _write(self, fp):

        for name, node in self.iteritems():

            fp.write("%s %s\n" % (hex(node), encoding.fromlocal(name)))

def readcurrent(repo):

    '''Get the current bookmark

    If we use gittish branches we have a current bookmark that

    we are on. This function returns the name of the bookmark. It

    is stored in .hg/bookmarks.current

    '''

    mark = None

    try:

        file = repo.vfs('bookmarks.current')

    except IOError, inst:

        if inst.errno != errno.ENOENT:

            raise

        return None

    try:

        # No readline() in osutil.posixfile, reading everything is cheap

        mark = encoding.tolocal((file.readlines() or [''])[0])

        if mark == '' or mark not in repo._bookmarks:

            mark = None

    finally:

        file.close()

    return mark

def setcurrent(repo, mark):

    '''Set the name of the bookmark that we are currently on

    Set the name of the bookmark that we are on (hg update <bookmark>).

    The name is recorded in .hg/bookmarks.current

    '''

    if mark not in repo._bookmarks:

        raise AssertionError('bookmark %s does not exist!' % mark)

    current = repo._bookmarkcurrent

    if current == mark:

        return

    wlock = repo.wlock()

    try:

        file = repo.vfs('bookmarks.current', 'w', atomictemp=True)

        file.write(encoding.fromlocal(mark))

        file.close()

    finally:

        wlock.release()

    repo._bookmarkcurrent = mark

def unsetcurrent(repo):

    wlock = repo.wlock()

    try:

        try:

            repo.vfs.unlink('bookmarks.current')

            repo._bookmarkcurrent = None

        except OSError, inst:

            if inst.errno != errno.ENOENT:

                raise

    finally:

        wlock.release()

def iscurrent(repo, mark=None, parents=None):

    '''Tell whether the current bookmark is also active

    I.e., the bookmark listed in .hg/bookmarks.current also points to a

    parent of the working directory.

    '''

    if not mark:

        mark = repo._bookmarkcurrent

    if not parents:

        parents = [p.node() for p in repo[None].parents()]

    marks = repo._bookmarks

    return (mark in marks and marks[mark] in parents)

def updatecurrentbookmark(repo, oldnode, curbranch):

    try:

        return update(repo, oldnode, repo.branchtip(curbranch))

    except error.RepoLookupError:

        if curbranch == "default": # no default branch!

            return update(repo, oldnode, repo.lookup("tip"))

        else:

            raise util.Abort(_("branch %s not found") % curbranch)

def deletedivergent(repo, deletefrom, bm):

    '''Delete divergent versions of bm on nodes in deletefrom.

    Return True if at least one bookmark was deleted, False otherwise.'''

    deleted = False

    marks = repo._bookmarks

    divergent = [b for b in marks if b.split('@', 1)[0] == bm.split('@', 1)[0]]

    for mark in divergent:

        if mark == '@' or '@' not in mark:

            # can't be divergent by definition

            continue

        if mark and marks[mark] in deletefrom:

            if mark != bm:

                del marks[mark]

                deleted = True

    return deleted

def calculateupdate(ui, repo, checkout):

    '''Return a tuple (targetrev, movemarkfrom) indicating the rev to

    check out and where to move the active bookmark from, if needed.'''

    movemarkfrom = None

    if checkout is None:

        curmark = repo._bookmarkcurrent

        if iscurrent(repo):

            movemarkfrom = repo['.'].node()

        elif curmark:

            ui.status(_("updating to active bookmark %s\n") % curmark)

            checkout = curmark

    return (checkout, movemarkfrom)

def update(repo, parents, node):

    deletefrom = parents

    marks = repo._bookmarks

    update = False

    cur = repo._bookmarkcurrent

    if not cur:

        return False

    if marks[cur] in parents:

        new = repo[node]

        divs = [repo[b] for b in marks

                if b.split('@', 1)[0] == cur.split('@', 1)[0]]

        anc = repo.changelog.ancestors([new.rev()])

        deletefrom = [b.node() for b in divs if b.rev() in anc or b == new]

        if validdest(repo, repo[marks[cur]], new):

            marks[cur] = new.node()

            update = True

    if deletedivergent(repo, deletefrom, cur):

        update = True

    if update:

        marks.write()

    return update

def listbookmarks(repo):

    # We may try to list bookmarks on a repo type that does not

    # support it (e.g., statichttprepository).

    marks = getattr(repo, '_bookmarks', {})

    d = {}

    hasnode = repo.changelog.hasnode

    for k, v in marks.iteritems():

        # don't expose local divergent bookmarks

        if hasnode(v) and ('@' not in k or k.endswith('@')):

            d[k] = hex(v)

    return d

def pushbookmark(repo, key, old, new):

    w = l = tr = None

    try:

        w = repo.wlock()

        l = repo.lock()

        tr = repo.transaction('bookmarks')

        marks = repo._bookmarks

        existing = hex(marks.get(key, ''))

        if existing != old and existing != new:

            return False

        if new == '':

            del marks[key]

        else:

            if new not in repo:

                return False

            marks[key] = repo[new].node()

        marks.recordchange(tr)

        tr.close()

        return True

    finally:

        lockmod.release(tr, l, w)

def compare(repo, srcmarks, dstmarks,

            srchex=None, dsthex=None, targets=None):

    '''Compare bookmarks between srcmarks and dstmarks

    This returns tuple "(addsrc, adddst, advsrc, advdst, diverge,

    differ, invalid)", each are list of bookmarks below:

    :addsrc:  added on src side (removed on dst side, perhaps)

    :adddst:  added on dst side (removed on src side, perhaps)

    :advsrc:  advanced on src side

    :advdst:  advanced on dst side

    :diverge: diverge

    :differ:  changed, but changeset referred on src is unknown on dst

    :invalid: unknown on both side

    :same:    same on both side

    Each elements of lists in result tuple is tuple "(bookmark name,

    changeset ID on source side, changeset ID on destination

    side)". Each changeset IDs are 40 hexadecimal digit string or

    None.

    Changeset IDs of tuples in "addsrc", "adddst", "differ" or

     "invalid" list may be unknown for repo.

    This function expects that "srcmarks" and "dstmarks" return

    changeset ID in 40 hexadecimal digit string for specified

    bookmark. If not so (e.g. bmstore "repo._bookmarks" returning

    binary value), "srchex" or "dsthex" should be specified to convert

    into such form.

    If "targets" is specified, only bookmarks listed in it are

    examined.

    '''

    if not srchex:

        srchex = lambda x: x

    if not dsthex:

        dsthex = lambda x: x

    if targets:

        bset = set(targets)

    else:

        srcmarkset = set(srcmarks)

        dstmarkset = set(dstmarks)

        bset = srcmarkset | dstmarkset

    results = ([], [], [], [], [], [], [], [])

    addsrc = results[0].append

    adddst = results[1].append

    advsrc = results[2].append

    advdst = results[3].append

    diverge = results[4].append

    differ = results[5].append

    invalid = results[6].append

    same = results[7].append

    for b in sorted(bset):

        if b not in srcmarks:

            if b in dstmarks:

                adddst((b, None, dsthex(dstmarks[b])))

            else:

                invalid((b, None, None))

        elif b not in dstmarks:

            addsrc((b, srchex(srcmarks[b]), None))

        else:

            scid = srchex(srcmarks[b])

            dcid = dsthex(dstmarks[b])

            if scid == dcid:

                same((b, scid, dcid))

            elif scid in repo and dcid in repo:

                sctx = repo[scid]

                dctx = repo[dcid]

                if sctx.rev() < dctx.rev():

                    if validdest(repo, sctx, dctx):

                        advdst((b, scid, dcid))

                    else:

                        diverge((b, scid, dcid))

                else:

                    if validdest(repo, dctx, sctx):

                        advsrc((b, scid, dcid))

                    else:

                        diverge((b, scid, dcid))

            else:

                # it is too expensive to examine in detail, in this case

                differ((b, scid, dcid))

    return results

def _diverge(ui, b, path, localmarks, remotenode):

    '''Return appropriate diverged bookmark for specified ``path``

    This returns None, if it is failed to assign any divergent

    bookmark name.

    This reuses already existing one with "@number" suffix, if it

    refers ``remotenode``.

    '''

    if b == '@':

        b = ''

    # try to use an @pathalias suffix

    # if an @pathalias already exists, we overwrite (update) it

    if path.startswith("file:"):

        path = util.url(path).path

    for p, u in ui.configitems("paths"):

        if u.startswith("file:"):

            u = util.url(u).path

        if path == u:

            return '%s@%s' % (b, p)