1*7c478bd9Sstevel@tonic-gate /* 2*7c478bd9Sstevel@tonic-gate * CDDL HEADER START 3*7c478bd9Sstevel@tonic-gate * 4*7c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the 5*7c478bd9Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only 6*7c478bd9Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance 7*7c478bd9Sstevel@tonic-gate * with the License. 8*7c478bd9Sstevel@tonic-gate * 9*7c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10*7c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing. 11*7c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions 12*7c478bd9Sstevel@tonic-gate * and limitations under the License. 13*7c478bd9Sstevel@tonic-gate * 14*7c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each 15*7c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16*7c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the 17*7c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying 18*7c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner] 19*7c478bd9Sstevel@tonic-gate * 20*7c478bd9Sstevel@tonic-gate * CDDL HEADER END 21*7c478bd9Sstevel@tonic-gate */ 22*7c478bd9Sstevel@tonic-gate /* 23*7c478bd9Sstevel@tonic-gate * Copyright 1997 Sun Microsystems, Inc. All rights reserved. 24*7c478bd9Sstevel@tonic-gate * Use is subject to license terms. 25*7c478bd9Sstevel@tonic-gate */ 26*7c478bd9Sstevel@tonic-gate 27*7c478bd9Sstevel@tonic-gate /* 28*7c478bd9Sstevel@tonic-gate * mbtowc 29*7c478bd9Sstevel@tonic-gate */ 30*7c478bd9Sstevel@tonic-gate 31*7c478bd9Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI" 32*7c478bd9Sstevel@tonic-gate 33*7c478bd9Sstevel@tonic-gate #if !defined(lint) && defined(SCCSIDS) 34*7c478bd9Sstevel@tonic-gate static char *sccsid = "%Z%%M% %I% %E% SMI"; 35*7c478bd9Sstevel@tonic-gate #endif 36*7c478bd9Sstevel@tonic-gate 37*7c478bd9Sstevel@tonic-gate #include <stdlib.h> 38*7c478bd9Sstevel@tonic-gate #include "codeset.h" 39*7c478bd9Sstevel@tonic-gate #include "mbextern.h" 40*7c478bd9Sstevel@tonic-gate 41*7c478bd9Sstevel@tonic-gate #undef mblen 42*7c478bd9Sstevel@tonic-gate 43*7c478bd9Sstevel@tonic-gate int 44*7c478bd9Sstevel@tonic-gate mbtowc(pwc, s, n) 45*7c478bd9Sstevel@tonic-gate wchar_t * pwc; 46*7c478bd9Sstevel@tonic-gate char *s; 47*7c478bd9Sstevel@tonic-gate size_t n; 48*7c478bd9Sstevel@tonic-gate { 49*7c478bd9Sstevel@tonic-gate char *handle; /* handle */ 50*7c478bd9Sstevel@tonic-gate int (*p)(); 51*7c478bd9Sstevel@tonic-gate int ret; 52*7c478bd9Sstevel@tonic-gate 53*7c478bd9Sstevel@tonic-gate switch (_code_set_info.code_id) { 54*7c478bd9Sstevel@tonic-gate case CODESET_NONE: 55*7c478bd9Sstevel@tonic-gate #ifdef DEBUG 56*7c478bd9Sstevel@tonic-gate printf ("DEFAULT: mbtowc invoked\n"); 57*7c478bd9Sstevel@tonic-gate #endif 58*7c478bd9Sstevel@tonic-gate /* 59*7c478bd9Sstevel@tonic-gate * This is a default code set 60*7c478bd9Sstevel@tonic-gate */ 61*7c478bd9Sstevel@tonic-gate if (s == NULL) 62*7c478bd9Sstevel@tonic-gate return (1); 63*7c478bd9Sstevel@tonic-gate else { 64*7c478bd9Sstevel@tonic-gate if (pwc != NULL) 65*7c478bd9Sstevel@tonic-gate *pwc = (unsigned char)*s; 66*7c478bd9Sstevel@tonic-gate return (1); 67*7c478bd9Sstevel@tonic-gate } 68*7c478bd9Sstevel@tonic-gate break; 69*7c478bd9Sstevel@tonic-gate case CODESET_EUC: 70*7c478bd9Sstevel@tonic-gate #ifdef DEBUG 71*7c478bd9Sstevel@tonic-gate printf ("EUC: mbtowc invoked\n"); 72*7c478bd9Sstevel@tonic-gate #endif 73*7c478bd9Sstevel@tonic-gate /* 74*7c478bd9Sstevel@tonic-gate * EUC code set 75*7c478bd9Sstevel@tonic-gate */ 76*7c478bd9Sstevel@tonic-gate return(_mbtowc_euc(pwc, s, n)); 77*7c478bd9Sstevel@tonic-gate break; 78*7c478bd9Sstevel@tonic-gate 79*7c478bd9Sstevel@tonic-gate case CODESET_XCCS: 80*7c478bd9Sstevel@tonic-gate #ifdef DEBUG 81*7c478bd9Sstevel@tonic-gate printf ("XCCS: mbtowc invoked\n"); 82*7c478bd9Sstevel@tonic-gate #endif 83*7c478bd9Sstevel@tonic-gate /* 84*7c478bd9Sstevel@tonic-gate * XCCS code set 85*7c478bd9Sstevel@tonic-gate */ 86*7c478bd9Sstevel@tonic-gate return(_mbtowc_xccs(pwc, s, n)); 87*7c478bd9Sstevel@tonic-gate break; 88*7c478bd9Sstevel@tonic-gate 89*7c478bd9Sstevel@tonic-gate case CODESET_ISO2022: 90*7c478bd9Sstevel@tonic-gate #ifdef DEBUG 91*7c478bd9Sstevel@tonic-gate printf ("ISO2022: mbtowc invoked\n"); 92*7c478bd9Sstevel@tonic-gate #endif 93*7c478bd9Sstevel@tonic-gate /* 94*7c478bd9Sstevel@tonic-gate * ISO family 95*7c478bd9Sstevel@tonic-gate */ 96*7c478bd9Sstevel@tonic-gate return(_mbtowc_iso(pwc, s, n)); 97*7c478bd9Sstevel@tonic-gate break; 98*7c478bd9Sstevel@tonic-gate 99*7c478bd9Sstevel@tonic-gate default: 100*7c478bd9Sstevel@tonic-gate /* 101*7c478bd9Sstevel@tonic-gate * User defined code set 102*7c478bd9Sstevel@tonic-gate */ 103*7c478bd9Sstevel@tonic-gate handle = _ml_open_library(); 104*7c478bd9Sstevel@tonic-gate if (handle == (char *)NULL) 105*7c478bd9Sstevel@tonic-gate return(ERROR_NO_LIB); /* No user library */ 106*7c478bd9Sstevel@tonic-gate p = (int (*)()) dlsym(handle, "_mbtowc"); 107*7c478bd9Sstevel@tonic-gate if (p == (int (*)()) NULL) 108*7c478bd9Sstevel@tonic-gate return(ERROR_NO_SYM); 109*7c478bd9Sstevel@tonic-gate ret = (*p)(pwc, s, n); 110*7c478bd9Sstevel@tonic-gate return (ret); 111*7c478bd9Sstevel@tonic-gate break; 112*7c478bd9Sstevel@tonic-gate } 113*7c478bd9Sstevel@tonic-gate /* NOTREACHED */ 114*7c478bd9Sstevel@tonic-gate } 115*7c478bd9Sstevel@tonic-gate 116*7c478bd9Sstevel@tonic-gate int mblen(s, n) 117*7c478bd9Sstevel@tonic-gate register char *s; int n; 118*7c478bd9Sstevel@tonic-gate { 119*7c478bd9Sstevel@tonic-gate int val; 120*7c478bd9Sstevel@tonic-gate 121*7c478bd9Sstevel@tonic-gate if (_code_set_info.code_id != CODESET_ISO2022) 122*7c478bd9Sstevel@tonic-gate return (mbtowc((wchar_t *)0, s, n)); 123*7c478bd9Sstevel@tonic-gate else { 124*7c478bd9Sstevel@tonic-gate /* 125*7c478bd9Sstevel@tonic-gate * ISO's mbtowc() changes 'states'. 126*7c478bd9Sstevel@tonic-gate */ 127*7c478bd9Sstevel@tonic-gate _savestates(); 128*7c478bd9Sstevel@tonic-gate val = mbtowc((wchar_t *)0, s, n); 129*7c478bd9Sstevel@tonic-gate _restorestates(); 130*7c478bd9Sstevel@tonic-gate return (val); 131*7c478bd9Sstevel@tonic-gate } 132*7c478bd9Sstevel@tonic-gate } 133