1/*
2 *  linux/drivers/video/console/fbcon_ud.c -- Software Rotation - 180 degrees
3 *
4 *      Copyright (C) 2005 Antonino Daplas <adaplas @pol.net>
5 *
6 *  This file is subject to the terms and conditions of the GNU General Public
7 *  License.  See the file COPYING in the main directory of this archive for
8 *  more details.
9 */
10
11#include <linux/module.h>
12#include <linux/slab.h>
13#include <linux/string.h>
14#include <linux/fb.h>
15#include <linux/vt_kern.h>
16#include <linux/console.h>
17#include <asm/types.h>
18#include "fbcon.h"
19#include "fbcon_rotate.h"
20
21/*
22 * Rotation 180 degrees
23 */
24
25static void ud_update_attr(u8 *dst, u8 *src, int attribute,
26				  struct vc_data *vc)
27{
28	int i, offset = (vc->vc_font.height < 10) ? 1 : 2;
29	int width = (vc->vc_font.width + 7) >> 3;
30	unsigned int cellsize = vc->vc_font.height * width;
31	u8 c;
32
33	offset = offset * width;
34
35	for (i = 0; i < cellsize; i++) {
36		c = src[i];
37		if (attribute & FBCON_ATTRIBUTE_UNDERLINE && i < offset)
38			c = 0xff;
39		if (attribute & FBCON_ATTRIBUTE_BOLD)
40			c |= c << 1;
41		if (attribute & FBCON_ATTRIBUTE_REVERSE)
42			c = ~c;
43		dst[i] = c;
44	}
45}
46
47
48static void ud_bmove(struct vc_data *vc, struct fb_info *info, int sy,
49		     int sx, int dy, int dx, int height, int width)
50{
51	struct fbcon_ops *ops = info->fbcon_par;
52	struct fb_copyarea area;
53	u32 vyres = GETVYRES(ops->p, info);
54	u32 vxres = GETVXRES(ops->p, info);
55
56	area.sy = vyres - ((sy + height) * vc->vc_font.height);
57	area.sx = vxres - ((sx + width) * vc->vc_font.width);
58	area.dy = vyres - ((dy + height) * vc->vc_font.height);
59	area.dx = vxres - ((dx + width) * vc->vc_font.width);
60	area.height = height * vc->vc_font.height;
61	area.width  = width * vc->vc_font.width;
62
63	info->fbops->fb_copyarea(info, &area);
64}
65
66static void ud_clear(struct vc_data *vc, struct fb_info *info, int sy,
67		     int sx, int height, int width)
68{
69	struct fbcon_ops *ops = info->fbcon_par;
70	struct fb_fillrect region;
71	int bgshift = (vc->vc_hi_font_mask) ? 13 : 12;
72	u32 vyres = GETVYRES(ops->p, info);
73	u32 vxres = GETVXRES(ops->p, info);
74
75	region.color = attr_bgcol_ec(bgshift,vc,info);
76	region.dy = vyres - ((sy + height) * vc->vc_font.height);
77	region.dx = vxres - ((sx + width) *  vc->vc_font.width);
78	region.width = width * vc->vc_font.width;
79	region.height = height * vc->vc_font.height;
80	region.rop = ROP_COPY;
81
82	info->fbops->fb_fillrect(info, &region);
83}
84
85static inline void ud_putcs_aligned(struct vc_data *vc, struct fb_info *info,
86				    const u16 *s, u32 attr, u32 cnt,
87				    u32 d_pitch, u32 s_pitch, u32 cellsize,
88				    struct fb_image *image, u8 *buf, u8 *dst)
89{
90	struct fbcon_ops *ops = info->fbcon_par;
91	u16 charmask = vc->vc_hi_font_mask ? 0x1ff : 0xff;
92	u32 idx = vc->vc_font.width >> 3;
93	u8 *src;
94
95	while (cnt--) {
96		src = ops->fontbuffer + (scr_readw(s--) & charmask)*cellsize;
97
98		if (attr) {
99			ud_update_attr(buf, src, attr, vc);
100			src = buf;
101		}
102
103		if (likely(idx == 1))
104			__fb_pad_aligned_buffer(dst, d_pitch, src, idx,
105						image->height);
106		else
107			fb_pad_aligned_buffer(dst, d_pitch, src, idx,
108					      image->height);
109
110		dst += s_pitch;
111	}
112
113	info->fbops->fb_imageblit(info, image);
114}
115
116static inline void ud_putcs_unaligned(struct vc_data *vc,
117				      struct fb_info *info, const u16 *s,
118				      u32 attr, u32 cnt, u32 d_pitch,
119				      u32 s_pitch, u32 cellsize,
120				      struct fb_image *image, u8 *buf,
121				      u8 *dst)
122{
123	struct fbcon_ops *ops = info->fbcon_par;
124	u16 charmask = vc->vc_hi_font_mask ? 0x1ff : 0xff;
125	u32 shift_low = 0, mod = vc->vc_font.width % 8;
126	u32 shift_high = 8;
127	u32 idx = vc->vc_font.width >> 3;
128	u8 *src;
129
130	while (cnt--) {
131		src = ops->fontbuffer + (scr_readw(s--) & charmask)*cellsize;
132
133		if (attr) {
134			ud_update_attr(buf, src, attr, vc);
135			src = buf;
136		}
137
138		fb_pad_unaligned_buffer(dst, d_pitch, src, idx,
139					image->height, shift_high,
140					shift_low, mod);
141		shift_low += mod;
142		dst += (shift_low >= 8) ? s_pitch : s_pitch - 1;
143		shift_low &= 7;
144		shift_high = 8 - shift_low;
145	}
146
147	info->fbops->fb_imageblit(info, image);
148
149}
150
151static void ud_putcs(struct vc_data *vc, struct fb_info *info,
152		      const unsigned short *s, int count, int yy, int xx,
153		      int fg, int bg)
154{
155	struct fb_image image;
156	struct fbcon_ops *ops = info->fbcon_par;
157	u32 width = (vc->vc_font.width + 7)/8;
158	u32 cellsize = width * vc->vc_font.height;
159	u32 maxcnt = info->pixmap.size/cellsize;
160	u32 scan_align = info->pixmap.scan_align - 1;
161	u32 buf_align = info->pixmap.buf_align - 1;
162	u32 mod = vc->vc_font.width % 8, cnt, pitch, size;
163	u32 attribute = get_attribute(info, scr_readw(s));
164	u8 *dst, *buf = NULL;
165	u32 vyres = GETVYRES(ops->p, info);
166	u32 vxres = GETVXRES(ops->p, info);
167
168	if (!ops->fontbuffer)
169		return;
170
171	image.fg_color = fg;
172	image.bg_color = bg;
173	image.dy = vyres - ((yy * vc->vc_font.height) + vc->vc_font.height);
174	image.dx = vxres - ((xx + count) * vc->vc_font.width);
175	image.height = vc->vc_font.height;
176	image.depth = 1;
177
178	if (attribute) {
179		buf = kmalloc(cellsize, GFP_KERNEL);
180		if (!buf)
181			return;
182	}
183
184	s += count - 1;
185
186	while (count) {
187		if (count > maxcnt)
188			cnt = maxcnt;
189		else
190			cnt = count;
191
192		image.width = vc->vc_font.width * cnt;
193		pitch = ((image.width + 7) >> 3) + scan_align;
194		pitch &= ~scan_align;
195		size = pitch * image.height + buf_align;
196		size &= ~buf_align;
197		dst = fb_get_buffer_offset(info, &info->pixmap, size);
198		image.data = dst;
199
200		if (!mod)
201			ud_putcs_aligned(vc, info, s, attribute, cnt, pitch,
202					 width, cellsize, &image, buf, dst);
203		else
204			ud_putcs_unaligned(vc, info, s, attribute, cnt, pitch,
205					   width, cellsize, &image,
206					   buf, dst);
207
208		image.dx += image.width;
209		count -= cnt;
210		s -= cnt;
211		xx += cnt;
212	}
213
214	/* buf is always NULL except when in monochrome mode, so in this case
215	   it's a gain to check buf against NULL even though kfree() handles
216	   NULL pointers just fine */
217	if (unlikely(buf))
218		kfree(buf);
219
220}
221
222static void ud_clear_margins(struct vc_data *vc, struct fb_info *info,
223			     int color, int bottom_only)
224{
225	unsigned int cw = vc->vc_font.width;
226	unsigned int ch = vc->vc_font.height;
227	unsigned int rw = info->var.xres - (vc->vc_cols*cw);
228	unsigned int bh = info->var.yres - (vc->vc_rows*ch);
229	struct fb_fillrect region;
230
231	region.color = color;
232	region.rop = ROP_COPY;
233
234	if ((int) rw > 0 && !bottom_only) {
235		region.dy = 0;
236		region.dx = info->var.xoffset;
237		region.width  = rw;
238		region.height = info->var.yres_virtual;
239		info->fbops->fb_fillrect(info, &region);
240	}
241
242	if ((int) bh > 0) {
243		region.dy = info->var.yoffset;
244		region.dx = info->var.xoffset;
245                region.height  = bh;
246                region.width = info->var.xres;
247		info->fbops->fb_fillrect(info, &region);
248	}
249}
250
251static void ud_cursor(struct vc_data *vc, struct fb_info *info, bool enable,
252		      int fg, int bg)
253{
254	struct fb_cursor cursor;
255	struct fbcon_ops *ops = info->fbcon_par;
256	unsigned short charmask = vc->vc_hi_font_mask ? 0x1ff : 0xff;
257	int w = (vc->vc_font.width + 7) >> 3, c;
258	int y = real_y(ops->p, vc->state.y);
259	int attribute, use_sw = vc->vc_cursor_type & CUR_SW;
260	int err = 1, dx, dy;
261	char *src;
262	u32 vyres = GETVYRES(ops->p, info);
263	u32 vxres = GETVXRES(ops->p, info);
264
265	if (!ops->fontbuffer)
266		return;
267
268	cursor.set = 0;
269
270 	c = scr_readw((u16 *) vc->vc_pos);
271	attribute = get_attribute(info, c);
272	src = ops->fontbuffer + ((c & charmask) * (w * vc->vc_font.height));
273
274	if (ops->cursor_state.image.data != src ||
275	    ops->cursor_reset) {
276	    ops->cursor_state.image.data = src;
277	    cursor.set |= FB_CUR_SETIMAGE;
278	}
279
280	if (attribute) {
281		u8 *dst;
282
283		dst = kmalloc_array(w, vc->vc_font.height, GFP_ATOMIC);
284		if (!dst)
285			return;
286		kfree(ops->cursor_data);
287		ops->cursor_data = dst;
288		ud_update_attr(dst, src, attribute, vc);
289		src = dst;
290	}
291
292	if (ops->cursor_state.image.fg_color != fg ||
293	    ops->cursor_state.image.bg_color != bg ||
294	    ops->cursor_reset) {
295		ops->cursor_state.image.fg_color = fg;
296		ops->cursor_state.image.bg_color = bg;
297		cursor.set |= FB_CUR_SETCMAP;
298	}
299
300	if (ops->cursor_state.image.height != vc->vc_font.height ||
301	    ops->cursor_state.image.width != vc->vc_font.width ||
302	    ops->cursor_reset) {
303		ops->cursor_state.image.height = vc->vc_font.height;
304		ops->cursor_state.image.width = vc->vc_font.width;
305		cursor.set |= FB_CUR_SETSIZE;
306	}
307
308	dy = vyres - ((y * vc->vc_font.height) + vc->vc_font.height);
309	dx = vxres - ((vc->state.x * vc->vc_font.width) + vc->vc_font.width);
310
311	if (ops->cursor_state.image.dx != dx ||
312	    ops->cursor_state.image.dy != dy ||
313	    ops->cursor_reset) {
314		ops->cursor_state.image.dx = dx;
315		ops->cursor_state.image.dy = dy;
316		cursor.set |= FB_CUR_SETPOS;
317	}
318
319	if (ops->cursor_state.hot.x || ops->cursor_state.hot.y ||
320	    ops->cursor_reset) {
321		ops->cursor_state.hot.x = cursor.hot.y = 0;
322		cursor.set |= FB_CUR_SETHOT;
323	}
324
325	if (cursor.set & FB_CUR_SETSIZE ||
326	    vc->vc_cursor_type != ops->p->cursor_shape ||
327	    ops->cursor_state.mask == NULL ||
328	    ops->cursor_reset) {
329		char *mask = kmalloc_array(w, vc->vc_font.height, GFP_ATOMIC);
330		int cur_height, size, i = 0;
331		u8 msk = 0xff;
332
333		if (!mask)
334			return;
335
336		kfree(ops->cursor_state.mask);
337		ops->cursor_state.mask = mask;
338
339		ops->p->cursor_shape = vc->vc_cursor_type;
340		cursor.set |= FB_CUR_SETSHAPE;
341
342		switch (CUR_SIZE(ops->p->cursor_shape)) {
343		case CUR_NONE:
344			cur_height = 0;
345			break;
346		case CUR_UNDERLINE:
347			cur_height = (vc->vc_font.height < 10) ? 1 : 2;
348			break;
349		case CUR_LOWER_THIRD:
350			cur_height = vc->vc_font.height/3;
351			break;
352		case CUR_LOWER_HALF:
353			cur_height = vc->vc_font.height >> 1;
354			break;
355		case CUR_TWO_THIRDS:
356			cur_height = (vc->vc_font.height << 1)/3;
357			break;
358		case CUR_BLOCK:
359		default:
360			cur_height = vc->vc_font.height;
361			break;
362		}
363
364		size = cur_height * w;
365
366		while (size--)
367			mask[i++] = msk;
368
369		size = (vc->vc_font.height - cur_height) * w;
370
371		while (size--)
372			mask[i++] = ~msk;
373	}
374
375	ops->cursor_state.enable = enable && !use_sw;
376
377	cursor.image.data = src;
378	cursor.image.fg_color = ops->cursor_state.image.fg_color;
379	cursor.image.bg_color = ops->cursor_state.image.bg_color;
380	cursor.image.dx = ops->cursor_state.image.dx;
381	cursor.image.dy = ops->cursor_state.image.dy;
382	cursor.image.height = ops->cursor_state.image.height;
383	cursor.image.width = ops->cursor_state.image.width;
384	cursor.hot.x = ops->cursor_state.hot.x;
385	cursor.hot.y = ops->cursor_state.hot.y;
386	cursor.mask = ops->cursor_state.mask;
387	cursor.enable = ops->cursor_state.enable;
388	cursor.image.depth = 1;
389	cursor.rop = ROP_XOR;
390
391	if (info->fbops->fb_cursor)
392		err = info->fbops->fb_cursor(info, &cursor);
393
394	if (err)
395		soft_cursor(info, &cursor);
396
397	ops->cursor_reset = 0;
398}
399
400static int ud_update_start(struct fb_info *info)
401{
402	struct fbcon_ops *ops = info->fbcon_par;
403	int xoffset, yoffset;
404	u32 vyres = GETVYRES(ops->p, info);
405	u32 vxres = GETVXRES(ops->p, info);
406	int err;
407
408	xoffset = vxres - info->var.xres - ops->var.xoffset;
409	yoffset = vyres - info->var.yres - ops->var.yoffset;
410	if (yoffset < 0)
411		yoffset += vyres;
412	ops->var.xoffset = xoffset;
413	ops->var.yoffset = yoffset;
414	err = fb_pan_display(info, &ops->var);
415	ops->var.xoffset = info->var.xoffset;
416	ops->var.yoffset = info->var.yoffset;
417	ops->var.vmode = info->var.vmode;
418	return err;
419}
420
421void fbcon_rotate_ud(struct fbcon_ops *ops)
422{
423	ops->bmove = ud_bmove;
424	ops->clear = ud_clear;
425	ops->putcs = ud_putcs;
426	ops->clear_margins = ud_clear_margins;
427	ops->cursor = ud_cursor;
428	ops->update_start = ud_update_start;
429}
430