File Source for LInterlinkCore.php

<?php
/**
* Class file.
*
* @license http://opensource.org/licenses/mozilla1.1.php Mozilla Public License
* @copyright 2005, diemeisterei GmbH. All rights reserved.
* @author $Author: schmunk $
* @version $Revision: 382 $ $Date: 2006-11-16 11:41:32 +0100 (Thu, 16 Nov 2006) $
* @package Phundament.Packages
* @subpackage LInterlink
*/
Prado :: setPathOfAlias("LInterlink", dirname(__FILE__));
Prado :: using("LInterlink.db.propel.*");
Prado :: using("LInterlink.db.propel.l_interlink.*");
/**
* @package System.Collections
*/
class LRelationEntry
{
private $_rank = null;
private $_custom_data = null;
public function __construct($rank = null, $custom_data = null)
{
$this->_rank = $rank;
$this->_custom_data = $custom_data;
}
public function getRank()
{
return $this->_rank;
}
public function getCustomData()
{
return $this->_custom_data;
}
}
/**
* @package System.Collections
*/
class LRelation extends TMap
{
private $_key;
private $_category;
private $_source_id;
public function __construct($key, $category, $source_id, $records)
{
$this->_key = $key;
$this->_category = $category;
$this->_source_id = $source_id;
foreach($records as $rec)
{
$entry = new LRelationEntry($rec->getRank(), $rec->getCustomData());
$this->add($rec->getDestinationId(), $entry);
}
}
public function save()
{
$conn = Prado::getApplication()->getModule("database")->getConnection("l_interlink", "propel");
$c= new Criteria();
$c->add(LInterlinkPeer :: KEY, $this->_key);
$c->add(LInterlinkPeer :: CATEGORY, $this->_category);
$c->add(LInterlinkPeer :: SOURCE_ID, $this->_source_id);
LInterlinkPeer :: doDelete($c, $conn);
foreach($this as $dest_id => $entry)
{
$r = new LInterlink;
$r->setKey($this->_key);
$r->setCategory($this->_category);
$r->setSourceId($this->_source_id);
$r->setDestinationId($dest_id);
$r->setRank($entry->getRank());
$cust = $entry->getCustomData();
if ($cust !== null)
$r->setCustomData($cust);
$r->save();
}
}
}
/**
* @package System.Util
* @subpackage Cores
*/
class LInterlinkCore extends TModule
{
protected $_links = array();
public function init($config)
{
Prado::trace("Initializing interlink module ...", "Lithron.LInterlink");
$links = $config->getElementsByTagName("link");
foreach($links as $link)
{
$link_akku = array();
$categories = $link-> getElementsByTagName("category");
foreach($categories as $category)
{
$cat_akku = array();
$statements = $category-> getElements();
foreach($statements as $statement)
{
switch($statement->getTagName())
{
case "selection":
$cat_akku["selection"] = $statement->getAttribute("class");
}
}
$link_akku[$category->getAttribute("id")] = $cat_akku;
}
$this->_links[$link->getAttribute("key")] = $link_akku;
}
}
public function getCategories($link)
{
if (isset($this->_links[$link]))
return $this->_links[$link];
else
return array();
}
public function getSelectionControlClassName($link, $category)
{
if (isset($this->_links[$link]) &&
isset($this->_links[$link][$category]) &&
isset($this->_links[$link][$category]["selection"]))
return $this->_links[$link][$category]["selection"];
else
return null;
}
public function loadRelation($key, $category, $source_id)
{
$conn = $this->Application->getModule("database")->getConnection("l_interlink", "propel");
$c= new Criteria();
$c->add(LInterlinkPeer :: KEY, $key);
$c->add(LInterlinkPeer :: CATEGORY, $category);
$c->add(LInterlinkPeer :: SOURCE_ID, $source_id);
$c->addAscendingOrderByColumn(LInterlinkPeer :: RANK);
$records = LInterlinkPeer :: doSelect($c, $conn);
return new LRelation($key, $category, $source_id, $records);
}
}
?>

Source for file LInterlinkCore.php