1 /* $NetBSD: citrus_stdenc.c,v 1.3 2005/10/29 18:02:04 tshiozak Exp $ */ 2 3 /*- 4 * Copyright (c)2003 Citrus Project, 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 * SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 #if defined(LIBC_SCCS) && !defined(lint) 31 __RCSID("$NetBSD: citrus_stdenc.c,v 1.3 2005/10/29 18:02:04 tshiozak Exp $"); 32 #endif /* LIBC_SCCS and not lint */ 33 34 #include "namespace.h" 35 #include <assert.h> 36 #include <errno.h> 37 #include <stdlib.h> 38 #include <string.h> 39 40 #include "citrus_namespace.h" 41 #include "citrus_types.h" 42 #include "citrus_module.h" 43 #include "citrus_stdenc.h" 44 #include "citrus_none.h" 45 46 struct _citrus_stdenc _citrus_stdenc_default = { 47 &_citrus_NONE_stdenc_ops, /* ce_ops */ 48 NULL, /* ce_closure */ 49 NULL, /* ce_module */ 50 &_citrus_NONE_stdenc_traits, /* ce_traits */ 51 }; 52 53 #ifdef _I18N_DYNAMIC 54 55 static int 56 /*ARGSUSED*/ 57 get_state_desc_default(struct _citrus_stdenc * __restrict ce, 58 void * __restrict ps, 59 int id, 60 struct _citrus_stdenc_state_desc * __restrict d) 61 { 62 return EOPNOTSUPP; 63 } 64 65 int 66 _citrus_stdenc_open(struct _citrus_stdenc * __restrict * __restrict rce, 67 char const * __restrict encname, 68 const void * __restrict variable, size_t lenvar) 69 { 70 int ret; 71 _citrus_module_t handle; 72 struct _citrus_stdenc *ce; 73 _citrus_stdenc_getops_t getops; 74 75 _DIAGASSERT(encname != NULL); 76 _DIAGASSERT(!lenvar || variable!=NULL); 77 _DIAGASSERT(rce != NULL); 78 79 if (!strcmp(encname, _CITRUS_DEFAULT_STDENC_NAME)) { 80 *rce = &_citrus_stdenc_default; 81 return (0); 82 } 83 ce = malloc(sizeof(*ce)); 84 if (ce==NULL) { 85 ret = errno; 86 goto bad; 87 } 88 ce->ce_ops = NULL; 89 ce->ce_closure = NULL; 90 ce->ce_module = NULL; 91 ce->ce_traits = NULL; 92 93 ret = _citrus_load_module(&handle, encname); 94 if (ret) 95 goto bad; 96 97 ce->ce_module = handle; 98 99 getops = 100 (_citrus_stdenc_getops_t)_citrus_find_getops(ce->ce_module, 101 encname, "stdenc"); 102 if (getops == NULL) { 103 ret = EINVAL; 104 goto bad; 105 } 106 107 ce->ce_ops = (struct _citrus_stdenc_ops *)malloc(sizeof(*ce->ce_ops)); 108 if (ce->ce_ops == NULL) { 109 ret = errno; 110 goto bad; 111 } 112 113 ret = (*getops)(ce->ce_ops, sizeof(*ce->ce_ops), 114 _CITRUS_STDENC_ABI_VERSION); 115 if (ret) 116 goto bad; 117 118 /* If return ABI version is not expected, should fixup it */ 119 if (ce->ce_ops->eo_abi_version < 0x00000002) { 120 ce->ce_ops->eo_get_state_desc = &get_state_desc_default; 121 } 122 123 /* validation check */ 124 if (ce->ce_ops->eo_init == NULL || 125 ce->ce_ops->eo_uninit == NULL || 126 ce->ce_ops->eo_init_state == NULL || 127 ce->ce_ops->eo_mbtocs == NULL || 128 ce->ce_ops->eo_cstomb == NULL || 129 ce->ce_ops->eo_mbtowc == NULL || 130 ce->ce_ops->eo_wctomb == NULL || 131 ce->ce_ops->eo_get_state_desc == NULL) 132 goto bad; 133 134 /* allocate traits */ 135 ce->ce_traits = malloc(sizeof(*ce->ce_traits)); 136 if (ce->ce_traits == NULL) { 137 ret = errno; 138 goto bad; 139 } 140 /* init and get closure */ 141 ret = (*ce->ce_ops->eo_init)(ce, variable, lenvar, ce->ce_traits); 142 if (ret) 143 goto bad; 144 145 *rce = ce; 146 147 return (0); 148 149 bad: 150 _citrus_stdenc_close(ce); 151 return (ret); 152 } 153 154 void 155 _citrus_stdenc_close(struct _citrus_stdenc *ce) 156 { 157 158 _DIAGASSERT(ce != NULL); 159 160 if (ce == &_citrus_stdenc_default) 161 return; 162 163 if (ce->ce_module) { 164 if (ce->ce_ops) { 165 if (ce->ce_closure && ce->ce_ops->eo_uninit) 166 (*ce->ce_ops->eo_uninit)(ce); 167 free(ce->ce_ops); 168 } 169 free(ce->ce_traits); 170 _citrus_unload_module(ce->ce_module); 171 } 172 free(ce); 173 } 174 175 #else 176 /* !_I18N_DYNAMIC */ 177 178 int 179 /*ARGSUSED*/ 180 _citrus_stdenc_open(struct _citrus_stdenc * __restrict * __restrict rce, 181 char const * __restrict encname, 182 const void * __restrict variable, size_t lenvar) 183 { 184 if (!strcmp(encname, _CITRUS_DEFAULT_STDENC_NAME)) { 185 *rce = &_citrus_stdenc_default; 186 return (0); 187 } 188 return (EINVAL); 189 } 190 191 void 192 /*ARGSUSED*/ 193 _citrus_stdenc_close(struct _citrus_stdenc *ce) 194 { 195 } 196 197 #endif 198