rasops1-4_putchar.h revision 1.3.10.2 1 1.3.10.2 martin /* $NetBSD: rasops1-4_putchar.h,v 1.3.10.2 2020/04/13 08:04:47 martin Exp $ */
2 1.3.10.2 martin
3 1.3.10.2 martin /* NetBSD: rasops_bitops.h,v 1.23 2019/08/02 04:39:09 rin Exp */
4 1.3.10.2 martin /*-
5 1.3.10.2 martin * Copyright (c) 1999 The NetBSD Foundation, Inc.
6 1.3.10.2 martin * All rights reserved.
7 1.3.10.2 martin *
8 1.3.10.2 martin * This code is derived from software contributed to The NetBSD Foundation
9 1.3.10.2 martin * by Andrew Doran.
10 1.3.10.2 martin *
11 1.3.10.2 martin * Redistribution and use in source and binary forms, with or without
12 1.3.10.2 martin * modification, are permitted provided that the following conditions
13 1.3.10.2 martin * are met:
14 1.3.10.2 martin * 1. Redistributions of source code must retain the above copyright
15 1.3.10.2 martin * notice, this list of conditions and the following disclaimer.
16 1.3.10.2 martin * 2. Redistributions in binary form must reproduce the above copyright
17 1.3.10.2 martin * notice, this list of conditions and the following disclaimer in the
18 1.3.10.2 martin * documentation and/or other materials provided with the distribution.
19 1.3.10.2 martin *
20 1.3.10.2 martin * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
21 1.3.10.2 martin * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
22 1.3.10.2 martin * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
23 1.3.10.2 martin * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
24 1.3.10.2 martin * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25 1.3.10.2 martin * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26 1.3.10.2 martin * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27 1.3.10.2 martin * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 1.3.10.2 martin * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29 1.3.10.2 martin * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
30 1.3.10.2 martin * POSSIBILITY OF SUCH DAMAGE.
31 1.3.10.2 martin */
32 1.3.10.2 martin
33 1.3.10.2 martin #define PIXEL_BITS RASOPS_DEPTH
34 1.3.10.2 martin
35 1.3.10.2 martin #if RASOPS_DEPTH == 1
36 1.3.10.2 martin #define PIXEL_SHIFT 0
37 1.3.10.2 martin #elif RASOPS_DEPTH == 2
38 1.3.10.2 martin #define PIXEL_SHIFT 1
39 1.3.10.2 martin #elif RASOPS_DEPTH == 4
40 1.3.10.2 martin #define PIXEL_SHIFT 2
41 1.3.10.2 martin #else
42 1.3.10.2 martin #error "Depth not supported"
43 1.3.10.2 martin #endif
44 1.3.10.2 martin
45 1.3.10.2 martin #ifndef RASOPS_AA
46 1.3.10.2 martin #define COLOR_MASK __BITS(32 - PIXEL_BITS, 31)
47 1.3.10.2 martin #else
48 1.3.10.2 martin # if RASOPS_DEPTH == 2
49 1.3.10.2 martin #define COLOR_MASK 0x3
50 1.3.10.2 martin # else
51 1.3.10.2 martin #error "Anti-aliasing not supported"
52 1.3.10.2 martin # endif
53 1.3.10.2 martin #endif
54 1.3.10.2 martin
55 1.3.10.2 martin #ifndef RASOPS_AA
56 1.3.10.2 martin #define PIXEL_OR(tmp) \
57 1.3.10.2 martin do { \
58 1.3.10.2 martin (tmp) |= clr[(fb >> 31) & 1] >> bit; \
59 1.3.10.2 martin fb <<= 1; \
60 1.3.10.2 martin } while (0 /* CONSTCOND */)
61 1.3.10.2 martin #else
62 1.3.10.2 martin #define PIXEL_OR(tmp) \
63 1.3.10.2 martin do { \
64 1.3.10.2 martin uint8_t c, w = *fr++; \
65 1.3.10.2 martin if (w == 0xff) \
66 1.3.10.2 martin c = clr[1]; \
67 1.3.10.2 martin else if (w == 0) \
68 1.3.10.2 martin c = clr[0]; \
69 1.3.10.2 martin else \
70 1.3.10.2 martin c = (w * clr[1] + (0xff - w) * clr[0]) >> 8; \
71 1.3.10.2 martin (tmp) |= c << (32 - PIXEL_BITS - bit); \
72 1.3.10.2 martin } while (0 /* CONSTCOND */)
73 1.3.10.2 martin #endif
74 1.3.10.2 martin
75 1.3.10.2 martin #define NAME(depth) NAME1(depth)
76 1.3.10.2 martin #ifndef RASOPS_AA
77 1.3.10.2 martin #define NAME1(depth) rasops ## depth ## _ ## putchar
78 1.3.10.2 martin #else
79 1.3.10.2 martin #define NAME1(depth) rasops ## depth ## _ ## putchar_aa
80 1.3.10.2 martin #endif
81 1.3.10.2 martin
82 1.3.10.2 martin /*
83 1.3.10.2 martin * Paint a single character. This function is also applicable to
84 1.3.10.2 martin * monochrome, but that in rasops1.c is much simpler and faster.
85 1.3.10.2 martin */
86 1.3.10.2 martin static void
87 1.3.10.2 martin NAME(RASOPS_DEPTH)(void *cookie, int row, int col, u_int uc, long attr)
88 1.3.10.2 martin {
89 1.3.10.2 martin struct rasops_info *ri = (struct rasops_info *)cookie;
90 1.3.10.2 martin struct wsdisplay_font *font = PICK_FONT(ri, uc);
91 1.3.10.2 martin int height, width, full, cnt, bit;
92 1.3.10.2 martin uint32_t bg, fg, lbg, rbg, clr[2], lmask, rmask, tmp;
93 1.3.10.2 martin uint32_t *rp, *bp, *hp;
94 1.3.10.2 martin uint8_t *fr;
95 1.3.10.2 martin bool space;
96 1.3.10.2 martin
97 1.3.10.2 martin hp = NULL; /* XXX GCC */
98 1.3.10.2 martin
99 1.3.10.2 martin if (__predict_false(!CHAR_IN_FONT(uc, font)))
100 1.3.10.2 martin return;
101 1.3.10.2 martin
102 1.3.10.2 martin #ifdef RASOPS_CLIPPING
103 1.3.10.2 martin /* Catches 'row < 0' case too */
104 1.3.10.2 martin if ((unsigned)row >= (unsigned)ri->ri_rows)
105 1.3.10.2 martin return;
106 1.3.10.2 martin
107 1.3.10.2 martin if ((unsigned)col >= (unsigned)ri->ri_cols)
108 1.3.10.2 martin return;
109 1.3.10.2 martin #endif
110 1.3.10.2 martin
111 1.3.10.2 martin height = font->fontheight;
112 1.3.10.2 martin width = font->fontwidth << PIXEL_SHIFT;
113 1.3.10.2 martin col *= width;
114 1.3.10.2 martin
115 1.3.10.2 martin rp = (uint32_t *)(ri->ri_bits + row * ri->ri_yscale +
116 1.3.10.2 martin ((col >> 3) & ~3));
117 1.3.10.2 martin if (ri->ri_hwbits)
118 1.3.10.2 martin hp = (uint32_t *)(ri->ri_hwbits + row * ri->ri_yscale +
119 1.3.10.2 martin ((col >> 3) & ~3));
120 1.3.10.2 martin
121 1.3.10.2 martin col &= 31;
122 1.3.10.2 martin
123 1.3.10.2 martin bg = ATTR_BG(ri, attr);
124 1.3.10.2 martin fg = ATTR_FG(ri, attr);
125 1.3.10.2 martin
126 1.3.10.2 martin /* If fg and bg match this becomes a space character */
127 1.3.10.2 martin if (uc == ' ' || __predict_false(fg == bg)) {
128 1.3.10.2 martin space = true;
129 1.3.10.2 martin fr = NULL; /* XXX GCC */
130 1.3.10.2 martin } else {
131 1.3.10.2 martin space = false;
132 1.3.10.2 martin fr = FONT_GLYPH(uc, font, ri);
133 1.3.10.2 martin }
134 1.3.10.2 martin
135 1.3.10.2 martin if (col + width <= 32) {
136 1.3.10.2 martin /* Single word, only one mask */
137 1.3.10.2 martin rmask = rasops_pmask[col][width & 31];
138 1.3.10.2 martin lmask = ~rmask;
139 1.3.10.2 martin
140 1.3.10.2 martin if (space) {
141 1.3.10.2 martin bg &= rmask;
142 1.3.10.2 martin while (height--) {
143 1.3.10.2 martin tmp = (*rp & lmask) | bg;
144 1.3.10.2 martin *rp = tmp;
145 1.3.10.2 martin if (ri->ri_hwbits) {
146 1.3.10.2 martin *hp = tmp;
147 1.3.10.2 martin DELTA(hp, ri->ri_stride, uint32_t *);
148 1.3.10.2 martin }
149 1.3.10.2 martin DELTA(rp, ri->ri_stride, uint32_t *);
150 1.3.10.2 martin }
151 1.3.10.2 martin } else {
152 1.3.10.2 martin clr[0] = bg & COLOR_MASK;
153 1.3.10.2 martin clr[1] = fg & COLOR_MASK;
154 1.3.10.2 martin
155 1.3.10.2 martin while (height--) {
156 1.3.10.2 martin #ifndef RASOPS_AA
157 1.3.10.2 martin uint32_t fb = rasops_be32uatoh(fr);
158 1.3.10.2 martin fr += ri->ri_font->stride;
159 1.3.10.2 martin #endif
160 1.3.10.2 martin
161 1.3.10.2 martin tmp = 0;
162 1.3.10.2 martin for (bit = col; bit < col + width;
163 1.3.10.2 martin bit += PIXEL_BITS)
164 1.3.10.2 martin PIXEL_OR(tmp);
165 1.3.10.2 martin tmp = (*rp & lmask) | MBE(tmp);
166 1.3.10.2 martin *rp = tmp;
167 1.3.10.2 martin
168 1.3.10.2 martin if (ri->ri_hwbits) {
169 1.3.10.2 martin *hp = tmp;
170 1.3.10.2 martin DELTA(hp, ri->ri_stride, uint32_t *);
171 1.3.10.2 martin }
172 1.3.10.2 martin
173 1.3.10.2 martin DELTA(rp, ri->ri_stride, uint32_t *);
174 1.3.10.2 martin }
175 1.3.10.2 martin }
176 1.3.10.2 martin
177 1.3.10.2 martin /* Do underline */
178 1.3.10.2 martin if ((attr & WSATTR_UNDERLINE) != 0) {
179 1.3.10.2 martin DELTA(rp, - ri->ri_stride * ri->ri_ul.off, uint32_t *);
180 1.3.10.2 martin if (ri->ri_hwbits)
181 1.3.10.2 martin DELTA(hp, - ri->ri_stride * ri->ri_ul.off,
182 1.3.10.2 martin uint32_t *);
183 1.3.10.2 martin
184 1.3.10.2 martin for (height = ri->ri_ul.height; height; height--) {
185 1.3.10.2 martin DELTA(rp, - ri->ri_stride, uint32_t *);
186 1.3.10.2 martin tmp = (*rp & lmask) | (fg & rmask);
187 1.3.10.2 martin *rp = tmp;
188 1.3.10.2 martin if (ri->ri_hwbits) {
189 1.3.10.2 martin DELTA(hp, - ri->ri_stride, uint32_t *);
190 1.3.10.2 martin *hp = tmp;
191 1.3.10.2 martin }
192 1.3.10.2 martin }
193 1.3.10.2 martin }
194 1.3.10.2 martin
195 1.3.10.2 martin return;
196 1.3.10.2 martin }
197 1.3.10.2 martin
198 1.3.10.2 martin /* Word boundary, two masks needed */
199 1.3.10.2 martin lmask = ~rasops_lmask[col];
200 1.3.10.2 martin rmask = ~rasops_rmask[(col + width) & 31];
201 1.3.10.2 martin
202 1.3.10.2 martin if (lmask != -1)
203 1.3.10.2 martin width -= 32 - col;
204 1.3.10.2 martin
205 1.3.10.2 martin full = width / 32;
206 1.3.10.2 martin width -= full * 32;
207 1.3.10.2 martin
208 1.3.10.2 martin if (space) {
209 1.3.10.2 martin lbg = bg & ~lmask;
210 1.3.10.2 martin rbg = bg & ~rmask;
211 1.3.10.2 martin
212 1.3.10.2 martin while (height--) {
213 1.3.10.2 martin bp = rp;
214 1.3.10.2 martin
215 1.3.10.2 martin if (lmask != -1) {
216 1.3.10.2 martin *bp = (*bp & lmask) | lbg;
217 1.3.10.2 martin bp++;
218 1.3.10.2 martin }
219 1.3.10.2 martin
220 1.3.10.2 martin for (cnt = full; cnt; cnt--)
221 1.3.10.2 martin *bp++ = bg;
222 1.3.10.2 martin
223 1.3.10.2 martin if (rmask != -1)
224 1.3.10.2 martin *bp = (*bp & rmask) | rbg;
225 1.3.10.2 martin
226 1.3.10.2 martin if (ri->ri_hwbits) {
227 1.3.10.2 martin memcpy(hp, rp, ((lmask != -1) + full +
228 1.3.10.2 martin (rmask != -1)) << 2);
229 1.3.10.2 martin DELTA(hp, ri->ri_stride, uint32_t *);
230 1.3.10.2 martin }
231 1.3.10.2 martin
232 1.3.10.2 martin DELTA(rp, ri->ri_stride, uint32_t *);
233 1.3.10.2 martin }
234 1.3.10.2 martin } else {
235 1.3.10.2 martin clr[0] = bg & COLOR_MASK;
236 1.3.10.2 martin clr[1] = fg & COLOR_MASK;
237 1.3.10.2 martin
238 1.3.10.2 martin while (height--) {
239 1.3.10.2 martin bp = rp;
240 1.3.10.2 martin
241 1.3.10.2 martin #ifndef RASOPS_AA
242 1.3.10.2 martin uint32_t fb = rasops_be32uatoh(fr);
243 1.3.10.2 martin fr += ri->ri_font->stride;
244 1.3.10.2 martin #endif
245 1.3.10.2 martin
246 1.3.10.2 martin if (lmask != -1) {
247 1.3.10.2 martin tmp = 0;
248 1.3.10.2 martin for (bit = col; bit < 32; bit += PIXEL_BITS)
249 1.3.10.2 martin PIXEL_OR(tmp);
250 1.3.10.2 martin *bp = (*bp & lmask) | MBE(tmp);
251 1.3.10.2 martin bp++;
252 1.3.10.2 martin }
253 1.3.10.2 martin
254 1.3.10.2 martin for (cnt = full; cnt; cnt--) {
255 1.3.10.2 martin tmp = 0;
256 1.3.10.2 martin for (bit = 0; bit < 32; bit += PIXEL_BITS)
257 1.3.10.2 martin PIXEL_OR(tmp);
258 1.3.10.2 martin *bp++ = MBE(tmp);
259 1.3.10.2 martin }
260 1.3.10.2 martin
261 1.3.10.2 martin if (rmask != -1) {
262 1.3.10.2 martin tmp = 0;
263 1.3.10.2 martin for (bit = 0; bit < width; bit += PIXEL_BITS)
264 1.3.10.2 martin PIXEL_OR(tmp);
265 1.3.10.2 martin *bp = (*bp & rmask) | MBE(tmp);
266 1.3.10.2 martin }
267 1.3.10.2 martin
268 1.3.10.2 martin if (ri->ri_hwbits) {
269 1.3.10.2 martin memcpy(hp, rp, ((lmask != -1) + full +
270 1.3.10.2 martin (rmask != -1)) << 2);
271 1.3.10.2 martin DELTA(hp, ri->ri_stride, uint32_t *);
272 1.3.10.2 martin }
273 1.3.10.2 martin
274 1.3.10.2 martin DELTA(rp, ri->ri_stride, uint32_t *);
275 1.3.10.2 martin }
276 1.3.10.2 martin }
277 1.3.10.2 martin
278 1.3.10.2 martin /* Do underline */
279 1.3.10.2 martin if ((attr & WSATTR_UNDERLINE) != 0) {
280 1.3.10.2 martin DELTA(rp, - ri->ri_stride * ri->ri_ul.off, uint32_t *);
281 1.3.10.2 martin if (ri->ri_hwbits)
282 1.3.10.2 martin DELTA(hp, - ri->ri_stride * ri->ri_ul.off, uint32_t *);
283 1.3.10.2 martin
284 1.3.10.2 martin for (height = ri->ri_ul.height; height; height--) {
285 1.3.10.2 martin DELTA(rp, - ri->ri_stride, uint32_t *);
286 1.3.10.2 martin bp = rp;
287 1.3.10.2 martin if (lmask != -1) {
288 1.3.10.2 martin *bp = (*bp & lmask) | (fg & ~lmask);
289 1.3.10.2 martin bp++;
290 1.3.10.2 martin }
291 1.3.10.2 martin for (cnt = full; cnt; cnt--)
292 1.3.10.2 martin *bp++ = fg;
293 1.3.10.2 martin if (rmask != -1)
294 1.3.10.2 martin *bp = (*bp & rmask) | (fg & ~rmask);
295 1.3.10.2 martin if (ri->ri_hwbits) {
296 1.3.10.2 martin DELTA(hp, - ri->ri_stride, uint32_t *);
297 1.3.10.2 martin memcpy(hp, rp, ((lmask != -1) + full +
298 1.3.10.2 martin (rmask != -1)) << 2);
299 1.3.10.2 martin }
300 1.3.10.2 martin }
301 1.3.10.2 martin }
302 1.3.10.2 martin }
303 1.3.10.2 martin
304 1.3.10.2 martin #undef PIXEL_BITS
305 1.3.10.2 martin #undef PIXEL_SHIFT
306 1.3.10.2 martin #undef COLOR_MASK
307 1.3.10.2 martin
308 1.3.10.2 martin #undef PIXEL_OR
309 1.3.10.2 martin
310 1.3.10.2 martin #undef NAME
311 1.3.10.2 martin #undef NAME1
312