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