Home | History | Annotate | Line # | Download | only in rasops
rasops32.c revision 1.23 
      1 /*	 $NetBSD: rasops32.c,v 1.23 2012/01/03 23:15:11 macallan Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1999 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Andrew Doran.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 __KERNEL_RCSID(0, "$NetBSD: rasops32.c,v 1.23 2012/01/03 23:15:11 macallan Exp $");
     34 
     35 #include "opt_rasops.h"
     36 
     37 #include <sys/param.h>
     38 #include <sys/systm.h>
     39 #include <sys/time.h>
     40 
     41 #include <dev/wscons/wsdisplayvar.h>
     42 #include <dev/wscons/wsconsio.h>
     43 #include <dev/rasops/rasops.h>
     44 
     45 static void 	rasops32_putchar(void *, int, int, u_int, long attr);
     46 static void 	rasops32_putchar_aa(void *, int, int, u_int, long attr);
     47 
     48 /*
     49  * Initialize a 'rasops_info' descriptor for this depth.
     50  */
     51 void
     52 rasops32_init(struct rasops_info *ri)
     53 {
     54 
     55 	if (ri->ri_rnum == 0) {
     56 		ri->ri_rnum = 8;
     57 		ri->ri_rpos = 0;
     58 		ri->ri_gnum = 8;
     59 		ri->ri_gpos = 8;
     60 		ri->ri_bnum = 8;
     61 		ri->ri_bpos = 16;
     62 	}
     63 
     64 	if (FONT_IS_ALPHA(ri->ri_font)) {
     65 		ri->ri_ops.putchar = rasops32_putchar_aa;
     66 	} else
     67 		ri->ri_ops.putchar = rasops32_putchar;
     68 }
     69 
     70 /*
     71  * Paint a single character.
     72  */
     73 
     74 static void
     75 rasops32_putchar(void *cookie, int row, int col, u_int uc, long attr)
     76 {
     77 	int width, height, cnt, fs, fb, clr[2];
     78 	struct rasops_info *ri = (struct rasops_info *)cookie;
     79 	struct wsdisplay_font *font = PICK_FONT(ri, uc);
     80 	int32_t *dp, *rp, *hp, *hrp;
     81 	u_char *fr;
     82 
     83 	hp = hrp = NULL;
     84 
     85 #ifdef RASOPS_CLIPPING
     86 	/* Catches 'row < 0' case too */
     87 	if ((unsigned)row >= (unsigned)ri->ri_rows)
     88 		return;
     89 
     90 	if ((unsigned)col >= (unsigned)ri->ri_cols)
     91 		return;
     92 #endif
     93 
     94 	/* check if character fits into font limits */
     95 	if (uc < font->firstchar ||
     96 	    (uc - font->firstchar) >= font->numchars)
     97 	    return;
     98 
     99 	rp = (int32_t *)(ri->ri_bits + row*ri->ri_yscale + col*ri->ri_xscale);
    100 	if (ri->ri_hwbits)
    101 		hrp = (int32_t *)(ri->ri_hwbits + row*ri->ri_yscale +
    102 		    col*ri->ri_xscale);
    103 
    104 	height = font->fontheight;
    105 	width = font->fontwidth;
    106 
    107 	clr[0] = ri->ri_devcmap[(attr >> 16) & 0xf];
    108 	clr[1] = ri->ri_devcmap[(attr >> 24) & 0xf];
    109 
    110 	if (uc == ' ') {
    111 		while (height--) {
    112 			dp = rp;
    113 			DELTA(rp, ri->ri_stride, int32_t *);
    114 			if (ri->ri_hwbits) {
    115 				hp = hrp;
    116 				DELTA(hrp, ri->ri_stride, int32_t *);
    117 			}
    118 
    119 			for (cnt = width; cnt; cnt--) {
    120 				*dp++ = clr[0];
    121 				if (ri->ri_hwbits)
    122 					*hp++ = clr[0];
    123 			}
    124 		}
    125 	} else {
    126 		uc -= font->firstchar;
    127 		fr = (u_char *)font->data + uc * ri->ri_fontscale;
    128 		fs = font->stride;
    129 
    130 		while (height--) {
    131 			dp = rp;
    132 			fb = fr[3] | (fr[2] << 8) | (fr[1] << 16) |
    133 			    (fr[0] << 24);
    134 			fr += fs;
    135 			DELTA(rp, ri->ri_stride, int32_t *);
    136 			if (ri->ri_hwbits) {
    137 				hp = hrp;
    138 				DELTA(hrp, ri->ri_stride, int32_t *);
    139 			}
    140 
    141 			for (cnt = width; cnt; cnt--) {
    142 				*dp++ = clr[(fb >> 31) & 1];
    143 				if (ri->ri_hwbits)
    144 					*hp++ = clr[(fb >> 31) & 1];
    145 				fb <<= 1;
    146 			}
    147 		}
    148 	}
    149 
    150 	/* Do underline */
    151 	if ((attr & 1) != 0) {
    152 		DELTA(rp, -(ri->ri_stride << 1), int32_t *);
    153 		if (ri->ri_hwbits)
    154 			DELTA(hrp, -(ri->ri_stride << 1), int32_t *);
    155 
    156 		while (width--) {
    157 			*rp++ = clr[1];
    158 			if (ri->ri_hwbits)
    159 				*hrp++ = clr[1];
    160 		}
    161 	}
    162 }
    163 
    164 static void
    165 rasops32_putchar_aa(void *cookie, int row, int col, u_int uc, long attr)
    166 {
    167 	int width, height, cnt, fs, clr[2];
    168 	struct rasops_info *ri = (struct rasops_info *)cookie;
    169 	struct wsdisplay_font *font = PICK_FONT(ri, uc);
    170 	int32_t *dp, *rp, *hp, *hrp;
    171 	u_char *fr;
    172 	int x, y, r, g, b, aval;
    173 	int r1, g1, b1, r0, g0, b0;
    174 
    175 	hp = hrp = NULL;
    176 
    177 #ifdef RASOPS_CLIPPING
    178 	/* Catches 'row < 0' case too */
    179 	if ((unsigned)row >= (unsigned)ri->ri_rows)
    180 		return;
    181 
    182 	if ((unsigned)col >= (unsigned)ri->ri_cols)
    183 		return;
    184 #endif
    185 
    186 	/* check if character fits into font limits */
    187 	if (uc < font->firstchar ||
    188 	    (uc - font->firstchar) >= font->numchars)
    189 	    return;
    190 
    191 	rp = (int32_t *)(ri->ri_bits + row*ri->ri_yscale + col*ri->ri_xscale);
    192 	if (ri->ri_hwbits)
    193 		hrp = (int32_t *)(ri->ri_hwbits + row*ri->ri_yscale +
    194 		    col*ri->ri_xscale);
    195 
    196 	height = font->fontheight;
    197 	width = font->fontwidth;
    198 
    199 	clr[0] = ri->ri_devcmap[(attr >> 16) & 0xf];
    200 	clr[1] = ri->ri_devcmap[(attr >> 24) & 0xf];
    201 
    202 	if (uc == ' ') {
    203 		while (height--) {
    204 			dp = rp;
    205 			DELTA(rp, ri->ri_stride, int32_t *);
    206 			if (ri->ri_hwbits) {
    207 				hp = hrp;
    208 				DELTA(hrp, ri->ri_stride, int32_t *);
    209 			}
    210 
    211 			for (cnt = width; cnt; cnt--) {
    212 				*dp++ = clr[0];
    213 				if (ri->ri_hwbits)
    214 					*hp++ = clr[0];
    215 			}
    216 		}
    217 	} else {
    218 		uc -= font->firstchar;
    219 		fr = (u_char *)font->data + uc * ri->ri_fontscale;
    220 		fs = font->stride;
    221 
    222 		r0 = (clr[0] >> 16) & 0xff;
    223 		r1 = (clr[1] >> 16) & 0xff;
    224 		g0 = (clr[0] >> 8) & 0xff;
    225 		g1 = (clr[1] >> 8) & 0xff;
    226 		b0 =  clr[0] & 0xff;
    227 		b1 =  clr[1] & 0xff;
    228 
    229 		for (y = 0; y < height; y++) {
    230 			dp = rp + ri->ri_width * y;
    231 			for (x = 0; x < width; x++) {
    232 				aval = *fr;
    233 				if (aval == 0) {
    234 					*dp = clr[0];
    235 				} else if (aval == 255) {
    236 					*dp = clr[1];
    237 				} else {
    238 					r = aval * r1 + (255 - aval) * r0;
    239 					g = aval * g1 + (255 - aval) * g0;
    240 					b = aval * b1 + (255 - aval) * b0;
    241 					*dp = (r & 0xff00) << 8 |
    242 					      (g & 0xff00) |
    243 					      (b & 0xff00) >> 8;
    244 				}
    245 				dp++;
    246 				fr++;
    247 			}
    248 		}
    249 	}
    250 
    251 	/* Do underline */
    252 	if ((attr & 1) != 0) {
    253 		DELTA(rp, -(ri->ri_stride << 1), int32_t *);
    254 		if (ri->ri_hwbits)
    255 			DELTA(hrp, -(ri->ri_stride << 1), int32_t *);
    256 
    257 		while (width--) {
    258 			*rp++ = clr[1];
    259 			if (ri->ri_hwbits)
    260 				*hrp++ = clr[1];
    261 		}
    262 	}
    263 }
    264