- add cmake options to only build for some repository types
[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_ids() {
950     Queue r;
951     Id *addedfileprovides = 0;
952     queue_init(&r);
953     pool_addfileprovides_ids($self, $self->installed, &addedfileprovides);
954     if (addedfileprovides) {
955       for (; *addedfileprovides; addedfileprovides++)
956         queue_push(&r, *addedfileprovides);
957     }
958     return r;
959   }
960   void createwhatprovides() {
961     pool_createwhatprovides($self);
962   }
963
964   XSolvable *id2solvable(Id id) {
965     return new_XSolvable($self, id);
966   }
967   %newobject solvables;
968   Pool_solvable_iterator * const solvables;
969   %{
970   SWIGINTERN Pool_solvable_iterator * Pool_solvables_get(Pool *pool) {
971     return new_Pool_solvable_iterator(pool);
972   }
973   %}
974   %newobject solvables_iter;
975   Pool_solvable_iterator * solvables_iter() {
976     return new_Pool_solvable_iterator($self);
977   }
978
979   Repo *id2repo(Id id) {
980     if (id < 1 || id >= $self->nrepos)
981       return 0;
982     return pool_id2repo($self, id);
983   }
984   %newobject repos;
985   Pool_repo_iterator * const repos;
986   %{
987   SWIGINTERN Pool_repo_iterator * Pool_repos_get(Pool *pool) {
988     return new_Pool_repo_iterator(pool);
989   }
990   %}
991   %newobject repos_iter;
992   Pool_repo_iterator * repos_iter() {
993     return new_Pool_repo_iterator($self);
994   }
995
996   Repo *installed;
997   %{
998   SWIGINTERN void Pool_installed_set(Pool *pool, Repo *installed) {
999     pool_set_installed(pool, installed);
1000   }
1001   Repo *Pool_installed_get(Pool *pool) {
1002     return pool->installed;
1003   }
1004   %}
1005
1006   Queue matchprovidingids(const char *match, int flags) {
1007     Pool *pool = $self;
1008     Queue q;
1009     Id id;
1010     queue_init(&q);
1011     if (!flags) {
1012       for (id = 1; id < pool->ss.nstrings; id++)
1013         if (pool->whatprovides[id])
1014           queue_push(&q, id);
1015     } else {
1016       Datamatcher ma;
1017       if (!datamatcher_init(&ma, match, flags)) {
1018         for (id = 1; id < pool->ss.nstrings; id++)
1019           if (pool->whatprovides[id] && datamatcher_match(&ma, pool_id2str(pool, id)))
1020             queue_push(&q, id);
1021         datamatcher_free(&ma);
1022       }
1023     }
1024     return q;
1025   }
1026
1027   Job *Job(int how, Id what) {
1028     return new_Job($self, how, what);
1029   }
1030
1031   %typemap(out) Queue whatprovides Queue2Array(XSolvable *, 1, new_XSolvable(arg1, id));
1032   %newobject whatprovides;
1033   Queue whatprovides(Id dep) {
1034     Pool *pool = $self;
1035     Queue q;
1036     Id p, pp;
1037     queue_init(&q);
1038     FOR_PROVIDES(p, pp, dep)
1039       queue_push(&q, p);
1040     return q;
1041   }
1042
1043   Id towhatprovides(Queue q) {
1044     return pool_queuetowhatprovides($self, &q);
1045   }
1046
1047 #ifdef SWIGRUBY
1048   %rename("isknownarch?") isknownarch;
1049 #endif
1050   bool isknownarch(Id id) {
1051     Pool *pool = $self;
1052     if (!id || id == ID_EMPTY)
1053       return 0;
1054     if (id == ARCH_SRC || id == ARCH_NOSRC || id == ARCH_NOARCH)
1055       return 1;
1056     if (pool->id2arch && (id > pool->lastarch || !pool->id2arch[id]))
1057       return 0;
1058     return 1;
1059   }
1060
1061   %newobject Solver;
1062   Solver *Solver() {
1063     return solver_create($self);
1064   }
1065 }
1066
1067 %extend Repo {
1068   static const int REPO_REUSE_REPODATA = REPO_REUSE_REPODATA;
1069   static const int REPO_NO_INTERNALIZE = REPO_NO_INTERNALIZE;
1070   static const int REPO_LOCALPOOL = REPO_LOCALPOOL;
1071   static const int REPO_USE_LOADING = REPO_USE_LOADING;
1072   static const int REPO_EXTEND_SOLVABLES = REPO_EXTEND_SOLVABLES;
1073   static const int SOLV_ADD_NO_STUBS = SOLV_ADD_NO_STUBS;       /* repo_solv */
1074 #ifdef ENABLE_SUSETAGS
1075   static const int SUSETAGS_RECORD_SHARES = SUSETAGS_RECORD_SHARES;     /* repo_susetags */
1076 #endif
1077
1078   void free(bool reuseids = 0) {
1079     repo_free($self, reuseids);
1080   }
1081   void empty(bool reuseids = 0) {
1082     repo_empty($self, reuseids);
1083   }
1084 #ifdef SWIGRUBY
1085   %rename("isempty?") isempty;
1086 #endif
1087   bool isempty() {
1088     return !$self->nsolvables;
1089   }
1090   bool add_solv(const char *name, int flags = 0) {
1091     FILE *fp = fopen(name, "r");
1092     int r;
1093     if (!fp)
1094       return 0;
1095     r = repo_add_solv_flags($self, fp, flags);
1096     fclose(fp);
1097     return r == 0;
1098   }
1099   bool add_solv(FILE *fp, int flags = 0) {
1100     return repo_add_solv_flags($self, fp, flags) == 0;
1101   }
1102
1103   XSolvable *add_solvable() {
1104     Id solvid = repo_add_solvable($self);
1105     return new_XSolvable($self->pool, solvid);
1106   }
1107
1108 #ifdef ENABLE_RPMDB
1109   bool add_rpmdb(Repo *ref, int flags = 0) {
1110     repo_add_rpmdb($self, ref, 0, flags);
1111     return 1;
1112   }
1113   Id add_rpm(const char *name, int flags = 0) {
1114     return repo_add_rpm($self, name, flags);
1115   }
1116 #endif
1117 #ifdef ENABLE_RPMMD
1118   bool add_rpmmd(FILE *fp, const char *language, int flags = 0) {
1119     repo_add_rpmmd($self, fp, language, flags);
1120     return 1;
1121   }
1122   bool add_repomdxml(FILE *fp, int flags = 0) {
1123     repo_add_repomdxml($self, fp, flags);
1124     return 1;
1125   }
1126   bool add_updateinfoxml(FILE *fp, int flags = 0) {
1127     repo_add_updateinfoxml($self, fp, flags);
1128     return 1;
1129   }
1130   bool add_deltainfoxml(FILE *fp, int flags = 0) {
1131     repo_add_deltainfoxml($self, fp, flags);
1132     return 1;
1133   }
1134 #endif
1135 #ifdef ENABLE_DEBIAN
1136   bool add_debdb(int flags = 0) {
1137     repo_add_debdb($self, 0, flags);
1138     return 1;
1139   }
1140   Id add_deb(const char *name, int flags = 0) {
1141     return repo_add_deb($self, name, flags);
1142   }
1143 #endif
1144 #ifdef ENABLE_SUSEREPO
1145   bool add_susetags(FILE *fp, Id defvendor, const char *language, int flags = 0) {
1146     repo_add_susetags($self, fp, defvendor, language, flags);
1147     return 1;
1148   }
1149   bool add_content(FILE *fp, int flags = 0) {
1150     repo_add_content($self, fp, flags);
1151     return 1;
1152   }
1153   bool add_products(const char *proddir, int flags = 0) {
1154     repo_add_products($self, proddir, 0, flags);
1155     return 1;
1156   }
1157 #endif
1158   void internalize() {
1159     repo_internalize($self);
1160   }
1161   const char *lookup_str(Id entry, Id keyname) {
1162     return repo_lookup_str($self, entry, keyname);
1163   }
1164   Id lookup_id(Id entry, Id keyname) {
1165     return repo_lookup_id($self, entry, keyname);
1166   }
1167   unsigned int lookup_num(Id entry, Id keyname, unsigned int notfound = 0) {
1168     return repo_lookup_num($self, entry, keyname, notfound);
1169   }
1170   void write(FILE *fp) {
1171     repo_write($self, fp, repo_write_stdkeyfilter, 0, 0);
1172   }
1173   # HACK, remove if no longer needed!
1174   bool write_first_repodata(FILE *fp) {
1175     int oldnrepodata = $self->nrepodata;
1176     $self->nrepodata = oldnrepodata > 2 ? 2 : oldnrepodata;
1177     repo_write($self, fp, repo_write_stdkeyfilter, 0, 0);
1178     $self->nrepodata = oldnrepodata;
1179     return 1;
1180   }
1181
1182   %newobject Dataiterator;
1183   Dataiterator *Dataiterator(Id p, Id key, const char *match, int flags) {
1184     return new_Dataiterator($self->pool, $self, p, key, match, flags);
1185   }
1186
1187   Id const id;
1188   %{
1189   SWIGINTERN Id Repo_id_get(Repo *repo) {
1190     return repo->repoid;
1191   }
1192   %}
1193   Repo_solvable_iterator * const solvables;
1194   %{
1195   SWIGINTERN Repo_solvable_iterator * Repo_solvables_get(Repo *repo) {
1196     return new_Repo_solvable_iterator(repo);
1197   }
1198   %}
1199   %newobject solvables_iter;
1200   Repo_solvable_iterator *solvables_iter() {
1201     return new_Repo_solvable_iterator($self);
1202   }
1203
1204   XRepodata *add_repodata(int flags = 0) {
1205     Repodata *rd = repo_add_repodata($self, flags);
1206     return new_XRepodata($self, rd - $self->repodata);
1207   }
1208
1209   void create_stubs() {
1210     Repodata *data;
1211     if (!$self->nrepodata)
1212       return;
1213     data = $self->repodata  + ($self->nrepodata - 1);
1214     if (data->state != REPODATA_STUB)
1215       repodata_create_stubs(data);
1216   }
1217 #ifdef SWIGRUBY
1218   %rename("iscontiguous?") iscontiguous;
1219 #endif
1220   bool iscontiguous() {
1221     int i;
1222     for (i = $self->start; i < $self->end; i++)
1223       if ($self->pool->solvables[i].repo != $self)
1224         return 0;
1225     return 1;
1226   }
1227   XRepodata *first_repodata() {
1228      int i;
1229      if ($self->nrepodata < 2)
1230        return 0;
1231      /* make sure all repodatas but the first are extensions */
1232      if ($self->repodata[1].loadcallback)
1233         return 0;
1234      for (i = 2; i < $self->nrepodata; i++)
1235        if (!$self->repodata[i].loadcallback)
1236          return 0;       /* oops, not an extension */
1237      return new_XRepodata($self, 1);
1238    }
1239
1240   bool __eq__(Repo *repo) {
1241     return $self == repo;
1242   }
1243   bool __ne__(Repo *repo) {
1244     return $self != repo;
1245   }
1246 #if defined(SWIGPERL)
1247   %rename("str") __str__;
1248 #endif
1249   %newobject __str__;
1250   const char *__str__() {
1251     char buf[20];
1252     if ($self->name)
1253       return solv_strdup($self->name);
1254     sprintf(buf, "Repo#%d", $self->repoid);
1255     return solv_strdup(buf);
1256   }
1257   %newobject __repr__;
1258   const char *__repr__() {
1259     char buf[20];
1260     if ($self->name)
1261       {
1262         sprintf(buf, "<Repo #%d ", $self->repoid);
1263         return solv_dupjoin(buf, $self->name, ">");
1264       }
1265     sprintf(buf, "<Repo #%d>", $self->repoid);
1266     return solv_strdup(buf);
1267   }
1268 }
1269
1270 %extend Dataiterator {
1271   static const int SEARCH_STRING = SEARCH_STRING;
1272   static const int SEARCH_SUBSTRING = SEARCH_SUBSTRING;
1273   static const int SEARCH_GLOB = SEARCH_GLOB;
1274   static const int SEARCH_REGEX = SEARCH_REGEX;
1275   static const int SEARCH_NOCASE = SEARCH_NOCASE;
1276   static const int SEARCH_FILES = SEARCH_FILES;
1277   static const int SEARCH_COMPLETE_FILELIST = SEARCH_COMPLETE_FILELIST;
1278
1279   Dataiterator(Pool *pool, Repo *repo, Id p, Id key, const char *match, int flags) {
1280     Dataiterator *di = solv_calloc(1, sizeof(*di));
1281     dataiterator_init(di, pool, repo, p, key, match, flags);
1282     return di;
1283   }
1284   ~Dataiterator() {
1285     dataiterator_free($self);
1286     solv_free($self);
1287   }
1288 #if defined(SWIGPYTHON)
1289   %newobject __iter__;
1290   Dataiterator *__iter__() {
1291     Dataiterator *ndi;
1292     ndi = solv_calloc(1, sizeof(*ndi));
1293     dataiterator_init_clone(ndi, $self);
1294     return ndi;
1295   }
1296   %rename("next") __next__();
1297   %exception __next__ {
1298     $action
1299     if (!result) {
1300       PyErr_SetString(PyExc_StopIteration,"no more matches");
1301       return NULL;
1302     }
1303   }
1304 #endif
1305
1306 #ifdef SWIGPERL
1307   perliter(solv::Dataiterator)
1308 #endif
1309
1310   %newobject __next__;
1311   Datamatch *__next__() {
1312     Dataiterator *ndi;
1313     if (!dataiterator_step($self)) {
1314       return 0;
1315     }
1316     ndi = solv_calloc(1, sizeof(*ndi));
1317     dataiterator_init_clone(ndi, $self);
1318     return ndi;
1319   }
1320 #ifdef SWIGRUBY
1321   void each() {
1322     Datamatch *d;
1323     while ((d = Dataiterator___next__($self)) != 0) {
1324       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(d), SWIGTYPE_p_Datamatch, SWIG_POINTER_OWN | 0));
1325     }
1326   }
1327 #endif
1328   void prepend_keyname(Id key) {
1329     dataiterator_prepend_keyname($self, key);
1330   }
1331   void skip_solvable() {
1332     dataiterator_skip_solvable($self);
1333   }
1334 }
1335
1336 %extend Datapos {
1337   Id lookup_id(Id keyname) {
1338     Pool *pool = $self->repo->pool;
1339     Datapos oldpos = pool->pos;
1340     Id r;
1341     pool->pos = *$self;
1342     r = pool_lookup_id(pool, SOLVID_POS, keyname);
1343     pool->pos = oldpos;
1344     return r;
1345   }
1346   const char *lookup_str(Id keyname) {
1347     Pool *pool = $self->repo->pool;
1348     Datapos oldpos = pool->pos;
1349     const char *r;
1350     pool->pos = *$self;
1351     r = pool_lookup_str(pool, SOLVID_POS, keyname);
1352     pool->pos = oldpos;
1353     return r;
1354   }
1355   %newobject lookup_checksum;
1356   Chksum *lookup_checksum(Id keyname) {
1357     Pool *pool = $self->repo->pool;
1358     Datapos oldpos = pool->pos;
1359     Id type = 0;
1360     const unsigned char *b;
1361     pool->pos = *$self;
1362     b = pool_lookup_bin_checksum(pool, SOLVID_POS, keyname, &type);
1363     pool->pos = oldpos;
1364     return solv_chksum_create_from_bin(type, b);
1365   }
1366 }
1367
1368 %extend Datamatch {
1369   ~Datamatch() {
1370     dataiterator_free($self);
1371     solv_free($self);
1372   }
1373   %newobject solvable;
1374   XSolvable * const solvable;
1375   %{
1376   SWIGINTERN XSolvable *Datamatch_solvable_get(Dataiterator *di) {
1377     return new_XSolvable(di->pool, di->solvid);
1378   }
1379   %}
1380   Id key_id() {
1381     return $self->key->name;
1382   }
1383   const char *key_idstr() {
1384     return pool_id2str($self->pool, $self->key->name);
1385   }
1386   Id type_id() {
1387     return $self->key->type;
1388   }
1389   const char *type_idstr() {
1390     return pool_id2str($self->pool, $self->key->type);
1391   }
1392   Id id() {
1393      return $self->kv.id;
1394   }
1395   const char *idstr() {
1396      return pool_id2str($self->pool, $self->kv.id);
1397   }
1398   const char *str() {
1399      return $self->kv.str;
1400   }
1401   int num() {
1402      return $self->kv.num;
1403   }
1404   int num2() {
1405      return $self->kv.num2;
1406   }
1407   %newobject pos;
1408   Datapos *pos() {
1409     Pool *pool = $self->pool;
1410     Datapos *pos, oldpos = pool->pos;
1411     dataiterator_setpos($self);
1412     pos = solv_calloc(1, sizeof(*pos));
1413     *pos = pool->pos;
1414     pool->pos = oldpos;
1415     return pos;
1416   }
1417   %newobject parentpos;
1418   Datapos *parentpos() {
1419     Pool *pool = $self->pool;
1420     Datapos *pos, oldpos = pool->pos;
1421     dataiterator_setpos_parent($self);
1422     pos = solv_calloc(1, sizeof(*pos));
1423     *pos = pool->pos;
1424     pool->pos = oldpos;
1425     return pos;
1426   }
1427   void setpos() {
1428     dataiterator_setpos($self);
1429   }
1430   void setpos_parent() {
1431     dataiterator_setpos_parent($self);
1432   }
1433 }
1434
1435 %extend Pool_solvable_iterator {
1436   Pool_solvable_iterator(Pool *pool) {
1437     Pool_solvable_iterator *s;
1438     s = solv_calloc(1, sizeof(*s));
1439     s->pool = pool;
1440     return s;
1441   }
1442 #if defined(SWIGPYTHON)
1443   %newobject __iter__;
1444   Pool_solvable_iterator *__iter__() {
1445     Pool_solvable_iterator *s;
1446     s = solv_calloc(1, sizeof(*s));
1447     *s = *$self;
1448     return s;
1449   }
1450   %rename("next") __next__();
1451   %exception __next__ {
1452     $action
1453     if (!result) {
1454       PyErr_SetString(PyExc_StopIteration,"no more matches");
1455       return NULL;
1456     }
1457   }
1458 #endif
1459
1460 #ifdef SWIGPERL
1461   perliter(solv::Pool_solvable_iterator)
1462 #endif
1463   %newobject __next__;
1464   XSolvable *__next__() {
1465     Pool *pool = $self->pool;
1466     if ($self->id >= pool->nsolvables)
1467       return 0;
1468     while (++$self->id < pool->nsolvables)
1469       if (pool->solvables[$self->id].repo)
1470         return new_XSolvable(pool, $self->id);
1471     return 0;
1472   }
1473 #ifdef SWIGRUBY
1474   void each() {
1475     XSolvable *n;
1476     while ((n = Pool_solvable_iterator___next__($self)) != 0) {
1477       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
1478     }
1479   }
1480 #endif
1481   %newobject __getitem__;
1482   XSolvable *__getitem__(Id key) {
1483     Pool *pool = $self->pool;
1484     if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo)
1485       return new_XSolvable(pool, key);
1486     return 0;
1487   }
1488   int __len__() {
1489     return $self->pool->nsolvables;
1490   }
1491 }
1492
1493 %extend Pool_repo_iterator {
1494   Pool_repo_iterator(Pool *pool) {
1495     Pool_repo_iterator *s;
1496     s = solv_calloc(1, sizeof(*s));
1497     s->pool = pool;
1498     return s;
1499   }
1500 #if defined(SWIGPYTHON)
1501   %newobject __iter__;
1502   Pool_repo_iterator *__iter__() {
1503     Pool_repo_iterator *s;
1504     s = solv_calloc(1, sizeof(*s));
1505     *s = *$self;
1506     return s;
1507   }
1508   %rename("next") __next__();
1509   %exception __next__ {
1510     $action
1511     if (!result) {
1512       PyErr_SetString(PyExc_StopIteration,"no more matches");
1513       return NULL;
1514     }
1515   }
1516 #endif
1517   %newobject __next__;
1518   Repo *__next__() {
1519     Pool *pool = $self->pool;
1520     if ($self->id >= pool->nrepos)
1521       return 0;
1522     while (++$self->id < pool->nrepos) {
1523       Repo *r = pool_id2repo(pool, $self->id);
1524       if (r)
1525         return r;
1526     }
1527     return 0;
1528   }
1529 #ifdef SWIGRUBY
1530   void each() {
1531     Repo *n;
1532     while ((n = Pool_repo_iterator___next__($self)) != 0) {
1533       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p__Repo, SWIG_POINTER_OWN | 0));
1534     }
1535   }
1536 #endif
1537   Repo *__getitem__(Id key) {
1538     Pool *pool = $self->pool;
1539     if (key > 0 && key < pool->nrepos)
1540       return pool_id2repo(pool, key);
1541     return 0;
1542   }
1543   int __len__() {
1544     return $self->pool->nrepos;
1545   }
1546 }
1547
1548 %extend Repo_solvable_iterator {
1549   Repo_solvable_iterator(Repo *repo) {
1550     Repo_solvable_iterator *s;
1551     s = solv_calloc(1, sizeof(*s));
1552     s->repo = repo;
1553     return s;
1554   }
1555 #if defined(SWIGPYTHON)
1556   %newobject __iter__;
1557   Repo_solvable_iterator *__iter__() {
1558     Repo_solvable_iterator *s;
1559     s = solv_calloc(1, sizeof(*s));
1560     *s = *$self;
1561     return s;
1562   }
1563   %rename("next") __next__();
1564   %exception __next__ {
1565     $action
1566     if (!result) {
1567       PyErr_SetString(PyExc_StopIteration,"no more matches");
1568       return NULL;
1569     }
1570   }
1571 #endif
1572   %newobject __next__;
1573   XSolvable *__next__() {
1574     Repo *repo = $self->repo;
1575     Pool *pool = repo->pool;
1576     if (repo->start > 0 && $self->id < repo->start)
1577       $self->id = repo->start - 1;
1578     if ($self->id >= repo->end)
1579       return 0;
1580     while (++$self->id < repo->end)
1581       if (pool->solvables[$self->id].repo == repo)
1582         return new_XSolvable(pool, $self->id);
1583     return 0;
1584   }
1585 #ifdef SWIGRUBY
1586   void each() {
1587     XSolvable *n;
1588     while ((n = Repo_solvable_iterator___next__($self)) != 0) {
1589       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
1590     }
1591   }
1592 #endif
1593   %newobject __getitem__;
1594   XSolvable *__getitem__(Id key) {
1595     Repo *repo = $self->repo;
1596     Pool *pool = repo->pool;
1597     if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo == repo)
1598       return new_XSolvable(pool, key);
1599     return 0;
1600   }
1601   int __len__() {
1602     return $self->repo->pool->nsolvables;
1603   }
1604 }
1605
1606 %extend Dep {
1607   Dep(Pool *pool, Id id) {
1608     Dep *s;
1609     if (!id)
1610       return 0;
1611     s = solv_calloc(1, sizeof(*s));
1612     s->pool = pool;
1613     s->id = id;
1614     return s;
1615   }
1616   const char *str() {
1617     return pool_dep2str($self->pool, $self->id);
1618   }
1619   bool __eq__(Dep *s) {
1620     return $self->pool == s->pool && $self->id == s->id;
1621   }
1622   bool __ne__(Dep *s) {
1623     return !Dep___eq__($self, s);
1624   }
1625 #if defined(SWIGPERL)
1626   %rename("str") __str__;
1627 #endif
1628   const char *__str__() {
1629     return pool_dep2str($self->pool, $self->id);
1630   }
1631   %newobject __repr__;
1632   const char *__repr__() {
1633     char buf[20];
1634     sprintf(buf, "<Id #%d ", $self->id);
1635     return solv_dupjoin(buf, pool_dep2str($self->pool, $self->id), ">");
1636   }
1637 }
1638
1639 %extend XSolvable {
1640   XSolvable(Pool *pool, Id id) {
1641     XSolvable *s;
1642     if (!id || id >= pool->nsolvables)
1643       return 0;
1644     s = solv_calloc(1, sizeof(*s));
1645     s->pool = pool;
1646     s->id = id;
1647     return s;
1648   }
1649   const char *str() {
1650     return pool_solvid2str($self->pool, $self->id);
1651   }
1652   const char *lookup_str(Id keyname) {
1653     return pool_lookup_str($self->pool, $self->id, keyname);
1654   }
1655   Id lookup_id(Id keyname) {
1656     return pool_lookup_id($self->pool, $self->id, keyname);
1657   }
1658   unsigned int lookup_num(Id keyname, unsigned int notfound = 0) {
1659     return pool_lookup_num($self->pool, $self->id, keyname, notfound);
1660   }
1661   bool lookup_void(Id keyname) {
1662     return pool_lookup_void($self->pool, $self->id, keyname);
1663   }
1664   %newobject lookup_checksum;
1665   Chksum *lookup_checksum(Id keyname) {
1666     Id type = 0;
1667     const unsigned char *b = pool_lookup_bin_checksum($self->pool, $self->id, keyname, &type);
1668     return solv_chksum_create_from_bin(type, b);
1669   }
1670   Queue lookup_idarray(Id keyname, Id marker = 1) {
1671     Solvable *s = $self->pool->solvables + $self->id;
1672     Queue r;
1673     queue_init(&r);
1674     if (marker == 1) {
1675       if (keyname == SOLVABLE_PROVIDES)
1676         marker = -SOLVABLE_FILEMARKER;
1677       else if (keyname == SOLVABLE_REQUIRES)
1678         marker = -SOLVABLE_PREREQMARKER;
1679       else
1680         marker = 0;
1681     }
1682     solvable_lookup_deparray(s, keyname, &r, marker);
1683     return r;
1684   }
1685   %typemap(out) Queue lookup_deparray Queue2Array(Dep *, 1, new_Dep(arg1->pool, id));
1686   %newobject lookup_deparray;
1687   Queue lookup_deparray(Id keyname, Id marker = 1) {
1688     Solvable *s = $self->pool->solvables + $self->id;
1689     Queue r;
1690     queue_init(&r);
1691     if (marker == 1) {
1692       if (keyname == SOLVABLE_PROVIDES)
1693         marker = -SOLVABLE_FILEMARKER;
1694       else if (keyname == SOLVABLE_REQUIRES)
1695         marker = -SOLVABLE_PREREQMARKER;
1696       else
1697         marker = 0;
1698     }
1699     solvable_lookup_deparray(s, keyname, &r, marker);
1700     return r;
1701   }
1702   const char *lookup_location(unsigned int *OUTPUT) {
1703     return solvable_get_location($self->pool->solvables + $self->id, OUTPUT);
1704   }
1705 #ifdef SWIGRUBY
1706   %rename("installable?") installable;
1707 #endif
1708   bool installable() {
1709     return pool_installable($self->pool, pool_id2solvable($self->pool, $self->id));
1710   }
1711 #ifdef SWIGRUBY
1712   %rename("isinstalled?") isinstalled;
1713 #endif
1714   bool isinstalled() {
1715     Pool *pool = $self->pool;
1716     return pool->installed && pool_id2solvable(pool, $self->id)->repo == pool->installed;
1717   }
1718
1719   const char *name;
1720   %{
1721     SWIGINTERN void XSolvable_name_set(XSolvable *xs, const char *name) {
1722       Pool *pool = xs->pool;
1723       pool->solvables[xs->id].name = pool_str2id(pool, name, 1);
1724     }
1725     SWIGINTERN const char *XSolvable_name_get(XSolvable *xs) {
1726       Pool *pool = xs->pool;
1727       return pool_id2str(pool, pool->solvables[xs->id].name);
1728     }
1729   %}
1730   Id nameid;
1731   %{
1732     SWIGINTERN void XSolvable_nameid_set(XSolvable *xs, Id nameid) {
1733       xs->pool->solvables[xs->id].name = nameid;
1734     }
1735     SWIGINTERN Id XSolvable_nameid_get(XSolvable *xs) {
1736       return xs->pool->solvables[xs->id].name;
1737     }
1738   %}
1739   const char *evr;
1740   %{
1741     SWIGINTERN void XSolvable_evr_set(XSolvable *xs, const char *evr) {
1742       Pool *pool = xs->pool;
1743       pool->solvables[xs->id].evr = pool_str2id(pool, evr, 1);
1744     }
1745     SWIGINTERN const char *XSolvable_evr_get(XSolvable *xs) {
1746       Pool *pool = xs->pool;
1747       return pool_id2str(pool, pool->solvables[xs->id].evr);
1748     }
1749   %}
1750   Id evrid;
1751   %{
1752     SWIGINTERN void XSolvable_evrid_set(XSolvable *xs, Id evrid) {
1753       xs->pool->solvables[xs->id].evr = evrid;
1754     }
1755     SWIGINTERN Id XSolvable_evrid_get(XSolvable *xs) {
1756       return xs->pool->solvables[xs->id].evr;
1757     }
1758   %}
1759   const char *arch;
1760   %{
1761     SWIGINTERN void XSolvable_arch_set(XSolvable *xs, const char *arch) {
1762       Pool *pool = xs->pool;
1763       pool->solvables[xs->id].arch = pool_str2id(pool, arch, 1);
1764     }
1765     SWIGINTERN const char *XSolvable_arch_get(XSolvable *xs) {
1766       Pool *pool = xs->pool;
1767       return pool_id2str(pool, pool->solvables[xs->id].arch);
1768     }
1769   %}
1770   Id archid;
1771   %{
1772     SWIGINTERN void XSolvable_archid_set(XSolvable *xs, Id archid) {
1773       xs->pool->solvables[xs->id].arch = archid;
1774     }
1775     SWIGINTERN Id XSolvable_archid_get(XSolvable *xs) {
1776       return xs->pool->solvables[xs->id].arch;
1777     }
1778   %}
1779   const char *vendor;
1780   %{
1781     SWIGINTERN void XSolvable_vendor_set(XSolvable *xs, const char *vendor) {
1782       Pool *pool = xs->pool;
1783       pool->solvables[xs->id].vendor = pool_str2id(pool, vendor, 1);
1784     }
1785     SWIGINTERN const char *XSolvable_vendor_get(XSolvable *xs) {
1786       Pool *pool = xs->pool;
1787       return pool_id2str(pool, pool->solvables[xs->id].vendor);
1788     }
1789   %}
1790   Id vendorid;
1791   %{
1792     SWIGINTERN void XSolvable_vendorid_set(XSolvable *xs, Id vendorid) {
1793       xs->pool->solvables[xs->id].vendor = vendorid;
1794     }
1795     SWIGINTERN Id XSolvable_vendorid_get(XSolvable *xs) {
1796       return xs->pool->solvables[xs->id].vendor;
1797     }
1798   %}
1799   Repo * const repo;
1800   %{
1801     SWIGINTERN Repo *XSolvable_repo_get(XSolvable *xs) {
1802       return xs->pool->solvables[xs->id].repo;
1803     }
1804   %}
1805
1806   void add_provides(Dep *dep, Id marker = -SOLVABLE_FILEMARKER) {
1807     Solvable *s = $self->pool->solvables + $self->id;
1808     s->provides = repo_addid_dep(s->repo, s->provides, dep->id, marker);
1809   }
1810   void add_providesid(Id id, Id marker = -SOLVABLE_FILEMARKER) {
1811     Solvable *s = $self->pool->solvables + $self->id;
1812     s->provides = repo_addid_dep(s->repo, s->provides, id, marker);
1813   }
1814   void add_obsoletes(Dep *dep) {
1815     Solvable *s = $self->pool->solvables + $self->id;
1816     s->obsoletes = repo_addid_dep(s->repo, s->obsoletes, dep->id, 0);
1817   }
1818   void add_obsoletesid(Id id) {
1819     Solvable *s = $self->pool->solvables + $self->id;
1820     s->obsoletes = repo_addid_dep(s->repo, s->obsoletes, id, 0);
1821   }
1822   void add_conflicts(Dep *dep) {
1823     Solvable *s = $self->pool->solvables + $self->id;
1824     s->conflicts = repo_addid_dep(s->repo, s->conflicts, dep->id, 0);
1825   }
1826   void add_conflictsid(Id id) {
1827     Solvable *s = $self->pool->solvables + $self->id;
1828     s->conflicts = repo_addid_dep(s->repo, s->conflicts, id, 0);
1829   }
1830   void add_requires(Dep *dep, Id marker = -SOLVABLE_PREREQMARKER) {
1831     Solvable *s = $self->pool->solvables + $self->id;
1832     s->requires = repo_addid_dep(s->repo, s->requires, dep->id, marker);
1833   }
1834   void add_requiresid(Id id, Id marker = -SOLVABLE_PREREQMARKER) {
1835     Solvable *s = $self->pool->solvables + $self->id;
1836     s->requires = repo_addid_dep(s->repo, s->requires, id, marker);
1837   }
1838   void add_recommends(Dep *dep) {
1839     Solvable *s = $self->pool->solvables + $self->id;
1840     s->recommends = repo_addid_dep(s->repo, s->recommends, dep->id, 0);
1841   }
1842   void add_recommendsid(Id id) {
1843     Solvable *s = $self->pool->solvables + $self->id;
1844     s->recommends = repo_addid_dep(s->repo, s->recommends, id, 0);
1845   }
1846   void add_suggests(Dep *dep) {
1847     Solvable *s = $self->pool->solvables + $self->id;
1848     s->suggests = repo_addid_dep(s->repo, s->suggests, dep->id, 0);
1849   }
1850   void add_suggestsid(Id id) {
1851     Solvable *s = $self->pool->solvables + $self->id;
1852     s->suggests = repo_addid_dep(s->repo, s->suggests, id, 0);
1853   }
1854   void add_supplements(Dep *dep) {
1855     Solvable *s = $self->pool->solvables + $self->id;
1856     s->supplements = repo_addid_dep(s->repo, s->supplements, dep->id, 0);
1857   }
1858   void add_supplementsid(Id id) {
1859     Solvable *s = $self->pool->solvables + $self->id;
1860     s->supplements = repo_addid_dep(s->repo, s->supplements, id, 0);
1861   }
1862   void add_enhances(Dep *dep) {
1863     Solvable *s = $self->pool->solvables + $self->id;
1864     s->enhances = repo_addid_dep(s->repo, s->enhances, dep->id, 0);
1865   }
1866   void add_enhancesid(Id id) {
1867     Solvable *s = $self->pool->solvables + $self->id;
1868     s->enhances = repo_addid_dep(s->repo, s->enhances, id, 0);
1869   }
1870
1871   bool __eq__(XSolvable *s) {
1872     return $self->pool == s->pool && $self->id == s->id;
1873   }
1874   bool __ne__(XSolvable *s) {
1875     return !XSolvable___eq__($self, s);
1876   }
1877 #if defined(SWIGPERL)
1878   %rename("str") __str__;
1879 #endif
1880   const char *__str__() {
1881     return pool_solvid2str($self->pool, $self->id);
1882   }
1883   %newobject __repr__;
1884   const char *__repr__() {
1885     char buf[20];
1886     sprintf(buf, "<Solvable #%d ", $self->id);
1887     return solv_dupjoin(buf, pool_solvid2str($self->pool, $self->id), ">");
1888   }
1889 }
1890
1891 %extend Problem {
1892   Problem(Solver *solv, Id id) {
1893     Problem *p;
1894     p = solv_calloc(1, sizeof(*p));
1895     p->solv = solv;
1896     p->id = id;
1897     return p;
1898   }
1899   %newobject findproblemrule;
1900   XRule *findproblemrule() {
1901     Id r = solver_findproblemrule($self->solv, $self->id);
1902     return new_XRule($self->solv, r);
1903   }
1904   %newobject findallproblemrules;
1905   %typemap(out) Queue findallproblemrules Queue2Array(XRule *, 1, new_XRule(arg1->solv, id));
1906   Queue findallproblemrules(int unfiltered=0) {
1907     Solver *solv = $self->solv;
1908     Id probr;
1909     int i, j;
1910     Queue q;
1911     queue_init(&q);
1912     solver_findallproblemrules(solv, $self->id, &q);
1913     if (!unfiltered)
1914       {
1915         for (i = j = 0; i < q.count; i++)
1916           {
1917             SolverRuleinfo rclass;
1918             probr = q.elements[i];
1919             rclass = solver_ruleclass(solv, probr);
1920             if (rclass == SOLVER_RULE_UPDATE || rclass == SOLVER_RULE_JOB)
1921               continue;
1922             q.elements[j++] = probr;
1923           }
1924         if (j)
1925           queue_truncate(&q, j);
1926       }
1927     return q;
1928   }
1929   int solution_count() {
1930     return solver_solution_count($self->solv, $self->id);
1931   }
1932   %newobject solutions;
1933   %typemap(out) Queue solutions Queue2Array(Solution *, 1, new_Solution(arg1, id));
1934   Queue solutions() {
1935     Queue q;
1936     int i, cnt;
1937     queue_init(&q);
1938     cnt = solver_solution_count($self->solv, $self->id);
1939     for (i = 1; i <= cnt; i++)
1940       queue_push(&q, i);
1941     return q;
1942   }
1943 }
1944
1945 %extend Solution {
1946   Solution(Problem *p, Id id) {
1947     Solution *s;
1948     s = solv_calloc(1, sizeof(*s));
1949     s->solv = p->solv;
1950     s->problemid = p->id;
1951     s->id = id;
1952     return s;
1953   }
1954   int element_count() {
1955     return solver_solutionelement_count($self->solv, $self->problemid, $self->id);
1956   }
1957
1958   %newobject elements;
1959   %typemap(out) Queue elements Queue2Array(Solutionelement *, 4, new_Solutionelement(arg1->solv, arg1->problemid, arg1->id, id, idp[1], idp[2], idp[3]));
1960   Queue elements(bool expandreplaces=0) {
1961     Queue q;
1962     int i, cnt;
1963     queue_init(&q);
1964     cnt = solver_solutionelement_count($self->solv, $self->problemid, $self->id);
1965     for (i = 1; i <= cnt; i++)
1966       {
1967         Id p, rp, type;
1968         solver_next_solutionelement($self->solv, $self->problemid, $self->id, i - 1, &p, &rp);
1969         if (p > 0) {
1970           type = rp ? SOLVER_SOLUTION_REPLACE : SOLVER_SOLUTION_ERASE;
1971         } else {
1972           type = p;
1973           p = rp;
1974           rp = 0;
1975         }
1976         if (type == SOLVER_SOLUTION_REPLACE && expandreplaces) {
1977           int illegal = policy_is_illegal(self->solv, self->solv->pool->solvables + p, self->solv->pool->solvables + rp, 0);
1978           if (illegal) {
1979             if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0) {
1980               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
1981               queue_push2(&q, p, rp);
1982             }
1983             if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0) {
1984               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
1985               queue_push2(&q, p, rp);
1986             }
1987             if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0) {
1988               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
1989               queue_push2(&q, p, rp);
1990             }
1991             continue;
1992           }
1993         }
1994         queue_push2(&q, i, type);
1995         queue_push2(&q, p, rp);
1996       }
1997     return q;
1998   }
1999 }
2000
2001 %extend Solutionelement {
2002   Solutionelement(Solver *solv, Id problemid, Id solutionid, Id id, Id type, Id p, Id rp) {
2003     Solutionelement *e;
2004     e = solv_calloc(1, sizeof(*e));
2005     e->solv = solv;
2006     e->problemid = problemid;
2007     e->solutionid = id;
2008     e->id = id;
2009     e->type = type;
2010     e->p = p;
2011     e->rp = rp;
2012     return e;
2013   }
2014   const char *str() {
2015     Id p = $self->type;
2016     Id rp = $self->p;
2017     if (p == SOLVER_SOLUTION_ERASE)
2018       {
2019         p = rp;
2020         rp = 0;
2021       }
2022     else if (p == SOLVER_SOLUTION_REPLACE)
2023       {
2024         p = rp;
2025         rp = $self->rp;
2026       }
2027     else if (p == SOLVER_SOLUTION_REPLACE_DOWNGRADE)
2028       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);
2029     else if (p == SOLVER_SOLUTION_REPLACE_ARCHCHANGE)
2030       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);
2031     else if (p == SOLVER_SOLUTION_REPLACE_VENDORCHANGE)
2032       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);
2033     return solver_solutionelement2str($self->solv, p, rp);
2034   }
2035   %newobject replaceelements;
2036   %typemap(out) Queue replaceelements Queue2Array(Solutionelement *, 1, new_Solutionelement(arg1->solv, arg1->problemid, arg1->solutionid, arg1->id, id, arg1->p, arg1->rp));
2037   Queue replaceelements() {
2038     Queue q;
2039     int illegal;
2040
2041     queue_init(&q);
2042     if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
2043       illegal = 0;
2044     else
2045       illegal = policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
2046     if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0)
2047       queue_push(&q, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
2048     if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0)
2049       queue_push(&q, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
2050     if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0)
2051       queue_push(&q, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
2052     if (!q.count)
2053       queue_push(&q, $self->type);
2054     return q;
2055   }
2056   int illegalreplace() {
2057     if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
2058       return 0;
2059     return policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
2060   }
2061   %newobject solvable;
2062   XSolvable * const solvable;
2063   %newobject replacement;
2064   XSolvable * const replacement;
2065   int const jobidx;
2066   %{
2067     SWIGINTERN XSolvable *Solutionelement_solvable_get(Solutionelement *e) {
2068       return new_XSolvable(e->solv->pool, e->p);
2069     }
2070     SWIGINTERN XSolvable *Solutionelement_replacement_get(Solutionelement *e) {
2071       return new_XSolvable(e->solv->pool, e->rp);
2072     }
2073     SWIGINTERN int Solutionelement_jobidx_get(Solutionelement *e) {
2074       if (e->type != SOLVER_SOLUTION_JOB)
2075         return -1;
2076       return (e->p - 1) / 2;
2077     }
2078   %}
2079   %newobject Job;
2080   Job *Job() {
2081     if ($self->type == SOLVER_SOLUTION_JOB)
2082       return new_Job($self->solv->pool, SOLVER_NOOP, 0);
2083     if ($self->type == SOLVER_SOLUTION_INFARCH || $self->type == SOLVER_SOLUTION_DISTUPGRADE)
2084       return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE, $self->p);
2085     if ($self->type == SOLVER_SOLUTION_REPLACE || $self->type == SOLVER_SOLUTION_REPLACE_DOWNGRADE || $self->type == SOLVER_SOLUTION_REPLACE_ARCHCHANGE || $self->type == SOLVER_SOLUTION_REPLACE_VENDORCHANGE)
2086       return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE, $self->rp);
2087     if ($self->type == SOLVER_SOLUTION_ERASE)
2088       return new_Job($self->solv->pool, SOLVER_ERASE|SOLVER_SOLVABLE, $self->p);
2089     return 0;
2090   }
2091 }
2092
2093 %extend Solver {
2094   static const int SOLVER_RULE_UNKNOWN = SOLVER_RULE_UNKNOWN;
2095   static const int SOLVER_RULE_RPM = SOLVER_RULE_RPM;
2096   static const int SOLVER_RULE_RPM_NOT_INSTALLABLE = SOLVER_RULE_RPM_NOT_INSTALLABLE;
2097   static const int SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP = SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP;
2098   static const int SOLVER_RULE_RPM_PACKAGE_REQUIRES = SOLVER_RULE_RPM_PACKAGE_REQUIRES;
2099   static const int SOLVER_RULE_RPM_SELF_CONFLICT = SOLVER_RULE_RPM_SELF_CONFLICT;
2100   static const int SOLVER_RULE_RPM_PACKAGE_CONFLICT = SOLVER_RULE_RPM_PACKAGE_CONFLICT;
2101   static const int SOLVER_RULE_RPM_SAME_NAME = SOLVER_RULE_RPM_SAME_NAME;
2102   static const int SOLVER_RULE_RPM_PACKAGE_OBSOLETES = SOLVER_RULE_RPM_PACKAGE_OBSOLETES;
2103   static const int SOLVER_RULE_RPM_IMPLICIT_OBSOLETES = SOLVER_RULE_RPM_IMPLICIT_OBSOLETES;
2104   static const int SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES = SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES;
2105   static const int SOLVER_RULE_UPDATE = SOLVER_RULE_UPDATE;
2106   static const int SOLVER_RULE_FEATURE = SOLVER_RULE_FEATURE;
2107   static const int SOLVER_RULE_JOB = SOLVER_RULE_JOB;
2108   static const int SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP = SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP;
2109   static const int SOLVER_RULE_DISTUPGRADE = SOLVER_RULE_DISTUPGRADE;
2110   static const int SOLVER_RULE_INFARCH = SOLVER_RULE_INFARCH;
2111   static const int SOLVER_RULE_CHOICE = SOLVER_RULE_CHOICE;
2112   static const int SOLVER_RULE_LEARNT = SOLVER_RULE_LEARNT;
2113
2114   static const int SOLVER_SOLUTION_JOB = SOLVER_SOLUTION_JOB;
2115   static const int SOLVER_SOLUTION_INFARCH = SOLVER_SOLUTION_INFARCH;
2116   static const int SOLVER_SOLUTION_DISTUPGRADE = SOLVER_SOLUTION_DISTUPGRADE;
2117   static const int SOLVER_SOLUTION_ERASE = SOLVER_SOLUTION_ERASE;
2118   static const int SOLVER_SOLUTION_REPLACE = SOLVER_SOLUTION_REPLACE;
2119   static const int SOLVER_SOLUTION_REPLACE_DOWNGRADE = SOLVER_SOLUTION_REPLACE_DOWNGRADE;
2120   static const int SOLVER_SOLUTION_REPLACE_ARCHCHANGE = SOLVER_SOLUTION_REPLACE_ARCHCHANGE;
2121   static const int SOLVER_SOLUTION_REPLACE_VENDORCHANGE = SOLVER_SOLUTION_REPLACE_VENDORCHANGE;
2122
2123   static const int POLICY_ILLEGAL_DOWNGRADE = POLICY_ILLEGAL_DOWNGRADE;
2124   static const int POLICY_ILLEGAL_ARCHCHANGE = POLICY_ILLEGAL_ARCHCHANGE;
2125   static const int POLICY_ILLEGAL_VENDORCHANGE = POLICY_ILLEGAL_VENDORCHANGE;
2126
2127   static const int SOLVER_FLAG_ALLOW_DOWNGRADE = SOLVER_FLAG_ALLOW_DOWNGRADE;
2128   static const int SOLVER_FLAG_ALLOW_ARCHCHANGE = SOLVER_FLAG_ALLOW_ARCHCHANGE;
2129   static const int SOLVER_FLAG_ALLOW_VENDORCHANGE = SOLVER_FLAG_ALLOW_VENDORCHANGE;
2130   static const int SOLVER_FLAG_ALLOW_UNINSTALL = SOLVER_FLAG_ALLOW_UNINSTALL;
2131   static const int SOLVER_FLAG_NO_UPDATEPROVIDE = SOLVER_FLAG_NO_UPDATEPROVIDE;
2132   static const int SOLVER_FLAG_SPLITPROVIDES = SOLVER_FLAG_SPLITPROVIDES;
2133   static const int SOLVER_FLAG_IGNORE_RECOMMENDED = SOLVER_FLAG_IGNORE_RECOMMENDED;
2134   static const int SOLVER_FLAG_IGNORE_ALREADY_RECOMMENDED = SOLVER_FLAG_IGNORE_ALREADY_RECOMMENDED;
2135   static const int SOLVER_FLAG_NO_INFARCHCHECK = SOLVER_FLAG_NO_INFARCHCHECK;
2136
2137   ~Solver() {
2138     solver_free($self);
2139   }
2140
2141   int set_flag(int flag, int value) {
2142     return solver_set_flag($self, flag, value);
2143   }
2144   int get_flag(int flag) {
2145     return solver_get_flag($self, flag);
2146   }
2147 #if defined(SWIGPYTHON)
2148   %pythoncode {
2149     def solve(self, jobs):
2150       j = []
2151       for job in jobs: j += [job.how, job.what]
2152       return self.solve_helper(j)
2153   }
2154 #endif
2155 #if defined(SWIGPERL)
2156   %perlcode {
2157     sub solv::Solver::solve {
2158       my ($self, $jobs) = @_;
2159       my @j = map {($_->{'how'}, $_->{'what'})} @$jobs;
2160       return $self->solve_helper(\@j);
2161     }
2162   }
2163 #endif
2164 #if defined(SWIGRUBY)
2165 %init %{
2166 rb_eval_string(
2167     "class Solv::Solver\n"
2168     "  def solve(jobs)\n"
2169     "    jl = []\n"
2170     "    jobs.each do |j| ; jl << j.how << j.what ; end\n"
2171     "    solve_helper(jl)\n"
2172     "  end\n"
2173     "end\n"
2174   );
2175 %}
2176 #endif
2177   %typemap(out) Queue solve_helper Queue2Array(Problem *, 1, new_Problem(arg1, id));
2178   %newobject solve_helper;
2179   Queue solve_helper(Queue jobs) {
2180     Queue q;
2181     int i, cnt;
2182     queue_init(&q);
2183     solver_solve($self, &jobs);
2184     cnt = solver_problem_count($self);
2185     for (i = 1; i <= cnt; i++)
2186       queue_push(&q, i);
2187     return q;
2188   }
2189   %newobject transaction;
2190   Transaction *transaction() {
2191     return solver_create_transaction($self);
2192   }
2193 }
2194
2195 %extend Transaction {
2196   static const int SOLVER_TRANSACTION_IGNORE = SOLVER_TRANSACTION_IGNORE;
2197   static const int SOLVER_TRANSACTION_ERASE = SOLVER_TRANSACTION_ERASE;
2198   static const int SOLVER_TRANSACTION_REINSTALLED = SOLVER_TRANSACTION_REINSTALLED;
2199   static const int SOLVER_TRANSACTION_DOWNGRADED = SOLVER_TRANSACTION_DOWNGRADED;
2200   static const int SOLVER_TRANSACTION_CHANGED = SOLVER_TRANSACTION_CHANGED;
2201   static const int SOLVER_TRANSACTION_UPGRADED = SOLVER_TRANSACTION_UPGRADED;
2202   static const int SOLVER_TRANSACTION_OBSOLETED = SOLVER_TRANSACTION_OBSOLETED;
2203   static const int SOLVER_TRANSACTION_INSTALL = SOLVER_TRANSACTION_INSTALL;
2204   static const int SOLVER_TRANSACTION_REINSTALL = SOLVER_TRANSACTION_REINSTALL;
2205   static const int SOLVER_TRANSACTION_DOWNGRADE = SOLVER_TRANSACTION_DOWNGRADE;
2206   static const int SOLVER_TRANSACTION_CHANGE = SOLVER_TRANSACTION_CHANGE;
2207   static const int SOLVER_TRANSACTION_UPGRADE = SOLVER_TRANSACTION_UPGRADE;
2208   static const int SOLVER_TRANSACTION_OBSOLETES = SOLVER_TRANSACTION_OBSOLETES;
2209   static const int SOLVER_TRANSACTION_MULTIINSTALL = SOLVER_TRANSACTION_MULTIINSTALL;
2210   static const int SOLVER_TRANSACTION_MULTIREINSTALL = SOLVER_TRANSACTION_MULTIREINSTALL;
2211   static const int SOLVER_TRANSACTION_MAXTYPE = SOLVER_TRANSACTION_MAXTYPE;
2212   static const int SOLVER_TRANSACTION_SHOW_ACTIVE = SOLVER_TRANSACTION_SHOW_ACTIVE;
2213   static const int SOLVER_TRANSACTION_SHOW_ALL = SOLVER_TRANSACTION_SHOW_ALL;
2214   static const int SOLVER_TRANSACTION_SHOW_OBSOLETES = SOLVER_TRANSACTION_SHOW_OBSOLETES;
2215   static const int SOLVER_TRANSACTION_SHOW_MULTIINSTALL = SOLVER_TRANSACTION_SHOW_MULTIINSTALL;
2216   static const int SOLVER_TRANSACTION_CHANGE_IS_REINSTALL = SOLVER_TRANSACTION_CHANGE_IS_REINSTALL;
2217   static const int SOLVER_TRANSACTION_MERGE_VENDORCHANGES = SOLVER_TRANSACTION_MERGE_VENDORCHANGES;
2218   static const int SOLVER_TRANSACTION_MERGE_ARCHCHANGES = SOLVER_TRANSACTION_MERGE_ARCHCHANGES;
2219   static const int SOLVER_TRANSACTION_RPM_ONLY = SOLVER_TRANSACTION_RPM_ONLY;
2220   static const int SOLVER_TRANSACTION_ARCHCHANGE = SOLVER_TRANSACTION_ARCHCHANGE;
2221   static const int SOLVER_TRANSACTION_VENDORCHANGE = SOLVER_TRANSACTION_VENDORCHANGE;
2222   static const int SOLVER_TRANSACTION_KEEP_ORDERDATA = SOLVER_TRANSACTION_KEEP_ORDERDATA;
2223   ~Transaction() {
2224     transaction_free($self);
2225   }
2226 #ifdef SWIGRUBY
2227   %rename("isempty?") isempty;
2228 #endif
2229   bool isempty() {
2230     return $self->steps.count == 0;
2231   }
2232
2233   %newobject othersolvable;
2234   XSolvable *othersolvable(XSolvable *s) {
2235     Id op = transaction_obs_pkg($self, s->id);
2236     return new_XSolvable($self->pool, op);
2237   }
2238
2239   %newobject allothersolvables;
2240   %typemap(out) Queue allothersolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2241   Queue allothersolvables(XSolvable *s) {
2242     Queue q;
2243     queue_init(&q);
2244     transaction_all_obs_pkgs($self, s->id, &q);
2245     return q;
2246   }
2247
2248   %typemap(out) Queue classify Queue2Array(TransactionClass *, 4, new_TransactionClass(arg1, arg2, id, idp[1], idp[2], idp[3]));
2249   %newobject classify;
2250   Queue classify(int mode = 0) {
2251     Queue q;
2252     queue_init(&q);
2253     transaction_classify($self, mode, &q);
2254     return q;
2255   }
2256
2257   %typemap(out) Queue newpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2258   %newobject newpackages;
2259   Queue newpackages() {
2260     Queue q;
2261     int cut;
2262     queue_init(&q);
2263     cut = transaction_installedresult(self, &q);
2264     queue_truncate(&q, cut);
2265     return q;
2266   }
2267
2268   %typemap(out) Queue keptpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2269   %newobject keptpackages;
2270   Queue keptpackages() {
2271     Queue q;
2272     int cut;
2273     queue_init(&q);
2274     cut = transaction_installedresult(self, &q);
2275     if (cut)
2276       queue_deleten(&q, 0, cut);
2277     return q;
2278   }
2279
2280   %typemap(out) Queue steps Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2281   %newobject steps ;
2282   Queue steps() {
2283     Queue q;
2284     queue_init_clone(&q, &$self->steps);
2285     return q;
2286   }
2287
2288   int steptype(XSolvable *s, int mode) {
2289     return transaction_type($self, s->id, mode);
2290   }
2291   int calc_installsizechange() {
2292     return transaction_calc_installsizechange($self);
2293   }
2294   void order(int flags) {
2295     transaction_order($self, flags);
2296   }
2297 }
2298
2299 %extend TransactionClass {
2300   TransactionClass(Transaction *trans, int mode, Id type, int count, Id fromid, Id toid) {
2301     TransactionClass *cl = solv_calloc(1, sizeof(*cl));
2302     cl->transaction = trans;
2303     cl->mode = mode;
2304     cl->type = type;
2305     cl->count = count;
2306     cl->fromid = fromid;
2307     cl->toid = toid;
2308     return cl;
2309   }
2310   %newobject solvables;
2311   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->transaction->pool, id));
2312   Queue solvables() {
2313     Queue q;
2314     queue_init(&q);
2315     transaction_classify_pkgs($self->transaction, $self->mode, $self->type, $self->fromid, $self->toid, &q);
2316     return q;
2317   }
2318 }
2319
2320 %extend XRule {
2321   XRule(Solver *solv, Id id) {
2322     if (!id)
2323       return 0;
2324     XRule *xr = solv_calloc(1, sizeof(*xr));
2325     xr->solv = solv;
2326     xr->id = id;
2327     return xr;
2328   }
2329   Ruleinfo *info() {
2330     Id type, source, target, dep;
2331     type =  solver_ruleinfo($self->solv, $self->id, &source, &target, &dep);
2332     return new_Ruleinfo($self, type, source, target, dep);
2333   }
2334   %typemap(out) Queue allinfos Queue2Array(Ruleinfo *, 4, new_Ruleinfo(arg1, id, idp[1], idp[2], idp[3]));
2335   %newobject allinfos;
2336   Queue allinfos() {
2337     Queue q;
2338     queue_init(&q);
2339     solver_allruleinfos($self->solv, $self->id, &q);
2340     return q;
2341   }
2342
2343   bool __eq__(XRule *xr) {
2344     return $self->solv == xr->solv && $self->id == xr->id;
2345   }
2346   bool __ne__(XRule *xr) {
2347     return !XRule___eq__($self, xr);
2348   }
2349   %newobject __repr__;
2350   const char *__repr__() {
2351     char buf[20];
2352     sprintf(buf, "<Rule #%d>", $self->id);
2353     return solv_strdup(buf);
2354   }
2355 }
2356
2357 %extend Ruleinfo {
2358   Ruleinfo(XRule *r, Id type, Id source, Id target, Id dep) {
2359     Ruleinfo *ri = solv_calloc(1, sizeof(*ri));
2360     ri->solv = r->solv;
2361     ri->rid = r->id;
2362     ri->type = type;
2363     ri->source = source;
2364     ri->target = target;
2365     ri->dep = dep;
2366     return ri;
2367   }
2368   XSolvable * const solvable;
2369   XSolvable * const othersolvable;
2370   %{
2371     SWIGINTERN XSolvable *Ruleinfo_solvable_get(Ruleinfo *ri) {
2372       return new_XSolvable(ri->solv->pool, ri->source);
2373     }
2374     SWIGINTERN XSolvable *Ruleinfo_othersolvable_get(Ruleinfo *ri) {
2375       return new_XSolvable(ri->solv->pool, ri->target);
2376     }
2377   %}
2378   const char *problemstr() {
2379     return solver_problemruleinfo2str($self->solv, $self->type, $self->source, $self->target, $self->dep);
2380   }
2381 }
2382
2383 %extend XRepodata {
2384   XRepodata(Repo *repo, Id id) {
2385     XRepodata *xr = solv_calloc(1, sizeof(*xr));
2386     xr->repo = repo;
2387     xr->id = id;
2388     return xr;
2389   }
2390   Id new_handle() {
2391     return repodata_new_handle($self->repo->repodata + $self->id);
2392   }
2393   void set_id(Id solvid, Id keyname, Id id) {
2394     repodata_set_id($self->repo->repodata + $self->id, solvid, keyname, id);
2395   }
2396   void set_str(Id solvid, Id keyname, const char *str) {
2397     repodata_set_str($self->repo->repodata + $self->id, solvid, keyname, str);
2398   }
2399   void set_poolstr(Id solvid, Id keyname, const char *str) {
2400     repodata_set_poolstr($self->repo->repodata + $self->id, solvid, keyname, str);
2401   }
2402   void add_idarray(Id solvid, Id keyname, Id id) {
2403     repodata_add_idarray($self->repo->repodata + $self->id, solvid, keyname, id);
2404   }
2405   void add_flexarray(Id solvid, Id keyname, Id handle) {
2406     repodata_add_flexarray($self->repo->repodata + $self->id, solvid, keyname, handle);
2407   }
2408   void set_checksum(Id solvid, Id keyname, Chksum *chksum) {
2409     const unsigned char *buf = solv_chksum_get(chksum, 0);
2410     if (buf)
2411       repodata_set_bin_checksum($self->repo->repodata + $self->id, solvid, keyname, solv_chksum_get_type(chksum), buf);
2412   }
2413   const char *lookup_str(Id solvid, Id keyname) {
2414     return repodata_lookup_str($self->repo->repodata + $self->id, solvid, keyname);
2415   }
2416   Queue lookup_idarray(Id solvid, Id keyname) {
2417     Queue r;
2418     queue_init(&r);
2419     repodata_lookup_idarray($self->repo->repodata + $self->id, solvid, keyname, &r);
2420     return r;
2421   }
2422   %newobject lookup_checksum;
2423   Chksum *lookup_checksum(Id solvid, Id keyname) {
2424     Id type = 0;
2425     const unsigned char *b = repodata_lookup_bin_checksum($self->repo->repodata + $self->id, solvid, keyname, &type);
2426     return solv_chksum_create_from_bin(type, b);
2427   }
2428   void internalize() {
2429     repodata_internalize($self->repo->repodata + $self->id);
2430   }
2431   void create_stubs() {
2432     repodata_create_stubs($self->repo->repodata + $self->id);
2433   }
2434   void write(FILE *fp) {
2435     repodata_write($self->repo->repodata + $self->id, fp, repo_write_stdkeyfilter, 0);
2436   }
2437   bool add_solv(FILE *fp, int flags = 0) {
2438     Repodata *data = $self->repo->repodata + $self->id;
2439     int r, oldstate = data->state;
2440     data->state = REPODATA_LOADING;
2441     r = repo_add_solv_flags(data->repo, fp, flags | REPO_USE_LOADING);
2442     if (r || data->state == REPODATA_LOADING)
2443       data->state = oldstate;
2444     return r;
2445   }
2446   void extend_to_repo() {
2447     Repodata *data = $self->repo->repodata + $self->id;
2448     repodata_extend_block(data, data->repo->start, data->repo->end - data->repo->start);
2449   }
2450   bool __eq__(XRepodata *xr) {
2451     return $self->repo == xr->repo && $self->id == xr->id;
2452   }
2453   bool __ne__(XRepodata *xr) {
2454     return !XRepodata___eq__($self, xr);
2455   }
2456   %newobject __repr__;
2457   const char *__repr__() {
2458     char buf[20];
2459     sprintf(buf, "<Repodata #%d>", $self->id);
2460     return solv_strdup(buf);
2461   }
2462 }
2463