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
10 %markfunc Pool "mark_Pool";
14 ** binaryblob handling
24 %typemap(in,noblock=1,fragment="SWIG_AsCharPtrAndSize") (const unsigned char *str, size_t len) (int res, char *buf = 0, size_t size = 0, int alloc = 0) {
30 ba = Tcl_GetByteArrayFromObj($input, &bal);
39 res = SWIG_AsCharPtrAndSize($input, &buf, &size, &alloc);
43 if (!SWIG_IsOK(res)) {
44 #if defined(SWIGPYTHON)
45 const void *pybuf = 0;
46 Py_ssize_t pysize = 0;
47 res = PyObject_AsReadBuffer($input, &pybuf, &pysize);
49 %argument_fail(res, "BinaryBlob", $symname, $argnum);
55 %argument_fail(res, "const char *", $symname, $argnum);
58 $1 = (unsigned char *)buf;
62 %typemap(freearg,noblock=1,match="in") (const unsigned char *str, int len) {
63 if (alloc$argnum == SWIG_NEWOBJ) %delete_array(buf$argnum);
66 %typemap(out,noblock=1,fragment="SWIG_FromCharPtrAndSize") BinaryBlob {
67 #if defined(SWIGPYTHON) && defined(PYTHON3)
68 $result = $1.data ? Py_BuildValue("y#", $1.data, $1.len) : SWIG_Py_Void();
69 #elif defined(SWIGTCL)
70 Tcl_SetObjResult(interp, $1.data ? Tcl_NewByteArrayObj($1.data, $1.len) : NULL);
72 $result = SWIG_FromCharPtrAndSize($1.data, $1.len);
83 %typemap(arginit) Queue {
86 %typemap(freearg) Queue {
90 #if defined(SWIGPYTHON)
92 /* Check if is a list */
93 if (PyList_Check($input)) {
94 int size = PyList_Size($input);
96 for (i = 0; i < size; i++) {
97 PyObject *o = PyList_GetItem($input,i);
99 int e = SWIG_AsVal_int(o, &v);
101 SWIG_exception_fail(SWIG_ArgError(e), "list must contain only integers");
105 SWIG_exception_fail(SWIG_TypeError, "list must contain only integers");
109 %typemap(out) Queue {
111 PyObject *o = PyList_New($1.count);
112 for (i = 0; i < $1.count; i++)
113 PyList_SetItem(o, i, SWIG_From_int($1.elements[i]));
118 %define Queue2Array(type, step, con) %{
120 int cnt = $1.count / step;
121 Id *idp = $1.elements;
122 PyObject *o = PyList_New(cnt);
123 for (i = 0; i < cnt; i++, idp += step)
126 #define result resultx
129 PyList_SetItem(o, i, $result);
138 #endif /* SWIGPYTHON */
140 #if defined(SWIGPERL)
144 if (!SvROK($input) || SvTYPE(SvRV($input)) != SVt_PVAV)
145 SWIG_croak("Argument $argnum is not an array reference.");
146 av = (AV*)SvRV($input);
148 for (i = 0; i <= size; i++) {
149 SV **sv = av_fetch(av, i, 0);
151 int e = SWIG_AsVal_int(*sv, &v);
153 SWIG_croak("list must contain only integers");
159 * av_push(o, SvREFCNT_inc(SWIG_From_int($1.elements[i])));
160 * $result = newRV_noinc((SV*)o); argvi++;
162 %typemap(out) Queue {
164 if (argvi + $1.count + 1 >= items) {
165 EXTEND(sp, (argvi + $1.count + 1) - items + 1);
167 for (i = 0; i < $1.count; i++)
168 ST(argvi++) = SvREFCNT_inc(SWIG_From_int($1.elements[i]));
173 %define Queue2Array(type, step, con) %{
175 int cnt = $1.count / step;
176 Id *idp = $1.elements;
177 if (argvi + cnt + 1 >= items) {
178 EXTEND(sp, (argvi + cnt + 1) - items + 1);
180 for (i = 0; i < cnt; i++, idp += step)
183 #define result resultx
186 SvREFCNT_inc(ST(argvi - 1));
194 #endif /* SWIGPERL */
197 #if defined(SWIGRUBY)
201 ary = rb_Array($input);
202 size = RARRAY_LEN(ary);
205 for (i = 0; i < size; i++, o++) {
207 int e = SWIG_AsVal_int(*o, &v);
209 SWIG_exception_fail(SWIG_TypeError, "list must contain only integers");
213 %typemap(out) Queue {
215 VALUE o = rb_ary_new2($1.count);
216 for (i = 0; i < $1.count; i++)
217 rb_ary_store(o, i, SWIG_From_int($1.elements[i]));
221 %typemap(arginit) Queue {
224 %typemap(freearg) Queue {
227 %define Queue2Array(type, step, con) %{
229 int cnt = $1.count / step;
230 Id *idp = $1.elements;
231 VALUE o = rb_ary_new2(cnt);
232 for (i = 0; i < cnt; i++, idp += step)
235 #define result resultx
238 rb_ary_store(o, i, $result);
246 #endif /* SWIGRUBY */
250 /* Check if is a list */
254 if (TCL_OK != Tcl_ListObjLength(interp, $input, &size))
255 SWIG_exception_fail(SWIG_TypeError, "argument is not a list");
256 for (i = 0; i < size; i++) {
260 if (TCL_OK != Tcl_ListObjIndex(interp, $input, i, &o))
261 SWIG_exception_fail(SWIG_IndexError, "failed to retrieve a list member");
262 e = SWIG_AsVal_int SWIG_TCL_CALL_ARGS_2(o, &v);
264 SWIG_exception_fail(SWIG_ArgError(e), "list must contain only integers");
269 %typemap(out) Queue {
270 Tcl_Obj *objvx[$1.count];
273 for (i = 0; i < $1.count; i++) {
274 objvx[i] = SWIG_From_int($1.elements[i]);
276 Tcl_SetObjResult(interp, Tcl_NewListObj($1.count, objvx));
280 %define Queue2Array(type, step, con) %{
281 { /* scope is needed to make the goto of SWIG_exception_fail work */
283 int cnt = $1.count / step;
284 Id *idp = $1.elements;
287 for (i = 0; i < cnt; i++, idp += step) {
289 #define result resultx
290 #define Tcl_SetObjResult(i, x) resultobj = x
294 objvx[i] = resultobj;
295 #undef Tcl_SetObjResult
299 Tcl_SetObjResult(interp, Tcl_NewListObj(cnt, objvx));
305 %typemap(in) Queue solvejobs {
306 /* Check if is a list */
310 if (TCL_OK != Tcl_ListObjLength(interp, $input, &size))
311 SWIG_exception_fail(SWIG_TypeError, "argument is not a list");
312 for (i = 0; i < size; i++) {
318 if (TCL_OK != Tcl_ListObjIndex(interp, $input, i, &o))
319 SWIG_exception_fail(SWIG_IndexError, "failed to retrieve a list member");
320 e = SWIG_ConvertPtr(o, &jp ,SWIGTYPE_p_Job, 0 | 0 );
322 SWIG_exception_fail(SWIG_ArgError(e), "list member is not a Job");
324 queue_push2(&$1, j->how, j->what);
331 #if defined(SWIGPERL)
333 /* work around a swig bug for swig versions < 2.0.5 */
334 #if SWIG_VERSION < 0x020005
338 # define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(cv,pPerl)
340 # ifndef MULTIPLICITY
341 # define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(cv)
343 # define SWIG_CALLXS(_name) TOPMARK=MARK-PL_stack_base;_name(PERL_GET_THX, cv)
350 %define perliter(class)
353 my $i = ${##class##::ITERATORS}{$_[0]};
355 $_[1] == $i->[0] - 1 ? $i->[1] : undef;
357 $_[0]->__getitem__($_[1]);
360 sub class##::FETCHSIZE {
361 my $i = ${##class##::ITERATORS}{$_[0]};
363 ($i->[1] = $_[0]->__next__()) ? ++$i->[0] : 0;
373 #define SWIG_PERL_ITERATOR 0x80
375 SWIGRUNTIMEINLINE SV *
376 SWIG_Perl_NewArrayObj(SWIG_MAYBE_PERL_OBJECT void *ptr, swig_type_info *t, int flags) {
377 SV *result = sv_newmortal();
378 if (ptr && (flags & (SWIG_SHADOW | SWIG_POINTER_OWN))) {
383 sv_setref_pv(obj, (char *) SWIG_Perl_TypeProxyName(t), ptr);
384 stash=SvSTASH(SvRV(obj));
385 if (flags & SWIG_POINTER_OWN) {
387 GV *gv=*(GV**)hv_fetch(stash, "OWNER", 5, TRUE);
389 gv_init(gv, stash, "OWNER", 5, FALSE);
391 hv_store_ent(hv, obj, newSViv(1), 0);
393 if (flags & SWIG_PERL_ITERATOR) {
395 GV *gv=*(GV**)hv_fetch(stash, "ITERATORS", 9, TRUE);
398 gv_init(gv, stash, "ITERATORS", 9, FALSE);
400 hv_store_ent(hv, obj, newRV_inc((SV *)av), 0);
402 sv_magic((SV *)array, (SV *)obj, 'P', Nullch, 0);
404 self=newRV_noinc((SV *)array);
405 sv_setsv(result, self);
406 SvREFCNT_dec((SV *)self);
407 sv_bless(result, stash);
409 sv_setref_pv(result, (char *) SWIG_Perl_TypeProxyName(t), ptr);
416 %typemap(out) Perlarray {
417 ST(argvi) = SWIG_Perl_NewArrayObj(SWIG_PERL_OBJECT_CALL SWIG_as_voidptr(result), $1_descriptor, $owner | $shadow); argvi++;
419 %typemap(out) Perliterator {
420 ST(argvi) = SWIG_Perl_NewArrayObj(SWIG_PERL_OBJECT_CALL SWIG_as_voidptr(result), $1_descriptor, $owner | $shadow | SWIG_PERL_ITERATOR); argvi++;
423 %typemap(out) Pool_solvable_iterator * = Perlarray;
424 %typemap(out) Pool_solvable_iterator * solvables_iter = Perliterator;
425 %typemap(out) Pool_repo_iterator * = Perlarray;
426 %typemap(out) Pool_repo_iterator * repos_iter = Perliterator;
427 %typemap(out) Repo_solvable_iterator * = Perlarray;
428 %typemap(out) Repo_solvable_iterator * solvables_iter = Perliterator;
429 %typemap(out) Dataiterator * = Perliterator;
431 #endif /* SWIGPERL */
438 #if defined(SWIGPYTHON)
439 typedef PyObject *AppObjectPtr;
440 %typemap(in) AppObjectPtr {
445 %typemap(out) AppObjectPtr {
446 $result = $1 ? $1 : Py_None;
449 #elif defined(SWIGPERL)
450 typedef SV *AppObjectPtr;
451 %typemap(in) AppObjectPtr {
454 sv_setsv((SV *)$1, $input);
458 %typemap(out) AppObjectPtr {
459 $result = sv_2mortal($1 ? SvREFCNT_inc($1) : newSV(0));
462 #elif defined(SWIGRUBY)
463 typedef VALUE AppObjectPtr;
464 %typemap(in) AppObjectPtr {
467 %typemap(out) AppObjectPtr {
470 #elif defined(SWIGTCL)
471 typedef Tcl_Obj *AppObjectPtr;
472 %typemap(in) AppObjectPtr {
474 Tcl_IncrRefCount($input);
477 %typemap(out) AppObjectPtr {
478 Tcl_SetObjResult(interp, $1 ? $1 : Tcl_NewObj());
481 #warning AppObjectPtr not defined for this language!
491 %fragment("SWIG_AsValFilePtr","header") {}
495 %fragment("SWIG_AsValSolvFpPtr","header", fragment="SWIG_AsValFilePtr") {
499 SWIG_AsValSolvFpPtr(VALUE obj, FILE **val) {
500 #elif defined(SWIGTCL)
501 SWIG_AsValSolvFpPtr SWIG_TCL_DECL_ARGS_2(void *obj, FILE **val) {
503 SWIG_AsValSolvFpPtr(void *obj, FILE **val) {
505 static swig_type_info* desc = 0;
509 if (!desc) desc = SWIG_TypeQuery("SolvFp *");
510 if ((SWIG_ConvertPtr(obj, &vptr, desc, 0)) == SWIG_OK) {
512 *val = vptr ? ((SolvFp *)vptr)->fp : 0;
516 ecode = SWIG_AsValFilePtr(obj, val);
517 if (ecode == SWIG_OK)
520 return SWIG_TypeError;
524 #define SWIG_AsValSolvFpPtr(x, y) SWIG_AsValSolvFpPtr SWIG_TCL_CALL_ARGS_2(x, y)
534 %fragment("SWIG_AsValDepId","header") {
538 SWIG_AsValDepId(VALUE obj, int *val) {
539 #elif defined(SWIGTCL)
540 SWIG_AsValDepId SWIG_TCL_DECL_ARGS_2(void *obj, int *val) {
542 SWIG_AsValDepId(void *obj, int *val) {
544 static swig_type_info* desc = 0;
547 if (!desc) desc = SWIG_TypeQuery("Dep *");
549 ecode = SWIG_AsVal_int SWIG_TCL_CALL_ARGS_2(obj, val);
551 ecode = SWIG_AsVal_int(obj, val);
553 if (SWIG_IsOK(ecode))
555 if ((SWIG_ConvertPtr(obj, &vptr, desc, 0)) == SWIG_OK) {
557 *val = vptr ? ((Dep *)vptr)->id : 0;
560 return SWIG_TypeError;
564 #define SWIG_AsValDepId(x, y) SWIG_AsValDepId SWIG_TCL_CALL_ARGS_2(x, y)
569 ** Pool disown helper
572 %typemap(out) disown_helper {
573 #if defined(SWIGRUBY)
574 SWIG_ConvertPtr(self, &argp1,SWIGTYPE_p_Pool, SWIG_POINTER_DISOWN | 0 );
575 #elif defined(SWIGPYTHON)
576 SWIG_ConvertPtr(obj0, &argp1,SWIGTYPE_p_Pool, SWIG_POINTER_DISOWN | 0 );
577 #elif defined(SWIGPERL)
578 SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_Pool, SWIG_POINTER_DISOWN | 0 );
579 #elif defined(SWIGTCL)
580 SWIG_ConvertPtr(objv[1], &argp1, SWIGTYPE_p_Pool, SWIG_POINTER_DISOWN | 0);
582 #warning disown_helper not implemented for this language, this is likely going to leak memory
586 Tcl_SetObjResult(interp, SWIG_From_int((int)(0)));
588 $result = SWIG_From_int((int)(0));
597 %include "typemaps.i"
599 %typemap(in,numinputs=0,noblock=1) XRule **OUTPUT ($*1_ltype temp) {
602 %typemap(argout,noblock=1) XRule **OUTPUT {
603 %append_output(SWIG_NewPointerObj((void*)(*$1), SWIGTYPE_p_XRule, SWIG_POINTER_OWN | %newpointer_flags));
606 %typemaps_asval(%checkcode(POINTER), SWIG_AsValSolvFpPtr, "SWIG_AsValSolvFpPtr", FILE*);
607 %typemaps_asval(%checkcode(INT32), SWIG_AsValDepId, "SWIG_AsValDepId", DepId);
611 ** the C declarations
617 #include <sys/stat.h>
618 #include <sys/utsname.h>
619 #include <sys/types.h>
623 /* argh, swig undefs bool for perl */
629 #include "poolarch.h"
633 #include "solverdebug.h"
634 #include "repo_solv.h"
636 #include "selection.h"
638 #include "repo_write.h"
639 #if defined(ENABLE_RPMDB) || defined(ENABLE_RPMPKG)
640 #include "repo_rpmdb.h"
643 #include "repo_pubkey.h"
646 #include "repo_deb.h"
649 #include "repo_rpmmd.h"
650 #include "repo_updateinfoxml.h"
651 #include "repo_deltainfoxml.h"
652 #include "repo_repomdxml.h"
654 #ifdef ENABLE_SUSEREPO
655 #include "repo_products.h"
656 #include "repo_susetags.h"
657 #include "repo_content.h"
659 #ifdef ENABLE_MDKREPO
660 #include "repo_mdk.h"
662 #ifdef ENABLE_ARCHREPO
663 #include "repo_arch.h"
666 #include "repo_autopattern.h"
668 #include "solv_xfopen.h"
669 #include "testcase.h"
671 /* for old ruby versions */
673 #define RARRAY_PTR(ary) (RARRAY(ary)->ptr)
676 #define RARRAY_LEN(ary) (RARRAY(ary)->len)
679 #define SOLVER_SOLUTION_ERASE -100
680 #define SOLVER_SOLUTION_REPLACE -101
681 #define SOLVER_SOLUTION_REPLACE_DOWNGRADE -102
682 #define SOLVER_SOLUTION_REPLACE_ARCHCHANGE -103
683 #define SOLVER_SOLUTION_REPLACE_VENDORCHANGE -104
684 #define SOLVER_SOLUTION_REPLACE_NAMECHANGE -105
686 typedef void *AppObjectPtr;
712 } Pool_solvable_iterator;
717 } Pool_repo_iterator;
722 } Repo_solvable_iterator;
773 Transaction *transaction;
791 typedef Dataiterator Datamatch;
793 typedef int disown_helper;
810 SWIGINTERN void appdata_disown_helper(void *appdata) {
812 SWIGINTERN void appdata_clr_helper(void **appdatap) {
815 SWIGINTERN void appdata_set_helper(void **appdatap, void *appdata) {
818 SWIGINTERN void *appdata_get_helper(void *appdata) {
823 #elif defined(SWIGTCL)
826 SWIGINTERN void appdata_disown_helper(void *appdata) {
828 SWIGINTERN void appdata_clr_helper(void **appdatap) {
830 Tcl_DecrRefCount((Tcl_Obj *)(*appdatap));
833 SWIGINTERN void appdata_set_helper(void **appdatap, void *appdata) {
834 appdata_clr_helper(appdatap);
837 SWIGINTERN void *appdata_get_helper(void *appdata) {
842 #elif defined(SWIGPYTHON)
845 SWIGINTERN void appdata_disown_helper(void *appdata) {
846 struct myappdata *myappdata = appdata;
847 if (!myappdata || !myappdata->appdata || myappdata->disowned)
849 myappdata->disowned = 1;
850 Py_DECREF((PyObject *)myappdata->appdata);
852 SWIGINTERN void appdata_clr_helper(void **appdatap) {
853 struct myappdata *myappdata = *(struct myappdata **)appdatap;
854 if (myappdata && myappdata->appdata && !myappdata->disowned) {
855 Py_DECREF((PyObject *)myappdata->appdata);
857 *appdatap = solv_free(myappdata);
859 SWIGINTERN void appdata_set_helper(void **appdatap, void *appdata) {
860 appdata_clr_helper(appdatap);
862 struct myappdata *myappdata = *appdatap = solv_calloc(sizeof(struct myappdata), 1);
863 myappdata->appdata = appdata;
866 SWIGINTERN void *appdata_get_helper(void *appdata) {
867 return appdata ? ((struct myappdata *)appdata)->appdata : 0;
872 #elif defined(SWIGPERL)
875 SWIGINTERN void appdata_disown_helper(void *appdata) {
876 struct myappdata *myappdata = appdata;
878 if (!myappdata || !myappdata->appdata || myappdata->disowned)
880 rsv = myappdata->appdata;
883 myappdata->appdata = SvRV(rsv);
884 myappdata->disowned = 1;
887 SWIGINTERN void appdata_clr_helper(void **appdatap) {
888 struct myappdata *myappdata = *(struct myappdata **)appdatap;
889 if (myappdata && myappdata->appdata && !myappdata->disowned) {
890 SvREFCNT_dec((SV *)myappdata->appdata);
892 *appdatap = solv_free(myappdata);
894 SWIGINTERN void appdata_set_helper(void **appdatap, void *appdata) {
895 appdata_clr_helper(appdatap);
897 struct myappdata *myappdata = *appdatap = solv_calloc(sizeof(struct myappdata), 1);
898 myappdata->appdata = appdata;
901 SWIGINTERN void *appdata_get_helper(void *appdata) {
902 struct myappdata *myappdata = appdata;
903 if (!myappdata || !myappdata->appdata)
905 return myappdata->disowned ? newRV_noinc((SV *)myappdata->appdata) : myappdata->appdata;
911 #warning appdata helpers not implemented for this language
916 ** the SWIG declarations defining the API
920 %mixin Dataiterator "Enumerable";
921 %mixin Pool_solvable_iterator "Enumerable";
922 %mixin Pool_repo_iterator "Enumerable";
923 %mixin Repo_solvable_iterator "Enumerable";
930 /* from repodata.h */
931 %constant Id SOLVID_META;
932 %constant Id SOLVID_POS;
934 %constant int REL_EQ;
935 %constant int REL_GT;
936 %constant int REL_LT;
937 %constant int REL_AND;
938 %constant int REL_OR;
939 %constant int REL_WITH;
940 %constant int REL_NAMESPACE;
941 %constant int REL_ARCH;
942 %constant int REL_FILECONFLICT;
943 %constant int REL_COND;
944 %constant int REL_COMPAT;
945 %constant int REL_KIND;
946 %constant int REL_MULTIARCH;
947 %constant int REL_ELSE;
948 %constant int REL_ERROR;
959 /* put before pool/repo so we can access the constructor */
960 %nodefaultdtor Dataiterator;
961 typedef struct {} Dataiterator;
984 typedef struct {} Pool_solvable_iterator;
985 typedef struct {} Pool_repo_iterator;
986 typedef struct {} Repo_solvable_iterator;
988 %nodefaultctor Datamatch;
989 %nodefaultdtor Datamatch;
996 %nodefaultctor Datapos;
1007 %nodefaultctor Pool;
1008 %nodefaultdtor Pool;
1012 %nodefaultctor Repo;
1013 %nodefaultdtor Repo;
1016 const char * const name;
1019 int const nsolvables;
1022 %nodefaultctor Solver;
1023 %nodefaultdtor Solver;
1031 #ifdef ENABLE_PUBKEY
1034 unsigned int const created;
1035 unsigned int const expires;
1036 const char * const keyid;
1040 %rename(xfopen) solvfp_xfopen;
1041 %rename(xfopen_fd) solvfp_xfopen_fd;
1043 %nodefaultctor SolvFp;
1047 %newobject solvfp_xfopen;
1048 %newobject solvfp_xfopen_fd;
1050 SolvFp *solvfp_xfopen(const char *fn, const char *mode = 0);
1051 SolvFp *solvfp_xfopen_fd(const char *fn, int fd, const char *mode = 0);
1054 SWIGINTERN SolvFp *solvfp_xfopen_fd(const char *fn, int fd, const char *mode) {
1060 fcntl(fd, F_SETFD, FD_CLOEXEC);
1061 fp = solv_xfopen_fd(fn, fd, mode);
1066 sfp = solv_calloc(1, sizeof(SolvFp));
1070 SWIGINTERN SolvFp *solvfp_xfopen(const char *fn, const char *mode) {
1073 fp = solv_xfopen(fn, mode);
1076 if (fileno(fp) != -1)
1077 fcntl(fileno(fp), F_SETFD, FD_CLOEXEC);
1078 sfp = solv_calloc(1, sizeof(SolvFp));
1085 Solver * const solv;
1090 Solver * const solv;
1098 Id const solutionid;
1103 %nodefaultctor Alternative;
1114 %nodefaultctor Transaction;
1115 %nodefaultdtor Transaction;
1121 Transaction * const transaction;
1135 return $self->fp ? fileno($self->fp) : -1;
1138 return $self->fp ? dup(fileno($self->fp)) : -1;
1140 bool write(const unsigned char *str, size_t len) {
1141 return fwrite(str, len, 1, $self->fp) == 1;
1146 return fflush($self->fp) == 0;
1152 ret = fclose($self->fp) == 0;
1156 void cloexec(bool state) {
1157 if (!$self->fp || fileno($self->fp) == -1)
1159 fcntl(fileno($self->fp), F_SETFD, state ? FD_CLOEXEC : 0);
1164 static const Id SOLVER_SOLVABLE = SOLVER_SOLVABLE;
1165 static const Id SOLVER_SOLVABLE_NAME = SOLVER_SOLVABLE_NAME;
1166 static const Id SOLVER_SOLVABLE_PROVIDES = SOLVER_SOLVABLE_PROVIDES;
1167 static const Id SOLVER_SOLVABLE_ONE_OF = SOLVER_SOLVABLE_ONE_OF;
1168 static const Id SOLVER_SOLVABLE_REPO = SOLVER_SOLVABLE_REPO;
1169 static const Id SOLVER_SOLVABLE_ALL = SOLVER_SOLVABLE_ALL;
1170 static const Id SOLVER_SELECTMASK = SOLVER_SELECTMASK;
1171 static const Id SOLVER_NOOP = SOLVER_NOOP;
1172 static const Id SOLVER_INSTALL = SOLVER_INSTALL;
1173 static const Id SOLVER_ERASE = SOLVER_ERASE;
1174 static const Id SOLVER_UPDATE = SOLVER_UPDATE;
1175 static const Id SOLVER_WEAKENDEPS = SOLVER_WEAKENDEPS;
1176 static const Id SOLVER_MULTIVERSION = SOLVER_MULTIVERSION;
1177 static const Id SOLVER_LOCK = SOLVER_LOCK;
1178 static const Id SOLVER_DISTUPGRADE = SOLVER_DISTUPGRADE;
1179 static const Id SOLVER_VERIFY = SOLVER_VERIFY;
1180 static const Id SOLVER_DROP_ORPHANED = SOLVER_DROP_ORPHANED;
1181 static const Id SOLVER_USERINSTALLED = SOLVER_USERINSTALLED;
1182 static const Id SOLVER_ALLOWUNINSTALL = SOLVER_ALLOWUNINSTALL;
1183 static const Id SOLVER_FAVOR = SOLVER_FAVOR;
1184 static const Id SOLVER_DISFAVOR = SOLVER_DISFAVOR;
1185 static const Id SOLVER_JOBMASK = SOLVER_JOBMASK;
1186 static const Id SOLVER_WEAK = SOLVER_WEAK;
1187 static const Id SOLVER_ESSENTIAL = SOLVER_ESSENTIAL;
1188 static const Id SOLVER_CLEANDEPS = SOLVER_CLEANDEPS;
1189 static const Id SOLVER_FORCEBEST = SOLVER_FORCEBEST;
1190 static const Id SOLVER_TARGETED = SOLVER_TARGETED;
1191 static const Id SOLVER_NOTBYUSER = SOLVER_NOTBYUSER;
1192 static const Id SOLVER_SETEV = SOLVER_SETEV;
1193 static const Id SOLVER_SETEVR = SOLVER_SETEVR;
1194 static const Id SOLVER_SETARCH = SOLVER_SETARCH;
1195 static const Id SOLVER_SETVENDOR = SOLVER_SETVENDOR;
1196 static const Id SOLVER_SETREPO = SOLVER_SETREPO;
1197 static const Id SOLVER_SETNAME = SOLVER_SETNAME;
1198 static const Id SOLVER_NOAUTOSET = SOLVER_NOAUTOSET;
1199 static const Id SOLVER_SETMASK = SOLVER_SETMASK;
1201 Job(Pool *pool, int how, Id what) {
1202 Job *job = solv_calloc(1, sizeof(*job));
1209 %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
1210 %newobject solvables;
1214 pool_job2solvables($self->pool, &q, $self->how, $self->what);
1218 %rename("isemptyupdate?") isemptyupdate;
1220 bool isemptyupdate() {
1221 return pool_isemptyupdatejob($self->pool, $self->how, $self->what);
1224 #if defined(SWIGTCL)
1225 %rename("==") __eq__;
1227 bool __eq__(Job *j) {
1228 return $self->pool == j->pool && $self->how == j->how && $self->what == j->what;
1230 #if defined(SWIGTCL)
1231 %rename("!=") __ne__;
1233 bool __ne__(Job *j) {
1234 return !Job___eq__($self, j);
1236 #if defined(SWIGPERL) || defined(SWIGTCL)
1237 %rename("str") __str__;
1239 const char *__str__() {
1240 return pool_job2str($self->pool, $self->how, $self->what, 0);
1242 #if defined(SWIGPERL) || defined(SWIGTCL)
1243 %rename("repr") __repr__;
1245 const char *__repr__() {
1246 const char *str = pool_job2str($self->pool, $self->how, $self->what, ~0);
1247 return pool_tmpjoin($self->pool, "<Job ", str, ">");
1252 static const Id SELECTION_NAME = SELECTION_NAME;
1253 static const Id SELECTION_PROVIDES = SELECTION_PROVIDES;
1254 static const Id SELECTION_FILELIST = SELECTION_FILELIST;
1255 static const Id SELECTION_CANON = SELECTION_CANON;
1256 static const Id SELECTION_DOTARCH = SELECTION_DOTARCH;
1257 static const Id SELECTION_REL = SELECTION_REL;
1258 static const Id SELECTION_INSTALLED_ONLY = SELECTION_INSTALLED_ONLY;
1259 static const Id SELECTION_GLOB = SELECTION_GLOB;
1260 static const Id SELECTION_FLAT = SELECTION_FLAT;
1261 static const Id SELECTION_NOCASE = SELECTION_NOCASE;
1262 static const Id SELECTION_SOURCE_ONLY = SELECTION_SOURCE_ONLY;
1263 static const Id SELECTION_WITH_SOURCE = SELECTION_WITH_SOURCE;
1265 Selection(Pool *pool) {
1267 s = solv_calloc(1, sizeof(*s));
1273 queue_free(&$self->q);
1277 return $self->flags;
1280 %rename("isempty?") isempty;
1283 return $self->q.count == 0;
1285 void filter(Selection *lsel) {
1286 if ($self->pool != lsel->pool)
1287 queue_empty(&$self->q);
1289 selection_filter($self->pool, &$self->q, &lsel->q);
1291 void add(Selection *lsel) {
1292 if ($self->pool == lsel->pool)
1294 selection_add($self->pool, &$self->q, &lsel->q);
1295 $self->flags |= lsel->flags;
1298 void add_raw(Id how, Id what) {
1299 queue_push2(&$self->q, how, what);
1301 %typemap(out) Queue jobs Queue2Array(Job *, 2, new_Job(arg1->pool, id, idp[1]));
1303 Queue jobs(int flags) {
1306 queue_init_clone(&q, &$self->q);
1307 for (i = 0; i < q.count; i += 2)
1308 q.elements[i] |= flags;
1312 %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
1313 %newobject solvables;
1317 selection_solvables($self->pool, &$self->q, &q);
1321 #if defined(SWIGPERL) || defined(SWIGTCL)
1322 %rename("str") __str__;
1324 const char *__str__() {
1325 return pool_selection2str($self->pool, &$self->q, 0);
1327 #if defined(SWIGPERL) || defined(SWIGTCL)
1328 %rename("repr") __repr__;
1330 const char *__repr__() {
1331 const char *str = pool_selection2str($self->pool, &$self->q, ~0);
1332 return pool_tmpjoin($self->pool, "<Selection ", str, ">");
1338 return solv_chksum_create(type);
1340 Chksum(Id type, const char *hex) {
1341 unsigned char buf[64];
1342 int l = solv_chksum_len(type);
1345 if (solv_hex2bin(&hex, buf, sizeof(buf)) != l || hex[0])
1347 return solv_chksum_create_from_bin(type, buf);
1349 %newobject from_bin;
1350 static Chksum *from_bin(Id type, const unsigned char *str, size_t len) {
1351 return len == solv_chksum_len(type) ? solv_chksum_create_from_bin(type, str) : 0;
1353 #if defined(SWIGPERL)
1355 undef *solv::Chksum::from_bin;
1356 *solv::Chksum::from_bin = sub {
1358 my $self = solvc::Chksum_from_bin(@_);
1359 bless $self, $pkg if defined $self;
1364 solv_chksum_free($self, 0);
1368 SWIGINTERN Id Chksum_type_get(Chksum *chk) {
1369 return solv_chksum_get_type(chk);
1372 void add(const unsigned char *str, size_t len) {
1373 solv_chksum_add($self, str, (int)len);
1375 void add_fp(FILE *fp) {
1378 while ((l = fread(buf, 1, sizeof(buf), fp)) > 0)
1379 solv_chksum_add($self, buf, l);
1380 rewind(fp); /* convenience */
1382 void add_fd(int fd) {
1385 while ((l = read(fd, buf, sizeof(buf))) > 0)
1386 solv_chksum_add($self, buf, l);
1387 lseek(fd, 0, 0); /* convenience */
1389 void add_stat(const char *filename) {
1391 if (stat(filename, &stb))
1392 memset(&stb, 0, sizeof(stb));
1393 solv_chksum_add($self, &stb.st_dev, sizeof(stb.st_dev));
1394 solv_chksum_add($self, &stb.st_ino, sizeof(stb.st_ino));
1395 solv_chksum_add($self, &stb.st_size, sizeof(stb.st_size));
1396 solv_chksum_add($self, &stb.st_mtime, sizeof(stb.st_mtime));
1398 void add_fstat(int fd) {
1400 if (fstat(fd, &stb))
1401 memset(&stb, 0, sizeof(stb));
1402 solv_chksum_add($self, &stb.st_dev, sizeof(stb.st_dev));
1403 solv_chksum_add($self, &stb.st_ino, sizeof(stb.st_ino));
1404 solv_chksum_add($self, &stb.st_size, sizeof(stb.st_size));
1405 solv_chksum_add($self, &stb.st_mtime, sizeof(stb.st_mtime));
1410 const unsigned char *b;
1411 b = solv_chksum_get($self, &l);
1419 const unsigned char *b;
1422 b = solv_chksum_get($self, &l);
1423 ret = solv_malloc(2 * l + 1);
1424 solv_bin2hex(b, l, ret);
1427 const char *typestr() {
1428 return solv_chksum_type2str(solv_chksum_get_type($self));
1431 #if defined(SWIGTCL)
1432 %rename("==") __eq__;
1434 bool __eq__(Chksum *chk) {
1435 return solv_chksum_cmp($self, chk);
1437 #if defined(SWIGTCL)
1438 %rename("!=") __ne__;
1440 bool __ne__(Chksum *chk) {
1441 return !solv_chksum_cmp($self, chk);
1443 #if defined(SWIGRUBY)
1444 %rename("to_s") __str__;
1446 #if defined(SWIGPERL) || defined(SWIGTCL)
1447 %rename("str") __str__;
1450 const char *__str__() {
1453 if (solv_chksum_isfinished($self))
1454 h = Chksum_hex($self);
1455 str = solv_dupjoin(solv_chksum_type2str(solv_chksum_get_type($self)), ":", h ? h : "unfinished");
1456 solv_free((void *)h);
1459 #if defined(SWIGPERL) || defined(SWIGTCL)
1460 %rename("repr") __repr__;
1462 %newobject __repr__;
1463 const char *__repr__() {
1464 const char *h = Chksum___str__($self);
1465 const char *str = solv_dupjoin("<Chksum ", h, ">");
1466 solv_free((void *)h);
1472 static const int POOL_FLAG_PROMOTEEPOCH = POOL_FLAG_PROMOTEEPOCH;
1473 static const int POOL_FLAG_FORBIDSELFCONFLICTS = POOL_FLAG_FORBIDSELFCONFLICTS;
1474 static const int POOL_FLAG_OBSOLETEUSESPROVIDES = POOL_FLAG_OBSOLETEUSESPROVIDES;
1475 static const int POOL_FLAG_IMPLICITOBSOLETEUSESPROVIDES = POOL_FLAG_IMPLICITOBSOLETEUSESPROVIDES;
1476 static const int POOL_FLAG_OBSOLETEUSESCOLORS = POOL_FLAG_OBSOLETEUSESCOLORS;
1477 static const int POOL_FLAG_IMPLICITOBSOLETEUSESCOLORS = POOL_FLAG_IMPLICITOBSOLETEUSESCOLORS;
1478 static const int POOL_FLAG_NOINSTALLEDOBSOLETES = POOL_FLAG_NOINSTALLEDOBSOLETES;
1479 static const int POOL_FLAG_HAVEDISTEPOCH = POOL_FLAG_HAVEDISTEPOCH;
1480 static const int POOL_FLAG_NOOBSOLETESMULTIVERSION = POOL_FLAG_NOOBSOLETESMULTIVERSION;
1481 static const int DISTTYPE_RPM = DISTTYPE_RPM;
1482 static const int DISTTYPE_DEB = DISTTYPE_DEB;
1483 static const int DISTTYPE_ARCH = DISTTYPE_ARCH;
1484 static const int DISTTYPE_HAIKU = DISTTYPE_HAIKU;
1487 Pool *pool = pool_create();
1490 int setdisttype(int disttype) {
1491 return pool_setdisttype($self, disttype);
1493 void set_debuglevel(int level) {
1494 pool_setdebuglevel($self, level);
1496 int set_flag(int flag, int value) {
1497 return pool_set_flag($self, flag, value);
1499 int get_flag(int flag) {
1500 return pool_get_flag($self, flag);
1502 void set_rootdir(const char *rootdir) {
1503 pool_set_rootdir($self, rootdir);
1505 const char *get_rootdir(int flag) {
1506 return pool_get_rootdir($self);
1508 #if defined(SWIGPYTHON)
1510 SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
1511 XRepodata *xd = new_XRepodata(data->repo, data->repodataid);
1512 PyObject *args = Py_BuildValue("(O)", SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_POINTER_OWN | 0));
1513 PyObject *result = PyEval_CallObject((PyObject *)d, args);
1518 return 0; /* exception */
1519 ecode = SWIG_AsVal_int(result, &vresult);
1521 return SWIG_IsOK(ecode) ? vresult : 0;
1524 void clr_loadcallback() {
1525 if ($self->loadcallback == loadcallback) {
1526 PyObject *obj = $self->loadcallbackdata;
1528 pool_setloadcallback($self, 0, 0);
1531 void set_loadcallback(PyObject *callable) {
1532 Pool_clr_loadcallback($self);
1534 Py_INCREF(callable);
1535 pool_setloadcallback($self, loadcallback, callable);
1538 #elif defined(SWIGPERL)
1540 SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
1544 XRepodata *xd = new_XRepodata(data->repo, data->repodataid);
1549 XPUSHs(SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_OWNER | SWIG_SHADOW));
1551 count = perl_call_sv((SV *)d, G_EVAL|G_SCALAR);
1561 void clr_loadcallback() {
1562 if ($self->loadcallback == loadcallback) {
1563 SvREFCNT_dec($self->loadcallbackdata);
1564 pool_setloadcallback($self, 0, 0);
1567 void set_loadcallback(SV *callable) {
1568 Pool_clr_loadcallback($self);
1570 SvREFCNT_inc(callable);
1571 pool_setloadcallback($self, loadcallback, callable);
1574 #elif defined(SWIGRUBY)
1576 SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
1577 XRepodata *xd = new_XRepodata(data->repo, data->repodataid);
1578 VALUE callable = (VALUE)d;
1579 VALUE rd = SWIG_NewPointerObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, SWIG_POINTER_OWN | 0);
1580 VALUE res = rb_funcall(callable, rb_intern("call"), 1, rd);
1581 return res == Qtrue;
1583 SWIGINTERN void mark_Pool(void *ptr) {
1585 if (pool->loadcallback == loadcallback && pool->loadcallbackdata) {
1586 VALUE callable = (VALUE)pool->loadcallbackdata;
1587 rb_gc_mark(callable);
1591 void clr_loadcallback() {
1592 pool_setloadcallback($self, 0, 0);
1594 %typemap(in, numinputs=0) VALUE callable {
1595 $1 = rb_block_given_p() ? rb_block_proc() : 0;
1597 void set_loadcallback(VALUE callable) {
1598 pool_setloadcallback($self, callable ? loadcallback : 0, (void *)callable);
1600 #elif defined(SWIGTCL)
1606 SWIGINTERN int loadcallback(Pool *pool, Repodata *data, void *d) {
1607 tcl_callback_t *callback_var = (tcl_callback_t *)d;
1608 Tcl_Interp *interp = callback_var->interp;
1609 XRepodata *xd = new_XRepodata(data->repo, data->repodataid);
1610 int result, ecode = 0, vresult = 0;
1612 objvx[0] = callback_var->obj;
1613 objvx[1] = SWIG_NewInstanceObj(SWIG_as_voidptr(xd), SWIGTYPE_p_XRepodata, 0);
1614 Tcl_IncrRefCount(objvx[1]);
1615 result = Tcl_EvalObjv(interp, sizeof(objvx)/sizeof(*objvx), objvx, TCL_EVAL_GLOBAL);
1616 Tcl_DecrRefCount(objvx[1]);
1617 if (result != TCL_OK)
1618 return 0; /* exception */
1619 ecode = SWIG_AsVal_int(interp, Tcl_GetObjResult(interp), &vresult);
1620 return SWIG_IsOK(ecode) ? vresult : 0;
1623 void clr_loadcallback() {
1624 if ($self->loadcallback == loadcallback) {
1625 tcl_callback_t *callback_var = $self->loadcallbackdata;
1626 Tcl_DecrRefCount(callback_var->obj);
1627 solv_free(callback_var);
1628 pool_setloadcallback($self, 0, 0);
1631 void set_loadcallback(Tcl_Obj *callable, Tcl_Interp *interp) {
1632 Pool_clr_loadcallback($self);
1634 tcl_callback_t *callback_var = solv_malloc(sizeof(tcl_callback_t));
1635 Tcl_IncrRefCount(callable);
1636 callback_var->interp = interp;
1637 callback_var->obj = callable;
1638 pool_setloadcallback($self, loadcallback, callback_var);
1642 #warning loadcallback not implemented for this language
1649 FOR_REPOS(repoid, repo)
1650 appdata_clr_helper(&repo->appdata);
1651 Pool_clr_loadcallback(pool);
1652 appdata_clr_helper(&pool->appdata);
1655 disown_helper free() {
1659 FOR_REPOS(repoid, repo)
1660 appdata_clr_helper(&repo->appdata);
1661 Pool_clr_loadcallback(pool);
1662 appdata_clr_helper(&pool->appdata);
1666 disown_helper disown() {
1669 AppObjectPtr appdata;
1671 SWIGINTERN void Pool_appdata_set(Pool *pool, AppObjectPtr appdata) {
1672 appdata_set_helper(&pool->appdata, appdata);
1674 SWIGINTERN AppObjectPtr Pool_appdata_get(Pool *pool) {
1675 return appdata_get_helper(pool->appdata);
1678 void appdata_disown() {
1679 appdata_disown_helper($self->appdata);
1682 Id str2id(const char *str, bool create=1) {
1683 return pool_str2id($self, str, create);
1686 Dep *Dep(const char *str, bool create=1) {
1687 Id id = pool_str2id($self, str, create);
1688 return new_Dep($self, id);
1690 const char *id2str(Id id) {
1691 return pool_id2str($self, id);
1693 const char *dep2str(Id id) {
1694 return pool_dep2str($self, id);
1696 Id rel2id(Id name, Id evr, int flags, bool create=1) {
1697 return pool_rel2id($self, name, evr, flags, create);
1699 Id id2langid(Id id, const char *lang, bool create=1) {
1700 return pool_id2langid($self, id, lang, create);
1702 void setarch(const char *arch = 0) {
1711 pool_setarch($self, arch);
1713 Repo *add_repo(const char *name) {
1714 return repo_create($self, name);
1716 const char *lookup_str(Id entry, Id keyname) {
1717 return pool_lookup_str($self, entry, keyname);
1719 Id lookup_id(Id entry, Id keyname) {
1720 return pool_lookup_id($self, entry, keyname);
1722 unsigned long long lookup_num(Id entry, Id keyname, unsigned long long notfound = 0) {
1723 return pool_lookup_num($self, entry, keyname, notfound);
1725 bool lookup_void(Id entry, Id keyname) {
1726 return pool_lookup_void($self, entry, keyname);
1728 %newobject lookup_checksum;
1729 Chksum *lookup_checksum(Id entry, Id keyname) {
1731 const unsigned char *b = pool_lookup_bin_checksum($self, entry, keyname, &type);
1732 return solv_chksum_create_from_bin(type, b);
1735 %newobject Dataiterator;
1736 Dataiterator *Dataiterator(Id key, const char *match = 0, int flags = 0) {
1737 return new_Dataiterator($self, 0, 0, key, match, flags);
1739 %newobject Dataiterator_solvid;
1740 Dataiterator *Dataiterator_solvid(Id p, Id key, const char *match = 0, int flags = 0) {
1741 return new_Dataiterator($self, 0, p, key, match, flags);
1743 const char *solvid2str(Id solvid) {
1744 return pool_solvid2str($self, solvid);
1746 void addfileprovides() {
1747 pool_addfileprovides($self);
1749 Queue addfileprovides_queue() {
1752 pool_addfileprovides_queue($self, &r, 0);
1755 void createwhatprovides() {
1756 pool_createwhatprovides($self);
1759 %newobject id2solvable;
1760 XSolvable *id2solvable(Id id) {
1761 return new_XSolvable($self, id);
1763 %newobject solvables;
1764 Pool_solvable_iterator * const solvables;
1766 SWIGINTERN Pool_solvable_iterator * Pool_solvables_get(Pool *pool) {
1767 return new_Pool_solvable_iterator(pool);
1770 %newobject solvables_iter;
1771 Pool_solvable_iterator * solvables_iter() {
1772 return new_Pool_solvable_iterator($self);
1775 Repo *id2repo(Id id) {
1776 if (id < 1 || id >= $self->nrepos)
1778 return pool_id2repo($self, id);
1782 Pool_repo_iterator * const repos;
1784 SWIGINTERN Pool_repo_iterator * Pool_repos_get(Pool *pool) {
1785 return new_Pool_repo_iterator(pool);
1788 %newobject repos_iter;
1789 Pool_repo_iterator * repos_iter() {
1790 return new_Pool_repo_iterator($self);
1794 const char * const errstr;
1796 SWIGINTERN void Pool_installed_set(Pool *pool, Repo *installed) {
1797 pool_set_installed(pool, installed);
1799 SWIGINTERN Repo *Pool_installed_get(Pool *pool) {
1800 return pool->installed;
1802 SWIGINTERN const char *Pool_errstr_get(Pool *pool) {
1803 return pool_errstr(pool);
1807 Queue matchprovidingids(const char *match, int flags) {
1813 for (id = 1; id < pool->ss.nstrings; id++)
1814 if (pool->whatprovides[id])
1818 if (!datamatcher_init(&ma, match, flags)) {
1819 for (id = 1; id < pool->ss.nstrings; id++)
1820 if (pool->whatprovides[id] && datamatcher_match(&ma, pool_id2str(pool, id)))
1822 datamatcher_free(&ma);
1829 Job *Job(int how, Id what) {
1830 return new_Job($self, how, what);
1833 %typemap(out) Queue whatprovides Queue2Array(XSolvable *, 1, new_XSolvable(arg1, id));
1834 %newobject whatprovides;
1835 Queue whatprovides(DepId dep) {
1840 FOR_PROVIDES(p, pp, dep)
1845 Id towhatprovides(Queue q) {
1846 return pool_queuetowhatprovides($self, &q);
1849 %typemap(out) Queue whatmatchesdep Queue2Array(XSolvable *, 1, new_XSolvable(arg1, id));
1850 %newobject whatmatchesdep;
1851 Queue whatmatchesdep(Id keyname, DepId dep, Id marker = -1) {
1854 pool_whatmatchesdep($self, keyname, dep, &q, marker);
1859 %rename("isknownarch?") isknownarch;
1861 bool isknownarch(DepId id) {
1863 if (!id || id == ID_EMPTY)
1865 if (id == ARCH_SRC || id == ARCH_NOSRC || id == ARCH_NOARCH)
1867 if (pool->id2arch && (id > pool->lastarch || !pool->id2arch[id]))
1874 return solver_create($self);
1877 %newobject Selection;
1878 Selection *Selection() {
1879 return new_Selection($self);
1881 %newobject Selection_all;
1882 Selection *Selection_all(int setflags=0) {
1883 Selection *sel = new_Selection($self);
1884 queue_push2(&sel->q, SOLVER_SOLVABLE_ALL | setflags, 0);
1888 Selection *select(const char *name, int flags) {
1889 Selection *sel = new_Selection($self);
1890 sel->flags = selection_make($self, &sel->q, name, flags);
1894 void setpooljobs_helper(Queue jobs) {
1895 queue_free(&$self->pooljobs);
1896 queue_init_clone(&$self->pooljobs, &jobs);
1898 %typemap(out) Queue getpooljobs Queue2Array(Job *, 2, new_Job(arg1, id, idp[1]));
1899 %newobject getpooljobs;
1900 Queue getpooljobs() {
1902 queue_init_clone(&q, &$self->pooljobs);
1906 #if defined(SWIGPYTHON)
1908 def setpooljobs(self, jobs):
1910 for job in jobs: j += [job.how, job.what]
1911 self.setpooljobs_helper(j)
1914 #if defined(SWIGPERL)
1916 sub solv::Solver::setpooljobs {
1917 my ($self, $jobs) = @_;
1918 my @j = map {($_->{'how'}, $_->{'what'})} @$jobs;
1919 return $self->setpooljobs_helper(\@j);
1923 #if defined(SWIGRUBY)
1926 "class Solv::Pool\n"
1927 " def setpooljobs(jobs)\n"
1929 " jobs.each do |j| ; jl << j.how << j.what ; end\n"
1930 " setpooljobs_helper(jl)\n"
1939 static const int REPO_REUSE_REPODATA = REPO_REUSE_REPODATA;
1940 static const int REPO_NO_INTERNALIZE = REPO_NO_INTERNALIZE;
1941 static const int REPO_LOCALPOOL = REPO_LOCALPOOL;
1942 static const int REPO_USE_LOADING = REPO_USE_LOADING;
1943 static const int REPO_EXTEND_SOLVABLES = REPO_EXTEND_SOLVABLES;
1944 static const int REPO_USE_ROOTDIR = REPO_USE_ROOTDIR;
1945 static const int REPO_NO_LOCATION = REPO_NO_LOCATION;
1946 static const int SOLV_ADD_NO_STUBS = SOLV_ADD_NO_STUBS; /* repo_solv */
1947 #ifdef ENABLE_SUSEREPO
1948 static const int SUSETAGS_RECORD_SHARES = SUSETAGS_RECORD_SHARES; /* repo_susetags */
1951 void free(bool reuseids = 0) {
1952 appdata_clr_helper(&$self->appdata);
1953 repo_free($self, reuseids);
1955 void empty(bool reuseids = 0) {
1956 repo_empty($self, reuseids);
1959 %rename("isempty?") isempty;
1962 return !$self->nsolvables;
1965 AppObjectPtr appdata;
1967 SWIGINTERN void Repo_appdata_set(Repo *repo, AppObjectPtr appdata) {
1968 appdata_set_helper(&repo->appdata, appdata);
1970 SWIGINTERN AppObjectPtr Repo_appdata_get(Repo *repo) {
1971 return appdata_get_helper(repo->appdata);
1975 bool add_solv(const char *name, int flags = 0) {
1976 FILE *fp = fopen(name, "r");
1980 r = repo_add_solv($self, fp, flags);
1984 bool add_solv(FILE *fp, int flags = 0) {
1985 return repo_add_solv($self, fp, flags) == 0;
1988 %newobject add_solvable;
1989 XSolvable *add_solvable() {
1990 Id solvid = repo_add_solvable($self);
1991 return new_XSolvable($self->pool, solvid);
1995 bool add_rpmdb(int flags = 0) {
1996 return repo_add_rpmdb($self, 0, flags) == 0;
1998 bool add_rpmdb_reffp(FILE *reffp, int flags = 0) {
1999 return repo_add_rpmdb_reffp($self, reffp, flags) == 0;
2002 #ifdef ENABLE_RPMPKG
2004 XSolvable *add_rpm(const char *name, int flags = 0) {
2005 return new_XSolvable($self->pool, repo_add_rpm($self, name, flags));
2008 #ifdef ENABLE_PUBKEY
2010 bool add_rpmdb_pubkeys(int flags = 0) {
2011 return repo_add_rpmdb_pubkeys($self, flags) == 0;
2014 %newobject add_pubkey;
2015 XSolvable *add_pubkey(const char *keyfile, int flags = 0) {
2016 return new_XSolvable($self->pool, repo_add_pubkey($self, keyfile, flags));
2018 bool add_keyring(FILE *fp, int flags = 0) {
2019 return repo_add_keyring($self, fp, flags);
2021 bool add_keydir(const char *keydir, const char *suffix, int flags = 0) {
2022 return repo_add_keydir($self, keydir, suffix, flags);
2026 bool add_rpmmd(FILE *fp, const char *language, int flags = 0) {
2027 return repo_add_rpmmd($self, fp, language, flags) == 0;
2029 bool add_repomdxml(FILE *fp, int flags = 0) {
2030 return repo_add_repomdxml($self, fp, flags) == 0;
2032 bool add_updateinfoxml(FILE *fp, int flags = 0) {
2033 return repo_add_updateinfoxml($self, fp, flags) == 0;
2035 bool add_deltainfoxml(FILE *fp, int flags = 0) {
2036 return repo_add_deltainfoxml($self, fp, flags) == 0;
2039 #ifdef ENABLE_DEBIAN
2040 bool add_debdb(int flags = 0) {
2041 return repo_add_debdb($self, flags) == 0;
2043 bool add_debpackages(FILE *fp, int flags = 0) {
2044 return repo_add_debpackages($self, fp, flags) == 0;
2047 XSolvable *add_deb(const char *name, int flags = 0) {
2048 return new_XSolvable($self->pool, repo_add_deb($self, name, flags));
2051 #ifdef ENABLE_SUSEREPO
2052 bool add_susetags(FILE *fp, Id defvendor, const char *language, int flags = 0) {
2053 return repo_add_susetags($self, fp, defvendor, language, flags) == 0;
2055 bool add_content(FILE *fp, int flags = 0) {
2056 return repo_add_content($self, fp, flags) == 0;
2058 bool add_products(const char *proddir, int flags = 0) {
2059 return repo_add_products($self, proddir, flags) == 0;
2062 #ifdef ENABLE_MDKREPO
2063 bool add_mdk(FILE *fp, int flags = 0) {
2064 return repo_add_mdk($self, fp, flags) == 0;
2066 bool add_mdk_info(FILE *fp, int flags = 0) {
2067 return repo_add_mdk_info($self, fp, flags) == 0;
2070 #ifdef ENABLE_ARCHREPO
2071 bool add_arch_repo(FILE *fp, int flags = 0) {
2072 return repo_add_arch_repo($self, fp, flags) == 0;
2074 bool add_arch_local(const char *dir, int flags = 0) {
2075 return repo_add_arch_local($self, dir, flags) == 0;
2077 %newobject add_arch_pkg;
2078 XSolvable *add_arch_pkg(const char *name, int flags = 0) {
2079 return new_XSolvable($self->pool, repo_add_arch_pkg($self, name, flags));
2083 bool add_autopattern(int flags = 0) {
2084 return repo_add_autopattern($self, flags) == 0;
2087 void internalize() {
2088 repo_internalize($self);
2090 bool write(FILE *fp) {
2091 return repo_write($self, fp) == 0;
2093 /* HACK, remove if no longer needed! */
2094 bool write_first_repodata(FILE *fp) {
2095 int oldnrepodata = $self->nrepodata;
2097 $self->nrepodata = oldnrepodata > 2 ? 2 : oldnrepodata;
2098 res = repo_write($self, fp);
2099 $self->nrepodata = oldnrepodata;
2103 %newobject Dataiterator;
2104 Dataiterator *Dataiterator(Id key, const char *match = 0, int flags = 0) {
2105 return new_Dataiterator($self->pool, $self, 0, key, match, flags);
2107 %newobject Dataiterator_meta;
2108 Dataiterator *Dataiterator_meta(Id key, const char *match = 0, int flags = 0) {
2109 return new_Dataiterator($self->pool, $self, SOLVID_META, key, match, flags);
2114 SWIGINTERN Id Repo_id_get(Repo *repo) {
2115 return repo->repoid;
2118 %newobject solvables;
2119 Repo_solvable_iterator * const solvables;
2121 SWIGINTERN Repo_solvable_iterator * Repo_solvables_get(Repo *repo) {
2122 return new_Repo_solvable_iterator(repo);
2126 Datapos * const meta;
2128 SWIGINTERN Datapos * Repo_meta_get(Repo *repo) {
2129 Datapos *pos = solv_calloc(1, sizeof(*pos));
2130 pos->solvid = SOLVID_META;
2136 %newobject solvables_iter;
2137 Repo_solvable_iterator *solvables_iter() {
2138 return new_Repo_solvable_iterator($self);
2141 %newobject add_repodata;
2142 XRepodata *add_repodata(int flags = 0) {
2143 Repodata *rd = repo_add_repodata($self, flags);
2144 return new_XRepodata($self, rd->repodataid);
2147 void create_stubs() {
2149 if (!$self->nrepodata)
2151 data = repo_id2repodata($self, $self->nrepodata - 1);
2152 if (data->state != REPODATA_STUB)
2153 (void)repodata_create_stubs(data);
2156 %rename("iscontiguous?") iscontiguous;
2158 bool iscontiguous() {
2160 for (i = $self->start; i < $self->end; i++)
2161 if ($self->pool->solvables[i].repo != $self)
2165 %newobject first_repodata;
2166 XRepodata *first_repodata() {
2169 if ($self->nrepodata < 2)
2171 /* make sure all repodatas but the first are extensions */
2172 data = repo_id2repodata($self, 1);
2173 if (data->loadcallback)
2175 for (i = 2; i < $self->nrepodata; i++)
2177 data = repo_id2repodata($self, i);
2178 if (!data->loadcallback)
2179 return 0; /* oops, not an extension */
2181 return new_XRepodata($self, 1);
2184 %newobject Selection;
2185 Selection *Selection(int setflags=0) {
2186 Selection *sel = new_Selection($self->pool);
2187 setflags |= SOLVER_SETREPO;
2188 queue_push2(&sel->q, SOLVER_SOLVABLE_REPO | setflags, $self->repoid);
2192 #ifdef ENABLE_PUBKEY
2193 %newobject find_pubkey;
2194 XSolvable *find_pubkey(const char *keyid) {
2195 return new_XSolvable($self->pool, repo_find_pubkey($self, keyid));
2199 Repo *createshadow(const char *name) {
2200 Repo *repo = repo_create($self->pool, name);
2201 if ($self->idarraysize) {
2202 repo_reserve_ids(repo, 0, $self->idarraysize);
2203 memcpy(repo->idarraydata, $self->idarraydata, sizeof(Id) * $self->idarraysize);
2204 repo->idarraysize = $self->idarraysize;
2206 repo->start = $self->start;
2207 repo->end = $self->end;
2208 repo->nsolvables = $self->nsolvables;
2212 void moveshadow(Queue q) {
2213 Pool *pool = $self->pool;
2215 for (i = 0; i < q.count; i++) {
2217 Id p = q.elements[i];
2218 if (p < $self->start || p >= $self->end)
2220 s = pool->solvables + p;
2221 if ($self->idarraysize != s->repo->idarraysize)
2227 #if defined(SWIGTCL)
2228 %rename("==") __eq__;
2230 bool __eq__(Repo *repo) {
2231 return $self == repo;
2233 #if defined(SWIGTCL)
2234 %rename("!=") __ne__;
2236 bool __ne__(Repo *repo) {
2237 return $self != repo;
2239 #if defined(SWIGPYTHON)
2241 return $self->repoid;
2244 #if defined(SWIGPERL) || defined(SWIGTCL)
2245 %rename("str") __str__;
2248 const char *__str__() {
2251 return solv_strdup($self->name);
2252 sprintf(buf, "Repo#%d", $self->repoid);
2253 return solv_strdup(buf);
2255 #if defined(SWIGPERL) || defined(SWIGTCL)
2256 %rename("repr") __repr__;
2258 %newobject __repr__;
2259 const char *__repr__() {
2263 sprintf(buf, "<Repo #%d ", $self->repoid);
2264 return solv_dupjoin(buf, $self->name, ">");
2266 sprintf(buf, "<Repo #%d>", $self->repoid);
2267 return solv_strdup(buf);
2271 %extend Dataiterator {
2272 static const int SEARCH_STRING = SEARCH_STRING;
2273 static const int SEARCH_STRINGSTART = SEARCH_STRINGSTART;
2274 static const int SEARCH_STRINGEND = SEARCH_STRINGEND;
2275 static const int SEARCH_SUBSTRING = SEARCH_SUBSTRING;
2276 static const int SEARCH_GLOB = SEARCH_GLOB;
2277 static const int SEARCH_REGEX = SEARCH_REGEX;
2278 static const int SEARCH_NOCASE = SEARCH_NOCASE;
2279 static const int SEARCH_FILES = SEARCH_FILES;
2280 static const int SEARCH_COMPLETE_FILELIST = SEARCH_COMPLETE_FILELIST;
2281 static const int SEARCH_CHECKSUMS = SEARCH_CHECKSUMS;
2283 Dataiterator(Pool *pool, Repo *repo, Id p, Id key, const char *match, int flags) {
2284 Dataiterator *di = solv_calloc(1, sizeof(*di));
2285 dataiterator_init(di, pool, repo, p, key, match, flags);
2289 dataiterator_free($self);
2292 #if defined(SWIGPYTHON)
2294 def __iter__(self): return self
2297 %rename("next") __next__();
2299 %exception __next__ {
2302 PyErr_SetString(PyExc_StopIteration,"no more matches");
2308 perliter(solv::Dataiterator)
2310 %newobject __next__;
2311 Datamatch *__next__() {
2313 if (!dataiterator_step($self)) {
2316 ndi = solv_calloc(1, sizeof(*ndi));
2317 dataiterator_init_clone(ndi, $self);
2318 dataiterator_strdup(ndi);
2324 while ((d = Dataiterator___next__($self)) != 0) {
2325 rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(d), SWIGTYPE_p_Datamatch, SWIG_POINTER_OWN | 0));
2329 void prepend_keyname(Id key) {
2330 dataiterator_prepend_keyname($self, key);
2332 void skip_solvable() {
2333 dataiterator_skip_solvable($self);
2338 Id lookup_id(Id keyname) {
2339 Pool *pool = $self->repo->pool;
2340 Datapos oldpos = pool->pos;
2343 r = pool_lookup_id(pool, SOLVID_POS, keyname);
2347 const char *lookup_str(Id keyname) {
2348 Pool *pool = $self->repo->pool;
2349 Datapos oldpos = pool->pos;
2352 r = pool_lookup_str(pool, SOLVID_POS, keyname);
2356 unsigned long long lookup_num(Id keyname, unsigned long long notfound = 0) {
2357 Pool *pool = $self->repo->pool;
2358 Datapos oldpos = pool->pos;
2359 unsigned long long r;
2361 r = pool_lookup_num(pool, SOLVID_POS, keyname, notfound);
2365 bool lookup_void(Id keyname) {
2366 Pool *pool = $self->repo->pool;
2367 Datapos oldpos = pool->pos;
2370 r = pool_lookup_void(pool, SOLVID_POS, keyname);
2374 %newobject lookup_checksum;
2375 Chksum *lookup_checksum(Id keyname) {
2376 Pool *pool = $self->repo->pool;
2377 Datapos oldpos = pool->pos;
2379 const unsigned char *b;
2381 b = pool_lookup_bin_checksum(pool, SOLVID_POS, keyname, &type);
2383 return solv_chksum_create_from_bin(type, b);
2385 const char *lookup_deltaseq() {
2386 Pool *pool = $self->repo->pool;
2387 Datapos oldpos = pool->pos;
2390 seq = pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NAME);
2392 seq = pool_tmpjoin(pool, seq, "-", pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_EVR));
2393 seq = pool_tmpappend(pool, seq, "-", pool_lookup_str(pool, SOLVID_POS, DELTA_SEQ_NUM));
2398 const char *lookup_deltalocation(unsigned int *OUTPUT) {
2399 Pool *pool = $self->repo->pool;
2400 Datapos oldpos = pool->pos;
2403 loc = pool_lookup_deltalocation(pool, SOLVID_POS, OUTPUT);
2407 Queue lookup_idarray(Id keyname) {
2408 Pool *pool = $self->repo->pool;
2409 Datapos oldpos = pool->pos;
2413 pool_lookup_idarray(pool, SOLVID_POS, keyname, &r);
2417 %newobject Dataiterator;
2418 Dataiterator *Dataiterator(Id key, const char *match = 0, int flags = 0) {
2419 Pool *pool = $self->repo->pool;
2420 Datapos oldpos = pool->pos;
2423 di = new_Dataiterator(pool, 0, SOLVID_POS, key, match, flags);
2431 dataiterator_free($self);
2434 %newobject solvable;
2435 XSolvable * const solvable;
2437 const char * const key_idstr;
2439 const char * const type_idstr;
2441 const char * const idstr;
2442 const char * const str;
2443 BinaryBlob const binary;
2444 unsigned long long const num;
2445 unsigned int const num2;
2447 SWIGINTERN XSolvable *Datamatch_solvable_get(Dataiterator *di) {
2448 return new_XSolvable(di->pool, di->solvid);
2450 SWIGINTERN Id Datamatch_key_id_get(Dataiterator *di) {
2451 return di->key->name;
2453 SWIGINTERN const char *Datamatch_key_idstr_get(Dataiterator *di) {
2454 return pool_id2str(di->pool, di->key->name);
2456 SWIGINTERN Id Datamatch_type_id_get(Dataiterator *di) {
2457 return di->key->type;
2459 SWIGINTERN const char *Datamatch_type_idstr_get(Dataiterator *di) {
2460 return pool_id2str(di->pool, di->key->type);
2462 SWIGINTERN Id Datamatch_id_get(Dataiterator *di) {
2465 SWIGINTERN const char *Datamatch_idstr_get(Dataiterator *di) {
2466 if (di->data && (di->key->type == REPOKEY_TYPE_DIR || di->key->type == REPOKEY_TYPE_DIRSTRARRAY || di->key->type == REPOKEY_TYPE_DIRNUMNUMARRAY))
2467 return repodata_dir2str(di->data, di->kv.id, 0);
2468 if (di->data && di->data->localpool)
2469 return stringpool_id2str(&di->data->spool, di->kv.id);
2470 return pool_id2str(di->pool, di->kv.id);
2472 SWIGINTERN const char * const Datamatch_str_get(Dataiterator *di) {
2475 SWIGINTERN BinaryBlob Datamatch_binary_get(Dataiterator *di) {
2479 if (di->key->type == REPOKEY_TYPE_BINARY)
2481 bl.data = di->kv.str;
2482 bl.len = di->kv.num;
2484 else if ((bl.len = solv_chksum_len(di->key->type)) != 0)
2485 bl.data = di->kv.str;
2488 SWIGINTERN unsigned long long Datamatch_num_get(Dataiterator *di) {
2489 if (di->key->type == REPOKEY_TYPE_NUM)
2490 return SOLV_KV_NUM64(&di->kv);
2493 SWIGINTERN unsigned int Datamatch_num2_get(Dataiterator *di) {
2499 Pool *pool = $self->pool;
2500 Datapos *pos, oldpos = pool->pos;
2501 dataiterator_setpos($self);
2502 pos = solv_calloc(1, sizeof(*pos));
2507 %newobject parentpos;
2508 Datapos *parentpos() {
2509 Pool *pool = $self->pool;
2510 Datapos *pos, oldpos = pool->pos;
2511 dataiterator_setpos_parent($self);
2512 pos = solv_calloc(1, sizeof(*pos));
2517 #if defined(SWIGPERL)
2518 /* cannot use str here because swig reports a bogus conflict... */
2519 %rename("stringify") __str__;
2521 *solv::Datamatch::str = *solvc::Datamatch_stringify;
2524 #if defined(SWIGTCL)
2525 %rename("stringify") __str__;
2527 const char *__str__() {
2528 KeyValue kv = $self->kv;
2529 const char *str = repodata_stringify($self->pool, $self->data, $self->key, &kv, SEARCH_FILES | SEARCH_CHECKSUMS);
2530 return str ? str : "";
2534 %extend Pool_solvable_iterator {
2535 Pool_solvable_iterator(Pool *pool) {
2536 Pool_solvable_iterator *s;
2537 s = solv_calloc(1, sizeof(*s));
2541 #if defined(SWIGPYTHON)
2543 def __iter__(self): return self
2546 %rename("next") __next__();
2548 %exception __next__ {
2551 PyErr_SetString(PyExc_StopIteration,"no more matches");
2557 perliter(solv::Pool_solvable_iterator)
2559 %newobject __next__;
2560 XSolvable *__next__() {
2561 Pool *pool = $self->pool;
2562 if ($self->id >= pool->nsolvables)
2564 while (++$self->id < pool->nsolvables)
2565 if (pool->solvables[$self->id].repo)
2566 return new_XSolvable(pool, $self->id);
2572 while ((n = Pool_solvable_iterator___next__($self)) != 0) {
2573 rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
2577 %newobject __getitem__;
2578 XSolvable *__getitem__(Id key) {
2579 Pool *pool = $self->pool;
2580 if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo)
2581 return new_XSolvable(pool, key);
2585 return $self->pool->nsolvables;
2589 %extend Pool_repo_iterator {
2590 Pool_repo_iterator(Pool *pool) {
2591 Pool_repo_iterator *s;
2592 s = solv_calloc(1, sizeof(*s));
2596 #if defined(SWIGPYTHON)
2598 def __iter__(self): return self
2601 %rename("next") __next__();
2603 %exception __next__ {
2606 PyErr_SetString(PyExc_StopIteration,"no more matches");
2612 perliter(solv::Pool_repo_iterator)
2615 Pool *pool = $self->pool;
2616 if ($self->id >= pool->nrepos)
2618 while (++$self->id < pool->nrepos) {
2619 Repo *r = pool_id2repo(pool, $self->id);
2628 while ((n = Pool_repo_iterator___next__($self)) != 0) {
2629 rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_Repo, 0 | 0));
2633 Repo *__getitem__(Id key) {
2634 Pool *pool = $self->pool;
2635 if (key > 0 && key < pool->nrepos)
2636 return pool_id2repo(pool, key);
2640 return $self->pool->nrepos;
2644 %extend Repo_solvable_iterator {
2645 Repo_solvable_iterator(Repo *repo) {
2646 Repo_solvable_iterator *s;
2647 s = solv_calloc(1, sizeof(*s));
2651 #if defined(SWIGPYTHON)
2653 def __iter__(self): return self
2656 %rename("next") __next__();
2658 %exception __next__ {
2661 PyErr_SetString(PyExc_StopIteration,"no more matches");
2667 perliter(solv::Repo_solvable_iterator)
2669 %newobject __next__;
2670 XSolvable *__next__() {
2671 Repo *repo = $self->repo;
2672 Pool *pool = repo->pool;
2673 if (repo->start > 0 && $self->id < repo->start)
2674 $self->id = repo->start - 1;
2675 if ($self->id >= repo->end)
2677 while (++$self->id < repo->end)
2678 if (pool->solvables[$self->id].repo == repo)
2679 return new_XSolvable(pool, $self->id);
2685 while ((n = Repo_solvable_iterator___next__($self)) != 0) {
2686 rb_yield(SWIG_NewPointerObj(SWIG_as_voidptr(n), SWIGTYPE_p_XSolvable, SWIG_POINTER_OWN | 0));
2690 %newobject __getitem__;
2691 XSolvable *__getitem__(Id key) {
2692 Repo *repo = $self->repo;
2693 Pool *pool = repo->pool;
2694 if (key > 0 && key < pool->nsolvables && pool->solvables[key].repo == repo)
2695 return new_XSolvable(pool, key);
2699 return $self->repo->pool->nsolvables;
2704 Dep(Pool *pool, Id id) {
2708 s = solv_calloc(1, sizeof(*s));
2714 Dep *Rel(int flags, DepId evrid, bool create=1) {
2715 Id id = pool_rel2id($self->pool, $self->id, evrid, flags, create);
2718 return new_Dep($self->pool, id);
2720 %newobject Selection_name;
2721 Selection *Selection_name(int setflags=0) {
2722 Selection *sel = new_Selection($self->pool);
2723 if (ISRELDEP($self->id)) {
2724 Reldep *rd = GETRELDEP($self->pool, $self->id);
2725 if (rd->flags == REL_EQ) {
2726 setflags |= $self->pool->disttype == DISTTYPE_DEB || strchr(pool_id2str($self->pool, rd->evr), '-') != 0 ? SOLVER_SETEVR : SOLVER_SETEV;
2727 if (ISRELDEP(rd->name))
2728 rd = GETRELDEP($self->pool, rd->name);
2730 if (rd->flags == REL_ARCH)
2731 setflags |= SOLVER_SETARCH;
2733 queue_push2(&sel->q, SOLVER_SOLVABLE_NAME | setflags, $self->id);
2736 %newobject Selection_provides;
2737 Selection *Selection_provides(int setflags=0) {
2738 Selection *sel = new_Selection($self->pool);
2739 if (ISRELDEP($self->id)) {
2740 Reldep *rd = GETRELDEP($self->pool, $self->id);
2741 if (rd->flags == REL_ARCH)
2742 setflags |= SOLVER_SETARCH;
2744 queue_push2(&sel->q, SOLVER_SOLVABLE_PROVIDES | setflags, $self->id);
2748 return pool_dep2str($self->pool, $self->id);
2750 #if defined(SWIGTCL)
2751 %rename("==") __eq__;
2753 bool __eq__(Dep *s) {
2754 return $self->pool == s->pool && $self->id == s->id;
2756 #if defined(SWIGTCL)
2757 %rename("!=") __ne__;
2759 bool __ne__(Dep *s) {
2760 return !Dep___eq__($self, s);
2762 #if defined(SWIGPYTHON)
2767 #if defined(SWIGPERL) || defined(SWIGTCL)
2768 %rename("str") __str__;
2770 const char *__str__() {
2771 return pool_dep2str($self->pool, $self->id);
2773 #if defined(SWIGPERL) || defined(SWIGTCL)
2774 %rename("repr") __repr__;
2776 %newobject __repr__;
2777 const char *__repr__() {
2779 sprintf(buf, "<Id #%d ", $self->id);
2780 return solv_dupjoin(buf, pool_dep2str($self->pool, $self->id), ">");
2785 XSolvable(Pool *pool, Id id) {
2787 if (!id || id >= pool->nsolvables)
2789 s = solv_calloc(1, sizeof(*s));
2795 return pool_solvid2str($self->pool, $self->id);
2797 const char *lookup_str(Id keyname) {
2798 return pool_lookup_str($self->pool, $self->id, keyname);
2800 Id lookup_id(Id keyname) {
2801 return pool_lookup_id($self->pool, $self->id, keyname);
2803 unsigned long long lookup_num(Id keyname, unsigned long long notfound = 0) {
2804 return pool_lookup_num($self->pool, $self->id, keyname, notfound);
2806 bool lookup_void(Id keyname) {
2807 return pool_lookup_void($self->pool, $self->id, keyname);
2809 %newobject lookup_checksum;
2810 Chksum *lookup_checksum(Id keyname) {
2812 const unsigned char *b = pool_lookup_bin_checksum($self->pool, $self->id, keyname, &type);
2813 return solv_chksum_create_from_bin(type, b);
2815 Queue lookup_idarray(Id keyname, Id marker = -1) {
2816 Solvable *s = $self->pool->solvables + $self->id;
2819 solvable_lookup_deparray(s, keyname, &r, marker);
2822 %typemap(out) Queue lookup_deparray Queue2Array(Dep *, 1, new_Dep(arg1->pool, id));
2823 %newobject lookup_deparray;
2824 Queue lookup_deparray(Id keyname, Id marker = -1) {
2825 Solvable *s = $self->pool->solvables + $self->id;
2828 solvable_lookup_deparray(s, keyname, &r, marker);
2831 const char *lookup_location(unsigned int *OUTPUT) {
2832 return solvable_lookup_location($self->pool->solvables + $self->id, OUTPUT);
2834 const char *lookup_sourcepkg() {
2835 return solvable_lookup_sourcepkg($self->pool->solvables + $self->id);
2837 %newobject Dataiterator;
2838 Dataiterator *Dataiterator(Id key, const char *match = 0, int flags = 0) {
2839 return new_Dataiterator($self->pool, 0, $self->id, key, match, flags);
2842 %rename("installable?") installable;
2844 bool installable() {
2845 return pool_installable($self->pool, pool_id2solvable($self->pool, $self->id));
2848 %rename("isinstalled?") isinstalled;
2850 bool isinstalled() {
2851 Pool *pool = $self->pool;
2852 return pool->installed && pool_id2solvable(pool, $self->id)->repo == pool->installed;
2857 SWIGINTERN void XSolvable_name_set(XSolvable *xs, const char *name) {
2858 Pool *pool = xs->pool;
2859 pool->solvables[xs->id].name = pool_str2id(pool, name, 1);
2861 SWIGINTERN const char *XSolvable_name_get(XSolvable *xs) {
2862 Pool *pool = xs->pool;
2863 return pool_id2str(pool, pool->solvables[xs->id].name);
2868 SWIGINTERN void XSolvable_nameid_set(XSolvable *xs, Id nameid) {
2869 xs->pool->solvables[xs->id].name = nameid;
2871 SWIGINTERN Id XSolvable_nameid_get(XSolvable *xs) {
2872 return xs->pool->solvables[xs->id].name;
2877 SWIGINTERN void XSolvable_evr_set(XSolvable *xs, const char *evr) {
2878 Pool *pool = xs->pool;
2879 pool->solvables[xs->id].evr = pool_str2id(pool, evr, 1);
2881 SWIGINTERN const char *XSolvable_evr_get(XSolvable *xs) {
2882 Pool *pool = xs->pool;
2883 return pool_id2str(pool, pool->solvables[xs->id].evr);
2888 SWIGINTERN void XSolvable_evrid_set(XSolvable *xs, Id evrid) {
2889 xs->pool->solvables[xs->id].evr = evrid;
2891 SWIGINTERN Id XSolvable_evrid_get(XSolvable *xs) {
2892 return xs->pool->solvables[xs->id].evr;
2897 SWIGINTERN void XSolvable_arch_set(XSolvable *xs, const char *arch) {
2898 Pool *pool = xs->pool;
2899 pool->solvables[xs->id].arch = pool_str2id(pool, arch, 1);
2901 SWIGINTERN const char *XSolvable_arch_get(XSolvable *xs) {
2902 Pool *pool = xs->pool;
2903 return pool_id2str(pool, pool->solvables[xs->id].arch);
2908 SWIGINTERN void XSolvable_archid_set(XSolvable *xs, Id archid) {
2909 xs->pool->solvables[xs->id].arch = archid;
2911 SWIGINTERN Id XSolvable_archid_get(XSolvable *xs) {
2912 return xs->pool->solvables[xs->id].arch;
2917 SWIGINTERN void XSolvable_vendor_set(XSolvable *xs, const char *vendor) {
2918 Pool *pool = xs->pool;
2919 pool->solvables[xs->id].vendor = pool_str2id(pool, vendor, 1);
2921 SWIGINTERN const char *XSolvable_vendor_get(XSolvable *xs) {
2922 Pool *pool = xs->pool;
2923 return pool_id2str(pool, pool->solvables[xs->id].vendor);
2928 SWIGINTERN void XSolvable_vendorid_set(XSolvable *xs, Id vendorid) {
2929 xs->pool->solvables[xs->id].vendor = vendorid;
2931 SWIGINTERN Id XSolvable_vendorid_get(XSolvable *xs) {
2932 return xs->pool->solvables[xs->id].vendor;
2937 SWIGINTERN Repo *XSolvable_repo_get(XSolvable *xs) {
2938 return xs->pool->solvables[xs->id].repo;
2942 /* old interface, please use the generic add_deparray instead */
2943 void add_provides(DepId id, Id marker = -1) {
2944 Solvable *s = $self->pool->solvables + $self->id;
2945 marker = solv_depmarker(SOLVABLE_PROVIDES, marker);
2946 s->provides = repo_addid_dep(s->repo, s->provides, id, marker);
2948 void add_obsoletes(DepId id) {
2949 Solvable *s = $self->pool->solvables + $self->id;
2950 s->obsoletes = repo_addid_dep(s->repo, s->obsoletes, id, 0);
2952 void add_conflicts(DepId id) {
2953 Solvable *s = $self->pool->solvables + $self->id;
2954 s->conflicts = repo_addid_dep(s->repo, s->conflicts, id, 0);
2956 void add_requires(DepId id, Id marker = -1) {
2957 Solvable *s = $self->pool->solvables + $self->id;
2958 marker = solv_depmarker(SOLVABLE_REQUIRES, marker);
2959 s->requires = repo_addid_dep(s->repo, s->requires, id, marker);
2961 void add_recommends(DepId id) {
2962 Solvable *s = $self->pool->solvables + $self->id;
2963 s->recommends = repo_addid_dep(s->repo, s->recommends, id, 0);
2965 void add_suggests(DepId id) {
2966 Solvable *s = $self->pool->solvables + $self->id;
2967 s->suggests = repo_addid_dep(s->repo, s->suggests, id, 0);
2969 void add_supplements(DepId id) {
2970 Solvable *s = $self->pool->solvables + $self->id;
2971 s->supplements = repo_addid_dep(s->repo, s->supplements, id, 0);
2973 void add_enhances(DepId id) {
2974 Solvable *s = $self->pool->solvables + $self->id;
2975 s->enhances = repo_addid_dep(s->repo, s->enhances, id, 0);
2978 void unset(Id keyname) {
2979 Solvable *s = $self->pool->solvables + $self->id;
2980 repo_unset(s->repo, $self->id, keyname);
2983 void add_deparray(Id keyname, DepId id, Id marker = -1) {
2984 Solvable *s = $self->pool->solvables + $self->id;
2985 solvable_add_deparray(s, keyname, id, marker);
2988 %newobject Selection;
2989 Selection *Selection(int setflags=0) {
2990 Selection *sel = new_Selection($self->pool);
2991 queue_push2(&sel->q, SOLVER_SOLVABLE | setflags, $self->id);
2996 %rename("identical?") identical;
2998 bool identical(XSolvable *s2) {
2999 return solvable_identical($self->pool->solvables + $self->id, s2->pool->solvables + s2->id);
3001 int evrcmp(XSolvable *s2) {
3002 return pool_evrcmp($self->pool, $self->pool->solvables[$self->id].evr, s2->pool->solvables[s2->id].evr, EVRCMP_COMPARE);
3005 %rename("matchesdep?") matchesdep;
3007 bool matchesdep(Id keyname, DepId id, Id marker = -1) {
3008 return solvable_matchesdep($self->pool->solvables + $self->id, keyname, id, marker);
3011 #if defined(SWIGTCL)
3012 %rename("==") __eq__;
3014 bool __eq__(XSolvable *s) {
3015 return $self->pool == s->pool && $self->id == s->id;
3017 #if defined(SWIGTCL)
3018 %rename("!=") __ne__;
3020 bool __ne__(XSolvable *s) {
3021 return !XSolvable___eq__($self, s);
3023 #if defined(SWIGPYTHON)
3028 #if defined(SWIGPERL) || defined(SWIGTCL)
3029 %rename("str") __str__;
3031 const char *__str__() {
3032 return pool_solvid2str($self->pool, $self->id);
3034 #if defined(SWIGPERL) || defined(SWIGTCL)
3035 %rename("repr") __repr__;
3037 %newobject __repr__;
3038 const char *__repr__() {
3040 sprintf(buf, "<Solvable #%d ", $self->id);
3041 return solv_dupjoin(buf, pool_solvid2str($self->pool, $self->id), ">");
3046 Problem(Solver *solv, Id id) {
3048 p = solv_calloc(1, sizeof(*p));
3053 %newobject findproblemrule;
3054 XRule *findproblemrule() {
3055 Id r = solver_findproblemrule($self->solv, $self->id);
3056 return new_XRule($self->solv, r);
3058 %newobject findallproblemrules;
3059 %typemap(out) Queue findallproblemrules Queue2Array(XRule *, 1, new_XRule(arg1->solv, id));
3060 Queue findallproblemrules(int unfiltered=0) {
3061 Solver *solv = $self->solv;
3066 solver_findallproblemrules(solv, $self->id, &q);
3069 for (i = j = 0; i < q.count; i++)
3071 SolverRuleinfo rclass;
3072 probr = q.elements[i];
3073 rclass = solver_ruleclass(solv, probr);
3074 if (rclass == SOLVER_RULE_UPDATE || rclass == SOLVER_RULE_JOB)
3076 q.elements[j++] = probr;
3079 queue_truncate(&q, j);
3083 int solution_count() {
3084 return solver_solution_count($self->solv, $self->id);
3086 %typemap(out) Queue solutions Queue2Array(Solution *, 1, new_Solution(arg1, id));
3087 %newobject solutions;
3092 cnt = solver_solution_count($self->solv, $self->id);
3093 for (i = 1; i <= cnt; i++)
3097 #if defined(SWIGPERL) || defined(SWIGTCL)
3098 %rename("str") __str__;
3100 const char *__str__() {
3101 return solver_problem2str($self->solv, $self->id);
3106 Solution(Problem *p, Id id) {
3108 s = solv_calloc(1, sizeof(*s));
3110 s->problemid = p->id;
3114 int element_count() {
3115 return solver_solutionelement_count($self->solv, $self->problemid, $self->id);
3118 %typemap(out) Queue elements Queue2Array(Solutionelement *, 4, new_Solutionelement(arg1->solv, arg1->problemid, arg1->id, id, idp[1], idp[2], idp[3]));
3119 %newobject elements;
3120 Queue elements(bool expandreplaces=0) {
3124 cnt = solver_solutionelement_count($self->solv, $self->problemid, $self->id);
3125 for (i = 1; i <= cnt; i++)
3128 solver_next_solutionelement($self->solv, $self->problemid, $self->id, i - 1, &p, &rp);
3130 type = rp ? SOLVER_SOLUTION_REPLACE : SOLVER_SOLUTION_ERASE;
3136 if (type == SOLVER_SOLUTION_REPLACE && expandreplaces) {
3137 int illegal = policy_is_illegal(self->solv, self->solv->pool->solvables + p, self->solv->pool->solvables + rp, 0);
3139 if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0) {
3140 queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
3141 queue_push2(&q, p, rp);
3143 if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0) {
3144 queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
3145 queue_push2(&q, p, rp);
3147 if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0) {
3148 queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
3149 queue_push2(&q, p, rp);
3151 if ((illegal & POLICY_ILLEGAL_NAMECHANGE) != 0) {
3152 queue_push2(&q, i, SOLVER_SOLUTION_REPLACE_NAMECHANGE);
3153 queue_push2(&q, p, rp);
3158 queue_push2(&q, i, type);
3159 queue_push2(&q, p, rp);
3165 %extend Solutionelement {
3166 Solutionelement(Solver *solv, Id problemid, Id solutionid, Id id, Id type, Id p, Id rp) {
3168 e = solv_calloc(1, sizeof(*e));
3170 e->problemid = problemid;
3182 if (p == SOLVER_SOLUTION_ERASE)
3187 else if (p == SOLVER_SOLUTION_REPLACE)
3192 else if (p == SOLVER_SOLUTION_REPLACE_DOWNGRADE)
3193 illegal = POLICY_ILLEGAL_DOWNGRADE;
3194 else if (p == SOLVER_SOLUTION_REPLACE_ARCHCHANGE)
3195 illegal = POLICY_ILLEGAL_ARCHCHANGE;
3196 else if (p == SOLVER_SOLUTION_REPLACE_VENDORCHANGE)
3197 illegal = POLICY_ILLEGAL_VENDORCHANGE;
3198 else if (p == SOLVER_SOLUTION_REPLACE_NAMECHANGE)
3199 illegal = POLICY_ILLEGAL_NAMECHANGE;
3201 return pool_tmpjoin($self->solv->pool, "allow ", policy_illegal2str($self->solv, illegal, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp), 0);
3202 return solver_solutionelement2str($self->solv, p, rp);
3204 %typemap(out) Queue replaceelements Queue2Array(Solutionelement *, 1, new_Solutionelement(arg1->solv, arg1->problemid, arg1->solutionid, arg1->id, id, arg1->p, arg1->rp));
3205 %newobject replaceelements;
3206 Queue replaceelements() {
3211 if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
3214 illegal = policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
3215 if ((illegal & POLICY_ILLEGAL_DOWNGRADE) != 0)
3216 queue_push(&q, SOLVER_SOLUTION_REPLACE_DOWNGRADE);
3217 if ((illegal & POLICY_ILLEGAL_ARCHCHANGE) != 0)
3218 queue_push(&q, SOLVER_SOLUTION_REPLACE_ARCHCHANGE);
3219 if ((illegal & POLICY_ILLEGAL_VENDORCHANGE) != 0)
3220 queue_push(&q, SOLVER_SOLUTION_REPLACE_VENDORCHANGE);
3221 if ((illegal & POLICY_ILLEGAL_NAMECHANGE) != 0)
3222 queue_push(&q, SOLVER_SOLUTION_REPLACE_NAMECHANGE);
3224 queue_push(&q, $self->type);
3227 int illegalreplace() {
3228 if ($self->type != SOLVER_SOLUTION_REPLACE || $self->p <= 0 || $self->rp <= 0)
3230 return policy_is_illegal($self->solv, $self->solv->pool->solvables + $self->p, $self->solv->pool->solvables + $self->rp, 0);
3232 %newobject solvable;
3233 XSolvable * const solvable;
3234 %newobject replacement;
3235 XSolvable * const replacement;
3238 SWIGINTERN XSolvable *Solutionelement_solvable_get(Solutionelement *e) {
3239 return new_XSolvable(e->solv->pool, e->p);
3241 SWIGINTERN XSolvable *Solutionelement_replacement_get(Solutionelement *e) {
3242 return new_XSolvable(e->solv->pool, e->rp);
3244 SWIGINTERN int Solutionelement_jobidx_get(Solutionelement *e) {
3245 if (e->type != SOLVER_SOLUTION_JOB && e->type != SOLVER_SOLUTION_POOLJOB)
3247 return (e->p - 1) / 2;
3252 Id extraflags = solver_solutionelement_extrajobflags($self->solv, $self->problemid, $self->solutionid);
3253 if ($self->type == SOLVER_SOLUTION_JOB || $self->type == SOLVER_SOLUTION_POOLJOB)
3254 return new_Job($self->solv->pool, SOLVER_NOOP, 0);
3255 if ($self->type == SOLVER_SOLUTION_INFARCH || $self->type == SOLVER_SOLUTION_DISTUPGRADE || $self->type == SOLVER_SOLUTION_BEST)
3256 return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE|SOLVER_NOTBYUSER|extraflags, $self->p);
3257 if ($self->type == SOLVER_SOLUTION_REPLACE || $self->type == SOLVER_SOLUTION_REPLACE_DOWNGRADE || $self->type == SOLVER_SOLUTION_REPLACE_ARCHCHANGE || $self->type == SOLVER_SOLUTION_REPLACE_VENDORCHANGE || $self->type == SOLVER_SOLUTION_REPLACE_NAMECHANGE)
3258 return new_Job($self->solv->pool, SOLVER_INSTALL|SOLVER_SOLVABLE|SOLVER_NOTBYUSER|extraflags, $self->rp);
3259 if ($self->type == SOLVER_SOLUTION_ERASE)
3260 return new_Job($self->solv->pool, SOLVER_ERASE|SOLVER_SOLVABLE|extraflags, $self->p);
3266 static const int SOLVER_RULE_UNKNOWN = SOLVER_RULE_UNKNOWN;
3267 static const int SOLVER_RULE_PKG = SOLVER_RULE_PKG;
3268 static const int SOLVER_RULE_PKG_NOT_INSTALLABLE = SOLVER_RULE_PKG_NOT_INSTALLABLE;
3269 static const int SOLVER_RULE_PKG_NOTHING_PROVIDES_DEP = SOLVER_RULE_PKG_NOTHING_PROVIDES_DEP;
3270 static const int SOLVER_RULE_PKG_REQUIRES = SOLVER_RULE_PKG_REQUIRES;
3271 static const int SOLVER_RULE_PKG_SELF_CONFLICT = SOLVER_RULE_PKG_SELF_CONFLICT;
3272 static const int SOLVER_RULE_PKG_CONFLICTS = SOLVER_RULE_PKG_CONFLICTS;
3273 static const int SOLVER_RULE_PKG_SAME_NAME = SOLVER_RULE_PKG_SAME_NAME;
3274 static const int SOLVER_RULE_PKG_OBSOLETES = SOLVER_RULE_PKG_OBSOLETES;
3275 static const int SOLVER_RULE_PKG_IMPLICIT_OBSOLETES = SOLVER_RULE_PKG_IMPLICIT_OBSOLETES;
3276 static const int SOLVER_RULE_PKG_INSTALLED_OBSOLETES = SOLVER_RULE_PKG_INSTALLED_OBSOLETES;
3277 static const int SOLVER_RULE_UPDATE = SOLVER_RULE_UPDATE;
3278 static const int SOLVER_RULE_FEATURE = SOLVER_RULE_FEATURE;
3279 static const int SOLVER_RULE_JOB = SOLVER_RULE_JOB;
3280 static const int SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP = SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP;
3281 static const int SOLVER_RULE_JOB_PROVIDED_BY_SYSTEM = SOLVER_RULE_JOB_PROVIDED_BY_SYSTEM;
3282 static const int SOLVER_RULE_JOB_UNKNOWN_PACKAGE = SOLVER_RULE_JOB_UNKNOWN_PACKAGE;
3283 static const int SOLVER_RULE_JOB_UNSUPPORTED = SOLVER_RULE_JOB_UNSUPPORTED;
3284 static const int SOLVER_RULE_DISTUPGRADE = SOLVER_RULE_DISTUPGRADE;
3285 static const int SOLVER_RULE_INFARCH = SOLVER_RULE_INFARCH;
3286 static const int SOLVER_RULE_CHOICE = SOLVER_RULE_CHOICE;
3287 static const int SOLVER_RULE_LEARNT = SOLVER_RULE_LEARNT;
3289 static const int SOLVER_SOLUTION_JOB = SOLVER_SOLUTION_JOB;
3290 static const int SOLVER_SOLUTION_POOLJOB = SOLVER_SOLUTION_POOLJOB;
3291 static const int SOLVER_SOLUTION_INFARCH = SOLVER_SOLUTION_INFARCH;
3292 static const int SOLVER_SOLUTION_DISTUPGRADE = SOLVER_SOLUTION_DISTUPGRADE;
3293 static const int SOLVER_SOLUTION_BEST = SOLVER_SOLUTION_BEST;
3294 static const int SOLVER_SOLUTION_ERASE = SOLVER_SOLUTION_ERASE;
3295 static const int SOLVER_SOLUTION_REPLACE = SOLVER_SOLUTION_REPLACE;
3296 static const int SOLVER_SOLUTION_REPLACE_DOWNGRADE = SOLVER_SOLUTION_REPLACE_DOWNGRADE;
3297 static const int SOLVER_SOLUTION_REPLACE_ARCHCHANGE = SOLVER_SOLUTION_REPLACE_ARCHCHANGE;
3298 static const int SOLVER_SOLUTION_REPLACE_VENDORCHANGE = SOLVER_SOLUTION_REPLACE_VENDORCHANGE;
3299 static const int SOLVER_SOLUTION_REPLACE_NAMECHANGE = SOLVER_SOLUTION_REPLACE_NAMECHANGE;
3301 static const int POLICY_ILLEGAL_DOWNGRADE = POLICY_ILLEGAL_DOWNGRADE;
3302 static const int POLICY_ILLEGAL_ARCHCHANGE = POLICY_ILLEGAL_ARCHCHANGE;
3303 static const int POLICY_ILLEGAL_VENDORCHANGE = POLICY_ILLEGAL_VENDORCHANGE;
3304 static const int POLICY_ILLEGAL_NAMECHANGE = POLICY_ILLEGAL_NAMECHANGE;
3306 static const int SOLVER_FLAG_ALLOW_DOWNGRADE = SOLVER_FLAG_ALLOW_DOWNGRADE;
3307 static const int SOLVER_FLAG_ALLOW_ARCHCHANGE = SOLVER_FLAG_ALLOW_ARCHCHANGE;
3308 static const int SOLVER_FLAG_ALLOW_VENDORCHANGE = SOLVER_FLAG_ALLOW_VENDORCHANGE;
3309 static const int SOLVER_FLAG_ALLOW_NAMECHANGE = SOLVER_FLAG_ALLOW_NAMECHANGE;
3310 static const int SOLVER_FLAG_ALLOW_UNINSTALL = SOLVER_FLAG_ALLOW_UNINSTALL;
3311 static const int SOLVER_FLAG_NO_UPDATEPROVIDE = SOLVER_FLAG_NO_UPDATEPROVIDE;
3312 static const int SOLVER_FLAG_SPLITPROVIDES = SOLVER_FLAG_SPLITPROVIDES;
3313 static const int SOLVER_FLAG_IGNORE_RECOMMENDED = SOLVER_FLAG_IGNORE_RECOMMENDED;
3314 static const int SOLVER_FLAG_ADD_ALREADY_RECOMMENDED = SOLVER_FLAG_ADD_ALREADY_RECOMMENDED;
3315 static const int SOLVER_FLAG_NO_INFARCHCHECK = SOLVER_FLAG_NO_INFARCHCHECK;
3316 static const int SOLVER_FLAG_BEST_OBEY_POLICY = SOLVER_FLAG_BEST_OBEY_POLICY;
3317 static const int SOLVER_FLAG_NO_AUTOTARGET = SOLVER_FLAG_NO_AUTOTARGET;
3318 static const int SOLVER_FLAG_DUP_ALLOW_DOWNGRADE = SOLVER_FLAG_DUP_ALLOW_DOWNGRADE;
3319 static const int SOLVER_FLAG_DUP_ALLOW_ARCHCHANGE = SOLVER_FLAG_DUP_ALLOW_ARCHCHANGE;
3320 static const int SOLVER_FLAG_DUP_ALLOW_VENDORCHANGE = SOLVER_FLAG_DUP_ALLOW_VENDORCHANGE;
3321 static const int SOLVER_FLAG_DUP_ALLOW_NAMECHANGE = SOLVER_FLAG_DUP_ALLOW_NAMECHANGE;
3322 static const int SOLVER_FLAG_KEEP_ORPHANS = SOLVER_FLAG_KEEP_ORPHANS;
3323 static const int SOLVER_FLAG_BREAK_ORPHANS = SOLVER_FLAG_BREAK_ORPHANS;
3324 static const int SOLVER_FLAG_FOCUS_INSTALLED = SOLVER_FLAG_FOCUS_INSTALLED;
3325 static const int SOLVER_FLAG_YUM_OBSOLETES = SOLVER_FLAG_YUM_OBSOLETES;
3326 static const int SOLVER_FLAG_NEED_UPDATEPROVIDE = SOLVER_FLAG_NEED_UPDATEPROVIDE;
3327 static const int SOLVER_FLAG_FOCUS_BEST = SOLVER_FLAG_FOCUS_BEST;
3328 static const int SOLVER_FLAG_STRONG_RECOMMENDS = SOLVER_FLAG_STRONG_RECOMMENDS;
3329 static const int SOLVER_FLAG_INSTALL_ALSO_UPDATES = SOLVER_FLAG_INSTALL_ALSO_UPDATES;
3331 static const int SOLVER_REASON_UNRELATED = SOLVER_REASON_UNRELATED;
3332 static const int SOLVER_REASON_UNIT_RULE = SOLVER_REASON_UNIT_RULE;
3333 static const int SOLVER_REASON_KEEP_INSTALLED = SOLVER_REASON_KEEP_INSTALLED;
3334 static const int SOLVER_REASON_RESOLVE_JOB = SOLVER_REASON_RESOLVE_JOB;
3335 static const int SOLVER_REASON_UPDATE_INSTALLED = SOLVER_REASON_UPDATE_INSTALLED;
3336 static const int SOLVER_REASON_CLEANDEPS_ERASE = SOLVER_REASON_CLEANDEPS_ERASE;
3337 static const int SOLVER_REASON_RESOLVE = SOLVER_REASON_RESOLVE;
3338 static const int SOLVER_REASON_WEAKDEP = SOLVER_REASON_WEAKDEP;
3339 static const int SOLVER_REASON_RESOLVE_ORPHAN = SOLVER_REASON_RESOLVE_ORPHAN;
3340 static const int SOLVER_REASON_RECOMMENDED = SOLVER_REASON_RECOMMENDED;
3341 static const int SOLVER_REASON_SUPPLEMENTED = SOLVER_REASON_SUPPLEMENTED;
3344 static const int SOLVER_RULE_RPM = SOLVER_RULE_RPM;
3350 int set_flag(int flag, int value) {
3351 return solver_set_flag($self, flag, value);
3353 int get_flag(int flag) {
3354 return solver_get_flag($self, flag);
3356 #if defined(SWIGPYTHON)
3358 def solve(self, jobs):
3360 for job in jobs: j += [job.how, job.what]
3361 return self.solve_helper(j)
3364 #if defined(SWIGPERL)
3366 sub solv::Solver::solve {
3367 my ($self, $jobs) = @_;
3368 my @j = map {($_->{'how'}, $_->{'what'})} @$jobs;
3369 return $self->solve_helper(\@j);
3373 #if defined(SWIGRUBY)
3376 "class Solv::Solver\n"
3377 " def solve(jobs)\n"
3379 " jobs.each do |j| ; jl << j.how << j.what ; end\n"
3380 " solve_helper(jl)\n"
3386 %typemap(out) Queue solve_helper Queue2Array(Problem *, 1, new_Problem(arg1, id));
3387 %newobject solve_helper;
3388 Queue solve_helper(Queue jobs) {
3392 solver_solve($self, &jobs);
3393 cnt = solver_problem_count($self);
3394 for (i = 1; i <= cnt; i++)
3398 #if defined(SWIGTCL)
3399 %typemap(out) Queue solve Queue2Array(Problem *, 1, new_Problem(arg1, id));
3401 Queue solve(Queue solvejobs) {
3405 solver_solve($self, &solvejobs);
3406 cnt = solver_problem_count($self);
3407 for (i = 1; i <= cnt; i++)
3413 %newobject transaction;
3414 Transaction *transaction() {
3415 return solver_create_transaction($self);
3418 int describe_decision(XSolvable *s, XRule **OUTPUT) {
3420 int reason = solver_describe_decision($self, s->id, &ruleid);
3421 *OUTPUT = new_XRule($self, ruleid);
3425 %newobject describe_weakdep_decision_raw;
3426 Queue describe_weakdep_decision_raw(XSolvable *s) {
3429 solver_describe_weakdep_decision($self, s->id, &q);
3432 #if defined(SWIGPYTHON)
3434 def describe_weakdep_decision(self, s):
3435 d = iter(self.describe_weakdep_decision_raw(s))
3436 return [ (t, XSolvable(self.pool, sid), Dep(self.pool, id)) for t, sid, id in zip(d, d, d) ]
3439 #if defined(SWIGPERL)
3441 sub solv::Solver::describe_weakdep_decision {
3442 my ($self, $s) = @_;
3443 my $pool = $self->{'pool'};
3445 my @d = $self->describe_weakdep_decision_raw($s);
3446 push @res, [ splice(@d, 0, 3) ] while @d;
3447 return map { [ $_->[0], solv::XSolvable->new($pool, $_->[1]), solv::Dep->new($pool, $_->[2]) ] } @res;
3451 #if defined(SWIGRUBY)
3454 "class Solv::Solver\n"
3455 " def describe_weakdep_decision(s)\n"
3456 " self.describe_weakdep_decision_raw(s).each_slice(3).map { |t, sid, id| [ t, Solv::XSolvable.new(self.pool, sid), Solv::Dep.new(self.pool, id)] }\n"
3463 int alternatives_count() {
3464 return solver_alternatives_count($self);
3467 %newobject alternative;
3468 Alternative *alternative(Id aid) {
3469 Alternative *a = solv_calloc(1, sizeof(*a));
3471 queue_init(&a->choices);
3472 a->type = solver_get_alternative($self, aid, &a->dep_id, &a->from_id, &a->chosen_id, &a->choices, &a->level);
3474 queue_free(&a->choices);
3478 if (a->type == SOLVER_ALTERNATIVE_TYPE_RULE) {
3485 %typemap(out) Queue all_alternatives Queue2Array(Alternative *, 1, Solver_alternative(arg1, id));
3486 %newobject all_alternatives;
3487 Queue all_alternatives() {
3491 cnt = solver_alternatives_count($self);
3492 for (i = 1; i <= cnt; i++)
3497 bool write_testcase(const char *dir) {
3498 return testcase_write($self, dir, TESTCASE_RESULT_TRANSACTION | TESTCASE_RESULT_PROBLEMS, 0, 0);
3501 Queue raw_decisions(int filter=0) {
3504 solver_get_decisionqueue($self, &q);
3507 for (i = j = 0; i < q.count; i++)
3508 if ((filter > 0 && q.elements[i] > 1) ||
3509 (filter < 0 && q.elements[i] < 0))
3510 q.elements[j++] = q.elements[i];
3511 queue_truncate(&q, j);
3517 %extend Transaction {
3518 static const int SOLVER_TRANSACTION_IGNORE = SOLVER_TRANSACTION_IGNORE;
3519 static const int SOLVER_TRANSACTION_ERASE = SOLVER_TRANSACTION_ERASE;
3520 static const int SOLVER_TRANSACTION_REINSTALLED = SOLVER_TRANSACTION_REINSTALLED;
3521 static const int SOLVER_TRANSACTION_DOWNGRADED = SOLVER_TRANSACTION_DOWNGRADED;
3522 static const int SOLVER_TRANSACTION_CHANGED = SOLVER_TRANSACTION_CHANGED;
3523 static const int SOLVER_TRANSACTION_UPGRADED = SOLVER_TRANSACTION_UPGRADED;
3524 static const int SOLVER_TRANSACTION_OBSOLETED = SOLVER_TRANSACTION_OBSOLETED;
3525 static const int SOLVER_TRANSACTION_INSTALL = SOLVER_TRANSACTION_INSTALL;
3526 static const int SOLVER_TRANSACTION_REINSTALL = SOLVER_TRANSACTION_REINSTALL;
3527 static const int SOLVER_TRANSACTION_DOWNGRADE = SOLVER_TRANSACTION_DOWNGRADE;
3528 static const int SOLVER_TRANSACTION_CHANGE = SOLVER_TRANSACTION_CHANGE;
3529 static const int SOLVER_TRANSACTION_UPGRADE = SOLVER_TRANSACTION_UPGRADE;
3530 static const int SOLVER_TRANSACTION_OBSOLETES = SOLVER_TRANSACTION_OBSOLETES;
3531 static const int SOLVER_TRANSACTION_MULTIINSTALL = SOLVER_TRANSACTION_MULTIINSTALL;
3532 static const int SOLVER_TRANSACTION_MULTIREINSTALL = SOLVER_TRANSACTION_MULTIREINSTALL;
3533 static const int SOLVER_TRANSACTION_MAXTYPE = SOLVER_TRANSACTION_MAXTYPE;
3534 static const int SOLVER_TRANSACTION_SHOW_ACTIVE = SOLVER_TRANSACTION_SHOW_ACTIVE;
3535 static const int SOLVER_TRANSACTION_SHOW_ALL = SOLVER_TRANSACTION_SHOW_ALL;
3536 static const int SOLVER_TRANSACTION_SHOW_OBSOLETES = SOLVER_TRANSACTION_SHOW_OBSOLETES;
3537 static const int SOLVER_TRANSACTION_SHOW_MULTIINSTALL = SOLVER_TRANSACTION_SHOW_MULTIINSTALL;
3538 static const int SOLVER_TRANSACTION_CHANGE_IS_REINSTALL = SOLVER_TRANSACTION_CHANGE_IS_REINSTALL;
3539 static const int SOLVER_TRANSACTION_OBSOLETE_IS_UPGRADE = SOLVER_TRANSACTION_OBSOLETE_IS_UPGRADE;
3540 static const int SOLVER_TRANSACTION_MERGE_VENDORCHANGES = SOLVER_TRANSACTION_MERGE_VENDORCHANGES;
3541 static const int SOLVER_TRANSACTION_MERGE_ARCHCHANGES = SOLVER_TRANSACTION_MERGE_ARCHCHANGES;
3542 static const int SOLVER_TRANSACTION_RPM_ONLY = SOLVER_TRANSACTION_RPM_ONLY;
3543 static const int SOLVER_TRANSACTION_ARCHCHANGE = SOLVER_TRANSACTION_ARCHCHANGE;
3544 static const int SOLVER_TRANSACTION_VENDORCHANGE = SOLVER_TRANSACTION_VENDORCHANGE;
3545 static const int SOLVER_TRANSACTION_KEEP_ORDERDATA = SOLVER_TRANSACTION_KEEP_ORDERDATA;
3547 transaction_free($self);
3550 %rename("isempty?") isempty;
3553 return $self->steps.count == 0;
3556 %newobject othersolvable;
3557 XSolvable *othersolvable(XSolvable *s) {
3558 Id op = transaction_obs_pkg($self, s->id);
3559 return new_XSolvable($self->pool, op);
3562 %typemap(out) Queue allothersolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
3563 %newobject allothersolvables;
3564 Queue allothersolvables(XSolvable *s) {
3567 transaction_all_obs_pkgs($self, s->id, &q);
3571 %typemap(out) Queue classify Queue2Array(TransactionClass *, 4, new_TransactionClass(arg1, arg2, id, idp[1], idp[2], idp[3]));
3572 %newobject classify;
3573 Queue classify(int mode = 0) {
3576 transaction_classify($self, mode, &q);
3580 /* deprecated, use newsolvables instead */
3581 %typemap(out) Queue newpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
3582 %newobject newpackages;
3583 Queue newpackages() {
3587 cut = transaction_installedresult(self, &q);
3588 queue_truncate(&q, cut);
3592 /* deprecated, use keptsolvables instead */
3593 %typemap(out) Queue keptpackages Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
3594 %newobject keptpackages;
3595 Queue keptpackages() {
3599 cut = transaction_installedresult(self, &q);
3601 queue_deleten(&q, 0, cut);
3605 %typemap(out) Queue newsolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
3606 %newobject newsolvables;
3607 Queue newsolvables() {
3611 cut = transaction_installedresult(self, &q);
3612 queue_truncate(&q, cut);
3616 %typemap(out) Queue keptsolvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
3617 %newobject keptsolvables;
3618 Queue keptsolvables() {
3622 cut = transaction_installedresult(self, &q);
3624 queue_deleten(&q, 0, cut);
3628 %typemap(out) Queue steps Queue2Array(XSolvable *, 1, new_XSolvable(arg1->pool, id));
3632 queue_init_clone(&q, &$self->steps);
3636 int steptype(XSolvable *s, int mode) {
3637 return transaction_type($self, s->id, mode);
3639 int calc_installsizechange() {
3640 return transaction_calc_installsizechange($self);
3642 void order(int flags=0) {
3643 transaction_order($self, flags);
3647 %extend TransactionClass {
3648 TransactionClass(Transaction *trans, int mode, Id type, int count, Id fromid, Id toid) {
3649 TransactionClass *cl = solv_calloc(1, sizeof(*cl));
3650 cl->transaction = trans;
3654 cl->fromid = fromid;
3658 %typemap(out) Queue solvables Queue2Array(XSolvable *, 1, new_XSolvable(arg1->transaction->pool, id));
3659 %newobject solvables;
3663 transaction_classify_pkgs($self->transaction, $self->mode, $self->type, $self->fromid, $self->toid, &q);
3666 const char * const fromstr;
3667 const char * const tostr;
3669 SWIGINTERN const char *TransactionClass_fromstr_get(TransactionClass *cl) {
3670 return pool_id2str(cl->transaction->pool, cl->fromid);
3672 SWIGINTERN const char *TransactionClass_tostr_get(TransactionClass *cl) {
3673 return pool_id2str(cl->transaction->pool, cl->toid);
3679 XRule(Solver *solv, Id id) {
3682 XRule *xr = solv_calloc(1, sizeof(*xr));
3689 SWIGINTERN int XRule_type_get(XRule *xr) {
3690 return solver_ruleclass(xr->solv, xr->id);
3695 Id type, source, target, dep;
3696 type = solver_ruleinfo($self->solv, $self->id, &source, &target, &dep);
3697 return new_Ruleinfo($self, type, source, target, dep);
3699 %typemap(out) Queue allinfos Queue2Array(Ruleinfo *, 4, new_Ruleinfo(arg1, id, idp[1], idp[2], idp[3]));
3700 %newobject allinfos;
3704 solver_allruleinfos($self->solv, $self->id, &q);
3708 #if defined(SWIGTCL)
3709 %rename("==") __eq__;
3711 bool __eq__(XRule *xr) {
3712 return $self->solv == xr->solv && $self->id == xr->id;
3714 #if defined(SWIGTCL)
3715 %rename("!=") __ne__;
3717 bool __ne__(XRule *xr) {
3718 return !XRule___eq__($self, xr);
3720 #if defined(SWIGPYTHON)
3725 #if defined(SWIGPERL) || defined(SWIGTCL)
3726 %rename("repr") __repr__;
3728 %newobject __repr__;
3729 const char *__repr__() {
3731 sprintf(buf, "<Rule #%d>", $self->id);
3732 return solv_strdup(buf);
3737 Ruleinfo(XRule *r, Id type, Id source, Id target, Id dep_id) {
3738 Ruleinfo *ri = solv_calloc(1, sizeof(*ri));
3742 ri->source = source;
3743 ri->target = target;
3744 ri->dep_id = dep_id;
3747 %newobject solvable;
3748 XSolvable * const solvable;
3749 %newobject othersolvable;
3750 XSolvable * const othersolvable;
3754 SWIGINTERN XSolvable *Ruleinfo_solvable_get(Ruleinfo *ri) {
3755 return new_XSolvable(ri->solv->pool, ri->source);
3757 SWIGINTERN XSolvable *Ruleinfo_othersolvable_get(Ruleinfo *ri) {
3758 return new_XSolvable(ri->solv->pool, ri->target);
3760 SWIGINTERN Dep *Ruleinfo_dep_get(Ruleinfo *ri) {
3761 return new_Dep(ri->solv->pool, ri->dep_id);
3764 const char *problemstr() {
3765 return solver_problemruleinfo2str($self->solv, $self->type, $self->source, $self->target, $self->dep_id);
3770 XRepodata(Repo *repo, Id id) {
3771 XRepodata *xr = solv_calloc(1, sizeof(*xr));
3777 return repodata_new_handle(repo_id2repodata($self->repo, $self->id));
3779 void set_id(Id solvid, Id keyname, DepId id) {
3780 repodata_set_id(repo_id2repodata($self->repo, $self->id), solvid, keyname, id);
3782 void set_str(Id solvid, Id keyname, const char *str) {
3783 repodata_set_str(repo_id2repodata($self->repo, $self->id), solvid, keyname, str);
3785 void set_poolstr(Id solvid, Id keyname, const char *str) {
3786 repodata_set_poolstr(repo_id2repodata($self->repo, $self->id), solvid, keyname, str);
3788 void add_idarray(Id solvid, Id keyname, DepId id) {
3789 repodata_add_idarray(repo_id2repodata($self->repo, $self->id), solvid, keyname, id);
3791 void add_flexarray(Id solvid, Id keyname, Id handle) {
3792 repodata_add_flexarray(repo_id2repodata($self->repo, $self->id), solvid, keyname, handle);
3794 void set_checksum(Id solvid, Id keyname, Chksum *chksum) {
3795 const unsigned char *buf = solv_chksum_get(chksum, 0);
3797 repodata_set_bin_checksum(repo_id2repodata($self->repo, $self->id), solvid, keyname, solv_chksum_get_type(chksum), buf);
3799 void set_sourcepkg(Id solvid, const char *sourcepkg) {
3800 repodata_set_sourcepkg(repo_id2repodata($self->repo, $self->id), solvid, sourcepkg);
3802 const char *lookup_str(Id solvid, Id keyname) {
3803 return repodata_lookup_str(repo_id2repodata($self->repo, $self->id), solvid, keyname);
3805 Queue lookup_idarray(Id solvid, Id keyname) {
3808 repodata_lookup_idarray(repo_id2repodata($self->repo, $self->id), solvid, keyname, &r);
3811 %newobject lookup_checksum;
3812 Chksum *lookup_checksum(Id solvid, Id keyname) {
3814 const unsigned char *b = repodata_lookup_bin_checksum(repo_id2repodata($self->repo, $self->id), solvid, keyname, &type);
3815 return solv_chksum_create_from_bin(type, b);
3817 void internalize() {
3818 repodata_internalize(repo_id2repodata($self->repo, $self->id));
3820 void create_stubs() {
3821 Repodata *data = repo_id2repodata($self->repo, $self->id);
3822 data = repodata_create_stubs(data);
3823 $self->id = data->repodataid;
3825 bool write(FILE *fp) {
3826 return repodata_write(repo_id2repodata($self->repo, $self->id), fp) == 0;
3828 bool add_solv(FILE *fp, int flags = 0) {
3829 Repodata *data = repo_id2repodata($self->repo, $self->id);
3830 int r, oldstate = data->state;
3831 data->state = REPODATA_LOADING;
3832 r = repo_add_solv(data->repo, fp, flags | REPO_USE_LOADING);
3833 if (r || data->state == REPODATA_LOADING)
3834 data->state = oldstate;
3837 void extend_to_repo() {
3838 Repodata *data = repo_id2repodata($self->repo, $self->id);
3839 repodata_extend_block(data, data->repo->start, data->repo->end - data->repo->start);
3841 #if defined(SWIGTCL)
3842 %rename("==") __eq__;
3844 bool __eq__(XRepodata *xr) {
3845 return $self->repo == xr->repo && $self->id == xr->id;
3847 #if defined(SWIGTCL)
3848 %rename("!=") __ne__;
3850 bool __ne__(XRepodata *xr) {
3851 return !XRepodata___eq__($self, xr);
3853 #if defined(SWIGPYTHON)
3858 #if defined(SWIGPERL) || defined(SWIGTCL)
3859 %rename("repr") __repr__;
3861 %newobject __repr__;
3862 const char *__repr__() {
3864 sprintf(buf, "<Repodata #%d>", $self->id);
3865 return solv_strdup(buf);
3869 #ifdef ENABLE_PUBKEY
3872 return solvsig_create(fp);
3875 solvsig_free($self);
3879 return $self->htype ? (Chksum *)solv_chksum_create($self->htype) : 0;
3881 #ifdef ENABLE_PGPVRFY
3883 XSolvable *verify(Repo *repo, Chksum *chksum) {
3884 Id p = solvsig_verify($self, repo, chksum);
3885 return new_XSolvable(repo->pool, p);
3891 %extend Alternative {
3892 static const int SOLVER_ALTERNATIVE_TYPE_RULE = SOLVER_ALTERNATIVE_TYPE_RULE;
3893 static const int SOLVER_ALTERNATIVE_TYPE_RECOMMENDS = SOLVER_ALTERNATIVE_TYPE_RECOMMENDS;
3894 static const int SOLVER_ALTERNATIVE_TYPE_SUGGESTS = SOLVER_ALTERNATIVE_TYPE_SUGGESTS;
3897 queue_free(&$self->choices);
3901 XSolvable * const chosen;
3904 %newobject depsolvable;
3905 XSolvable * const depsolvable;
3909 SWIGINTERN XSolvable *Alternative_chosen_get(Alternative *a) {
3910 return new_XSolvable(a->solv->pool, a->chosen_id);
3912 SWIGINTERN XRule *Alternative_rule_get(Alternative *a) {
3913 return new_XRule(a->solv, a->rid);
3915 SWIGINTERN XSolvable *Alternative_depsolvable_get(Alternative *a) {
3916 return new_XSolvable(a->solv->pool, a->from_id);
3918 SWIGINTERN Dep *Alternative_dep_get(Alternative *a) {
3919 return new_Dep(a->solv->pool, a->dep_id);
3923 Queue choices_raw() {
3925 queue_init_clone(&r, &$self->choices);
3929 %typemap(out) Queue choices Queue2Array(XSolvable *, 1, new_XSolvable(arg1->solv->pool, id));
3933 queue_init_clone(&r, &$self->choices);
3934 for (i = 0; i < r.count; i++)
3935 if (r.elements[i] < 0)
3936 r.elements[i] = -r.elements[i];
3940 #if defined(SWIGPERL) || defined(SWIGTCL)
3941 %rename("str") __str__;
3943 const char *__str__() {
3944 return solver_alternative2str($self->solv, $self->type, $self->type == SOLVER_ALTERNATIVE_TYPE_RULE ? $self->rid : $self->dep_id, $self->from_id);
3948 #if defined(SWIGTCL)
3951 "proc solv::iter {varname iter body} {\n"\
3953 " set value [$iter __next__]\n"\
3954 " if {$value eq \"NULL\"} { break }\n"\
3955 " uplevel [list set $varname $value]\n"\
3956 " set code [catch {uplevel $body} result]\n"\
3957 " switch -exact -- $code {\n"\
3961 " default { return -code $code $result }\n"\