/*
 * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270  e X3270
 * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a
 * aplicativos mainframe. Registro no INPI sob o nome G3270.
 *
 * Copyright (C) <2008> <Banco do Brasil S.A.>
 *
 * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob
 * os termos da GPL v.2 - Licença Pública Geral  GNU,  conforme  publicado  pela
 * Free Software Foundation.
 *
 * Este programa é distribuído na expectativa de  ser  útil,  mas  SEM  QUALQUER
 * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou  de  ADEQUAÇÃO
 * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para
 * obter mais detalhes.
 *
 * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este
 * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin
 * St, Fifth Floor, Boston, MA  02110-1301  USA
 *
 * Este programa está nomeado como - e possui - linhas de código.
 *
 * Contatos:
 *
 * perry.werneck@gmail.com	(Alexandre Perry de Souza Werneck)
 * erico.mendonca@gmail.com	(Erico Mascarenhas Mendonça)
 *
 */

/**
 * @file src/core/abstract.cc
 *
 * @brief Implements abstract session object.
 *
 * @author perry.werneck@gmail.com
 *
 */

 #include <ipc-client-internals.h>
 #include <cstring>


/*---[ Implement ]----------------------------------------------------------------------------------*/

 namespace TN3270 {

	Abstract::Session::Session() {

#ifdef HAVE_ICONV
		this->converter.local	= (iconv_t) (-1);
		this->converter.host	= (iconv_t) (-1);
#else
		this->converter = nullptr;
#endif

	}

	Abstract::Session::~Session() {

#ifdef HAVE_ICONV

		if(this->converter.local != (iconv_t) (-1))
			iconv_close(this->converter.local);

		if(this->converter.host != (iconv_t) (-1))
			iconv_close(this->converter.host);

#else

		if(converter) {
			lib3270_iconv_free(converter);
			converter = nullptr;
		}

#endif

	}

	/// @brief Setup charsets
	void Abstract::Session::setCharSet(const char *remote, const char *local) {

		debug("Charsets: remote=",remote," local=",local);

		if(!local) {

			// TODO: Detect the current value (maybee something like g_charset)
#ifdef _WIN32
			local = "CP1252";
#else
			local = "UTF-8";
#endif // _WIN32

		}

#ifdef HAVE_ICONV

		if(this->converter.local != (iconv_t) (-1))
			iconv_close(converter.local);

		if(this->converter.host != (iconv_t) (-1))
			iconv_close(converter.host);

		if(remote && strcmp(local,remote)) {

			// Local and remote charsets aren't the same, setup conversion
			converter.local	= iconv_open(local, remote);
			converter.host	= iconv_open(remote,local);

		} else {
			// Same charset, doesn't convert
			converter.local = converter.host = (iconv_t)(-1);
		}

#else

		if(converter)
			lib3270_iconv_free(converter);

		converter = lib3270_iconv_new(remote,local);

		debug("lib3270_iconv_new(",remote,",",local,"=",(void *) converter);

#endif

	}

	/// @brief Converte charset.
#ifdef HAVE_ICONV

	std::string Abstract::Session::convertCharset(iconv_t &converter, const char * str, int length) {

		std::string rc;

		if(length < 0)
			length = (int) strlen(str);

		if(length && converter != (iconv_t)(-1)) {

			size_t				  in		= length;
			size_t				  out 		= (length << 1);
			char				* ptr;
			char				* outBuffer = (char *) malloc(out);
			ICONV_CONST	char	* inBuffer	= (ICONV_CONST char *) str;

			memset(ptr=outBuffer,0,out);

			iconv(converter,NULL,NULL,NULL,NULL);	// Reset state

			if(iconv(converter,&inBuffer,&in,&ptr,&out) != ((size_t) -1))
				rc.assign(outBuffer);

			free(outBuffer);

		} else {
			rc.assign(str);
		}


		return rc;
	}
#endif // HAVE_ICONV

	/// @brief Converte string recebida do host para o charset atual.
	std::string Abstract::Session::convertFromHost(const std::string &str) const {

#ifdef HAVE_ICONV

		return convertCharset(const_cast<Abstract::Session *>(this)->converter.local,str.c_str(),str.size());

#else
		if(converter) {

			char * converted = lib3270_iconv_from_host(converter,str.c_str(),str.size());
			if(converted) {
				std::string rc(converted);
				lib3270_free(converted);
				return rc;
			}

		} else {

			throw std::runtime_error("Unable to convert charsets");

		}

        return str;

#endif // HAVE_ICONV
	}

	// @brief Converte string do charset atual para o charset do host.
	std::string Abstract::Session::convertToHost(const char *text, int length) const {

#ifdef HAVE_ICONV

		debug("Using ICONV");
		return convertCharset(const_cast<Abstract::Session *>(this)->converter.host,text,length);

#else

		if(converter) {

			debug("Converting \"",text,"\" with lib3270 converter ",((void *) converter));

			char * converted = lib3270_iconv_to_host(converter,text,length);

			if(converted) {
				std::string rc(converted);
				debug("Converted=\"",rc,"\"");
				lib3270_free(converted);
				return rc;
			}

		}

#endif // HAVE_ICONV

		if(length > 0)
			return std::string(text,length);

        return std::string(text);

	}

	/// @brief Converte string do charset atual para o charset do host.
	std::string Abstract::Session::convertToHost(const std::string &str) const {
#ifdef HAVE_ICONV
		return convertCharset(const_cast<Abstract::Session *>(this)->converter.host,str.c_str(),str.size());
#else
        return str;
#endif // HAVE_ICONV
	}


 }