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