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