function getInstallOrder(Tiki_Profile $profile) { // Obtain the list of all required profiles $dependencies = $profile->getRequiredProfiles(true); $dependencies[$profile->url] = $profile; $referenced = array(); $knownObjects = array(); foreach (Tiki_Profile_Object::getNamedObjects() as $o) { $knownObjects[] = Tiki_Profile_Object::serializeNamedObject($o); } // Build the list of dependencies for each profile $short = array(); foreach ($dependencies as $url => $profile) { $short[$url] = array(); foreach ($profile->getRequiredProfiles() as $u => $p) { $short[$url][] = $u; } foreach ($profile->getNamedObjects() as $o) { $knownObjects[] = Tiki_Profile_Object::serializeNamedObject($o); } foreach ($profile->getReferences() as $o) { $referenced[] = Tiki_Profile_Object::serializeNamedObject($o); } if (!$this->isInstallable($profile)) { return false; } } // Make sure all referenced objects actually exist $remain = array_diff($referenced, $knownObjects); if (!empty($remain)) { throw new Exception("Unknown objects are referenced: " . implode(', ', $remain)); } // Build the list of packages that need to be installed $toSequence = array(); foreach ($dependencies as $url => $profile) { if (!$this->isInstalled($profile)) { $toSequence[] = $url; } } // Order the packages to make sure all dependencies are met $toInstall = array(); $counter = 0; while (count($toSequence)) { // If all packages were tested and no order was found, exit // Probably means there is a circular dependency if ($counter++ > count($toSequence) * 2) { throw new Exception("Profiles could not be ordered: " . implode(", ", $toSequence)); } $url = reset($toSequence); // Remove packages that are already scheduled or installed from dependencies $short[$url] = array_diff($short[$url], array_keys($this->installed), $toInstall); $element = array_shift($toSequence); if (count($short[$url])) { $toSequence[] = $element; } else { $counter = 0; $toInstall[] = $element; } } $final = array(); // Perform the actual install foreach ($toInstall as $url) { $final[] = $dependencies[$url]; } return $final; }