/*
* repo_products.c
*
* Parses all files below 'proddir'
* See http://en.opensuse.org/Product_Management/Code11
*
*
* Copyright (c) 2008, Novell Inc.
*
* This program is licensed under the BSD license, read LICENSE.BSD
* for further information
*/
#include <sys/types.h>
#include <unistd.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <assert.h>
#include <dirent.h>
#include <ctype.h>
#include <errno.h>
#include "pool.h"
#include "repo.h"
#include "util.h"
#define DISABLE_SPLIT
#include "tools_util.h"
#include "repo_releasefile_products.h"
#define BUFF_SIZE 8192
struct parsedata {
Repo *repo;
struct joindata jd;
};
static void
add_releasefile_product(struct parsedata *pd, FILE *fp)
{
Repo *repo = pd->repo;
Pool *pool = repo->pool;
char buf[BUFF_SIZE];
Id name = 0;
Id arch = 0;
Id version = 0;
int lnum = 0; /* line number */
char *ptr, *ptr1;
/* parse /etc/<xyz>-release file */
while (fgets(buf, sizeof(buf), fp))
{
/* remove trailing \n */
int l = strlen(buf);
if (l && buf[l - 1] == '\n')
buf[--l] = 0;
++lnum;
if (lnum == 1)
{
/* 1st line, <name> [(<arch>)] */
ptr = strchr(buf, '(');
if (ptr)
{
ptr1 = ptr - 1;
*ptr++ = 0;
}
else
ptr1 = buf + l - 1;
/* track back until non-blank, non-digit */
while (ptr1 > buf
&& (*ptr1 == ' ' || isdigit(*ptr1) || *ptr1 == '.'))
--ptr1;
*(++ptr1) = 0;
name = pool_str2id(pool, join2(&pd->jd, "product", ":", buf), 1);
if (ptr)
{
/* have arch */
char *ptr1 = strchr(ptr, ')');
if (ptr1)
{
*ptr1 = 0;
/* downcase arch */
ptr1 = ptr;
while (*ptr1)
{
if (isupper(*ptr1))
*ptr1 = tolower(*ptr1);
++ptr1;
}
arch = pool_str2id(pool, ptr, 1);
}
}
}
else if (strncmp(buf, "VERSION", 7) == 0)
{
ptr = strchr(buf + 7, '=');
if (ptr)
{
while (*++ptr == ' ')
;
version = makeevr(pool, ptr);
}
}
}
if (name)
{
Solvable *s = pool_id2solvable(pool, repo_add_solvable(repo));
s->name = name;
s->evr = version ? version : ID_EMPTY;
s->arch = arch ? arch : ARCH_NOARCH;
if (s->name && s->arch != ARCH_SRC && s->arch != ARCH_NOSRC)
s->provides = repo_addid_dep(repo, s->provides, pool_rel2id(pool, s->name, s->evr, REL_EQ, 1), 0);
}
}
int
repo_add_releasefile_products(Repo *repo, const char *dirpath, int flags)
{
DIR *dir;
struct dirent *entry;
FILE *fp;
char *fullpath;
struct parsedata pd;
if (!dirpath)
dirpath = "/etc";
if (flags & REPO_USE_ROOTDIR)
dirpath = pool_prepend_rootdir(repo->pool, dirpath);
dir = opendir(dirpath);
if (!dir)
{
if (flags & REPO_USE_ROOTDIR)
solv_free((char *)dirpath);
return 0;
}
memset(&pd, 0, sizeof(pd));
pd.repo = repo;
while ((entry = readdir(dir)))
{
int len = strlen(entry->d_name);
if (len > 8 && !strcmp(entry->d_name + len - 8, "-release"))
{
/* skip /etc/lsb-release, thats not a product per-se */
if (strcmp(entry->d_name, "lsb-release") == 0)
continue;
fullpath = join2(&pd.jd, dirpath, "/", entry->d_name);
if ((fp = fopen(fullpath, "r")) == 0)
{
pool_error(repo->pool, 0, "%s: %s", fullpath, strerror(errno));
continue;
}
add_releasefile_product(&pd, fp);
fclose(fp);
}
}
closedir(dir);
join_freemem(&pd.jd);
if (flags & REPO_USE_ROOTDIR)
solv_free((char *)dirpath);
if (!(flags & REPO_NO_INTERNALIZE) && (flags & REPO_REUSE_REPODATA) != 0)
repodata_internalize(repo_last_repodata(repo));
return 0;
}