private static function getObjectReference($object, $full = true)
{
// If a prefix was set, attempt to isolate the lookup to the prefix first
if ($full) {
$withPrefix = $object;
$withPrefix['profile'] = self::withPrefix($withPrefix['profile']);
if (!is_null($ref = self::getObjectReference($withPrefix, false))) {
return $ref;
}
}
$serialized = Tiki_Profile_Object::serializeNamedObject($object);
if (!isset(self::$known[$serialized])) {
self::$known[$serialized] = self::findObjectReference($object);
}
return self::$known[$serialized];
}
function getInstallOrder(Tiki_Profile $profile)
{
if ($profile == null) {
return false;
}
// Obtain the list of all required profiles
$dependencies = $profile->getRequiredProfiles(true);
$dependencies[$profile->getProfileKey()] = $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 $key => $prf) {
if (empty($prf)) {
throw new Exception("Unknown objects are referenced: " . $key);
}
$short[$key] = array();
foreach ($prf->getRequiredProfiles() as $k => $p) {
$short[$key][] = $k;
}
foreach ($prf->getNamedObjects() as $o) {
$knownObjects[] = Tiki_Profile_Object::serializeNamedObject($o);
}
foreach ($prf->getReferences() as $o) {
$referenced[] = Tiki_Profile_Object::serializeNamedObject($o);
}
if (!$this->isInstallable($prf)) {
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 $key => $prf) {
if (!$this->isInstalled($prf, $key == $profile->getProfileKey() || $this->prefixDependencies)) {
$toSequence[] = $key;
}
}
// 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));
}
$key = reset($toSequence);
// Remove packages that are already scheduled or installed from dependencies
$short[$key] = array_diff($short[$key], array_keys($this->installed), $toInstall);
$element = array_shift($toSequence);
if (count($short[$key])) {
$toSequence[] = $element;
} else {
$counter = 0;
$toInstall[] = $element;
}
}
$final = array();
// Perform the actual install
foreach ($toInstall as $key) {
$final[] = $dependencies[$key];
}
return $final;
}
public function replaceReferences(&$data)
{
if (is_array($data)) {
foreach ($data as &$sub) {
$this->replaceReferences($sub);
}
} elseif (preg_match('/^\\$((([^:]+):)?(([^:]+):))?(.+)$/', $data, $parts)) {
$object = $this->convertReference($parts);
$serialized = Tiki_Profile_Object::serializeNamedObject($object);
if (!isset(self::$known[$serialized])) {
self::$known[$serialized] = self::findObjectReference($object);
}
$data = self::$known[$serialized];
} elseif (preg_match_all('/\\$profileobject:((([^:]+):)?(([^:]+):))?([^\\$]+)\\$/', $data, $parts, PREG_SET_ORDER)) {
foreach ($parts as $row) {
$object = $this->convertReference($row);
$serialized = Tiki_Profile_Object::serializeNamedObject($object);
if (!isset(self::$known[$serialized])) {
self::$known[$serialized] = self::findObjectReference($object);
}
$data = str_replace($row[0], self::$known[$serialized], $data);
}
}
}
