- add Datapos lookup functions, add lookup_idarray/deparray for XSolvables
[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($input)->len;
147   i = 0;
148   o = RARRAY($input)->ptr;
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
299 #if defined(SWIGPYTHON)
300 typedef PyObject *AppObjectPtr;
301 %typemap(out) AppObjectPtr {
302   $result = $1;
303   Py_INCREF($result);
304 }
305 #endif
306 #if defined(SWIGPERL)
307 typedef SV *AppObjectPtr;
308 %typemap(in) AppObjectPtr {
309   $1 = SvROK($input) ? SvRV($input) : 0;
310 }
311 %typemap(out) AppObjectPtr {
312   $result = $1 ? newRV_inc($1) : newSV(0);
313   argvi++;
314 }
315 #endif
316 #if defined(SWIGRUBY)
317 typedef VALUE AppObjectPtr;
318 %typemap(in) AppObjectPtr {
319   $1 = (void *)$input;
320 }
321 %typemap(out) AppObjectPtr {
322   $result = (VALUE)$1;
323 }
324 #endif
325
326
327 %include "cdata.i"
328 #ifndef SWIGPERL
329 %include "file.i"
330 #endif
331 %include "typemaps.i"
332
333 %{
334 #include <stdio.h>
335 #include <sys/stat.h>
336 #include <sys/types.h>
337 #include <unistd.h>
338
339 #include "pool.h"
340 #include "poolarch.h"
341 #include "solver.h"
342 #include "policy.h"
343 #include "solverdebug.h"
344 #include "repo_solv.h"
345 #include "chksum.h"
346
347 #ifndef DEBIAN
348 #include "repo_rpmdb.h"
349 #endif
350 #include "repo_deb.h"
351 #include "repo_rpmmd.h"
352 #include "repo_write.h"
353 #include "repo_products.h"
354 #include "repo_susetags.h"
355 #include "repo_updateinfoxml.h"
356 #include "repo_deltainfoxml.h"
357 #include "repo_repomdxml.h"
358 #include "repo_content.h"
359 #include "solv_xfopen.h"
360
361 #define true 1
362 #define false 1
363
364 #define SOLVER_SOLUTION_ERASE                   -100
365 #define SOLVER_SOLUTION_REPLACE                 -101
366 #define SOLVER_SOLUTION_REPLACE_DOWNGRADE       -102
367 #define SOLVER_SOLUTION_REPLACE_ARCHCHANGE      -103
368 #define SOLVER_SOLUTION_REPLACE_VENDORCHANGE    -104
369
370 typedef struct chksum Chksum;
371 typedef int bool;
372 typedef void *AppObjectPtr;
373
374 typedef struct {
375   Pool *pool;
376   Id id;
377 } Dep;
378
379 typedef struct {
380   Pool *pool;
381   Id id;
382 } XSolvable;
383
384 typedef struct {
385   Solver *solv;
386   Id id;
387 } XRule;
388
389 typedef struct {
390   Repo *repo;
391   Id id;
392 } XRepodata;
393
394 typedef struct {
395   Pool *pool;
396   Id id;
397 } Pool_solvable_iterator;
398
399 typedef struct {
400   Pool *pool;
401   Id id;
402 } Pool_repo_iterator;
403
404 typedef struct {
405   Repo *repo;
406   Id id;
407 } Repo_solvable_iterator;
408
409 typedef struct {
410   Pool *pool;
411   int how;
412   Id what;
413 } Job;
414
415 typedef struct {
416   Solver *solv;
417   Id id;
418 } Problem;
419
420 typedef struct {
421   Solver *solv;
422   Id problemid;
423   Id id;
424 } Solution;
425
426 typedef struct {
427   Solver *solv;
428   Id problemid;
429   Id solutionid;
430   Id id;
431
432   Id type;
433   Id p;
434   Id rp;
435 } Solutionelement;
436
437 typedef struct {
438   Solver *solv;
439   Id rid;
440   Id type;
441   Id source;
442   Id target;
443   Id dep;
444 } Ruleinfo;
445
446 typedef struct {
447   Transaction *transaction;
448   int mode;
449   Id type;
450   int count;
451   Id fromid;
452   Id toid;
453 } TransactionClass;
454
455 typedef Dataiterator Datamatch;
456
457 %}
458
459 #ifdef SWIGRUBY
460 %mixin Dataiterator "Enumerable";
461 %mixin Pool_solvable_iterator "Enumerable";
462 %mixin Pool_repo_iterator "Enumerable";
463 %mixin Repo_solvable_iterator "Enumerable";
464 #endif
465
466 typedef int Id;
467
468 %include "knownid.h"
469
470 # from repodata.h
471 %constant Id SOLVID_META;
472 %constant Id SOLVID_POS;
473
474 %constant int REL_EQ;
475 %constant int REL_GT;
476 %constant int REL_LT;
477 %constant int REL_ARCH;
478
479 typedef struct {
480   Pool* const pool;
481   Id const id;
482 } Dep;
483
484 typedef struct {
485   Pool* const pool;
486   Id const id;
487 } XSolvable;
488
489 typedef struct {
490   Solver* const solv;
491   Id const type;
492   Id const dep;
493 } Ruleinfo;
494
495 typedef struct {
496   Solver* const solv;
497   Id const id;
498 } XRule;
499
500 typedef struct {
501   Repo* const repo;
502   Id const id;
503 } XRepodata;
504
505 # put before pool/repo so we can access the constructor
506 %nodefaultdtor Dataiterator;
507 typedef struct {} Dataiterator;
508 typedef struct {} Pool_solvable_iterator;
509 typedef struct {} Pool_repo_iterator;
510 typedef struct {} Repo_solvable_iterator;
511
512 %nodefaultctor Datamatch;
513 %nodefaultdtor Datamatch;
514 typedef struct {
515   Pool * const pool;
516   Repo * const repo;
517   Id const solvid;
518 } Datamatch;
519
520 %nodefaultctor Datapos;
521 typedef struct {
522   Repo * const repo;
523 } Datapos;
524
525 typedef struct {
526   Pool * const pool;
527   int how;
528   Id what;
529 } Job;
530
531 %nodefaultctor Pool;
532 %nodefaultdtor Pool;
533 typedef struct {
534   AppObjectPtr appdata;
535 } Pool;
536
537 %nodefaultctor Repo;
538 %nodefaultdtor Repo;
539 typedef struct _Repo {
540   Pool * const pool;
541   const char * const name;
542   int priority;
543   int subpriority;
544   int const nsolvables;
545   AppObjectPtr appdata;
546 } Repo;
547
548 %nodefaultctor Solver;
549 %nodefaultdtor Solver;
550 typedef struct {
551   Pool * const pool;
552 } Solver;
553
554 typedef struct chksum {
555 } Chksum;
556
557 %rename(xfopen) solv_xfopen;
558 %rename(xfopen_fd) solv_xfopen_fd;
559 %rename(xfopen_dup) solv_xfopen_dup;
560 %rename(xfclose) solv_xfclose;
561 %rename(xfileno) solv_xfileno;
562
563 FILE *solv_xfopen(const char *fn, const char *mode = 0);
564 FILE *solv_xfopen_fd(const char *fn, int fd, const char *mode = 0);
565 FILE *solv_xfopen_dup(const char *fn, int fd, const char *mode = 0);
566 int solv_xfclose(FILE *fp);
567 int solv_xfileno(FILE *fp);
568
569 %{
570   SWIGINTERN int solv_xfclose(FILE *fp) {
571     return fclose(fp);
572   }
573   SWIGINTERN int solv_xfileno(FILE *fp) {
574     return fileno(fp);
575   }
576   SWIGINTERN FILE *solv_xfopen_dup(const char *fn, int fd, const char *mode) {
577     fd = dup(fd);
578     return fd == -1 ? 0 : solv_xfopen_fd(fn, fd, mode);
579   }
580 %}
581
582 typedef struct {
583   Solver * const solv;
584   Id const id;
585 } Problem;
586
587 typedef struct {
588   Solver * const solv;
589   Id const problemid;
590   Id const id;
591 } Solution;
592
593 typedef struct {
594   Solver *const solv;
595   Id const problemid;
596   Id const solutionid;
597   Id const id;
598   Id const type;
599 } Solutionelement;
600
601 %nodefaultctor Transaction;
602 %nodefaultdtor Transaction;
603 typedef struct {
604   Pool * const pool;
605 } Transaction;
606
607 typedef struct {
608   Transaction * const transaction;
609   Id const type;
610   Id const fromid;
611   Id const toid;
612   int const count;
613 } TransactionClass;
614
615
616 %extend Job {
617   static const Id SOLVER_SOLVABLE = SOLVER_SOLVABLE;
618   static const Id SOLVER_SOLVABLE_NAME = SOLVER_SOLVABLE_NAME;
619   static const Id SOLVER_SOLVABLE_PROVIDES = SOLVER_SOLVABLE_PROVIDES;
620   static const Id SOLVER_SOLVABLE_ONE_OF = SOLVER_SOLVABLE_ONE_OF;
621   static const Id SOLVER_SOLVABLE_REPO = SOLVER_SOLVABLE_REPO;
622   static const Id SOLVER_SOLVABLE_ALL = SOLVER_SOLVABLE_ALL;
623   static const Id SOLVER_SELECTMASK = SOLVER_SELECTMASK;
624   static const Id SOLVER_NOOP = SOLVER_NOOP;
625   static const Id SOLVER_INSTALL = SOLVER_INSTALL;
626   static const Id SOLVER_ERASE = SOLVER_ERASE;
627   static const Id SOLVER_UPDATE = SOLVER_UPDATE;
628   static const Id SOLVER_WEAKENDEPS = SOLVER_WEAKENDEPS;
629   static const Id SOLVER_NOOBSOLETES = SOLVER_NOOBSOLETES;
630   static const Id SOLVER_LOCK = SOLVER_LOCK;
631   static const Id SOLVER_DISTUPGRADE = SOLVER_DISTUPGRADE;
632   static const Id SOLVER_VERIFY = SOLVER_VERIFY;
633   static const Id SOLVER_DROP_ORPHANED = SOLVER_DROP_ORPHANED;
634   static const Id SOLVER_USERINSTALLED = SOLVER_USERINSTALLED;
635   static const Id SOLVER_JOBMASK = SOLVER_JOBMASK;
636   static const Id SOLVER_WEAK = SOLVER_WEAK;
637   static const Id SOLVER_ESSENTIAL = SOLVER_ESSENTIAL;
638   static const Id SOLVER_CLEANDEPS = SOLVER_CLEANDEPS;
639   static const Id SOLVER_SETEV = SOLVER_SETEV;
640   static const Id SOLVER_SETEVR = SOLVER_SETEVR;
641   static const Id SOLVER_SETARCH = SOLVER_SETARCH;
642   static const Id SOLVER_SETVENDOR = SOLVER_SETVENDOR;
643   static const Id SOLVER_SETREPO = SOLVER_SETREPO;
644   static const Id SOLVER_NOAUTOSET = SOLVER_NOAUTOSET;
645   static const Id SOLVER_SETMASK = SOLVER_SETMASK;
646
647   Job(Pool *pool, int how, Id what) {
648     Job *job = solv_calloc(1, sizeof(*job));
649     job->pool = pool;
650     job->how = how;
651     job->what = what;
652     return job;
653   }
654
655   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
656   %newobject solvables;
657   Queue solvables() {
658     Pool *pool = $self->pool;
659     Id p, pp, how;
660     Queue q;
661     queue_init(&q);
662     how = $self->how & SOLVER_SELECTMASK;
663     FOR_JOB_SELECT(p, pp, how, $self->what)
664       queue_push(&q, p);
665     return q;
666   }
667
668   bool __eq__(Job *j) {
669     return $self->pool == j->pool && $self->how == j->how && $self->what == j->what;
670   }
671   bool __ne__(Job *j) {
672     return !Job___eq__($self, j);
673   }
674 #if defined(SWIGPERL)
675   %rename("str") __str__;
676 #endif
677   const char *__str__() {
678     return pool_job2str($self->pool, $self->how, $self->what, 0);
679   }
680   const char *__repr__() {
681     const char *str = pool_job2str($self->pool, $self->how, $self->what, ~0);
682     return pool_tmpjoin($self->pool, "<Job ", str, ">");
683   }
684 }
685
686 %extend Chksum {
687   Chksum(Id type) {
688     return (Chksum *)solv_chksum_create(type);
689   }
690   Chksum(Id type, const char *hex) {
691     unsigned char buf[64];
692     int l = solv_chksum_len(type);
693     if (!l)
694       return 0;
695     if (solv_hex2bin(&hex, buf, sizeof(buf)) != l || hex[0])
696       return 0;
697     return (Chksum *)solv_chksum_create_from_bin(type, buf);
698   }
699   ~Chksum() {
700     solv_chksum_free($self, 0);
701   }
702   Id const type;
703   %{
704   SWIGINTERN Id Chksum_type_get(Chksum *chksum) {
705     return solv_chksum_get_type(chksum);
706   }
707   %}
708   void add(const char *str) {
709     solv_chksum_add($self, str, strlen((char *)str));
710   }
711   void add_fp(FILE *fp) {
712     char buf[4096];
713     int l;
714     while ((l = fread(buf, 1, sizeof(buf), fp)) > 0)
715       solv_chksum_add($self, buf, l);
716     rewind(fp);         /* convenience */
717   }
718   void add_fd(int fd) {
719     char buf[4096];
720     int l;
721     while ((l = read(fd, buf, sizeof(buf))) > 0)
722       solv_chksum_add($self, buf, l);
723     lseek(fd, 0, 0);    /* convenience */
724   }
725   void add_stat(const char *filename) {
726     struct stat stb;
727     if (stat(filename, &stb))
728       memset(&stb, 0, sizeof(stb));
729     solv_chksum_add($self, &stb.st_dev, sizeof(stb.st_dev));
730     solv_chksum_add($self, &stb.st_ino, sizeof(stb.st_ino));
731     solv_chksum_add($self, &stb.st_size, sizeof(stb.st_size));
732     solv_chksum_add($self, &stb.st_mtime, sizeof(stb.st_mtime));
733   }
734   SWIGCDATA raw() {
735     int l;
736     const unsigned char *b;
737     b = solv_chksum_get($self, &l);
738     return cdata_void((void *)b, l);
739   }
740   %newobject hex;
741   char *hex() {
742     int l;
743     const unsigned char *b;
744     char *ret;
745
746     b = solv_chksum_get($self, &l);
747     ret = solv_malloc(2 * l + 1);
748     solv_bin2hex(b, l, ret);
749     return ret;
750   }
751
752   bool __eq__(Chksum *chk) {
753     int l;
754     const unsigned char *b, *bo;
755     if (!chk)
756       return 0;
757     if (solv_chksum_get_type($self) != solv_chksum_get_type(chk))
758       return 0;
759     b = solv_chksum_get($self, &l);
760     bo = solv_chksum_get(chk, 0);
761     return memcmp(b, bo, l) == 0;
762   }
763   bool __ne__(Chksum *chk) {
764     return !Chksum___eq__($self, chk);
765   }
766 #if defined(SWIGRUBY)
767   %rename("to_s") __str__;
768   %rename("inspect") __repr__;
769 #endif
770 #if defined(SWIGPERL)
771   %rename("str") __str__;
772 #endif
773   %newobject __str__;
774   const char *__str__() {
775     const char *str;
776     const char *h = 0;
777     if (solv_chksum_isfinished($self))
778       h = Chksum_hex($self);
779     str = solv_dupjoin(solv_chksum_type2str(solv_chksum_get_type($self)), ":", h ? h : "unfinished");
780     solv_free((void *)h);
781     return str;
782   }
783   %newobject __repr__;
784   const char *__repr__() {
785     const char *h = Chksum___str__($self);
786     const char *str = solv_dupjoin("<Chksum ", h, ">");
787     solv_free((void *)h);
788     return str;
789   }
790 }
791
792 %extend Pool {
793   Pool() {
794     Pool *pool = pool_create();
795     return pool;
796   }
797   ~Pool() {
798   }
799   void set_debuglevel(int level) {
800     pool_setdebuglevel($self, level);
801   }
802 #if defined(SWIGPYTHON)
803   %{
804   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
805     XRepodata *xd = new_XRepodata(data->repo, data - data->repo->repodata);
806     PyObject *args = Py_BuildValue("(O)", SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_POINTER_OWN | 0));
807     PyObject *result = PyEval_CallObject((PyObject *)d, args);
808     int ecode = 0;
809     int vresult = 0;
810     Py_DECREF(args);
811     if (!result)
812       return 0; /* exception */
813     ecode = SWIG_AsVal_int(result, &vresult);
814     Py_DECREF(result);
815     return SWIG_IsOK(ecode) ? vresult : 0;
816   }
817   %}
818   void set_loadcallback(PyObject *callable) {
819     if ($self->loadcallback == loadcallback) {
820       Py_DECREF($self->loadcallbackdata);
821     }
822     if (callable) {
823       Py_INCREF(callable);
824     }
825     pool_setloadcallback($self, callable ? loadcallback : 0, callable);
826   }
827 #endif
828 #if defined(SWIGPERL)
829 %{
830   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
831     int count;
832     int ret = 0;
833     dSP;
834     XRepodata *xd = new_XRepodata(data->repo, data - data->repo->repodata);
835
836     ENTER;
837     SAVETMPS;
838     PUSHMARK(SP);
839     XPUSHs(SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_OWNER | SWIG_SHADOW));
840     PUTBACK;
841     count = perl_call_sv((SV *)d, G_EVAL|G_SCALAR);
842     SPAGAIN;
843     if (count)
844       ret = POPi;
845     PUTBACK;
846     FREETMPS;
847     LEAVE;
848     return ret;
849   }
850 %}
851   void set_loadcallback(SV *callable) {
852     if ($self->loadcallback == loadcallback)
853       SvREFCNT_dec($self->loadcallbackdata);
854     if (callable)
855       SvREFCNT_inc(callable);
856     pool_setloadcallback($self, callable ? loadcallback : 0, callable);
857   }
858 #endif
859
860 #if defined(SWIGRUBY)
861 %{
862   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
863     XRepodata *xd = new_XRepodata(data->repo, data - data->repo->repodata);
864     VALUE callable = (VALUE)d;
865     VALUE rd = SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_POINTER_OWN | 0);
866     VALUE res = rb_funcall(callable, rb_intern("call"), 1, rd);
867     return res == Qtrue;
868   }
869   SWIGINTERN void mark_Pool(void *ptr) {
870     Pool *pool = ptr;
871     if (pool->loadcallback == loadcallback && pool->loadcallbackdata) {
872       VALUE callable = (VALUE)pool->loadcallbackdata;
873       rb_gc_mark(callable);
874     }
875   }
876 %}
877   %typemap(in, numinputs=0) VALUE callable {
878     $1 = rb_block_given_p() ? rb_block_proc() : 0;
879   }
880   void set_loadcallback(VALUE callable) {
881     pool_setloadcallback($self, callable ? loadcallback : 0, (void *)callable);
882   }
883 #endif
884
885   void free() {
886     Pool_set_loadcallback($self, 0);
887     pool_free($self);
888   }
889   Id str2id(const char *str, bool create=1) {
890     return pool_str2id($self, str, create);
891   }
892   Dep *Dep(const char *str, bool create=1) {
893     Id id = pool_str2id($self, str, create);
894     return new_Dep($self, id);
895   }
896   const char *id2str(Id id) {
897     return pool_id2str($self, id);
898   }
899   const char *dep2str(Id id) {
900     return pool_dep2str($self, id);
901   }
902   Id rel2id(Id name, Id evr, int flags, bool create=1) {
903     return pool_rel2id($self, name, evr, flags, create);
904   }
905   Id id2langid(Id id, const char *lang, bool create=1) {
906     return pool_id2langid($self, id, lang, create);
907   }
908   void setarch(const char *arch) {
909     pool_setarch($self, arch);
910   }
911   Repo *add_repo(const char *name) {
912     return repo_create($self, name);
913   }
914   const char *lookup_str(Id entry, Id keyname) {
915     return pool_lookup_str($self, entry, keyname);
916   }
917   Id lookup_id(Id entry, Id keyname) {
918     return pool_lookup_id($self, entry, keyname);
919   }
920   unsigned int lookup_num(Id entry, Id keyname, unsigned int notfound = 0) {
921     return pool_lookup_num($self, entry, keyname, notfound);
922   }
923   bool lookup_void(Id entry, Id keyname) {
924     return pool_lookup_void($self, entry, keyname);
925   }
926   %newobject lookup_checksum;
927   Chksum *lookup_checksum(Id entry, Id keyname) {
928     Id type = 0;
929     const unsigned char *b = pool_lookup_bin_checksum($self, entry, keyname, &type);
930     return solv_chksum_create_from_bin(type, b);
931   }
932
933   %newobject Dataiterator;
934   Dataiterator *Dataiterator(Id p, Id key, const char *match, int flags) {
935     return new_Dataiterator($self, 0, p, key, match, flags);
936   }
937   const char *solvid2str(Id solvid) {
938     return pool_solvid2str($self, solvid);
939   }
940   void addfileprovides() {
941     pool_addfileprovides($self);
942   }
943   Queue addfileprovides_ids() {
944     Queue r;
945     Id *addedfileprovides = 0;
946     queue_init(&r);
947     pool_addfileprovides_ids($self, $self->installed, &addedfileprovides);
948     if (addedfileprovides) {
949       for (; *addedfileprovides; addedfileprovides++)
950         queue_push(&r, *addedfileprovides);
951     }
952     return r;
953   }
954   void createwhatprovides() {
955     pool_createwhatprovides($self);
956   }
957
958   XSolvable *id2solvable(Id id) {
959     return new_XSolvable($self, id);
960   }
961   %newobject solvables;
962   Pool_solvable_iterator * const solvables;
963   %{
964   SWIGINTERN Pool_solvable_iterator * Pool_solvables_get(Pool *pool) {
965     return new_Pool_solvable_iterator(pool);
966   }
967   %}
968   %newobject solvables_iter;
969   Pool_solvable_iterator * solvables_iter() {
970     return new_Pool_solvable_iterator($self);
971   }
972
973   Repo *id2repo(Id id) {
974     if (id < 1 || id >= $self->nrepos)
975       return 0;
976     return pool_id2repo($self, id);
977   }
978   %newobject repos;
979   Pool_repo_iterator * const repos;
980   %{
981   SWIGINTERN Pool_repo_iterator * Pool_repos_get(Pool *pool) {
982     return new_Pool_repo_iterator(pool);
983   }
984   %}
985   %newobject repos_iter;
986   Pool_repo_iterator * repos_iter() {
987     return new_Pool_repo_iterator($self);
988   }
989
990   Repo *installed;
991   %{
992   SWIGINTERN void Pool_installed_set(Pool *pool, Repo *installed) {
993     pool_set_installed(pool, installed);
994   }
995   Repo *Pool_installed_get(Pool *pool) {
996     return pool->installed;
997   }
998   %}
999
1000   Queue matchprovidingids(const char *match, int flags) {
1001     Pool *pool = $self;
1002     Queue q;
1003     Id id;
1004     queue_init(&q);
1005     if (!flags) {
1006       for (id = 1; id < pool->ss.nstrings; id++)
1007         if (pool->whatprovides[id])
1008           queue_push(&q, id);
1009     } else {
1010       Datamatcher ma;
1011       if (!datamatcher_init(&ma, match, flags)) {
1012         for (id = 1; id < pool->ss.nstrings; id++)
1013           if (pool->whatprovides[id] && datamatcher_match(&ma, pool_id2str(pool, id)))
1014             queue_push(&q, id);
1015         datamatcher_free(&ma);
1016       }
1017     }
1018     return q;
1019   }
1020
1021   Job *Job(int how, Id what) {
1022     return new_Job($self, how, what);
1023   }
1024
1025   %typemap(out) Queue whatprovides Queue2Array(XSolvable *, 1, new_XSolvable(arg1, id));
1026   %newobject whatprovides;
1027   Queue whatprovides(Id dep) {
1028     Pool *pool = $self;
1029     Queue q;
1030     Id p, pp;
1031     queue_init(&q);
1032     FOR_PROVIDES(p, pp, dep)
1033       queue_push(&q, p);
1034     return q;
1035   }
1036
1037   Id towhatprovides(Queue q) {
1038     return pool_queuetowhatprovides($self, &q);
1039   }
1040
1041 #ifdef SWIGRUBY
1042   %rename("isknownarch?") isknownarch;
1043 #endif
1044   bool isknownarch(Id id) {
1045     Pool *pool = $self;
1046     if (!id || id == ID_EMPTY)
1047       return 0;
1048     if (id == ARCH_SRC || id == ARCH_NOSRC || id == ARCH_NOARCH)
1049       return 1;
1050     if (pool->id2arch && (id > pool->lastarch || !pool->id2arch[id]))
1051       return 0;
1052     return 1;
1053   }
1054
1055   %newobject Solver;
1056   Solver *Solver() {
1057     return solver_create($self);
1058   }
1059 }
1060
1061 %extend Repo {
1062   static const int REPO_REUSE_REPODATA = REPO_REUSE_REPODATA;
1063   static const int REPO_NO_INTERNALIZE = REPO_NO_INTERNALIZE;
1064   static const int REPO_LOCALPOOL = REPO_LOCALPOOL;
1065   static const int REPO_USE_LOADING = REPO_USE_LOADING;
1066   static const int REPO_EXTEND_SOLVABLES = REPO_EXTEND_SOLVABLES;
1067   static const int SOLV_ADD_NO_STUBS = SOLV_ADD_NO_STUBS;       /* repo_solv */
1068   static const int SUSETAGS_RECORD_SHARES = SUSETAGS_RECORD_SHARES;     /* repo_susetags */
1069
1070   void free(bool reuseids = 0) {
1071     repo_free($self, reuseids);
1072   }
1073   void empty(bool reuseids = 0) {
1074     repo_empty($self, reuseids);
1075   }
1076 #ifdef SWIGRUBY
1077   %rename("isempty?") isempty;
1078 #endif
1079   bool isempty() {
1080     return !$self->nsolvables;
1081   }
1082   bool add_solv(const char *name, int flags = 0) {
1083     FILE *fp = fopen(name, "r");
1084     int r;
1085     if (!fp)
1086       return 0;
1087     r = repo_add_solv_flags($self, fp, flags);
1088     fclose(fp);
1089     return r == 0;
1090   }
1091   bool add_solv(FILE *fp, int flags = 0) {
1092     return repo_add_solv_flags($self, fp, flags) == 0;
1093   }
1094
1095   XSolvable *add_solvable() {
1096     Id solvid = repo_add_solvable($self);
1097     return new_XSolvable($self->pool, solvid);
1098   }
1099
1100   bool add_products(const char *proddir, int flags = 0) {
1101     repo_add_products($self, proddir, 0, flags);
1102     return 1;
1103   }
1104   bool add_rpmmd(FILE *fp, const char *language, int flags = 0) {
1105     repo_add_rpmmd($self, fp, language, flags);
1106     return 1;
1107   }
1108 #ifndef DEBIAN
1109   bool add_rpmdb(Repo *ref, int flags = 0) {
1110     repo_add_rpmdb($self, ref, 0, flags);
1111     return 1;
1112   }
1113   Id add_rpm(const char *name, int flags = 0) {
1114     return repo_add_rpm($self, name, flags);
1115   }
1116 #endif
1117   bool add_debdb(int flags = 0) {
1118     repo_add_debdb($self, 0, flags);
1119     return 1;
1120   }
1121   Id add_deb(const char *name, int flags = 0) {
1122     return repo_add_deb($self, name, flags);
1123   }
1124   bool add_susetags(FILE *fp, Id defvendor, const char *language, int flags = 0) {
1125     repo_add_susetags($self, fp, defvendor, language, flags);
1126     return 1;
1127   }
1128   bool add_repomdxml(FILE *fp, int flags = 0) {
1129     repo_add_repomdxml($self, fp, flags);
1130     return 1;
1131   }
1132   bool add_content(FILE *fp, int flags = 0) {
1133     repo_add_content($self, fp, flags);
1134     return 1;
1135   }
1136   bool add_updateinfoxml(FILE *fp, int flags = 0) {
1137     repo_add_updateinfoxml($self, fp, flags);
1138     return 1;
1139   }
1140   bool add_deltainfoxml(FILE *fp, int flags = 0) {
1141     repo_add_deltainfoxml($self, fp, flags);
1142     return 1;
1143   }
1144   void internalize() {
1145     repo_internalize($self);
1146   }
1147   const char *lookup_str(Id entry, Id keyname) {
1148     return repo_lookup_str($self, entry, keyname);
1149   }
1150   Id lookup_id(Id entry, Id keyname) {
1151     return repo_lookup_id($self, entry, keyname);
1152   }
1153   unsigned int lookup_num(Id entry, Id keyname, unsigned int notfound = 0) {
1154     return repo_lookup_num($self, entry, keyname, notfound);
1155   }
1156   void write(FILE *fp) {
1157     repo_write($self, fp, repo_write_stdkeyfilter, 0, 0);
1158   }
1159   # HACK, remove if no longer needed!
1160   bool write_first_repodata(FILE *fp) {
1161     int oldnrepodata = $self->nrepodata;
1162     $self->nrepodata = oldnrepodata > 2 ? 2 : oldnrepodata;
1163     repo_write($self, fp, repo_write_stdkeyfilter, 0, 0);
1164     $self->nrepodata = oldnrepodata;
1165     return 1;
1166   }
1167
1168   %newobject Dataiterator;
1169   Dataiterator *Dataiterator(Id p, Id key, const char *match, int flags) {
1170     return new_Dataiterator($self->pool, $self, p, key, match, flags);
1171   }
1172
1173   Id const id;
1174   %{
1175   SWIGINTERN Id Repo_id_get(Repo *repo) {
1176     return repo->repoid;
1177   }
1178   %}
1179   Repo_solvable_iterator * const solvables;
1180   %{
1181   SWIGINTERN Repo_solvable_iterator * Repo_solvables_get(Repo *repo) {
1182     return new_Repo_solvable_iterator(repo);
1183   }
1184   %}
1185   %newobject solvables_iter;
1186   Repo_solvable_iterator *solvables_iter() {
1187     return new_Repo_solvable_iterator($self);
1188   }
1189
1190   XRepodata *add_repodata(int flags = 0) {
1191     Repodata *rd = repo_add_repodata($self, flags);
1192     return new_XRepodata($self, rd - $self->repodata);
1193   }
1194
1195   void create_stubs() {
1196     Repodata *data;
1197     if (!$self->nrepodata)
1198       return;
1199     data = $self->repodata  + ($self->nrepodata - 1);
1200     if (data->state != REPODATA_STUB)
1201       repodata_create_stubs(data);
1202   }
1203 #ifdef SWIGRUBY
1204   %rename("iscontiguous?") iscontiguous;
1205 #endif
1206   bool iscontiguous() {
1207     int i;
1208     for (i = $self->start; i < $self->end; i++)
1209       if ($self->pool->solvables[i].repo != $self)
1210         return 0;
1211     return 1;
1212   }
1213   XRepodata *first_repodata() {
1214      int i;
1215      if ($self->nrepodata < 2)
1216        return 0;
1217      /* make sure all repodatas but the first are extensions */
1218      if ($self->repodata[1].loadcallback)
1219         return 0;
1220      for (i = 2; i < $self->nrepodata; i++)
1221        if (!$self->repodata[i].loadcallback)
1222          return 0;       /* oops, not an extension */
1223      return new_XRepodata($self, 1);
1224    }
1225
1226   bool __eq__(Repo *repo) {
1227     return $self == repo;
1228   }
1229   bool __ne__(Repo *repo) {
1230     return $self != repo;
1231   }
1232 #if defined(SWIGPERL)
1233   %rename("str") __str__;
1234 #endif
1235   %newobject __str__;
1236   const char *__str__() {
1237     char buf[20];
1238     if ($self->name)
1239       return solv_strdup($self->name);
1240     sprintf(buf, "Repo#%d", $self->repoid);
1241     return solv_strdup(buf);
1242   }
1243   %newobject __repr__;
1244   const char *__repr__() {
1245     char buf[20];
1246     if ($self->name)
1247       {
1248         sprintf(buf, "<Repo #%d ", $self->repoid);
1249         return solv_dupjoin(buf, $self->name, ">");
1250       }
1251     sprintf(buf, "<Repo #%d>", $self->repoid);
1252     return solv_strdup(buf);
1253   }
1254 }
1255
1256 %extend Dataiterator {
1257   static const int SEARCH_STRING = SEARCH_STRING;
1258   static const int SEARCH_SUBSTRING = SEARCH_SUBSTRING;
1259   static const int SEARCH_GLOB = SEARCH_GLOB;
1260   static const int SEARCH_REGEX = SEARCH_REGEX;
1261   static const int SEARCH_NOCASE = SEARCH_NOCASE;
1262   static const int SEARCH_FILES = SEARCH_FILES;
1263   static const int SEARCH_COMPLETE_FILELIST = SEARCH_COMPLETE_FILELIST;
1264
1265   Dataiterator(Pool *pool, Repo *repo, Id p, Id key, const char *match, int flags) {
1266     Dataiterator *di = solv_calloc(1, sizeof(*di));
1267     dataiterator_init(di, pool, repo, p, key, match, flags);
1268     return di;
1269   }
1270   ~Dataiterator() {
1271     dataiterator_free($self);
1272     solv_free($self);
1273   }
1274 #if defined(SWIGPYTHON)
1275   %newobject __iter__;
1276   Dataiterator *__iter__() {
1277     Dataiterator *ndi;
1278     ndi = solv_calloc(1, sizeof(*ndi));
1279     dataiterator_init_clone(ndi, $self);
1280     return ndi;
1281   }
1282   %rename("next") __next__();
1283   %exception __next__ {
1284     $action
1285     if (!result) {
1286       PyErr_SetString(PyExc_StopIteration,"no more matches");
1287       return NULL;
1288     }
1289   }
1290 #endif
1291
1292 #ifdef SWIGPERL
1293   perliter(solv::Dataiterator)
1294 #endif
1295
1296   %newobject __next__;
1297   Datamatch *__next__() {
1298     Dataiterator *ndi;
1299     if (!dataiterator_step($self)) {
1300       return 0;
1301     }
1302     ndi = solv_calloc(1, sizeof(*ndi));
1303     dataiterator_init_clone(ndi, $self);
1304     return ndi;
1305   }
1306 #ifdef SWIGRUBY
1307   void each() {
1308     Datamatch *d;
1309     while ((d = Dataiterator___next__($self)) != 0) {
1310       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(d), SWIGTYPE_p_Datamatch, SWIG_POINTER_OWN | 0));
1311     }
1312   }
1313 #endif
1314   void prepend_keyname(Id key) {
1315     dataiterator_prepend_keyname($self, key);
1316   }
1317   void skip_solvable() {
1318     dataiterator_skip_solvable($self);
1319   }
1320 }
1321
1322 %extend Datapos {
1323   Id lookup_id(Id keyname) {
1324     Pool *pool = $self->repo->pool;
1325     Datapos oldpos = pool->pos;
1326     Id r;
1327     pool->pos = *$self;
1328     r = pool_lookup_id(pool, SOLVID_POS, keyname);
1329     pool->pos = oldpos;
1330     return r;
1331   }
1332   const char *lookup_str(Id keyname) {
1333     Pool *pool = $self->repo->pool;
1334     Datapos oldpos = pool->pos;
1335     const char *r;
1336     pool->pos = *$self;
1337     r = pool_lookup_str(pool, SOLVID_POS, keyname);
1338     pool->pos = oldpos;
1339     return r;
1340   }
1341   %newobject lookup_checksum;
1342   Chksum *lookup_checksum(Id keyname) {
1343     Pool *pool = $self->repo->pool;
1344     Datapos oldpos = pool->pos;
1345     Id type = 0;
1346     const unsigned char *b;
1347     pool->pos = *$self;
1348     b = pool_lookup_bin_checksum(pool, SOLVID_POS, keyname, &type);
1349     pool->pos = oldpos;
1350     return solv_chksum_create_from_bin(type, b);
1351   }
1352 }
1353
1354 %extend Datamatch {
1355   ~Datamatch() {
1356     dataiterator_free($self);
1357     solv_free($self);
1358   }
1359   %newobject solvable;
1360   XSolvable * const solvable;
1361   %{
1362   SWIGINTERN XSolvable *Datamatch_solvable_get(Dataiterator *di) {
1363     return new_XSolvable(di->pool, di->solvid);
1364   }
1365   %}
1366   Id key_id() {
1367     return $self->key->name;
1368   }
1369   const char *key_idstr() {
1370     return pool_id2str($self->pool, $self->key->name);
1371   }
1372   Id type_id() {
1373     return $self->key->type;
1374   }
1375   const char *type_idstr() {
1376     return pool_id2str($self->pool, $self->key->type);
1377   }
1378   Id id() {
1379      return $self->kv.id;
1380   }
1381   const char *idstr() {
1382      return pool_id2str($self->pool, $self->kv.id);
1383   }
1384   const char *str() {
1385      return $self->kv.str;
1386   }
1387   int num() {
1388      return $self->kv.num;
1389   }
1390   int num2() {
1391      return $self->kv.num2;
1392   }
1393   %newobject pos;
1394   Datapos *pos() {
1395     Pool *pool = $self->pool;
1396     Datapos *pos, oldpos = pool->pos;
1397     dataiterator_setpos($self);
1398     pos = solv_calloc(1, sizeof(*pos));
1399     *pos = pool->pos;
1400     pool->pos = oldpos;
1401     return pos;
1402   }
1403   %newobject parentpos;
1404   Datapos *parentpos() {
1405     Pool *pool = $self->pool;
1406     Datapos *pos, oldpos = pool->pos;
1407     dataiterator_setpos_parent($self);
1408     pos = solv_calloc(1, sizeof(*pos));
1409     *pos = pool->pos;
1410     pool->pos = oldpos;
1411     return pos;
1412   }
1413   void setpos() {
1414     dataiterator_setpos($self);
1415   }
1416   void setpos_parent() {
1417     dataiterator_setpos_parent($self);
1418   }
1419 }
1420
1421 %extend Pool_solvable_iterator {
1422   Pool_solvable_iterator(Pool *pool) {
1423     Pool_solvable_iterator *s;
1424     s = solv_calloc(1, sizeof(*s));
1425     s->pool = pool;
1426     return s;
1427   }
1428 #if defined(SWIGPYTHON)
1429   %newobject __iter__;
1430   Pool_solvable_iterator *__iter__() {
1431     Pool_solvable_iterator *s;
1432     s = solv_calloc(1, sizeof(*s));
1433     *s = *$self;
1434     return s;
1435   }
1436   %rename("next") __next__();
1437   %exception __next__ {
1438     $action
1439     if (!result) {
1440       PyErr_SetString(PyExc_StopIteration,"no more matches");
1441       return NULL;
1442     }
1443   }
1444 #endif
1445
1446 #ifdef SWIGPERL
1447   perliter(solv::Pool_solvable_iterator)
1448 #endif
1449   %newobject __next__;
1450   XSolvable *__next__() {
1451     Pool *pool = $self->pool;
1452     if ($self->id >= pool->nsolvables)
1453       return 0;
1454     while (++$self->id < pool->nsolvables)
1455       if (pool->solvables[$self->id].repo)
1456         return new_XSolvable(pool, $self->id);
1457     return 0;
1458   }
1459 #ifdef SWIGRUBY
1460   void each() {
1461     XSolvable *n;
1462     while ((n = Pool_solvable_iterator___next__($self)) != 0) {
1463       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
1464     }
1465   }
1466 #endif
1467   %newobject __getitem__;
1468   XSolvable *__getitem__(Id key) {
1469     Pool *pool = $self->pool;
1470     if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo)
1471       return new_XSolvable(pool, key);
1472     return 0;
1473   }
1474   int __len__() {
1475     return $self->pool->nsolvables;
1476   }
1477 }
1478
1479 %extend Pool_repo_iterator {
1480   Pool_repo_iterator(Pool *pool) {
1481     Pool_repo_iterator *s;
1482     s = solv_calloc(1, sizeof(*s));
1483     s->pool = pool;
1484     return s;
1485   }
1486 #if defined(SWIGPYTHON)
1487   %newobject __iter__;
1488   Pool_repo_iterator *__iter__() {
1489     Pool_repo_iterator *s;
1490     s = solv_calloc(1, sizeof(*s));
1491     *s = *$self;
1492     return s;
1493   }
1494   %rename("next") __next__();
1495   %exception __next__ {
1496     $action
1497     if (!result) {
1498       PyErr_SetString(PyExc_StopIteration,"no more matches");
1499       return NULL;
1500     }
1501   }
1502 #endif
1503   %newobject __next__;
1504   Repo *__next__() {
1505     Pool *pool = $self->pool;
1506     if ($self->id >= pool->nrepos)
1507       return 0;
1508     while (++$self->id < pool->nrepos) {
1509       Repo *r = pool_id2repo(pool, $self->id);
1510       if (r)
1511         return r;
1512     }
1513     return 0;
1514   }
1515 #ifdef SWIGRUBY
1516   void each() {
1517     Repo *n;
1518     while ((n = Pool_repo_iterator___next__($self)) != 0) {
1519       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p__Repo, SWIG_POINTER_OWN | 0));
1520     }
1521   }
1522 #endif
1523   Repo *__getitem__(Id key) {
1524     Pool *pool = $self->pool;
1525     if (key > 0 && key < pool->nrepos)
1526       return pool_id2repo(pool, key);
1527     return 0;
1528   }
1529   int __len__() {
1530     return $self->pool->nrepos;
1531   }
1532 }
1533
1534 %extend Repo_solvable_iterator {
1535   Repo_solvable_iterator(Repo *repo) {
1536     Repo_solvable_iterator *s;
1537     s = solv_calloc(1, sizeof(*s));
1538     s->repo = repo;
1539     return s;
1540   }
1541 #if defined(SWIGPYTHON)
1542   %newobject __iter__;
1543   Repo_solvable_iterator *__iter__() {
1544     Repo_solvable_iterator *s;
1545     s = solv_calloc(1, sizeof(*s));
1546     *s = *$self;
1547     return s;
1548   }
1549   %rename("next") __next__();
1550   %exception __next__ {
1551     $action
1552     if (!result) {
1553       PyErr_SetString(PyExc_StopIteration,"no more matches");
1554       return NULL;
1555     }
1556   }
1557 #endif
1558   %newobject __next__;
1559   XSolvable *__next__() {
1560     Repo *repo = $self->repo;
1561     Pool *pool = repo->pool;
1562     if (repo->start > 0 && $self->id < repo->start)
1563       $self->id = repo->start - 1;
1564     if ($self->id >= repo->end)
1565       return 0;
1566     while (++$self->id < repo->end)
1567       if (pool->solvables[$self->id].repo == repo)
1568         return new_XSolvable(pool, $self->id);
1569     return 0;
1570   }
1571 #ifdef SWIGRUBY
1572   void each() {
1573     XSolvable *n;
1574     while ((n = Repo_solvable_iterator___next__($self)) != 0) {
1575       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
1576     }
1577   }
1578 #endif
1579   %newobject __getitem__;
1580   XSolvable *__getitem__(Id key) {
1581     Repo *repo = $self->repo;
1582     Pool *pool = repo->pool;
1583     if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo == repo)
1584       return new_XSolvable(pool, key);
1585     return 0;
1586   }
1587   int __len__() {
1588     return $self->repo->pool->nsolvables;
1589   }
1590 }
1591
1592 %extend Dep {
1593   Dep(Pool *pool, Id id) {
1594     Dep *s;
1595     if (!id)
1596       return 0;
1597     s = solv_calloc(1, sizeof(*s));
1598     s->pool = pool;
1599     s->id = id;
1600     return s;
1601   }
1602   const char *str() {
1603     return pool_dep2str($self->pool, $self->id);
1604   }
1605   bool __eq__(Dep *s) {
1606     return $self->pool == s->pool && $self->id == s->id;
1607   }
1608   bool __ne__(Dep *s) {
1609     return !Dep___eq__($self, s);
1610   }
1611 #if defined(SWIGPERL)
1612   %rename("str") __str__;
1613 #endif
1614   const char *__str__() {
1615     return pool_dep2str($self->pool, $self->id);
1616   }
1617   %newobject __repr__;
1618   const char *__repr__() {
1619     char buf[20];
1620     sprintf(buf, "<Id #%d ", $self->id);
1621     return solv_dupjoin(buf, pool_dep2str($self->pool, $self->id), ">");
1622   }
1623 }
1624
1625 %extend XSolvable {
1626   XSolvable(Pool *pool, Id id) {
1627     XSolvable *s;
1628     if (!id || id >= pool->nsolvables)
1629       return 0;
1630     s = solv_calloc(1, sizeof(*s));
1631     s->pool = pool;
1632     s->id = id;
1633     return s;
1634   }
1635   const char *str() {
1636     return pool_solvid2str($self->pool, $self->id);
1637   }
1638   const char *lookup_str(Id keyname) {
1639     return pool_lookup_str($self->pool, $self->id, keyname);
1640   }
1641   Id lookup_id(Id keyname) {
1642     return pool_lookup_id($self->pool, $self->id, keyname);
1643   }
1644   unsigned int lookup_num(Id keyname, unsigned int notfound = 0) {
1645     return pool_lookup_num($self->pool, $self->id, keyname, notfound);
1646   }
1647   bool lookup_void(Id keyname) {
1648     return pool_lookup_void($self->pool, $self->id, keyname);
1649   }
1650   %newobject lookup_checksum;
1651   Chksum *lookup_checksum(Id keyname) {
1652     Id type = 0;
1653     const unsigned char *b = pool_lookup_bin_checksum($self->pool, $self->id, keyname, &type);
1654     return solv_chksum_create_from_bin(type, b);
1655   }
1656   Queue lookup_idarray(Id keyname, Id marker = 1) {
1657     Solvable *s = $self->pool->solvables + $self->id;
1658     Queue r;
1659     queue_init(&r);
1660     if (marker == 1) {
1661       if (keyname == SOLVABLE_PROVIDES)
1662         marker = -SOLVABLE_FILEMARKER;
1663       else if (keyname == SOLVABLE_REQUIRES)
1664         marker = -SOLVABLE_PREREQMARKER;
1665       else
1666         marker = 0;
1667     }
1668     solvable_lookup_deparray(s, keyname, &r, marker);
1669     return r;
1670   }
1671   %typemap(out) Queue lookup_deparray Queue2Array(Dep *, 1, new_Dep(arg1->pool, id));
1672   %newobject lookup_deparray;
1673   Queue lookup_deparray(Id keyname, Id marker = 1) {
1674     Solvable *s = $self->pool->solvables + $self->id;
1675     Queue r;
1676     queue_init(&r);
1677     if (marker == 1) {
1678       if (keyname == SOLVABLE_PROVIDES)
1679         marker = -SOLVABLE_FILEMARKER;
1680       else if (keyname == SOLVABLE_REQUIRES)
1681         marker = -SOLVABLE_PREREQMARKER;
1682       else
1683         marker = 0;
1684     }
1685     solvable_lookup_deparray(s, keyname, &r, marker);
1686     return r;
1687   }
1688   const char *lookup_location(unsigned int *OUTPUT) {
1689     return solvable_get_location($self->pool->solvables + $self->id, OUTPUT);
1690   }
1691 #ifdef SWIGRUBY
1692   %rename("installable?") installable;
1693 #endif
1694   bool installable() {
1695     return pool_installable($self->pool, pool_id2solvable($self->pool, $self->id));
1696   }
1697 #ifdef SWIGRUBY
1698   %rename("isinstalled?") isinstalled;
1699 #endif
1700   bool isinstalled() {
1701     Pool *pool = $self->pool;
1702     return pool->installed && pool_id2solvable(pool, $self->id)->repo == pool->installed;
1703   }
1704
1705   const char *name;
1706   %{
1707     SWIGINTERN void XSolvable_name_set(XSolvable *xs, const char *name) {
1708       Pool *pool = xs->pool;
1709       pool->solvables[xs->id].name = pool_str2id(pool, name, 1);
1710     }
1711     SWIGINTERN const char *XSolvable_name_get(XSolvable *xs) {
1712       Pool *pool = xs->pool;
1713       return pool_id2str(pool, pool->solvables[xs->id].name);
1714     }
1715   %}
1716   Id nameid;
1717   %{
1718     SWIGINTERN void XSolvable_nameid_set(XSolvable *xs, Id nameid) {
1719       xs->pool->solvables[xs->id].name = nameid;
1720     }
1721     SWIGINTERN Id XSolvable_nameid_get(XSolvable *xs) {
1722       return xs->pool->solvables[xs->id].name;
1723     }
1724   %}
1725   const char *evr;
1726   %{
1727     SWIGINTERN void XSolvable_evr_set(XSolvable *xs, const char *evr) {
1728       Pool *pool = xs->pool;
1729       pool->solvables[xs->id].evr = pool_str2id(pool, evr, 1);
1730     }
1731     SWIGINTERN const char *XSolvable_evr_get(XSolvable *xs) {
1732       Pool *pool = xs->pool;
1733       return pool_id2str(pool, pool->solvables[xs->id].evr);
1734     }
1735   %}
1736   Id evrid;
1737   %{
1738     SWIGINTERN void XSolvable_evrid_set(XSolvable *xs, Id evrid) {
1739       xs->pool->solvables[xs->id].evr = evrid;
1740     }
1741     SWIGINTERN Id XSolvable_evrid_get(XSolvable *xs) {
1742       return xs->pool->solvables[xs->id].evr;
1743     }
1744   %}
1745   const char *arch;
1746   %{
1747     SWIGINTERN void XSolvable_arch_set(XSolvable *xs, const char *arch) {
1748       Pool *pool = xs->pool;
1749       pool->solvables[xs->id].arch = pool_str2id(pool, arch, 1);
1750     }
1751     SWIGINTERN const char *XSolvable_arch_get(XSolvable *xs) {
1752       Pool *pool = xs->pool;
1753       return pool_id2str(pool, pool->solvables[xs->id].arch);
1754     }
1755   %}
1756   Id archid;
1757   %{
1758     SWIGINTERN void XSolvable_archid_set(XSolvable *xs, Id archid) {
1759       xs->pool->solvables[xs->id].arch = archid;
1760     }
1761     SWIGINTERN Id XSolvable_archid_get(XSolvable *xs) {
1762       return xs->pool->solvables[xs->id].arch;
1763     }
1764   %}
1765   const char *vendor;
1766   %{
1767     SWIGINTERN void XSolvable_vendor_set(XSolvable *xs, const char *vendor) {
1768       Pool *pool = xs->pool;
1769       pool->solvables[xs->id].vendor = pool_str2id(pool, vendor, 1);
1770     }
1771     SWIGINTERN const char *XSolvable_vendor_get(XSolvable *xs) {
1772       Pool *pool = xs->pool;
1773       return pool_id2str(pool, pool->solvables[xs->id].vendor);
1774     }
1775   %}
1776   Id vendorid;
1777   %{
1778     SWIGINTERN void XSolvable_vendorid_set(XSolvable *xs, Id vendorid) {
1779       xs->pool->solvables[xs->id].vendor = vendorid;
1780     }
1781     SWIGINTERN Id XSolvable_vendorid_get(XSolvable *xs) {
1782       return xs->pool->solvables[xs->id].vendor;
1783     }
1784   %}
1785   Repo * const repo;
1786   %{
1787     SWIGINTERN Repo *XSolvable_repo_get(XSolvable *xs) {
1788       return xs->pool->solvables[xs->id].repo;
1789     }
1790   %}
1791
1792   void add_provides(Dep *dep, Id marker = -SOLVABLE_FILEMARKER) {
1793     Solvable *s = $self->pool->solvables + $self->id;
1794     s->provides = repo_addid_dep(s->repo, s->provides, dep->id, marker);
1795   }
1796   void add_providesid(Id id, Id marker = -SOLVABLE_FILEMARKER) {
1797     Solvable *s = $self->pool->solvables + $self->id;
1798     s->provides = repo_addid_dep(s->repo, s->provides, id, marker);
1799   }
1800   void add_obsoletes(Dep *dep) {
1801     Solvable *s = $self->pool->solvables + $self->id;
1802     s->obsoletes = repo_addid_dep(s->repo, s->obsoletes, dep->id, 0);
1803   }
1804   void add_obsoletesid(Id id) {
1805     Solvable *s = $self->pool->solvables + $self->id;
1806     s->obsoletes = repo_addid_dep(s->repo, s->obsoletes, id, 0);
1807   }
1808   void add_conflicts(Dep *dep) {
1809     Solvable *s = $self->pool->solvables + $self->id;
1810     s->conflicts = repo_addid_dep(s->repo, s->conflicts, dep->id, 0);
1811   }
1812   void add_conflictsid(Id id) {
1813     Solvable *s = $self->pool->solvables + $self->id;
1814     s->conflicts = repo_addid_dep(s->repo, s->conflicts, id, 0);
1815   }
1816   void add_requires(Dep *dep, Id marker = -SOLVABLE_PREREQMARKER) {
1817     Solvable *s = $self->pool->solvables + $self->id;
1818     s->requires = repo_addid_dep(s->repo, s->requires, dep->id, marker);
1819   }
1820   void add_requiresid(Id id, Id marker = -SOLVABLE_PREREQMARKER) {
1821     Solvable *s = $self->pool->solvables + $self->id;
1822     s->requires = repo_addid_dep(s->repo, s->requires, id, marker);
1823   }
1824   void add_recommends(Dep *dep) {
1825     Solvable *s = $self->pool->solvables + $self->id;
1826     s->recommends = repo_addid_dep(s->repo, s->recommends, dep->id, 0);
1827   }
1828   void add_recommendsid(Id id) {
1829     Solvable *s = $self->pool->solvables + $self->id;
1830     s->recommends = repo_addid_dep(s->repo, s->recommends, id, 0);
1831   }
1832   void add_suggests(Dep *dep) {
1833     Solvable *s = $self->pool->solvables + $self->id;
1834     s->suggests = repo_addid_dep(s->repo, s->suggests, dep->id, 0);
1835   }
1836   void add_suggestsid(Id id) {
1837     Solvable *s = $self->pool->solvables + $self->id;
1838     s->suggests = repo_addid_dep(s->repo, s->suggests, id, 0);
1839   }
1840   void add_supplements(Dep *dep) {
1841     Solvable *s = $self->pool->solvables + $self->id;
1842     s->supplements = repo_addid_dep(s->repo, s->supplements, dep->id, 0);
1843   }
1844   void add_supplementsid(Id id) {
1845     Solvable *s = $self->pool->solvables + $self->id;
1846     s->supplements = repo_addid_dep(s->repo, s->supplements, id, 0);
1847   }
1848   void add_enhances(Dep *dep) {
1849     Solvable *s = $self->pool->solvables + $self->id;
1850     s->enhances = repo_addid_dep(s->repo, s->enhances, dep->id, 0);
1851   }
1852   void add_enhancesid(Id id) {
1853     Solvable *s = $self->pool->solvables + $self->id;
1854     s->enhances = repo_addid_dep(s->repo, s->enhances, id, 0);
1855   }
1856
1857   bool __eq__(XSolvable *s) {
1858     return $self->pool == s->pool && $self->id == s->id;
1859   }
1860   bool __ne__(XSolvable *s) {
1861     return !XSolvable___eq__($self, s);
1862   }
1863 #if defined(SWIGPERL)
1864   %rename("str") __str__;
1865 #endif
1866   const char *__str__() {
1867     return pool_solvid2str($self->pool, $self->id);
1868   }
1869   %newobject __repr__;
1870   const char *__repr__() {
1871     char buf[20];
1872     sprintf(buf, "<Solvable #%d ", $self->id);
1873     return solv_dupjoin(buf, pool_solvid2str($self->pool, $self->id), ">");
1874   }
1875 }
1876
1877 %extend Problem {
1878   Problem(Solver *solv, Id id) {
1879     Problem *p;
1880     p = solv_calloc(1, sizeof(*p));
1881     p->solv = solv;
1882     p->id = id;
1883     return p;
1884   }
1885   %newobject findproblemrule;
1886   XRule *findproblemrule() {
1887     Id r = solver_findproblemrule($self->solv, $self->id);
1888     return new_XRule($self->solv, r);
1889   }
1890   %newobject findallproblemrules;
1891   %typemap(out) Queue findallproblemrules Queue2Array(XRule *, 1, new_XRule(arg1->solv, id));
1892   Queue findallproblemrules(int unfiltered=0) {
1893     Solver *solv = $self->solv;
1894     Id probr;
1895     int i, j;
1896     Queue q;
1897     queue_init(&q);
1898     solver_findallproblemrules(solv, $self->id, &q);
1899     if (!unfiltered)
1900       {
1901         for (i = j = 0; i < q.count; i++)
1902           {
1903             SolverRuleinfo rclass;
1904             probr = q.elements[i];
1905             rclass = solver_ruleclass(solv, probr);
1906             if (rclass == SOLVER_RULE_UPDATE || rclass == SOLVER_RULE_JOB)
1907               continue;
1908             q.elements[j++] = probr;
1909           }
1910         if (j)
1911           queue_truncate(&q, j);
1912       }
1913     return q;
1914   }
1915   int solution_count() {
1916     return solver_solution_count($self->solv, $self->id);
1917   }
1918   %newobject solutions;
1919   %typemap(out) Queue solutions Queue2Array(Solution *, 1, new_Solution(arg1, id));
1920   Queue solutions() {
1921     Queue q;
1922     int i, cnt;
1923     queue_init(&q);
1924     cnt = solver_solution_count($self->solv, $self->id);
1925     for (i = 1; i <= cnt; i++)
1926       queue_push(&q, i);
1927     return q;
1928   }
1929 }
1930
1931 %extend Solution {
1932   Solution(Problem *p, Id id) {
1933     Solution *s;
1934     s = solv_calloc(1, sizeof(*s));
1935     s->solv = p->solv;
1936     s->problemid = p->id;
1937     s->id = id;
1938     return s;
1939   }
1940   int element_count() {
1941     return solver_solutionelement_count($self->solv, $self->problemid, $self->id);
1942   }
1943
1944   %newobject elements;
1945   %typemap(out) Queue elements Queue2Array(Solutionelement *, 4, new_Solutionelement(arg1->solv, arg1->problemid, arg1->id, id, idp[1], idp[2], idp[3]));
1946   Queue elements(bool expandreplaces=0) {
1947     Queue q;
1948     int i, cnt;
1949     queue_init(&q);
1950     cnt = solver_solutionelement_count($self->solv, $self->problemid, $self->id);
1951     for (i = 1; i <= cnt; i++)
1952       {
1953         Id p, rp, type;
1954         solver_next_solutionelement($self->solv, $self->problemid, $self->id, i - 1, &p, &rp);
1955         if (p > 0) {
1956           type = rp ? SOLVER_SOLUTION_REPLACE : SOLVER_SOLUTION_ERASE;
1957         } else {
1958           type = p;
1959           p = rp;
1960           rp = 0;
1961         }
1962         if (type == SOLVER_SOLUTION_REPLACE && expandreplaces) {
1963           int illegal = policy_is_illegal(self->solv, self->solv->pool->solvables + p, self->solv->pool->solvables + rp, 0);
1964           if (illegal) {
1965             if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0) {
1966               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
1967               queue_push2(&q, p, rp);
1968             }
1969             if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0) {
1970               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
1971               queue_push2(&q, p, rp);
1972             }
1973             if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0) {
1974               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
1975               queue_push2(&q, p, rp);
1976             }
1977             continue;
1978           }
1979         }
1980         queue_push2(&q, i, type);
1981         queue_push2(&q, p, rp);
1982       }
1983     return q;
1984   }
1985 }
1986
1987 %extend Solutionelement {
1988   Solutionelement(Solver *solv, Id problemid, Id solutionid, Id id, Id type, Id p, Id rp) {
1989     Solutionelement *e;
1990     e = solv_calloc(1, sizeof(*e));
1991     e->solv = solv;
1992     e->problemid = problemid;
1993     e->solutionid = id;
1994     e->id = id;
1995     e->type = type;
1996     e->p = p;
1997     e->rp = rp;
1998     return e;
1999   }
2000   const char *str() {
2001     Id p = $self->type;
2002     Id rp = $self->p;
2003     if (p == SOLVER_SOLUTION_ERASE)
2004       {
2005         p = rp;
2006         rp = 0;
2007       }
2008     else if (p == SOLVER_SOLUTION_REPLACE)
2009       {
2010         p = rp;
2011         rp = $self->rp;
2012       }
2013     else if (p == SOLVER_SOLUTION_REPLACE_DOWNGRADE)
2014       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);
2015     else if (p == SOLVER_SOLUTION_REPLACE_ARCHCHANGE)
2016       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);
2017     else if (p == SOLVER_SOLUTION_REPLACE_VENDORCHANGE)
2018       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);
2019     return solver_solutionelement2str($self->solv, p, rp);
2020   }
2021   %newobject replaceelements;
2022   %typemap(out) Queue replaceelements Queue2Array(Solutionelement *, 1, new_Solutionelement(arg1->solv, arg1->problemid, arg1->solutionid, arg1->id, id, arg1->p, arg1->rp));
2023   Queue replaceelements() {
2024     Queue q;
2025     int illegal;
2026
2027     queue_init(&q);
2028     if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
2029       illegal = 0;
2030     else
2031       illegal = policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
2032     if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0)
2033       queue_push(&q, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
2034     if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0)
2035       queue_push(&q, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
2036     if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0)
2037       queue_push(&q, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
2038     if (!q.count)
2039       queue_push(&q, $self->type);
2040     return q;
2041   }
2042   int illegalreplace() {
2043     if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
2044       return 0;
2045     return policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
2046   }
2047   %newobject solvable;
2048   XSolvable * const solvable;
2049   %newobject replacement;
2050   XSolvable * const replacement;
2051   int const jobidx;
2052   %{
2053     SWIGINTERN XSolvable *Solutionelement_solvable_get(Solutionelement *e) {
2054       return new_XSolvable(e->solv->pool, e->p);
2055     }
2056     SWIGINTERN XSolvable *Solutionelement_replacement_get(Solutionelement *e) {
2057       return new_XSolvable(e->solv->pool, e->rp);
2058     }
2059     SWIGINTERN int Solutionelement_jobidx_get(Solutionelement *e) {
2060       if (e->type != SOLVER_SOLUTION_JOB)
2061         return -1;
2062       return (e->p - 1) / 2;
2063     }
2064   %}
2065   %newobject Job;
2066   Job *Job() {
2067     if ($self->type == SOLVER_SOLUTION_JOB)
2068       return new_Job($self->solv->pool, SOLVER_NOOP, 0);
2069     if ($self->type == SOLVER_SOLUTION_INFARCH || $self->type == SOLVER_SOLUTION_DISTUPGRADE)
2070       return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE, $self->p);
2071     if ($self->type == SOLVER_SOLUTION_REPLACE || $self->type == SOLVER_SOLUTION_REPLACE_DOWNGRADE || $self->type == SOLVER_SOLUTION_REPLACE_ARCHCHANGE || $self->type == SOLVER_SOLUTION_REPLACE_VENDORCHANGE)
2072       return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE, $self->rp);
2073     if ($self->type == SOLVER_SOLUTION_ERASE)
2074       return new_Job($self->solv->pool, SOLVER_ERASE|SOLVER_SOLVABLE, $self->p);
2075     return 0;
2076   }
2077 }
2078
2079 %extend Solver {
2080   static const int SOLVER_RULE_UNKNOWN = SOLVER_RULE_UNKNOWN;
2081   static const int SOLVER_RULE_RPM = SOLVER_RULE_RPM;
2082   static const int SOLVER_RULE_RPM_NOT_INSTALLABLE = SOLVER_RULE_RPM_NOT_INSTALLABLE;
2083   static const int SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP = SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP;
2084   static const int SOLVER_RULE_RPM_PACKAGE_REQUIRES = SOLVER_RULE_RPM_PACKAGE_REQUIRES;
2085   static const int SOLVER_RULE_RPM_SELF_CONFLICT = SOLVER_RULE_RPM_SELF_CONFLICT;
2086   static const int SOLVER_RULE_RPM_PACKAGE_CONFLICT = SOLVER_RULE_RPM_PACKAGE_CONFLICT;
2087   static const int SOLVER_RULE_RPM_SAME_NAME = SOLVER_RULE_RPM_SAME_NAME;
2088   static const int SOLVER_RULE_RPM_PACKAGE_OBSOLETES = SOLVER_RULE_RPM_PACKAGE_OBSOLETES;
2089   static const int SOLVER_RULE_RPM_IMPLICIT_OBSOLETES = SOLVER_RULE_RPM_IMPLICIT_OBSOLETES;
2090   static const int SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES = SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES;
2091   static const int SOLVER_RULE_UPDATE = SOLVER_RULE_UPDATE;
2092   static const int SOLVER_RULE_FEATURE = SOLVER_RULE_FEATURE;
2093   static const int SOLVER_RULE_JOB = SOLVER_RULE_JOB;
2094   static const int SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP = SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP;
2095   static const int SOLVER_RULE_DISTUPGRADE = SOLVER_RULE_DISTUPGRADE;
2096   static const int SOLVER_RULE_INFARCH = SOLVER_RULE_INFARCH;
2097   static const int SOLVER_RULE_CHOICE = SOLVER_RULE_CHOICE;
2098   static const int SOLVER_RULE_LEARNT = SOLVER_RULE_LEARNT;
2099
2100   static const int SOLVER_SOLUTION_JOB = SOLVER_SOLUTION_JOB;
2101   static const int SOLVER_SOLUTION_INFARCH = SOLVER_SOLUTION_INFARCH;
2102   static const int SOLVER_SOLUTION_DISTUPGRADE = SOLVER_SOLUTION_DISTUPGRADE;
2103   static const int SOLVER_SOLUTION_ERASE = SOLVER_SOLUTION_ERASE;
2104   static const int SOLVER_SOLUTION_REPLACE = SOLVER_SOLUTION_REPLACE;
2105   static const int SOLVER_SOLUTION_REPLACE_DOWNGRADE = SOLVER_SOLUTION_REPLACE_DOWNGRADE;
2106   static const int SOLVER_SOLUTION_REPLACE_ARCHCHANGE = SOLVER_SOLUTION_REPLACE_ARCHCHANGE;
2107   static const int SOLVER_SOLUTION_REPLACE_VENDORCHANGE = SOLVER_SOLUTION_REPLACE_VENDORCHANGE;
2108
2109   static const int POLICY_ILLEGAL_DOWNGRADE = POLICY_ILLEGAL_DOWNGRADE;
2110   static const int POLICY_ILLEGAL_ARCHCHANGE = POLICY_ILLEGAL_ARCHCHANGE;
2111   static const int POLICY_ILLEGAL_VENDORCHANGE = POLICY_ILLEGAL_VENDORCHANGE;
2112
2113   static const int SOLVER_FLAG_ALLOW_DOWNGRADE = SOLVER_FLAG_ALLOW_DOWNGRADE;
2114   static const int SOLVER_FLAG_ALLOW_ARCHCHANGE = SOLVER_FLAG_ALLOW_ARCHCHANGE;
2115   static const int SOLVER_FLAG_ALLOW_VENDORCHANGE = SOLVER_FLAG_ALLOW_VENDORCHANGE;
2116   static const int SOLVER_FLAG_ALLOW_UNINSTALL = SOLVER_FLAG_ALLOW_UNINSTALL;
2117   static const int SOLVER_FLAG_NO_UPDATEPROVIDE = SOLVER_FLAG_NO_UPDATEPROVIDE;
2118   static const int SOLVER_FLAG_SPLITPROVIDES = SOLVER_FLAG_SPLITPROVIDES;
2119   static const int SOLVER_FLAG_IGNORE_RECOMMENDED = SOLVER_FLAG_IGNORE_RECOMMENDED;
2120   static const int SOLVER_FLAG_IGNORE_ALREADY_RECOMMENDED = SOLVER_FLAG_IGNORE_ALREADY_RECOMMENDED;
2121   static const int SOLVER_FLAG_NO_INFARCHCHECK = SOLVER_FLAG_NO_INFARCHCHECK;
2122
2123   ~Solver() {
2124     solver_free($self);
2125   }
2126
2127   int set_flag(int flag, int value) {
2128     return solver_set_flag($self, flag, value);
2129   }
2130   int get_flag(int flag) {
2131     return solver_get_flag($self, flag);
2132   }
2133 #if defined(SWIGPYTHON)
2134   %pythoncode {
2135     def solve(self, jobs):
2136       j = []
2137       for job in jobs: j += [job.how, job.what]
2138       return self.solve_helper(j)
2139   }
2140 #endif
2141 #if defined(SWIGPERL)
2142   %perlcode {
2143     sub solv::Solver::solve {
2144       my ($self, $jobs) = @_;
2145       my @j = map {($_->{'how'}, $_->{'what'})} @$jobs;
2146       return $self->solve_helper(\@j);
2147     }
2148   }
2149 #endif
2150 #if defined(SWIGRUBY)
2151 %init %{
2152 rb_eval_string(
2153     "class Solv::Solver\n"
2154     "  def solve(jobs)\n"
2155     "    jl = []\n"
2156     "    jobs.each do |j| ; jl << j.how << j.what ; end\n"
2157     "    solve_helper(jl)\n"
2158     "  end\n"
2159     "end\n"
2160   );
2161 %}
2162 #endif
2163   %typemap(out) Queue solve_helper Queue2Array(Problem *, 1, new_Problem(arg1, id));
2164   %newobject solve_helper;
2165   Queue solve_helper(Queue jobs) {
2166     Queue q;
2167     int i, cnt;
2168     queue_init(&q);
2169     solver_solve($self, &jobs);
2170     cnt = solver_problem_count($self);
2171     for (i = 1; i <= cnt; i++)
2172       queue_push(&q, i);
2173     return q;
2174   }
2175   %newobject transaction;
2176   Transaction *transaction() {
2177     return solver_create_transaction($self);
2178   }
2179 }
2180
2181 %extend Transaction {
2182   static const int SOLVER_TRANSACTION_IGNORE = SOLVER_TRANSACTION_IGNORE;
2183   static const int SOLVER_TRANSACTION_ERASE = SOLVER_TRANSACTION_ERASE;
2184   static const int SOLVER_TRANSACTION_REINSTALLED = SOLVER_TRANSACTION_REINSTALLED;
2185   static const int SOLVER_TRANSACTION_DOWNGRADED = SOLVER_TRANSACTION_DOWNGRADED;
2186   static const int SOLVER_TRANSACTION_CHANGED = SOLVER_TRANSACTION_CHANGED;
2187   static const int SOLVER_TRANSACTION_UPGRADED = SOLVER_TRANSACTION_UPGRADED;
2188   static const int SOLVER_TRANSACTION_OBSOLETED = SOLVER_TRANSACTION_OBSOLETED;
2189   static const int SOLVER_TRANSACTION_INSTALL = SOLVER_TRANSACTION_INSTALL;
2190   static const int SOLVER_TRANSACTION_REINSTALL = SOLVER_TRANSACTION_REINSTALL;
2191   static const int SOLVER_TRANSACTION_DOWNGRADE = SOLVER_TRANSACTION_DOWNGRADE;
2192   static const int SOLVER_TRANSACTION_CHANGE = SOLVER_TRANSACTION_CHANGE;
2193   static const int SOLVER_TRANSACTION_UPGRADE = SOLVER_TRANSACTION_UPGRADE;
2194   static const int SOLVER_TRANSACTION_OBSOLETES = SOLVER_TRANSACTION_OBSOLETES;
2195   static const int SOLVER_TRANSACTION_MULTIINSTALL = SOLVER_TRANSACTION_MULTIINSTALL;
2196   static const int SOLVER_TRANSACTION_MULTIREINSTALL = SOLVER_TRANSACTION_MULTIREINSTALL;
2197   static const int SOLVER_TRANSACTION_MAXTYPE = SOLVER_TRANSACTION_MAXTYPE;
2198   static const int SOLVER_TRANSACTION_SHOW_ACTIVE = SOLVER_TRANSACTION_SHOW_ACTIVE;
2199   static const int SOLVER_TRANSACTION_SHOW_ALL = SOLVER_TRANSACTION_SHOW_ALL;
2200   static const int SOLVER_TRANSACTION_SHOW_OBSOLETES = SOLVER_TRANSACTION_SHOW_OBSOLETES;
2201   static const int SOLVER_TRANSACTION_SHOW_MULTIINSTALL = SOLVER_TRANSACTION_SHOW_MULTIINSTALL;
2202   static const int SOLVER_TRANSACTION_CHANGE_IS_REINSTALL = SOLVER_TRANSACTION_CHANGE_IS_REINSTALL;
2203   static const int SOLVER_TRANSACTION_MERGE_VENDORCHANGES = SOLVER_TRANSACTION_MERGE_VENDORCHANGES;
2204   static const int SOLVER_TRANSACTION_MERGE_ARCHCHANGES = SOLVER_TRANSACTION_MERGE_ARCHCHANGES;
2205   static const int SOLVER_TRANSACTION_RPM_ONLY = SOLVER_TRANSACTION_RPM_ONLY;
2206   static const int SOLVER_TRANSACTION_ARCHCHANGE = SOLVER_TRANSACTION_ARCHCHANGE;
2207   static const int SOLVER_TRANSACTION_VENDORCHANGE = SOLVER_TRANSACTION_VENDORCHANGE;
2208   static const int SOLVER_TRANSACTION_KEEP_ORDERDATA = SOLVER_TRANSACTION_KEEP_ORDERDATA;
2209   ~Transaction() {
2210     transaction_free($self);
2211   }
2212 #ifdef SWIGRUBY
2213   %rename("isempty?") isempty;
2214 #endif
2215   bool isempty() {
2216     return $self->steps.count == 0;
2217   }
2218
2219   %newobject othersolvable;
2220   XSolvable *othersolvable(XSolvable *s) {
2221     Id op = transaction_obs_pkg($self, s->id);
2222     return new_XSolvable($self->pool, op);
2223   }
2224
2225   %newobject allothersolvables;
2226   %typemap(out) Queue allothersolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2227   Queue allothersolvables(XSolvable *s) {
2228     Queue q;
2229     queue_init(&q);
2230     transaction_all_obs_pkgs($self, s->id, &q);
2231     return q;
2232   }
2233
2234   %typemap(out) Queue classify Queue2Array(TransactionClass *, 4, new_TransactionClass(arg1, arg2, id, idp[1], idp[2], idp[3]));
2235   %newobject classify;
2236   Queue classify(int mode = 0) {
2237     Queue q;
2238     queue_init(&q);
2239     transaction_classify($self, mode, &q);
2240     return q;
2241   }
2242
2243   %typemap(out) Queue newpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2244   %newobject newpackages;
2245   Queue newpackages() {
2246     Queue q;
2247     int cut;
2248     queue_init(&q);
2249     cut = transaction_installedresult(self, &q);
2250     queue_truncate(&q, cut);
2251     return q;
2252   }
2253
2254   %typemap(out) Queue keptpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2255   %newobject keptpackages;
2256   Queue keptpackages() {
2257     Queue q;
2258     int cut;
2259     queue_init(&q);
2260     cut = transaction_installedresult(self, &q);
2261     if (cut)
2262       queue_deleten(&q, 0, cut);
2263     return q;
2264   }
2265
2266   %typemap(out) Queue steps Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2267   %newobject steps ;
2268   Queue steps() {
2269     Queue q;
2270     queue_init_clone(&q, &$self->steps);
2271     return q;
2272   }
2273
2274   int steptype(XSolvable *s, int mode) {
2275     return transaction_type($self, s->id, mode);
2276   }
2277   int calc_installsizechange() {
2278     return transaction_calc_installsizechange($self);
2279   }
2280   void order(int flags) {
2281     transaction_order($self, flags);
2282   }
2283 }
2284
2285 %extend TransactionClass {
2286   TransactionClass(Transaction *trans, int mode, Id type, int count, Id fromid, Id toid) {
2287     TransactionClass *cl = solv_calloc(1, sizeof(*cl));
2288     cl->transaction = trans;
2289     cl->mode = mode;
2290     cl->type = type;
2291     cl->count = count;
2292     cl->fromid = fromid;
2293     cl->toid = toid;
2294     return cl;
2295   }
2296   %newobject solvables;
2297   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->transaction->pool, id));
2298   Queue solvables() {
2299     Queue q;
2300     queue_init(&q);
2301     transaction_classify_pkgs($self->transaction, $self->mode, $self->type, $self->fromid, $self->toid, &q);
2302     return q;
2303   }
2304 }
2305
2306 %extend XRule {
2307   XRule(Solver *solv, Id id) {
2308     if (!id)
2309       return 0;
2310     XRule *xr = solv_calloc(1, sizeof(*xr));
2311     xr->solv = solv;
2312     xr->id = id;
2313     return xr;
2314   }
2315   Ruleinfo *info() {
2316     Id type, source, target, dep;
2317     type =  solver_ruleinfo($self->solv, $self->id, &source, &target, &dep);
2318     return new_Ruleinfo($self, type, source, target, dep);
2319   }
2320   %typemap(out) Queue allinfos Queue2Array(Ruleinfo *, 4, new_Ruleinfo(arg1, id, idp[1], idp[2], idp[3]));
2321   %newobject allinfos;
2322   Queue allinfos() {
2323     Queue q;
2324     queue_init(&q);
2325     solver_allruleinfos($self->solv, $self->id, &q);
2326     return q;
2327   }
2328
2329   bool __eq__(XRule *xr) {
2330     return $self->solv == xr->solv && $self->id == xr->id;
2331   }
2332   bool __ne__(XRule *xr) {
2333     return !XRule___eq__($self, xr);
2334   }
2335   %newobject __repr__;
2336   const char *__repr__() {
2337     char buf[20];
2338     sprintf(buf, "<Rule #%d>", $self->id);
2339     return solv_strdup(buf);
2340   }
2341 }
2342
2343 %extend Ruleinfo {
2344   Ruleinfo(XRule *r, Id type, Id source, Id target, Id dep) {
2345     Ruleinfo *ri = solv_calloc(1, sizeof(*ri));
2346     ri->solv = r->solv;
2347     ri->rid = r->id;
2348     ri->type = type;
2349     ri->source = source;
2350     ri->target = target;
2351     ri->dep = dep;
2352     return ri;
2353   }
2354   XSolvable * const solvable;
2355   XSolvable * const othersolvable;
2356   %{
2357     SWIGINTERN XSolvable *Ruleinfo_solvable_get(Ruleinfo *ri) {
2358       return new_XSolvable(ri->solv->pool, ri->source);
2359     }
2360     SWIGINTERN XSolvable *Ruleinfo_othersolvable_get(Ruleinfo *ri) {
2361       return new_XSolvable(ri->solv->pool, ri->target);
2362     }
2363   %}
2364   const char *problemstr() {
2365     return solver_problemruleinfo2str($self->solv, $self->type, $self->source, $self->target, $self->dep);
2366   }
2367 }
2368
2369 %extend XRepodata {
2370   XRepodata(Repo *repo, Id id) {
2371     XRepodata *xr = solv_calloc(1, sizeof(*xr));
2372     xr->repo = repo;
2373     xr->id = id;
2374     return xr;
2375   }
2376   Id new_handle() {
2377     return repodata_new_handle($self->repo->repodata + $self->id);
2378   }
2379   void set_id(Id solvid, Id keyname, Id id) {
2380     repodata_set_id($self->repo->repodata + $self->id, solvid, keyname, id);
2381   }
2382   void set_str(Id solvid, Id keyname, const char *str) {
2383     repodata_set_str($self->repo->repodata + $self->id, solvid, keyname, str);
2384   }
2385   void set_poolstr(Id solvid, Id keyname, const char *str) {
2386     repodata_set_poolstr($self->repo->repodata + $self->id, solvid, keyname, str);
2387   }
2388   void add_idarray(Id solvid, Id keyname, Id id) {
2389     repodata_add_idarray($self->repo->repodata + $self->id, solvid, keyname, id);
2390   }
2391   void add_flexarray(Id solvid, Id keyname, Id handle) {
2392     repodata_add_flexarray($self->repo->repodata + $self->id, solvid, keyname, handle);
2393   }
2394   void set_checksum(Id solvid, Id keyname, Chksum *chksum) {
2395     const unsigned char *buf = solv_chksum_get(chksum, 0);
2396     if (buf)
2397       repodata_set_bin_checksum($self->repo->repodata + $self->id, solvid, keyname, solv_chksum_get_type(chksum), buf);
2398   }
2399   const char *lookup_str(Id solvid, Id keyname) {
2400     return repodata_lookup_str($self->repo->repodata + $self->id, solvid, keyname);
2401   }
2402   Queue lookup_idarray(Id solvid, Id keyname) {
2403     Queue r;
2404     queue_init(&r);
2405     repodata_lookup_idarray($self->repo->repodata + $self->id, solvid, keyname, &r);
2406     return r;
2407   }
2408   %newobject lookup_checksum;
2409   Chksum *lookup_checksum(Id solvid, Id keyname) {
2410     Id type = 0;
2411     const unsigned char *b = repodata_lookup_bin_checksum($self->repo->repodata + $self->id, solvid, keyname, &type);
2412     return solv_chksum_create_from_bin(type, b);
2413   }
2414   void internalize() {
2415     repodata_internalize($self->repo->repodata + $self->id);
2416   }
2417   void create_stubs() {
2418     repodata_create_stubs($self->repo->repodata + $self->id);
2419   }
2420   void write(FILE *fp) {
2421     repodata_write($self->repo->repodata + $self->id, fp, repo_write_stdkeyfilter, 0);
2422   }
2423   bool add_solv(FILE *fp, int flags = 0) {
2424     Repodata *data = $self->repo->repodata + $self->id;
2425     int r, oldstate = data->state;
2426     data->state = REPODATA_LOADING;
2427     r = repo_add_solv_flags(data->repo, fp, flags | REPO_USE_LOADING);
2428     if (r || data->state == REPODATA_LOADING)
2429       data->state = oldstate;
2430     return r;
2431   }
2432   void extend_to_repo() {
2433     Repodata *data = $self->repo->repodata + $self->id;
2434     repodata_extend_block(data, data->repo->start, data->repo->end - data->repo->start);
2435   }
2436   bool __eq__(XRepodata *xr) {
2437     return $self->repo == xr->repo && $self->id == xr->id;
2438   }
2439   bool __ne__(XRepodata *xr) {
2440     return !XRepodata___eq__($self, xr);
2441   }
2442   %newobject __repr__;
2443   const char *__repr__() {
2444     char buf[20];
2445     sprintf(buf, "<Repodata #%d>", $self->id);
2446     return solv_strdup(buf);
2447   }
2448 }
2449