#!/usr/bin/python

#

# CDDL HEADER START

#

# The contents of this file are subject to the terms of the

# Common Development and Distribution License (the "License").

# You may not use this file except in compliance with the License.

#

# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE

# or http://www.opensolaris.org/os/licensing.

# See the License for the specific language governing permissions

# and limitations under the License.

#

# When distributing Covered Code, include this CDDL HEADER in each

# file and include the License file at usr/src/OPENSOLARIS.LICENSE.

# If applicable, add the following below this CDDL HEADER, with the

# fields enclosed by brackets "[]" replaced with your own identifying

# information: Portions Copyright [yyyy] [name of copyright owner]

#

# CDDL HEADER END

#

# Copyright 2007 Sun Microsystems, Inc.  All rights reserved.

# Use is subject to license terms.

import ConfigParser

import cPickle

import errno

import getopt

import os

import grp

import pwd

import urllib

import urlparse

# import uuid           # XXX interesting 2.5 module

import pkg.catalog as catalog

import pkg.fmri as fmri

import pkg.manifest as manifest

import pkg.version as version

import pkg.client.imageconfig as imageconfig

import pkg.client.imageplan as imageplan

import pkg.client.retrieve as retrieve

from pkg.misc import versioned_urlopen

IMG_ENTIRE = 0

IMG_PARTIAL = 1

IMG_USER = 2

img_user_prefix = ".org.opensolaris,pkg"

img_root_prefix = "var/pkg"

class Image(object):

        """An Image object is a directory tree containing the laid-down contents

        of a self-consistent graph of Packages.

        An Image has a root path.

        An Image of type IMG_ENTIRE does not have a parent Image.  Other Image

        types must have a parent Image.  The external state of the parent Image

        must be accessible from the Image's context, or duplicated within the

        Image (IMG_PARTIAL for zones, for instance).

        The parent of a user Image can be a partial Image.  The parent of a

        partial Image must be an entire Image.

        An Image of type IMG_USER stores its external state at self.root +

        ".org.opensolaris,pkg".

        An Image of type IMG_ENTIRE or IMG_PARTIAL stores its external state at

        self.root + "/var/pkg".

        An Image needs to be able to have a different repository set than the

        system's root Image.

        Directory layout

          $IROOT/catalog

               Directory containing catalogs for URIs of interest.  Filename is

               the escaped URI of the catalog.

          $IROOT/file

               Directory containing file hashes of installed packages.

          $IROOT/pkg

               Directory containing manifests and states of installed packages.

          $IROOT/index

               Directory containing reverse-index databases.

          $IROOT/cfg_cache

               File containing image's cached configuration.

          $IROOT/state

               File containing image's opaque state.

        XXX Root path probably can't be absolute, so that we can combine or

        reuse Image contents.

        XXX Image file format?  Image file manipulation API?"""

        def __init__(self):

                self.cfg_cache = None

                self.type = None

                self.root = None

                self.imgdir = None

                self.repo_uris = []

                self.filter_tags = {}

                self.users = {}

                self.users_lastupdate = 0

                self.groups = {}

                self.groups_lastupdate = 0

                self.catalogs = {}

                self.attrs = {}

                self.attrs["Policy-Require-Optional"] = False

                self.attrs["Policy-Pursue-Latest"] = True

        def find_root(self, d):

                # Ascend from current working directory to find first

                # encountered image.

                while True:

                        if os.path.isdir("%s/%s" % (d, img_user_prefix)):

                                # XXX Look at image file to determine filter

                                # tags and repo URIs.

                                self.type = IMG_USER

                                self.root = d

                                self.imgdir = "%s/%s" % (d, img_user_prefix)

                                self.attrs["Build-Release"] = "5.11"

                                return

                        elif os.path.isdir("%s/%s" % (d, img_root_prefix)):

                                # XXX Look at image file to determine filter

                                # tags and repo URIs.

                                # XXX Look at image file to determine if this

                                # image is a partial image.

                                self.type = IMG_ENTIRE

                                self.root = d

                                self.imgdir = "%s/%s" % (d, img_root_prefix)

                                self.attrs["Build-Release"] = "5.11"

                                return

                        assert d != "/"

                        # XXX follow symlinks or not?

                        d = os.path.normpath(os.path.join(d, os.path.pardir))

        def load_config(self):

                """Load this image's cached configuration from the default

                location."""

                # XXX Incomplete with respect to doc/image.txt description of

                # configuration.

                if self.root == None:

                        raise RuntimeError, "self.root must be set"

                ic = imageconfig.ImageConfig()

                if os.path.isfile("%s/cfg_cache" % self.imgdir):

                        ic.read("%s/cfg_cache" % self.imgdir)

                self.cfg_cache = ic

        # XXX mkdirs and set_attrs() need to be combined into a create

        # operation.

        def mkdirs(self):

                if not os.path.isdir(self.imgdir + "/catalog"):

                        os.makedirs(self.imgdir + "/catalog")

                if not os.path.isdir(self.imgdir + "/file"):

                        os.makedirs(self.imgdir + "/file")

                if not os.path.isdir(self.imgdir + "/pkg"):

                        os.makedirs(self.imgdir + "/pkg")

                if not os.path.isdir(self.imgdir + "/index"):

                        os.makedirs(self.imgdir + "/index")

        def set_attrs(self, type, root, is_zone, auth_name, auth_url):

                self.type = type

                self.root = root

                if self.type == IMG_USER:

                        self.imgdir = self.root + "/" + img_user_prefix

                else:

                        self.imgdir = self.root + "/" + img_root_prefix

                self.mkdirs()

                self.cfg_cache = imageconfig.ImageConfig()

                if is_zone:

                        self.cfg_cache.filters["opensolaris.zone"] = "nonglobal"

                self.cfg_cache.authorities[auth_name] = {}

                self.cfg_cache.authorities[auth_name]["prefix"] = auth_name

                self.cfg_cache.authorities[auth_name]["origin"] = auth_url

                self.cfg_cache.authorities[auth_name]["mirrors"] = None

                self.cfg_cache.preferred_authority = auth_name

                self.cfg_cache.write("%s/cfg_cache" % self.imgdir)

        def get_root(self):

                return self.root

        def gen_authorities(self):

                if not self.cfg_cache:

                        raise RuntimeError, "empty ImageConfig"

                if not self.cfg_cache.authorities:

                        raise RuntimeError, "no defined authorities"

                for a in self.cfg_cache.authorities:

                        yield self.cfg_cache.authorities[a]

        def get_url_by_authority(self, authority = None):

                """Return the URL prefix associated with the given authority.

                For the undefined case, represented by None, return the

                preferred authority."""

                # XXX This function is a possible location to insert one or more

                # policies regarding use of mirror responses, etc.

                if authority == None:

                        authority = self.cfg_cache.preferred_authority

                o = self.cfg_cache.authorities[authority]["origin"]

                return o.rstrip("/")

        def get_default_authority(self):

                return self.cfg_cache.preferred_authority

        def get_matching_fmris(self, patterns, matcher = None,

            constraint = None, counthash = None):

                """Iterate through all catalogs, looking for packages matching

                'pattern', based on the function in 'matcher' and the versioning

                constraint described by 'constraint'.  If 'matcher' is None,

                uses fmri subset matching as the default.  Returns a list of

                (catalog, fmri) pairs.  If 'counthash' is a dictionary, instead

                store the number of matched fmris for each package name which

                was matched."""

                # XXX Do we want to recognize regex (some) metacharacters and

                # switch automatically to the regex matcher?

                # XXX If the patterns contain an authority, we could reduce the

                # number of catalogs searched by only looking at catalogs whose

                # authorities match FMRIs in the pattern.

                # Check preferred authority first, if package isn't found here,

                # then check all authorities.

                cat = self.catalogs[self.cfg_cache.preferred_authority]

                m = cat.get_matching_fmris(patterns, matcher,

                    constraint, counthash)

                for k, c in self.catalogs.items():

                        if k == self.cfg_cache.preferred_authority:

                                continue

                        m.extend(c.get_matching_fmris(patterns, matcher,

                            constraint, counthash))

                if not m:

                        raise KeyError, "packages matching '%s' not found in catalog" \

                            % patterns

                return m

        def has_manifest(self, fmri):

                mpath = fmri.get_dir_path()

                local_mpath = "%s/pkg/%s/manifest" % (self.imgdir, mpath)

                if (os.path.exists(local_mpath)):

                        return True

                return False

        def get_manifest(self, fmri, filtered = False):

                m = manifest.Manifest()

                fmri_dir_path = os.path.join(self.imgdir, "pkg",

                    fmri.get_dir_path())

                mpath = os.path.join(fmri_dir_path, "manifest")

                # If the manifest isn't there, download and retry.

                try:

                        mcontent = file(mpath).read()

                except IOError, e:

                        if e.errno != errno.ENOENT:

                                raise

                        retrieve.get_manifest(self, fmri)

                        mcontent = file(mpath).read()

                m.set_fmri(self, fmri)

                m.set_content(mcontent)

                # Pickle the manifest's indices, for searching

                try:

                        pfile = file(os.path.join(fmri_dir_path, "index"), "wb")

                        m.pickle(pfile)

                        pfile.close()

                except IOError, e:

                        pass

                if filtered:

                        filters = []

                        try:

                                f = file("%s/filters" % fmri_dir_path, "r")

                        except IOError, e:

                                print e

                                if e.errno != errno.ENOENT:

                                        raise

                        else:

                                filters = [

                                    (l.strip(), compile(

                                        l.strip(), "<filter string>", "eval"))

                                    for l in f.readlines()

                                ]

                        m.filter(filters)

                return m

        @staticmethod

        def installed_file_authority(filepath):

                """Find the pkg's installed file named by filepath.

                Return the authority that installed this package."""

                f = file(filepath, "r")

                auth = f.readline()

                f.close()

                return auth

        def install_file_present(self, fmri):

                """Returns true if the package named by the fmri is installed

                on the system.  Otherwise, returns false."""

                return os.path.exists("%s/pkg/%s/installed" % (self.imgdir,

                    fmri.get_dir_path()))

        def add_install_file(self, fmri):

                """Take an image and fmri. Write a file to disk that

                indicates that the package named by the fmri has been

                installed."""

                f = file("%s/pkg/%s/installed" % (self.imgdir,

                    fmri.get_dir_path()), "w")

                f.write(fmri.authority)

                f.close()

        def remove_install_file(self, fmri):

                """Take an image and a fmri.  Remove the file from disk

                that indicates that the package named by the fmri has been

                installed."""

                os.unlink("%s/pkg/%s/installed" % (self.imgdir,

                    fmri.get_dir_path()))

        def get_version_installed(self, pfmri):

                pd = pfmri.get_pkg_stem()

                pdir = "%s/pkg/%s" % (self.imgdir,

                    pfmri.get_dir_path(stemonly = True))

                try:

                        pkgs_inst = [ (urllib.unquote("%s@%s" % (pd, vd)),

                            "%s/%s/installed" % (pdir, vd))

                            for vd in os.listdir(pdir)

                            if os.path.exists("%s/%s/installed" % (pdir, vd)) ]

                except OSError:

                        raise LookupError, "no packages ever installed"

                if len(pkgs_inst) == 0:

                        raise LookupError, "no packages installed"

                assert len(pkgs_inst) <= 1

                auth = self.installed_file_authority(pkgs_inst[0][1])

                return fmri.PkgFmri(pkgs_inst[0][0], authority = auth)

        def gen_installed_pkgs(self):

                idir = "%s/pkg" % self.imgdir

                for pd in os.listdir(idir):

                        for vd in os.listdir("%s/%s" % (idir, pd)):

                                if os.path.exists("%s/%s/%s/installed" %

                                    (idir, pd, vd)):

                                        yield fmri.PkgFmri(urllib.unquote(

                                            "%s@%s" % (pd, vd)))

        def get_pkg_state_by_fmri(self, pfmri):

                """Given pfmri, determine the local state of the package."""

                if self.install_file_present(pfmri):

                        return "installed"

                return "known"

        def fmri_set_default_authority(self, fmri):

                """If the FMRI supplied as an argument does not have

                an authority, set it to the image's preferred authority."""

                if fmri.authority:

                        return

                adict = self.cfg_cache.authorities

                da = adict[self.get_default_authority()]

                fmri.set_authority(da["prefix"])

        def has_version_installed(self, fmri):

                """Check that the version given in the FMRI or a successor is

                installed in the current image."""

                try:

                        v = self.get_version_installed(fmri)

                except LookupError:

                        return False

                if v.is_successor(fmri):

                        return True

                return False

        def is_installed(self, fmri):

                """Check that the exact version given in the FMRI is installed

                in the current image."""

                # All FMRIs passed to is_installed shall have an authority

                assert fmri.authority

                try:

                        v = self.get_version_installed(fmri)

                except LookupError:

                        return False

                return v == fmri

        def get_dependents(self, pfmri):

                """Return a list of the packages directly dependent on the given

                FMRI."""

                thedir = os.path.join(self.imgdir, "index", "depend",

                    urllib.quote(str(pfmri.get_pkg_stem())[5:], ""))

                if not os.path.isdir(thedir):

                        return []

                for v in os.listdir(thedir):

                        f = fmri.PkgFmri(pfmri.get_pkg_stem() + "@" + v,

                            self.attrs["Build-Release"])

                        if pfmri.is_successor(f):

                                dependents = [

                                    urllib.unquote(d)

                                    for d in os.listdir(os.path.join(thedir, v))

                                    if os.path.exists(

                                        os.path.join(thedir, v, d, "installed"))

                                ]

                return dependents

        def retrieve_catalogs(self):

                for auth in self.gen_authorities():

                        # XXX Mirror selection and retrieval policy?

                        # root for this catalog

                        croot = "%s/catalog/%s" % (self.imgdir, auth["prefix"])