libopkg/pkg_vec.c

   1 /* pkg_vec.c - the opkg package management system
   2
   3    Steven M. Ayer
   4
   5    Copyright (C) 2002 Compaq Computer Corporation
   6
   7    This program is free software; you can redistribute it and/or
   8    modify it under the terms of the GNU General Public License as
   9    published by the Free Software Foundation; either version 2, or (at
  10    your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful, but
  13    WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15    General Public License for more details.
  16 */
  17
  18 #include "includes.h"
  19 #include <fnmatch.h>
  20 #include "xregex.h"
  21 #include "pkg.h"
  22 #include "opkg_message.h"
  23
  24 pkg_vec_t * pkg_vec_alloc(void)
  25 {
  26     pkg_vec_t * vec = (pkg_vec_t *)calloc(1, sizeof(pkg_vec_t));
  27     if (!vec) {
  28       fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
  29       return NULL;
  30     }
  31     vec->pkgs = NULL;
  32     vec->len = 0;
  33
  34     return vec;
  35 }
  36
  37 void pkg_vec_free(pkg_vec_t *vec)
  38 {
  39     if (!vec)
  40       return;
  41
  42     if (vec->pkgs)
  43       free(vec->pkgs);
  44
  45     free(vec);
  46 }
  47
  48 /*
  49  * assumption: all names in a vector are identical
  50  * assumption: all version strings are trimmed,
  51  *             so identical versions have identical version strings,
  52  *             implying identical packages; let's marry these
  53  */
  54 pkg_t *pkg_vec_insert_merge(pkg_vec_t *vec, pkg_t *pkg, int set_status,opkg_conf_t *conf)
  55 {
  56      int i;
  57      int found = 0;
  58
  59      /* look for a duplicate pkg by name, version, and architecture */
  60      for (i = 0; i < vec->len; i++){
  61          opkg_message(conf, OPKG_DEBUG2, "Function: %s. Found pkg=%s version=%s arch=%s cmp=%s version=%s arch=%s \n",
  62                       __FUNCTION__, pkg->name, pkg->version, pkg->architecture,
  63                        vec->pkgs[i]->name, vec->pkgs[i]->version,vec->pkgs[i]->architecture );
  64           if ((strcmp(pkg->name, vec->pkgs[i]->name) == 0)
  65               && (pkg_compare_versions(pkg, vec->pkgs[i]) == 0)
  66               && (strcmp(pkg->architecture, vec->pkgs[i]->architecture) == 0)) {
  67                found  = 1;
  68                opkg_message(conf, OPKG_DEBUG2, "Function: %s. Found duplicate for pkg=%s version=%s arch=%s\n",
  69                              __FUNCTION__, pkg->name, pkg->version, pkg->architecture);
  70                break;
  71           }
  72      }
  73
  74      /* we didn't find one, add it */
  75      if (!found){
  76          opkg_message(conf, OPKG_DEBUG2, "Function: %s. Adding new pkg=%s version=%s arch=%s\n",
  77                       __FUNCTION__, pkg->name, pkg->version, pkg->architecture);
  78
  79           vec->pkgs = (pkg_t **)realloc(vec->pkgs, (vec->len + 1) * sizeof(pkg_t *));
  80           vec->pkgs[vec->len] = pkg;
  81           vec->len++;
  82           return pkg;
  83      }
  84      /* update the one that we have */
  85      else {
  86           opkg_message(conf, OPKG_DEBUG2, "Function: %s. calling pkg_merge for pkg=%s version=%s arch=%s",
  87                         __FUNCTION__, pkg->name, pkg->version, pkg->architecture);
  88           if (set_status) {
  89                /* this is from the status file, so need to merge with existing database */
  90                opkg_message(conf, OPKG_DEBUG2, " with set_status\n");
  91                pkg_merge(vec->pkgs[i], pkg, set_status);
  92                /* XXX: CLEANUP: It's not so polite to free something here
  93                   that was passed in from above. */
  94                pkg_deinit(pkg);
  95                free(pkg);
  96           } else {
  97                opkg_message(conf, OPKG_DEBUG2, " WITHOUT set_status\n");
  98                /* just overwrite the old one */
  99                pkg_deinit(vec->pkgs[i]);
 100                free(vec->pkgs[i]);
 101                vec->pkgs[i] = pkg;
 102           }
 103           return vec->pkgs[i];
 104      }
 105 }
 106
 107 void pkg_vec_insert(pkg_vec_t *vec, const pkg_t *pkg)
 108 {
 109     pkg_t **tmp;
 110     tmp = realloc(vec->pkgs, (vec->len + 1) * sizeof(pkg_t *));
 111     if (tmp == NULL) {
 112         fprintf(stderr, "%s: %s\n", __FUNCTION__, strerror(errno));
 113         return;
 114     }
 115     vec->pkgs = tmp;
 116     vec->pkgs[vec->len] = (pkg_t *)pkg;
 117     vec->len++;
 118 }
 119
 120 int pkg_vec_contains(pkg_vec_t *vec, pkg_t *apkg)
 121 {
 122      int i;
 123      for (i = 0; i < vec->len; i++)
 124           if (vec->pkgs[i] == apkg)
 125                return 1;
 126      return 0;
 127 }
 128
 129 void pkg_vec_sort(pkg_vec_t *vec, compare_fcn_t compar)
 130 {
 131      qsort(vec->pkgs, vec->len, sizeof(pkg_t *), compar);
 132 }
 133
 134 int pkg_vec_clear_marks(pkg_vec_t *vec)
 135 {
 136      int npkgs = vec->len;
 137      int i;
 138      for (i = 0; i < npkgs; i++) {
 139           pkg_t *pkg = vec->pkgs[i];
 140           pkg->state_flag &= ~SF_MARKED;
 141      }
 142      return 0;
 143 }
 144
 145 int pkg_vec_mark_if_matches(pkg_vec_t *vec, const char *pattern)
 146 {
 147      int matching_count = 0;
 148      pkg_t **pkgs = vec->pkgs;
 149      int npkgs = vec->len;
 150      int i;
 151      for (i = 0; i < npkgs; i++) {
 152           pkg_t *pkg = pkgs[i];
 153           if (fnmatch(pattern, pkg->name, 0)==0) {
 154                pkg->state_flag |= SF_MARKED;
 155                matching_count++;
 156           }
 157      }
 158      return matching_count;
 159 }
 160
 161
 162 abstract_pkg_vec_t * abstract_pkg_vec_alloc(void)
 163 {
 164     abstract_pkg_vec_t * vec ;
 165     vec = (abstract_pkg_vec_t *)calloc(1, sizeof(abstract_pkg_vec_t));
 166     if (!vec) {
 167       fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
 168       return NULL;
 169     }
 170     vec->pkgs = NULL;
 171     vec->len = 0;
 172
 173     return vec;
 174 }
 175
 176 void abstract_pkg_vec_free(abstract_pkg_vec_t *vec)
 177 {
 178     if (!vec)
 179       return;
 180     free(vec->pkgs);
 181     free(vec);
 182 }
 183
 184 /*
 185  * assumption: all names in a vector are unique
 186  */
 187 void abstract_pkg_vec_insert(abstract_pkg_vec_t *vec, abstract_pkg_t *pkg)
 188 {
 189     vec->pkgs = (abstract_pkg_t **) realloc(vec->pkgs, (vec->len + 1) * sizeof(abstract_pkg_t *));
 190     vec->pkgs[vec->len] = pkg;
 191     vec->len++;
 192 }
 193
 194 abstract_pkg_t * abstract_pkg_vec_get(abstract_pkg_vec_t *vec, int i)
 195 {
 196     if (vec->len > i)
 197         return vec->pkgs[i];
 198     else
 199         return NULL;
 200 }
 201
 202 int abstract_pkg_vec_contains(abstract_pkg_vec_t *vec, abstract_pkg_t *apkg)
 203 {
 204      int i;
 205      for (i = 0; i < vec->len; i++)
 206           if (vec->pkgs[i] == apkg)
 207                return 1;
 208      return 0;
 209 }
 210
 211 void abstract_pkg_vec_sort(pkg_vec_t *vec, compare_fcn_t compar)
 212 {
 213      qsort(vec->pkgs, vec->len, sizeof(pkg_t *), compar);
 214 }
 215
 216 int pkg_compare_names(const void *p1, const void *p2)
 217 {
 218   const pkg_t *pkg1 = *(const pkg_t **)p1;
 219   const pkg_t *pkg2 = *(const pkg_t **)p2;
 220   if (pkg1->name == NULL)
 221     return 1;
 222   if (pkg2->name == NULL)
 223     return -1;
 224   return(strcmp(pkg1->name, pkg2->name));
 225 }
 226