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