/*
 * 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_aufbau
	{
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		export type typ_aufgabe = typ_komplex<Object>;
		
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		var _liste : Array<typ_aufgabe> = [];
		
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		export function aufgabe_id
			(
				aufgabe : typ_aufgabe
			)
			: string
			{
				return (
					fallunterscheidung<string>
						(
							aufgabe,
							{
								"akzeptoraufgabe": (angaben) => akzeptoraufgabe_id(angaben),
								"transduktoraufgabe": (angaben) => transduktoraufgabe_id(angaben),
							}
						)
				);
			}
		
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		export function aufgabe_titel
			(
				aufgabe : typ_aufgabe
			)
			: string
			{
				return (
					fallunterscheidung<string>
						(
							aufgabe,
							{
								"akzeptoraufgabe": (angaben) => akzeptoraufgabe_titel(angaben),
								"transduktoraufgabe": (angaben) => transduktoraufgabe_titel(angaben),
							}
						)
				);
			}
		
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		export function aufgabe_text
			(
				aufgabe : typ_aufgabe
			)
			: string
			{
				return (
					fallunterscheidung<string>
						(
							aufgabe,
							{
								"akzeptoraufgabe": (angaben) => akzeptoraufgabe_text(angaben),
								"transduktoraufgabe": (angaben) => transduktoraufgabe_text(angaben),
							}
						)
				);
			}
		
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		export function aufgabe_tests
			(
				aufgabe : typ_aufgabe
			)
			: Array<typ_test>
			{
				return (
					fallunterscheidung<Array<typ_test>>
						(
							aufgabe,
							{
								"akzeptoraufgabe": (angaben) => (
									akzeptoraufgabe_tests(angaben)
									.map(angaben_ => ({"art": "akzeptortest", "angaben": angaben_}))
								),
								"transduktoraufgabe": (angaben) => (
									transduktoraufgabe_tests(angaben)
									.map(angaben_ => ({"art": "transduktortest", "angaben": angaben_}))
								),
							}
						)
				);
			}
		
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		export function aufgabe_importieren(aufgabe_roh : any) : typ_aufgabe
			{
				switch (aufgabe_roh["art"])
					{
						case "akzeptor":
							{
								return {
									"art": "akzeptoraufgabe",
									"angaben": (
										akzeptoraufgabe_erstellen
											(
												aufgabe_roh["id"],
												aufgabe_roh["parameter"]["titel"],
												aufgabe_roh["parameter"]["text"],
												aufgabe_roh["parameter"]["tests"].map
													(
														test_roh => (
															akzeptortest_erstellen
																(
																	test_roh["eingabe"],
																	test_roh["annehmen"]
																)
														)
													)
											)
									)
								};
								break;
							}
						case "transduktor":
							{
								return {
									"art": "transduktoraufgabe",
									"angaben": (
										transduktoraufgabe_erstellen
											(
												aufgabe_roh["id"],
												aufgabe_roh["parameter"]["titel"],
												aufgabe_roh["parameter"]["text"],
												aufgabe_roh["parameter"]["tests"].map
													(
														test_roh => (
															transduktortest_erstellen
																(
																	test_roh["eingabe"],
																	test_roh["ausgabe"]
																)
														)
													)
											)
									)
								};
								break;
							}
						default:
							{
								let meldung : string = "unbehandelte Art";
								throw (new Error(meldung));
								break;
							}
					}
			}
		
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		export function aufgabe_registrieren(aufgabe : typ_aufgabe) : void
			{
				_liste.push(aufgabe);
			}
		
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		export function aufgabe_holen(index : int) : typ_aufgabe
			{
				return _liste[index];
			}
		
	}