summaryrefslogtreecommitdiff
path: root/lib/spack/spack/build_systems/r.py
blob: f2e7e095b7c7c444df871e668f76383b1f8a478c (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
# Copyright 2013-2023 Lawrence Livermore National Security, LLC and other
# Spack Project Developers. See the top-level COPYRIGHT file for details.
#
# SPDX-License-Identifier: (Apache-2.0 OR MIT)
import inspect
from typing import Optional, Tuple

import llnl.util.lang as lang

from spack.directives import extends

from .generic import GenericBuilder, Package


class RBuilder(GenericBuilder):
    """The R builder provides a single phase that can be overridden:

        1. :py:meth:`~.RBuilder.install`

    It has sensible defaults, and for many packages the only thing
    necessary will be to add dependencies.
    """

    #: Names associated with package methods in the old build-system format
    legacy_methods: Tuple[str, ...] = (
        "configure_args",
        "configure_vars",
    ) + GenericBuilder.legacy_methods

    def configure_args(self):
        """Arguments to pass to install via ``--configure-args``."""
        return []

    def configure_vars(self):
        """Arguments to pass to install via ``--configure-vars``."""
        return []

    def install(self, pkg, spec, prefix):
        """Installs an R package."""

        config_args = self.configure_args()
        config_vars = self.configure_vars()

        args = ["--vanilla", "CMD", "INSTALL"]

        if config_args:
            args.append("--configure-args={0}".format(" ".join(config_args)))

        if config_vars:
            args.append("--configure-vars={0}".format(" ".join(config_vars)))

        args.extend(["--library={0}".format(self.pkg.module.r_lib_dir), self.stage.source_path])

        inspect.getmodule(self.pkg).R(*args)


class RPackage(Package):
    """Specialized class for packages that are built using R.

    For more information on the R build system, see:
    https://stat.ethz.ch/R-manual/R-devel/library/utils/html/INSTALL.html
    """

    # package attributes that can be expanded to set the homepage, url,
    # list_url, and git values
    # For CRAN packages
    cran: Optional[str] = None

    # For Bioconductor packages
    bioc: Optional[str] = None

    GenericBuilder = RBuilder

    #: This attribute is used in UI queries that need to know the build
    #: system base class
    build_system_class = "RPackage"

    extends("r")

    @lang.classproperty
    def homepage(cls):
        if cls.cran:
            return "https://cloud.r-project.org/package=" + cls.cran
        elif cls.bioc:
            return "https://bioconductor.org/packages/" + cls.bioc

    @lang.classproperty
    def url(cls):
        if cls.cran:
            return (
                "https://cloud.r-project.org/src/contrib/"
                + cls.cran
                + "_"
                + str(list(cls.versions)[0])
                + ".tar.gz"
            )

    @lang.classproperty
    def list_url(cls):
        if cls.cran:
            return "https://cloud.r-project.org/src/contrib/Archive/" + cls.cran + "/"

    @property
    def git(self):
        if self.bioc:
            return "https://git.bioconductor.org/packages/" + self.bioc