/**

 * Relational pipes

 * Copyright © 2019 František Kučera (Frantovo.cz, GlobalCode.info)

 *

 * 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, version 3 of the License.

 *

 * 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 <http://www.gnu.org/licenses/>.

 */

#include <cstdio>

#include <cstdlib>

#include <memory>

#include <relpipe/cli/CLI.h>

#include <relpipe/cli/RelpipeCLIException.h>

#include <relpipe/reader/Factory.h>

#include <relpipe/reader/RelationalReader.h>

#include <relpipe/reader/RelpipeReaderException.h>

#include <relpipe/writer/RelationalWriter.h>

#include <relpipe/writer/RelpipeWriterException.h>

#include <relpipe/writer/Factory.h>

#include <relpipe/writer/TypeId.h>

#include "SchemeHandler.h"

#include "CLIParser.h"

using namespace relpipe::cli;

using namespace relpipe::tr::scheme;

static void relpipeMain(void *closure, int argc, char **argv) {

	setlocale(LC_ALL, "");

	CLI::untieStdIO();

	CLI cli(argc, argv);

	int resultCode = CLI::EXIT_CODE_UNEXPECTED_ERROR;

	try {

		CLIParser cliParser;

		Configuration configuration = cliParser.parse(cli.arguments());

		std::shared_ptr<reader::RelationalReader> reader(reader::Factory::create(std::cin));

		std::shared_ptr<writer::RelationalWriter> writer(writer::Factory::create(std::cout));

		SchemeHandler handler(writer.get(), configuration);

		reader->addHandler(&handler);

		reader->process();

		resultCode = CLI::EXIT_CODE_SUCCESS;

	} catch (RelpipeCLIException& e) {

		fwprintf(stderr, L"Debug: Input stream: eof=%ls, lastRead=%d\n", (cin.eof() ? L"true" : L"false"), cin.gcount());

		resultCode = e.getExitCode();

	} catch (RelpipeReaderException& e) {

		fwprintf(stderr, L"Debug: Input stream: eof=%ls, lastRead=%d\n", (cin.eof() ? L"true" : L"false"), cin.gcount());

		resultCode = CLI::EXIT_CODE_DATA_ERROR;

	} catch (SchemeException& e) {

		fwprintf(stderr, L"Debug: Input stream: eof=%ls, lastRead=%d\n", (cin.eof() ? L"true" : L"false"), cin.gcount());

		resultCode = CLI::EXIT_CODE_UNEXPECTED_ERROR;

	}

	exit(resultCode);

}

int main(int argc, char**argv) {

	scm_boot_guile(argc, argv, relpipeMain, nullptr);

	return 222; // never reached – see exit(resultCode) above

}