bindings/solv.i

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