From dcc553bc23f54f24b2e79e6cd638c633749a029f Mon Sep 17 00:00:00 2001
From: Hadi Nategh <hnategh@gmail.com>
Date: Tue, 8 Nov 2016 15:58:46 +0100
Subject: [PATCH] Implement calendar category report

---
 .../class.calendar_category_report.inc.php    | 327 ++++++++++++++++++
 calendar/inc/class.calendar_ui.inc.php        |   3 +
 calendar/js/app.js                            |  43 +++
 calendar/templates/default/app.css            |   4 +-
 .../templates/default/category_report.xet     |  66 ++++
 calendar/templates/pixelegg/app.css           |   5 +
 6 files changed, 447 insertions(+), 1 deletion(-)
 create mode 100644 calendar/inc/class.calendar_category_report.inc.php
 create mode 100644 calendar/templates/default/category_report.xet

diff --git a/calendar/inc/class.calendar_category_report.inc.php b/calendar/inc/class.calendar_category_report.inc.php
new file mode 100644
index 0000000000..3ad12593bf
--- /dev/null
+++ b/calendar/inc/class.calendar_category_report.inc.php
@@ -0,0 +1,327 @@
+<?php
+
+/**
+ * EGroupware - Calendar's category report utility
+ *
+ * @link http://www.egroupware.org
+ * @package calendar
+ * @author Hadi Nategh <hn-AT-egroupware.org>
+ * @copyright (c) 2013-16 by Hadi Nategh <hn-AT-egroupware.org>
+ * @license http://opensource.org/licenses/gpl-license.php GPL - GNU General Public License
+ * @version $Id$
+ */
+
+use EGroupware\Api;
+use EGroupware\Api\Link;
+use EGroupware\Api\Framework;
+use EGroupware\Api\Egw;
+use EGroupware\Api\Etemplate;
+
+/**
+ * This class reports amount of events taken by users based
+ * on categories. The report would be based on start and end
+ * date and can be specified with several options for each
+ * category. The result of the report would be a CSV file
+ * consistent of user full name, categories names, and amount
+ * of time (hour|minute|second).
+ *
+ */
+class calendar_category_report extends calendar_ui{
+
+	/**
+	 * Public functions allowed to get called
+	 *
+	 * @var type
+	 */
+	var $public_functions = array(
+		'index' => True,
+	);
+
+	/**
+	 * Constructor
+	 */
+	function __construct()
+	{
+		parent::__construct(true);	// call the parent's constructor
+		$this->tmpl = new Api\Etemplate('calendar.category_report');
+	}
+
+	/**
+	 * Function to check if the given date is a weekend date
+	 *
+	 * @param int $date timestamp as date
+	 *
+	 * @return boolean returns true if the date is weekend
+	 */
+	public static function isWeekend($date)
+	{
+		return (date('N',$date) >= 6);
+	}
+
+	/**
+	 * Function to check if the given date is a holiday date
+	 *
+	 * @param int $date timestamp as date
+	 *
+	 * @return boolean returns true if the date is holiday
+	 */
+	public function isHoliday($date)
+	{
+		return array_key_exists(date('Ymd', $date), $this->bo->read_holidays(date('Y', $date)));
+	}
+
+	/**
+	 * This function processes given day array and select eligible events
+	 *
+	 * @param array $week_sum array to keep tracking of weeks
+	 * @param array $day array to keep tracking of eligible events of the day
+	 * @param array $events events of the day
+	 * @param int $cat_id category id
+	 * @param int $holidays holiday option
+	 * @param int $weekend weekend option
+	 * @param int $min_days min_days option
+	 * @param int $unit unit option
+	 *
+	 */
+	public function process_days(&$week_sum, &$day, $events, $cat_id, $holidays, $weekend, $min_days, $unit)
+	{
+		foreach ($events as &$event)
+		{
+			$categories = explode(',', $event['category']);
+			if (!in_array($cat_id, $categories) || ($weekend && self::isWeekend($event['start'])) || (!$holidays && $this->isHoliday($event['start']))) continue;
+			$day[$event['owner']][$cat_id][$event['id']] = array (
+				'weekN' => date('W', $event['start']),
+				'cat_id' => $cat_id,
+				'event_id' => $event['id'],
+				'amount' => $event['end'] - $event['start'],
+				'min_days' => $min_days,
+				'unit' => $unit
+			);
+
+			if ($min_days)
+			{
+				$week_sum[$event['owner']][date('W', $event['start'])][$cat_id][$event['id']][] = $event['end'] - $event['start'];
+				$week_sum[$event['owner']][date('W', $event['start'])][$cat_id]['min_days'] = $min_days;
+			}
+		}
+	}
+
+	/**
+	 * function to add up days
+	 *
+	 * @param array $days array of days
+	 * @return int returns sum of amount of events
+	 */
+	public static function add_days ($days) {
+		$sum = 0;
+		foreach ($days as $val)
+		{
+			$sum = $sum + $val;
+		}
+		return $sum;
+	}
+
+	/**
+	 * Function to build holiday report index interface and logic
+	 *
+	 * @param type $content
+	 */
+	public function index ($content = null)
+	{
+		$api_cats = new Api\Categories($GLOBALS['egw_info']['user']['account_id'],'calendar');
+		if (is_null($content))
+		{
+			$cats = $api_cats->return_sorted_array($start=0, false, '', 'ASC', 'cat_name', true, 0, true);
+			$cats_status = $GLOBALS['egw_info']['user']['preferences']['calendar']['category_report'];
+			foreach ($cats as &$value)
+			{
+				$content['grid'][] = array(
+					'cat_id' => $value['id'],
+					'user' => '',
+					'weekend' => '',
+					'holidays' => '',
+					'min_days' => 0,
+					'unit' => 3600,
+					'enable' => true
+				);
+			}
+			if (is_array($cats_status))
+			{
+				$content['grid'] = array_replace_recursive($content['grid'], $cats_status);
+			}
+		}
+		else
+		{
+			list($button) = @each($content['button']);
+			$result = $categories = array ();
+			$users = array_keys($GLOBALS['egw']->accounts->search(array('type'=>'accounts', active=>true)));
+
+			// report button pressed
+			if (!empty($button))
+			{
+				// shift the grid content by one because of the reserved first row
+				// for the header.
+				array_shift($content['grid']);
+				Api\Framework::ajax_set_preference('calendar', 'category_report',$content['grid']);
+
+				foreach ($content['grid'] as $key => $row)
+				{
+					if ($row['enable'])
+					{
+						$categories [$key] = $row['cat_id'];
+					}
+				}
+
+				// query calendar for events
+				$events = $this->bo->search(array(
+					'start' => $content['start'],
+					'end' => $content['end'],
+					'users' => $users,
+					'cat_id' => $categories,
+					'daywise' => true
+				));
+				$days_sum = $weeks_sum = array ();
+				// iterate over found events
+				foreach($events as $day_index => $day_events)
+				{
+					if (is_array($day_events))
+					{
+						foreach ($categories as $row_id => $cat_id)
+						{
+							$this->process_days(
+									$weeks_sum,
+									$days_sum[$day_index],
+									$day_events,
+									$cat_id,
+									$content['grid'][$row_id]['holidays'],
+									$content['grid'][$row_id]['weekend'],
+									$content['grid'][$row_id]['min_days'],
+									$content['grid'][$row_id]['unit']
+							);
+						}
+					}
+				}
+
+				asort($days_sum);
+				ksort($days_sum);
+				$days_output = $min_days_output = array ();
+
+				foreach($days_sum as $day_index => $users)
+				{
+					foreach ($users as $user_id => $cat_ids)
+					{
+						foreach ($cat_ids as $cat_id => $event)
+						{
+							foreach ($event as $e)
+							{
+								$days_output[$user_id][$cat_id][$e['event_id']]['days'] =
+										$days_output[$user_id][$cat_id][$e['event_id']]['days'] + (int)$e['amount'];
+								$days_output[$user_id][$cat_id][$e['event_id']]['unit'] = $e['unit'];
+							}
+						}
+					}
+				}
+
+				foreach ($weeks_sum as $user_id => $weeks)
+				{
+					foreach ($weeks as $week_id => $cat_ids)
+					{
+						foreach ($cat_ids as $cat_id => $events)
+						{
+							foreach ($events as $event_id => $e)
+							{
+								if ($event_id !== 'min_days')
+								{
+									$days = $weeks_sum[$user_id][$week_id][$cat_id][$event_id];
+									$min_days_output[$user_id][$cat_id][$event_id]['days'] =
+											$min_days_output[$user_id][$cat_id][$event_id]['days'] +
+											(count($days) >= (int)$events['min_days']?self::add_days($days):0);
+								}
+							}
+						}
+					}
+				}
+
+				// Replace value of those cats who have min_days set on with regular day calculation
+				// result array structure:
+				// [user_ids] =>
+				//      [cat_ids] =>
+				//          [event_ids] => [
+				//             days: amount of event in second,
+				//              unit: unit to be shown as output (in second, eg. 3600)
+				//          ]
+				//
+				$result = array_replace_recursive($days_output, $min_days_output);
+				$csv_header = $csv_raw_rows = array ();
+
+				// create csv header
+				foreach ($categories as $cat_id)
+				{
+					$csv_header [] = $api_cats->id2name($cat_id);
+				}
+				array_unshift($csv_header, 'user_fullname');
+
+				// file pointer
+				$fp = fopen('php://output', 'w');
+
+				// sort out events and categories
+				foreach ($result as $user_id => $userData)
+				{
+					foreach ($userData as $cat_id => $events)
+					{
+						foreach ($events as $event_id => $values)
+						{
+							$eid = $event_id;
+							$r = array();
+							foreach ($userData as $c_id => &$e)
+							{
+								if (!$e) continue;
+								$top = array_shift($e);
+								$r[$eid][$c_id] = ceil($top['days']? $top['days'] / $top['unit']: 0);
+							}
+							if ($r) $csv_raw_rows[$user_id][] = $r;
+						}
+					}
+				}
+
+
+				// printout csv header into file
+				fputcsv($fp, array_values($csv_header));
+
+				// set header to download csv file
+				header('Content-type: text/csv');
+				header('Content-Disposition: attachment; filename="report.csv"');
+				
+				// iterate over csv rows for each user to print them out into csv file
+				foreach ($result as $user_id => $userData)
+				{
+					foreach ($csv_raw_rows[$user_id] as &$raw_row)
+					{
+						$cats_row = array();
+						$raw_row = array_shift($raw_row);
+						foreach ($categories as $cat_id)
+						{
+							$cats_row [$cat_id] = $raw_row[$cat_id]?$raw_row[$cat_id]:0;
+						}
+						// printout each row into file
+						fputcsv($fp, array_values(array(Api\Accounts::id2name($user_id, 'account_fullname')) + $cats_row));
+					}
+				}
+				// echo out csv file
+				fpassthru($fp);
+				exit();
+			}
+		}
+
+		// unit selectbox options
+		$sel_options['unit'] = array (
+			3600 => array('label' => lang('hour'), 'title'=>'Output value in hour'),
+			60 => array('label' => lang('minute'), 'title'=>'Output value in minute'),
+			1  => array('label' => lang('second'), 'title'=>'Output value in second')
+		);
+		// Add an extra row for the grid header
+		array_unshift($content['grid'],array(''=> ''));
+		$preserv = $content;
+		$this->tmpl->exec('calendar.calendar_category_report.index', $content, $sel_options, array(), $preserv, 2);
+	}
+}
diff --git a/calendar/inc/class.calendar_ui.inc.php b/calendar/inc/class.calendar_ui.inc.php
index 13bfe5db93..fb03999abe 100644
--- a/calendar/inc/class.calendar_ui.inc.php
+++ b/calendar/inc/class.calendar_ui.inc.php
@@ -524,6 +524,9 @@ class calendar_ui
 			);
 			$GLOBALS['egw']->framework->sidebox($appname,lang('Admin'),$file,'admin');
 		}
+		display_sidebox('calendar', lang('Utilities'), array('Category report' => "javascript:egw_openWindowCentered2('".
+					Egw::link('/index.php',array('menuaction'=>'calendar.calendar_category_report.index','ajax'=>true),false).
+					"','_blank',870,610,'yes')" ));
 	}
 
 	/**
diff --git a/calendar/js/app.js b/calendar/js/app.js
index 343f4e26f9..aa4192583f 100644
--- a/calendar/js/app.js
+++ b/calendar/js/app.js
@@ -247,6 +247,9 @@ app.classes.calendar = (function(){ "use strict"; return AppJS.extend(
 					this.filter_change();
 				},this),0);
 				break;
+			case 'calendar.category_report':
+				this.category_report_init();
+				break;
 		}
 
 		// Record the templates for the views so we can switch between them
@@ -3748,6 +3751,46 @@ app.classes.calendar = (function(){ "use strict"; return AppJS.extend(
 			d.setUTCDate(d.getUTCDate() + (7 * delta));
 			return d;
 		}
+	},
+
+	/**
+	 * Initialization function in order to set/unset
+	 * categories status.
+	 *
+	 */
+	category_report_init: function ()
+	{
+		var content = this.et2.getArrayMgr('content').data;
+		for (var i=1;i<content.grid.length;i++)
+		{
+			if (content.grid[i] != null) this.category_report_enable({name:i+'', checked:content.grid[i]['enable']});
+		}
+	},
+
+	/**
+	 * Set/unset selected category's row
+	 *
+	 * @param {type} _widget
+	 * @returns {undefined}
+	 */
+	category_report_enable: function (_widget)
+	{
+		var widgets = ['[user]','[weekend]','[holidays]','[min_days]'];
+		var row_id = _widget.name.match(/\d+/);
+		var w = {};
+		for (var i=0;i<widgets.length;i++)
+		{
+			w = this.et2.getWidgetById(row_id+widgets[i]);
+			if (w) w.set_readonly(!_widget.checked);
+		}
+	},
+
+	/**
+	 * submit function for report button
+	 */
+	category_report_submit: function ()
+	{
+		this.et2._inst.postSubmit();
 	}
 });}).call(this);
 
diff --git a/calendar/templates/default/app.css b/calendar/templates/default/app.css
index 9bfe4b7ecf..d02479d50a 100644
--- a/calendar/templates/default/app.css
+++ b/calendar/templates/default/app.css
@@ -1493,4 +1493,6 @@ input#calendar-edit_location {padding-left: 0;}
 }
 
 #calendar-edit_quantity.et2_textbox_ro {opacity:0.5;}
-#calendar-edit_quantity, #calendar-edit_role {float:left;}
\ No newline at end of file
+#calendar-edit_quantity, #calendar-edit_role {float:left;}
+
+.category_report_cats {height:80%;overflow-y: auto;display:block;}
\ No newline at end of file
diff --git a/calendar/templates/default/category_report.xet b/calendar/templates/default/category_report.xet
new file mode 100644
index 0000000000..2562ff4c14
--- /dev/null
+++ b/calendar/templates/default/category_report.xet
@@ -0,0 +1,66 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE overlay PUBLIC "-//Stylite AG//eTemplate 2//EN" "http://www.egroupware.org/etemplate2.dtd">
+<!--
+Egroupware
+@license http://opensource.org/licenses/gpl-license.php GPL - GNU General Public License
+@package calendar
+@subpackage
+@link http://www.egroupware.org
+@author Hadi Nategh <hn-AT-egroupware.org>
+@version $Id$
+-->
+<overlay>
+	<template id="calendar.category_report" template="" lang="" group="0" version="16.2">
+		<hbox class="dialogHeader" height="28">
+			<description value="Category Report"/>
+		</hbox>
+		<grid width="100%" class="Category_report_cats">
+			<columns>
+				<column width="10%"/>
+				<column width="90%"/>
+			</columns>
+			<rows>
+
+				<row>
+					<description value="Categories"/>
+					<grid id="grid" width="100%">
+						<columns>
+							<column width="60"/>
+							<column />
+							<column width="5%"/>
+							<column width="10%"/>
+							<column width="10%"/>
+							<column width="5%"/>
+						</columns>
+						<rows>
+							<row class="th">
+								<description value="Select"/>
+								<description value="Category"/>
+								<description align="center" statustext="Exclude weekend events from counting" value="Exclude Weekend"/>
+								<description align="center" statustext="Include holidays as counting days" value="Holidays"/>
+								<description align="center" statustext="Minimum days to count as a week" value="Min days"/>
+								<description align="center" statustext="Output unit" value="Output unit"/>
+							</row>
+							<row class="row">
+								<checkbox id="${row}[enable]" onchange="app.calendar.category_report_enable"/>
+								<taglist-cat id="${row}[cat_id]" readonly="true" width="500" class="select-cat"/>
+								<checkbox align="center" id="${row}[weekend]"/>
+								<checkbox align="center" id="${row}[holidays]"/>
+								<textbox type="integer" align="center" id="${row}[min_days]"/>
+								<menulist>
+									<menupopup  align="center" id="${row}[unit]"/>
+								</menulist>
+							</row>
+						</rows>
+					</grid>
+				</row>
+			</rows>
+		</grid>
+		<hbox class="dialogFooterToolbar">
+			<description value="Date range"/>
+			<date id="start" label="Start"/>
+			<date id="end" label="End"/>
+			<button id="button[report]" label="Report" onclick="app.calendar.category_report_submit" background_image="1" image="template"/>
+		</hbox>
+	</template>
+</overlay>
diff --git a/calendar/templates/pixelegg/app.css b/calendar/templates/pixelegg/app.css
index ead7c8a5a0..1956d52c37 100755
--- a/calendar/templates/pixelegg/app.css
+++ b/calendar/templates/pixelegg/app.css
@@ -1457,6 +1457,11 @@ input#calendar-edit_location {
 #calendar-edit_role {
   float: left;
 }
+.category_report_cats {
+  height: 80%;
+  overflow-y: auto;
+  display: block;
+}
 /*generell*/
 .egw_fw_content_browser_iframe img[src$="svg"] {
   background-color: #828282 !important;