allow SOLVID_META queries through SOLVID_POS
[platform/upstream/libsolv.git] / 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   Repodata *data;
1253   int i;
1254   if (entry >= 0)
1255     {
1256       switch (keyname)
1257         {
1258         case SOLVABLE_PROVIDES:
1259           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].provides, q);
1260         case SOLVABLE_OBSOLETES:
1261           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].obsoletes, q);
1262         case SOLVABLE_CONFLICTS:
1263           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].conflicts, q);
1264         case SOLVABLE_REQUIRES:
1265           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].requires, q);
1266         case SOLVABLE_RECOMMENDS:
1267           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].recommends, q);
1268         case SOLVABLE_SUGGESTS:
1269           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].suggests, q);
1270         case SOLVABLE_SUPPLEMENTS:
1271           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].supplements, q);
1272         case SOLVABLE_ENHANCES:
1273           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].enhances, q);
1274         }
1275     }
1276   FOR_REPODATAS(repo, i, data)
1277     {
1278       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1279         continue;
1280       if (!repodata_precheck_keyname(data, keyname))
1281         continue;
1282       if (repodata_lookup_idarray(data, entry, keyname, q))
1283         {
1284           if (data->localpool)
1285             {
1286               for (i = 0; i < q->count; i++)
1287                 q->elements[i] = repodata_globalize_id(data, q->elements[i], 1);
1288             }
1289           return 1;
1290         }
1291       if (repodata_lookup_type(data, entry, keyname))
1292         break;
1293     }
1294   queue_empty(q);
1295   return 0;
1296 }
1297
1298 int
1299 repo_lookup_deparray(Repo *repo, Id entry, Id keyname, Queue *q, Id marker)
1300 {
1301   int r = repo_lookup_idarray(repo, entry, keyname, q);
1302   if (r && marker && q->count)
1303     {
1304       int i;
1305       if (marker < 0)
1306         {
1307           marker = -marker;
1308           for (i = 0; i < q->count; i++)
1309             if (q->elements[i] == marker)
1310               {
1311                 queue_truncate(q, i);
1312                 return r;
1313               }
1314         }
1315       else
1316         {
1317           for (i = 0; i < q->count; i++)
1318             if (q->elements[i] == marker)
1319               {
1320                 queue_deleten(q, 0, i + 1);
1321                 return r;
1322               }
1323           queue_empty(q);
1324         }
1325     }
1326   return r;
1327 }
1328
1329 const unsigned char *
1330 repo_lookup_bin_checksum(Repo *repo, Id entry, Id keyname, Id *typep)
1331 {
1332   Pool *pool = repo->pool;
1333   Repodata *data;
1334   int i;
1335   const unsigned char *chk;
1336
1337   if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1338     return repodata_lookup_bin_checksum(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname, typep);
1339   FOR_REPODATAS(repo, i, data)
1340     {
1341       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1342         continue;
1343       if (!repodata_precheck_keyname(data, keyname))
1344         continue;
1345       chk = repodata_lookup_bin_checksum(data, entry, keyname, typep);
1346       if (chk)
1347         return chk;
1348       if (repodata_lookup_type(data, entry, keyname))
1349         return 0;
1350     }
1351   *typep = 0;
1352   return 0;
1353 }
1354
1355 const char *
1356 repo_lookup_checksum(Repo *repo, Id entry, Id keyname, Id *typep)
1357 {
1358   const unsigned char *chk = repo_lookup_bin_checksum(repo, entry, keyname, typep);
1359   return chk ? pool_bin2hex(repo->pool, chk, solv_chksum_len(*typep)) : 0;
1360 }
1361
1362 int
1363 repo_lookup_void(Repo *repo, Id entry, Id keyname)
1364 {
1365   Pool *pool = repo->pool;
1366   Repodata *data;
1367   int i;
1368   Id type;
1369
1370   if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1371     return repodata_lookup_void(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname);
1372   FOR_REPODATAS(repo, i, data)
1373     {
1374       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1375         continue;
1376       if (!repodata_precheck_keyname(data, keyname))
1377         continue;
1378       type = repodata_lookup_type(data, entry, keyname);
1379       if (type)
1380         return type == REPOKEY_TYPE_VOID;
1381     }
1382   return 0;
1383 }
1384
1385 Id
1386 repo_lookup_type(Repo *repo, Id entry, Id keyname)
1387 {
1388   Pool *pool = repo->pool;
1389   Repodata *data;
1390   int i;
1391   Id type;
1392
1393   if (entry == SOLVID_POS && pool->pos.repo == repo && pool->pos.repodataid)
1394     return repodata_lookup_type(pool->pos.repo->repodata + pool->pos.repodataid, entry, keyname);
1395   FOR_REPODATAS(repo, i, data)
1396     {
1397       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1398         continue;
1399       if (!repodata_precheck_keyname(data, keyname))
1400         continue;
1401       type = repodata_lookup_type(data, entry, keyname);
1402       if (type)
1403         return type == REPOKEY_TYPE_DELETED ? 0 : type;
1404     }
1405   return 0;
1406 }
1407
1408 /***********************************************************************/
1409
1410 Repodata *
1411 repo_add_repodata(Repo *repo, int flags)
1412 {
1413   Repodata *data;
1414   int i;
1415   if ((flags & REPO_USE_LOADING) != 0)
1416     {
1417       for (i = repo->nrepodata - 1; i > 0; i--)
1418         if (repo->repodata[i].state == REPODATA_LOADING)
1419           {
1420             Repodata *data = repo->repodata + i;
1421             /* re-init */
1422             /* hack: we mis-use REPO_REUSE_REPODATA here */
1423             if (!(flags & REPO_REUSE_REPODATA))
1424               repodata_empty(data, (flags & REPO_LOCALPOOL) ? 1 : 0);
1425             return data;
1426           }
1427       return 0; /* must not create a new repodata! */
1428     }
1429   if ((flags & REPO_REUSE_REPODATA) != 0)
1430     {
1431       for (i = repo->nrepodata - 1; i > 0; i--)
1432         if (repo->repodata[i].state != REPODATA_STUB)
1433           return repo->repodata + i;
1434     }
1435   if (!repo->nrepodata)
1436     {    
1437       repo->nrepodata = 2;      /* start with id 1 */
1438       repo->repodata = solv_calloc(repo->nrepodata, sizeof(*data));
1439     }    
1440   else 
1441     {    
1442       repo->nrepodata++;
1443       repo->repodata = solv_realloc2(repo->repodata, repo->nrepodata, sizeof(*data));
1444     }    
1445   data = repo->repodata + repo->nrepodata - 1; 
1446   repodata_initdata(data, repo, (flags & REPO_LOCALPOOL) ? 1 : 0);
1447   return data;
1448 }
1449
1450 Repodata *
1451 repo_id2repodata(Repo *repo, Id id)
1452 {
1453   return id ? repo->repodata + id : 0;
1454 }
1455
1456 Repodata *
1457 repo_last_repodata(Repo *repo)
1458 {
1459   int i;
1460   for (i = repo->nrepodata - 1; i > 0; i--)
1461     if (repo->repodata[i].state != REPODATA_STUB)
1462       return repo->repodata + i;
1463   return repo_add_repodata(repo, 0);
1464 }
1465
1466 void
1467 repo_set_id(Repo *repo, Id p, Id keyname, Id id)
1468 {
1469   Repodata *data;
1470   if (p >= 0)
1471     {
1472       switch (keyname)
1473         {
1474         case SOLVABLE_NAME:
1475           repo->pool->solvables[p].name = id;
1476           return;
1477         case SOLVABLE_ARCH:
1478           repo->pool->solvables[p].arch = id;
1479           return;
1480         case SOLVABLE_EVR:
1481           repo->pool->solvables[p].evr = id;
1482           return;
1483         case SOLVABLE_VENDOR:
1484           repo->pool->solvables[p].vendor = id;
1485           return;
1486         }
1487     }
1488   data = repo_last_repodata(repo);
1489   if (data->localpool)
1490     id = repodata_localize_id(data, id, 1);
1491   repodata_set_id(data, p, keyname, id);
1492 }
1493
1494 void
1495 repo_set_num(Repo *repo, Id p, Id keyname, unsigned long long num)
1496 {
1497   Repodata *data;
1498   if (p >= 0)
1499     {
1500       if (keyname == RPM_RPMDBID)
1501         {
1502           if (!repo->rpmdbid)
1503             repo->rpmdbid = repo_sidedata_create(repo, sizeof(Id));
1504           repo->rpmdbid[p - repo->start] = num;
1505           return;
1506         }
1507     }
1508   data = repo_last_repodata(repo);
1509   repodata_set_num(data, p, keyname, num);
1510 }
1511
1512 void
1513 repo_set_str(Repo *repo, Id p, Id keyname, const char *str)
1514 {
1515   Repodata *data;
1516   if (p >= 0)
1517     {
1518       switch (keyname)
1519         {
1520         case SOLVABLE_NAME:
1521         case SOLVABLE_ARCH:
1522         case SOLVABLE_EVR:
1523         case SOLVABLE_VENDOR:
1524           repo_set_id(repo, p, keyname, pool_str2id(repo->pool, str, 1));
1525           return;
1526         }
1527     }
1528   data = repo_last_repodata(repo);
1529   repodata_set_str(data, p, keyname, str);
1530 }
1531
1532 void
1533 repo_set_poolstr(Repo *repo, Id p, Id keyname, const char *str)
1534 {
1535   Repodata *data;
1536   if (p >= 0)
1537     {
1538       switch (keyname)
1539         {
1540         case SOLVABLE_NAME:
1541         case SOLVABLE_ARCH:
1542         case SOLVABLE_EVR:
1543         case SOLVABLE_VENDOR:
1544           repo_set_id(repo, p, keyname, pool_str2id(repo->pool, str, 1));
1545           return;
1546         }
1547     }
1548   data = repo_last_repodata(repo);
1549   repodata_set_poolstr(data, p, keyname, str);
1550 }
1551
1552 void
1553 repo_add_poolstr_array(Repo *repo, Id p, Id keyname, const char *str)
1554 {
1555   Repodata *data = repo_last_repodata(repo);
1556   repodata_add_poolstr_array(data, p, keyname, str);
1557 }
1558
1559 void
1560 repo_add_deparray(Repo *repo, Id p, Id keyname, Id dep, Id marker)
1561 {
1562   Repodata *data;
1563   if (p >= 0)
1564     {
1565       Solvable *s = repo->pool->solvables + p;
1566       switch (keyname)
1567         {
1568         case SOLVABLE_PROVIDES:
1569           s->provides = repo_addid_dep(repo, s->provides, dep, marker);
1570           return;
1571         case SOLVABLE_OBSOLETES:
1572           s->obsoletes = repo_addid_dep(repo, s->obsoletes, dep, marker);
1573           return;
1574         case SOLVABLE_CONFLICTS:
1575           s->conflicts = repo_addid_dep(repo, s->conflicts, dep, marker);
1576           return;
1577         case SOLVABLE_REQUIRES:
1578           s->requires = repo_addid_dep(repo, s->requires, dep, marker);
1579           return;
1580         case SOLVABLE_RECOMMENDS:
1581           s->recommends = repo_addid_dep(repo, s->recommends, dep, marker);
1582           return;
1583         case SOLVABLE_SUGGESTS:
1584           s->suggests = repo_addid_dep(repo, s->suggests, dep, marker);
1585           return;
1586         case SOLVABLE_SUPPLEMENTS:
1587           s->supplements = repo_addid_dep(repo, s->supplements, dep, marker);
1588           return;
1589         case SOLVABLE_ENHANCES:
1590           s->enhances = repo_addid_dep(repo, s->enhances, dep, marker);
1591           return;
1592         }
1593     }
1594   data = repo_last_repodata(repo);
1595   repodata_add_idarray(data, p, keyname, dep);
1596 }
1597
1598 void
1599 repo_add_idarray(Repo *repo, Id p, Id keyname, Id id)
1600 {
1601   repo_add_deparray(repo, p, keyname, id, 0);
1602 }
1603
1604 static Offset
1605 repo_set_idarray_solvable(Repo *repo, Queue *q)
1606 {
1607   Offset o = 0;
1608   int i;
1609   for (i = 0; i < q->count; i++)
1610     repo_addid_dep(repo, o, q->elements[i], 0);
1611   return o;
1612 }
1613
1614 void
1615 repo_set_deparray(Repo *repo, Id p, Id keyname, Queue *q, Id marker)
1616 {
1617   Repodata *data;
1618   if (marker)
1619     {
1620       /* complex case, splice old and new arrays */
1621       int i;
1622       Queue q2;
1623       queue_init(&q2);
1624       repo_lookup_deparray(repo, p, keyname, &q2, -marker);
1625       if (marker > 0)
1626         {
1627           if (q->count)
1628             {
1629               queue_push(&q2, marker);
1630               for (i = 0; i < q->count; i++)
1631                 queue_push(&q2, q->elements[i]);
1632             }
1633         }
1634       else
1635         {
1636           if (q2.count)
1637             queue_insert(&q2, 0, -marker);
1638           queue_insertn(&q2, 0, q->count, q->elements);
1639         }
1640       repo_set_deparray(repo, p, keyname, &q2, 0);
1641       queue_free(&q2);
1642       return;
1643     }
1644   if (p >= 0)
1645     {
1646       Solvable *s = repo->pool->solvables + p;
1647       switch (keyname)
1648         {
1649         case SOLVABLE_PROVIDES:
1650           s->provides = repo_set_idarray_solvable(repo, q);
1651           return;
1652         case SOLVABLE_OBSOLETES:
1653           s->obsoletes = repo_set_idarray_solvable(repo, q);
1654           return;
1655         case SOLVABLE_CONFLICTS:
1656           s->conflicts = repo_set_idarray_solvable(repo, q);
1657           return;
1658         case SOLVABLE_REQUIRES:
1659           s->requires = repo_set_idarray_solvable(repo, q);
1660           return;
1661         case SOLVABLE_RECOMMENDS:
1662           s->recommends = repo_set_idarray_solvable(repo, q);
1663           return;
1664         case SOLVABLE_SUGGESTS:
1665           s->suggests = repo_set_idarray_solvable(repo, q);
1666           return;
1667         case SOLVABLE_SUPPLEMENTS:
1668           s->supplements = repo_set_idarray_solvable(repo, q);
1669           return;
1670         case SOLVABLE_ENHANCES:
1671           s->enhances = repo_set_idarray_solvable(repo, q);
1672           return;
1673         }
1674     }
1675   data = repo_last_repodata(repo);
1676   repodata_set_idarray(data, p, keyname, q);
1677 }
1678
1679 void
1680 repo_set_idarray(Repo *repo, Id p, Id keyname, Queue *q)
1681 {
1682   repo_set_deparray(repo, p, keyname, q, 0);
1683 }
1684
1685 void
1686 repo_unset(Repo *repo, Id p, Id keyname)
1687 {
1688   Repodata *data;
1689   if (p >= 0)
1690     {
1691       Solvable *s = repo->pool->solvables + p;
1692       switch (keyname)
1693         {
1694         case SOLVABLE_NAME:
1695           s->name = 0;
1696           return;
1697         case SOLVABLE_ARCH:
1698           s->arch = 0;
1699           return;
1700         case SOLVABLE_EVR:
1701           s->evr = 0;
1702           return;
1703         case SOLVABLE_VENDOR:
1704           s->vendor = 0;
1705           return;
1706         case RPM_RPMDBID:
1707           if (repo->rpmdbid)
1708             repo->rpmdbid[p - repo->start] = 0;
1709           return;
1710         case SOLVABLE_PROVIDES:
1711           s->provides = 0;
1712           return;
1713         case SOLVABLE_OBSOLETES:
1714           s->obsoletes = 0;
1715           return;
1716         case SOLVABLE_CONFLICTS:
1717           s->conflicts = 0;
1718           return;
1719         case SOLVABLE_REQUIRES:
1720           s->requires = 0;
1721           return;
1722         case SOLVABLE_RECOMMENDS:
1723           s->recommends = 0;
1724           return;
1725         case SOLVABLE_SUGGESTS:
1726           s->suggests = 0;
1727           return;
1728         case SOLVABLE_SUPPLEMENTS:
1729           s->supplements = 0;
1730         case SOLVABLE_ENHANCES:
1731           s->enhances = 0;
1732           return;
1733         default:
1734           break;
1735         }
1736     }
1737   data = repo_last_repodata(repo);
1738   repodata_unset(data, p, keyname);
1739 }
1740
1741 void
1742 repo_internalize(Repo *repo)
1743 {
1744   int i;
1745   Repodata *data;
1746
1747   FOR_REPODATAS(repo, i, data)
1748     if (data->attrs || data->xattrs)
1749       repodata_internalize(data);
1750 }
1751
1752 void
1753 repo_disable_paging(Repo *repo)
1754 {
1755   int i;
1756   Repodata *data;
1757
1758   FOR_REPODATAS(repo, i, data)
1759     repodata_disable_paging(data);
1760 }
1761
1762 /*
1763 vim:cinoptions={.5s,g0,p5,t0,(0,^-0.5s,n-0.5s:tw=78:cindent:sw=4:
1764 */