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