/*
 * Verrückte Turing-Maschinen — A turing complete game
 * Copyright (C) 2016 Christian Fraß <vidofnir@folksprak.org>
 * 
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 * 
 * 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 General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <https://www.gnu.org/licenses/>.
 */

module mod_vtm_manifestation
	{
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		export class klasse_web_partie
			extends klasse_manifestation<mod_vtm_aufbau.klasse_partie>
			{
								
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				private bereich : Element;
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public constructor(aufbau : mod_vtm_aufbau.klasse_partie, bereich : Element)
					{
						super(aufbau);
						this.bereich = bereich;
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 * @implementation
				 */
				public darstellen() : void
					{
						let knoten_rahmen = function () : mod_vtm_helfer.schnittstelle_xmlknoten
							{
								return (
									svg_pfad
										(
											mod_vtm_helfer.sequenz(6).map(i => mod_vtm_helfer.vektor_polar(((i+0.5)/6.0) * (2*Math.PI), 0.5)),
											true,
											{
												"class": "rahmen"
											}
										)
								);
							}
						;
						let kinder_welt : Array<mod_vtm_helfer.schnittstelle_xmlknoten> = [];
						// felder
						{
							let kinder_felder : Array<mod_vtm_helfer.schnittstelle_xmlknoten> = [];
							this.aufbau.welt_lesen().felder_lesen().forEach
								(
									({"stelle": stelle, "aktor": aktor}) =>
										{
											let kinder_feld : Array<mod_vtm_helfer.schnittstelle_xmlknoten> = [];
											     if (aktor instanceof mod_vtm_aufbau.klasse_erzeuger)
												{
													kinder_feld.push(knoten_rahmen());
													let erzeuger : mod_vtm_aufbau.klasse_erzeuger = <mod_vtm_aufbau.klasse_erzeuger>(aktor);
													let richtung : mod_vtm_aufbau.typ_richtung = erzeuger.richtung_lesen();
													let knoten_pfeil : mod_vtm_helfer.schnittstelle_xmlknoten = (
														new mod_vtm_helfer.klasse_xmlknoten_normal
															(
																"path",
																{
																	"d": svg_form_pfeil,
																	"class": (
																		[
																			"pfeil",
																			"erzeuger",
																		].join(" ")
																	),
																	"transform": (
																		[
																			"rotate(" + ((richtung/6.0) * 360).toFixed(svg_float_praezission) + ")",
																			"translate(-0.2, 0)",
																			"scale(0.12)",
																		].join(" ")
																	),
																}
															)
													);
													kinder_feld.push(knoten_pfeil);
												}
											else if (aktor instanceof mod_vtm_aufbau.klasse_befoerderer)
												{
													kinder_feld.push(knoten_rahmen());
													let befoerderer : mod_vtm_aufbau.klasse_befoerderer = <mod_vtm_aufbau.klasse_befoerderer>(aktor);
													let richtung : mod_vtm_aufbau.typ_richtung = befoerderer.richtung_lesen();
													let knoten_pfeil : mod_vtm_helfer.schnittstelle_xmlknoten = (
														new mod_vtm_helfer.klasse_xmlknoten_normal
															(
																"path",
																{
																	"d": svg_form_pfeil,
																	"class": (
																		[
																			"pfeil",
																			"neutral",
																		].join(" ")
																	),
																	"transform": (
																		[
																			"rotate(" + ((richtung/6.0) * 360).toFixed(svg_float_praezission) + ")",
																			"translate(-0.2, 0)",
																			"scale(0.12)",
																		].join(" ")
																	),
																}
															)
													);
													kinder_feld.push(knoten_pfeil);
												}
											else if (aktor instanceof mod_vtm_aufbau.klasse_schreiber)
												{
													kinder_feld.push(knoten_rahmen());
													let schreiber : mod_vtm_aufbau.klasse_schreiber = <mod_vtm_aufbau.klasse_schreiber>(aktor);
													let richtung : mod_vtm_aufbau.typ_richtung = schreiber.richtung_lesen();
													let symbol : mod_vtm_aufbau.typ_symbol = schreiber.symbol_lesen();
													let knoten_pfeil : mod_vtm_helfer.schnittstelle_xmlknoten = (
														new mod_vtm_helfer.klasse_xmlknoten_normal
															(
																"path",
																{
																	"d": svg_form_pfeil,
																	"class": (
																		[
																			"pfeil",
																			"symbol_" + symbol.toFixed(0),
																		].join(" ")
																	),
																	"transform": (
																		[
																			"rotate(" + ((richtung/6.0) * 360).toFixed(svg_float_praezission) + ")",
																			"translate(-0.2, 0)",
																			"scale(0.12)",
																		].join(" ")
																	),
																}
															)
													);
													kinder_feld.push(knoten_pfeil);
												}
											else if (aktor instanceof mod_vtm_aufbau.klasse_leser)
												{
													kinder_feld.push(knoten_rahmen());
													let leser : mod_vtm_aufbau.klasse_leser = <mod_vtm_aufbau.klasse_leser>(aktor);
													let richtung : mod_vtm_aufbau.typ_richtung = leser.richtung_lesen();
													let ausgaenge : Array<{summand : mod_vtm_aufbau.typ_richtung, symbol : schnittstelle_fehlermonade<mod_vtm_aufbau.typ_symbol>;}> =
														[
															{
																"summand": 0,
																"symbol": new klasse_nichts<mod_vtm_aufbau.typ_symbol>(),
															},
															{
																"summand": +2,
																"symbol": new klasse_schlicht<mod_vtm_aufbau.typ_symbol>(leser.symbol_links_lesen()),
															},
															{
																"summand": -2,
																"symbol": new klasse_schlicht<mod_vtm_aufbau.typ_symbol>(leser.symbol_rechts_lesen()),
															},
														]
													;
													ausgaenge.forEach
														(
															eintrag =>
																{
																	let winkel : float = ((mod_vtm_aufbau.richtung_addieren(richtung, eintrag.summand) / 6.0) * 360);
																	let knoten_pfeil : mod_vtm_helfer.schnittstelle_xmlknoten = (
																		new mod_vtm_helfer.klasse_xmlknoten_normal
																			(
																				"path",
																				{
																					"d": svg_form_pfeil,
																					"class": (
																						[
																							"pfeil",
																							(
																								eintrag.symbol.ist_schlicht()
																								? "symbol_" + eintrag.symbol.lesen().toFixed(0)
																								: "neutral"
																							),
																						].join(" ")
																					),
																					"transform": (
																						[
																							
																							"rotate(" + winkel.toFixed(svg_float_praezission) + ")",
																							"translate(0, 0)",
																							"scale(0.1)",
																						].join(" ")
																					),
																				}
																			)
																	);
																	kinder_feld.push(knoten_pfeil);
																}
														)
													;
												}
											else if (aktor instanceof mod_vtm_aufbau.klasse_verwerfer)
												{
													kinder_feld.push(knoten_rahmen());
													let verwerfer : mod_vtm_aufbau.klasse_annehmer = <mod_vtm_aufbau.klasse_verwerfer>(aktor);
													let knoten_kreis : mod_vtm_helfer.schnittstelle_xmlknoten = (
														new mod_vtm_helfer.klasse_xmlknoten_normal
															(
																"circle",
																{
																	"cx": (0.0).toFixed(svg_float_praezission),
																	"cy": (0.0).toFixed(svg_float_praezission),
																	"r": (0.25).toFixed(svg_float_praezission),
																	"class": (
																		[
																			"kreis",
																			"negativ",
																		].join(" ")
																	),
																}
															)
													);
													kinder_feld.push(knoten_kreis);
												}
											else if (aktor instanceof mod_vtm_aufbau.klasse_annehmer)
												{
													kinder_feld.push(knoten_rahmen());
													let annehmer : mod_vtm_aufbau.klasse_annehmer = <mod_vtm_aufbau.klasse_annehmer>(aktor);
													let knoten_kreis : mod_vtm_helfer.schnittstelle_xmlknoten = (
														new mod_vtm_helfer.klasse_xmlknoten_normal
															(
																"circle",
																{
																	"cx": (0.0).toFixed(svg_float_praezission),
																	"cy": (0.0).toFixed(svg_float_praezission),
																	"r": (0.25).toFixed(svg_float_praezission),
																	"class": (
																		[
																			"kreis",
																			"positiv",
																		].join(" ")
																	),
																}
															)
													);
													kinder_feld.push(knoten_kreis);
												}
											else
												{
													let meldung : string = ("unbehandelter Aktor-Typ");
													throw (new Error(meldung));
												}
											let position : typ_position = position_von_stelle(stelle);
											let knoten_feld : mod_vtm_helfer.schnittstelle_xmlknoten = (
												new mod_vtm_helfer.klasse_xmlknoten_normal
													(
														"g",
														{
															"class": "feld",
															"rel": mod_vtm_aufbau.stelle_hash(stelle),
															"transform": ("translate(" + position.x.toFixed(svg_float_praezission) + ", " + position.y.toFixed(svg_float_praezission) + ")"),
														},
														kinder_feld
													)
											);
											kinder_felder.push(knoten_feld);
										}
								)
							;
							let knoten_felder : mod_vtm_helfer.schnittstelle_xmlknoten = (
								new mod_vtm_helfer.klasse_xmlknoten_normal
									(
										"g",
										{
											"class": "felder",
										},
										kinder_felder
									)
								
							);
							kinder_welt.push(knoten_felder);
						}
						// Figur
						{
							let figur_ : schnittstelle_fehlermonade<mod_vtm_aufbau.klasse_figur> = this.aufbau.figur_lesen();
							if (figur_.ist_schlicht())
								{
									let figur : mod_vtm_aufbau.klasse_figur = figur_.lesen();
									let kinder_figur : Array<mod_vtm_helfer.schnittstelle_xmlknoten> = [];
									// Stein
									{
										let knoten_stein : mod_vtm_helfer.schnittstelle_xmlknoten = (
											new mod_vtm_helfer.klasse_xmlknoten_normal
												(
													"circle",
													{
														"cx": (0.0).toFixed(svg_float_praezission),
														"cy": (0.0).toFixed(svg_float_praezission),
														"r": (0.125).toFixed(svg_float_praezission),
														"class": "stein",
													}
												)
										);
										kinder_figur.push(knoten_stein);
									}
									// Band
									{
										let band : Array<mod_vtm_aufbau.typ_symbol> = figur.band_lesen();
										let kinder_band : Array<mod_vtm_helfer.schnittstelle_xmlknoten> = [];
										band.reduceRight
											(
												(dummy, symbol, index) =>
													{
														let r : float = 0.06125;
														let x : float = (+0.1+(2*r*1.25)*index);
														let y : float = (-0.1);
														let knoten_eintrag : mod_vtm_helfer.schnittstelle_xmlknoten = (
															new mod_vtm_helfer.klasse_xmlknoten_normal
																(
																	"circle",
																	{
																		"cx": x.toFixed(svg_float_praezission),
																		"cy": y.toFixed(svg_float_praezission),
																		"r": r.toFixed(svg_float_praezission),
																		/*
																		"x": (x-r).toFixed(svg_float_praezission),
																		"y": (y-r).toFixed(svg_float_praezission),
																		"width": (2*r).toFixed(svg_float_praezission),
																		"height": (2*r).toFixed(svg_float_praezission),
																		 */
																		"class": (
																			[
																				"eintrag",
																				"symbol_" + symbol.toFixed(0),
																			].join(" ")
																		),
																	}
																)
														);
														kinder_band.push(knoten_eintrag);
														return null;
													}
												,
												null
											)
										;
										let knoten_band = (
											new mod_vtm_helfer.klasse_xmlknoten_normal
												(
													"g",
													{
														"class": "band",
													},
													kinder_band
												)
										);
										kinder_figur.push(knoten_band);
									}
									let position : typ_position = position_von_stelle(figur.stelle_lesen());
									let knoten_figur = (
										new mod_vtm_helfer.klasse_xmlknoten_normal
											(
												"g",
												{
													"class": "figur",
													"transform": ("translate(" + position.x.toFixed(svg_float_praezission) + "," + position.y.toFixed(svg_float_praezission) + ")"),
												},
												kinder_figur
											)
									);
									kinder_welt.push(knoten_figur);
								}
							else
								{
									// nichts tun
								}
						}
						let knoten_welt : mod_vtm_helfer.schnittstelle_xmlknoten = (
							new mod_vtm_helfer.klasse_xmlknoten_normal
								(
									"g",
									{
										"class": "welt",
									},
									kinder_welt
								)
						);
						let knoten_svg : mod_vtm_helfer.schnittstelle_xmlknoten = mod_vtm_manifestation.svg_wurzel
							(
								-4, -4,
								+4, +4,
								800, 800,
								[knoten_welt]
							)
						;
						this.bereich.innerHTML = knoten_svg.darstellen();
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 * @implementation
				 */
				public binden() : void
					{
						// Links-Klick
						this.bereich.addEventListener
							(
								"click",
								event =>
									{
										event.preventDefault();
										let dom_feld : Element = event.target["closest"](".feld");
										if (dom_feld == null)
											{
												console.info("-- kein Feld");
											}
										else
											{
												let rel : string = dom_feld.getAttribute("rel")
												let stelle : mod_vtm_aufbau.typ_stelle = mod_vtm_aufbau.stelle_von_hash(rel);
												this.aufbau.welt_lesen().feld_wechseln(stelle);
												this.darstellen();
											}
									}
							)
						;
						// Rechts-Klick
						this.bereich.addEventListener
							(
								"contextmenu",
								event =>
									{
										event.preventDefault();
										let dom_feld : Element = event.target["closest"](".feld");
										if (dom_feld == null)
											{
												console.info("-- kein Feld");
											}
										else
											{
												let rel : string = dom_feld.getAttribute("rel")
												let stelle : mod_vtm_aufbau.typ_stelle = mod_vtm_aufbau.stelle_von_hash(rel);
												this.aufbau.welt_lesen().feld_drehen(stelle);
												this.darstellen();
											}
									}
							)
						;
					}
				
			}
		
	}