1 #define _POSIX_C_SOURCE 200809L
11 #include "lib/jsw/jsw_atree.h"
13 #define DMARK fprintf(stderr, "mark %s %s:%d\n", __FILE__, __func__, __LINE__)
16 * flags 0 = find installed
17 * flags 1 = skip installed
18 * flags 2 = skip not installed
21 struct zpm_package *zpm_package_alloc(struct zpm *zpm) {
22 struct zpm_package *pkg;
24 pkg = malloc(sizeof *pkg);
32 void zpm_sqlite_error(struct zpm *zpm) {
34 if (zpm->errmsg) free(zpm->errmsg);
35 zpm->errmsg = strdup((const char *)sqlite3_errmsg(zpm->db));
38 char *zpm_findlib(struct zpm *zpm, char *soname, char *where) {
39 char *select = "select pkgid, package, version, release from packagefiles_status join elflibraries on file = hash";
40 char *group = "order by package, version collate vercmp desc, cast(release as integer)";
42 char *query, *pkgid = 0;
44 /* null pkgstr find "best" package
45 * best is shortest complete package if any are complete
46 * shortest incomplete if any are incomplete
47 * where more than one version is in those sets, best is
48 * latest as determined by vercmp
51 sql = sqlite3_str_new(zpm->db);
53 sqlite3_str_appendall(sql, select);
54 sqlite3_str_appendf(sql, " where soname = %Q", soname);
57 sqlite3_str_appendall(sql, " and ");
58 sqlite3_str_appendall(sql, where);
61 sqlite3_str_appendall(sql, " ");
62 sqlite3_str_appendall(sql, group);
63 sqlite3_str_appendall(sql, " limit 1;");
65 if (sqlite3_str_errcode(sql)) {
67 sqlite3_free(sqlite3_str_finish(sql));
71 query = sqlite3_str_finish(sql);
73 pkgid = zpm_db_string(zpm, query);;
80 int zpm_libraries_needed(struct zpm *zpm, char *pkgid, jsw_atree_t *list) {
81 char *pkglibsneeded = "\
83 select distinct EN.needed as soname, PF.pkgid\
85 join packagefiles_pkgid PF on PF.hash = EN.file\
88 select distinct EL.soname, PF.pkgid\
90 join packagefiles_pkgid PF on PF.hash = EL.file\
92 select distinct PL.soname, PP.soname is not null as selfsatisfied\
94 left join pkgprovides PP on PL.pkgid = PP.pkgid and PL.soname = PP.soname\
102 st = zpm_dbquery(zpm, pkglibsneeded, pkgid);
104 while ((rv = sqlite3_step(st)) == SQLITE_ROW) {
108 soname = (char *)sqlite3_column_text(st, 0);
109 /* TODO check and skip self sats */
110 self = sqlite3_column_int(st,1);
116 /* if it's in needed, we've already looked at this one */
117 if (list && !jsw_afind(list, soname)) {
118 jsw_ainsert(list, soname);
122 sqlite3_finalize(st);
126 char *zpm_findpkg(struct zpm *zpm, char *pkgstr, char *where) {
127 char *select = "select pkgid, package, version, release from packages_pkgid";
129 char *group = "group by package having max( version||'-'||release collate vercmp) order by length(package), package, version||'-'||release collate vercmp";
131 char *group = "order by package, version collate vercmp desc, cast(release as integer)";
132 //group = "order by package, version , cast(release as integer)";
135 char *query, *pkgid = 0;
137 /* null pkgstr find "best" package
138 * best is shortest complete package if any are complete
139 * shortest incomplete if any are incomplete
140 * where more than one version is in those sets, best is
141 * latest as determined by vercmp
144 sql = sqlite3_str_new(zpm->db);
146 sqlite3_str_appendall(sql, select);
147 sqlite3_str_appendall(sql, " where true");
154 zpm_parse_package(pkgstr, package, version, &release);
156 sqlite3_str_appendf(sql, " and package = %Q",
160 sqlite3_str_appendf(sql, " and version = %Q",
164 sqlite3_str_appendf(sql, " and release = %d",
170 sqlite3_str_appendall(sql, " and ");
171 sqlite3_str_appendall(sql, where);
175 sqlite3_str_appendall(sql, " ");
176 sqlite3_str_appendall(sql, group);
177 sqlite3_str_appendall(sql, " limit 1;");
179 if (sqlite3_str_errcode(sql)) {
181 sqlite3_free(sqlite3_str_finish(sql));
185 query = sqlite3_str_finish(sql);
187 pkgid = zpm_db_string(zpm, query);;