2015-07-20 02:30:16 +00:00
|
|
|
/* GNU Guix --- Functional package management for GNU
|
2019-02-04 15:14:09 +00:00
|
|
|
Copyright (C) 2016, 2017, 2018, 2019 Ludovic Courtès <ludo@gnu.org>
|
2015-07-20 02:30:16 +00:00
|
|
|
|
|
|
|
This file is part of GNU Guix.
|
|
|
|
|
|
|
|
GNU Guix is free software; you can redistribute it and/or modify it
|
|
|
|
under the terms of the GNU General Public License as published by
|
|
|
|
the Free Software Foundation; either version 3 of the License, or (at
|
|
|
|
your option) any later version.
|
|
|
|
|
|
|
|
GNU Guix 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
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. */
|
|
|
|
|
|
|
|
#include <builtins.hh>
|
|
|
|
#include <util.hh>
|
|
|
|
#include <globals.hh>
|
|
|
|
|
|
|
|
#include <unistd.h>
|
2017-02-07 13:44:55 +00:00
|
|
|
#include <cstdlib>
|
2015-07-20 02:30:16 +00:00
|
|
|
|
|
|
|
namespace nix {
|
|
|
|
|
|
|
|
static void builtinDownload(const Derivation &drv,
|
2017-01-11 16:06:31 +00:00
|
|
|
const std::string &drvPath,
|
|
|
|
const std::string &output)
|
2015-07-20 02:30:16 +00:00
|
|
|
{
|
|
|
|
/* Invoke 'guix perform-download'. */
|
|
|
|
Strings args;
|
|
|
|
args.push_back("perform-download");
|
|
|
|
args.push_back(drvPath);
|
|
|
|
|
|
|
|
/* Close all other file descriptors. */
|
|
|
|
closeMostFDs(set<int>());
|
|
|
|
|
2017-01-11 16:06:31 +00:00
|
|
|
const char *const argv[] =
|
|
|
|
{
|
2019-09-03 19:59:45 +00:00
|
|
|
"guix", "perform-download", drvPath.c_str(), output.c_str(), NULL
|
2017-01-11 16:06:31 +00:00
|
|
|
};
|
2015-07-20 02:30:16 +00:00
|
|
|
|
2017-02-07 13:44:55 +00:00
|
|
|
/* Tell the script what the store file name is, so that
|
|
|
|
'strip-store-file-name' (used for instance to determine the URL of
|
|
|
|
content-addressed mirrors) works correctly. */
|
|
|
|
setenv("NIX_STORE", settings.nixStore.c_str(), 1);
|
|
|
|
|
2018-09-12 13:08:38 +00:00
|
|
|
/* Tell it about options such as "print-extended-build-trace". */
|
|
|
|
setenv("_NIX_OPTIONS", settings.pack().c_str(), 1);
|
|
|
|
|
2019-09-03 19:59:45 +00:00
|
|
|
const string program = settings.guixProgram;
|
2015-07-20 02:30:16 +00:00
|
|
|
execv(program.c_str(), (char *const *) argv);
|
|
|
|
|
|
|
|
throw SysError(format("failed to run download program '%1%'") % program);
|
|
|
|
}
|
|
|
|
|
|
|
|
static const std::map<std::string, derivationBuilder> builtins =
|
|
|
|
{
|
|
|
|
{ "download", builtinDownload }
|
|
|
|
};
|
|
|
|
|
|
|
|
derivationBuilder lookupBuiltinBuilder(const std::string & name)
|
|
|
|
{
|
|
|
|
if (name.substr(0, 8) == "builtin:")
|
|
|
|
{
|
|
|
|
auto realName = name.substr(8);
|
|
|
|
auto builder = builtins.find(realName);
|
|
|
|
return builder == builtins.end() ? NULL : builder->second;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
2016-11-13 21:59:54 +00:00
|
|
|
std::list<std::string> builtinBuilderNames()
|
|
|
|
{
|
|
|
|
std::list<std::string> result;
|
|
|
|
for(auto&& iter: builtins)
|
|
|
|
{
|
|
|
|
result.push_back(iter.first);
|
|
|
|
}
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
|
2015-07-20 02:30:16 +00:00
|
|
|
}
|