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