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