/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/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 usr/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 (c) 1988 AT&T */
/*    All Rights Reserved   */


/*
 *      Copyright (c) 1997, by Sun Microsystems, Inc.
 *      All rights reserved.
 */

#include        <stdlib.h>
#include        <sys/types.h>
#include        "curses_inc.h"


/*
 *      Translate process code to byte-equivalent
 *      Return the length of the byte-equivalent string
 */

/*
 *      use _curs_wctomb() instead of _code2byte(code, bytes)
 */


/*
 *      Translate a set of byte to a single process code
 */

/*
 *      use _curs_mbtowc() instead of wchar_t _byte2code(bytes)
 */


/*
 *      Translate a string of wchar_t to a byte string.
 *      code: the input code string
 *      byte: if not NULL, space to store the output string
 *      n: maximum number of codes to be translated.
 */
char
*_strcode2byte(wchar_t *code, char *byte, int n)
{
        char            *bufp;
        wchar_t         *endcode;
        static char     *buf;
        static int      bufsize;

        /* compute the length of the code string */
        if (n < 0)
                for (n = 0; code[n] != 0; ++n)
                        ;

        /* get space to store the translated string */
        if (!byte && (n*CSMAX+1) > bufsize) {
                if (buf)
                        free(buf);
                bufsize = n * CSMAX + 1;
                if ((buf = malloc(bufsize * sizeof (char))) == NULL)
                        bufsize = 0;
                }

        /* no space to do it */
        if (!byte && !buf)
                return (NULL);

        /* start the translation */
        bufp = byte ? byte : buf;
        endcode = code+n;
        while (code < endcode && *code) {
                bufp += _curs_wctomb(bufp, *code & TRIM);
                ++code;
        }
        *bufp = '\0';

        return (byte ? byte : buf);
}



/*
 *      Translate a byte-string to a wchar_t string.
 */
wchar_t
*_strbyte2code(char *byte, wchar_t *code, int n)
{
        char            *endbyte;
        wchar_t         *bufp;
        static wchar_t  *buf;
        static int      bufsize;

        if (n < 0)
                for (n = 0; byte[n] != '\0'; ++n)
                        ;

        if (!code && (n + 1) > bufsize) {
                if (buf)
                        free((char *)buf);
                bufsize = n + 1;
                if ((buf = (wchar_t *)malloc(bufsize * sizeof (wchar_t))) ==
                    NULL)
                        bufsize = 0;
        }

        if (!code && !buf)
                return (NULL);

        bufp = code ? code : buf;
        endbyte = byte + n;

        while (byte < endbyte && *byte) {
                int             type, width;
                wchar_t         wchar;

                type = TYPE(*byte & 0377);
                width = cswidth[type];
                if (type == 1 || type == 2)
                        width++;

                if (byte + width <= endbyte) {
                        (void) _curs_mbtowc(&wchar, byte, width);
                        *bufp++ = wchar;
                }

                byte += width;
        }
        *bufp = 0;

        return (code ? code : buf);
}