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