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