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
 594 /*
 595  * reserve Ids
 596  * make space for 'num' more dependencies
 597  * returns new start of dependency array
 598  *
 599  * reserved ids will always begin at offset idarraysize
 600  */
 601
 602 Offset
 603 repo_reserve_ids(Repo *repo, Offset olddeps, int num)
 604 {
 605   num++;        /* room for trailing ID_NULL */
 606
 607   if (!repo->idarraysize)              /* ensure buffer space */
 608     {
 609       repo->idarraysize = 1;
 610       repo->idarraydata = solv_extend_resize(0, 1 + num, sizeof(Id), IDARRAY_BLOCK);
 611       repo->idarraydata[0] = 0;
 612       repo->lastoff = 1;
 613       return 1;
 614     }
 615
 616   if (olddeps && olddeps != repo->lastoff)   /* if not appending */
 617     {
 618       /* can't insert into idarray, this would invalidate all 'larger' offsets
 619        * so create new space at end and move existing deps there.
 620        * Leaving 'hole' at old position.
 621        */
 622
 623       Id *idstart, *idend;
 624       int count;
 625
 626       for (idstart = idend = repo->idarraydata + olddeps; *idend++; )   /* find end */
 627         ;
 628       count = idend - idstart - 1 + num;               /* new size */
 629
 630       repo->idarraydata = solv_extend(repo->idarraydata, repo->idarraysize, count, sizeof(Id), IDARRAY_BLOCK);
 631       /* move old deps to end */
 632       olddeps = repo->lastoff = repo->idarraysize;
 633       memcpy(repo->idarraydata + olddeps, idstart, count - num);
 634       repo->idarraysize = olddeps + count - num;
 635
 636       return olddeps;
 637     }
 638
 639   if (olddeps)                         /* appending */
 640     repo->idarraysize--;
 641
 642   /* make room*/
 643   repo->idarraydata = solv_extend(repo->idarraydata, repo->idarraysize, num, sizeof(Id), IDARRAY_BLOCK);
 644
 645   /* appending or new */
 646   repo->lastoff = olddeps ? olddeps : repo->idarraysize;
 647
 648   return repo->lastoff;
 649 }
 650
 651
 652 /***********************************************************************/
 653
 654 /*
 655  * some SUSE specific fixups, should go into a separate file
 656  */
 657
 658 Offset
 659 repo_fix_supplements(Repo *repo, Offset provides, Offset supplements, Offset freshens)
 660 {
 661   Pool *pool = repo->pool;
 662   Id id, idp, idl;
 663   char buf[1024], *p, *dep;
 664   int i, l;
 665
 666   if (provides)
 667     {
 668       for (i = provides; repo->idarraydata[i]; i++)
 669         {
 670           id = repo->idarraydata[i];
 671           if (ISRELDEP(id))
 672             continue;
 673           dep = (char *)pool_id2str(pool, id);
 674           if (!strncmp(dep, "locale(", 7) && strlen(dep) < sizeof(buf) - 2)
 675             {
 676               idp = 0;
 677               strcpy(buf + 2, dep);
 678               dep = buf + 2 + 7;
 679               if ((p = strchr(dep, ':')) != 0 && p != dep)
 680                 {
 681                   *p++ = 0;
 682                   idp = pool_str2id(pool, dep, 1);
 683                   dep = p;
 684                 }
 685               id = 0;
 686               while ((p = strchr(dep, ';')) != 0)
 687                 {
 688                   if (p == dep)
 689                     {
 690                       dep = p + 1;
 691                       continue;
 692                     }
 693                   *p++ = 0;
 694                   idl = pool_str2id(pool, dep, 1);
 695                   idl = pool_rel2id(pool, NAMESPACE_LANGUAGE, idl, REL_NAMESPACE, 1);
 696                   if (id)
 697                     id = pool_rel2id(pool, id, idl, REL_OR, 1);
 698                   else
 699                     id = idl;
 700                   dep = p;
 701                 }
 702               if (dep[0] && dep[1])
 703                 {
 704                   for (p = dep; *p && *p != ')'; p++)
 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                 }
 714               if (idp)
 715                 id = pool_rel2id(pool, idp, id, REL_AND, 1);
 716               if (id)
 717                 supplements = repo_addid_dep(repo, supplements, id, 0);
 718             }
 719           else if ((p = strchr(dep, ':')) != 0 && p != dep && p[1] == '/' && strlen(dep) < sizeof(buf))
 720             {
 721               strcpy(buf, dep);
 722               p = buf + (p - dep);
 723               *p++ = 0;
 724               idp = pool_str2id(pool, buf, 1);
 725               /* strip trailing slashes */
 726               l = strlen(p);
 727               while (l > 1 && p[l - 1] == '/')
 728                 p[--l] = 0;
 729               id = pool_str2id(pool, p, 1);
 730               id = pool_rel2id(pool, idp, id, REL_WITH, 1);
 731               id = pool_rel2id(pool, NAMESPACE_SPLITPROVIDES, id, REL_NAMESPACE, 1);
 732               supplements = repo_addid_dep(repo, supplements, id, 0);
 733             }
 734         }
 735     }
 736   if (supplements)
 737     {
 738       for (i = supplements; repo->idarraydata[i]; i++)
 739         {
 740           id = repo->idarraydata[i];
 741           if (ISRELDEP(id))
 742             continue;
 743           dep = (char *)pool_id2str(pool, id);
 744           if (!strncmp(dep, "system:modalias(", 16))
 745             dep += 7;
 746           if (!strncmp(dep, "modalias(", 9) && dep[9] && dep[10] && strlen(dep) < sizeof(buf))
 747             {
 748               strcpy(buf, dep);
 749               p = strchr(buf + 9, ':');
 750               if (p && p != buf + 9 && strchr(p + 1, ':'))
 751                 {
 752                   *p++ = 0;
 753                   idp = pool_str2id(pool, buf + 9, 1);
 754                   p[strlen(p) - 1] = 0;
 755                   id = pool_str2id(pool, p, 1);
 756                   id = pool_rel2id(pool, NAMESPACE_MODALIAS, id, REL_NAMESPACE, 1);
 757                   id = pool_rel2id(pool, idp, id, REL_AND, 1);
 758                 }
 759               else
 760                 {
 761                   p = buf + 9;
 762                   p[strlen(p) - 1] = 0;
 763                   id = pool_str2id(pool, p, 1);
 764                   id = pool_rel2id(pool, NAMESPACE_MODALIAS, id, REL_NAMESPACE, 1);
 765                 }
 766               if (id)
 767                 repo->idarraydata[i] = id;
 768             }
 769           else if (!strncmp(dep, "packageand(", 11) && strlen(dep) < sizeof(buf))
 770             {
 771               strcpy(buf, dep);
 772               id = 0;
 773               dep = buf + 11;
 774               while ((p = strchr(dep, ':')) != 0)
 775                 {
 776                   if (p == dep)
 777                     {
 778                       dep = p + 1;
 779                       continue;
 780                     }
 781                   /* argh, allow pattern: prefix. sigh */
 782                   if (p - dep == 7 && !strncmp(dep, "pattern", 7))
 783                     {
 784                       p = strchr(p + 1, ':');
 785                       if (!p)
 786                         break;
 787                     }
 788                   *p++ = 0;
 789                   idp = pool_str2id(pool, dep, 1);
 790                   if (id)
 791                     id = pool_rel2id(pool, id, idp, REL_AND, 1);
 792                   else
 793                     id = idp;
 794                   dep = p;
 795                 }
 796               if (dep[0] && dep[1])
 797                 {
 798                   dep[strlen(dep) - 1] = 0;
 799                   idp = pool_str2id(pool, dep, 1);
 800                   if (id)
 801                     id = pool_rel2id(pool, id, idp, REL_AND, 1);
 802                   else
 803                     id = idp;
 804                 }
 805               if (id)
 806                 repo->idarraydata[i] = id;
 807             }
 808           else if (!strncmp(dep, "filesystem(", 11) && strlen(dep) < sizeof(buf))
 809             {
 810               strcpy(buf, dep + 11);
 811               if ((p = strrchr(buf, ')')) != 0)
 812                 *p = 0;
 813               id = pool_str2id(pool, buf, 1);
 814               id = pool_rel2id(pool, NAMESPACE_FILESYSTEM, id, REL_NAMESPACE, 1);
 815               repo->idarraydata[i] = id;
 816             }
 817         }
 818     }
 819   if (freshens && repo->idarraydata[freshens])
 820     {
 821       Id idsupp = 0, idfresh = 0;
 822       if (!supplements || !repo->idarraydata[supplements])
 823         return freshens;
 824       for (i = supplements; repo->idarraydata[i]; i++)
 825         {
 826           if (!idsupp)
 827             idsupp = repo->idarraydata[i];
 828           else
 829             idsupp = pool_rel2id(pool, idsupp, repo->idarraydata[i], REL_OR, 1);
 830         }
 831       for (i = freshens; repo->idarraydata[i]; i++)
 832         {
 833           if (!idfresh)
 834             idfresh = repo->idarraydata[i];
 835           else
 836             idfresh = pool_rel2id(pool, idfresh, repo->idarraydata[i], REL_OR, 1);
 837         }
 838       if (!idsupp)
 839         idsupp = idfresh;
 840       else
 841         idsupp = pool_rel2id(pool, idsupp, idfresh, REL_AND, 1);
 842       supplements = repo_addid_dep(repo, 0, idsupp, 0);
 843     }
 844   return supplements;
 845 }
 846
 847 Offset
 848 repo_fix_conflicts(Repo *repo, Offset conflicts)
 849 {
 850   char buf[1024], *p, *dep;
 851   Pool *pool = repo->pool;
 852   Id id;
 853   int i;
 854
 855   if (!conflicts)
 856     return conflicts;
 857   for (i = conflicts; repo->idarraydata[i]; i++)
 858     {
 859       id = repo->idarraydata[i];
 860       if (ISRELDEP(id))
 861         continue;
 862       dep = (char *)pool_id2str(pool, id);
 863       if (!strncmp(dep, "otherproviders(", 15) && strlen(dep) < sizeof(buf) - 2)
 864         {
 865           strcpy(buf, dep + 15);
 866           if ((p = strchr(buf, ')')) != 0)
 867             *p = 0;
 868           id = pool_str2id(pool, buf, 1);
 869           id = pool_rel2id(pool, NAMESPACE_OTHERPROVIDERS, id, REL_NAMESPACE, 1);
 870           repo->idarraydata[i] = id;
 871         }
 872     }
 873   return conflicts;
 874 }
 875
 876 /***********************************************************************/
 877
 878 struct matchdata
 879 {
 880   Pool *pool;
 881   int flags;
 882   Datamatcher matcher;
 883   int stop;
 884   int (*callback)(void *cbdata, Solvable *s, Repodata *data, Repokey *key, KeyValue *kv);
 885   void *callback_data;
 886 };
 887
 888 int
 889 repo_matchvalue(void *cbdata, Solvable *s, Repodata *data, Repokey *key, KeyValue *kv)
 890 {
 891   struct matchdata *md = cbdata;
 892
 893   if (md->matcher.match)
 894     {
 895       if (key->name == SOLVABLE_FILELIST && key->type == REPOKEY_TYPE_DIRSTRARRAY && (md->matcher.flags & SEARCH_FILES) != 0)
 896         if (!datamatcher_checkbasename(&md->matcher, kv->str))
 897           return 0;
 898       if (!repodata_stringify(md->pool, data, key, kv, md->flags))
 899         return 0;
 900       if (!datamatcher_match(&md->matcher, kv->str))
 901         return 0;
 902     }
 903   md->stop = md->callback(md->callback_data, s, data, key, kv);
 904   return md->stop;
 905 }
 906
 907
 908 /* list of all keys we store in the solvable */
 909 /* also used in the dataiterator code in repodata.c */
 910 Repokey repo_solvablekeys[RPM_RPMDBID - SOLVABLE_NAME + 1] = {
 911   { SOLVABLE_NAME,        REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
 912   { SOLVABLE_ARCH,        REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
 913   { SOLVABLE_EVR,         REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
 914   { SOLVABLE_VENDOR,      REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
 915   { SOLVABLE_PROVIDES,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 916   { SOLVABLE_OBSOLETES,   REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 917   { SOLVABLE_CONFLICTS,   REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 918   { SOLVABLE_REQUIRES,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 919   { SOLVABLE_RECOMMENDS,  REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 920   { SOLVABLE_SUGGESTS,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 921   { SOLVABLE_SUPPLEMENTS, REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 922   { SOLVABLE_ENHANCES,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
 923   { RPM_RPMDBID,          REPOKEY_TYPE_NUM, 0, KEY_STORAGE_SOLVABLE },
 924 };
 925
 926 static void
 927 domatch_idarray(Solvable *s, Id keyname, struct matchdata *md, Id *ida)
 928 {
 929   KeyValue kv;
 930   kv.entry = 0;
 931   kv.parent = 0;
 932   for (; *ida && !md->stop; ida++)
 933     {
 934       kv.id = *ida;
 935       kv.eof = ida[1] ? 0 : 1;
 936       repo_matchvalue(md, s, 0, repo_solvablekeys + (keyname - SOLVABLE_NAME), &kv);
 937       kv.entry++;
 938     }
 939 }
 940
 941 static void
 942 repo_search_md(Repo *repo, Id p, Id keyname, struct matchdata *md)
 943 {
 944   KeyValue kv;
 945   Pool *pool = repo->pool;
 946   Repodata *data;
 947   int i, j, flags;
 948   Solvable *s;
 949
 950   kv.parent = 0;
 951   md->stop = 0;
 952   if (!p)
 953     {
 954       for (p = repo->start, s = repo->pool->solvables + p; p < repo->end; p++, s++)
 955         {
 956           if (s->repo == repo)
 957             repo_search_md(repo, p, keyname, md);
 958           if (md->stop > SEARCH_NEXT_SOLVABLE)
 959             break;
 960         }
 961       return;
 962     }
 963   else if (p < 0)
 964     /* The callback only supports solvables, so we can't iterate over the
 965        extra things.  */
 966     return;
 967   flags = md->flags;
 968   if (!(flags & SEARCH_NO_STORAGE_SOLVABLE))
 969     {
 970       s = pool->solvables + p;
 971       switch(keyname)
 972         {
 973           case 0:
 974           case SOLVABLE_NAME:
 975             if (s->name)
 976               {
 977                 kv.id = s->name;
 978                 repo_matchvalue(md, s, 0, repo_solvablekeys + 0, &kv);
 979               }
 980             if (keyname || md->stop > SEARCH_NEXT_KEY)
 981               return;
 982           case SOLVABLE_ARCH:
 983             if (s->arch)
 984               {
 985                 kv.id = s->arch;
 986                 repo_matchvalue(md, s, 0, repo_solvablekeys + 1, &kv);
 987               }
 988             if (keyname || md->stop > SEARCH_NEXT_KEY)
 989               return;
 990           case SOLVABLE_EVR:
 991             if (s->evr)
 992               {
 993                 kv.id = s->evr;
 994                 repo_matchvalue(md, s, 0, repo_solvablekeys + 2, &kv);
 995               }
 996             if (keyname || md->stop > SEARCH_NEXT_KEY)
 997               return;
 998           case SOLVABLE_VENDOR:
 999             if (s->vendor)
1000               {
1001                 kv.id = s->vendor;
1002                 repo_matchvalue(md, s, 0, repo_solvablekeys + 3, &kv);
1003               }
1004             if (keyname || md->stop > SEARCH_NEXT_KEY)
1005               return;
1006           case SOLVABLE_PROVIDES:
1007             if (s->provides)
1008               domatch_idarray(s, SOLVABLE_PROVIDES, md, repo->idarraydata + s->provides);
1009             if (keyname || md->stop > SEARCH_NEXT_KEY)
1010               return;
1011           case SOLVABLE_OBSOLETES:
1012             if (s->obsoletes)
1013               domatch_idarray(s, SOLVABLE_OBSOLETES, md, repo->idarraydata + s->obsoletes);
1014             if (keyname || md->stop > SEARCH_NEXT_KEY)
1015               return;
1016           case SOLVABLE_CONFLICTS:
1017             if (s->conflicts)
1018               domatch_idarray(s, SOLVABLE_CONFLICTS, md, repo->idarraydata + s->conflicts);
1019             if (keyname || md->stop > SEARCH_NEXT_KEY)
1020               return;
1021           case SOLVABLE_REQUIRES:
1022             if (s->requires)
1023               domatch_idarray(s, SOLVABLE_REQUIRES, md, repo->idarraydata + s->requires);
1024             if (keyname || md->stop > SEARCH_NEXT_KEY)
1025               return;
1026           case SOLVABLE_RECOMMENDS:
1027             if (s->recommends)
1028               domatch_idarray(s, SOLVABLE_RECOMMENDS, md, repo->idarraydata + s->recommends);
1029             if (keyname || md->stop > SEARCH_NEXT_KEY)
1030               return;
1031           case SOLVABLE_SUPPLEMENTS:
1032             if (s->supplements)
1033               domatch_idarray(s, SOLVABLE_SUPPLEMENTS, md, repo->idarraydata + s->supplements);
1034             if (keyname || md->stop > SEARCH_NEXT_KEY)
1035               return;
1036           case SOLVABLE_SUGGESTS:
1037             if (s->suggests)
1038               domatch_idarray(s, SOLVABLE_SUGGESTS, md, repo->idarraydata + s->suggests);
1039             if (keyname || md->stop > SEARCH_NEXT_KEY)
1040               return;
1041           case SOLVABLE_ENHANCES:
1042             if (s->enhances)
1043               domatch_idarray(s, SOLVABLE_ENHANCES, md, repo->idarraydata + s->enhances);
1044             if (keyname || md->stop > SEARCH_NEXT_KEY)
1045               return;
1046           case RPM_RPMDBID:
1047             if (repo->rpmdbid)
1048               {
1049                 kv.num = repo->rpmdbid[p - repo->start];
1050                 kv.num2 = 0;
1051                 repo_matchvalue(md, s, 0, repo_solvablekeys + (RPM_RPMDBID - SOLVABLE_NAME), &kv);
1052               }
1053             if (keyname || md->stop > SEARCH_NEXT_KEY)
1054               return;
1055             break;
1056           default:
1057             break;
1058         }
1059     }
1060
1061   FOR_REPODATAS(repo, i, data)
1062     {
1063       if (p < data->start || p >= data->end)
1064         continue;
1065       if (keyname && !repodata_precheck_keyname(data, keyname))
1066         continue;
1067       if (keyname == SOLVABLE_FILELIST && !(md->flags & SEARCH_COMPLETE_FILELIST))
1068         {
1069           /* do not search filelist extensions */
1070           if (data->state != REPODATA_AVAILABLE)
1071             continue;
1072           for (j = 1; j < data->nkeys; j++)
1073             if (data->keys[j].name != REPOSITORY_SOLVABLES && data->keys[j].name != SOLVABLE_FILELIST)
1074               break;
1075           if (j == data->nkeys)
1076             continue;
1077         }
1078       if (data->state == REPODATA_STUB)
1079         {
1080           if (keyname)
1081             {
1082               for (j = 1; j < data->nkeys; j++)
1083                 if (keyname == data->keys[j].name)
1084                   break;
1085               if (j == data->nkeys)
1086                 continue;
1087             }
1088           /* load it */
1089           if (data->loadcallback)
1090             data->loadcallback(data);
1091           else
1092             data->state = REPODATA_ERROR;
1093         }
1094       if (data->state == REPODATA_ERROR)
1095         continue;
1096       repodata_search(data, p, keyname, md->flags, repo_matchvalue, md);
1097       if (md->stop > SEARCH_NEXT_KEY)
1098         break;
1099     }
1100 }
1101
1102 void
1103 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)
1104 {
1105   struct matchdata md;
1106
1107   if (repo->disabled && !(flags & SEARCH_DISABLED_REPOS))
1108     return;
1109   memset(&md, 0, sizeof(md));
1110   md.pool = repo->pool;
1111   md.flags = flags;
1112   md.callback = callback;
1113   md.callback_data = cbdata;
1114   if (match)
1115     datamatcher_init(&md.matcher, match, flags);
1116   repo_search_md(repo, p, keyname, &md);
1117   if (match)
1118     datamatcher_free(&md.matcher);
1119 }
1120
1121 const char *
1122 repo_lookup_str(Repo *repo, Id entry, Id keyname)
1123 {
1124   Pool *pool = repo->pool;
1125   Repodata *data;
1126   int i;
1127   const char *str;
1128
1129   if (entry >= 0)
1130     {
1131       switch (keyname)
1132         {
1133         case SOLVABLE_NAME:
1134           return pool_id2str(pool, pool->solvables[entry].name);
1135         case SOLVABLE_ARCH:
1136           return pool_id2str(pool, pool->solvables[entry].arch);
1137         case SOLVABLE_EVR:
1138           return pool_id2str(pool, pool->solvables[entry].evr);
1139         case SOLVABLE_VENDOR:
1140           return pool_id2str(pool, pool->solvables[entry].vendor);
1141         }
1142     }
1143   else if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1144     return repodata_lookup_str(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname);
1145   FOR_REPODATAS(repo, i, data)
1146     {
1147       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1148         continue;
1149       if (!repodata_precheck_keyname(data, keyname))
1150         continue;
1151       str = repodata_lookup_str(data, entry, keyname);
1152       if (str)
1153         return str;
1154       if (repodata_lookup_type(data, entry, keyname))
1155         return 0;
1156     }
1157   return 0;
1158 }
1159
1160
1161 unsigned long long
1162 repo_lookup_num(Repo *repo, Id entry, Id keyname, unsigned long long notfound)
1163 {
1164   Pool *pool = repo->pool;
1165   Repodata *data;
1166   int i;
1167   unsigned long long value;
1168
1169   if (entry >= 0)
1170     {
1171       if (keyname == RPM_RPMDBID)
1172         {
1173           if (repo->rpmdbid && entry >= repo->start && entry < repo->end)
1174             return repo->rpmdbid[entry - repo->start];
1175           return notfound;
1176         }
1177     }
1178   else if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1179     return repodata_lookup_num(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname, &value) ? value : notfound;
1180   FOR_REPODATAS(repo, i, data)
1181     {
1182       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1183         continue;
1184       if (!repodata_precheck_keyname(data, keyname))
1185         continue;
1186       if (repodata_lookup_num(data, entry, keyname, &value))
1187         return value;
1188       if (repodata_lookup_type(data, entry, keyname))
1189         return notfound;
1190     }
1191   return notfound;
1192 }
1193
1194 Id
1195 repo_lookup_id(Repo *repo, Id entry, Id keyname)
1196 {
1197   Pool *pool = repo->pool;
1198   Repodata *data;
1199   int i;
1200   Id id;
1201
1202   if (entry >= 0)
1203     {
1204       switch (keyname)
1205         {
1206         case SOLVABLE_NAME:
1207           return repo->pool->solvables[entry].name;
1208         case SOLVABLE_ARCH:
1209           return repo->pool->solvables[entry].arch;
1210         case SOLVABLE_EVR:
1211           return repo->pool->solvables[entry].evr;
1212         case SOLVABLE_VENDOR:
1213           return repo->pool->solvables[entry].vendor;
1214         }
1215     }
1216   else if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1217     {
1218       Repodata *data = pool->pos.repo->repodata + pool->pos.repodataid;
1219       Id id = repodata_lookup_id(data, entry, keyname);
1220       return data->localpool ? repodata_globalize_id(data, id, 1) : id;
1221     }
1222   FOR_REPODATAS(repo, i, data)
1223     {
1224       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1225         continue;
1226       if (!repodata_precheck_keyname(data, keyname))
1227         continue;
1228       id = repodata_lookup_id(data, entry, keyname);
1229       if (id)
1230         return data->localpool ? repodata_globalize_id(data, id, 1) : id;
1231       if (repodata_lookup_type(data, entry, keyname))
1232         return 0;
1233     }
1234   return 0;
1235 }
1236
1237 static int
1238 lookup_idarray_solvable(Repo *repo, Offset off, Queue *q)
1239 {
1240   Id *p;
1241
1242   queue_empty(q);
1243   if (off)
1244     for (p = repo->idarraydata + off; *p; p++)
1245       queue_push(q, *p);
1246   return 1;
1247 }
1248
1249 int
1250 repo_lookup_idarray(Repo *repo, Id entry, Id keyname, Queue *q)
1251 {
1252   Pool *pool = repo->pool;
1253   Repodata *data;
1254   int i;
1255   if (entry >= 0)
1256     {
1257       switch (keyname)
1258         {
1259         case SOLVABLE_PROVIDES:
1260           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].provides, q);
1261         case SOLVABLE_OBSOLETES:
1262           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].obsoletes, q);
1263         case SOLVABLE_CONFLICTS:
1264           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].conflicts, q);
1265         case SOLVABLE_REQUIRES:
1266           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].requires, q);
1267         case SOLVABLE_RECOMMENDS:
1268           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].recommends, q);
1269         case SOLVABLE_SUGGESTS:
1270           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].suggests, q);
1271         case SOLVABLE_SUPPLEMENTS:
1272           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].supplements, q);
1273         case SOLVABLE_ENHANCES:
1274           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].enhances, q);
1275         }
1276     }
1277   else if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1278     {
1279       Repodata *data = pool->pos.repo->repodata + pool->pos.repodataid;
1280       if (repodata_lookup_idarray(data, entry, keyname, q))
1281         {
1282           if (data->localpool)
1283             {
1284               for (i = 0; i < q->count; i++)
1285                 q->elements[i] = repodata_globalize_id(data, q->elements[i], 1);
1286             }
1287           return 1;
1288         }
1289     }
1290   FOR_REPODATAS(repo, i, data)
1291     {
1292       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1293         continue;
1294       if (!repodata_precheck_keyname(data, keyname))
1295         continue;
1296       if (repodata_lookup_idarray(data, entry, keyname, q))
1297         {
1298           if (data->localpool)
1299             {
1300               for (i = 0; i < q->count; i++)
1301                 q->elements[i] = repodata_globalize_id(data, q->elements[i], 1);
1302             }
1303           return 1;
1304         }
1305       if (repodata_lookup_type(data, entry, keyname))
1306         break;
1307     }
1308   queue_empty(q);
1309   return 0;
1310 }
1311
1312 int
1313 repo_lookup_deparray(Repo *repo, Id entry, Id keyname, Queue *q, Id marker)
1314 {
1315   int r = repo_lookup_idarray(repo, entry, keyname, q);
1316   if (r && marker && q->count)
1317     {
1318       int i;
1319       if (marker < 0)
1320         {
1321           marker = -marker;
1322           for (i = 0; i < q->count; i++)
1323             if (q->elements[i] == marker)
1324               {
1325                 queue_truncate(q, i);
1326                 return r;
1327               }
1328         }
1329       else
1330         {
1331           for (i = 0; i < q->count; i++)
1332             if (q->elements[i] == marker)
1333               {
1334                 queue_deleten(q, 0, i + 1);
1335                 return r;
1336               }
1337           queue_empty(q);
1338         }
1339     }
1340   return r;
1341 }
1342
1343 const unsigned char *
1344 repo_lookup_bin_checksum(Repo *repo, Id entry, Id keyname, Id *typep)
1345 {
1346   Pool *pool = repo->pool;
1347   Repodata *data;
1348   int i;
1349   const unsigned char *chk;
1350
1351   if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1352     return repodata_lookup_bin_checksum(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname, typep);
1353   FOR_REPODATAS(repo, i, data)
1354     {
1355       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1356         continue;
1357       if (!repodata_precheck_keyname(data, keyname))
1358         continue;
1359       chk = repodata_lookup_bin_checksum(data, entry, keyname, typep);
1360       if (chk)
1361         return chk;
1362       if (repodata_lookup_type(data, entry, keyname))
1363         return 0;
1364     }
1365   *typep = 0;
1366   return 0;
1367 }
1368
1369 const char *
1370 repo_lookup_checksum(Repo *repo, Id entry, Id keyname, Id *typep)
1371 {
1372   const unsigned char *chk = repo_lookup_bin_checksum(repo, entry, keyname, typep);
1373   return chk ? pool_bin2hex(repo->pool, chk, solv_chksum_len(*typep)) : 0;
1374 }
1375
1376 int
1377 repo_lookup_void(Repo *repo, Id entry, Id keyname)
1378 {
1379   Pool *pool = repo->pool;
1380   Repodata *data;
1381   int i;
1382   Id type;
1383
1384   if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1385     return repodata_lookup_void(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname);
1386   FOR_REPODATAS(repo, i, data)
1387     {
1388       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1389         continue;
1390       if (!repodata_precheck_keyname(data, keyname))
1391         continue;
1392       type = repodata_lookup_type(data, entry, keyname);
1393       if (type)
1394         return type == REPOKEY_TYPE_VOID;
1395     }
1396   return 0;
1397 }
1398
1399 Id
1400 repo_lookup_type(Repo *repo, Id entry, Id keyname)
1401 {
1402   Pool *pool = repo->pool;
1403   Repodata *data;
1404   int i;
1405   Id type;
1406
1407   if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1408     return repodata_lookup_type(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname);
1409   FOR_REPODATAS(repo, i, data)
1410     {
1411       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1412         continue;
1413       if (!repodata_precheck_keyname(data, keyname))
1414         continue;
1415       type = repodata_lookup_type(data, entry, keyname);
1416       if (type)
1417         return type == REPOKEY_TYPE_DELETED ? 0 : type;
1418     }
1419   return 0;
1420 }
1421
1422 /***********************************************************************/
1423
1424 Repodata *
1425 repo_add_repodata(Repo *repo, int flags)
1426 {
1427   Repodata *data;
1428   int i;
1429   if ((flags & REPO_USE_LOADING) != 0)
1430     {
1431       for (i = repo->nrepodata - 1; i > 0; i--)
1432         if (repo->repodata[i].state == REPODATA_LOADING)
1433           {
1434             Repodata *data = repo->repodata + i;
1435             /* re-init */
1436             /* hack: we mis-use REPO_REUSE_REPODATA here */
1437             if (!(flags & REPO_REUSE_REPODATA))
1438               repodata_empty(data, (flags & REPO_LOCALPOOL) ? 1 : 0);
1439             return data;
1440           }
1441       return 0; /* must not create a new repodata! */
1442     }
1443   if ((flags & REPO_REUSE_REPODATA) != 0)
1444     {
1445       for (i = repo->nrepodata - 1; i > 0; i--)
1446         if (repo->repodata[i].state != REPODATA_STUB)
1447           return repo->repodata + i;
1448     }
1449   if (!repo->nrepodata)
1450     {
1451       repo->nrepodata = 2;      /* start with id 1 */
1452       repo->repodata = solv_calloc(repo->nrepodata, sizeof(*data));
1453     }
1454   else
1455     {
1456       repo->nrepodata++;
1457       repo->repodata = solv_realloc2(repo->repodata, repo->nrepodata, sizeof(*data));
1458     }
1459   data = repo->repodata + repo->nrepodata - 1;
1460   repodata_initdata(data, repo, (flags & REPO_LOCALPOOL) ? 1 : 0);
1461   return data;
1462 }
1463
1464 Repodata *
1465 repo_id2repodata(Repo *repo, Id id)
1466 {
1467   return id ? repo->repodata + id : 0;
1468 }
1469
1470 Repodata *
1471 repo_last_repodata(Repo *repo)
1472 {
1473   int i;
1474   for (i = repo->nrepodata - 1; i > 0; i--)
1475     if (repo->repodata[i].state != REPODATA_STUB)
1476       return repo->repodata + i;
1477   return repo_add_repodata(repo, 0);
1478 }
1479
1480 void
1481 repo_set_id(Repo *repo, Id p, Id keyname, Id id)
1482 {
1483   Repodata *data;
1484   if (p >= 0)
1485     {
1486       switch (keyname)
1487         {
1488         case SOLVABLE_NAME:
1489           repo->pool->solvables[p].name = id;
1490           return;
1491         case SOLVABLE_ARCH:
1492           repo->pool->solvables[p].arch = id;
1493           return;
1494         case SOLVABLE_EVR:
1495           repo->pool->solvables[p].evr = id;
1496           return;
1497         case SOLVABLE_VENDOR:
1498           repo->pool->solvables[p].vendor = id;
1499           return;
1500         }
1501     }
1502   data = repo_last_repodata(repo);
1503   if (data->localpool)
1504     id = repodata_localize_id(data, id, 1);
1505   repodata_set_id(data, p, keyname, id);
1506 }
1507
1508 void
1509 repo_set_num(Repo *repo, Id p, Id keyname, unsigned long long num)
1510 {
1511   Repodata *data;
1512   if (p >= 0)
1513     {
1514       if (keyname == RPM_RPMDBID)
1515         {
1516           if (!repo->rpmdbid)
1517             repo->rpmdbid = repo_sidedata_create(repo, sizeof(Id));
1518           repo->rpmdbid[p - repo->start] = num;
1519           return;
1520         }
1521     }
1522   data = repo_last_repodata(repo);
1523   repodata_set_num(data, p, keyname, num);
1524 }
1525
1526 void
1527 repo_set_str(Repo *repo, Id p, Id keyname, const char *str)
1528 {
1529   Repodata *data;
1530   if (p >= 0)
1531     {
1532       switch (keyname)
1533         {
1534         case SOLVABLE_NAME:
1535         case SOLVABLE_ARCH:
1536         case SOLVABLE_EVR:
1537         case SOLVABLE_VENDOR:
1538           repo_set_id(repo, p, keyname, pool_str2id(repo->pool, str, 1));
1539           return;
1540         }
1541     }
1542   data = repo_last_repodata(repo);
1543   repodata_set_str(data, p, keyname, str);
1544 }
1545
1546 void
1547 repo_set_poolstr(Repo *repo, Id p, Id keyname, const char *str)
1548 {
1549   Repodata *data;
1550   if (p >= 0)
1551     {
1552       switch (keyname)
1553         {
1554         case SOLVABLE_NAME:
1555         case SOLVABLE_ARCH:
1556         case SOLVABLE_EVR:
1557         case SOLVABLE_VENDOR:
1558           repo_set_id(repo, p, keyname, pool_str2id(repo->pool, str, 1));
1559           return;
1560         }
1561     }
1562   data = repo_last_repodata(repo);
1563   repodata_set_poolstr(data, p, keyname, str);
1564 }
1565
1566 void
1567 repo_add_poolstr_array(Repo *repo, Id p, Id keyname, const char *str)
1568 {
1569   Repodata *data = repo_last_repodata(repo);
1570   repodata_add_poolstr_array(data, p, keyname, str);
1571 }
1572
1573 void
1574 repo_add_deparray(Repo *repo, Id p, Id keyname, Id dep, Id marker)
1575 {
1576   Repodata *data;
1577   if (p >= 0)
1578     {
1579       Solvable *s = repo->pool->solvables + p;
1580       switch (keyname)
1581         {
1582         case SOLVABLE_PROVIDES:
1583           s->provides = repo_addid_dep(repo, s->provides, dep, marker);
1584           return;
1585         case SOLVABLE_OBSOLETES:
1586           s->obsoletes = repo_addid_dep(repo, s->obsoletes, dep, marker);
1587           return;
1588         case SOLVABLE_CONFLICTS:
1589           s->conflicts = repo_addid_dep(repo, s->conflicts, dep, marker);
1590           return;
1591         case SOLVABLE_REQUIRES:
1592           s->requires = repo_addid_dep(repo, s->requires, dep, marker);
1593           return;
1594         case SOLVABLE_RECOMMENDS:
1595           s->recommends = repo_addid_dep(repo, s->recommends, dep, marker);
1596           return;
1597         case SOLVABLE_SUGGESTS:
1598           s->suggests = repo_addid_dep(repo, s->suggests, dep, marker);
1599           return;
1600         case SOLVABLE_SUPPLEMENTS:
1601           s->supplements = repo_addid_dep(repo, s->supplements, dep, marker);
1602           return;
1603         case SOLVABLE_ENHANCES:
1604           s->enhances = repo_addid_dep(repo, s->enhances, dep, marker);
1605           return;
1606         }
1607     }
1608   data = repo_last_repodata(repo);
1609   repodata_add_idarray(data, p, keyname, dep);
1610 }
1611
1612 void
1613 repo_add_idarray(Repo *repo, Id p, Id keyname, Id id)
1614 {
1615   repo_add_deparray(repo, p, keyname, id, 0);
1616 }
1617
1618 static Offset
1619 repo_set_idarray_solvable(Repo *repo, Queue *q)
1620 {
1621   Offset o = 0;
1622   int i;
1623   for (i = 0; i < q->count; i++)
1624     repo_addid_dep(repo, o, q->elements[i], 0);
1625   return o;
1626 }
1627
1628 void
1629 repo_set_deparray(Repo *repo, Id p, Id keyname, Queue *q, Id marker)
1630 {
1631   Repodata *data;
1632   if (marker)
1633     {
1634       /* complex case, splice old and new arrays */
1635       int i;
1636       Queue q2;
1637       queue_init(&q2);
1638       repo_lookup_deparray(repo, p, keyname, &q2, -marker);
1639       if (marker > 0)
1640         {
1641           if (q->count)
1642             {
1643               queue_push(&q2, marker);
1644               for (i = 0; i < q->count; i++)
1645                 queue_push(&q2, q->elements[i]);
1646             }
1647         }
1648       else
1649         {
1650           if (q2.count)
1651             queue_insert(&q2, 0, -marker);
1652           queue_insertn(&q2, 0, q->count, q->elements);
1653         }
1654       repo_set_deparray(repo, p, keyname, &q2, 0);
1655       queue_free(&q2);
1656       return;
1657     }
1658   if (p >= 0)
1659     {
1660       Solvable *s = repo->pool->solvables + p;
1661       switch (keyname)
1662         {
1663         case SOLVABLE_PROVIDES:
1664           s->provides = repo_set_idarray_solvable(repo, q);
1665           return;
1666         case SOLVABLE_OBSOLETES:
1667           s->obsoletes = repo_set_idarray_solvable(repo, q);
1668           return;
1669         case SOLVABLE_CONFLICTS:
1670           s->conflicts = repo_set_idarray_solvable(repo, q);
1671           return;
1672         case SOLVABLE_REQUIRES:
1673           s->requires = repo_set_idarray_solvable(repo, q);
1674           return;
1675         case SOLVABLE_RECOMMENDS:
1676           s->recommends = repo_set_idarray_solvable(repo, q);
1677           return;
1678         case SOLVABLE_SUGGESTS:
1679           s->suggests = repo_set_idarray_solvable(repo, q);
1680           return;
1681         case SOLVABLE_SUPPLEMENTS:
1682           s->supplements = repo_set_idarray_solvable(repo, q);
1683           return;
1684         case SOLVABLE_ENHANCES:
1685           s->enhances = repo_set_idarray_solvable(repo, q);
1686           return;
1687         }
1688     }
1689   data = repo_last_repodata(repo);
1690   repodata_set_idarray(data, p, keyname, q);
1691 }
1692
1693 void
1694 repo_set_idarray(Repo *repo, Id p, Id keyname, Queue *q)
1695 {
1696   repo_set_deparray(repo, p, keyname, q, 0);
1697 }
1698
1699 void
1700 repo_unset(Repo *repo, Id p, Id keyname)
1701 {
1702   Repodata *data;
1703   if (p >= 0)
1704     {
1705       Solvable *s = repo->pool->solvables + p;
1706       switch (keyname)
1707         {
1708         case SOLVABLE_NAME:
1709           s->name = 0;
1710           return;
1711         case SOLVABLE_ARCH:
1712           s->arch = 0;
1713           return;
1714         case SOLVABLE_EVR:
1715           s->evr = 0;
1716           return;
1717         case SOLVABLE_VENDOR:
1718           s->vendor = 0;
1719           return;
1720         case RPM_RPMDBID:
1721           if (repo->rpmdbid)
1722             repo->rpmdbid[p - repo->start] = 0;
1723           return;
1724         case SOLVABLE_PROVIDES:
1725           s->provides = 0;
1726           return;
1727         case SOLVABLE_OBSOLETES:
1728           s->obsoletes = 0;
1729           return;
1730         case SOLVABLE_CONFLICTS:
1731           s->conflicts = 0;
1732           return;
1733         case SOLVABLE_REQUIRES:
1734           s->requires = 0;
1735           return;
1736         case SOLVABLE_RECOMMENDS:
1737           s->recommends = 0;
1738           return;
1739         case SOLVABLE_SUGGESTS:
1740           s->suggests = 0;
1741           return;
1742         case SOLVABLE_SUPPLEMENTS:
1743           s->supplements = 0;
1744         case SOLVABLE_ENHANCES:
1745           s->enhances = 0;
1746           return;
1747         default:
1748           break;
1749         }
1750     }
1751   data = repo_last_repodata(repo);
1752   repodata_unset(data, p, keyname);
1753 }
1754
1755 void
1756 repo_internalize(Repo *repo)
1757 {
1758   int i;
1759   Repodata *data;
1760
1761   FOR_REPODATAS(repo, i, data)
1762     if (data->attrs || data->xattrs)
1763       repodata_internalize(data);
1764 }
1765
1766 void
1767 repo_disable_paging(Repo *repo)
1768 {
1769   int i;
1770   Repodata *data;
1771
1772   FOR_REPODATAS(repo, i, data)
1773     repodata_disable_paging(data);
1774 }
1775
1776 /*
1777 vim:cinoptions={.5s,g0,p5,t0,(0,^-0.5s,n-0.5s:tw=78:cindent:sw=4:
1778 */