/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 1993 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
/*
* mbstowcs
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#if !defined(lint) && defined(SCCSIDS)
static char *sccsid = "%Z%%M% %I% %E% SMI";
#endif
#include <sys/types.h>
#include "codeset.h"
#include "mbextern.h"
int
mbstowcs(pwcs, s, n)
wchar_t * pwcs;
char *s;
size_t n;
{
char *handle; /* handle */
int (*p)();
int num = 0;
int ret;
switch (_code_set_info.code_id) {
case CODESET_NONE:
/*
* default code set,
*/
while (*s && num < n) {
*pwcs++ = (wchar_t)*s++;
num++;
}
if (num < n)
*pwcs = 0;
return (num);
break;
case CODESET_EUC:
/*
* EUC code set
*/
return(_mbstowcs_euc(pwcs, s, n));
break;
case CODESET_XCCS:
/*
* XCCS code set
*/
return(_mbstowcs_xccs(pwcs, s, n));
break;
case CODESET_ISO2022:
/*
* ISO family
*/
return(_mbstowcs_iso(pwcs, s, n));
break;
default:
/*
* User defined code set
*/
handle = _ml_open_library();
if (handle == (void *)NULL)
return(ERROR_NO_LIB); /* No user library */
p = (int (*)()) dlsym(handle, "_mbstowcs");
if (p == (int (*)()) NULL)
return(ERROR_NO_SYM);
ret = (*p)(pwcs, s, n);
return (ret);
break;
}
/* NOTREACHED */
}