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
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
/*
==============================================================================
getid.c
==============================================================================
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <juman.h>
/*
------------------------------------------------------------------------------
GLOBAL:
definition of global variables
------------------------------------------------------------------------------
*/
extern CLASS Class[CLASSIFY_NO + 1][CLASSIFY_NO + 1];
extern TYPE Type[TYPE_NO];
extern FORM Form[TYPE_NO][FORM_NO];
/*
------------------------------------------------------------------------------
FUNCTION:
<hinsi>: return <int:i>
Class[i][0].id == x
------------------------------------------------------------------------------
*/
int get_hinsi_id(U_CHAR *x)
{
int i;
if ( x == NULL )
error(OtherError,"NULL string for hinsi.", EOA);
if ( strcmp(x, "*") == 0 ) return 0;
if ( strcmp(x, "連語") == 0 ) return(atoi(RENGO_ID)); /* yamaji */
for (i = 1; strcmp(Class[i][0].id, x); )
if ( !Class[++i][0].id )
error(OtherError, (char *)x," is undefined in ", GRAMMARFILE, ".", EOA);
return i;
}
/*
------------------------------------------------------------------------------
FUNCTION:
<bunrui>: return <int:i>
Class[hinsi][i].id == x
------------------------------------------------------------------------------
*/
int get_bunrui_id(U_CHAR *x, int hinsi)
{
int i;
if ( !x )
error(OtherError,"NULL string for bunrui.", EOA);
if ( strcmp(x, "*") == 0 ) return 0;
if ( !Class[hinsi][1].id )
error(OtherError, (char *)Class[hinsi][0].id, " has no bunrui in ",
GRAMMARFILE, ".", EOA);
for ( i = 1; strcmp(Class[hinsi][i].id, x); )
if ( !Class[hinsi][++i].id )
error(OtherError, (char *)Class[hinsi][0].id, " does not have bunrui ",
(char *)x, " in ", GRAMMARFILE, "." ,EOA);
return i;
}
/*
------------------------------------------------------------------------------
FUNCTION:
<type>: return <int:i>
Type[i].name == x
------------------------------------------------------------------------------
*/
int get_type_id(U_CHAR *x)
{
int i;
if ( !x )
error(OtherError,"NULL string for type.", EOA);
if ( strcmp(x, "*") == 0 ) return 0;
for (i = 1; strcmp(Type[i].name, x); )
if ( !Type[++i].name )
error(OtherError, (char *)x, " is undefined in ", KATUYOUFILE, ".", EOA);
return i;
}
/*
------------------------------------------------------------------------------
FUNCTION:
<type>: return <int:i>
Form[type][i].name == x
------------------------------------------------------------------------------
*/
int get_form_id(U_CHAR *x, int type)
{
int i;
if ( !x )
error(OtherError,"NULL string for form.", EOA);
if ( strcmp(x, "*") == 0 ) return 0;
if ( type == 0 )
error(OtherError, "Invalid type number for ", (char *)x, ".", EOA);
for ( i = 1; strcmp(Form[type][i].name, x); )
if ( !Form[type][++i].name )
error(OtherError, (char *)Type[type].name, " does not have katuyou ",
(char *)x, " in ", KATUYOUFILE, ".", EOA);
return i;
}
|
