Return to c99.h CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / libiconv / lib

Annotation of embedaddon/libiconv/lib/c99.h, revision 1.1

1.1     ! misho       1: /*
        !             2:  * Copyright (C) 1999-2002 Free Software Foundation, Inc.
        !             3:  * This file is part of the GNU LIBICONV Library.
        !             4:  *
        !             5:  * The GNU LIBICONV Library is free software; you can redistribute it
        !             6:  * and/or modify it under the terms of the GNU Library General Public
        !             7:  * License as published by the Free Software Foundation; either version 2
        !             8:  * of the License, or (at your option) any later version.
        !             9:  *
        !            10:  * The GNU LIBICONV Library is distributed in the hope that it will be
        !            11:  * useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
        !            12:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
        !            13:  * Library General Public License for more details.
        !            14:  *
        !            15:  * You should have received a copy of the GNU Library General Public
        !            16:  * License along with the GNU LIBICONV Library; see the file COPYING.LIB.
        !            17:  * If not, write to the Free Software Foundation, Inc., 51 Franklin Street,
        !            18:  * Fifth Floor, Boston, MA 02110-1301, USA.
        !            19:  */
        !            20: 
        !            21: /*
        !            22:  * C99
        !            23:  * This is ASCII with \uXXXX and \UXXXXXXXX escape sequences, denoting Unicode
        !            24:  * characters. See ISO/IEC 9899:1999, section 6.4.3.
        !            25:  * The treatment of control characters in the range U+0080..U+009F is not
        !            26:  * specified; we pass them through unmodified.
        !            27:  */
        !            28: 
        !            29: static int
        !            30: c99_mbtowc (conv_t conv, ucs4_t *pwc, const unsigned char *s, int n)
        !            31: {
        !            32:   unsigned char c;
        !            33:   ucs4_t wc;
        !            34:   int i;
        !            35: 
        !            36:   c = s[0];
        !            37:   if (c < 0xa0) {
        !            38:     if (c != '\\') {
        !            39:       *pwc = c;
        !            40:       return 1;
        !            41:     }
        !            42:     if (n < 2)
        !            43:       return RET_TOOFEW(0);
        !            44:     c = s[1];
        !            45:     if (c == 'u') {
        !            46:       wc = 0;
        !            47:       for (i = 2; i < 6; i++) {
        !            48:         if (n <= i)
        !            49:           return RET_TOOFEW(0);
        !            50:         c = s[i];
        !            51:         if (c >= '0' && c <= '9')
        !            52:           c -= '0';
        !            53:         else if (c >= 'A' && c <= 'Z')
        !            54:           c -= 'A'-10;
        !            55:         else if (c >= 'a' && c <= 'z')
        !            56:           c -= 'a'-10;
        !            57:         else
        !            58:           goto simply_backslash;
        !            59:         wc |= (ucs4_t) c << (4 * (5-i));
        !            60:       }
        !            61:       if ((wc >= 0x00a0 && !(wc >= 0xd800 && wc < 0xe000))
        !            62:           || wc == 0x0024 || wc == 0x0040 || wc == 0x0060) {
        !            63:         *pwc = wc;
        !            64:         return 6;
        !            65:       }
        !            66:     } else if (c == 'U') {
        !            67:       wc = 0;
        !            68:       for (i = 2; i < 10; i++) {
        !            69:         if (n <= i)
        !            70:           return RET_TOOFEW(0);
        !            71:         c = s[i];
        !            72:         if (c >= '0' && c <= '9')
        !            73:           c -= '0';
        !            74:         else if (c >= 'A' && c <= 'Z')
        !            75:           c -= 'A'-10;
        !            76:         else if (c >= 'a' && c <= 'z')
        !            77:           c -= 'a'-10;
        !            78:         else
        !            79:           goto simply_backslash;
        !            80:         wc |= (ucs4_t) c << (4 * (9-i));
        !            81:       }
        !            82:       if ((wc >= 0x00a0 && !(wc >= 0xd800 && wc < 0xe000))
        !            83:           || wc == 0x0024 || wc == 0x0040 || wc == 0x0060) {
        !            84:         *pwc = wc;
        !            85:         return 10;
        !            86:       }
        !            87:     } else
        !            88:       goto simply_backslash;
        !            89:   }
        !            90:   return RET_ILSEQ;
        !            91: simply_backslash:
        !            92:   *pwc = '\\';
        !            93:   return 1;
        !            94: }
        !            95: 
        !            96: static int
        !            97: c99_wctomb (conv_t conv, unsigned char *r, ucs4_t wc, int n)
        !            98: {
        !            99:   if (wc < 0xa0) {
        !           100:     *r = wc;
        !           101:     return 1;
        !           102:   } else {
        !           103:     int result;
        !           104:     unsigned char u;
        !           105:     if (wc < 0x10000) {
        !           106:       result = 6;
        !           107:       u = 'u';
        !           108:     } else {
        !           109:       result = 10;
        !           110:       u = 'U';
        !           111:     }
        !           112:     if (n >= result) {
        !           113:       int count;
        !           114:       r[0] = '\\';
        !           115:       r[1] = u;
        !           116:       r += 2;
        !           117:       for (count = result-3; count >= 0; count--) {
        !           118:         unsigned int i = (wc >> (4*count)) & 0x0f;
        !           119:         *r++ = (i < 10 ? '0'+i : 'a'-10+i);
        !           120:       }
        !           121:       return result;
        !           122:     } else
        !           123:       return RET_TOOSMALL;
        !           124:   }
        !           125: }