os2iconv.c File Reference

#include "geniconv.h"
#include <uconv.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <os2.h>
#include "os2cp.h"

Include dependency graph for os2iconv.c:

Go to the source code of this file.

Data Structures
struct	iuconv_obj

Macros
#define	ICONV_THREAD_SAFE   1
#define	_ULS_CALLCONV_
#define	CALLCONV   _System
#define	INCL_DOSSEMAPHORES
#define	INCL_DOSERRORS
#define	min(a, b)   (((a) < (b)) ? (a) : (b))
#define	MAX_CP_NAME_LEN   64

Functions
static int	_createUconvObj (const char *code, UconvObject *uobj)
static int	uconv_open (const char *code, UconvObject *uobj)
iconv_t _System	os2_iconv_open (const char *tocode, const char *fromcode)
size_t _System	os2_iconv (iconv_t cd, char **inbuf, size_t *inbytesleft, char **outbuf, size_t *outbytesleft)
int _System	os2_iconv_close (iconv_t cd)

Macro Definition Documentation

_ULS_CALLCONV_

#define _ULS_CALLCONV_

Definition at line 31 of file os2iconv.c.

CALLCONV

#define CALLCONV   _System

Definition at line 32 of file os2iconv.c.

ICONV_THREAD_SAFE

#define ICONV_THREAD_SAFE   1

Definition at line 28 of file os2iconv.c.

INCL_DOSERRORS

#define INCL_DOSERRORS

Definition at line 39 of file os2iconv.c.

INCL_DOSSEMAPHORES

#define INCL_DOSSEMAPHORES

Definition at line 38 of file os2iconv.c.

MAX_CP_NAME_LEN

#define MAX_CP_NAME_LEN   64

Definition at line 48 of file os2iconv.c.

min

#define min	(		a,
			b
	)		(((a) < (b)) ? (a) : (b))

Definition at line 45 of file os2iconv.c.

Function Documentation

_createUconvObj()

static int _createUconvObj ( const char *  code, UconvObject *  uobj  )

static

Definition at line 61 of file os2iconv.c.

{
    UniChar uc_code[MAX_CP_NAME_LEN];
    int i;
    const char *ch = code;
 
    if (code == NULL)
        uc_code[0] = 0;
    else {
        for (i = 0; i < MAX_CP_NAME_LEN; i++) {
            uc_code[i] = (unsigned short)*ch;
            if (! (*ch))
                break;
            ch++;
        }
    }
 
    return UniCreateUconvObject(uc_code, uobj);
}

References i, MAX_CP_NAME_LEN, and NULL.

Referenced by uconv_open().

os2_iconv()

size_t _System os2_iconv	(	iconv_t	cd,
		char **	inbuf,
		size_t *	inbytesleft,
		char **	outbuf,
		size_t *	outbytesleft
	)

Definition at line 146 of file os2iconv.c.

{
    UconvObject uo_tocode = ((iuconv_obj *)(cd))->uo_tocode;
    UconvObject uo_fromcode = ((iuconv_obj *)(cd))->uo_fromcode;
    size_t nonIdenticalConv = 0;
    UniChar *uc_buf;
    size_t uc_buf_len;
    UniChar **uc_str;
    size_t *uc_str_len;
    int rc;
    size_t ret = (size_t)(-1);
 
    if (uo_tocode == NULL && uo_fromcode == NULL) {
        uc_buf_len = min(*inbytesleft, *outbytesleft);
        memcpy(*outbuf, *inbuf, uc_buf_len);
        *inbytesleft -= uc_buf_len;
        *outbytesleft -= uc_buf_len;
        outbuf += uc_buf_len;
        inbuf += uc_buf_len;
        return uc_buf_len;
    }
 
#ifdef ICONV_THREAD_SAFE
    DosRequestMutexSem(((iuconv_obj *)(cd))->hMtx, SEM_INDEFINITE_WAIT);
#endif
 
    if (uo_tocode && uo_fromcode &&
        (((iuconv_obj *)cd)->buf_len >> 1) < *inbytesleft) {
        if (((iuconv_obj *)cd)->buf != NULL)
            free(((iuconv_obj *)cd)->buf);
        ((iuconv_obj *)cd)->buf_len = *inbytesleft << 1;
        ((iuconv_obj *)cd)->buf = (UniChar *)malloc(((iuconv_obj *)cd)->buf_len);
    }
 
    if (uo_fromcode) {
        if (uo_tocode) {
            uc_buf = ((iuconv_obj *)cd)->buf;
            uc_buf_len = ((iuconv_obj *)cd)->buf_len;
            uc_str = &uc_buf;
        } else {
            uc_str = (UniChar **)outbuf;
            uc_buf_len = *outbytesleft;
        }
        uc_buf_len = uc_buf_len >> 1;
        uc_str_len = &uc_buf_len;
        rc = UniUconvToUcs(uo_fromcode, (void **)inbuf, inbytesleft,
                           uc_str, uc_str_len, &nonIdenticalConv);
        uc_buf_len = uc_buf_len << 1;
        if (!uo_tocode)
            *outbytesleft = uc_buf_len;
 
        if (rc != ULS_SUCCESS) {
            errno = EILSEQ;
            goto done;
        } else if (*inbytesleft && !*uc_str_len) {
            errno = E2BIG;
            goto done;
        }
 
        if (!uo_tocode)
            return nonIdenticalConv;
 
        uc_buf = ((iuconv_obj *)cd)->buf;
        uc_buf_len = ((iuconv_obj *)cd)->buf_len - uc_buf_len;
        uc_str = &uc_buf;
        uc_str_len = &uc_buf_len;
    } else {
        uc_str = (UniChar **)inbuf;
        uc_str_len = inbytesleft;
    }
 
    *uc_str_len = *uc_str_len>>1;
    rc = UniUconvFromUcs(uo_tocode, uc_str, uc_str_len, (void **)outbuf,
                         outbytesleft, &nonIdenticalConv);
    if (rc != ULS_SUCCESS) {
        switch (rc) {
        case ULS_BUFFERFULL:
            errno = E2BIG;
            break;
        case ULS_ILLEGALSEQUENCE:
            errno = EILSEQ;
            break;
        case ULS_INVALID:
            errno = EINVAL;
            break;
        }
        goto done;
    } else if (*uc_str_len && !*outbytesleft) {
        errno = E2BIG;
        goto done;
    }
 
    ret = nonIdenticalConv;
 
done:
 
#ifdef ICONV_THREAD_SAFE
    DosReleaseMutexSem(((iuconv_obj *)cd)->hMtx);
#endif
    return ret;
}

References done, free, malloc, memcpy, min, and NULL.

Referenced by _init().

os2_iconv_close()

int _System os2_iconv_close

(

iconv_t

cd

)

Definition at line 250 of file os2iconv.c.

{
    if (!cd) return 0;
 
#ifdef ICONV_THREAD_SAFE
    DosCloseMutexSem(((iuconv_obj *)cd)->hMtx);
#endif
    if (((iuconv_obj *)cd)->uo_tocode != NULL)
        UniFreeUconvObject(((iuconv_obj *)cd)->uo_tocode);
    if (((iuconv_obj *)cd)->uo_fromcode != NULL)
        UniFreeUconvObject(((iuconv_obj *)cd)->uo_fromcode);
 
    if (((iuconv_obj *)cd)->buf != NULL)
        free(((iuconv_obj *)cd)->buf);
 
    free(cd);
 
    return 0;
}

References free, and NULL.

Referenced by _init().

os2_iconv_open()

iconv_t _System os2_iconv_open	(	const char *	tocode,
		const char *	fromcode
	)

Definition at line 103 of file os2iconv.c.

{
    UconvObject uo_tocode;
    UconvObject uo_fromcode;
    int rc;
    iuconv_obj *iuobj;
 
    if (tocode == NULL)
        tocode = "";
 
    if (fromcode == NULL)
        fromcode = "";
 
    if (stricmp(tocode, fromcode) != 0) {
        rc = uconv_open(fromcode, &uo_fromcode);
        if (rc != ULS_SUCCESS) {
            errno = EINVAL;
            return (iconv_t)(-1);
        }
 
        rc = uconv_open(tocode, &uo_tocode);
        if (rc != ULS_SUCCESS) {
            UniFreeUconvObject(uo_fromcode);
            errno = EINVAL;
            return (iconv_t)(-1);
        }
    } else {
        uo_tocode = NULL;
        uo_fromcode = NULL;
    }
 
    iuobj = (iuconv_obj *) malloc(sizeof(iuconv_obj));
    iuobj->uo_tocode = uo_tocode;
    iuobj->uo_fromcode = uo_fromcode;
    iuobj->buf_len = 0;
    iuobj->buf = NULL;
#ifdef ICONV_THREAD_SAFE
    DosCreateMutexSem(NULL, &iuobj->hMtx, 0, FALSE);
#endif
 
    return iuobj;
}

References iuconv_obj::buf, iuconv_obj::buf_len, FALSE, iuconv_obj::hMtx, malloc, NULL, uconv_open(), iuconv_obj::uo_fromcode, and iuconv_obj::uo_tocode.

Referenced by _init().

uconv_open()

static int uconv_open ( const char *  code, UconvObject *  uobj  )

static

Definition at line 81 of file os2iconv.c.

{
    int rc;
 
    if (!stricmp(code, "UTF-16")) {
        *uobj = NULL;
        return ULS_SUCCESS;
    }
 
    rc = _createUconvObj(code, uobj);
    if (rc != ULS_SUCCESS) {
        unsigned long cp = os2cpFromName((char *)code);
        char cp_name[16];
 
        if (cp != 0 && _snprintf(cp_name, sizeof(cp_name), "IBM-%u", cp) > 0)
            rc = _createUconvObj(cp_name, uobj);
    }
 
    return rc;
}

References _createUconvObj(), cp, NULL, and os2cpFromName().

Referenced by os2_iconv_open().