/*
 * Copyright 2014 - 2015 Samsung Electronics Co., Ltd All Rights Reserved
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *
 */
 
#include "view/list-view.h"
#include "view/ctrl-bar-view.h"
#include "view/genlist-widget.h"
#include "view/navi-path-widget.h"
#include "view/navi-bar-title.h"
#include "view/navigator.h"
#include "view/popup.h"
#include "utils/app-types.h"
#include "utils/ui-utils.h"
#include "utils/common-utils.h"
#include "utils/model-utils.h"
#include "utils/config.h"
#include "utils/logger.h"
#include "model/fs-manager.h"
#include "model/clipboard.h"
#include "model/navi-path-storage.h"
#include "main-app.h"
 
typedef struct {
	view_data list_view;
	title_widget *title_wgt;
	genlist_widget *genlist_wgt;
	ctrl_bar_widget *ctrl_bar_wgt;
	navi_path_widget *navi_path_wgt;
	Eina_List *file_list;
} list_view_data;
 
typedef struct {
	list_view_data *list_view;
	Evas_Object *wait_popup;
} oper_callback_data;
 
static const char *const PROGRESS_TEXT = "Operation in progress";
 
static int _list_view_create_widgets(list_view_data *lv_data);
static int _list_view_update_content(list_view_data *lv_data);
static void _list_view_destroy(list_view_data *lv_data);
 
static void _list_view_del_cb(void *data, Evas *evas, Evas_Object *obj, void *event_info);
static void _list_view_operation_complete(void *data, int result);
static void _list_view_operation_move_cb(void *data, int result);
static void _list_view_operation_copy_cb(void *data, int result);
static void _list_view_operation_delete_cb(void *data, int result);
static oper_callback_data *_list_view_oper_cb_data_create(list_view_data* lv_data);
static void _list_view_oper_cb_data_destroy(oper_callback_data *data);
static Evas_Object *_list_view_progress_popup_create(list_view_data *lv_data);
static void _progress_popup_back_button_cb(void *data, Evas_Object *obj, void *event_info);
 
int list_view_add(app_data *app, Evas_Object *parent, const char *path, const char *dir_name)
	{
	RETVM_IF(!app, RESULT_TYPE_INVALID_ARG, "App object is NULL");
	RETVM_IF(!parent, RESULT_TYPE_INVALID_ARG, "Parent object is NULL");
	RETVM_IF(!path, RESULT_TYPE_INVALID_ARG, "Path is NULL");
 
	app->status.is_mainview = EINA_FALSE;
 
	list_view_data *data = calloc(1, sizeof(list_view_data));
	RETVM_IF(!data, RESULT_TYPE_FAIL_ALLOCATE_MEMORY, "Fail allocate memory");
 
	data->list_view.app = app;
	data->list_view.navi = parent;
	data->list_view.curr_path = (dir_name) ? common_util_strconcat(path, "/", dir_name, NULL)
									  : strdup(path);
	data->list_view.is_root = model_utils_is_root_path(data->list_view.curr_path);
 
	data->file_list = NULL;
 
	data->list_view.navi_layout = ui_utils_layout_add(data->list_view.navi, _list_view_del_cb, data);
	if (!data->list_view.navi_layout) {
		ERR("Fail to create Layout");
		_list_view_destroy(data);
		return RESULT_TYPE_FAIL;
	}
 
	elm_layout_file_set(data->list_view.navi_layout, ui_utils_get_resource(FM_LAYOUT_EDJ), "navi_layout");
 
	int result = fs_manager_get_file_list(data->list_view.app->manager, data->list_view.curr_path, &data->file_list);
	if (result != RESULT_TYPE_OK) {
		ERR("Fail to get file list");
		evas_object_del(data->list_view.navi_layout);
		return result;
	}
 
	const char *title = ui_utils_title_get(data->list_view.curr_path);
	result = navigator_add_view(data->list_view.app->navigator, title, &data->list_view);
	if (result != RESULT_TYPE_OK) {
		ERR("Fail to add view to naviframe");
		evas_object_del(data->list_view.navi_layout);
		return result;
	}
 
	result = _list_view_create_widgets(data);
	if (result != RESULT_TYPE_OK) {
		ERR("Fail to create widgets");
		evas_object_del(data->list_view.navi_layout);
		return result;
	}
 
	Eina_List *path_list = NULL;
	int res = navi_path_storage_get_path_list(app->path_storage, &path_list);
	RETVM_IF(res != RESULT_TYPE_OK, res, "Fail get folders list for navigation widget");
	navi_path_widget_content_set(data->navi_path_wgt, path_list);
 
	elm_object_item_data_set(data->list_view.navi_item, data);
 
	return RESULT_TYPE_OK;
}
 
int list_view_update(Elm_Object_Item *navi_item, int update_options)
{
	RETVM_IF(!navi_item, RESULT_TYPE_INVALID_ARG, "View object is NULL");
 
	list_view_data *data = elm_object_item_data_get(navi_item);
	RETVM_IF(!data, RESULT_TYPE_INVALID_ARG, "Data is NULL");
	RETVM_IF(!data->genlist_wgt, RESULT_TYPE_INVALID_ARG, "Genlist widget is NULL");
	RETVM_IF(!data->ctrl_bar_wgt, RESULT_TYPE_INVALID_ARG, "Ctrl bar widget is NULL");
 
	if (update_options & UPDATE_TYPE_VIEW) {
		RETVM_IF(_list_view_update_content(data) != RESULT_TYPE_OK,
				RESULT_TYPE_FAIL, "Fail to update view content");
	}
 
	if (update_options & UPDATE_TYPE_GENLIST) {
		RETVM_IF(genlist_widget_update(data->genlist_wgt) != RESULT_TYPE_OK,
				RESULT_TYPE_FAIL, "Fail to update genlist widget");
	}
 
	if (update_options & UPDATE_TYPE_CTRL_BAR_MODE) {
		RETVM_IF(ctrl_bar_widget_mode_update(data->ctrl_bar_wgt) != RESULT_TYPE_OK,
				RESULT_TYPE_FAIL, "Fail to update ctrl bar");
	}
 
	if (update_options & UPDATE_TYPE_CTRL_BAR_STATE) {
		RETVM_IF(ctrl_bar_widget_state_update(data->ctrl_bar_wgt) != RESULT_TYPE_OK,
				RESULT_TYPE_FAIL, "Fail to update ctrl bar");
	}
 
	return RESULT_TYPE_OK;
}
 
unsigned int list_view_items_count_get(view_data *view)
{
	list_view_data *data = (list_view_data *)view;
 
	return eina_list_count(data->file_list);
}
 
int list_view_create_folder(view_data *view, const char *folder_name)
{
	RETVM_IF(!view, RESULT_TYPE_INVALID_ARG, "View object is NULL");
 
	char *new_folder = common_util_strconcat(view->curr_path, "/", folder_name, NULL);
 
	int res = fs_manager_create_folder(view->app->manager, new_folder);
 
	free(new_folder);
	RETVM_IF(res != RESULT_TYPE_OK, res, "Model create folder Fail");
 
	return RESULT_TYPE_OK;
}
 
static void _progress_popup_back_button_cb(void *data, Evas_Object *obj, void *event_info)
{
}
 
Evas_Object *_list_view_progress_popup_create(list_view_data *lv_data)
{
	RETVM_IF(!lv_data, NULL, "View obj is NULL");
 
	Evas_Object *popup = elm_popup_add(lv_data->list_view.navi);
	RETVM_IF(!popup, NULL, "Fail to create popup");
 
	elm_popup_align_set(popup, ELM_NOTIFY_ALIGN_FILL, 1.0);
 
	Evas_Object *layout = ui_utils_layout_add(popup, NULL, NULL);
	if (!layout) {
		ERR("Fail to create layout");
		evas_object_del(popup);
		return NULL;
	}
	elm_layout_file_set(layout, ui_utils_get_resource(FM_LAYOUT_EDJ), "processing_view");
 
	Evas_Object *progressbar = elm_progressbar_add(layout);
	if (!progressbar) {
		ERR("Fail to create process bar");
		evas_object_del(popup);
		return NULL;
	}
 
	elm_object_style_set(progressbar, "process_medium");
	elm_progressbar_pulse(progressbar, EINA_TRUE);
	evas_object_show(progressbar);
 
	elm_object_part_content_set(layout, "processing", progressbar);
	elm_object_part_text_set(layout, "elm.text", PROGRESS_TEXT);
 
	evas_object_show(layout);
 
	eext_object_event_callback_add(popup, EEXT_CALLBACK_BACK, _progress_popup_back_button_cb, NULL);
	elm_object_content_set(popup, layout);
 
	evas_object_show(popup);
 
	return popup;
}
 
static oper_callback_data *_list_view_oper_cb_data_create(list_view_data* lv_data)
{
	RETVM_IF(!lv_data, NULL, "View data is NULL");
 
	oper_callback_data *cb_data = calloc(1, sizeof(oper_callback_data));
	RETVM_IF(!cb_data, NULL, "Failed to allocate memory for callback data");
 
	Evas_Object *progress_popup = _list_view_progress_popup_create(lv_data);
	if (!progress_popup) {
		ERR("Failed to create progress popup");
		_list_view_oper_cb_data_destroy(cb_data);
		return NULL;
	}
 
	cb_data->list_view = lv_data;
	cb_data->wait_popup = progress_popup;
 
	return cb_data;
}
 
static void _list_view_oper_cb_data_destroy(oper_callback_data *data)
{
    if (data) {
        evas_object_del(data->wait_popup);
        free(data);
    }
}
 
int list_view_delete_items(view_data *view)
{
	RETVM_IF(!view, RESULT_TYPE_INVALID_ARG, "View object is NULL");
 
	list_view_data *list_data = (list_view_data *)view;
 
	oper_callback_data *cb_data = _list_view_oper_cb_data_create(list_data);
	RETVM_IF(!cb_data, RESULT_TYPE_FAIL, "Failed to create callback data");
 
	int res = fs_manager_delete_files(list_data->list_view.app->manager,
			list_data->file_list,
			_list_view_operation_delete_cb,
			cb_data);
 
	if (res != RESULT_TYPE_OK) {
		ERR("Failed to delete selected files");
		_list_view_oper_cb_data_destroy(cb_data);
		return res;
	}
 
	return res;
}
 
int list_view_copy_items(view_data *view)
{
	RETVM_IF(!view, RESULT_TYPE_INVALID_ARG, "View object is NULL");
 
	list_view_data *list_data = (list_view_data *)view;
	app_data *app = list_data->list_view.app;
 
	int res = clipboard_add_data(app->clipboard, list_data->file_list);
	RETVM_IF(res != RESULT_TYPE_OK, res, "Fail to copy files");
 
	res = clipboard_set_operation(app->clipboard, OPERATION_TYPE_COPY);
	RETVM_IF(res != RESULT_TYPE_OK, res, "Fail to set operation");
 
	return RESULT_TYPE_OK;
}
 
int list_view_move_items(view_data *view)
{
	RETVM_IF(!view, RESULT_TYPE_INVALID_ARG, "View object is NULL");
 
	list_view_data *list_data = (list_view_data *)view;
	app_data *app = list_data->list_view.app;
 
	int res = clipboard_add_data(app->clipboard, list_data->file_list);
	RETVM_IF(res != RESULT_TYPE_OK, res, "Fail to copy files");
 
	res = clipboard_set_operation(app->clipboard, OPERATION_TYPE_MOVE);
	RETVM_IF(res != RESULT_TYPE_OK, res, "Fail to set operation");
 
	return RESULT_TYPE_OK;
}
 
int list_view_past_items(view_data *view)
{
	RETVM_IF(!view, RESULT_TYPE_INVALID_ARG, "View object is NULL");
 
	list_view_data *list_data = (list_view_data *)view;
	app_data *app = list_data->list_view.app;
 
	Eina_List *clipboard_list = NULL;
	int res = clipboard_get_data(app->clipboard, &clipboard_list);
	RETVM_IF(res != RESULT_TYPE_OK || !clipboard_list, res, "Fail to get files from clipboard");
 
	operation_type operation = OPERATION_TYPE_NONE;
	res = clipboard_get_operation(app->clipboard, &operation);
	RETVM_IF(res != RESULT_TYPE_OK, res, "Fail to get operation type");
 
	oper_callback_data *cb_data = _list_view_oper_cb_data_create(list_data);
	RETVM_IF(!cb_data, RESULT_TYPE_FAIL, "Failed to create callback data");
 
	if (operation == OPERATION_TYPE_COPY) {
		res = fs_manager_copy_files(app->manager,
				clipboard_list,
				list_data->list_view.curr_path,
				_list_view_operation_copy_cb,
				cb_data);
	} else if (operation == OPERATION_TYPE_MOVE) {
		res = fs_manager_move_files(app->manager,
				clipboard_list,
				list_data->list_view.curr_path,
				_list_view_operation_move_cb,
				cb_data);
	} else {
		ERR("Wrong operation type");
		res = RESULT_TYPE_FAIL;
	}
 
	if (res != RESULT_TYPE_OK) {
		ERR("Failed to paste selected files");
		_list_view_oper_cb_data_destroy(cb_data);
		return res;
	}
 
	return res;
}
 
int list_view_select_all(view_data *view, Eina_Bool state)
{
	RETVM_IF(!view, RESULT_TYPE_INVALID_ARG, "View object is NULL");
 
	list_view_data *data = (list_view_data *)view;
 
	Eina_List *list = NULL;
	void *item = NULL;
 
	EINA_LIST_FOREACH(data->file_list, list, item) {
		node_info *node = item;
		node->is_selected = state;
	}
	return RESULT_TYPE_OK;
}
 
static int _list_view_create_widgets(list_view_data *lv_data)
{
	lv_data->navi_path_wgt = navi_path_widget_add((view_data *)lv_data);
	RETVM_IF(!lv_data->navi_path_wgt, RESULT_TYPE_FAIL, "Fail to create navigation widget");
 
	lv_data->genlist_wgt = genlist_widget_add((view_data *)lv_data);
	RETVM_IF(!lv_data->genlist_wgt, RESULT_TYPE_FAIL, "Fail to create genlist widget");
	genlist_widget_content_set(lv_data->genlist_wgt, lv_data->file_list);
 
	lv_data->ctrl_bar_wgt = ctrl_bar_widget_add((view_data *)lv_data);
	RETVM_IF(!lv_data->ctrl_bar_wgt, RESULT_TYPE_FAIL, "Fail to create ctrl bar widget");
 
	if (!lv_data->list_view.is_root) {
		lv_data->title_wgt = navi_bar_title_widget_add((view_data *)lv_data);
		RETVM_IF(!lv_data->title_wgt, RESULT_TYPE_FAIL, "Fail to create title widget");
	}
 
	return RESULT_TYPE_OK;
}
 
static int _list_view_update_content(list_view_data *lv_data)
{
	common_util_clear_file_list(&lv_data->file_list);
 
	int result = fs_manager_get_file_list(lv_data->list_view.app->manager, lv_data->list_view.curr_path, &lv_data->file_list);
	RETVM_IF(result != RESULT_TYPE_OK, result, "Fail to get file list");
 
	genlist_widget_clear(lv_data->genlist_wgt);
	genlist_widget_content_set(lv_data->genlist_wgt, lv_data->file_list);
 
	return RESULT_TYPE_OK;
}
 
static void _list_view_operation_move_cb(void *data, int result)
{
	_list_view_operation_complete(data, result);
}
static void _list_view_operation_copy_cb(void *data, int result)
{
	_list_view_operation_complete(data, result);
}
static void _list_view_operation_delete_cb(void *data, int result)
{
	RETM_IF(!data, "Data is NULL");
 
	oper_callback_data *cb_data = (oper_callback_data *)data;
	list_view_data *list_data = cb_data->list_view;
 
	_list_view_oper_cb_data_destroy(cb_data);
 
	if (result != RESULT_TYPE_OK) {
		RETM_IF(popup_create((view_data *)list_data, POPUP_TYPE_ERROR), "Fail to create error popup");
	} else {
		list_data->list_view.app->status.curr_mode = MODE_DEFAULT;
		int res = list_view_update(list_data->list_view.navi_item,
				UPDATE_TYPE_GENLIST |
				UPDATE_TYPE_CTRL_BAR_MODE |
				UPDATE_TYPE_VIEW);
 
		RETM_IF(res != RESULT_TYPE_OK, "Fail to update view");
	}
}
 
static void _list_view_operation_complete(void *data, int result)
	{
	RETM_IF(!data, "Data is NULL");
 
	oper_callback_data *cb_data = (oper_callback_data *)data;
	list_view_data *list_data = cb_data->list_view;
 
	_list_view_oper_cb_data_destroy(cb_data);
 
	if (result != RESULT_TYPE_OK) {
		ERR("File operation failed");
 
		operation_type operation = OPERATION_TYPE_NONE;
		int res = clipboard_get_operation(list_data->list_view.app->clipboard, &operation);
 
		if (res != RESULT_TYPE_OK) {
			ERR("Fail to get operation type");
			res = popup_create((view_data *)list_data, POPUP_TYPE_ERROR);
		} else {
			switch (operation) {
			case OPERATION_TYPE_MOVE:
				if (result == RESULT_TYPE_OPERATION_INVALID_DEST) {
					res = popup_create((view_data *)list_data, POPUP_TYPE_MOVE_RECURSIVE_FAIL);
				} else {
					res = popup_create((view_data *)list_data, POPUP_TYPE_FAIL_TO_MOVE);
				}
				break;
			case OPERATION_TYPE_COPY:
				if (result == RESULT_TYPE_OPERATION_INVALID_DEST) {
					res = popup_create((view_data *)list_data, POPUP_TYPE_COPY_RECURSIVE_FAIL);
				} else {
					res = popup_create((view_data *)list_data, POPUP_TYPE_FAIL_TO_COPY);
				}
				break;
			default:
				res = popup_create((view_data *)list_data, POPUP_TYPE_ERROR);
				break;
			}
		}
 
		if (res != RESULT_TYPE_OK) {
			ERR("Fail to create error popup");
		}
	} else {
		list_data->list_view.app->status.curr_mode = MODE_DEFAULT;
		int res = list_view_update(list_data->list_view.navi_item,
				UPDATE_TYPE_GENLIST |
				UPDATE_TYPE_CTRL_BAR_MODE |
				UPDATE_TYPE_VIEW);
 
		if (res != RESULT_TYPE_OK) {
			ERR("Fail to update view");
		}
	}
 
	if (result != RESULT_TYPE_OPERATION_INVALID_DEST) {
		result = clipboard_clear(list_data->list_view.app->clipboard);
		RETM_IF(result != RESULT_TYPE_OK, "Fail to clear clipboard");
	}
}
 
static void _list_view_destroy(list_view_data *lv_data)
{
	if (lv_data) {
		app_data *app = lv_data->list_view.app;
 
		app->status.curr_mode = MODE_DEFAULT;
 
		common_util_clear_file_list(&lv_data->file_list);
 
		free(lv_data->list_view.curr_path);
		free(lv_data);
	}
}
 
static void _list_view_del_cb(void *data, Evas *evas, Evas_Object *obj, void *event_info)
{
	_list_view_destroy(data);
}