/*
* Copyright (c) 2004, 2005, Oracle and/or its affiliates. All rights reserved.
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
*
* This code is free software; you can redistribute it and/or modify it
* under the terms of the GNU General Public License version 2 only, as
* published by the Free Software Foundation. Oracle designates this
* particular file as subject to the "Classpath" exception as provided
* by Oracle in the LICENSE file that accompanied this code.
*
* 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
* version 2 for more details (a copy is included in the LICENSE file that
* accompanied this code).
*
* You should have received a copy of the GNU General Public License version
* 2 along with this work; if not, write to the Free Software Foundation,
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
*
* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
* or visit www.oracle.com if you need additional information or have any
* questions.
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <locale.h>
#include <langinfo.h>
#include <iconv.h>
#include "utf.h"
/* Global variables */
/*
* Initialize all utf processing.
*/
struct UtfInst *JNICALL
utfInitialize(char *options)
{
struct UtfInst *ui;
char *codeset;
ui = (struct UtfInst*)calloc(sizeof(struct UtfInst), 1);
ui->iconvToPlatform = (void *)-1;
ui->iconvFromPlatform = (void *)-1;
/* Set the locale from the environment */
(void)setlocale(LC_ALL, "");
/* Get the codeset name */
codeset = (char*)nl_langinfo(CODESET);
if ( codeset == NULL || codeset[0] == 0 ) {
return ui;
}
/* If we don't need this, skip it */
if (strcmp(codeset, "UTF-8") == 0 || strcmp(codeset, "utf8") == 0 ) {
return ui;
}
/* Open conversion descriptors */
ui->iconvToPlatform = iconv_open(codeset, "UTF-8");
if ( ui->iconvToPlatform == (void *)-1 ) {
UTF_ERROR("Failed to complete iconv_open() setup");
}
ui->iconvFromPlatform = iconv_open("UTF-8", codeset);
if ( ui->iconvFromPlatform == (void *)-1 ) {
UTF_ERROR("Failed to complete iconv_open() setup");
}
return ui;
}
/*
* Terminate all utf processing
*/
void JNICALL
utfTerminate(struct UtfInst *ui, char *options)
{
if ( ui->iconvFromPlatform != (void *)-1 ) {
(void)iconv_close(ui->iconvFromPlatform);
}
if ( ui->iconvToPlatform != (void *)-1 ) {
(void)iconv_close(ui->iconvToPlatform);
}
ui->iconvToPlatform = (void *)-1;
ui->iconvFromPlatform = (void *)-1;
(void)free(ui);
}
/*
* Do iconv() conversion.
* Returns length or -1 if output overflows.
*/
static int
iconvConvert(iconv_t ic, char *bytes, int len, char *output, int outputMaxLen)
{
int outputLen = 0;
UTF_ASSERT(bytes);
UTF_ASSERT(len>=0);
UTF_ASSERT(output);
UTF_ASSERT(outputMaxLen>len);
output[0] = 0;
outputLen = 0;
if ( ic != (iconv_t)(void *)-1 ) {
int returnValue;
size_t inLeft;
size_t outLeft;
char *inbuf;
char *outbuf;
inbuf = bytes;
outbuf = output;
inLeft = len;
outLeft = outputMaxLen;
returnValue = iconv(ic, (void*)&inbuf, &inLeft, &outbuf, &outLeft);
if ( returnValue >= 0 && inLeft==0 ) {
outputLen = outputMaxLen-outLeft;
output[outputLen] = 0;
return outputLen;
}
/* Failed to do the conversion */
return -1;
}
/* Just copy bytes */
outputLen = len;
(void)memcpy(output, bytes, len);
output[len] = 0;
return outputLen;
}
/*
* Convert UTF-8 to Platform Encoding.
* Returns length or -1 if output overflows.
*/
int JNICALL
utf8ToPlatform(struct UtfInst*ui, jbyte *utf8, int len, char *output, int outputMaxLen)
{
/* Negative length is an error */
if ( len < 0 ) {
return -1;
}
/* Zero length is ok, but we don't need to do much */
if ( len == 0 ) {
output[0] = 0;
return 0;
}
return iconvConvert(ui->iconvToPlatform, (char*)utf8, len, output, outputMaxLen);
}
/*
* Convert Platform Encoding to UTF-8.
* Returns length or -1 if output overflows.
*/
int JNICALL
utf8FromPlatform(struct UtfInst*ui, char *str, int len, jbyte *output, int outputMaxLen)
{
/* Negative length is an error */
if ( len < 0 ) {
return -1;
}
/* Zero length is ok, but we don't need to do much */
if ( len == 0 ) {
output[0] = 0;
return 0;
}
return iconvConvert(ui->iconvFromPlatform, str, len, (char*)output, outputMaxLen);
}