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