You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@xerces.apache.org by tn...@apache.org on 2001/06/25 18:19:57 UTC
cvs commit: xml-xerces/c/src/util/Transcoders/Iconv400 iconv_util.cpp iconv_util.c
tng 01/06/25 09:19:57
Added: c/src/util/Transcoders/Iconv400 iconv_util.cpp
Removed: c/src/util/Transcoders/Iconv400 iconv_util.c
Log:
Rename iconv_util.h to iconv_util.hpp. AS400 changes by Linda Swan.
Revision Changes Path
1.1 xml-xerces/c/src/util/Transcoders/Iconv400/iconv_util.cpp
Index: iconv_util.cpp
===================================================================
/*
* The Apache Software License, Version 1.1
*
* Copyright (c) 1999-2001 The Apache Software Foundation. All rights
* reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
*
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
*
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in
* the documentation and/or other materials provided with the
* distribution.
*
* 3. The end-user documentation included with the redistribution,
* if any, must include the following acknowledgment:
* "This product includes software developed by the
* Apache Software Foundation (http://www.apache.org/)."
* Alternately, this acknowledgment may appear in the software itself,
* if and wherever such third-party acknowledgments normally appear.
*
* 4. The names "Xerces" and "Apache Software Foundation" must
* not be used to endorse or promote products derived from this
* software without prior written permission. For written
* permission, please contact apache\@apache.org.
*
* 5. Products derived from this software may not be called "Apache",
* nor may "Apache" appear in their name, without prior written
* permission of the Apache Software Foundation.
*
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
* DISCLAIMED. IN NO EVENT SHALL THE APACHE SOFTWARE FOUNDATION OR
* ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
* LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
* USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
* OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
* OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
* ====================================================================
*
* This software consists of voluntary contributions made by many
* individuals on behalf of the Apache Software Foundation, and was
* originally based on software copyright (c) 1999, International
* Business Machines, Inc., http://www.ibm.com . For more information
* on the Apache Software Foundation, please see
* <http://www.apache.org/>.
*/
/**
* $Log: iconv_util.cpp,v $
* Revision 1.1 2001/06/25 16:19:56 tng
* Rename iconv_util.h to iconv_util.hpp. AS400 changes by Linda Swan.
*
* Revision 1.1 2000/02/10 18:08:28 abagchi
* Initial checkin
*
*/
#include <iconv.h>
#include <util/Platforms/OS400/OS400PlatformUtils.hpp>
#include <stdlib.h>
#include <unistd.h>
#include <iconv_util.hpp>
#include <iconv_cnv.hpp>
#include <ctype.h>
#define COPYRIGHT_STRING_LENGTH 200
#define MAX_STRLEN 0x00FFFFF
#define CHARCCSIDSIZE 5
static UConverter* _defaultConverter = NULL;
static UErrorCode gErr = U_ZERO_ERROR;
#include "utypes.h"
void shareConverterData (UConverterSharedData * data,char *InDescriptor) ;
UConverterSharedData *getSharedConverterData(char *Descriptor);
#define defaultConverter (_defaultConverter==NULL)?_defaultConverter=ucnv_open(NULL, &gErr):_defaultConverter
static char DEFAULT_CONVERTER_NAME[60] = "";
const char* iconv_getDefaultCodepage()
{
strcpy(DEFAULT_CONVERTER_NAME, "ibm037");
return DEFAULT_CONVERTER_NAME;
}
/* placeholder function to be deleted in 3_0 */
/* used by String.c */
int32_t
u_strlen(const UChar *s)
{
int32_t i = 0;
while(*s++)
i++;
return i;
}
/* note sure if needed - think that this is needed in cnv.c */
char* u_austrcpy(char *s1,
const UChar *ucs2 )
{
char * anchor = s1; /* save the start of result string */
UErrorCode err = U_ZERO_ERROR;
int32_t len;
len = ucnv_fromUChars(defaultConverter,
s1,
MAX_STRLEN,
ucs2,
&err);
s1[len] = '\0';
return s1;
}
/*Logic determines if the converter is Algorithmic AND/OR cached
*depending on that:
* -we either go to get data from disk and cache it (Data=TRUE, Cached=False)
* -Get it from a Hashphkramtable (Data=X, Cached=TRUE)
* -Call dataConverter initializer (Data=TRUE, Cached=TRUE)
* -Call AlgorithmicConverter initializer (Data=FALSE, Cached=TRUE)
*/
int QlgCvtTextDescToDesc(int,int,char *,int,char *,int,int);
UConverter *
createConverter (const char *converterName, UErrorCode * err)
{
char realName[MAX_CONVERTER_NAME_LENGTH];
char uppercased_converterName[MAX_CONVERTER_NAME_LENGTH];
UConverter *myUConverter = NULL;
UConverterSharedData *mySharedConverterData = NULL;
/* following parameters are passed to the convert text decscriptor
to descriptor */
int InType;
int OutType=1;
char *InDescriptor;
int InDescSize;
char OutDescriptor[CHARCCSIDSIZE]; /* 5 = size of a CCSID id on AS/400*/
int OutDescSize;
int JobCCSID=0;
char *inchar, *outchar; /* input and output conversion pointers*/
int tempchar;
if (U_FAILURE (*err))
return NULL;
/******************************************************************/
/* assume name is in EBCDIC. The convetername is assumed to be
/* either upper/lower case ebcdic and the text converter requires
/* upper case - Since we do not know we will convert to upper case
** just in case
/******************************************************************/
inchar = (char*)converterName;
outchar = &uppercased_converterName[0];
while (*inchar) /*except for null terminator uppercase inputs*/
{
tempchar = (int)(*inchar);
*outchar=(char)toupper(tempchar);
inchar ++;
outchar ++;
}
if (outchar -&uppercased_converterName[0]<=MAX_CONVERTER_NAME_LENGTH)
*outchar = '\0'; /* replace the terminator */
if(!strcmp(uppercased_converterName, "IBM-37")) /* We special-case this one */
{
memcpy(uppercased_converterName, "IBM-037", 7);
memset(uppercased_converterName + 7, '\0',1);
}
/******************************************************************/
/* convert name to AS/400 CCSID
** if CCSID is returned then we can complete building the converter
** otherwise we will return the same error as ICU converters
*/
/******************************************************************/
InType = 11; /*set for IANA initially */
if (QlgCvtTextDescToDesc(InType, OutType,(char *)uppercased_converterName, strlen(uppercased_converterName),&OutDescriptor[0],sizeof(OutDescriptor),JobCCSID)<0)
{
InType = 3; /* change to AIX 4.1 if we fail above */
if (QlgCvtTextDescToDesc(InType, OutType,(char *)uppercased_converterName, strlen(uppercased_converterName),&OutDescriptor[0],sizeof(OutDescriptor),JobCCSID)<0)
{
*err = U_INVALID_TABLE_FILE;
send_message((char *)converterName,ICONV_CCSID_PROBLEM,'d');
return NULL;
}
}
/*****************************************************************/
/* create a new converter */
/*****************************************************************/
myUConverter = createNewConverter(&OutDescriptor[0], err);
if (U_FAILURE (*err) || (myUConverter == NULL))
{
return NULL;
}
return myUConverter;
}
UConverter* createNewConverter(const char *name, UErrorCode *err)
{
char temp[33];
int32_t i = 0;
const int8_t *myByteArray = NULL;
const uint16_t *myIndexArray = NULL;
int32_t myValuesCount = 0;
int32_t myIndexCount = 0;
UConverter *myConverter = NULL;
int32_t myCheck;
int8_t errorLevel = 0;
char throwAway[COPYRIGHT_STRING_LENGTH];
char UNICODE_CCSID_ID_O[33]="IBMCCSID134880000000";
char UNICODE_CCSID_ID_I[33]="IBMCCSID13488";
char my_CCSID_ID[33]="\0";
char CONVERT_ID_START[9] ="IBMCCSID"; /* include null terminator for strcat */
char DEFAULTS[9] = "00000000";
if (U_FAILURE (*err))
return NULL;
/* create the base shell for the converter */
myConverter = (UConverter *) malloc (sizeof (UConverter));
if (myConverter == NULL)
{
*err = U_MEMORY_ALLOCATION_ERROR;
return NULL;
}
/* create the "shared area' and link into the shell */
myConverter->sharedData =
(UConverterSharedData *) malloc (sizeof (UConverterSharedData));
if (myConverter->sharedData == NULL)
{
free (myConverter);
*err = U_MEMORY_ALLOCATION_ERROR;
return NULL;
}
memset(my_CCSID_ID, '\0', 33); /* sizeof(my_CCSID_ID)); */
memcpy(my_CCSID_ID,&CONVERT_ID_START[0],strlen(CONVERT_ID_START)+1);
memcpy(&my_CCSID_ID[8],&name[0],5);
memcpy(&my_CCSID_ID[13],&DEFAULTS[0],7);
memset(temp, '\0', 33);
memcpy(temp, my_CCSID_ID, 13);
myConverter->sharedData->toiconv_handle = iconv_open(UNICODE_CCSID_ID_I,my_CCSID_ID);
/* memset(&my_CCSID_ID[13],'0',19); clear out the non necessary data to reverse */
my_CCSID_ID[13] = '\0';
myConverter->sharedData->fromiconv_handle = iconv_open(temp,UNICODE_CCSID_ID_O);
if ((myConverter->sharedData->toiconv_handle.return_value ==-1) ||(myConverter->sharedData->fromiconv_handle.return_value==-1))
{
/*If it isn't any of the above, the file is invalid */
*err = U_INVALID_TABLE_FILE;
free (myConverter->sharedData);
free (myConverter);
}
return myConverter;
}
---------------------------------------------------------------------
To unsubscribe, e-mail: xerces-cvs-unsubscribe@xml.apache.org
For additional commands, e-mail: xerces-cvs-help@xml.apache.org