2013-03-05 13:31:06 +00:00
|
|
|
/*-
|
|
|
|
* Copyright (c) 2013 Baptiste Daroussin <bapt@FreeBSD.org>
|
2013-10-26 03:43:02 +00:00
|
|
|
* Copyright (c) 2013 Bryan Drewery <bdrewery@FreeBSD.org>
|
2013-03-05 13:31:06 +00:00
|
|
|
* All rights reserved.
|
|
|
|
*
|
|
|
|
* Redistribution and use in source and binary forms, with or without
|
|
|
|
* modification, are permitted provided that the following conditions
|
|
|
|
* are met:
|
|
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
|
|
* notice, this list of conditions and the following disclaimer.
|
|
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
|
|
* documentation and/or other materials provided with the distribution.
|
|
|
|
*
|
|
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
|
|
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
|
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
|
|
* SUCH DAMAGE.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <sys/cdefs.h>
|
|
|
|
__FBSDID("$FreeBSD$");
|
|
|
|
|
|
|
|
#include <sys/param.h>
|
|
|
|
#include <sys/sbuf.h>
|
|
|
|
#include <sys/elf_common.h>
|
|
|
|
#include <sys/endian.h>
|
|
|
|
|
2013-09-10 20:56:01 +00:00
|
|
|
#include <assert.h>
|
2013-10-14 18:31:15 +00:00
|
|
|
#include <yaml.h>
|
2013-03-05 13:31:06 +00:00
|
|
|
#include <ctype.h>
|
|
|
|
#include <err.h>
|
|
|
|
#include <errno.h>
|
|
|
|
#include <fcntl.h>
|
|
|
|
#include <gelf.h>
|
|
|
|
#include <inttypes.h>
|
|
|
|
#include <paths.h>
|
|
|
|
#include <stdbool.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <unistd.h>
|
|
|
|
|
|
|
|
#include "elf_tables.h"
|
|
|
|
#include "config.h"
|
|
|
|
|
|
|
|
#define roundup2(x, y) (((x)+((y)-1))&(~((y)-1))) /* if y is powers of two */
|
|
|
|
|
|
|
|
struct config_entry {
|
|
|
|
uint8_t type;
|
|
|
|
const char *key;
|
|
|
|
const char *val;
|
|
|
|
char *value;
|
|
|
|
bool envset;
|
|
|
|
};
|
|
|
|
|
|
|
|
static struct config_entry c[] = {
|
|
|
|
[PACKAGESITE] = {
|
|
|
|
PKG_CONFIG_STRING,
|
|
|
|
"PACKAGESITE",
|
2013-10-24 10:49:55 +00:00
|
|
|
URL_SCHEME_PREFIX "http://pkg.FreeBSD.org/${ABI}/latest",
|
2013-03-05 13:31:06 +00:00
|
|
|
NULL,
|
|
|
|
false,
|
|
|
|
},
|
|
|
|
[ABI] = {
|
|
|
|
PKG_CONFIG_STRING,
|
|
|
|
"ABI",
|
|
|
|
NULL,
|
|
|
|
NULL,
|
|
|
|
false,
|
|
|
|
},
|
|
|
|
[MIRROR_TYPE] = {
|
|
|
|
PKG_CONFIG_STRING,
|
|
|
|
"MIRROR_TYPE",
|
|
|
|
"SRV",
|
|
|
|
NULL,
|
|
|
|
false,
|
|
|
|
},
|
|
|
|
[ASSUME_ALWAYS_YES] = {
|
|
|
|
PKG_CONFIG_BOOL,
|
|
|
|
"ASSUME_ALWAYS_YES",
|
|
|
|
"NO",
|
|
|
|
NULL,
|
|
|
|
false,
|
2013-10-26 03:43:02 +00:00
|
|
|
},
|
|
|
|
[SIGNATURE_TYPE] = {
|
|
|
|
PKG_CONFIG_STRING,
|
|
|
|
"SIGNATURE_TYPE",
|
|
|
|
NULL,
|
|
|
|
NULL,
|
|
|
|
false,
|
|
|
|
},
|
|
|
|
[FINGERPRINTS] = {
|
|
|
|
PKG_CONFIG_STRING,
|
|
|
|
"FINGERPRINTS",
|
|
|
|
NULL,
|
|
|
|
NULL,
|
|
|
|
false,
|
|
|
|
},
|
2013-03-05 13:31:06 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
static const char *
|
|
|
|
elf_corres_to_string(struct _elf_corres *m, int e)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
|
|
|
for (i = 0; m[i].string != NULL; i++)
|
|
|
|
if (m[i].elf_nb == e)
|
|
|
|
return (m[i].string);
|
|
|
|
|
|
|
|
return ("unknown");
|
|
|
|
}
|
|
|
|
|
2013-09-10 20:56:01 +00:00
|
|
|
static const char *
|
|
|
|
aeabi_parse_arm_attributes(void *data, size_t length)
|
|
|
|
{
|
|
|
|
uint32_t sect_len;
|
|
|
|
uint8_t *section = data;
|
|
|
|
|
|
|
|
#define MOVE(len) do { \
|
|
|
|
assert(length >= (len)); \
|
|
|
|
section += (len); \
|
|
|
|
length -= (len); \
|
|
|
|
} while (0)
|
|
|
|
|
|
|
|
if (length == 0 || *section != 'A')
|
|
|
|
return (NULL);
|
|
|
|
|
|
|
|
MOVE(1);
|
|
|
|
|
|
|
|
/* Read the section length */
|
|
|
|
if (length < sizeof(sect_len))
|
|
|
|
return (NULL);
|
|
|
|
|
|
|
|
memcpy(§_len, section, sizeof(sect_len));
|
|
|
|
|
|
|
|
/*
|
|
|
|
* The section length should be no longer than the section it is within
|
|
|
|
*/
|
|
|
|
if (sect_len > length)
|
|
|
|
return (NULL);
|
|
|
|
|
|
|
|
MOVE(sizeof(sect_len));
|
|
|
|
|
|
|
|
/* Skip the vendor name */
|
|
|
|
while (length != 0) {
|
|
|
|
if (*section == '\0')
|
|
|
|
break;
|
|
|
|
MOVE(1);
|
|
|
|
}
|
|
|
|
if (length == 0)
|
|
|
|
return (NULL);
|
|
|
|
MOVE(1);
|
|
|
|
|
|
|
|
while (length != 0) {
|
|
|
|
uint32_t tag_length;
|
|
|
|
|
|
|
|
switch(*section) {
|
|
|
|
case 1: /* Tag_File */
|
|
|
|
MOVE(1);
|
|
|
|
if (length < sizeof(tag_length))
|
|
|
|
return (NULL);
|
|
|
|
memcpy(&tag_length, section, sizeof(tag_length));
|
|
|
|
break;
|
|
|
|
case 2: /* Tag_Section */
|
|
|
|
case 3: /* Tag_Symbol */
|
|
|
|
default:
|
|
|
|
return (NULL);
|
|
|
|
}
|
|
|
|
/* At least space for the tag and size */
|
|
|
|
if (tag_length <= 5)
|
|
|
|
return (NULL);
|
|
|
|
tag_length--;
|
|
|
|
/* Check the tag fits */
|
|
|
|
if (tag_length > length)
|
|
|
|
return (NULL);
|
|
|
|
|
|
|
|
#define MOVE_TAG(len) do { \
|
|
|
|
assert(tag_length >= (len)); \
|
|
|
|
MOVE(len); \
|
|
|
|
tag_length -= (len); \
|
|
|
|
} while(0)
|
|
|
|
|
|
|
|
MOVE(sizeof(tag_length));
|
|
|
|
tag_length -= sizeof(tag_length);
|
|
|
|
|
|
|
|
while (tag_length != 0) {
|
|
|
|
uint8_t tag;
|
|
|
|
|
|
|
|
assert(tag_length >= length);
|
|
|
|
|
|
|
|
tag = *section;
|
|
|
|
MOVE_TAG(1);
|
|
|
|
|
|
|
|
/*
|
|
|
|
* These tag values come from:
|
|
|
|
*
|
|
|
|
* Addenda to, and Errata in, the ABI for the
|
|
|
|
* ARM Architecture. Release 2.08, section 2.3.
|
|
|
|
*/
|
|
|
|
if (tag == 6) { /* == Tag_CPU_arch */
|
|
|
|
uint8_t val;
|
|
|
|
|
|
|
|
val = *section;
|
|
|
|
/*
|
|
|
|
* We don't support values that require
|
|
|
|
* more than one byte.
|
|
|
|
*/
|
|
|
|
if (val & (1 << 7))
|
|
|
|
return (NULL);
|
|
|
|
|
|
|
|
/* We have an ARMv4 or ARMv5 */
|
|
|
|
if (val <= 5)
|
|
|
|
return ("arm");
|
|
|
|
else /* We have an ARMv6+ */
|
|
|
|
return ("armv6");
|
|
|
|
} else if (tag == 4 || tag == 5 || tag == 32 ||
|
|
|
|
tag == 65 || tag == 67) {
|
|
|
|
while (*section != '\0' && length != 0)
|
|
|
|
MOVE_TAG(1);
|
|
|
|
if (tag_length == 0)
|
|
|
|
return (NULL);
|
|
|
|
/* Skip the last byte */
|
|
|
|
MOVE_TAG(1);
|
|
|
|
} else if ((tag >= 7 && tag <= 31) || tag == 34 ||
|
|
|
|
tag == 36 || tag == 38 || tag == 42 || tag == 44 ||
|
|
|
|
tag == 64 || tag == 66 || tag == 68 || tag == 70) {
|
|
|
|
/* Skip the uleb128 data */
|
|
|
|
while (*section & (1 << 7) && length != 0)
|
|
|
|
MOVE_TAG(1);
|
|
|
|
if (tag_length == 0)
|
|
|
|
return (NULL);
|
|
|
|
/* Skip the last byte */
|
|
|
|
MOVE_TAG(1);
|
|
|
|
} else
|
|
|
|
return (NULL);
|
|
|
|
#undef MOVE_TAG
|
|
|
|
}
|
|
|
|
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
return (NULL);
|
|
|
|
#undef MOVE
|
|
|
|
}
|
|
|
|
|
2013-03-05 13:31:06 +00:00
|
|
|
static int
|
|
|
|
pkg_get_myabi(char *dest, size_t sz)
|
|
|
|
{
|
|
|
|
Elf *elf;
|
|
|
|
Elf_Data *data;
|
|
|
|
Elf_Note note;
|
|
|
|
Elf_Scn *scn;
|
|
|
|
char *src, *osname;
|
2013-09-10 20:56:01 +00:00
|
|
|
const char *arch, *abi, *fpu, *endian_corres_str;
|
|
|
|
const char *wordsize_corres_str;
|
2013-03-05 13:31:06 +00:00
|
|
|
GElf_Ehdr elfhdr;
|
|
|
|
GElf_Shdr shdr;
|
|
|
|
int fd, i, ret;
|
|
|
|
uint32_t version;
|
|
|
|
|
|
|
|
version = 0;
|
|
|
|
ret = -1;
|
|
|
|
scn = NULL;
|
|
|
|
abi = NULL;
|
|
|
|
|
|
|
|
if (elf_version(EV_CURRENT) == EV_NONE) {
|
|
|
|
warnx("ELF library initialization failed: %s",
|
|
|
|
elf_errmsg(-1));
|
|
|
|
return (-1);
|
|
|
|
}
|
|
|
|
|
|
|
|
if ((fd = open(_PATH_BSHELL, O_RDONLY)) < 0) {
|
|
|
|
warn("open()");
|
|
|
|
return (-1);
|
|
|
|
}
|
|
|
|
|
|
|
|
if ((elf = elf_begin(fd, ELF_C_READ, NULL)) == NULL) {
|
|
|
|
ret = -1;
|
|
|
|
warnx("elf_begin() failed: %s.", elf_errmsg(-1));
|
|
|
|
goto cleanup;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (gelf_getehdr(elf, &elfhdr) == NULL) {
|
|
|
|
ret = -1;
|
|
|
|
warn("getehdr() failed: %s.", elf_errmsg(-1));
|
|
|
|
goto cleanup;
|
|
|
|
}
|
|
|
|
while ((scn = elf_nextscn(elf, scn)) != NULL) {
|
|
|
|
if (gelf_getshdr(scn, &shdr) != &shdr) {
|
|
|
|
ret = -1;
|
|
|
|
warn("getshdr() failed: %s.", elf_errmsg(-1));
|
|
|
|
goto cleanup;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (shdr.sh_type == SHT_NOTE)
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (scn == NULL) {
|
|
|
|
ret = -1;
|
|
|
|
warn("failed to get the note section");
|
|
|
|
goto cleanup;
|
|
|
|
}
|
|
|
|
|
|
|
|
data = elf_getdata(scn, NULL);
|
|
|
|
src = data->d_buf;
|
|
|
|
for (;;) {
|
|
|
|
memcpy(¬e, src, sizeof(Elf_Note));
|
|
|
|
src += sizeof(Elf_Note);
|
|
|
|
if (note.n_type == NT_VERSION)
|
|
|
|
break;
|
|
|
|
src += note.n_namesz + note.n_descsz;
|
|
|
|
}
|
|
|
|
osname = src;
|
|
|
|
src += roundup2(note.n_namesz, 4);
|
|
|
|
if (elfhdr.e_ident[EI_DATA] == ELFDATA2MSB)
|
|
|
|
version = be32dec(src);
|
|
|
|
else
|
|
|
|
version = le32dec(src);
|
|
|
|
|
|
|
|
for (i = 0; osname[i] != '\0'; i++)
|
|
|
|
osname[i] = (char)tolower(osname[i]);
|
|
|
|
|
2013-09-10 20:56:01 +00:00
|
|
|
wordsize_corres_str = elf_corres_to_string(wordsize_corres,
|
|
|
|
(int)elfhdr.e_ident[EI_CLASS]);
|
|
|
|
|
|
|
|
arch = elf_corres_to_string(mach_corres, (int) elfhdr.e_machine);
|
|
|
|
|
|
|
|
snprintf(dest, sz, "%s:%d",
|
|
|
|
osname, version / 100000);
|
2013-03-05 13:31:06 +00:00
|
|
|
|
|
|
|
ret = 0;
|
|
|
|
|
|
|
|
switch (elfhdr.e_machine) {
|
|
|
|
case EM_ARM:
|
2013-09-10 20:56:01 +00:00
|
|
|
endian_corres_str = elf_corres_to_string(endian_corres,
|
|
|
|
(int)elfhdr.e_ident[EI_DATA]);
|
|
|
|
|
2013-07-28 20:11:31 +00:00
|
|
|
/* FreeBSD doesn't support the hard-float ABI yet */
|
|
|
|
fpu = "softfp";
|
|
|
|
if ((elfhdr.e_flags & 0xFF000000) != 0) {
|
2013-09-10 20:56:01 +00:00
|
|
|
const char *sh_name = NULL;
|
|
|
|
size_t shstrndx;
|
|
|
|
|
2013-07-28 20:11:31 +00:00
|
|
|
/* This is an EABI file, the conformance level is set */
|
|
|
|
abi = "eabi";
|
2013-09-10 20:56:01 +00:00
|
|
|
/* Find which TARGET_ARCH we are building for. */
|
|
|
|
elf_getshdrstrndx(elf, &shstrndx);
|
|
|
|
while ((scn = elf_nextscn(elf, scn)) != NULL) {
|
|
|
|
sh_name = NULL;
|
|
|
|
if (gelf_getshdr(scn, &shdr) != &shdr) {
|
|
|
|
scn = NULL;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
sh_name = elf_strptr(elf, shstrndx,
|
|
|
|
shdr.sh_name);
|
|
|
|
if (sh_name == NULL)
|
|
|
|
continue;
|
|
|
|
if (strcmp(".ARM.attributes", sh_name) == 0)
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
if (scn != NULL && sh_name != NULL) {
|
|
|
|
data = elf_getdata(scn, NULL);
|
|
|
|
/*
|
|
|
|
* Prior to FreeBSD 10.0 libelf would return
|
|
|
|
* NULL from elf_getdata on the .ARM.attributes
|
|
|
|
* section. As this was the first release to
|
|
|
|
* get armv6 support assume a NULL value means
|
|
|
|
* arm.
|
|
|
|
*
|
|
|
|
* This assumption can be removed when 9.x
|
|
|
|
* is unsupported.
|
|
|
|
*/
|
|
|
|
if (data != NULL) {
|
|
|
|
arch = aeabi_parse_arm_attributes(
|
|
|
|
data->d_buf, data->d_size);
|
|
|
|
if (arch == NULL) {
|
|
|
|
ret = 1;
|
|
|
|
warn("unknown ARM ARCH");
|
|
|
|
goto cleanup;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
ret = 1;
|
|
|
|
warn("Unable to find the .ARM.attributes "
|
|
|
|
"section");
|
|
|
|
goto cleanup;
|
|
|
|
}
|
2013-07-28 20:11:31 +00:00
|
|
|
} else if (elfhdr.e_ident[EI_OSABI] != ELFOSABI_NONE) {
|
|
|
|
/*
|
|
|
|
* EABI executables all have this field set to
|
|
|
|
* ELFOSABI_NONE, therefore it must be an oabi file.
|
|
|
|
*/
|
|
|
|
abi = "oabi";
|
|
|
|
} else {
|
|
|
|
ret = 1;
|
2013-09-10 20:56:01 +00:00
|
|
|
warn("unknown ARM ABI");
|
2013-07-28 20:11:31 +00:00
|
|
|
goto cleanup;
|
|
|
|
}
|
2013-03-05 13:31:06 +00:00
|
|
|
snprintf(dest + strlen(dest), sz - strlen(dest),
|
2013-09-10 20:56:01 +00:00
|
|
|
":%s:%s:%s:%s:%s", arch, wordsize_corres_str,
|
|
|
|
endian_corres_str, abi, fpu);
|
2013-03-05 13:31:06 +00:00
|
|
|
break;
|
|
|
|
case EM_MIPS:
|
|
|
|
/*
|
|
|
|
* this is taken from binutils sources:
|
|
|
|
* include/elf/mips.h
|
|
|
|
* mapping is figured out from binutils:
|
|
|
|
* gas/config/tc-mips.c
|
|
|
|
*/
|
|
|
|
switch (elfhdr.e_flags & EF_MIPS_ABI) {
|
|
|
|
case E_MIPS_ABI_O32:
|
|
|
|
abi = "o32";
|
|
|
|
break;
|
|
|
|
case E_MIPS_ABI_N32:
|
|
|
|
abi = "n32";
|
|
|
|
break;
|
|
|
|
default:
|
|
|
|
if (elfhdr.e_ident[EI_DATA] ==
|
|
|
|
ELFCLASS32)
|
|
|
|
abi = "o32";
|
|
|
|
else if (elfhdr.e_ident[EI_DATA] ==
|
|
|
|
ELFCLASS64)
|
|
|
|
abi = "n64";
|
|
|
|
break;
|
|
|
|
}
|
2013-09-10 20:56:01 +00:00
|
|
|
endian_corres_str = elf_corres_to_string(endian_corres,
|
|
|
|
(int)elfhdr.e_ident[EI_DATA]);
|
|
|
|
|
|
|
|
snprintf(dest + strlen(dest), sz - strlen(dest), ":%s:%s:%s:%s",
|
|
|
|
arch, wordsize_corres_str, endian_corres_str, abi);
|
2013-03-05 13:31:06 +00:00
|
|
|
break;
|
2013-09-10 20:56:01 +00:00
|
|
|
default:
|
|
|
|
snprintf(dest + strlen(dest), sz - strlen(dest), ":%s:%s",
|
|
|
|
arch, wordsize_corres_str);
|
2013-03-05 13:31:06 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
cleanup:
|
|
|
|
if (elf != NULL)
|
|
|
|
elf_end(elf);
|
|
|
|
|
|
|
|
close(fd);
|
|
|
|
return (ret);
|
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
|
|
|
subst_packagesite(const char *abi)
|
|
|
|
{
|
|
|
|
struct sbuf *newval;
|
|
|
|
const char *variable_string;
|
|
|
|
const char *oldval;
|
|
|
|
|
|
|
|
if (c[PACKAGESITE].value != NULL)
|
|
|
|
oldval = c[PACKAGESITE].value;
|
|
|
|
else
|
|
|
|
oldval = c[PACKAGESITE].val;
|
|
|
|
|
|
|
|
if ((variable_string = strstr(oldval, "${ABI}")) == NULL)
|
|
|
|
return;
|
|
|
|
|
|
|
|
newval = sbuf_new_auto();
|
|
|
|
sbuf_bcat(newval, oldval, variable_string - oldval);
|
|
|
|
sbuf_cat(newval, abi);
|
|
|
|
sbuf_cat(newval, variable_string + strlen("${ABI}"));
|
|
|
|
sbuf_finish(newval);
|
|
|
|
|
|
|
|
free(c[PACKAGESITE].value);
|
|
|
|
c[PACKAGESITE].value = strdup(sbuf_data(newval));
|
|
|
|
}
|
|
|
|
|
|
|
|
static void
|
2013-10-26 03:31:05 +00:00
|
|
|
config_parse(yaml_document_t *doc, yaml_node_t *node, pkg_conf_file_t conftype)
|
2013-03-05 13:31:06 +00:00
|
|
|
{
|
|
|
|
yaml_node_pair_t *pair;
|
|
|
|
yaml_node_t *key, *val;
|
|
|
|
struct sbuf *buf = sbuf_new_auto();
|
|
|
|
int i;
|
|
|
|
size_t j;
|
|
|
|
|
|
|
|
pair = node->data.mapping.pairs.start;
|
|
|
|
|
|
|
|
while (pair < node->data.mapping.pairs.top) {
|
|
|
|
key = yaml_document_get_node(doc, pair->key);
|
|
|
|
val = yaml_document_get_node(doc, pair->value);
|
|
|
|
|
|
|
|
/*
|
|
|
|
* ignoring silently empty keys can be empty lines
|
|
|
|
* or user mistakes
|
|
|
|
*/
|
|
|
|
if (key->data.scalar.length <= 0) {
|
|
|
|
++pair;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* silently skip on purpose to allow user to leave
|
|
|
|
* empty lines without complaining
|
|
|
|
*/
|
|
|
|
if (val->type == YAML_NO_NODE ||
|
|
|
|
(val->type == YAML_SCALAR_NODE &&
|
|
|
|
val->data.scalar.length <= 0)) {
|
|
|
|
++pair;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
sbuf_clear(buf);
|
|
|
|
|
2013-10-26 03:31:05 +00:00
|
|
|
if (conftype == CONFFILE_PKG) {
|
|
|
|
for (j = 0; j < strlen(key->data.scalar.value); ++j)
|
|
|
|
sbuf_putc(buf,
|
|
|
|
toupper(key->data.scalar.value[j]));
|
|
|
|
sbuf_finish(buf);
|
|
|
|
} else if (conftype == CONFFILE_REPO) {
|
|
|
|
/* The CONFFILE_REPO type is more restrictive. Only
|
|
|
|
parse known elements. */
|
|
|
|
if (strcasecmp(key->data.scalar.value, "url") == 0)
|
|
|
|
sbuf_cpy(buf, "PACKAGESITE");
|
|
|
|
else if (strcasecmp(key->data.scalar.value,
|
|
|
|
"mirror_type") == 0)
|
|
|
|
sbuf_cpy(buf, "MIRROR_TYPE");
|
2013-10-26 03:43:02 +00:00
|
|
|
else if (strcasecmp(key->data.scalar.value,
|
|
|
|
"signature_type") == 0)
|
|
|
|
sbuf_cpy(buf, "SIGNATURE_TYPE");
|
|
|
|
else if (strcasecmp(key->data.scalar.value,
|
|
|
|
"fingerprints") == 0)
|
|
|
|
sbuf_cpy(buf, "FINGERPRINTS");
|
2013-10-26 03:31:05 +00:00
|
|
|
else { /* Skip unknown entries for future use. */
|
|
|
|
++pair;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
sbuf_finish(buf);
|
|
|
|
}
|
|
|
|
|
2013-03-05 13:31:06 +00:00
|
|
|
for (i = 0; i < CONFIG_SIZE; i++) {
|
|
|
|
if (strcmp(sbuf_data(buf), c[i].key) == 0)
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
2013-10-26 03:31:05 +00:00
|
|
|
/* Silently skip unknown keys to be future compatible. */
|
2013-03-05 13:31:06 +00:00
|
|
|
if (i == CONFIG_SIZE) {
|
|
|
|
++pair;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* env has priority over config file */
|
|
|
|
if (c[i].envset) {
|
|
|
|
++pair;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
c[i].value = strdup(val->data.scalar.value);
|
|
|
|
++pair;
|
|
|
|
}
|
|
|
|
|
|
|
|
sbuf_delete(buf);
|
|
|
|
}
|
|
|
|
|
2013-10-26 03:31:05 +00:00
|
|
|
/*-
|
|
|
|
* Parse new repo style configs in style:
|
|
|
|
* Name:
|
|
|
|
* URL:
|
|
|
|
* MIRROR_TYPE:
|
|
|
|
* etc...
|
|
|
|
*/
|
|
|
|
static void
|
|
|
|
parse_repo_file(yaml_document_t *doc, yaml_node_t *node)
|
2013-03-05 13:31:06 +00:00
|
|
|
{
|
2013-10-26 03:31:05 +00:00
|
|
|
yaml_node_pair_t *pair;
|
2013-03-05 13:31:06 +00:00
|
|
|
|
2013-10-26 03:31:05 +00:00
|
|
|
pair = node->data.mapping.pairs.start;
|
|
|
|
while (pair < node->data.mapping.pairs.top) {
|
|
|
|
yaml_node_t *key = yaml_document_get_node(doc, pair->key);
|
|
|
|
yaml_node_t *val = yaml_document_get_node(doc, pair->value);
|
|
|
|
|
|
|
|
if (key->data.scalar.length <= 0) {
|
|
|
|
++pair;
|
|
|
|
continue;
|
2013-03-05 13:31:06 +00:00
|
|
|
}
|
2013-10-26 03:31:05 +00:00
|
|
|
|
|
|
|
if (val->type != YAML_MAPPING_NODE) {
|
|
|
|
++pair;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
config_parse(doc, val, CONFFILE_REPO);
|
|
|
|
++pair;
|
2013-03-05 13:31:06 +00:00
|
|
|
}
|
2013-10-26 03:31:05 +00:00
|
|
|
}
|
2013-03-05 13:31:06 +00:00
|
|
|
|
2013-10-26 03:31:05 +00:00
|
|
|
|
|
|
|
static int
|
|
|
|
read_conf_file(const char *confpath, pkg_conf_file_t conftype)
|
|
|
|
{
|
|
|
|
FILE *fp;
|
|
|
|
yaml_parser_t parser;
|
|
|
|
yaml_document_t doc;
|
|
|
|
yaml_node_t *node;
|
2013-03-05 13:31:06 +00:00
|
|
|
|
|
|
|
if ((fp = fopen(confpath, "r")) == NULL) {
|
|
|
|
if (errno != ENOENT)
|
2013-10-26 03:21:08 +00:00
|
|
|
err(EXIT_FAILURE, "Unable to open configuration "
|
|
|
|
"file %s", confpath);
|
2013-03-05 13:31:06 +00:00
|
|
|
/* no configuration present */
|
2013-10-26 03:31:05 +00:00
|
|
|
return (1);
|
2013-03-05 13:31:06 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
yaml_parser_initialize(&parser);
|
|
|
|
yaml_parser_set_input_file(&parser, fp);
|
|
|
|
yaml_parser_load(&parser, &doc);
|
|
|
|
|
|
|
|
node = yaml_document_get_root_node(&doc);
|
|
|
|
|
2013-10-26 03:31:05 +00:00
|
|
|
if (node == NULL || node->type != YAML_MAPPING_NODE)
|
2013-10-26 03:21:08 +00:00
|
|
|
warnx("Invalid configuration format, ignoring the "
|
2013-10-26 03:31:05 +00:00
|
|
|
"configuration file %s", confpath);
|
|
|
|
else {
|
|
|
|
if (conftype == CONFFILE_PKG)
|
|
|
|
config_parse(&doc, node, conftype);
|
|
|
|
else if (conftype == CONFFILE_REPO)
|
|
|
|
parse_repo_file(&doc, node);
|
2013-03-05 13:31:06 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
yaml_document_delete(&doc);
|
|
|
|
yaml_parser_delete(&parser);
|
|
|
|
|
2013-10-26 03:31:05 +00:00
|
|
|
return (0);
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
config_init(void)
|
|
|
|
{
|
|
|
|
const char *val;
|
|
|
|
int i;
|
|
|
|
const char *localbase;
|
|
|
|
char confpath[MAXPATHLEN];
|
|
|
|
char abi[BUFSIZ];
|
|
|
|
|
|
|
|
for (i = 0; i < CONFIG_SIZE; i++) {
|
|
|
|
val = getenv(c[i].key);
|
|
|
|
if (val != NULL) {
|
|
|
|
c[i].val = val;
|
|
|
|
c[i].envset = true;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
localbase = getenv("LOCALBASE") ? getenv("LOCALBASE") : _LOCALBASE;
|
|
|
|
snprintf(confpath, sizeof(confpath), "%s/etc/pkg.conf",
|
|
|
|
localbase);
|
|
|
|
|
|
|
|
if (access(confpath, F_OK) == 0 && read_conf_file(confpath,
|
|
|
|
CONFFILE_PKG))
|
|
|
|
goto finalize;
|
|
|
|
|
|
|
|
snprintf(confpath, sizeof(confpath), "/etc/pkg/FreeBSD.conf");
|
|
|
|
if (access(confpath, F_OK) == 0 && read_conf_file(confpath,
|
|
|
|
CONFFILE_REPO))
|
|
|
|
goto finalize;
|
|
|
|
|
2013-03-05 13:31:06 +00:00
|
|
|
finalize:
|
|
|
|
if (c[ABI].val == NULL && c[ABI].value == NULL) {
|
|
|
|
if (pkg_get_myabi(abi, BUFSIZ) != 0)
|
2013-10-26 03:21:08 +00:00
|
|
|
errx(EXIT_FAILURE, "Failed to determine the system "
|
|
|
|
"ABI");
|
2013-03-05 13:31:06 +00:00
|
|
|
c[ABI].val = abi;
|
|
|
|
}
|
|
|
|
|
2013-03-05 14:08:36 +00:00
|
|
|
subst_packagesite(c[ABI].value != NULL ? c[ABI].value : c[ABI].val);
|
2013-03-05 13:31:06 +00:00
|
|
|
|
|
|
|
return (0);
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
config_string(pkg_config_key k, const char **val)
|
|
|
|
{
|
|
|
|
if (c[k].type != PKG_CONFIG_STRING)
|
|
|
|
return (-1);
|
|
|
|
|
|
|
|
if (c[k].value != NULL)
|
|
|
|
*val = c[k].value;
|
|
|
|
else
|
|
|
|
*val = c[k].val;
|
|
|
|
|
|
|
|
return (0);
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
config_bool(pkg_config_key k, bool *val)
|
|
|
|
{
|
|
|
|
const char *value;
|
|
|
|
|
|
|
|
if (c[k].type != PKG_CONFIG_BOOL)
|
|
|
|
return (-1);
|
|
|
|
|
|
|
|
*val = false;
|
|
|
|
|
|
|
|
if (c[k].value != NULL)
|
|
|
|
value = c[k].value;
|
|
|
|
else
|
|
|
|
value = c[k].val;
|
|
|
|
|
|
|
|
if (strcasecmp(value, "true") == 0 ||
|
|
|
|
strcasecmp(value, "yes") == 0 ||
|
|
|
|
strcasecmp(value, "on") == 0 ||
|
|
|
|
*value == '1')
|
|
|
|
*val = true;
|
|
|
|
|
|
|
|
return (0);
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
config_finish(void) {
|
|
|
|
int i;
|
|
|
|
|
|
|
|
for (i = 0; i < CONFIG_SIZE; i++)
|
|
|
|
free(c[i].value);
|
|
|
|
}
|