blob: 2445c87d849af0c72497c1af3cffd0d3c06eac5e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
|
#ifndef UNICODE__JAPANESE
#define UNICODE__JAPANESE
/* $Id: Japanese.h,v 1.11 2002/06/30 23:12:58 hio Exp $ */
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
#include "mediate.h"
#include <assert.h>
#ifdef __cplusplus
#include "str.h"
#endif
#ifdef TEST
#include "test.h"
#define ONTEST(cmd) cmd
#else
#define ONTEST(cmd)
#endif
#ifndef EXTERN_C
# ifdef __cplusplus
# define EXTERN_C extern "C"
# else
# define EXTERN_C
# endif
#endif
#ifndef u_char
#define u_char u_char
typedef unsigned char u_char;
#endif
/* util */
#define new_SV_UNDEF() newSVsv(&PL_sv_undef)
EXTERN_C
{
/* sjis <=> utf8 (conv.cpp) */
SV* xs_sjis_utf8(SV* sv_str);
SV* xs_utf8_sjis(SV* sv_str);
/* getcode (getcode.cpp) */
SV* xs_getcode(SV* sv_str);
/* sjis<=>eucjp, sjis<=>jis */
SV* xs_sjis_eucjp(SV* sv_str);
SV* xs_eucjp_sjis(SV* sv_str);
SV* xs_sjis_jis(SV* sv_str);
SV* xs_jis_sjis(SV* sv_str);
/* sjis(i-mode)<=>utf8 */
SV* xs_sjis_imode_utf8(SV* sv_str);
SV* xs_utf8_sjis_imode(SV* sv_str);
/* sjis(j-sky)<=>utf8 */
SV* xs_sjis_jsky_utf8(SV* sv_str);
SV* xs_utf8_sjis_jsky(SV* sv_str);
/* sjis(dot-i)<=>utf8 */
SV* xs_sjis_doti_utf8(SV* sv_str);
SV* xs_utf8_sjis_doti(SV* sv_str);
/* ucs_utf8 */
SV* xs_ucs2_utf8(SV* sv_str);
SV* xs_utf8_ucs2(SV* sv_str);
/* ����ޥåץե������Ϣ */
void do_memmap();
void do_memunmap();
/* SJIS <=> UTF8 �Ѵ��ơ��֥� */
/* index��0..0xffff */
extern unsigned short const* g_u2s_table;
extern unsigned long const* g_s2u_table;
/* i-mode/j-sky/dot-i��ʸ�� <=> UTF8 �Ѵ��ơ��֥� */
extern unsigned long const* g_ei2u_table;
extern unsigned short const* g_eu2i_table;
extern unsigned long const* g_ej2u_table;
extern unsigned char const* g_eu2j_table; // char [][5]
extern unsigned long const* g_ed2u_table;
extern unsigned short const* g_eu2d_table;
/* i-mode/j-sky/dot-i��ʸ�� <=> UTF8 �Ѵ��ơ��֥�����ǿ� */
/* �Х��ȿ��Ǥʤ����ǿ� */
extern int g_ei2u_size;
extern int g_eu2i_size;
extern int g_ej2u_size;
extern int g_eu2j_size;
extern int g_ed2u_size;
extern int g_eu2d_size;
}
#endif /* UNICODE__JAPANESE */
|
