/**
 * Relational pipes
 * Copyright © 2018 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/>.
 */
#pragma once

#include <memory>
#include <string>
#include <vector>
#include <iostream>
#include <sstream>
#include <locale>
#include <codecvt>
#include <regex>

#include <relpipe/reader/typedefs.h>
#include <relpipe/reader/TypeId.h>
#include <relpipe/reader/handlers/RelationalReaderStringHandler.h>
#include <relpipe/reader/handlers/AttributeMetadata.h>

#include <relpipe/writer/Factory.h>

#include <relpipe/cli/RelpipeCLIException.h>

#include "Configuration.h"

namespace relpipe {
namespace tr {
namespace sed {

using namespace std;
using namespace relpipe;
using namespace relpipe::reader;
using namespace relpipe::reader::handlers;

class SedHandler : public RelationalReaderStringHandler {
private:
	shared_ptr<writer::RelationalWriter> relationalWriter;
	Configuration configuration;
	RelationConfiguration* currentFilter = nullptr;

	std::vector<std::vector<RewriteRule*>> currentRules;
	integer_t currentAttributeIndex = 0;

public:

	SedHandler(shared_ptr<writer::RelationalWriter> relationalWriter, Configuration configuration) : relationalWriter(relationalWriter), configuration(configuration) {
	}

	void startRelation(string_t name, vector<AttributeMetadata> attributes) override {

		std::vector<RewriteRule*> attributeRenamingRules;
		for (RelationConfiguration& rc : configuration.relationConfigurations) {
			if (std::regex_match(name, rc.relationPattern) ^ rc.invertMatch[ENTITY::RELATION]) {
				for (RewriteRule& rule : rc.rules) if (rule.modify == ENTITY::ATTRIBUTE) attributeRenamingRules.push_back(&rule);
			}
		}


		// TODO: move to a reusable method (or use same metadata on both reader and writer side?)
		vector<writer::AttributeMetadata> writerMetadata;
		for (AttributeMetadata readerMetadata : attributes) {
			string_t newName = readerMetadata.getAttributeName();
			for (RewriteRule* rule : attributeRenamingRules)
				if (std::regex_match(readerMetadata.getAttributeName(), rule->attributePattern) ^ rule->invertMatch[ENTITY::ATTRIBUTE]) // TODO: optionally: regex_match(newName, rule->attributePattern) ?
					newName = std::regex_replace(newName, rule->valuePattern, rule->replacement);
			writerMetadata.push_back({newName, relationalWriter->toTypeId(readerMetadata.getTypeName())});
		}


		currentRules.resize(attributes.size());
		for (RelationConfiguration& rc : configuration.relationConfigurations) {
			if (std::regex_match(name, rc.relationPattern) ^ rc.invertMatch[ENTITY::RELATION]) {
				for (int i = 0; i < currentRules.size(); i++) {
					for (RewriteRule& rule : rc.rules) {
						if (rule.modify == ENTITY::VALUE && std::regex_match(attributes[i].getAttributeName(), rule.attributePattern) ^ rule.invertMatch[ENTITY::ATTRIBUTE]) currentRules[i].push_back(&rule);
					}
				}
			}
		}

		for (RelationConfiguration& rc : configuration.relationConfigurations) {
			if (std::regex_match(name, rc.relationPattern) ^ rc.invertMatch[ENTITY::RELATION]) {
				for (RewriteRule rule : rc.rules) if (rule.modify == ENTITY::RELATION) name = std::regex_replace(name, rule.valuePattern, rule.replacement);
			}
		}

		relationalWriter->startRelation(name, writerMetadata, true);
	}

	void attribute(const string_t& value) override {
		string_t newValue = value;

		for (RewriteRule* rule : currentRules[currentAttributeIndex]) {
			if (rule && !rule->invertMatch[ENTITY::VALUE]) newValue = std::regex_replace(newValue, rule->valuePattern, rule->replacement);
			else if (rule && !std::regex_match(value, rule->valuePattern)) newValue = rule->replacement;
		}

		relationalWriter->writeAttribute(newValue);

		currentAttributeIndex++;
		currentAttributeIndex = currentAttributeIndex % currentRules.size();
	}

	void endOfPipe() {

	}

};

}
}
}