#include <string>
#include <sstream>
#include <vector>
#include <cctype>

#include <iostream>
#include <fstream>
#include <iconv.h>

#include <time.h>

#include "util.h"

using namespace std;

namespace Util
{
	void str_dump(const string& str)
	{
	    for (unsigned i=0; i<str.length(); ++i)
	    {
			cout.width(2);
			cout.fill('0');
			cout << hex << static_cast<int>(str.at(i)) << " ";
		}
		cout.width(1);
		cout << dec <<  endl;
	}



	string str_replace(string str, string search, string replace)
	{
		unsigned int pos = 0;
		
		while ( (pos = str.find(search,pos)) != string::npos)
		{
			str.replace(pos, search.size(), replace);
			pos += replace.size();
		}
		return str;
	}

    std::string str_replace_char(std::string str, char search, char replace)
	{
		unsigned int pos = 0;

		while ( (pos = str.find(search,pos)) != string::npos)
		{
			str.replace(pos, 1, 1, replace);
		}
		return str;
	}

	

	string str_trim(string str)
	{
		while (str.length() > 0 && isspace(str.at(0)))
			str.erase(0,1);
		while (str.length() > 0 && isspace(str.at(str.length()-1)))
			str.erase(str.length()-1,1);
		return str;
	}

	string str_striptags(string str)
	{
		unsigned int pos=0;

		while ( (pos=str.find("<",pos)) != string::npos)
		{
			unsigned int endpos = str.find(">",pos);
			if (endpos == string::npos)
				break;
			str.erase(pos, (endpos-pos)+1);
		}

		return str;
	}

	vector<string> str_split(string input, string delimiter)
	{
    	vector<string> retval;

		while ( 1 )
		{
			unsigned int endpos = input.find(delimiter);

			string entry = input.substr(0,endpos);
			retval.push_back( entry );


			if (endpos == string::npos)
				break;

			endpos += delimiter.length();
			input = input.substr(endpos, input.length() - endpos);
		}

		return retval;
	}


    string str_toupper(string str)
	{
		for (unsigned i=0; i<str.length(); ++i)
		{
			str.replace(i, 1 ,1, ::toupper(str.at(i)));
		}
		return str;
	}

	string str_tolower(string str)
	{
		for (unsigned i=0; i<str.length(); ++i)
		{
			str.replace(i, 1 ,1, ::tolower(str.at(i)));
		}
		return str;
	}


	string str_characters(string str)
	{
		string rep;
		rep.append(1,197);
		str = str_replace(str, "&#197;", rep);

		rep.at(0) = 198;
		str = str_replace(str, "&#198;", rep);

		rep.at(0) = 216;
		str = str_replace(str, "&#216;", rep);


		rep.at(0) = 229;
		str = str_replace(str, "&#229;", rep);

		rep.at(0) = 230;
		str = str_replace(str, "&#230;", rep);

		rep.at(0) = 248;
		str = str_replace(str, "&#248;", rep);

		return str;
	}


	string str_gsm2latin(string str)
	{
		str = str_replace_char(str, 0x1c, 198); //AE
		str = str_replace_char(str, 0x0b, 216); //OE
		str = str_replace_char(str, 0x0e, 197); //AA

		str = str_replace_char(str, 0x1d, 230); //ae
		str = str_replace_char(str, 0x0c, 248); //oe
		str = str_replace_char(str, 0x0f, 229); //aa
		return str;
	}

	string str_latin2gsm(string str)
	{
		str = str_replace_char(str, 198, 0x1c); //AE
		str = str_replace_char(str, 216, 0x0b); //OE
		str = str_replace_char(str, 197, 0x0e); //AA

		str = str_replace_char(str, 230, 0x1d); //ae
		str = str_replace_char(str, 248, 0x0c); //oe
		str = str_replace_char(str, 229, 0x0f); //aa
		return str;
	}

	string readUrl(string url, string tempfile)
	{
		char buf[128000];
		string document;
		
		ostringstream command;
		command << "wget -O " << tempfile << " -o /dev/null \"" << url << "\"";
		system( command.str().c_str() );

		ifstream in( tempfile.c_str() );

		if (!in)
			return "";

		while (!in.eof() )
		{
			in.getline(buf,128000-1);
			document += buf;
			document += "\n";
		}
		in.close();
		unlink(tempfile.c_str());
		
		return document;
	}

	

	string iconv_wrapper(string _input, string to_format, string from_format)
	{
		char* input,*output,*input_ptr, *output_ptr;
		input = input_ptr = (char*) malloc(_input.size()+1);
		strcpy(input, _input.c_str());
		
		output = output_ptr = (char*) malloc(_input.size()*2);


		
		unsigned int realinsize,insize,outsize,realsize;
		
		iconv_t icv = iconv_open(to_format.c_str(), from_format.c_str());
		if (icv == (iconv_t)-1)
		{
			perror(0);
			return "";
		}

		
		realsize = outsize = _input.size()*2;
		realinsize = insize = _input.size();
		
		iconv(icv,
				&input_ptr,
				&insize,
				&output_ptr,
				&outsize);


		perror(0);
/*		cout << "len=" << len << endl;
		cout << "outsize=" <<  outsize << endl;
		cout << "realsize=" << realsize << endl;
		cout << "insize=" << insize << endl;
		cout << "realinsize=" << realinsize << endl;*/
		iconv_close(icv);

		string returnstr;
		for (unsigned int i=0; i<realsize - outsize; i++)
		{
			//cout << i << ":" << (unsigned short) output[i] << "|" << (unsigned short) input[i];
			//cout << " (" << output[i] << ")" << endl;
			returnstr += output[i];
		}
	    return returnstr;
	}

	std::string convertToUnicode(std::string str)
	{
		return iconv_wrapper(str, "UTF-8", "ISO8859-1");
	}

	std::string convertFromUnicode(std::string str)
	{
		return iconv_wrapper(str, "ISO8859-1", "UTF-8");
	}

	int uTimeDiff(const timeval& then, const timeval& now)
	{
		return ( (now.tv_sec - then.tv_sec)*1000000) + (now.tv_usec-then.tv_usec);
	}

	int mTimeDiff(const timeval& then, const timeval& now)
	{
		return uTimeDiff(then,now) / 1000;
	}

}