/**
* Support for contacts person merge
*/
function org_openpsa_contacts_duplicates_merge_person(&$person1, &$person2, $mode)
{
switch ($mode) {
case 'all':
break;
case 'future':
// Relatedto does not have future references so we have nothing to transfer...
return true;
break;
default:
// Mode not implemented
debug_add("mode {$mode} not implemented", MIDCOM_LOG_ERROR);
return false;
break;
}
$qb = org_openpsa_relatedto_dba::new_query_builder();
$qb->begin_group('OR');
$qb->add_constraint('fromGuid', '=', $person2->guid);
$qb->add_constraint('toGuid', '=', $person2->guid);
$qb->end_group();
$links = $qb->execute();
if ($links === false) {
// QB Error
return false;
}
foreach ($links as $link) {
if ($link->fromGuid == $person2->guid) {
debug_add("Transferred link->fromGuid #{$link->id} to person #{$person1->id} (from {$link->fromGuid})");
$link->fromGuid = $person1->guid;
}
if ($link->toGuid == $person2->guid) {
debug_add("Transferred link->toGuid #{$link->id} to person #{$person1->id} (from {$link->toGuid})");
$link->toGuid = $person1->guid;
}
}
// TODO: Check for duplicates and remove those (also from the links array...)
// Save updates to remaining links
foreach ($links as $link) {
if (!$link->update()) {
// Failure updating
return false;
}
}
// TODO: 1.8 metadata format support
// All done
return true;
}
$item->invoice = $invoice->id;
$item->task = $task->id;
$item->deliverable = $task->agreement;
$item->pricePerUnit = 0;
$item->units = 1;
$item->description = $task->title . ' (auto-generated)';
$item->create();
}
}
$relatedto->delete();
}
}
$deliverable_qb = org_openpsa_sales_salesproject_deliverable_dba::new_query_builder();
$deliverables = $deliverable_qb->execute();
foreach ($deliverables as $deliverable) {
$relatedto_qb = org_openpsa_relatedto_dba::new_query_builder();
$relatedto_qb->add_constraint('toGuid', '=', $deliverable->guid);
$relatedto_qb->add_constraint('fromClass', '=', 'org_openpsa_invoices_invoice_dba');
$relatedtos = $relatedto_qb->execute();
if (sizeof($relatedtos) == 0) {
echo "Deliverable " . $deliverable->title . " has no invoice relatedtos, skipping\n";
flush();
}
foreach ($relatedtos as $relatedto) {
$invoice = new org_openpsa_invoices_invoice_dba($relatedto->fromGuid);
$items = $invoice->get_invoice_items();
if (sizeof($items) == 0) {
echo "Invoice " . $invoice->get_label() . " has no items, creating one for deliverable\n";
flush();
$item = new org_openpsa_invoices_invoice_item_dba();
$item->invoice = $invoice->id;
/**
* Search for events withing configured timeframe and if
* they have confirmed relatedtos to tasks reports hours
* for each participant (who is task resource) towards
* said task.
*/
public function _on_execute()
{
debug_add('_on_execute called');
$root_event = org_openpsa_calendar_interface::find_root_event();
if (!is_object($root_event)) {
debug_add('calendar root event not found', MIDCOM_LOG_WARN);
return;
}
if (!class_exists('org_openpsa_relatedto_dba')) {
debug_add('relatedto library could not be loaded', MIDCOM_LOG_WARN);
return;
}
if (!midcom::get('componentloader')->load_graceful('org.openpsa.projects')) {
debug_add('org.openpsa.projects could not be loaded', MIDCOM_LOG_WARN);
return;
}
if (!midcom::get('auth')->request_sudo('org.openpsa.calendar')) {
$msg = "Could not get sudo, aborting operation, see error log for details";
$this->print_error($msg);
debug_add($msg, MIDCOM_LOG_ERROR);
return;
}
$qb = org_openpsa_calendar_event_participant_dba::new_query_builder();
// Event must be directly under openpsa calendar root event
$qb->add_constraint('eid.up', '=', $root_event->id);
// Member type must not be resource
$qb->add_constraint('orgOpenpsaObtype', '<>', ORG_OPENPSA_OBTYPE_EVENTRESOURCE);
// Event must have ended
$qb->add_constraint('eid.end', '<', time());
// Event can be at most week old
// TODO: make max age configurable
/* TODO: store a timestamp of last process in root event and use whichever
is nearer, though it has the issue with creating events after the fact
(which can happen when synchronizing from other systems for example)
*/
$qb->add_constraint('eid.start', '>', time() - 24 * 3600 * 7);
// Must not have hours reported already
$qb->add_constraint('hoursReported', '=', 0);
$eventmembers = $qb->execute();
if (!is_array($eventmembers) || count($eventmembers) < 1) {
midcom::get('auth')->drop_sudo();
return;
}
// keyed by id
$seen_events = array();
// keyed by guid
$seen_tasks = array();
// keyed by guid
$event_links = array();
foreach ($eventmembers as $member) {
// Bulletproofing: prevent duplicating hour reports
$member->hoursReported = time();
if (!$member->update(false)) {
$msg = "Could not set hoursReported on member #{$member->id} (event #{$member->eid}), errstr: " . midcom_connection::get_error_string() . " skipping this member";
$this->print_error($msg);
debug_add($msg, MIDCOM_LOG_ERROR);
continue;
}
//Avoid multiple loads of same event
if (!isset($seen_events[$member->eid])) {
$seen_events[$member->eid] = new org_openpsa_calendar_event_dba($member->eid);
}
$event =& $seen_events[$member->eid];
// Avoid multiple queries of events links
if (!isset($event_links[$event->guid])) {
$qb2 = org_openpsa_relatedto_dba::new_query_builder();
$qb2->add_constraint('fromGuid', '=', $event->guid);
$qb2->add_constraint('fromComponent', '=', 'org.openpsa.calendar');
$qb2->add_constraint('toComponent', '=', 'org.openpsa.projects');
$qb2->add_constraint('toClass', '=', 'org_openpsa_projects_task_dba');
$qb2->add_constraint('status', '=', org_openpsa_relatedto_dba::CONFIRMED);
$event_links[$event->guid] = $qb2->execute();
}
$links =& $event_links[$event->guid];
// These checks are done here (in stead of few lines above) on purpose
if (!is_array($links) || count($links) < 1) {
continue;
}
foreach ($links as $link) {
//Avoid multiple loads of same task
if (!isset($seen_tasks[$link->toGuid])) {
$seen_tasks[$link->toGuid] = new org_openpsa_projects_task_dba($link->toGuid);
}
$task =& $seen_tasks[$link->toGuid];
debug_add("processing task #{$task->id} ({$task->title}) for person #{$member->uid} from event #{$event->id} ({$event->title})");
// Make sure the person we found is a resource in this particular task
$task->get_members();
if (!isset($task->resources[$member->uid])) {
debug_add("person #{$member->uid} is not a *resource* in task #{$task->id}, skipping");
continue;
}
if (!org_openpsa_projects_interface::create_hour_report($task, $member->uid, $event, 'org.openpsa.calendar')) {
// MidCOM error log is filled in the method, here we just display error
$this->print_error("Failed to create hour_report to task #{$task->id} for person #{$member->uid} from event #{$event->id}");
// Failed to create hour_report, unset hoursReported so that we might have better luck next time
// PONDER: This might be an issue in case be have multiple tasks linked and only one of them fails... figure out a more granular way to flag reported hours ?
$member->hoursReported = 0;
if (!$member->update(false)) {
$msg = "Could not UNSET hoursReported on member #{$member->id} (event #{$member->eid}), errstr: " . midcom_connection::get_error_string();
$this->print_error($msg);
debug_add($msg, MIDCOM_LOG_WARN);
}
}
}
}
midcom::get('auth')->drop_sudo();
debug_add('done');
return;
}
private static function _render_line_wikipage_email_recipients($page)
{
$seen_emails = array();
$qb = org_openpsa_relatedto_dba::new_query_builder();
$qb->add_constraint('fromGuid', '=', $page->guid);
$qb->add_constraint('fromComponent', '=', 'net.nemein.wiki');
$qb->add_constraint('toComponent', '=', 'org.openpsa.contacts');
$qb->begin_group('OR');
$qb->add_constraint('toClass', '=', 'midcom_db_person');
$qb->add_constraint('toClass', '=', 'org_openpsa_contacts_person_dba');
$qb->end_group();
$qb->add_constraint('status', '<>', org_openpsa_relatedto_dba::NOTRELATED);
$recipients = $qb->execute();
echo " <li class=\"members\">" . midcom::get('i18n')->get_string('recipients', 'net.nemein.wiki') . ": ";
foreach ($recipients as $recipient_link) {
try {
$recipient = new midcom_db_person($recipient_link->toGuid);
$seen_emails[$recipient->email] = true;
} catch (midcom_error $e) {
continue;
}
$recipient_card = new org_openpsa_widgets_contact($recipient);
echo $recipient_card->show_inline() . " ";
}
$other_emails = $page->listparameters('net.nemein.wiki:emailimport_recipients');
if ($other_emails) {
while ($other_emails->fetch()) {
$email = $other_emails->name;
if (isset($seen_emails[$email])) {
continue;
}
echo $email . ' ';
$seen_emails[$email] = true;
}
}
echo " </li>\n";
}
