prepare limittokind
[platform/upstream/libsolv.git] / src / solver.h
1 /*
2  * Copyright (c) 2007, Novell Inc.
3  *
4  * This program is licensed under the BSD license, read LICENSE.BSD
5  * for further information
6  */
7
8 /*
9  * solver.h
10  *
11  */
12
13 #ifndef SATSOLVER_SOLVER_H
14 #define SATSOLVER_SOLVER_H
15
16 #include "pooltypes.h"
17 #include "pool.h"
18 #include "repo.h"
19 #include "queue.h"
20 #include "bitmap.h"
21 /*
22  * Callback definitions in order to "overwrite" the policies by an external application.
23  */
24  
25 typedef void  (*BestSolvableCb) (Pool *pool, Queue *canditates);
26 typedef int  (*ArchCheckCb) (Pool *pool, Solvable *solvable1, Solvable *solvable2);
27 typedef int  (*VendorCheckCb) (Pool *pool, Solvable *solvable1, Solvable *solvable2);
28 typedef void (*UpdateCandidateCb) (Pool *pool, Solvable *solvable, Queue *canditates);
29
30
31 /* ----------------------------------------------
32  * Rule
33  *
34  *   providerN(B) == Package Id of package providing tag B
35  *   N = 1, 2, 3, in case of multiple providers
36  *
37  * A requires B : !A | provider1(B) | provider2(B)
38  *
39  * A conflicts B : (!A | !provider1(B)) & (!A | !provider2(B)) ...
40  *
41  * 'not' is encoded as a negative Id
42  * 
43  * Binary rule: p = first literal, d = 0, w2 = second literal, w1 = p
44  */
45
46 typedef struct rule {
47   Id p;                 /* first literal in rule */
48   Id d;                 /* Id offset into 'list of providers terminated by 0' as used by whatprovides; pool->whatprovides + d */
49                         /* in case of binary rules, d == 0, w1 == p, w2 == other literal */
50   Id w1, w2;            /* watches, literals not-yet-decided */
51                                        /* if !w1, disabled */
52                                        /* if !w2, assertion, not rule */
53   Id n1, n2;            /* next rules in linked list, corresponding to w1,w2 */
54 } Rule;
55
56 struct solver;
57
58 typedef struct solver {
59   Pool *pool;
60   Repo *installed;
61   
62   Rule *rules;                          /* all rules */
63   Id nrules;                            /* index of the last rule */
64
65   Id jobrules;                          /* user rules */
66   Id systemrules;                       /* policy rules, e.g. keep packages installed or update. All literals > 0 */
67   Id weakrules;                         /* rules that can be autodisabled */
68   Id learntrules;                       /* learnt rules */
69
70   Id *weaksystemrules;                  /* please try to install (r->d) */
71   Map noupdate;                         /* don't try to update these
72                                            installed solvables */
73
74   Id *watches;                          /* Array of rule offsets
75                                          * watches has nsolvables*2 entries and is addressed from the middle
76                                          * middle-solvable : decision to conflict, offset point to linked-list of rules
77                                          * middle+solvable : decision to install: offset point to linked-list of rules
78                                          */
79
80   Queue ruletojob;
81
82   /* our decisions: */
83   Queue decisionq;
84   Queue decisionq_why;                  /* index of rule, Offset into rules */
85   int directdecisions;                  /* number of decisions with no rule */
86
87   Id *decisionmap;                      /* map for all available solvables, > 0: level of decision when installed, < 0 level of decision when conflict */
88
89   /* learnt rule history */
90   Queue learnt_why;
91   Queue learnt_pool;
92
93   Queue branches;
94   int (*solution_callback)(struct solver *solv, void *data);
95   void *solution_callback_data;
96
97   int propagate_index;
98
99   Queue problems;
100   Queue suggestions;                    /* suggested packages */
101
102   Map recommendsmap;                    /* recommended packages from decisionmap */
103   Map suggestsmap;                      /* suggested packages from decisionmap */
104   int recommends_index;                 /* recommended level */
105
106   Id *obsoletes;                        /* obsoletes for each installed solvable */
107   Id *obsoletes_data;                   /* data area for obsoletes */
108
109   Queue covenantq;                      /* Covenants honored by this solver (generic locks) */
110
111   /*-------------------------------------------------------------------------------------------------------------
112    * Solver configuration
113    *-------------------------------------------------------------------------------------------------------------*/
114
115   int fixsystem;                        /* repair errors in rpm dependency graph */
116   int allowdowngrade;                   /* allow to downgrade installed solvable */
117   int allowarchchange;                  /* allow to change architecture of installed solvables */
118   int allowvendorchange;                /* allow to change vendor of installed solvables */
119   int allowuninstall;                   /* allow removal of installed solvables */
120   int updatesystem;                     /* distupgrade */
121   int allowvirtualconflicts;            /* false: conflicts on package name, true: conflicts on package provides */
122   int noupdateprovide;                  /* true: update packages needs not to provide old package */
123   int dosplitprovides;                  /* true: consider legacy split provides */
124   solvable_kind limittokind;
125   
126   /* Callbacks for defining the bahaviour of the SAT solver */
127
128   /* Finding best candidate
129    *
130    * Callback definition:
131    * void  bestSolvable (Pool *pool, Queue *canditates)
132    *     candidates       : List of canditates which has to be sorted by the function call
133    *     return candidates: Sorted list of the candidates(first is the best).
134    */
135    BestSolvableCb bestSolvableCb;
136
137   /* Checking if two solvables has compatible architectures
138    *
139    * Callback definition:
140    *     int  archCheck (Pool *pool, Solvable *solvable1, Solvable *solvable2);
141    *     
142    *     return 0 it the two solvables has compatible architectures
143    */
144    ArchCheckCb archCheckCb;
145
146   /* Checking if two solvables has compatible vendors
147    *
148    * Callback definition:
149    *     int  vendorCheck (Pool *pool, Solvable *solvable1, Solvable *solvable2);
150    *     
151    *     return 0 it the two solvables has compatible architectures
152    */
153    VendorCheckCb vendorCheckCb;
154     
155   /* Evaluate update candidate
156    *
157    * Callback definition:
158    * void pdateCandidateCb (Pool *pool, Solvable *solvable, Queue *canditates)
159    *     solvable   : for which updates should be search
160    *     candidates : List of candidates (This list depends on other
161    *                  restrictions like architecture and vendor policies too)
162    */
163    UpdateCandidateCb   updateCandidateCb;
164     
165   
166 } Solver;
167
168 /*
169  * queue commands
170  */
171
172 typedef enum {
173   SOLVCMD_NULL=0,
174   SOLVER_INSTALL_SOLVABLE,
175   SOLVER_ERASE_SOLVABLE,
176   SOLVER_INSTALL_SOLVABLE_NAME,
177   SOLVER_ERASE_SOLVABLE_NAME,
178   SOLVER_INSTALL_SOLVABLE_PROVIDES,
179   SOLVER_ERASE_SOLVABLE_PROVIDES,
180   SOLVER_INSTALL_SOLVABLE_UPDATE
181 } SolverCmd;
182
183 typedef enum {
184   SOLVER_PROBLEM_UPDATE_RULE,
185   SOLVER_PROBLEM_JOB_RULE,
186   SOLVER_PROBLEM_JOB_NOTHING_PROVIDES_DEP,
187   SOLVER_PROBLEM_NOT_INSTALLABLE,
188   SOLVER_PROBLEM_NOTHING_PROVIDES_DEP,
189   SOLVER_PROBLEM_SAME_NAME,
190   SOLVER_PROBLEM_PACKAGE_CONFLICT,
191   SOLVER_PROBLEM_PACKAGE_OBSOLETES,
192   SOLVER_PROBLEM_DEP_PROVIDERS_NOT_INSTALLABLE
193 } SolverProbleminfo;
194
195
196 extern Solver *solver_create(Pool *pool, Repo *installed);
197 extern void solver_free(Solver *solv);
198 extern void solver_solve(Solver *solv, Queue *job);
199 extern int solver_dep_installed(Solver *solv, Id dep);
200 extern int solver_splitprovides(Solver *solv, Id dep);
201
202 extern Id solver_next_problem(Solver *solv, Id problem);
203 extern Id solver_next_solution(Solver *solv, Id problem, Id solution);
204 extern Id solver_next_solutionelement(Solver *solv, Id problem, Id solution, Id element, Id *p, Id *rp);
205 extern Id solver_findproblemrule(Solver *solv, Id problem);
206 extern SolverProbleminfo solver_problemruleinfo(Solver *solv, Queue *job, Id rid, Id *depp, Id *sourcep, Id *targetp);
207
208 Id *create_obsoletesmap(Solver *solv);
209
210 /* debug functions, do not use */
211 void printdecisions(Solver *solv);
212 void printsolutions(Solver *solv, Queue *job);
213
214
215 static inline int
216 solver_dep_fulfilled(Solver *solv, Id dep)
217 {
218   Pool *pool = solv->pool;
219   Id p, *pp;
220
221   if (ISRELDEP(dep))
222     {
223       Reldep *rd = GETRELDEP(pool, dep);
224       if (rd->flags == REL_AND)
225         {
226           if (!solver_dep_fulfilled(solv, rd->name))
227             return 0;
228           return solver_dep_fulfilled(solv, rd->evr);
229         }
230       if (rd->flags == REL_NAMESPACE && rd->name == NAMESPACE_SPLITPROVIDES)
231         return solver_splitprovides(solv, rd->evr);
232       if (rd->flags == REL_NAMESPACE && rd->name == NAMESPACE_INSTALLED)
233         return solver_dep_installed(solv, rd->evr);
234     }
235   FOR_PROVIDES(p, pp, dep)
236     {
237       if (solv->decisionmap[p] > 0)
238         return 1;
239     }
240   return 0;
241 }
242
243 static inline int
244 solver_is_supplementing(Solver *solv, Solvable *s)
245 {
246   Id sup, *supp;
247   if (!s->supplements && !s->freshens)
248     return 0;
249   if (s->supplements)
250     {
251       supp = s->repo->idarraydata + s->supplements;
252       while ((sup = *supp++) != 0)
253         if (solver_dep_fulfilled(solv, sup))
254           break;
255       if (!sup)
256         return 0;
257     }
258   if (s->freshens)
259     {
260       supp = s->repo->idarraydata + s->freshens;
261       while ((sup = *supp++) != 0)
262         if (solver_dep_fulfilled(solv, sup))
263           break;
264       if (!sup)
265         return 0;
266     }
267   return 1;
268 }
269
270 static inline int
271 solver_is_enhancing(Solver *solv, Solvable *s)
272 {
273   Id enh, *enhp;
274   if (!s->enhances)
275     return 0;
276   enhp = s->repo->idarraydata + s->enhances;
277   while ((enh = *enhp++) != 0)
278     if (solver_dep_fulfilled(solv, enh))
279       return 1;
280   return 0;
281 }
282
283 #endif /* SATSOLVER_SOLVER_H */