#include <wx/app.h>
#include <wx/button.h>
#include <wx/scrolwin.h>
#include <wx/menu.h>
#include <wx/sizer.h>

#include <wx/bmpcbox.h>
#include <wx/bmpbuttn.h>
#include <wx/treectrl.h>
#include <wx/imaglist.h>

#include "Tab.h"
#include "PresetBundle.hpp"

namespace Slic3r {
namespace GUI {

// sub new
void CTab::create_preset_tab()
{
	// Vertical sizer to hold the choice menu and the rest of the page.
	CTab *panel = this;
	auto  *sizer = new wxBoxSizer(wxVERTICAL);
	sizer->SetSizeHints(panel);
	panel->SetSizer(sizer);

	// preset chooser
	//! Add Preset from PrintPreset
	// choice menu for Experiments
	wxString choices[] =
	{
		_T("First"),
		_T("Second"),
		_T("Third")
	};

	presets_choice_ = new wxBitmapComboBox(panel, wxID_ANY, "", wxDefaultPosition, wxSize(270, -1)/*, nCntEl, choices, wxCB_READONLY*/);
	const wxBitmap* bmp = new wxBitmap(wxT("var\\flag-green-icon.png"), wxBITMAP_TYPE_PNG);
	for (auto el:choices)
		presets_choice_->Append(wxString::FromUTF8(el).c_str(), *bmp);
	presets_choice_->SetSelection(presets_choice_->GetCount() - 1);

	//buttons
	wxBitmap bmpMenu;
	bmpMenu = wxBitmap(wxT("var\\disk.png"), wxBITMAP_TYPE_PNG);
	btn_save_preset_ = new wxBitmapButton(panel, wxID_ANY, bmpMenu, wxDefaultPosition, wxDefaultSize, wxBORDER_NONE);
	bmpMenu = wxBitmap(wxT("var\\delete.png"), wxBITMAP_TYPE_PNG);
	btn_delete_preset_ = new wxBitmapButton(panel, wxID_ANY, bmpMenu, wxDefaultPosition, wxDefaultSize, wxBORDER_NONE);

	//	$self->{show_incompatible_presets} = 0;			// !!!

	bmp_show_incompatible_presets_ = new wxBitmap(wxT("var\\flag-red-icon.png"), wxBITMAP_TYPE_PNG);
	bmp_hide_incompatible_presets_ = new wxBitmap(wxT("var\\flag-green-icon.png"), wxBITMAP_TYPE_PNG);
	btn_hide_incompatible_presets_ = new wxBitmapButton(panel, wxID_ANY, *bmp_hide_incompatible_presets_, wxDefaultPosition, wxDefaultSize, wxBORDER_NONE);

	btn_save_preset_->SetToolTip(wxT("Save current ") + wxString(title_));// (stTitle);
	btn_delete_preset_->SetToolTip(_T("Delete this preset"));
	btn_delete_preset_->Disable();

	hsizer_ = new wxBoxSizer(wxHORIZONTAL);
	sizer->Add(hsizer_, 0, wxBOTTOM, 3);
	hsizer_->Add(presets_choice_, 1, wxLEFT | wxRIGHT | wxTOP | wxALIGN_CENTER_VERTICAL, 3);
	hsizer_->AddSpacer(4);
	hsizer_->Add(btn_save_preset_, 0, wxALIGN_CENTER_VERTICAL);
	hsizer_->AddSpacer(4);
	hsizer_->Add(btn_delete_preset_, 0, wxALIGN_CENTER_VERTICAL);
	hsizer_->AddSpacer(16);
	hsizer_->Add(btn_hide_incompatible_presets_, 0, wxALIGN_CENTER_VERTICAL);

	//Horizontal sizer to hold the tree and the selected page.
	hsizer_ = new wxBoxSizer(wxHORIZONTAL);
	sizer->Add(hsizer_, 1, wxEXPAND, 0);

	//left vertical sizer
	left_sizer_ = new wxBoxSizer(wxVERTICAL);
	hsizer_->Add(left_sizer_, 0, wxEXPAND | wxLEFT | wxTOP | wxBOTTOM, 3);

	// tree
	treectrl_ = new wxTreeCtrl(panel, wxID_ANY/*ID_TAB_TREE*/, wxDefaultPosition, wxSize(185, -1), wxTR_NO_BUTTONS | wxTR_HIDE_ROOT | wxTR_SINGLE | wxTR_NO_LINES | wxBORDER_SUNKEN | wxWANTS_CHARS);
	left_sizer_->Add(treectrl_, 1, wxEXPAND);
	icons_ = new wxImageList(16, 16, true, 1/*, 1*/);
	// Index of the last icon inserted into $self->{icons}.
	icon_count = -1;
	treectrl_->AssignImageList(icons_);
	treectrl_->AddRoot("root");
	treectrl_->SetIndent(0);
	disable_tree_sel_changed_event_ = 0;

	treectrl_->Bind(wxEVT_TREE_SEL_CHANGED, &CTab::OnTreeSelChange, this);
	treectrl_->Bind(wxEVT_KEY_DOWN, &CTab::OnKeyDown, this);
	treectrl_->Bind(wxEVT_COMBOBOX, &CTab::OnComboBox, this); 

	btn_save_preset_->Bind(wxEVT_BUTTON, &CTab::save_preset, this);
	btn_delete_preset_->Bind(wxEVT_BUTTON, &CTab::delete_preset, this);
	btn_hide_incompatible_presets_->Bind(wxEVT_BUTTON, &CTab::_toggle_show_hide_incompatible, this);

	// Initialize the DynamicPrintConfig by default keys/values.
	// Possible %params keys: no_controller
	build();
	rebuild_page_tree();
//	_update();
}

CPageShp CTab::add_options_page(wxString title, wxString icon)
{
	// Index of icon in an icon list $self->{icons}.
	auto icon_idx = 0;
	if (!icon.IsEmpty()) {
		try { icon_idx = icon_index_.at(icon);}
		catch (std::out_of_range e) { icon_idx = -1; }
		if (icon_idx == -1) {
			// Add a new icon to the icon list.
			const auto img_icon = new wxIcon(wxT("var\\") + icon, wxBITMAP_TYPE_PNG);
			icons_->Add(*img_icon);
			icon_idx = ++icon_count; //  $icon_idx = $self->{icon_count} + 1; $self->{icon_count} = $icon_idx;
			icon_index_[icon] = icon_idx;
		}
	}
	// Initialize the page.
	CPageShp page(new CPage(this, title, icon_idx));
	page->SetScrollbars(1, 1, 1, 1);
	page->Hide();
	hsizer_->Add(page.get(), 1, wxEXPAND | wxLEFT, 5);
	pages_.push_back(page);

	page->set_config(&config_);

	return page;
}

void CTabPrint::build()
{
//	$self->{presets} = wxTheApp->{preset_bundle}->print;
	PresetCollection *prints = new PresetCollection(Preset::TYPE_PRINT, Preset::print_options());
	config_ = prints->get_edited_preset().config;
	config_def = config_.def();		// initialization. It will be used in get_option_(const std::string title)

	auto page = add_options_page("Layers and perimeters", "layers.png");
		auto optgroup = page->new_optgroup("Layer height");
		optgroup->append_single_option_line(get_option_("layer_height"));
		optgroup->append_single_option_line(get_option_("first_layer_height"));

		optgroup = page->new_optgroup("Vertical shells");
		optgroup->append_single_option_line(get_option_("perimeters"));
		optgroup->append_single_option_line(get_option_("spiral_vase"));

		optgroup = page->new_optgroup("Horizontal shells");
		Line line{ "Solid layers", "" };
		line.append_option(get_option_("top_solid_layers"));
		line.append_option(get_option_("bottom_solid_layers"));
		optgroup->append_line(line);

		optgroup = page->new_optgroup("Quality (slower slicing)");
 		optgroup->append_single_option_line(get_option_("extra_perimeters"));
 		optgroup->append_single_option_line(get_option_("ensure_vertical_shell_thickness"));
 		optgroup->append_single_option_line(get_option_("avoid_crossing_perimeters"));
 		optgroup->append_single_option_line(get_option_("thin_walls"));
		optgroup->append_single_option_line(get_option_("overhangs"));

		optgroup = page->new_optgroup("Advanced");
 		optgroup->append_single_option_line(get_option_("seam_position"));
 		optgroup->append_single_option_line(get_option_("external_perimeters_first"));

	page = add_options_page("Infill", "infill.png");
		optgroup = page->new_optgroup("Infill");
 		optgroup->append_single_option_line(get_option_("fill_density"));
		optgroup->append_single_option_line(get_option_("fill_pattern"));
		optgroup->append_single_option_line(get_option_("external_fill_pattern"));

		optgroup = page->new_optgroup("Reducing printing time");
 		optgroup->append_single_option_line(get_option_("infill_every_layers"));
 		optgroup->append_single_option_line(get_option_("infill_only_where_needed"));

		optgroup = page->new_optgroup("Advanced");
		optgroup->append_single_option_line(get_option_("solid_infill_every_layers"));
		optgroup->append_single_option_line(get_option_("fill_angle"));
		optgroup->append_single_option_line(get_option_("solid_infill_below_area"));
		optgroup->append_single_option_line(get_option_("bridge_angle"));
 		optgroup->append_single_option_line(get_option_("only_retract_when_crossing_perimeters"));
 		optgroup->append_single_option_line(get_option_("infill_first"));

	page = add_options_page("Skirt and brim", "box.png");
		optgroup = page->new_optgroup("Skirt");
		optgroup->append_single_option_line(get_option_("skirts"));
		optgroup->append_single_option_line(get_option_("skirt_distance"));
		optgroup->append_single_option_line(get_option_("skirt_height"));
		optgroup->append_single_option_line(get_option_("min_skirt_length"));

		optgroup = page->new_optgroup("Brim");
		optgroup->append_single_option_line(get_option_("brim_width"));

	page = add_options_page("Support material", "building.png");
		optgroup = page->new_optgroup("Support material");
 		optgroup->append_single_option_line(get_option_("support_material"));
		optgroup->append_single_option_line(get_option_("support_material_threshold"));
		optgroup->append_single_option_line(get_option_("support_material_enforce_layers"));

		optgroup = page->new_optgroup("Raft");
 		optgroup->append_single_option_line(get_option_("raft_layers"));
// 		# optgroup->append_single_option_line(get_option_("raft_contact_distance"));

		optgroup = page->new_optgroup("Options for support material and raft");
 		optgroup->append_single_option_line(get_option_("support_material_contact_distance"));
		optgroup->append_single_option_line(get_option_("support_material_pattern"));
 		optgroup->append_single_option_line(get_option_("support_material_with_sheath"));
		optgroup->append_single_option_line(get_option_("support_material_spacing"));
		optgroup->append_single_option_line(get_option_("support_material_angle"));
		optgroup->append_single_option_line(get_option_("support_material_interface_layers"));
		optgroup->append_single_option_line(get_option_("support_material_interface_spacing"));
		optgroup->append_single_option_line(get_option_("support_material_interface_contact_loops"));
 		optgroup->append_single_option_line(get_option_("support_material_buildplate_only"));
		optgroup->append_single_option_line(get_option_("support_material_xy_spacing"));
 		optgroup->append_single_option_line(get_option_("dont_support_bridges"));
 		optgroup->append_single_option_line(get_option_("support_material_synchronize_layers"));

	page = add_options_page("Speed", "time.png");
		optgroup = page->new_optgroup("Speed for print moves");
		optgroup->append_single_option_line(get_option_("perimeter_speed"));
		optgroup->append_single_option_line(get_option_("small_perimeter_speed"));
		optgroup->append_single_option_line(get_option_("external_perimeter_speed"));
		optgroup->append_single_option_line(get_option_("infill_speed"));
		optgroup->append_single_option_line(get_option_("solid_infill_speed"));
		optgroup->append_single_option_line(get_option_("top_solid_infill_speed"));
		optgroup->append_single_option_line(get_option_("support_material_speed"));
		optgroup->append_single_option_line(get_option_("support_material_interface_speed"));
		optgroup->append_single_option_line(get_option_("bridge_speed"));
		optgroup->append_single_option_line(get_option_("gap_fill_speed"));

		optgroup = page->new_optgroup("Speed for non-print moves");
		optgroup->append_single_option_line(get_option_("travel_speed"));

		optgroup = page->new_optgroup("Modifiers");
		optgroup->append_single_option_line(get_option_("first_layer_speed"));

		optgroup = page->new_optgroup("Acceleration control (advanced)");
		optgroup->append_single_option_line(get_option_("perimeter_acceleration"));
		optgroup->append_single_option_line(get_option_("infill_acceleration"));
		optgroup->append_single_option_line(get_option_("bridge_acceleration"));
		optgroup->append_single_option_line(get_option_("first_layer_acceleration"));
		optgroup->append_single_option_line(get_option_("default_acceleration"));

		optgroup = page->new_optgroup("Autospeed (advanced)");
		optgroup->append_single_option_line(get_option_("max_print_speed"));
		optgroup->append_single_option_line(get_option_("max_volumetric_speed"));
		optgroup->append_single_option_line(get_option_("max_volumetric_extrusion_rate_slope_positive"));
		optgroup->append_single_option_line(get_option_("max_volumetric_extrusion_rate_slope_negative"));

	page = add_options_page("Multiple Extruders", "funnel.png");
		optgroup = page->new_optgroup("Extruders");
 		optgroup->append_single_option_line(get_option_("perimeter_extruder"));
 		optgroup->append_single_option_line(get_option_("infill_extruder"));
		optgroup->append_single_option_line(get_option_("solid_infill_extruder"));
		optgroup->append_single_option_line(get_option_("support_material_extruder"));
		optgroup->append_single_option_line(get_option_("support_material_interface_extruder"));

		optgroup = page->new_optgroup("Ooze prevention");
 		optgroup->append_single_option_line(get_option_("ooze_prevention"));
		optgroup->append_single_option_line(get_option_("standby_temperature_delta"));

		optgroup = page->new_optgroup("Wipe tower");
 		optgroup->append_single_option_line(get_option_("wipe_tower"));
		optgroup->append_single_option_line(get_option_("wipe_tower_x"));
		optgroup->append_single_option_line(get_option_("wipe_tower_y"));
		optgroup->append_single_option_line(get_option_("wipe_tower_width"));
		optgroup->append_single_option_line(get_option_("wipe_tower_per_color_wipe"));

		optgroup = page->new_optgroup("Advanced");
 		optgroup->append_single_option_line(get_option_("interface_shells"));

	page = add_options_page("Advanced", "wrench.png");
		optgroup = page->new_optgroup("Extrusion width", 200);
		optgroup->append_single_option_line(get_option_("extrusion_width"));
		optgroup->append_single_option_line(get_option_("first_layer_extrusion_width"));
		optgroup->append_single_option_line(get_option_("perimeter_extrusion_width"));
		optgroup->append_single_option_line(get_option_("external_perimeter_extrusion_width"));
		optgroup->append_single_option_line(get_option_("infill_extrusion_width"));
		optgroup->append_single_option_line(get_option_("solid_infill_extrusion_width"));
		optgroup->append_single_option_line(get_option_("top_infill_extrusion_width"));
		optgroup->append_single_option_line(get_option_("support_material_extrusion_width"));

		optgroup = page->new_optgroup("Overlap");
		optgroup->append_single_option_line(get_option_("infill_overlap"));

		optgroup = page->new_optgroup("Flow");
 		optgroup->append_single_option_line(get_option_("bridge_flow_ratio"));

		optgroup = page->new_optgroup("Other");
 		optgroup->append_single_option_line(get_option_("clip_multipart_objects"));
		optgroup->append_single_option_line(get_option_("elefant_foot_compensation"));
		optgroup->append_single_option_line(get_option_("xy_size_compensation"));
//		#            optgroup->append_single_option_line(get_option_("threads"));
		optgroup->append_single_option_line(get_option_("resolution"));

	page = add_options_page("Output options", "page_white_go.png");
 		optgroup = page->new_optgroup("Sequential printing");
 		optgroup->append_single_option_line(get_option_("complete_objects"));
		line = Line{ "Extruder clearance (mm)", "" };
		Option option = get_option_("extruder_clearance_radius");
		option.opt.width = 60;
		line.append_option(option);
		option = get_option_("extruder_clearance_height");
		option.opt.width = 60;
		line.append_option(option);
		optgroup->append_line(line);

		optgroup = page->new_optgroup("Output file");
 		optgroup->append_single_option_line(get_option_("gcode_comments"));
		option = get_option_("output_filename_format");
		option.opt.full_width = true;
		optgroup->append_single_option_line(option);

		optgroup = page->new_optgroup("Post-processing scripts");	//! 			label_width = > 0,
		option = get_option_("post_process");
		option.opt.full_width = true;
		option.opt.height = 50;
		optgroup->append_single_option_line(option);

	page = add_options_page("Notes", "note.png");
		optgroup = page->new_optgroup("Notes");						
		option = get_option_("notes");
		option.opt.full_width = true;
		option.opt.height = 250;
		optgroup->append_single_option_line(option);

	page = add_options_page("Dependencies", "wrench.png");
 		optgroup = page->new_optgroup("Profile dependencies");
		line = Line{ "Compatible printers", "" };
		line.widget = compatible_printers_widget_; 
		optgroup->append_line(line);
}

//Regerenerate content of the page tree.
void CTab::rebuild_page_tree()
{
	Freeze();
	// get label of the currently selected item
	auto selected = treectrl_->GetItemText(treectrl_->GetSelection());
	auto rootItem = treectrl_->GetRootItem();
	treectrl_->DeleteChildren(rootItem);
	auto have_selection = 0;
	for (auto p : pages_)
	{
		auto itemId = treectrl_->AppendItem(rootItem, p->title(), p->iconID());
		if (p->title() == selected) {
			disable_tree_sel_changed_event_ = 1;
			treectrl_->SelectItem(itemId);
			disable_tree_sel_changed_event_ = 0;
			have_selection = 1;
		}
	}
	
	if (!have_selection) {
		// this is triggered on first load, so we don't disable the sel change event
		treectrl_->SelectItem(treectrl_->GetFirstVisibleItem());//! (treectrl->GetFirstChild(rootItem));
	}
	Thaw();
}

void CTab::OnTreeSelChange(wxTreeEvent& event)
{
	if (disable_tree_sel_changed_event_) return;
	CPage* page = nullptr;
	auto selection = treectrl_->GetItemText(treectrl_->GetSelection());
	for (auto p : pages_)
		if (p->title() == selection)
		{
			page = p.get();
			break;
		}
	if (page == nullptr) return;

	for (auto& el : pages_)
		el.get()->Hide();
	page->Show();
	hsizer_->Layout();
	Refresh();
}

void CTab::OnKeyDown(wxKeyEvent& event)
{
	event.GetKeyCode() == WXK_TAB ?
		treectrl_->Navigate(event.ShiftDown() ? wxNavigationKeyEvent::IsBackward : wxNavigationKeyEvent::IsForward) :
		event.Skip();
};

void CTab::save_preset(wxCommandEvent &event){};
void CTab::delete_preset(wxCommandEvent &event){};
void CTab::_toggle_show_hide_incompatible(wxCommandEvent &event){};

//	# Return a callback to create a Tab widget to mark the preferences as compatible / incompatible to the current printer.
wxSizer* CTab::compatible_printers_widget_(wxWindow* parent)
{
	auto checkbox /*= compatible_printers_checkbox*/ = new wxCheckBox(parent, wxID_ANY, "All");

	auto btn /*= compatible_printers_btn*/ = new wxButton(parent, wxID_ANY, "Set…", wxDefaultPosition, wxDefaultSize,
	wxBU_LEFT | wxBU_EXACTFIT);
//	btn->SetFont(GUI::small_font);
	btn->SetBitmap(wxBitmap(wxT("var\\printer_empty.png"), wxBITMAP_TYPE_PNG));

	auto sizer = new wxBoxSizer(wxHORIZONTAL);
	sizer->Add(checkbox, 0, wxALIGN_CENTER_VERTICAL);
	sizer->Add(btn, 0, wxALIGN_CENTER_VERTICAL);

	checkbox->Bind(wxEVT_CHECKBOX, ([=](wxCommandEvent e)
	{
		 btn->Enable(!checkbox->GetValue());
	// # All printers have been made compatible with this preset.
	//	 _load_key_value('compatible_printers', []) if checkbox->GetValue();
	}) );

	btn->Bind(wxEVT_BUTTON, ([=](wxCommandEvent e)
	{
		PresetCollection *prints = new PresetCollection(Preset::TYPE_PRINT, Preset::print_options());
		prints->preset(0).config.opt_string("print_settings_id", true);
		prints->preset(0).config.optptr("compatible_printers", true);
		DynamicPrintConfig config_ = prints->get_edited_preset().config;

		// # Collect names of non-default non-external printer profiles.
		PresetCollection *printers = new PresetCollection(Preset::TYPE_PRINTER, Preset::print_options());
		printers->preset(0).config.opt_string("print_settings_id", true);
		wxArrayString presets;
		for (size_t idx = 0; idx < printers->size(); ++idx)
		{
			Preset& preset = printers->preset(idx);
			if (!preset.is_default && !preset.is_external)
				presets.Add(preset.name);
		}

		auto dlg = new wxMultiChoiceDialog(parent,
		"Select the printers this profile is compatible with.",
		"Compatible printers",  presets);
		// # Collect and set indices of printers marked as compatible.
		wxArrayInt selections;
		auto *compatible_printers = dynamic_cast<const ConfigOptionStrings*>(config_.option("compatible_printers"));
		if (compatible_printers != nullptr || !compatible_printers->values.empty())
			for (auto preset_name : compatible_printers->values)
				for (size_t idx = 0; idx < presets.GetCount(); ++idx)
					if (presets[idx].compare(preset_name) == 0)
					{
						selections.Add(idx);
						break;
					}
		dlg->SetSelections(selections);
		// # Show the dialog.
		if (dlg->ShowModal() == wxID_OK) {
			selections.Clear();
			selections = dlg->GetSelections();
			std::vector<std::string> value;
			for (auto idx : selections)
				value.push_back(presets[idx].ToStdString());
			if (/*!@$value*/value.empty()) {
				checkbox->SetValue(1);
				btn->Disable();
			}
		// # All printers have been made compatible with this preset.
		// _load_key_value('compatible_printers', $value);
		}
	}));
	return sizer; 
}

void CTab::load_key_value_(std::string opt_key, std::vector<std::string> value)
{
	// # To be called by custom widgets, load a value into a config,
	// # update the preset selection boxes (the dirty flags)
	// $self->{config}->set($opt_key, $value);
	// # Mark the print & filament enabled if they are compatible with the currently selected preset.
	if (opt_key.compare("compatible_printers")==0) {
	// wxTheApp->{preset_bundle}->update_compatible_with_printer(0);
	// $self->{presets}->update_tab_ui($self->{presets_choice}, $self->{show_incompatible_presets});
	// } else {
	// $self->{presets}->update_dirty_ui($self->{presets_choice});
	}
	// $self->_on_presets_changed;
	// $self->_update;
}

// package Slic3r::GUI::Tab::Page;
ConfigOptionsGroupShp CPage::new_optgroup(std::string title, size_t label_width /*= 0*/)
{
	//! config_ have to be "right"
	ConfigOptionsGroupShp optgroup = std::make_shared<ConfigOptionsGroup>(this, title, config_);
	if (label_width != 0)
		optgroup->label_width = label_width;

//         on_change       => sub {
//             my ($opt_key, $value) = @_;
//             wxTheApp->CallAfter(sub {
//                 $self->GetParent->update_dirty;
//                 $self->GetParent->_on_value_change($opt_key, $value);
//             });
//         },

	vsizer()->Add(optgroup->sizer, 0, wxEXPAND | wxALL, 10);
	optgroups.push_back(optgroup);

	return optgroup;
}

} // GUI
} // Slic3r