1*16d86563SAlexander Pyhalov /*
2*16d86563SAlexander Pyhalov * CDDL HEADER START
3*16d86563SAlexander Pyhalov *
4*16d86563SAlexander Pyhalov * The contents of this file are subject to the terms of the
5*16d86563SAlexander Pyhalov * Common Development and Distribution License (the "License").
6*16d86563SAlexander Pyhalov * You may not use this file except in compliance with the License.
7*16d86563SAlexander Pyhalov *
8*16d86563SAlexander Pyhalov * You can obtain a copy of the license at src/OPENSOLARIS.LICENSE
9*16d86563SAlexander Pyhalov * or http://www.opensolaris.org/os/licensing.
10*16d86563SAlexander Pyhalov * See the License for the specific language governing permissions
11*16d86563SAlexander Pyhalov * and limitations under the License.
12*16d86563SAlexander Pyhalov *
13*16d86563SAlexander Pyhalov * When distributing Covered Code, include this CDDL HEADER in each
14*16d86563SAlexander Pyhalov * file and include the License file at src/OPENSOLARIS.LICENSE.
15*16d86563SAlexander Pyhalov * If applicable, add the following below this CDDL HEADER, with the
16*16d86563SAlexander Pyhalov * fields enclosed by brackets "[]" replaced with your own identifying
17*16d86563SAlexander Pyhalov * information: Portions Copyright [yyyy] [name of copyright owner]
18*16d86563SAlexander Pyhalov *
19*16d86563SAlexander Pyhalov * CDDL HEADER END
20*16d86563SAlexander Pyhalov */
21*16d86563SAlexander Pyhalov /* $Id: c2p.c,v 1.12 1997/10/31 16:16:56 binz Exp $ SMI: ALE */
22*16d86563SAlexander Pyhalov
23*16d86563SAlexander Pyhalov /*
24*16d86563SAlexander Pyhalov * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
25*16d86563SAlexander Pyhalov * Use is subject to license terms.
26*16d86563SAlexander Pyhalov */
27*16d86563SAlexander Pyhalov
28*16d86563SAlexander Pyhalov /*
29*16d86563SAlexander Pyhalov * Convert 2 byte completion code to
30*16d86563SAlexander Pyhalov * 2 byte combination code
31*16d86563SAlexander Pyhalov * 1) find the sequential No. of initial and middle sounds.
32*16d86563SAlexander Pyhalov * 2) decide the displacement of final sound from the starting point.
33*16d86563SAlexander Pyhalov * 3) combine each sounds into combination code.
34*16d86563SAlexander Pyhalov */
35*16d86563SAlexander Pyhalov
36*16d86563SAlexander Pyhalov #include <stdio.h>
37*16d86563SAlexander Pyhalov #include "kdefs.h"
38*16d86563SAlexander Pyhalov #include "ktable.h"
39*16d86563SAlexander Pyhalov
40*16d86563SAlexander Pyhalov #define SKIP 0xa1 + 0xff - 0xfe
41*16d86563SAlexander Pyhalov
42*16d86563SAlexander Pyhalov #define CI_CNT 19 - 1
43*16d86563SAlexander Pyhalov #define V_CNT 21 - 1
44*16d86563SAlexander Pyhalov
45*16d86563SAlexander Pyhalov /* KS C 5601-1986 */
c2p(comp2)46*16d86563SAlexander Pyhalov KCHAR c2p(comp2)
47*16d86563SAlexander Pyhalov KCHAR comp2;
48*16d86563SAlexander Pyhalov {
49*16d86563SAlexander Pyhalov
50*16d86563SAlexander Pyhalov KCHAR comb2;
51*16d86563SAlexander Pyhalov short Ci_val; /* initial sound */
52*16d86563SAlexander Pyhalov short V_val ; /* middle sound */
53*16d86563SAlexander Pyhalov short Cf_val; /* final sound */
54*16d86563SAlexander Pyhalov short mask ;
55*16d86563SAlexander Pyhalov short high = CI_CNT ;
56*16d86563SAlexander Pyhalov short low = 0 ;
57*16d86563SAlexander Pyhalov
58*16d86563SAlexander Pyhalov int disp,cnt;
59*16d86563SAlexander Pyhalov
60*16d86563SAlexander Pyhalov long Cfbit ;
61*16d86563SAlexander Pyhalov
62*16d86563SAlexander Pyhalov /*
63*16d86563SAlexander Pyhalov * Find initial sound (Ci_val) and
64*16d86563SAlexander Pyhalov * middle sound (V_val )
65*16d86563SAlexander Pyhalov * which make the starting point for 'comp2'.
66*16d86563SAlexander Pyhalov */
67*16d86563SAlexander Pyhalov
68*16d86563SAlexander Pyhalov for (;;) {
69*16d86563SAlexander Pyhalov Ci_val = (low + high) / 2 ;
70*16d86563SAlexander Pyhalov if (low >= high)
71*16d86563SAlexander Pyhalov break ;
72*16d86563SAlexander Pyhalov if (comp2 < cmp_srchtbl[Ci_val][0])
73*16d86563SAlexander Pyhalov high = Ci_val - 1 ;
74*16d86563SAlexander Pyhalov else if (comp2 < cmp_srchtbl[Ci_val+1][0])
75*16d86563SAlexander Pyhalov break ;
76*16d86563SAlexander Pyhalov else low = Ci_val + 1 ;
77*16d86563SAlexander Pyhalov }
78*16d86563SAlexander Pyhalov
79*16d86563SAlexander Pyhalov V_val = 1;
80*16d86563SAlexander Pyhalov while(1) {
81*16d86563SAlexander Pyhalov if (comp2 < cmp_srchtbl[Ci_val][V_val]) {
82*16d86563SAlexander Pyhalov while(cmp_srchtbl[Ci_val][--V_val] == 0)
83*16d86563SAlexander Pyhalov ;
84*16d86563SAlexander Pyhalov break;
85*16d86563SAlexander Pyhalov }else if (V_val == V_CNT)
86*16d86563SAlexander Pyhalov break ;
87*16d86563SAlexander Pyhalov V_val++;
88*16d86563SAlexander Pyhalov }
89*16d86563SAlexander Pyhalov
90*16d86563SAlexander Pyhalov /* Find displacement (temporary final sound value) */
91*16d86563SAlexander Pyhalov
92*16d86563SAlexander Pyhalov disp = comp2 - cmp_srchtbl[Ci_val][V_val] ;
93*16d86563SAlexander Pyhalov mask = cmp_srchtbl[Ci_val][V_val] & BYTE_MASK ;
94*16d86563SAlexander Pyhalov
95*16d86563SAlexander Pyhalov if ((mask + disp) > 0xfe)
96*16d86563SAlexander Pyhalov disp -= SKIP ;
97*16d86563SAlexander Pyhalov
98*16d86563SAlexander Pyhalov /* Find the value of final sound */
99*16d86563SAlexander Pyhalov
100*16d86563SAlexander Pyhalov Cfbit = cmp_bitmap[Ci_val][V_val] ;
101*16d86563SAlexander Pyhalov for (cnt = -1 , Cf_val = -1; cnt < disp; Cf_val++)
102*16d86563SAlexander Pyhalov {
103*16d86563SAlexander Pyhalov if (Cfbit & BIT_MASK)
104*16d86563SAlexander Pyhalov cnt++ ;
105*16d86563SAlexander Pyhalov Cfbit >>= 1 ;
106*16d86563SAlexander Pyhalov }
107*16d86563SAlexander Pyhalov
108*16d86563SAlexander Pyhalov /* make 2 byte combination code */
109*16d86563SAlexander Pyhalov
110*16d86563SAlexander Pyhalov comb2 = (unsigned int) (Ci_val + 0x0a) ;
111*16d86563SAlexander Pyhalov comb2 = (comb2 << 5) | (V_val + (V_val + 1)/3 + 2) ;
112*16d86563SAlexander Pyhalov comb2 = (comb2 << 5) | Cf_val ;
113*16d86563SAlexander Pyhalov
114*16d86563SAlexander Pyhalov return(comb2 | 0x8000) ;
115*16d86563SAlexander Pyhalov }
116*16d86563SAlexander Pyhalov
117*16d86563SAlexander Pyhalov /* KS C 5601-1992 */
c2j(comp2)118*16d86563SAlexander Pyhalov KCHAR c2j(comp2)
119*16d86563SAlexander Pyhalov KCHAR comp2;
120*16d86563SAlexander Pyhalov {
121*16d86563SAlexander Pyhalov
122*16d86563SAlexander Pyhalov KCHAR comb2;
123*16d86563SAlexander Pyhalov short Ci_val; /* initial sound */
124*16d86563SAlexander Pyhalov short V_val ; /* middle sound */
125*16d86563SAlexander Pyhalov short Cf_val; /* final sound */
126*16d86563SAlexander Pyhalov short mask ;
127*16d86563SAlexander Pyhalov short high = CI_CNT ;
128*16d86563SAlexander Pyhalov short low = 0 ;
129*16d86563SAlexander Pyhalov
130*16d86563SAlexander Pyhalov int disp,cnt;
131*16d86563SAlexander Pyhalov
132*16d86563SAlexander Pyhalov long Cfbit ;
133*16d86563SAlexander Pyhalov
134*16d86563SAlexander Pyhalov /*
135*16d86563SAlexander Pyhalov * Find initial sound (Ci_val) and
136*16d86563SAlexander Pyhalov * middle sound (V_val )
137*16d86563SAlexander Pyhalov * which make the starting point for 'comp2'.
138*16d86563SAlexander Pyhalov */
139*16d86563SAlexander Pyhalov
140*16d86563SAlexander Pyhalov for (;;) {
141*16d86563SAlexander Pyhalov Ci_val = (low + high) / 2 ;
142*16d86563SAlexander Pyhalov if (low >= high)
143*16d86563SAlexander Pyhalov break ;
144*16d86563SAlexander Pyhalov if (comp2 < cmp_srchtbl[Ci_val][0])
145*16d86563SAlexander Pyhalov high = Ci_val - 1 ;
146*16d86563SAlexander Pyhalov else if (comp2 < cmp_srchtbl[Ci_val+1][0])
147*16d86563SAlexander Pyhalov break ;
148*16d86563SAlexander Pyhalov else low = Ci_val + 1 ;
149*16d86563SAlexander Pyhalov }
150*16d86563SAlexander Pyhalov
151*16d86563SAlexander Pyhalov V_val = 1;
152*16d86563SAlexander Pyhalov while(1) {
153*16d86563SAlexander Pyhalov if (comp2 < cmp_srchtbl[Ci_val][V_val]) {
154*16d86563SAlexander Pyhalov while(cmp_srchtbl[Ci_val][--V_val] == 0)
155*16d86563SAlexander Pyhalov ;
156*16d86563SAlexander Pyhalov break;
157*16d86563SAlexander Pyhalov }else if (V_val == V_CNT)
158*16d86563SAlexander Pyhalov break ;
159*16d86563SAlexander Pyhalov V_val++;
160*16d86563SAlexander Pyhalov }
161*16d86563SAlexander Pyhalov
162*16d86563SAlexander Pyhalov /* Find displacement (temporary final sound value) */
163*16d86563SAlexander Pyhalov
164*16d86563SAlexander Pyhalov disp = comp2 - cmp_srchtbl[Ci_val][V_val] ;
165*16d86563SAlexander Pyhalov mask = cmp_srchtbl[Ci_val][V_val] & BYTE_MASK ;
166*16d86563SAlexander Pyhalov
167*16d86563SAlexander Pyhalov if ((mask + disp) > 0xfe)
168*16d86563SAlexander Pyhalov disp -= SKIP ;
169*16d86563SAlexander Pyhalov
170*16d86563SAlexander Pyhalov /* Find the value of final sound */
171*16d86563SAlexander Pyhalov
172*16d86563SAlexander Pyhalov Cfbit = cmp_bitmap[Ci_val][V_val] ;
173*16d86563SAlexander Pyhalov for (cnt = -1 , Cf_val = -1; cnt < disp; Cf_val++)
174*16d86563SAlexander Pyhalov {
175*16d86563SAlexander Pyhalov if (Cfbit & BIT_MASK)
176*16d86563SAlexander Pyhalov cnt++ ;
177*16d86563SAlexander Pyhalov Cfbit >>= 1 ;
178*16d86563SAlexander Pyhalov }
179*16d86563SAlexander Pyhalov
180*16d86563SAlexander Pyhalov /* make 2 byte combination code */
181*16d86563SAlexander Pyhalov
182*16d86563SAlexander Pyhalov comb2 = (unsigned int) (Ci_val + 2);
183*16d86563SAlexander Pyhalov comb2 = (comb2 << 5) | (V_val + (V_val + 1) / 6 * 2 + 3);
184*16d86563SAlexander Pyhalov comb2 = (comb2 << 5) | (Cf_val + (Cf_val) / 18);
185*16d86563SAlexander Pyhalov
186*16d86563SAlexander Pyhalov
187*16d86563SAlexander Pyhalov return(comb2 | 0x8000) ;
188*16d86563SAlexander Pyhalov }
189*16d86563SAlexander Pyhalov
190*16d86563SAlexander Pyhalov #ifdef TESTPRINT
main()191*16d86563SAlexander Pyhalov main()
192*16d86563SAlexander Pyhalov {
193*16d86563SAlexander Pyhalov unsigned short comp2, comb2;
194*16d86563SAlexander Pyhalov int i,j;
195*16d86563SAlexander Pyhalov
196*16d86563SAlexander Pyhalov printf("\ncompletion code combination code\n");
197*16d86563SAlexander Pyhalov for (i=0xb0;i<=0xc8;i++) {
198*16d86563SAlexander Pyhalov for (j=0xa1;j<=0xfe;j++) {
199*16d86563SAlexander Pyhalov comp2 = i<<8|j;
200*16d86563SAlexander Pyhalov comb2 = comptopack(comp2);
201*16d86563SAlexander Pyhalov printf(" %4x %4x\n", comp2,comb2);
202*16d86563SAlexander Pyhalov }
203*16d86563SAlexander Pyhalov }
204*16d86563SAlexander Pyhalov }
205*16d86563SAlexander Pyhalov #endif
206