pd.if.org Git - zpackage/blob - 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 }