1 /* Copyright (C) 2000 Free Software Foundation, Inc. 2 This file is part of the GNU IO Library. 3 4 This library is free software; you can redistribute it and/or 5 modify it under the terms of the GNU General Public License as 6 published by the Free Software Foundation; either version 2, or (at 7 your option) any later version. 8 9 This library is distributed in the hope that it will be useful, but 10 WITHOUT ANY WARRANTY; without even the implied warranty of 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 12 General Public License for more details. 13 14 You should have received a copy of the GNU General Public License 15 along with this library; see the file COPYING. If not, write to 16 the Free Software Foundation, 59 Temple Place - Suite 330, Boston, 17 MA 02111-1307, USA. 18 19 As a special exception, if you link this library with files 20 compiled with a GNU compiler to produce an executable, this does 21 not cause the resulting executable to be covered by the GNU General 22 Public License. This exception does not however invalidate any 23 other reasons why the executable file might be covered by the GNU 24 General Public License. */ 25 26 // As a special exception, you may use this file as part of a free software 27 // library without restriction. Specifically, if other files instantiate 28 // templates or use macros or inline functions from this file, or you compile 29 // this file and link it with other files to produce an executable, this 30 // file does not by itself cause the resulting executable to be covered by 31 // the GNU General Public License. This exception does not however 32 // invalidate any other reasons why the executable file might be covered by 33 // the GNU General Public License. 34 /* Slightly modified from glibc/libio/iofwide.c */ 35 36 #include <libio.h> 37 38 #if defined(_GLIBCPP_USE_WCHAR_T) || defined(_GLIBCPP_USE_TYPE_WCHAR_T) 39 40 /* Prototypes of libio's codecvt functions. */ 41 static enum __codecvt_result 42 do_out(struct _IO_codecvt *codecvt, __c_mbstate_t *statep, 43 const wchar_t *from_start, const wchar_t *from_end, 44 const wchar_t **from_stop, char *to_start, char *to_end, 45 char **to_stop); 46 47 static enum __codecvt_result 48 do_unshift(struct _IO_codecvt *codecvt, __c_mbstate_t *statep, char *to_start, 49 char *to_end, char **to_stop); 50 51 static enum __codecvt_result 52 do_in(struct _IO_codecvt *codecvt, __c_mbstate_t *statep, 53 const char *from_start, const char *from_end, const char **from_stop, 54 wchar_t *to_start, wchar_t *to_end, wchar_t **to_stop); 55 56 static int 57 do_encoding(struct _IO_codecvt *codecvt); 58 59 static int 60 do_length(struct _IO_codecvt *codecvt, __c_mbstate_t *statep, 61 const char *from_start, const char *from_end, _IO_size_t max); 62 63 static int 64 do_max_length(struct _IO_codecvt *codecvt); 65 66 static int 67 do_always_noconv(struct _IO_codecvt *codecvt); 68 69 70 /* The functions used in `codecvt' for libio are always the same. */ 71 struct _IO_codecvt __c_libio_codecvt = 72 { 73 .__codecvt_destr = NULL, /* Destructor, never used. */ 74 .__codecvt_do_out = do_out, 75 .__codecvt_do_unshift = do_unshift, 76 .__codecvt_do_in = do_in, 77 .__codecvt_do_encoding = do_encoding, 78 .__codecvt_do_always_noconv = do_always_noconv, 79 .__codecvt_do_length = do_length, 80 .__codecvt_do_max_length = do_max_length 81 }; 82 83 static enum __codecvt_result 84 do_out(struct _IO_codecvt *codecvt, __c_mbstate_t *statep, 85 const wchar_t *from_start, const wchar_t *from_end, 86 const wchar_t **from_stop, char *to_start, char *to_end, 87 char **to_stop) 88 { 89 enum __codecvt_result res = __codecvt_ok; 90 91 while (from_start < from_end) 92 { 93 if (to_start >= to_end) 94 { 95 res = __codecvt_partial; 96 break; 97 } 98 *to_start++ = (char) *from_start++; 99 } 100 101 *from_stop = from_start; 102 *to_stop = to_start; 103 104 return res; 105 } 106 107 108 static enum __codecvt_result 109 do_unshift(struct _IO_codecvt *codecvt, __c_mbstate_t *statep, 110 char *to_start, char *to_end, char **to_stop) 111 { 112 *to_stop = to_start; 113 return __codecvt_ok; 114 } 115 116 117 static enum __codecvt_result 118 do_in(struct _IO_codecvt *codecvt, __c_mbstate_t *statep, 119 const char *from_start, const char *from_end, const char **from_stop, 120 wchar_t *to_start, wchar_t *to_end, wchar_t **to_stop) 121 { 122 enum __codecvt_result res = __codecvt_ok; 123 124 while (from_start < from_end) 125 { 126 if (to_start >= to_end) 127 { 128 res = __codecvt_partial; 129 break; 130 } 131 *to_start++ = (wchar_t) *from_start++; 132 } 133 134 *from_stop = from_start; 135 *to_stop = to_start; 136 137 return res; 138 } 139 140 141 static int 142 do_encoding(struct _IO_codecvt *codecvt) 143 { return 1; } 144 145 146 static int 147 do_always_noconv(struct _IO_codecvt *codecvt) 148 { return 0; } 149 150 151 static int 152 do_length(struct _IO_codecvt *codecvt, __c_mbstate_t *statep, 153 const char *from_start, const char *from_end, _IO_size_t max) 154 { return from_end - from_start; } 155 156 157 static int 158 do_max_length(struct _IO_codecvt *codecvt) 159 { return 1; } 160 161 #endif /* _GLIBCPP_USE_WCHAR_T */ 162