merge m17n patch

add libwc

1 files changed, 70 insertions, 0 deletions

diff --git a/libwc/jis.c b/libwc/jis.c
new file mode 100644
index 0000000..6553c92
--- /dev/null
+++ b/libwc/jis.c
@@ -0,0 +1,70 @@
+
+#include "wc.h"
+#include "jis.h"
+#include "search.h"
+#ifdef USE_UNICODE
+#include "ucs.h"
+#endif
+
+#include "map/jisx0201k_jisx0208.map"
+#include "map/jisx0208_jisx02131.map"
+
+wc_wchar_t
+wc_jisx0201k_to_jisx0208(wc_wchar_t cc)
+{
+    cc.code = jisx0201k_jisx0208_map[cc.code & 0x7f];
+    cc.ccs = cc.code ? WC_CCS_JIS_X_0208 : WC_CCS_UNKNOWN_W;
+    return cc;
+}
+
+wc_wchar_t
+wc_jisx0212_to_jisx0213(wc_wchar_t cc)
+{
+#ifdef USE_UNICODE
+    wc_wchar_t cc2;
+    static wc_table *t1 = NULL;
+    static wc_table *t2 = NULL;
+
+    if (t1 == NULL) {
+	t1 = wc_get_ucs_table(WC_CCS_JIS_X_0213_1);
+	t2 = wc_get_ucs_table(WC_CCS_JIS_X_0213_2);
+    }
+    cc2 = wc_any_to_any(cc, t2);
+    if (cc2.ccs == WC_CCS_JIS_X_0212)
+	return cc2;
+    return wc_any_to_any(cc, t1);
+#else
+    cc.ccs = WC_CCS_UNKNOWN_W;
+    return cc;
+#endif
+}
+
+wc_wchar_t
+wc_jisx0213_to_jisx0212(wc_wchar_t cc)
+{
+#ifdef USE_UNICODE
+    static wc_table *t = NULL;
+
+    if (t == NULL)
+	t = wc_get_ucs_table(WC_CCS_JIS_X_0212);
+    return wc_any_to_any(cc, t);
+#else
+    cc.ccs = WC_CCS_UNKNOWN_W;
+    return cc;
+#endif
+}
+
+wc_ccs
+wc_jisx0208_or_jisx02131(wc_uint16 code)
+{
+    return wc_map_range_search(code & 0x7f7f,
+	jisx0208_jisx02131_map, N_jisx0208_jisx02131_map)
+	? WC_CCS_JIS_X_0213_1 : WC_CCS_JIS_X_0208;
+}
+
+wc_ccs
+wc_jisx0212_or_jisx02132(wc_uint16 code)
+{
+    return wc_jisx0212_jisx02132_map[(code >> 8) & 0x7f]
+	? WC_CCS_JIS_X_0213_2 : WC_CCS_JIS_X_0212;
+}