xref: /titanic_52/usr/src/lib/libbc/libc/gen/common/wcstombs.c (revision 7c478bd95313f5f23a4c958a745db2134aa03244)

/*
 * 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 1991 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*
 * wcstombs
 */

#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"

size_t
wcstombs(s, pwcs, n)
	char *s;
	wchar_t * pwcs;
	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 (*pwcs && (num < n)) {
			*s++ = *pwcs++ & 0x00ff;
			num++;
		 }
		 if (num < n)
			*s = 0;
		 return (num);
		 break;
	case CODESET_EUC:
		/*
		 * EUC code set
		 */
		 return(_wcstombs_euc(s, pwcs, n));
		 break;

	case CODESET_XCCS:
		/*
		 * XCCS code set
		 */
		return(_wcstombs_xccs(s, pwcs, n));
		break;

	case CODESET_ISO2022:
		/*
		 * ISO family
		 */
		return(_wcstombs_iso(s, pwcs, n));
		break;

	default:
		/*
		 * User defined code set
		 */
		 handle = _ml_open_library();
		 if (handle == (char *)NULL)
			return(ERROR_NO_LIB);	/* No user library */
		 p = (int (*)()) dlsym(handle, "_wcstombs");
		 if (p == (int (*)()) NULL)
			return(ERROR_NO_SYM);
		 ret = (*p)(s, pwcs, n);
		 return (ret);
		 break;
	}
	/* NOTREACHED */
}