examples/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, items - (argvi + $1.count + 1) + 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, items - (argvi + cnt + 1) + 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($input)->len;
 147   i = 0;
 148   o = RARRAY($input)->ptr;
 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       SWIG_croak("list must contain only integers");
 154     queue_push(&$1, v);
 155   }
 156 }
 157 %typemap(out) Queue {
 158   int i;
 159   VALUE o = rb_ary_new2($1.count);
 160   for (i = 0; i < $1.count; i++)
 161     rb_ary_store(o, i, SWIG_From_int($1.elements[i]));
 162   queue_free(&$1);
 163   $result = o;
 164 }
 165 %typemap(arginit) Queue {
 166   queue_init(&$1);
 167 }
 168 %typemap(freearg) Queue {
 169   queue_free(&$1);
 170 }
 171 %define Queue2Array(type, step, con) %{
 172   int i;
 173   int cnt = $1.count / step;
 174   Id *idp = $1.elements;
 175   VALUE o = rb_ary_new2(cnt);
 176   for (i = 0; i < cnt; i++, idp += step)
 177     {
 178       Id id = *idp;
 179 #define result resultx
 180       type result = con;
 181       $typemap(out, type)
 182       rb_ary_store(o, i, $result);
 183 #undef result
 184     }
 185   queue_free(&$1);
 186   $result = o;
 187 %}
 188 %enddef
 189 #endif
 190
 191
 192
 193
 194 #if defined(SWIGPERL)
 195
 196 # work around a swig bug
 197 %{
 198 #undef SWIG_CALLXS
 199 #ifdef PERL_OBJECT
 200 #  define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(cv,pPerl)
 201 #else
 202 #  ifndef MULTIPLICITY
 203 #    define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(cv)
 204 #  else
 205 #    define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(PERL_GET_THX, cv)
 206 #  endif
 207 #endif
 208 %}
 209
 210
 211 %define perliter(class)
 212   %perlcode {
 213     sub class##::FETCH {
 214       my $i = ${##class##::ITERATORS}{$_[0]};
 215       if ($i) {
 216         $_[1] == $i->[0] - 1 ? $i->[1] : undef;
 217       } else {
 218         $_[0]->__getitem__($_[1]);
 219       }
 220     }
 221     sub class##::FETCHSIZE {
 222       my $i = ${##class##::ITERATORS}{$_[0]};
 223       if ($i) {
 224         ($i->[1] = $_[0]->__next__()) ? ++$i->[0]  : 0;
 225       } else {
 226         $_[0]->__len__();
 227       }
 228     }
 229   }
 230 %enddef
 231
 232 %{
 233
 234 #define SWIG_PERL_ITERATOR      0x80
 235
 236 SWIGRUNTIMEINLINE SV *
 237 SWIG_Perl_NewArrayObj(SWIG_MAYBE_PERL_OBJECT void *ptr, swig_type_info *t, int flags) {
 238   SV *result = sv_newmortal();
 239   if (ptr && (flags & (SWIG_SHADOW | SWIG_POINTER_OWN))) {
 240     SV *self;
 241     SV *obj=newSV(0);
 242     AV *array=newAV();
 243     HV *stash;
 244     sv_setref_pv(obj, (char *) SWIG_Perl_TypeProxyName(t), ptr);
 245     stash=SvSTASH(SvRV(obj));
 246     if (flags & SWIG_POINTER_OWN) {
 247       HV *hv;
 248       GV *gv=*(GV**)hv_fetch(stash, "OWNER", 5, TRUE);
 249       if (!isGV(gv))
 250         gv_init(gv, stash, "OWNER", 5, FALSE);
 251       hv=GvHVn(gv);
 252       hv_store_ent(hv, obj, newSViv(1), 0);
 253     }
 254     if (flags & SWIG_PERL_ITERATOR) {
 255       HV *hv;
 256       GV *gv=*(GV**)hv_fetch(stash, "ITERATORS", 9, TRUE);
 257       AV *av=newAV();
 258       if (!isGV(gv))
 259         gv_init(gv, stash, "ITERATORS", 9, FALSE);
 260       hv=GvHVn(gv);
 261       hv_store_ent(hv, obj, newRV_inc((SV *)av), 0);
 262     }
 263     sv_magic((SV *)array, (SV *)obj, 'P', Nullch, 0);
 264     SvREFCNT_dec(obj);
 265     self=newRV_noinc((SV *)array);
 266     sv_setsv(result, self);
 267     SvREFCNT_dec((SV *)self);
 268     sv_bless(result, stash);
 269   } else {
 270     sv_setref_pv(result, (char *) SWIG_Perl_TypeProxyName(t), ptr);
 271   }
 272   return result;
 273 }
 274
 275 %}
 276
 277 %typemap(out) Perlarray {
 278   ST(argvi) = SWIG_Perl_NewArrayObj(SWIG_PERL_OBJECT_CALL SWIG_as_voidptr(result), $1_descriptor, $owner | $shadow); argvi++;
 279 }
 280 %typemap(out) Perliterator {
 281   ST(argvi) = SWIG_Perl_NewArrayObj(SWIG_PERL_OBJECT_CALL SWIG_as_voidptr(result), $1_descriptor, $owner | $shadow | SWIG_PERL_ITERATOR); argvi++;
 282 }
 283
 284 %typemap(out) Pool_solvable_iterator * = Perlarray;
 285 %typemap(out) Pool_solvable_iterator * solvables_iter = Perliterator;
 286 %typemap(out) Pool_repo_iterator * = Perlarray;
 287 %typemap(out) Pool_repo_iterator * repos_iter = Perliterator;
 288 %typemap(out) Repo_solvable_iterator * = Perlarray;
 289 %typemap(out) Repo_solvable_iterator * solvables_iter = Perliterator;
 290 %typemap(out) Dataiterator * = Perliterator;
 291
 292 #endif
 293
 294
 295
 296 #if defined(SWIGPYTHON)
 297 typedef PyObject *AppObjectPtr;
 298 %typemap(out) AppObjectPtr {
 299   $result = $1;
 300   Py_INCREF($result);
 301 }
 302 #endif
 303 #if defined(SWIGPERL)
 304 typedef SV *AppObjectPtr;
 305 %typemap(in) AppObjectPtr {
 306   $1 = SvROK($input) ? SvRV($input) : 0;
 307 }
 308 %typemap(out) AppObjectPtr {
 309   $result = $1 ? newRV_inc($1) : newSV(0);
 310   argvi++;
 311 }
 312 #endif
 313 #if defined(SWIGRUBY)
 314 typedef VALUE AppObjectPtr;
 315 %typemap(in) AppObjectPtr {
 316   $1 = (void *)$input;
 317 }
 318 %typemap(out) AppObjectPtr {
 319   $result = (VALUE)$1;
 320 }
 321 #endif
 322
 323
 324 %include "cdata.i"
 325 #ifndef SWIGPERL
 326 %include "file.i"
 327 #endif
 328 %include "typemaps.i"
 329
 330 %{
 331 #include "stdio.h"
 332 #include "sys/stat.h"
 333
 334 #include "pool.h"
 335 #include "solver.h"
 336 #include "policy.h"
 337 #include "solverdebug.h"
 338 #include "repo_solv.h"
 339 #include "chksum.h"
 340
 341 #ifndef DEBIAN
 342 #include "repo_rpmdb.h"
 343 #endif
 344 #include "repo_deb.h"
 345 #include "repo_rpmmd.h"
 346 #include "repo_write.h"
 347 #include "repo_products.h"
 348 #include "repo_susetags.h"
 349 #include "repo_updateinfoxml.h"
 350 #include "repo_deltainfoxml.h"
 351 #include "repo_repomdxml.h"
 352 #include "repo_content.h"
 353 #include "sat_xfopen.h"
 354
 355 #define true 1
 356 #define false 1
 357
 358 #define SOLVER_SOLUTION_ERASE                   -100
 359 #define SOLVER_SOLUTION_REPLACE                 -101
 360 #define SOLVER_SOLUTION_REPLACE_DOWNGRADE       -102
 361 #define SOLVER_SOLUTION_REPLACE_ARCHCHANGE      -103
 362 #define SOLVER_SOLUTION_REPLACE_VENDORCHANGE    -104
 363
 364 typedef struct chksum Chksum;
 365 typedef int bool;
 366 typedef void *AppObjectPtr;
 367
 368 typedef struct {
 369   Pool *pool;
 370   Id id;
 371 } Dep;
 372
 373 typedef struct {
 374   Pool *pool;
 375   Id id;
 376 } XSolvable;
 377
 378 typedef struct {
 379   Solver *solv;
 380   Id id;
 381 } XRule;
 382
 383 typedef struct {
 384   Repo *repo;
 385   Id id;
 386 } XRepodata;
 387
 388 typedef struct {
 389   Pool *pool;
 390   Id id;
 391 } Pool_solvable_iterator;
 392
 393 typedef struct {
 394   Pool *pool;
 395   Id id;
 396 } Pool_repo_iterator;
 397
 398 typedef struct {
 399   Repo *repo;
 400   Id id;
 401 } Repo_solvable_iterator;
 402
 403 typedef struct {
 404   Pool *pool;
 405   int how;
 406   Id what;
 407 } Job;
 408
 409 typedef struct {
 410   Solver *solv;
 411   Id id;
 412 } Problem;
 413
 414 typedef struct {
 415   Solver *solv;
 416   Id problemid;
 417   Id id;
 418 } Solution;
 419
 420 typedef struct {
 421   Solver *solv;
 422   Id problemid;
 423   Id solutionid;
 424   Id id;
 425
 426   Id type;
 427   Id p;
 428   Id rp;
 429 } Solutionelement;
 430
 431 typedef struct {
 432   Solver *solv;
 433   Id rid;
 434   Id type;
 435   Id source;
 436   Id target;
 437   Id dep;
 438 } Ruleinfo;
 439
 440 typedef struct {
 441   Transaction *transaction;
 442   int mode;
 443   Id type;
 444   int count;
 445   Id fromid;
 446   Id toid;
 447 } TransactionClass;
 448
 449 typedef Dataiterator Datamatch;
 450
 451 %}
 452
 453 #ifdef SWIGRUBY
 454 %mixin Dataiterator "Enumerable";
 455 %mixin Pool_solvable_iterator "Enumerable";
 456 %mixin Pool_repo_iterator "Enumerable";
 457 %mixin Repo_solvable_iterator "Enumerable";
 458 #endif
 459
 460 typedef int Id;
 461
 462 %include "knownid.h"
 463
 464 # from repodata.h
 465 %constant Id SOLVID_META;
 466 %constant Id SOLVID_POS;
 467
 468 %constant int REL_EQ;
 469 %constant int REL_GT;
 470 %constant int REL_LT;
 471 %constant int REL_ARCH;
 472
 473 typedef struct {
 474   Pool* const pool;
 475   Id const id;
 476 } Dep;
 477
 478 typedef struct {
 479   Pool* const pool;
 480   Id const id;
 481 } XSolvable;
 482
 483 typedef struct {
 484   Solver* const solv;
 485   Id const type;
 486   Id const dep;
 487 } Ruleinfo;
 488
 489 typedef struct {
 490   Solver* const solv;
 491   Id const id;
 492 } XRule;
 493
 494 typedef struct {
 495   Repo* const repo;
 496   Id const id;
 497 } XRepodata;
 498
 499 # put before pool/repo so we can access the constructor
 500 %nodefaultdtor Dataiterator;
 501 typedef struct {} Dataiterator;
 502 typedef struct {} Pool_solvable_iterator;
 503 typedef struct {} Pool_repo_iterator;
 504 typedef struct {} Repo_solvable_iterator;
 505
 506 %nodefaultctor Datamatch;
 507 %nodefaultdtor Datamatch;
 508 typedef struct {
 509   Pool * const pool;
 510   Repo * const repo;
 511   Id const solvid;
 512 } Datamatch;
 513
 514 %nodefaultctor Datapos;
 515 typedef struct {
 516   Repo * const repo;
 517 } Datapos;
 518
 519 typedef struct {
 520   Pool * const pool;
 521   int how;
 522   Id what;
 523 } Job;
 524
 525 %nodefaultctor Pool;
 526 %nodefaultdtor Pool;
 527 typedef struct {
 528   AppObjectPtr appdata;
 529 } Pool;
 530
 531 %nodefaultctor Repo;
 532 %nodefaultdtor Repo;
 533 typedef struct _Repo {
 534   Pool * const pool;
 535   const char * const name;
 536   int priority;
 537   int subpriority;
 538   int const nsolvables;
 539   AppObjectPtr appdata;
 540 } Repo;
 541
 542 %nodefaultctor Solver;
 543 %nodefaultdtor Solver;
 544 typedef struct {
 545   Pool * const pool;
 546   bool fixsystem;
 547   bool allowdowngrade;
 548   bool allowarchchange;
 549   bool allowvendorchange;
 550   bool allowuninstall;
 551   bool updatesystem;
 552   bool noupdateprovide;
 553   bool dosplitprovides;
 554   bool dontinstallrecommended;
 555   bool ignorealreadyrecommended;
 556   bool dontshowinstalledrecommended;
 557   bool distupgrade;
 558   bool distupgrade_removeunsupported;
 559   bool noinfarchcheck;
 560 } Solver;
 561
 562 typedef struct chksum {
 563 } Chksum;
 564
 565 %rename(xfopen) sat_xfopen;
 566 %rename(xfopen_fd) sat_xfopen_fd;
 567 %rename(xfopen_dup) sat_xfopen_dup;
 568 %rename(xfclose) sat_xfclose;
 569 %rename(xfileno) sat_xfileno;
 570
 571 FILE *sat_xfopen(const char *fn, const char *mode = 0);
 572 FILE *sat_xfopen_fd(const char *fn, int fd, const char *mode = 0);
 573 FILE *sat_xfopen_dup(const char *fn, int fd, const char *mode = 0);
 574 int sat_xfclose(FILE *fp);
 575 int sat_xfileno(FILE *fp);
 576
 577 %{
 578   SWIGINTERN int sat_xfclose(FILE *fp) {
 579     return fclose(fp);
 580   }
 581   SWIGINTERN int sat_xfileno(FILE *fp) {
 582     return fileno(fp);
 583   }
 584   SWIGINTERN FILE *sat_xfopen_dup(const char *fn, int fd, const char *mode) {
 585     fd = dup(fd);
 586     return fd == -1 ? 0 : sat_xfopen_fd(fn, fd, mode);
 587   }
 588 %}
 589
 590 typedef struct {
 591   Solver * const solv;
 592   Id const id;
 593 } Problem;
 594
 595 typedef struct {
 596   Solver * const solv;
 597   Id const problemid;
 598   Id const id;
 599 } Solution;
 600
 601 typedef struct {
 602   Solver *const solv;
 603   Id const problemid;
 604   Id const solutionid;
 605   Id const id;
 606   Id const type;
 607 } Solutionelement;
 608
 609 %nodefaultctor Transaction;
 610 %nodefaultdtor Transaction;
 611 typedef struct {
 612   Pool * const pool;
 613 } Transaction;
 614
 615 typedef struct {
 616   Transaction * const transaction;
 617   Id const type;
 618   Id const fromid;
 619   Id const toid;
 620   int const count;
 621 } TransactionClass;
 622
 623
 624 %extend Job {
 625   static const Id SOLVER_SOLVABLE = SOLVER_SOLVABLE;
 626   static const Id SOLVER_SOLVABLE_NAME = SOLVER_SOLVABLE_NAME;
 627   static const Id SOLVER_SOLVABLE_PROVIDES = SOLVER_SOLVABLE_PROVIDES;
 628   static const Id SOLVER_SOLVABLE_ONE_OF = SOLVER_SOLVABLE_ONE_OF;
 629   static const Id SOLVER_SOLVABLE_REPO = SOLVER_SOLVABLE_REPO;
 630   static const Id SOLVER_SOLVABLE_ALL = SOLVER_SOLVABLE_ALL;
 631   static const Id SOLVER_SELECTMASK = SOLVER_SELECTMASK;
 632   static const Id SOLVER_NOOP = SOLVER_NOOP;
 633   static const Id SOLVER_INSTALL = SOLVER_INSTALL;
 634   static const Id SOLVER_ERASE = SOLVER_ERASE;
 635   static const Id SOLVER_UPDATE = SOLVER_UPDATE;
 636   static const Id SOLVER_WEAKENDEPS = SOLVER_WEAKENDEPS;
 637   static const Id SOLVER_NOOBSOLETES = SOLVER_NOOBSOLETES;
 638   static const Id SOLVER_LOCK = SOLVER_LOCK;
 639   static const Id SOLVER_DISTUPGRADE = SOLVER_DISTUPGRADE;
 640   static const Id SOLVER_VERIFY = SOLVER_VERIFY;
 641   static const Id SOLVER_DROP_ORPHANED = SOLVER_DROP_ORPHANED;
 642   static const Id SOLVER_USERINSTALLED = SOLVER_USERINSTALLED;
 643   static const Id SOLVER_JOBMASK = SOLVER_JOBMASK;
 644   static const Id SOLVER_WEAK = SOLVER_WEAK;
 645   static const Id SOLVER_ESSENTIAL = SOLVER_ESSENTIAL;
 646   static const Id SOLVER_CLEANDEPS = SOLVER_CLEANDEPS;
 647   static const Id SOLVER_SETEV = SOLVER_SETEV;
 648   static const Id SOLVER_SETEVR = SOLVER_SETEVR;
 649   static const Id SOLVER_SETARCH = SOLVER_SETARCH;
 650   static const Id SOLVER_SETVENDOR = SOLVER_SETVENDOR;
 651   static const Id SOLVER_SETREPO = SOLVER_SETREPO;
 652   static const Id SOLVER_NOAUTOSET = SOLVER_NOAUTOSET;
 653   static const Id SOLVER_SETMASK = SOLVER_SETMASK;
 654
 655   Job(Pool *pool, int how, Id what) {
 656     Job *job = sat_calloc(1, sizeof(*job));
 657     job->pool = pool;
 658     job->how = how;
 659     job->what = what;
 660     return job;
 661   }
 662
 663   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
 664   %newobject solvables;
 665   Queue solvables() {
 666     Pool *pool = $self->pool;
 667     Id p, pp, how;
 668     Queue q;
 669     queue_init(&q);
 670     how = $self->how & SOLVER_SELECTMASK;
 671     FOR_JOB_SELECT(p, pp, how, $self->what)
 672       queue_push(&q, p);
 673     return q;
 674   }
 675
 676   const char *str() {
 677     return pool_job2str($self->pool, $self->how, $self->what, 0);
 678   }
 679
 680   bool __eq__(Job *j) {
 681     return $self->pool == j->pool && $self->how == j->how && $self->what == j->what;
 682   }
 683   bool __ne__(Job *j) {
 684     return !Job___eq__($self, j);
 685   }
 686   const char *__str__() {
 687     return pool_job2str($self->pool, $self->how, $self->what, 0);
 688   }
 689   const char *__repr__() {
 690     const char *str = pool_job2str($self->pool, $self->how, $self->what, ~0);
 691     return pool_tmpjoin($self->pool, "<Job ", str, ">");
 692   }
 693 }
 694
 695 %extend Chksum {
 696   Chksum(Id type) {
 697     return (Chksum *)sat_chksum_create(type);
 698   }
 699   Chksum(Id type, const char *hex) {
 700     unsigned char buf[64];
 701     int l = sat_chksum_len(type);
 702     if (!l)
 703       return 0;
 704     if (sat_hex2bin(&hex, buf, sizeof(buf)) != l || hex[0])
 705       return 0;
 706     return (Chksum *)sat_chksum_create_from_bin(type, buf);
 707   }
 708   ~Chksum() {
 709     sat_chksum_free($self, 0);
 710   }
 711   Id const type;
 712   %{
 713   SWIGINTERN Id Chksum_type_get(Chksum *chksum) {
 714     return sat_chksum_get_type(chksum);
 715   }
 716   %}
 717   void add(const char *str) {
 718     sat_chksum_add($self, str, strlen((char *)str));
 719   }
 720   void add_fp(FILE *fp) {
 721     char buf[4096];
 722     int l;
 723     while ((l = fread(buf, 1, sizeof(buf), fp)) > 0)
 724       sat_chksum_add($self, buf, l);
 725     rewind(fp);         /* convenience */
 726   }
 727   void add_fd(int fd) {
 728     char buf[4096];
 729     int l;
 730     while ((l = read(fd, buf, sizeof(buf))) > 0)
 731       sat_chksum_add($self, buf, l);
 732     lseek(fd, 0, 0);    /* convenience */
 733   }
 734   void add_stat(const char *filename) {
 735     struct stat stb;
 736     if (stat(filename, &stb))
 737       memset(&stb, 0, sizeof(stb));
 738     sat_chksum_add($self, &stb.st_dev, sizeof(stb.st_dev));
 739     sat_chksum_add($self, &stb.st_ino, sizeof(stb.st_ino));
 740     sat_chksum_add($self, &stb.st_size, sizeof(stb.st_size));
 741     sat_chksum_add($self, &stb.st_mtime, sizeof(stb.st_mtime));
 742   }
 743   SWIGCDATA raw() {
 744     int l;
 745     const unsigned char *b;
 746     b = sat_chksum_get($self, &l);
 747     return cdata_void((void *)b, l);
 748   }
 749   %newobject hex;
 750   char *hex() {
 751     int l;
 752     const unsigned char *b;
 753     char *ret, *rp;
 754
 755     b = sat_chksum_get($self, &l);
 756     ret = sat_malloc(2 * l + 1);
 757     sat_bin2hex(b, l, ret);
 758     return ret;
 759   }
 760
 761   bool __eq__(Chksum *chk) {
 762     int l;
 763     const unsigned char *b, *bo;
 764     if (!chk)
 765       return 0;
 766     if (sat_chksum_get_type($self) != sat_chksum_get_type(chk))
 767       return 0;
 768     b = sat_chksum_get($self, &l);
 769     bo = sat_chksum_get(chk, 0);
 770     return memcmp(b, bo, l) == 0;
 771   }
 772   bool __ne__(Chksum *chk) {
 773     return !Chksum___eq__($self, chk);
 774   }
 775 #if defined(SWIGRUBY)
 776   %rename("to_s") __str__;
 777   %rename("inspect") __repr__;
 778 #endif
 779   %newobject __str__;
 780   const char *__str__() {
 781     const char *str;
 782     const char *h = 0;
 783     if (sat_chksum_isfinished($self))
 784       h = Chksum_hex($self);
 785     str = sat_dupjoin(sat_chksum_type2str(sat_chksum_get_type($self)), ":", h ? h : "unfinished");
 786     sat_free((void *)h);
 787     return str;
 788   }
 789   %newobject __repr__;
 790   const char *__repr__() {
 791     const char *h = Chksum___str__($self);
 792     const char *str = sat_dupjoin("<Chksum ", h, ">");
 793     sat_free((void *)h);
 794     return str;
 795   }
 796 }
 797
 798 %extend Pool {
 799   Pool() {
 800     Pool *pool = pool_create();
 801     return pool;
 802   }
 803   ~Pool() {
 804   }
 805   void set_debuglevel(int level) {
 806     pool_setdebuglevel($self, level);
 807   }
 808 #if defined(SWIGPYTHON)
 809   %{
 810   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
 811     XRepodata *xd = new_XRepodata(data->repo, data - data->repo->repodata);
 812     PyObject *args = Py_BuildValue("(O)", SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_POINTER_OWN | 0));
 813     PyObject *result = PyEval_CallObject((PyObject *)d, args);
 814     int ecode = 0;
 815     int vresult = 0;
 816     Py_DECREF(args);
 817     if (!result)
 818       return 0; /* exception */
 819     ecode = SWIG_AsVal_int(result, &vresult);
 820     Py_DECREF(result);
 821     return SWIG_IsOK(ecode) ? vresult : 0;
 822   }
 823   %}
 824   void set_loadcallback(PyObject *callable) {
 825     if ($self->loadcallback == loadcallback)
 826       Py_DECREF($self->loadcallbackdata);
 827     if (callable)
 828       Py_INCREF(callable);
 829     pool_setloadcallback($self, callable ? loadcallback : 0, callable);
 830   }
 831 #endif
 832 #if defined(SWIGPERL)
 833 %{
 834   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
 835     int count;
 836     int ret = 0;
 837     dSP;
 838     XRepodata *xd = new_XRepodata(data->repo, data - data->repo->repodata);
 839
 840     ENTER;
 841     SAVETMPS;
 842     PUSHMARK(SP);
 843     XPUSHs(SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_OWNER | SWIG_SHADOW));
 844     PUTBACK;
 845     count = perl_call_sv((SV *)d, G_EVAL|G_SCALAR);
 846     SPAGAIN;
 847     if (count)
 848       ret = POPi;
 849     PUTBACK;
 850     FREETMPS;
 851     LEAVE;
 852     return ret;
 853   }
 854 %}
 855   void set_loadcallback(SV *callable) {
 856     if ($self->loadcallback == loadcallback)
 857       SvREFCNT_dec($self->loadcallbackdata);
 858     if (callable)
 859       SvREFCNT_inc(callable);
 860     pool_setloadcallback($self, callable ? loadcallback : 0, callable);
 861   }
 862 #endif
 863
 864 #if defined(SWIGRUBY)
 865 %{
 866   SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
 867     XRepodata *xd = new_XRepodata(data->repo, data - data->repo->repodata);
 868     VALUE callable = (VALUE)d;
 869     VALUE rd = SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_POINTER_OWN | 0);
 870     VALUE res = rb_funcall(callable, rb_intern("call"), 1, rd);
 871     return res == Qtrue;
 872   }
 873   SWIGINTERN void mark_Pool(void *ptr) {
 874     Pool *pool = ptr;
 875     if (pool->loadcallback == loadcallback && pool->loadcallbackdata) {
 876       VALUE callable = (VALUE)pool->loadcallbackdata;
 877       rb_gc_mark(callable);
 878     }
 879   }
 880 %}
 881   %typemap(in, numinputs=0) VALUE callable {
 882     $1 = rb_block_given_p() ? rb_block_proc() : 0;
 883   }
 884   void set_loadcallback(VALUE callable) {
 885     pool_setloadcallback($self, callable ? loadcallback : 0, (void *)callable);
 886   }
 887 #endif
 888
 889   void free() {
 890     Pool_set_loadcallback($self, 0);
 891     pool_free($self);
 892   }
 893   Id str2id(const char *str, bool create=1) {
 894     return pool_str2id($self, str, create);
 895   }
 896   const char *id2str(Id id) {
 897     return pool_id2str($self, id);
 898   }
 899   const char *dep2str(Id id) {
 900     return pool_dep2str($self, id);
 901   }
 902   Id rel2id(Id name, Id evr, int flags, bool create=1) {
 903     return pool_rel2id($self, name, evr, flags, create);
 904   }
 905   Id id2langid(Id id, const char *lang, bool create=1) {
 906     return pool_id2langid($self, id, lang, create);
 907   }
 908   void setarch(const char *arch) {
 909     pool_setarch($self, arch);
 910   }
 911   Repo *add_repo(const char *name) {
 912     return repo_create($self, name);
 913   }
 914   const char *lookup_str(Id entry, Id keyname) {
 915     return pool_lookup_str($self, entry, keyname);
 916   }
 917   Id lookup_id(Id entry, Id keyname) {
 918     return pool_lookup_id($self, entry, keyname);
 919   }
 920   unsigned int lookup_num(Id entry, Id keyname, unsigned int notfound = 0) {
 921     return pool_lookup_num($self, entry, keyname, notfound);
 922   }
 923   bool lookup_void(Id entry, Id keyname) {
 924     return pool_lookup_void($self, entry, keyname);
 925   }
 926   %newobject lookup_checksum;
 927   Chksum *lookup_checksum(Id entry, Id keyname) {
 928     Id type = 0;
 929     const unsigned char *b = pool_lookup_bin_checksum($self, entry, keyname, &type);
 930     return sat_chksum_create_from_bin(type, b);
 931   }
 932
 933   %newobject Dataiterator;
 934   Dataiterator *Dataiterator(Id p, Id key, const char *match, int flags) {
 935     return new_Dataiterator($self, 0, p, key, match, flags);
 936   }
 937   const char *solvid2str(Id solvid) {
 938     return pool_solvid2str($self, solvid);
 939   }
 940   void addfileprovides() {
 941     pool_addfileprovides($self);
 942   }
 943   Queue addfileprovides_ids() {
 944     Queue r;
 945     Id *addedfileprovides = 0;
 946     queue_init(&r);
 947     pool_addfileprovides_ids($self, $self->installed, &addedfileprovides);
 948     if (addedfileprovides) {
 949       for (; *addedfileprovides; addedfileprovides++)
 950         queue_push(&r, *addedfileprovides);
 951     }
 952     return r;
 953   }
 954   void createwhatprovides() {
 955     pool_createwhatprovides($self);
 956   }
 957
 958   XSolvable *id2solvable(Id id) {
 959     return new_XSolvable($self, id);
 960   }
 961   %newobject solvables;
 962   Pool_solvable_iterator * const solvables;
 963   %{
 964   SWIGINTERN Pool_solvable_iterator * Pool_solvables_get(Pool *pool) {
 965     return new_Pool_solvable_iterator(pool);
 966   }
 967   %}
 968   %newobject solvables_iter;
 969   Pool_solvable_iterator * solvables_iter() {
 970     return new_Pool_solvable_iterator($self);
 971   }
 972
 973   Repo *id2repo(Id id) {
 974     if (id < 1 || id > $self->nrepos)
 975       return 0;
 976     return pool_id2repo($self, id);
 977   }
 978   %newobject repos;
 979   Pool_repo_iterator * const repos;
 980   %{
 981   SWIGINTERN Pool_repo_iterator * Pool_repos_get(Pool *pool) {
 982     return new_Pool_repo_iterator(pool);
 983   }
 984   %}
 985   %newobject repos_iter;
 986   Pool_repo_iterator * repos_iter() {
 987     return new_Pool_repo_iterator($self);
 988   }
 989
 990   Repo *installed;
 991   %{
 992   SWIGINTERN void Pool_installed_set(Pool *pool, Repo *installed) {
 993     pool_set_installed(pool, installed);
 994   }
 995   Repo *Pool_installed_get(Pool *pool) {
 996     return pool->installed;
 997   }
 998   %}
 999
1000   Queue matchprovidingids(const char *match, int flags) {
1001     Pool *pool = $self;
1002     Queue q;
1003     Id id;
1004     queue_init(&q);
1005     if (!flags) {
1006       for (id = 1; id < pool->ss.nstrings; id++)
1007         if (pool->whatprovides[id])
1008           queue_push(&q, id);
1009     } else {
1010       Datamatcher ma;
1011       if (!datamatcher_init(&ma, match, flags)) {
1012         for (id = 1; id < pool->ss.nstrings; id++)
1013           if (pool->whatprovides[id] && datamatcher_match(&ma, id2str(pool, id)))
1014             queue_push(&q, id);
1015         datamatcher_free(&ma);
1016       }
1017     }
1018     return q;
1019   }
1020
1021   Job *Job(int how, Id what) {
1022     return new_Job($self, how, what);
1023   }
1024
1025   %typemap(out) Queue whatprovides Queue2Array(XSolvable *, 1, new_XSolvable(arg1, id));
1026   %newobject whatprovides;
1027   Queue whatprovides(Id dep) {
1028     Pool *pool = $self;
1029     Queue q;
1030     Id p, pp;
1031     queue_init(&q);
1032     FOR_PROVIDES(p, pp, dep)
1033       queue_push(&q, p);
1034     return q;
1035   }
1036
1037   Id towhatprovides(Queue q) {
1038     return pool_queuetowhatprovides($self, &q);
1039   }
1040
1041 #ifdef SWIGRUBY
1042   %rename("isknownarch?") isknownarch;
1043 #endif
1044   bool isknownarch(Id id) {
1045     Pool *pool = $self;
1046     if (!id || id == ID_EMPTY)
1047       return 0;
1048     if (id == ARCH_SRC || id == ARCH_NOSRC || id == ARCH_NOARCH)
1049       return 1;
1050     if (pool->id2arch && (id > pool->lastarch || !pool->id2arch[id]))
1051       return 0;
1052     return 1;
1053   }
1054
1055   %newobject Solver;
1056   Solver *Solver() {
1057     return solver_create($self);
1058   }
1059 }
1060
1061 %extend Repo {
1062   static const int REPO_REUSE_REPODATA = REPO_REUSE_REPODATA;
1063   static const int REPO_NO_INTERNALIZE = REPO_NO_INTERNALIZE;
1064   static const int REPO_LOCALPOOL = REPO_LOCALPOOL;
1065   static const int REPO_USE_LOADING = REPO_USE_LOADING;
1066   static const int REPO_EXTEND_SOLVABLES = REPO_EXTEND_SOLVABLES;
1067   static const int SOLV_ADD_NO_STUBS = SOLV_ADD_NO_STUBS;       /* repo_solv */
1068   static const int SUSETAGS_RECORD_SHARES = SUSETAGS_RECORD_SHARES; /* repo_susetags */
1069   static const int SOLV_ADD_NO_STUBS = SOLV_ADD_NO_STUBS ; /* repo_solv */
1070
1071   void free(bool reuseids = 0) {
1072     repo_free($self, reuseids);
1073   }
1074   void empty(bool reuseids = 0) {
1075     repo_empty($self, reuseids);
1076   }
1077 #ifdef SWIGRUBY
1078   %rename("isempty?") isempty;
1079 #endif
1080   bool isempty() {
1081     return !$self->nsolvables;
1082   }
1083   bool add_solv(const char *name, int flags = 0) {
1084     FILE *fp = fopen(name, "r");
1085     int r;
1086     if (!fp)
1087       return 0;
1088     r = repo_add_solv_flags($self, fp, flags);
1089     fclose(fp);
1090     return r == 0;
1091   }
1092   bool add_solv(FILE *fp, int flags = 0) {
1093     return repo_add_solv_flags($self, fp, flags) == 0;
1094   }
1095   bool add_products(const char *proddir, int flags = 0) {
1096     repo_add_products($self, proddir, 0, flags);
1097     return 1;
1098   }
1099   bool add_rpmmd(FILE *fp, const char *language, int flags = 0) {
1100     repo_add_rpmmd($self, fp, language, flags);
1101     return 1;
1102   }
1103 #ifndef DEBIAN
1104   bool add_rpmdb(Repo *ref, int flags = 0) {
1105     repo_add_rpmdb($self, ref, 0, flags);
1106     return 1;
1107   }
1108   Id add_rpm(const char *name, int flags = 0) {
1109     return repo_add_rpm($self, name, flags);
1110   }
1111 #endif
1112   bool add_debdb(int flags = 0) {
1113     repo_add_debdb($self, 0, flags);
1114     return 1;
1115   }
1116   Id add_deb(const char *name, int flags = 0) {
1117     return repo_add_deb($self, name, flags);
1118   }
1119   bool add_susetags(FILE *fp, Id defvendor, const char *language, int flags = 0) {
1120     repo_add_susetags($self, fp, defvendor, language, flags);
1121     return 1;
1122   }
1123   bool add_repomdxml(FILE *fp, int flags = 0) {
1124     repo_add_repomdxml($self, fp, flags);
1125     return 1;
1126   }
1127   bool add_content(FILE *fp, int flags = 0) {
1128     repo_add_content($self, fp, flags);
1129     return 1;
1130   }
1131   bool add_updateinfoxml(FILE *fp, int flags = 0) {
1132     repo_add_updateinfoxml($self, fp, flags);
1133     return 1;
1134   }
1135   bool add_deltainfoxml(FILE *fp, int flags = 0) {
1136     repo_add_deltainfoxml($self, fp, flags);
1137     return 1;
1138   }
1139   void internalize() {
1140     repo_internalize($self);
1141   }
1142   const char *lookup_str(Id entry, Id keyname) {
1143     return repo_lookup_str($self, entry, keyname);
1144   }
1145   Id lookup_id(Id entry, Id keyname) {
1146     return repo_lookup_id($self, entry, keyname);
1147   }
1148   unsigned int lookup_num(Id entry, Id keyname, unsigned int notfound = 0) {
1149     return repo_lookup_num($self, entry, keyname, notfound);
1150   }
1151   void write(FILE *fp) {
1152     repo_write($self, fp, repo_write_stdkeyfilter, 0, 0);
1153   }
1154   # HACK, remove if no longer needed!
1155   bool write_first_repodata(FILE *fp) {
1156     int oldnrepodata = $self->nrepodata;
1157     $self->nrepodata = 1;
1158     repo_write($self, fp, repo_write_stdkeyfilter, 0, 0);
1159     $self->nrepodata = oldnrepodata;
1160     return 1;
1161   }
1162
1163   %newobject Dataiterator;
1164   Dataiterator *Dataiterator(Id p, Id key, const char *match, int flags) {
1165     return new_Dataiterator($self->pool, $self, p, key, match, flags);
1166   }
1167
1168   Id const id;
1169   %{
1170   SWIGINTERN Id Repo_id_get(Repo *repo) {
1171     return repo->repoid;
1172   }
1173   %}
1174   Repo_solvable_iterator * const solvables;
1175   %{
1176   SWIGINTERN Repo_solvable_iterator * Repo_solvables_get(Repo *repo) {
1177     return new_Repo_solvable_iterator(repo);
1178   }
1179   %}
1180   %newobject solvables_iter;
1181   Repo_solvable_iterator *solvables_iter() {
1182     return new_Repo_solvable_iterator($self);
1183   }
1184
1185   XRepodata *add_repodata(int flags = 0) {
1186     Repodata *rd = repo_add_repodata($self, flags);
1187     return new_XRepodata($self, rd - $self->repodata);
1188   }
1189
1190   void create_stubs() {
1191     Repodata *data;
1192     if (!$self->nrepodata)
1193       return;
1194     data = $self->repodata  + ($self->nrepodata - 1);
1195     if (data->state != REPODATA_STUB)
1196       repodata_create_stubs(data);
1197   }
1198 #ifdef SWIGRUBY
1199   %rename("iscontiguous?") iscontiguous;
1200 #endif
1201   bool iscontiguous() {
1202     int i;
1203     for (i = $self->start; i < $self->end; i++)
1204       if ($self->pool->solvables[i].repo != $self)
1205         return 0;
1206     return 1;
1207   }
1208   XRepodata *first_repodata() {
1209      int i;
1210      if (!$self->nrepodata)
1211        return 0;
1212      /* make sure all repodatas but the first are extensions */
1213      if ($self->repodata[0].loadcallback)
1214         return 0;
1215      for (i = 1; i < $self->nrepodata; i++)
1216        if (!$self->repodata[i].loadcallback)
1217          return 0;       /* oops, not an extension */
1218      return new_XRepodata($self, 0);
1219    }
1220
1221   bool __eq__(Repo *repo) {
1222     return $self == repo;
1223   }
1224   bool __ne__(Repo *repo) {
1225     return $self != repo;
1226   }
1227   %newobject __str__;
1228   const char *__str__() {
1229     char buf[20];
1230     if ($self->name)
1231       return strdup($self->name);
1232     sprintf(buf, "Repo#%d", $self->repoid);
1233     return strdup(buf);
1234   }
1235   %newobject __repr__;
1236   const char *__repr__() {
1237     char buf[20];
1238     if ($self->name)
1239       {
1240         sprintf(buf, "<Repo #%d ", $self->repoid);
1241         return sat_dupjoin(buf, $self->name, ">");
1242       }
1243     sprintf(buf, "<Repo #%d>", $self->repoid);
1244     return strdup(buf);
1245   }
1246 }
1247
1248 %extend Dataiterator {
1249   static const int SEARCH_STRING = SEARCH_STRING;
1250   static const int SEARCH_SUBSTRING = SEARCH_SUBSTRING;
1251   static const int SEARCH_GLOB = SEARCH_GLOB;
1252   static const int SEARCH_REGEX = SEARCH_REGEX;
1253   static const int SEARCH_NOCASE = SEARCH_NOCASE;
1254   static const int SEARCH_FILES = SEARCH_FILES;
1255   static const int SEARCH_COMPLETE_FILELIST = SEARCH_COMPLETE_FILELIST;
1256
1257   Dataiterator(Pool *pool, Repo *repo, Id p, Id key, const char *match, int flags) {
1258     Dataiterator *di = sat_calloc(1, sizeof(*di));
1259     dataiterator_init(di, pool, repo, p, key, match, flags);
1260     return di;
1261   }
1262   ~Dataiterator() {
1263     dataiterator_free($self);
1264     sat_free($self);
1265   }
1266 #if defined(SWIGPYTHON)
1267   %newobject __iter__;
1268   Dataiterator *__iter__() {
1269     Dataiterator *ndi;
1270     ndi = sat_calloc(1, sizeof(*ndi));
1271     dataiterator_init_clone(ndi, $self);
1272     return ndi;
1273   }
1274   %rename("next") __next__();
1275   %exception __next__ {
1276     $action
1277     if (!result) {
1278       PyErr_SetString(PyExc_StopIteration,"no more matches");
1279       return NULL;
1280     }
1281   }
1282 #endif
1283
1284 #ifdef SWIGPERL
1285   perliter(solv::Dataiterator)
1286 #endif
1287
1288   %newobject __next__;
1289   Datamatch *__next__() {
1290     Dataiterator *ndi;
1291     if (!dataiterator_step($self)) {
1292       return 0;
1293     }
1294     ndi = sat_calloc(1, sizeof(*ndi));
1295     dataiterator_init_clone(ndi, $self);
1296     return ndi;
1297   }
1298 #ifdef SWIGRUBY
1299   void each() {
1300     Datamatch *d;
1301     while ((d = Dataiterator___next__($self)) != 0) {
1302       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(d), SWIGTYPE_p_Datamatch, SWIG_POINTER_OWN | 0));
1303     }
1304   }
1305 #endif
1306   void prepend_keyname(Id key) {
1307     dataiterator_prepend_keyname($self, key);
1308   }
1309   void skip_solvable() {
1310     dataiterator_skip_solvable($self);
1311   }
1312 }
1313
1314 %extend Datamatch {
1315   ~Datamatch() {
1316     dataiterator_free($self);
1317     sat_free($self);
1318   }
1319   %newobject solvable;
1320   XSolvable * const solvable;
1321   %{
1322   SWIGINTERN XSolvable *Datamatch_solvable_get(Dataiterator *di) {
1323     return new_XSolvable(di->pool, di->solvid);
1324   }
1325   %}
1326   Id key_id() {
1327     return $self->key->name;
1328   }
1329   const char *key_idstr() {
1330     return id2str($self->pool, $self->key->name);
1331   }
1332   Id type_id() {
1333     return $self->key->type;
1334   }
1335   const char *type_idstr() {
1336     return id2str($self->pool, $self->key->type);
1337   }
1338   Id id() {
1339      return $self->kv.id;
1340   }
1341   const char *idstr() {
1342      return id2str($self->pool, $self->kv.id);
1343   }
1344   const char *str() {
1345      return $self->kv.str;
1346   }
1347   int num() {
1348      return $self->kv.num;
1349   }
1350   int num2() {
1351      return $self->kv.num2;
1352   }
1353   void setpos() {
1354     dataiterator_setpos($self);
1355   }
1356   void setpos_parent() {
1357     dataiterator_setpos_parent($self);
1358   }
1359 }
1360
1361 %extend Pool_solvable_iterator {
1362   Pool_solvable_iterator(Pool *pool) {
1363     Pool_solvable_iterator *s;
1364     s = sat_calloc(1, sizeof(*s));
1365     s->pool = pool;
1366     return s;
1367   }
1368 #if defined(SWIGPYTHON)
1369   %newobject __iter__;
1370   Pool_solvable_iterator *__iter__() {
1371     Pool_solvable_iterator *s;
1372     s = sat_calloc(1, sizeof(*s));
1373     *s = *$self;
1374     return s;
1375   }
1376   %rename("next") __next__();
1377   %exception __next__ {
1378     $action
1379     if (!result) {
1380       PyErr_SetString(PyExc_StopIteration,"no more matches");
1381       return NULL;
1382     }
1383   }
1384 #endif
1385
1386 #ifdef SWIGPERL
1387   perliter(solv::Pool_solvable_iterator)
1388 #endif
1389   %newobject __next__;
1390   XSolvable *__next__() {
1391     Pool *pool = $self->pool;
1392     XSolvable *s;
1393     if ($self->id >= pool->nsolvables)
1394       return 0;
1395     while (++$self->id < pool->nsolvables)
1396       if (pool->solvables[$self->id].repo)
1397         return new_XSolvable(pool, $self->id);
1398     return 0;
1399   }
1400 #ifdef SWIGRUBY
1401   void each() {
1402     XSolvable *n;
1403     while ((n = Pool_solvable_iterator___next__($self)) != 0) {
1404       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
1405     }
1406   }
1407 #endif
1408   %newobject __getitem__;
1409   XSolvable *__getitem__(Id key) {
1410     Pool *pool = $self->pool;
1411     if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo)
1412       return new_XSolvable(pool, key);
1413     return 0;
1414   }
1415   int __len__() {
1416     return $self->pool->nsolvables;
1417   }
1418 }
1419
1420 %extend Pool_repo_iterator {
1421   Pool_repo_iterator(Pool *pool) {
1422     Pool_repo_iterator *s;
1423     s = sat_calloc(1, sizeof(*s));
1424     s->pool = pool;
1425     return s;
1426   }
1427 #if defined(SWIGPYTHON)
1428   %newobject __iter__;
1429   Pool_repo_iterator *__iter__() {
1430     Pool_repo_iterator *s;
1431     s = sat_calloc(1, sizeof(*s));
1432     *s = *$self;
1433     return s;
1434   }
1435   %rename("next") __next__();
1436   %exception __next__ {
1437     $action
1438     if (!result) {
1439       PyErr_SetString(PyExc_StopIteration,"no more matches");
1440       return NULL;
1441     }
1442   }
1443 #endif
1444   %newobject __next__;
1445   Repo *__next__() {
1446     Pool *pool = $self->pool;
1447     if ($self->id >= pool->nrepos + 1)
1448       return 0;
1449     while (++$self->id < pool->nrepos + 1) {
1450       Repo *r = pool_id2repo(pool, $self->id);
1451       if (r)
1452         return r;
1453     }
1454     return 0;
1455   }
1456 #ifdef SWIGRUBY
1457   void each() {
1458     Repo *n;
1459     while ((n = Pool_repo_iterator___next__($self)) != 0) {
1460       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p__Repo, SWIG_POINTER_OWN | 0));
1461     }
1462   }
1463 #endif
1464   Repo *__getitem__(Id key) {
1465     Pool *pool = $self->pool;
1466     if (key > 0 && key < pool->nrepos + 1)
1467       return pool_id2repo(pool, key);
1468     return 0;
1469   }
1470   int __len__() {
1471     return $self->pool->nrepos + 1;
1472   }
1473 }
1474
1475 %extend Repo_solvable_iterator {
1476   Repo_solvable_iterator(Repo *repo) {
1477     Repo_solvable_iterator *s;
1478     s = sat_calloc(1, sizeof(*s));
1479     s->repo = repo;
1480     return s;
1481   }
1482 #if defined(SWIGPYTHON)
1483   %newobject __iter__;
1484   Repo_solvable_iterator *__iter__() {
1485     Repo_solvable_iterator *s;
1486     s = sat_calloc(1, sizeof(*s));
1487     *s = *$self;
1488     return s;
1489   }
1490   %rename("next") __next__();
1491   %exception __next__ {
1492     $action
1493     if (!result) {
1494       PyErr_SetString(PyExc_StopIteration,"no more matches");
1495       return NULL;
1496     }
1497   }
1498 #endif
1499   %newobject __next__;
1500   XSolvable *__next__() {
1501     Repo *repo = $self->repo;
1502     Pool *pool = repo->pool;
1503     XSolvable *s;
1504     if (repo->start > 0 && $self->id < repo->start)
1505       $self->id = repo->start - 1;
1506     if ($self->id >= repo->end)
1507       return 0;
1508     while (++$self->id < repo->end)
1509       if (pool->solvables[$self->id].repo == repo)
1510         return new_XSolvable(pool, $self->id);
1511     return 0;
1512   }
1513 #ifdef SWIGRUBY
1514   void each() {
1515     XSolvable *n;
1516     while ((n = Repo_solvable_iterator___next__($self)) != 0) {
1517       rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
1518     }
1519   }
1520 #endif
1521   %newobject __getitem__;
1522   XSolvable *__getitem__(Id key) {
1523     Repo *repo = $self->repo;
1524     Pool *pool = repo->pool;
1525     if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo == repo)
1526       return new_XSolvable(pool, key);
1527     return 0;
1528   }
1529   int __len__() {
1530     return $self->repo->pool->nsolvables;
1531   }
1532 }
1533
1534 %extend Dep {
1535   Dep(Pool *pool, Id id) {
1536     Dep *s;
1537     if (!id)
1538       return 0;
1539     s = sat_calloc(1, sizeof(*s));
1540     s->pool = pool;
1541     s->id = id;
1542     return s;
1543   }
1544   const char *str() {
1545     return dep2str($self->pool, $self->id);
1546   }
1547   bool __eq__(Dep *s) {
1548     return $self->pool == s->pool && $self->id == s->id;
1549   }
1550   bool __ne__(Dep *s) {
1551     return !Dep___eq__($self, s);
1552   }
1553   const char *__str__() {
1554     return dep2str($self->pool, $self->id);
1555   }
1556   %newobject __repr__;
1557   const char *__repr__() {
1558     char buf[20];
1559     sprintf(buf, "<Id #%d ", $self->id);
1560     return sat_dupjoin(buf, dep2str($self->pool, $self->id), ">");
1561   }
1562 }
1563
1564 %extend XSolvable {
1565   XSolvable(Pool *pool, Id id) {
1566     XSolvable *s;
1567     if (!id || id >= pool->nsolvables)
1568       return 0;
1569     s = sat_calloc(1, sizeof(*s));
1570     s->pool = pool;
1571     s->id = id;
1572     return s;
1573   }
1574   const char *str() {
1575     return pool_solvid2str($self->pool, $self->id);
1576   }
1577   const char *lookup_str(Id keyname) {
1578     return pool_lookup_str($self->pool, $self->id, keyname);
1579   }
1580   Id lookup_id(Id keyname) {
1581     return pool_lookup_id($self->pool, $self->id, keyname);
1582   }
1583   unsigned int lookup_num(Id keyname, unsigned int notfound = 0) {
1584     return pool_lookup_num($self->pool, $self->id, keyname, notfound);
1585   }
1586   bool lookup_void(Id keyname) {
1587     return pool_lookup_void($self->pool, $self->id, keyname);
1588   }
1589   %newobject lookup_checksum;
1590   Chksum *lookup_checksum(Id keyname) {
1591     Id type = 0;
1592     const unsigned char *b = pool_lookup_bin_checksum($self->pool, $self->id, keyname, &type);
1593     return sat_chksum_create_from_bin(type, b);
1594   }
1595   const char *lookup_location(int *OUTPUT) {
1596     return solvable_get_location($self->pool->solvables + $self->id, OUTPUT);
1597   }
1598 #ifdef SWIGRUBY
1599   %rename("installable?") installable;
1600 #endif
1601   bool installable() {
1602     return pool_installable($self->pool, pool_id2solvable($self->pool, $self->id));
1603   }
1604 #ifdef SWIGRUBY
1605   %rename("isinstalled?") isinstalled;
1606 #endif
1607   bool isinstalled() {
1608     Pool *pool = $self->pool;
1609     return pool->installed && pool_id2solvable(pool, $self->id)->repo == pool->installed;
1610   }
1611
1612   const char * const name;
1613   %{
1614     SWIGINTERN const char *XSolvable_name_get(XSolvable *xs) {
1615       Pool *pool = xs->pool;
1616       return id2str(pool, pool->solvables[xs->id].name);
1617     }
1618   %}
1619   Id const nameid;
1620   %{
1621     SWIGINTERN Id XSolvable_nameid_get(XSolvable *xs) {
1622       return xs->pool->solvables[xs->id].name;
1623     }
1624   %}
1625   const char * const evr;
1626   %{
1627     SWIGINTERN const char *XSolvable_evr_get(XSolvable *xs) {
1628       Pool *pool = xs->pool;
1629       return id2str(pool, pool->solvables[xs->id].evr);
1630     }
1631   %}
1632   Id const evrid;
1633   %{
1634     SWIGINTERN Id XSolvable_evrid_get(XSolvable *xs) {
1635       return xs->pool->solvables[xs->id].evr;
1636     }
1637   %}
1638   const char * const arch;
1639   %{
1640     SWIGINTERN const char *XSolvable_arch_get(XSolvable *xs) {
1641       Pool *pool = xs->pool;
1642       return id2str(pool, pool->solvables[xs->id].arch);
1643     }
1644   %}
1645   Id const archid;
1646   %{
1647     SWIGINTERN Id XSolvable_archid_get(XSolvable *xs) {
1648       return xs->pool->solvables[xs->id].arch;
1649     }
1650   %}
1651   const char * const vendor;
1652   %{
1653     SWIGINTERN const char *XSolvable_vendor_get(XSolvable *xs) {
1654       Pool *pool = xs->pool;
1655       return id2str(pool, pool->solvables[xs->id].vendor);
1656     }
1657   %}
1658   Id const vendorid;
1659   %{
1660     SWIGINTERN Id XSolvable_vendorid_get(XSolvable *xs) {
1661       return xs->pool->solvables[xs->id].vendor;
1662     }
1663   %}
1664   Repo * const repo;
1665   %{
1666     SWIGINTERN Repo *XSolvable_repo_get(XSolvable *xs) {
1667       return xs->pool->solvables[xs->id].repo;
1668     }
1669   %}
1670
1671   bool __eq__(XSolvable *s) {
1672     return $self->pool == s->pool && $self->id == s->id;
1673   }
1674   bool __ne__(XSolvable *s) {
1675     return !XSolvable___eq__($self, s);
1676   }
1677   const char *__str__() {
1678     return pool_solvid2str($self->pool, $self->id);
1679   }
1680   %newobject __repr__;
1681   const char *__repr__() {
1682     char buf[20];
1683     sprintf(buf, "<Solvable #%d ", $self->id);
1684     return sat_dupjoin(buf, pool_solvid2str($self->pool, $self->id), ">");
1685   }
1686 }
1687
1688 %extend Problem {
1689   Problem(Solver *solv, Id id) {
1690     Problem *p;
1691     p = sat_calloc(1, sizeof(*p));
1692     p->solv = solv;
1693     p->id = id;
1694     return p;
1695   }
1696   %newobject findproblemrule;
1697   XRule *findproblemrule() {
1698     Id r = solver_findproblemrule($self->solv, $self->id);
1699     return new_XRule($self->solv, r);
1700   }
1701   %newobject findallproblemrules;
1702   %typemap(out) Queue findallproblemrules Queue2Array(XRule *, 1, new_XRule(arg1->solv, id));
1703   Queue findallproblemrules(int unfiltered=0) {
1704     Solver *solv = $self->solv;
1705     Id probr;
1706     int i, j;
1707     Queue q;
1708     queue_init(&q);
1709     solver_findallproblemrules(solv, $self->id, &q);
1710     if (!unfiltered)
1711       {
1712         for (i = j = 0; i < q.count; i++)
1713           {
1714             probr = q.elements[i];
1715             if ((probr >= solv->updaterules && probr < solv->updaterules_end) || (probr >= solv->jobrules && probr < solv->jobrules_end))
1716               continue;
1717             q.elements[j++] = probr;
1718           }
1719         if (j)
1720           queue_truncate(&q, j);
1721       }
1722     return q;
1723   }
1724   int solution_count() {
1725     return solver_solution_count($self->solv, $self->id);
1726   }
1727   %newobject solutions;
1728   %typemap(out) Queue solutions Queue2Array(Solution *, 1, new_Solution(arg1, id));
1729   Queue solutions() {
1730     Queue q;
1731     int i, cnt;
1732     queue_init(&q);
1733     cnt = solver_solution_count($self->solv, $self->id);
1734     for (i = 1; i <= cnt; i++)
1735       queue_push(&q, i);
1736     return q;
1737   }
1738 }
1739
1740 %extend Solution {
1741   Solution(Problem *p, Id id) {
1742     Solution *s;
1743     s = sat_calloc(1, sizeof(*s));
1744     s->solv = p->solv;
1745     s->problemid = p->id;
1746     s->id = id;
1747     return s;
1748   }
1749   int element_count() {
1750     return solver_solutionelement_count($self->solv, $self->problemid, $self->id);
1751   }
1752
1753   %newobject elements;
1754   %typemap(out) Queue elements Queue2Array(Solutionelement *, 4, new_Solutionelement(arg1->solv, arg1->problemid, arg1->id, id, idp[1], idp[2], idp[3]));
1755   Queue elements(bool expandreplaces=0) {
1756     Queue q;
1757     int i, cnt;
1758     queue_init(&q);
1759     cnt = solver_solutionelement_count($self->solv, $self->problemid, $self->id);
1760     for (i = 1; i <= cnt; i++)
1761       {
1762         Id p, rp, type;
1763         solver_next_solutionelement($self->solv, $self->problemid, $self->id, i - 1, &p, &rp);
1764         if (p > 0) {
1765           type = rp ? SOLVER_SOLUTION_REPLACE : SOLVER_SOLUTION_ERASE;
1766         } else {
1767           type = p;
1768           p = rp;
1769           rp = 0;
1770         }
1771         if (type == SOLVER_SOLUTION_REPLACE && expandreplaces) {
1772           int illegal = policy_is_illegal(self->solv, self->solv->pool->solvables + p, self->solv->pool->solvables + rp, 0);
1773           if (illegal) {
1774             if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0) {
1775               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
1776               queue_push2(&q, p, rp);
1777             }
1778             if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0) {
1779               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
1780               queue_push2(&q, p, rp);
1781             }
1782             if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0) {
1783               queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
1784               queue_push2(&q, p, rp);
1785             }
1786             continue;
1787           }
1788         }
1789         queue_push2(&q, i, type);
1790         queue_push2(&q, p, rp);
1791       }
1792     return q;
1793   }
1794 }
1795
1796 %extend Solutionelement {
1797   Solutionelement(Solver *solv, Id problemid, Id solutionid, Id id, Id type, Id p, Id rp) {
1798     Solutionelement *e;
1799     e = sat_calloc(1, sizeof(*e));
1800     e->solv = solv;
1801     e->problemid = problemid;
1802     e->solutionid = id;
1803     e->id = id;
1804     e->type = type;
1805     e->p = p;
1806     e->rp = rp;
1807     return e;
1808   }
1809   const char *str() {
1810     Id p = $self->type;
1811     Id rp = $self->p;
1812     if (p == SOLVER_SOLUTION_ERASE)
1813       {
1814         p = rp;
1815         rp = 0;
1816       }
1817     else if (p == SOLVER_SOLUTION_REPLACE)
1818       {
1819         p = rp;
1820         rp = $self->rp;
1821       }
1822     else if (p == SOLVER_SOLUTION_REPLACE_DOWNGRADE)
1823       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);
1824     else if (p == SOLVER_SOLUTION_REPLACE_ARCHCHANGE)
1825       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);
1826     else if (p == SOLVER_SOLUTION_REPLACE_VENDORCHANGE)
1827       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);
1828     return solver_solutionelement2str($self->solv, p, rp);
1829   }
1830   %newobject replaceelements;
1831   %typemap(out) Queue replaceelements Queue2Array(Solutionelement *, 1, new_Solutionelement(arg1->solv, arg1->problemid, arg1->solutionid, arg1->id, id, arg1->p, arg1->rp));
1832   Queue replaceelements() {
1833     Queue q;
1834     int illegal;
1835
1836     queue_init(&q);
1837     if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
1838       illegal = 0;
1839     else
1840       illegal = policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
1841     if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0)
1842       queue_push(&q, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
1843     if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0)
1844       queue_push(&q, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
1845     if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0)
1846       queue_push(&q, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
1847     if (!q.count)
1848       queue_push(&q, $self->type);
1849     return q;
1850   }
1851   int illegalreplace() {
1852     if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
1853       return 0;
1854     return policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
1855   }
1856   %newobject solvable;
1857   XSolvable * const solvable;
1858   %newobject replacement;
1859   XSolvable * const replacement;
1860   int const jobidx;
1861   %{
1862     SWIGINTERN XSolvable *Solutionelement_solvable_get(Solutionelement *e) {
1863       return new_XSolvable(e->solv->pool, e->p);
1864     }
1865     SWIGINTERN XSolvable *Solutionelement_replacement_get(Solutionelement *e) {
1866       return new_XSolvable(e->solv->pool, e->rp);
1867     }
1868     SWIGINTERN int Solutionelement_jobidx_get(Solutionelement *e) {
1869       return (e->p - 1) / 2;
1870     }
1871   %}
1872   %newobject Job;
1873   Job *Job() {
1874     if ($self->type == SOLVER_SOLUTION_INFARCH || $self->type == SOLVER_SOLUTION_DISTUPGRADE)
1875       return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE, $self->p);
1876     if ($self->type == SOLVER_SOLUTION_REPLACE || $self->type == SOLVER_SOLUTION_REPLACE_DOWNGRADE || $self->type == SOLVER_SOLUTION_REPLACE_ARCHCHANGE || $self->type == SOLVER_SOLUTION_REPLACE_VENDORCHANGE)
1877       return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE, $self->rp);
1878     if ($self->type == SOLVER_SOLUTION_ERASE)
1879       return new_Job($self->solv->pool, SOLVER_ERASE|SOLVER_SOLVABLE, $self->p);
1880     return 0;
1881   }
1882 }
1883
1884 %extend Solver {
1885   static const int SOLVER_RULE_UNKNOWN = SOLVER_RULE_UNKNOWN;
1886   static const int SOLVER_RULE_RPM = SOLVER_RULE_RPM;
1887   static const int SOLVER_RULE_RPM_NOT_INSTALLABLE = SOLVER_RULE_RPM_NOT_INSTALLABLE;
1888   static const int SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP = SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP;
1889   static const int SOLVER_RULE_RPM_PACKAGE_REQUIRES = SOLVER_RULE_RPM_PACKAGE_REQUIRES;
1890   static const int SOLVER_RULE_RPM_SELF_CONFLICT = SOLVER_RULE_RPM_SELF_CONFLICT;
1891   static const int SOLVER_RULE_RPM_PACKAGE_CONFLICT = SOLVER_RULE_RPM_PACKAGE_CONFLICT;
1892   static const int SOLVER_RULE_RPM_SAME_NAME = SOLVER_RULE_RPM_SAME_NAME;
1893   static const int SOLVER_RULE_RPM_PACKAGE_OBSOLETES = SOLVER_RULE_RPM_PACKAGE_OBSOLETES;
1894   static const int SOLVER_RULE_RPM_IMPLICIT_OBSOLETES = SOLVER_RULE_RPM_IMPLICIT_OBSOLETES;
1895   static const int SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES = SOLVER_RULE_RPM_INSTALLEDPKG_OBSOLETES;
1896   static const int SOLVER_RULE_UPDATE = SOLVER_RULE_UPDATE;
1897   static const int SOLVER_RULE_FEATURE = SOLVER_RULE_FEATURE;
1898   static const int SOLVER_RULE_JOB = SOLVER_RULE_JOB;
1899   static const int SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP = SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP;
1900   static const int SOLVER_RULE_DISTUPGRADE = SOLVER_RULE_DISTUPGRADE;
1901   static const int SOLVER_RULE_INFARCH = SOLVER_RULE_INFARCH;
1902   static const int SOLVER_RULE_CHOICE = SOLVER_RULE_CHOICE;
1903   static const int SOLVER_RULE_LEARNT = SOLVER_RULE_LEARNT;
1904
1905   static const int SOLVER_SOLUTION_JOB = SOLVER_SOLUTION_JOB;
1906   static const int SOLVER_SOLUTION_INFARCH = SOLVER_SOLUTION_INFARCH;
1907   static const int SOLVER_SOLUTION_DISTUPGRADE = SOLVER_SOLUTION_DISTUPGRADE;
1908   static const int SOLVER_SOLUTION_ERASE = SOLVER_SOLUTION_ERASE;
1909   static const int SOLVER_SOLUTION_REPLACE = SOLVER_SOLUTION_REPLACE;
1910   static const int SOLVER_SOLUTION_REPLACE_DOWNGRADE = SOLVER_SOLUTION_REPLACE_DOWNGRADE;
1911   static const int SOLVER_SOLUTION_REPLACE_ARCHCHANGE = SOLVER_SOLUTION_REPLACE_ARCHCHANGE;
1912   static const int SOLVER_SOLUTION_REPLACE_VENDORCHANGE = SOLVER_SOLUTION_REPLACE_VENDORCHANGE;
1913
1914   static const int POLICY_ILLEGAL_DOWNGRADE = POLICY_ILLEGAL_DOWNGRADE;
1915   static const int POLICY_ILLEGAL_ARCHCHANGE = POLICY_ILLEGAL_ARCHCHANGE;
1916   static const int POLICY_ILLEGAL_VENDORCHANGE = POLICY_ILLEGAL_VENDORCHANGE;
1917
1918   ~Solver() {
1919     solver_free($self);
1920   }
1921 #if defined(SWIGPYTHON)
1922   %pythoncode {
1923     def solve(self, jobs):
1924       j = []
1925       for job in jobs: j += [job.how, job.what]
1926       return self.solve_helper(j)
1927   }
1928 #endif
1929 #if defined(SWIGPERL)
1930   %perlcode {
1931     sub solv::Solver::solve {
1932       my ($self, $jobs) = @_;
1933       my @j = map {($_->{'how'}, $_->{'what'})} @$jobs;
1934       return $self->solve_helper(\@j);
1935     }
1936   }
1937 #endif
1938 #if defined(SWIGRUBY)
1939 %init %{
1940 rb_eval_string(
1941     "class Solv::Solver\n"
1942     "  def solve(jobs)\n"
1943     "    jl = []\n"
1944     "    jobs.each do |j| ; jl << j.how << j.what ; end\n"
1945     "    solve_helper(jl)\n"
1946     "  end\n"
1947     "end\n"
1948   );
1949 %}
1950 #endif
1951   %typemap(out) Queue solve_helper Queue2Array(Problem *, 1, new_Problem(arg1, id));
1952   %newobject solve_helper;
1953   Queue solve_helper(Queue jobs) {
1954     Queue q;
1955     int i, cnt;
1956     queue_init(&q);
1957     solver_solve($self, &jobs);
1958     cnt = solver_problem_count($self);
1959     for (i = 1; i <= cnt; i++)
1960       queue_push(&q, i);
1961     return q;
1962   }
1963   %newobject transaction;
1964   Transaction *transaction() {
1965     Transaction *t;
1966     t = sat_calloc(1, sizeof(*t));
1967     transaction_init_clone(t, &$self->trans);
1968     return t;
1969   }
1970 }
1971
1972 %extend Transaction {
1973   static const int SOLVER_TRANSACTION_IGNORE = SOLVER_TRANSACTION_IGNORE;
1974   static const int SOLVER_TRANSACTION_ERASE = SOLVER_TRANSACTION_ERASE;
1975   static const int SOLVER_TRANSACTION_REINSTALLED = SOLVER_TRANSACTION_REINSTALLED;
1976   static const int SOLVER_TRANSACTION_DOWNGRADED = SOLVER_TRANSACTION_DOWNGRADED;
1977   static const int SOLVER_TRANSACTION_CHANGED = SOLVER_TRANSACTION_CHANGED;
1978   static const int SOLVER_TRANSACTION_UPGRADED = SOLVER_TRANSACTION_UPGRADED;
1979   static const int SOLVER_TRANSACTION_OBSOLETED = SOLVER_TRANSACTION_OBSOLETED;
1980   static const int SOLVER_TRANSACTION_INSTALL = SOLVER_TRANSACTION_INSTALL;
1981   static const int SOLVER_TRANSACTION_REINSTALL = SOLVER_TRANSACTION_REINSTALL;
1982   static const int SOLVER_TRANSACTION_DOWNGRADE = SOLVER_TRANSACTION_DOWNGRADE;
1983   static const int SOLVER_TRANSACTION_CHANGE = SOLVER_TRANSACTION_CHANGE;
1984   static const int SOLVER_TRANSACTION_UPGRADE = SOLVER_TRANSACTION_UPGRADE;
1985   static const int SOLVER_TRANSACTION_OBSOLETES = SOLVER_TRANSACTION_OBSOLETES;
1986   static const int SOLVER_TRANSACTION_MULTIINSTALL = SOLVER_TRANSACTION_MULTIINSTALL;
1987   static const int SOLVER_TRANSACTION_MULTIREINSTALL = SOLVER_TRANSACTION_MULTIREINSTALL;
1988   static const int SOLVER_TRANSACTION_MAXTYPE = SOLVER_TRANSACTION_MAXTYPE;
1989   static const int SOLVER_TRANSACTION_SHOW_ACTIVE = SOLVER_TRANSACTION_SHOW_ACTIVE;
1990   static const int SOLVER_TRANSACTION_SHOW_ALL = SOLVER_TRANSACTION_SHOW_ALL;
1991   static const int SOLVER_TRANSACTION_SHOW_OBSOLETES = SOLVER_TRANSACTION_SHOW_OBSOLETES;
1992   static const int SOLVER_TRANSACTION_SHOW_MULTIINSTALL = SOLVER_TRANSACTION_SHOW_MULTIINSTALL;
1993   static const int SOLVER_TRANSACTION_CHANGE_IS_REINSTALL = SOLVER_TRANSACTION_CHANGE_IS_REINSTALL;
1994   static const int SOLVER_TRANSACTION_MERGE_VENDORCHANGES = SOLVER_TRANSACTION_MERGE_VENDORCHANGES;
1995   static const int SOLVER_TRANSACTION_MERGE_ARCHCHANGES = SOLVER_TRANSACTION_MERGE_ARCHCHANGES;
1996   static const int SOLVER_TRANSACTION_RPM_ONLY = SOLVER_TRANSACTION_RPM_ONLY;
1997   static const int SOLVER_TRANSACTION_ARCHCHANGE = SOLVER_TRANSACTION_ARCHCHANGE;
1998   static const int SOLVER_TRANSACTION_VENDORCHANGE = SOLVER_TRANSACTION_VENDORCHANGE;
1999   static const int SOLVER_TRANSACTION_KEEP_ORDERDATA = SOLVER_TRANSACTION_KEEP_ORDERDATA;
2000   ~Transaction() {
2001     transaction_free($self);
2002     sat_free($self);
2003   }
2004 #ifdef SWIGRUBY
2005   %rename("isempty?") isempty;
2006 #endif
2007   bool isempty() {
2008     return $self->steps.count == 0;
2009   }
2010
2011   %newobject othersolvable;
2012   XSolvable *othersolvable(XSolvable *s) {
2013     Id op = transaction_obs_pkg($self, s->id);
2014     return new_XSolvable($self->pool, op);
2015   }
2016
2017   %newobject allothersolvables;
2018   %typemap(out) Queue allothersolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2019   Queue allothersolvables(XSolvable *s) {
2020     Queue q;
2021     queue_init(&q);
2022     transaction_all_obs_pkgs($self, s->id, &q);
2023     return q;
2024   }
2025
2026   %typemap(out) Queue classify Queue2Array(TransactionClass *, 4, new_TransactionClass(arg1, arg2, id, idp[1], idp[2], idp[3]));
2027   %newobject classify;
2028   Queue classify(int mode = 0) {
2029     Queue q;
2030     queue_init(&q);
2031     transaction_classify($self, mode, &q);
2032     return q;
2033   }
2034
2035   %typemap(out) Queue newpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2036   %newobject newpackages;
2037   Queue newpackages() {
2038     Queue q;
2039     int cut;
2040     queue_init(&q);
2041     cut = transaction_installedresult(self, &q);
2042     queue_truncate(&q, cut);
2043     return q;
2044   }
2045
2046   %typemap(out) Queue keptpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2047   %newobject keptpackages;
2048   Queue keptpackages() {
2049     Queue q;
2050     int cut;
2051     queue_init(&q);
2052     cut = transaction_installedresult(self, &q);
2053     if (cut)
2054       queue_deleten(&q, 0, cut);
2055     return q;
2056   }
2057
2058   %typemap(out) Queue steps Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
2059   %newobject steps ;
2060   Queue steps() {
2061     Queue q;
2062     queue_init_clone(&q, &$self->steps);
2063     return q;
2064   }
2065
2066   int steptype(XSolvable *s, int mode) {
2067     return transaction_type($self, s->id, mode);
2068   }
2069   int calc_installsizechange() {
2070     return transaction_calc_installsizechange($self);
2071   }
2072   void order(int flags) {
2073     transaction_order($self, flags);
2074   }
2075 }
2076
2077 %extend TransactionClass {
2078   TransactionClass(Transaction *trans, int mode, Id type, int count, Id fromid, Id toid) {
2079     TransactionClass *cl = sat_calloc(1, sizeof(*cl));
2080     cl->transaction = trans;
2081     cl->mode = mode;
2082     cl->type = type;
2083     cl->count = count;
2084     cl->fromid = fromid;
2085     cl->toid = toid;
2086     return cl;
2087   }
2088   %newobject solvables;
2089   %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->transaction->pool, id));
2090   Queue solvables() {
2091     Queue q;
2092     queue_init(&q);
2093     transaction_classify_pkgs($self->transaction, $self->mode, $self->type, $self->fromid, $self->toid, &q);
2094     return q;
2095   }
2096 }
2097
2098 %extend XRule {
2099   XRule(Solver *solv, Id id) {
2100     if (!id)
2101       return 0;
2102     XRule *xr = sat_calloc(1, sizeof(*xr));
2103     xr->solv = solv;
2104     xr->id = id;
2105     return xr;
2106   }
2107   Ruleinfo *info() {
2108     Id type, source, target, dep;
2109     type =  solver_ruleinfo($self->solv, $self->id, &source, &target, &dep);
2110     return new_Ruleinfo($self, type, source, target, dep);
2111   }
2112   %typemap(out) Queue allinfos Queue2Array(Ruleinfo *, 4, new_Ruleinfo(arg1, id, idp[1], idp[2], idp[3]));
2113   %newobject allinfos;
2114   Queue allinfos() {
2115     Queue q;
2116     queue_init(&q);
2117     solver_allruleinfos($self->solv, $self->id, &q);
2118     return q;
2119   }
2120
2121   bool __eq__(XRule *xr) {
2122     return $self->solv == xr->solv && $self->id == xr->id;
2123   }
2124   bool __ne__(XRule *xr) {
2125     return !XRule___eq__($self, xr);
2126   }
2127   %newobject __repr__;
2128   const char *__repr__() {
2129     char buf[20];
2130     sprintf(buf, "<Rule #%d>", $self->id);
2131     return strdup(buf);
2132   }
2133 }
2134
2135 %extend Ruleinfo {
2136   Ruleinfo(XRule *r, Id type, Id source, Id target, Id dep) {
2137     Ruleinfo *ri = sat_calloc(1, sizeof(*ri));
2138     ri->solv = r->solv;
2139     ri->rid = r->id;
2140     ri->type = type;
2141     ri->source = source;
2142     ri->target = target;
2143     ri->dep = dep;
2144     return ri;
2145   }
2146   XSolvable * const solvable;
2147   XSolvable * const othersolvable;
2148   %{
2149     SWIGINTERN XSolvable *Ruleinfo_solvable_get(Ruleinfo *ri) {
2150       return new_XSolvable(ri->solv->pool, ri->source);
2151     }
2152     SWIGINTERN XSolvable *Ruleinfo_othersolvable_get(Ruleinfo *ri) {
2153       return new_XSolvable(ri->solv->pool, ri->target);
2154     }
2155   %}
2156   const char *problemstr() {
2157     return solver_problemruleinfo2str($self->solv, $self->type, $self->source, $self->target, $self->dep);
2158   }
2159 }
2160
2161 %extend XRepodata {
2162   XRepodata(Repo *repo, Id id) {
2163     XRepodata *xr = sat_calloc(1, sizeof(*xr));
2164     xr->repo = repo;
2165     xr->id = id;
2166     return xr;
2167   }
2168   Id new_handle() {
2169     return repodata_new_handle($self->repo->repodata + $self->id);
2170   }
2171   void set_id(Id solvid, Id keyname, Id id) {
2172     repodata_set_id($self->repo->repodata + $self->id, solvid, keyname, id);
2173   }
2174   void set_str(Id solvid, Id keyname, const char *str) {
2175     repodata_set_str($self->repo->repodata + $self->id, solvid, keyname, str);
2176   }
2177   void set_poolstr(Id solvid, Id keyname, const char *str) {
2178     repodata_set_poolstr($self->repo->repodata + $self->id, solvid, keyname, str);
2179   }
2180   void add_idarray(Id solvid, Id keyname, Id id) {
2181     repodata_add_idarray($self->repo->repodata + $self->id, solvid, keyname, id);
2182   }
2183   void add_flexarray(Id solvid, Id keyname, Id handle) {
2184     repodata_add_flexarray($self->repo->repodata + $self->id, solvid, keyname, handle);
2185   }
2186   void set_checksum(Id solvid, Id keyname, Chksum *chksum) {
2187     const unsigned char *buf = sat_chksum_get(chksum, 0);
2188     if (buf)
2189       repodata_set_bin_checksum($self->repo->repodata + $self->id, solvid, keyname, sat_chksum_get_type(chksum), buf);
2190   }
2191   const char *lookup_str(Id solvid, Id keyname) {
2192     return repodata_lookup_str($self->repo->repodata + $self->id, solvid, keyname);
2193   }
2194   Queue lookup_idarray(Id solvid, Id keyname) {
2195     Queue r;
2196     queue_init(&r);
2197     repodata_lookup_idarray($self->repo->repodata + $self->id, solvid, keyname, &r);
2198     return r;
2199   }
2200   %newobject lookup_checksum;
2201   Chksum *lookup_checksum(Id solvid, Id keyname) {
2202     Id type = 0;
2203     const unsigned char *b = repodata_lookup_bin_checksum($self->repo->repodata + $self->id, solvid, keyname, &type);
2204     return sat_chksum_create_from_bin(type, b);
2205   }
2206   void internalize() {
2207     repodata_internalize($self->repo->repodata + $self->id);
2208   }
2209   void create_stubs() {
2210     repodata_create_stubs($self->repo->repodata + $self->id);
2211   }
2212   void write(FILE *fp) {
2213     repodata_write($self->repo->repodata + $self->id, fp, repo_write_stdkeyfilter, 0);
2214   }
2215   bool add_solv(FILE *fp, int flags = 0) {
2216     Repodata *data = $self->repo->repodata + $self->id;
2217     int r, oldstate = data->state;
2218     data->state = REPODATA_LOADING;
2219     r = repo_add_solv_flags(data->repo, fp, flags | REPO_USE_LOADING);
2220     if (r || data->state == REPODATA_LOADING)
2221       data->state = oldstate;
2222     return r;
2223   }
2224   void extend_to_repo() {
2225     Repodata *data = $self->repo->repodata + $self->id;
2226     repodata_extend_block(data, data->repo->start, data->repo->end - data->repo->start);
2227   }
2228   bool __eq__(XRepodata *xr) {
2229     return $self->repo == xr->repo && $self->id == xr->id;
2230   }
2231   bool __ne__(XRepodata *xr) {
2232     return !XRepodata___eq__($self, xr);
2233   }
2234   %newobject __repr__;
2235   const char *__repr__() {
2236     char buf[20];
2237     sprintf(buf, "<Repodata #%d>", $self->id);
2238     return strdup(buf);
2239   }
2240 }
2241