geniconv.c File Reference

#include <os2.h>
#include "geniconv.h"

Include dependency graph for geniconv.c:

Go to the source code of this file.

Macros
#define	INCL_DOSMODULEMGR   /* Module Manager values */
#define	INCL_DOSERRORS   /* Error values */
#define	debug(s, ...)   do {} while (0)

Typedefs
typedef iconv_t _System(*	FNICONV_OPEN) (const char *tocode, const char *fromcode)
typedef size_t _System(*	FNICONV) (iconv_t cd, char **inbuf, size_t *inbytesleft, char **outbuf, size_t *outbytesleft)
typedef int _System(*	FNICONV_CLOSE) (iconv_t cd)

Functions
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)
static BOOL	_loadDLL (PSZ pszName, PSZ pszIconvOpen, PSZ pszIconv, PSZ pszIconvClose)
static void	_init (void)
void	libiconv_clean (void)
iconv_t	libiconv_open (const char *tocode, const char *fromcode)
size_t	libiconv (iconv_t cd, char **inbuf, size_t *inbytesleft, char **outbuf, size_t *outbytesleft)
int	libiconv_close (iconv_t cd)

Variables
static HMODULE	hmIconv = NULLHANDLE
static FNICONV_OPEN	fn_iconv_open = NULL
static FNICONV	fn_iconv = NULL
static FNICONV_CLOSE	fn_iconv_close = NULL

Macro Definition Documentation

debug

#define debug	(		s,
			...
	)		do {} while (0)

Definition at line 40 of file geniconv.c.

INCL_DOSERRORS

#define INCL_DOSERRORS   /* Error values */

Definition at line 29 of file geniconv.c.

INCL_DOSMODULEMGR

#define INCL_DOSMODULEMGR   /* Module Manager values */

Definition at line 28 of file geniconv.c.

Typedef Documentation

FNICONV

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

Definition at line 52 of file geniconv.c.

FNICONV_CLOSE

typedef int _System(* FNICONV_CLOSE) (iconv_t cd)

Definition at line 55 of file geniconv.c.

FNICONV_OPEN

typedef iconv_t _System(* FNICONV_OPEN) (const char *tocode, const char *fromcode)

Definition at line 51 of file geniconv.c.

Function Documentation

_init()

static void _init ( void  )

static

Definition at line 105 of file geniconv.c.

{
    if (fn_iconv_open != NULL) /* Already was initialized */
        return;
 
    /* Try to load kiconv.dll, iconv2.dll or iconv.dll */
    if (!_loadDLL("KICONV", "_libiconv_open", "_libiconv", "_libiconv_close") &&
        !_loadDLL("ICONV2", "_libiconv_open", "_libiconv", "_libiconv_close") &&
        !_loadDLL("ICONV",  "_iconv_open",    "_iconv",    "_iconv_close") ) {
        /* No DLL was loaded - use OS/2 conversion objects API */
        debug("Uni*() API used");
        fn_iconv_open  = os2_iconv_open;
        fn_iconv       = os2_iconv;
        fn_iconv_close = os2_iconv_close;
    }
}

References _loadDLL(), debug, fn_iconv, fn_iconv_close, fn_iconv_open, NULL, os2_iconv(), os2_iconv_close(), and os2_iconv_open().

Referenced by libiconv_open().

_loadDLL()

static BOOL _loadDLL ( PSZ  pszName, PSZ  pszIconvOpen, PSZ  pszIconv, PSZ  pszIconvClose  )

static

Definition at line 65 of file geniconv.c.

{
    ULONG ulRC;
    CHAR  acError[256];
 
    ulRC = DosLoadModule(acError, sizeof(acError), pszName, &hmIconv);
    if (ulRC != NO_ERROR) {
        debug("DLL not loaded: %s", &acError);
        return FALSE;
    }
 
    do {
        ulRC = DosQueryProcAddr(hmIconv, 0, pszIconvOpen, (PFN *)&fn_iconv_open);
        if (ulRC != NO_ERROR) {
            debug("Error: cannot find entry %s in %s", pszIconvOpen, pszName);
            break;
        }
 
        ulRC = DosQueryProcAddr(hmIconv, 0, pszIconv, (PFN *)&fn_iconv);
        if (ulRC != NO_ERROR) {
            debug("Error: cannot find entry %s in %s", pszIconv, pszName);
            break;
        }
 
        ulRC = DosQueryProcAddr(hmIconv, 0, pszIconvClose, (PFN *)&fn_iconv_close);
        if (ulRC != NO_ERROR) {
            debug("Error: cannot find entry %s in %s", pszIconvClose, pszName);
          break;
        }
 
        debug("DLL %s used", pszName);
        return TRUE;
    } while (FALSE);
 
    DosFreeModule(hmIconv);
    hmIconv = NULLHANDLE;
    return FALSE;
}

References debug, FALSE, fn_iconv, fn_iconv_close, fn_iconv_open, hmIconv, and TRUE.

Referenced by _init().

libiconv()

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

Definition at line 146 of file geniconv.c.

{
    return fn_iconv(cd, inbuf, inbytesleft, outbuf, outbytesleft);
}

References fn_iconv.

libiconv_clean()

void libiconv_clean

(

void

)

Definition at line 128 of file geniconv.c.

{
    if (hmIconv != NULLHANDLE) {
        DosFreeModule(hmIconv);
        hmIconv = NULLHANDLE;
 
        fn_iconv_open  = NULL;
        fn_iconv       = NULL;
        fn_iconv_close = NULL;
    }
}

References fn_iconv, fn_iconv_close, fn_iconv_open, hmIconv, and NULL.

libiconv_close()

int libiconv_close

(

iconv_t

cd

)

Definition at line 152 of file geniconv.c.

{
    return fn_iconv_close(cd);
}

References fn_iconv_close.

libiconv_open()

iconv_t libiconv_open	(	const char *	tocode,
		const char *	fromcode
	)

Definition at line 140 of file geniconv.c.

{
    _init();
    return fn_iconv_open(tocode, fromcode);
}

References _init(), and fn_iconv_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().

Variable Documentation

fn_iconv

FNICONV fn_iconv = NULL

static

Definition at line 61 of file geniconv.c.

Referenced by _init(), _loadDLL(), libiconv(), and libiconv_clean().

fn_iconv_close

FNICONV_CLOSE fn_iconv_close = NULL

static

Definition at line 62 of file geniconv.c.

Referenced by _init(), _loadDLL(), libiconv_clean(), and libiconv_close().

fn_iconv_open

FNICONV_OPEN fn_iconv_open = NULL

static

Definition at line 60 of file geniconv.c.

Referenced by _init(), _loadDLL(), libiconv_clean(), and libiconv_open().

hmIconv

HMODULE hmIconv = NULLHANDLE

static

Definition at line 58 of file geniconv.c.

Referenced by _loadDLL(), and libiconv_clean().