ACPI: Kill overly verbose "power state" log messages
[deliverable/linux.git] / drivers / video / atafb.c
CommitLineData
1da177e4
LT
1/*
2 * linux/drivers/video/atafb.c -- Atari builtin chipset frame buffer device
3 *
4 * Copyright (C) 1994 Martin Schaller & Roman Hodek
a1005012 5 *
1da177e4
LT
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
8 * for more details.
9 *
10 * History:
11 * - 03 Jan 95: Original version by Martin Schaller: The TT driver and
12 * all the device independent stuff
13 * - 09 Jan 95: Roman: I've added the hardware abstraction (hw_switch)
14 * and wrote the Falcon, ST(E), and External drivers
15 * based on the original TT driver.
16 * - 07 May 95: Martin: Added colormap operations for the external driver
17 * - 21 May 95: Martin: Added support for overscan
18 * Andreas: some bug fixes for this
19 * - Jul 95: Guenther Kelleter <guenther@pool.informatik.rwth-aachen.de>:
20 * Programmable Falcon video modes
21 * (thanks to Christian Cartus for documentation
22 * of VIDEL registers).
23 * - 27 Dec 95: Guenther: Implemented user definable video modes "user[0-7]"
24 * on minor 24...31. "user0" may be set on commandline by
25 * "R<x>;<y>;<depth>". (Makes sense only on Falcon)
26 * Video mode switch on Falcon now done at next VBL interrupt
27 * to avoid the annoying right shift of the screen.
28 * - 23 Sep 97: Juergen: added xres_virtual for cards like ProMST
29 * The external-part is legacy, therefore hardware-specific
30 * functions like panning/hardwarescrolling/blanking isn't
31 * supported.
32 * - 29 Sep 97: Juergen: added Romans suggestion for pan_display
33 * (var->xoffset was changed even if no set_screen_base avail.)
34 * - 05 Oct 97: Juergen: extfb (PACKED_PIXEL) is FB_PSEUDOCOLOR 'cause
35 * we know how to set the colors
36 * ext_*palette: read from ext_colors (former MV300_colors)
37 * write to ext_colors and RAMDAC
38 *
39 * To do:
40 * - For the Falcon it is not possible to set random video modes on
41 * SM124 and SC/TV, only the bootup resolution is supported.
42 *
43 */
44
45#define ATAFB_TT
46#define ATAFB_STE
47#define ATAFB_EXT
48#define ATAFB_FALCON
49
50#include <linux/module.h>
51#include <linux/kernel.h>
1da177e4
LT
52#include <linux/errno.h>
53#include <linux/string.h>
54#include <linux/mm.h>
1da177e4
LT
55#include <linux/slab.h>
56#include <linux/delay.h>
57#include <linux/init.h>
58#include <linux/interrupt.h>
59
60#include <asm/setup.h>
84902b7a 61#include <linux/uaccess.h>
1da177e4
LT
62#include <asm/pgtable.h>
63#include <asm/irq.h>
64#include <asm/io.h>
65
66#include <asm/atarihw.h>
67#include <asm/atariints.h>
68#include <asm/atari_stram.h>
69
70#include <linux/fb.h>
71#include <asm/atarikb.h>
72
a1005012
MS
73#include "c2p.h"
74#include "atafb.h"
1da177e4
LT
75
76#define SWITCH_ACIA 0x01 /* modes for switch on OverScan */
77#define SWITCH_SND6 0x40
78#define SWITCH_SND7 0x80
79#define SWITCH_NONE 0x00
80
81
82#define up(x, r) (((x) + (r) - 1) & ~((r)-1))
83
a1005012
MS
84 /*
85 * Interface to the world
86 */
87
88static int atafb_check_var(struct fb_var_screeninfo *var, struct fb_info *info);
89static int atafb_set_par(struct fb_info *info);
90static int atafb_setcolreg(unsigned int regno, unsigned int red, unsigned int green,
91 unsigned int blue, unsigned int transp,
92 struct fb_info *info);
93static int atafb_blank(int blank, struct fb_info *info);
94static int atafb_pan_display(struct fb_var_screeninfo *var,
95 struct fb_info *info);
96static void atafb_fillrect(struct fb_info *info,
97 const struct fb_fillrect *rect);
98static void atafb_copyarea(struct fb_info *info,
99 const struct fb_copyarea *region);
100static void atafb_imageblit(struct fb_info *info, const struct fb_image *image);
101static int atafb_ioctl(struct fb_info *info, unsigned int cmd,
102 unsigned long arg);
1da177e4 103
1da177e4 104
a1005012 105static int default_par; /* default resolution (0=none) */
1da177e4 106
a1005012
MS
107static unsigned long default_mem_req;
108
109static int hwscroll = -1;
1da177e4
LT
110
111static int use_hwscroll = 1;
112
a1005012
MS
113static int sttt_xres = 640, st_yres = 400, tt_yres = 480;
114static int sttt_xres_virtual = 640, sttt_yres_virtual = 400;
115static int ovsc_offset, ovsc_addlen;
116
117 /*
118 * Hardware parameters for current mode
119 */
1da177e4
LT
120
121static struct atafb_par {
122 void *screen_base;
123 int yres_virtual;
a1005012 124 u_long next_line;
1da177e4
LT
125#if defined ATAFB_TT || defined ATAFB_STE
126 union {
127 struct {
128 int mode;
129 int sync;
130 } tt, st;
131#endif
132#ifdef ATAFB_FALCON
133 struct falcon_hw {
134 /* Here are fields for storing a video mode, as direct
135 * parameters for the hardware.
136 */
137 short sync;
138 short line_width;
139 short line_offset;
140 short st_shift;
141 short f_shift;
142 short vid_control;
143 short vid_mode;
144 short xoffset;
145 short hht, hbb, hbe, hdb, hde, hss;
146 short vft, vbb, vbe, vdb, vde, vss;
147 /* auxiliary information */
148 short mono;
149 short ste_mode;
150 short bpp;
74511413 151 u32 pseudo_palette[16];
1da177e4
LT
152 } falcon;
153#endif
154 /* Nothing needed for external mode */
155 } hw;
156} current_par;
157
158/* Don't calculate an own resolution, and thus don't change the one found when
159 * booting (currently used for the Falcon to keep settings for internal video
160 * hardware extensions (e.g. ScreenBlaster) */
a1005012 161static int DontCalcRes = 0;
1da177e4
LT
162
163#ifdef ATAFB_FALCON
164#define HHT hw.falcon.hht
165#define HBB hw.falcon.hbb
166#define HBE hw.falcon.hbe
167#define HDB hw.falcon.hdb
168#define HDE hw.falcon.hde
169#define HSS hw.falcon.hss
170#define VFT hw.falcon.vft
171#define VBB hw.falcon.vbb
172#define VBE hw.falcon.vbe
173#define VDB hw.falcon.vdb
174#define VDE hw.falcon.vde
175#define VSS hw.falcon.vss
176#define VCO_CLOCK25 0x04
177#define VCO_CSYPOS 0x10
178#define VCO_VSYPOS 0x20
179#define VCO_HSYPOS 0x40
180#define VCO_SHORTOFFS 0x100
181#define VMO_DOUBLE 0x01
182#define VMO_INTER 0x02
183#define VMO_PREMASK 0x0c
184#endif
185
a1005012
MS
186static struct fb_info fb_info = {
187 .fix = {
188 .id = "Atari ",
189 .visual = FB_VISUAL_PSEUDOCOLOR,
190 .accel = FB_ACCEL_NONE,
191 }
192};
1da177e4
LT
193
194static void *screen_base; /* base address of screen */
195static void *real_screen_base; /* (only for Overscan) */
196
197static int screen_len;
198
a1005012 199static int current_par_valid;
1da177e4 200
a1005012 201static int mono_moni;
1da177e4
LT
202
203
204#ifdef ATAFB_EXT
1da177e4 205
a1005012
MS
206/* external video handling */
207static unsigned int external_xres;
208static unsigned int external_xres_virtual;
209static unsigned int external_yres;
1da177e4 210
a1005012
MS
211/*
212 * not needed - atafb will never support panning/hardwarescroll with external
213 * static unsigned int external_yres_virtual;
214 */
215static unsigned int external_depth;
216static int external_pmode;
217static void *external_addr;
218static unsigned long external_len;
219static unsigned long external_vgaiobase;
220static unsigned int external_bitspercol = 6;
1da177e4 221
a1005012
MS
222/*
223 * JOE <joe@amber.dinoco.de>:
224 * added card type for external driver, is only needed for
225 * colormap handling.
226 */
1da177e4
LT
227enum cardtype { IS_VGA, IS_MV300 };
228static enum cardtype external_card_type = IS_VGA;
229
230/*
a1005012
MS
231 * The MV300 mixes the color registers. So we need an array of munged
232 * indices in order to access the correct reg.
233 */
234static int MV300_reg_1bit[2] = {
235 0, 1
236};
237static int MV300_reg_4bit[16] = {
238 0, 8, 4, 12, 2, 10, 6, 14, 1, 9, 5, 13, 3, 11, 7, 15
239};
240static int MV300_reg_8bit[256] = {
241 0, 128, 64, 192, 32, 160, 96, 224, 16, 144, 80, 208, 48, 176, 112, 240,
242 8, 136, 72, 200, 40, 168, 104, 232, 24, 152, 88, 216, 56, 184, 120, 248,
243 4, 132, 68, 196, 36, 164, 100, 228, 20, 148, 84, 212, 52, 180, 116, 244,
244 12, 140, 76, 204, 44, 172, 108, 236, 28, 156, 92, 220, 60, 188, 124, 252,
245 2, 130, 66, 194, 34, 162, 98, 226, 18, 146, 82, 210, 50, 178, 114, 242,
246 10, 138, 74, 202, 42, 170, 106, 234, 26, 154, 90, 218, 58, 186, 122, 250,
247 6, 134, 70, 198, 38, 166, 102, 230, 22, 150, 86, 214, 54, 182, 118, 246,
248 14, 142, 78, 206, 46, 174, 110, 238, 30, 158, 94, 222, 62, 190, 126, 254,
249 1, 129, 65, 193, 33, 161, 97, 225, 17, 145, 81, 209, 49, 177, 113, 241,
250 9, 137, 73, 201, 41, 169, 105, 233, 25, 153, 89, 217, 57, 185, 121, 249,
251 5, 133, 69, 197, 37, 165, 101, 229, 21, 149, 85, 213, 53, 181, 117, 245,
252 13, 141, 77, 205, 45, 173, 109, 237, 29, 157, 93, 221, 61, 189, 125, 253,
253 3, 131, 67, 195, 35, 163, 99, 227, 19, 147, 83, 211, 51, 179, 115, 243,
254 11, 139, 75, 203, 43, 171, 107, 235, 27, 155, 91, 219, 59, 187, 123, 251,
255 7, 135, 71, 199, 39, 167, 103, 231, 23, 151, 87, 215, 55, 183, 119, 247,
256 15, 143, 79, 207, 47, 175, 111, 239, 31, 159, 95, 223, 63, 191, 127, 255
257};
1da177e4
LT
258
259static int *MV300_reg = MV300_reg_8bit;
1da177e4
LT
260#endif /* ATAFB_EXT */
261
262
a1005012 263static int inverse;
1da177e4
LT
264
265extern int fontheight_8x8;
266extern int fontwidth_8x8;
267extern unsigned char fontdata_8x8[];
268
269extern int fontheight_8x16;
270extern int fontwidth_8x16;
271extern unsigned char fontdata_8x16[];
272
a1005012
MS
273/*
274 * struct fb_ops {
275 * * open/release and usage marking
276 * struct module *owner;
277 * int (*fb_open)(struct fb_info *info, int user);
278 * int (*fb_release)(struct fb_info *info, int user);
279 *
280 * * For framebuffers with strange non linear layouts or that do not
281 * * work with normal memory mapped access
282 * ssize_t (*fb_read)(struct file *file, char __user *buf, size_t count, loff_t *ppos);
283 * ssize_t (*fb_write)(struct file *file, const char __user *buf, size_t count, loff_t *ppos);
284 *
285 * * checks var and eventually tweaks it to something supported,
286 * * DOES NOT MODIFY PAR *
287 * int (*fb_check_var)(struct fb_var_screeninfo *var, struct fb_info *info);
288 *
289 * * set the video mode according to info->var *
290 * int (*fb_set_par)(struct fb_info *info);
291 *
292 * * set color register *
293 * int (*fb_setcolreg)(unsigned int regno, unsigned int red, unsigned int green,
294 * unsigned int blue, unsigned int transp, struct fb_info *info);
295 *
296 * * set color registers in batch *
297 * int (*fb_setcmap)(struct fb_cmap *cmap, struct fb_info *info);
298 *
299 * * blank display *
300 * int (*fb_blank)(int blank, struct fb_info *info);
301 *
302 * * pan display *
303 * int (*fb_pan_display)(struct fb_var_screeninfo *var, struct fb_info *info);
304 *
305 * *** The meat of the drawing engine ***
306 * * Draws a rectangle *
307 * void (*fb_fillrect) (struct fb_info *info, const struct fb_fillrect *rect);
308 * * Copy data from area to another *
309 * void (*fb_copyarea) (struct fb_info *info, const struct fb_copyarea *region);
310 * * Draws a image to the display *
311 * void (*fb_imageblit) (struct fb_info *info, const struct fb_image *image);
312 *
313 * * Draws cursor *
314 * int (*fb_cursor) (struct fb_info *info, struct fb_cursor *cursor);
315 *
316 * * Rotates the display *
317 * void (*fb_rotate)(struct fb_info *info, int angle);
318 *
319 * * wait for blit idle, optional *
320 * int (*fb_sync)(struct fb_info *info);
321 *
322 * * perform fb specific ioctl (optional) *
323 * int (*fb_ioctl)(struct fb_info *info, unsigned int cmd,
324 * unsigned long arg);
325 *
326 * * Handle 32bit compat ioctl (optional) *
327 * int (*fb_compat_ioctl)(struct fb_info *info, unsigned int cmd,
328 * unsigned long arg);
329 *
330 * * perform fb specific mmap *
331 * int (*fb_mmap)(struct fb_info *info, struct vm_area_struct *vma);
332 *
333 * * save current hardware state *
334 * void (*fb_save_state)(struct fb_info *info);
335 *
336 * * restore saved state *
337 * void (*fb_restore_state)(struct fb_info *info);
338 * } ;
339 */
340
341
1da177e4
LT
342/* ++roman: This structure abstracts from the underlying hardware (ST(e),
343 * TT, or Falcon.
344 *
a1005012 345 * int (*detect)(void)
1da177e4
LT
346 * This function should detect the current video mode settings and
347 * store them in atafb_predefined[0] for later reference by the
348 * user. Return the index+1 of an equivalent predefined mode or 0
349 * if there is no such.
a1005012
MS
350 *
351 * int (*encode_fix)(struct fb_fix_screeninfo *fix,
352 * struct atafb_par *par)
1da177e4
LT
353 * This function should fill in the 'fix' structure based on the
354 * values in the 'par' structure.
a1005012
MS
355 * !!! Obsolete, perhaps !!!
356 *
357 * int (*decode_var)(struct fb_var_screeninfo *var,
358 * struct atafb_par *par)
1da177e4
LT
359 * Get the video params out of 'var'. If a value doesn't fit, round
360 * it up, if it's too big, return EINVAL.
a1005012
MS
361 * Round up in the following order: bits_per_pixel, xres, yres,
362 * xres_virtual, yres_virtual, xoffset, yoffset, grayscale, bitfields,
1da177e4
LT
363 * horizontal timing, vertical timing.
364 *
a1005012
MS
365 * int (*encode_var)(struct fb_var_screeninfo *var,
366 * struct atafb_par *par);
1da177e4
LT
367 * Fill the 'var' structure based on the values in 'par' and maybe
368 * other values read out of the hardware.
a1005012
MS
369 *
370 * void (*get_par)(struct atafb_par *par)
1da177e4 371 * Fill the hardware's 'par' structure.
a1005012
MS
372 * !!! Used only by detect() !!!
373 *
374 * void (*set_par)(struct atafb_par *par)
1da177e4 375 * Set the hardware according to 'par'.
1da177e4
LT
376 *
377 * void (*set_screen_base)(void *s_base)
378 * Set the base address of the displayed frame buffer. Only called
379 * if yres_virtual > yres or xres_virtual > xres.
380 *
a1005012
MS
381 * int (*blank)(int blank_mode)
382 * Blank the screen if blank_mode != 0, else unblank. If blank == NULL then
1da177e4
LT
383 * the caller blanks by setting the CLUT to all black. Return 0 if blanking
384 * succeeded, !=0 if un-/blanking failed due to e.g. a video mode which
385 * doesn't support it. Implements VESA suspend and powerdown modes on
386 * hardware that supports disabling hsync/vsync:
a1005012 387 * blank_mode == 2: suspend vsync, 3:suspend hsync, 4: powerdown.
1da177e4
LT
388 */
389
390static struct fb_hwswitch {
a1005012
MS
391 int (*detect)(void);
392 int (*encode_fix)(struct fb_fix_screeninfo *fix,
393 struct atafb_par *par);
394 int (*decode_var)(struct fb_var_screeninfo *var,
395 struct atafb_par *par);
396 int (*encode_var)(struct fb_var_screeninfo *var,
397 struct atafb_par *par);
398 void (*get_par)(struct atafb_par *par);
399 void (*set_par)(struct atafb_par *par);
1da177e4 400 void (*set_screen_base)(void *s_base);
a1005012
MS
401 int (*blank)(int blank_mode);
402 int (*pan_display)(struct fb_var_screeninfo *var,
403 struct fb_info *info);
1da177e4
LT
404} *fbhw;
405
a1005012
MS
406static char *autodetect_names[] = { "autodetect", NULL };
407static char *stlow_names[] = { "stlow", NULL };
408static char *stmid_names[] = { "stmid", "default5", NULL };
409static char *sthigh_names[] = { "sthigh", "default4", NULL };
410static char *ttlow_names[] = { "ttlow", NULL };
411static char *ttmid_names[] = { "ttmid", "default1", NULL };
412static char *tthigh_names[] = { "tthigh", "default2", NULL };
413static char *vga2_names[] = { "vga2", NULL };
414static char *vga4_names[] = { "vga4", NULL };
415static char *vga16_names[] = { "vga16", "default3", NULL };
416static char *vga256_names[] = { "vga256", NULL };
417static char *falh2_names[] = { "falh2", NULL };
418static char *falh16_names[] = { "falh16", NULL };
1da177e4
LT
419
420static char **fb_var_names[] = {
1da177e4
LT
421 autodetect_names,
422 stlow_names,
423 stmid_names,
424 sthigh_names,
425 ttlow_names,
426 ttmid_names,
427 tthigh_names,
428 vga2_names,
429 vga4_names,
430 vga16_names,
431 vga256_names,
432 falh2_names,
433 falh16_names,
434 NULL
1da177e4
LT
435};
436
437static struct fb_var_screeninfo atafb_predefined[] = {
a1005012
MS
438 /*
439 * yres_virtual == 0 means use hw-scrolling if possible, else yres
440 */
441 { /* autodetect */
442 0, 0, 0, 0, 0, 0, 0, 0, /* xres-grayscale */
443 {0, 0, 0}, {0, 0, 0}, {0, 0, 0}, {0, 0, 0}, /* red green blue tran*/
1da177e4 444 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
a1005012 445 { /* st low */
1da177e4
LT
446 320, 200, 320, 0, 0, 0, 4, 0,
447 {0, 4, 0}, {0, 4, 0}, {0, 4, 0}, {0, 0, 0},
448 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
449 { /* st mid */
450 640, 200, 640, 0, 0, 0, 2, 0,
451 {0, 4, 0}, {0, 4, 0}, {0, 4, 0}, {0, 0, 0},
452 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
453 { /* st high */
454 640, 400, 640, 0, 0, 0, 1, 0,
455 {0, 4, 0}, {0, 4, 0}, {0, 4, 0}, {0, 0, 0},
456 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
457 { /* tt low */
458 320, 480, 320, 0, 0, 0, 8, 0,
459 {0, 4, 0}, {0, 4, 0}, {0, 4, 0}, {0, 0, 0},
460 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
461 { /* tt mid */
462 640, 480, 640, 0, 0, 0, 4, 0,
463 {0, 4, 0}, {0, 4, 0}, {0, 4, 0}, {0, 0, 0},
464 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
465 { /* tt high */
466 1280, 960, 1280, 0, 0, 0, 1, 0,
467 {0, 4, 0}, {0, 4, 0}, {0, 4, 0}, {0, 0, 0},
468 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
469 { /* vga2 */
470 640, 480, 640, 0, 0, 0, 1, 0,
471 {0, 6, 0}, {0, 6, 0}, {0, 6, 0}, {0, 0, 0},
472 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
473 { /* vga4 */
474 640, 480, 640, 0, 0, 0, 2, 0,
475 {0, 4, 0}, {0, 4, 0}, {0, 4, 0}, {0, 0, 0},
476 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
477 { /* vga16 */
478 640, 480, 640, 0, 0, 0, 4, 0,
479 {0, 6, 0}, {0, 6, 0}, {0, 6, 0}, {0, 0, 0},
480 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
481 { /* vga256 */
482 640, 480, 640, 0, 0, 0, 8, 0,
483 {0, 6, 0}, {0, 6, 0}, {0, 6, 0}, {0, 0, 0},
484 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
485 { /* falh2 */
486 896, 608, 896, 0, 0, 0, 1, 0,
487 {0, 6, 0}, {0, 6, 0}, {0, 6, 0}, {0, 0, 0},
488 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
489 { /* falh16 */
490 896, 608, 896, 0, 0, 0, 4, 0,
491 {0, 6, 0}, {0, 6, 0}, {0, 6, 0}, {0, 0, 0},
492 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0 },
493};
494
a1005012 495static int num_atafb_predefined = ARRAY_SIZE(atafb_predefined);
1da177e4 496
a1005012
MS
497static struct fb_videomode atafb_modedb[] __initdata = {
498 /*
499 * Atari Video Modes
500 *
501 * If you change these, make sure to update DEFMODE_* as well!
502 */
1da177e4 503
a1005012
MS
504 /*
505 * ST/TT Video Modes
506 */
507
508 {
509 /* 320x200, 15 kHz, 60 Hz (ST low) */
510 "st-low", 60, 320, 200, 32000, 32, 16, 31, 14, 96, 4,
511 0, FB_VMODE_NONINTERLACED | FB_VMODE_YWRAP
512 }, {
513 /* 640x200, 15 kHz, 60 Hz (ST medium) */
514 "st-mid", 60, 640, 200, 32000, 32, 16, 31, 14, 96, 4,
515 0, FB_VMODE_NONINTERLACED | FB_VMODE_YWRAP
516 }, {
517 /* 640x400, 30.25 kHz, 63.5 Hz (ST high) */
518 "st-high", 63, 640, 400, 32000, 128, 0, 40, 14, 128, 4,
519 0, FB_VMODE_NONINTERLACED | FB_VMODE_YWRAP
520 }, {
521 /* 320x480, 15 kHz, 60 Hz (TT low) */
522 "tt-low", 60, 320, 480, 31041, 120, 100, 8, 16, 140, 30,
523 0, FB_VMODE_NONINTERLACED | FB_VMODE_YWRAP
524 }, {
525 /* 640x480, 29 kHz, 57 Hz (TT medium) */
526 "tt-mid", 60, 640, 480, 31041, 120, 100, 8, 16, 140, 30,
527 0, FB_VMODE_NONINTERLACED | FB_VMODE_YWRAP
528 }, {
529 /* 1280x960, 29 kHz, 60 Hz (TT high) */
530 "tt-high", 57, 640, 960, 31041, 120, 100, 8, 16, 140, 30,
531 0, FB_VMODE_NONINTERLACED | FB_VMODE_YWRAP
532 },
533
534 /*
535 * VGA Video Modes
536 */
537
538 {
539 /* 640x480, 31 kHz, 60 Hz (VGA) */
540 "vga", 63.5, 640, 480, 32000, 18, 42, 31, 11, 96, 3,
541 0, FB_VMODE_NONINTERLACED | FB_VMODE_YWRAP
542 }, {
543 /* 640x400, 31 kHz, 70 Hz (VGA) */
544 "vga70", 70, 640, 400, 32000, 18, 42, 31, 11, 96, 3,
545 FB_SYNC_VERT_HIGH_ACT | FB_SYNC_COMP_HIGH_ACT, FB_VMODE_NONINTERLACED | FB_VMODE_YWRAP
546 },
547
548 /*
549 * Falcon HiRes Video Modes
550 */
551
552 {
553 /* 896x608, 31 kHz, 60 Hz (Falcon High) */
554 "falh", 60, 896, 608, 32000, 18, 42, 31, 1, 96,3,
555 0, FB_VMODE_NONINTERLACED | FB_VMODE_YWRAP
556 },
557};
558
559#define NUM_TOTAL_MODES ARRAY_SIZE(atafb_modedb)
560
561static char *mode_option __initdata = NULL;
562
563 /* default modes */
564
565#define DEFMODE_TT 5 /* "tt-high" for TT */
566#define DEFMODE_F30 7 /* "vga70" for Falcon */
567#define DEFMODE_STE 2 /* "st-high" for ST/E */
568#define DEFMODE_EXT 6 /* "vga" for external */
569
570
571static int get_video_mode(char *vname)
1da177e4 572{
a1005012
MS
573 char ***name_list;
574 char **name;
575 int i;
576
577 name_list = fb_var_names;
578 for (i = 0; i < num_atafb_predefined; i++) {
579 name = *name_list++;
580 if (!name || !*name)
581 break;
582 while (*name) {
583 if (!strcmp(vname, *name))
584 return i + 1;
585 name++;
586 }
1da177e4 587 }
a1005012 588 return 0;
1da177e4
LT
589}
590
591
592
593/* ------------------- TT specific functions ---------------------- */
594
595#ifdef ATAFB_TT
596
a1005012 597static int tt_encode_fix(struct fb_fix_screeninfo *fix, struct atafb_par *par)
1da177e4
LT
598{
599 int mode;
600
a1005012 601 strcpy(fix->id, "Atari Builtin");
1da177e4
LT
602 fix->smem_start = (unsigned long)real_screen_base;
603 fix->smem_len = screen_len;
a1005012
MS
604 fix->type = FB_TYPE_INTERLEAVED_PLANES;
605 fix->type_aux = 2;
606 fix->visual = FB_VISUAL_PSEUDOCOLOR;
1da177e4
LT
607 mode = par->hw.tt.mode & TT_SHIFTER_MODEMASK;
608 if (mode == TT_SHIFTER_TTHIGH || mode == TT_SHIFTER_STHIGH) {
a1005012
MS
609 fix->type = FB_TYPE_PACKED_PIXELS;
610 fix->type_aux = 0;
1da177e4 611 if (mode == TT_SHIFTER_TTHIGH)
a1005012 612 fix->visual = FB_VISUAL_MONO01;
1da177e4 613 }
a1005012
MS
614 fix->xpanstep = 0;
615 fix->ypanstep = 1;
616 fix->ywrapstep = 0;
02603930 617 fix->line_length = par->next_line;
1da177e4
LT
618 fix->accel = FB_ACCEL_ATARIBLITT;
619 return 0;
620}
621
a1005012 622static int tt_decode_var(struct fb_var_screeninfo *var, struct atafb_par *par)
1da177e4 623{
a1005012
MS
624 int xres = var->xres;
625 int yres = var->yres;
626 int bpp = var->bits_per_pixel;
1da177e4
LT
627 int linelen;
628 int yres_virtual = var->yres_virtual;
629
630 if (mono_moni) {
a1005012 631 if (bpp > 1 || xres > sttt_xres * 2 || yres > tt_yres * 2)
1da177e4 632 return -EINVAL;
a1005012
MS
633 par->hw.tt.mode = TT_SHIFTER_TTHIGH;
634 xres = sttt_xres * 2;
635 yres = tt_yres * 2;
636 bpp = 1;
1da177e4
LT
637 } else {
638 if (bpp > 8 || xres > sttt_xres || yres > tt_yres)
639 return -EINVAL;
640 if (bpp > 4) {
a1005012 641 if (xres > sttt_xres / 2 || yres > tt_yres)
1da177e4 642 return -EINVAL;
a1005012
MS
643 par->hw.tt.mode = TT_SHIFTER_TTLOW;
644 xres = sttt_xres / 2;
645 yres = tt_yres;
646 bpp = 8;
647 } else if (bpp > 2) {
1da177e4
LT
648 if (xres > sttt_xres || yres > tt_yres)
649 return -EINVAL;
a1005012
MS
650 if (xres > sttt_xres / 2 || yres > st_yres / 2) {
651 par->hw.tt.mode = TT_SHIFTER_TTMID;
652 xres = sttt_xres;
653 yres = tt_yres;
654 bpp = 4;
655 } else {
656 par->hw.tt.mode = TT_SHIFTER_STLOW;
657 xres = sttt_xres / 2;
658 yres = st_yres / 2;
659 bpp = 4;
1da177e4 660 }
a1005012
MS
661 } else if (bpp > 1) {
662 if (xres > sttt_xres || yres > st_yres / 2)
1da177e4 663 return -EINVAL;
a1005012
MS
664 par->hw.tt.mode = TT_SHIFTER_STMID;
665 xres = sttt_xres;
666 yres = st_yres / 2;
667 bpp = 2;
668 } else if (var->xres > sttt_xres || var->yres > st_yres) {
1da177e4 669 return -EINVAL;
a1005012
MS
670 } else {
671 par->hw.tt.mode = TT_SHIFTER_STHIGH;
672 xres = sttt_xres;
673 yres = st_yres;
674 bpp = 1;
1da177e4
LT
675 }
676 }
677 if (yres_virtual <= 0)
678 yres_virtual = 0;
679 else if (yres_virtual < yres)
680 yres_virtual = yres;
681 if (var->sync & FB_SYNC_EXT)
a1005012 682 par->hw.tt.sync = 0;
1da177e4 683 else
a1005012
MS
684 par->hw.tt.sync = 1;
685 linelen = xres * bpp / 8;
1da177e4
LT
686 if (yres_virtual * linelen > screen_len && screen_len)
687 return -EINVAL;
688 if (yres * linelen > screen_len && screen_len)
689 return -EINVAL;
690 if (var->yoffset + yres > yres_virtual && yres_virtual)
691 return -EINVAL;
692 par->yres_virtual = yres_virtual;
693 par->screen_base = screen_base + var->yoffset * linelen;
02603930 694 par->next_line = linelen;
1da177e4
LT
695 return 0;
696}
697
a1005012 698static int tt_encode_var(struct fb_var_screeninfo *var, struct atafb_par *par)
1da177e4
LT
699{
700 int linelen;
701 memset(var, 0, sizeof(struct fb_var_screeninfo));
a1005012
MS
702 var->red.offset = 0;
703 var->red.length = 4;
704 var->red.msb_right = 0;
705 var->grayscale = 0;
706
707 var->pixclock = 31041;
708 var->left_margin = 120; /* these may be incorrect */
709 var->right_margin = 100;
710 var->upper_margin = 8;
711 var->lower_margin = 16;
712 var->hsync_len = 140;
713 var->vsync_len = 30;
714
715 var->height = -1;
716 var->width = -1;
1da177e4
LT
717
718 if (par->hw.tt.sync & 1)
a1005012 719 var->sync = 0;
1da177e4 720 else
a1005012 721 var->sync = FB_SYNC_EXT;
1da177e4
LT
722
723 switch (par->hw.tt.mode & TT_SHIFTER_MODEMASK) {
724 case TT_SHIFTER_STLOW:
a1005012
MS
725 var->xres = sttt_xres / 2;
726 var->xres_virtual = sttt_xres_virtual / 2;
727 var->yres = st_yres / 2;
728 var->bits_per_pixel = 4;
1da177e4
LT
729 break;
730 case TT_SHIFTER_STMID:
a1005012
MS
731 var->xres = sttt_xres;
732 var->xres_virtual = sttt_xres_virtual;
733 var->yres = st_yres / 2;
734 var->bits_per_pixel = 2;
1da177e4
LT
735 break;
736 case TT_SHIFTER_STHIGH:
a1005012
MS
737 var->xres = sttt_xres;
738 var->xres_virtual = sttt_xres_virtual;
739 var->yres = st_yres;
740 var->bits_per_pixel = 1;
1da177e4
LT
741 break;
742 case TT_SHIFTER_TTLOW:
a1005012
MS
743 var->xres = sttt_xres / 2;
744 var->xres_virtual = sttt_xres_virtual / 2;
745 var->yres = tt_yres;
746 var->bits_per_pixel = 8;
1da177e4
LT
747 break;
748 case TT_SHIFTER_TTMID:
a1005012
MS
749 var->xres = sttt_xres;
750 var->xres_virtual = sttt_xres_virtual;
751 var->yres = tt_yres;
752 var->bits_per_pixel = 4;
1da177e4
LT
753 break;
754 case TT_SHIFTER_TTHIGH:
a1005012
MS
755 var->red.length = 0;
756 var->xres = sttt_xres * 2;
757 var->xres_virtual = sttt_xres_virtual * 2;
758 var->yres = tt_yres * 2;
759 var->bits_per_pixel = 1;
1da177e4 760 break;
a1005012
MS
761 }
762 var->blue = var->green = var->red;
763 var->transp.offset = 0;
764 var->transp.length = 0;
765 var->transp.msb_right = 0;
766 linelen = var->xres_virtual * var->bits_per_pixel / 8;
767 if (!use_hwscroll)
768 var->yres_virtual = var->yres;
1da177e4
LT
769 else if (screen_len) {
770 if (par->yres_virtual)
771 var->yres_virtual = par->yres_virtual;
772 else
a1005012 773 /* yres_virtual == 0 means use maximum */
1da177e4
LT
774 var->yres_virtual = screen_len / linelen;
775 } else {
776 if (hwscroll < 0)
777 var->yres_virtual = 2 * var->yres;
778 else
a1005012 779 var->yres_virtual = var->yres + hwscroll * 16;
1da177e4 780 }
a1005012 781 var->xoffset = 0;
1da177e4 782 if (screen_base)
a1005012 783 var->yoffset = (par->screen_base - screen_base) / linelen;
1da177e4 784 else
a1005012
MS
785 var->yoffset = 0;
786 var->nonstd = 0;
787 var->activate = 0;
788 var->vmode = FB_VMODE_NONINTERLACED;
1da177e4
LT
789 return 0;
790}
791
a1005012 792static void tt_get_par(struct atafb_par *par)
1da177e4
LT
793{
794 unsigned long addr;
a1005012
MS
795 par->hw.tt.mode = shifter_tt.tt_shiftmode;
796 par->hw.tt.sync = shifter.syncmode;
1da177e4
LT
797 addr = ((shifter.bas_hi & 0xff) << 16) |
798 ((shifter.bas_md & 0xff) << 8) |
799 ((shifter.bas_lo & 0xff));
800 par->screen_base = phys_to_virt(addr);
801}
802
a1005012 803static void tt_set_par(struct atafb_par *par)
1da177e4 804{
a1005012
MS
805 shifter_tt.tt_shiftmode = par->hw.tt.mode;
806 shifter.syncmode = par->hw.tt.sync;
1da177e4
LT
807 /* only set screen_base if really necessary */
808 if (current_par.screen_base != par->screen_base)
809 fbhw->set_screen_base(par->screen_base);
810}
811
a1005012
MS
812static int tt_setcolreg(unsigned int regno, unsigned int red,
813 unsigned int green, unsigned int blue,
814 unsigned int transp, struct fb_info *info)
1da177e4
LT
815{
816 if ((shifter_tt.tt_shiftmode & TT_SHIFTER_MODEMASK) == TT_SHIFTER_STHIGH)
817 regno += 254;
818 if (regno > 255)
819 return 1;
820 tt_palette[regno] = (((red >> 12) << 8) | ((green >> 12) << 4) |
821 (blue >> 12));
822 if ((shifter_tt.tt_shiftmode & TT_SHIFTER_MODEMASK) ==
a1005012 823 TT_SHIFTER_STHIGH && regno == 254)
1da177e4
LT
824 tt_palette[0] = 0;
825 return 0;
826}
827
a1005012
MS
828static int tt_detect(void)
829{
830 struct atafb_par par;
1da177e4
LT
831
832 /* Determine the connected monitor: The DMA sound must be
833 * disabled before reading the MFP GPIP, because the Sound
834 * Done Signal and the Monochrome Detect are XORed together!
835 *
836 * Even on a TT, we should look if there is a DMA sound. It was
837 * announced that the Eagle is TT compatible, but only the PCM is
838 * missing...
839 */
a1005012 840 if (ATARIHW_PRESENT(PCM_8BIT)) {
1da177e4 841 tt_dmasnd.ctrl = DMASND_CTRL_OFF;
a1005012 842 udelay(20); /* wait a while for things to settle down */
1da177e4 843 }
3d92e8f3 844 mono_moni = (st_mfp.par_dt_reg & 0x80) == 0;
1da177e4
LT
845
846 tt_get_par(&par);
847 tt_encode_var(&atafb_predefined[0], &par);
848
849 return 1;
850}
851
852#endif /* ATAFB_TT */
853
854/* ------------------- Falcon specific functions ---------------------- */
855
856#ifdef ATAFB_FALCON
857
858static int mon_type; /* Falcon connected monitor */
859static int f030_bus_width; /* Falcon ram bus width (for vid_control) */
860#define F_MON_SM 0
861#define F_MON_SC 1
862#define F_MON_VGA 2
863#define F_MON_TV 3
864
865static struct pixel_clock {
866 unsigned long f; /* f/[Hz] */
867 unsigned long t; /* t/[ps] (=1/f) */
868 int right, hsync, left; /* standard timing in clock cycles, not pixel */
a1005012 869 /* hsync initialized in falcon_detect() */
1da177e4
LT
870 int sync_mask; /* or-mask for hw.falcon.sync to set this clock */
871 int control_mask; /* ditto, for hw.falcon.vid_control */
a1005012
MS
872} f25 = {
873 25175000, 39721, 18, 0, 42, 0x0, VCO_CLOCK25
874}, f32 = {
875 32000000, 31250, 18, 0, 42, 0x0, 0
876}, fext = {
877 0, 0, 18, 0, 42, 0x1, 0
878};
1da177e4
LT
879
880/* VIDEL-prescale values [mon_type][pixel_length from VCO] */
a1005012
MS
881static int vdl_prescale[4][3] = {
882 { 4,2,1 }, { 4,2,1 }, { 4,2,2 }, { 4,2,1 }
883};
1da177e4
LT
884
885/* Default hsync timing [mon_type] in picoseconds */
a1005012 886static long h_syncs[4] = { 3000000, 4875000, 4000000, 4875000 };
1da177e4 887
1da177e4
LT
888static inline int hxx_prescale(struct falcon_hw *hw)
889{
a1005012
MS
890 return hw->ste_mode ? 16
891 : vdl_prescale[mon_type][hw->vid_mode >> 2 & 0x3];
1da177e4
LT
892}
893
a1005012
MS
894static int falcon_encode_fix(struct fb_fix_screeninfo *fix,
895 struct atafb_par *par)
1da177e4
LT
896{
897 strcpy(fix->id, "Atari Builtin");
898 fix->smem_start = (unsigned long)real_screen_base;
899 fix->smem_len = screen_len;
900 fix->type = FB_TYPE_INTERLEAVED_PLANES;
901 fix->type_aux = 2;
902 fix->visual = FB_VISUAL_PSEUDOCOLOR;
903 fix->xpanstep = 1;
904 fix->ypanstep = 1;
905 fix->ywrapstep = 0;
906 if (par->hw.falcon.mono) {
907 fix->type = FB_TYPE_PACKED_PIXELS;
908 fix->type_aux = 0;
909 /* no smooth scrolling with longword aligned video mem */
910 fix->xpanstep = 32;
a1005012 911 } else if (par->hw.falcon.f_shift & 0x100) {
1da177e4
LT
912 fix->type = FB_TYPE_PACKED_PIXELS;
913 fix->type_aux = 0;
914 /* Is this ok or should it be DIRECTCOLOR? */
915 fix->visual = FB_VISUAL_TRUECOLOR;
916 fix->xpanstep = 2;
917 }
02603930 918 fix->line_length = par->next_line;
1da177e4
LT
919 fix->accel = FB_ACCEL_ATARIBLITT;
920 return 0;
921}
922
a1005012
MS
923static int falcon_decode_var(struct fb_var_screeninfo *var,
924 struct atafb_par *par)
1da177e4
LT
925{
926 int bpp = var->bits_per_pixel;
927 int xres = var->xres;
928 int yres = var->yres;
929 int xres_virtual = var->xres_virtual;
930 int yres_virtual = var->yres_virtual;
931 int left_margin, right_margin, hsync_len;
932 int upper_margin, lower_margin, vsync_len;
933 int linelen;
934 int interlace = 0, doubleline = 0;
935 struct pixel_clock *pclock;
a1005012 936 int plen; /* width of pixel in clock cycles */
1da177e4
LT
937 int xstretch;
938 int prescale;
939 int longoffset = 0;
940 int hfreq, vfreq;
a1005012
MS
941 int hdb_off, hde_off, base_off;
942 int gstart, gend1, gend2, align;
1da177e4
LT
943
944/*
945 Get the video params out of 'var'. If a value doesn't fit, round
946 it up, if it's too big, return EINVAL.
a1005012
MS
947 Round up in the following order: bits_per_pixel, xres, yres,
948 xres_virtual, yres_virtual, xoffset, yoffset, grayscale, bitfields,
1da177e4
LT
949 horizontal timing, vertical timing.
950
951 There is a maximum of screen resolution determined by pixelclock
952 and minimum frame rate -- (X+hmarg.)*(Y+vmarg.)*vfmin <= pixelclock.
953 In interlace mode this is " * " *vfmin <= pixelclock.
954 Additional constraints: hfreq.
955 Frequency range for multisync monitors is given via command line.
956 For TV and SM124 both frequencies are fixed.
957
a1005012 958 X % 16 == 0 to fit 8x?? font (except 1 bitplane modes must use X%32 == 0)
1da177e4
LT
959 Y % 16 == 0 to fit 8x16 font
960 Y % 8 == 0 if Y<400
961
a1005012 962 Currently interlace and doubleline mode in var are ignored.
1da177e4
LT
963 On SM124 and TV only the standard resolutions can be used.
964*/
965
966 /* Reject uninitialized mode */
967 if (!xres || !yres || !bpp)
968 return -EINVAL;
969
a1005012 970 if (mon_type == F_MON_SM && bpp != 1)
1da177e4 971 return -EINVAL;
a1005012
MS
972
973 if (bpp <= 1) {
1da177e4
LT
974 bpp = 1;
975 par->hw.falcon.f_shift = 0x400;
976 par->hw.falcon.st_shift = 0x200;
a1005012 977 } else if (bpp <= 2) {
1da177e4
LT
978 bpp = 2;
979 par->hw.falcon.f_shift = 0x000;
980 par->hw.falcon.st_shift = 0x100;
a1005012 981 } else if (bpp <= 4) {
1da177e4
LT
982 bpp = 4;
983 par->hw.falcon.f_shift = 0x000;
984 par->hw.falcon.st_shift = 0x000;
a1005012 985 } else if (bpp <= 8) {
1da177e4
LT
986 bpp = 8;
987 par->hw.falcon.f_shift = 0x010;
a1005012
MS
988 } else if (bpp <= 16) {
989 bpp = 16; /* packed pixel mode */
990 par->hw.falcon.f_shift = 0x100; /* hicolor, no overlay */
991 } else
1da177e4
LT
992 return -EINVAL;
993 par->hw.falcon.bpp = bpp;
994
995 if (mon_type == F_MON_SM || DontCalcRes) {
996 /* Skip all calculations. VGA/TV/SC1224 only supported. */
997 struct fb_var_screeninfo *myvar = &atafb_predefined[0];
a1005012 998
1da177e4 999 if (bpp > myvar->bits_per_pixel ||
a1005012
MS
1000 var->xres > myvar->xres ||
1001 var->yres > myvar->yres)
1da177e4
LT
1002 return -EINVAL;
1003 fbhw->get_par(par); /* Current par will be new par */
1004 goto set_screen_base; /* Don't forget this */
1005 }
1006
1007 /* Only some fixed resolutions < 640x400 */
1008 if (xres <= 320)
1009 xres = 320;
1010 else if (xres <= 640 && bpp != 16)
1011 xres = 640;
1012 if (yres <= 200)
1013 yres = 200;
1014 else if (yres <= 240)
1015 yres = 240;
1016 else if (yres <= 400)
1017 yres = 400;
1018
1019 /* 2 planes must use STE compatibility mode */
a1005012
MS
1020 par->hw.falcon.ste_mode = bpp == 2;
1021 par->hw.falcon.mono = bpp == 1;
1da177e4
LT
1022
1023 /* Total and visible scanline length must be a multiple of one longword,
1024 * this and the console fontwidth yields the alignment for xres and
1025 * xres_virtual.
1026 * TODO: this way "odd" fontheights are not supported
1027 *
1028 * Special case in STE mode: blank and graphic positions don't align,
1029 * avoid trash at right margin
1030 */
1031 if (par->hw.falcon.ste_mode)
1032 xres = (xres + 63) & ~63;
1033 else if (bpp == 1)
1034 xres = (xres + 31) & ~31;
1035 else
1036 xres = (xres + 15) & ~15;
1037 if (yres >= 400)
1038 yres = (yres + 15) & ~15;
1039 else
1040 yres = (yres + 7) & ~7;
1041
1042 if (xres_virtual < xres)
1043 xres_virtual = xres;
1044 else if (bpp == 1)
1045 xres_virtual = (xres_virtual + 31) & ~31;
1046 else
1047 xres_virtual = (xres_virtual + 15) & ~15;
1048
1049 if (yres_virtual <= 0)
1050 yres_virtual = 0;
1051 else if (yres_virtual < yres)
1052 yres_virtual = yres;
1053
1054 /* backward bug-compatibility */
1055 if (var->pixclock > 1)
1056 var->pixclock -= 1;
1057
1058 par->hw.falcon.line_width = bpp * xres / 16;
1059 par->hw.falcon.line_offset = bpp * (xres_virtual - xres) / 16;
1060
1061 /* single or double pixel width */
1062 xstretch = (xres < 640) ? 2 : 1;
1063
1064#if 0 /* SM124 supports only 640x400, this is rejected above */
1065 if (mon_type == F_MON_SM) {
1066 if (xres != 640 && yres != 400)
1067 return -EINVAL;
1068 plen = 1;
1069 pclock = &f32;
1070 /* SM124-mode is special */
1071 par->hw.falcon.ste_mode = 1;
1072 par->hw.falcon.f_shift = 0x000;
1073 par->hw.falcon.st_shift = 0x200;
1074 left_margin = hsync_len = 128 / plen;
1075 right_margin = 0;
1076 /* TODO set all margins */
a1005012 1077 } else
1da177e4
LT
1078#endif
1079 if (mon_type == F_MON_SC || mon_type == F_MON_TV) {
1080 plen = 2 * xstretch;
1081 if (var->pixclock > f32.t * plen)
1082 return -EINVAL;
1083 pclock = &f32;
1084 if (yres > 240)
1085 interlace = 1;
1086 if (var->pixclock == 0) {
1087 /* set some minimal margins which center the screen */
1088 left_margin = 32;
1089 right_margin = 18;
1090 hsync_len = pclock->hsync / plen;
1091 upper_margin = 31;
1092 lower_margin = 14;
1093 vsync_len = interlace ? 3 : 4;
1094 } else {
1095 left_margin = var->left_margin;
1096 right_margin = var->right_margin;
1097 hsync_len = var->hsync_len;
1098 upper_margin = var->upper_margin;
1099 lower_margin = var->lower_margin;
1100 vsync_len = var->vsync_len;
1101 if (var->vmode & FB_VMODE_INTERLACED) {
1102 upper_margin = (upper_margin + 1) / 2;
1103 lower_margin = (lower_margin + 1) / 2;
1104 vsync_len = (vsync_len + 1) / 2;
1105 } else if (var->vmode & FB_VMODE_DOUBLE) {
1106 upper_margin *= 2;
1107 lower_margin *= 2;
1108 vsync_len *= 2;
1109 }
1110 }
a1005012 1111 } else { /* F_MON_VGA */
1da177e4 1112 if (bpp == 16)
a1005012 1113 xstretch = 2; /* Double pixel width only for hicolor */
1da177e4
LT
1114 /* Default values are used for vert./hor. timing if no pixelclock given. */
1115 if (var->pixclock == 0) {
1116 int linesize;
1117
1118 /* Choose master pixelclock depending on hor. timing */
1119 plen = 1 * xstretch;
a1005012 1120 if ((plen * xres + f25.right + f25.hsync + f25.left) *
1da177e4
LT
1121 fb_info.monspecs.hfmin < f25.f)
1122 pclock = &f25;
a1005012
MS
1123 else if ((plen * xres + f32.right + f32.hsync +
1124 f32.left) * fb_info.monspecs.hfmin < f32.f)
1da177e4 1125 pclock = &f32;
a1005012
MS
1126 else if ((plen * xres + fext.right + fext.hsync +
1127 fext.left) * fb_info.monspecs.hfmin < fext.f &&
1128 fext.f)
1da177e4
LT
1129 pclock = &fext;
1130 else
1131 return -EINVAL;
1132
1133 left_margin = pclock->left / plen;
1134 right_margin = pclock->right / plen;
1135 hsync_len = pclock->hsync / plen;
1136 linesize = left_margin + xres + right_margin + hsync_len;
1137 upper_margin = 31;
1138 lower_margin = 11;
1139 vsync_len = 3;
a1005012 1140 } else {
1da177e4
LT
1141 /* Choose largest pixelclock <= wanted clock */
1142 int i;
1143 unsigned long pcl = ULONG_MAX;
1144 pclock = 0;
a1005012
MS
1145 for (i = 1; i <= 4; i *= 2) {
1146 if (f25.t * i >= var->pixclock &&
1147 f25.t * i < pcl) {
1da177e4
LT
1148 pcl = f25.t * i;
1149 pclock = &f25;
1150 }
a1005012
MS
1151 if (f32.t * i >= var->pixclock &&
1152 f32.t * i < pcl) {
1da177e4
LT
1153 pcl = f32.t * i;
1154 pclock = &f32;
1155 }
a1005012
MS
1156 if (fext.t && fext.t * i >= var->pixclock &&
1157 fext.t * i < pcl) {
1da177e4
LT
1158 pcl = fext.t * i;
1159 pclock = &fext;
1160 }
1161 }
1162 if (!pclock)
1163 return -EINVAL;
1164 plen = pcl / pclock->t;
1165
1166 left_margin = var->left_margin;
1167 right_margin = var->right_margin;
1168 hsync_len = var->hsync_len;
1169 upper_margin = var->upper_margin;
1170 lower_margin = var->lower_margin;
1171 vsync_len = var->vsync_len;
1172 /* Internal unit is [single lines per (half-)frame] */
1173 if (var->vmode & FB_VMODE_INTERLACED) {
1174 /* # lines in half frame */
1175 /* External unit is [lines per full frame] */
1176 upper_margin = (upper_margin + 1) / 2;
1177 lower_margin = (lower_margin + 1) / 2;
1178 vsync_len = (vsync_len + 1) / 2;
a1005012 1179 } else if (var->vmode & FB_VMODE_DOUBLE) {
1da177e4
LT
1180 /* External unit is [double lines per frame] */
1181 upper_margin *= 2;
1182 lower_margin *= 2;
1183 vsync_len *= 2;
1184 }
1185 }
1186 if (pclock == &fext)
a1005012 1187 longoffset = 1; /* VIDEL doesn't synchronize on short offset */
1da177e4
LT
1188 }
1189 /* Is video bus bandwidth (32MB/s) too low for this resolution? */
1190 /* this is definitely wrong if bus clock != 32MHz */
1191 if (pclock->f / plen / 8 * bpp > 32000000L)
1192 return -EINVAL;
1193
1194 if (vsync_len < 1)
1195 vsync_len = 1;
1196
1197 /* include sync lengths in right/lower margin for all calculations */
1198 right_margin += hsync_len;
1199 lower_margin += vsync_len;
1200
1201 /* ! In all calculations of margins we use # of lines in half frame
1202 * (which is a full frame in non-interlace mode), so we can switch
1203 * between interlace and non-interlace without messing around
1204 * with these.
1205 */
a1005012 1206again:
1da177e4
LT
1207 /* Set base_offset 128 and video bus width */
1208 par->hw.falcon.vid_control = mon_type | f030_bus_width;
1209 if (!longoffset)
1210 par->hw.falcon.vid_control |= VCO_SHORTOFFS; /* base_offset 64 */
1211 if (var->sync & FB_SYNC_HOR_HIGH_ACT)
1212 par->hw.falcon.vid_control |= VCO_HSYPOS;
1213 if (var->sync & FB_SYNC_VERT_HIGH_ACT)
1214 par->hw.falcon.vid_control |= VCO_VSYPOS;
1215 /* Pixelclock */
1216 par->hw.falcon.vid_control |= pclock->control_mask;
1217 /* External or internal clock */
1218 par->hw.falcon.sync = pclock->sync_mask | 0x2;
1219 /* Pixellength and prescale */
a1005012 1220 par->hw.falcon.vid_mode = (2 / plen) << 2;
1da177e4
LT
1221 if (doubleline)
1222 par->hw.falcon.vid_mode |= VMO_DOUBLE;
1223 if (interlace)
1224 par->hw.falcon.vid_mode |= VMO_INTER;
1225
1226 /*********************
a1005012
MS
1227 * Horizontal timing: unit = [master clock cycles]
1228 * unit of hxx-registers: [master clock cycles * prescale]
1229 * Hxx-registers are 9 bit wide
1230 *
1231 * 1 line = ((hht + 2) * 2 * prescale) clock cycles
1232 *
1233 * graphic output = hdb & 0x200 ?
1234 * ((hht + 2) * 2 - hdb + hde) * prescale - hdboff + hdeoff:
1235 * (hht + 2 - hdb + hde) * prescale - hdboff + hdeoff
1236 * (this must be a multiple of plen*128/bpp, on VGA pixels
1237 * to the right may be cut off with a bigger right margin)
1238 *
1239 * start of graphics relative to start of 1st halfline = hdb & 0x200 ?
1240 * (hdb - hht - 2) * prescale + hdboff :
1241 * hdb * prescale + hdboff
1242 *
1243 * end of graphics relative to start of 1st halfline =
1244 * (hde + hht + 2) * prescale + hdeoff
1245 *********************/
1da177e4 1246 /* Calculate VIDEL registers */
a1005012 1247{
1da177e4
LT
1248 prescale = hxx_prescale(&par->hw.falcon);
1249 base_off = par->hw.falcon.vid_control & VCO_SHORTOFFS ? 64 : 128;
1250
1251 /* Offsets depend on video mode */
1252 /* Offsets are in clock cycles, divide by prescale to
1253 * calculate hd[be]-registers
1254 */
1255 if (par->hw.falcon.f_shift & 0x100) {
1256 align = 1;
1257 hde_off = 0;
1258 hdb_off = (base_off + 16 * plen) + prescale;
a1005012 1259 } else {
1da177e4
LT
1260 align = 128 / bpp;
1261 hde_off = ((128 / bpp + 2) * plen);
1262 if (par->hw.falcon.ste_mode)
1263 hdb_off = (64 + base_off + (128 / bpp + 2) * plen) + prescale;
1264 else
1265 hdb_off = (base_off + (128 / bpp + 18) * plen) + prescale;
1266 }
1267
a1005012 1268 gstart = (prescale / 2 + plen * left_margin) / prescale;
1da177e4 1269 /* gend1 is for hde (gend-gstart multiple of align), shifter's xres */
416e74ea 1270 gend1 = gstart + roundup(xres, align) * plen / prescale;
1da177e4
LT
1271 /* gend2 is for hbb, visible xres (rest to gend1 is cut off by hblank) */
1272 gend2 = gstart + xres * plen / prescale;
1273 par->HHT = plen * (left_margin + xres + right_margin) /
1274 (2 * prescale) - 2;
1275/* par->HHT = (gend2 + plen * right_margin / prescale) / 2 - 2;*/
1276
a1005012 1277 par->HDB = gstart - hdb_off / prescale;
1da177e4 1278 par->HBE = gstart;
a1005012
MS
1279 if (par->HDB < 0)
1280 par->HDB += par->HHT + 2 + 0x200;
1281 par->HDE = gend1 - par->HHT - 2 - hde_off / prescale;
1da177e4
LT
1282 par->HBB = gend2 - par->HHT - 2;
1283#if 0
1284 /* One more Videl constraint: data fetch of two lines must not overlap */
a1005012 1285 if ((par->HDB & 0x200) && (par->HDB & ~0x200) - par->HDE <= 5) {
1da177e4
LT
1286 /* if this happens increase margins, decrease hfreq. */
1287 }
1288#endif
1289 if (hde_off % prescale)
1290 par->HBB++; /* compensate for non matching hde and hbb */
1291 par->HSS = par->HHT + 2 - plen * hsync_len / prescale;
1292 if (par->HSS < par->HBB)
1293 par->HSS = par->HBB;
a1005012 1294}
1da177e4
LT
1295
1296 /* check hor. frequency */
a1005012
MS
1297 hfreq = pclock->f / ((par->HHT + 2) * prescale * 2);
1298 if (hfreq > fb_info.monspecs.hfmax && mon_type != F_MON_VGA) {
1da177e4
LT
1299 /* ++guenther: ^^^^^^^^^^^^^^^^^^^ can't remember why I did this */
1300 /* Too high -> enlarge margin */
1301 left_margin += 1;
1302 right_margin += 1;
1303 goto again;
1304 }
1305 if (hfreq > fb_info.monspecs.hfmax || hfreq < fb_info.monspecs.hfmin)
1306 return -EINVAL;
1307
1308 /* Vxx-registers */
1309 /* All Vxx must be odd in non-interlace, since frame starts in the middle
1310 * of the first displayed line!
1311 * One frame consists of VFT+1 half lines. VFT+1 must be even in
1312 * non-interlace, odd in interlace mode for synchronisation.
1313 * Vxx-registers are 11 bit wide
1314 */
1315 par->VBE = (upper_margin * 2 + 1); /* must begin on odd halfline */
1316 par->VDB = par->VBE;
1317 par->VDE = yres;
a1005012
MS
1318 if (!interlace)
1319 par->VDE <<= 1;
1320 if (doubleline)
1321 par->VDE <<= 1; /* VDE now half lines per (half-)frame */
1da177e4
LT
1322 par->VDE += par->VDB;
1323 par->VBB = par->VDE;
1324 par->VFT = par->VBB + (lower_margin * 2 - 1) - 1;
a1005012 1325 par->VSS = par->VFT + 1 - (vsync_len * 2 - 1);
1da177e4
LT
1326 /* vbb,vss,vft must be even in interlace mode */
1327 if (interlace) {
1328 par->VBB++;
1329 par->VSS++;
1330 par->VFT++;
1331 }
1332
1333 /* V-frequency check, hope I didn't create any loop here. */
1334 /* Interlace and doubleline are mutually exclusive. */
1335 vfreq = (hfreq * 2) / (par->VFT + 1);
a1005012 1336 if (vfreq > fb_info.monspecs.vfmax && !doubleline && !interlace) {
1da177e4
LT
1337 /* Too high -> try again with doubleline */
1338 doubleline = 1;
1339 goto again;
a1005012 1340 } else if (vfreq < fb_info.monspecs.vfmin && !interlace && !doubleline) {
1da177e4
LT
1341 /* Too low -> try again with interlace */
1342 interlace = 1;
1343 goto again;
a1005012 1344 } else if (vfreq < fb_info.monspecs.vfmin && doubleline) {
1da177e4
LT
1345 /* Doubleline too low -> clear doubleline and enlarge margins */
1346 int lines;
1347 doubleline = 0;
a1005012
MS
1348 for (lines = 0;
1349 (hfreq * 2) / (par->VFT + 1 + 4 * lines - 2 * yres) >
1350 fb_info.monspecs.vfmax;
1da177e4
LT
1351 lines++)
1352 ;
1353 upper_margin += lines;
1354 lower_margin += lines;
1355 goto again;
a1005012 1356 } else if (vfreq > fb_info.monspecs.vfmax && doubleline) {
1da177e4
LT
1357 /* Doubleline too high -> enlarge margins */
1358 int lines;
a1005012
MS
1359 for (lines = 0;
1360 (hfreq * 2) / (par->VFT + 1 + 4 * lines) >
1361 fb_info.monspecs.vfmax;
1362 lines += 2)
1da177e4
LT
1363 ;
1364 upper_margin += lines;
1365 lower_margin += lines;
1366 goto again;
a1005012 1367 } else if (vfreq > fb_info.monspecs.vfmax && interlace) {
1da177e4
LT
1368 /* Interlace, too high -> enlarge margins */
1369 int lines;
a1005012
MS
1370 for (lines = 0;
1371 (hfreq * 2) / (par->VFT + 1 + 4 * lines) >
1372 fb_info.monspecs.vfmax;
1da177e4
LT
1373 lines++)
1374 ;
1375 upper_margin += lines;
1376 lower_margin += lines;
1377 goto again;
a1005012
MS
1378 } else if (vfreq < fb_info.monspecs.vfmin ||
1379 vfreq > fb_info.monspecs.vfmax)
1da177e4
LT
1380 return -EINVAL;
1381
a1005012 1382set_screen_base:
1da177e4
LT
1383 linelen = xres_virtual * bpp / 8;
1384 if (yres_virtual * linelen > screen_len && screen_len)
1385 return -EINVAL;
1386 if (yres * linelen > screen_len && screen_len)
1387 return -EINVAL;
1388 if (var->yoffset + yres > yres_virtual && yres_virtual)
1389 return -EINVAL;
1390 par->yres_virtual = yres_virtual;
1391 par->screen_base = screen_base + var->yoffset * linelen;
1392 par->hw.falcon.xoffset = 0;
1393
a1005012 1394 par->next_line = linelen;
a1005012 1395
1da177e4
LT
1396 return 0;
1397}
1398
a1005012
MS
1399static int falcon_encode_var(struct fb_var_screeninfo *var,
1400 struct atafb_par *par)
1da177e4
LT
1401{
1402/* !!! only for VGA !!! */
1403 int linelen;
1404 int prescale, plen;
1405 int hdb_off, hde_off, base_off;
1406 struct falcon_hw *hw = &par->hw.falcon;
1407
1408 memset(var, 0, sizeof(struct fb_var_screeninfo));
1409 /* possible frequencies: 25.175 or 32MHz */
1410 var->pixclock = hw->sync & 0x1 ? fext.t :
1411 hw->vid_control & VCO_CLOCK25 ? f25.t : f32.t;
1412
a1005012
MS
1413 var->height = -1;
1414 var->width = -1;
1da177e4 1415
a1005012 1416 var->sync = 0;
1da177e4
LT
1417 if (hw->vid_control & VCO_HSYPOS)
1418 var->sync |= FB_SYNC_HOR_HIGH_ACT;
1419 if (hw->vid_control & VCO_VSYPOS)
1420 var->sync |= FB_SYNC_VERT_HIGH_ACT;
1421
1422 var->vmode = FB_VMODE_NONINTERLACED;
1423 if (hw->vid_mode & VMO_INTER)
1424 var->vmode |= FB_VMODE_INTERLACED;
1425 if (hw->vid_mode & VMO_DOUBLE)
1426 var->vmode |= FB_VMODE_DOUBLE;
a1005012 1427
1da177e4
LT
1428 /* visible y resolution:
1429 * Graphics display starts at line VDB and ends at line
1430 * VDE. If interlace mode off unit of VC-registers is
1431 * half lines, else lines.
1432 */
1433 var->yres = hw->vde - hw->vdb;
1434 if (!(var->vmode & FB_VMODE_INTERLACED))
1435 var->yres >>= 1;
1436 if (var->vmode & FB_VMODE_DOUBLE)
1437 var->yres >>= 1;
1438
a1005012
MS
1439 /*
1440 * to get bpp, we must examine f_shift and st_shift.
1da177e4
LT
1441 * f_shift is valid if any of bits no. 10, 8 or 4
1442 * is set. Priority in f_shift is: 10 ">" 8 ">" 4, i.e.
1443 * if bit 10 set then bit 8 and bit 4 don't care...
1444 * If all these bits are 0 get display depth from st_shift
1445 * (as for ST and STE)
1446 */
a1005012 1447 if (hw->f_shift & 0x400) /* 2 colors */
1da177e4
LT
1448 var->bits_per_pixel = 1;
1449 else if (hw->f_shift & 0x100) /* hicolor */
1450 var->bits_per_pixel = 16;
1451 else if (hw->f_shift & 0x010) /* 8 bitplanes */
1452 var->bits_per_pixel = 8;
1453 else if (hw->st_shift == 0)
1454 var->bits_per_pixel = 4;
1455 else if (hw->st_shift == 0x100)
1456 var->bits_per_pixel = 2;
a1005012 1457 else /* if (hw->st_shift == 0x200) */
1da177e4
LT
1458 var->bits_per_pixel = 1;
1459
1460 var->xres = hw->line_width * 16 / var->bits_per_pixel;
1461 var->xres_virtual = var->xres + hw->line_offset * 16 / var->bits_per_pixel;
1462 if (hw->xoffset)
1463 var->xres_virtual += 16;
1464
1465 if (var->bits_per_pixel == 16) {
a1005012
MS
1466 var->red.offset = 11;
1467 var->red.length = 5;
1468 var->red.msb_right = 0;
1469 var->green.offset = 5;
1470 var->green.length = 6;
1471 var->green.msb_right = 0;
1472 var->blue.offset = 0;
1473 var->blue.length = 5;
1474 var->blue.msb_right = 0;
1475 } else {
1476 var->red.offset = 0;
1da177e4 1477 var->red.length = hw->ste_mode ? 4 : 6;
a1005012
MS
1478 if (var->red.length > var->bits_per_pixel)
1479 var->red.length = var->bits_per_pixel;
1480 var->red.msb_right = 0;
1481 var->grayscale = 0;
1482 var->blue = var->green = var->red;
1da177e4 1483 }
a1005012
MS
1484 var->transp.offset = 0;
1485 var->transp.length = 0;
1486 var->transp.msb_right = 0;
1da177e4
LT
1487
1488 linelen = var->xres_virtual * var->bits_per_pixel / 8;
1489 if (screen_len) {
1490 if (par->yres_virtual)
1491 var->yres_virtual = par->yres_virtual;
1492 else
a1005012 1493 /* yres_virtual == 0 means use maximum */
1da177e4 1494 var->yres_virtual = screen_len / linelen;
a1005012 1495 } else {
1da177e4
LT
1496 if (hwscroll < 0)
1497 var->yres_virtual = 2 * var->yres;
1498 else
a1005012 1499 var->yres_virtual = var->yres + hwscroll * 16;
1da177e4 1500 }
a1005012 1501 var->xoffset = 0; /* TODO change this */
1da177e4
LT
1502
1503 /* hdX-offsets */
1504 prescale = hxx_prescale(hw);
1505 plen = 4 >> (hw->vid_mode >> 2 & 0x3);
1506 base_off = hw->vid_control & VCO_SHORTOFFS ? 64 : 128;
1507 if (hw->f_shift & 0x100) {
1508 hde_off = 0;
1509 hdb_off = (base_off + 16 * plen) + prescale;
a1005012 1510 } else {
1da177e4
LT
1511 hde_off = ((128 / var->bits_per_pixel + 2) * plen);
1512 if (hw->ste_mode)
1513 hdb_off = (64 + base_off + (128 / var->bits_per_pixel + 2) * plen)
1514 + prescale;
1515 else
1516 hdb_off = (base_off + (128 / var->bits_per_pixel + 18) * plen)
1517 + prescale;
1518 }
1519
1520 /* Right margin includes hsync */
1521 var->left_margin = hdb_off + prescale * ((hw->hdb & 0x1ff) -
a1005012
MS
1522 (hw->hdb & 0x200 ? 2 + hw->hht : 0));
1523 if (hw->ste_mode || mon_type != F_MON_VGA)
1da177e4
LT
1524 var->right_margin = prescale * (hw->hht + 2 - hw->hde) - hde_off;
1525 else
1526 /* can't use this in ste_mode, because hbb is +1 off */
1527 var->right_margin = prescale * (hw->hht + 2 - hw->hbb);
1528 var->hsync_len = prescale * (hw->hht + 2 - hw->hss);
1529
1530 /* Lower margin includes vsync */
a1005012
MS
1531 var->upper_margin = hw->vdb / 2; /* round down to full lines */
1532 var->lower_margin = (hw->vft + 1 - hw->vde + 1) / 2; /* round up */
1533 var->vsync_len = (hw->vft + 1 - hw->vss + 1) / 2; /* round up */
1da177e4
LT
1534 if (var->vmode & FB_VMODE_INTERLACED) {
1535 var->upper_margin *= 2;
1536 var->lower_margin *= 2;
1537 var->vsync_len *= 2;
a1005012 1538 } else if (var->vmode & FB_VMODE_DOUBLE) {
1da177e4
LT
1539 var->upper_margin = (var->upper_margin + 1) / 2;
1540 var->lower_margin = (var->lower_margin + 1) / 2;
1541 var->vsync_len = (var->vsync_len + 1) / 2;
1542 }
1543
1544 var->pixclock *= plen;
1545 var->left_margin /= plen;
1546 var->right_margin /= plen;
1547 var->hsync_len /= plen;
1548
1549 var->right_margin -= var->hsync_len;
1550 var->lower_margin -= var->vsync_len;
1551
1552 if (screen_base)
a1005012 1553 var->yoffset = (par->screen_base - screen_base) / linelen;
1da177e4 1554 else
a1005012
MS
1555 var->yoffset = 0;
1556 var->nonstd = 0; /* what is this for? */
1557 var->activate = 0;
1da177e4
LT
1558 return 0;
1559}
1560
a1005012 1561static int f_change_mode;
1da177e4 1562static struct falcon_hw f_new_mode;
a1005012 1563static int f_pan_display;
1da177e4 1564
a1005012 1565static void falcon_get_par(struct atafb_par *par)
1da177e4
LT
1566{
1567 unsigned long addr;
1568 struct falcon_hw *hw = &par->hw.falcon;
1569
1570 hw->line_width = shifter_f030.scn_width;
1571 hw->line_offset = shifter_f030.off_next;
1572 hw->st_shift = videl.st_shift & 0x300;
1573 hw->f_shift = videl.f_shift;
1574 hw->vid_control = videl.control;
1575 hw->vid_mode = videl.mode;
1576 hw->sync = shifter.syncmode & 0x1;
1577 hw->xoffset = videl.xoffset & 0xf;
1578 hw->hht = videl.hht;
1579 hw->hbb = videl.hbb;
1580 hw->hbe = videl.hbe;
1581 hw->hdb = videl.hdb;
1582 hw->hde = videl.hde;
1583 hw->hss = videl.hss;
1584 hw->vft = videl.vft;
1585 hw->vbb = videl.vbb;
1586 hw->vbe = videl.vbe;
1587 hw->vdb = videl.vdb;
1588 hw->vde = videl.vde;
1589 hw->vss = videl.vss;
1590
1591 addr = (shifter.bas_hi & 0xff) << 16 |
1592 (shifter.bas_md & 0xff) << 8 |
1593 (shifter.bas_lo & 0xff);
1594 par->screen_base = phys_to_virt(addr);
1595
1596 /* derived parameters */
a1005012 1597 hw->ste_mode = (hw->f_shift & 0x510) == 0 && hw->st_shift == 0x100;
1da177e4 1598 hw->mono = (hw->f_shift & 0x400) ||
a1005012 1599 ((hw->f_shift & 0x510) == 0 && hw->st_shift == 0x200);
1da177e4
LT
1600}
1601
a1005012 1602static void falcon_set_par(struct atafb_par *par)
1da177e4
LT
1603{
1604 f_change_mode = 0;
1605
1606 /* only set screen_base if really necessary */
1607 if (current_par.screen_base != par->screen_base)
1608 fbhw->set_screen_base(par->screen_base);
1609
1610 /* Don't touch any other registers if we keep the default resolution */
1611 if (DontCalcRes)
1612 return;
1613
1614 /* Tell vbl-handler to change video mode.
1615 * We change modes only on next VBL, to avoid desynchronisation
1616 * (a shift to the right and wrap around by a random number of pixels
1617 * in all monochrome modes).
1618 * This seems to work on my Falcon.
1619 */
1620 f_new_mode = par->hw.falcon;
1621 f_change_mode = 1;
1622}
1623
a1005012 1624static irqreturn_t falcon_vbl_switcher(int irq, void *dummy)
1da177e4
LT
1625{
1626 struct falcon_hw *hw = &f_new_mode;
1627
1628 if (f_change_mode) {
1629 f_change_mode = 0;
1630
1631 if (hw->sync & 0x1) {
1632 /* Enable external pixelclock. This code only for ScreenWonder */
a1005012
MS
1633 *(volatile unsigned short *)0xffff9202 = 0xffbf;
1634 } else {
1da177e4 1635 /* Turn off external clocks. Read sets all output bits to 1. */
a1005012 1636 *(volatile unsigned short *)0xffff9202;
1da177e4
LT
1637 }
1638 shifter.syncmode = hw->sync;
1639
1640 videl.hht = hw->hht;
1641 videl.hbb = hw->hbb;
1642 videl.hbe = hw->hbe;
1643 videl.hdb = hw->hdb;
1644 videl.hde = hw->hde;
1645 videl.hss = hw->hss;
1646 videl.vft = hw->vft;
1647 videl.vbb = hw->vbb;
1648 videl.vbe = hw->vbe;
1649 videl.vdb = hw->vdb;
1650 videl.vde = hw->vde;
1651 videl.vss = hw->vss;
1652
a1005012 1653 videl.f_shift = 0; /* write enables Falcon palette, 0: 4 planes */
1da177e4 1654 if (hw->ste_mode) {
a1005012
MS
1655 videl.st_shift = hw->st_shift; /* write enables STE palette */
1656 } else {
1da177e4 1657 /* IMPORTANT:
a1005012 1658 * set st_shift 0, so we can tell the screen-depth if f_shift == 0.
1da177e4 1659 * Writing 0 to f_shift enables 4 plane Falcon mode but
a1005012 1660 * doesn't set st_shift. st_shift != 0 (!= 4planes) is impossible
1da177e4
LT
1661 * with Falcon palette.
1662 */
1663 videl.st_shift = 0;
1664 /* now back to Falcon palette mode */
1665 videl.f_shift = hw->f_shift;
1666 }
1667 /* writing to st_shift changed scn_width and vid_mode */
1668 videl.xoffset = hw->xoffset;
1669 shifter_f030.scn_width = hw->line_width;
1670 shifter_f030.off_next = hw->line_offset;
1671 videl.control = hw->vid_control;
1672 videl.mode = hw->vid_mode;
1673 }
1674 if (f_pan_display) {
1675 f_pan_display = 0;
1676 videl.xoffset = current_par.hw.falcon.xoffset;
1677 shifter_f030.off_next = current_par.hw.falcon.line_offset;
1678 }
1679 return IRQ_HANDLED;
1680}
1681
a1005012
MS
1682static int falcon_pan_display(struct fb_var_screeninfo *var,
1683 struct fb_info *info)
1da177e4 1684{
a1005012
MS
1685 struct atafb_par *par = (struct atafb_par *)info->par;
1686
1da177e4 1687 int xoffset;
a1005012 1688 int bpp = info->var.bits_per_pixel;
1da177e4
LT
1689
1690 if (bpp == 1)
1691 var->xoffset = up(var->xoffset, 32);
1692 if (bpp != 16)
1693 par->hw.falcon.xoffset = var->xoffset & 15;
1694 else {
1695 par->hw.falcon.xoffset = 0;
1696 var->xoffset = up(var->xoffset, 2);
1697 }
1698 par->hw.falcon.line_offset = bpp *
a1005012 1699 (info->var.xres_virtual - info->var.xres) / 16;
1da177e4
LT
1700 if (par->hw.falcon.xoffset)
1701 par->hw.falcon.line_offset -= bpp;
1702 xoffset = var->xoffset - par->hw.falcon.xoffset;
1703
1704 par->screen_base = screen_base +
a1005012 1705 (var->yoffset * info->var.xres_virtual + xoffset) * bpp / 8;
1da177e4 1706 if (fbhw->set_screen_base)
a1005012 1707 fbhw->set_screen_base(par->screen_base);
1da177e4 1708 else
a1005012 1709 return -EINVAL; /* shouldn't happen */
1da177e4
LT
1710 f_pan_display = 1;
1711 return 0;
1712}
1713
a1005012
MS
1714static int falcon_setcolreg(unsigned int regno, unsigned int red,
1715 unsigned int green, unsigned int blue,
1716 unsigned int transp, struct fb_info *info)
1da177e4
LT
1717{
1718 if (regno > 255)
1719 return 1;
1720 f030_col[regno] = (((red & 0xfc00) << 16) |
1721 ((green & 0xfc00) << 8) |
1722 ((blue & 0xfc00) >> 8));
1723 if (regno < 16) {
1724 shifter_tt.color_reg[regno] =
1725 (((red & 0xe000) >> 13) | ((red & 0x1000) >> 12) << 8) |
1726 (((green & 0xe000) >> 13) | ((green & 0x1000) >> 12) << 4) |
1727 ((blue & 0xe000) >> 13) | ((blue & 0x1000) >> 12);
74511413
GU
1728#ifdef ATAFB_FALCON
1729 ((u32 *)info->pseudo_palette)[regno] = ((red & 0xf800) |
1730 ((green & 0xfc00) >> 5) |
1731 ((blue & 0xf800) >> 11));
1da177e4
LT
1732#endif
1733 }
1734 return 0;
1735}
1736
a1005012 1737static int falcon_blank(int blank_mode)
1da177e4 1738{
a1005012
MS
1739 /* ++guenther: we can switch off graphics by changing VDB and VDE,
1740 * so VIDEL doesn't hog the bus while saving.
1741 * (this may affect usleep()).
1742 */
1da177e4
LT
1743 int vdb, vss, hbe, hss;
1744
1745 if (mon_type == F_MON_SM) /* this doesn't work on SM124 */
1746 return 1;
1747
1748 vdb = current_par.VDB;
1749 vss = current_par.VSS;
1750 hbe = current_par.HBE;
1751 hss = current_par.HSS;
1752
1753 if (blank_mode >= 1) {
1754 /* disable graphics output (this speeds up the CPU) ... */
1755 vdb = current_par.VFT + 1;
1756 /* ... and blank all lines */
1757 hbe = current_par.HHT + 2;
1758 }
1759 /* use VESA suspend modes on VGA monitors */
1760 if (mon_type == F_MON_VGA) {
1761 if (blank_mode == 2 || blank_mode == 4)
1762 vss = current_par.VFT + 1;
1763 if (blank_mode == 3 || blank_mode == 4)
1764 hss = current_par.HHT + 2;
1765 }
1766
1767 videl.vdb = vdb;
1768 videl.vss = vss;
1769 videl.hbe = hbe;
1770 videl.hss = hss;
1771
1772 return 0;
1773}
1774
a1005012 1775static int falcon_detect(void)
1da177e4
LT
1776{
1777 struct atafb_par par;
1778 unsigned char fhw;
1779
1780 /* Determine connected monitor and set monitor parameters */
a1005012 1781 fhw = *(unsigned char *)0xffff8006;
1da177e4
LT
1782 mon_type = fhw >> 6 & 0x3;
1783 /* bit 1 of fhw: 1=32 bit ram bus, 0=16 bit */
1784 f030_bus_width = fhw << 6 & 0x80;
1785 switch (mon_type) {
1786 case F_MON_SM:
1787 fb_info.monspecs.vfmin = 70;
1788 fb_info.monspecs.vfmax = 72;
1789 fb_info.monspecs.hfmin = 35713;
1790 fb_info.monspecs.hfmax = 35715;
1791 break;
1792 case F_MON_SC:
1793 case F_MON_TV:
1794 /* PAL...NTSC */
a1005012 1795 fb_info.monspecs.vfmin = 49; /* not 50, since TOS defaults to 49.9x Hz */
1da177e4
LT
1796 fb_info.monspecs.vfmax = 60;
1797 fb_info.monspecs.hfmin = 15620;
1798 fb_info.monspecs.hfmax = 15755;
1799 break;
1800 }
1801 /* initialize hsync-len */
1802 f25.hsync = h_syncs[mon_type] / f25.t;
1803 f32.hsync = h_syncs[mon_type] / f32.t;
1804 if (fext.t)
1805 fext.hsync = h_syncs[mon_type] / fext.t;
1806
1807 falcon_get_par(&par);
1808 falcon_encode_var(&atafb_predefined[0], &par);
1809
1810 /* Detected mode is always the "autodetect" slot */
1811 return 1;
1812}
1813
1814#endif /* ATAFB_FALCON */
1815
1816/* ------------------- ST(E) specific functions ---------------------- */
1817
1818#ifdef ATAFB_STE
1819
a1005012
MS
1820static int stste_encode_fix(struct fb_fix_screeninfo *fix,
1821 struct atafb_par *par)
1da177e4
LT
1822{
1823 int mode;
1824
a1005012 1825 strcpy(fix->id, "Atari Builtin");
1da177e4
LT
1826 fix->smem_start = (unsigned long)real_screen_base;
1827 fix->smem_len = screen_len;
1828 fix->type = FB_TYPE_INTERLEAVED_PLANES;
1829 fix->type_aux = 2;
1830 fix->visual = FB_VISUAL_PSEUDOCOLOR;
1831 mode = par->hw.st.mode & 3;
1832 if (mode == ST_HIGH) {
1833 fix->type = FB_TYPE_PACKED_PIXELS;
1834 fix->type_aux = 0;
1835 fix->visual = FB_VISUAL_MONO10;
1836 }
1837 if (ATARIHW_PRESENT(EXTD_SHIFTER)) {
1838 fix->xpanstep = 16;
1839 fix->ypanstep = 1;
1840 } else {
1841 fix->xpanstep = 0;
1842 fix->ypanstep = 0;
1843 }
1844 fix->ywrapstep = 0;
02603930 1845 fix->line_length = par->next_line;
1da177e4
LT
1846 fix->accel = FB_ACCEL_ATARIBLITT;
1847 return 0;
1848}
1849
a1005012
MS
1850static int stste_decode_var(struct fb_var_screeninfo *var,
1851 struct atafb_par *par)
1da177e4 1852{
a1005012
MS
1853 int xres = var->xres;
1854 int yres = var->yres;
1855 int bpp = var->bits_per_pixel;
1da177e4
LT
1856 int linelen;
1857 int yres_virtual = var->yres_virtual;
1858
1859 if (mono_moni) {
1860 if (bpp > 1 || xres > sttt_xres || yres > st_yres)
1861 return -EINVAL;
a1005012
MS
1862 par->hw.st.mode = ST_HIGH;
1863 xres = sttt_xres;
1864 yres = st_yres;
1865 bpp = 1;
1da177e4
LT
1866 } else {
1867 if (bpp > 4 || xres > sttt_xres || yres > st_yres)
1868 return -EINVAL;
1869 if (bpp > 2) {
a1005012 1870 if (xres > sttt_xres / 2 || yres > st_yres / 2)
1da177e4 1871 return -EINVAL;
a1005012
MS
1872 par->hw.st.mode = ST_LOW;
1873 xres = sttt_xres / 2;
1874 yres = st_yres / 2;
1875 bpp = 4;
1876 } else if (bpp > 1) {
1877 if (xres > sttt_xres || yres > st_yres / 2)
1da177e4 1878 return -EINVAL;
a1005012
MS
1879 par->hw.st.mode = ST_MID;
1880 xres = sttt_xres;
1881 yres = st_yres / 2;
1882 bpp = 2;
1883 } else
1da177e4
LT
1884 return -EINVAL;
1885 }
1886 if (yres_virtual <= 0)
1887 yres_virtual = 0;
1888 else if (yres_virtual < yres)
1889 yres_virtual = yres;
1890 if (var->sync & FB_SYNC_EXT)
a1005012 1891 par->hw.st.sync = (par->hw.st.sync & ~1) | 1;
1da177e4 1892 else
a1005012
MS
1893 par->hw.st.sync = (par->hw.st.sync & ~1);
1894 linelen = xres * bpp / 8;
1da177e4
LT
1895 if (yres_virtual * linelen > screen_len && screen_len)
1896 return -EINVAL;
1897 if (yres * linelen > screen_len && screen_len)
1898 return -EINVAL;
1899 if (var->yoffset + yres > yres_virtual && yres_virtual)
1900 return -EINVAL;
1901 par->yres_virtual = yres_virtual;
a1005012 1902 par->screen_base = screen_base + var->yoffset * linelen;
02603930 1903 par->next_line = linelen;
1da177e4
LT
1904 return 0;
1905}
1906
a1005012
MS
1907static int stste_encode_var(struct fb_var_screeninfo *var,
1908 struct atafb_par *par)
1da177e4
LT
1909{
1910 int linelen;
1911 memset(var, 0, sizeof(struct fb_var_screeninfo));
a1005012 1912 var->red.offset = 0;
1da177e4 1913 var->red.length = ATARIHW_PRESENT(EXTD_SHIFTER) ? 4 : 3;
a1005012
MS
1914 var->red.msb_right = 0;
1915 var->grayscale = 0;
1da177e4 1916
a1005012
MS
1917 var->pixclock = 31041;
1918 var->left_margin = 120; /* these are incorrect */
1919 var->right_margin = 100;
1920 var->upper_margin = 8;
1921 var->lower_margin = 16;
1922 var->hsync_len = 140;
1923 var->vsync_len = 30;
1da177e4 1924
a1005012
MS
1925 var->height = -1;
1926 var->width = -1;
1da177e4
LT
1927
1928 if (!(par->hw.st.sync & 1))
a1005012 1929 var->sync = 0;
1da177e4 1930 else
a1005012 1931 var->sync = FB_SYNC_EXT;
1da177e4
LT
1932
1933 switch (par->hw.st.mode & 3) {
1934 case ST_LOW:
a1005012
MS
1935 var->xres = sttt_xres / 2;
1936 var->yres = st_yres / 2;
1937 var->bits_per_pixel = 4;
1da177e4
LT
1938 break;
1939 case ST_MID:
a1005012
MS
1940 var->xres = sttt_xres;
1941 var->yres = st_yres / 2;
1942 var->bits_per_pixel = 2;
1da177e4
LT
1943 break;
1944 case ST_HIGH:
a1005012
MS
1945 var->xres = sttt_xres;
1946 var->yres = st_yres;
1947 var->bits_per_pixel = 1;
1da177e4 1948 break;
a1005012
MS
1949 }
1950 var->blue = var->green = var->red;
1951 var->transp.offset = 0;
1952 var->transp.length = 0;
1953 var->transp.msb_right = 0;
1954 var->xres_virtual = sttt_xres_virtual;
1955 linelen = var->xres_virtual * var->bits_per_pixel / 8;
1956 ovsc_addlen = linelen * (sttt_yres_virtual - st_yres);
1957
1958 if (!use_hwscroll)
1959 var->yres_virtual = var->yres;
1da177e4
LT
1960 else if (screen_len) {
1961 if (par->yres_virtual)
1962 var->yres_virtual = par->yres_virtual;
1963 else
a1005012 1964 /* yres_virtual == 0 means use maximum */
1da177e4 1965 var->yres_virtual = screen_len / linelen;
a1005012 1966 } else {
1da177e4
LT
1967 if (hwscroll < 0)
1968 var->yres_virtual = 2 * var->yres;
1969 else
a1005012 1970 var->yres_virtual = var->yres + hwscroll * 16;
1da177e4 1971 }
a1005012 1972 var->xoffset = 0;
1da177e4 1973 if (screen_base)
a1005012 1974 var->yoffset = (par->screen_base - screen_base) / linelen;
1da177e4 1975 else
a1005012
MS
1976 var->yoffset = 0;
1977 var->nonstd = 0;
1978 var->activate = 0;
1979 var->vmode = FB_VMODE_NONINTERLACED;
1da177e4
LT
1980 return 0;
1981}
1982
a1005012 1983static void stste_get_par(struct atafb_par *par)
1da177e4
LT
1984{
1985 unsigned long addr;
a1005012
MS
1986 par->hw.st.mode = shifter_tt.st_shiftmode;
1987 par->hw.st.sync = shifter.syncmode;
1da177e4
LT
1988 addr = ((shifter.bas_hi & 0xff) << 16) |
1989 ((shifter.bas_md & 0xff) << 8);
1990 if (ATARIHW_PRESENT(EXTD_SHIFTER))
1991 addr |= (shifter.bas_lo & 0xff);
1992 par->screen_base = phys_to_virt(addr);
1993}
1994
a1005012 1995static void stste_set_par(struct atafb_par *par)
1da177e4 1996{
a1005012
MS
1997 shifter_tt.st_shiftmode = par->hw.st.mode;
1998 shifter.syncmode = par->hw.st.sync;
1da177e4
LT
1999 /* only set screen_base if really necessary */
2000 if (current_par.screen_base != par->screen_base)
2001 fbhw->set_screen_base(par->screen_base);
2002}
2003
a1005012
MS
2004static int stste_setcolreg(unsigned int regno, unsigned int red,
2005 unsigned int green, unsigned int blue,
2006 unsigned int transp, struct fb_info *info)
1da177e4
LT
2007{
2008 if (regno > 15)
2009 return 1;
2010 red >>= 12;
2011 blue >>= 12;
2012 green >>= 12;
2013 if (ATARIHW_PRESENT(EXTD_SHIFTER))
2014 shifter_tt.color_reg[regno] =
2015 (((red & 0xe) >> 1) | ((red & 1) << 3) << 8) |
2016 (((green & 0xe) >> 1) | ((green & 1) << 3) << 4) |
2017 ((blue & 0xe) >> 1) | ((blue & 1) << 3);
2018 else
2019 shifter_tt.color_reg[regno] =
2020 ((red & 0xe) << 7) |
2021 ((green & 0xe) << 3) |
2022 ((blue & 0xe) >> 1);
2023 return 0;
2024}
2025
a1005012
MS
2026static int stste_detect(void)
2027{
2028 struct atafb_par par;
1da177e4
LT
2029
2030 /* Determine the connected monitor: The DMA sound must be
2031 * disabled before reading the MFP GPIP, because the Sound
2032 * Done Signal and the Monochrome Detect are XORed together!
2033 */
2034 if (ATARIHW_PRESENT(PCM_8BIT)) {
2035 tt_dmasnd.ctrl = DMASND_CTRL_OFF;
a1005012 2036 udelay(20); /* wait a while for things to settle down */
1da177e4 2037 }
3d92e8f3 2038 mono_moni = (st_mfp.par_dt_reg & 0x80) == 0;
1da177e4
LT
2039
2040 stste_get_par(&par);
2041 stste_encode_var(&atafb_predefined[0], &par);
2042
2043 if (!ATARIHW_PRESENT(EXTD_SHIFTER))
2044 use_hwscroll = 0;
2045 return 1;
2046}
2047
2048static void stste_set_screen_base(void *s_base)
2049{
2050 unsigned long addr;
a1005012 2051 addr = virt_to_phys(s_base);
1da177e4 2052 /* Setup Screen Memory */
a1005012
MS
2053 shifter.bas_hi = (unsigned char)((addr & 0xff0000) >> 16);
2054 shifter.bas_md = (unsigned char)((addr & 0x00ff00) >> 8);
1da177e4 2055 if (ATARIHW_PRESENT(EXTD_SHIFTER))
a1005012 2056 shifter.bas_lo = (unsigned char)(addr & 0x0000ff);
1da177e4
LT
2057}
2058
2059#endif /* ATAFB_STE */
2060
2061/* Switching the screen size should be done during vsync, otherwise
2062 * the margins may get messed up. This is a well known problem of
2063 * the ST's video system.
2064 *
2065 * Unfortunately there is hardly any way to find the vsync, as the
2066 * vertical blank interrupt is no longer in time on machines with
2067 * overscan type modifications.
2068 *
2069 * We can, however, use Timer B to safely detect the black shoulder,
2070 * but then we've got to guess an appropriate delay to find the vsync.
2071 * This might not work on every machine.
2072 *
2073 * martin_rogge @ ki.maus.de, 8th Aug 1995
2074 */
2075
2076#define LINE_DELAY (mono_moni ? 30 : 70)
2077#define SYNC_DELAY (mono_moni ? 1500 : 2000)
2078
2079/* SWITCH_ACIA may be used for Falcon (ScreenBlaster III internal!) */
2080static void st_ovsc_switch(void)
2081{
a1005012
MS
2082 unsigned long flags;
2083 register unsigned char old, new;
1da177e4 2084
a1005012
MS
2085 if (!(atari_switches & ATARI_SWITCH_OVSC_MASK))
2086 return;
2087 local_irq_save(flags);
2088
3d92e8f3
GU
2089 st_mfp.tim_ct_b = 0x10;
2090 st_mfp.active_edge |= 8;
2091 st_mfp.tim_ct_b = 0;
2092 st_mfp.tim_dt_b = 0xf0;
2093 st_mfp.tim_ct_b = 8;
2094 while (st_mfp.tim_dt_b > 1) /* TOS does it this way, don't ask why */
a1005012 2095 ;
3d92e8f3 2096 new = st_mfp.tim_dt_b;
a1005012
MS
2097 do {
2098 udelay(LINE_DELAY);
2099 old = new;
3d92e8f3 2100 new = st_mfp.tim_dt_b;
a1005012 2101 } while (old != new);
3d92e8f3 2102 st_mfp.tim_ct_b = 0x10;
a1005012
MS
2103 udelay(SYNC_DELAY);
2104
2105 if (atari_switches & ATARI_SWITCH_OVSC_IKBD)
2106 acia.key_ctrl = ACIA_DIV64 | ACIA_D8N1S | ACIA_RHTID | ACIA_RIE;
2107 if (atari_switches & ATARI_SWITCH_OVSC_MIDI)
2108 acia.mid_ctrl = ACIA_DIV16 | ACIA_D8N1S | ACIA_RHTID;
2109 if (atari_switches & (ATARI_SWITCH_OVSC_SND6|ATARI_SWITCH_OVSC_SND7)) {
2110 sound_ym.rd_data_reg_sel = 14;
2111 sound_ym.wd_data = sound_ym.rd_data_reg_sel |
2112 ((atari_switches & ATARI_SWITCH_OVSC_SND6) ? 0x40:0) |
2113 ((atari_switches & ATARI_SWITCH_OVSC_SND7) ? 0x80:0);
2114 }
2115 local_irq_restore(flags);
1da177e4
LT
2116}
2117
2118/* ------------------- External Video ---------------------- */
2119
2120#ifdef ATAFB_EXT
2121
a1005012 2122static int ext_encode_fix(struct fb_fix_screeninfo *fix, struct atafb_par *par)
1da177e4 2123{
a1005012 2124 strcpy(fix->id, "Unknown Extern");
1da177e4
LT
2125 fix->smem_start = (unsigned long)external_addr;
2126 fix->smem_len = PAGE_ALIGN(external_len);
2127 if (external_depth == 1) {
2128 fix->type = FB_TYPE_PACKED_PIXELS;
2129 /* The letters 'n' and 'i' in the "atavideo=external:" stand
2130 * for "normal" and "inverted", rsp., in the monochrome case */
2131 fix->visual =
2132 (external_pmode == FB_TYPE_INTERLEAVED_PLANES ||
2133 external_pmode == FB_TYPE_PACKED_PIXELS) ?
a1005012
MS
2134 FB_VISUAL_MONO10 : FB_VISUAL_MONO01;
2135 } else {
1da177e4
LT
2136 /* Use STATIC if we don't know how to access color registers */
2137 int visual = external_vgaiobase ?
2138 FB_VISUAL_PSEUDOCOLOR :
2139 FB_VISUAL_STATIC_PSEUDOCOLOR;
2140 switch (external_pmode) {
a1005012
MS
2141 case -1: /* truecolor */
2142 fix->type = FB_TYPE_PACKED_PIXELS;
2143 fix->visual = FB_VISUAL_TRUECOLOR;
1da177e4 2144 break;
a1005012
MS
2145 case FB_TYPE_PACKED_PIXELS:
2146 fix->type = FB_TYPE_PACKED_PIXELS;
2147 fix->visual = visual;
1da177e4 2148 break;
a1005012
MS
2149 case FB_TYPE_PLANES:
2150 fix->type = FB_TYPE_PLANES;
2151 fix->visual = visual;
1da177e4 2152 break;
a1005012
MS
2153 case FB_TYPE_INTERLEAVED_PLANES:
2154 fix->type = FB_TYPE_INTERLEAVED_PLANES;
2155 fix->type_aux = 2;
2156 fix->visual = visual;
1da177e4
LT
2157 break;
2158 }
2159 }
2160 fix->xpanstep = 0;
2161 fix->ypanstep = 0;
2162 fix->ywrapstep = 0;
02603930 2163 fix->line_length = par->next_line;
1da177e4
LT
2164 return 0;
2165}
2166
a1005012 2167static int ext_decode_var(struct fb_var_screeninfo *var, struct atafb_par *par)
1da177e4
LT
2168{
2169 struct fb_var_screeninfo *myvar = &atafb_predefined[0];
a1005012 2170
1da177e4 2171 if (var->bits_per_pixel > myvar->bits_per_pixel ||
a1005012
MS
2172 var->xres > myvar->xres ||
2173 var->xres_virtual > myvar->xres_virtual ||
2174 var->yres > myvar->yres ||
2175 var->xoffset > 0 ||
2176 var->yoffset > 0)
1da177e4 2177 return -EINVAL;
02603930
GU
2178
2179 par->next_line = external_xres_virtual * external_depth / 8;
1da177e4
LT
2180 return 0;
2181}
2182
a1005012 2183static int ext_encode_var(struct fb_var_screeninfo *var, struct atafb_par *par)
1da177e4
LT
2184{
2185 memset(var, 0, sizeof(struct fb_var_screeninfo));
a1005012
MS
2186 var->red.offset = 0;
2187 var->red.length = (external_pmode == -1) ? external_depth / 3 :
1da177e4 2188 (external_vgaiobase ? external_bitspercol : 0);
a1005012
MS
2189 var->red.msb_right = 0;
2190 var->grayscale = 0;
1da177e4 2191
a1005012
MS
2192 var->pixclock = 31041;
2193 var->left_margin = 120; /* these are surely incorrect */
2194 var->right_margin = 100;
2195 var->upper_margin = 8;
2196 var->lower_margin = 16;
2197 var->hsync_len = 140;
2198 var->vsync_len = 30;
1da177e4 2199
a1005012
MS
2200 var->height = -1;
2201 var->width = -1;
1da177e4 2202
a1005012 2203 var->sync = 0;
1da177e4
LT
2204
2205 var->xres = external_xres;
2206 var->yres = external_yres;
2207 var->xres_virtual = external_xres_virtual;
2208 var->bits_per_pixel = external_depth;
a1005012
MS
2209
2210 var->blue = var->green = var->red;
2211 var->transp.offset = 0;
2212 var->transp.length = 0;
2213 var->transp.msb_right = 0;
2214 var->yres_virtual = var->yres;
2215 var->xoffset = 0;
2216 var->yoffset = 0;
2217 var->nonstd = 0;
2218 var->activate = 0;
2219 var->vmode = FB_VMODE_NONINTERLACED;
1da177e4
LT
2220 return 0;
2221}
2222
a1005012 2223static void ext_get_par(struct atafb_par *par)
1da177e4
LT
2224{
2225 par->screen_base = external_addr;
2226}
2227
a1005012 2228static void ext_set_par(struct atafb_par *par)
1da177e4
LT
2229{
2230}
2231
2232#define OUTB(port,val) \
a1005012 2233 *((unsigned volatile char *) ((port)+external_vgaiobase)) = (val)
1da177e4
LT
2234#define INB(port) \
2235 (*((unsigned volatile char *) ((port)+external_vgaiobase)))
a1005012 2236#define DACDelay \
1da177e4 2237 do { \
a1005012
MS
2238 unsigned char tmp = INB(0x3da); \
2239 tmp = INB(0x3da); \
1da177e4
LT
2240 } while (0)
2241
a1005012
MS
2242static int ext_setcolreg(unsigned int regno, unsigned int red,
2243 unsigned int green, unsigned int blue,
2244 unsigned int transp, struct fb_info *info)
1da177e4 2245{
a1005012 2246 unsigned char colmask = (1 << external_bitspercol) - 1;
1da177e4 2247
a1005012 2248 if (!external_vgaiobase)
1da177e4
LT
2249 return 1;
2250
1da177e4 2251 switch (external_card_type) {
a1005012
MS
2252 case IS_VGA:
2253 OUTB(0x3c8, regno);
2254 DACDelay;
2255 OUTB(0x3c9, red & colmask);
2256 DACDelay;
2257 OUTB(0x3c9, green & colmask);
2258 DACDelay;
2259 OUTB(0x3c9, blue & colmask);
2260 DACDelay;
2261 return 0;
1da177e4 2262
a1005012
MS
2263 case IS_MV300:
2264 OUTB((MV300_reg[regno] << 2) + 1, red);
2265 OUTB((MV300_reg[regno] << 2) + 1, green);
2266 OUTB((MV300_reg[regno] << 2) + 1, blue);
2267 return 0;
1da177e4 2268
a1005012
MS
2269 default:
2270 return 1;
2271 }
2272}
2273
2274static int ext_detect(void)
1da177e4
LT
2275{
2276 struct fb_var_screeninfo *myvar = &atafb_predefined[0];
2277 struct atafb_par dummy_par;
2278
2279 myvar->xres = external_xres;
2280 myvar->xres_virtual = external_xres_virtual;
2281 myvar->yres = external_yres;
2282 myvar->bits_per_pixel = external_depth;
2283 ext_encode_var(myvar, &dummy_par);
2284 return 1;
2285}
2286
2287#endif /* ATAFB_EXT */
2288
2289/* ------ This is the same for most hardware types -------- */
2290
2291static void set_screen_base(void *s_base)
2292{
2293 unsigned long addr;
a1005012
MS
2294
2295 addr = virt_to_phys(s_base);
1da177e4 2296 /* Setup Screen Memory */
a1005012
MS
2297 shifter.bas_hi = (unsigned char)((addr & 0xff0000) >> 16);
2298 shifter.bas_md = (unsigned char)((addr & 0x00ff00) >> 8);
2299 shifter.bas_lo = (unsigned char)(addr & 0x0000ff);
1da177e4
LT
2300}
2301
a1005012 2302static int pan_display(struct fb_var_screeninfo *var, struct fb_info *info)
1da177e4 2303{
a1005012
MS
2304 struct atafb_par *par = (struct atafb_par *)info->par;
2305
1da177e4 2306 if (!fbhw->set_screen_base ||
a1005012 2307 (!ATARIHW_PRESENT(EXTD_SHIFTER) && var->xoffset))
1da177e4
LT
2308 return -EINVAL;
2309 var->xoffset = up(var->xoffset, 16);
2310 par->screen_base = screen_base +
a1005012
MS
2311 (var->yoffset * info->var.xres_virtual + var->xoffset)
2312 * info->var.bits_per_pixel / 8;
2313 fbhw->set_screen_base(par->screen_base);
1da177e4
LT
2314 return 0;
2315}
2316
1da177e4
LT
2317/* ------------ Interfaces to hardware functions ------------ */
2318
1da177e4
LT
2319#ifdef ATAFB_TT
2320static struct fb_hwswitch tt_switch = {
a1005012
MS
2321 .detect = tt_detect,
2322 .encode_fix = tt_encode_fix,
2323 .decode_var = tt_decode_var,
2324 .encode_var = tt_encode_var,
2325 .get_par = tt_get_par,
2326 .set_par = tt_set_par,
2327 .set_screen_base = set_screen_base,
2328 .pan_display = pan_display,
1da177e4
LT
2329};
2330#endif
2331
2332#ifdef ATAFB_FALCON
2333static struct fb_hwswitch falcon_switch = {
a1005012
MS
2334 .detect = falcon_detect,
2335 .encode_fix = falcon_encode_fix,
2336 .decode_var = falcon_decode_var,
2337 .encode_var = falcon_encode_var,
2338 .get_par = falcon_get_par,
2339 .set_par = falcon_set_par,
2340 .set_screen_base = set_screen_base,
2341 .blank = falcon_blank,
2342 .pan_display = falcon_pan_display,
1da177e4
LT
2343};
2344#endif
2345
2346#ifdef ATAFB_STE
2347static struct fb_hwswitch st_switch = {
a1005012
MS
2348 .detect = stste_detect,
2349 .encode_fix = stste_encode_fix,
2350 .decode_var = stste_decode_var,
2351 .encode_var = stste_encode_var,
2352 .get_par = stste_get_par,
2353 .set_par = stste_set_par,
2354 .set_screen_base = stste_set_screen_base,
2355 .pan_display = pan_display
1da177e4
LT
2356};
2357#endif
2358
2359#ifdef ATAFB_EXT
2360static struct fb_hwswitch ext_switch = {
a1005012
MS
2361 .detect = ext_detect,
2362 .encode_fix = ext_encode_fix,
2363 .decode_var = ext_decode_var,
2364 .encode_var = ext_encode_var,
2365 .get_par = ext_get_par,
2366 .set_par = ext_set_par,
1da177e4
LT
2367};
2368#endif
2369
a1005012 2370static void ata_get_par(struct atafb_par *par)
1da177e4 2371{
a1005012
MS
2372 if (current_par_valid)
2373 *par = current_par;
1da177e4
LT
2374 else
2375 fbhw->get_par(par);
2376}
2377
a1005012 2378static void ata_set_par(struct atafb_par *par)
1da177e4
LT
2379{
2380 fbhw->set_par(par);
a1005012
MS
2381 current_par = *par;
2382 current_par_valid = 1;
1da177e4
LT
2383}
2384
2385
1da177e4
LT
2386/* =========================================================== */
2387/* ============== Hardware Independent Functions ============= */
2388/* =========================================================== */
2389
1da177e4
LT
2390/* used for hardware scrolling */
2391
a1005012 2392static int do_fb_set_var(struct fb_var_screeninfo *var, int isactive)
1da177e4 2393{
a1005012 2394 int err, activate;
1da177e4 2395 struct atafb_par par;
a1005012
MS
2396
2397 err = fbhw->decode_var(var, &par);
2398 if (err)
1da177e4 2399 return err;
a1005012 2400 activate = var->activate;
1da177e4 2401 if (((var->activate & FB_ACTIVATE_MASK) == FB_ACTIVATE_NOW) && isactive)
a1005012 2402 ata_set_par(&par);
1da177e4 2403 fbhw->encode_var(var, &par);
a1005012 2404 var->activate = activate;
1da177e4
LT
2405 return 0;
2406}
2407
feaa61e4
KH
2408/* fbhw->encode_fix() must be called with fb_info->mm_lock held
2409 * if it is called after the register_framebuffer() - not a case here
2410 */
a1005012 2411static int atafb_get_fix(struct fb_fix_screeninfo *fix, struct fb_info *info)
1da177e4
LT
2412{
2413 struct atafb_par par;
a1005012
MS
2414 int err;
2415 // Get fix directly (case con == -1 before)??
2416 err = fbhw->decode_var(&info->var, &par);
2417 if (err)
2418 return err;
1da177e4 2419 memset(fix, 0, sizeof(struct fb_fix_screeninfo));
537a1bf0 2420 err = fbhw->encode_fix(fix, &par);
537a1bf0 2421 return err;
1da177e4 2422}
a1005012
MS
2423
2424static int atafb_get_var(struct fb_var_screeninfo *var, struct fb_info *info)
1da177e4
LT
2425{
2426 struct atafb_par par;
a1005012
MS
2427
2428 ata_get_par(&par);
2429 fbhw->encode_var(var, &par);
2430
1da177e4
LT
2431 return 0;
2432}
2433
a1005012
MS
2434// No longer called by fbcon!
2435// Still called by set_var internally
2436
2437static void atafb_set_disp(struct fb_info *info)
1da177e4 2438{
a1005012
MS
2439 atafb_get_var(&info->var, info);
2440 atafb_get_fix(&info->fix, info);
1da177e4 2441
a1005012 2442 info->screen_base = (void *)info->fix.smem_start;
1da177e4
LT
2443}
2444
a1005012
MS
2445static int atafb_setcolreg(u_int regno, u_int red, u_int green, u_int blue,
2446 u_int transp, struct fb_info *info)
2447{
2448 red >>= 8;
2449 green >>= 8;
2450 blue >>= 8;
2451
2452 return info->fbops->fb_setcolreg(regno, red, green, blue, transp, info);
2453}
2454
1da177e4 2455static int
a1005012 2456atafb_pan_display(struct fb_var_screeninfo *var, struct fb_info *info)
1da177e4 2457{
a1005012
MS
2458 int xoffset = var->xoffset;
2459 int yoffset = var->yoffset;
2460 int err;
2461
2462 if (var->vmode & FB_VMODE_YWRAP) {
2463 if (yoffset < 0 || yoffset >= info->var.yres_virtual || xoffset)
2464 return -EINVAL;
2465 } else {
2466 if (xoffset + info->var.xres > info->var.xres_virtual ||
2467 yoffset + info->var.yres > info->var.yres_virtual)
2468 return -EINVAL;
1da177e4 2469 }
a1005012
MS
2470
2471 if (fbhw->pan_display) {
2472 err = fbhw->pan_display(var, info);
2473 if (err)
2474 return err;
2475 } else
2476 return -EINVAL;
2477
2478 info->var.xoffset = xoffset;
2479 info->var.yoffset = yoffset;
2480
2481 if (var->vmode & FB_VMODE_YWRAP)
2482 info->var.vmode |= FB_VMODE_YWRAP;
2483 else
2484 info->var.vmode &= ~FB_VMODE_YWRAP;
2485
1da177e4
LT
2486 return 0;
2487}
2488
a1005012
MS
2489/*
2490 * generic drawing routines; imageblit needs updating for image depth > 1
2491 */
2492
2493#if BITS_PER_LONG == 32
2494#define BYTES_PER_LONG 4
2495#define SHIFT_PER_LONG 5
2496#elif BITS_PER_LONG == 64
2497#define BYTES_PER_LONG 8
2498#define SHIFT_PER_LONG 6
2499#else
2500#define Please update me
2501#endif
1da177e4
LT
2502
2503
a1005012 2504static void atafb_fillrect(struct fb_info *info, const struct fb_fillrect *rect)
1da177e4 2505{
a1005012
MS
2506 struct atafb_par *par = (struct atafb_par *)info->par;
2507 int x2, y2;
2508 u32 width, height;
2509
2510 if (!rect->width || !rect->height)
2511 return;
2512
74511413
GU
2513#ifdef ATAFB_FALCON
2514 if (info->var.bits_per_pixel == 16) {
2515 cfb_fillrect(info, rect);
2516 return;
2517 }
2518#endif
2519
a1005012
MS
2520 /*
2521 * We could use hardware clipping but on many cards you get around
2522 * hardware clipping by writing to framebuffer directly.
2523 * */
2524 x2 = rect->dx + rect->width;
2525 y2 = rect->dy + rect->height;
2526 x2 = x2 < info->var.xres_virtual ? x2 : info->var.xres_virtual;
2527 y2 = y2 < info->var.yres_virtual ? y2 : info->var.yres_virtual;
2528 width = x2 - rect->dx;
2529 height = y2 - rect->dy;
2530
2531 if (info->var.bits_per_pixel == 1)
2532 atafb_mfb_fillrect(info, par->next_line, rect->color,
2533 rect->dy, rect->dx, height, width);
2534 else if (info->var.bits_per_pixel == 2)
2535 atafb_iplan2p2_fillrect(info, par->next_line, rect->color,
2536 rect->dy, rect->dx, height, width);
2537 else if (info->var.bits_per_pixel == 4)
2538 atafb_iplan2p4_fillrect(info, par->next_line, rect->color,
2539 rect->dy, rect->dx, height, width);
1da177e4 2540 else
a1005012
MS
2541 atafb_iplan2p8_fillrect(info, par->next_line, rect->color,
2542 rect->dy, rect->dx, height, width);
2543
2544 return;
1da177e4
LT
2545}
2546
a1005012 2547static void atafb_copyarea(struct fb_info *info, const struct fb_copyarea *area)
1da177e4 2548{
a1005012
MS
2549 struct atafb_par *par = (struct atafb_par *)info->par;
2550 int x2, y2;
2551 u32 dx, dy, sx, sy, width, height;
2552 int rev_copy = 0;
2553
74511413
GU
2554#ifdef ATAFB_FALCON
2555 if (info->var.bits_per_pixel == 16) {
2556 cfb_copyarea(info, area);
2557 return;
2558 }
2559#endif
2560
a1005012
MS
2561 /* clip the destination */
2562 x2 = area->dx + area->width;
2563 y2 = area->dy + area->height;
2564 dx = area->dx > 0 ? area->dx : 0;
2565 dy = area->dy > 0 ? area->dy : 0;
2566 x2 = x2 < info->var.xres_virtual ? x2 : info->var.xres_virtual;
2567 y2 = y2 < info->var.yres_virtual ? y2 : info->var.yres_virtual;
2568 width = x2 - dx;
2569 height = y2 - dy;
2570
1c0face9
RK
2571 if (area->sx + dx < area->dx || area->sy + dy < area->dy)
2572 return;
2573
a1005012
MS
2574 /* update sx,sy */
2575 sx = area->sx + (dx - area->dx);
2576 sy = area->sy + (dy - area->dy);
2577
2578 /* the source must be completely inside the virtual screen */
1c0face9
RK
2579 if (sx + width > info->var.xres_virtual ||
2580 sy + height > info->var.yres_virtual)
a1005012 2581 return;
1da177e4 2582
a1005012
MS
2583 if (dy > sy || (dy == sy && dx > sx)) {
2584 dy += height;
2585 sy += height;
2586 rev_copy = 1;
2587 }
1da177e4 2588
a1005012
MS
2589 if (info->var.bits_per_pixel == 1)
2590 atafb_mfb_copyarea(info, par->next_line, sy, sx, dy, dx, height, width);
2591 else if (info->var.bits_per_pixel == 2)
2592 atafb_iplan2p2_copyarea(info, par->next_line, sy, sx, dy, dx, height, width);
2593 else if (info->var.bits_per_pixel == 4)
2594 atafb_iplan2p4_copyarea(info, par->next_line, sy, sx, dy, dx, height, width);
2595 else
2596 atafb_iplan2p8_copyarea(info, par->next_line, sy, sx, dy, dx, height, width);
2597
2598 return;
2599}
2600
2601static void atafb_imageblit(struct fb_info *info, const struct fb_image *image)
2602{
2603 struct atafb_par *par = (struct atafb_par *)info->par;
2604 int x2, y2;
2605 unsigned long *dst;
2606 int dst_idx;
2607 const char *src;
2608 u32 dx, dy, width, height, pitch;
2609
74511413
GU
2610#ifdef ATAFB_FALCON
2611 if (info->var.bits_per_pixel == 16) {
2612 cfb_imageblit(info, image);
2613 return;
2614 }
2615#endif
2616
a1005012
MS
2617 /*
2618 * We could use hardware clipping but on many cards you get around
2619 * hardware clipping by writing to framebuffer directly like we are
2620 * doing here.
2621 */
2622 x2 = image->dx + image->width;
2623 y2 = image->dy + image->height;
2624 dx = image->dx;
2625 dy = image->dy;
2626 x2 = x2 < info->var.xres_virtual ? x2 : info->var.xres_virtual;
2627 y2 = y2 < info->var.yres_virtual ? y2 : info->var.yres_virtual;
2628 width = x2 - dx;
2629 height = y2 - dy;
2630
2631 if (image->depth == 1) {
2632 // used for font data
2633 dst = (unsigned long *)
2634 ((unsigned long)info->screen_base & ~(BYTES_PER_LONG - 1));
2635 dst_idx = ((unsigned long)info->screen_base & (BYTES_PER_LONG - 1)) * 8;
2636 dst_idx += dy * par->next_line * 8 + dx;
2637 src = image->data;
2638 pitch = (image->width + 7) / 8;
2639 while (height--) {
2640
2641 if (info->var.bits_per_pixel == 1)
2642 atafb_mfb_linefill(info, par->next_line,
2643 dy, dx, width, src,
2644 image->bg_color, image->fg_color);
2645 else if (info->var.bits_per_pixel == 2)
2646 atafb_iplan2p2_linefill(info, par->next_line,
2647 dy, dx, width, src,
2648 image->bg_color, image->fg_color);
2649 else if (info->var.bits_per_pixel == 4)
2650 atafb_iplan2p4_linefill(info, par->next_line,
2651 dy, dx, width, src,
2652 image->bg_color, image->fg_color);
2653 else
2654 atafb_iplan2p8_linefill(info, par->next_line,
2655 dy, dx, width, src,
2656 image->bg_color, image->fg_color);
2657 dy++;
2658 src += pitch;
1da177e4 2659 }
a1005012 2660 } else {
96f47d61
GU
2661 c2p_iplan2(info->screen_base, image->data, dx, dy, width,
2662 height, par->next_line, image->width,
2663 info->var.bits_per_pixel);
1da177e4 2664 }
1da177e4
LT
2665}
2666
2667static int
67a6680d 2668atafb_ioctl(struct fb_info *info, unsigned int cmd, unsigned long arg)
1da177e4
LT
2669{
2670 switch (cmd) {
2671#ifdef FBCMD_GET_CURRENTPAR
2672 case FBCMD_GET_CURRENTPAR:
2673 if (copy_to_user((void *)arg, (void *)&current_par,
2674 sizeof(struct atafb_par)))
2675 return -EFAULT;
2676 return 0;
2677#endif
2678#ifdef FBCMD_SET_CURRENTPAR
2679 case FBCMD_SET_CURRENTPAR:
2680 if (copy_from_user((void *)&current_par, (void *)arg,
2681 sizeof(struct atafb_par)))
2682 return -EFAULT;
a1005012 2683 ata_set_par(&current_par);
1da177e4
LT
2684 return 0;
2685#endif
2686 }
2687 return -EINVAL;
2688}
2689
2690/* (un)blank/poweroff
2691 * 0 = unblank
2692 * 1 = blank
2693 * 2 = suspend vsync
2694 * 3 = suspend hsync
2695 * 4 = off
2696 */
a1005012 2697static int atafb_blank(int blank, struct fb_info *info)
1da177e4
LT
2698{
2699 unsigned short black[16];
2700 struct fb_cmap cmap;
2701 if (fbhw->blank && !fbhw->blank(blank))
2702 return 1;
2703 if (blank) {
a1005012
MS
2704 memset(black, 0, 16 * sizeof(unsigned short));
2705 cmap.red = black;
2706 cmap.green = black;
2707 cmap.blue = black;
2708 cmap.transp = NULL;
2709 cmap.start = 0;
2710 cmap.len = 16;
2711 fb_set_cmap(&cmap, info);
1da177e4 2712 }
a1005012 2713#if 0
1da177e4 2714 else
a1005012
MS
2715 do_install_cmap(info);
2716#endif
2717 return 0;
2718}
2719
2720 /*
2721 * New fbcon interface ...
2722 */
2723
2724 /* check var by decoding var into hw par, rounding if necessary,
2725 * then encoding hw par back into new, validated var */
2726static int atafb_check_var(struct fb_var_screeninfo *var, struct fb_info *info)
2727{
2728 int err;
2729 struct atafb_par par;
2730
2731 /* Validate wanted screen parameters */
2732 // if ((err = ata_decode_var(var, &par)))
2733 err = fbhw->decode_var(var, &par);
2734 if (err)
2735 return err;
2736
2737 /* Encode (possibly rounded) screen parameters */
2738 fbhw->encode_var(var, &par);
1da177e4
LT
2739 return 0;
2740}
2741
a1005012
MS
2742 /* actually set hw par by decoding var, then setting hardware from
2743 * hw par just decoded */
2744static int atafb_set_par(struct fb_info *info)
2745{
2746 struct atafb_par *par = (struct atafb_par *)info->par;
2747
2748 /* Decode wanted screen parameters */
2749 fbhw->decode_var(&info->var, par);
537a1bf0 2750 mutex_lock(&info->mm_lock);
a1005012 2751 fbhw->encode_fix(&info->fix, par);
537a1bf0 2752 mutex_unlock(&info->mm_lock);
a1005012
MS
2753
2754 /* Set new videomode */
2755 ata_set_par(par);
2756
2757 return 0;
2758}
2759
2760
1da177e4
LT
2761static struct fb_ops atafb_ops = {
2762 .owner = THIS_MODULE,
a1005012
MS
2763 .fb_check_var = atafb_check_var,
2764 .fb_set_par = atafb_set_par,
2765 .fb_setcolreg = atafb_setcolreg,
1da177e4 2766 .fb_blank = atafb_blank,
a1005012
MS
2767 .fb_pan_display = atafb_pan_display,
2768 .fb_fillrect = atafb_fillrect,
2769 .fb_copyarea = atafb_copyarea,
2770 .fb_imageblit = atafb_imageblit,
1da177e4
LT
2771 .fb_ioctl = atafb_ioctl,
2772};
2773
a1005012 2774static void check_default_par(int detected_mode)
1da177e4
LT
2775{
2776 char default_name[10];
2777 int i;
2778 struct fb_var_screeninfo var;
2779 unsigned long min_mem;
2780
2781 /* First try the user supplied mode */
2782 if (default_par) {
a1005012 2783 var = atafb_predefined[default_par - 1];
1da177e4 2784 var.activate = FB_ACTIVATE_TEST;
a1005012
MS
2785 if (do_fb_set_var(&var, 1))
2786 default_par = 0; /* failed */
1da177e4
LT
2787 }
2788 /* Next is the autodetected one */
a1005012
MS
2789 if (!default_par) {
2790 var = atafb_predefined[detected_mode - 1]; /* autodetect */
1da177e4 2791 var.activate = FB_ACTIVATE_TEST;
a1005012
MS
2792 if (!do_fb_set_var(&var, 1))
2793 default_par = detected_mode;
1da177e4
LT
2794 }
2795 /* If that also failed, try some default modes... */
a1005012 2796 if (!default_par) {
1da177e4 2797 /* try default1, default2... */
a1005012
MS
2798 for (i = 1; i < 10; i++) {
2799 sprintf(default_name,"default%d", i);
2800 default_par = get_video_mode(default_name);
2801 if (!default_par)
1da177e4 2802 panic("can't set default video mode");
a1005012 2803 var = atafb_predefined[default_par - 1];
1da177e4 2804 var.activate = FB_ACTIVATE_TEST;
a1005012 2805 if (!do_fb_set_var(&var,1))
1da177e4
LT
2806 break; /* ok */
2807 }
2808 }
a1005012 2809 min_mem = var.xres_virtual * var.yres_virtual * var.bits_per_pixel / 8;
1da177e4 2810 if (default_mem_req < min_mem)
a1005012 2811 default_mem_req = min_mem;
1da177e4
LT
2812}
2813
1da177e4
LT
2814#ifdef ATAFB_EXT
2815static void __init atafb_setup_ext(char *spec)
2816{
a1005012 2817 int xres, xres_virtual, yres, depth, planes;
1da177e4
LT
2818 unsigned long addr, len;
2819 char *p;
2820
2821 /* Format is: <xres>;<yres>;<depth>;<plane organ.>;
2822 * <screen mem addr>
2823 * [;<screen mem length>[;<vgaiobase>[;<bits-per-col>[;<colorreg-type>
2824 * [;<xres-virtual>]]]]]
2825 *
2826 * 09/23/97 Juergen
2827 * <xres_virtual>: hardware's x-resolution (f.e. ProMST)
2828 *
2829 * Even xres_virtual is available, we neither support panning nor hw-scrolling!
2830 */
a1005012
MS
2831 p = strsep(&spec, ";");
2832 if (!p || !*p)
2833 return;
1da177e4
LT
2834 xres_virtual = xres = simple_strtoul(p, NULL, 10);
2835 if (xres <= 0)
a1005012 2836 return;
1da177e4 2837
a1005012
MS
2838 p = strsep(&spec, ";");
2839 if (!p || !*p)
2840 return;
1da177e4
LT
2841 yres = simple_strtoul(p, NULL, 10);
2842 if (yres <= 0)
a1005012 2843 return;
1da177e4 2844
a1005012
MS
2845 p = strsep(&spec, ";");
2846 if (!p || !*p)
2847 return;
1da177e4
LT
2848 depth = simple_strtoul(p, NULL, 10);
2849 if (depth != 1 && depth != 2 && depth != 4 && depth != 8 &&
a1005012
MS
2850 depth != 16 && depth != 24)
2851 return;
1da177e4 2852
a1005012
MS
2853 p = strsep(&spec, ";");
2854 if (!p || !*p)
2855 return;
1da177e4
LT
2856 if (*p == 'i')
2857 planes = FB_TYPE_INTERLEAVED_PLANES;
2858 else if (*p == 'p')
2859 planes = FB_TYPE_PACKED_PIXELS;
2860 else if (*p == 'n')
2861 planes = FB_TYPE_PLANES;
2862 else if (*p == 't')
a1005012 2863 planes = -1; /* true color */
1da177e4
LT
2864 else
2865 return;
2866
a1005012
MS
2867 p = strsep(&spec, ";");
2868 if (!p || !*p)
1da177e4
LT
2869 return;
2870 addr = simple_strtoul(p, NULL, 0);
2871
a1005012
MS
2872 p = strsep(&spec, ";");
2873 if (!p || !*p)
2874 len = xres * yres * depth / 8;
1da177e4
LT
2875 else
2876 len = simple_strtoul(p, NULL, 0);
2877
a1005012
MS
2878 p = strsep(&spec, ";");
2879 if (p && *p)
2880 external_vgaiobase = simple_strtoul(p, NULL, 0);
1da177e4 2881
a1005012
MS
2882 p = strsep(&spec, ";");
2883 if (p && *p) {
1da177e4
LT
2884 external_bitspercol = simple_strtoul(p, NULL, 0);
2885 if (external_bitspercol > 8)
2886 external_bitspercol = 8;
2887 else if (external_bitspercol < 1)
2888 external_bitspercol = 1;
2889 }
2890
a1005012
MS
2891 p = strsep(&spec, ";");
2892 if (p && *p) {
1da177e4
LT
2893 if (!strcmp(p, "vga"))
2894 external_card_type = IS_VGA;
2895 if (!strcmp(p, "mv300"))
2896 external_card_type = IS_MV300;
2897 }
2898
a1005012
MS
2899 p = strsep(&spec, ";");
2900 if (p && *p) {
1da177e4
LT
2901 xres_virtual = simple_strtoul(p, NULL, 10);
2902 if (xres_virtual < xres)
2903 xres_virtual = xres;
a1005012
MS
2904 if (xres_virtual * yres * depth / 8 > len)
2905 len = xres_virtual * yres * depth / 8;
1da177e4
LT
2906 }
2907
a1005012
MS
2908 external_xres = xres;
2909 external_xres_virtual = xres_virtual;
2910 external_yres = yres;
1da177e4
LT
2911 external_depth = depth;
2912 external_pmode = planes;
a1005012
MS
2913 external_addr = (void *)addr;
2914 external_len = len;
2915
2916 if (external_card_type == IS_MV300) {
2917 switch (external_depth) {
2918 case 1:
2919 MV300_reg = MV300_reg_1bit;
2920 break;
2921 case 4:
2922 MV300_reg = MV300_reg_4bit;
2923 break;
2924 case 8:
2925 MV300_reg = MV300_reg_8bit;
2926 break;
2927 }
2928 }
1da177e4
LT
2929}
2930#endif /* ATAFB_EXT */
2931
1da177e4
LT
2932static void __init atafb_setup_int(char *spec)
2933{
2934 /* Format to config extended internal video hardware like OverScan:
a1005012
MS
2935 * "internal:<xres>;<yres>;<xres_max>;<yres_max>;<offset>"
2936 * Explanation:
2937 * <xres>: x-resolution
2938 * <yres>: y-resolution
2939 * The following are only needed if you have an overscan which
2940 * needs a black border:
2941 * <xres_max>: max. length of a line in pixels your OverScan hardware would allow
2942 * <yres_max>: max. number of lines your OverScan hardware would allow
2943 * <offset>: Offset from physical beginning to visible beginning
2944 * of screen in bytes
2945 */
1da177e4
LT
2946 int xres;
2947 char *p;
2948
2949 if (!(p = strsep(&spec, ";")) || !*p)
2950 return;
2951 xres = simple_strtoul(p, NULL, 10);
2952 if (!(p = strsep(&spec, ";")) || !*p)
2953 return;
a1005012
MS
2954 sttt_xres = xres;
2955 tt_yres = st_yres = simple_strtoul(p, NULL, 10);
2956 if ((p = strsep(&spec, ";")) && *p)
2957 sttt_xres_virtual = simple_strtoul(p, NULL, 10);
2958 if ((p = strsep(&spec, ";")) && *p)
2959 sttt_yres_virtual = simple_strtoul(p, NULL, 0);
2960 if ((p = strsep(&spec, ";")) && *p)
2961 ovsc_offset = simple_strtoul(p, NULL, 0);
1da177e4
LT
2962
2963 if (ovsc_offset || (sttt_yres_virtual != st_yres))
a1005012 2964 use_hwscroll = 0;
1da177e4
LT
2965}
2966
1da177e4
LT
2967#ifdef ATAFB_FALCON
2968static void __init atafb_setup_mcap(char *spec)
2969{
2970 char *p;
2971 int vmin, vmax, hmin, hmax;
2972
2973 /* Format for monitor capabilities is: <Vmin>;<Vmax>;<Hmin>;<Hmax>
2974 * <V*> vertical freq. in Hz
2975 * <H*> horizontal freq. in kHz
2976 */
2977 if (!(p = strsep(&spec, ";")) || !*p)
2978 return;
2979 vmin = simple_strtoul(p, NULL, 10);
2980 if (vmin <= 0)
2981 return;
2982 if (!(p = strsep(&spec, ";")) || !*p)
2983 return;
2984 vmax = simple_strtoul(p, NULL, 10);
2985 if (vmax <= 0 || vmax <= vmin)
2986 return;
2987 if (!(p = strsep(&spec, ";")) || !*p)
2988 return;
2989 hmin = 1000 * simple_strtoul(p, NULL, 10);
2990 if (hmin <= 0)
2991 return;
2992 if (!(p = strsep(&spec, "")) || !*p)
2993 return;
2994 hmax = 1000 * simple_strtoul(p, NULL, 10);
2995 if (hmax <= 0 || hmax <= hmin)
2996 return;
2997
2998 fb_info.monspecs.vfmin = vmin;
2999 fb_info.monspecs.vfmax = vmax;
3000 fb_info.monspecs.hfmin = hmin;
3001 fb_info.monspecs.hfmax = hmax;
3002}
3003#endif /* ATAFB_FALCON */
3004
1da177e4
LT
3005static void __init atafb_setup_user(char *spec)
3006{
3007 /* Format of user defined video mode is: <xres>;<yres>;<depth>
3008 */
3009 char *p;
3010 int xres, yres, depth, temp;
3011
a1005012
MS
3012 p = strsep(&spec, ";");
3013 if (!p || !*p)
1da177e4
LT
3014 return;
3015 xres = simple_strtoul(p, NULL, 10);
a1005012
MS
3016 p = strsep(&spec, ";");
3017 if (!p || !*p)
1da177e4
LT
3018 return;
3019 yres = simple_strtoul(p, NULL, 10);
a1005012
MS
3020 p = strsep(&spec, "");
3021 if (!p || !*p)
1da177e4
LT
3022 return;
3023 depth = simple_strtoul(p, NULL, 10);
a1005012
MS
3024 temp = get_video_mode("user0");
3025 if (temp) {
3026 default_par = temp;
3027 atafb_predefined[default_par - 1].xres = xres;
3028 atafb_predefined[default_par - 1].yres = yres;
3029 atafb_predefined[default_par - 1].bits_per_pixel = depth;
1da177e4
LT
3030 }
3031}
3032
a1005012 3033int __init atafb_setup(char *options)
1da177e4 3034{
a1005012
MS
3035 char *this_opt;
3036 int temp;
1da177e4 3037
a1005012 3038 if (!options || !*options)
1da177e4 3039 return 0;
a1005012
MS
3040
3041 while ((this_opt = strsep(&options, ",")) != NULL) {
3042 if (!*this_opt)
3043 continue;
3044 if ((temp = get_video_mode(this_opt))) {
3045 default_par = temp;
3046 mode_option = this_opt;
3047 } else if (!strcmp(this_opt, "inverse"))
3048 inverse = 1;
3049 else if (!strncmp(this_opt, "hwscroll_", 9)) {
3050 hwscroll = simple_strtoul(this_opt + 9, NULL, 10);
3051 if (hwscroll < 0)
3052 hwscroll = 0;
3053 if (hwscroll > 200)
3054 hwscroll = 200;
3055 }
1da177e4 3056#ifdef ATAFB_EXT
a1005012
MS
3057 else if (!strcmp(this_opt, "mv300")) {
3058 external_bitspercol = 8;
3059 external_card_type = IS_MV300;
3060 } else if (!strncmp(this_opt, "external:", 9))
3061 atafb_setup_ext(this_opt + 9);
3062#endif
3063 else if (!strncmp(this_opt, "internal:", 9))
3064 atafb_setup_int(this_opt + 9);
3065#ifdef ATAFB_FALCON
3066 else if (!strncmp(this_opt, "eclock:", 7)) {
3067 fext.f = simple_strtoul(this_opt + 7, NULL, 10);
3068 /* external pixelclock in kHz --> ps */
3069 fext.t = 1000000000 / fext.f;
3070 fext.f *= 1000;
3071 } else if (!strncmp(this_opt, "monitorcap:", 11))
3072 atafb_setup_mcap(this_opt + 11);
3073#endif
3074 else if (!strcmp(this_opt, "keep"))
3075 DontCalcRes = 1;
3076 else if (!strncmp(this_opt, "R", 1))
3077 atafb_setup_user(this_opt + 1);
1da177e4 3078 }
a1005012
MS
3079 return 0;
3080}
3081
3082int __init atafb_init(void)
3083{
639274d8 3084 int pad, detected_mode, error;
a1005012
MS
3085 unsigned int defmode = 0;
3086 unsigned long mem_req;
3087
3088#ifndef MODULE
3089 char *option = NULL;
3090
3091 if (fb_get_options("atafb", &option))
3092 return -ENODEV;
3093 atafb_setup(option);
3094#endif
3095 printk("atafb_init: start\n");
3096
3097 if (!MACH_IS_ATARI)
e945b568 3098 return -ENODEV;
a1005012
MS
3099
3100 do {
3101#ifdef ATAFB_EXT
3102 if (external_addr) {
3103 printk("atafb_init: initializing external hw\n");
3104 fbhw = &ext_switch;
3105 atafb_ops.fb_setcolreg = &ext_setcolreg;
3106 defmode = DEFMODE_EXT;
3107 break;
3108 }
3109#endif
3110#ifdef ATAFB_TT
3111 if (ATARIHW_PRESENT(TT_SHIFTER)) {
3112 printk("atafb_init: initializing TT hw\n");
3113 fbhw = &tt_switch;
3114 atafb_ops.fb_setcolreg = &tt_setcolreg;
3115 defmode = DEFMODE_TT;
3116 break;
3117 }
1da177e4 3118#endif
1da177e4 3119#ifdef ATAFB_FALCON
a1005012
MS
3120 if (ATARIHW_PRESENT(VIDEL_SHIFTER)) {
3121 printk("atafb_init: initializing Falcon hw\n");
3122 fbhw = &falcon_switch;
3123 atafb_ops.fb_setcolreg = &falcon_setcolreg;
639274d8
GU
3124 error = request_irq(IRQ_AUTO_4, falcon_vbl_switcher,
3125 IRQ_TYPE_PRIO,
3126 "framebuffer/modeswitch",
3127 falcon_vbl_switcher);
3128 if (error)
3129 return error;
a1005012
MS
3130 defmode = DEFMODE_F30;
3131 break;
3132 }
3133#endif
3134#ifdef ATAFB_STE
3135 if (ATARIHW_PRESENT(STND_SHIFTER) ||
3136 ATARIHW_PRESENT(EXTD_SHIFTER)) {
3137 printk("atafb_init: initializing ST/E hw\n");
3138 fbhw = &st_switch;
3139 atafb_ops.fb_setcolreg = &stste_setcolreg;
3140 defmode = DEFMODE_STE;
3141 break;
3142 }
3143 fbhw = &st_switch;
3144 atafb_ops.fb_setcolreg = &stste_setcolreg;
3145 printk("Cannot determine video hardware; defaulting to ST(e)\n");
3146#else /* ATAFB_STE */
3147 /* no default driver included */
3148 /* Nobody will ever see this message :-) */
3149 panic("Cannot initialize video hardware");
3150#endif
3151 } while (0);
3152
3153 /* Multisync monitor capabilities */
3154 /* Atari-TOS defaults if no boot option present */
3155 if (fb_info.monspecs.hfmin == 0) {
3156 fb_info.monspecs.hfmin = 31000;
3157 fb_info.monspecs.hfmax = 32000;
3158 fb_info.monspecs.vfmin = 58;
3159 fb_info.monspecs.vfmax = 62;
1da177e4 3160 }
a1005012
MS
3161
3162 detected_mode = fbhw->detect();
3163 check_default_par(detected_mode);
3164#ifdef ATAFB_EXT
3165 if (!external_addr) {
3166#endif /* ATAFB_EXT */
3167 mem_req = default_mem_req + ovsc_offset + ovsc_addlen;
3168 mem_req = PAGE_ALIGN(mem_req) + PAGE_SIZE;
3169 screen_base = atari_stram_alloc(mem_req, "atafb");
3170 if (!screen_base)
3171 panic("Cannot allocate screen memory");
3172 memset(screen_base, 0, mem_req);
3173 pad = -(unsigned long)screen_base & (PAGE_SIZE - 1);
3174 screen_base += pad;
3175 real_screen_base = screen_base + ovsc_offset;
3176 screen_len = (mem_req - pad - ovsc_offset) & PAGE_MASK;
3177 st_ovsc_switch();
3178 if (CPU_IS_040_OR_060) {
3179 /* On a '040+, the cache mode of video RAM must be set to
3180 * write-through also for internal video hardware! */
3181 cache_push(virt_to_phys(screen_base), screen_len);
3182 kernel_set_cachemode(screen_base, screen_len,
3183 IOMAP_WRITETHROUGH);
3184 }
3185 printk("atafb: screen_base %p real_screen_base %p screen_len %d\n",
3186 screen_base, real_screen_base, screen_len);
3187#ifdef ATAFB_EXT
3188 } else {
3189 /* Map the video memory (physical address given) to somewhere
3190 * in the kernel address space.
3191 */
3192 external_addr = ioremap_writethrough((unsigned long)external_addr,
3193 external_len);
3194 if (external_vgaiobase)
3195 external_vgaiobase =
3196 (unsigned long)ioremap(external_vgaiobase, 0x10000);
3197 screen_base =
3198 real_screen_base = external_addr;
3199 screen_len = external_len & PAGE_MASK;
3200 memset (screen_base, 0, external_len);
3201 }
3202#endif /* ATAFB_EXT */
3203
3204// strcpy(fb_info.mode->name, "Atari Builtin ");
3205 fb_info.fbops = &atafb_ops;
3206 // try to set default (detected; requested) var
3207 do_fb_set_var(&atafb_predefined[default_par - 1], 1);
3208 // reads hw state into current par, which may not be sane yet
3209 ata_get_par(&current_par);
3210 fb_info.par = &current_par;
3211 // tries to read from HW which may not be initialized yet
3212 // so set sane var first, then call atafb_set_par
3213 atafb_get_var(&fb_info.var, &fb_info);
74511413
GU
3214
3215#ifdef ATAFB_FALCON
3216 fb_info.pseudo_palette = current_par.hw.falcon.pseudo_palette;
3217#endif
a1005012
MS
3218 fb_info.flags = FBINFO_FLAG_DEFAULT;
3219
3220 if (!fb_find_mode(&fb_info.var, &fb_info, mode_option, atafb_modedb,
3221 NUM_TOTAL_MODES, &atafb_modedb[defmode],
3222 fb_info.var.bits_per_pixel)) {
3223 return -EINVAL;
3224 }
3225
da8513c9
GU
3226 fb_videomode_to_modelist(atafb_modedb, NUM_TOTAL_MODES,
3227 &fb_info.modelist);
3228
a1005012
MS
3229 atafb_set_disp(&fb_info);
3230
3231 fb_alloc_cmap(&(fb_info.cmap), 1 << fb_info.var.bits_per_pixel, 0);
3232
3233
3234 printk("Determined %dx%d, depth %d\n",
3235 fb_info.var.xres, fb_info.var.yres, fb_info.var.bits_per_pixel);
3236 if ((fb_info.var.xres != fb_info.var.xres_virtual) ||
3237 (fb_info.var.yres != fb_info.var.yres_virtual))
3238 printk(" virtual %dx%d\n", fb_info.var.xres_virtual,
3239 fb_info.var.yres_virtual);
3240
3241 if (register_framebuffer(&fb_info) < 0) {
3242#ifdef ATAFB_EXT
3243 if (external_addr) {
3244 iounmap(external_addr);
3245 external_addr = NULL;
3246 }
3247 if (external_vgaiobase) {
3248 iounmap((void*)external_vgaiobase);
3249 external_vgaiobase = 0;
3250 }
1da177e4 3251#endif
a1005012
MS
3252 return -EINVAL;
3253 }
3254
3255 // FIXME: mode needs setting!
3256 //printk("fb%d: %s frame buffer device, using %dK of video memory\n",
3257 // fb_info.node, fb_info.mode->name, screen_len>>10);
3258 printk("fb%d: frame buffer device, using %dK of video memory\n",
3259 fb_info.node, screen_len >> 10);
3260
3261 /* TODO: This driver cannot be unloaded yet */
3262 return 0;
1da177e4
LT
3263}
3264
a1005012
MS
3265module_init(atafb_init);
3266
1da177e4
LT
3267#ifdef MODULE
3268MODULE_LICENSE("GPL");
3269
a1005012 3270int cleanup_module(void)
1da177e4 3271{
a1005012
MS
3272 unregister_framebuffer(&fb_info);
3273 return atafb_deinit();
1da177e4
LT
3274}
3275#endif /* MODULE */
This page took 0.628726 seconds and 5 git commands to generate.