pd.if.org Git - zpackage/blob - lib/findpkg.c

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