From 7306b66419c8e3f1785f2bb22d6851c827f7b671 Mon Sep 17 00:00:00 2001
From: kitsunyan
Date: Tue, 13 Mar 2018 05:55:41 +0300
Subject: Don't interrupt dependency resolving on fail

A depends on B, A depends on C, C depends on D, D provides B (B —
virtual package). Resolving a full tree sometimes allows to find actual
packages when "upper" packages reference to corresponding virtual
packages.

This also allows to display a complete list of missing dependencies.
---
 src/feature/syncinstall.nim | 19 ++++++++++++-------
 1 file changed, 12 insertions(+), 7 deletions(-)

(limited to 'src/feature')

diff --git a/src/feature/syncinstall.nim b/src/feature/syncinstall.nim
index 06ea1d2..ee4b227 100644
--- a/src/feature/syncinstall.nim
+++ b/src/feature/syncinstall.nim
@@ -66,7 +66,8 @@ proc orderInstallation(pkgInfos: seq[PackageInfo],
 
 proc findDependencies(config: Config, handle: ptr AlpmHandle, dbs: seq[ptr AlpmDatabase],
   satisfied: Table[PackageReference, SatisfyResult], unsatisfied: seq[PackageReference],
-  printMode: bool, noaur: bool): (Table[PackageReference, SatisfyResult], seq[PackageReference]) =
+  totalAurFail: seq[PackageReference], printMode: bool, noaur: bool):
+  (Table[PackageReference, SatisfyResult], seq[PackageReference]) =
   proc checkDependencyCycle(pkgInfo: PackageInfo, reference: PackageReference): bool =
     for checkReference in pkgInfo.allDepends:
       if checkReference.arch.isNone or checkReference.arch == some(config.arch):
@@ -146,6 +147,7 @@ proc findDependencies(config: Config, handle: ptr AlpmHandle, dbs: seq[ptr AlpmD
   let findResult: seq[ReferenceResult] = unsatisfied.map(r => (r, r.find))
   let success = findResult.filter(r => r.result.isSome)
   let aurCheck = findResult.filter(r => r.result.isNone).map(r => r.reference)
+    .filter(r => not (r in totalAurFail))
 
   let (aurSuccess, aurFail) = if not noaur and aurCheck.len > 0: (block:
       let (update, terminate) = if aurCheck.len >= 4:
@@ -182,12 +184,15 @@ proc findDependencies(config: Config, handle: ptr AlpmHandle, dbs: seq[ptr AlpmD
     r <- y.result, i <- r.buildPkgInfo, x <- i.allDepends,
     x.arch.isNone or x.arch == some(config.arch)), PackageReference].deduplicate
 
-  if aurFail.len > 0:
-    (newSatisfied, aurFail)
-  elif newUnsatisfied.len > 0:
-    findDependencies(config, handle, dbs, newSatisfied, newUnsatisfied, printMode, noaur)
+  let newTotalAurFail = (totalAurFail & aurFail).deduplicate
+  let newTotalUnsatisfied = (newUnsatisfied & newTotalAurFail).deduplicate
+
+  if newUnsatisfied.len > 0:
+    findDependencies(config, handle, dbs, newSatisfied, newTotalUnsatisfied, newTotalAurFail,
+      printMode, noaur)
   else:
-    (newSatisfied, @[])
+    let finallyUnsatisfied = newTotalAurFail.filter(r => not newSatisfied.hasKey(r))
+    (newSatisfied, finallyUnsatisfied)
 
 proc findDependencies(config: Config, handle: ptr AlpmHandle,
   dbs: seq[ptr AlpmDatabase], pkgInfos: seq[PackageInfo], printMode: bool, noaur: bool):
@@ -196,7 +201,7 @@ proc findDependencies(config: Config, handle: ptr AlpmHandle,
     (false, p.name, some(p)))).toTable
   let unsatisfied = lc[x.reference | (i <- pkgInfos, x <- i.allDepends,
     x.arch.isNone or x.arch == some(config.arch)), PackageReference].deduplicate
-  findDependencies(config, handle, dbs, satisfied, unsatisfied, printMode, noaur)
+  findDependencies(config, handle, dbs, satisfied, unsatisfied, @[], printMode, noaur)
 
 proc filterNotFoundSyncTargets[T: RpcPackageInfo](syncTargets: seq[SyncPackageTarget],
   pkgInfos: seq[T]): (Table[string, T], seq[SyncPackageTarget]) =
-- 
cgit v1.2.3-70-g09d2