/**
* Makes a copy of a bean. This method makes a deep copy
* of the bean.The copy will have the following features.
* - All beans in own-lists will be duplicated as well
* - All references to shared beans will be copied but not the shared beans themselves
* - All references to parent objects (_id fields) will be copied but not the parents themselves
* In most cases this is the desired scenario for copying beans.
* This function uses a trail-array to prevent infinite recursion, if a recursive bean is found
* (i.e. one that already has been processed) the ID of the bean will be returned.
* This should not happen though.
*
* Note:
* This function does a reflectional database query so it may be slow.
*
* @param RedBean_OODBBean $bean bean to be copied
* @param array $trail for internal usage, pass array()
* @param boolean $pid for internal usage
*
* @return array $copiedBean the duplicated bean
*/
protected function duplicate($bean, $trail = array(), $pid = false)
{
$type = $bean->getMeta('type');
$key = $type . $bean->getID();
if (isset($trail[$key])) {
return $bean;
}
$trail[$key] = $bean;
$copy = $this->redbean->dispense($type);
$copy->import($bean->getProperties());
$copy->id = 0;
$tables = $this->toolbox->getWriter()->getTables();
foreach ($tables as $table) {
if (strpos($table, '_') !== false || $table == $type) {
continue;
}
$owned = 'own' . ucfirst($table);
$shared = 'shared' . ucfirst($table);
if ($beans = $bean->{$owned}) {
$copy->{$owned} = array();
foreach ($beans as $subBean) {
array_push($copy->{$owned}, $this->duplicate($subBean, $trail, $pid));
}
}
$copy->setMeta('sys.shadow.' . $owned, null);
if ($beans = $bean->{$shared}) {
$copy->{$shared} = array();
foreach ($beans as $subBean) {
array_push($copy->{$shared}, $subBean);
}
}
$copy->setMeta('sys.shadow.' . $shared, null);
}
if ($pid) {
$copy->id = $bean->id;
}
return $copy;
}
