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