Create a real type for a checksum handle
[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 %module solv
8
9 #ifdef SWIGRUBY
10 %markfunc Pool "mark_Pool";
11 #endif
12
13 #if defined(SWIGPYTHON)
14 %typemap(in) Queue {
15   /* Check if is a list */
16   queue_init(&$1);
17   if (PyList_Check($input)) {
18     int size = PyList_Size($input);
19     int i = 0;
20     for (i = 0; i < size; i++) {
21       PyObject *o = PyList_GetItem($input,i);
22       int v;
23       int e = SWIG_AsVal_int(o, &v);
24       if (!SWIG_IsOK(e)) {
25         SWIG_exception_fail(SWIG_ArgError(e), "list must contain only integers");
26         queue_free(&$1);
27         return NULL;
28       }
29       queue_push(&$1, v);
30     }
31   } else {
32     PyErr_SetString(PyExc_TypeError,"not a list");
33     return NULL;
34   }
35 }
36
37 %typemap(out) Queue {
38   int i;
39   PyObject *o = PyList_New($1.count);
40   for (i = 0; i < $1.count; i++)
41     PyList_SetItem(o, i, SWIG_From_int($1.elements[i]));
42   queue_free(&$1);
43   $result = o;
44 }
45
46 %define Queue2Array(type, step, con) %{
47   int i;
48   int cnt = $1.count / step;
49   Id *idp = $1.elements;
50   PyObject *o = PyList_New(cnt);
51   for (i = 0; i < cnt; i++, idp += step)
52     {
53       Id id = *idp;
54 #define result resultx
55       type result = con;
56       $typemap(out, type)
57       PyList_SetItem(o, i, $result);
58 #undef result
59     }
60   queue_free(&$1);
61   $result = o;
62 %}
63
64 %enddef
65
66 #endif
67
68
69 #if defined(SWIGPERL)
70 %typemap(in) Queue {
71   AV *av;
72   int i, size;
73   queue_init(&$1);
74   if (!SvROK($input) || SvTYPE(SvRV($input)) != SVt_PVAV)
75     SWIG_croak("Argument $argnum is not an array reference.");
76   av = (AV*)SvRV($input);
77   size = av_len(av);
78   for (i = 0; i <= size; i++) {
79     SV **sv = av_fetch(av, i, 0);
80     int v;
81     int e = SWIG_AsVal_int(*sv, &v);
82     if (!SWIG_IsOK(e)) {
83       SWIG_croak("list must contain only integers");
84     }
85     queue_push(&$1, v);
86   }
87 }
88 # AV *o = newAV();
89 # av_push(o, SvREFCNT_inc(SWIG_From_int($1.elements[i])));
90 # $result = newRV_noinc((SV*)o); argvi++;
91 #
92 %typemap(out) Queue {
93   int i;
94   if (argvi + $1.count + 1 >= items) {
95     EXTEND(sp, (argvi + $1.count + 1) - items + 1);
96   }
97   for (i = 0; i < $1.count; i++)
98     ST(argvi++) = SvREFCNT_inc(SWIG_From_int($1.elements[i]));
99   queue_free(&$1);
100   $result = 0;
101 }
102 %define Queue2Array(type, step, con) %{
103   int i;
104   int cnt = $1.count / step;
105   Id *idp = $1.elements;
106   if (argvi + cnt + 1 >= items) {
107     EXTEND(sp, (argvi + cnt + 1) - items + 1);
108   }
109   for (i = 0; i < cnt; i++, idp += step)
110     {
111       Id id = *idp;
112 #define result resultx
113       type result = con;
114       $typemap(out, type)
115       SvREFCNT_inc(ST(argvi - 1));
116 #undef result
117     }
118   queue_free(&$1);
119   $result = 0;
120 %}
121 %enddef
122
123 #endif
124
125 %typemap(arginit) Queue {
126   queue_init(&$1);
127 }
128 %typemap(freearg) Queue {
129   queue_free(&$1);
130 }
131
132 #if defined(SWIGRUBY)
133 %typemap(in) Queue {
134   int size, i;
135   VALUE *o;
136   queue_init(&$1);
137   size = RARRAY_LEN($input);
138   i = 0;
139   o = RARRAY_PTR($input);
140   for (i = 0; i < size; i++, o++) {
141     int v;
142     int e = SWIG_AsVal_int(*o, &v);
143     if (!SWIG_IsOK(e))
144       {
145         SWIG_Error(SWIG_RuntimeError, "list must contain only integers");
146         SWIG_fail;
147       }
148     queue_push(&$1, v);
149   }
150 }
151 %typemap(out) Queue {
152   int i;
153   VALUE o = rb_ary_new2($1.count);
154   for (i = 0; i < $1.count; i++)
155     rb_ary_store(o, i, SWIG_From_int($1.elements[i]));
156   queue_free(&$1);
157   $result = o;
158 }
159 %typemap(arginit) Queue {
160   queue_init(&$1);
161 }
162 %typemap(freearg) Queue {
163   queue_free(&$1);
164 }
165 %define Queue2Array(type, step, con) %{
166   int i;
167   int cnt = $1.count / step;
168   Id *idp = $1.elements;
169   VALUE o = rb_ary_new2(cnt);
170   for (i = 0; i < cnt; i++, idp += step)
171     {
172       Id id = *idp;
173 #define result resultx
174       type result = con;
175       $typemap(out, type)
176       rb_ary_store(o, i, $result);
177 #undef result
178     }
179   queue_free(&$1);
180   $result = o;
181 %}
182 %enddef
183 #endif
184
185
186
187
188 #if defined(SWIGPERL)
189
190 # work around a swig bug
191 %{
192 #undef SWIG_CALLXS
193 #ifdef PERL_OBJECT
194 #  define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(cv,pPerl)
195 #else
196 #  ifndef MULTIPLICITY
197 #    define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(cv)
198 #  else
199 #    define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(PERL_GET_THX, cv)
200 #  endif
201 #endif
202 %}
203
204
205 %define perliter(class)
206   %perlcode {
207     sub class##::FETCH {
208       my $i = ${##class##::ITERATORS}{$_[0]};
209       if ($i) {
210         $_[1] == $i->[0] - 1 ? $i->[1] : undef;
211       } else {
212         $_[0]->__getitem__($_[1]);
213       }
214     }
215     sub class##::FETCHSIZE {
216       my $i = ${##class##::ITERATORS}{$_[0]};
217       if ($i) {
218         ($i->[1] = $_[0]->__next__()) ? ++$i->[0]  : 0;
219       } else {
220         $_[0]->__len__();
221       }
222     }
223   }
224 %enddef
225
226 %{
227
228 #define SWIG_PERL_ITERATOR      0x80
229
230 SWIGRUNTIMEINLINE SV *
231 SWIG_Perl_NewArrayObj(SWIG_MAYBE_PERL_OBJECT void *ptr, swig_type_info *t, int flags) {
232   SV *result = sv_newmortal();
233   if (ptr && (flags & (SWIG_SHADOW | SWIG_POINTER_OWN))) {
234     SV *self;
235     SV *obj=newSV(0);
236     AV *array=newAV();
237     HV *stash;
238     sv_setref_pv(obj, (char *) SWIG_Perl_TypeProxyName(t), ptr);
239     stash=SvSTASH(SvRV(obj));
240     if (flags & SWIG_POINTER_OWN) {
241       HV *hv;
242       GV *gv=*(GV**)hv_fetch(stash, "OWNER", 5, TRUE);
243       if (!isGV(gv))
244         gv_init(gv, stash, "OWNER", 5, FALSE);
245       hv=GvHVn(gv);
246       hv_store_ent(hv, obj, newSViv(1), 0);
247     }
248     if (flags & SWIG_PERL_ITERATOR) {
249       HV *hv;
250       GV *gv=*(GV**)hv_fetch(stash, "ITERATORS", 9, TRUE);
251       AV *av=newAV();
252       if (!isGV(gv))
253         gv_init(gv, stash, "ITERATORS", 9, FALSE);
254       hv=GvHVn(gv);
255       hv_store_ent(hv, obj, newRV_inc((SV *)av), 0);
256     }
257     sv_magic((SV *)array, (SV *)obj, 'P', Nullch, 0);
258     SvREFCNT_dec(obj);
259     self=newRV_noinc((SV *)array);
260     sv_setsv(result, self);
261     SvREFCNT_dec((SV *)self);
262     sv_bless(result, stash);
263   } else {
264     sv_setref_pv(result, (char *) SWIG_Perl_TypeProxyName(t), ptr);
265   }
266   return result;
267 }
268
269 %}
270
271 %typemap(out) Perlarray {
272   ST(argvi) = SWIG_Perl_NewArrayObj(SWIG_PERL_OBJECT_CALL SWIG_as_voidptr(result), $1_descriptor, $owner | $shadow); argvi++;
273 }
274 %typemap(out) Perliterator {
275   ST(argvi) = SWIG_Perl_NewArrayObj(SWIG_PERL_OBJECT_CALL SWIG_as_voidptr(result), $1_descriptor, $owner | $shadow | SWIG_PERL_ITERATOR); argvi++;
276 }
277
278 %typemap(out) Pool_solvable_iterator * = Perlarray;
279 %typemap(out) Pool_solvable_iterator * solvables_iter = Perliterator;
280 %typemap(out) Pool_repo_iterator * = Perlarray;
281 %typemap(out) Pool_repo_iterator * repos_iter = Perliterator;
282 %typemap(out) Repo_solvable_iterator * = Perlarray;
283 %typemap(out) Repo_solvable_iterator * solvables_iter = Perliterator;
284 %typemap(out) Dataiterator * = Perliterator;
285
286 #endif
287
288
289 #if defined(SWIGPYTHON)
290 typedef PyObject *AppObjectPtr;
291 %typemap(out) AppObjectPtr {
292   $result = $1 ? $1 : Py_None;
293   Py_INCREF($result);
294 }
295 #endif
296 #if defined(SWIGPERL)
297 typedef SV *AppObjectPtr;
298 %typemap(in) AppObjectPtr {
299   $1 = SvROK($input) ? SvRV($input) : 0;
300 }
301 %typemap(out) AppObjectPtr {
302   $result = $1 ? newRV_inc($1) : newSV(0);
303   argvi++;
304 }
305 #endif
306 #if defined(SWIGRUBY)
307 typedef VALUE AppObjectPtr;
308 %typemap(in) AppObjectPtr {
309   $1 = (void *)$input;
310 }
311 %typemap(out) AppObjectPtr {
312   $result = (VALUE)$1;
313 }
314 #endif
315
316
317 %include "cdata.i"
318 #ifdef SWIGPYTHON
319 %include "file.i"
320 #else
321 %fragment("SWIG_AsValFilePtr","header") {}
322 #endif
323
324
325 %fragment("SWIG_AsValSolvFpPtr","header", fragment="SWIG_AsValFilePtr") {
326
327 SWIGINTERN int
328 #ifdef SWIGRUBY
329 SWIG_AsValSolvFpPtr(VALUE obj, FILE **val) {
330 #else
331 SWIG_AsValSolvFpPtr(void *obj, FILE **val) {
332 #endif
333   static swig_type_info* desc = 0;
334   void *vptr = 0;
335   int ecode;
336
337   if (!desc) desc = SWIG_TypeQuery("SolvFp *");
338   if ((SWIG_ConvertPtr(obj, &vptr, desc, 0)) == SWIG_OK) {
339     if (val)
340       *val = vptr ? ((SolvFp *)vptr)->fp : 0;
341     return SWIG_OK;
342   }
343 #ifdef SWIGPYTHON
344   ecode = SWIG_AsValFilePtr(obj, val);
345   if (ecode == SWIG_OK)
346     return ecode;
347 #endif
348   return SWIG_TypeError;
349 }
350
351 }
352
353
354 %fragment("SWIG_AsValDepId","header") {
355
356 SWIGINTERN int
357 #ifdef SWIGRUBY
358 SWIG_AsValDepId(VALUE obj, int *val) {
359 #else
360 SWIG_AsValDepId(void *obj, int *val) {
361 #endif
362   static swig_type_info* desc = 0;
363   void *vptr = 0;
364   int ecode;
365   if (!desc) desc = SWIG_TypeQuery("Dep *");
366   ecode = SWIG_AsVal_int(obj, val);
367   if (SWIG_IsOK(ecode))
368     return ecode;
369   if ((SWIG_ConvertPtr(obj, &vptr, desc, 0)) == SWIG_OK) {
370     if (val)
371       *val = vptr ? ((Dep *)vptr)->id : 0;
372     return SWIG_OK;
373   }
374   return SWIG_TypeError;
375 }
376
377 }
378
379
380
381 %include "typemaps.i"
382
383 %typemap(in,numinputs=0,noblock=1) XRule **OUTPUT ($*1_ltype temp) {
384   $1 = &temp;
385 }
386 %typemap(argout,noblock=1) XRule **OUTPUT {
387   %append_output(SWIG_NewPointerObj((void*)(*$1), SWIGTYPE_p_XRule, SWIG_POINTER_OWN | %newpointer_flags));
388 }
389
390 %typemaps_asval(%checkcode(POINTER), SWIG_AsValSolvFpPtr, "SWIG_AsValSolvFpPtr", FILE*);
391 %typemaps_asval(%checkcode(INT32), SWIG_AsValDepId, "SWIG_AsValDepId", DepId);
392
393
394 %{
395 #include <stdbool.h>
396 #include <stdio.h>
397 #include <sys/stat.h>
398 #include <sys/utsname.h>
399 #include <sys/types.h>
400 #include <unistd.h>
401
402 /* argh, swig undefs bool for perl */
403 #ifndef bool
404 typedef int bool;
405 #endif
406
407 #include "pool.h"
408 #include "poolarch.h"
409 #include "solver.h"
410 #include "policy.h"
411 #include "solverdebug.h"
412 #include "repo_solv.h"
413 #include "chksum.h"
414 #include "selection.h"
415
416 #include "repo_write.h"
417 #ifdef ENABLE_RPMDB
418 #include "repo_rpmdb.h"
419 #endif
420 #ifdef ENABLE_PUBKEY
421 #include "repo_pubkey.h"
422 #endif
423 #ifdef ENABLE_DEBIAN
424 #include "repo_deb.h"
425 #endif
426 #ifdef ENABLE_RPMMD
427 #include "repo_rpmmd.h"
428 #include "repo_updateinfoxml.h"
429 #include "repo_deltainfoxml.h"
430 #include "repo_repomdxml.h"
431 #endif
432 #ifdef ENABLE_SUSEREPO
433 #include "repo_products.h"
434 #include "repo_susetags.h"
435 #include "repo_content.h"
436 #endif
437 #ifdef ENABLE_MDKREPO
438 #include "repo_mdk.h"
439 #endif
440 #ifdef ENABLE_ARCHREPO
441 #include "repo_arch.h"
442 #endif
443 #include "solv_xfopen.h"
444
445 /* for old ruby versions */
446 #ifndef RARRAY_PTR
447 #define RARRAY_PTR(ary) (RARRAY(ary)->ptr)
448 #endif
449 #ifndef RARRAY_LEN
450 #define RARRAY_LEN(ary) (RARRAY(ary)->len)
451 #endif
452
453 #define SOLVER_SOLUTION_ERASE                   -100
454 #define SOLVER_SOLUTION_REPLACE                 -101
455 #define SOLVER_SOLUTION_REPLACE_DOWNGRADE       -102
456 #define SOLVER_SOLUTION_REPLACE_ARCHCHANGE      -103
457 #define SOLVER_SOLUTION_REPLACE_VENDORCHANGE    -104
458 #define SOLVER_SOLUTION_REPLACE_NAMECHANGE      -105
459
460 typedef void *AppObjectPtr;
461 typedef Id DepId;
462
463 typedef struct {
464   Pool *pool;
465   Id id;
466 } Dep;
467
468 typedef struct {
469   Pool *pool;
470   Id id;
471 } XSolvable;
472
473 typedef struct {
474   Solver *solv;
475   Id id;
476 } XRule;
477
478 typedef struct {
479   Repo *repo;
480   Id id;
481 } XRepodata;
482
483 typedef struct {
484   Pool *pool;
485   Id id;
486 } Pool_solvable_iterator;
487
488 typedef struct {
489   Pool *pool;
490   Id id;
491 } Pool_repo_iterator;
492
493 typedef struct {
494   Repo *repo;
495   Id id;
496 } Repo_solvable_iterator;
497
498 typedef struct {
499   Pool *pool;
500   int how;
501   Id what;
502 } Job;
503
504 typedef struct {
505   Solver *solv;
506   Id id;
507 } Problem;
508
509 typedef struct {
510   Solver *solv;
511   Id problemid;
512   Id id;
513 } Solution;
514
515 typedef struct {
516   Solver *solv;
517   Id problemid;
518   Id solutionid;
519   Id id;
520
521   Id type;
522   Id p;
523   Id rp;
524 } Solutionelement;
525
526 typedef struct {
527   Solver *solv;
528   Id rid;
529   Id type;
530   Id source;
531   Id target;
532   Id dep_id;
533 } Ruleinfo;
534
535 typedef struct {
536   Transaction *transaction;
537   int mode;
538   Id type;
539   int count;
540   Id fromid;
541   Id toid;
542 } TransactionClass;
543
544 typedef struct {
545   Pool *pool;
546   Queue q;
547   int flags;
548 } Selection;
549
550 typedef struct {
551   FILE *fp;
552 } SolvFp;
553
554 typedef Dataiterator Datamatch;
555
556 %}
557
558 #ifdef SWIGRUBY
559 %mixin Dataiterator "Enumerable";
560 %mixin Pool_solvable_iterator "Enumerable";
561 %mixin Pool_repo_iterator "Enumerable";
562 %mixin Repo_solvable_iterator "Enumerable";
563 #endif
564
565 typedef int Id;
566
567 %include "knownid.h"
568
569 # from repodata.h
570 %constant Id SOLVID_META;
571 %constant Id SOLVID_POS;
572
573 %constant int REL_EQ;
574 %constant int REL_GT;
575 %constant int REL_LT;
576 %constant int REL_ARCH;
577
578 typedef struct {
579   Pool* const pool;
580 } Selection;
581
582 typedef struct {
583   Pool* const pool;
584   Id const id;
585 } Dep;
586
587 # put before pool/repo so we can access the constructor
588 %nodefaultdtor Dataiterator;
589 typedef struct {} Dataiterator;
590
591 typedef struct {
592   Pool* const pool;
593   Id const id;
594 } XSolvable;
595
596 typedef struct {
597   Solver* const solv;
598   Id const type;
599   Id const dep_id;
600 } Ruleinfo;
601
602 typedef struct {
603   Solver* const solv;
604   Id const id;
605 } XRule;
606
607 typedef struct {
608   Repo* const repo;
609   Id const id;
610 } XRepodata;
611
612 typedef struct {} Pool_solvable_iterator;
613 typedef struct {} Pool_repo_iterator;
614 typedef struct {} Repo_solvable_iterator;
615
616 %nodefaultctor Datamatch;
617 %nodefaultdtor Datamatch;
618 typedef struct {
619   Pool * const pool;
620   Repo * const repo;
621   Id const solvid;
622 } Datamatch;
623
624 %nodefaultctor Datapos;
625 typedef struct {
626   Repo * const repo;
627 } Datapos;
628
629 typedef struct {
630   Pool * const pool;
631   int how;
632   Id what;
633 } Job;
634
635 %nodefaultctor Pool;
636 %nodefaultdtor Pool;
637 typedef struct {
638   AppObjectPtr appdata;
639 } Pool;
640
641 %nodefaultctor Repo;
642 %nodefaultdtor Repo;
643 typedef struct {
644   Pool * const pool;
645   const char * const name;
646   int priority;
647   int subpriority;
648   int const nsolvables;
649   AppObjectPtr appdata;
650 } Repo;
651
652 %nodefaultctor Solver;
653 %nodefaultdtor Solver;
654 typedef struct {
655   Pool * const pool;
656 } Solver;
657
658 typedef struct {
659 } Chksum;
660
661 #ifdef ENABLE_PUBKEY
662 typedef struct {
663   Id const htype;
664   unsigned int const created;
665   unsigned int const expires;
666   const char * const keyid;
667 } Solvsig;
668 #endif
669
670 %rename(xfopen) solvfp_xfopen;
671 %rename(xfopen_fd) solvfp_xfopen_fd;
672
673 %nodefaultctor SolvFp;
674 typedef struct {
675 } SolvFp;
676
677 %newobject solvfp_xfopen;
678 %newobject solvfp_xfopen_fd;
679
680 SolvFp *solvfp_xfopen(const char *fn, const char *mode = 0);
681 SolvFp *solvfp_xfopen_fd(const char *fn, int fd, const char *mode = 0);
682
683 %{
684   SWIGINTERN SolvFp *solvfp_xfopen_fd(const char *fn, int fd, const char *mode) {
685     SolvFp *sfp;
686     FILE *fp;
687     fd = dup(fd);
688     fp = fd == -1 ? 0 : solv_xfopen_fd(fn, fd, mode);
689     if (!fp)
690       return 0;
691     sfp = solv_calloc(1, sizeof(SolvFp));
692     sfp->fp = fp;
693     return sfp;
694   }
695   SWIGINTERN SolvFp *solvfp_xfopen(const char *fn, const char *mode) {
696     SolvFp *sfp;
697     FILE *fp;
698     fp = solv_xfopen(fn, mode);
699     if (!fp)
700       return 0;
701     sfp = solv_calloc(1, sizeof(SolvFp));
702     sfp->fp = fp;
703     return sfp;
704   }
705 %}
706
707 typedef struct {
708   Solver * const solv;
709   Id const id;
710 } Problem;
711
712 typedef struct {
713   Solver * const solv;
714   Id const problemid;
715   Id const id;
716 } Solution;
717
718 typedef struct {
719   Solver *const solv;
720   Id const problemid;
721   Id const solutionid;
722   Id const id;
723   Id const type;
724 } Solutionelement;
725
726 %nodefaultctor Transaction;
727 %nodefaultdtor Transaction;
728 typedef struct {
729   Pool * const pool;
730 } Transaction;
731
732 typedef struct {
733   Transaction * const transaction;
734   Id const type;
735   Id const fromid;
736   Id const toid;
737   int const count;
738 } TransactionClass;
739
740 %extend SolvFp {
741   ~SolvFp() {
742     if ($self->fp)
743       fclose($self->fp);
744     free($self);
745   }
746   int fileno() {
747     return $self->fp ? fileno($self->fp) : -1;
748   }
749   int dup() {
750     return $self->fp ? dup(fileno($self->fp)) : -1;
751   }
752   bool flush() {
753     if (!$self->fp)
754       return 1;
755     return fflush($self->fp) == 0;
756   }
757   bool close() {
758     bool ret;
759     if (!$self->fp)
760       return 1;
761     ret = fclose($self->fp) == 0;
762     $self->fp = 0;
763     return ret;
764   }
765 }
766
767 %extend Job {
768   static const Id SOLVER_SOLVABLE = SOLVER_SOLVABLE;
769   static const Id SOLVER_SOLVABLE_NAME = SOLVER_SOLVABLE_NAME;
770   static const Id SOLVER_SOLVABLE_PROVIDES = SOLVER_SOLVABLE_PROVIDES;
771   static const Id SOLVER_SOLVABLE_ONE_OF = SOLVER_SOLVABLE_ONE_OF;
772   static const Id SOLVER_SOLVABLE_REPO = SOLVER_SOLVABLE_REPO;
773   static const Id SOLVER_SOLVABLE_ALL = SOLVER_SOLVABLE_ALL;
774   static const Id SOLVER_SELECTMASK = SOLVER_SELECTMASK;
775   static const Id SOLVER_NOOP = SOLVER_NOOP;
776   static const Id SOLVER_INSTALL = SOLVER_INSTALL;
777   static const Id SOLVER_ERASE = SOLVER_ERASE;
778   static const Id SOLVER_UPDATE = SOLVER_UPDATE;
779   static const Id SOLVER_WEAKENDEPS = SOLVER_WEAKENDEPS;
780   static const Id SOLVER_MULTIVERSION = SOLVER_MULTIVERSION;
781   static const Id SOLVER_LOCK = SOLVER_LOCK;
782   static const Id SOLVER_DISTUPGRADE = SOLVER_DISTUPGRADE;
783   static const Id SOLVER_VERIFY = SOLVER_VERIFY;
784   static const Id SOLVER_DROP_ORPHANED = SOLVER_DROP_ORPHANED;
785   static const Id SOLVER_USERINSTALLED = SOLVER_USERINSTALLED;
786   static const Id SOLVER_JOBMASK = SOLVER_JOBMASK;
787   static const Id SOLVER_WEAK = SOLVER_WEAK;
788   static const Id SOLVER_ESSENTIAL = SOLVER_ESSENTIAL;
789   static const Id SOLVER_CLEANDEPS = SOLVER_CLEANDEPS;
790   static const Id SOLVER_FORCEBEST = SOLVER_FORCEBEST;
791   static const Id SOLVER_TARGETED = SOLVER_TARGETED;
792   static const Id SOLVER_SETEV = SOLVER_SETEV;
793   static const Id SOLVER_SETEVR = SOLVER_SETEVR;
794   static const Id SOLVER_SETARCH = SOLVER_SETARCH;
795   static const Id SOLVER_SETVENDOR = SOLVER_SETVENDOR;
796   static const Id SOLVER_SETREPO = SOLVER_SETREPO;
797   static const Id SOLVER_SETNAME = SOLVER_SETNAME;
798   static const Id SOLVER_NOAUTOSET = SOLVER_NOAUTOSET;
799   static const Id SOLVER_SETMASK = SOLVER_SETMASK;
800
801   Job(Pool *pool, int how, Id what) {
802     Job *job = solv_calloc(1, sizeof(*job));
803     job->pool = pool;
804     job->how = how;
805     job->what = what;
806     return job;
807   }
808
809   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
810   %newobject solvables;
811   Queue solvables() {
812     Queue q;
813     queue_init(&q);
814     pool_job2solvables($self->pool, &q, $self->how, $self->what);
815     return q;
816   }
817 #ifdef SWIGRUBY
818   %rename("isemptyupdate?") isemptyupdate;
819 #endif
820   bool isemptyupdate() {
821     return pool_isemptyupdatejob($self->pool, $self->how, $self->what);
822   }
823
824   bool __eq__(Job *j) {
825     return $self->pool == j->pool && $self->how == j->how && $self->what == j->what;
826   }
827   bool __ne__(Job *j) {
828     return !Job___eq__($self, j);
829   }
830 #if defined(SWIGPERL)
831   %rename("str") __str__;
832 #endif
833   const char *__str__() {
834     return pool_job2str($self->pool, $self->how, $self->what, 0);
835   }
836   const char *__repr__() {
837     const char *str = pool_job2str($self->pool, $self->how, $self->what, ~0);
838     return pool_tmpjoin($self->pool, "<Job ", str, ">");
839   }
840 }
841
842 %extend Selection {
843   static const Id SELECTION_NAME = SELECTION_NAME;
844   static const Id SELECTION_PROVIDES = SELECTION_PROVIDES;
845   static const Id SELECTION_FILELIST = SELECTION_FILELIST;
846   static const Id SELECTION_CANON = SELECTION_CANON;
847   static const Id SELECTION_DOTARCH = SELECTION_DOTARCH;
848   static const Id SELECTION_REL = SELECTION_REL;
849   static const Id SELECTION_INSTALLED_ONLY = SELECTION_INSTALLED_ONLY;
850   static const Id SELECTION_GLOB = SELECTION_GLOB;
851   static const Id SELECTION_FLAT = SELECTION_FLAT;
852   static const Id SELECTION_NOCASE = SELECTION_NOCASE;
853   static const Id SELECTION_SOURCE_ONLY = SELECTION_SOURCE_ONLY;
854   static const Id SELECTION_WITH_SOURCE = SELECTION_WITH_SOURCE;
855
856   Selection(Pool *pool) {
857     Selection *s;
858     s = solv_calloc(1, sizeof(*s));
859     s->pool = pool;
860     return s;
861   }
862
863   ~Selection() {
864     queue_free(&$self->q);
865     solv_free($self);
866   }
867   int flags() {
868     return $self->flags;
869   }
870 #ifdef SWIGRUBY
871   %rename("isempty?") isempty;
872 #endif
873   bool isempty() {
874     return $self->q.count == 0;
875   }
876   void filter(Selection *lsel) {
877     if ($self->pool != lsel->pool)
878       queue_empty(&$self->q);
879     else
880       selection_filter($self->pool, &$self->q, &lsel->q);
881   }
882   void add(Selection *lsel) {
883     if ($self->pool == lsel->pool)
884       {
885         selection_add($self->pool, &$self->q, &lsel->q);
886         $self->flags |= lsel->flags;
887       }
888   }
889   void add_raw(Id how, Id what) {
890     queue_push2(&$self->q, how, what);
891   }
892   %typemap(out) Queue jobs Queue2Array(Job *, 2, new_Job(arg1->pool, id, idp[1]));
893   %newobject jobs;
894   Queue jobs(int flags) {
895     Queue q;
896     int i;
897     queue_init_clone(&q, &$self->q);
898     for (i = 0; i < q.count; i += 2)
899       q.elements[i] |= flags;
900     return q;
901   }
902
903   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
904   %newobject solvables;
905   Queue solvables() {
906     Queue q;
907     queue_init(&q);
908     selection_solvables($self->pool, &$self->q, &q);
909     return q;
910   }
911
912 #if defined(SWIGPERL)
913   %rename("str") __str__;
914 #endif
915   const char *__str__() {
916     return pool_selection2str($self->pool, &$self->q, 0);
917   }
918   const char *__repr__() {
919     const char *str = pool_selection2str($self->pool, &$self->q, ~0);
920     return pool_tmpjoin($self->pool, "<Selection ", str, ">");
921   }
922 }
923
924 %extend Chksum {
925   Chksum(Id type) {
926     return solv_chksum_create(type);
927   }
928   Chksum(Id type, const char *hex) {
929     unsigned char buf[64];
930     int l = solv_chksum_len(type);
931     if (!l)
932       return 0;
933     if (solv_hex2bin(&hex, buf, sizeof(buf)) != l || hex[0])
934       return 0;
935     return solv_chksum_create_from_bin(type, buf);
936   }
937   ~Chksum() {
938     solv_chksum_free($self, 0);
939   }
940   Id const type;
941   %{
942   SWIGINTERN Id Chksum_type_get(Chksum *chk) {
943     return solv_chksum_get_type(chk);
944   }
945   %}
946   void add(const char *str) {
947     solv_chksum_add($self, str, strlen((char *)str));
948   }
949   void add_fp(FILE *fp) {
950     char buf[4096];
951     int l;
952     while ((l = fread(buf, 1, sizeof(buf), fp)) > 0)
953       solv_chksum_add($self, buf, l);
954     rewind(fp);         /* convenience */
955   }
956   void add_fd(int fd) {
957     char buf[4096];
958     int l;
959     while ((l = read(fd, buf, sizeof(buf))) > 0)
960       solv_chksum_add($self, buf, l);
961     lseek(fd, 0, 0);    /* convenience */
962   }
963   void add_stat(const char *filename) {
964     struct stat stb;
965     if (stat(filename, &stb))
966       memset(&stb, 0, sizeof(stb));
967     solv_chksum_add($self, &stb.st_dev, sizeof(stb.st_dev));
968     solv_chksum_add($self, &stb.st_ino, sizeof(stb.st_ino));
969     solv_chksum_add($self, &stb.st_size, sizeof(stb.st_size));
970     solv_chksum_add($self, &stb.st_mtime, sizeof(stb.st_mtime));
971   }
972   void add_fstat(int fd) {
973     struct stat stb;
974     if (fstat(fd, &stb))
975       memset(&stb, 0, sizeof(stb));
976     solv_chksum_add($self, &stb.st_dev, sizeof(stb.st_dev));
977     solv_chksum_add($self, &stb.st_ino, sizeof(stb.st_ino));
978     solv_chksum_add($self, &stb.st_size, sizeof(stb.st_size));
979     solv_chksum_add($self, &stb.st_mtime, sizeof(stb.st_mtime));
980   }
981   SWIGCDATA raw() {
982     int l;
983     const unsigned char *b;
984     b = solv_chksum_get($self, &l);
985     return cdata_void((void *)b, l);
986   }
987   %newobject hex;
988   char *hex() {
989     int l;
990     const unsigned char *b;
991     char *ret;
992
993     b = solv_chksum_get($self, &l);
994     ret = solv_malloc(2 * l + 1);
995     solv_bin2hex(b, l, ret);
996     return ret;
997   }
998
999   bool __eq__(Chksum *chk) {
1000     int l;
1001     const unsigned char *b, *bo;
1002     if (!chk)
1003       return 0;
1004     if (solv_chksum_get_type($self) != solv_chksum_get_type(chk))
1005       return 0;
1006     b = solv_chksum_get($self, &l);
1007     bo = solv_chksum_get(chk, 0);
1008     return memcmp(b, bo, l) == 0;
1009   }
1010   bool __ne__(Chksum *chk) {
1011     return !Chksum___eq__($self, chk);
1012   }
1013 #if defined(SWIGRUBY)
1014   %rename("to_s") __str__;
1015 #endif
1016 #if defined(SWIGPERL)
1017   %rename("str") __str__;
1018 #endif
1019   %newobject __str__;
1020   const char *__str__() {
1021     const char *str;
1022     const char *h = 0;
1023     if (solv_chksum_isfinished($self))
1024       h = Chksum_hex($self);
1025     str = solv_dupjoin(solv_chksum_type2str(solv_chksum_get_type($self)), ":", h ? h : "unfinished");
1026     solv_free((void *)h);
1027     return str;
1028   }
1029   %newobject __repr__;
1030   const char *__repr__() {
1031     const char *h = Chksum___str__($self);
1032     const char *str = solv_dupjoin("<Chksum ", h, ">");
1033     solv_free((void *)h);
1034     return str;
1035   }
1036 }
1037
1038 %extend Pool {
1039   static const int POOL_FLAG_PROMOTEEPOCH = POOL_FLAG_PROMOTEEPOCH;
1040   static const int POOL_FLAG_FORBIDSELFCONFLICTS = POOL_FLAG_FORBIDSELFCONFLICTS;
1041   static const int POOL_FLAG_OBSOLETEUSESPROVIDES = POOL_FLAG_OBSOLETEUSESPROVIDES;
1042   static const int POOL_FLAG_IMPLICITOBSOLETEUSESPROVIDES = POOL_FLAG_IMPLICITOBSOLETEUSESPROVIDES;
1043   static const int POOL_FLAG_OBSOLETEUSESCOLORS = POOL_FLAG_OBSOLETEUSESCOLORS;
1044   static const int POOL_FLAG_IMPLICITOBSOLETEUSESCOLORS = POOL_FLAG_IMPLICITOBSOLETEUSESCOLORS;
1045   static const int POOL_FLAG_NOINSTALLEDOBSOLETES = POOL_FLAG_NOINSTALLEDOBSOLETES;
1046   static const int POOL_FLAG_HAVEDISTEPOCH = POOL_FLAG_HAVEDISTEPOCH;
1047   static const int POOL_FLAG_NOOBSOLETESMULTIVERSION = POOL_FLAG_NOOBSOLETESMULTIVERSION;
1048
1049   Pool() {
1050     Pool *pool = pool_create();
1051     return pool;
1052   }
1053   ~Pool() {
1054   }
1055   void set_debuglevel(int level) {
1056     pool_setdebuglevel($self, level);
1057   }
1058   int set_flag(int flag, int value) {
1059     return pool_set_flag($self, flag, value);
1060   }
1061   int get_flag(int flag) {
1062     return pool_get_flag($self, flag);
1063   }
1064   void set_rootdir(const char *rootdir) {
1065     pool_set_rootdir($self, rootdir);
1066   }
1067   const char *get_rootdir(int flag) {
1068     return pool_get_rootdir($self);
1069   }
1070 #if defined(SWIGPYTHON)
1071   %{
1072   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
1073     XRepodata *xd = new_XRepodata(data->repo, data->repodataid);
1074     PyObject *args = Py_BuildValue("(O)", SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_POINTER_OWN | 0));
1075     PyObject *result = PyEval_CallObject((PyObject *)d, args);
1076     int ecode = 0;
1077     int vresult = 0;
1078     Py_DECREF(args);
1079     if (!result)
1080       return 0; /* exception */
1081     ecode = SWIG_AsVal_int(result, &vresult);
1082     Py_DECREF(result);
1083     return SWIG_IsOK(ecode) ? vresult : 0;
1084   }
1085   %}
1086   void set_loadcallback(PyObject *callable) {
1087     if ($self->loadcallback == loadcallback) {
1088       PyObject *obj = $self->loadcallbackdata;
1089       Py_DECREF(obj);
1090     }
1091     if (callable) {
1092       Py_INCREF(callable);
1093     }
1094     pool_setloadcallback($self, callable ? loadcallback : 0, callable);
1095   }
1096 #endif
1097 #if defined(SWIGPERL)
1098 %{
1099   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
1100     int count;
1101     int ret = 0;
1102     dSP;
1103     XRepodata *xd = new_XRepodata(data->repo, data->repodataid);
1104
1105     ENTER;
1106     SAVETMPS;
1107     PUSHMARK(SP);
1108     XPUSHs(SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_OWNER | SWIG_SHADOW));
1109     PUTBACK;
1110     count = perl_call_sv((SV *)d, G_EVAL|G_SCALAR);
1111     SPAGAIN;
1112     if (count)
1113       ret = POPi;
1114     PUTBACK;
1115     FREETMPS;
1116     LEAVE;
1117     return ret;
1118   }
1119 %}
1120   void set_loadcallback(SV *callable) {
1121     if ($self->loadcallback == loadcallback)
1122       SvREFCNT_dec($self->loadcallbackdata);
1123     if (callable)
1124       SvREFCNT_inc(callable);
1125     pool_setloadcallback($self, callable ? loadcallback : 0, callable);
1126   }
1127 #endif
1128
1129 #if defined(SWIGRUBY)
1130 %{
1131   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
1132     XRepodata *xd = new_XRepodata(data->repo, data->repodataid);
1133     VALUE callable = (VALUE)d;
1134     VALUE rd = SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_POINTER_OWN | 0);
1135     VALUE res = rb_funcall(callable, rb_intern("call"), 1, rd);
1136     return res == Qtrue;
1137   }
1138   SWIGINTERN void mark_Pool(void *ptr) {
1139     Pool *pool = ptr;
1140     if (pool->loadcallback == loadcallback && pool->loadcallbackdata) {
1141       VALUE callable = (VALUE)pool->loadcallbackdata;
1142       rb_gc_mark(callable);
1143     }
1144   }
1145 %}
1146   %typemap(in, numinputs=0) VALUE callable {
1147     $1 = rb_block_given_p() ? rb_block_proc() : 0;
1148   }
1149   void set_loadcallback(VALUE callable) {
1150     pool_setloadcallback($self, callable ? loadcallback : 0, (void *)callable);
1151   }
1152 #endif
1153
1154   void free() {
1155     Pool_set_loadcallback($self, 0);
1156     pool_free($self);
1157   }
1158   Id str2id(const char *str, bool create=1) {
1159     return pool_str2id($self, str, create);
1160   }
1161   %newobject Dep;
1162   Dep *Dep(const char *str, bool create=1) {
1163     Id id = pool_str2id($self, str, create);
1164     return new_Dep($self, id);
1165   }
1166   const char *id2str(Id id) {
1167     return pool_id2str($self, id);
1168   }
1169   const char *dep2str(Id id) {
1170     return pool_dep2str($self, id);
1171   }
1172   Id rel2id(Id name, Id evr, int flags, bool create=1) {
1173     return pool_rel2id($self, name, evr, flags, create);
1174   }
1175   Id id2langid(Id id, const char *lang, bool create=1) {
1176     return pool_id2langid($self, id, lang, create);
1177   }
1178   void setarch(const char *arch = 0) {
1179     struct utsname un;
1180     if (!arch) {
1181       if (uname(&un)) {
1182         perror("uname");
1183         return;
1184       }
1185       arch = un.machine;
1186     }
1187     pool_setarch($self, arch);
1188   }
1189   Repo *add_repo(const char *name) {
1190     return repo_create($self, name);
1191   }
1192   const char *lookup_str(Id entry, Id keyname) {
1193     return pool_lookup_str($self, entry, keyname);
1194   }
1195   Id lookup_id(Id entry, Id keyname) {
1196     return pool_lookup_id($self, entry, keyname);
1197   }
1198   unsigned long long lookup_num(Id entry, Id keyname, unsigned long long notfound = 0) {
1199     return pool_lookup_num($self, entry, keyname, notfound);
1200   }
1201   bool lookup_void(Id entry, Id keyname) {
1202     return pool_lookup_void($self, entry, keyname);
1203   }
1204   %newobject lookup_checksum;
1205   Chksum *lookup_checksum(Id entry, Id keyname) {
1206     Id type = 0;
1207     const unsigned char *b = pool_lookup_bin_checksum($self, entry, keyname, &type);
1208     return solv_chksum_create_from_bin(type, b);
1209   }
1210
1211   %newobject Dataiterator;
1212   Dataiterator *Dataiterator(Id p, Id key, const char *match, int flags) {
1213     return new_Dataiterator($self, 0, p, key, match, flags);
1214   }
1215   const char *solvid2str(Id solvid) {
1216     return pool_solvid2str($self, solvid);
1217   }
1218   void addfileprovides() {
1219     pool_addfileprovides($self);
1220   }
1221   Queue addfileprovides_queue() {
1222     Queue r;
1223     queue_init(&r);
1224     pool_addfileprovides_queue($self, &r, 0);
1225     return r;
1226   }
1227   void createwhatprovides() {
1228     pool_createwhatprovides($self);
1229   }
1230
1231   %newobject id2solvable;
1232   XSolvable *id2solvable(Id id) {
1233     return new_XSolvable($self, id);
1234   }
1235   %newobject solvables;
1236   Pool_solvable_iterator * const solvables;
1237   %{
1238   SWIGINTERN Pool_solvable_iterator * Pool_solvables_get(Pool *pool) {
1239     return new_Pool_solvable_iterator(pool);
1240   }
1241   %}
1242   %newobject solvables_iter;
1243   Pool_solvable_iterator * solvables_iter() {
1244     return new_Pool_solvable_iterator($self);
1245   }
1246
1247   Repo *id2repo(Id id) {
1248     if (id < 1 || id >= $self->nrepos)
1249       return 0;
1250     return pool_id2repo($self, id);
1251   }
1252
1253   %newobject repos;
1254   Pool_repo_iterator * const repos;
1255   %{
1256   SWIGINTERN Pool_repo_iterator * Pool_repos_get(Pool *pool) {
1257     return new_Pool_repo_iterator(pool);
1258   }
1259   %}
1260   %newobject repos_iter;
1261   Pool_repo_iterator * repos_iter() {
1262     return new_Pool_repo_iterator($self);
1263   }
1264
1265   Repo *installed;
1266   const char * const errstr;
1267   %{
1268   SWIGINTERN void Pool_installed_set(Pool *pool, Repo *installed) {
1269     pool_set_installed(pool, installed);
1270   }
1271   Repo *Pool_installed_get(Pool *pool) {
1272     return pool->installed;
1273   }
1274   const char *Pool_errstr_get(Pool *pool) {
1275     return pool_errstr(pool);
1276   }
1277   %}
1278
1279   Queue matchprovidingids(const char *match, int flags) {
1280     Pool *pool = $self;
1281     Queue q;
1282     Id id;
1283     queue_init(&q);
1284     if (!flags) {
1285       for (id = 1; id < pool->ss.nstrings; id++)
1286         if (pool->whatprovides[id])
1287           queue_push(&q, id);
1288     } else {
1289       Datamatcher ma;
1290       if (!datamatcher_init(&ma, match, flags)) {
1291         for (id = 1; id < pool->ss.nstrings; id++)
1292           if (pool->whatprovides[id] && datamatcher_match(&ma, pool_id2str(pool, id)))
1293             queue_push(&q, id);
1294         datamatcher_free(&ma);
1295       }
1296     }
1297     return q;
1298   }
1299
1300   %newobject Job;
1301   Job *Job(int how, Id what) {
1302     return new_Job($self, how, what);
1303   }
1304
1305   %typemap(out) Queue whatprovides Queue2Array(XSolvable *, 1, new_XSolvable(arg1, id));
1306   %newobject whatprovides;
1307   Queue whatprovides(DepId dep) {
1308     Pool *pool = $self;
1309     Queue q;
1310     Id p, pp;
1311     queue_init(&q);
1312     FOR_PROVIDES(p, pp, dep)
1313       queue_push(&q, p);
1314     return q;
1315   }
1316
1317   Id towhatprovides(Queue q) {
1318     return pool_queuetowhatprovides($self, &q);
1319   }
1320
1321 #ifdef SWIGRUBY
1322   %rename("isknownarch?") isknownarch;
1323 #endif
1324   bool isknownarch(DepId id) {
1325     Pool *pool = $self;
1326     if (!id || id == ID_EMPTY)
1327       return 0;
1328     if (id == ARCH_SRC || id == ARCH_NOSRC || id == ARCH_NOARCH)
1329       return 1;
1330     if (pool->id2arch && (id > pool->lastarch || !pool->id2arch[id]))
1331       return 0;
1332     return 1;
1333   }
1334
1335   %newobject Solver;
1336   Solver *Solver() {
1337     return solver_create($self);
1338   }
1339
1340   %newobject Selection;
1341   Selection *Selection() {
1342     return new_Selection($self);
1343   }
1344   %newobject Selection_all;
1345   Selection *Selection_all(int setflags=0) {
1346     Selection *sel = new_Selection($self);
1347     queue_push2(&sel->q, SOLVER_SOLVABLE_ALL | setflags, 0);
1348     return sel;
1349   }
1350   %newobject select;
1351   Selection *select(const char *name, int flags) {
1352     Selection *sel = new_Selection($self);
1353     sel->flags = selection_make($self, &sel->q, name, flags);
1354     return sel;
1355   }
1356
1357   void setpooljobs_helper(Queue jobs) {
1358     queue_free(&$self->pooljobs);
1359     queue_init_clone(&$self->pooljobs, &jobs);
1360   }
1361   %typemap(out) Queue getpooljobs Queue2Array(Job *, 2, new_Job(arg1, id, idp[1]));
1362   %newobject getpooljobs;
1363   Queue getpooljobs() {
1364     Queue q;
1365     queue_init_clone(&q, &$self->pooljobs);
1366     return q;
1367   }
1368
1369 #if defined(SWIGPYTHON)
1370   %pythoncode {
1371     def setpooljobs(self, jobs):
1372       j = []
1373       for job in jobs: j += [job.how, job.what]
1374       self.setpooljobs_helper(j)
1375   }
1376 #endif
1377 #if defined(SWIGPERL)
1378   %perlcode {
1379     sub solv::Solver::setpooljobs {
1380       my ($self, $jobs) = @_;
1381       my @j = map {($_->{'how'}, $_->{'what'})} @$jobs;
1382       return $self->setpooljobs_helper(\@j);
1383     }
1384   }
1385 #endif
1386 #if defined(SWIGRUBY)
1387 %init %{
1388 rb_eval_string(
1389     "class Solv::Pool\n"
1390     "  def setpooljobs(jobs)\n"
1391     "    jl = []\n"
1392     "    jobs.each do |j| ; jl << j.how << j.what ; end\n"
1393     "    setpooljobs_helper(jl)\n"
1394     "  end\n"
1395     "end\n"
1396   );
1397 %}
1398 #endif
1399 }
1400
1401 %extend Repo {
1402   static const int REPO_REUSE_REPODATA = REPO_REUSE_REPODATA;
1403   static const int REPO_NO_INTERNALIZE = REPO_NO_INTERNALIZE;
1404   static const int REPO_LOCALPOOL = REPO_LOCALPOOL;
1405   static const int REPO_USE_LOADING = REPO_USE_LOADING;
1406   static const int REPO_EXTEND_SOLVABLES = REPO_EXTEND_SOLVABLES;
1407   static const int REPO_USE_ROOTDIR = REPO_USE_ROOTDIR;
1408   static const int REPO_NO_LOCATION = REPO_NO_LOCATION;
1409   static const int SOLV_ADD_NO_STUBS = SOLV_ADD_NO_STUBS;       /* repo_solv */
1410 #ifdef ENABLE_SUSEREPO
1411   static const int SUSETAGS_RECORD_SHARES = SUSETAGS_RECORD_SHARES;     /* repo_susetags */
1412 #endif
1413
1414   void free(bool reuseids = 0) {
1415     repo_free($self, reuseids);
1416   }
1417   void empty(bool reuseids = 0) {
1418     repo_empty($self, reuseids);
1419   }
1420 #ifdef SWIGRUBY
1421   %rename("isempty?") isempty;
1422 #endif
1423   bool isempty() {
1424     return !$self->nsolvables;
1425   }
1426   bool add_solv(const char *name, int flags = 0) {
1427     FILE *fp = fopen(name, "r");
1428     int r;
1429     if (!fp)
1430       return 0;
1431     r = repo_add_solv($self, fp, flags);
1432     fclose(fp);
1433     return r == 0;
1434   }
1435   bool add_solv(FILE *fp, int flags = 0) {
1436     return repo_add_solv($self, fp, flags) == 0;
1437   }
1438
1439   %newobject add_solvable;
1440   XSolvable *add_solvable() {
1441     Id solvid = repo_add_solvable($self);
1442     return new_XSolvable($self->pool, solvid);
1443   }
1444
1445 #ifdef ENABLE_RPMDB
1446   bool add_rpmdb(int flags = 0) {
1447     return repo_add_rpmdb($self, 0, flags) == 0;
1448   }
1449   bool add_rpmdb_reffp(FILE *reffp, int flags = 0) {
1450     return repo_add_rpmdb_reffp($self, reffp, flags) == 0;
1451   }
1452   %newobject add_rpm;
1453   XSolvable *add_rpm(const char *name, int flags = 0) {
1454     return new_XSolvable($self->pool, repo_add_rpm($self, name, flags));
1455   }
1456 #endif
1457 #ifdef ENABLE_PUBKEY
1458 #ifdef ENABLE_RPMDB
1459   bool add_rpmdb_pubkeys(int flags = 0) {
1460     return repo_add_rpmdb_pubkeys($self, flags) == 0;
1461   }
1462 #endif
1463   %newobject add_pubkey;
1464   XSolvable *add_pubkey(const char *keyfile, int flags = 0) {
1465     return new_XSolvable($self->pool, repo_add_pubkey($self, keyfile, flags));
1466   }
1467   bool add_keyring(FILE *fp, int flags = 0) {
1468     return repo_add_keyring($self, fp, flags);
1469   }
1470   bool add_keydir(const char *keydir, const char *suffix, int flags = 0) {
1471     return repo_add_keydir($self, keydir, suffix, flags);
1472   }
1473 #endif
1474 #ifdef ENABLE_RPMMD
1475   bool add_rpmmd(FILE *fp, const char *language, int flags = 0) {
1476     return repo_add_rpmmd($self, fp, language, flags) == 0;
1477   }
1478   bool add_repomdxml(FILE *fp, int flags = 0) {
1479     return repo_add_repomdxml($self, fp, flags) == 0;
1480   }
1481   bool add_updateinfoxml(FILE *fp, int flags = 0) {
1482     return repo_add_updateinfoxml($self, fp, flags) == 0;
1483   }
1484   bool add_deltainfoxml(FILE *fp, int flags = 0) {
1485     return repo_add_deltainfoxml($self, fp, flags) == 0;
1486   }
1487 #endif
1488 #ifdef ENABLE_DEBIAN
1489   bool add_debdb(int flags = 0) {
1490     return repo_add_debdb($self, flags) == 0;
1491   }
1492   bool add_debpackages(FILE *fp, int flags = 0) {
1493     return repo_add_debpackages($self, fp, flags) == 0;
1494   }
1495   %newobject add_deb;
1496   XSolvable *add_deb(const char *name, int flags = 0) {
1497     return new_XSolvable($self->pool, repo_add_deb($self, name, flags));
1498   }
1499 #endif
1500 #ifdef ENABLE_SUSEREPO
1501   bool add_susetags(FILE *fp, Id defvendor, const char *language, int flags = 0) {
1502     return repo_add_susetags($self, fp, defvendor, language, flags) == 0;
1503   }
1504   bool add_content(FILE *fp, int flags = 0) {
1505     return repo_add_content($self, fp, flags) == 0;
1506   }
1507   bool add_products(const char *proddir, int flags = 0) {
1508     return repo_add_products($self, proddir, flags) == 0;
1509   }
1510 #endif
1511 #ifdef ENABLE_MDKREPO
1512   bool add_mdk(FILE *fp, int flags = 0) {
1513     return repo_add_mdk($self, fp, flags) == 0;
1514   }
1515   bool add_mdk_info(FILE *fp, int flags = 0) {
1516     return repo_add_mdk_info($self, fp, flags) == 0;
1517   }
1518 #endif
1519 #ifdef ENABLE_ARCHREPO
1520   bool add_arch_repo(FILE *fp, int flags = 0) {
1521     return repo_add_arch_repo($self, fp, flags) == 0;
1522   }
1523   bool add_arch_local(const char *dir, int flags = 0) {
1524     return repo_add_arch_local($self, dir, flags) == 0;
1525   }
1526   %newobject add_arch_pkg;
1527   XSolvable *add_arch_pkg(const char *name, int flags = 0) {
1528     return new_XSolvable($self->pool, repo_add_arch_pkg($self, name, flags));
1529   }
1530 #endif
1531   void internalize() {
1532     repo_internalize($self);
1533   }
1534   bool write(FILE *fp) {
1535     return repo_write($self, fp) == 0;
1536   }
1537   # HACK, remove if no longer needed!
1538   bool write_first_repodata(FILE *fp) {
1539     int oldnrepodata = $self->nrepodata;
1540     int res;
1541     $self->nrepodata = oldnrepodata > 2 ? 2 : oldnrepodata;
1542     res = repo_write($self, fp);
1543     $self->nrepodata = oldnrepodata;
1544     return res == 0;
1545   }
1546
1547   %newobject Dataiterator;
1548   Dataiterator *Dataiterator(Id p, Id key, const char *match, int flags) {
1549     return new_Dataiterator($self->pool, $self, p, key, match, flags);
1550   }
1551
1552   Id const id;
1553   %{
1554   SWIGINTERN Id Repo_id_get(Repo *repo) {
1555     return repo->repoid;
1556   }
1557   %}
1558   %newobject solvables;
1559   Repo_solvable_iterator * const solvables;
1560   %{
1561   SWIGINTERN Repo_solvable_iterator * Repo_solvables_get(Repo *repo) {
1562     return new_Repo_solvable_iterator(repo);
1563   }
1564   %}
1565   %newobject meta;
1566   Datapos * const meta;
1567   %{
1568   SWIGINTERN Datapos * Repo_meta_get(Repo *repo) {
1569     Datapos *pos = solv_calloc(1, sizeof(*pos));
1570     pos->solvid = SOLVID_META;
1571     pos->repo = repo;
1572     return pos;
1573   }
1574   %}
1575
1576   %newobject solvables_iter;
1577   Repo_solvable_iterator *solvables_iter() {
1578     return new_Repo_solvable_iterator($self);
1579   }
1580
1581   %newobject add_repodata;
1582   XRepodata *add_repodata(int flags = 0) {
1583     Repodata *rd = repo_add_repodata($self, flags);
1584     return new_XRepodata($self, rd->repodataid);
1585   }
1586
1587   void create_stubs() {
1588     Repodata *data;
1589     if (!$self->nrepodata)
1590       return;
1591     data = repo_id2repodata($self, $self->nrepodata - 1);
1592     if (data->state != REPODATA_STUB)
1593       (void)repodata_create_stubs(data);
1594   }
1595 #ifdef SWIGRUBY
1596   %rename("iscontiguous?") iscontiguous;
1597 #endif
1598   bool iscontiguous() {
1599     int i;
1600     for (i = $self->start; i < $self->end; i++)
1601       if ($self->pool->solvables[i].repo != $self)
1602         return 0;
1603     return 1;
1604   }
1605   %newobject first_repodata;
1606   XRepodata *first_repodata() {
1607     Repodata *data;
1608     int i;
1609     if ($self->nrepodata < 2)
1610       return 0;
1611     /* make sure all repodatas but the first are extensions */
1612     data = repo_id2repodata($self, 1);
1613     if (data->loadcallback)
1614        return 0;
1615     for (i = 2; i < $self->nrepodata; i++)
1616       {
1617         data = repo_id2repodata($self, i);
1618         if (!data->loadcallback)
1619           return 0;       /* oops, not an extension */
1620       }
1621     return new_XRepodata($self, 1);
1622   }
1623
1624   %newobject Selection;
1625   Selection *Selection(int setflags=0) {
1626     Selection *sel = new_Selection($self->pool);
1627     setflags |= SOLVER_SETREPO;
1628     queue_push2(&sel->q, SOLVER_SOLVABLE_REPO | setflags, $self->repoid);
1629     return sel;
1630   }
1631
1632   bool __eq__(Repo *repo) {
1633     return $self == repo;
1634   }
1635   bool __ne__(Repo *repo) {
1636     return $self != repo;
1637   }
1638 #if defined(SWIGPERL)
1639   %rename("str") __str__;
1640 #endif
1641   %newobject __str__;
1642   const char *__str__() {
1643     char buf[20];
1644     if ($self->name)
1645       return solv_strdup($self->name);
1646     sprintf(buf, "Repo#%d", $self->repoid);
1647     return solv_strdup(buf);
1648   }
1649   %newobject __repr__;
1650   const char *__repr__() {
1651     char buf[20];
1652     if ($self->name)
1653       {
1654         sprintf(buf, "<Repo #%d ", $self->repoid);
1655         return solv_dupjoin(buf, $self->name, ">");
1656       }
1657     sprintf(buf, "<Repo #%d>", $self->repoid);
1658     return solv_strdup(buf);
1659   }
1660 }
1661
1662 %extend Dataiterator {
1663   static const int SEARCH_STRING = SEARCH_STRING;
1664   static const int SEARCH_STRINGSTART = SEARCH_STRINGSTART;
1665   static const int SEARCH_STRINGEND = SEARCH_STRINGEND;
1666   static const int SEARCH_SUBSTRING = SEARCH_SUBSTRING;
1667   static const int SEARCH_GLOB = SEARCH_GLOB;
1668   static const int SEARCH_REGEX = SEARCH_REGEX;
1669   static const int SEARCH_NOCASE = SEARCH_NOCASE;
1670   static const int SEARCH_FILES = SEARCH_FILES;
1671   static const int SEARCH_COMPLETE_FILELIST = SEARCH_COMPLETE_FILELIST;
1672   static const int SEARCH_CHECKSUMS = SEARCH_CHECKSUMS;
1673
1674   Dataiterator(Pool *pool, Repo *repo, Id p, Id key, const char *match, int flags) {
1675     Dataiterator *di = solv_calloc(1, sizeof(*di));
1676     dataiterator_init(di, pool, repo, p, key, match, flags);
1677     return di;
1678   }
1679   ~Dataiterator() {
1680     dataiterator_free($self);
1681     solv_free($self);
1682   }
1683 #if defined(SWIGPYTHON)
1684   %newobject __iter__;
1685   Dataiterator *__iter__() {
1686     Dataiterator *ndi;
1687     ndi = solv_calloc(1, sizeof(*ndi));
1688     dataiterator_init_clone(ndi, $self);
1689     return ndi;
1690   }
1691   %rename("next") __next__();
1692   %exception __next__ {
1693     $action
1694     if (!result) {
1695       PyErr_SetString(PyExc_StopIteration,"no more matches");
1696       return NULL;
1697     }
1698   }
1699 #endif
1700
1701 #ifdef SWIGPERL
1702   perliter(solv::Dataiterator)
1703 #endif
1704
1705   %newobject __next__;
1706   Datamatch *__next__() {
1707     Dataiterator *ndi;
1708     if (!dataiterator_step($self)) {
1709       return 0;
1710     }
1711     ndi = solv_calloc(1, sizeof(*ndi));
1712     dataiterator_init_clone(ndi, $self);
1713     dataiterator_strdup(ndi);
1714     return ndi;
1715   }
1716 #ifdef SWIGRUBY
1717   void each() {
1718     Datamatch *d;
1719     while ((d = Dataiterator___next__($self)) != 0) {
1720       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(d), SWIGTYPE_p_Datamatch, SWIG_POINTER_OWN | 0));
1721     }
1722   }
1723 #endif
1724   void prepend_keyname(Id key) {
1725     dataiterator_prepend_keyname($self, key);
1726   }
1727   void skip_solvable() {
1728     dataiterator_skip_solvable($self);
1729   }
1730 }
1731
1732 %extend Datapos {
1733   Id lookup_id(Id keyname) {
1734     Pool *pool = $self->repo->pool;
1735     Datapos oldpos = pool->pos;
1736     Id r;
1737     pool->pos = *$self;
1738     r = pool_lookup_id(pool, SOLVID_POS, keyname);
1739     pool->pos = oldpos;
1740     return r;
1741   }
1742   const char *lookup_str(Id keyname) {
1743     Pool *pool = $self->repo->pool;
1744     Datapos oldpos = pool->pos;
1745     const char *r;
1746     pool->pos = *$self;
1747     r = pool_lookup_str(pool, SOLVID_POS, keyname);
1748     pool->pos = oldpos;
1749     return r;
1750   }
1751   unsigned long long lookup_num(Id keyname, unsigned long long notfound = 0) {
1752     Pool *pool = $self->repo->pool;
1753     Datapos oldpos = pool->pos;
1754     unsigned long long r;
1755     pool->pos = *$self;
1756     r = pool_lookup_num(pool, SOLVID_POS, keyname, notfound);
1757     pool->pos = oldpos;
1758     return r;
1759   }
1760   bool lookup_void(Id keyname) {
1761     Pool *pool = $self->repo->pool;
1762     Datapos oldpos = pool->pos;
1763     int r;
1764     pool->pos = *$self;
1765     r = pool_lookup_void(pool, SOLVID_POS, keyname);
1766     pool->pos = oldpos;
1767     return r;
1768   }
1769   %newobject lookup_checksum;
1770   Chksum *lookup_checksum(Id keyname) {
1771     Pool *pool = $self->repo->pool;
1772     Datapos oldpos = pool->pos;
1773     Id type = 0;
1774     const unsigned char *b;
1775     pool->pos = *$self;
1776     b = pool_lookup_bin_checksum(pool, SOLVID_POS, keyname, &type);
1777     pool->pos = oldpos;
1778     return solv_chksum_create_from_bin(type, b);
1779   }
1780   const char *lookup_deltaseq() {
1781     Pool *pool = $self->repo->pool;
1782     Datapos oldpos = pool->pos;
1783     const char *seq;
1784     pool->pos = *$self;
1785     seq = pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NAME);
1786     if (seq) {
1787       seq = pool_tmpjoin(pool, seq, "-", pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_EVR));
1788       seq = pool_tmpappend(pool, seq, "-", pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NUM));
1789     }
1790     pool->pos = oldpos;
1791     return seq;
1792   }
1793   const char *lookup_deltalocation(unsigned int *OUTPUT) {
1794     Pool *pool = $self->repo->pool;
1795     Datapos oldpos = pool->pos;
1796     const char *loc;
1797     pool->pos = *$self;
1798     loc = pool_lookup_deltalocation(pool, SOLVID_POS, OUTPUT);
1799     pool->pos = oldpos;
1800     return loc;
1801   }
1802   Queue lookup_idarray(Id keyname) {
1803     Pool *pool = $self->repo->pool;
1804     Datapos oldpos = pool->pos;
1805     Queue r;
1806     queue_init(&r);
1807     pool->pos = *$self;
1808     pool_lookup_idarray(pool, SOLVID_POS, keyname, &r);
1809     pool->pos = oldpos;
1810     return r;
1811   }
1812   %newobject Dataiterator;
1813   Dataiterator *Dataiterator(Id key, const char *match, int flags) {
1814     Pool *pool = $self->repo->pool;
1815     Datapos oldpos = pool->pos;
1816     Dataiterator *di;
1817     pool->pos = *$self;
1818     di = new_Dataiterator(pool, 0, SOLVID_POS, key, match, flags);
1819     pool->pos = oldpos;
1820     return di;
1821   }
1822 }
1823
1824 %extend Datamatch {
1825   ~Datamatch() {
1826     dataiterator_free($self);
1827     solv_free($self);
1828   }
1829   %newobject solvable;
1830   XSolvable * const solvable;
1831   %{
1832   SWIGINTERN XSolvable *Datamatch_solvable_get(Dataiterator *di) {
1833     return new_XSolvable(di->pool, di->solvid);
1834   }
1835   %}
1836   Id key_id() {
1837     return $self->key->name;
1838   }
1839   const char *key_idstr() {
1840     return pool_id2str($self->pool, $self->key->name);
1841   }
1842   Id type_id() {
1843     return $self->key->type;
1844   }
1845   const char *type_idstr() {
1846     return pool_id2str($self->pool, $self->key->type);
1847   }
1848   Id id() {
1849      return $self->kv.id;
1850   }
1851   const char *idstr() {
1852      return pool_id2str($self->pool, $self->kv.id);
1853   }
1854   const char *str() {
1855      return $self->kv.str;
1856   }
1857   unsigned long long num() {
1858      if ($self->key->type == REPOKEY_TYPE_NUM)
1859        return SOLV_KV_NUM64(&$self->kv);
1860      return $self->kv.num;
1861   }
1862   int num2() {
1863      return $self->kv.num2;
1864   }
1865   %newobject pos;
1866   Datapos *pos() {
1867     Pool *pool = $self->pool;
1868     Datapos *pos, oldpos = pool->pos;
1869     dataiterator_setpos($self);
1870     pos = solv_calloc(1, sizeof(*pos));
1871     *pos = pool->pos;
1872     pool->pos = oldpos;
1873     return pos;
1874   }
1875   %newobject parentpos;
1876   Datapos *parentpos() {
1877     Pool *pool = $self->pool;
1878     Datapos *pos, oldpos = pool->pos;
1879     dataiterator_setpos_parent($self);
1880     pos = solv_calloc(1, sizeof(*pos));
1881     *pos = pool->pos;
1882     pool->pos = oldpos;
1883     return pos;
1884   }
1885 #if defined(SWIGPERL)
1886   %rename("str") __str__;
1887 #endif
1888   const char *__str__() {
1889     if (!repodata_stringify($self->pool, $self->data, $self->key, &$self->kv, $self->flags))
1890       return "";
1891     return $self->kv.str;
1892   }
1893 }
1894
1895 %extend Pool_solvable_iterator {
1896   Pool_solvable_iterator(Pool *pool) {
1897     Pool_solvable_iterator *s;
1898     s = solv_calloc(1, sizeof(*s));
1899     s->pool = pool;
1900     return s;
1901   }
1902 #if defined(SWIGPYTHON)
1903   %newobject __iter__;
1904   Pool_solvable_iterator *__iter__() {
1905     Pool_solvable_iterator *s;
1906     s = solv_calloc(1, sizeof(*s));
1907     *s = *$self;
1908     return s;
1909   }
1910   %rename("next") __next__();
1911   %exception __next__ {
1912     $action
1913     if (!result) {
1914       PyErr_SetString(PyExc_StopIteration,"no more matches");
1915       return NULL;
1916     }
1917   }
1918 #endif
1919
1920 #ifdef SWIGPERL
1921   perliter(solv::Pool_solvable_iterator)
1922 #endif
1923   %newobject __next__;
1924   XSolvable *__next__() {
1925     Pool *pool = $self->pool;
1926     if ($self->id >= pool->nsolvables)
1927       return 0;
1928     while (++$self->id < pool->nsolvables)
1929       if (pool->solvables[$self->id].repo)
1930         return new_XSolvable(pool, $self->id);
1931     return 0;
1932   }
1933 #ifdef SWIGRUBY
1934   void each() {
1935     XSolvable *n;
1936     while ((n = Pool_solvable_iterator___next__($self)) != 0) {
1937       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
1938     }
1939   }
1940 #endif
1941   %newobject __getitem__;
1942   XSolvable *__getitem__(Id key) {
1943     Pool *pool = $self->pool;
1944     if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo)
1945       return new_XSolvable(pool, key);
1946     return 0;
1947   }
1948   int __len__() {
1949     return $self->pool->nsolvables;
1950   }
1951 }
1952
1953 %extend Pool_repo_iterator {
1954   Pool_repo_iterator(Pool *pool) {
1955     Pool_repo_iterator *s;
1956     s = solv_calloc(1, sizeof(*s));
1957     s->pool = pool;
1958     return s;
1959   }
1960 #if defined(SWIGPYTHON)
1961   %newobject __iter__;
1962   Pool_repo_iterator *__iter__() {
1963     Pool_repo_iterator *s;
1964     s = solv_calloc(1, sizeof(*s));
1965     *s = *$self;
1966     return s;
1967   }
1968   %rename("next") __next__();
1969   %exception __next__ {
1970     $action
1971     if (!result) {
1972       PyErr_SetString(PyExc_StopIteration,"no more matches");
1973       return NULL;
1974     }
1975   }
1976 #endif
1977   %newobject __next__;
1978   Repo *__next__() {
1979     Pool *pool = $self->pool;
1980     if ($self->id >= pool->nrepos)
1981       return 0;
1982     while (++$self->id < pool->nrepos) {
1983       Repo *r = pool_id2repo(pool, $self->id);
1984       if (r)
1985         return r;
1986     }
1987     return 0;
1988   }
1989 #ifdef SWIGRUBY
1990   void each() {
1991     Repo *n;
1992     while ((n = Pool_repo_iterator___next__($self)) != 0) {
1993       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_Repo, SWIG_POINTER_OWN | 0));
1994     }
1995   }
1996 #endif
1997   Repo *__getitem__(Id key) {
1998     Pool *pool = $self->pool;
1999     if (key > 0 && key < pool->nrepos)
2000       return pool_id2repo(pool, key);
2001     return 0;
2002   }
2003   int __len__() {
2004     return $self->pool->nrepos;
2005   }
2006 }
2007
2008 %extend Repo_solvable_iterator {
2009   Repo_solvable_iterator(Repo *repo) {
2010     Repo_solvable_iterator *s;
2011     s = solv_calloc(1, sizeof(*s));
2012     s->repo = repo;
2013     return s;
2014   }
2015 #if defined(SWIGPYTHON)
2016   %newobject __iter__;
2017   Repo_solvable_iterator *__iter__() {
2018     Repo_solvable_iterator *s;
2019     s = solv_calloc(1, sizeof(*s));
2020     *s = *$self;
2021     return s;
2022   }
2023   %rename("next") __next__();
2024   %exception __next__ {
2025     $action
2026     if (!result) {
2027       PyErr_SetString(PyExc_StopIteration,"no more matches");
2028       return NULL;
2029     }
2030   }
2031 #endif
2032   %newobject __next__;
2033   XSolvable *__next__() {
2034     Repo *repo = $self->repo;
2035     Pool *pool = repo->pool;
2036     if (repo->start > 0 && $self->id < repo->start)
2037       $self->id = repo->start - 1;
2038     if ($self->id >= repo->end)
2039       return 0;
2040     while (++$self->id < repo->end)
2041       if (pool->solvables[$self->id].repo == repo)
2042         return new_XSolvable(pool, $self->id);
2043     return 0;
2044   }
2045 #ifdef SWIGRUBY
2046   void each() {
2047     XSolvable *n;
2048     while ((n = Repo_solvable_iterator___next__($self)) != 0) {
2049       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
2050     }
2051   }
2052 #endif
2053   %newobject __getitem__;
2054   XSolvable *__getitem__(Id key) {
2055     Repo *repo = $self->repo;
2056     Pool *pool = repo->pool;
2057     if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo == repo)
2058       return new_XSolvable(pool, key);
2059     return 0;
2060   }
2061   int __len__() {
2062     return $self->repo->pool->nsolvables;
2063   }
2064 }
2065
2066 %extend Dep {
2067   Dep(Pool *pool, Id id) {
2068     Dep *s;
2069     if (!id)
2070       return 0;
2071     s = solv_calloc(1, sizeof(*s));
2072     s->pool = pool;
2073     s->id = id;
2074     return s;
2075   }
2076   %newobject Rel;
2077   Dep *Rel(int flags, DepId evrid, bool create=1) {
2078     Id id = pool_rel2id($self->pool, $self->id, evrid, flags, create);
2079     if (!id)
2080       return 0;
2081     return new_Dep($self->pool, id);
2082   }
2083   %newobject Selection_name;
2084   Selection *Selection_name(int setflags=0) {
2085     Selection *sel = new_Selection($self->pool);
2086     if (ISRELDEP($self->id)) {
2087       Reldep *rd = GETRELDEP($self->pool, $self->id);
2088       if (rd->flags == REL_EQ) {
2089         setflags |= $self->pool->disttype == DISTTYPE_DEB || strchr(pool_id2str($self->pool, rd->evr), '-') != 0 ? SOLVER_SETEVR : SOLVER_SETEV;
2090         if (ISRELDEP(rd->name))
2091           rd = GETRELDEP($self->pool, rd->name);
2092       }
2093       if (rd->flags == REL_ARCH)
2094         setflags |= SOLVER_SETARCH;
2095     }
2096     queue_push2(&sel->q, SOLVER_SOLVABLE_NAME | setflags, $self->id);
2097     return sel;
2098   }
2099   %newobject Selection_provides;
2100   Selection *Selection_provides(int setflags=0) {
2101     Selection *sel = new_Selection($self->pool);
2102     if (ISRELDEP($self->id)) {
2103       Reldep *rd = GETRELDEP($self->pool, $self->id);
2104       if (rd->flags == REL_ARCH)
2105         setflags |= SOLVER_SETARCH;
2106     }
2107     queue_push2(&sel->q, SOLVER_SOLVABLE_PROVIDES | setflags, $self->id);
2108     return sel;
2109   }
2110   const char *str() {
2111     return pool_dep2str($self->pool, $self->id);
2112   }
2113   bool __eq__(Dep *s) {
2114     return $self->pool == s->pool && $self->id == s->id;
2115   }
2116   bool __ne__(Dep *s) {
2117     return !Dep___eq__($self, s);
2118   }
2119 #if defined(SWIGPERL)
2120   %rename("str") __str__;
2121 #endif
2122   const char *__str__() {
2123     return pool_dep2str($self->pool, $self->id);
2124   }
2125   %newobject __repr__;
2126   const char *__repr__() {
2127     char buf[20];
2128     sprintf(buf, "<Id #%d ", $self->id);
2129     return solv_dupjoin(buf, pool_dep2str($self->pool, $self->id), ">");
2130   }
2131 }
2132
2133 %extend XSolvable {
2134   XSolvable(Pool *pool, Id id) {
2135     XSolvable *s;
2136     if (!id || id >= pool->nsolvables)
2137       return 0;
2138     s = solv_calloc(1, sizeof(*s));
2139     s->pool = pool;
2140     s->id = id;
2141     return s;
2142   }
2143   const char *str() {
2144     return pool_solvid2str($self->pool, $self->id);
2145   }
2146   const char *lookup_str(Id keyname) {
2147     return pool_lookup_str($self->pool, $self->id, keyname);
2148   }
2149   Id lookup_id(Id keyname) {
2150     return pool_lookup_id($self->pool, $self->id, keyname);
2151   }
2152   unsigned long long lookup_num(Id keyname, unsigned long long notfound = 0) {
2153     return pool_lookup_num($self->pool, $self->id, keyname, notfound);
2154   }
2155   bool lookup_void(Id keyname) {
2156     return pool_lookup_void($self->pool, $self->id, keyname);
2157   }
2158   %newobject lookup_checksum;
2159   Chksum *lookup_checksum(Id keyname) {
2160     Id type = 0;
2161     const unsigned char *b = pool_lookup_bin_checksum($self->pool, $self->id, keyname, &type);
2162     return solv_chksum_create_from_bin(type, b);
2163   }
2164   Queue lookup_idarray(Id keyname, Id marker = -1) {
2165     Solvable *s = $self->pool->solvables + $self->id;
2166     Queue r;
2167     queue_init(&r);
2168     solvable_lookup_deparray(s, keyname, &r, marker);
2169     return r;
2170   }
2171   %typemap(out) Queue lookup_deparray Queue2Array(Dep *, 1, new_Dep(arg1->pool, id));
2172   %newobject lookup_deparray;
2173   Queue lookup_deparray(Id keyname, Id marker = -1) {
2174     Solvable *s = $self->pool->solvables + $self->id;
2175     Queue r;
2176     queue_init(&r);
2177     solvable_lookup_deparray(s, keyname, &r, marker);
2178     return r;
2179   }
2180   const char *lookup_location(unsigned int *OUTPUT) {
2181     return solvable_lookup_location($self->pool->solvables + $self->id, OUTPUT);
2182   }
2183   %newobject Dataiterator;
2184   Dataiterator *Dataiterator(Id key, const char *match, int flags) {
2185     return new_Dataiterator($self->pool, 0, $self->id, key, match, flags);
2186   }
2187 #ifdef SWIGRUBY
2188   %rename("installable?") installable;
2189 #endif
2190   bool installable() {
2191     return pool_installable($self->pool, pool_id2solvable($self->pool, $self->id));
2192   }
2193 #ifdef SWIGRUBY
2194   %rename("isinstalled?") isinstalled;
2195 #endif
2196   bool isinstalled() {
2197     Pool *pool = $self->pool;
2198     return pool->installed && pool_id2solvable(pool, $self->id)->repo == pool->installed;
2199   }
2200
2201   const char *name;
2202   %{
2203     SWIGINTERN void XSolvable_name_set(XSolvable *xs, const char *name) {
2204       Pool *pool = xs->pool;
2205       pool->solvables[xs->id].name = pool_str2id(pool, name, 1);
2206     }
2207     SWIGINTERN const char *XSolvable_name_get(XSolvable *xs) {
2208       Pool *pool = xs->pool;
2209       return pool_id2str(pool, pool->solvables[xs->id].name);
2210     }
2211   %}
2212   Id nameid;
2213   %{
2214     SWIGINTERN void XSolvable_nameid_set(XSolvable *xs, Id nameid) {
2215       xs->pool->solvables[xs->id].name = nameid;
2216     }
2217     SWIGINTERN Id XSolvable_nameid_get(XSolvable *xs) {
2218       return xs->pool->solvables[xs->id].name;
2219     }
2220   %}
2221   const char *evr;
2222   %{
2223     SWIGINTERN void XSolvable_evr_set(XSolvable *xs, const char *evr) {
2224       Pool *pool = xs->pool;
2225       pool->solvables[xs->id].evr = pool_str2id(pool, evr, 1);
2226     }
2227     SWIGINTERN const char *XSolvable_evr_get(XSolvable *xs) {
2228       Pool *pool = xs->pool;
2229       return pool_id2str(pool, pool->solvables[xs->id].evr);
2230     }
2231   %}
2232   Id evrid;
2233   %{
2234     SWIGINTERN void XSolvable_evrid_set(XSolvable *xs, Id evrid) {
2235       xs->pool->solvables[xs->id].evr = evrid;
2236     }
2237     SWIGINTERN Id XSolvable_evrid_get(XSolvable *xs) {
2238       return xs->pool->solvables[xs->id].evr;
2239     }
2240   %}
2241   const char *arch;
2242   %{
2243     SWIGINTERN void XSolvable_arch_set(XSolvable *xs, const char *arch) {
2244       Pool *pool = xs->pool;
2245       pool->solvables[xs->id].arch = pool_str2id(pool, arch, 1);
2246     }
2247     SWIGINTERN const char *XSolvable_arch_get(XSolvable *xs) {
2248       Pool *pool = xs->pool;
2249       return pool_id2str(pool, pool->solvables[xs->id].arch);
2250     }
2251   %}
2252   Id archid;
2253   %{
2254     SWIGINTERN void XSolvable_archid_set(XSolvable *xs, Id archid) {
2255       xs->pool->solvables[xs->id].arch = archid;
2256     }
2257     SWIGINTERN Id XSolvable_archid_get(XSolvable *xs) {
2258       return xs->pool->solvables[xs->id].arch;
2259     }
2260   %}
2261   const char *vendor;
2262   %{
2263     SWIGINTERN void XSolvable_vendor_set(XSolvable *xs, const char *vendor) {
2264       Pool *pool = xs->pool;
2265       pool->solvables[xs->id].vendor = pool_str2id(pool, vendor, 1);
2266     }
2267     SWIGINTERN const char *XSolvable_vendor_get(XSolvable *xs) {
2268       Pool *pool = xs->pool;
2269       return pool_id2str(pool, pool->solvables[xs->id].vendor);
2270     }
2271   %}
2272   Id vendorid;
2273   %{
2274     SWIGINTERN void XSolvable_vendorid_set(XSolvable *xs, Id vendorid) {
2275       xs->pool->solvables[xs->id].vendor = vendorid;
2276     }
2277     SWIGINTERN Id XSolvable_vendorid_get(XSolvable *xs) {
2278       return xs->pool->solvables[xs->id].vendor;
2279     }
2280   %}
2281   Repo * const repo;
2282   %{
2283     SWIGINTERN Repo *XSolvable_repo_get(XSolvable *xs) {
2284       return xs->pool->solvables[xs->id].repo;
2285     }
2286   %}
2287
2288   /* old interface, please use the generic add_deparray instead */
2289   void add_provides(DepId id, Id marker = -1) {
2290     Solvable *s = $self->pool->solvables + $self->id;
2291     marker = solv_depmarker(SOLVABLE_PROVIDES, marker);
2292     s->provides = repo_addid_dep(s->repo, s->provides, id, marker);
2293   }
2294   void add_obsoletes(DepId id) {
2295     Solvable *s = $self->pool->solvables + $self->id;
2296     s->obsoletes = repo_addid_dep(s->repo, s->obsoletes, id, 0);
2297   }
2298   void add_conflicts(DepId id) {
2299     Solvable *s = $self->pool->solvables + $self->id;
2300     s->conflicts = repo_addid_dep(s->repo, s->conflicts, id, 0);
2301   }
2302   void add_requires(DepId id, Id marker = -1) {
2303     Solvable *s = $self->pool->solvables + $self->id;
2304     marker = solv_depmarker(SOLVABLE_REQUIRES, marker);
2305     s->requires = repo_addid_dep(s->repo, s->requires, id, marker);
2306   }
2307   void add_recommends(DepId id) {
2308     Solvable *s = $self->pool->solvables + $self->id;
2309     s->recommends = repo_addid_dep(s->repo, s->recommends, id, 0);
2310   }
2311   void add_suggests(DepId id) {
2312     Solvable *s = $self->pool->solvables + $self->id;
2313     s->suggests = repo_addid_dep(s->repo, s->suggests, id, 0);
2314   }
2315   void add_supplements(DepId id) {
2316     Solvable *s = $self->pool->solvables + $self->id;
2317     s->supplements = repo_addid_dep(s->repo, s->supplements, id, 0);
2318   }
2319   void add_enhances(DepId id) {
2320     Solvable *s = $self->pool->solvables + $self->id;
2321     s->enhances = repo_addid_dep(s->repo, s->enhances, id, 0);
2322   }
2323
2324   void unset(Id keyname) {
2325     Solvable *s = $self->pool->solvables + $self->id;
2326     repo_unset(s->repo, $self->id, keyname);
2327   }
2328
2329   void add_deparray(Id keyname, DepId id, Id marker = -1) {
2330     Solvable *s = $self->pool->solvables + $self->id;
2331     solvable_add_deparray(s, keyname, id, marker);
2332   }
2333
2334   %newobject Selection;
2335   Selection *Selection(int setflags=0) {
2336     Selection *sel = new_Selection($self->pool);
2337     queue_push2(&sel->q, SOLVER_SOLVABLE | setflags, $self->id);
2338     return sel;
2339   }
2340
2341   bool __eq__(XSolvable *s) {
2342     return $self->pool == s->pool && $self->id == s->id;
2343   }
2344   bool __ne__(XSolvable *s) {
2345     return !XSolvable___eq__($self, s);
2346   }
2347 #if defined(SWIGPERL)
2348   %rename("str") __str__;
2349 #endif
2350   const char *__str__() {
2351     return pool_solvid2str($self->pool, $self->id);
2352   }
2353   %newobject __repr__;
2354   const char *__repr__() {
2355     char buf[20];
2356     sprintf(buf, "<Solvable #%d ", $self->id);
2357     return solv_dupjoin(buf, pool_solvid2str($self->pool, $self->id), ">");
2358   }
2359 }
2360
2361 %extend Problem {
2362   Problem(Solver *solv, Id id) {
2363     Problem *p;
2364     p = solv_calloc(1, sizeof(*p));
2365     p->solv = solv;
2366     p->id = id;
2367     return p;
2368   }
2369   %newobject findproblemrule;
2370   XRule *findproblemrule() {
2371     Id r = solver_findproblemrule($self->solv, $self->id);
2372     return new_XRule($self->solv, r);
2373   }
2374   %newobject findallproblemrules;
2375   %typemap(out) Queue findallproblemrules Queue2Array(XRule *, 1, new_XRule(arg1->solv, id));
2376   Queue findallproblemrules(int unfiltered=0) {
2377     Solver *solv = $self->solv;
2378     Id probr;
2379     int i, j;
2380     Queue q;
2381     queue_init(&q);
2382     solver_findallproblemrules(solv, $self->id, &q);
2383     if (!unfiltered)
2384       {
2385         for (i = j = 0; i < q.count; i++)
2386           {
2387             SolverRuleinfo rclass;
2388             probr = q.elements[i];
2389             rclass = solver_ruleclass(solv, probr);
2390             if (rclass == SOLVER_RULE_UPDATE || rclass == SOLVER_RULE_JOB)
2391               continue;
2392             q.elements[j++] = probr;
2393           }
2394         if (j)
2395           queue_truncate(&q, j);
2396       }
2397     return q;
2398   }
2399   int solution_count() {
2400     return solver_solution_count($self->solv, $self->id);
2401   }
2402   %typemap(out) Queue solutions Queue2Array(Solution *, 1, new_Solution(arg1, id));
2403   %newobject solutions;
2404   Queue solutions() {
2405     Queue q;
2406     int i, cnt;
2407     queue_init(&q);
2408     cnt = solver_solution_count($self->solv, $self->id);
2409     for (i = 1; i <= cnt; i++)
2410       queue_push(&q, i);
2411     return q;
2412   }
2413 #if defined(SWIGPERL)
2414   %rename("str") __str__;
2415 #endif
2416   const char *__str__() {
2417     return solver_problem2str($self->solv, $self->id);
2418   }
2419 }
2420
2421 %extend Solution {
2422   Solution(Problem *p, Id id) {
2423     Solution *s;
2424     s = solv_calloc(1, sizeof(*s));
2425     s->solv = p->solv;
2426     s->problemid = p->id;
2427     s->id = id;
2428     return s;
2429   }
2430   int element_count() {
2431     return solver_solutionelement_count($self->solv, $self->problemid, $self->id);
2432   }
2433
2434   %typemap(out) Queue elements Queue2Array(Solutionelement *, 4, new_Solutionelement(arg1->solv, arg1->problemid, arg1->id, id, idp[1], idp[2], idp[3]));
2435   %newobject elements;
2436   Queue elements(bool expandreplaces=0) {
2437     Queue q;
2438     int i, cnt;
2439     queue_init(&q);
2440     cnt = solver_solutionelement_count($self->solv, $self->problemid, $self->id);
2441     for (i = 1; i <= cnt; i++)
2442       {
2443         Id p, rp, type;
2444         solver_next_solutionelement($self->solv, $self->problemid, $self->id, i - 1, &p, &rp);
2445         if (p > 0) {
2446           type = rp ? SOLVER_SOLUTION_REPLACE : SOLVER_SOLUTION_ERASE;
2447         } else {
2448           type = p;
2449           p = rp;
2450           rp = 0;
2451         }
2452         if (type == SOLVER_SOLUTION_REPLACE && expandreplaces) {
2453           int illegal = policy_is_illegal(self->solv, self->solv->pool->solvables + p, self->solv->pool->solvables + rp, 0);
2454           if (illegal) {
2455             if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0) {
2456               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
2457               queue_push2(&q, p, rp);
2458             }
2459             if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0) {
2460               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
2461               queue_push2(&q, p, rp);
2462             }
2463             if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0) {
2464               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
2465               queue_push2(&q, p, rp);
2466             }
2467             if ((illegal & POLICY_ILLEGAL_NAMECHANGE) != 0) {
2468               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_NAMECHANGE);
2469               queue_push2(&q, p, rp);
2470             }
2471             continue;
2472           }
2473         }
2474         queue_push2(&q, i, type);
2475         queue_push2(&q, p, rp);
2476       }
2477     return q;
2478   }
2479 }
2480
2481 %extend Solutionelement {
2482   Solutionelement(Solver *solv, Id problemid, Id solutionid, Id id, Id type, Id p, Id rp) {
2483     Solutionelement *e;
2484     e = solv_calloc(1, sizeof(*e));
2485     e->solv = solv;
2486     e->problemid = problemid;
2487     e->solutionid = id;
2488     e->id = id;
2489     e->type = type;
2490     e->p = p;
2491     e->rp = rp;
2492     return e;
2493   }
2494   const char *str() {
2495     Id p = $self->type;
2496     Id rp = $self->p;
2497     int illegal = 0;
2498     if (p == SOLVER_SOLUTION_ERASE)
2499       {
2500         p = rp;
2501         rp = 0;
2502       }
2503     else if (p == SOLVER_SOLUTION_REPLACE)
2504       {
2505         p = rp;
2506         rp = $self->rp;
2507       }
2508     else if (p == SOLVER_SOLUTION_REPLACE_DOWNGRADE)
2509       illegal = POLICY_ILLEGAL_DOWNGRADE;
2510     else if (p == SOLVER_SOLUTION_REPLACE_ARCHCHANGE)
2511       illegal = POLICY_ILLEGAL_ARCHCHANGE;
2512     else if (p == SOLVER_SOLUTION_REPLACE_VENDORCHANGE)
2513       illegal = POLICY_ILLEGAL_VENDORCHANGE;
2514     else if (p == SOLVER_SOLUTION_REPLACE_NAMECHANGE)
2515       illegal = POLICY_ILLEGAL_NAMECHANGE;
2516     if (illegal)
2517       return pool_tmpjoin($self->solv->pool, "allow ", policy_illegal2str($self->solv, illegal, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp), 0);
2518     return solver_solutionelement2str($self->solv, p, rp);
2519   }
2520   %typemap(out) Queue replaceelements Queue2Array(Solutionelement *, 1, new_Solutionelement(arg1->solv, arg1->problemid, arg1->solutionid, arg1->id, id, arg1->p, arg1->rp));
2521   %newobject replaceelements;
2522   Queue replaceelements() {
2523     Queue q;
2524     int illegal;
2525
2526     queue_init(&q);
2527     if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
2528       illegal = 0;
2529     else
2530       illegal = policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
2531     if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0)
2532       queue_push(&q, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
2533     if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0)
2534       queue_push(&q, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
2535     if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0)
2536       queue_push(&q, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
2537     if ((illegal & POLICY_ILLEGAL_NAMECHANGE) != 0)
2538       queue_push(&q, SOLVER_SOLUTION_REPLACE_NAMECHANGE);
2539     if (!q.count)
2540       queue_push(&q, $self->type);
2541     return q;
2542   }
2543   int illegalreplace() {
2544     if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
2545       return 0;
2546     return policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
2547   }
2548   %newobject solvable;
2549   XSolvable * const solvable;
2550   %newobject replacement;
2551   XSolvable * const replacement;
2552   int const jobidx;
2553   %{
2554     SWIGINTERN XSolvable *Solutionelement_solvable_get(Solutionelement *e) {
2555       return new_XSolvable(e->solv->pool, e->p);
2556     }
2557     SWIGINTERN XSolvable *Solutionelement_replacement_get(Solutionelement *e) {
2558       return new_XSolvable(e->solv->pool, e->rp);
2559     }
2560     SWIGINTERN int Solutionelement_jobidx_get(Solutionelement *e) {
2561       if (e->type != SOLVER_SOLUTION_JOB && e->type != SOLVER_SOLUTION_POOLJOB)
2562         return -1;
2563       return (e->p - 1) / 2;
2564     }
2565   %}
2566   %newobject Job;
2567   Job *Job() {
2568     Id extraflags = solver_solutionelement_extrajobflags($self->solv, $self->problemid, $self->solutionid);
2569     if ($self->type == SOLVER_SOLUTION_JOB || SOLVER_SOLUTION_POOLJOB)
2570       return new_Job($self->solv->pool, SOLVER_NOOP, 0);
2571     if ($self->type == SOLVER_SOLUTION_INFARCH || $self->type == SOLVER_SOLUTION_DISTUPGRADE || $self->type == SOLVER_SOLUTION_BEST)
2572       return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE|extraflags, $self->p);
2573     if ($self->type == SOLVER_SOLUTION_REPLACE || $self->type == SOLVER_SOLUTION_REPLACE_DOWNGRADE || $self->type == SOLVER_SOLUTION_REPLACE_ARCHCHANGE || $self->type == SOLVER_SOLUTION_REPLACE_VENDORCHANGE || $self->type == SOLVER_SOLUTION_REPLACE_NAMECHANGE)
2574       return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE|extraflags, $self->rp);
2575     if ($self->type == SOLVER_SOLUTION_ERASE)
2576       return new_Job($self->solv->pool, SOLVER_ERASE|SOLVER_SOLVABLE|extraflags, $self->p);
2577     return 0;
2578   }
2579 }
2580
2581 %extend Solver {
2582   static const int SOLVER_RULE_UNKNOWN = SOLVER_RULE_UNKNOWN;
2583   static const int SOLVER_RULE_RPM = SOLVER_RULE_RPM;
2584   static const int SOLVER_RULE_RPM_NOT_INSTALLABLE = SOLVER_RULE_RPM_NOT_INSTALLABLE;
2585   static const int SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP = SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP;
2586   static const int SOLVER_RULE_RPM_PACKAGE_REQUIRES = SOLVER_RULE_RPM_PACKAGE_REQUIRES;
2587   static const int SOLVER_RULE_RPM_SELF_CONFLICT = SOLVER_RULE_RPM_SELF_CONFLICT;
2588   static const int SOLVER_RULE_RPM_PACKAGE_CONFLICT = SOLVER_RULE_RPM_PACKAGE_CONFLICT;
2589   static const int SOLVER_RULE_RPM_SAME_NAME = SOLVER_RULE_RPM_SAME_NAME;
2590   static const int SOLVER_RULE_RPM_PACKAGE_OBSOLETES = SOLVER_RULE_RPM_PACKAGE_OBSOLETES;
2591   static const int SOLVER_RULE_RPM_IMPLICIT_OBSOLETES = SOLVER_RULE_RPM_IMPLICIT_OBSOLETES;
2592   static const int SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES = SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES;
2593   static const int SOLVER_RULE_UPDATE = SOLVER_RULE_UPDATE;
2594   static const int SOLVER_RULE_FEATURE = SOLVER_RULE_FEATURE;
2595   static const int SOLVER_RULE_JOB = SOLVER_RULE_JOB;
2596   static const int SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP = SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP;
2597   static const int SOLVER_RULE_JOB_PROVIDED_BY_SYSTEM = SOLVER_RULE_JOB_PROVIDED_BY_SYSTEM;
2598   static const int SOLVER_RULE_JOB_UNKNOWN_PACKAGE = SOLVER_RULE_JOB_UNKNOWN_PACKAGE;
2599   static const int SOLVER_RULE_JOB_UNSUPPORTED = SOLVER_RULE_JOB_UNSUPPORTED;
2600   static const int SOLVER_RULE_DISTUPGRADE = SOLVER_RULE_DISTUPGRADE;
2601   static const int SOLVER_RULE_INFARCH = SOLVER_RULE_INFARCH;
2602   static const int SOLVER_RULE_CHOICE = SOLVER_RULE_CHOICE;
2603   static const int SOLVER_RULE_LEARNT = SOLVER_RULE_LEARNT;
2604
2605   static const int SOLVER_SOLUTION_JOB = SOLVER_SOLUTION_JOB;
2606   static const int SOLVER_SOLUTION_POOLJOB = SOLVER_SOLUTION_POOLJOB;
2607   static const int SOLVER_SOLUTION_INFARCH = SOLVER_SOLUTION_INFARCH;
2608   static const int SOLVER_SOLUTION_DISTUPGRADE = SOLVER_SOLUTION_DISTUPGRADE;
2609   static const int SOLVER_SOLUTION_BEST = SOLVER_SOLUTION_BEST;
2610   static const int SOLVER_SOLUTION_ERASE = SOLVER_SOLUTION_ERASE;
2611   static const int SOLVER_SOLUTION_REPLACE = SOLVER_SOLUTION_REPLACE;
2612   static const int SOLVER_SOLUTION_REPLACE_DOWNGRADE = SOLVER_SOLUTION_REPLACE_DOWNGRADE;
2613   static const int SOLVER_SOLUTION_REPLACE_ARCHCHANGE = SOLVER_SOLUTION_REPLACE_ARCHCHANGE;
2614   static const int SOLVER_SOLUTION_REPLACE_VENDORCHANGE = SOLVER_SOLUTION_REPLACE_VENDORCHANGE;
2615   static const int SOLVER_SOLUTION_REPLACE_NAMECHANGE = SOLVER_SOLUTION_REPLACE_NAMECHANGE;
2616
2617   static const int POLICY_ILLEGAL_DOWNGRADE = POLICY_ILLEGAL_DOWNGRADE;
2618   static const int POLICY_ILLEGAL_ARCHCHANGE = POLICY_ILLEGAL_ARCHCHANGE;
2619   static const int POLICY_ILLEGAL_VENDORCHANGE = POLICY_ILLEGAL_VENDORCHANGE;
2620   static const int POLICY_ILLEGAL_NAMECHANGE = POLICY_ILLEGAL_NAMECHANGE;
2621
2622   static const int SOLVER_FLAG_ALLOW_DOWNGRADE = SOLVER_FLAG_ALLOW_DOWNGRADE;
2623   static const int SOLVER_FLAG_ALLOW_ARCHCHANGE = SOLVER_FLAG_ALLOW_ARCHCHANGE;
2624   static const int SOLVER_FLAG_ALLOW_VENDORCHANGE = SOLVER_FLAG_ALLOW_VENDORCHANGE;
2625   static const int SOLVER_FLAG_ALLOW_NAMECHANGE = SOLVER_FLAG_ALLOW_NAMECHANGE;
2626   static const int SOLVER_FLAG_ALLOW_UNINSTALL = SOLVER_FLAG_ALLOW_UNINSTALL;
2627   static const int SOLVER_FLAG_NO_UPDATEPROVIDE = SOLVER_FLAG_NO_UPDATEPROVIDE;
2628   static const int SOLVER_FLAG_SPLITPROVIDES = SOLVER_FLAG_SPLITPROVIDES;
2629   static const int SOLVER_FLAG_IGNORE_RECOMMENDED = SOLVER_FLAG_IGNORE_RECOMMENDED;
2630   static const int SOLVER_FLAG_ADD_ALREADY_RECOMMENDED = SOLVER_FLAG_ADD_ALREADY_RECOMMENDED;
2631   static const int SOLVER_FLAG_NO_INFARCHCHECK = SOLVER_FLAG_NO_INFARCHCHECK;
2632   static const int SOLVER_FLAG_BEST_OBEY_POLICY = SOLVER_FLAG_BEST_OBEY_POLICY;
2633   static const int SOLVER_FLAG_NO_AUTOTARGET = SOLVER_FLAG_NO_AUTOTARGET;
2634
2635   static const int SOLVER_REASON_UNRELATED = SOLVER_REASON_UNRELATED;
2636   static const int SOLVER_REASON_UNIT_RULE = SOLVER_REASON_UNIT_RULE;
2637   static const int SOLVER_REASON_KEEP_INSTALLED = SOLVER_REASON_KEEP_INSTALLED;
2638   static const int SOLVER_REASON_RESOLVE_JOB = SOLVER_REASON_RESOLVE_JOB;
2639   static const int SOLVER_REASON_UPDATE_INSTALLED = SOLVER_REASON_UPDATE_INSTALLED;
2640   static const int SOLVER_REASON_CLEANDEPS_ERASE = SOLVER_REASON_CLEANDEPS_ERASE;
2641   static const int SOLVER_REASON_RESOLVE = SOLVER_REASON_RESOLVE;
2642   static const int SOLVER_REASON_WEAKDEP = SOLVER_REASON_WEAKDEP;
2643   static const int SOLVER_REASON_RESOLVE_ORPHAN = SOLVER_REASON_RESOLVE_ORPHAN;
2644   static const int SOLVER_REASON_RECOMMENDED = SOLVER_REASON_RECOMMENDED;
2645   static const int SOLVER_REASON_SUPPLEMENTED = SOLVER_REASON_SUPPLEMENTED;
2646
2647   ~Solver() {
2648     solver_free($self);
2649   }
2650
2651   int set_flag(int flag, int value) {
2652     return solver_set_flag($self, flag, value);
2653   }
2654   int get_flag(int flag) {
2655     return solver_get_flag($self, flag);
2656   }
2657 #if defined(SWIGPYTHON)
2658   %pythoncode {
2659     def solve(self, jobs):
2660       j = []
2661       for job in jobs: j += [job.how, job.what]
2662       return self.solve_helper(j)
2663   }
2664 #endif
2665 #if defined(SWIGPERL)
2666   %perlcode {
2667     sub solv::Solver::solve {
2668       my ($self, $jobs) = @_;
2669       my @j = map {($_->{'how'}, $_->{'what'})} @$jobs;
2670       return $self->solve_helper(\@j);
2671     }
2672   }
2673 #endif
2674 #if defined(SWIGRUBY)
2675 %init %{
2676 rb_eval_string(
2677     "class Solv::Solver\n"
2678     "  def solve(jobs)\n"
2679     "    jl = []\n"
2680     "    jobs.each do |j| ; jl << j.how << j.what ; end\n"
2681     "    solve_helper(jl)\n"
2682     "  end\n"
2683     "end\n"
2684   );
2685 %}
2686 #endif
2687   %typemap(out) Queue solve_helper Queue2Array(Problem *, 1, new_Problem(arg1, id));
2688   %newobject solve_helper;
2689   Queue solve_helper(Queue jobs) {
2690     Queue q;
2691     int i, cnt;
2692     queue_init(&q);
2693     solver_solve($self, &jobs);
2694     cnt = solver_problem_count($self);
2695     for (i = 1; i <= cnt; i++)
2696       queue_push(&q, i);
2697     return q;
2698   }
2699   %newobject transaction;
2700   Transaction *transaction() {
2701     return solver_create_transaction($self);
2702   }
2703
2704   int describe_decision(XSolvable *s, XRule **OUTPUT) {
2705     int ruleid;
2706     int reason = solver_describe_decision($self, s->id, &ruleid);
2707     *OUTPUT = new_XRule($self, ruleid);
2708     return reason;
2709   }
2710 }
2711
2712 %extend Transaction {
2713   static const int SOLVER_TRANSACTION_IGNORE = SOLVER_TRANSACTION_IGNORE;
2714   static const int SOLVER_TRANSACTION_ERASE = SOLVER_TRANSACTION_ERASE;
2715   static const int SOLVER_TRANSACTION_REINSTALLED = SOLVER_TRANSACTION_REINSTALLED;
2716   static const int SOLVER_TRANSACTION_DOWNGRADED = SOLVER_TRANSACTION_DOWNGRADED;
2717   static const int SOLVER_TRANSACTION_CHANGED = SOLVER_TRANSACTION_CHANGED;
2718   static const int SOLVER_TRANSACTION_UPGRADED = SOLVER_TRANSACTION_UPGRADED;
2719   static const int SOLVER_TRANSACTION_OBSOLETED = SOLVER_TRANSACTION_OBSOLETED;
2720   static const int SOLVER_TRANSACTION_INSTALL = SOLVER_TRANSACTION_INSTALL;
2721   static const int SOLVER_TRANSACTION_REINSTALL = SOLVER_TRANSACTION_REINSTALL;
2722   static const int SOLVER_TRANSACTION_DOWNGRADE = SOLVER_TRANSACTION_DOWNGRADE;
2723   static const int SOLVER_TRANSACTION_CHANGE = SOLVER_TRANSACTION_CHANGE;
2724   static const int SOLVER_TRANSACTION_UPGRADE = SOLVER_TRANSACTION_UPGRADE;
2725   static const int SOLVER_TRANSACTION_OBSOLETES = SOLVER_TRANSACTION_OBSOLETES;
2726   static const int SOLVER_TRANSACTION_MULTIINSTALL = SOLVER_TRANSACTION_MULTIINSTALL;
2727   static const int SOLVER_TRANSACTION_MULTIREINSTALL = SOLVER_TRANSACTION_MULTIREINSTALL;
2728   static const int SOLVER_TRANSACTION_MAXTYPE = SOLVER_TRANSACTION_MAXTYPE;
2729   static const int SOLVER_TRANSACTION_SHOW_ACTIVE = SOLVER_TRANSACTION_SHOW_ACTIVE;
2730   static const int SOLVER_TRANSACTION_SHOW_ALL = SOLVER_TRANSACTION_SHOW_ALL;
2731   static const int SOLVER_TRANSACTION_SHOW_OBSOLETES = SOLVER_TRANSACTION_SHOW_OBSOLETES;
2732   static const int SOLVER_TRANSACTION_SHOW_MULTIINSTALL = SOLVER_TRANSACTION_SHOW_MULTIINSTALL;
2733   static const int SOLVER_TRANSACTION_CHANGE_IS_REINSTALL = SOLVER_TRANSACTION_CHANGE_IS_REINSTALL;
2734   static const int SOLVER_TRANSACTION_OBSOLETE_IS_UPGRADE = SOLVER_TRANSACTION_OBSOLETE_IS_UPGRADE;
2735   static const int SOLVER_TRANSACTION_MERGE_VENDORCHANGES = SOLVER_TRANSACTION_MERGE_VENDORCHANGES;
2736   static const int SOLVER_TRANSACTION_MERGE_ARCHCHANGES = SOLVER_TRANSACTION_MERGE_ARCHCHANGES;
2737   static const int SOLVER_TRANSACTION_RPM_ONLY = SOLVER_TRANSACTION_RPM_ONLY;
2738   static const int SOLVER_TRANSACTION_ARCHCHANGE = SOLVER_TRANSACTION_ARCHCHANGE;
2739   static const int SOLVER_TRANSACTION_VENDORCHANGE = SOLVER_TRANSACTION_VENDORCHANGE;
2740   static const int SOLVER_TRANSACTION_KEEP_ORDERDATA = SOLVER_TRANSACTION_KEEP_ORDERDATA;
2741   ~Transaction() {
2742     transaction_free($self);
2743   }
2744 #ifdef SWIGRUBY
2745   %rename("isempty?") isempty;
2746 #endif
2747   bool isempty() {
2748     return $self->steps.count == 0;
2749   }
2750
2751   %newobject othersolvable;
2752   XSolvable *othersolvable(XSolvable *s) {
2753     Id op = transaction_obs_pkg($self, s->id);
2754     return new_XSolvable($self->pool, op);
2755   }
2756
2757   %typemap(out) Queue allothersolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2758   %newobject allothersolvables;
2759   Queue allothersolvables(XSolvable *s) {
2760     Queue q;
2761     queue_init(&q);
2762     transaction_all_obs_pkgs($self, s->id, &q);
2763     return q;
2764   }
2765
2766   %typemap(out) Queue classify Queue2Array(TransactionClass *, 4, new_TransactionClass(arg1, arg2, id, idp[1], idp[2], idp[3]));
2767   %newobject classify;
2768   Queue classify(int mode = 0) {
2769     Queue q;
2770     queue_init(&q);
2771     transaction_classify($self, mode, &q);
2772     return q;
2773   }
2774
2775   # deprecated, use newsolvables instead
2776   %typemap(out) Queue newpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2777   %newobject newpackages;
2778   Queue newpackages() {
2779     Queue q;
2780     int cut;
2781     queue_init(&q);
2782     cut = transaction_installedresult(self, &q);
2783     queue_truncate(&q, cut);
2784     return q;
2785   }
2786
2787   # deprecated, use keptsolvables instead
2788   %typemap(out) Queue keptpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2789   %newobject keptpackages;
2790   Queue keptpackages() {
2791     Queue q;
2792     int cut;
2793     queue_init(&q);
2794     cut = transaction_installedresult(self, &q);
2795     if (cut)
2796       queue_deleten(&q, 0, cut);
2797     return q;
2798   }
2799
2800   %typemap(out) Queue newsolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2801   %newobject newsolvables;
2802   Queue newsolvables() {
2803     Queue q;
2804     int cut;
2805     queue_init(&q);
2806     cut = transaction_installedresult(self, &q);
2807     queue_truncate(&q, cut);
2808     return q;
2809   }
2810
2811   %typemap(out) Queue keptsolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2812   %newobject keptsolvables;
2813   Queue keptsolvables() {
2814     Queue q;
2815     int cut;
2816     queue_init(&q);
2817     cut = transaction_installedresult(self, &q);
2818     if (cut)
2819       queue_deleten(&q, 0, cut);
2820     return q;
2821   }
2822
2823   %typemap(out) Queue steps Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2824   %newobject steps;
2825   Queue steps() {
2826     Queue q;
2827     queue_init_clone(&q, &$self->steps);
2828     return q;
2829   }
2830
2831   int steptype(XSolvable *s, int mode) {
2832     return transaction_type($self, s->id, mode);
2833   }
2834   int calc_installsizechange() {
2835     return transaction_calc_installsizechange($self);
2836   }
2837   void order(int flags=0) {
2838     transaction_order($self, flags);
2839   }
2840 }
2841
2842 %extend TransactionClass {
2843   TransactionClass(Transaction *trans, int mode, Id type, int count, Id fromid, Id toid) {
2844     TransactionClass *cl = solv_calloc(1, sizeof(*cl));
2845     cl->transaction = trans;
2846     cl->mode = mode;
2847     cl->type = type;
2848     cl->count = count;
2849     cl->fromid = fromid;
2850     cl->toid = toid;
2851     return cl;
2852   }
2853   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->transaction->pool, id));
2854   %newobject solvables;
2855   Queue solvables() {
2856     Queue q;
2857     queue_init(&q);
2858     transaction_classify_pkgs($self->transaction, $self->mode, $self->type, $self->fromid, $self->toid, &q);
2859     return q;
2860   }
2861   const char * const fromstr;
2862   const char * const tostr;
2863   %{
2864     SWIGINTERN const char *TransactionClass_fromstr_get(TransactionClass *cl) {
2865       return pool_id2str(cl->transaction->pool, cl->fromid);
2866     }
2867     SWIGINTERN const char *TransactionClass_tostr_get(TransactionClass *cl) {
2868       return pool_id2str(cl->transaction->pool, cl->toid);
2869     }
2870   %}
2871 }
2872
2873 %extend XRule {
2874   XRule(Solver *solv, Id id) {
2875     if (!id)
2876       return 0;
2877     XRule *xr = solv_calloc(1, sizeof(*xr));
2878     xr->solv = solv;
2879     xr->id = id;
2880     return xr;
2881   }
2882   int const type;
2883   %{
2884     SWIGINTERN int XRule_type_get(XRule *xr) {
2885       return solver_ruleclass(xr->solv, xr->id);
2886     }
2887   %}
2888   %newobject info;
2889   Ruleinfo *info() {
2890     Id type, source, target, dep;
2891     type = solver_ruleinfo($self->solv, $self->id, &source, &target, &dep);
2892     return new_Ruleinfo($self, type, source, target, dep);
2893   }
2894   %typemap(out) Queue allinfos Queue2Array(Ruleinfo *, 4, new_Ruleinfo(arg1, id, idp[1], idp[2], idp[3]));
2895   %newobject allinfos;
2896   Queue allinfos() {
2897     Queue q;
2898     queue_init(&q);
2899     solver_allruleinfos($self->solv, $self->id, &q);
2900     return q;
2901   }
2902
2903   bool __eq__(XRule *xr) {
2904     return $self->solv == xr->solv && $self->id == xr->id;
2905   }
2906   bool __ne__(XRule *xr) {
2907     return !XRule___eq__($self, xr);
2908   }
2909   %newobject __repr__;
2910   const char *__repr__() {
2911     char buf[20];
2912     sprintf(buf, "<Rule #%d>", $self->id);
2913     return solv_strdup(buf);
2914   }
2915 }
2916
2917 %extend Ruleinfo {
2918   Ruleinfo(XRule *r, Id type, Id source, Id target, Id dep_id) {
2919     Ruleinfo *ri = solv_calloc(1, sizeof(*ri));
2920     ri->solv = r->solv;
2921     ri->rid = r->id;
2922     ri->type = type;
2923     ri->source = source;
2924     ri->target = target;
2925     ri->dep_id = dep_id;
2926     return ri;
2927   }
2928   %newobject solvable;
2929   XSolvable * const solvable;
2930   %newobject othersolvable;
2931   XSolvable * const othersolvable;
2932   %newobject dep;
2933   Dep * const dep;
2934   %{
2935     SWIGINTERN XSolvable *Ruleinfo_solvable_get(Ruleinfo *ri) {
2936       return new_XSolvable(ri->solv->pool, ri->source);
2937     }
2938     SWIGINTERN XSolvable *Ruleinfo_othersolvable_get(Ruleinfo *ri) {
2939       return new_XSolvable(ri->solv->pool, ri->target);
2940     }
2941     SWIGINTERN Dep *Ruleinfo_dep_get(Ruleinfo *ri) {
2942       return new_Dep(ri->solv->pool, ri->dep_id);
2943     }
2944   %}
2945   const char *problemstr() {
2946     return solver_problemruleinfo2str($self->solv, $self->type, $self->source, $self->target, $self->dep_id);
2947   }
2948 }
2949
2950 %extend XRepodata {
2951   XRepodata(Repo *repo, Id id) {
2952     XRepodata *xr = solv_calloc(1, sizeof(*xr));
2953     xr->repo = repo;
2954     xr->id = id;
2955     return xr;
2956   }
2957   Id new_handle() {
2958     return repodata_new_handle(repo_id2repodata($self->repo, $self->id));
2959   }
2960   void set_id(Id solvid, Id keyname, DepId id) {
2961     repodata_set_id(repo_id2repodata($self->repo, $self->id), solvid, keyname, id);
2962   }
2963   void set_str(Id solvid, Id keyname, const char *str) {
2964     repodata_set_str(repo_id2repodata($self->repo, $self->id), solvid, keyname, str);
2965   }
2966   void set_poolstr(Id solvid, Id keyname, const char *str) {
2967     repodata_set_poolstr(repo_id2repodata($self->repo, $self->id), solvid, keyname, str);
2968   }
2969   void add_idarray(Id solvid, Id keyname, DepId id) {
2970     repodata_add_idarray(repo_id2repodata($self->repo, $self->id), solvid, keyname, id);
2971   }
2972   void add_flexarray(Id solvid, Id keyname, Id handle) {
2973     repodata_add_flexarray(repo_id2repodata($self->repo, $self->id), solvid, keyname, handle);
2974   }
2975   void set_checksum(Id solvid, Id keyname, Chksum *chksum) {
2976     const unsigned char *buf = solv_chksum_get(chksum, 0);
2977     if (buf)
2978       repodata_set_bin_checksum(repo_id2repodata($self->repo, $self->id), solvid, keyname, solv_chksum_get_type(chksum), buf);
2979   }
2980   const char *lookup_str(Id solvid, Id keyname) {
2981     return repodata_lookup_str(repo_id2repodata($self->repo, $self->id), solvid, keyname);
2982   }
2983   Queue lookup_idarray(Id solvid, Id keyname) {
2984     Queue r;
2985     queue_init(&r);
2986     repodata_lookup_idarray(repo_id2repodata($self->repo, $self->id), solvid, keyname, &r);
2987     return r;
2988   }
2989   %newobject lookup_checksum;
2990   Chksum *lookup_checksum(Id solvid, Id keyname) {
2991     Id type = 0;
2992     const unsigned char *b = repodata_lookup_bin_checksum(repo_id2repodata($self->repo, $self->id), solvid, keyname, &type);
2993     return solv_chksum_create_from_bin(type, b);
2994   }
2995   void internalize() {
2996     repodata_internalize(repo_id2repodata($self->repo, $self->id));
2997   }
2998   void create_stubs() {
2999     Repodata *data = repo_id2repodata($self->repo, $self->id);
3000     data = repodata_create_stubs(data);
3001     $self->id = data->repodataid;
3002   }
3003   bool write(FILE *fp) {
3004     return repodata_write(repo_id2repodata($self->repo, $self->id), fp) == 0;
3005   }
3006   bool add_solv(FILE *fp, int flags = 0) {
3007     Repodata *data = repo_id2repodata($self->repo, $self->id);
3008     int r, oldstate = data->state;
3009     data->state = REPODATA_LOADING;
3010     r = repo_add_solv(data->repo, fp, flags | REPO_USE_LOADING);
3011     if (r || data->state == REPODATA_LOADING)
3012       data->state = oldstate;
3013     return r;
3014   }
3015   void extend_to_repo() {
3016     Repodata *data = repo_id2repodata($self->repo, $self->id);
3017     repodata_extend_block(data, data->repo->start, data->repo->end - data->repo->start);
3018   }
3019   bool __eq__(XRepodata *xr) {
3020     return $self->repo == xr->repo && $self->id == xr->id;
3021   }
3022   bool __ne__(XRepodata *xr) {
3023     return !XRepodata___eq__($self, xr);
3024   }
3025   %newobject __repr__;
3026   const char *__repr__() {
3027     char buf[20];
3028     sprintf(buf, "<Repodata #%d>", $self->id);
3029     return solv_strdup(buf);
3030   }
3031 }
3032
3033 #ifdef ENABLE_PUBKEY
3034 %extend Solvsig {
3035   Solvsig(FILE *fp) {
3036     return solvsig_create(fp);
3037   }
3038   ~Solvsig() {
3039     solvsig_free($self);
3040   }
3041   %newobject Chksum;
3042   Chksum *Chksum() {
3043     return $self->htype ? (Chksum *)solv_chksum_create($self->htype) : 0;
3044   }
3045 #ifdef ENABLE_PGPVRFY
3046   %newobject verify;
3047   XSolvable *verify(Repo *repo, Chksum *chksum) {
3048     Id p = solvsig_verify($self, repo, chksum);
3049     return new_XSolvable(repo->pool, p);
3050   }
3051 #endif
3052 }
3053 #endif