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