9e67a52d5053d8f3388b0dac021137e7b92d113d
[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 /* list of all keys we store in the solvable */
842 /* also used in the dataiterator code in repodata.c */
843 Repokey repo_solvablekeys[RPM_RPMDBID - SOLVABLE_NAME + 1] = {
844   { SOLVABLE_NAME,        REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
845   { SOLVABLE_ARCH,        REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
846   { SOLVABLE_EVR,         REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
847   { SOLVABLE_VENDOR,      REPOKEY_TYPE_ID, 0, KEY_STORAGE_SOLVABLE },
848   { SOLVABLE_PROVIDES,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
849   { SOLVABLE_OBSOLETES,   REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
850   { SOLVABLE_CONFLICTS,   REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
851   { SOLVABLE_REQUIRES,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
852   { SOLVABLE_RECOMMENDS,  REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
853   { SOLVABLE_SUGGESTS,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
854   { SOLVABLE_SUPPLEMENTS, REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
855   { SOLVABLE_ENHANCES,    REPOKEY_TYPE_IDARRAY, 0, KEY_STORAGE_SOLVABLE },
856   { RPM_RPMDBID,          REPOKEY_TYPE_U32, 0, KEY_STORAGE_SOLVABLE },
857 };
858
859 static void
860 domatch_idarray(Solvable *s, Id keyname, struct matchdata *md, Id *ida)
861 {
862   KeyValue kv;
863   kv.entry = 0;
864   kv.parent = 0;
865   for (; *ida && !md->stop; ida++)
866     {
867       kv.id = *ida;
868       kv.eof = ida[1] ? 0 : 1;
869       repo_matchvalue(md, s, 0, repo_solvablekeys + (keyname - SOLVABLE_NAME), &kv);
870       kv.entry++;
871     }
872 }
873
874 static void
875 repo_search_md(Repo *repo, Id p, Id keyname, struct matchdata *md)
876 {
877   KeyValue kv;
878   Pool *pool = repo->pool;
879   Repodata *data;
880   int i, j, flags;
881   Solvable *s;
882
883   kv.parent = 0;
884   md->stop = 0;
885   if (!p)
886     {
887       for (p = repo->start, s = repo->pool->solvables + p; p < repo->end; p++, s++)
888         {
889           if (s->repo == repo)
890             repo_search_md(repo, p, keyname, md);
891           if (md->stop > SEARCH_NEXT_SOLVABLE)
892             break;
893         }
894       return;
895     }
896   else if (p < 0)
897     /* The callback only supports solvables, so we can't iterate over the
898        extra things.  */
899     return;
900   flags = md->flags;
901   if (!(flags & SEARCH_NO_STORAGE_SOLVABLE))
902     {
903       s = pool->solvables + p;
904       switch(keyname)
905         {
906           case 0:
907           case SOLVABLE_NAME:
908             if (s->name)
909               {
910                 kv.id = s->name;
911                 repo_matchvalue(md, s, 0, repo_solvablekeys + 0, &kv);
912               }
913             if (keyname || md->stop > SEARCH_NEXT_KEY)
914               return;
915           case SOLVABLE_ARCH:
916             if (s->arch)
917               {
918                 kv.id = s->arch;
919                 repo_matchvalue(md, s, 0, repo_solvablekeys + 1, &kv);
920               }
921             if (keyname || md->stop > SEARCH_NEXT_KEY)
922               return;
923           case SOLVABLE_EVR:
924             if (s->evr)
925               {
926                 kv.id = s->evr;
927                 repo_matchvalue(md, s, 0, repo_solvablekeys + 2, &kv);
928               }
929             if (keyname || md->stop > SEARCH_NEXT_KEY)
930               return;
931           case SOLVABLE_VENDOR:
932             if (s->vendor)
933               {
934                 kv.id = s->vendor;
935                 repo_matchvalue(md, s, 0, repo_solvablekeys + 3, &kv);
936               }
937             if (keyname || md->stop > SEARCH_NEXT_KEY)
938               return;
939           case SOLVABLE_PROVIDES:
940             if (s->provides)
941               domatch_idarray(s, SOLVABLE_PROVIDES, md, repo->idarraydata + s->provides);
942             if (keyname || md->stop > SEARCH_NEXT_KEY)
943               return;
944           case SOLVABLE_OBSOLETES:
945             if (s->obsoletes)
946               domatch_idarray(s, SOLVABLE_OBSOLETES, md, repo->idarraydata + s->obsoletes);
947             if (keyname || md->stop > SEARCH_NEXT_KEY)
948               return;
949           case SOLVABLE_CONFLICTS:
950             if (s->conflicts)
951               domatch_idarray(s, SOLVABLE_CONFLICTS, md, repo->idarraydata + s->conflicts);
952             if (keyname || md->stop > SEARCH_NEXT_KEY)
953               return;
954           case SOLVABLE_REQUIRES:
955             if (s->requires)
956               domatch_idarray(s, SOLVABLE_REQUIRES, md, repo->idarraydata + s->requires);
957             if (keyname || md->stop > SEARCH_NEXT_KEY)
958               return;
959           case SOLVABLE_RECOMMENDS:
960             if (s->recommends)
961               domatch_idarray(s, SOLVABLE_RECOMMENDS, md, repo->idarraydata + s->recommends);
962             if (keyname || md->stop > SEARCH_NEXT_KEY)
963               return;
964           case SOLVABLE_SUPPLEMENTS:
965             if (s->supplements)
966               domatch_idarray(s, SOLVABLE_SUPPLEMENTS, md, repo->idarraydata + s->supplements);
967             if (keyname || md->stop > SEARCH_NEXT_KEY)
968               return;
969           case SOLVABLE_SUGGESTS:
970             if (s->suggests)
971               domatch_idarray(s, SOLVABLE_SUGGESTS, md, repo->idarraydata + s->suggests);
972             if (keyname || md->stop > SEARCH_NEXT_KEY)
973               return;
974           case SOLVABLE_ENHANCES:
975             if (s->enhances)
976               domatch_idarray(s, SOLVABLE_ENHANCES, md, repo->idarraydata + s->enhances);
977             if (keyname || md->stop > SEARCH_NEXT_KEY)
978               return;
979           case RPM_RPMDBID:
980             if (repo->rpmdbid)
981               {
982                 kv.num = repo->rpmdbid[p - repo->start];
983                 repo_matchvalue(md, s, 0, repo_solvablekeys + (RPM_RPMDBID - SOLVABLE_NAME), &kv);
984               }
985             if (keyname || md->stop > SEARCH_NEXT_KEY)
986               return;
987             break;
988           default:
989             break;
990         }
991     }
992
993   FOR_REPODATAS(repo, i, data)
994     {
995       if (p < data->start || p >= data->end)
996         continue;
997       if (keyname && !repodata_precheck_keyname(data, keyname))
998         continue;
999       if (keyname == SOLVABLE_FILELIST && !(md->flags & SEARCH_COMPLETE_FILELIST))
1000         {
1001           /* do not search filelist extensions */
1002           if (data->state != REPODATA_AVAILABLE)
1003             continue;
1004           for (j = 1; j < data->nkeys; j++)
1005             if (data->keys[j].name != REPOSITORY_SOLVABLES && data->keys[j].name != SOLVABLE_FILELIST)
1006               break;
1007           if (j == data->nkeys)
1008             continue;
1009         }
1010       if (data->state == REPODATA_STUB)
1011         {
1012           if (keyname)
1013             {
1014               for (j = 1; j < data->nkeys; j++)
1015                 if (keyname == data->keys[j].name)
1016                   break;
1017               if (j == data->nkeys)
1018                 continue;
1019             }
1020           /* load it */
1021           if (data->loadcallback)
1022             data->loadcallback(data);
1023           else
1024             data->state = REPODATA_ERROR;
1025         }
1026       if (data->state == REPODATA_ERROR)
1027         continue;
1028       repodata_search(data, p, keyname, md->flags, repo_matchvalue, md);
1029       if (md->stop > SEARCH_NEXT_KEY)
1030         break;
1031     }
1032 }
1033
1034 void
1035 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)
1036 {
1037   struct matchdata md;
1038
1039   if (repo->disabled && !(flags & SEARCH_DISABLED_REPOS))
1040     return;
1041   memset(&md, 0, sizeof(md));
1042   md.pool = repo->pool;
1043   md.flags = flags;
1044   md.callback = callback;
1045   md.callback_data = cbdata;
1046   if (match)
1047     datamatcher_init(&md.matcher, match, flags);
1048   repo_search_md(repo, p, keyname, &md);
1049   if (match)
1050     datamatcher_free(&md.matcher);
1051 }
1052
1053 const char *
1054 repo_lookup_str(Repo *repo, Id entry, Id keyname)
1055 {
1056   Pool *pool = repo->pool;
1057   Repodata *data;
1058   int i;
1059   const char *str;
1060
1061   if (entry >= 0)
1062     {
1063       switch (keyname)
1064         {
1065         case SOLVABLE_NAME:
1066           return pool_id2str(pool, pool->solvables[entry].name);
1067         case SOLVABLE_ARCH:
1068           return pool_id2str(pool, pool->solvables[entry].arch);
1069         case SOLVABLE_EVR:
1070           return pool_id2str(pool, pool->solvables[entry].evr);
1071         case SOLVABLE_VENDOR:
1072           return pool_id2str(pool, pool->solvables[entry].vendor);
1073         }
1074     }
1075   FOR_REPODATAS(repo, i, data)
1076     {
1077       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1078         continue;
1079       if (!repodata_precheck_keyname(data, keyname))
1080         continue;
1081       str = repodata_lookup_str(data, entry, keyname);
1082       if (str)
1083         return str;
1084       if (repodata_lookup_type(data, entry, keyname))
1085         return 0;
1086     }
1087   return 0;
1088 }
1089
1090
1091 unsigned int
1092 repo_lookup_num(Repo *repo, Id entry, Id keyname, unsigned int notfound)
1093 {
1094   Repodata *data;
1095   int i;
1096   unsigned int value;
1097
1098   if (entry >= 0)
1099     {
1100       if (keyname == RPM_RPMDBID)
1101         {
1102           if (repo->rpmdbid && entry >= repo->start && entry < repo->end)
1103             return repo->rpmdbid[entry - repo->start];
1104           return notfound;
1105         }
1106     }
1107   FOR_REPODATAS(repo, i, data)
1108     {
1109       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1110         continue;
1111       if (!repodata_precheck_keyname(data, keyname))
1112         continue;
1113       if (repodata_lookup_num(data, entry, keyname, &value))
1114         return value;
1115       if (repodata_lookup_type(data, entry, keyname))
1116         return notfound;
1117     }
1118   return notfound;
1119 }
1120
1121 Id
1122 repo_lookup_id(Repo *repo, Id entry, Id keyname)
1123 {
1124   Repodata *data;
1125   int i;
1126   Id id;
1127
1128   if (entry >= 0)
1129     {
1130       switch (keyname)
1131         {
1132         case SOLVABLE_NAME:
1133           return repo->pool->solvables[entry].name;
1134         case SOLVABLE_ARCH:
1135           return repo->pool->solvables[entry].arch;
1136         case SOLVABLE_EVR:
1137           return repo->pool->solvables[entry].evr;
1138         case SOLVABLE_VENDOR:
1139           return repo->pool->solvables[entry].vendor;
1140         }
1141     }
1142   FOR_REPODATAS(repo, i, data)
1143     {
1144       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1145         continue;
1146       if (!repodata_precheck_keyname(data, keyname))
1147         continue;
1148       id = repodata_lookup_id(data, entry, keyname);
1149       if (id)
1150         return data->localpool ? repodata_globalize_id(data, id, 1) : id;
1151       if (repodata_lookup_type(data, entry, keyname))
1152         return 0;
1153     }
1154   return 0;
1155 }
1156
1157 static int
1158 lookup_idarray_solvable(Repo *repo, Offset off, Queue *q)
1159 {
1160   Id *p;
1161
1162   queue_empty(q);
1163   if (off)
1164     for (p = repo->idarraydata + off; *p; p++)
1165       queue_push(q, *p);
1166   return 1;
1167 }
1168
1169 int
1170 repo_lookup_idarray(Repo *repo, Id entry, Id keyname, Queue *q)
1171 {
1172   Repodata *data;
1173   int i;
1174   if (entry >= 0)
1175     {
1176       switch (keyname)
1177         {
1178         case SOLVABLE_PROVIDES:
1179           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].provides, q);
1180         case SOLVABLE_OBSOLETES:
1181           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].obsoletes, q);
1182         case SOLVABLE_CONFLICTS:
1183           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].conflicts, q);
1184         case SOLVABLE_REQUIRES:
1185           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].requires, q);
1186         case SOLVABLE_RECOMMENDS:
1187           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].recommends, q);
1188         case SOLVABLE_SUGGESTS:
1189           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].suggests, q);
1190         case SOLVABLE_SUPPLEMENTS:
1191           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].supplements, q);
1192         case SOLVABLE_ENHANCES:
1193           return lookup_idarray_solvable(repo, repo->pool->solvables[entry].enhances, q);
1194         }
1195     }
1196   FOR_REPODATAS(repo, i, data)
1197     {
1198       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1199         continue;
1200       if (!repodata_precheck_keyname(data, keyname))
1201         continue;
1202       if (repodata_lookup_idarray(data, entry, keyname, q))
1203         {
1204           if (data->localpool)
1205             {
1206               for (i = 0; i < q->count; i++)
1207                 q->elements[i] = repodata_globalize_id(data, q->elements[i], 1);
1208             }
1209           return 1;
1210         }
1211       if (repodata_lookup_type(data, entry, keyname))
1212         break;
1213     }
1214   queue_empty(q);
1215   return 0;
1216 }
1217
1218 int
1219 repo_lookup_deparray(Repo *repo, Id entry, Id keyname, Queue *q, Id marker)
1220 {
1221   int r = repo_lookup_idarray(repo, entry, keyname, q);
1222   if (r && marker)
1223     {
1224       int i;
1225       if (marker < 0)
1226         {
1227           marker = -marker;
1228           for (i = 0; i < q->count; i++)
1229             if (q->elements[i] == marker)
1230               {
1231                 queue_truncate(q, i);
1232                 return r;
1233               }
1234         }
1235       else
1236         {
1237           for (i = 0; i < q->count; i++)
1238             if (q->elements[i] == marker)
1239               {
1240                 queue_deleten(q, 0, i + 1);
1241                 return r;
1242               }
1243         }
1244     }
1245   return r;
1246 }
1247
1248 const unsigned char *
1249 repo_lookup_bin_checksum(Repo *repo, Id entry, Id keyname, Id *typep)
1250 {
1251   Repodata *data;
1252   int i;
1253   const unsigned char *chk;
1254
1255   FOR_REPODATAS(repo, i, data)
1256     {
1257       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1258         continue;
1259       if (!repodata_precheck_keyname(data, keyname))
1260         continue;
1261       chk = repodata_lookup_bin_checksum(data, entry, keyname, typep);
1262       if (chk)
1263         return chk;
1264       if (repodata_lookup_type(data, entry, keyname))
1265         return 0;
1266     }
1267   *typep = 0;
1268   return 0;
1269 }
1270
1271 const char *
1272 repo_lookup_checksum(Repo *repo, Id entry, Id keyname, Id *typep)
1273 {
1274   const unsigned char *chk = repo_lookup_bin_checksum(repo, entry, keyname, typep);
1275   return chk ? pool_bin2hex(repo->pool, chk, solv_chksum_len(*typep)) : 0;
1276 }
1277
1278 int
1279 repo_lookup_void(Repo *repo, Id entry, Id keyname)
1280 {
1281   Repodata *data;
1282   int i;
1283   Id type;
1284
1285   FOR_REPODATAS(repo, i, data)
1286     {
1287       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1288         continue;
1289       if (!repodata_precheck_keyname(data, keyname))
1290         continue;
1291       type = repodata_lookup_type(data, entry, keyname);
1292       if (type)
1293         return type == REPOKEY_TYPE_VOID;
1294     }
1295   return 0;
1296 }
1297
1298 Id
1299 repo_lookup_type(Repo *repo, Id entry, Id keyname)
1300 {
1301   Repodata *data;
1302   int i;
1303   Id type;
1304
1305   FOR_REPODATAS(repo, i, data)
1306     {
1307       if (entry != SOLVID_META && (entry < data->start || entry >= data->end))
1308         continue;
1309       if (!repodata_precheck_keyname(data, keyname))
1310         continue;
1311       type = repodata_lookup_type(data, entry, keyname);
1312       if (type)
1313         return type == REPOKEY_TYPE_DELETED ? 0 : type;
1314     }
1315   return 0;
1316 }
1317
1318 /***********************************************************************/
1319
1320 Repodata *
1321 repo_add_repodata(Repo *repo, int flags)
1322 {
1323   Repodata *data;
1324   int i;
1325   if ((flags & REPO_USE_LOADING) != 0)
1326     {
1327       for (i = repo->nrepodata - 1; i > 0; i--)
1328         if (repo->repodata[i].state == REPODATA_LOADING)
1329           {
1330             Repodata *data = repo->repodata + i;
1331             /* re-init */
1332             /* hack: we mis-use REPO_REUSE_REPODATA here */
1333             if (!(flags & REPO_REUSE_REPODATA))
1334               repodata_empty(data, (flags & REPO_LOCALPOOL) ? 1 : 0);
1335             return data;
1336           }
1337       return 0; /* must not create a new repodata! */
1338     }
1339   if ((flags & REPO_REUSE_REPODATA) != 0)
1340     {
1341       for (i = repo->nrepodata - 1; i > 0; i--)
1342         if (repo->repodata[i].state != REPODATA_STUB)
1343           return repo->repodata + i;
1344     }
1345   if (!repo->nrepodata)
1346     {    
1347       repo->nrepodata = 2;      /* start with id 1 */
1348       repo->repodata = solv_calloc(repo->nrepodata, sizeof(*data));
1349     }    
1350   else 
1351     {    
1352       repo->nrepodata++;
1353       repo->repodata = solv_realloc2(repo->repodata, repo->nrepodata, sizeof(*data));
1354     }    
1355   data = repo->repodata + repo->nrepodata - 1; 
1356   repodata_initdata(data, repo, (flags & REPO_LOCALPOOL) ? 1 : 0);
1357   return data;
1358 }
1359
1360 Repodata *
1361 repo_id2repodata(Repo *repo, Id id)
1362 {
1363   return id ? repo->repodata + id : 0;
1364 }
1365
1366 Repodata *
1367 repo_last_repodata(Repo *repo)
1368 {
1369   int i;
1370   for (i = repo->nrepodata - 1; i > 0; i--)
1371     if (repo->repodata[i].state != REPODATA_STUB)
1372       return repo->repodata + i;
1373   return repo_add_repodata(repo, 0);
1374 }
1375
1376 void
1377 repo_set_id(Repo *repo, Id p, Id keyname, Id id)
1378 {
1379   Repodata *data;
1380   if (p >= 0)
1381     {
1382       switch (keyname)
1383         {
1384         case SOLVABLE_NAME:
1385           repo->pool->solvables[p].name = id;
1386           return;
1387         case SOLVABLE_ARCH:
1388           repo->pool->solvables[p].arch = id;
1389           return;
1390         case SOLVABLE_EVR:
1391           repo->pool->solvables[p].evr = id;
1392           return;
1393         case SOLVABLE_VENDOR:
1394           repo->pool->solvables[p].vendor = id;
1395           return;
1396         }
1397     }
1398   data = repo_last_repodata(repo);
1399   if (data->localpool)
1400     id = repodata_localize_id(data, id, 1);
1401   repodata_set_id(data, p, keyname, id);
1402 }
1403
1404 void
1405 repo_set_num(Repo *repo, Id p, Id keyname, unsigned int num)
1406 {
1407   Repodata *data;
1408   if (p >= 0)
1409     {
1410       if (keyname == RPM_RPMDBID)
1411         {
1412           if (!repo->rpmdbid)
1413             repo->rpmdbid = repo_sidedata_create(repo, sizeof(Id));
1414           repo->rpmdbid[p] = num;
1415           return;
1416         }
1417     }
1418   data = repo_last_repodata(repo);
1419   repodata_set_num(data, p, keyname, num);
1420 }
1421
1422 void
1423 repo_set_str(Repo *repo, Id p, Id keyname, const char *str)
1424 {
1425   Repodata *data;
1426   if (p >= 0)
1427     {
1428       switch (keyname)
1429         {
1430         case SOLVABLE_NAME:
1431         case SOLVABLE_ARCH:
1432         case SOLVABLE_EVR:
1433         case SOLVABLE_VENDOR:
1434           repo_set_id(repo, p, keyname, pool_str2id(repo->pool, str, 1));
1435           return;
1436         }
1437     }
1438   data = repo_last_repodata(repo);
1439   repodata_set_str(data, p, keyname, str);
1440 }
1441
1442 void
1443 repo_set_poolstr(Repo *repo, Id p, Id keyname, const char *str)
1444 {
1445   Repodata *data;
1446   if (p >= 0)
1447     {
1448       switch (keyname)
1449         {
1450         case SOLVABLE_NAME:
1451         case SOLVABLE_ARCH:
1452         case SOLVABLE_EVR:
1453         case SOLVABLE_VENDOR:
1454           repo_set_id(repo, p, keyname, pool_str2id(repo->pool, str, 1));
1455           return;
1456         }
1457     }
1458   data = repo_last_repodata(repo);
1459   repodata_set_poolstr(data, p, keyname, str);
1460 }
1461
1462 void
1463 repo_add_poolstr_array(Repo *repo, Id p, Id keyname, const char *str)
1464 {
1465   Repodata *data = repo_last_repodata(repo);
1466   repodata_add_poolstr_array(data, p, keyname, str);
1467 }
1468
1469 void
1470 repo_add_deparray(Repo *repo, Id p, Id keyname, Id dep, Id marker)
1471 {
1472   Repodata *data;
1473   if (p >= 0)
1474     {
1475       Solvable *s = repo->pool->solvables + p;
1476       switch (keyname)
1477         {
1478         case SOLVABLE_PROVIDES:
1479           s->provides = repo_addid_dep(repo, s->provides, dep, marker);
1480           return;
1481         case SOLVABLE_OBSOLETES:
1482           s->obsoletes = repo_addid_dep(repo, s->obsoletes, dep, marker);
1483           return;
1484         case SOLVABLE_CONFLICTS:
1485           s->conflicts = repo_addid_dep(repo, s->conflicts, dep, marker);
1486           return;
1487         case SOLVABLE_REQUIRES:
1488           s->requires = repo_addid_dep(repo, s->requires, dep, marker);
1489           return;
1490         case SOLVABLE_RECOMMENDS:
1491           s->recommends = repo_addid_dep(repo, s->recommends, dep, marker);
1492           return;
1493         case SOLVABLE_SUGGESTS:
1494           s->suggests = repo_addid_dep(repo, s->suggests, dep, marker);
1495           return;
1496         case SOLVABLE_SUPPLEMENTS:
1497           s->supplements = repo_addid_dep(repo, s->supplements, dep, marker);
1498           return;
1499         case SOLVABLE_ENHANCES:
1500           s->enhances = repo_addid_dep(repo, s->enhances, dep, marker);
1501           return;
1502         }
1503     }
1504   data = repo_last_repodata(repo);
1505   repodata_add_idarray(data, p, keyname, dep);
1506 }
1507
1508 void
1509 repo_add_idarray(Repo *repo, Id p, Id keyname, Id id)
1510 {
1511   repo_add_deparray(repo, p, keyname, id, 0);
1512 }
1513
1514 static Offset
1515 repo_set_idarray_solvable(Repo *repo, Queue *q)
1516 {
1517   Offset o = 0;
1518   int i;
1519   for (i = 0; i < q->count; i++)
1520     repo_addid_dep(repo, o, q->elements[i], 0);
1521   return o;
1522 }
1523
1524 void
1525 repo_set_deparray(Repo *repo, Id p, Id keyname, Queue *q, Id marker)
1526 {
1527   Repodata *data;
1528   if (marker)
1529     {
1530       /* complex case, splice old and new arrays */
1531       int i;
1532       Queue q2;
1533       queue_init(&q2);
1534       repo_lookup_deparray(repo, p, keyname, &q2, -marker);
1535       if (marker > 0)
1536         {
1537           if (q->count)
1538             {
1539               queue_push(&q2, marker);
1540               for (i = 0; i < q->count; i++)
1541                 queue_push(&q2, q->elements[i]);
1542             }
1543         }
1544       else
1545         {
1546           if (q2.count)
1547             queue_insert(&q2, 0, -marker);
1548           queue_insertn(&q2, 0, q->count);
1549           for (i = 0; i < q->count; i++)
1550            q2.elements[i] = q->elements[i];
1551         }
1552       repo_set_deparray(repo, p, keyname, &q2, 0);
1553       queue_free(&q2);
1554       return;
1555     }
1556   if (p >= 0)
1557     {
1558       Solvable *s = repo->pool->solvables + p;
1559       switch (keyname)
1560         {
1561         case SOLVABLE_PROVIDES:
1562           s->provides = repo_set_idarray_solvable(repo, q);
1563           return;
1564         case SOLVABLE_OBSOLETES:
1565           s->obsoletes = repo_set_idarray_solvable(repo, q);
1566           return;
1567         case SOLVABLE_CONFLICTS:
1568           s->conflicts = repo_set_idarray_solvable(repo, q);
1569           return;
1570         case SOLVABLE_REQUIRES:
1571           s->requires = repo_set_idarray_solvable(repo, q);
1572           return;
1573         case SOLVABLE_RECOMMENDS:
1574           s->recommends = repo_set_idarray_solvable(repo, q);
1575           return;
1576         case SOLVABLE_SUGGESTS:
1577           s->suggests = repo_set_idarray_solvable(repo, q);
1578           return;
1579         case SOLVABLE_SUPPLEMENTS:
1580           s->supplements = repo_set_idarray_solvable(repo, q);
1581           return;
1582         case SOLVABLE_ENHANCES:
1583           s->enhances = repo_set_idarray_solvable(repo, q);
1584           return;
1585         }
1586     }
1587   data = repo_last_repodata(repo);
1588   repodata_set_idarray(data, p, keyname, q);
1589 }
1590
1591 void
1592 repo_set_idarray(Repo *repo, Id p, Id keyname, Queue *q)
1593 {
1594   repo_set_deparray(repo, p, keyname, q, 0);
1595 }
1596
1597 void
1598 repo_internalize(Repo *repo)
1599 {
1600   int i;
1601   Repodata *data;
1602
1603   FOR_REPODATAS(repo, i, data)
1604     if (data->attrs || data->xattrs)
1605       repodata_internalize(data);
1606 }
1607
1608 void
1609 repo_disable_paging(Repo *repo)
1610 {
1611   int i;
1612   Repodata *data;
1613
1614   FOR_REPODATAS(repo, i, data)
1615     repodata_disable_paging(data);
1616 }
1617
1618 /*
1619 vim:cinoptions={.5s,g0,p5,t0,(0,^-0.5s,n-0.5s:tw=78:cindent:sw=4:
1620 */