"""

dirstate.py - working directory tracking for mercurial

Copyright 2005-2007 Matt Mackall <mpm@selenic.com>

"""

from node import nullid

from i18n import _

import struct, os, stat, util, errno, ignore

import cStringIO, osutil, sys, parsers

_unknown = ('?', 0, 0, 0)

_format = ">cllll"

def _finddirs(path):

    pos = path.rfind('/')

    while pos != -1:

        yield path[:pos]

        pos = path.rfind('/', 0, pos)

def _incdirs(dirs, path):

    for base in _finddirs(path):

        if base in dirs:

            dirs[base] += 1

            return

        dirs[base] = 1

def _decdirs(dirs, path):

    for base in _finddirs(path):

        if dirs[base] > 1:

            dirs[base] -= 1

            return

        del dirs[base]

class dirstate(object):

    def __init__(self, opener, ui, root):

        self._opener = opener

        self._root = root

        self._rootdir = os.path.join(root, '')

        self._dirty = False

        self._dirtypl = False

        self._ui = ui

    def __getattr__(self, name):

        if name == '_map':

            self._read()

            return self._map

        elif name == '_copymap':

            self._read()

            return self._copymap

        elif name == '_foldmap':

            _foldmap = {}

            for name in self._map:

                norm = os.path.normcase(name)

                _foldmap[norm] = name

            self._foldmap = _foldmap

            return self._foldmap

        elif name == '_branch':

            try:

                self._branch = (self._opener("branch").read().strip()

                                or "default")

            except IOError:

                self._branch = "default"

            return self._branch

        elif name == '_pl':

            self._pl = [nullid, nullid]

            try:

                st = self._opener("dirstate").read(40)

                if len(st) == 40:

                    self._pl = st[:20], st[20:40]

            except IOError, err:

                if err.errno != errno.ENOENT: raise

            return self._pl

        elif name == '_dirs':

            dirs = {}

            for f,s in self._map.iteritems():

                if s[0] != 'r':

                    _incdirs(dirs, f)

            self._dirs = dirs

            return self._dirs

        elif name == '_ignore':

            files = [self._join('.hgignore')]

            for name, path in self._ui.configitems("ui"):

                if name == 'ignore' or name.startswith('ignore.'):

                    files.append(os.path.expanduser(path))

            self._ignore = ignore.ignore(self._root, files, self._ui.warn)

            return self._ignore

        elif name == '_slash':

            self._slash = self._ui.configbool('ui', 'slash') and os.sep != '/'

            return self._slash

        elif name == '_checklink':

            self._checklink = util.checklink(self._root)

            return self._checklink

        elif name == '_checkexec':

            self._checkexec = util.checkexec(self._root)

            return self._checkexec

        elif name == '_checkcase':

            self._checkcase = not util.checkcase(self._join('.hg'))

            return self._checkcase

        elif name == 'normalize':

            if self._checkcase:

                self.normalize = self._normalize

            else:

                self.normalize = lambda x, y=False: x

            return self.normalize

        else:

            raise AttributeError(name)

    def _join(self, f):

        # much faster than os.path.join()

        # it's safe because f is always a relative path

        return self._rootdir + f

    def flagfunc(self, fallback):

        if self._checklink:

            if self._checkexec:

                def f(x):

                    p = self._join(x)

                    if os.path.islink(p):

                        return 'l'

                    if util.is_exec(p):

                        return 'x'

                    return ''

                return f

            def f(x):

                if os.path.islink(self._join(x)):

                    return 'l'

                if 'x' in fallback(x):

                    return 'x'

                return ''

            return f

        if self._checkexec:

            def f(x):

                if 'l' in fallback(x):

                    return 'l'

                if util.is_exec(self._join(x)):

                    return 'x'

                return ''

            return f

        return fallback

    def getcwd(self):

        cwd = os.getcwd()

        if cwd == self._root: return ''

        # self._root ends with a path separator if self._root is '/' or 'C:\'

        rootsep = self._root

        if not util.endswithsep(rootsep):

            rootsep += os.sep

        if cwd.startswith(rootsep):

            return cwd[len(rootsep):]

        else:

            # we're outside the repo. return an absolute path.

            return cwd

    def pathto(self, f, cwd=None):

        if cwd is None:

            cwd = self.getcwd()

        path = util.pathto(self._root, cwd, f)

        if self._slash:

            return util.normpath(path)

        return path

    def __getitem__(self, key):

        ''' current states:

        n  normal

        m  needs merging

        r  marked for removal

        a  marked for addition

        ?  not tracked'''

        return self._map.get(key, ("?",))[0]

    def __contains__(self, key):

        return key in self._map

    def __iter__(self):

        for x in sorted(self._map):

            yield x

    def parents(self):

        return self._pl

    def branch(self):

        return self._branch

    def setparents(self, p1, p2=nullid):

        self._dirty = self._dirtypl = True

        self._pl = p1, p2

    def setbranch(self, branch):

        self._branch = branch

        self._opener("branch", "w").write(branch + '\n')

    def _read(self):

        self._map = {}

        self._copymap = {}

        try:

            st = self._opener("dirstate").read()

        except IOError, err:

            if err.errno != errno.ENOENT: raise

            return

        if not st:

            return

        p = parsers.parse_dirstate(self._map, self._copymap, st)

        if not self._dirtypl:

            self._pl = p

    def invalidate(self):

        for a in "_map _copymap _foldmap _branch _pl _dirs _ignore".split():

            if a in self.__dict__:

                delattr(self, a)

        self._dirty = False

    def copy(self, source, dest):

        """Mark dest as a copy of source. Unmark dest if source is None.

        """

        if source == dest:

            return

        self._dirty = True

        if source is not None:

            self._copymap[dest] = source

        elif dest in self._copymap:

            del self._copymap[dest]

    def copied(self, file):

        return self._copymap.get(file, None)

    def copies(self):

        return self._copymap

    def _droppath(self, f):

        if self[f] not in "?r" and "_dirs" in self.__dict__:

            _decdirs(self._dirs, f)

    def _addpath(self, f, check=False):

        oldstate = self[f]

        if check or oldstate == "r":

            if '\r' in f or '\n' in f:

                raise util.Abort(

                    _("'\\n' and '\\r' disallowed in filenames: %r") % f)

            if f in self._dirs:

                raise util.Abort(_('directory %r already in dirstate') % f)

            # shadows

            for d in _finddirs(f):

                if d in self._dirs:

                    break

                if d in self._map and self[d] != 'r':

                    raise util.Abort(

                        _('file %r in dirstate clashes with %r') % (d, f))

        if oldstate in "?r" and "_dirs" in self.__dict__:

            _incdirs(self._dirs, f)

    def normal(self, f):

        'mark a file normal and clean'

        self._dirty = True

        self._addpath(f)

        s = os.lstat(self._join(f))

        self._map[f] = ('n', s.st_mode, s.st_size, int(s.st_mtime))

        if f in self._copymap:

            del self._copymap[f]

    def normallookup(self, f):

        'mark a file normal, but possibly dirty'

        if self._pl[1] != nullid and f in self._map:

            # if there is a merge going on and the file was either

            # in state 'm' or dirty before being removed, restore that state.

            entry = self._map[f]

            if entry[0] == 'r' and entry[2] in (-1, -2):

                source = self._copymap.get(f)

                if entry[2] == -1:

                    self.merge(f)

                elif entry[2] == -2:

                    self.normaldirty(f)

                if source:

                    self.copy(source, f)

                return

            if entry[0] == 'm' or entry[0] == 'n' and entry[2] == -2:

                return

        self._dirty = True

        self._addpath(f)

        self._map[f] = ('n', 0, -1, -1)

        if f in self._copymap:

            del self._copymap[f]

    def normaldirty(self, f):

        'mark a file normal, but dirty'

        self._dirty = True

        self._addpath(f)

        self._map[f] = ('n', 0, -2, -1)

        if f in self._copymap:

            del self._copymap[f]

    def add(self, f):

        'mark a file added'

        self._dirty = True

        self._addpath(f, True)

        self._map[f] = ('a', 0, -1, -1)

        if f in self._copymap:

            del self._copymap[f]

    def remove(self, f):

        'mark a file removed'

        self._dirty = True

        self._droppath(f)

        size = 0

        if self._pl[1] != nullid and f in self._map:

            entry = self._map[f]

            if entry[0] == 'm':

                size = -1

            elif entry[0] == 'n' and entry[2] == -2:

                size = -2

        self._map[f] = ('r', 0, size, 0)

        if size == 0 and f in self._copymap:

            del self._copymap[f]

    def merge(self, f):

        'mark a file merged'

        self._dirty = True

        s = os.lstat(self._join(f))

        self._addpath(f)

        self._map[f] = ('m', s.st_mode, s.st_size, int(s.st_mtime))

        if f in self._copymap:

            del self._copymap[f]

    def forget(self, f):

        'forget a file'

        self._dirty = True

        try:

            self._droppath(f)

            del self._map[f]

        except KeyError:

            self._ui.warn(_("not in dirstate: %s\n") % f)

    def _normalize(self, path, knownpath=False):

        norm_path = os.path.normcase(path)

        fold_path = self._foldmap.get(norm_path, None)

        if fold_path is None:

            if knownpath or not os.path.exists(os.path.join(self._root, path)):

                fold_path = path

            else:

                fold_path = self._foldmap.setdefault(norm_path,

                                util.fspath(path, self._root))

        return fold_path

    def clear(self):

        self._map = {}

        if "_dirs" in self.__dict__:

            delattr(self, "_dirs");

        self._copymap = {}

        self._pl = [nullid, nullid]