##############################################################################
# Copyright (c) 2013-2018, Lawrence Livermore National Security, LLC.
# Produced at the Lawrence Livermore National Laboratory.
#
# This file is part of Spack.
# Created by Todd Gamblin, tgamblin@llnl.gov, All rights reserved.
# LLNL-CODE-647188
#
# For details, see https://github.com/spack/spack
# Please also see the NOTICE and LICENSE files for our notice and the LGPL.
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU Lesser General Public License (as
# published by the Free Software Foundation) version 2.1, February 1999.
#
# This program is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the IMPLIED WARRANTY OF
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the terms and
# conditions of the GNU Lesser General Public License for more details.
#
# You should have received a copy of the GNU Lesser General Public
# License along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
##############################################################################
import glob
import os
from spack import *


class SuperluDist(Package):
    """A general purpose library for the direct solution of large, sparse,
    nonsymmetric systems of linear equations on high performance machines."""
    homepage = "http://crd-legacy.lbl.gov/~xiaoye/SuperLU/"
    url = "http://crd-legacy.lbl.gov/~xiaoye/SuperLU/superlu_dist_4.1.tar.gz"

    version('develop', git='https://github.com/xiaoyeli/superlu_dist', tag='master')
    version('xsdk-0.2.0', git='https://github.com/xiaoyeli/superlu_dist', tag='xsdk-0.2.0')
    version('5.2.2', 'a685ef7fb7859b24c8c9d5d5f121a8a5')
    version('5.2.1', 'af857778ffeb04aea02aa4843e6e8e1d')
    version('5.1.3', '3a9e88a8469aa7f319f0364364b8da35')
    version('5.1.1', '12638c631733a27dcbd87110e9f9cb1e')
    version('5.1.0', '6bb86e630bd4bd8650243aed8fd92eb9')
    version('5.0.0', '2b53baf1b0ddbd9fcf724992577f0670')
    version('4.3', 'ee66c84e37b4f7cc557771ccc3dc43ae')
    version('4.2', 'ae9fafae161f775fbac6eba11e530a65')
    version('4.1', '4edee38cc29f687bd0c8eb361096a455')
    version('4.0', 'c0b98b611df227ae050bc1635c6940e0')
    version('3.3', 'f4805659157d93a962500902c219046b')

    variant('int64', default=False,
            description="Use 64bit integers")

    depends_on('mpi')
    depends_on('blas')
    depends_on('lapack')
    depends_on('parmetis')
    depends_on('metis@5:')

    def install(self, spec, prefix):
        lapack_blas = spec['lapack'].libs + spec['blas'].libs
        makefile_inc = []
        makefile_inc.extend([
            'PLAT         = _mac_x',
            'DSuperLUroot = %s' % self.stage.source_path,
            'DSUPERLULIB  = $(DSuperLUroot)/lib/libsuperlu_dist.a',
            'BLASDEF      = -DUSE_VENDOR_BLAS',
            'BLASLIB      = %s' % lapack_blas.ld_flags,
            'METISLIB     = %s' % spec['metis'].libs.ld_flags,
            'PARMETISLIB  = %s' % spec['parmetis'].libs.ld_flags,
            'FLIBS        =',
            'LIBS         = $(DSUPERLULIB) $(BLASLIB) $(PARMETISLIB) $(METISLIB)',  # noqa
            'ARCH         = ar',
            'ARCHFLAGS    = cr',
            'RANLIB       = true',
            'CC           = {0}'.format(self.spec['mpi'].mpicc),
            'CFLAGS       = %s %s -O2 %s %s %s' % (
                self.compiler.pic_flag,
                '' if '%pgi' in spec else '-std=c99',
                spec['parmetis'].headers.cpp_flags,
                spec['metis'].headers.cpp_flags,
                '-D_LONGINT' if '+int64' in spec and not
                self.spec.satisfies('@5.2.0:') else ''),
            'XSDK_INDEX_SIZE = %s' % ('64' if '+int64' in spec else '32'),
            'NOOPTS       = %s -std=c99' % (
                self.compiler.pic_flag),
            'FORTRAN      = {0}'.format(self.spec['mpi'].mpif77),
            'F90FLAGS     = -O2',
            'LOADER       = {0}'.format(self.spec['mpi'].mpif77),
            'INCLUDEDIR   = $(SuperLUroot)/include',
            'LOADOPTS     =',
            'CDEFS        = %s' % ("-DNoChange"
                                       if '%xl' in spec or '%xl_r' in spec
                                       else "-DAdd_")
        ])

        with open('make.inc', 'w') as fh:
            fh.write('\n'.join(makefile_inc))

        mkdirp(os.path.join(self.stage.source_path, 'lib'))
        make("lib", parallel=False)

        # FIXME:
        # cd "EXAMPLE" do
        # system "make"

        # need to install by hand
        headers_location = self.prefix.include
        mkdirp(headers_location)
        mkdirp(prefix.lib)

        headers = glob.glob(join_path(self.stage.source_path, 'SRC', '*.h'))
        for h in headers:
            install(h, headers_location)

        superludist_lib = join_path(self.stage.source_path,
                                    'lib/libsuperlu_dist.a')
        install(superludist_lib, self.prefix.lib)