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