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
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
|
#include "winfont.h"
#include <windows.h>
struct font_win32 {
HFONT font;
HDC dc;
HBITMAP bitmap;
HBRUSH white;
HBRUSH black;
uint8_t *data;
uint8_t buf[16];
};
/*
#include "jisunih.h"
uint16_t jis2unih(uint8_t jis) {
if (jis & 0x80) {
const uint16_t *tab = jis2unicode_h;
while (tab[0]) {
if (tab[0] == jis) return tab[1];
tab += 2;
}
return 0;
} else {
return jis;
}
}
*/
uint16_t jis2unih(uint8_t jis) {
uint16_t wbuf[2];
int outchar = MultiByteToWideChar(932, MB_ERR_INVALID_CHARS,
(char *)&jis, 1, (wchar_t *)wbuf, 2);
if (!outchar) return 0;
return wbuf[0];
}
/*
#include "jisuni.h"
uint16_t jis2uni(uint16_t jis) {
if ((jis>>8) == 0x29) {
return jis2unih(jis & 0xff);
}
const uint16_t *tab = jis2unicode;
while (tab[0]) {
if (tab[0] == jis) return tab[1];
tab += 2;
}
return 0;
}
*/
uint16_t jis2uni(uint16_t jis) {
uint16_t sjis = jis2sjis(jis);
uint8_t abuf[2] = {sjis>>8, sjis};
uint16_t wbuf[2];
int outchar = MultiByteToWideChar(932, MB_ERR_INVALID_CHARS,
(char *)abuf, 2, (wchar_t *)wbuf, 2);
if (!outchar) return 0;
return wbuf[0];
}
static const void *winfont_get(const struct fmdsp_font *font,
uint16_t c, enum fmdsp_font_type type) {
struct font_win32 *fw = (struct font_win32 *)font->data;
RECT r = {
0, 0, 8, 16
};
FillRect(fw->dc, &r, fw->white);
wchar_t text[2] = {0};
switch (type) {
case FMDSP_FONT_ANK:
text[0] = jis2unih(c);
TextOutW(fw->dc, 0, 0, text, 1);
break;
case FMDSP_FONT_JIS_LEFT:
{
uint8_t row = c >> 8;
if (row == 0x29 || row == 0x2a) {
// doublebyte halfwidth ANK
// JIS doublewidth JIS halfwidth
// 0x2921-0x297e -> 0x21-0x7e (ASCII)
// 0x2a21-0x2a7e -> 0xa1-0xfe (halfwidth katakana)
uint16_t jis = (c & 0xff) | ((row-0x29) * 0x80);
text[0] = jis2unih(jis);
} else {
text[0] = jis2uni(c);
}
}
TextOutW(fw->dc, 0, 0, text, 1);
break;
case FMDSP_FONT_JIS_RIGHT:
text[0] = jis2uni(c);
TextOutW(fw->dc, -8, 0, text, 1);
break;
}
GdiFlush();
// return fw->data;
for (int y = 0; y < 16; y++) {
fw->buf[y] = fw->data[y*4];
}
return fw->buf;
}
struct BITMAPINFO_mono {
BITMAPINFOHEADER bmihead;
RGBQUAD bmicolors[2];
};
bool fmdsp_font_win(struct fmdsp_font *font) {
struct font_win32 *fw = HeapAlloc(
GetProcessHeap(), 0, sizeof(struct font_win32)
);
if (!fw) goto err;
fw->font = CreateFontW(16, 0, 0, 0,
FW_NORMAL, FALSE, FALSE, FALSE,
SHIFTJIS_CHARSET,
OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS,
NONANTIALIASED_QUALITY, FIXED_PITCH,
L"MS Gothic");
if (!fw->font) goto err_fw;
fw->dc = CreateCompatibleDC(0);
if (!fw->dc) goto err_font;
struct BITMAPINFO_mono bmi = {0};
bmi.bmihead.biSize = sizeof(bmi.bmihead);
bmi.bmihead.biWidth = 8;
bmi.bmihead.biHeight = -16;
bmi.bmihead.biPlanes = 1;
bmi.bmihead.biBitCount = 1;
bmi.bmihead.biCompression = BI_RGB;
bmi.bmihead.biSizeImage = 16;
bmi.bmihead.biClrUsed = 2;
bmi.bmicolors[0].rgbRed = 0xff;
bmi.bmicolors[0].rgbGreen = 0xff;
bmi.bmicolors[0].rgbBlue = 0xff;
fw->bitmap = CreateDIBSection(
fw->dc, (BITMAPINFO *)&bmi,
DIB_RGB_COLORS, (void **)&fw->data,
0, 0);
if (!fw->bitmap) {
goto err_dc;
}
SelectObject(fw->dc, fw->bitmap);
SelectObject(fw->dc, fw->font);
fw->white = CreateSolidBrush(RGB(0xff, 0xff, 0xff));
fw->black = CreateSolidBrush(RGB(0x00, 0x00, 0x00));
font->get = winfont_get;
font->data = fw;
font->width_half = 8;
font->height = 16;
return true;
err_dc:
DeleteDC(fw->dc);
err_font:
DeleteObject(fw->font);
err_fw:
HeapFree(GetProcessHeap(), 0, fw);
err:
return false;
}
|
