/*

 * MP3/MPlayer plugin to VDR (C++)

 *

 * (C) 2001-2009 Stefan Huelswitt <s.huelswitt@gmx.de>

 *

 * This code 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 2

 * of the License, or (at your option) any later version.

 *

 * This code 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, write to the Free Software

 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.

 * Or, point your browser to http://www.gnu.org/copyleft/gpl.html

 */

#include <stdlib.h>

#include <string.h>

#if APIVERSNUM < 10503

#include <errno.h>

#include <vdr/tools.h>

#include "common.h"

// --- cCharSetConv ----------------------------------------------------------

char *cCharSetConv::systemCharacterTable = NULL;

cCharSetConv::cCharSetConv(const char *FromCode, const char *ToCode)

{

  if (!FromCode)

     FromCode = systemCharacterTable;

  if (!ToCode)

     ToCode = "UTF-8";

  cd = (FromCode && ToCode) ? iconv_open(ToCode, FromCode) : (iconv_t)-1;

  result = NULL;

  length = 0;

}

cCharSetConv::~cCharSetConv()

{

  free(result);

  iconv_close(cd);

}

void cCharSetConv::SetSystemCharacterTableX(const char *CharacterTable)

{

  free(systemCharacterTable);

  systemCharacterTable = NULL;

  if (!strcasestr(CharacterTable, "UTF-8")) {

     systemCharacterTable = strdup(CharacterTable);

     }

}

const char *cCharSetConv::Convert(const char *From, char *To, size_t ToLength)

{

  if (cd != (iconv_t)-1 && From && *From) {

     char *FromPtr = (char *)From;

     size_t FromLength = strlen(From);

     char *ToPtr = To;

     if (!ToPtr) {

        length = max(length, FromLength * 2); // some reserve to avoid later reallocations

        result = (char *)realloc(result, length);

        ToPtr = result;

        ToLength = length;

        }

     else if (!ToLength)

        return From; // can't convert into a zero sized buffer

     ToLength--; // save space for terminating 0

     char *Converted = ToPtr;

     while (FromLength > 0) {

           if (iconv(cd, &FromPtr, &FromLength, &ToPtr, &ToLength) == size_t(-1)) {

              if (errno == E2BIG || errno == EILSEQ && ToLength < 1) {

                 if (To)

                    break; // caller provided a fixed size buffer, but it was too small

                 // The result buffer is too small, so increase it:

                 size_t d = ToPtr - result;

                 size_t r = length / 2;

                 length += r;

                 Converted = result = (char *)realloc(result, length);

                 ToLength += r;

                 ToPtr = result + d;

                 }

              if (errno == EILSEQ) {

                 // A character can't be converted, so mark it with '?' and proceed:

                 FromPtr++;

                 FromLength--;

                 *ToPtr++ = '?';

                 ToLength--;

                 }

              else if (errno != E2BIG)

                 return From; // unknown error, return original string

              }

           }

     *ToPtr = 0;

     return Converted;

     }

  return From;

}

#endif