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 #ifdef __cplusplus
  17 extern "C" {
  18 #endif
  19
  20 #include "pooltypes.h"
  21 #include "pool.h"
  22 #include "repo.h"
  23 #include "queue.h"
  24 #include "bitmap.h"
  25 #include "transaction.h"
  26 #include "rules.h"
  27 #include "problems.h"
  28
  29 /*
  30  * Callback definitions in order to "overwrite" the policies by an external application.
  31  */
  32
  33 typedef void  (*BestSolvableCb) (Pool *pool, Queue *canditates);
  34 typedef int  (*ArchCheckCb) (Pool *pool, Solvable *solvable1, Solvable *solvable2);
  35 typedef int  (*VendorCheckCb) (Pool *pool, Solvable *solvable1, Solvable *solvable2);
  36 typedef void (*UpdateCandidateCb) (Pool *pool, Solvable *solvable, Queue *canditates);
  37
  38
  39 struct _Solver;
  40
  41 typedef struct _Solver {
  42   Pool *pool;                           /* back pointer to pool */
  43   Queue job;                            /* copy of the job we're solving */
  44
  45   Transaction trans;                    /* calculated transaction */
  46
  47   Repo *installed;                      /* copy of pool->installed */
  48
  49   /* list of rules, ordered
  50    * rpm rules first, then features, updates, jobs, learnt
  51    * see start/end offsets below
  52    */
  53   Rule *rules;                          /* all rules */
  54   Id nrules;                            /* [Offset] index of the last rule */
  55
  56   Queue ruleassertions;                 /* Queue of all assertion rules */
  57
  58   /* start/end offset for rule 'areas' */
  59
  60   Id rpmrules_end;                      /* [Offset] rpm rules end */
  61
  62   Id featurerules;                      /* feature rules start/end */
  63   Id featurerules_end;
  64
  65   Id updaterules;                       /* policy rules, e.g. keep packages installed or update. All literals > 0 */
  66   Id updaterules_end;
  67
  68   Id jobrules;                          /* user rules */
  69   Id jobrules_end;
  70
  71   Id infarchrules;                      /* inferior arch rules */
  72   Id infarchrules_end;
  73
  74   Id duprules;                          /* dist upgrade rules */
  75   Id duprules_end;
  76
  77   Id choicerules;                       /* choice rules (always weak) */
  78   Id choicerules_end;
  79   Id *choicerules_ref;
  80
  81   Id learntrules;                       /* learnt rules, (end == nrules) */
  82
  83   Map noupdate;                         /* don't try to update these
  84                                            installed solvables */
  85   Map noobsoletes;                      /* ignore obsoletes for these
  86                                            (multiinstall) */
  87
  88   Map updatemap;                        /* bring those installed packages to the newest version */
  89   Map fixmap;                           /* fix those packages */
  90
  91   Queue weakruleq;                      /* index into 'rules' for weak ones */
  92   Map weakrulemap;                      /* map rule# to '1' for weak rules, 1..learntrules */
  93
  94   Id *watches;                          /* Array of rule offsets
  95                                          * watches has nsolvables*2 entries and is addressed from the middle
  96                                          * middle-solvable : decision to conflict, offset point to linked-list of rules
  97                                          * middle+solvable : decision to install: offset point to linked-list of rules
  98                                          */
  99
 100   Queue ruletojob;                      /* index into job queue: jobs for which a rule exits */
 101
 102   /* our decisions: */
 103   Queue decisionq;                      /* >0:install, <0:remove/conflict */
 104   Queue decisionq_why;                  /* index of rule, Offset into rules */
 105
 106   Id *decisionmap;                      /* map for all available solvables,
 107                                          * = 0: undecided
 108                                          * > 0: level of decision when installed,
 109                                          * < 0: level of decision when conflict */
 110
 111   /* learnt rule history */
 112   Queue learnt_why;
 113   Queue learnt_pool;
 114
 115   Queue branches;
 116   int (*solution_callback)(struct _Solver *solv, void *data);
 117   void *solution_callback_data;
 118
 119   int propagate_index;                  /* index into decisionq for non-propagated decisions */
 120
 121   Queue problems;                       /* list of lists of conflicting rules, < 0 for job rules */
 122   Queue solutions;                      /* refined problem storage space */
 123
 124   Queue recommendations;                /* recommended packages */
 125   Queue suggestions;                    /* suggested packages */
 126   Queue orphaned;                       /* orphaned packages */
 127
 128   int stats_learned;                    /* statistic */
 129   int stats_unsolvable;                 /* statistic */
 130
 131   Map recommendsmap;                    /* recommended packages from decisionmap */
 132   Map suggestsmap;                      /* suggested packages from decisionmap */
 133   int recommends_index;                 /* recommendsmap/suggestsmap is created up to this level */
 134
 135   Id *obsoletes;                        /* obsoletes for each installed solvable */
 136   Id *obsoletes_data;                   /* data area for obsoletes */
 137   Id *multiversionupdaters;             /* updaters for multiversion packages in updatesystem mode */
 138
 139   /*-------------------------------------------------------------------------------------------------------------
 140    * Solver configuration
 141    *-------------------------------------------------------------------------------------------------------------*/
 142
 143   int fixsystem;                        /* repair errors in rpm dependency graph */
 144   int allowdowngrade;                   /* allow to downgrade installed solvable */
 145   int allowarchchange;                  /* allow to change architecture of installed solvables */
 146   int allowvendorchange;                /* allow to change vendor of installed solvables */
 147   int allowuninstall;                   /* allow removal of installed solvables */
 148   int updatesystem;                     /* update all packages to the newest version */
 149   int noupdateprovide;                  /* true: update packages needs not to provide old package */
 150   int dosplitprovides;                  /* true: consider legacy split provides */
 151   int dontinstallrecommended;           /* true: do not install recommended packages */
 152   int ignorealreadyrecommended;         /* true: ignore recommended packages that were already recommended by the installed packages */
 153   int dontshowinstalledrecommended;     /* true: do not show recommended packages that are already installed */
 154
 155   /* distupgrade also needs updatesystem and dosplitprovides */
 156   int distupgrade;
 157   int distupgrade_removeunsupported;
 158
 159   int noinfarchcheck;                   /* true: do not forbid inferior architectures */
 160
 161   /* Callbacks for defining the bahaviour of the SAT solver */
 162
 163   /* Finding best candidate
 164    *
 165    * Callback definition:
 166    * void  bestSolvable (Pool *pool, Queue *canditates)
 167    *     candidates       : List of canditates which has to be sorted by the function call
 168    *     return candidates: Sorted list of the candidates(first is the best).
 169    */
 170    BestSolvableCb bestSolvableCb;
 171
 172   /* Checking if two solvables has compatible architectures
 173    *
 174    * Callback definition:
 175    *     int  archCheck (Pool *pool, Solvable *solvable1, Solvable *solvable2);
 176    *
 177    *     return 0 it the two solvables has compatible architectures
 178    */
 179    ArchCheckCb archCheckCb;
 180
 181   /* Checking if two solvables has compatible vendors
 182    *
 183    * Callback definition:
 184    *     int  vendorCheck (Pool *pool, Solvable *solvable1, Solvable *solvable2);
 185    *
 186    *     return 0 it the two solvables has compatible architectures
 187    */
 188    VendorCheckCb vendorCheckCb;
 189
 190   /* Evaluate update candidate
 191    *
 192    * Callback definition:
 193    * void pdateCandidateCb (Pool *pool, Solvable *solvable, Queue *canditates)
 194    *     solvable   : for which updates should be search
 195    *     candidates : List of candidates (This list depends on other
 196    *                  restrictions like architecture and vendor policies too)
 197    */
 198    UpdateCandidateCb   updateCandidateCb;
 199
 200
 201   /* some strange queue that doesn't belong here */
 202   Queue covenantq;                      /* Covenants honored by this solver (generic locks) */
 203
 204
 205   Map dupmap;                           /* packages from dup repos */
 206   Map dupinvolvedmap;                   /* packages involved in dup process */
 207   Map droporphanedmap;                  /* packages to drop in dup mode */
 208
 209   Queue *ruleinfoq;                     /* tmp space for solver_ruleinfo() */
 210 } Solver;
 211
 212 /*
 213  * queue commands
 214  */
 215
 216 #define SOLVER_SOLVABLE                 0x01
 217 #define SOLVER_SOLVABLE_NAME            0x02
 218 #define SOLVER_SOLVABLE_PROVIDES        0x03
 219 #define SOLVER_SOLVABLE_ONE_OF          0x04
 220 #define SOLVER_SOLVABLE_REPO            0x05
 221
 222 #define SOLVER_SELECTMASK               0xff
 223
 224 #define SOLVER_NOOP                     0x0000
 225 #define SOLVER_INSTALL                  0x0100
 226 #define SOLVER_ERASE                    0x0200
 227 #define SOLVER_UPDATE                   0x0300
 228 #define SOLVER_WEAKENDEPS               0x0400
 229 #define SOLVER_NOOBSOLETES              0x0500
 230 #define SOLVER_LOCK                     0x0600
 231 #define SOLVER_DISTUPGRADE              0x0700
 232 #define SOLVER_VERIFY                   0x0800
 233 #define SOLVER_DROP_ORPHANED            0x0900
 234
 235 #define SOLVER_JOBMASK                  0xff00
 236
 237 #define SOLVER_WEAK                     0x010000
 238 #define SOLVER_ESSENTIAL                0x020000
 239
 240 /* old API compatibility, do not use in new code */
 241 #if 1
 242 #define SOLVER_INSTALL_SOLVABLE (SOLVER_INSTALL|SOLVER_SOLVABLE)
 243 #define SOLVER_ERASE_SOLVABLE (SOLVER_ERASE|SOLVER_SOLVABLE)
 244 #define SOLVER_INSTALL_SOLVABLE_NAME (SOLVER_INSTALL|SOLVER_SOLVABLE_NAME)
 245 #define SOLVER_ERASE_SOLVABLE_NAME (SOLVER_ERASE|SOLVER_SOLVABLE_NAME)
 246 #define SOLVER_INSTALL_SOLVABLE_PROVIDES (SOLVER_INSTALL|SOLVER_SOLVABLE_PROVIDES)
 247 #define SOLVER_ERASE_SOLVABLE_PROVIDES (SOLVER_ERASE|SOLVER_SOLVABLE_PROVIDES)
 248 #define SOLVER_INSTALL_SOLVABLE_UPDATE (SOLVER_UPDATE|SOLVER_SOLVABLE)
 249 #define SOLVER_INSTALL_SOLVABLE_ONE_OF (SOLVER_INSTALL|SOLVER_SOLVABLE_ONE_OF)
 250 #define SOLVER_WEAKEN_SOLVABLE_DEPS (SOLVER_WEAKENDEPS|SOLVER_SOLVABLE)
 251 #define SOLVER_NOOBSOLETES_SOLVABLE (SOLVER_NOOBSOLETES|SOLVER_SOLVABLE)
 252 #define SOLVER_NOOBSOLETES_SOLVABLE_NAME (SOLVER_NOOBSOLETES|SOLVER_SOLVABLE_NAME)
 253 #define SOLVER_NOOBSOLETES_SOLVABLE_PROVIDES (SOLVER_NOOBSOLETES|SOLVER_SOLVABLE_PROVIDES)
 254 #endif
 255
 256 /* backward compatibility */
 257 #define SOLVER_PROBLEM_UPDATE_RULE              SOLVER_RULE_UPDATE
 258 #define SOLVER_PROBLEM_JOB_RULE                 SOLVER_RULE_JOB
 259 #define SOLVER_PROBLEM_JOB_NOTHING_PROVIDES_DEP SOLVER_RULE_JOB_NOTHING_PROVIDES_DEP
 260 #define SOLVER_PROBLEM_NOT_INSTALLABLE          SOLVER_RULE_RPM_NOT_INSTALLABLE
 261 #define SOLVER_PROBLEM_NOTHING_PROVIDES_DEP     SOLVER_RULE_RPM_NOTHING_PROVIDES_DEP
 262 #define SOLVER_PROBLEM_SAME_NAME                SOLVER_RULE_RPM_SAME_NAME
 263 #define SOLVER_PROBLEM_PACKAGE_CONFLICT         SOLVER_RULE_RPM_PACKAGE_CONFLICT
 264 #define SOLVER_PROBLEM_PACKAGE_OBSOLETES        SOLVER_RULE_RPM_PACKAGE_OBSOLETES
 265 #define SOLVER_PROBLEM_DEP_PROVIDERS_NOT_INSTALLABLE SOLVER_RULE_RPM_PACKAGE_REQUIRES
 266 #define SOLVER_PROBLEM_SELF_CONFLICT            SOLVER_RULE_RPM_SELF_CONFLICT
 267 #define SOLVER_PROBLEM_RPM_RULE                 SOLVER_RULE_RPM
 268 #define SOLVER_PROBLEM_DISTUPGRADE_RULE         SOLVER_RULE_DISTUPGRADE
 269 #define SOLVER_PROBLEM_INFARCH_RULE             SOLVER_RULE_INFARCH
 270
 271
 272 extern Solver *solver_create(Pool *pool);
 273 extern void solver_free(Solver *solv);
 274 extern void solver_solve(Solver *solv, Queue *job);
 275
 276 extern void solver_run_sat(Solver *solv, int disablerules, int doweak);
 277 extern void solver_reset(Solver *solv);
 278
 279 extern int solver_dep_installed(Solver *solv, Id dep);
 280 extern int solver_splitprovides(Solver *solv, Id dep);
 281
 282 extern void solver_calculate_noobsmap(Pool *pool, Queue *job, Map *noobsmap);
 283
 284 /* obsolete */
 285 extern SolverRuleinfo solver_problemruleinfo(Solver *solv, Queue *job, Id rid, Id *depp, Id *sourcep, Id *targetp);
 286
 287 /* XXX: why is this not static? */
 288 Id *solver_create_decisions_obsoletesmap(Solver *solv);
 289
 290 static inline int
 291 solver_dep_fulfilled(Solver *solv, Id dep)
 292 {
 293   Pool *pool = solv->pool;
 294   Id p, pp;
 295
 296   if (ISRELDEP(dep))
 297     {
 298       Reldep *rd = GETRELDEP(pool, dep);
 299       if (rd->flags == REL_AND)
 300         {
 301           if (!solver_dep_fulfilled(solv, rd->name))
 302             return 0;
 303           return solver_dep_fulfilled(solv, rd->evr);
 304         }
 305       if (rd->flags == REL_NAMESPACE && rd->name == NAMESPACE_SPLITPROVIDES)
 306         return solver_splitprovides(solv, rd->evr);
 307       if (rd->flags == REL_NAMESPACE && rd->name == NAMESPACE_INSTALLED)
 308         return solver_dep_installed(solv, rd->evr);
 309     }
 310   FOR_PROVIDES(p, pp, dep)
 311     {
 312       if (solv->decisionmap[p] > 0)
 313         return 1;
 314     }
 315   return 0;
 316 }
 317
 318 static inline int
 319 solver_is_supplementing(Solver *solv, Solvable *s)
 320 {
 321   Id sup, *supp;
 322   if (!s->supplements)
 323     return 0;
 324   supp = s->repo->idarraydata + s->supplements;
 325   while ((sup = *supp++) != 0)
 326     if (solver_dep_fulfilled(solv, sup))
 327       return 1;
 328   return 0;
 329 }
 330
 331 static inline int
 332 solver_is_enhancing(Solver *solv, Solvable *s)
 333 {
 334   Id enh, *enhp;
 335   if (!s->enhances)
 336     return 0;
 337   enhp = s->repo->idarraydata + s->enhances;
 338   while ((enh = *enhp++) != 0)
 339     if (solver_dep_fulfilled(solv, enh))
 340       return 1;
 341   return 0;
 342 }
 343
 344 void solver_calc_duchanges(Solver *solv, DUChanges *mps, int nmps);
 345 int solver_calc_installsizechange(Solver *solv);
 346 void solver_trivial_installable(Solver *solv, Queue *pkgs, Queue *res);
 347
 348 void solver_find_involved(Solver *solv, Queue *installedq, Solvable *s, Queue *q);
 349
 350 static inline void
 351 solver_create_state_maps(Solver *solv, Map *installedmap, Map *conflictsmap)
 352 {
 353   pool_create_state_maps(solv->pool, &solv->decisionq, installedmap, conflictsmap);
 354 }
 355
 356 /* iterate over all literals of a rule */
 357 /* WARNING: loop body must not relocate whatprovidesdata, e.g. by
 358  * looking up the providers of a dependency */
 359 #define FOR_RULELITERALS(l, dp, r)                              \
 360     for (l = r->d < 0 ? -r->d - 1 : r->d,                       \
 361          dp = !l ? &r->w2 : pool->whatprovidesdata + l,         \
 362          l = r->p; l; l = (dp != &r->w2 + 1 ? *dp++ : 0))
 363
 364 /* iterate over all packages selected by a job */
 365 #define FOR_JOB_SELECT(p, pp, select, what)                     \
 366     if (select == SOLVER_SOLVABLE_REPO)                         \
 367         p = pp = 0;                                             \
 368     else for (pp = (select == SOLVER_SOLVABLE ? 0 :             \
 369                select == SOLVER_SOLVABLE_ONE_OF ? what :        \
 370                pool_whatprovides(pool, what)),                          \
 371          p = (select == SOLVER_SOLVABLE ? what : pool->whatprovidesdata[pp++]) ; p ; p = pool->whatprovidesdata[pp++]) \
 372       if (select != SOLVER_SOLVABLE_NAME || pool_match_nevr(pool, pool->solvables + p, what))
 373
 374 #ifdef __cplusplus
 375 }
 376 #endif
 377
 378 #endif /* SATSOLVER_SOLVER_H */