/*

 * Copyright (C) 1999-2008 Novell, Inc. (www.novell.com)

 * Copyright (C) 2014 Red Hat, Inc. (www.redhat.com)

 *

 * This program is free software; you can redistribute it and/or modify it

 * under the terms of the GNU Lesser General Public License as published by

 * the Free Software Foundation.

 *

 * This program is distributed in the hope that it will be useful, but

 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY

 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License

 * for more details.

 *

 * You should have received a copy of the GNU Lesser General Public License

 * along with this program; if not, see <http://www.gnu.org/licenses/>.

 */

#include "evolution-config.h"

#include <string.h>

#include <math.h>

#include <glib/gi18n-lib.h>

#include "calendar/gui/calendar-config.h"

#include "calendar/gui/calendar-view.h"

#include "calendar/gui/comp-util.h"

#include "calendar/gui/e-cal-list-view.h"

#include "calendar/gui/e-cal-model-calendar.h"

#include "calendar/gui/e-cal-model-memos.h"

#include "calendar/gui/e-cal-model-tasks.h"

#include "calendar/gui/e-calendar-view.h"

#include "calendar/gui/e-day-view.h"

#include "calendar/gui/e-month-view.h"

#include "calendar/gui/e-week-view.h"

#include "calendar/gui/itip-utils.h"

#include "calendar/gui/tag-calendar.h"

#include "e-cal-base-shell-sidebar.h"

#include "e-cal-shell-view-private.h"

#include "e-cal-shell-content.h"

#define E_CAL_SHELL_CONTENT_GET_PRIVATE(obj) \

	(G_TYPE_INSTANCE_GET_PRIVATE \

	((obj), E_TYPE_CAL_SHELL_CONTENT, ECalShellContentPrivate))

struct _ECalShellContentPrivate {

	GtkWidget *hpaned;

	GtkWidget *vpaned;

	GtkWidget *calendar_notebook;

	GtkWidget *task_table;

	ECalModel *task_model;

	ECalDataModel *task_data_model;

	GtkWidget *memo_table;

	ECalModel *memo_model;

	ECalDataModel *memo_data_model;

	ETagCalendar *tag_calendar;

	gulong datepicker_selection_changed_id;

	gulong datepicker_range_moved_id;

	ECalViewKind current_view;

	ECalendarView *views[E_CAL_VIEW_KIND_LAST];

	GDate view_start, view_end;

	guint32 view_start_range_day_offset;

	GDate last_range_start; /* because "date-range-changed" can be emit with no real change */

	time_t previous_selected_start_time;

	time_t previous_selected_end_time;

	gulong current_view_id_changed_id;

};

enum {

	PROP_0,

	PROP_CALENDAR_NOTEBOOK,

	PROP_MEMO_TABLE,

	PROP_TASK_TABLE,

	PROP_CURRENT_VIEW_ID,

	PROP_CURRENT_VIEW

};

/* Used to indicate who has the focus within the calendar view. */

typedef enum {

	FOCUS_CALENDAR_NOTEBOOK,

	FOCUS_MEMO_TABLE,

	FOCUS_TASK_TABLE,

	FOCUS_OTHER

} FocusLocation;

G_DEFINE_DYNAMIC_TYPE (ECalShellContent, e_cal_shell_content, E_TYPE_CAL_BASE_SHELL_CONTENT)

static time_t

convert_to_local_zone (time_t tm,

		       icaltimezone *from_zone)

{

	struct icaltimetype tt;

	tt = icaltime_from_timet_with_zone (tm, FALSE, from_zone);

	return icaltime_as_timet (tt);

}

static void

cal_shell_content_update_model_and_current_view_times (ECalShellContent *cal_shell_content,

						       ECalModel *model,

						       ECalendarItem *calitem,

						       time_t view_start_tt,

						       time_t view_end_tt,

						       const GDate *view_start,

						       const GDate *view_end)

{

	ECalendarView *current_view;

	EDayView *day_view = NULL;

	gint day_view_selection_start_day = -1, day_view_selection_end_day = -1;

	gint day_view_selection_start_row = -1, day_view_selection_end_row = -1;

	gdouble day_view_scrollbar_position = 0.0;

	gint syy, smm, sdd, eyy, emm, edd;

	time_t visible_range_start, visible_range_end;

	gboolean filters_updated = FALSE;

	icaltimezone *zone;

	gchar *cal_filter;

	g_return_if_fail (E_IS_CAL_SHELL_CONTENT (cal_shell_content));

	g_return_if_fail (E_IS_CAL_MODEL (model));

	g_return_if_fail (E_IS_CALENDAR_ITEM (calitem));

	current_view = e_cal_shell_content_get_current_calendar_view (cal_shell_content);

	g_return_if_fail (current_view != NULL);

	zone = e_cal_model_get_timezone (model);

	cal_filter = e_cal_data_model_dup_filter (e_cal_model_get_data_model (model));

	if (E_IS_DAY_VIEW (current_view)) {

		GtkAdjustment *adjustment;

		day_view = E_DAY_VIEW (current_view);

		day_view_selection_start_day = day_view->selection_start_day;

		day_view_selection_end_day = day_view->selection_end_day;

		day_view_selection_start_row = day_view->selection_start_row;

		day_view_selection_end_row = day_view->selection_end_row;

		adjustment = gtk_scrollable_get_vadjustment (GTK_SCROLLABLE (day_view->main_canvas));

		day_view_scrollbar_position = gtk_adjustment_get_value (adjustment);

	}

	g_signal_handler_block (calitem, cal_shell_content->priv->datepicker_range_moved_id);

	g_signal_handler_block (calitem, cal_shell_content->priv->datepicker_selection_changed_id);

	visible_range_start = view_start_tt;

	visible_range_end = view_end_tt;

	e_calendar_view_precalc_visible_time_range (current_view, view_start_tt, view_end_tt, &visible_range_start, &visible_range_end);

	if (view_start_tt != visible_range_start || view_end_tt != visible_range_end) {

		time_t cmp_range_start = convert_to_local_zone (visible_range_start, zone);

		time_t cmp_range_end = convert_to_local_zone (visible_range_end, zone);

		if (view_start_tt != cmp_range_start ||

		    view_end_tt != cmp_range_end - 1) {

			/* Calendar views update their inner time range during e_cal_model_set_time_range() call,

			   while they can change it if needed (like a clamp of a week view with a week start day

			   not being Monday */

			GDate new_view_start, new_view_end;

			/* Midnight means the next day, which is not desired here */

			cmp_range_end--;

			visible_range_end--;

			/* These times are in the correct zone already */

			time_to_gdate_with_zone (&new_view_start, cmp_range_start, NULL);

			time_to_gdate_with_zone (&new_view_end, cmp_range_end, NULL);

			e_calendar_item_set_selection (calitem, &new_view_start, &new_view_end);

			e_cal_shell_content_update_filters (cal_shell_content, cal_filter, visible_range_start, visible_range_end);

			e_calendar_view_set_selected_time_range (current_view, cmp_range_start, cmp_range_start);

			filters_updated = TRUE;

			view_start_tt = cmp_range_start;

			view_end_tt = cmp_range_end;

		}

	}

	if (!filters_updated) {

		e_calendar_item_set_selection (calitem, view_start, view_end);

		e_cal_shell_content_update_filters (cal_shell_content, cal_filter, view_start_tt, view_end_tt);

		e_calendar_view_set_selected_time_range (current_view, view_start_tt, view_start_tt);

	}

	if (day_view && day_view_selection_start_day != -1 && day_view_selection_end_day != -1 &&

	    day_view_selection_start_row != -1 && day_view_selection_end_row != -1) {

		GtkAdjustment *adjustment;

		day_view->selection_start_day = day_view_selection_start_day;

		day_view->selection_end_day = day_view_selection_end_day;

		day_view->selection_start_row = day_view_selection_start_row;

		day_view->selection_end_row = day_view_selection_end_row;

		/* This is better than e_day_view_ensure_rows_visible(), because it keeps both

		   selection and the exact scrollbar position in the main canvas, which may not

		   always correspond to each other. */

		adjustment = gtk_scrollable_get_vadjustment (GTK_SCROLLABLE (day_view->main_canvas));

		gtk_adjustment_set_value (adjustment, day_view_scrollbar_position);

	}

	gtk_widget_queue_draw (GTK_WIDGET (current_view));

	g_free (cal_filter);

	g_signal_handler_unblock (calitem, cal_shell_content->priv->datepicker_range_moved_id);

	g_signal_handler_unblock (calitem, cal_shell_content->priv->datepicker_selection_changed_id);

	if (e_calendar_item_get_date_range (calitem, &syy, &smm, &sdd, &eyy, &emm, &edd)) {

		GDate range_start;

		g_date_set_dmy (&range_start, sdd, smm + 1, syy);

		cal_shell_content->priv->view_start_range_day_offset =

			g_date_get_julian (&cal_shell_content->priv->view_start) - g_date_get_julian (&range_start);

	}

}

static void

e_cal_shell_content_change_view (ECalShellContent *cal_shell_content,

				 ECalViewKind to_view,

				 const GDate *view_start,

				 const GDate *view_end,

				 gboolean force_change)

{

	EShellSidebar *shell_sidebar;

	EShellView *shell_view;

	ECalendar *calendar;

	ECalModel *model;

	icaltimezone *zone;

	time_t view_start_tt, view_end_tt;

	gboolean view_changed = FALSE;

	gint selected_days;

	g_return_if_fail (E_IS_CAL_SHELL_CONTENT (cal_shell_content));

	g_return_if_fail (to_view >= E_CAL_VIEW_KIND_DAY && to_view < E_CAL_VIEW_KIND_LAST);

	g_return_if_fail (view_start != NULL);

	g_return_if_fail (g_date_valid (view_start));

	g_return_if_fail (view_end != NULL);

	g_return_if_fail (g_date_valid (view_end));

	shell_view = e_shell_content_get_shell_view (E_SHELL_CONTENT (cal_shell_content));

	shell_sidebar = e_shell_view_get_shell_sidebar (shell_view);

	g_return_if_fail (E_IS_CAL_BASE_SHELL_SIDEBAR (shell_sidebar));

	calendar = e_cal_base_shell_sidebar_get_date_navigator (E_CAL_BASE_SHELL_SIDEBAR (shell_sidebar));

	g_return_if_fail (E_IS_CALENDAR (calendar));

	model = e_cal_base_shell_content_get_model (E_CAL_BASE_SHELL_CONTENT (cal_shell_content));

	zone = e_cal_model_get_timezone (model);

	view_start_tt = cal_comp_gdate_to_timet (view_start, zone);

	view_end_tt = cal_comp_gdate_to_timet (view_end, zone);

	if (to_view != cal_shell_content->priv->current_view) {

		g_signal_handler_block (cal_shell_content, cal_shell_content->priv->current_view_id_changed_id);

		e_cal_shell_content_set_current_view_id (cal_shell_content, to_view);

		g_signal_handler_unblock (cal_shell_content, cal_shell_content->priv->current_view_id_changed_id);

		view_changed = TRUE;

	}

	selected_days = g_date_get_julian (view_end) - g_date_get_julian (view_start) + 1;

	if (cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_DAY) {

		EDayView *day_view;

		day_view = E_DAY_VIEW (cal_shell_content->priv->views[E_CAL_VIEW_KIND_DAY]);

		e_day_view_set_days_shown (day_view, selected_days);

	} else if (cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_MONTH) {

		EWeekView *month_view;

		month_view = E_WEEK_VIEW (cal_shell_content->priv->views[E_CAL_VIEW_KIND_MONTH]);

		e_week_view_set_weeks_shown (month_view, selected_days / 7);

	}

	if (!force_change &&

	    g_date_valid (&cal_shell_content->priv->view_start) &&

	    g_date_valid (&cal_shell_content->priv->view_end) &&

	    g_date_compare (&cal_shell_content->priv->view_start, view_start) == 0 &&

	    g_date_compare (&cal_shell_content->priv->view_end, view_end) == 0) {

		ECalendarItem *calitem = e_calendar_get_item (calendar);

		if (view_changed)

			cal_shell_content_update_model_and_current_view_times (

				cal_shell_content, model, calitem, view_start_tt, view_end_tt, view_start, view_end);

		g_signal_handler_block (calitem, cal_shell_content->priv->datepicker_range_moved_id);

		g_signal_handler_block (calitem, cal_shell_content->priv->datepicker_selection_changed_id);

		e_calendar_item_set_selection (calitem, view_start, view_end);

		g_signal_handler_unblock (calitem, cal_shell_content->priv->datepicker_range_moved_id);

		g_signal_handler_unblock (calitem, cal_shell_content->priv->datepicker_selection_changed_id);

		return;

	}

	cal_shell_content->priv->view_start = *view_start;

	cal_shell_content->priv->view_end = *view_end;

	cal_shell_content_update_model_and_current_view_times (

		cal_shell_content, model, e_calendar_get_item (calendar), view_start_tt, view_end_tt, view_start, view_end);

}

static void

cal_shell_content_clamp_for_whole_weeks (GDateWeekday week_start_day,

					 GDate *sel_start,

					 GDate *sel_end,

					 gboolean saturday_as_sunday)

{

	GDateWeekday wday;

	guint32 julian_start, julian_end;

	g_return_if_fail (sel_start != NULL);

	g_return_if_fail (sel_end != NULL);

	wday = g_date_get_weekday (sel_start);

	/* This is because the month/week view doesn't split weekends */

	if (saturday_as_sunday && wday == G_DATE_SATURDAY && week_start_day == G_DATE_SUNDAY)

		wday = G_DATE_SUNDAY;

	if (week_start_day > wday) {

		g_date_subtract_days (sel_start, wday);

		wday = g_date_get_weekday (sel_start);

	}

	if (week_start_day < wday)

		g_date_subtract_days (sel_start, wday - week_start_day);

	julian_start = g_date_get_julian (sel_start);

	julian_end = g_date_get_julian (sel_end);

	if (((julian_end - julian_start + 1) % 7) != 0)

		g_date_add_days (sel_end, 7 - ((julian_end - julian_start + 1) % 7));

	julian_end = g_date_get_julian (sel_end);

	/* Can show only up to 6 weeks */

	if ((julian_end - julian_start + 1) / 7 > 6) {

		*sel_end = *sel_start;

		g_date_add_days (sel_end, (7 * 6) - 1);

	}

	if (g_date_compare (sel_start, sel_end) == 0)

		g_date_add_days (sel_end, 6);

}

static gboolean

cal_shell_content_weekday_within (GDateWeekday start_wday,

				  GDateWeekday end_wday,

				  GDateWeekday test_wday)

{

	gint ii;

	if (start_wday <= end_wday)

		return start_wday <= test_wday && test_wday <= end_wday;

	for (ii = 0; ii < 7; ii++) {

		if (start_wday == test_wday)

			return TRUE;

		if (start_wday == end_wday)

			break;

		start_wday = e_weekday_get_next (start_wday);

	}

	return FALSE;

}

static void

cal_shell_content_change_selection_in_current_view (ECalShellContent *cal_shell_content,

						    time_t sel_start_tt,

						    time_t sel_end_tt,

						    icaltimezone *zone)

{

	g_return_if_fail (E_IS_CAL_SHELL_CONTENT (cal_shell_content));

	if (cal_shell_content->priv->current_view >= E_CAL_VIEW_KIND_DAY &&

	    cal_shell_content->priv->current_view < E_CAL_VIEW_KIND_LAST) {

		ECalendarView *view;

		view = cal_shell_content->priv->views[cal_shell_content->priv->current_view];

		/* Preserve selected time (change only date) for these views */

		if (cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_DAY ||

		    cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_WORKWEEK) {

			time_t current_sel_start = (time_t) -1, current_sel_end = (time_t) -1;

			if (e_calendar_view_get_selected_time_range (view, &current_sel_start, &current_sel_end)) {

				current_sel_start = icaltime_as_timet_with_zone (icaltime_from_timet_with_zone (current_sel_start, 0, zone), NULL);

				current_sel_end = icaltime_as_timet_with_zone (icaltime_from_timet_with_zone (current_sel_end, 0, zone), NULL);

				sel_start_tt += current_sel_start % (24 * 60 * 60);

				sel_end_tt += current_sel_end % (24 * 60 * 60);

			}

		}

		e_calendar_view_set_selected_time_range (view, sel_start_tt, sel_end_tt);

	}

}

static void

cal_shell_content_datepicker_selection_changed_cb (ECalendarItem *calitem,

						   ECalShellContent *cal_shell_content)

{

	GDate sel_start, sel_end;

	guint32 selected_days, start_julian, end_julian;

	icaltimezone *zone;

	time_t sel_start_tt, sel_end_tt;

	g_return_if_fail (E_IS_CAL_SHELL_CONTENT (cal_shell_content));

	g_return_if_fail (E_IS_CALENDAR_ITEM (calitem));

	g_date_clear (&sel_start, 1);

	g_date_clear (&sel_end, 1);

	e_calendar_item_get_selection (calitem, &sel_start, &sel_end);

	start_julian = g_date_get_julian (&sel_start);

	end_julian = g_date_get_julian (&sel_end);

	g_return_if_fail (start_julian <= end_julian);

	if (g_date_compare (&cal_shell_content->priv->view_start, &sel_start) == 0 &&

	    g_date_compare (&cal_shell_content->priv->view_end, &sel_end) == 0) {

		/* No change in the selection range */

		return;

	}

	zone = e_cal_model_get_timezone (e_cal_base_shell_content_get_model (E_CAL_BASE_SHELL_CONTENT (cal_shell_content)));

	sel_start_tt = cal_comp_gdate_to_timet (&sel_start, zone);

	sel_end_tt = cal_comp_gdate_to_timet (&sel_end, zone);

	selected_days = end_julian - start_julian + 1;

	if (selected_days == 1) {

		GDateWeekday sel_start_wday, sel_end_wday, cur_start_wday, cur_end_wday;

		/* Clicked inside currently selected view range; do not do anything,

		   just make sure the days are selected again */

		if (g_date_compare (&cal_shell_content->priv->view_start, &sel_start) <= 0 &&

		    g_date_compare (&sel_start, &cal_shell_content->priv->view_end) <= 0) {

			sel_start = cal_shell_content->priv->view_start;

			sel_end = cal_shell_content->priv->view_end;

			e_calendar_item_set_selection (calitem, &sel_start, &sel_end);

			cal_shell_content_change_selection_in_current_view (cal_shell_content, sel_start_tt, sel_end_tt, zone);

			return;

		}

		sel_start_wday = g_date_get_weekday (&sel_start);

		sel_end_wday = g_date_get_weekday (&sel_end);

		cur_start_wday = g_date_get_weekday (&cal_shell_content->priv->view_start);

		cur_end_wday = g_date_get_weekday (&cal_shell_content->priv->view_end);

		if ((cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_WORKWEEK ||

		    (cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_DAY &&

		    e_day_view_get_days_shown (E_DAY_VIEW (cal_shell_content->priv->views[E_CAL_VIEW_KIND_DAY])) != 1)) &&

		    cal_shell_content_weekday_within (cur_start_wday, cur_end_wday, sel_start_wday)) {

			if (cur_start_wday < sel_start_wday) {

				g_date_subtract_days (&sel_start, sel_start_wday - cur_start_wday);

			} else if (cur_start_wday > sel_start_wday) {

				g_date_subtract_days (&sel_start, 7 - (cur_start_wday - sel_start_wday));

			}

			sel_end = sel_start;

			if (cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_DAY)

				g_date_add_days (&sel_end, e_day_view_get_days_shown (E_DAY_VIEW (cal_shell_content->priv->views[E_CAL_VIEW_KIND_DAY])) - 1);

			else

				g_date_add_days (&sel_end, e_day_view_get_days_shown (E_DAY_VIEW (cal_shell_content->priv->views[E_CAL_VIEW_KIND_WORKWEEK])) - 1);

			e_cal_shell_content_change_view (cal_shell_content, cal_shell_content->priv->current_view, &sel_start, &sel_end, FALSE);

		} else if (cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_WEEK &&

		    cal_shell_content_weekday_within (cur_start_wday, cur_end_wday, sel_start_wday) &&

		    cal_shell_content_weekday_within (cur_start_wday, cur_end_wday, sel_end_wday)) {

			if (cur_start_wday < sel_start_wday)

				g_date_subtract_days (&sel_start, sel_start_wday - cur_start_wday);

			sel_end = sel_start;

			cal_shell_content_clamp_for_whole_weeks (calitem->week_start_day, &sel_start, &sel_end, TRUE);

			e_cal_shell_content_change_view (cal_shell_content, E_CAL_VIEW_KIND_WEEK, &sel_start, &sel_end, FALSE);

		} else if (cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_MONTH ||

			   cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_LIST) {

			/* whole month */

			g_date_set_day (&sel_start, 1);

			sel_end = sel_start;

			g_date_set_day (&sel_end, g_date_get_days_in_month (g_date_get_month (&sel_start), g_date_get_year (&sel_start)) - 1);

			cal_shell_content_clamp_for_whole_weeks (calitem->week_start_day, &sel_start, &sel_end, cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_MONTH);

			e_cal_shell_content_change_view (cal_shell_content, cal_shell_content->priv->current_view, &sel_start, &sel_end, FALSE);

		} else if (cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_WORKWEEK) {

			cal_shell_content_clamp_for_whole_weeks (calitem->week_start_day, &sel_start, &sel_end, TRUE);

			e_cal_shell_content_change_view (cal_shell_content, E_CAL_VIEW_KIND_WEEK, &sel_start, &sel_end, FALSE);

		} else {

			e_cal_shell_content_change_view (cal_shell_content, E_CAL_VIEW_KIND_DAY, &sel_start, &sel_end, FALSE);

		}

		cal_shell_content_change_selection_in_current_view (cal_shell_content, sel_start_tt, sel_end_tt, zone);

	} else if (selected_days < 7) {

		GDateWeekday first_work_wday;

		first_work_wday = e_cal_model_get_work_day_first (e_cal_base_shell_content_get_model (E_CAL_BASE_SHELL_CONTENT (cal_shell_content)));

		if (cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_WORKWEEK &&

		    first_work_wday == g_date_get_weekday (&sel_start) &&

		    selected_days == e_day_view_get_days_shown (E_DAY_VIEW (cal_shell_content->priv->views[E_CAL_VIEW_KIND_WORKWEEK])))

			e_cal_shell_content_change_view (cal_shell_content, E_CAL_VIEW_KIND_WORKWEEK, &sel_start, &sel_end, FALSE);

		else

			e_cal_shell_content_change_view (cal_shell_content, E_CAL_VIEW_KIND_DAY, &sel_start, &sel_end, FALSE);

	} else if (selected_days == 7) {

		GDateWeekday sel_start_wday;

		sel_start_wday = g_date_get_weekday (&sel_start);

		if (sel_start_wday == calitem->week_start_day &&

		    cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_DAY &&

		    e_day_view_get_days_shown (E_DAY_VIEW (cal_shell_content->priv->views[E_CAL_VIEW_KIND_DAY])) == 7) {

			e_cal_shell_content_change_view (cal_shell_content, E_CAL_VIEW_KIND_DAY, &sel_start, &sel_end, FALSE);

		} else {

			e_cal_shell_content_change_view (cal_shell_content, E_CAL_VIEW_KIND_WEEK, &sel_start, &sel_end, FALSE);

		}

	} else {

		if (cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_LIST) {

			/* whole month */

			g_date_set_day (&sel_start, 1);

			sel_end = sel_start;

			g_date_set_day (&sel_end, g_date_get_days_in_month (g_date_get_month (&sel_start), g_date_get_year (&sel_start)));

			cal_shell_content_clamp_for_whole_weeks (calitem->week_start_day, &sel_start, &sel_end, FALSE);

			e_cal_shell_content_change_view (cal_shell_content, E_CAL_VIEW_KIND_LIST, &sel_start, &sel_end, FALSE);

		} else {

			cal_shell_content_clamp_for_whole_weeks (calitem->week_start_day, &sel_start, &sel_end,

				cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_MONTH || cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_WEEK);

			e_cal_shell_content_change_view (cal_shell_content, E_CAL_VIEW_KIND_MONTH, &sel_start, &sel_end, FALSE);

		}

	}

}

static void

cal_shell_content_datepicker_range_moved_cb (ECalendarItem *calitem,

					     ECalShellContent *cal_shell_content)

{

	gint start_year, start_month, start_day, end_year, end_month, end_day;

	GDate sel_start_date, sel_end_date, range_start_date;

	g_return_if_fail (E_IS_CALENDAR_ITEM (calitem));

	g_return_if_fail (E_IS_CAL_SHELL_CONTENT (cal_shell_content));

	if (!e_calendar_item_get_date_range (calitem, &start_year, &start_month, &start_day, &end_year, &end_month, &end_day))

		return;

	g_date_set_dmy (&range_start_date, start_day, start_month + 1, start_year);

	if (g_date_valid (&cal_shell_content->priv->last_range_start) &&

	    g_date_compare (&cal_shell_content->priv->last_range_start, &range_start_date) == 0) {

		return;

	}

	cal_shell_content->priv->last_range_start = range_start_date;

	g_date_clear (&sel_start_date, 1);

	g_date_clear (&sel_end_date, 1);

	if (cal_shell_content->priv->view_start_range_day_offset == (guint32) -1) {

		sel_start_date = cal_shell_content->priv->view_start;

		sel_end_date = cal_shell_content->priv->view_end;

		cal_shell_content->priv->view_start_range_day_offset =

			g_date_get_julian (&cal_shell_content->priv->view_start) - g_date_get_julian (&range_start_date);

	} else {

		gint view_days;

		view_days = g_date_get_julian (&cal_shell_content->priv->view_end) - g_date_get_julian (&cal_shell_content->priv->view_start);

		sel_start_date = range_start_date;

		g_date_add_days (&sel_start_date, cal_shell_content->priv->view_start_range_day_offset);

		sel_end_date = sel_start_date;

		g_date_add_days (&sel_end_date, view_days);

	}

	g_signal_handler_block (calitem, cal_shell_content->priv->datepicker_range_moved_id);

	e_calendar_item_set_selection (calitem, &sel_start_date, &sel_end_date);

	g_signal_handler_unblock (calitem, cal_shell_content->priv->datepicker_range_moved_id);

}

static gboolean

cal_shell_content_datepicker_button_press_cb (ECalendar *calendar,

					      GdkEvent *event,

					      ECalShellContent *cal_shell_content)

{

	g_return_val_if_fail (E_IS_CAL_SHELL_CONTENT (cal_shell_content), FALSE);

	if (!event)

		return FALSE;

	if (event->type == GDK_2BUTTON_PRESS) {

		ECalendarItem *calitem = e_calendar_get_item (calendar);

		GDate sel_start, sel_end;

		g_date_clear (&sel_start, 1);

		g_date_clear (&sel_end, 1);

		e_calendar_item_get_selection (calitem, &sel_start, &sel_end);

		/* Switch to a day view on a double-click */

		e_cal_shell_content_change_view (cal_shell_content, E_CAL_VIEW_KIND_DAY, &sel_start, &sel_start, FALSE);

	}

	return FALSE;

}

static void

cal_shell_content_current_view_id_changed_cb (ECalShellContent *cal_shell_content)

{

	GDate sel_start, sel_end;

	GDateWeekday work_day_first, week_start_day;

	ECalModel *model;

	gint ii;

	g_return_if_fail (E_IS_CAL_SHELL_CONTENT (cal_shell_content));

	model = e_cal_base_shell_content_get_model (E_CAL_BASE_SHELL_CONTENT (cal_shell_content));

	work_day_first = e_cal_model_get_work_day_first (model);

	week_start_day = e_cal_model_get_week_start_day (model);

	if (cal_shell_content->priv->previous_selected_start_time != -1 &&

	    cal_shell_content->priv->previous_selected_end_time != -1) {

		icaltimezone *zone;

		zone = e_cal_model_get_timezone (model);

		time_to_gdate_with_zone (&sel_start, cal_shell_content->priv->previous_selected_start_time, zone);

		time_to_gdate_with_zone (&sel_end, cal_shell_content->priv->previous_selected_end_time, zone);

	} else {

		sel_start = cal_shell_content->priv->view_start;

		sel_end = cal_shell_content->priv->view_end;

	}

	switch (cal_shell_content->priv->current_view) {

		case E_CAL_VIEW_KIND_DAY:

			/* Left the start & end being the current view start */

			sel_end = sel_start;

			break;

		case E_CAL_VIEW_KIND_WORKWEEK:

			cal_shell_content_clamp_for_whole_weeks (week_start_day, &sel_start, &sel_end, FALSE);

			ii = 0;

			while (g_date_get_weekday (&sel_start) != work_day_first && ii < 7) {

				g_date_add_days (&sel_start, 1);

				ii++;

			}

			sel_end = sel_start;

			g_date_add_days (&sel_end, e_day_view_get_days_shown (E_DAY_VIEW (cal_shell_content->priv->views[E_CAL_VIEW_KIND_WORKWEEK])) - 1);

			break;

		case E_CAL_VIEW_KIND_WEEK:

			sel_end = sel_start;

			cal_shell_content_clamp_for_whole_weeks (week_start_day, &sel_start, &sel_end, TRUE);

			break;

		case E_CAL_VIEW_KIND_MONTH:

		case E_CAL_VIEW_KIND_LIST:

			if (g_date_get_day (&sel_start) != 1 &&

			    (g_date_get_julian (&sel_end) - g_date_get_julian (&sel_start) + 1) / 7 >= 3 &&

			    g_date_get_month (&sel_start) != g_date_get_month (&sel_end)) {

				g_date_set_day (&sel_start, 1);

				g_date_add_months (&sel_start, 1);

			} else {

				g_date_set_day (&sel_start, 1);

			}

			sel_end = sel_start;

			g_date_add_months (&sel_end, 1);

			g_date_subtract_days (&sel_end, 1);

			cal_shell_content_clamp_for_whole_weeks (week_start_day, &sel_start, &sel_end, cal_shell_content->priv->current_view == E_CAL_VIEW_KIND_MONTH);

			break;

		default:

			g_warn_if_reached ();

			return;

	}

	/* Ensure a change */

	e_cal_shell_content_change_view (cal_shell_content, cal_shell_content->priv->current_view, &sel_start, &sel_end, TRUE);

	/* Try to preserve selection between the views */

	if (cal_shell_content->priv->previous_selected_start_time != -1 &&

	    cal_shell_content->priv->previous_selected_end_time != -1) {

		if (cal_shell_content->priv->current_view >= E_CAL_VIEW_KIND_DAY &&

		    cal_shell_content->priv->current_view < E_CAL_VIEW_KIND_LAST) {

			ECalendarView *cal_view = cal_shell_content->priv->views[cal_shell_content->priv->current_view];

			e_calendar_view_set_selected_time_range (cal_view,

				cal_shell_content->priv->previous_selected_start_time,

				cal_shell_content->priv->previous_selected_end_time);

		}

	}

	cal_shell_content->priv->previous_selected_start_time = -1;

	cal_shell_content->priv->previous_selected_end_time = -1;

}

static void

cal_shell_content_display_view_cb (ECalShellContent *cal_shell_content,

                                   GalView *gal_view)

{

	ECalViewKind view_kind;

	GType gal_view_type;

	gal_view_type = G_OBJECT_TYPE (gal_view);

	if (gal_view_type == GAL_TYPE_VIEW_ETABLE) {

		ECalendarView *calendar_view;

		view_kind = E_CAL_VIEW_KIND_LIST;

		calendar_view = cal_shell_content->priv->views[view_kind];

		gal_view_etable_attach_table (

			GAL_VIEW_ETABLE (gal_view),

			E_CAL_LIST_VIEW (calendar_view)->table);

	} else if (gal_view_type == GAL_TYPE_VIEW_CALENDAR_DAY) {

		view_kind = E_CAL_VIEW_KIND_DAY;

	} else if (gal_view_type == GAL_TYPE_VIEW_CALENDAR_WORK_WEEK) {

		view_kind = E_CAL_VIEW_KIND_WORKWEEK;

	} else if (gal_view_type == GAL_TYPE_VIEW_CALENDAR_WEEK) {

		view_kind = E_CAL_VIEW_KIND_WEEK;

	} else if (gal_view_type == GAL_TYPE_VIEW_CALENDAR_MONTH) {

		view_kind = E_CAL_VIEW_KIND_MONTH;

	} else {

		g_return_if_reached ();

	}

	e_cal_shell_content_set_current_view_id (cal_shell_content, view_kind);

}

static void

cal_shell_content_notify_view_id_cb (ECalShellContent *cal_shell_content)

{

	EShellContent *shell_content;

	EShellView *shell_view;

	GSettings *settings;

	GtkWidget *paned;

	const gchar *key;

	const gchar *view_id;

	settings = e_util_ref_settings ("org.gnome.evolution.calendar");

	paned = cal_shell_content->priv->hpaned;

	shell_content = E_SHELL_CONTENT (cal_shell_content);

	shell_view = e_shell_content_get_shell_view (shell_content);

	view_id = e_shell_view_get_view_id (shell_view);

	if (view_id != NULL && strcmp (view_id, "Month_View") == 0)

		key = "month-hpane-position";

	else

		key = "hpane-position";

	g_settings_unbind (paned, "hposition");

	g_settings_bind (

		settings, key,

		paned, "hposition",

		G_SETTINGS_BIND_DEFAULT);

	g_object_unref (settings);

}

static void

cal_shell_content_is_editing_changed_cb (gpointer cal_view_tasks_memos_table,

                                         GParamSpec *param,

                                         EShellView *shell_view)

{

	g_return_if_fail (E_IS_SHELL_VIEW (shell_view));

	e_shell_view_update_actions (shell_view);

}

static gchar *

cal_shell_content_get_pad_state_filename (EShellContent *shell_content,

                                          ETable *table)

{

	EShellBackend *shell_backend;

	EShellView *shell_view;

	const gchar *config_dir, *nick = NULL;

	g_return_val_if_fail (shell_content != NULL, NULL);

	g_return_val_if_fail (E_IS_SHELL_CONTENT (shell_content), NULL);

	g_return_val_if_fail (table != NULL, NULL);

	g_return_val_if_fail (E_IS_TABLE (table), NULL);

	if (E_IS_TASK_TABLE (table))

		nick = "TaskPad";

	else if (E_IS_MEMO_TABLE (table))

		nick = "MemoPad";

	g_return_val_if_fail (nick != NULL, NULL);

	shell_view = e_shell_content_get_shell_view (shell_content);

	shell_backend = e_shell_view_get_shell_backend (shell_view);

	config_dir = e_shell_backend_get_config_dir (shell_backend);

	return g_build_filename (config_dir, nick, NULL);

}

static void

cal_shell_content_save_table_state (EShellContent *shell_content,

                                    ETable *table)

{

	gchar *filename;

	filename = cal_shell_content_get_pad_state_filename (

		shell_content, table);

	g_return_if_fail (filename != NULL);

	e_table_save_state (table, filename);

	g_free (filename);

}

static void

cal_shell_content_load_table_state (EShellContent *shell_content,

                                    ETable *table)

{

	gchar *filename;

	filename = cal_shell_content_get_pad_state_filename (shell_content, table);

	g_return_if_fail (filename != NULL);

	e_table_load_state (table, filename);

	g_free (filename);

}

static icalproperty *

cal_shell_content_get_attendee_prop (icalcomponent *icalcomp,

                                     const gchar *address)

{

	icalproperty *prop;

	if (address == NULL || *address == '\0')

		return NULL;

	prop = icalcomponent_get_first_property (

		icalcomp, ICAL_ATTENDEE_PROPERTY);

	while (prop != NULL) {

		const gchar *attendee;

		attendee = icalproperty_get_attendee (prop);

		if (g_str_equal (itip_strip_mailto (attendee), address))

			return prop;

		prop = icalcomponent_get_next_property (

			icalcomp, ICAL_ATTENDEE_PROPERTY);

	}

	return NULL;

}

static gboolean

cal_shell_content_icalcomp_is_delegated (icalcomponent *icalcomp,

                                         const gchar *user_email)

{

	icalproperty *prop;

	icalparameter *param;

	const gchar *delto = NULL;

	gboolean is_delegated = FALSE;

	prop = cal_shell_content_get_attendee_prop (icalcomp, user_email);

	if (prop != NULL) {

		param = icalproperty_get_first_parameter (

			prop, ICAL_DELEGATEDTO_PARAMETER);

		if (param != NULL) {

			delto = icalparameter_get_delegatedto (param);

			delto = itip_strip_mailto (delto);

		}