src/repo.c

   1 /*
   2  * Copyright (c) 2007, Novell Inc.
   3  *
   4  * This program is licensed under the BSD license, read LICENSE.BSD
   5  * for further information
   6  */
   7
   8 /*
   9  * repo.c
  10  *
  11  * Manage metadata coming from one repository
  12  *
  13  */
  14
  15 #define _GNU_SOURCE
  16 #include <string.h>
  17 #include <fnmatch.h>
  18
  19 #include <stdio.h>
  20 #include <stdlib.h>
  21
  22
  23
  24 #include "repo.h"
  25 #include "pool.h"
  26 #include "poolid_private.h"
  27 #include "util.h"
  28 #include "chksum.h"
  29
  30 #define IDARRAY_BLOCK     4095
  31
  32
  33 /*
  34  * create empty repo
  35  * and add to pool
  36  */
  37
  38 Repo *
  39 repo_create(Pool *pool, const char *name)
  40 {
  41   Repo *repo;
  42
  43   pool_freewhatprovides(pool);
  44   repo = (Repo *)solv_calloc(1, sizeof(*repo));
  45   if (!pool->nrepos)
  46     {
  47       pool->nrepos = 1; /* start with repoid 1 */
  48       pool->repos = (Repo **)solv_calloc(2, sizeof(Repo *));
  49     }
  50   else
  51     pool->repos = (Repo **)solv_realloc2(pool->repos, pool->nrepos + 1, sizeof(Repo *));
  52   pool->repos[pool->nrepos] = repo;
  53   pool->urepos++;
  54   repo->repoid = pool->nrepos++;
  55   repo->name = name ? solv_strdup(name) : 0;
  56   repo->pool = pool;
  57   repo->start = pool->nsolvables;
  58   repo->end = pool->nsolvables;
  59   repo->nsolvables = 0;
  60   return repo;
  61 }
  62
  63 void
  64 repo_freedata(Repo *repo)
  65 {
  66   int i;
  67   for (i = 1; i < repo->nrepodata; i++)
  68     repodata_freedata(repo->repodata + i);
  69   solv_free(repo->repodata);
  70   solv_free(repo->idarraydata);
  71   solv_free(repo->rpmdbid);
  72   solv_free(repo->lastidhash);
  73   solv_free((char *)repo->name);
  74   solv_free(repo);
  75 }
  76
  77 /* delete all solvables and repodata blocks from this repo */
  78
  79 void
  80 repo_empty(Repo *repo, int reuseids)
  81 {
  82   Pool *pool = repo->pool;
  83   Solvable *s;
  84   int i;
  85
  86   pool_freewhatprovides(pool);
  87   if (reuseids && repo->end == pool->nsolvables)
  88     {
  89       /* it's ok to reuse the ids. As this is the last repo, we can
  90          just shrink the solvable array */
  91       for (i = repo->end - 1, s = pool->solvables + i; i >= repo->start; i--, s--)
  92         if (s->repo != repo)
  93           break;
  94       pool_free_solvable_block(pool, i + 1, repo->end - (i + 1), reuseids);
  95     }
  96   /* zero out (i.e. free) solvables belonging to this repo */
  97   for (i = repo->start, s = pool->solvables + i; i < repo->end; i++, s++)
  98     if (s->repo == repo)
  99       memset(s, 0, sizeof(*s));
 100   repo->nsolvables = 0;
 101
 102   /* free all data belonging to this repo */
 103   repo->idarraydata = solv_free(repo->idarraydata);
 104   repo->idarraysize = 0;
 105   repo->lastoff = 0;
 106   repo->rpmdbid = solv_free(repo->rpmdbid);
 107   for (i = 1; i < repo->nrepodata; i++)
 108     repodata_freedata(repo->repodata + i);
 109   solv_free(repo->repodata);
 110   repo->repodata = 0;
 111   repo->nrepodata = 0;
 112 }
 113
 114 /*
 115  * remove repo from pool, delete solvables
 116  *
 117  */
 118
 119 void
 120 repo_free(Repo *repo, int reuseids)
 121 {
 122   Pool *pool = repo->pool;
 123   int i;
 124
 125   if (repo == pool->installed)
 126     pool->installed = 0;
 127   repo_empty(repo, reuseids);
 128   for (i = 1; i < pool->nrepos; i++)    /* find repo in pool */
 129     if (pool->repos[i] == repo)
 130       break;
 131   if (i == pool->nrepos)               /* repo not in pool, return */
 132     return;
 133   if (i == pool->nrepos - 1 && reuseids)
 134     pool->nrepos--;
 135   else
 136     pool->repos[i] = 0;
 137   pool->urepos--;
 138   repo_freedata(repo);
 139 }
 140
 141 Id
 142 repo_add_solvable(Repo *repo)
 143 {
 144   Id p = pool_add_solvable(repo->pool);
 145   if (!repo->start || repo->start == repo->end)
 146     repo->start = repo->end = p;
 147   /* warning: sidedata must be extended before adapting start/end */
 148   if (repo->rpmdbid)
 149     repo->rpmdbid = (Id *)repo_sidedata_extend(repo, repo->rpmdbid, sizeof(Id), p, 1);
 150   if (p < repo->start)
 151     repo->start = p;
 152   if (p + 1 > repo->end)
 153     repo->end = p + 1;
 154   repo->nsolvables++;
 155   repo->pool->solvables[p].repo = repo;
 156   return p;
 157 }
 158
 159 Id
 160 repo_add_solvable_block(Repo *repo, int count)
 161 {
 162   Id p;
 163   Solvable *s;
 164   if (!count)
 165     return 0;
 166   p = pool_add_solvable_block(repo->pool, count);
 167   if (!repo->start || repo->start == repo->end)
 168     repo->start = repo->end = p;
 169   /* warning: sidedata must be extended before adapting start/end */
 170   if (repo->rpmdbid)
 171     repo->rpmdbid = (Id *)repo_sidedata_extend(repo, repo->rpmdbid, sizeof(Id), p, count);
 172   if (p < repo->start)
 173     repo->start = p;
 174   if (p + count > repo->end)
 175     repo->end = p + count;
 176   repo->nsolvables += count;
 177   for (s = repo->pool->solvables + p; count--; s++)
 178     s->repo = repo;
 179   return p;
 180 }
 181
 182 void
 183 repo_free_solvable(Repo *repo, Id p, int reuseids)
 184 {
 185   repo_free_solvable_block(repo, p, 1, reuseids);
 186 }
 187
 188 void
 189 repo_free_solvable_block(Repo *repo, Id start, int count, int reuseids)
 190 {
 191   Solvable *s;
 192   Repodata *data;
 193   int i;
 194   if (start + count == repo->end)
 195     repo->end -= count;
 196   repo->nsolvables -= count;
 197   for (s = repo->pool->solvables + start, i = count; i--; s++)
 198     s->repo = 0;
 199   pool_free_solvable_block(repo->pool, start, count, reuseids);
 200   FOR_REPODATAS(repo, i, data)
 201     {
 202       int dstart, dend;
 203       if (data->end > repo->end)
 204         repodata_shrink(data, repo->end);
 205       dstart = data->start > start ? data->start : start;
 206       dend = data->end < start + count ? data->end : start + count;
 207       if (dstart < dend)
 208         {
 209           if (data->attrs)
 210             {
 211               int j;
 212               for (j = dstart; j < dend; j++)
 213                 data->attrs[j - data->start] = solv_free(data->attrs[j - data->start]);
 214             }
 215           if (data->incoreoffset)
 216             memset(data->incoreoffset + (dstart - data->start), 0, (dend - dstart) * sizeof(Id));
 217         }
 218     }
 219 }
 220
 221 /* specialized version of repo_add_solvable_block that inserts the new solvable
 222  * block before the indicated repo, which gets relocated.
 223  * used in repo_add_rpmdb
 224  */
 225 Id
 226 repo_add_solvable_block_before(Repo *repo, int count, Repo *beforerepo)
 227 {
 228   Pool *pool = repo->pool;
 229   Id p;
 230   Solvable *s;
 231   Repodata *data;
 232   int i;
 233
 234   if (!count || !beforerepo || beforerepo->end != pool->nsolvables || beforerepo->start == beforerepo->end)
 235     return repo_add_solvable_block(repo, count);
 236   p = beforerepo->start;
 237   /* make sure all solvables belong to beforerepo */
 238   for (i = p, s = pool->solvables + i; i < beforerepo->end; i++, s++)
 239     if (s->repo && s->repo != beforerepo)
 240       return repo_add_solvable_block(repo, count);
 241   /* now move beforerepo to back */
 242   pool_add_solvable_block(pool, count); /* must return beforerepo->end! */
 243   memmove(pool->solvables + p + count, pool->solvables + p, (beforerepo->end - p) * sizeof(Solvable));
 244   memset(pool->solvables + p, 0, sizeof(Solvable) * count);
 245   /* adapt repodata */
 246   FOR_REPODATAS(beforerepo, i, data)
 247     {
 248       if (data->start < p)
 249         continue;
 250       data->start += count;
 251       data->end += count;
 252     }
 253   beforerepo->start += count;
 254   beforerepo->end += count;
 255   /* we now have count free solvables at id p */
 256   /* warning: sidedata must be extended before adapting start/end */
 257   if (repo->rpmdbid)
 258     repo->rpmdbid = (Id *)repo_sidedata_extend(repo, repo->rpmdbid, sizeof(Id), p, count);
 259   if (p < repo->start)
 260     repo->start = p;
 261   if (p + count > repo->end)
 262     repo->end = p + count;
 263   repo->nsolvables += count;
 264   for (s = pool->solvables + p; count--; s++)
 265     s->repo = repo;
 266   return p;
 267 }
 268
 269
 270 /* repository sidedata is solvable data allocated on demand.
 271  * It is used for data that is normally not present
 272  * in the solvable like the rpmdbid.
 273  * The solvable allocation funcions need to make sure that
 274  * the sidedata gets extended if new solvables get added.
 275  */
 276
 277 #define REPO_SIDEDATA_BLOCK 63
 278
 279 void *
 280 repo_sidedata_create(Repo *repo, size_t size)
 281 {
 282   return solv_calloc_block(repo->end - repo->start, size, REPO_SIDEDATA_BLOCK);
 283 }
 284
 285 void *
 286 repo_sidedata_extend(Repo *repo, void *b, size_t size, Id p, int count)
 287 {
 288   int n = repo->end - repo->start;
 289   if (p < repo->start)
 290     {
 291       int d = repo->start - p;
 292       b = solv_extend(b, n, d, size, REPO_SIDEDATA_BLOCK);
 293       memmove((char *)b + d * size, b, n * size);
 294       memset(b, 0, d * size);
 295       n += d;
 296     }
 297   if (p + count > repo->end)
 298     {
 299       int d = p + count - repo->end;
 300       b = solv_extend(b, n, d, size, REPO_SIDEDATA_BLOCK);
 301       memset((char *)b + n * size, 0, d * size);
 302     }
 303   return b;
 304 }
 305
 306 /*
 307  * add Id to idarraydata used to store dependencies
 308  * olddeps: old array offset to extend
 309  * returns new array offset
 310  */
 311
 312 Offset
 313 repo_addid(Repo *repo, Offset olddeps, Id id)
 314 {
 315   Id *idarray;
 316   int idarraysize;
 317   int i;
 318
 319   idarray = repo->idarraydata;
 320   idarraysize = repo->idarraysize;
 321
 322   if (!idarray)                        /* alloc idarray if not done yet */
 323     {
 324       idarraysize = 1;
 325       idarray = solv_extend_resize(0, 1, sizeof(Id), IDARRAY_BLOCK);
 326       idarray[0] = 0;
 327       repo->lastoff = 0;
 328     }
 329
 330   if (!olddeps)                         /* no deps yet */
 331     {
 332       olddeps = idarraysize;
 333       idarray = solv_extend(idarray, idarraysize, 1, sizeof(Id), IDARRAY_BLOCK);
 334     }
 335   else if (olddeps == repo->lastoff)    /* extend at end */
 336     idarraysize--;
 337   else                                  /* can't extend, copy old */
 338     {
 339       i = olddeps;
 340       olddeps = idarraysize;
 341       for (; idarray[i]; i++)
 342         {
 343           idarray = solv_extend(idarray, idarraysize, 1, sizeof(Id), IDARRAY_BLOCK);
 344           idarray[idarraysize++] = idarray[i];
 345         }
 346       idarray = solv_extend(idarray, idarraysize, 1, sizeof(Id), IDARRAY_BLOCK);
 347     }
 348
 349   idarray[idarraysize++] = id;          /* insert Id into array */
 350   idarray = solv_extend(idarray, idarraysize, 1, sizeof(Id), IDARRAY_BLOCK);
 351   idarray[idarraysize++] = 0;           /* ensure NULL termination */
 352
 353   repo->idarraydata = idarray;
 354   repo->idarraysize = idarraysize;
 355   repo->lastoff = olddeps;
 356
 357   return olddeps;
 358 }
 359
 360 #define REPO_ADDID_DEP_HASHTHRES        64
 361 #define REPO_ADDID_DEP_HASHMIN          128
 362
 363 /*
 364  * Optimization for packages with an excessive amount of provides/requires:
 365  * if the number of deps exceed a threshold, we build a hash of the already
 366  * seen ids.
 367  */
 368 static Offset
 369 repo_addid_dep_hash(Repo *repo, Offset olddeps, Id id, Id marker, int size)
 370 {
 371   Id oid, *oidp;
 372   int before;
 373   Hashval h, hh;
 374   Id hid;
 375
 376   before = 0;
 377   if (marker)
 378     {
 379       if (marker < 0)
 380         {
 381           marker = -marker;
 382           before = 1;
 383         }
 384       if (marker == id)
 385         marker = 0;
 386     }
 387
 388   /* maintain hash and lastmarkerpos */
 389   if (repo->lastidhash_idarraysize != repo->idarraysize || size * 2 > repo->lastidhash_mask || repo->lastmarker != marker)
 390     {
 391       repo->lastmarkerpos = 0;
 392       if (size * 2 > repo->lastidhash_mask)
 393         {
 394           repo->lastidhash_mask = mkmask(size < REPO_ADDID_DEP_HASHMIN ? REPO_ADDID_DEP_HASHMIN : size);
 395           repo->lastidhash = solv_realloc2(repo->lastidhash, repo->lastidhash_mask + 1, sizeof(Id));
 396         }
 397       memset(repo->lastidhash, 0, (repo->lastidhash_mask + 1) * sizeof(Id));
 398       for (oidp = repo->idarraydata + olddeps; (oid = *oidp) != 0; oidp++)
 399         {
 400           h = oid & repo->lastidhash_mask;
 401           hh = HASHCHAIN_START;
 402           while (repo->lastidhash[h] != 0)
 403             h = HASHCHAIN_NEXT(h, hh, repo->lastidhash_mask);
 404           repo->lastidhash[h] = oid;
 405           if (marker && oid == marker)
 406             repo->lastmarkerpos = oidp - repo->idarraydata;
 407         }
 408       repo->lastmarker = marker;
 409       repo->lastidhash_idarraysize = repo->idarraysize;
 410     }
 411
 412   /* check the hash! */
 413   h = id & repo->lastidhash_mask;
 414   hh = HASHCHAIN_START;
 415   while ((hid = repo->lastidhash[h]) != 0 && hid != id)
 416     h = HASHCHAIN_NEXT(h, hh, repo->lastidhash_mask);
 417   /* put new element in hash */
 418   if (!hid)
 419     repo->lastidhash[h] = id;
 420   else if (marker == SOLVABLE_FILEMARKER && (!before || !repo->lastmarkerpos))
 421     return olddeps;
 422   if (marker && !before && !repo->lastmarkerpos)
 423     {
 424       /* we have to add the marker first */
 425       repo->lastmarkerpos = repo->idarraysize - 1;
 426       olddeps = repo_addid(repo, olddeps, marker);
 427       /* now put marker in hash */
 428       h = marker & repo->lastidhash_mask;
 429       hh = HASHCHAIN_START;
 430       while (repo->lastidhash[h] != 0)
 431         h = HASHCHAIN_NEXT(h, hh, repo->lastidhash_mask);
 432       repo->lastidhash[h] = marker;
 433       repo->lastidhash_idarraysize = repo->idarraysize;
 434     }
 435   if (!hid)
 436     {
 437       /* new entry, insert in correct position */
 438       if (marker && before && repo->lastmarkerpos)
 439         {
 440           /* need to add it before the marker */
 441           olddeps = repo_addid(repo, olddeps, id);      /* dummy to make room */
 442           memmove(repo->idarraydata + repo->lastmarkerpos + 1, repo->idarraydata + repo->lastmarkerpos, (repo->idarraysize - repo->lastmarkerpos - 2) * sizeof(Id));
 443           repo->idarraydata[repo->lastmarkerpos++] = id;
 444         }
 445       else
 446         {
 447           /* just append it to the end */
 448           olddeps = repo_addid(repo, olddeps, id);
 449         }
 450       repo->lastidhash_idarraysize = repo->idarraysize;
 451       return olddeps;
 452     }
 453   /* we already have it in the hash */
 454   if (!marker)
 455     return olddeps;
 456   if (marker == SOLVABLE_FILEMARKER)
 457     {
 458       /* check if it is in the wrong half */
 459       /* (we already made sure that "before" and "lastmarkerpos" are set, see above) */
 460       for (oidp = repo->idarraydata + repo->lastmarkerpos + 1; (oid = *oidp) != 0; oidp++)
 461         if (oid == id)
 462           break;
 463       if (!oid)
 464         return olddeps;
 465       /* yes, wrong half. copy it over */
 466       memmove(repo->idarraydata + repo->lastmarkerpos + 1, repo->idarraydata + repo->lastmarkerpos, (oidp - (repo->idarraydata + repo->lastmarkerpos)) * sizeof(Id));
 467       repo->idarraydata[repo->lastmarkerpos++] = id;
 468       return olddeps;
 469     }
 470   if (before)
 471     return olddeps;
 472   /* check if it is in the correct half */
 473   for (oidp = repo->idarraydata + repo->lastmarkerpos + 1; (oid = *oidp) != 0; oidp++)
 474     if (oid == id)
 475       return olddeps;
 476   /* nope, copy it over */
 477   for (oidp = repo->idarraydata + olddeps; (oid = *oidp) != 0; oidp++)
 478     if (oid == id)
 479       break;
 480   if (!oid)
 481     return olddeps;     /* should not happen */
 482   memmove(oidp, oidp + 1, (repo->idarraydata + repo->idarraysize - oidp - 2) * sizeof(Id));
 483   repo->idarraydata[repo->idarraysize - 2] = id;
 484   repo->lastmarkerpos--;        /* marker has been moved */
 485   return olddeps;
 486 }
 487
 488 /*
 489  * add dependency (as Id) to repo, also unifies dependencies
 490  * olddeps = offset into idarraydata
 491  * marker= 0 for normal dep
 492  * marker > 0 add dep after marker
 493  * marker < 0 add dep before -marker
 494  * returns new start of dependency array
 495  */
 496 Offset
 497 repo_addid_dep(Repo *repo, Offset olddeps, Id id, Id marker)
 498 {
 499   Id oid, *oidp, *markerp;
 500   int before;
 501
 502   if (!olddeps)
 503     {
 504       if (marker > 0)
 505         olddeps = repo_addid(repo, olddeps, marker);
 506       return repo_addid(repo, olddeps, id);
 507     }
 508
 509   /* check if we should use the hash optimization */
 510   if (olddeps == repo->lastoff)
 511     {
 512       int size = repo->idarraysize - 1 - repo->lastoff;
 513       if (size >= REPO_ADDID_DEP_HASHTHRES)
 514         return repo_addid_dep_hash(repo, olddeps, id, marker, size);
 515     }
 516
 517   before = 0;
 518   if (marker)
 519     {
 520       if (marker < 0)
 521         {
 522           marker = -marker;
 523           before = 1;
 524         }
 525       if (marker == id)
 526         marker = 0;
 527     }
 528
 529   if (!marker)
 530     {
 531       for (oidp = repo->idarraydata + olddeps; (oid = *oidp) != 0; oidp++)
 532         if (oid == id)
 533           return olddeps;
 534       return repo_addid(repo, olddeps, id);
 535     }
 536
 537   markerp = 0;
 538   for (oidp = repo->idarraydata + olddeps; (oid = *oidp) != 0; oidp++)
 539     {
 540       if (oid == marker)
 541         markerp = oidp;
 542       else if (oid == id)
 543         break;
 544     }
 545
 546   if (oid)
 547     {
 548       if (marker == SOLVABLE_FILEMARKER)
 549         {
 550           if (!markerp || !before)
 551             return olddeps;
 552           /* we found it, but in the second half */
 553           memmove(markerp + 1, markerp, (oidp - markerp) * sizeof(Id));
 554           *markerp = id;
 555           return olddeps;
 556         }
 557       if (markerp || before)
 558         return olddeps;
 559       /* we found it, but in the first half */
 560       markerp = oidp++;
 561       for (; (oid = *oidp) != 0; oidp++)
 562         if (oid == marker)
 563           break;
 564       if (!oid)
 565         {
 566           /* no marker in array yet */
 567           oidp--;
 568           if (markerp < oidp)
 569             memmove(markerp, markerp + 1, (oidp - markerp) * sizeof(Id));
 570           *oidp = marker;
 571           return repo_addid(repo, olddeps, id);
 572         }
 573       while (oidp[1])
 574         oidp++;
 575       memmove(markerp, markerp + 1, (oidp - markerp) * sizeof(Id));
 576       *oidp = id;
 577       return olddeps;
 578     }
 579   /* id not yet in array */
 580   if (!before && !markerp)
 581     olddeps = repo_addid(repo, olddeps, marker);
 582   else if (before && markerp)
 583     {
 584       *markerp++ = id;
 585       id = *--oidp;
 586       if (markerp < oidp)
 587         memmove(markerp + 1, markerp, (oidp - markerp) * sizeof(Id));
 588       *markerp = marker;
 589     }
 590   return repo_addid(repo, olddeps, id);
 591 }
 592
 593 /* return standard marker for the keyname dependency.
 594  * 1: return positive marker, -1: return negative marker
 595  */
 596 Id
 597 solv_depmarker(Id keyname, Id marker)
 598 {
 599   if (marker != 1 && marker != -1)
 600     return marker;
 601   if (keyname == SOLVABLE_PROVIDES)
 602     return marker < 0 ? -SOLVABLE_FILEMARKER : SOLVABLE_FILEMARKER;
 603   if (keyname == SOLVABLE_REQUIRES)
 604     return marker < 0 ? -SOLVABLE_PREREQMARKER : SOLVABLE_PREREQMARKER;
 605   return 0;
 606 }
 607
 608 /*
 609  * reserve Ids
 610  * make space for 'num' more dependencies
 611  * returns new start of dependency array
 612  *
 613  * reserved ids will always begin at offset idarraysize
 614  */
 615 Offset
 616 repo_reserve_ids(Repo *repo, Offset olddeps, int num)
 617 {
 618   num++;        /* room for trailing ID_NULL */
 619
 620   if (!repo->idarraysize)              /* ensure buffer space */
 621     {
 622       repo->idarraysize = 1;
 623       repo->idarraydata = solv_extend_resize(0, 1 + num, sizeof(Id), IDARRAY_BLOCK);
 624       repo->idarraydata[0] = 0;
 625       repo->lastoff = 1;
 626       return 1;
 627     }
 628
 629   if (olddeps && olddeps != repo->lastoff)   /* if not appending */
 630     {
 631       /* can't insert into idarray, this would invalidate all 'larger' offsets
 632        * so create new space at end and move existing deps there.
 633        * Leaving 'hole' at old position.
 634        */
 635
 636       Id *idstart, *idend;
 637       int count;
 638
 639       for (idstart = idend = repo->idarraydata + olddeps; *idend++; )   /* find end */
 640         ;
 641       count = idend - idstart - 1 + num;               /* new size */
 642
 643       repo->idarraydata = solv_extend(repo->idarraydata, repo->idarraysize, count, sizeof(Id), IDARRAY_BLOCK);
 644       /* move old deps to end */
 645       olddeps = repo->lastoff = repo->idarraysize;
 646       memcpy(repo->idarraydata + olddeps, idstart, count - num);
 647       repo->idarraysize = olddeps + count - num;
 648
 649       return olddeps;
 650     }
 651
 652   if (olddeps)                         /* appending */
 653     repo->idarraysize--;
 654
 655   /* make room*/
 656   repo->idarraydata = solv_extend(repo->idarraydata, repo->idarraysize, num, sizeof(Id), IDARRAY_BLOCK);
 657
 658   /* appending or new */
 659   repo->lastoff = olddeps ? olddeps : repo->idarraysize;
 660
 661   return repo->lastoff;
 662 }
 663
 664
 665 /***********************************************************************/
 666
 667 /*
 668  * some SUSE specific fixups, should go into a separate file
 669  */
 670
 671 Offset
 672 repo_fix_supplements(Repo *repo, Offset provides, Offset supplements, Offset freshens)
 673 {
 674   Pool *pool = repo->pool;
 675   Id id, idp, idl;
 676   char buf[1024], *p, *dep;
 677   int i, l;
 678
 679   if (provides)
 680     {
 681       for (i = provides; repo->idarraydata[i]; i++)
 682         {
 683           id = repo->idarraydata[i];
 684           if (ISRELDEP(id))
 685             continue;
 686           dep = (char *)pool_id2str(pool, id);
 687           if (!strncmp(dep, "locale(", 7) && strlen(dep) < sizeof(buf) - 2)
 688             {
 689               idp = 0;
 690               strcpy(buf + 2, dep);
 691               dep = buf + 2 + 7;
 692               if ((p = strchr(dep, ':')) != 0 && p != dep)
 693                 {
 694                   *p++ = 0;
 695                   idp = pool_str2id(pool, dep, 1);
 696                   dep = p;
 697                 }
 698               id = 0;
 699               while ((p = strchr(dep, ';')) != 0)
 700                 {
 701                   if (p == dep)
 702                     {
 703                       dep = p + 1;
 704                       continue;
 705                     }
 706                   *p++ = 0;
 707                   idl = pool_str2id(pool, dep, 1);
 708                   idl = pool_rel2id(pool, NAMESPACE_LANGUAGE, idl, REL_NAMESPACE, 1);
 709                   if (id)
 710                     id = pool_rel2id(pool, id, idl, REL_OR, 1);
 711                   else
 712                     id = idl;
 713                   dep = p;
 714                 }
 715               if (dep[0] && dep[1])
 716                 {
 717                   for (p = dep; *p && *p != ')'; p++)
 718                     ;
 719                   *p = 0;
 720                   idl = pool_str2id(pool, dep, 1);
 721                   idl = pool_rel2id(pool, NAMESPACE_LANGUAGE, idl, REL_NAMESPACE, 1);
 722                   if (id)
 723                     id = pool_rel2id(pool, id, idl, REL_OR, 1);
 724                   else
 725                     id = idl;
 726                 }
 727               if (idp)
 728                 id = pool_rel2id(pool, idp, id, REL_AND, 1);
 729               if (id)
 730                 supplements = repo_addid_dep(repo, supplements, id, 0);
 731             }
 732           else if ((p = strchr(dep, ':')) != 0 && p != dep && p[1] == '/' && strlen(dep) < sizeof(buf))
 733             {
 734               strcpy(buf, dep);
 735               p = buf + (p - dep);
 736               *p++ = 0;
 737               idp = pool_str2id(pool, buf, 1);
 738               /* strip trailing slashes */
 739               l = strlen(p);
 740               while (l > 1 && p[l - 1] == '/')
 741                 p[--l] = 0;
 742               id = pool_str2id(pool, p, 1);
 743               id = pool_rel2id(pool, idp, id, REL_WITH, 1);
 744               id = pool_rel2id(pool, NAMESPACE_SPLITPROVIDES, id, REL_NAMESPACE, 1);
 745               supplements = repo_addid_dep(repo, supplements, id, 0);
 746             }
 747         }
 748     }
 749   if (supplements)
 750     {
 751       for (i = supplements; repo->idarraydata[i]; i++)
 752         {
 753           id = repo->idarraydata[i];
 754           if (ISRELDEP(id))
 755             continue;
 756           dep = (char *)pool_id2str(pool, id);
 757           if (!strncmp(dep, "system:modalias(", 16))
 758             dep += 7;
 759           if (!strncmp(dep, "modalias(", 9) && dep[9] && dep[10] && strlen(dep) < sizeof(buf))
 760             {
 761               strcpy(buf, dep);
 762               p = strchr(buf + 9, ':');
 763               if (p && p != buf + 9 && strchr(p + 1, ':'))
 764                 {
 765                   *p++ = 0;
 766                   idp = pool_str2id(pool, buf + 9, 1);
 767                   p[strlen(p) - 1] = 0;
 768                   id = pool_str2id(pool, p, 1);
 769                   id = pool_rel2id(pool, NAMESPACE_MODALIAS, id, REL_NAMESPACE, 1);
 770                   id = pool_rel2id(pool, idp, id, REL_AND, 1);
 771                 }
 772               else
 773                 {
 774                   p = buf + 9;
 775                   p[strlen(p) - 1] = 0;
 776                   id = pool_str2id(pool, p, 1);
 777                   id = pool_rel2id(pool, NAMESPACE_MODALIAS, id, REL_NAMESPACE, 1);
 778                 }
 779               if (id)
 780                 repo->idarraydata[i] = id;
 781             }
 782           else if (!strncmp(dep, "packageand(", 11) && strlen(dep) < sizeof(buf))
 783             {
 784               strcpy(buf, dep);
 785               id = 0;
 786               dep = buf + 11;
 787               while ((p = strchr(dep, ':')) != 0)
 788                 {
 789                   if (p == dep)
 790                     {
 791                       dep = p + 1;
 792                       continue;
 793                     }
 794                   /* argh, allow pattern: prefix. sigh */
 795                   if (p - dep == 7 && !strncmp(dep, "pattern", 7))
 796                     {
 797                       p = strchr(p + 1, ':');
 798                       if (!p)
 799                         break;
 800                     }
 801                   *p++ = 0;
 802                   idp = pool_str2id(pool, dep, 1);
 803                   if (id)
 804                     id = pool_rel2id(pool, id, idp, REL_AND, 1);
 805                   else
 806                     id = idp;
 807                   dep = p;
 808                 }
 809               if (dep[0] && dep[1])
 810                 {
 811                   dep[strlen(dep) - 1] = 0;
 812                   idp = pool_str2id(pool, dep, 1);
 813                   if (id)
 814                     id = pool_rel2id(pool, id, idp, REL_AND, 1);
 815                   else
 816                     id = idp;
 817                 }
 818               if (id)
 819                 repo->idarraydata[i] = id;
 820             }
 821           else if (!strncmp(dep, "filesystem(", 11) && strlen(dep) < sizeof(buf))
 822             {
 823               strcpy(buf, dep + 11);
 824               if ((p = strrchr(buf, ')')) != 0)
 825                 *p = 0;
 826               id = pool_str2id(pool, buf, 1);
 827               id = pool_rel2id(pool, NAMESPACE_FILESYSTEM, id, REL_NAMESPACE, 1);
 828               repo->idarraydata[i] = id;
 829             }
 830         }
 831     }
 832   if (freshens && repo->idarraydata[freshens])
 833     {
 834       Id idsupp = 0, idfresh = 0;
 835       if (!supplements || !repo->idarraydata[supplements])
 836         return freshens;
 837       for (i = supplements; repo->idarraydata[i]; i++)
 838         {
 839           if (!idsupp)
 840             idsupp = repo->idarraydata[i];
 841           else
 842             idsupp = pool_rel2id(pool, idsupp, repo->idarraydata[i], REL_OR, 1);
 843         }
 844       for (i = freshens; repo->idarraydata[i]; i++)
 845         {
 846           if (!idfresh)
 847             idfresh = repo->idarraydata[i];
 848           else
 849             idfresh = pool_rel2id(pool, idfresh, repo->idarraydata[i], REL_OR, 1);
 850         }
 851       if (!idsupp)
 852         idsupp = idfresh;
 853       else
 854         idsupp = pool_rel2id(pool, idsupp, idfresh, REL_AND, 1);
 855       supplements = repo_addid_dep(repo, 0, idsupp, 0);
 856     }
 857   return supplements;
 858 }
 859
 860 Offset
 861 repo_fix_conflicts(Repo *repo, Offset conflicts)
 862 {
 863   char buf[1024], *p, *dep;
 864   Pool *pool = repo->pool;
 865   Id id;
 866   int i;
 867
 868   if (!conflicts)
 869     return conflicts;
 870   for (i = conflicts; repo->idarraydata[i]; i++)
 871     {
 872       id = repo->idarraydata[i];
 873       if (ISRELDEP(id))
 874         continue;
 875       dep = (char *)pool_id2str(pool, id);
 876       if (!strncmp(dep, "otherproviders(", 15) && strlen(dep) < sizeof(buf) - 2)
 877         {
 878           strcpy(buf, dep + 15);
 879           if ((p = strchr(buf, ')')) != 0)
 880             *p = 0;
 881           id = pool_str2id(pool, buf, 1);
 882           id = pool_rel2id(pool, NAMESPACE_OTHERPROVIDERS, id, REL_NAMESPACE, 1);
 883           repo->idarraydata[i] = id;
 884         }
 885     }
 886   return conflicts;
 887 }
 888
 889 /***********************************************************************/
 890
 891 struct matchdata
 892 {
 893   Pool *pool;
 894   int flags;
 895   Datamatcher matcher;
 896   int stop;
 897   int (*callback)(void *cbdata, Solvable *s, Repodata *data, Repokey *key, KeyValue *kv);
 898   void *callback_data;
 899 };
 900
 901 int
 902 repo_matchvalue(void *cbdata, Solvable *s, Repodata *data, Repokey *key, KeyValue *kv)
 903 {
 904   struct matchdata *md = cbdata;
 905
 906   if (md->matcher.match)
 907     {
 908       if (key->name == SOLVABLE_FILELIST && key->type == REPOKEY_TYPE_DIRSTRARRAY && (md->matcher.flags & SEARCH_FILES) != 0)
 909         if (!datamatcher_checkbasename(&md->matcher, kv->str))
 910           return 0;
 911       if (!repodata_stringify(md->pool, data, key, kv, md->flags))
 912         return 0;
 913       if (!datamatcher_match(&md->matcher, kv->str))
 914         return 0;
 915     }
 916   md->stop = md->callback(md->callback_data, s, data, key, kv);
 917   return md->stop;
 918 }
 919
 920
 921 /* list of all keys we store in the solvable */
 922 /* also used in the dataiterator code in repodata.c */
 923 Repokey repo_solvablekeys[RPM_RPMDBID - SOLVABLE_NAME + 1] = {
 924   { SOLVABLE_NAME,        REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
 925   { SOLVABLE_ARCH,        REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
 926   { SOLVABLE_EVR,         REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
 927   { SOLVABLE_VENDOR,      REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
 928   { SOLVABLE_PROVIDES,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 929   { SOLVABLE_OBSOLETES,   REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 930   { SOLVABLE_CONFLICTS,   REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 931   { SOLVABLE_REQUIRES,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 932   { SOLVABLE_RECOMMENDS,  REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 933   { SOLVABLE_SUGGESTS,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 934   { SOLVABLE_SUPPLEMENTS, REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 935   { SOLVABLE_ENHANCES,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 936   { RPM_RPMDBID,          REPOKEY_TYPE_NUM, 0, KEY_STORAGE_SOLVABLE },
 937 };
 938
 939 static void
 940 domatch_idarray(Solvable *s, Id keyname, struct matchdata *md, Id *ida)
 941 {
 942   KeyValue kv;
 943   kv.entry = 0;
 944   kv.parent = 0;
 945   for (; *ida && !md->stop; ida++)
 946     {
 947       kv.id = *ida;
 948       kv.eof = ida[1] ? 0 : 1;
 949       repo_matchvalue(md, s, 0, repo_solvablekeys + (keyname - SOLVABLE_NAME), &kv);
 950       kv.entry++;
 951     }
 952 }
 953
 954 static void
 955 repo_search_md(Repo *repo, Id p, Id keyname, struct matchdata *md)
 956 {
 957   KeyValue kv;
 958   Pool *pool = repo->pool;
 959   Repodata *data;
 960   int i, j, flags;
 961   Solvable *s;
 962
 963   kv.parent = 0;
 964   md->stop = 0;
 965   if (!p)
 966     {
 967       for (p = repo->start, s = repo->pool->solvables + p; p < repo->end; p++, s++)
 968         {
 969           if (s->repo == repo)
 970             repo_search_md(repo, p, keyname, md);
 971           if (md->stop > SEARCH_NEXT_SOLVABLE)
 972             break;
 973         }
 974       return;
 975     }
 976   else if (p < 0)
 977     /* The callback only supports solvables, so we can't iterate over the
 978        extra things.  */
 979     return;
 980   flags = md->flags;
 981   if (!(flags & SEARCH_NO_STORAGE_SOLVABLE))
 982     {
 983       s = pool->solvables + p;
 984       switch(keyname)
 985         {
 986           case 0:
 987           case SOLVABLE_NAME:
 988             if (s->name)
 989               {
 990                 kv.id = s->name;
 991                 repo_matchvalue(md, s, 0, repo_solvablekeys + 0, &kv);
 992               }
 993             if (keyname || md->stop > SEARCH_NEXT_KEY)
 994               return;
 995           case SOLVABLE_ARCH:
 996             if (s->arch)
 997               {
 998                 kv.id = s->arch;
 999                 repo_matchvalue(md, s, 0, repo_solvablekeys + 1, &kv);
1000               }
1001             if (keyname || md->stop > SEARCH_NEXT_KEY)
1002               return;
1003           case SOLVABLE_EVR:
1004             if (s->evr)
1005               {
1006                 kv.id = s->evr;
1007                 repo_matchvalue(md, s, 0, repo_solvablekeys + 2, &kv);
1008               }
1009             if (keyname || md->stop > SEARCH_NEXT_KEY)
1010               return;
1011           case SOLVABLE_VENDOR:
1012             if (s->vendor)
1013               {
1014                 kv.id = s->vendor;
1015                 repo_matchvalue(md, s, 0, repo_solvablekeys + 3, &kv);
1016               }
1017             if (keyname || md->stop > SEARCH_NEXT_KEY)
1018               return;
1019           case SOLVABLE_PROVIDES:
1020             if (s->provides)
1021               domatch_idarray(s, SOLVABLE_PROVIDES, md, repo->idarraydata + s->provides);
1022             if (keyname || md->stop > SEARCH_NEXT_KEY)
1023               return;
1024           case SOLVABLE_OBSOLETES:
1025             if (s->obsoletes)
1026               domatch_idarray(s, SOLVABLE_OBSOLETES, md, repo->idarraydata + s->obsoletes);
1027             if (keyname || md->stop > SEARCH_NEXT_KEY)
1028               return;
1029           case SOLVABLE_CONFLICTS:
1030             if (s->conflicts)
1031               domatch_idarray(s, SOLVABLE_CONFLICTS, md, repo->idarraydata + s->conflicts);
1032             if (keyname || md->stop > SEARCH_NEXT_KEY)
1033               return;
1034           case SOLVABLE_REQUIRES:
1035             if (s->requires)
1036               domatch_idarray(s, SOLVABLE_REQUIRES, md, repo->idarraydata + s->requires);
1037             if (keyname || md->stop > SEARCH_NEXT_KEY)
1038               return;
1039           case SOLVABLE_RECOMMENDS:
1040             if (s->recommends)
1041               domatch_idarray(s, SOLVABLE_RECOMMENDS, md, repo->idarraydata + s->recommends);
1042             if (keyname || md->stop > SEARCH_NEXT_KEY)
1043               return;
1044           case SOLVABLE_SUPPLEMENTS:
1045             if (s->supplements)
1046               domatch_idarray(s, SOLVABLE_SUPPLEMENTS, md, repo->idarraydata + s->supplements);
1047             if (keyname || md->stop > SEARCH_NEXT_KEY)
1048               return;
1049           case SOLVABLE_SUGGESTS:
1050             if (s->suggests)
1051               domatch_idarray(s, SOLVABLE_SUGGESTS, md, repo->idarraydata + s->suggests);
1052             if (keyname || md->stop > SEARCH_NEXT_KEY)
1053               return;
1054           case SOLVABLE_ENHANCES:
1055             if (s->enhances)
1056               domatch_idarray(s, SOLVABLE_ENHANCES, md, repo->idarraydata + s->enhances);
1057             if (keyname || md->stop > SEARCH_NEXT_KEY)
1058               return;
1059           case RPM_RPMDBID:
1060             if (repo->rpmdbid)
1061               {
1062                 kv.num = repo->rpmdbid[p - repo->start];
1063                 kv.num2 = 0;
1064                 repo_matchvalue(md, s, 0, repo_solvablekeys + (RPM_RPMDBID - SOLVABLE_NAME), &kv);
1065               }
1066             if (keyname || md->stop > SEARCH_NEXT_KEY)
1067               return;
1068             break;
1069           default:
1070             break;
1071         }
1072     }
1073
1074   FOR_REPODATAS(repo, i, data)
1075     {
1076       if (p < data->start || p >= data->end)
1077         continue;
1078       if (keyname && !repodata_precheck_keyname(data, keyname))
1079         continue;
1080       if (keyname == SOLVABLE_FILELIST && !(md->flags & SEARCH_COMPLETE_FILELIST))
1081         {
1082           /* do not search filelist extensions */
1083           if (data->state != REPODATA_AVAILABLE)
1084             continue;
1085           for (j = 1; j < data->nkeys; j++)
1086             if (data->keys[j].name != REPOSITORY_SOLVABLES && data->keys[j].name != SOLVABLE_FILELIST)
1087               break;
1088           if (j == data->nkeys)
1089             continue;
1090         }
1091       if (data->state == REPODATA_STUB)
1092         {
1093           if (keyname)
1094             {
1095               for (j = 1; j < data->nkeys; j++)
1096                 if (keyname == data->keys[j].name)
1097                   break;
1098               if (j == data->nkeys)
1099                 continue;
1100             }
1101           /* load it */
1102           if (data->loadcallback)
1103             data->loadcallback(data);
1104           else
1105             data->state = REPODATA_ERROR;
1106         }
1107       if (data->state == REPODATA_ERROR)
1108         continue;
1109       repodata_search(data, p, keyname, md->flags, repo_matchvalue, md);
1110       if (md->stop > SEARCH_NEXT_KEY)
1111         break;
1112     }
1113 }
1114
1115 void
1116 repo_search(Repo *repo, Id p, Id keyname, const char *match, int flags, int (*callback)(void *cbdata, Solvable *s, Repodata *data, Repokey *key, KeyValue *kv), void *cbdata)
1117 {
1118   struct matchdata md;
1119
1120   if (repo->disabled && !(flags & SEARCH_DISABLED_REPOS))
1121     return;
1122   memset(&md, 0, sizeof(md));
1123   md.pool = repo->pool;
1124   md.flags = flags;
1125   md.callback = callback;
1126   md.callback_data = cbdata;
1127   if (match)
1128     datamatcher_init(&md.matcher, match, flags);
1129   repo_search_md(repo, p, keyname, &md);
1130   if (match)
1131     datamatcher_free(&md.matcher);
1132 }
1133
1134 const char *
1135 repo_lookup_str(Repo *repo, Id entry, Id keyname)
1136 {
1137   Pool *pool = repo->pool;
1138   Repodata *data;
1139   int i;
1140   const char *str;
1141
1142   if (entry >= 0)
1143     {
1144       switch (keyname)
1145         {
1146         case SOLVABLE_NAME:
1147           return pool_id2str(pool, pool->solvables[entry].name);
1148         case SOLVABLE_ARCH:
1149           return pool_id2str(pool, pool->solvables[entry].arch);
1150         case SOLVABLE_EVR:
1151           return pool_id2str(pool, pool->solvables[entry].evr);
1152         case SOLVABLE_VENDOR:
1153           return pool_id2str(pool, pool->solvables[entry].vendor);
1154         }
1155     }
1156   else if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1157     return repodata_lookup_str(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname);
1158   FOR_REPODATAS(repo, i, data)
1159     {
1160       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1161         continue;
1162       if (!repodata_precheck_keyname(data, keyname))
1163         continue;
1164       str = repodata_lookup_str(data, entry, keyname);
1165       if (str)
1166         return str;
1167       if (repodata_lookup_type(data, entry, keyname))
1168         return 0;
1169     }
1170   return 0;
1171 }
1172
1173
1174 unsigned long long
1175 repo_lookup_num(Repo *repo, Id entry, Id keyname, unsigned long long notfound)
1176 {
1177   Pool *pool = repo->pool;
1178   Repodata *data;
1179   int i;
1180   unsigned long long value;
1181
1182   if (entry >= 0)
1183     {
1184       if (keyname == RPM_RPMDBID)
1185         {
1186           if (repo->rpmdbid && entry >= repo->start && entry < repo->end)
1187             return repo->rpmdbid[entry - repo->start];
1188           return notfound;
1189         }
1190     }
1191   else if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1192     return repodata_lookup_num(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname, &value) ? value : notfound;
1193   FOR_REPODATAS(repo, i, data)
1194     {
1195       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1196         continue;
1197       if (!repodata_precheck_keyname(data, keyname))
1198         continue;
1199       if (repodata_lookup_num(data, entry, keyname, &value))
1200         return value;
1201       if (repodata_lookup_type(data, entry, keyname))
1202         return notfound;
1203     }
1204   return notfound;
1205 }
1206
1207 Id
1208 repo_lookup_id(Repo *repo, Id entry, Id keyname)
1209 {
1210   Pool *pool = repo->pool;
1211   Repodata *data;
1212   int i;
1213   Id id;
1214
1215   if (entry >= 0)
1216     {
1217       switch (keyname)
1218         {
1219         case SOLVABLE_NAME:
1220           return repo->pool->solvables[entry].name;
1221         case SOLVABLE_ARCH:
1222           return repo->pool->solvables[entry].arch;
1223         case SOLVABLE_EVR:
1224           return repo->pool->solvables[entry].evr;
1225         case SOLVABLE_VENDOR:
1226           return repo->pool->solvables[entry].vendor;
1227         }
1228     }
1229   else if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1230     {
1231       Repodata *data = pool->pos.repo->repodata + pool->pos.repodataid;
1232       Id id = repodata_lookup_id(data, entry, keyname);
1233       return data->localpool ? repodata_globalize_id(data, id, 1) : id;
1234     }
1235   FOR_REPODATAS(repo, i, data)
1236     {
1237       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1238         continue;
1239       if (!repodata_precheck_keyname(data, keyname))
1240         continue;
1241       id = repodata_lookup_id(data, entry, keyname);
1242       if (id)
1243         return data->localpool ? repodata_globalize_id(data, id, 1) : id;
1244       if (repodata_lookup_type(data, entry, keyname))
1245         return 0;
1246     }
1247   return 0;
1248 }
1249
1250 static int
1251 lookup_idarray_solvable(Repo *repo, Offset off, Queue *q)
1252 {
1253   Id *p;
1254
1255   queue_empty(q);
1256   if (off)
1257     for (p = repo->idarraydata + off; *p; p++)
1258       queue_push(q, *p);
1259   return 1;
1260 }
1261
1262 int
1263 repo_lookup_idarray(Repo *repo, Id entry, Id keyname, Queue *q)
1264 {
1265   Pool *pool = repo->pool;
1266   Repodata *data;
1267   int i;
1268   if (entry >= 0)
1269     {
1270       switch (keyname)
1271         {
1272         case SOLVABLE_PROVIDES:
1273           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].provides, q);
1274         case SOLVABLE_OBSOLETES:
1275           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].obsoletes, q);
1276         case SOLVABLE_CONFLICTS:
1277           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].conflicts, q);
1278         case SOLVABLE_REQUIRES:
1279           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].requires, q);
1280         case SOLVABLE_RECOMMENDS:
1281           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].recommends, q);
1282         case SOLVABLE_SUGGESTS:
1283           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].suggests, q);
1284         case SOLVABLE_SUPPLEMENTS:
1285           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].supplements, q);
1286         case SOLVABLE_ENHANCES:
1287           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].enhances, q);
1288         }
1289     }
1290   else if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1291     {
1292       Repodata *data = pool->pos.repo->repodata + pool->pos.repodataid;
1293       if (repodata_lookup_idarray(data, entry, keyname, q))
1294         {
1295           if (data->localpool)
1296             {
1297               for (i = 0; i < q->count; i++)
1298                 q->elements[i] = repodata_globalize_id(data, q->elements[i], 1);
1299             }
1300           return 1;
1301         }
1302     }
1303   FOR_REPODATAS(repo, i, data)
1304     {
1305       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1306         continue;
1307       if (!repodata_precheck_keyname(data, keyname))
1308         continue;
1309       if (repodata_lookup_idarray(data, entry, keyname, q))
1310         {
1311           if (data->localpool)
1312             {
1313               for (i = 0; i < q->count; i++)
1314                 q->elements[i] = repodata_globalize_id(data, q->elements[i], 1);
1315             }
1316           return 1;
1317         }
1318       if (repodata_lookup_type(data, entry, keyname))
1319         break;
1320     }
1321   queue_empty(q);
1322   return 0;
1323 }
1324
1325 int
1326 repo_lookup_deparray(Repo *repo, Id entry, Id keyname, Queue *q, Id marker)
1327 {
1328   int r = repo_lookup_idarray(repo, entry, keyname, q);
1329   if (!r)
1330     return 0;
1331   if (marker == -1 || marker == 1)
1332     marker = solv_depmarker(keyname, marker);
1333   if (marker && q->count)
1334     {
1335       int i;
1336       if (marker < 0)
1337         {
1338           marker = -marker;
1339           for (i = 0; i < q->count; i++)
1340             if (q->elements[i] == marker)
1341               {
1342                 queue_truncate(q, i);
1343                 return r;
1344               }
1345         }
1346       else
1347         {
1348           for (i = 0; i < q->count; i++)
1349             if (q->elements[i] == marker)
1350               {
1351                 queue_deleten(q, 0, i + 1);
1352                 return r;
1353               }
1354           queue_empty(q);
1355         }
1356     }
1357   return r;
1358 }
1359
1360 const unsigned char *
1361 repo_lookup_bin_checksum(Repo *repo, Id entry, Id keyname, Id *typep)
1362 {
1363   Pool *pool = repo->pool;
1364   Repodata *data;
1365   int i;
1366   const unsigned char *chk;
1367
1368   if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1369     return repodata_lookup_bin_checksum(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname, typep);
1370   FOR_REPODATAS(repo, i, data)
1371     {
1372       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1373         continue;
1374       if (!repodata_precheck_keyname(data, keyname))
1375         continue;
1376       chk = repodata_lookup_bin_checksum(data, entry, keyname, typep);
1377       if (chk)
1378         return chk;
1379       if (repodata_lookup_type(data, entry, keyname))
1380         return 0;
1381     }
1382   *typep = 0;
1383   return 0;
1384 }
1385
1386 const char *
1387 repo_lookup_checksum(Repo *repo, Id entry, Id keyname, Id *typep)
1388 {
1389   const unsigned char *chk = repo_lookup_bin_checksum(repo, entry, keyname, typep);
1390   return chk ? pool_bin2hex(repo->pool, chk, solv_chksum_len(*typep)) : 0;
1391 }
1392
1393 int
1394 repo_lookup_void(Repo *repo, Id entry, Id keyname)
1395 {
1396   Pool *pool = repo->pool;
1397   Repodata *data;
1398   int i;
1399   Id type;
1400
1401   if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1402     return repodata_lookup_void(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname);
1403   FOR_REPODATAS(repo, i, data)
1404     {
1405       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1406         continue;
1407       if (!repodata_precheck_keyname(data, keyname))
1408         continue;
1409       type = repodata_lookup_type(data, entry, keyname);
1410       if (type)
1411         return type == REPOKEY_TYPE_VOID;
1412     }
1413   return 0;
1414 }
1415
1416 Id
1417 repo_lookup_type(Repo *repo, Id entry, Id keyname)
1418 {
1419   Pool *pool = repo->pool;
1420   Repodata *data;
1421   int i;
1422   Id type;
1423
1424   if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1425     return repodata_lookup_type(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname);
1426   FOR_REPODATAS(repo, i, data)
1427     {
1428       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1429         continue;
1430       if (!repodata_precheck_keyname(data, keyname))
1431         continue;
1432       type = repodata_lookup_type(data, entry, keyname);
1433       if (type)
1434         return type == REPOKEY_TYPE_DELETED ? 0 : type;
1435     }
1436   return 0;
1437 }
1438
1439 const void *
1440 repo_lookup_binary(Repo *repo, Id entry, Id keyname, int *lenp)
1441 {
1442   Pool *pool = repo->pool;
1443   Repodata *data;
1444   int i;
1445   const void *bin;
1446
1447   if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1448     return repodata_lookup_binary(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname, lenp);
1449   FOR_REPODATAS(repo, i, data)
1450     {
1451       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1452         continue;
1453       if (!repodata_precheck_keyname(data, keyname))
1454         continue;
1455       bin = repodata_lookup_binary(data, entry, keyname, lenp);
1456       if (bin)
1457         return bin;
1458     }
1459   *lenp = 0;
1460   return 0;
1461 }
1462
1463 /***********************************************************************/
1464
1465 Repodata *
1466 repo_add_repodata(Repo *repo, int flags)
1467 {
1468   Repodata *data;
1469   int i;
1470   if ((flags & REPO_USE_LOADING) != 0)
1471     {
1472       for (i = repo->nrepodata - 1; i > 0; i--)
1473         if (repo->repodata[i].state == REPODATA_LOADING)
1474           {
1475             Repodata *data = repo->repodata + i;
1476             /* re-init */
1477             /* hack: we mis-use REPO_REUSE_REPODATA here */
1478             if (!(flags & REPO_REUSE_REPODATA))
1479               repodata_empty(data, (flags & REPO_LOCALPOOL) ? 1 : 0);
1480             return data;
1481           }
1482       return 0; /* must not create a new repodata! */
1483     }
1484   if ((flags & REPO_REUSE_REPODATA) != 0)
1485     {
1486       for (i = repo->nrepodata - 1; i > 0; i--)
1487         if (repo->repodata[i].state != REPODATA_STUB)
1488           return repo->repodata + i;
1489     }
1490   if (!repo->nrepodata)
1491     {
1492       repo->nrepodata = 2;      /* start with id 1 */
1493       repo->repodata = solv_calloc(repo->nrepodata, sizeof(*data));
1494     }
1495   else
1496     {
1497       repo->nrepodata++;
1498       repo->repodata = solv_realloc2(repo->repodata, repo->nrepodata, sizeof(*data));
1499     }
1500   data = repo->repodata + repo->nrepodata - 1;
1501   repodata_initdata(data, repo, (flags & REPO_LOCALPOOL) ? 1 : 0);
1502   return data;
1503 }
1504
1505 Repodata *
1506 repo_id2repodata(Repo *repo, Id id)
1507 {
1508   return id ? repo->repodata + id : 0;
1509 }
1510
1511 Repodata *
1512 repo_last_repodata(Repo *repo)
1513 {
1514   int i;
1515   for (i = repo->nrepodata - 1; i > 0; i--)
1516     if (repo->repodata[i].state != REPODATA_STUB)
1517       return repo->repodata + i;
1518   return repo_add_repodata(repo, 0);
1519 }
1520
1521 void
1522 repo_set_id(Repo *repo, Id p, Id keyname, Id id)
1523 {
1524   Repodata *data;
1525   if (p >= 0)
1526     {
1527       switch (keyname)
1528         {
1529         case SOLVABLE_NAME:
1530           repo->pool->solvables[p].name = id;
1531           return;
1532         case SOLVABLE_ARCH:
1533           repo->pool->solvables[p].arch = id;
1534           return;
1535         case SOLVABLE_EVR:
1536           repo->pool->solvables[p].evr = id;
1537           return;
1538         case SOLVABLE_VENDOR:
1539           repo->pool->solvables[p].vendor = id;
1540           return;
1541         }
1542     }
1543   data = repo_last_repodata(repo);
1544   if (data->localpool)
1545     id = repodata_localize_id(data, id, 1);
1546   repodata_set_id(data, p, keyname, id);
1547 }
1548
1549 void
1550 repo_set_num(Repo *repo, Id p, Id keyname, unsigned long long num)
1551 {
1552   Repodata *data;
1553   if (p >= 0)
1554     {
1555       if (keyname == RPM_RPMDBID)
1556         {
1557           if (!repo->rpmdbid)
1558             repo->rpmdbid = repo_sidedata_create(repo, sizeof(Id));
1559           repo->rpmdbid[p - repo->start] = num;
1560           return;
1561         }
1562     }
1563   data = repo_last_repodata(repo);
1564   repodata_set_num(data, p, keyname, num);
1565 }
1566
1567 void
1568 repo_set_str(Repo *repo, Id p, Id keyname, const char *str)
1569 {
1570   Repodata *data;
1571   if (p >= 0)
1572     {
1573       switch (keyname)
1574         {
1575         case SOLVABLE_NAME:
1576         case SOLVABLE_ARCH:
1577         case SOLVABLE_EVR:
1578         case SOLVABLE_VENDOR:
1579           repo_set_id(repo, p, keyname, pool_str2id(repo->pool, str, 1));
1580           return;
1581         }
1582     }
1583   data = repo_last_repodata(repo);
1584   repodata_set_str(data, p, keyname, str);
1585 }
1586
1587 void
1588 repo_set_poolstr(Repo *repo, Id p, Id keyname, const char *str)
1589 {
1590   Repodata *data;
1591   if (p >= 0)
1592     {
1593       switch (keyname)
1594         {
1595         case SOLVABLE_NAME:
1596         case SOLVABLE_ARCH:
1597         case SOLVABLE_EVR:
1598         case SOLVABLE_VENDOR:
1599           repo_set_id(repo, p, keyname, pool_str2id(repo->pool, str, 1));
1600           return;
1601         }
1602     }
1603   data = repo_last_repodata(repo);
1604   repodata_set_poolstr(data, p, keyname, str);
1605 }
1606
1607 void
1608 repo_add_poolstr_array(Repo *repo, Id p, Id keyname, const char *str)
1609 {
1610   Repodata *data = repo_last_repodata(repo);
1611   repodata_add_poolstr_array(data, p, keyname, str);
1612 }
1613
1614 void
1615 repo_add_deparray(Repo *repo, Id p, Id keyname, Id dep, Id marker)
1616 {
1617   Repodata *data;
1618   if (marker == -1 || marker == 1)
1619     marker = solv_depmarker(keyname, marker);
1620   if (p >= 0)
1621     {
1622       Solvable *s = repo->pool->solvables + p;
1623       switch (keyname)
1624         {
1625         case SOLVABLE_PROVIDES:
1626           s->provides = repo_addid_dep(repo, s->provides, dep, marker);
1627           return;
1628         case SOLVABLE_OBSOLETES:
1629           s->obsoletes = repo_addid_dep(repo, s->obsoletes, dep, marker);
1630           return;
1631         case SOLVABLE_CONFLICTS:
1632           s->conflicts = repo_addid_dep(repo, s->conflicts, dep, marker);
1633           return;
1634         case SOLVABLE_REQUIRES:
1635           s->requires = repo_addid_dep(repo, s->requires, dep, marker);
1636           return;
1637         case SOLVABLE_RECOMMENDS:
1638           s->recommends = repo_addid_dep(repo, s->recommends, dep, marker);
1639           return;
1640         case SOLVABLE_SUGGESTS:
1641           s->suggests = repo_addid_dep(repo, s->suggests, dep, marker);
1642           return;
1643         case SOLVABLE_SUPPLEMENTS:
1644           s->supplements = repo_addid_dep(repo, s->supplements, dep, marker);
1645           return;
1646         case SOLVABLE_ENHANCES:
1647           s->enhances = repo_addid_dep(repo, s->enhances, dep, marker);
1648           return;
1649         }
1650     }
1651   data = repo_last_repodata(repo);
1652   repodata_add_idarray(data, p, keyname, dep);
1653 }
1654
1655 void
1656 repo_add_idarray(Repo *repo, Id p, Id keyname, Id id)
1657 {
1658   repo_add_deparray(repo, p, keyname, id, 0);
1659 }
1660
1661 static Offset
1662 repo_set_idarray_solvable(Repo *repo, Queue *q)
1663 {
1664   Offset o = 0;
1665   int i;
1666   for (i = 0; i < q->count; i++)
1667     repo_addid_dep(repo, o, q->elements[i], 0);
1668   return o;
1669 }
1670
1671 void
1672 repo_set_deparray(Repo *repo, Id p, Id keyname, Queue *q, Id marker)
1673 {
1674   Repodata *data;
1675   if (marker == -1 || marker == 1)
1676     marker = solv_depmarker(keyname, marker);
1677   if (marker)
1678     {
1679       /* complex case, splice old and new arrays */
1680       int i;
1681       Queue q2;
1682       queue_init(&q2);
1683       repo_lookup_deparray(repo, p, keyname, &q2, -marker);
1684       if (marker > 0)
1685         {
1686           if (q->count)
1687             {
1688               queue_push(&q2, marker);
1689               for (i = 0; i < q->count; i++)
1690                 queue_push(&q2, q->elements[i]);
1691             }
1692         }
1693       else
1694         {
1695           if (q2.count)
1696             queue_insert(&q2, 0, -marker);
1697           queue_insertn(&q2, 0, q->count, q->elements);
1698         }
1699       repo_set_deparray(repo, p, keyname, &q2, 0);
1700       queue_free(&q2);
1701       return;
1702     }
1703   if (p >= 0)
1704     {
1705       Solvable *s = repo->pool->solvables + p;
1706       switch (keyname)
1707         {
1708         case SOLVABLE_PROVIDES:
1709           s->provides = repo_set_idarray_solvable(repo, q);
1710           return;
1711         case SOLVABLE_OBSOLETES:
1712           s->obsoletes = repo_set_idarray_solvable(repo, q);
1713           return;
1714         case SOLVABLE_CONFLICTS:
1715           s->conflicts = repo_set_idarray_solvable(repo, q);
1716           return;
1717         case SOLVABLE_REQUIRES:
1718           s->requires = repo_set_idarray_solvable(repo, q);
1719           return;
1720         case SOLVABLE_RECOMMENDS:
1721           s->recommends = repo_set_idarray_solvable(repo, q);
1722           return;
1723         case SOLVABLE_SUGGESTS:
1724           s->suggests = repo_set_idarray_solvable(repo, q);
1725           return;
1726         case SOLVABLE_SUPPLEMENTS:
1727           s->supplements = repo_set_idarray_solvable(repo, q);
1728           return;
1729         case SOLVABLE_ENHANCES:
1730           s->enhances = repo_set_idarray_solvable(repo, q);
1731           return;
1732         }
1733     }
1734   data = repo_last_repodata(repo);
1735   repodata_set_idarray(data, p, keyname, q);
1736 }
1737
1738 void
1739 repo_set_idarray(Repo *repo, Id p, Id keyname, Queue *q)
1740 {
1741   repo_set_deparray(repo, p, keyname, q, 0);
1742 }
1743
1744 void
1745 repo_unset(Repo *repo, Id p, Id keyname)
1746 {
1747   Repodata *data;
1748   if (p >= 0)
1749     {
1750       Solvable *s = repo->pool->solvables + p;
1751       switch (keyname)
1752         {
1753         case SOLVABLE_NAME:
1754           s->name = 0;
1755           return;
1756         case SOLVABLE_ARCH:
1757           s->arch = 0;
1758           return;
1759         case SOLVABLE_EVR:
1760           s->evr = 0;
1761           return;
1762         case SOLVABLE_VENDOR:
1763           s->vendor = 0;
1764           return;
1765         case RPM_RPMDBID:
1766           if (repo->rpmdbid)
1767             repo->rpmdbid[p - repo->start] = 0;
1768           return;
1769         case SOLVABLE_PROVIDES:
1770           s->provides = 0;
1771           return;
1772         case SOLVABLE_OBSOLETES:
1773           s->obsoletes = 0;
1774           return;
1775         case SOLVABLE_CONFLICTS:
1776           s->conflicts = 0;
1777           return;
1778         case SOLVABLE_REQUIRES:
1779           s->requires = 0;
1780           return;
1781         case SOLVABLE_RECOMMENDS:
1782           s->recommends = 0;
1783           return;
1784         case SOLVABLE_SUGGESTS:
1785           s->suggests = 0;
1786           return;
1787         case SOLVABLE_SUPPLEMENTS:
1788           s->supplements = 0;
1789         case SOLVABLE_ENHANCES:
1790           s->enhances = 0;
1791           return;
1792         default:
1793           break;
1794         }
1795     }
1796   data = repo_last_repodata(repo);
1797   repodata_unset(data, p, keyname);
1798 }
1799
1800 void
1801 repo_internalize(Repo *repo)
1802 {
1803   int i;
1804   Repodata *data;
1805
1806   FOR_REPODATAS(repo, i, data)
1807     if (data->attrs || data->xattrs)
1808       repodata_internalize(data);
1809 }
1810
1811 void
1812 repo_disable_paging(Repo *repo)
1813 {
1814   int i;
1815   Repodata *data;
1816
1817   FOR_REPODATAS(repo, i, data)
1818     repodata_disable_paging(data);
1819 }
1820