usr/src/lib/libcurses/screen/mbgetwidth.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License, Version 1.0 only
   6  * (the "License").  You may not use this file except in compliance
   7  * with the License.
   8  *
   9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
  10  * or http://www.opensolaris.org/os/licensing.
  11  * See the License for the specific language governing permissions
  12  * and limitations under the License.
  13  *
  14  * When distributing Covered Code, include this CDDL HEADER in each
  15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  16  * If applicable, add the following below this CDDL HEADER, with the
  17  * fields enclosed by brackets "[]" replaced with your own identifying
  18  * information: Portions Copyright [yyyy] [name of copyright owner]
  19  *
  20  * CDDL HEADER END
  21  */
  22 /*  Copyright (c) 1988 AT&T */
  23 /*    All Rights Reserved   */
  24
  25
  26 /*
  27  *      Copyright (c) 1997, by Sun Microsystems, Inc.
  28  *      All rights reserved.
  29  */
  30
  31 #pragma ident   "%Z%%M% %I%     %E% SMI"
  32
  33 /*LINTLIBRARY*/
  34
  35 #include        "curses_inc.h"
  36 #include        <sys/types.h>
  37 #include        <ctype.h>
  38
  39 #define CSWIDTH 514
  40
  41 short           cswidth[4] = {-1, 1, 1, 1};     /* character length */
  42 short           _curs_scrwidth[4] = {1, 1, 1, 1};       /* screen width */
  43
  44 /*
  45  * This function is called only once in a program.
  46  * Before cgetwidth() is called, setlocale() must be called.
  47  */
  48
  49 void
  50 mbgetwidth(void)
  51 {
  52         unsigned char *cp = &__ctype[CSWIDTH];
  53
  54         cswidth[0] = cp[0];
  55         cswidth[1] = cp[1];
  56         cswidth[2] = cp[2];
  57         _curs_scrwidth[0] = cp[3];
  58         _curs_scrwidth[1] = cp[4];
  59         _curs_scrwidth[2] = cp[5];
  60
  61 }
  62
  63 int
  64 mbeucw(int c)
  65 {
  66         c &= 0xFF;
  67
  68         if (c & 0x80) {
  69                 if (c == SS2) {
  70                         return (cswidth[1]);
  71                 } else if (c == SS3) {
  72                         return (cswidth[2]);
  73                 }
  74                 return (cswidth[0]);
  75         }
  76         return (1);
  77 }
  78
  79 int
  80 mbscrw(int c)
  81 {
  82         c &= 0xFF;
  83
  84         if (c & 0x80) {
  85                 if (c == SS2) {
  86                         return (_curs_scrwidth[1]);
  87                 } else if (c == SS3) {
  88                         return (_curs_scrwidth[2]);
  89                 }
  90                 return (_curs_scrwidth[0]);
  91         }
  92         return (1);
  93 }
  94
  95 int
  96 wcscrw(wchar_t wc)
  97 {
  98         int     rv;
  99
 100         switch (wc & EUCMASK) {
 101         case    P11:    /* Code set 1 */
 102                 rv = _curs_scrwidth[0];
 103                 break;
 104         case    P01:    /* Code set 2 */
 105                 rv = _curs_scrwidth[1];
 106                 break;
 107         case    P10:    /* Code set 3 */
 108                 rv = _curs_scrwidth[2];
 109                 break;
 110         default :       /* Code set 0 */
 111                 rv = 1;
 112                 break;
 113         }
 114
 115         return (rv);
 116 }