use {
	gtk4 :: {
		* ,
		Align :: * ,
		Orientation :: * ,
		gdk :: * ,
		gio :: * ,
		pango :: { * , Weight :: * } ,
		prelude :: * ,
	} ,
	std :: { cell :: * , iter :: * , path :: { Path , PathBuf } } ,
} ;

use crate :: ui :: { collatable_container :: * , component :: * } ;



pub struct CollatedFilmsGrid {
	film_widget_pairs : RefCell < Vec < ( FilmOverview , Box ) > > ,
	grid_widget : FlowBox ,
}
pub struct CollatedSeriesGrid {
	series_widget_pairs : RefCell < Vec < ( SeriesOverview , Box ) > > ,
	grid_widget : FlowBox ,
}

impl CollatedFilmsGrid {
	pub fn new () -> Self {
		let grid_widget = flow_box ! (
			@ orientation : Horizontal ;
			@ homogeneous : true ;
			@ selection_mode : SelectionMode :: None ;
		) ;
		let film_widget_pairs = RefCell :: new ( vec ! () ) ;

		Self { film_widget_pairs , grid_widget }
	}

	pub async fn set_films ( & self , films : Vec <FilmOverview> , sorting : FilmsSorting ) {
		let mut widgets = Vec :: new () ;
		for film in films . as_slice () {
			widgets . push ( create_film_entry (film) . await ) ;
		}
		* self . film_widget_pairs . borrow_mut () = zip ( films , widgets )
			. collect () ;

		for ( _ , film_widget ) in self . sort_film_widget_pairs (sorting) {
			self . grid_widget . append ( & film_widget ) ;
		}
	}

	pub fn set_sorting ( & self , sorting : FilmsSorting ) {
		self . grid_widget . remove_all () ;

		for ( _ , film_widget ) in self . sort_film_widget_pairs (sorting) {
			self . grid_widget . append ( & film_widget ) ;
		}
	}

	fn sort_film_widget_pairs ( & self , sorting : FilmsSorting ) -> Vec < ( FilmOverview , Box ) > {
		let mut sorted = Vec :: from (
			self . film_widget_pairs . borrow () . as_slice () ) ;

		sorted . sort_by ( | ( film_1 , _ ) , ( film_2 , _ ) | match sorting . property {
			FilmProperty :: Name =>
				film_1 . name . cmp ( & film_2 . name ) ,
			FilmProperty :: ReleaseDate =>
				film_1 . release_date . cmp ( & film_2 . release_date ) ,
			FilmProperty :: Runtime =>
				film_1 . runtime_minutes . cmp ( & film_2 . runtime_minutes ) ,
		} ) ;
		if sorting . direction == SortingDirection :: Descending { sorted . reverse () }

		// See it, say it, ...
		sorted
	}
}
impl CollatedSeriesGrid {
	pub fn new () -> Self {
		let grid_widget = flow_box ! (
			@ orientation : Horizontal ;
			@ homogeneous : true ;
			@ selection_mode : SelectionMode :: None ;
		) ;
		let series_widget_pairs = RefCell :: new ( vec ! () ) ;

		Self { series_widget_pairs , grid_widget }
	}

	pub async fn set_series ( & self , series : Vec <SeriesOverview> , sorting : SeriesSorting ) {
		let mut widgets = Vec :: new () ;
		for series in series . as_slice () {
			widgets . push ( create_series_entry (series) . await ) ;
		}
		* self . series_widget_pairs . borrow_mut () = zip ( series , widgets )
			. collect () ;

		for ( _ , series_widget ) in self . sort_series_widget_pairs (sorting) {
			self . grid_widget . append ( & series_widget ) ;
		}
	}

	pub fn set_sorting ( & self , sorting : SeriesSorting ) {
		self . grid_widget . remove_all () ;

		for ( _ , series_widget ) in self . sort_series_widget_pairs (sorting) {
			self . grid_widget . append ( & series_widget ) ;
		}
	}

	fn sort_series_widget_pairs ( & self , sorting : SeriesSorting ) -> Vec < ( SeriesOverview , Box ) > {
		let mut sorted = Vec :: from (
			self . series_widget_pairs . borrow () . as_slice () ) ;

		sorted . sort_by ( | ( series_1 , _ ) , ( series_2 , _ ) | match sorting . property {
			SeriesProperty :: Name =>
				series_1 . name . cmp ( & series_2 . name ) ,
			SeriesProperty :: FirstReleaseDate =>
				todo ! () ,
		} ) ;
		if sorting . direction == SortingDirection :: Descending { sorted . reverse () }

		// See it, say it, ...
		sorted
	}
}

impl Component <FlowBox> for CollatedFilmsGrid {
	fn get_widget ( & self ) -> & FlowBox { & self . grid_widget }
}
impl Component <FlowBox> for CollatedSeriesGrid {
	fn get_widget ( & self ) -> & FlowBox { & self . grid_widget }
}

pub async fn create_film_entry ( film : & FilmOverview ) -> Box {
	create_collection_item (
		film . name . as_str () ,
		film . original_name . as_deref () ,
		film . poster_file_path . as_deref () ,
		& create_film_details (film) ,
	) . await
}
pub async fn create_series_entry ( series : & SeriesOverview ) -> Box {
	create_collection_item (
		series . name . as_str () ,
		series . original_name . as_deref () ,
		series . poster_file_path . as_deref () ,
		& create_series_details (series) ,
	) . await
}

async fn create_collection_item (
	name : & str ,
	original_name : Option < & str > ,
	poster_file_path : Option < & Path > ,
	details_widget : & Box ,
) -> Box {
	let container = Box :: builder ()
		. orientation (Vertical)
		. margin_top (20)
		. margin_bottom (20)
		. build () ;

	if let Some (poster_file_path) = poster_file_path {
		let poster_file_path = PathBuf :: from (poster_file_path) ;  // God forbid `Path` would work with `clone ! ()`
		let poster_texture = spawn_blocking ( move ||
			Texture :: from_filename (poster_file_path) . unwrap ()
		) . await . unwrap () ;

		container . append (
			& Image :: builder ()
				. paintable ( & poster_texture )
				. width_request (300)
				. height_request (300)
				. margin_bottom (10)
				. build ()
		) ;
	}

	container . append (
		& Label :: builder ()
			. label (name)
			. attributes ( & pango_attributes ! ( @ scale : SCALE_LARGE ; @ weight : Bold ; ) )
			. justify ( Justification :: Center )
			. wrap (true)
			. max_width_chars (1)  // Not the actual limit, used instead to wrap more aggressively
			. build ()
	) ;

	if let Some (original_name) = original_name {
		container . append (
			& Label :: builder ()
				. label (original_name)
				. justify ( Justification :: Center )
				. wrap (true)
				. max_width_chars (1)  // Not the actual limit, used instead to wrap more aggressively
				. build ()
		) ;
	}

	container . append (details_widget) ;

	container
}

fn create_film_details ( film : & FilmOverview ) -> Box {
	g_box ! (
		@ orientation : Horizontal ;
		@ halign : Center ;
		@ spacing : 20 ;
		label ! ( film . release_date . as_str () ) ,
		label ! ( format ! ( "{}m" , film . runtime_minutes ) . as_str () ) ,
	)
}
fn create_series_details ( series : & SeriesOverview ) -> Box {
	g_box ! (
		@ orientation : Horizontal ;
		@ halign : Center ;
		@ spacing : 20 ;
		label ! ( series . first_release_date . as_str () ) ,
	)
}