1 files changed, 142 insertions, 0 deletions
diff --git a/usr/src/lib/iconv_modules/ja/common/Unicode_TO_eucJP.c b/usr/src/lib/iconv_modules/ja/common/Unicode_TO_eucJP.c
new file mode 100644
index 0000000000..0decb1e230
--- /dev/null
+++ b/usr/src/lib/iconv_modules/ja/common/Unicode_TO_eucJP.c
@@ -0,0 +1,142 @@
+/*
+ * CDDL HEADER START
+ *
+ * The contents of this file are subject to the terms of the
+ * Common Development and Distribution License (the "License").
+ * You may not use this file except in compliance with the License.
+ *
+ * You can obtain a copy of the license at 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 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 2007 Sun Microsystems, Inc.  All rights reserved.
+ * Use is subject to license terms.
+ */
+
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <errno.h>
+#include <euc.h>
+
+#include "japanese.h"
+#include "jfp_iconv_unicode.h"
+
+#ifdef JAVA_CONV_COMPAT
+#define	JFP_U2E_ICONV_JAVA
+#elif	JFP_ICONV_MS932
+#define	JFP_U2E_ICONV_MS932
+#else
+#define	JFP_U2E_ICONV
+#endif
+#include "jfp_ucs2_to_euc16.h"
+
+#define	DEF_SINGLE	'?'
+
+void *
+_icv_open(void)
+{
+	return (_icv_open_unicode((size_t)0));
+}
+
+void
+_icv_close(void *cd)
+{
+	_icv_close_unicode(cd);
+	return;
+}
+
+size_t
+_icv_iconv(void *cd, char **inbuf, size_t *inbytesleft,
+				char **outbuf, size_t *outbytesleft)
+{
+	unsigned char	ic;
+	size_t		rv = (size_t)0;
+	unsigned int	ucs4;
+	unsigned short	euc16;
+
+	unsigned char	*ip;
+        size_t		ileft;
+	char		*op;
+        size_t		oleft;
+
+	/*
+	 * If inbuf and/or *inbuf are NULL, reset conversion descriptor
+	 * and put escape sequence if needed.
+	 */
+	if ((inbuf == NULL) || (*inbuf == NULL)) {
+		_icv_reset_unicode(cd);
+		return ((size_t)0);
+	}
+
+	ip = (unsigned char *)*inbuf;
+	ileft = *inbytesleft;
+	op = *outbuf;
+	oleft = *outbytesleft;
+
+	while (ileft != 0) {
+		GETU(&ucs4);
+
+		if (ucs4 > 0xffff) {
+			/* non-BMP */
+			ic = (unsigned char)DEF_SINGLE;
+			NPUT(ic, "DEF for non-BMP");
+		} else {
+			euc16 = _jfp_ucs2_to_euc16((unsigned short)ucs4);
+
+			switch (euc16 & 0x8080) {
+			case 0x0000:	/* CS0 */
+				ic = (unsigned char)euc16;
+				NPUT(ic, "CS0");
+				break;
+			case 0x8080:	/* CS1 */
+				ic = (unsigned char)((euc16 >> 8) & 0xff);
+				NPUT(ic, "CS1-1");
+				ic = (unsigned char)(euc16 & 0xff);
+				NPUT(ic, "CS1-2");
+				break;
+			case 0x0080:	/* CS2 */
+				NPUT(SS2, "CS2-1");
+				ic = (unsigned char)euc16;
+				NPUT(ic, "CS2-2");
+				break;
+			case 0x8000:	/* CS3 */
+				NPUT(SS3, "E2BIG at CS3-1");
+				ic = (unsigned char)((euc16 >> 8) & 0xff);
+				NPUT(ic, "CS3-2");
+				ic = (unsigned char)(euc16 & CMASK);
+				NPUT(ic | CMSB, "CS3-3");
+				break;
+			}
+		}
+
+next:
+		/*
+		 * One character successfully converted so update
+		 * values outside of this function's stack.
+		 */
+		*inbuf = (char *)ip;
+		*inbytesleft = ileft;
+		*outbuf = op;
+		*outbytesleft = oleft;
+	}
+
+ret:
+	DEBUGPRINTERROR
+
+	/*
+	 * Return value for successful return is not defined by XPG
+	 * so return same as *inbytesleft as existing codes do.
+	 */
+	return ((rv == (size_t)-1) ? rv : *inbytesleft);
+}