]> pd.if.org Git - zpackage/blob - lib/findpkg.c
add error checks to foreach_path
[zpackage] / lib / findpkg.c
1 #define _POSIX_C_SOURCE 200809L
2
3 #include <stdlib.h>
4 #include <stdio.h>
5 #include <string.h>
6 #include <ctype.h>
7
8 #include "zpm.h"
9
10 #include "sqlite3.h"
11
12 #define DMARK fprintf(stderr, "mark %s %s:%d\n", __FILE__, __func__, __LINE__)
13
14 int zpm_parse_package(char *pstr, char *name, char *ver, int *rel) {
15         if (name) *name = 0;
16         if (ver) *ver = 0;
17         if (rel) *rel = 0;
18         int havename = 0;
19         int havever = 0;
20         int haverel = 0;
21
22         /* string - ver - rel */
23         /* rel is all digits */
24         /* possible forms:
25          * ^(.+)-([0-9][^-]*)-([\d+])$
26          * ^(.+)-([0-9][^-]*)$
27          * ^(.+)$
28          * The main problem in parsing is that the package name itself
29          * can contain a '-', so you can't just split on '-'
30          * Also, the version can be just digits.
31          */
32
33         /* everything up to the first '-' is in the name */
34         while (*pstr) {
35                 if (*pstr == '\'' || !isgraph(*pstr)) {
36                         return 0;
37                 }
38                 if (*pstr == '-' && isdigit(*(pstr+1))) {
39                         break;
40                 }
41                 if (name) {
42                         *name++ = *pstr;
43                 }
44                 pstr++;
45                 havename = 1;
46         }
47         if (name) *name = 0;
48         if (*pstr == '-') {
49                 pstr++;
50         }
51         while (*pstr && *pstr != '-') {
52                 if (*pstr == '\'' || !isgraph(*pstr)) {
53                         return 0;
54                 }
55                 if (ver) {
56                         *ver++ = *pstr;
57                 }
58                 pstr++;
59                 havever = 1;
60         }
61         if (ver) *ver = 0;
62         if (*pstr == '-') {
63                 pstr++;
64         }
65         /* TODO use strtol */
66         if (rel && *pstr) {
67                 haverel = 1;
68                 *rel = atoi(pstr);
69         }
70
71         return havename + havever + haverel;
72 }
73
74 /*
75  * flags 0 = find installed
76  * flags 1 = skip installed
77  * flags 2 = skip not installed
78  */
79
80 struct zpm_package *zpm_package_alloc(struct zpm *zpm) {
81         struct zpm_package *pkg;
82
83         pkg = malloc(sizeof *pkg);
84         if (pkg) {
85                 pkg->zpm = zpm;
86                 pkg->release = 0;
87         }
88         return pkg;
89 }
90
91 void zpm_sqlite_error(struct zpm *zpm) {
92         zpm->error = 1;
93         if (zpm->errmsg) free(zpm->errmsg);
94         zpm->errmsg = strdup((const char *)sqlite3_errmsg(zpm->db));
95 }
96
97 char *zpm_findpkg(struct zpm *zpm, char *pkgstr) {
98         char *select = "select pkgid, package, version, release from packages_pkgid";
99         char *group = "group by package having max( version||'-'||release collate vercmp) order by length(package), package, version||'-'||release collate vercmp";
100 #if 0
101         char *sstr[] = {
102                 "status = 'installed'",
103                 "",
104                 "status != 'installed'"
105         };
106 #endif
107
108 //      char *order = "order by package, version collate vercmp, cast(release as integer)";
109         sqlite3_str *sql;
110         sqlite3_stmt *stmt;
111         char *query, *pkgid = 0;
112         char package[32];
113         char version[32];
114         int release;
115
116         if (pkgstr == NULL) {
117                 fprintf(stderr, "trying to parse null string\n");
118                 return NULL;
119         }
120
121         /* null pkgstr find "best" package
122          * best is shortest complete package if any are complete
123          * shortest incomplete if any are incomplete
124          * where more than one version is in those sets, best is
125          * latest as determined by vercmp
126          */
127
128         /* given a package name, get the packages */
129         /* no package name, get all */
130
131         //              char where[1024] = "";
132
133         zpm_parse_package(pkgstr, package, version, &release);
134
135         /* install a collation function */
136         zpm_addvercmp(zpm);
137
138         /* TODO allow more args to nail down version and release */
139
140         sql = sqlite3_str_new(zpm->db);
141         sqlite3_str_appendall(sql, select);
142         sqlite3_str_appendf(sql, " where package = %Q", package);
143         if (*version) {
144                 sqlite3_str_appendf(sql, " and version = %Q", version);
145         }
146         if (release) {
147                 sqlite3_str_appendf(sql, " and release = %d", release);
148         }
149         sqlite3_str_appendf(sql, " %s", group);
150         sqlite3_str_appendf(sql, " limit 1");
151
152         if (sqlite3_str_errcode(sql)) {
153                 zpm->error = 1;
154                 sqlite3_free(sqlite3_str_finish(sql));
155                 return 0;
156         }
157
158         query = sqlite3_str_finish(sql);
159         sqlite3_prepare_v2(zpm->db, query, strlen(query), &stmt, NULL);
160         sqlite3_free(query);
161
162 #if 0
163         if (zpm->pkgid) {
164                 free(zpm->pkgid);
165         }
166         zpm->pkgid = 0;
167 #endif
168
169         switch (sqlite3_step(stmt)) {
170                 case SQLITE_ROW:
171                         pkgid = strdup((const char *)sqlite3_column_text(stmt, 0));
172                         break;
173                 case SQLITE_DONE:
174                         /* not found */
175                         break;
176                 default:
177                         zpm_sqlite_error(zpm);
178                         break;
179         }
180         sqlite3_finalize(stmt);
181
182         return pkgid;
183 }