diff options
Diffstat (limited to 'symbol.c')
| -rw-r--r-- | symbol.c | 168 |
1 files changed, 168 insertions, 0 deletions
diff --git a/symbol.c b/symbol.c new file mode 100644 index 0000000..9a482b3 --- /dev/null +++ b/symbol.c @@ -0,0 +1,168 @@ + +#include "fm.h" + +#include "Symbols/alt.sym" +#include "Symbols/graph.sym" +#ifdef USE_M17N +#include "Symbols/eucjp.sym" +#include "Symbols/euckr.sym" +#include "Symbols/euccn.sym" +#include "Symbols/euctw.sym" +#include "Symbols/big5.sym" +#ifdef USE_UNICODE +#include "Symbols/utf8.sym" +#endif +#include "Symbols/cp850.sym" + +typedef struct { + wc_ces ces; + char width; + char **item; + char encode; +} symbol_set; + +typedef struct { + wc_ces charset; + symbol_set *symbol; +} charset_symbol_set; + +/* *INDENT-OFF* */ +static symbol_set alt_symbol_set = { WC_CES_US_ASCII, 1, alt_symbol, 1 }; +static symbol_set alt2_symbol_set = { WC_CES_US_ASCII, 2, alt2_symbol, 1 }; +static symbol_set eucjp_symbol_set = { WC_CES_EUC_JP, 2, eucjp_symbol, 0 }; +static symbol_set euckr_symbol_set = { WC_CES_EUC_KR, 2, euckr_symbol, 0 }; +static symbol_set euccn_symbol_set = { WC_CES_EUC_CN, 2, euccn_symbol, 0 }; +static symbol_set euctw_symbol_set = { WC_CES_EUC_TW, 2, euctw_symbol, 0 }; +static symbol_set big5_symbol_set = { WC_CES_BIG5, 2, big5_symbol, 0 }; +#ifdef USE_UNICODE +static symbol_set utf8_symbol_set = { WC_CES_UTF_8, 1, utf8_symbol, 0 }; +#endif +static symbol_set cp850_symbol_set = { WC_CES_CP850, 1, cp850_symbol, 0 }; + +static charset_symbol_set charset_symbol_list[] = { + { WC_CES_EUC_JP, &eucjp_symbol_set }, + { WC_CES_SHIFT_JIS, &eucjp_symbol_set }, + { WC_CES_ISO_2022_JP, &eucjp_symbol_set }, + { WC_CES_ISO_2022_JP_2, &eucjp_symbol_set }, + { WC_CES_ISO_2022_JP_3, &eucjp_symbol_set }, + { WC_CES_EUC_KR, &euckr_symbol_set }, + { WC_CES_ISO_2022_KR, &euckr_symbol_set }, + { WC_CES_JOHAB, &euckr_symbol_set }, + { WC_CES_UHC, &euckr_symbol_set }, + { WC_CES_EUC_CN, &euccn_symbol_set }, + { WC_CES_GBK, &euccn_symbol_set }, + { WC_CES_GB18030, &euccn_symbol_set }, + { WC_CES_HZ_GB_2312, &euccn_symbol_set }, + { WC_CES_ISO_2022_CN, &euccn_symbol_set }, + { WC_CES_EUC_TW, &euctw_symbol_set }, + { WC_CES_BIG5, &big5_symbol_set }, + { WC_CES_HKSCS, &big5_symbol_set }, +#ifdef USE_UNICODE + { WC_CES_UTF_8, &utf8_symbol_set }, +#endif + { WC_CES_CP850, &cp850_symbol_set }, + { 0, NULL }, +}; +/* *INDENT-ON* */ + +static wc_ces save_charset = 0; +static symbol_set *save_symbol = NULL; + +static void +encode_symbol(symbol_set * s) +{ + int i; + + for (i = 0; s->item[i]; i++) { + if (*(s->item[i])) + s->item[i] = wc_conv(s->item[i], s->ces, InnerCharset)->ptr; + } + s->encode = 1; +} + +char ** +get_symbol(wc_ces charset, int *width) +{ + charset_symbol_set *p; + symbol_set *s = NULL; + + if (charset == save_charset && save_symbol != NULL && + *width == save_symbol->width) { + *width = save_symbol->width; + return save_symbol->item; + } + save_charset = charset; + for (p = charset_symbol_list; p->charset; p++) { + if (charset == p->charset && + (*width == 0 || *width == p->symbol->width)) { + s = p->symbol; + break; + } + } + if (s == NULL) + s = (*width == 2) ? &alt2_symbol_set : &alt_symbol_set; + if (s != save_symbol) { + if (!s->encode) + encode_symbol(s); + save_symbol = s; + } + *width = s->width; + return s->item; +} + +char ** +set_symbol(int width) +{ + static char **symbol_buf = NULL; + static int save_width = -1; + symbol_set *s = &alt_symbol_set; + int i; + Str tmp; + + if (width == save_width) + return symbol_buf; + if (symbol_buf == NULL) { + for (i = 0; s->item[i]; i++) ; + symbol_buf = New_N(char *, i); + } + for (i = 0; s->item[i]; i++) { + tmp = Strnew_size(4); + if (width == 2) + wtf_push(tmp, WC_CCS_SPECIAL_W, (wc_uint32) (SYMBOL_BASE + i)); + else + wtf_push(tmp, WC_CCS_SPECIAL, (wc_uint32) (SYMBOL_BASE + i)); + symbol_buf[i] = tmp->ptr; + } + save_width = width; + return symbol_buf; +} + +#else + +char ** +get_symbol(void) +{ + return alt_symbol; +} +#endif + +void +push_symbol(Str str, char symbol, int width, int n) +{ + char buf[2], *p; + int i; + +#ifdef USE_M17N + if (width == 2) + p = alt2_symbol[(int)symbol]; + else +#endif + p = alt_symbol[(int)symbol]; + for (i = 0; i < 2 && *p; i++, p++) + buf[i] = (*p == ' ') ? NBSP_CODE : *p; + + Strcat(str, Sprintf("<_SYMBOL TYPE=%d>", symbol)); + for (; n > 0; n--) + Strcat_charp_n(str, buf, i); + Strcat_charp(str, "</_SYMBOL>"); +} |