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