fix Pool_repo_iterator and Repo_solvable_iterator in perl bindings
[platform/upstream/libsolv.git] / bindings / solv.i
1 #
2 # WARNING: for perl iterator/array support you need to run
3 #   sed -i -e 's/SvTYPE(tsv) == SVt_PVHV/SvTYPE(tsv) == SVt_PVHV || SvTYPE(tsv) == SVt_PVAV/'
4 # on the generated c code
5 #
6
7 %module solv
8
9 #ifdef SWIGRUBY
10 %markfunc Pool "mark_Pool";
11 #endif
12
13 #
14 # binaryblob handling
15 #
16
17 %{
18 typedef struct {
19   const void *data;
20   size_t len;
21 } BinaryBlob;
22 %}
23
24 %typemap(in,noblock=1,fragment="SWIG_AsCharPtrAndSize") (const unsigned char *str, size_t len) (int res, char *buf = 0, size_t size = 0, int alloc = 0) {
25   res = SWIG_AsCharPtrAndSize($input, &buf, &size, &alloc);
26   if (!SWIG_IsOK(res)) {
27 #if defined(SWIGPYTHON)
28     const void *pybuf = 0;
29     Py_ssize_t pysize = 0;
30     res = PyObject_AsReadBuffer($input, &pybuf, &pysize);
31     if (res < 0) {
32       %argument_fail(res, "BinaryBlob", $symname, $argnum);
33     } else {
34       buf = (void *)pybuf;
35       size = pysize;
36     }
37 #else
38     %argument_fail(res, "const char *", $symname, $argnum);
39 #endif
40   }
41   $1 = (unsigned char *)buf;
42   $2 = size;
43 }
44
45 %typemap(freearg,noblock=1,match="in") (const unsigned char *str, int len) {
46   if (alloc$argnum == SWIG_NEWOBJ) %delete_array(buf$argnum);
47 }
48
49 %typemap(out,noblock=1,fragment="SWIG_FromCharPtrAndSize") BinaryBlob {
50 #if defined(SWIGPYTHON) && defined(PYTHON3)
51   $result = $1.data ? Py_BuildValue("y#", $1.data, $1.len) : SWIG_Py_Void();
52 #else
53   $result = SWIG_FromCharPtrAndSize($1.data, $1.len);
54 #endif
55 }
56
57 #if defined(SWIGPYTHON)
58 %typemap(in) Queue {
59   /* Check if is a list */
60   queue_init(&$1);
61   if (PyList_Check($input)) {
62     int size = PyList_Size($input);
63     int i = 0;
64     for (i = 0; i < size; i++) {
65       PyObject *o = PyList_GetItem($input,i);
66       int v;
67       int e = SWIG_AsVal_int(o, &v);
68       if (!SWIG_IsOK(e)) {
69         SWIG_exception_fail(SWIG_ArgError(e), "list must contain only integers");
70         queue_free(&$1);
71         return NULL;
72       }
73       queue_push(&$1, v);
74     }
75   } else {
76     PyErr_SetString(PyExc_TypeError,"not a list");
77     return NULL;
78   }
79 }
80
81 %typemap(out) Queue {
82   int i;
83   PyObject *o = PyList_New($1.count);
84   for (i = 0; i < $1.count; i++)
85     PyList_SetItem(o, i, SWIG_From_int($1.elements[i]));
86   queue_free(&$1);
87   $result = o;
88 }
89
90 %define Queue2Array(type, step, con) %{
91   int i;
92   int cnt = $1.count / step;
93   Id *idp = $1.elements;
94   PyObject *o = PyList_New(cnt);
95   for (i = 0; i < cnt; i++, idp += step)
96     {
97       Id id = *idp;
98 #define result resultx
99       type result = con;
100       $typemap(out, type)
101       PyList_SetItem(o, i, $result);
102 #undef result
103     }
104   queue_free(&$1);
105   $result = o;
106 %}
107
108 %enddef
109
110 #endif
111
112 #if defined(SWIGPERL)
113 %typemap(in) Queue {
114   AV *av;
115   int i, size;
116   queue_init(&$1);
117   if (!SvROK($input) || SvTYPE(SvRV($input)) != SVt_PVAV)
118     SWIG_croak("Argument $argnum is not an array reference.");
119   av = (AV*)SvRV($input);
120   size = av_len(av);
121   for (i = 0; i <= size; i++) {
122     SV **sv = av_fetch(av, i, 0);
123     int v;
124     int e = SWIG_AsVal_int(*sv, &v);
125     if (!SWIG_IsOK(e)) {
126       SWIG_croak("list must contain only integers");
127     }
128     queue_push(&$1, v);
129   }
130 }
131 # AV *o = newAV();
132 # av_push(o, SvREFCNT_inc(SWIG_From_int($1.elements[i])));
133 # $result = newRV_noinc((SV*)o); argvi++;
134 #
135 %typemap(out) Queue {
136   int i;
137   if (argvi + $1.count + 1 >= items) {
138     EXTEND(sp, (argvi + $1.count + 1) - items + 1);
139   }
140   for (i = 0; i < $1.count; i++)
141     ST(argvi++) = SvREFCNT_inc(SWIG_From_int($1.elements[i]));
142   queue_free(&$1);
143   $result = 0;
144 }
145 %define Queue2Array(type, step, con) %{
146   int i;
147   int cnt = $1.count / step;
148   Id *idp = $1.elements;
149   if (argvi + cnt + 1 >= items) {
150     EXTEND(sp, (argvi + cnt + 1) - items + 1);
151   }
152   for (i = 0; i < cnt; i++, idp += step)
153     {
154       Id id = *idp;
155 #define result resultx
156       type result = con;
157       $typemap(out, type)
158       SvREFCNT_inc(ST(argvi - 1));
159 #undef result
160     }
161   queue_free(&$1);
162   $result = 0;
163 %}
164 %enddef
165
166 #endif
167
168 %typemap(arginit) Queue {
169   queue_init(&$1);
170 }
171 %typemap(freearg) Queue {
172   queue_free(&$1);
173 }
174
175 #if defined(SWIGRUBY)
176 %typemap(in) Queue {
177   int size, i;
178   VALUE *o;
179   queue_init(&$1);
180   size = RARRAY_LEN($input);
181   i = 0;
182   o = RARRAY_PTR($input);
183   for (i = 0; i < size; i++, o++) {
184     int v;
185     int e = SWIG_AsVal_int(*o, &v);
186     if (!SWIG_IsOK(e))
187       {
188         SWIG_Error(SWIG_RuntimeError, "list must contain only integers");
189         SWIG_fail;
190       }
191     queue_push(&$1, v);
192   }
193 }
194 %typemap(out) Queue {
195   int i;
196   VALUE o = rb_ary_new2($1.count);
197   for (i = 0; i < $1.count; i++)
198     rb_ary_store(o, i, SWIG_From_int($1.elements[i]));
199   queue_free(&$1);
200   $result = o;
201 }
202 %typemap(arginit) Queue {
203   queue_init(&$1);
204 }
205 %typemap(freearg) Queue {
206   queue_free(&$1);
207 }
208 %define Queue2Array(type, step, con) %{
209   int i;
210   int cnt = $1.count / step;
211   Id *idp = $1.elements;
212   VALUE o = rb_ary_new2(cnt);
213   for (i = 0; i < cnt; i++, idp += step)
214     {
215       Id id = *idp;
216 #define result resultx
217       type result = con;
218       $typemap(out, type)
219       rb_ary_store(o, i, $result);
220 #undef result
221     }
222   queue_free(&$1);
223   $result = o;
224 %}
225 %enddef
226 #endif
227
228
229
230
231 #if defined(SWIGPERL)
232
233 # work around a swig bug
234 %{
235 #undef SWIG_CALLXS
236 #ifdef PERL_OBJECT
237 #  define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(cv,pPerl)
238 #else
239 #  ifndef MULTIPLICITY
240 #    define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(cv)
241 #  else
242 #    define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(PERL_GET_THX, cv)
243 #  endif
244 #endif
245 %}
246
247
248 %define perliter(class)
249   %perlcode {
250     sub class##::FETCH {
251       my $i = ${##class##::ITERATORS}{$_[0]};
252       if ($i) {
253         $_[1] == $i->[0] - 1 ? $i->[1] : undef;
254       } else {
255         $_[0]->__getitem__($_[1]);
256       }
257     }
258     sub class##::FETCHSIZE {
259       my $i = ${##class##::ITERATORS}{$_[0]};
260       if ($i) {
261         ($i->[1] = $_[0]->__next__()) ? ++$i->[0]  : 0;
262       } else {
263         $_[0]->__len__();
264       }
265     }
266   }
267 %enddef
268
269 %{
270
271 #define SWIG_PERL_ITERATOR      0x80
272
273 SWIGRUNTIMEINLINE SV *
274 SWIG_Perl_NewArrayObj(SWIG_MAYBE_PERL_OBJECT void *ptr, swig_type_info *t, int flags) {
275   SV *result = sv_newmortal();
276   if (ptr && (flags & (SWIG_SHADOW | SWIG_POINTER_OWN))) {
277     SV *self;
278     SV *obj=newSV(0);
279     AV *array=newAV();
280     HV *stash;
281     sv_setref_pv(obj, (char *) SWIG_Perl_TypeProxyName(t), ptr);
282     stash=SvSTASH(SvRV(obj));
283     if (flags & SWIG_POINTER_OWN) {
284       HV *hv;
285       GV *gv=*(GV**)hv_fetch(stash, "OWNER", 5, TRUE);
286       if (!isGV(gv))
287         gv_init(gv, stash, "OWNER", 5, FALSE);
288       hv=GvHVn(gv);
289       hv_store_ent(hv, obj, newSViv(1), 0);
290     }
291     if (flags & SWIG_PERL_ITERATOR) {
292       HV *hv;
293       GV *gv=*(GV**)hv_fetch(stash, "ITERATORS", 9, TRUE);
294       AV *av=newAV();
295       if (!isGV(gv))
296         gv_init(gv, stash, "ITERATORS", 9, FALSE);
297       hv=GvHVn(gv);
298       hv_store_ent(hv, obj, newRV_inc((SV *)av), 0);
299     }
300     sv_magic((SV *)array, (SV *)obj, 'P', Nullch, 0);
301     SvREFCNT_dec(obj);
302     self=newRV_noinc((SV *)array);
303     sv_setsv(result, self);
304     SvREFCNT_dec((SV *)self);
305     sv_bless(result, stash);
306   } else {
307     sv_setref_pv(result, (char *) SWIG_Perl_TypeProxyName(t), ptr);
308   }
309   return result;
310 }
311
312 %}
313
314 %typemap(out) Perlarray {
315   ST(argvi) = SWIG_Perl_NewArrayObj(SWIG_PERL_OBJECT_CALL SWIG_as_voidptr(result), $1_descriptor, $owner | $shadow); argvi++;
316 }
317 %typemap(out) Perliterator {
318   ST(argvi) = SWIG_Perl_NewArrayObj(SWIG_PERL_OBJECT_CALL SWIG_as_voidptr(result), $1_descriptor, $owner | $shadow | SWIG_PERL_ITERATOR); argvi++;
319 }
320
321 %typemap(out) Pool_solvable_iterator * = Perlarray;
322 %typemap(out) Pool_solvable_iterator * solvables_iter = Perliterator;
323 %typemap(out) Pool_repo_iterator * = Perlarray;
324 %typemap(out) Pool_repo_iterator * repos_iter = Perliterator;
325 %typemap(out) Repo_solvable_iterator * = Perlarray;
326 %typemap(out) Repo_solvable_iterator * solvables_iter = Perliterator;
327 %typemap(out) Dataiterator * = Perliterator;
328
329 #endif
330
331
332 #if defined(SWIGPYTHON)
333 typedef PyObject *AppObjectPtr;
334 %typemap(out) AppObjectPtr {
335   $result = $1 ? $1 : Py_None;
336   Py_INCREF($result);
337 }
338 #endif
339 #if defined(SWIGPERL)
340 typedef SV *AppObjectPtr;
341 %typemap(in) AppObjectPtr {
342   $1 = SvROK($input) ? SvRV($input) : 0;
343 }
344 %typemap(out) AppObjectPtr {
345   $result = $1 ? newRV_inc($1) : newSV(0);
346   argvi++;
347 }
348 #endif
349 #if defined(SWIGRUBY)
350 typedef VALUE AppObjectPtr;
351 %typemap(in) AppObjectPtr {
352   $1 = (void *)$input;
353 }
354 %typemap(out) AppObjectPtr {
355   $result = (VALUE)$1;
356 }
357 #endif
358
359
360 #ifdef SWIGPYTHON
361 %include "file.i"
362 #else
363 %fragment("SWIG_AsValFilePtr","header") {}
364 #endif
365
366
367 %fragment("SWIG_AsValSolvFpPtr","header", fragment="SWIG_AsValFilePtr") {
368
369 SWIGINTERN int
370 #ifdef SWIGRUBY
371 SWIG_AsValSolvFpPtr(VALUE obj, FILE **val) {
372 #else
373 SWIG_AsValSolvFpPtr(void *obj, FILE **val) {
374 #endif
375   static swig_type_info* desc = 0;
376   void *vptr = 0;
377   int ecode;
378
379   if (!desc) desc = SWIG_TypeQuery("SolvFp *");
380   if ((SWIG_ConvertPtr(obj, &vptr, desc, 0)) == SWIG_OK) {
381     if (val)
382       *val = vptr ? ((SolvFp *)vptr)->fp : 0;
383     return SWIG_OK;
384   }
385 #ifdef SWIGPYTHON
386   ecode = SWIG_AsValFilePtr(obj, val);
387   if (ecode == SWIG_OK)
388     return ecode;
389 #endif
390   return SWIG_TypeError;
391 }
392
393 }
394
395
396 %fragment("SWIG_AsValDepId","header") {
397
398 SWIGINTERN int
399 #ifdef SWIGRUBY
400 SWIG_AsValDepId(VALUE obj, int *val) {
401 #else
402 SWIG_AsValDepId(void *obj, int *val) {
403 #endif
404   static swig_type_info* desc = 0;
405   void *vptr = 0;
406   int ecode;
407   if (!desc) desc = SWIG_TypeQuery("Dep *");
408   ecode = SWIG_AsVal_int(obj, val);
409   if (SWIG_IsOK(ecode))
410     return ecode;
411   if ((SWIG_ConvertPtr(obj, &vptr, desc, 0)) == SWIG_OK) {
412     if (val)
413       *val = vptr ? ((Dep *)vptr)->id : 0;
414     return SWIG_OK;
415   }
416   return SWIG_TypeError;
417 }
418
419 }
420
421
422
423 %include "typemaps.i"
424
425 %typemap(in,numinputs=0,noblock=1) XRule **OUTPUT ($*1_ltype temp) {
426   $1 = &temp;
427 }
428 %typemap(argout,noblock=1) XRule **OUTPUT {
429   %append_output(SWIG_NewPointerObj((void*)(*$1), SWIGTYPE_p_XRule, SWIG_POINTER_OWN | %newpointer_flags));
430 }
431
432 %typemaps_asval(%checkcode(POINTER), SWIG_AsValSolvFpPtr, "SWIG_AsValSolvFpPtr", FILE*);
433 %typemaps_asval(%checkcode(INT32), SWIG_AsValDepId, "SWIG_AsValDepId", DepId);
434
435
436 %{
437 #include <stdbool.h>
438 #include <stdio.h>
439 #include <sys/stat.h>
440 #include <sys/utsname.h>
441 #include <sys/types.h>
442 #include <unistd.h>
443
444 /* argh, swig undefs bool for perl */
445 #ifndef bool
446 typedef int bool;
447 #endif
448
449 #include "pool.h"
450 #include "poolarch.h"
451 #include "evr.h"
452 #include "solver.h"
453 #include "policy.h"
454 #include "solverdebug.h"
455 #include "repo_solv.h"
456 #include "chksum.h"
457 #include "selection.h"
458
459 #include "repo_write.h"
460 #ifdef ENABLE_RPMDB
461 #include "repo_rpmdb.h"
462 #endif
463 #ifdef ENABLE_PUBKEY
464 #include "repo_pubkey.h"
465 #endif
466 #ifdef ENABLE_DEBIAN
467 #include "repo_deb.h"
468 #endif
469 #ifdef ENABLE_RPMMD
470 #include "repo_rpmmd.h"
471 #include "repo_updateinfoxml.h"
472 #include "repo_deltainfoxml.h"
473 #include "repo_repomdxml.h"
474 #endif
475 #ifdef ENABLE_SUSEREPO
476 #include "repo_products.h"
477 #include "repo_susetags.h"
478 #include "repo_content.h"
479 #endif
480 #ifdef ENABLE_MDKREPO
481 #include "repo_mdk.h"
482 #endif
483 #ifdef ENABLE_ARCHREPO
484 #include "repo_arch.h"
485 #endif
486 #include "solv_xfopen.h"
487
488 /* for old ruby versions */
489 #ifndef RARRAY_PTR
490 #define RARRAY_PTR(ary) (RARRAY(ary)->ptr)
491 #endif
492 #ifndef RARRAY_LEN
493 #define RARRAY_LEN(ary) (RARRAY(ary)->len)
494 #endif
495
496 #define SOLVER_SOLUTION_ERASE                   -100
497 #define SOLVER_SOLUTION_REPLACE                 -101
498 #define SOLVER_SOLUTION_REPLACE_DOWNGRADE       -102
499 #define SOLVER_SOLUTION_REPLACE_ARCHCHANGE      -103
500 #define SOLVER_SOLUTION_REPLACE_VENDORCHANGE    -104
501 #define SOLVER_SOLUTION_REPLACE_NAMECHANGE      -105
502
503 typedef void *AppObjectPtr;
504 typedef Id DepId;
505
506 typedef struct {
507   Pool *pool;
508   Id id;
509 } Dep;
510
511 typedef struct {
512   Pool *pool;
513   Id id;
514 } XSolvable;
515
516 typedef struct {
517   Solver *solv;
518   Id id;
519 } XRule;
520
521 typedef struct {
522   Repo *repo;
523   Id id;
524 } XRepodata;
525
526 typedef struct {
527   Pool *pool;
528   Id id;
529 } Pool_solvable_iterator;
530
531 typedef struct {
532   Pool *pool;
533   Id id;
534 } Pool_repo_iterator;
535
536 typedef struct {
537   Repo *repo;
538   Id id;
539 } Repo_solvable_iterator;
540
541 typedef struct {
542   Pool *pool;
543   int how;
544   Id what;
545 } Job;
546
547 typedef struct {
548   Solver *solv;
549   Id id;
550 } Problem;
551
552 typedef struct {
553   Solver *solv;
554   Id problemid;
555   Id id;
556 } Solution;
557
558 typedef struct {
559   Solver *solv;
560   Id problemid;
561   Id solutionid;
562   Id id;
563
564   Id type;
565   Id p;
566   Id rp;
567 } Solutionelement;
568
569 typedef struct {
570   Solver *solv;
571   Id rid;
572   Id type;
573   Id source;
574   Id target;
575   Id dep_id;
576 } Ruleinfo;
577
578 typedef struct {
579   Transaction *transaction;
580   int mode;
581   Id type;
582   int count;
583   Id fromid;
584   Id toid;
585 } TransactionClass;
586
587 typedef struct {
588   Pool *pool;
589   Queue q;
590   int flags;
591 } Selection;
592
593 typedef struct {
594   FILE *fp;
595 } SolvFp;
596
597 typedef Dataiterator Datamatch;
598
599 %}
600
601 #ifdef SWIGRUBY
602 %mixin Dataiterator "Enumerable";
603 %mixin Pool_solvable_iterator "Enumerable";
604 %mixin Pool_repo_iterator "Enumerable";
605 %mixin Repo_solvable_iterator "Enumerable";
606 #endif
607
608 typedef int Id;
609
610 %include "knownid.h"
611
612 # from repodata.h
613 %constant Id SOLVID_META;
614 %constant Id SOLVID_POS;
615
616 %constant int REL_EQ;
617 %constant int REL_GT;
618 %constant int REL_LT;
619 %constant int REL_ARCH;
620
621 typedef struct {
622   Pool* const pool;
623 } Selection;
624
625 typedef struct {
626   Pool* const pool;
627   Id const id;
628 } Dep;
629
630 # put before pool/repo so we can access the constructor
631 %nodefaultdtor Dataiterator;
632 typedef struct {} Dataiterator;
633
634 typedef struct {
635   Pool* const pool;
636   Id const id;
637 } XSolvable;
638
639 typedef struct {
640   Solver* const solv;
641   Id const type;
642   Id const dep_id;
643 } Ruleinfo;
644
645 typedef struct {
646   Solver* const solv;
647   Id const id;
648 } XRule;
649
650 typedef struct {
651   Repo* const repo;
652   Id const id;
653 } XRepodata;
654
655 typedef struct {} Pool_solvable_iterator;
656 typedef struct {} Pool_repo_iterator;
657 typedef struct {} Repo_solvable_iterator;
658
659 %nodefaultctor Datamatch;
660 %nodefaultdtor Datamatch;
661 typedef struct {
662   Pool * const pool;
663   Repo * const repo;
664   Id const solvid;
665 } Datamatch;
666
667 %nodefaultctor Datapos;
668 typedef struct {
669   Repo * const repo;
670 } Datapos;
671
672 typedef struct {
673   Pool * const pool;
674   int how;
675   Id what;
676 } Job;
677
678 %nodefaultctor Pool;
679 %nodefaultdtor Pool;
680 typedef struct {
681   AppObjectPtr appdata;
682 } Pool;
683
684 %nodefaultctor Repo;
685 %nodefaultdtor Repo;
686 typedef struct {
687   Pool * const pool;
688   const char * const name;
689   int priority;
690   int subpriority;
691   int const nsolvables;
692   AppObjectPtr appdata;
693 } Repo;
694
695 %nodefaultctor Solver;
696 %nodefaultdtor Solver;
697 typedef struct {
698   Pool * const pool;
699 } Solver;
700
701 typedef struct {
702 } Chksum;
703
704 #ifdef ENABLE_PUBKEY
705 typedef struct {
706   Id const htype;
707   unsigned int const created;
708   unsigned int const expires;
709   const char * const keyid;
710 } Solvsig;
711 #endif
712
713 %rename(xfopen) solvfp_xfopen;
714 %rename(xfopen_fd) solvfp_xfopen_fd;
715
716 %nodefaultctor SolvFp;
717 typedef struct {
718 } SolvFp;
719
720 %newobject solvfp_xfopen;
721 %newobject solvfp_xfopen_fd;
722
723 SolvFp *solvfp_xfopen(const char *fn, const char *mode = 0);
724 SolvFp *solvfp_xfopen_fd(const char *fn, int fd, const char *mode = 0);
725
726 %{
727   SWIGINTERN SolvFp *solvfp_xfopen_fd(const char *fn, int fd, const char *mode) {
728     SolvFp *sfp;
729     FILE *fp;
730     fd = dup(fd);
731     fp = fd == -1 ? 0 : solv_xfopen_fd(fn, fd, mode);
732     if (!fp)
733       return 0;
734     sfp = solv_calloc(1, sizeof(SolvFp));
735     sfp->fp = fp;
736     return sfp;
737   }
738   SWIGINTERN SolvFp *solvfp_xfopen(const char *fn, const char *mode) {
739     SolvFp *sfp;
740     FILE *fp;
741     fp = solv_xfopen(fn, mode);
742     if (!fp)
743       return 0;
744     sfp = solv_calloc(1, sizeof(SolvFp));
745     sfp->fp = fp;
746     return sfp;
747   }
748 %}
749
750 typedef struct {
751   Solver * const solv;
752   Id const id;
753 } Problem;
754
755 typedef struct {
756   Solver * const solv;
757   Id const problemid;
758   Id const id;
759 } Solution;
760
761 typedef struct {
762   Solver *const solv;
763   Id const problemid;
764   Id const solutionid;
765   Id const id;
766   Id const type;
767 } Solutionelement;
768
769 %nodefaultctor Transaction;
770 %nodefaultdtor Transaction;
771 typedef struct {
772   Pool * const pool;
773 } Transaction;
774
775 typedef struct {
776   Transaction * const transaction;
777   Id const type;
778   Id const fromid;
779   Id const toid;
780   int const count;
781 } TransactionClass;
782
783 %extend SolvFp {
784   ~SolvFp() {
785     if ($self->fp)
786       fclose($self->fp);
787     free($self);
788   }
789   int fileno() {
790     return $self->fp ? fileno($self->fp) : -1;
791   }
792   int dup() {
793     return $self->fp ? dup(fileno($self->fp)) : -1;
794   }
795   bool flush() {
796     if (!$self->fp)
797       return 1;
798     return fflush($self->fp) == 0;
799   }
800   bool close() {
801     bool ret;
802     if (!$self->fp)
803       return 1;
804     ret = fclose($self->fp) == 0;
805     $self->fp = 0;
806     return ret;
807   }
808 }
809
810 %extend Job {
811   static const Id SOLVER_SOLVABLE = SOLVER_SOLVABLE;
812   static const Id SOLVER_SOLVABLE_NAME = SOLVER_SOLVABLE_NAME;
813   static const Id SOLVER_SOLVABLE_PROVIDES = SOLVER_SOLVABLE_PROVIDES;
814   static const Id SOLVER_SOLVABLE_ONE_OF = SOLVER_SOLVABLE_ONE_OF;
815   static const Id SOLVER_SOLVABLE_REPO = SOLVER_SOLVABLE_REPO;
816   static const Id SOLVER_SOLVABLE_ALL = SOLVER_SOLVABLE_ALL;
817   static const Id SOLVER_SELECTMASK = SOLVER_SELECTMASK;
818   static const Id SOLVER_NOOP = SOLVER_NOOP;
819   static const Id SOLVER_INSTALL = SOLVER_INSTALL;
820   static const Id SOLVER_ERASE = SOLVER_ERASE;
821   static const Id SOLVER_UPDATE = SOLVER_UPDATE;
822   static const Id SOLVER_WEAKENDEPS = SOLVER_WEAKENDEPS;
823   static const Id SOLVER_MULTIVERSION = SOLVER_MULTIVERSION;
824   static const Id SOLVER_LOCK = SOLVER_LOCK;
825   static const Id SOLVER_DISTUPGRADE = SOLVER_DISTUPGRADE;
826   static const Id SOLVER_VERIFY = SOLVER_VERIFY;
827   static const Id SOLVER_DROP_ORPHANED = SOLVER_DROP_ORPHANED;
828   static const Id SOLVER_USERINSTALLED = SOLVER_USERINSTALLED;
829   static const Id SOLVER_JOBMASK = SOLVER_JOBMASK;
830   static const Id SOLVER_WEAK = SOLVER_WEAK;
831   static const Id SOLVER_ESSENTIAL = SOLVER_ESSENTIAL;
832   static const Id SOLVER_CLEANDEPS = SOLVER_CLEANDEPS;
833   static const Id SOLVER_FORCEBEST = SOLVER_FORCEBEST;
834   static const Id SOLVER_TARGETED = SOLVER_TARGETED;
835   static const Id SOLVER_SETEV = SOLVER_SETEV;
836   static const Id SOLVER_SETEVR = SOLVER_SETEVR;
837   static const Id SOLVER_SETARCH = SOLVER_SETARCH;
838   static const Id SOLVER_SETVENDOR = SOLVER_SETVENDOR;
839   static const Id SOLVER_SETREPO = SOLVER_SETREPO;
840   static const Id SOLVER_SETNAME = SOLVER_SETNAME;
841   static const Id SOLVER_NOAUTOSET = SOLVER_NOAUTOSET;
842   static const Id SOLVER_SETMASK = SOLVER_SETMASK;
843
844   Job(Pool *pool, int how, Id what) {
845     Job *job = solv_calloc(1, sizeof(*job));
846     job->pool = pool;
847     job->how = how;
848     job->what = what;
849     return job;
850   }
851
852   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
853   %newobject solvables;
854   Queue solvables() {
855     Queue q;
856     queue_init(&q);
857     pool_job2solvables($self->pool, &q, $self->how, $self->what);
858     return q;
859   }
860 #ifdef SWIGRUBY
861   %rename("isemptyupdate?") isemptyupdate;
862 #endif
863   bool isemptyupdate() {
864     return pool_isemptyupdatejob($self->pool, $self->how, $self->what);
865   }
866
867   bool __eq__(Job *j) {
868     return $self->pool == j->pool && $self->how == j->how && $self->what == j->what;
869   }
870   bool __ne__(Job *j) {
871     return !Job___eq__($self, j);
872   }
873 #if defined(SWIGPERL)
874   %rename("str") __str__;
875 #endif
876   const char *__str__() {
877     return pool_job2str($self->pool, $self->how, $self->what, 0);
878   }
879   const char *__repr__() {
880     const char *str = pool_job2str($self->pool, $self->how, $self->what, ~0);
881     return pool_tmpjoin($self->pool, "<Job ", str, ">");
882   }
883 }
884
885 %extend Selection {
886   static const Id SELECTION_NAME = SELECTION_NAME;
887   static const Id SELECTION_PROVIDES = SELECTION_PROVIDES;
888   static const Id SELECTION_FILELIST = SELECTION_FILELIST;
889   static const Id SELECTION_CANON = SELECTION_CANON;
890   static const Id SELECTION_DOTARCH = SELECTION_DOTARCH;
891   static const Id SELECTION_REL = SELECTION_REL;
892   static const Id SELECTION_INSTALLED_ONLY = SELECTION_INSTALLED_ONLY;
893   static const Id SELECTION_GLOB = SELECTION_GLOB;
894   static const Id SELECTION_FLAT = SELECTION_FLAT;
895   static const Id SELECTION_NOCASE = SELECTION_NOCASE;
896   static const Id SELECTION_SOURCE_ONLY = SELECTION_SOURCE_ONLY;
897   static const Id SELECTION_WITH_SOURCE = SELECTION_WITH_SOURCE;
898
899   Selection(Pool *pool) {
900     Selection *s;
901     s = solv_calloc(1, sizeof(*s));
902     s->pool = pool;
903     return s;
904   }
905
906   ~Selection() {
907     queue_free(&$self->q);
908     solv_free($self);
909   }
910   int flags() {
911     return $self->flags;
912   }
913 #ifdef SWIGRUBY
914   %rename("isempty?") isempty;
915 #endif
916   bool isempty() {
917     return $self->q.count == 0;
918   }
919   void filter(Selection *lsel) {
920     if ($self->pool != lsel->pool)
921       queue_empty(&$self->q);
922     else
923       selection_filter($self->pool, &$self->q, &lsel->q);
924   }
925   void add(Selection *lsel) {
926     if ($self->pool == lsel->pool)
927       {
928         selection_add($self->pool, &$self->q, &lsel->q);
929         $self->flags |= lsel->flags;
930       }
931   }
932   void add_raw(Id how, Id what) {
933     queue_push2(&$self->q, how, what);
934   }
935   %typemap(out) Queue jobs Queue2Array(Job *, 2, new_Job(arg1->pool, id, idp[1]));
936   %newobject jobs;
937   Queue jobs(int flags) {
938     Queue q;
939     int i;
940     queue_init_clone(&q, &$self->q);
941     for (i = 0; i < q.count; i += 2)
942       q.elements[i] |= flags;
943     return q;
944   }
945
946   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
947   %newobject solvables;
948   Queue solvables() {
949     Queue q;
950     queue_init(&q);
951     selection_solvables($self->pool, &$self->q, &q);
952     return q;
953   }
954
955 #if defined(SWIGPERL)
956   %rename("str") __str__;
957 #endif
958   const char *__str__() {
959     return pool_selection2str($self->pool, &$self->q, 0);
960   }
961   const char *__repr__() {
962     const char *str = pool_selection2str($self->pool, &$self->q, ~0);
963     return pool_tmpjoin($self->pool, "<Selection ", str, ">");
964   }
965 }
966
967 %extend Chksum {
968   Chksum(Id type) {
969     return solv_chksum_create(type);
970   }
971   Chksum(Id type, const char *hex) {
972     unsigned char buf[64];
973     int l = solv_chksum_len(type);
974     if (!l)
975       return 0;
976     if (solv_hex2bin(&hex, buf, sizeof(buf)) != l || hex[0])
977       return 0;
978     return solv_chksum_create_from_bin(type, buf);
979   }
980   ~Chksum() {
981     solv_chksum_free($self, 0);
982   }
983   Id const type;
984   %{
985   SWIGINTERN Id Chksum_type_get(Chksum *chk) {
986     return solv_chksum_get_type(chk);
987   }
988   %}
989   void add(const unsigned char *str, size_t len) {
990     solv_chksum_add($self, str, (int)len);
991   }
992   void add_fp(FILE *fp) {
993     char buf[4096];
994     int l;
995     while ((l = fread(buf, 1, sizeof(buf), fp)) > 0)
996       solv_chksum_add($self, buf, l);
997     rewind(fp);         /* convenience */
998   }
999   void add_fd(int fd) {
1000     char buf[4096];
1001     int l;
1002     while ((l = read(fd, buf, sizeof(buf))) > 0)
1003       solv_chksum_add($self, buf, l);
1004     lseek(fd, 0, 0);    /* convenience */
1005   }
1006   void add_stat(const char *filename) {
1007     struct stat stb;
1008     if (stat(filename, &stb))
1009       memset(&stb, 0, sizeof(stb));
1010     solv_chksum_add($self, &stb.st_dev, sizeof(stb.st_dev));
1011     solv_chksum_add($self, &stb.st_ino, sizeof(stb.st_ino));
1012     solv_chksum_add($self, &stb.st_size, sizeof(stb.st_size));
1013     solv_chksum_add($self, &stb.st_mtime, sizeof(stb.st_mtime));
1014   }
1015   void add_fstat(int fd) {
1016     struct stat stb;
1017     if (fstat(fd, &stb))
1018       memset(&stb, 0, sizeof(stb));
1019     solv_chksum_add($self, &stb.st_dev, sizeof(stb.st_dev));
1020     solv_chksum_add($self, &stb.st_ino, sizeof(stb.st_ino));
1021     solv_chksum_add($self, &stb.st_size, sizeof(stb.st_size));
1022     solv_chksum_add($self, &stb.st_mtime, sizeof(stb.st_mtime));
1023   }
1024   BinaryBlob raw() {
1025     BinaryBlob bl;
1026     int l;
1027     const unsigned char *b;
1028     b = solv_chksum_get($self, &l);
1029     bl.data = b;
1030     bl.len = l;
1031     return bl;
1032   }
1033   %newobject hex;
1034   char *hex() {
1035     int l;
1036     const unsigned char *b;
1037     char *ret;
1038
1039     b = solv_chksum_get($self, &l);
1040     ret = solv_malloc(2 * l + 1);
1041     solv_bin2hex(b, l, ret);
1042     return ret;
1043   }
1044
1045   bool __eq__(Chksum *chk) {
1046     int l;
1047     const unsigned char *b, *bo;
1048     if (!chk)
1049       return 0;
1050     if (solv_chksum_get_type($self) != solv_chksum_get_type(chk))
1051       return 0;
1052     b = solv_chksum_get($self, &l);
1053     bo = solv_chksum_get(chk, 0);
1054     return memcmp(b, bo, l) == 0;
1055   }
1056   bool __ne__(Chksum *chk) {
1057     return !Chksum___eq__($self, chk);
1058   }
1059 #if defined(SWIGRUBY)
1060   %rename("to_s") __str__;
1061 #endif
1062 #if defined(SWIGPERL)
1063   %rename("str") __str__;
1064 #endif
1065   %newobject __str__;
1066   const char *__str__() {
1067     const char *str;
1068     const char *h = 0;
1069     if (solv_chksum_isfinished($self))
1070       h = Chksum_hex($self);
1071     str = solv_dupjoin(solv_chksum_type2str(solv_chksum_get_type($self)), ":", h ? h : "unfinished");
1072     solv_free((void *)h);
1073     return str;
1074   }
1075   %newobject __repr__;
1076   const char *__repr__() {
1077     const char *h = Chksum___str__($self);
1078     const char *str = solv_dupjoin("<Chksum ", h, ">");
1079     solv_free((void *)h);
1080     return str;
1081   }
1082 }
1083
1084 %extend Pool {
1085   static const int POOL_FLAG_PROMOTEEPOCH = POOL_FLAG_PROMOTEEPOCH;
1086   static const int POOL_FLAG_FORBIDSELFCONFLICTS = POOL_FLAG_FORBIDSELFCONFLICTS;
1087   static const int POOL_FLAG_OBSOLETEUSESPROVIDES = POOL_FLAG_OBSOLETEUSESPROVIDES;
1088   static const int POOL_FLAG_IMPLICITOBSOLETEUSESPROVIDES = POOL_FLAG_IMPLICITOBSOLETEUSESPROVIDES;
1089   static const int POOL_FLAG_OBSOLETEUSESCOLORS = POOL_FLAG_OBSOLETEUSESCOLORS;
1090   static const int POOL_FLAG_IMPLICITOBSOLETEUSESCOLORS = POOL_FLAG_IMPLICITOBSOLETEUSESCOLORS;
1091   static const int POOL_FLAG_NOINSTALLEDOBSOLETES = POOL_FLAG_NOINSTALLEDOBSOLETES;
1092   static const int POOL_FLAG_HAVEDISTEPOCH = POOL_FLAG_HAVEDISTEPOCH;
1093   static const int POOL_FLAG_NOOBSOLETESMULTIVERSION = POOL_FLAG_NOOBSOLETESMULTIVERSION;
1094
1095   Pool() {
1096     Pool *pool = pool_create();
1097     return pool;
1098   }
1099   ~Pool() {
1100   }
1101   void set_debuglevel(int level) {
1102     pool_setdebuglevel($self, level);
1103   }
1104   int set_flag(int flag, int value) {
1105     return pool_set_flag($self, flag, value);
1106   }
1107   int get_flag(int flag) {
1108     return pool_get_flag($self, flag);
1109   }
1110   void set_rootdir(const char *rootdir) {
1111     pool_set_rootdir($self, rootdir);
1112   }
1113   const char *get_rootdir(int flag) {
1114     return pool_get_rootdir($self);
1115   }
1116 #if defined(SWIGPYTHON)
1117   %{
1118   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
1119     XRepodata *xd = new_XRepodata(data->repo, data->repodataid);
1120     PyObject *args = Py_BuildValue("(O)", SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_POINTER_OWN | 0));
1121     PyObject *result = PyEval_CallObject((PyObject *)d, args);
1122     int ecode = 0;
1123     int vresult = 0;
1124     Py_DECREF(args);
1125     if (!result)
1126       return 0; /* exception */
1127     ecode = SWIG_AsVal_int(result, &vresult);
1128     Py_DECREF(result);
1129     return SWIG_IsOK(ecode) ? vresult : 0;
1130   }
1131   %}
1132   void set_loadcallback(PyObject *callable) {
1133     if ($self->loadcallback == loadcallback) {
1134       PyObject *obj = $self->loadcallbackdata;
1135       Py_DECREF(obj);
1136     }
1137     if (callable) {
1138       Py_INCREF(callable);
1139     }
1140     pool_setloadcallback($self, callable ? loadcallback : 0, callable);
1141   }
1142 #endif
1143 #if defined(SWIGPERL)
1144 %{
1145   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
1146     int count;
1147     int ret = 0;
1148     dSP;
1149     XRepodata *xd = new_XRepodata(data->repo, data->repodataid);
1150
1151     ENTER;
1152     SAVETMPS;
1153     PUSHMARK(SP);
1154     XPUSHs(SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_OWNER | SWIG_SHADOW));
1155     PUTBACK;
1156     count = perl_call_sv((SV *)d, G_EVAL|G_SCALAR);
1157     SPAGAIN;
1158     if (count)
1159       ret = POPi;
1160     PUTBACK;
1161     FREETMPS;
1162     LEAVE;
1163     return ret;
1164   }
1165 %}
1166   void set_loadcallback(SV *callable) {
1167     if ($self->loadcallback == loadcallback)
1168       SvREFCNT_dec($self->loadcallbackdata);
1169     if (callable)
1170       SvREFCNT_inc(callable);
1171     pool_setloadcallback($self, callable ? loadcallback : 0, callable);
1172   }
1173 #endif
1174
1175 #if defined(SWIGRUBY)
1176 %{
1177   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
1178     XRepodata *xd = new_XRepodata(data->repo, data->repodataid);
1179     VALUE callable = (VALUE)d;
1180     VALUE rd = SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_POINTER_OWN | 0);
1181     VALUE res = rb_funcall(callable, rb_intern("call"), 1, rd);
1182     return res == Qtrue;
1183   }
1184   SWIGINTERN void mark_Pool(void *ptr) {
1185     Pool *pool = ptr;
1186     if (pool->loadcallback == loadcallback && pool->loadcallbackdata) {
1187       VALUE callable = (VALUE)pool->loadcallbackdata;
1188       rb_gc_mark(callable);
1189     }
1190   }
1191 %}
1192   %typemap(in, numinputs=0) VALUE callable {
1193     $1 = rb_block_given_p() ? rb_block_proc() : 0;
1194   }
1195   void set_loadcallback(VALUE callable) {
1196     pool_setloadcallback($self, callable ? loadcallback : 0, (void *)callable);
1197   }
1198 #endif
1199
1200   void free() {
1201     Pool_set_loadcallback($self, 0);
1202     pool_free($self);
1203   }
1204   Id str2id(const char *str, bool create=1) {
1205     return pool_str2id($self, str, create);
1206   }
1207   %newobject Dep;
1208   Dep *Dep(const char *str, bool create=1) {
1209     Id id = pool_str2id($self, str, create);
1210     return new_Dep($self, id);
1211   }
1212   const char *id2str(Id id) {
1213     return pool_id2str($self, id);
1214   }
1215   const char *dep2str(Id id) {
1216     return pool_dep2str($self, id);
1217   }
1218   Id rel2id(Id name, Id evr, int flags, bool create=1) {
1219     return pool_rel2id($self, name, evr, flags, create);
1220   }
1221   Id id2langid(Id id, const char *lang, bool create=1) {
1222     return pool_id2langid($self, id, lang, create);
1223   }
1224   void setarch(const char *arch = 0) {
1225     struct utsname un;
1226     if (!arch) {
1227       if (uname(&un)) {
1228         perror("uname");
1229         return;
1230       }
1231       arch = un.machine;
1232     }
1233     pool_setarch($self, arch);
1234   }
1235   Repo *add_repo(const char *name) {
1236     return repo_create($self, name);
1237   }
1238   const char *lookup_str(Id entry, Id keyname) {
1239     return pool_lookup_str($self, entry, keyname);
1240   }
1241   Id lookup_id(Id entry, Id keyname) {
1242     return pool_lookup_id($self, entry, keyname);
1243   }
1244   unsigned long long lookup_num(Id entry, Id keyname, unsigned long long notfound = 0) {
1245     return pool_lookup_num($self, entry, keyname, notfound);
1246   }
1247   bool lookup_void(Id entry, Id keyname) {
1248     return pool_lookup_void($self, entry, keyname);
1249   }
1250   %newobject lookup_checksum;
1251   Chksum *lookup_checksum(Id entry, Id keyname) {
1252     Id type = 0;
1253     const unsigned char *b = pool_lookup_bin_checksum($self, entry, keyname, &type);
1254     return solv_chksum_create_from_bin(type, b);
1255   }
1256
1257   %newobject Dataiterator;
1258   Dataiterator *Dataiterator(Id p, Id key, const char *match, int flags) {
1259     return new_Dataiterator($self, 0, p, key, match, flags);
1260   }
1261   const char *solvid2str(Id solvid) {
1262     return pool_solvid2str($self, solvid);
1263   }
1264   void addfileprovides() {
1265     pool_addfileprovides($self);
1266   }
1267   Queue addfileprovides_queue() {
1268     Queue r;
1269     queue_init(&r);
1270     pool_addfileprovides_queue($self, &r, 0);
1271     return r;
1272   }
1273   void createwhatprovides() {
1274     pool_createwhatprovides($self);
1275   }
1276
1277   %newobject id2solvable;
1278   XSolvable *id2solvable(Id id) {
1279     return new_XSolvable($self, id);
1280   }
1281   %newobject solvables;
1282   Pool_solvable_iterator * const solvables;
1283   %{
1284   SWIGINTERN Pool_solvable_iterator * Pool_solvables_get(Pool *pool) {
1285     return new_Pool_solvable_iterator(pool);
1286   }
1287   %}
1288   %newobject solvables_iter;
1289   Pool_solvable_iterator * solvables_iter() {
1290     return new_Pool_solvable_iterator($self);
1291   }
1292
1293   Repo *id2repo(Id id) {
1294     if (id < 1 || id >= $self->nrepos)
1295       return 0;
1296     return pool_id2repo($self, id);
1297   }
1298
1299   %newobject repos;
1300   Pool_repo_iterator * const repos;
1301   %{
1302   SWIGINTERN Pool_repo_iterator * Pool_repos_get(Pool *pool) {
1303     return new_Pool_repo_iterator(pool);
1304   }
1305   %}
1306   %newobject repos_iter;
1307   Pool_repo_iterator * repos_iter() {
1308     return new_Pool_repo_iterator($self);
1309   }
1310
1311   Repo *installed;
1312   const char * const errstr;
1313   %{
1314   SWIGINTERN void Pool_installed_set(Pool *pool, Repo *installed) {
1315     pool_set_installed(pool, installed);
1316   }
1317   Repo *Pool_installed_get(Pool *pool) {
1318     return pool->installed;
1319   }
1320   const char *Pool_errstr_get(Pool *pool) {
1321     return pool_errstr(pool);
1322   }
1323   %}
1324
1325   Queue matchprovidingids(const char *match, int flags) {
1326     Pool *pool = $self;
1327     Queue q;
1328     Id id;
1329     queue_init(&q);
1330     if (!flags) {
1331       for (id = 1; id < pool->ss.nstrings; id++)
1332         if (pool->whatprovides[id])
1333           queue_push(&q, id);
1334     } else {
1335       Datamatcher ma;
1336       if (!datamatcher_init(&ma, match, flags)) {
1337         for (id = 1; id < pool->ss.nstrings; id++)
1338           if (pool->whatprovides[id] && datamatcher_match(&ma, pool_id2str(pool, id)))
1339             queue_push(&q, id);
1340         datamatcher_free(&ma);
1341       }
1342     }
1343     return q;
1344   }
1345
1346   %newobject Job;
1347   Job *Job(int how, Id what) {
1348     return new_Job($self, how, what);
1349   }
1350
1351   %typemap(out) Queue whatprovides Queue2Array(XSolvable *, 1, new_XSolvable(arg1, id));
1352   %newobject whatprovides;
1353   Queue whatprovides(DepId dep) {
1354     Pool *pool = $self;
1355     Queue q;
1356     Id p, pp;
1357     queue_init(&q);
1358     FOR_PROVIDES(p, pp, dep)
1359       queue_push(&q, p);
1360     return q;
1361   }
1362
1363   Id towhatprovides(Queue q) {
1364     return pool_queuetowhatprovides($self, &q);
1365   }
1366
1367 #ifdef SWIGRUBY
1368   %rename("isknownarch?") isknownarch;
1369 #endif
1370   bool isknownarch(DepId id) {
1371     Pool *pool = $self;
1372     if (!id || id == ID_EMPTY)
1373       return 0;
1374     if (id == ARCH_SRC || id == ARCH_NOSRC || id == ARCH_NOARCH)
1375       return 1;
1376     if (pool->id2arch && (id > pool->lastarch || !pool->id2arch[id]))
1377       return 0;
1378     return 1;
1379   }
1380
1381   %newobject Solver;
1382   Solver *Solver() {
1383     return solver_create($self);
1384   }
1385
1386   %newobject Selection;
1387   Selection *Selection() {
1388     return new_Selection($self);
1389   }
1390   %newobject Selection_all;
1391   Selection *Selection_all(int setflags=0) {
1392     Selection *sel = new_Selection($self);
1393     queue_push2(&sel->q, SOLVER_SOLVABLE_ALL | setflags, 0);
1394     return sel;
1395   }
1396   %newobject select;
1397   Selection *select(const char *name, int flags) {
1398     Selection *sel = new_Selection($self);
1399     sel->flags = selection_make($self, &sel->q, name, flags);
1400     return sel;
1401   }
1402
1403   void setpooljobs_helper(Queue jobs) {
1404     queue_free(&$self->pooljobs);
1405     queue_init_clone(&$self->pooljobs, &jobs);
1406   }
1407   %typemap(out) Queue getpooljobs Queue2Array(Job *, 2, new_Job(arg1, id, idp[1]));
1408   %newobject getpooljobs;
1409   Queue getpooljobs() {
1410     Queue q;
1411     queue_init_clone(&q, &$self->pooljobs);
1412     return q;
1413   }
1414
1415 #if defined(SWIGPYTHON)
1416   %pythoncode {
1417     def setpooljobs(self, jobs):
1418       j = []
1419       for job in jobs: j += [job.how, job.what]
1420       self.setpooljobs_helper(j)
1421   }
1422 #endif
1423 #if defined(SWIGPERL)
1424   %perlcode {
1425     sub solv::Solver::setpooljobs {
1426       my ($self, $jobs) = @_;
1427       my @j = map {($_->{'how'}, $_->{'what'})} @$jobs;
1428       return $self->setpooljobs_helper(\@j);
1429     }
1430   }
1431 #endif
1432 #if defined(SWIGRUBY)
1433 %init %{
1434 rb_eval_string(
1435     "class Solv::Pool\n"
1436     "  def setpooljobs(jobs)\n"
1437     "    jl = []\n"
1438     "    jobs.each do |j| ; jl << j.how << j.what ; end\n"
1439     "    setpooljobs_helper(jl)\n"
1440     "  end\n"
1441     "end\n"
1442   );
1443 %}
1444 #endif
1445 }
1446
1447 %extend Repo {
1448   static const int REPO_REUSE_REPODATA = REPO_REUSE_REPODATA;
1449   static const int REPO_NO_INTERNALIZE = REPO_NO_INTERNALIZE;
1450   static const int REPO_LOCALPOOL = REPO_LOCALPOOL;
1451   static const int REPO_USE_LOADING = REPO_USE_LOADING;
1452   static const int REPO_EXTEND_SOLVABLES = REPO_EXTEND_SOLVABLES;
1453   static const int REPO_USE_ROOTDIR = REPO_USE_ROOTDIR;
1454   static const int REPO_NO_LOCATION = REPO_NO_LOCATION;
1455   static const int SOLV_ADD_NO_STUBS = SOLV_ADD_NO_STUBS;       /* repo_solv */
1456 #ifdef ENABLE_SUSEREPO
1457   static const int SUSETAGS_RECORD_SHARES = SUSETAGS_RECORD_SHARES;     /* repo_susetags */
1458 #endif
1459
1460   void free(bool reuseids = 0) {
1461     repo_free($self, reuseids);
1462   }
1463   void empty(bool reuseids = 0) {
1464     repo_empty($self, reuseids);
1465   }
1466 #ifdef SWIGRUBY
1467   %rename("isempty?") isempty;
1468 #endif
1469   bool isempty() {
1470     return !$self->nsolvables;
1471   }
1472   bool add_solv(const char *name, int flags = 0) {
1473     FILE *fp = fopen(name, "r");
1474     int r;
1475     if (!fp)
1476       return 0;
1477     r = repo_add_solv($self, fp, flags);
1478     fclose(fp);
1479     return r == 0;
1480   }
1481   bool add_solv(FILE *fp, int flags = 0) {
1482     return repo_add_solv($self, fp, flags) == 0;
1483   }
1484
1485   %newobject add_solvable;
1486   XSolvable *add_solvable() {
1487     Id solvid = repo_add_solvable($self);
1488     return new_XSolvable($self->pool, solvid);
1489   }
1490
1491 #ifdef ENABLE_RPMDB
1492   bool add_rpmdb(int flags = 0) {
1493     return repo_add_rpmdb($self, 0, flags) == 0;
1494   }
1495   bool add_rpmdb_reffp(FILE *reffp, int flags = 0) {
1496     return repo_add_rpmdb_reffp($self, reffp, flags) == 0;
1497   }
1498   %newobject add_rpm;
1499   XSolvable *add_rpm(const char *name, int flags = 0) {
1500     return new_XSolvable($self->pool, repo_add_rpm($self, name, flags));
1501   }
1502 #endif
1503 #ifdef ENABLE_PUBKEY
1504 #ifdef ENABLE_RPMDB
1505   bool add_rpmdb_pubkeys(int flags = 0) {
1506     return repo_add_rpmdb_pubkeys($self, flags) == 0;
1507   }
1508 #endif
1509   %newobject add_pubkey;
1510   XSolvable *add_pubkey(const char *keyfile, int flags = 0) {
1511     return new_XSolvable($self->pool, repo_add_pubkey($self, keyfile, flags));
1512   }
1513   bool add_keyring(FILE *fp, int flags = 0) {
1514     return repo_add_keyring($self, fp, flags);
1515   }
1516   bool add_keydir(const char *keydir, const char *suffix, int flags = 0) {
1517     return repo_add_keydir($self, keydir, suffix, flags);
1518   }
1519 #endif
1520 #ifdef ENABLE_RPMMD
1521   bool add_rpmmd(FILE *fp, const char *language, int flags = 0) {
1522     return repo_add_rpmmd($self, fp, language, flags) == 0;
1523   }
1524   bool add_repomdxml(FILE *fp, int flags = 0) {
1525     return repo_add_repomdxml($self, fp, flags) == 0;
1526   }
1527   bool add_updateinfoxml(FILE *fp, int flags = 0) {
1528     return repo_add_updateinfoxml($self, fp, flags) == 0;
1529   }
1530   bool add_deltainfoxml(FILE *fp, int flags = 0) {
1531     return repo_add_deltainfoxml($self, fp, flags) == 0;
1532   }
1533 #endif
1534 #ifdef ENABLE_DEBIAN
1535   bool add_debdb(int flags = 0) {
1536     return repo_add_debdb($self, flags) == 0;
1537   }
1538   bool add_debpackages(FILE *fp, int flags = 0) {
1539     return repo_add_debpackages($self, fp, flags) == 0;
1540   }
1541   %newobject add_deb;
1542   XSolvable *add_deb(const char *name, int flags = 0) {
1543     return new_XSolvable($self->pool, repo_add_deb($self, name, flags));
1544   }
1545 #endif
1546 #ifdef ENABLE_SUSEREPO
1547   bool add_susetags(FILE *fp, Id defvendor, const char *language, int flags = 0) {
1548     return repo_add_susetags($self, fp, defvendor, language, flags) == 0;
1549   }
1550   bool add_content(FILE *fp, int flags = 0) {
1551     return repo_add_content($self, fp, flags) == 0;
1552   }
1553   bool add_products(const char *proddir, int flags = 0) {
1554     return repo_add_products($self, proddir, flags) == 0;
1555   }
1556 #endif
1557 #ifdef ENABLE_MDKREPO
1558   bool add_mdk(FILE *fp, int flags = 0) {
1559     return repo_add_mdk($self, fp, flags) == 0;
1560   }
1561   bool add_mdk_info(FILE *fp, int flags = 0) {
1562     return repo_add_mdk_info($self, fp, flags) == 0;
1563   }
1564 #endif
1565 #ifdef ENABLE_ARCHREPO
1566   bool add_arch_repo(FILE *fp, int flags = 0) {
1567     return repo_add_arch_repo($self, fp, flags) == 0;
1568   }
1569   bool add_arch_local(const char *dir, int flags = 0) {
1570     return repo_add_arch_local($self, dir, flags) == 0;
1571   }
1572   %newobject add_arch_pkg;
1573   XSolvable *add_arch_pkg(const char *name, int flags = 0) {
1574     return new_XSolvable($self->pool, repo_add_arch_pkg($self, name, flags));
1575   }
1576 #endif
1577   void internalize() {
1578     repo_internalize($self);
1579   }
1580   bool write(FILE *fp) {
1581     return repo_write($self, fp) == 0;
1582   }
1583   # HACK, remove if no longer needed!
1584   bool write_first_repodata(FILE *fp) {
1585     int oldnrepodata = $self->nrepodata;
1586     int res;
1587     $self->nrepodata = oldnrepodata > 2 ? 2 : oldnrepodata;
1588     res = repo_write($self, fp);
1589     $self->nrepodata = oldnrepodata;
1590     return res == 0;
1591   }
1592
1593   %newobject Dataiterator;
1594   Dataiterator *Dataiterator(Id p, Id key, const char *match, int flags) {
1595     return new_Dataiterator($self->pool, $self, p, key, match, flags);
1596   }
1597
1598   Id const id;
1599   %{
1600   SWIGINTERN Id Repo_id_get(Repo *repo) {
1601     return repo->repoid;
1602   }
1603   %}
1604   %newobject solvables;
1605   Repo_solvable_iterator * const solvables;
1606   %{
1607   SWIGINTERN Repo_solvable_iterator * Repo_solvables_get(Repo *repo) {
1608     return new_Repo_solvable_iterator(repo);
1609   }
1610   %}
1611   %newobject meta;
1612   Datapos * const meta;
1613   %{
1614   SWIGINTERN Datapos * Repo_meta_get(Repo *repo) {
1615     Datapos *pos = solv_calloc(1, sizeof(*pos));
1616     pos->solvid = SOLVID_META;
1617     pos->repo = repo;
1618     return pos;
1619   }
1620   %}
1621
1622   %newobject solvables_iter;
1623   Repo_solvable_iterator *solvables_iter() {
1624     return new_Repo_solvable_iterator($self);
1625   }
1626
1627   %newobject add_repodata;
1628   XRepodata *add_repodata(int flags = 0) {
1629     Repodata *rd = repo_add_repodata($self, flags);
1630     return new_XRepodata($self, rd->repodataid);
1631   }
1632
1633   void create_stubs() {
1634     Repodata *data;
1635     if (!$self->nrepodata)
1636       return;
1637     data = repo_id2repodata($self, $self->nrepodata - 1);
1638     if (data->state != REPODATA_STUB)
1639       (void)repodata_create_stubs(data);
1640   }
1641 #ifdef SWIGRUBY
1642   %rename("iscontiguous?") iscontiguous;
1643 #endif
1644   bool iscontiguous() {
1645     int i;
1646     for (i = $self->start; i < $self->end; i++)
1647       if ($self->pool->solvables[i].repo != $self)
1648         return 0;
1649     return 1;
1650   }
1651   %newobject first_repodata;
1652   XRepodata *first_repodata() {
1653     Repodata *data;
1654     int i;
1655     if ($self->nrepodata < 2)
1656       return 0;
1657     /* make sure all repodatas but the first are extensions */
1658     data = repo_id2repodata($self, 1);
1659     if (data->loadcallback)
1660        return 0;
1661     for (i = 2; i < $self->nrepodata; i++)
1662       {
1663         data = repo_id2repodata($self, i);
1664         if (!data->loadcallback)
1665           return 0;       /* oops, not an extension */
1666       }
1667     return new_XRepodata($self, 1);
1668   }
1669
1670   %newobject Selection;
1671   Selection *Selection(int setflags=0) {
1672     Selection *sel = new_Selection($self->pool);
1673     setflags |= SOLVER_SETREPO;
1674     queue_push2(&sel->q, SOLVER_SOLVABLE_REPO | setflags, $self->repoid);
1675     return sel;
1676   }
1677
1678 #ifdef ENABLE_PUBKEY
1679   %newobject find_pubkey;
1680   XSolvable *find_pubkey(const char *keyid) {
1681     return new_XSolvable($self->pool, repo_find_pubkey($self, keyid));
1682   }
1683 #endif
1684
1685   bool __eq__(Repo *repo) {
1686     return $self == repo;
1687   }
1688   bool __ne__(Repo *repo) {
1689     return $self != repo;
1690   }
1691 #if defined(SWIGPERL)
1692   %rename("str") __str__;
1693 #endif
1694   %newobject __str__;
1695   const char *__str__() {
1696     char buf[20];
1697     if ($self->name)
1698       return solv_strdup($self->name);
1699     sprintf(buf, "Repo#%d", $self->repoid);
1700     return solv_strdup(buf);
1701   }
1702   %newobject __repr__;
1703   const char *__repr__() {
1704     char buf[20];
1705     if ($self->name)
1706       {
1707         sprintf(buf, "<Repo #%d ", $self->repoid);
1708         return solv_dupjoin(buf, $self->name, ">");
1709       }
1710     sprintf(buf, "<Repo #%d>", $self->repoid);
1711     return solv_strdup(buf);
1712   }
1713 }
1714
1715 %extend Dataiterator {
1716   static const int SEARCH_STRING = SEARCH_STRING;
1717   static const int SEARCH_STRINGSTART = SEARCH_STRINGSTART;
1718   static const int SEARCH_STRINGEND = SEARCH_STRINGEND;
1719   static const int SEARCH_SUBSTRING = SEARCH_SUBSTRING;
1720   static const int SEARCH_GLOB = SEARCH_GLOB;
1721   static const int SEARCH_REGEX = SEARCH_REGEX;
1722   static const int SEARCH_NOCASE = SEARCH_NOCASE;
1723   static const int SEARCH_FILES = SEARCH_FILES;
1724   static const int SEARCH_COMPLETE_FILELIST = SEARCH_COMPLETE_FILELIST;
1725   static const int SEARCH_CHECKSUMS = SEARCH_CHECKSUMS;
1726
1727   Dataiterator(Pool *pool, Repo *repo, Id p, Id key, const char *match, int flags) {
1728     Dataiterator *di = solv_calloc(1, sizeof(*di));
1729     dataiterator_init(di, pool, repo, p, key, match, flags);
1730     return di;
1731   }
1732   ~Dataiterator() {
1733     dataiterator_free($self);
1734     solv_free($self);
1735   }
1736 #if defined(SWIGPYTHON)
1737   %newobject __iter__;
1738   Dataiterator *__iter__() {
1739     Dataiterator *ndi;
1740     ndi = solv_calloc(1, sizeof(*ndi));
1741     dataiterator_init_clone(ndi, $self);
1742     return ndi;
1743   }
1744 #ifndef PYTHON3
1745   %rename("next") __next__();
1746 #endif
1747   %exception __next__ {
1748     $action
1749     if (!result) {
1750       PyErr_SetString(PyExc_StopIteration,"no more matches");
1751       return NULL;
1752     }
1753   }
1754 #endif
1755 #ifdef SWIGPERL
1756   perliter(solv::Dataiterator)
1757 #endif
1758   %newobject __next__;
1759   Datamatch *__next__() {
1760     Dataiterator *ndi;
1761     if (!dataiterator_step($self)) {
1762       return 0;
1763     }
1764     ndi = solv_calloc(1, sizeof(*ndi));
1765     dataiterator_init_clone(ndi, $self);
1766     dataiterator_strdup(ndi);
1767     return ndi;
1768   }
1769 #ifdef SWIGRUBY
1770   void each() {
1771     Datamatch *d;
1772     while ((d = Dataiterator___next__($self)) != 0) {
1773       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(d), SWIGTYPE_p_Datamatch, SWIG_POINTER_OWN | 0));
1774     }
1775   }
1776 #endif
1777   void prepend_keyname(Id key) {
1778     dataiterator_prepend_keyname($self, key);
1779   }
1780   void skip_solvable() {
1781     dataiterator_skip_solvable($self);
1782   }
1783 }
1784
1785 %extend Datapos {
1786   Id lookup_id(Id keyname) {
1787     Pool *pool = $self->repo->pool;
1788     Datapos oldpos = pool->pos;
1789     Id r;
1790     pool->pos = *$self;
1791     r = pool_lookup_id(pool, SOLVID_POS, keyname);
1792     pool->pos = oldpos;
1793     return r;
1794   }
1795   const char *lookup_str(Id keyname) {
1796     Pool *pool = $self->repo->pool;
1797     Datapos oldpos = pool->pos;
1798     const char *r;
1799     pool->pos = *$self;
1800     r = pool_lookup_str(pool, SOLVID_POS, keyname);
1801     pool->pos = oldpos;
1802     return r;
1803   }
1804   unsigned long long lookup_num(Id keyname, unsigned long long notfound = 0) {
1805     Pool *pool = $self->repo->pool;
1806     Datapos oldpos = pool->pos;
1807     unsigned long long r;
1808     pool->pos = *$self;
1809     r = pool_lookup_num(pool, SOLVID_POS, keyname, notfound);
1810     pool->pos = oldpos;
1811     return r;
1812   }
1813   bool lookup_void(Id keyname) {
1814     Pool *pool = $self->repo->pool;
1815     Datapos oldpos = pool->pos;
1816     int r;
1817     pool->pos = *$self;
1818     r = pool_lookup_void(pool, SOLVID_POS, keyname);
1819     pool->pos = oldpos;
1820     return r;
1821   }
1822   %newobject lookup_checksum;
1823   Chksum *lookup_checksum(Id keyname) {
1824     Pool *pool = $self->repo->pool;
1825     Datapos oldpos = pool->pos;
1826     Id type = 0;
1827     const unsigned char *b;
1828     pool->pos = *$self;
1829     b = pool_lookup_bin_checksum(pool, SOLVID_POS, keyname, &type);
1830     pool->pos = oldpos;
1831     return solv_chksum_create_from_bin(type, b);
1832   }
1833   const char *lookup_deltaseq() {
1834     Pool *pool = $self->repo->pool;
1835     Datapos oldpos = pool->pos;
1836     const char *seq;
1837     pool->pos = *$self;
1838     seq = pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NAME);
1839     if (seq) {
1840       seq = pool_tmpjoin(pool, seq, "-", pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_EVR));
1841       seq = pool_tmpappend(pool, seq, "-", pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NUM));
1842     }
1843     pool->pos = oldpos;
1844     return seq;
1845   }
1846   const char *lookup_deltalocation(unsigned int *OUTPUT) {
1847     Pool *pool = $self->repo->pool;
1848     Datapos oldpos = pool->pos;
1849     const char *loc;
1850     pool->pos = *$self;
1851     loc = pool_lookup_deltalocation(pool, SOLVID_POS, OUTPUT);
1852     pool->pos = oldpos;
1853     return loc;
1854   }
1855   Queue lookup_idarray(Id keyname) {
1856     Pool *pool = $self->repo->pool;
1857     Datapos oldpos = pool->pos;
1858     Queue r;
1859     queue_init(&r);
1860     pool->pos = *$self;
1861     pool_lookup_idarray(pool, SOLVID_POS, keyname, &r);
1862     pool->pos = oldpos;
1863     return r;
1864   }
1865   %newobject Dataiterator;
1866   Dataiterator *Dataiterator(Id key, const char *match, int flags) {
1867     Pool *pool = $self->repo->pool;
1868     Datapos oldpos = pool->pos;
1869     Dataiterator *di;
1870     pool->pos = *$self;
1871     di = new_Dataiterator(pool, 0, SOLVID_POS, key, match, flags);
1872     pool->pos = oldpos;
1873     return di;
1874   }
1875 }
1876
1877 %extend Datamatch {
1878   ~Datamatch() {
1879     dataiterator_free($self);
1880     solv_free($self);
1881   }
1882   %newobject solvable;
1883   XSolvable * const solvable;
1884   %{
1885   SWIGINTERN XSolvable *Datamatch_solvable_get(Dataiterator *di) {
1886     return new_XSolvable(di->pool, di->solvid);
1887   }
1888   %}
1889   Id key_id() {
1890     return $self->key->name;
1891   }
1892   const char *key_idstr() {
1893     return pool_id2str($self->pool, $self->key->name);
1894   }
1895   Id type_id() {
1896     return $self->key->type;
1897   }
1898   const char *type_idstr() {
1899     return pool_id2str($self->pool, $self->key->type);
1900   }
1901   Id id() {
1902    return $self->kv.id;
1903   }
1904   const char *idstr() {
1905    return pool_id2str($self->pool, $self->kv.id);
1906   }
1907   const char *str() {
1908    return $self->kv.str;
1909   }
1910   BinaryBlob binary() {
1911     BinaryBlob bl;
1912     bl.data = 0;
1913     bl.len = 0;
1914     if ($self->key->type == REPOKEY_TYPE_BINARY)
1915       {
1916         bl.data = $self->kv.str;
1917         bl.len = $self->kv.num;
1918       }
1919     else if ((bl.len = solv_chksum_len($self->key->type)) != 0)
1920       bl.data = $self->kv.str;
1921     return bl;
1922   }
1923   unsigned long long num() {
1924    if ($self->key->type == REPOKEY_TYPE_NUM)
1925      return SOLV_KV_NUM64(&$self->kv);
1926    return $self->kv.num;
1927   }
1928   int num2() {
1929      return $self->kv.num2;
1930   }
1931   %newobject pos;
1932   Datapos *pos() {
1933     Pool *pool = $self->pool;
1934     Datapos *pos, oldpos = pool->pos;
1935     dataiterator_setpos($self);
1936     pos = solv_calloc(1, sizeof(*pos));
1937     *pos = pool->pos;
1938     pool->pos = oldpos;
1939     return pos;
1940   }
1941   %newobject parentpos;
1942   Datapos *parentpos() {
1943     Pool *pool = $self->pool;
1944     Datapos *pos, oldpos = pool->pos;
1945     dataiterator_setpos_parent($self);
1946     pos = solv_calloc(1, sizeof(*pos));
1947     *pos = pool->pos;
1948     pool->pos = oldpos;
1949     return pos;
1950   }
1951 #if defined(SWIGPERL)
1952   %rename("str") __str__;
1953 #endif
1954   const char *__str__() {
1955     if (!repodata_stringify($self->pool, $self->data, $self->key, &$self->kv, $self->flags))
1956       return "";
1957     return $self->kv.str;
1958   }
1959 }
1960
1961 %extend Pool_solvable_iterator {
1962   Pool_solvable_iterator(Pool *pool) {
1963     Pool_solvable_iterator *s;
1964     s = solv_calloc(1, sizeof(*s));
1965     s->pool = pool;
1966     return s;
1967   }
1968 #if defined(SWIGPYTHON)
1969   %newobject __iter__;
1970   Pool_solvable_iterator *__iter__() {
1971     Pool_solvable_iterator *s;
1972     s = solv_calloc(1, sizeof(*s));
1973     *s = *$self;
1974     return s;
1975   }
1976 #ifndef PYTHON3
1977   %rename("next") __next__();
1978 #endif
1979   %exception __next__ {
1980     $action
1981     if (!result) {
1982       PyErr_SetString(PyExc_StopIteration,"no more matches");
1983       return NULL;
1984     }
1985   }
1986 #endif
1987 #ifdef SWIGPERL
1988   perliter(solv::Pool_solvable_iterator)
1989 #endif
1990   %newobject __next__;
1991   XSolvable *__next__() {
1992     Pool *pool = $self->pool;
1993     if ($self->id >= pool->nsolvables)
1994       return 0;
1995     while (++$self->id < pool->nsolvables)
1996       if (pool->solvables[$self->id].repo)
1997         return new_XSolvable(pool, $self->id);
1998     return 0;
1999   }
2000 #ifdef SWIGRUBY
2001   void each() {
2002     XSolvable *n;
2003     while ((n = Pool_solvable_iterator___next__($self)) != 0) {
2004       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
2005     }
2006   }
2007 #endif
2008   %newobject __getitem__;
2009   XSolvable *__getitem__(Id key) {
2010     Pool *pool = $self->pool;
2011     if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo)
2012       return new_XSolvable(pool, key);
2013     return 0;
2014   }
2015   int __len__() {
2016     return $self->pool->nsolvables;
2017   }
2018 }
2019
2020 %extend Pool_repo_iterator {
2021   Pool_repo_iterator(Pool *pool) {
2022     Pool_repo_iterator *s;
2023     s = solv_calloc(1, sizeof(*s));
2024     s->pool = pool;
2025     return s;
2026   }
2027 #if defined(SWIGPYTHON)
2028   %newobject __iter__;
2029   Pool_repo_iterator *__iter__() {
2030     Pool_repo_iterator *s;
2031     s = solv_calloc(1, sizeof(*s));
2032     *s = *$self;
2033     return s;
2034   }
2035 #ifndef PYTHON3
2036   %rename("next") __next__();
2037 #endif
2038   %exception __next__ {
2039     $action
2040     if (!result) {
2041       PyErr_SetString(PyExc_StopIteration,"no more matches");
2042       return NULL;
2043     }
2044   }
2045 #endif
2046 #ifdef SWIGPERL
2047   perliter(solv::Pool_repo_iterator)
2048 #endif
2049   %newobject __next__;
2050   Repo *__next__() {
2051     Pool *pool = $self->pool;
2052     if ($self->id >= pool->nrepos)
2053       return 0;
2054     while (++$self->id < pool->nrepos) {
2055       Repo *r = pool_id2repo(pool, $self->id);
2056       if (r)
2057         return r;
2058     }
2059     return 0;
2060   }
2061 #ifdef SWIGRUBY
2062   void each() {
2063     Repo *n;
2064     while ((n = Pool_repo_iterator___next__($self)) != 0) {
2065       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_Repo, SWIG_POINTER_OWN | 0));
2066     }
2067   }
2068 #endif
2069   Repo *__getitem__(Id key) {
2070     Pool *pool = $self->pool;
2071     if (key > 0 && key < pool->nrepos)
2072       return pool_id2repo(pool, key);
2073     return 0;
2074   }
2075   int __len__() {
2076     return $self->pool->nrepos;
2077   }
2078 }
2079
2080 %extend Repo_solvable_iterator {
2081   Repo_solvable_iterator(Repo *repo) {
2082     Repo_solvable_iterator *s;
2083     s = solv_calloc(1, sizeof(*s));
2084     s->repo = repo;
2085     return s;
2086   }
2087 #if defined(SWIGPYTHON)
2088   %newobject __iter__;
2089   Repo_solvable_iterator *__iter__() {
2090     Repo_solvable_iterator *s;
2091     s = solv_calloc(1, sizeof(*s));
2092     *s = *$self;
2093     return s;
2094   }
2095 #ifndef PYTHON3
2096   %rename("next") __next__();
2097 #endif
2098   %exception __next__ {
2099     $action
2100     if (!result) {
2101       PyErr_SetString(PyExc_StopIteration,"no more matches");
2102       return NULL;
2103     }
2104   }
2105 #endif
2106 #ifdef SWIGPERL
2107   perliter(solv::Repo_solvable_iterator)
2108 #endif
2109   %newobject __next__;
2110   XSolvable *__next__() {
2111     Repo *repo = $self->repo;
2112     Pool *pool = repo->pool;
2113     if (repo->start > 0 && $self->id < repo->start)
2114       $self->id = repo->start - 1;
2115     if ($self->id >= repo->end)
2116       return 0;
2117     while (++$self->id < repo->end)
2118       if (pool->solvables[$self->id].repo == repo)
2119         return new_XSolvable(pool, $self->id);
2120     return 0;
2121   }
2122 #ifdef SWIGRUBY
2123   void each() {
2124     XSolvable *n;
2125     while ((n = Repo_solvable_iterator___next__($self)) != 0) {
2126       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
2127     }
2128   }
2129 #endif
2130   %newobject __getitem__;
2131   XSolvable *__getitem__(Id key) {
2132     Repo *repo = $self->repo;
2133     Pool *pool = repo->pool;
2134     if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo == repo)
2135       return new_XSolvable(pool, key);
2136     return 0;
2137   }
2138   int __len__() {
2139     return $self->repo->pool->nsolvables;
2140   }
2141 }
2142
2143 %extend Dep {
2144   Dep(Pool *pool, Id id) {
2145     Dep *s;
2146     if (!id)
2147       return 0;
2148     s = solv_calloc(1, sizeof(*s));
2149     s->pool = pool;
2150     s->id = id;
2151     return s;
2152   }
2153   %newobject Rel;
2154   Dep *Rel(int flags, DepId evrid, bool create=1) {
2155     Id id = pool_rel2id($self->pool, $self->id, evrid, flags, create);
2156     if (!id)
2157       return 0;
2158     return new_Dep($self->pool, id);
2159   }
2160   %newobject Selection_name;
2161   Selection *Selection_name(int setflags=0) {
2162     Selection *sel = new_Selection($self->pool);
2163     if (ISRELDEP($self->id)) {
2164       Reldep *rd = GETRELDEP($self->pool, $self->id);
2165       if (rd->flags == REL_EQ) {
2166         setflags |= $self->pool->disttype == DISTTYPE_DEB || strchr(pool_id2str($self->pool, rd->evr), '-') != 0 ? SOLVER_SETEVR : SOLVER_SETEV;
2167         if (ISRELDEP(rd->name))
2168           rd = GETRELDEP($self->pool, rd->name);
2169       }
2170       if (rd->flags == REL_ARCH)
2171         setflags |= SOLVER_SETARCH;
2172     }
2173     queue_push2(&sel->q, SOLVER_SOLVABLE_NAME | setflags, $self->id);
2174     return sel;
2175   }
2176   %newobject Selection_provides;
2177   Selection *Selection_provides(int setflags=0) {
2178     Selection *sel = new_Selection($self->pool);
2179     if (ISRELDEP($self->id)) {
2180       Reldep *rd = GETRELDEP($self->pool, $self->id);
2181       if (rd->flags == REL_ARCH)
2182         setflags |= SOLVER_SETARCH;
2183     }
2184     queue_push2(&sel->q, SOLVER_SOLVABLE_PROVIDES | setflags, $self->id);
2185     return sel;
2186   }
2187   const char *str() {
2188     return pool_dep2str($self->pool, $self->id);
2189   }
2190   bool __eq__(Dep *s) {
2191     return $self->pool == s->pool && $self->id == s->id;
2192   }
2193   bool __ne__(Dep *s) {
2194     return !Dep___eq__($self, s);
2195   }
2196 #if defined(SWIGPERL)
2197   %rename("str") __str__;
2198 #endif
2199   const char *__str__() {
2200     return pool_dep2str($self->pool, $self->id);
2201   }
2202   %newobject __repr__;
2203   const char *__repr__() {
2204     char buf[20];
2205     sprintf(buf, "<Id #%d ", $self->id);
2206     return solv_dupjoin(buf, pool_dep2str($self->pool, $self->id), ">");
2207   }
2208 }
2209
2210 %extend XSolvable {
2211   XSolvable(Pool *pool, Id id) {
2212     XSolvable *s;
2213     if (!id || id >= pool->nsolvables)
2214       return 0;
2215     s = solv_calloc(1, sizeof(*s));
2216     s->pool = pool;
2217     s->id = id;
2218     return s;
2219   }
2220   const char *str() {
2221     return pool_solvid2str($self->pool, $self->id);
2222   }
2223   const char *lookup_str(Id keyname) {
2224     return pool_lookup_str($self->pool, $self->id, keyname);
2225   }
2226   Id lookup_id(Id keyname) {
2227     return pool_lookup_id($self->pool, $self->id, keyname);
2228   }
2229   unsigned long long lookup_num(Id keyname, unsigned long long notfound = 0) {
2230     return pool_lookup_num($self->pool, $self->id, keyname, notfound);
2231   }
2232   bool lookup_void(Id keyname) {
2233     return pool_lookup_void($self->pool, $self->id, keyname);
2234   }
2235   %newobject lookup_checksum;
2236   Chksum *lookup_checksum(Id keyname) {
2237     Id type = 0;
2238     const unsigned char *b = pool_lookup_bin_checksum($self->pool, $self->id, keyname, &type);
2239     return solv_chksum_create_from_bin(type, b);
2240   }
2241   Queue lookup_idarray(Id keyname, Id marker = -1) {
2242     Solvable *s = $self->pool->solvables + $self->id;
2243     Queue r;
2244     queue_init(&r);
2245     solvable_lookup_deparray(s, keyname, &r, marker);
2246     return r;
2247   }
2248   %typemap(out) Queue lookup_deparray Queue2Array(Dep *, 1, new_Dep(arg1->pool, id));
2249   %newobject lookup_deparray;
2250   Queue lookup_deparray(Id keyname, Id marker = -1) {
2251     Solvable *s = $self->pool->solvables + $self->id;
2252     Queue r;
2253     queue_init(&r);
2254     solvable_lookup_deparray(s, keyname, &r, marker);
2255     return r;
2256   }
2257   const char *lookup_location(unsigned int *OUTPUT) {
2258     return solvable_lookup_location($self->pool->solvables + $self->id, OUTPUT);
2259   }
2260   %newobject Dataiterator;
2261   Dataiterator *Dataiterator(Id key, const char *match, int flags) {
2262     return new_Dataiterator($self->pool, 0, $self->id, key, match, flags);
2263   }
2264 #ifdef SWIGRUBY
2265   %rename("installable?") installable;
2266 #endif
2267   bool installable() {
2268     return pool_installable($self->pool, pool_id2solvable($self->pool, $self->id));
2269   }
2270 #ifdef SWIGRUBY
2271   %rename("isinstalled?") isinstalled;
2272 #endif
2273   bool isinstalled() {
2274     Pool *pool = $self->pool;
2275     return pool->installed && pool_id2solvable(pool, $self->id)->repo == pool->installed;
2276   }
2277
2278   const char *name;
2279   %{
2280     SWIGINTERN void XSolvable_name_set(XSolvable *xs, const char *name) {
2281       Pool *pool = xs->pool;
2282       pool->solvables[xs->id].name = pool_str2id(pool, name, 1);
2283     }
2284     SWIGINTERN const char *XSolvable_name_get(XSolvable *xs) {
2285       Pool *pool = xs->pool;
2286       return pool_id2str(pool, pool->solvables[xs->id].name);
2287     }
2288   %}
2289   Id nameid;
2290   %{
2291     SWIGINTERN void XSolvable_nameid_set(XSolvable *xs, Id nameid) {
2292       xs->pool->solvables[xs->id].name = nameid;
2293     }
2294     SWIGINTERN Id XSolvable_nameid_get(XSolvable *xs) {
2295       return xs->pool->solvables[xs->id].name;
2296     }
2297   %}
2298   const char *evr;
2299   %{
2300     SWIGINTERN void XSolvable_evr_set(XSolvable *xs, const char *evr) {
2301       Pool *pool = xs->pool;
2302       pool->solvables[xs->id].evr = pool_str2id(pool, evr, 1);
2303     }
2304     SWIGINTERN const char *XSolvable_evr_get(XSolvable *xs) {
2305       Pool *pool = xs->pool;
2306       return pool_id2str(pool, pool->solvables[xs->id].evr);
2307     }
2308   %}
2309   Id evrid;
2310   %{
2311     SWIGINTERN void XSolvable_evrid_set(XSolvable *xs, Id evrid) {
2312       xs->pool->solvables[xs->id].evr = evrid;
2313     }
2314     SWIGINTERN Id XSolvable_evrid_get(XSolvable *xs) {
2315       return xs->pool->solvables[xs->id].evr;
2316     }
2317   %}
2318   const char *arch;
2319   %{
2320     SWIGINTERN void XSolvable_arch_set(XSolvable *xs, const char *arch) {
2321       Pool *pool = xs->pool;
2322       pool->solvables[xs->id].arch = pool_str2id(pool, arch, 1);
2323     }
2324     SWIGINTERN const char *XSolvable_arch_get(XSolvable *xs) {
2325       Pool *pool = xs->pool;
2326       return pool_id2str(pool, pool->solvables[xs->id].arch);
2327     }
2328   %}
2329   Id archid;
2330   %{
2331     SWIGINTERN void XSolvable_archid_set(XSolvable *xs, Id archid) {
2332       xs->pool->solvables[xs->id].arch = archid;
2333     }
2334     SWIGINTERN Id XSolvable_archid_get(XSolvable *xs) {
2335       return xs->pool->solvables[xs->id].arch;
2336     }
2337   %}
2338   const char *vendor;
2339   %{
2340     SWIGINTERN void XSolvable_vendor_set(XSolvable *xs, const char *vendor) {
2341       Pool *pool = xs->pool;
2342       pool->solvables[xs->id].vendor = pool_str2id(pool, vendor, 1);
2343     }
2344     SWIGINTERN const char *XSolvable_vendor_get(XSolvable *xs) {
2345       Pool *pool = xs->pool;
2346       return pool_id2str(pool, pool->solvables[xs->id].vendor);
2347     }
2348   %}
2349   Id vendorid;
2350   %{
2351     SWIGINTERN void XSolvable_vendorid_set(XSolvable *xs, Id vendorid) {
2352       xs->pool->solvables[xs->id].vendor = vendorid;
2353     }
2354     SWIGINTERN Id XSolvable_vendorid_get(XSolvable *xs) {
2355       return xs->pool->solvables[xs->id].vendor;
2356     }
2357   %}
2358   Repo * const repo;
2359   %{
2360     SWIGINTERN Repo *XSolvable_repo_get(XSolvable *xs) {
2361       return xs->pool->solvables[xs->id].repo;
2362     }
2363   %}
2364
2365   /* old interface, please use the generic add_deparray instead */
2366   void add_provides(DepId id, Id marker = -1) {
2367     Solvable *s = $self->pool->solvables + $self->id;
2368     marker = solv_depmarker(SOLVABLE_PROVIDES, marker);
2369     s->provides = repo_addid_dep(s->repo, s->provides, id, marker);
2370   }
2371   void add_obsoletes(DepId id) {
2372     Solvable *s = $self->pool->solvables + $self->id;
2373     s->obsoletes = repo_addid_dep(s->repo, s->obsoletes, id, 0);
2374   }
2375   void add_conflicts(DepId id) {
2376     Solvable *s = $self->pool->solvables + $self->id;
2377     s->conflicts = repo_addid_dep(s->repo, s->conflicts, id, 0);
2378   }
2379   void add_requires(DepId id, Id marker = -1) {
2380     Solvable *s = $self->pool->solvables + $self->id;
2381     marker = solv_depmarker(SOLVABLE_REQUIRES, marker);
2382     s->requires = repo_addid_dep(s->repo, s->requires, id, marker);
2383   }
2384   void add_recommends(DepId id) {
2385     Solvable *s = $self->pool->solvables + $self->id;
2386     s->recommends = repo_addid_dep(s->repo, s->recommends, id, 0);
2387   }
2388   void add_suggests(DepId id) {
2389     Solvable *s = $self->pool->solvables + $self->id;
2390     s->suggests = repo_addid_dep(s->repo, s->suggests, id, 0);
2391   }
2392   void add_supplements(DepId id) {
2393     Solvable *s = $self->pool->solvables + $self->id;
2394     s->supplements = repo_addid_dep(s->repo, s->supplements, id, 0);
2395   }
2396   void add_enhances(DepId id) {
2397     Solvable *s = $self->pool->solvables + $self->id;
2398     s->enhances = repo_addid_dep(s->repo, s->enhances, id, 0);
2399   }
2400
2401   void unset(Id keyname) {
2402     Solvable *s = $self->pool->solvables + $self->id;
2403     repo_unset(s->repo, $self->id, keyname);
2404   }
2405
2406   void add_deparray(Id keyname, DepId id, Id marker = -1) {
2407     Solvable *s = $self->pool->solvables + $self->id;
2408     solvable_add_deparray(s, keyname, id, marker);
2409   }
2410
2411   %newobject Selection;
2412   Selection *Selection(int setflags=0) {
2413     Selection *sel = new_Selection($self->pool);
2414     queue_push2(&sel->q, SOLVER_SOLVABLE | setflags, $self->id);
2415     return sel;
2416   }
2417
2418 #ifdef SWIGRUBY
2419   %rename("identical?") identical;
2420 #endif
2421   bool identical(XSolvable *s2) {
2422     return solvable_identical($self->pool->solvables + $self->id, s2->pool->solvables + s2->id);
2423   }
2424   int evrcmp(XSolvable *s2) {
2425     return pool_evrcmp($self->pool, $self->pool->solvables[$self->id].evr, s2->pool->solvables[s2->id].evr, EVRCMP_COMPARE);
2426   }
2427
2428   bool __eq__(XSolvable *s) {
2429     return $self->pool == s->pool && $self->id == s->id;
2430   }
2431   bool __ne__(XSolvable *s) {
2432     return !XSolvable___eq__($self, s);
2433   }
2434 #if defined(SWIGPERL)
2435   %rename("str") __str__;
2436 #endif
2437   const char *__str__() {
2438     return pool_solvid2str($self->pool, $self->id);
2439   }
2440   %newobject __repr__;
2441   const char *__repr__() {
2442     char buf[20];
2443     sprintf(buf, "<Solvable #%d ", $self->id);
2444     return solv_dupjoin(buf, pool_solvid2str($self->pool, $self->id), ">");
2445   }
2446 }
2447
2448 %extend Problem {
2449   Problem(Solver *solv, Id id) {
2450     Problem *p;
2451     p = solv_calloc(1, sizeof(*p));
2452     p->solv = solv;
2453     p->id = id;
2454     return p;
2455   }
2456   %newobject findproblemrule;
2457   XRule *findproblemrule() {
2458     Id r = solver_findproblemrule($self->solv, $self->id);
2459     return new_XRule($self->solv, r);
2460   }
2461   %newobject findallproblemrules;
2462   %typemap(out) Queue findallproblemrules Queue2Array(XRule *, 1, new_XRule(arg1->solv, id));
2463   Queue findallproblemrules(int unfiltered=0) {
2464     Solver *solv = $self->solv;
2465     Id probr;
2466     int i, j;
2467     Queue q;
2468     queue_init(&q);
2469     solver_findallproblemrules(solv, $self->id, &q);
2470     if (!unfiltered)
2471       {
2472         for (i = j = 0; i < q.count; i++)
2473           {
2474             SolverRuleinfo rclass;
2475             probr = q.elements[i];
2476             rclass = solver_ruleclass(solv, probr);
2477             if (rclass == SOLVER_RULE_UPDATE || rclass == SOLVER_RULE_JOB)
2478               continue;
2479             q.elements[j++] = probr;
2480           }
2481         if (j)
2482           queue_truncate(&q, j);
2483       }
2484     return q;
2485   }
2486   int solution_count() {
2487     return solver_solution_count($self->solv, $self->id);
2488   }
2489   %typemap(out) Queue solutions Queue2Array(Solution *, 1, new_Solution(arg1, id));
2490   %newobject solutions;
2491   Queue solutions() {
2492     Queue q;
2493     int i, cnt;
2494     queue_init(&q);
2495     cnt = solver_solution_count($self->solv, $self->id);
2496     for (i = 1; i <= cnt; i++)
2497       queue_push(&q, i);
2498     return q;
2499   }
2500 #if defined(SWIGPERL)
2501   %rename("str") __str__;
2502 #endif
2503   const char *__str__() {
2504     return solver_problem2str($self->solv, $self->id);
2505   }
2506 }
2507
2508 %extend Solution {
2509   Solution(Problem *p, Id id) {
2510     Solution *s;
2511     s = solv_calloc(1, sizeof(*s));
2512     s->solv = p->solv;
2513     s->problemid = p->id;
2514     s->id = id;
2515     return s;
2516   }
2517   int element_count() {
2518     return solver_solutionelement_count($self->solv, $self->problemid, $self->id);
2519   }
2520
2521   %typemap(out) Queue elements Queue2Array(Solutionelement *, 4, new_Solutionelement(arg1->solv, arg1->problemid, arg1->id, id, idp[1], idp[2], idp[3]));
2522   %newobject elements;
2523   Queue elements(bool expandreplaces=0) {
2524     Queue q;
2525     int i, cnt;
2526     queue_init(&q);
2527     cnt = solver_solutionelement_count($self->solv, $self->problemid, $self->id);
2528     for (i = 1; i <= cnt; i++)
2529       {
2530         Id p, rp, type;
2531         solver_next_solutionelement($self->solv, $self->problemid, $self->id, i - 1, &p, &rp);
2532         if (p > 0) {
2533           type = rp ? SOLVER_SOLUTION_REPLACE : SOLVER_SOLUTION_ERASE;
2534         } else {
2535           type = p;
2536           p = rp;
2537           rp = 0;
2538         }
2539         if (type == SOLVER_SOLUTION_REPLACE && expandreplaces) {
2540           int illegal = policy_is_illegal(self->solv, self->solv->pool->solvables + p, self->solv->pool->solvables + rp, 0);
2541           if (illegal) {
2542             if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0) {
2543               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
2544               queue_push2(&q, p, rp);
2545             }
2546             if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0) {
2547               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
2548               queue_push2(&q, p, rp);
2549             }
2550             if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0) {
2551               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
2552               queue_push2(&q, p, rp);
2553             }
2554             if ((illegal & POLICY_ILLEGAL_NAMECHANGE) != 0) {
2555               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_NAMECHANGE);
2556               queue_push2(&q, p, rp);
2557             }
2558             continue;
2559           }
2560         }
2561         queue_push2(&q, i, type);
2562         queue_push2(&q, p, rp);
2563       }
2564     return q;
2565   }
2566 }
2567
2568 %extend Solutionelement {
2569   Solutionelement(Solver *solv, Id problemid, Id solutionid, Id id, Id type, Id p, Id rp) {
2570     Solutionelement *e;
2571     e = solv_calloc(1, sizeof(*e));
2572     e->solv = solv;
2573     e->problemid = problemid;
2574     e->solutionid = id;
2575     e->id = id;
2576     e->type = type;
2577     e->p = p;
2578     e->rp = rp;
2579     return e;
2580   }
2581   const char *str() {
2582     Id p = $self->type;
2583     Id rp = $self->p;
2584     int illegal = 0;
2585     if (p == SOLVER_SOLUTION_ERASE)
2586       {
2587         p = rp;
2588         rp = 0;
2589       }
2590     else if (p == SOLVER_SOLUTION_REPLACE)
2591       {
2592         p = rp;
2593         rp = $self->rp;
2594       }
2595     else if (p == SOLVER_SOLUTION_REPLACE_DOWNGRADE)
2596       illegal = POLICY_ILLEGAL_DOWNGRADE;
2597     else if (p == SOLVER_SOLUTION_REPLACE_ARCHCHANGE)
2598       illegal = POLICY_ILLEGAL_ARCHCHANGE;
2599     else if (p == SOLVER_SOLUTION_REPLACE_VENDORCHANGE)
2600       illegal = POLICY_ILLEGAL_VENDORCHANGE;
2601     else if (p == SOLVER_SOLUTION_REPLACE_NAMECHANGE)
2602       illegal = POLICY_ILLEGAL_NAMECHANGE;
2603     if (illegal)
2604       return pool_tmpjoin($self->solv->pool, "allow ", policy_illegal2str($self->solv, illegal, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp), 0);
2605     return solver_solutionelement2str($self->solv, p, rp);
2606   }
2607   %typemap(out) Queue replaceelements Queue2Array(Solutionelement *, 1, new_Solutionelement(arg1->solv, arg1->problemid, arg1->solutionid, arg1->id, id, arg1->p, arg1->rp));
2608   %newobject replaceelements;
2609   Queue replaceelements() {
2610     Queue q;
2611     int illegal;
2612
2613     queue_init(&q);
2614     if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
2615       illegal = 0;
2616     else
2617       illegal = policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
2618     if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0)
2619       queue_push(&q, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
2620     if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0)
2621       queue_push(&q, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
2622     if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0)
2623       queue_push(&q, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
2624     if ((illegal & POLICY_ILLEGAL_NAMECHANGE) != 0)
2625       queue_push(&q, SOLVER_SOLUTION_REPLACE_NAMECHANGE);
2626     if (!q.count)
2627       queue_push(&q, $self->type);
2628     return q;
2629   }
2630   int illegalreplace() {
2631     if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
2632       return 0;
2633     return policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
2634   }
2635   %newobject solvable;
2636   XSolvable * const solvable;
2637   %newobject replacement;
2638   XSolvable * const replacement;
2639   int const jobidx;
2640   %{
2641     SWIGINTERN XSolvable *Solutionelement_solvable_get(Solutionelement *e) {
2642       return new_XSolvable(e->solv->pool, e->p);
2643     }
2644     SWIGINTERN XSolvable *Solutionelement_replacement_get(Solutionelement *e) {
2645       return new_XSolvable(e->solv->pool, e->rp);
2646     }
2647     SWIGINTERN int Solutionelement_jobidx_get(Solutionelement *e) {
2648       if (e->type != SOLVER_SOLUTION_JOB && e->type != SOLVER_SOLUTION_POOLJOB)
2649         return -1;
2650       return (e->p - 1) / 2;
2651     }
2652   %}
2653   %newobject Job;
2654   Job *Job() {
2655     Id extraflags = solver_solutionelement_extrajobflags($self->solv, $self->problemid, $self->solutionid);
2656     if ($self->type == SOLVER_SOLUTION_JOB || SOLVER_SOLUTION_POOLJOB)
2657       return new_Job($self->solv->pool, SOLVER_NOOP, 0);
2658     if ($self->type == SOLVER_SOLUTION_INFARCH || $self->type == SOLVER_SOLUTION_DISTUPGRADE || $self->type == SOLVER_SOLUTION_BEST)
2659       return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE|extraflags, $self->p);
2660     if ($self->type == SOLVER_SOLUTION_REPLACE || $self->type == SOLVER_SOLUTION_REPLACE_DOWNGRADE || $self->type == SOLVER_SOLUTION_REPLACE_ARCHCHANGE || $self->type == SOLVER_SOLUTION_REPLACE_VENDORCHANGE || $self->type == SOLVER_SOLUTION_REPLACE_NAMECHANGE)
2661       return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE|extraflags, $self->rp);
2662     if ($self->type == SOLVER_SOLUTION_ERASE)
2663       return new_Job($self->solv->pool, SOLVER_ERASE|SOLVER_SOLVABLE|extraflags, $self->p);
2664     return 0;
2665   }
2666 }
2667
2668 %extend Solver {
2669   static const int SOLVER_RULE_UNKNOWN = SOLVER_RULE_UNKNOWN;
2670   static const int SOLVER_RULE_RPM = SOLVER_RULE_RPM;
2671   static const int SOLVER_RULE_RPM_NOT_INSTALLABLE = SOLVER_RULE_RPM_NOT_INSTALLABLE;
2672   static const int SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP = SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP;
2673   static const int SOLVER_RULE_RPM_PACKAGE_REQUIRES = SOLVER_RULE_RPM_PACKAGE_REQUIRES;
2674   static const int SOLVER_RULE_RPM_SELF_CONFLICT = SOLVER_RULE_RPM_SELF_CONFLICT;
2675   static const int SOLVER_RULE_RPM_PACKAGE_CONFLICT = SOLVER_RULE_RPM_PACKAGE_CONFLICT;
2676   static const int SOLVER_RULE_RPM_SAME_NAME = SOLVER_RULE_RPM_SAME_NAME;
2677   static const int SOLVER_RULE_RPM_PACKAGE_OBSOLETES = SOLVER_RULE_RPM_PACKAGE_OBSOLETES;
2678   static const int SOLVER_RULE_RPM_IMPLICIT_OBSOLETES = SOLVER_RULE_RPM_IMPLICIT_OBSOLETES;
2679   static const int SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES = SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES;
2680   static const int SOLVER_RULE_UPDATE = SOLVER_RULE_UPDATE;
2681   static const int SOLVER_RULE_FEATURE = SOLVER_RULE_FEATURE;
2682   static const int SOLVER_RULE_JOB = SOLVER_RULE_JOB;
2683   static const int SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP = SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP;
2684   static const int SOLVER_RULE_JOB_PROVIDED_BY_SYSTEM = SOLVER_RULE_JOB_PROVIDED_BY_SYSTEM;
2685   static const int SOLVER_RULE_JOB_UNKNOWN_PACKAGE = SOLVER_RULE_JOB_UNKNOWN_PACKAGE;
2686   static const int SOLVER_RULE_JOB_UNSUPPORTED = SOLVER_RULE_JOB_UNSUPPORTED;
2687   static const int SOLVER_RULE_DISTUPGRADE = SOLVER_RULE_DISTUPGRADE;
2688   static const int SOLVER_RULE_INFARCH = SOLVER_RULE_INFARCH;
2689   static const int SOLVER_RULE_CHOICE = SOLVER_RULE_CHOICE;
2690   static const int SOLVER_RULE_LEARNT = SOLVER_RULE_LEARNT;
2691
2692   static const int SOLVER_SOLUTION_JOB = SOLVER_SOLUTION_JOB;
2693   static const int SOLVER_SOLUTION_POOLJOB = SOLVER_SOLUTION_POOLJOB;
2694   static const int SOLVER_SOLUTION_INFARCH = SOLVER_SOLUTION_INFARCH;
2695   static const int SOLVER_SOLUTION_DISTUPGRADE = SOLVER_SOLUTION_DISTUPGRADE;
2696   static const int SOLVER_SOLUTION_BEST = SOLVER_SOLUTION_BEST;
2697   static const int SOLVER_SOLUTION_ERASE = SOLVER_SOLUTION_ERASE;
2698   static const int SOLVER_SOLUTION_REPLACE = SOLVER_SOLUTION_REPLACE;
2699   static const int SOLVER_SOLUTION_REPLACE_DOWNGRADE = SOLVER_SOLUTION_REPLACE_DOWNGRADE;
2700   static const int SOLVER_SOLUTION_REPLACE_ARCHCHANGE = SOLVER_SOLUTION_REPLACE_ARCHCHANGE;
2701   static const int SOLVER_SOLUTION_REPLACE_VENDORCHANGE = SOLVER_SOLUTION_REPLACE_VENDORCHANGE;
2702   static const int SOLVER_SOLUTION_REPLACE_NAMECHANGE = SOLVER_SOLUTION_REPLACE_NAMECHANGE;
2703
2704   static const int POLICY_ILLEGAL_DOWNGRADE = POLICY_ILLEGAL_DOWNGRADE;
2705   static const int POLICY_ILLEGAL_ARCHCHANGE = POLICY_ILLEGAL_ARCHCHANGE;
2706   static const int POLICY_ILLEGAL_VENDORCHANGE = POLICY_ILLEGAL_VENDORCHANGE;
2707   static const int POLICY_ILLEGAL_NAMECHANGE = POLICY_ILLEGAL_NAMECHANGE;
2708
2709   static const int SOLVER_FLAG_ALLOW_DOWNGRADE = SOLVER_FLAG_ALLOW_DOWNGRADE;
2710   static const int SOLVER_FLAG_ALLOW_ARCHCHANGE = SOLVER_FLAG_ALLOW_ARCHCHANGE;
2711   static const int SOLVER_FLAG_ALLOW_VENDORCHANGE = SOLVER_FLAG_ALLOW_VENDORCHANGE;
2712   static const int SOLVER_FLAG_ALLOW_NAMECHANGE = SOLVER_FLAG_ALLOW_NAMECHANGE;
2713   static const int SOLVER_FLAG_ALLOW_UNINSTALL = SOLVER_FLAG_ALLOW_UNINSTALL;
2714   static const int SOLVER_FLAG_NO_UPDATEPROVIDE = SOLVER_FLAG_NO_UPDATEPROVIDE;
2715   static const int SOLVER_FLAG_SPLITPROVIDES = SOLVER_FLAG_SPLITPROVIDES;
2716   static const int SOLVER_FLAG_IGNORE_RECOMMENDED = SOLVER_FLAG_IGNORE_RECOMMENDED;
2717   static const int SOLVER_FLAG_ADD_ALREADY_RECOMMENDED = SOLVER_FLAG_ADD_ALREADY_RECOMMENDED;
2718   static const int SOLVER_FLAG_NO_INFARCHCHECK = SOLVER_FLAG_NO_INFARCHCHECK;
2719   static const int SOLVER_FLAG_BEST_OBEY_POLICY = SOLVER_FLAG_BEST_OBEY_POLICY;
2720   static const int SOLVER_FLAG_NO_AUTOTARGET = SOLVER_FLAG_NO_AUTOTARGET;
2721
2722   static const int SOLVER_REASON_UNRELATED = SOLVER_REASON_UNRELATED;
2723   static const int SOLVER_REASON_UNIT_RULE = SOLVER_REASON_UNIT_RULE;
2724   static const int SOLVER_REASON_KEEP_INSTALLED = SOLVER_REASON_KEEP_INSTALLED;
2725   static const int SOLVER_REASON_RESOLVE_JOB = SOLVER_REASON_RESOLVE_JOB;
2726   static const int SOLVER_REASON_UPDATE_INSTALLED = SOLVER_REASON_UPDATE_INSTALLED;
2727   static const int SOLVER_REASON_CLEANDEPS_ERASE = SOLVER_REASON_CLEANDEPS_ERASE;
2728   static const int SOLVER_REASON_RESOLVE = SOLVER_REASON_RESOLVE;
2729   static const int SOLVER_REASON_WEAKDEP = SOLVER_REASON_WEAKDEP;
2730   static const int SOLVER_REASON_RESOLVE_ORPHAN = SOLVER_REASON_RESOLVE_ORPHAN;
2731   static const int SOLVER_REASON_RECOMMENDED = SOLVER_REASON_RECOMMENDED;
2732   static const int SOLVER_REASON_SUPPLEMENTED = SOLVER_REASON_SUPPLEMENTED;
2733
2734   ~Solver() {
2735     solver_free($self);
2736   }
2737
2738   int set_flag(int flag, int value) {
2739     return solver_set_flag($self, flag, value);
2740   }
2741   int get_flag(int flag) {
2742     return solver_get_flag($self, flag);
2743   }
2744 #if defined(SWIGPYTHON)
2745   %pythoncode {
2746     def solve(self, jobs):
2747       j = []
2748       for job in jobs: j += [job.how, job.what]
2749       return self.solve_helper(j)
2750   }
2751 #endif
2752 #if defined(SWIGPERL)
2753   %perlcode {
2754     sub solv::Solver::solve {
2755       my ($self, $jobs) = @_;
2756       my @j = map {($_->{'how'}, $_->{'what'})} @$jobs;
2757       return $self->solve_helper(\@j);
2758     }
2759   }
2760 #endif
2761 #if defined(SWIGRUBY)
2762 %init %{
2763 rb_eval_string(
2764     "class Solv::Solver\n"
2765     "  def solve(jobs)\n"
2766     "    jl = []\n"
2767     "    jobs.each do |j| ; jl << j.how << j.what ; end\n"
2768     "    solve_helper(jl)\n"
2769     "  end\n"
2770     "end\n"
2771   );
2772 %}
2773 #endif
2774   %typemap(out) Queue solve_helper Queue2Array(Problem *, 1, new_Problem(arg1, id));
2775   %newobject solve_helper;
2776   Queue solve_helper(Queue jobs) {
2777     Queue q;
2778     int i, cnt;
2779     queue_init(&q);
2780     solver_solve($self, &jobs);
2781     cnt = solver_problem_count($self);
2782     for (i = 1; i <= cnt; i++)
2783       queue_push(&q, i);
2784     return q;
2785   }
2786   %newobject transaction;
2787   Transaction *transaction() {
2788     return solver_create_transaction($self);
2789   }
2790
2791   int describe_decision(XSolvable *s, XRule **OUTPUT) {
2792     int ruleid;
2793     int reason = solver_describe_decision($self, s->id, &ruleid);
2794     *OUTPUT = new_XRule($self, ruleid);
2795     return reason;
2796   }
2797 }
2798
2799 %extend Transaction {
2800   static const int SOLVER_TRANSACTION_IGNORE = SOLVER_TRANSACTION_IGNORE;
2801   static const int SOLVER_TRANSACTION_ERASE = SOLVER_TRANSACTION_ERASE;
2802   static const int SOLVER_TRANSACTION_REINSTALLED = SOLVER_TRANSACTION_REINSTALLED;
2803   static const int SOLVER_TRANSACTION_DOWNGRADED = SOLVER_TRANSACTION_DOWNGRADED;
2804   static const int SOLVER_TRANSACTION_CHANGED = SOLVER_TRANSACTION_CHANGED;
2805   static const int SOLVER_TRANSACTION_UPGRADED = SOLVER_TRANSACTION_UPGRADED;
2806   static const int SOLVER_TRANSACTION_OBSOLETED = SOLVER_TRANSACTION_OBSOLETED;
2807   static const int SOLVER_TRANSACTION_INSTALL = SOLVER_TRANSACTION_INSTALL;
2808   static const int SOLVER_TRANSACTION_REINSTALL = SOLVER_TRANSACTION_REINSTALL;
2809   static const int SOLVER_TRANSACTION_DOWNGRADE = SOLVER_TRANSACTION_DOWNGRADE;
2810   static const int SOLVER_TRANSACTION_CHANGE = SOLVER_TRANSACTION_CHANGE;
2811   static const int SOLVER_TRANSACTION_UPGRADE = SOLVER_TRANSACTION_UPGRADE;
2812   static const int SOLVER_TRANSACTION_OBSOLETES = SOLVER_TRANSACTION_OBSOLETES;
2813   static const int SOLVER_TRANSACTION_MULTIINSTALL = SOLVER_TRANSACTION_MULTIINSTALL;
2814   static const int SOLVER_TRANSACTION_MULTIREINSTALL = SOLVER_TRANSACTION_MULTIREINSTALL;
2815   static const int SOLVER_TRANSACTION_MAXTYPE = SOLVER_TRANSACTION_MAXTYPE;
2816   static const int SOLVER_TRANSACTION_SHOW_ACTIVE = SOLVER_TRANSACTION_SHOW_ACTIVE;
2817   static const int SOLVER_TRANSACTION_SHOW_ALL = SOLVER_TRANSACTION_SHOW_ALL;
2818   static const int SOLVER_TRANSACTION_SHOW_OBSOLETES = SOLVER_TRANSACTION_SHOW_OBSOLETES;
2819   static const int SOLVER_TRANSACTION_SHOW_MULTIINSTALL = SOLVER_TRANSACTION_SHOW_MULTIINSTALL;
2820   static const int SOLVER_TRANSACTION_CHANGE_IS_REINSTALL = SOLVER_TRANSACTION_CHANGE_IS_REINSTALL;
2821   static const int SOLVER_TRANSACTION_OBSOLETE_IS_UPGRADE = SOLVER_TRANSACTION_OBSOLETE_IS_UPGRADE;
2822   static const int SOLVER_TRANSACTION_MERGE_VENDORCHANGES = SOLVER_TRANSACTION_MERGE_VENDORCHANGES;
2823   static const int SOLVER_TRANSACTION_MERGE_ARCHCHANGES = SOLVER_TRANSACTION_MERGE_ARCHCHANGES;
2824   static const int SOLVER_TRANSACTION_RPM_ONLY = SOLVER_TRANSACTION_RPM_ONLY;
2825   static const int SOLVER_TRANSACTION_ARCHCHANGE = SOLVER_TRANSACTION_ARCHCHANGE;
2826   static const int SOLVER_TRANSACTION_VENDORCHANGE = SOLVER_TRANSACTION_VENDORCHANGE;
2827   static const int SOLVER_TRANSACTION_KEEP_ORDERDATA = SOLVER_TRANSACTION_KEEP_ORDERDATA;
2828   ~Transaction() {
2829     transaction_free($self);
2830   }
2831 #ifdef SWIGRUBY
2832   %rename("isempty?") isempty;
2833 #endif
2834   bool isempty() {
2835     return $self->steps.count == 0;
2836   }
2837
2838   %newobject othersolvable;
2839   XSolvable *othersolvable(XSolvable *s) {
2840     Id op = transaction_obs_pkg($self, s->id);
2841     return new_XSolvable($self->pool, op);
2842   }
2843
2844   %typemap(out) Queue allothersolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2845   %newobject allothersolvables;
2846   Queue allothersolvables(XSolvable *s) {
2847     Queue q;
2848     queue_init(&q);
2849     transaction_all_obs_pkgs($self, s->id, &q);
2850     return q;
2851   }
2852
2853   %typemap(out) Queue classify Queue2Array(TransactionClass *, 4, new_TransactionClass(arg1, arg2, id, idp[1], idp[2], idp[3]));
2854   %newobject classify;
2855   Queue classify(int mode = 0) {
2856     Queue q;
2857     queue_init(&q);
2858     transaction_classify($self, mode, &q);
2859     return q;
2860   }
2861
2862   # deprecated, use newsolvables instead
2863   %typemap(out) Queue newpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2864   %newobject newpackages;
2865   Queue newpackages() {
2866     Queue q;
2867     int cut;
2868     queue_init(&q);
2869     cut = transaction_installedresult(self, &q);
2870     queue_truncate(&q, cut);
2871     return q;
2872   }
2873
2874   # deprecated, use keptsolvables instead
2875   %typemap(out) Queue keptpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2876   %newobject keptpackages;
2877   Queue keptpackages() {
2878     Queue q;
2879     int cut;
2880     queue_init(&q);
2881     cut = transaction_installedresult(self, &q);
2882     if (cut)
2883       queue_deleten(&q, 0, cut);
2884     return q;
2885   }
2886
2887   %typemap(out) Queue newsolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2888   %newobject newsolvables;
2889   Queue newsolvables() {
2890     Queue q;
2891     int cut;
2892     queue_init(&q);
2893     cut = transaction_installedresult(self, &q);
2894     queue_truncate(&q, cut);
2895     return q;
2896   }
2897
2898   %typemap(out) Queue keptsolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2899   %newobject keptsolvables;
2900   Queue keptsolvables() {
2901     Queue q;
2902     int cut;
2903     queue_init(&q);
2904     cut = transaction_installedresult(self, &q);
2905     if (cut)
2906       queue_deleten(&q, 0, cut);
2907     return q;
2908   }
2909
2910   %typemap(out) Queue steps Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2911   %newobject steps;
2912   Queue steps() {
2913     Queue q;
2914     queue_init_clone(&q, &$self->steps);
2915     return q;
2916   }
2917
2918   int steptype(XSolvable *s, int mode) {
2919     return transaction_type($self, s->id, mode);
2920   }
2921   int calc_installsizechange() {
2922     return transaction_calc_installsizechange($self);
2923   }
2924   void order(int flags=0) {
2925     transaction_order($self, flags);
2926   }
2927 }
2928
2929 %extend TransactionClass {
2930   TransactionClass(Transaction *trans, int mode, Id type, int count, Id fromid, Id toid) {
2931     TransactionClass *cl = solv_calloc(1, sizeof(*cl));
2932     cl->transaction = trans;
2933     cl->mode = mode;
2934     cl->type = type;
2935     cl->count = count;
2936     cl->fromid = fromid;
2937     cl->toid = toid;
2938     return cl;
2939   }
2940   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->transaction->pool, id));
2941   %newobject solvables;
2942   Queue solvables() {
2943     Queue q;
2944     queue_init(&q);
2945     transaction_classify_pkgs($self->transaction, $self->mode, $self->type, $self->fromid, $self->toid, &q);
2946     return q;
2947   }
2948   const char * const fromstr;
2949   const char * const tostr;
2950   %{
2951     SWIGINTERN const char *TransactionClass_fromstr_get(TransactionClass *cl) {
2952       return pool_id2str(cl->transaction->pool, cl->fromid);
2953     }
2954     SWIGINTERN const char *TransactionClass_tostr_get(TransactionClass *cl) {
2955       return pool_id2str(cl->transaction->pool, cl->toid);
2956     }
2957   %}
2958 }
2959
2960 %extend XRule {
2961   XRule(Solver *solv, Id id) {
2962     if (!id)
2963       return 0;
2964     XRule *xr = solv_calloc(1, sizeof(*xr));
2965     xr->solv = solv;
2966     xr->id = id;
2967     return xr;
2968   }
2969   int const type;
2970   %{
2971     SWIGINTERN int XRule_type_get(XRule *xr) {
2972       return solver_ruleclass(xr->solv, xr->id);
2973     }
2974   %}
2975   %newobject info;
2976   Ruleinfo *info() {
2977     Id type, source, target, dep;
2978     type = solver_ruleinfo($self->solv, $self->id, &source, &target, &dep);
2979     return new_Ruleinfo($self, type, source, target, dep);
2980   }
2981   %typemap(out) Queue allinfos Queue2Array(Ruleinfo *, 4, new_Ruleinfo(arg1, id, idp[1], idp[2], idp[3]));
2982   %newobject allinfos;
2983   Queue allinfos() {
2984     Queue q;
2985     queue_init(&q);
2986     solver_allruleinfos($self->solv, $self->id, &q);
2987     return q;
2988   }
2989
2990   bool __eq__(XRule *xr) {
2991     return $self->solv == xr->solv && $self->id == xr->id;
2992   }
2993   bool __ne__(XRule *xr) {
2994     return !XRule___eq__($self, xr);
2995   }
2996   %newobject __repr__;
2997   const char *__repr__() {
2998     char buf[20];
2999     sprintf(buf, "<Rule #%d>", $self->id);
3000     return solv_strdup(buf);
3001   }
3002 }
3003
3004 %extend Ruleinfo {
3005   Ruleinfo(XRule *r, Id type, Id source, Id target, Id dep_id) {
3006     Ruleinfo *ri = solv_calloc(1, sizeof(*ri));
3007     ri->solv = r->solv;
3008     ri->rid = r->id;
3009     ri->type = type;
3010     ri->source = source;
3011     ri->target = target;
3012     ri->dep_id = dep_id;
3013     return ri;
3014   }
3015   %newobject solvable;
3016   XSolvable * const solvable;
3017   %newobject othersolvable;
3018   XSolvable * const othersolvable;
3019   %newobject dep;
3020   Dep * const dep;
3021   %{
3022     SWIGINTERN XSolvable *Ruleinfo_solvable_get(Ruleinfo *ri) {
3023       return new_XSolvable(ri->solv->pool, ri->source);
3024     }
3025     SWIGINTERN XSolvable *Ruleinfo_othersolvable_get(Ruleinfo *ri) {
3026       return new_XSolvable(ri->solv->pool, ri->target);
3027     }
3028     SWIGINTERN Dep *Ruleinfo_dep_get(Ruleinfo *ri) {
3029       return new_Dep(ri->solv->pool, ri->dep_id);
3030     }
3031   %}
3032   const char *problemstr() {
3033     return solver_problemruleinfo2str($self->solv, $self->type, $self->source, $self->target, $self->dep_id);
3034   }
3035 }
3036
3037 %extend XRepodata {
3038   XRepodata(Repo *repo, Id id) {
3039     XRepodata *xr = solv_calloc(1, sizeof(*xr));
3040     xr->repo = repo;
3041     xr->id = id;
3042     return xr;
3043   }
3044   Id new_handle() {
3045     return repodata_new_handle(repo_id2repodata($self->repo, $self->id));
3046   }
3047   void set_id(Id solvid, Id keyname, DepId id) {
3048     repodata_set_id(repo_id2repodata($self->repo, $self->id), solvid, keyname, id);
3049   }
3050   void set_str(Id solvid, Id keyname, const char *str) {
3051     repodata_set_str(repo_id2repodata($self->repo, $self->id), solvid, keyname, str);
3052   }
3053   void set_poolstr(Id solvid, Id keyname, const char *str) {
3054     repodata_set_poolstr(repo_id2repodata($self->repo, $self->id), solvid, keyname, str);
3055   }
3056   void add_idarray(Id solvid, Id keyname, DepId id) {
3057     repodata_add_idarray(repo_id2repodata($self->repo, $self->id), solvid, keyname, id);
3058   }
3059   void add_flexarray(Id solvid, Id keyname, Id handle) {
3060     repodata_add_flexarray(repo_id2repodata($self->repo, $self->id), solvid, keyname, handle);
3061   }
3062   void set_checksum(Id solvid, Id keyname, Chksum *chksum) {
3063     const unsigned char *buf = solv_chksum_get(chksum, 0);
3064     if (buf)
3065       repodata_set_bin_checksum(repo_id2repodata($self->repo, $self->id), solvid, keyname, solv_chksum_get_type(chksum), buf);
3066   }
3067   const char *lookup_str(Id solvid, Id keyname) {
3068     return repodata_lookup_str(repo_id2repodata($self->repo, $self->id), solvid, keyname);
3069   }
3070   Queue lookup_idarray(Id solvid, Id keyname) {
3071     Queue r;
3072     queue_init(&r);
3073     repodata_lookup_idarray(repo_id2repodata($self->repo, $self->id), solvid, keyname, &r);
3074     return r;
3075   }
3076   %newobject lookup_checksum;
3077   Chksum *lookup_checksum(Id solvid, Id keyname) {
3078     Id type = 0;
3079     const unsigned char *b = repodata_lookup_bin_checksum(repo_id2repodata($self->repo, $self->id), solvid, keyname, &type);
3080     return solv_chksum_create_from_bin(type, b);
3081   }
3082   void internalize() {
3083     repodata_internalize(repo_id2repodata($self->repo, $self->id));
3084   }
3085   void create_stubs() {
3086     Repodata *data = repo_id2repodata($self->repo, $self->id);
3087     data = repodata_create_stubs(data);
3088     $self->id = data->repodataid;
3089   }
3090   bool write(FILE *fp) {
3091     return repodata_write(repo_id2repodata($self->repo, $self->id), fp) == 0;
3092   }
3093   bool add_solv(FILE *fp, int flags = 0) {
3094     Repodata *data = repo_id2repodata($self->repo, $self->id);
3095     int r, oldstate = data->state;
3096     data->state = REPODATA_LOADING;
3097     r = repo_add_solv(data->repo, fp, flags | REPO_USE_LOADING);
3098     if (r || data->state == REPODATA_LOADING)
3099       data->state = oldstate;
3100     return r;
3101   }
3102   void extend_to_repo() {
3103     Repodata *data = repo_id2repodata($self->repo, $self->id);
3104     repodata_extend_block(data, data->repo->start, data->repo->end - data->repo->start);
3105   }
3106   bool __eq__(XRepodata *xr) {
3107     return $self->repo == xr->repo && $self->id == xr->id;
3108   }
3109   bool __ne__(XRepodata *xr) {
3110     return !XRepodata___eq__($self, xr);
3111   }
3112   %newobject __repr__;
3113   const char *__repr__() {
3114     char buf[20];
3115     sprintf(buf, "<Repodata #%d>", $self->id);
3116     return solv_strdup(buf);
3117   }
3118 }
3119
3120 #ifdef ENABLE_PUBKEY
3121 %extend Solvsig {
3122   Solvsig(FILE *fp) {
3123     return solvsig_create(fp);
3124   }
3125   ~Solvsig() {
3126     solvsig_free($self);
3127   }
3128   %newobject Chksum;
3129   Chksum *Chksum() {
3130     return $self->htype ? (Chksum *)solv_chksum_create($self->htype) : 0;
3131   }
3132 #ifdef ENABLE_PGPVRFY
3133   %newobject verify;
3134   XSolvable *verify(Repo *repo, Chksum *chksum) {
3135     Id p = solvsig_verify($self, repo, chksum);
3136     return new_XSolvable(repo->pool, p);
3137   }
3138 #endif
3139 }
3140 #endif