xref: /titanic_44/usr/src/lib/libcurses/screen/mbtowc.c (revision 7257d1b4d25bfac0c802847390e98a464fd787ac)
17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate  * CDDL HEADER START
37c478bd9Sstevel@tonic-gate  *
47c478bd9Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*7257d1b4Sraf  * Common Development and Distribution License (the "License").
6*7257d1b4Sraf  * You may not use this file except in compliance with the License.
77c478bd9Sstevel@tonic-gate  *
87c478bd9Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
97c478bd9Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
107c478bd9Sstevel@tonic-gate  * See the License for the specific language governing permissions
117c478bd9Sstevel@tonic-gate  * and limitations under the License.
127c478bd9Sstevel@tonic-gate  *
137c478bd9Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
147c478bd9Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
157c478bd9Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
167c478bd9Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
177c478bd9Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
187c478bd9Sstevel@tonic-gate  *
197c478bd9Sstevel@tonic-gate  * CDDL HEADER END
207c478bd9Sstevel@tonic-gate  */
21e8031f0aSraf 
227c478bd9Sstevel@tonic-gate /*
23*7257d1b4Sraf  * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
24e8031f0aSraf  * Use is subject to license terms.
257c478bd9Sstevel@tonic-gate  */
267c478bd9Sstevel@tonic-gate 
27*7257d1b4Sraf /*  Copyright (c) 1988 AT&T */
28*7257d1b4Sraf /*    All Rights Reserved   */
29*7257d1b4Sraf 
307c478bd9Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
317c478bd9Sstevel@tonic-gate 
327c478bd9Sstevel@tonic-gate #include <widec.h>
337c478bd9Sstevel@tonic-gate #include <ctype.h>
347c478bd9Sstevel@tonic-gate #include <sys/types.h>
357c478bd9Sstevel@tonic-gate #include "curses_wchar.h"
367c478bd9Sstevel@tonic-gate 
377c478bd9Sstevel@tonic-gate int
_curs_mbtowc(wchar_t * wchar,const char * s,size_t n)387c478bd9Sstevel@tonic-gate _curs_mbtowc(wchar_t *wchar, const char *s, size_t n)
397c478bd9Sstevel@tonic-gate {
407c478bd9Sstevel@tonic-gate 	int length, c;
417c478bd9Sstevel@tonic-gate 	wchar_t intcode;
427c478bd9Sstevel@tonic-gate 	char *olds = (char *)s;
437c478bd9Sstevel@tonic-gate 	wchar_t mask;
447c478bd9Sstevel@tonic-gate 
457c478bd9Sstevel@tonic-gate 	if (s == (char *)0)
467c478bd9Sstevel@tonic-gate 		return (0);
477c478bd9Sstevel@tonic-gate 	if (n == 0)
487c478bd9Sstevel@tonic-gate 		return (-1);
497c478bd9Sstevel@tonic-gate 	c = (unsigned char)*s++;
507c478bd9Sstevel@tonic-gate 	if (c < 0200) {
517c478bd9Sstevel@tonic-gate 		if (wchar)
527c478bd9Sstevel@tonic-gate 			*wchar = c;
537c478bd9Sstevel@tonic-gate 		return (c ? 1 : 0);
547c478bd9Sstevel@tonic-gate 	}
557c478bd9Sstevel@tonic-gate 	intcode = 0;
567c478bd9Sstevel@tonic-gate 	if (c == SS2) {
577c478bd9Sstevel@tonic-gate 		if ((length = eucw2) == 0)
587c478bd9Sstevel@tonic-gate 			goto lab1;
597c478bd9Sstevel@tonic-gate 		mask = P01;
607c478bd9Sstevel@tonic-gate 		goto lab2;
617c478bd9Sstevel@tonic-gate 	} else if (c == SS3) {
627c478bd9Sstevel@tonic-gate 		if ((length = eucw3) == 0)
637c478bd9Sstevel@tonic-gate 			goto lab1;
647c478bd9Sstevel@tonic-gate 		mask = P10;
657c478bd9Sstevel@tonic-gate 		goto lab2;
667c478bd9Sstevel@tonic-gate 	}
677c478bd9Sstevel@tonic-gate lab1:
687c478bd9Sstevel@tonic-gate 	if (iscntrl(c)) {
697c478bd9Sstevel@tonic-gate 		if (wchar)
707c478bd9Sstevel@tonic-gate 			*wchar = c;
717c478bd9Sstevel@tonic-gate 		return (1);
727c478bd9Sstevel@tonic-gate 	}
737c478bd9Sstevel@tonic-gate 	length = eucw1 - 1;
747c478bd9Sstevel@tonic-gate 	mask = P11;
757c478bd9Sstevel@tonic-gate 	intcode = c & 0177;
767c478bd9Sstevel@tonic-gate lab2:
777c478bd9Sstevel@tonic-gate 	if (length + 1 > n || length < 0)
787c478bd9Sstevel@tonic-gate 		return (-1);
797c478bd9Sstevel@tonic-gate 	while (length--) {
807c478bd9Sstevel@tonic-gate 		if ((c = (unsigned char)*s++) < 0200 || iscntrl(c))
817c478bd9Sstevel@tonic-gate 			return (-1);
827c478bd9Sstevel@tonic-gate 		intcode = (intcode << 7) | (c & 0x7F);
837c478bd9Sstevel@tonic-gate 	}
847c478bd9Sstevel@tonic-gate 	if (wchar)
857c478bd9Sstevel@tonic-gate 		*wchar = intcode | mask;
867c478bd9Sstevel@tonic-gate 	/*LINTED*/
877c478bd9Sstevel@tonic-gate 	return ((int)(s - olds));
887c478bd9Sstevel@tonic-gate }
89