/*
* linux/drivers/video/cyberfb.c -- CyberVision64 frame buffer device
* $Id: cyberfb.c,v 1.6 1998/09/11 04:54:58 abair Exp $
*
* Copyright (C) 1998 Alan Bair
*
* This file is based on two CyberVision64 frame buffer device drivers
*
* The second CyberVision64 frame buffer device (cvision.c cvision_core.c):
*
* Copyright (c) 1997 Antonio Santos
*
* Released as a patch to 2.1.35, but never included in the source tree.
* This is based on work from the NetBSD CyberVision64 frame buffer driver
* and support files (grf_cv.c, grf_cvreg.h, ite_cv.c):
* Permission to use the source of this driver was obtained from the
* author Michael Teske by Alan Bair.
*
* Copyright (c) 1995 Michael Teske
*
* The first CyberVision64 frame buffer device (cyberfb.c):
*
* Copyright (C) 1996 Martin Apel
* Geert Uytterhoeven
*
* Which is based on the Amiga frame buffer device (amifb.c):
*
* Copyright (C) 1995 Geert Uytterhoeven
*
*
* History:
* - 22 Dec 95: Original version by Martin Apel
* - 05 Jan 96: Geert: integration into the current source tree
* - 01 Aug 98: Alan: Merge in code from cvision.c and cvision_core.c
* $Log: cyberfb.c,v $
* Revision 1.6 1998/09/11 04:54:58 abair
* Update for 2.1.120 change in include file location.
* Clean up for public release.
*
* Revision 1.5 1998/09/03 04:27:13 abair
* Move cv64_load_video_mode to cyber_set_video so a new video mode is install
* with each change of the 'var' data.
*
* Revision 1.4 1998/09/01 00:31:17 abair
* Put in a set of default 8,16,24 bpp modes and map cyber8,16 to them.
* Update operations with 'par' to handle a more complete set of parameter
* values for encode/decode process.
*
* Revision 1.3 1998/08/31 21:31:33 abair
* Swap 800x490 for 640x480 video mode and more cleanup.
* Abandon idea to resurrect "custom" mode setting via kernel opts,
* instead work on making use of fbset program to do this.
*
* Revision 1.2 1998/08/31 06:17:08 abair
* Make updates for changes in cyberfb.c released in 2.1.119
* and do some cleanup of the code.
*
* Revision 1.1 1998/08/29 18:38:31 abair
* Initial revision
*
* Revision 1.3 1998/08/17 06:21:53 abair
* Remove more redundant code after merging in cvision_core.c
* Set blanking by colormap to pale red to detect this vs trying to
* use video blanking. More formating to Linux code style.
*
* Revision 1.2 1998/08/15 17:51:37 abair
* Added cvision_core.c code from 2.1.35 patches.
* Changed to compile correctly and switch to using initialization
* code. Added debugging and dropping of duplicate code.
*
*
*
* This file is subject to the terms and conditions of the GNU General Public
* License. See the file COPYING in the main directory of this archive
* for more details.
*/
#include <linux/module.h>
#include <linux/kernel.h>
#include <linux/errno.h>
#include <linux/string.h>
#include <linux/mm.h>
#include <linux/slab.h>
#include <linux/delay.h>
#include <linux/zorro.h>
#include <linux/fb.h>
#include <linux/init.h>
#include <asm/uaccess.h>
#include <asm/system.h>
#include <asm/irq.h>
#include <asm/pgtable.h>
#include <asm/amigahw.h>
#include <asm/io.h>
#include "cyberfb.h"
#include <video/fbcon.h>
#include <video/fbcon-cfb8.h>
#include <video/fbcon-cfb16.h>
/*#define CYBERFBDEBUG*/
#ifdef CYBERFBDEBUG
#define DPRINTK(fmt, args...) printk(KERN_DEBUG "%s: " fmt, __FUNCTION__ , ## args)
static void cv64_dump(void);
#else
#define DPRINTK(fmt, args...)
#endif
#define wb_64(regs,reg,dat) (*(((volatile unsigned char *)regs) + reg) = dat)
#define rb_64(regs, reg) (*(((volatile unsigned char *)regs) + reg))
#define ww_64(regs,reg,dat) (*((volatile unsigned short *)(regs + reg) = dat)
struct cyberfb_par {
struct fb_var_screeninfo var;
__u32 type;
__u32 type_aux;
__u32 visual;
__u32 line_length;
};
static struct cyberfb_par current_par;
static int current_par_valid = 0;
static struct display disp;
static struct fb_info fb_info;
/*
* Frame Buffer Name
*/
static char cyberfb_name[16] = "Cybervision";
/*
* CyberVision Graphics Board
*/
static unsigned char Cyber_colour_table [256][3];
static unsigned long CyberSize;
static volatile unsigned char *CyberBase;
static volatile unsigned char *CyberMem;
static volatile unsigned char *CyberRegs;
static unsigned long CyberMem_phys;
static unsigned long CyberRegs_phys;
/*
* Predefined Video Modes
*/
static struct {
const char *name;
struct fb_var_screeninfo var;
} cyberfb_predefined[] __initdata = {
{ "640x480-8", { /* Default 8 BPP mode (cyber8) */
640, 480, 640, 480, 0, 0, 8, 0,
{0, 8, 0}, {0, 8, 0}, {0, 8, 0}, {0, 0, 0},
0, 0, -1, -1, FB_ACCELF_TEXT, 39722, 40, 24, 32, 11, 96, 2,
FB_SYNC_COMP_HIGH_ACT|FB_SYNC_VERT_HIGH_ACT,
FB_VMODE_NONINTERLACED
}},
{ "640x480-16", { /* Default 16 BPP mode (cyber16) */
640, 480, 640, 480, 0, 0, 16, 0,
{11, 5, 0}, {5, 6, 0}, {0, 5, 0}, {0, 0, 0},
0, 0, -1, -1, FB_ACCELF_TEXT, 39722, 40, 24, 32, 11, 96, 2,
FB_SYNC_COMP_HIGH_ACT|FB_SYNC_VERT_HIGH_ACT,
FB_VMODE_NONINTERLACED
}},
{ "640x480-24", { /* Default 24 BPP mode */
640, 480, 640, 480, 0, 0, 24, 0,
{16, 8, 0}, {8, 8, 0}, {0, 8, 0}, {0, 0, 0},
0, 0, -1, -1, FB_ACCELF_TEXT, 39722, 40, 24, 32, 11, 96, 2,
FB_SYNC_COMP_HIGH_ACT|FB_SYNC_VERT_HIGH_ACT,
FB_VMODE_NONINTERLACED
}},
{ "800x490-8", { /* Cybervision 8 bpp */
/* NO Acceleration */
800, 490, 800, 490, 0, 0, 8, 0,
{0, 8, 0}, {0, 8, 0}, {0, 8, 0}, {0, 0, 0},
0, 0, -1, -1, FB_ACCEL_NONE, 33333, 80, 24, 23, 1, 56, 8,
FB_SYNC_COMP_HIGH_ACT|FB_SYNC_VERT_HIGH_ACT,
FB_VMODE_NONINTERLACED
}},
/* I can't test these with my monitor, but I suspect they will
* be OK, since Antonio Santos indicated he had tested them in
* his system.
*/
{ "800x600-8", { /* Cybervision 8 bpp */
800, 600, 800, 600, 0, 0, 8, 0,
{0, 8, 0}, {0, 8, 0}, {0, 8, 0}, {0, 0, 0},
0, 0, -1, -1, FB_ACCELF_TEXT, 27778, 64, 24, 22, 1, 72, 2,
FB_SYNC_COMP_HIGH_ACT|FB_SYNC_VERT_HIGH_ACT,
FB_VMODE_NONINTERLACED
}},
{ "1024x768-8", { /* Cybervision 8 bpp */
1024, 768, 1024, 768, 0, 0, 8, 0,
{0, 8, 0}, {0, 8, 0}, {0, 8, 0}, {0, 0, 0},
0, 0, -1, -1, FB_ACCELF_TEXT, 16667, 224, 72, 60, 12, 168, 4,
FB_SYNC_COMP_HIGH_ACT|FB_SYNC_VERT_HIGH_ACT,
FB_VMODE_NONINTERLACED
}},
{ "1152x886-8", { /* Cybervision 8 bpp */
1152, 886, 1152, 886, 0, 0, 8, 0,
{0, 8, 0}, {0, 8, 0}, {0, 8, 0}, {0, 0, 0},
0, 0, -1, -1, FB_ACCELF_TEXT, 15873, 184, 40, 24, 1, 56, 16,
FB_SYNC_COMP_HIGH_ACT|FB_SYNC_VERT_HIGH_ACT,
FB_VMODE_NONINTERLACED
}},
{ "1280x1024-8", { /* Cybervision 8 bpp */
1280, 1024, 1280, 1024, 0, 0, 8, 0,
{0, 8, 0}, {0, 8, 0}, {0, 8, 0}, {0, 0, 0},
0, 0, -1, -1, FB_ACCELF_TEXT, 16667, 256, 48, 50, 12, 72, 4,
FB_SYNC_COMP_HIGH_ACT|FB_SYNC_VERT_HIGH_ACT,
FB_VMODE_INTERLACED
}}
};
#define NUM_TOTAL_MODES ARRAY_SIZE(cyberfb_predefined)
static int Cyberfb_inverse = 0;
/*
* Some default modes
*/
#define CYBER8_DEFMODE (0)
#define CYBER16_DEFMODE (1)
static struct fb_var_screeninfo cyberfb_default;
static int cyberfb_usermode __initdata = 0;
/*
* Interface used by the world
*/
int cyberfb_setup(char *options);
static int cyberfb_get_fix(struct fb_fix_screeninfo *fix, int con,
struct fb_info *info);
static int cyberfb_get_var(struct fb_var_screeninfo *var, int con,
struct fb_info *info);
static int cyberfb_set_var(struct fb_var_screeninfo *var, int con,
struct fb_info *info);
static int cyberfb_get_cmap(struct fb_cmap *cmap, int kspc, int con,
struct fb_info *info);
static int cyberfb_setcolreg(u_int regno, u_int red, u_int green, u_int blue,
u_int transp, struct fb_info *info);
static int cyberfb_blank(int blank, struct fb_info *info);
/*
* Interface to the low level console driver
*/
int cyberfb_init(void);
static int Cyberfb_switch(int con, struct fb_info *info);
static int Cyberfb_updatevar(int con, struct fb_info *info);
/*
* Text console acceleration
*/
#ifdef FBCON_HAS_CFB8
static struct display_switch fbcon_cyber8;
#endif
/*
* Accelerated Functions used by the low level console driver
*/
static void Cyber_WaitQueue(u_short fifo);
static void Cyber_WaitBlit(void);
static void Cyber_BitBLT(u_short curx, u_short cury, u_short destx,
u_short desty, u_short width, u_short height,
u_short mode);
static void Cyber_RectFill(u_short x, u_short y, u_short width, u_short height,
u_short mode, u_short color);
#if 0
static void Cyber_MoveCursor(u_short x, u_short y);
#endif
/*
* Hardware Specific Routines
*/
static int Cyber_init(void);
static int Cyber_encode_fix(struct fb_fix_screeninfo *fix,
struct cyberfb_par *par);
static int Cyber_decode_var(struct fb_var_screeninfo *var,
struct cyberfb_par *par);
static int Cyber_encode_var(struct fb_var_screeninfo *var,
struct cyberfb_par *par);
static int Cyber_getcolreg(u_int regno, u_int *red, u_int *green, u_int *blue,
u_int *transp, struct fb_info *info);
/*
* Internal routines
*/
static void cyberfb_get_par(struct cyberfb_par *par);
static void cyberfb_set_par(struct cyberfb_par *par);
static int do_fb_set_var(struct fb_var_screeninfo *var, int isactive);
static void cyberfb_set_disp(int con, struct fb_info *info);
static int get_video_mode(const char *name);
/* For cvision_core.c */
static unsigned short cv64_compute_clock(unsigned long);
static int cv_has_4mb (volatile unsigned char *);
static void cv64_board_init (void);
static void cv64_load_video_mode (struct fb_var_screeninfo *);
/* -------------------- Hardware specific routines ------------------------- */
/*
* Initialization
*
* Set the default video mode for this chipset. If a video mode was
* specified on the command line, it will override the default mode.
*/
static int Cyber_init(void)
{
volatile unsigned char *regs = CyberRegs;
volatile unsigned long *CursorBase;
int i;
DPRINTK("ENTER\n");
/* Init local cmap as greyscale levels */
for (i = 0; i < 256; i++) {
Cyber_colour_table [i][0] = i;
Cyber_colour_table [i][1] = i;
Cyber_colour_table [i][2] = i;
}
/* Initialize the board and determine fbmem size */
cv64_board_init();
#ifdef CYBERFBDEBUG
DPRINTK("Register state after initing board\n");
cv64_dump();
#endif
/* Clear framebuffer memory */
DPRINTK("Clear framebuffer memory\n");
memset ((char *)CyberMem, 0, CyberSize);
/* Disable hardware cursor */
DPRINTK("Disable HW cursor\n");
wb_64(regs, S3_CRTC_ADR, S3_REG_LOCK2);
wb_64(regs, S3_CRTC_DATA, 0xa0);
wb_64(regs, S3_CRTC_ADR, S3_HGC_MODE);
wb_64(regs, S3_CRTC_DATA, 0x00);
wb_64(regs, S3_CRTC_ADR, S3_HWGC_DX);
wb_64(regs, S3_CRTC_DATA, 0x00);
wb_64(regs, S3_CRTC_ADR, S3_HWGC_DY);
wb_64(regs, S3_CRTC_DATA, 0x00);
/* Initialize hardware cursor */
DPRINTK("Init HW cursor\n");
CursorBase = (u_long *)((char *)(CyberMem) + CyberSize - 0x400);
for (i=0; i < 8; i++)
{
*(CursorBase +(i*4)) = 0xffffff00;
*(CursorBase+1+(i*4)) = 0xffff0000;
*(CursorBase+2+(i*4)) = 0xffff0000;
*(CursorBase+3+(i*4)) = 0xffff0000;
}
for (i=8; i < 64; i++)
{
*(CursorBase +(i*4)) = 0xffff0000;
*(CursorBase+1+(i*4)) = 0xffff0000;
*(CursorBase+2+(i*4)) = 0xffff0000;
*(CursorBase+3+(i*4)) = 0xffff0000;
}
cyberfb_setcolreg (255, 56<<8, 100<<8, 160<<8, 0, NULL /* unused */);
cyberfb_setcolreg (254, 0, 0, 0, 0, NULL /* unused */);
DPRINTK("EXIT\n");
return 0;
}
/*
* This function should fill in the `fix' structure based on the
* values in the `par' structure.
*/
static int Cyber_encode_fix(struct fb_fix_screeninfo *fix,
struct cyberfb_par *par)
{
DPRINTK("ENTER\n");
memset(fix, 0, sizeof(struct fb_fix_screeninfo));
strcpy(fix->id, cyberfb_name);
fix->smem_start = CyberMem_phys;
fix->smem_len = CyberSize;
fix->mmio_start = CyberRegs_phys;
fix->mmio_len = 0x10000;
fix->type = FB_TYPE_PACKED_PIXELS;
fix->type_aux = 0;
if (par->var.bits_per_pixel == 15 || par->var.bits_per_pixel == 16 ||
par->var.bits_per_pixel == 24 || par->var.bits_per_pixel == 32) {
fix->visual = FB_VISUAL_DIRECTCOLOR;
} else {
fix->visual = FB_VISUAL_PSEUDOCOLOR;
}
fix->xpanstep = 0;
fix->ypanstep = 0;
fix->ywrapstep = 0;
fix->line_length = 0;
fix->accel = FB_ACCEL_S3_TRIO64;
DPRINTK("EXIT\n");
return(0);
}
/*
* Fill the `par' structure based on the values in `var'.
* TODO: Verify and adjust values, return -EINVAL if bad.
*/
static int Cyber_decode_var(struct fb_var_screeninfo *var,
struct cyberfb_par *par)
{
DPRINTK("ENTER\n");
par->var.xres = var->xres;
par->var.yres = var->yres;
par->var.xres_virtual = var->xres_virtual;
par->var.yres_virtual = var->yres_virtual;
par->var.xoffset = var->xoffset;
par->var.yoffset = var->yoffset;
par->var.bits_per_pixel = var->bits_per_pixel;
par->var.grayscale = var->grayscale;
par->var.red = var->red;
par->var.green = var->green;
par->var.blue = var->blue;
par->var.transp = var->transp;
par->var.nonstd = var->nonstd;
par->var.activate = var->activate;
par->var.height = var->height;
par->var.width = var->width;
if (var->accel_flags & FB_ACCELF_TEXT) {
par->var.accel_flags = FB_ACCELF_TEXT;
} else {
par->var.accel_flags = 0;
}
par->var.pixclock = var->pixclock;
par->var.left_margin = var->left_margin;
par->var.right_margin = var->right_margin;
par->var.upper_margin = var->upper_margin;
par->var.lower_margin = var->lower_margin;
par->var.hsync_len = var->hsync_len;
par->var.vsync_len = var->vsync_len;
par->var.sync = var->sync;
par->var.vmode = var->vmode;
DPRINTK("EXIT\n");
return(0);
}
/*
* Fill the `var' structure based on the values in `par' and maybe
* other values read out of the hardware.
*/
static int Cyber_encode_var(struct fb_var_screeninfo *var,
struct cyberfb_par *par)
{
DPRINTK("ENTER\n");
var->xres = par->var.xres;
var->yres = par->var.yres;
var->xres_virtual = par->var.xres_virtual;
var->yres_virtual = par->var.yres_virtual;
var->xoffset = par->var.xoffset;
var->yoffset = par->var.yoffset;
var->bits_per_pixel = par->var.bits_per_pixel;
var->grayscale = par->var.grayscale;
var->red = par->var.red;
var->green = par->var.green;
var->blue = par->var.blue;
var->transp = par->var.transp;
var->nonstd = par->var.nonstd;
var->activate = par->var.activate;
var->height = par->var.height;
var->width = par->var.width;
var->accel_flags = par->var.accel_flags;
var->pixclock = par->var.pixclock;
var->left_margin = par->var.left_margin;
var->right_margin = par->var.right_margin;
var->upper_margin = par->var.upper_margin;
var->lower_margin = par->var.lower_margin;
var->hsync_len = par->var.hsync_len;
var->vsync_len = par->var.vsync_len;
var->sync = par->var.sync;
var->vmode = par->var.vmode;
DPRINTK("EXIT\n");
return(0);
}
/*
* Set a single color register. Return != 0 for invalid regno.
*/
static int cyberfb_setcolreg(u_int regno, u_int red, u_int green, u_int blue,
u_int transp, struct fb_info *info)
{
volatile unsigned char *regs = CyberRegs;
/*DPRINTK("ENTER\n");*/
if (regno > 255) {
DPRINTK("EXIT - Register # > 255\n");
return (1);
}
wb_64(regs, 0x3c8, (unsigned char) regno);
red >>= 10;
green >>= 10;
blue >>= 10;
Cyber_colour_table [regno][0] = red;
Cyber_colour_table [regno][1] = green;
Cyber_colour_table [regno][2] = blue;
wb_64(regs, 0x3c9, red);
wb_64(regs, 0x3c9, green);
wb_64(regs, 0x3c9, blue);
/*DPRINTK("EXIT\n");*/
return (0);
}
/*
* Read a single color register and split it into
* colors/transparent. Return != 0 for invalid regno.
*/
static int Cyber_getcolreg(u_int regno, u_int *red, u_int *green, u_int *blue,
u_int *transp, struct fb_info *info)
{
int t;
/*DPRINTK("ENTER\n");*/
if (regno > 255) {
DPRINTK("EXIT - Register # > 255\n");
return (1);
}
/* ARB This shifting & oring seems VERY strange */
t = Cyber_colour_table [regno][0];
*red = (t<<10) | (t<<4) | (t>>2);
t = Cyber_colour_table [regno][1];
*green = (t<<10) | (t<<4) | (t>>2);
t = Cyber_colour_table [regno][2];
*blue = (t<<10) | (t<<4) | (t>>2);
*transp = 0;
/*DPRINTK("EXIT\n");*/
return (0);
}
/*
* (Un)Blank the screen
* blank: 1 = zero fb cmap
* 0 = restore fb cmap from local cmap
*/
static int cyberfb_blank(int blank, struct fb_info *info)
{
volatile unsigned char *regs = CyberRegs;
int i;
DPRINTK("ENTER\n");
#if 0
/* Blank by turning gfx off */
gfx_on_off (1, regs);
#else
if (blank) {
for (i = 0; i < 256; i++) {
wb_64(regs, 0x3c8, (unsigned char) i);
/* ARB Pale red to detect this blanking method */
wb_64(regs, 0x3c9, 48);
wb_64(regs, 0x3c9, 0);
wb_64(regs, 0x3c9, 0);
}
} else {
for (i = 0; i < 256; i++) {
wb_64(regs, 0x3c8, (unsigned char) i);
wb_64(regs, 0x3c9, Cyber_colour_table[i][0]);
wb_64(regs, 0x3c9, Cyber_colour_table[i][1]);
wb_64(regs, 0x3c9, Cyber_colour_table[i][2]);
}
}
#endif
DPRINTK("EXIT\n");
return 0;
}
/**************************************************************
* We are waiting for "fifo" FIFO-slots empty
*/
static void Cyber_WaitQueue (u_short fifo)
{
unsigned short status;
DPRINTK("ENTER\n");
do {
status = *((u_short volatile *)(CyberRegs + S3_GP_STAT));
} while (status & fifo);
DPRINTK("EXIT\n");
}
/**************************************************************
* We are waiting for Hardware (Graphics Engine) not busy
*/
static void Cyber_WaitBlit (void)
{
unsigned short status;
DPRINTK("ENTER\n");
do {
status = *((u_short volatile *)(CyberRegs + S3_GP_STAT));
} while (status & S3_HDW_BUSY);
DPRINTK("EXIT\n");
}
/**************************************************************
* BitBLT - Through the Plane
*/
static void Cyber_BitBLT (u_short curx, u_short cury, u_short destx,
u_short desty, u_short width, u_short height,
u_short mode)
{
volatile unsigned char *regs = CyberRegs;
u_short blitcmd = S3_BITBLT;
DPRINTK("ENTER\n");
/* Set drawing direction */
/* -Y, X maj, -X (default) */
if (curx > destx) {
blitcmd |= 0x0020; /* Drawing direction +X */
} else {
curx += (width - 1);
destx += (width - 1);
}
if (cury > desty) {
blitcmd |= 0x0080; /* Drawing direction +Y */
} else {
cury += (height - 1);
desty += (height - 1);
}
Cyber_WaitQueue (0x8000);
*((u_short volatile *)(regs + S3_PIXEL_CNTL)) = 0xa000;
*((u_short volatile *)(regs + S3_FRGD_MIX)) = (0x0060 | mode);
*((u_short volatile *)(regs + S3_CUR_X)) = curx;
*((u_short volatile *)(regs + S3_CUR_Y)) = cury;
*((u_short volatile *)(regs + S3_DESTX_DIASTP)) = destx;
*((u_short volatile *)(regs + S3_DESTY_AXSTP)) = desty;
*((u_short volatile *)(regs + S3_MIN_AXIS_PCNT)) = height - 1;
*((u_short volatile *)(regs + S3_MAJ_AXIS_PCNT)) = width - 1;
*((u_short volatile *)(regs + S3_CMD)) = blitcmd;
DPRINTK("EXIT\n");
}
/**************************************************************
* Rectangle Fill Solid
*/
static void Cyber_RectFill (u_short x, u_short y, u_short width,
u_short height, u_short mode, u_short color)
{
volatile unsigned char *regs = CyberRegs;
u_short blitcmd = S3_FILLEDRECT;
DPRINTK("ENTER\n");
Cyber_WaitQueue (0x8000);
*((u_short volatile *)(regs + S3_PIXEL_CNTL)) = 0xa000;
*((u_short volatile *)(regs + S3_FRGD_MIX)) = (0x0020 | mode);
*((u_short volatile *)(regs + S3_MULT_MISC)) = 0xe000;
*((u_short volatile *)(regs + S3_FRGD_COLOR)) = color;
*((u_short volatile *)(regs + S3_CUR_X)) = x;
*((u_short volatile *)(regs + S3_CUR_Y)) = y;
*((u_short volatile *)(regs + S3_MIN_AXIS_PCNT)) = height - 1;
*((u_short volatile *)(regs + S3_MAJ_AXIS_PCNT)) = width - 1;
*((u_short volatile *)(regs + S3_CMD)) = blitcmd;
DPRINTK("EXIT\n");
}
#if 0
/**************************************************************
* Move cursor to x, y
*/
static void Cyber_MoveCursor (u_short x, u_short y)
{
volatile unsigned char *regs = CyberRegs;
DPRINTK("ENTER\n");
*(regs + S3_CRTC_ADR) = 0x39;
*(regs + S3_CRTC_DATA) = 0xa0;
*(regs + S3_CRTC_ADR) = S3_HWGC_ORGX_H;
*(regs + S3_CRTC_DATA) = (char)((x & 0x0700) >> 8);
*(regs + S3_CRTC_ADR) = S3_HWGC_ORGX_L;
*(regs + S3_CRTC_DATA) = (char)(x & 0x00ff);
*(regs + S3_CRTC_ADR) = S3_HWGC_ORGY_H;
*(regs + S3_CRTC_DATA) = (char)((y & 0x0700) >> 8);
*(regs + S3_CRTC_ADR) = S3_HWGC_ORGY_L;
*(regs + S3_CRTC_DATA) = (char)(y & 0x00ff);
DPRINTK("EXIT\n");
}
#endif
/* -------------------- Generic routines ---------------------------------- */
/*
* Fill the hardware's `par' structure.
*/
static void cyberfb_get_par(struct cyberfb_par *par)
{
DPRINTK("ENTER\n");
if (current_par_valid) {
*par = current_par;
} else {
Cyber_decode_var(&cyberfb_default, par);
}
DPRINTK("EXIT\n");
}
static void cyberfb_set_par(struct cyberfb_par *par)
{
DPRINTK("ENTER\n");
current_par = *par;
current_par_valid = 1;
DPRINTK("EXIT\n");
}
static void cyber_set_video(struct fb_var_screeninfo *var)
{
/* Load the video mode defined by the 'var' data */
cv64_load_video_mode (var);
#ifdef CYBERFBDEBUG
DPRINTK("Register state after loading video mode\n");
cv64_dump();
#endif
}
static int do_fb_set_var(struct fb_var_screeninfo *var, int isactive)
{
int err, activate;
struct cyberfb_par par;
DPRINTK("ENTER\n");
if ((err = Cyber_decode_var(var, &par))) {
DPRINTK("EXIT - decode_var failed\n");
return(err);
}
activate = var->activate;
if ((var->activate & FB_ACTIVATE_MASK) == FB_ACTIVATE_NOW && isactive)
cyberfb_set_par(&par);
Cyber_encode_var(var, &par);
var->activate = activate;
cyber_set_video(var);
DPRINTK("EXIT\n");
return 0;
}
/*
* Get the Fixed Part of the Display
*/
static int cyberfb_get_fix(struct fb_fix_screeninfo *fix, int con,
struct fb_info *info)
{
struct cyberfb_par par;
int error = 0;
DPRINTK("ENTER\n");
if (con == -1) {
cyberfb_get_par(&par);
} else {
error = Cyber_decode_var(&fb_display[con].var, &par);
}
DPRINTK("EXIT\n");
return(error ? error : Cyber_encode_fix(fix, &par));
}
/*
* Get the User Defined Part of the Display
*/
static int cyberfb_get_var(struct fb_var_screeninfo *var, int con,
struct fb_info *info)
{
struct cyberfb_par par;
int error = 0;
DPRINTK("ENTER\n");
if (con == -1) {
cyberfb_get_par(&par);
error = Cyber_encode_var(var, &par);
disp.var = *var; /* ++Andre: don't know if this is the right place */
} else {
*var = fb_display[con].var;
}
DPRINTK("EXIT\n");
return(error);
}
static void cyberfb_set_disp(int con, struct fb_info *info)
{
struct fb_fix_screeninfo fix;
struct display *display;
DPRINTK("ENTER\n");
if (con >= 0)
display = &fb_display[con];
else
display = &disp; /* used during initialization */
cyberfb_get_fix(&fix, con, info);
if (con == -1)
con = 0;
display->visual = fix.visual;
display->type = fix.type;
display->type_aux = fix.type_aux;
display->ypanstep = fix.ypanstep;
display->ywrapstep = fix.ywrapstep;
display->can_soft_blank = 1;
display->inverse = Cyberfb_inverse;
switch (display->var.bits_per_pixel) {
#ifdef FBCON_HAS_CFB8
case 8:
if (display->var.accel_flags & FB_ACCELF_TEXT) {
display->dispsw = &fbcon_cyber8;
#warning FIXME: We should reinit the graphics engine here
} else
display->dispsw = &fbcon_cfb8;
break;
#endif
#ifdef FBCON_HAS_CFB16
case 16:
display->dispsw = &fbcon_cfb16;
break;
#endif
default:
display->dispsw = NULL;
break;
}
DPRINTK("EXIT\n");
}
/*
* Set the User Defined Part of the Display
*/
static int cyberfb_set_var(struct fb_var_screeninfo *var, int con,
struct fb_info *info)
{
int err, oldxres, oldyres, oldvxres, oldvyres, oldbpp, oldaccel;
DPRINTK("ENTER\n");
if ((err = do_fb_set_var(var, con == info->currcon))) {
DPRINTK("EXIT - do_fb_set_var failed\n");
return(err);
}
if ((var->activate & FB_ACTIVATE_MASK) == FB_ACTIVATE_NOW) {
oldxres = fb_display[con].var.xres;
oldyres = fb_display[con].var.yres;
oldvxres = fb_display[con].var.xres_virtual;
oldvyres = fb_display[con].var.yres_virtual;
oldbpp = fb_display[con].var.bits_per_pixel;
oldaccel = fb_display[con].var.accel_flags;
fb_display[con].var = *var;
if (oldxres != var->xres || oldyres != var->yres ||
oldvxres != var->xres_virtual ||
oldvyres != var->yres_virtual ||
oldbpp != var->bits_per_pixel ||
oldaccel != var->accel_flags) {
cyberfb_set_disp(con, info);
(*fb_info.changevar)(con);
fb_alloc_cmap(&fb_display[con].cmap, 0, 0);
do_install_cmap(con, info);
}
}
var->activate = 0;
DPRINTK("EXIT\n");
return(0);
}
/*
* Get the Colormap
*/
static int cyberfb_get_cmap(struct fb_cmap *cmap, int kspc, int con,
struct fb_info *info)
{
DPRINTK("ENTER\n");
if (con == info->currcon) { /* current console? */
DPRINTK("EXIT - console is current console\n");
return(fb_get_cmap(cmap, kspc, Cyber_getcolreg, info));
} else if (fb_display[con].cmap.len) { /* non default colormap? */
DPRINTK("Use console cmap\n");
fb_copy_cmap(&fb_display[con].cmap, cmap, kspc ? 0 : 2);
} else {
DPRINTK("Use default cmap\n");
fb_copy_cmap(fb_default_cmap(1<<fb_display[con].var.bits_per_pixel),
cmap, kspc ? 0 : 2);
}
DPRINTK("EXIT\n");
return(0);
}
static struct fb_ops cyberfb_ops = {
.owner = THIS_MODULE,
.fb_get_fix = cyberfb_get_fix,
.fb_get_var = cyberfb_get_var,
.fb_set_var = cyberfb_set_var,
.fb_get_cmap = cyberfb_get_cmap,
.fb_set_cmap = gen_set_cmap,
.fb_setcolreg = cyberfb_setcolreg,
.fb_blank = cyberfb_blank,
};
int __init cyberfb_setup(char *options)
{
char *this_opt;
DPRINTK("ENTER\n");
fb_info.fontname[0] = '\0';
if (!options || !*options) {
DPRINTK("EXIT - no options\n");
return 0;
}
while ((this_opt = strsep(&options, ",")) != NULL) {
if (!*this_opt)
continue;
if (!strcmp(this_opt, "inverse")) {
Cyberfb_inverse = 1;
fb_invert_cmaps();
} else if (!strncmp(this_opt, "font:", 5)) {
strcpy(fb_info.fontname, this_opt+5);
} else if (!strcmp (this_opt, "cyber8")) {
cyberfb_default = cyberfb_predefined[CYBER8_DEFMODE].var;
cyberfb_usermode = 1;
} else if (!strcmp (this_opt, "cyber16")) {
cyberfb_default = cyberfb_predefined[CYBER16_DEFMODE].var;
cyberfb_usermode = 1;
} else get_video_mode(this_opt);
}
DPRINTK("default mode: xres=%d, yres=%d, bpp=%d\n",
cyberfb_default.xres,
cyberfb_default.yres,
cyberfb_default.bits_per_pixel);
DPRINTK("EXIT\n");
return 0;
}
/*
* Initialization
*/
int __init cyberfb_init(void)
{
unsigned long board_addr, board_size;
struct cyberfb_par par;
struct zorro_dev *z = NULL;
DPRINTK("ENTER\n");
while ((z = zorro_find_device(ZORRO_PROD_PHASE5_CYBERVISION64, z))) {
board_addr = z->resource.start;
board_size = z->resource.end-z->resource.start+1;
CyberMem_phys = board_addr + 0x01400000;
CyberRegs_phys = CyberMem_phys + 0x00c00000;
if (!request_mem_region(CyberRegs_phys, 0x10000, "S3 Trio64"))
continue;
if (!request_mem_region(CyberMem_phys, 0x400000, "RAM")) {
release_mem_region(CyberRegs_phys, 0x10000);
continue;
}
DPRINTK("board_addr=%08lx\n", board_addr);
DPRINTK("board_size=%08lx\n", board_size);
CyberBase = ioremap(board_addr, board_size);
CyberRegs = CyberBase + 0x02000000;
CyberMem = CyberBase + 0x01400000;
DPRINTK("CyberBase=%08lx CyberRegs=%08lx CyberMem=%08lx\n",
CyberBase, (long unsigned int)CyberRegs, CyberMem);
#ifdef CYBERFBDEBUG
DPRINTK("Register state just after mapping memory\n");
cv64_dump();
#endif
strcpy(fb_info.modename, cyberfb_name);
fb_info.changevar = NULL;
fb_info.fbops = &cyberfb_ops;
fb_info.screen_base = (unsigned char *)CyberMem;
fb_info.disp = &disp;
fb_info.currcon = -1;
fb_info.switch_con = &Cyberfb_switch;
fb_info.updatevar = &Cyberfb_updatevar;
Cyber_init();
/* ++Andre: set cyberfb default mode */
if (!cyberfb_usermode) {
cyberfb_default = cyberfb_predefined[CYBER8_DEFMODE].var;
DPRINTK("Use default cyber8 mode\n");
}
Cyber_decode_var(&cyberfb_default, &par);
Cyber_encode_var(&cyberfb_default, &par);
do_fb_set_var(&cyberfb_default, 1);
cyberfb_get_var(&fb_display[0].var, -1, &fb_info);
cyberfb_set_disp(-1, &fb_info);
do_install_cmap(0, &fb_info);
if (register_framebuffer(&fb_info) < 0) {
DPRINTK("EXIT - register_framebuffer failed\n");
if (CyberBase)
iounmap(CyberBase);
release_mem_region(CyberMem_phys, 0x400000);
release_mem_region(CyberRegs_phys, 0x10000);
return -EINVAL;
}
printk("fb%d: %s frame buffer device, using %ldK of video memory\n",
fb_info.node, fb_info.modename, CyberSize>>10);
/* TODO: This driver cannot be unloaded yet */
DPRINTK("EXIT\n");
return 0;
}
return -ENXIO;
}
static int Cyberfb_switch(int con, struct fb_info *info)
{
DPRINTK("ENTER\n");
/* Do we have to save the colormap? */
if (fb_display[info->currcon].cmap.len) {
fb_get_cmap(&fb_display[info->currcon].cmap, 1, Cyber_getcolreg,
info);
}
do_fb_set_var(&fb_display[con].var, 1);
info->currcon = con;
/* Install new colormap */
do_install_cmap(con, info);
DPRINTK("EXIT\n");
return(0);
}
/*
* Update the `var' structure (called by fbcon.c)
*
* This call looks only at yoffset and the FB_VMODE_YWRAP flag in `var'.
* Since it's called by a kernel driver, no range checking is done.
*/
static int Cyberfb_updatevar(int con, struct fb_info *info)
{
DPRINTK("Enter - Exit\n");
return(0);
}
/*
* Get a Video Mode
*/
static int __init get_video_mode(const char *name)
{
int i;
DPRINTK("ENTER\n");
for (i = 0; i < NUM_TOTAL_MODES; i++) {
if (!strcmp(name, cyberfb_predefined[i].name)) {
cyberfb_default = cyberfb_predefined[i].var;
cyberfb_usermode = 1;
DPRINTK("EXIT - Matched predefined mode\n");
return(i);
}
}
return(0);
}
/*
* Text console acceleration
*/
#ifdef FBCON_HAS_CFB8
static void fbcon_cyber8_bmove(struct display *p, int sy, int sx, int dy,
int dx, int height, int width)
{
DPRINTK("ENTER\n");
sx *= 8; dx *= 8; width *= 8;
Cyber_BitBLT((u_short)sx, (u_short)(sy*fontheight(p)), (u_short)dx,
(u_short)(dy*fontheight(p)), (u_short)width,
(u_short)(height*fontheight(p)), (u_short)S3_NEW);
DPRINTK("EXIT\n");
}
static void fbcon_cyber8_clear(struct vc_data *conp, struct display *p, int sy,
int sx, int height, int width)
{
unsigned char bg;
DPRINTK("ENTER\n");
sx *= 8; width *= 8;
bg = attr_bgcol_ec(p,conp);
Cyber_RectFill((u_short)sx,
(u_short)(sy*fontheight(p)),
(u_short)width,
(u_short)(height*fontheight(p)),
(u_short)S3_NEW,
(u_short)bg);
DPRINTK("EXIT\n");
}
static void fbcon_cyber8_putc(struct vc_data *conp, struct display *p, int c,
int yy, int xx)
{
DPRINTK("ENTER\n");
Cyber_WaitBlit();
fbcon_cfb8_putc(conp, p, c, yy, xx);
DPRINTK("EXIT\n");
}
static void fbcon_cyber8_putcs(struct vc_data *conp, struct display *p,
const unsigned short *s, int count,
int yy, int xx)
{
DPRINTK("ENTER\n");
Cyber_WaitBlit();
fbcon_cfb8_putcs(conp, p, s, count, yy, xx);
DPRINTK("EXIT\n");
}
static void fbcon_cyber8_revc(struct display *p, int xx, int yy)
{
DPRINTK("ENTER\n");
Cyber_WaitBlit();
fbcon_cfb8_revc(p, xx, yy);
DPRINTK("EXIT\n");
}
static struct display_switch fbcon_cyber8 = {
.setup = fbcon_cfb8_setup,
.bmove = fbcon_cyber8_bmove,
.clear = fbcon_cyber8_clear,
.putc = fbcon_cyber8_putc,
.putcs = fbcon_cyber8_putcs,
.revc = fbcon_cyber8_revc,
.clear_margins =fbcon_cfb8_clear_margins,
.fontwidthmask =FONTWIDTH(8)
};
#endif
#ifdef MODULE
MODULE_LICENSE("GPL");
int init_module(void)
{
return cyberfb_init();
}
#endif /* MODULE */
/*
*
* Low level initialization routines for the CyberVision64 graphics card
*
* Most of the following code is from cvision_core.c
*
*/
#define MAXPIXELCLOCK 135000000 /* safety */
#ifdef CV_AGGRESSIVE_TIMING
long cv64_memclk = 55000000;
#else
long cv64_memclk = 50000000;
#endif
/*********************/
static unsigned char clocks[]={
0x13, 0x61, 0x6b, 0x6d, 0x51, 0x69, 0x54, 0x69,
0x4f, 0x68, 0x6b, 0x6b, 0x18, 0x61, 0x7b, 0x6c,
0x51, 0x67, 0x24, 0x62, 0x56, 0x67, 0x77, 0x6a,
0x1d, 0x61, 0x53, 0x66, 0x6b, 0x68, 0x79, 0x69,
0x7c, 0x69, 0x7f, 0x69, 0x22, 0x61, 0x54, 0x65,
0x56, 0x65, 0x58, 0x65, 0x67, 0x66, 0x41, 0x63,
0x27, 0x61, 0x13, 0x41, 0x37, 0x62, 0x6b, 0x4d,
0x23, 0x43, 0x51, 0x49, 0x79, 0x66, 0x54, 0x49,
0x7d, 0x66, 0x34, 0x56, 0x4f, 0x63, 0x1f, 0x42,
0x6b, 0x4b, 0x7e, 0x4d, 0x18, 0x41, 0x2a, 0x43,
0x7b, 0x4c, 0x74, 0x4b, 0x51, 0x47, 0x65, 0x49,
0x24, 0x42, 0x68, 0x49, 0x56, 0x47, 0x75, 0x4a,
0x77, 0x4a, 0x31, 0x43, 0x1d, 0x41, 0x71, 0x49,
0x53, 0x46, 0x29, 0x42, 0x6b, 0x48, 0x1f, 0x41,
0x79, 0x49, 0x6f, 0x48, 0x7c, 0x49, 0x38, 0x43,
0x7f, 0x49, 0x5d, 0x46, 0x22, 0x41, 0x53, 0x45,
0x54, 0x45, 0x55, 0x45, 0x56, 0x45, 0x57, 0x45,
0x58, 0x45, 0x25, 0x41, 0x67, 0x46, 0x5b, 0x45,
0x41, 0x43, 0x78, 0x47, 0x27, 0x41, 0x51, 0x44,
0x13, 0x21, 0x7d, 0x47, 0x37, 0x42, 0x71, 0x46,
0x6b, 0x2d, 0x14, 0x21, 0x23, 0x23, 0x7d, 0x2f,
0x51, 0x29, 0x61, 0x2b, 0x79, 0x46, 0x1d, 0x22,
0x54, 0x29, 0x45, 0x27, 0x7d, 0x46, 0x7f, 0x46,
0x4f, 0x43, 0x2f, 0x41, 0x1f, 0x22, 0x6a, 0x2b,
0x6b, 0x2b, 0x5b, 0x29, 0x7e, 0x2d, 0x65, 0x44,
0x18, 0x21, 0x5e, 0x29, 0x2a, 0x23, 0x45, 0x26,
0x7b, 0x2c, 0x19, 0x21, 0x74, 0x2b, 0x75, 0x2b,
0x51, 0x27, 0x3f, 0x25, 0x65, 0x29, 0x40, 0x25,
0x24, 0x22, 0x41, 0x25, 0x68, 0x29, 0x42, 0x25,
0x56, 0x27, 0x7e, 0x2b, 0x75, 0x2a, 0x1c, 0x21,
0x77, 0x2a, 0x4f, 0x26, 0x31, 0x23, 0x6f, 0x29,
0x1d, 0x21, 0x32, 0x23, 0x71, 0x29, 0x72, 0x29,
0x53, 0x26, 0x69, 0x28, 0x29, 0x22, 0x75, 0x29,
0x6b, 0x28, 0x1f, 0x21, 0x1f, 0x21, 0x6d, 0x28,
0x79, 0x29, 0x2b, 0x22, 0x6f, 0x28, 0x59, 0x26,
0x7c, 0x29, 0x7d, 0x29, 0x38, 0x23, 0x21, 0x21,
0x7f, 0x29, 0x39, 0x23, 0x5d, 0x26, 0x75, 0x28,
0x22, 0x21, 0x77, 0x28, 0x53, 0x25, 0x6c, 0x27,
0x54, 0x25, 0x61, 0x26, 0x55, 0x25, 0x30, 0x22,
0x56, 0x25, 0x63, 0x26, 0x57, 0x25, 0x71, 0x27,
0x58, 0x25, 0x7f, 0x28, 0x25, 0x21, 0x74, 0x27,
0x67, 0x26, 0x40, 0x23, 0x5b, 0x25, 0x26, 0x21,
0x41, 0x23, 0x34, 0x22, 0x78, 0x27, 0x6b, 0x26,
0x27, 0x21, 0x35, 0x22, 0x51, 0x24, 0x7b, 0x27,
0x13, 0x1, 0x13, 0x1, 0x7d, 0x27, 0x4c, 0x9,
0x37, 0x22, 0x5b, 0xb, 0x71, 0x26, 0x5c, 0xb,
0x6b, 0xd, 0x47, 0x23, 0x14, 0x1, 0x4f, 0x9,
0x23, 0x3, 0x75, 0x26, 0x7d, 0xf, 0x1c, 0x2,
0x51, 0x9, 0x59, 0x24, 0x61, 0xb, 0x69, 0x25,
0x79, 0x26, 0x34, 0x5, 0x1d, 0x2, 0x6b, 0x25,
0x54, 0x9, 0x35, 0x5, 0x45, 0x7, 0x6d, 0x25,
0x7d, 0x26, 0x16, 0x1, 0x7f, 0x26, 0x77, 0xd,
0x4f, 0x23, 0x78, 0xd, 0x2f, 0x21, 0x27, 0x3,
0x1f, 0x2, 0x59, 0x9, 0x6a, 0xb, 0x73, 0x25,
0x6b, 0xb, 0x63, 0x24, 0x5b, 0x9, 0x20, 0x2,
0x7e, 0xd, 0x4b, 0x7, 0x65, 0x24, 0x43, 0x22,
0x18, 0x1, 0x6f, 0xb, 0x5e, 0x9, 0x70, 0xb,
0x2a, 0x3, 0x33, 0x4, 0x45, 0x6, 0x60, 0x9,
0x7b, 0xc, 0x19, 0x1, 0x19, 0x1, 0x7d, 0xc,
0x74, 0xb, 0x50, 0x7, 0x75, 0xb, 0x63, 0x9,
0x51, 0x7, 0x23, 0x2, 0x3f, 0x5, 0x1a, 0x1,
0x65, 0x9, 0x2d, 0x3, 0x40, 0x5, 0x0, 0x0,
};
/* Console colors */
unsigned char cvconscolors[16][3] = { /* background, foreground, hilite */
/* R G B */
{0x30, 0x30, 0x30},
{0x00, 0x00, 0x00},
{0x80, 0x00, 0x00},
{0x00, 0x80, 0x00},
{0x00, 0x00, 0x80},
{0x80, 0x80, 0x00},
{0x00, 0x80, 0x80},
{0x80, 0x00, 0x80},
{0xff, 0xff, 0xff},
{0x40, 0x40, 0x40},
{0xff, 0x00, 0x00},
{0x00, 0xff, 0x00},
{0x00, 0x00, 0xff},
{0xff, 0xff, 0x00},
{0x00, 0xff, 0xff},
{0x00, 0x00, 0xff}
};
/* -------------------- Hardware specific routines ------------------------- */
/* Read Attribute Controller Register=idx */
inline unsigned char RAttr (volatile unsigned char *regs, short idx)
{
wb_64 (regs, ACT_ADDRESS_W, idx);
mb();
udelay(100);
return (rb_64(regs, ACT_ADDRESS_R));
}
/* Read Sequencer Register=idx */
inline unsigned char RSeq (volatile unsigned char *regs, short idx)
{
wb_64 (regs, SEQ_ADDRESS, idx);
mb();
return (rb_64(regs, SEQ_ADDRESS_R));
}
/* Read CRT Controller Register=idx */
inline unsigned char RCrt (volatile unsigned char *regs, short idx)
{
wb_64 (regs, CRT_ADDRESS, idx);
mb();
return (rb_64(regs, CRT_ADDRESS_R));
}
/* Read Graphics Controller Register=idx */
inline unsigned char RGfx (volatile unsigned char *regs, short idx)
{
wb_64 (regs, GCT_ADDRESS, idx);
mb();
return (rb_64(regs, GCT_ADDRESS_R));
}
/*
* Special wakeup/passthrough registers on graphics boards
*/
inline void cv64_write_port (unsigned short bits,
volatile unsigned char *base)
{
volatile unsigned char *addr;
static unsigned char cvportbits = 0; /* Mirror port bits here */
DPRINTK("ENTER\n");
addr = base + 0x40001;
if (bits & 0x8000) {
cvportbits |= bits & 0xff; /* Set bits */
DPRINTK("Set bits: %04x\n", bits);
} else {
bits = bits & 0xff;
bits = (~bits) & 0xff;
cvportbits &= bits; /* Clear bits */
DPRINTK("Clear bits: %04x\n", bits);
}
*addr = cvportbits;
DPRINTK("EXIT\n");
}
/*
* Monitor switch on CyberVision board
*
* toggle:
* 0 = CyberVision Signal
* 1 = Amiga Signal
* board = board addr
*
*/
inline void cvscreen (int toggle, volatile unsigned char *board)
{
DPRINTK("ENTER\n");
if (toggle == 1) {
DPRINTK("Show Amiga video\n");
cv64_write_port (0x10, board);
} else {
DPRINTK("Show CyberVision video\n");
cv64_write_port (0x8010, board);
}
DPRINTK("EXIT\n");
}
/* Control screen display */
/* toggle: 0 = on, 1 = off */
/* board = registerbase */
inline void gfx_on_off(int toggle, volatile unsigned char *regs)
{
int r;
DPRINTK("ENTER\n");
toggle &= 0x1;
toggle = toggle << 5;
DPRINTK("Turn display %s\n", (toggle ? "off" : "on"));
r = (int) RSeq(regs, SEQ_ID_CLOCKING_MODE);
r &= 0xdf; /* Set bit 5 to 0 */
WSeq (regs, SEQ_ID_CLOCKING_MODE, r | toggle);
DPRINTK("EXIT\n");
}
/*
* Computes M, N, and R values from
* given input frequency. It uses a table of
* precomputed values, to keep CPU time low.
*
* The return value consist of:
* lower byte: Bits 4-0: N Divider Value
* Bits 5-6: R Value for e.g. SR10 or SR12
* higher byte: Bits 0-6: M divider value for e.g. SR11 or SR13
*/
static unsigned short cv64_compute_clock(unsigned long freq)
{
static unsigned char *mnr, *save; /* M, N + R vals */
unsigned long work_freq, r;
unsigned short erg;
long diff, d2;
DPRINTK("ENTER\n");
if (freq < 12500000 || freq > MAXPIXELCLOCK) {
printk("CV64 driver: Illegal clock frequency %ld, using 25MHz\n",
freq);
freq = 25000000;
}
DPRINTK("Freq = %ld\n", freq);
mnr = clocks; /* there the vals are stored */
d2 = 0x7fffffff;
while (*mnr) { /* mnr vals are 0-terminated */
work_freq = (0x37EE * (mnr[0] + 2)) / ((mnr[1] & 0x1F) + 2);
r = (mnr[1] >> 5) & 0x03;
if (r != 0) {
work_freq = work_freq >> r; /* r is the freq divider */
}
work_freq *= 0x3E8; /* 2nd part of OSC */
diff = abs(freq - work_freq);
if (d2 >= diff) {
d2 = diff;
/* In save are the vals for minimal diff */
save = mnr;
}
mnr += 2;
}
erg = *((unsigned short *)save);
DPRINTK("EXIT\n");
return (erg);
}
static int cv_has_4mb (volatile unsigned char *fb)
{
volatile unsigned long *tr, *tw;
DPRINTK("ENTER\n");
/* write patterns in memory and test if they can be read */
tw = (volatile unsigned long *) fb;
tr = (volatile unsigned long *) (fb + 0x02000000);
*tw = 0x87654321;
if (*tr != 0x87654321) {
DPRINTK("EXIT - <4MB\n");
return (0);
}
/* upper memory region */
tw = (volatile unsigned long *) (fb + 0x00200000);
tr = (volatile unsigned long *) (fb + 0x02200000);
*tw = 0x87654321;
if (*tr != 0x87654321) {
DPRINTK("EXIT - <4MB\n");
return (0);
}
*tw = 0xAAAAAAAA;
if (*tr != 0xAAAAAAAA) {
DPRINTK("EXIT - <4MB\n");
return (0);
}
*tw = 0x55555555;
if (*tr != 0x55555555) {
DPRINTK("EXIT - <4MB\n");
return (0);
}
DPRINTK("EXIT\n");
return (1);
}
static void cv64_board_init (void)
{
volatile unsigned char *regs = CyberRegs;
int i;
unsigned int clockpar;
unsigned char test;
DPRINTK("ENTER\n");
/*
* Special CyberVision 64 board operations
*/
/* Reset board */
for (i = 0; i < 6; i++) {
cv64_write_port (0xff, CyberBase);
}
/* Return to operational mode */
cv64_write_port (0x8004, CyberBase);
/*
* Generic (?) S3 chip wakeup
*/
/* Disable I/O & memory decoders, video in setup mode */
wb_64 (regs, SREG_VIDEO_SUBS_ENABLE, 0x10);
/* Video responds to cmds, addrs & data */
wb_64 (regs, SREG_OPTION_SELECT, 0x1);
/* Enable I/O & memory decoders, video in operational mode */
wb_64 (regs, SREG_VIDEO_SUBS_ENABLE, 0x8);
/* VGA color emulation, enable cpu access to display mem */
wb_64 (regs, GREG_MISC_OUTPUT_W, 0x03);
/* Unlock S3 VGA regs */
WCrt (regs, CRT_ID_REGISTER_LOCK_1, 0x48);
/* Unlock system control & extension registers */
WCrt (regs, CRT_ID_REGISTER_LOCK_2, 0xA5);
/* GRF - Enable interrupts */
/* Enable enhanced regs access, Ready cntl 0 wait states */
test = RCrt (regs, CRT_ID_SYSTEM_CONFIG);
test = test | 0x01; /* enable enhanced register access */
test = test & 0xEF; /* clear bit 4, 0 wait state */
WCrt (regs, CRT_ID_SYSTEM_CONFIG, test);
/*
* bit 0=1: Enable enhaced mode functions
* bit 2=0: Enhanced mode 8+ bits/pixel
* bit 4=1: Enable linear addressing
* bit 5=1: Enable MMIO
*/
wb_64 (regs, ECR_ADV_FUNC_CNTL, 0x31);
/*
* bit 0=1: Color emulation
* bit 1=1: Enable CPU access to display memory
* bit 5=1: Select high 64K memory page
*/
/* GRF - 0xE3 */
wb_64 (regs, GREG_MISC_OUTPUT_W, 0x23);
/* Cpu base addr */
WCrt (regs, CRT_ID_EXT_SYS_CNTL_4, 0x0);
/* Reset. This does nothing on Trio, but standard VGA practice */
/* WSeq (CyberRegs, SEQ_ID_RESET, 0x03); */
/* Character clocks 8 dots wide */
WSeq (regs, SEQ_ID_CLOCKING_MODE, 0x01);
/* Enable cpu write to all color planes */
WSeq (regs, SEQ_ID_MAP_MASK, 0x0F);
/* Font table in 1st 8k of plane 2, font A=B disables swtich */
WSeq (regs, SEQ_ID_CHAR_MAP_SELECT, 0x0);
/* Allow mem access to 256kb */
WSeq (regs, SEQ_ID_MEMORY_MODE, 0x2);
/* Unlock S3 extensions to VGA Sequencer regs */
WSeq (regs, SEQ_ID_UNLOCK_EXT, 0x6);
/* Enable 4MB fast page mode */
test = RSeq (regs, SEQ_ID_BUS_REQ_CNTL);
test = test | 1 << 6;
WSeq (regs, SEQ_ID_BUS_REQ_CNTL, test);
/* Faster LUT write: 1 DCLK LUT write cycle, RAMDAC clk doubled */
WSeq (regs, SEQ_ID_RAMDAC_CNTL, 0xC0);
/* Clear immediate clock load bit */
test = RSeq (regs, SEQ_ID_CLKSYN_CNTL_2);
test = test & 0xDF;
/* If > 55MHz, enable 2 cycle memory write */
if (cv64_memclk >= 55000000) {
test |= 0x80;
}
WSeq (regs, SEQ_ID_CLKSYN_CNTL_2, test);
/* Set MCLK value */
clockpar = cv64_compute_clock (cv64_memclk);
test = (clockpar & 0xFF00) >> 8;
WSeq (regs, SEQ_ID_MCLK_HI, test);
test = clockpar & 0xFF;
WSeq (regs, SEQ_ID_MCLK_LO, test);
/* Chip rev specific: Not in my Trio manual!!! */
if (RCrt (regs, CRT_ID_REVISION) == 0x10)
WSeq (regs, SEQ_ID_MORE_MAGIC, test);
/* We now load an 25 MHz, 31kHz, 640x480 standard VGA Mode. */
/* Set DCLK value */
WSeq (regs, SEQ_ID_DCLK_HI, 0x13);
WSeq (regs, SEQ_ID_DCLK_LO, 0x41);
/* Load DCLK (and MCLK?) immediately */
test = RSeq (regs, SEQ_ID_CLKSYN_CNTL_2);
test = test | 0x22;
WSeq (regs, SEQ_ID_CLKSYN_CNTL_2, test);
/* Enable loading of DCLK */
test = rb_64(regs, GREG_MISC_OUTPUT_R);
test = test | 0x0C;
wb_64 (regs, GREG_MISC_OUTPUT_W, test);
/* Turn off immediate xCLK load */
WSeq (regs, SEQ_ID_CLKSYN_CNTL_2, 0x2);
/* Horizontal character clock counts */
/* 8 LSB of 9 bits = total line - 5 */
WCrt (regs, CRT_ID_HOR_TOTAL, 0x5F);
/* Active display line */
WCrt (regs, CRT_ID_HOR_DISP_ENA_END, 0x4F);
/* Blank assertion start */
WCrt (regs, CRT_ID_START_HOR_BLANK, 0x50);
/* Blank assertion end */
WCrt (regs, CRT_ID_END_HOR_BLANK, 0x82);
/* HSYNC assertion start */
WCrt (regs, CRT_ID_START_HOR_RETR, 0x54);
/* HSYNC assertion end */
WCrt (regs, CRT_ID_END_HOR_RETR, 0x80);
WCrt (regs, CRT_ID_VER_TOTAL, 0xBF);
WCrt (regs, CRT_ID_OVERFLOW, 0x1F);
WCrt (regs, CRT_ID_PRESET_ROW_SCAN, 0x0);
WCrt (regs, CRT_ID_MAX_SCAN_LINE, 0x40);
WCrt (regs, CRT_ID_CURSOR_START, 0x00);
WCrt (regs, CRT_ID_CURSOR_END, 0x00);
WCrt (regs, CRT_ID_START_ADDR_HIGH, 0x00);
WCrt (regs, CRT_ID_START_ADDR_LOW, 0x00);
WCrt (regs, CRT_ID_CURSOR_LOC_HIGH, 0x00);
WCrt (regs, CRT_ID_CURSOR_LOC_LOW, 0x00);
WCrt (regs, CRT_ID_START_VER_RETR, 0x9C);
WCrt (regs, CRT_ID_END_VER_RETR, 0x0E);
WCrt (regs, CRT_ID_VER_DISP_ENA_END, 0x8F);
WCrt (regs, CRT_ID_SCREEN_OFFSET, 0x50);
WCrt (regs, CRT_ID_UNDERLINE_LOC, 0x00);
WCrt (regs, CRT_ID_START_VER_BLANK, 0x96);
WCrt (regs, CRT_ID_END_VER_BLANK, 0xB9);
WCrt (regs, CRT_ID_MODE_CONTROL, 0xE3);
WCrt (regs, CRT_ID_LINE_COMPARE, 0xFF);
WCrt (regs, CRT_ID_BACKWAD_COMP_3, 0x10); /* FIFO enabled */
WCrt (regs, CRT_ID_MISC_1, 0x35);
WCrt (regs, CRT_ID_DISPLAY_FIFO, 0x5A);
WCrt (regs, CRT_ID_EXT_MEM_CNTL_2, 0x70);
WCrt (regs, CRT_ID_LAW_POS_LO, 0x40);
WCrt (regs, CRT_ID_EXT_MEM_CNTL_3, 0xFF);
WGfx (regs, GCT_ID_SET_RESET, 0x0);
WGfx (regs, GCT_ID_ENABLE_SET_RESET, 0x0);
WGfx (regs, GCT_ID_COLOR_COMPARE, 0x0);
WGfx (regs, GCT_ID_DATA_ROTATE, 0x0);
WGfx (regs, GCT_ID_READ_MAP_SELECT, 0x0);
WGfx (regs, GCT_ID_GRAPHICS_MODE, 0x40);
WGfx (regs, GCT_ID_MISC, 0x01);
WGfx (regs, GCT_ID_COLOR_XCARE, 0x0F);
WGfx (regs, GCT_ID_BITMASK, 0xFF);
/* Colors for text mode */
for (i = 0; i < 0xf; i++)
WAttr (regs, i, i);
WAttr (regs, ACT_ID_ATTR_MODE_CNTL, 0x41);
WAttr (regs, ACT_ID_OVERSCAN_COLOR, 0x01);
WAttr (regs, ACT_ID_COLOR_PLANE_ENA, 0x0F);
WAttr (regs, ACT_ID_HOR_PEL_PANNING, 0x0);
WAttr (regs, ACT_ID_COLOR_SELECT, 0x0);
wb_64 (regs, VDAC_MASK, 0xFF);
*((unsigned long *) (regs + ECR_FRGD_COLOR)) = 0xFF;
*((unsigned long *) (regs + ECR_BKGD_COLOR)) = 0;
/* Colors initially set to grayscale */
wb_64 (regs, VDAC_ADDRESS_W, 0);
for (i = 255; i >= 0; i--) {
wb_64(regs, VDAC_DATA, i);
wb_64(regs, VDAC_DATA, i);
wb_64(regs, VDAC_DATA, i);
}
/* GFx hardware cursor off */
WCrt (regs, CRT_ID_HWGC_MODE, 0x00);
/* Set first to 4MB, so test will work */
WCrt (regs, CRT_ID_LAW_CNTL, 0x13);
/* Find "correct" size of fbmem of Z3 board */
if (cv_has_4mb (CyberMem)) {
CyberSize = 1024 * 1024 * 4;
WCrt (regs, CRT_ID_LAW_CNTL, 0x13);
DPRINTK("4MB board\n");
} else {
CyberSize = 1024 * 1024 * 2;
WCrt (regs, CRT_ID_LAW_CNTL, 0x12);
DPRINTK("2MB board\n");
}
/* Initialize graphics engine */
Cyber_WaitBlit();
vgaw16 (regs, ECR_FRGD_MIX, 0x27);
vgaw16 (regs, ECR_BKGD_MIX, 0x07);
vgaw16 (regs, ECR_READ_REG_DATA, 0x1000);
udelay(200);
vgaw16 (regs, ECR_READ_REG_DATA, 0x2000);
Cyber_WaitBlit();
vgaw16 (regs, ECR_READ_REG_DATA, 0x3FFF);
Cyber_WaitBlit();
udelay(200);
vgaw16 (regs, ECR_READ_REG_DATA, 0x4FFF);
Cyber_WaitBlit();
vgaw16 (regs, ECR_BITPLANE_WRITE_MASK, ~0);
Cyber_WaitBlit();
vgaw16 (regs, ECR_READ_REG_DATA, 0xE000);
vgaw16 (regs, ECR_CURRENT_Y_POS2, 0x00);
vgaw16 (regs, ECR_CURRENT_X_POS2, 0x00);
vgaw16 (regs, ECR_READ_REG_DATA, 0xA000);
vgaw16 (regs, ECR_DEST_Y__AX_STEP, 0x00);
vgaw16 (regs, ECR_DEST_Y2__AX_STEP2, 0x00);
vgaw16 (regs, ECR_DEST_X__DIA_STEP, 0x00);
vgaw16 (regs, ECR_DEST_X2__DIA_STEP2, 0x00);
vgaw16 (regs, ECR_SHORT_STROKE, 0x00);
vgaw16 (regs, ECR_DRAW_CMD, 0x01);
Cyber_WaitBlit();
vgaw16 (regs, ECR_READ_REG_DATA, 0x4FFF);
vgaw16 (regs, ECR_BKGD_COLOR, 0x01);
vgaw16 (regs, ECR_FRGD_COLOR, 0x00);
/* Enable video display (set bit 5) */
/* ARB - Would also seem to write to AR13.
* May want to use parts of WAttr to set JUST bit 5
*/
WAttr (regs, 0x33, 0);
/* GRF - function code ended here */
/* Turn gfx on again */
gfx_on_off (0, regs);
/* Pass-through */
cvscreen (0, CyberBase);
DPRINTK("EXIT\n");
}
static void cv64_load_video_mode (struct fb_var_screeninfo *video_mode)
{
volatile unsigned char *regs = CyberRegs;
int fx, fy;
unsigned short mnr;
unsigned short HT, HDE, HBS, HBE, HSS, HSE, VDE, VBS, VBE, VSS, VSE, VT;
char LACE, DBLSCAN, TEXT, CONSOLE;
int cr50, sr15, sr18, clock_mode, test;
int m, n;
int tfillm, temptym;
int hmul;
/* ---------------- */
int xres, hfront, hsync, hback;
int yres, vfront, vsync, vback;
int bpp;
#if 0
float freq_f;
#endif
long freq;
/* ---------------- */
DPRINTK("ENTER\n");
TEXT = 0; /* if depth == 4 */
CONSOLE = 0; /* mode num == 255 (console) */
fx = fy = 8; /* force 8x8 font */
/* GRF - Disable interrupts */
gfx_on_off (1, regs);
switch (video_mode->bits_per_pixel) {
case 15:
case 16:
hmul = 2;
break;
default:
hmul = 1;
break;
}
bpp = video_mode->bits_per_pixel;
xres = video_mode->xres;
hfront = video_mode->right_margin;
hsync = video_mode->hsync_len;
hback = video_mode->left_margin;
LACE = 0;
DBLSCAN = 0;
if (video_mode->vmode & FB_VMODE_DOUBLE) {
yres = video_mode->yres * 2;
vfront = video_mode->lower_margin * 2;
vsync = video_mode->vsync_len * 2;
vback = video_mode->upper_margin * 2;
DBLSCAN = 1;
} else if (video_mode->vmode & FB_VMODE_INTERLACED) {
yres = (video_mode->yres + 1) / 2;
vfront = (video_mode->lower_margin + 1) / 2;
vsync = (video_mode->vsync_len + 1) / 2;
vback = (video_mode->upper_margin + 1) / 2;
LACE = 1;
} else {
yres = video_mode->yres;
vfront = video_mode->lower_margin;
vsync = video_mode->vsync_len;
vback = video_mode->upper_margin;
}
/* ARB Dropping custom setup method from cvision.c */
#if 0
if (cvision_custom_mode) {
HBS = hbs / 8 * hmul;
HBE = hbe / 8 * hmul;
HSS = hss / 8 * hmul;
HSE = hse / 8 * hmul;
HT = ht / 8 * hmul - 5;
VBS = vbs - 1;
VSS = vss;
VSE = vse;
VBE = vbe;
VT = vt - 2;
} else {
#else
{
#endif
HBS = hmul * (xres / 8);
HBE = hmul * ((xres/8) + (hfront/8) + (hsync/8) + (hback/8) - 2);
HSS = hmul * ((xres/8) + (hfront/8) + 2);
HSE = hmul * ((xres/8) + (hfront/8) + (hsync/8) + 1);
HT = hmul * ((xres/8) + (hfront/8) + (hsync/8) + (hback/8));
VBS = yres;
VBE = yres + vfront + vsync + vback - 2;
VSS = yres + vfront - 1;
VSE = yres + vfront + vsync - 1;
VT = yres + vfront + vsync + vback - 2;
}
wb_64 (regs, ECR_ADV_FUNC_CNTL, (TEXT ? 0x00 : 0x31));
if (TEXT)
HDE = ((video_mode->xres + fx - 1) / fx) - 1;
else
HDE = (video_mode->xres + 3) * hmul / 8 - 1;
VDE = video_mode->yres - 1;
WCrt (regs, CRT_ID_HWGC_MODE, 0x00);
WCrt (regs, CRT_ID_EXT_DAC_CNTL, 0x00);
WSeq (regs, SEQ_ID_MEMORY_MODE,
(TEXT || (video_mode->bits_per_pixel == 1)) ? 0x06 : 0x0e);
WGfx (regs, GCT_ID_READ_MAP_SELECT, 0x00);
WSeq (regs, SEQ_ID_MAP_MASK,
(video_mode->bits_per_pixel == 1) ? 0x01 : 0xFF);
WSeq (regs, SEQ_ID_CHAR_MAP_SELECT, 0x00);
/* cv64_compute_clock accepts arguments in Hz */
/* pixclock is in ps ... convert to Hz */
#if 0
freq_f = (1.0 / (float) video_mode->pixclock) * 1000000000;
freq = ((long) freq_f) * 1000;
#else
/* freq = (long) ((long long)1000000000000 / (long long) video_mode->pixclock);
*/
freq = (1000000000 / video_mode->pixclock) * 1000;
#endif
mnr = cv64_compute_clock (freq);
WSeq (regs, SEQ_ID_DCLK_HI, ((mnr & 0xFF00) >> 8));
WSeq (regs, SEQ_ID_DCLK_LO, (mnr & 0xFF));
/* Load display parameters into board */
WCrt (regs, CRT_ID_EXT_HOR_OVF,
((HT & 0x100) ? 0x01 : 0x00) |
((HDE & 0x100) ? 0x02 : 0x00) |
((HBS & 0x100) ? 0x04 : 0x00) |
/* ((HBE & 0x40) ? 0x08 : 0x00) | */
((HSS & 0x100) ? 0x10 : 0x00) |
/* ((HSE & 0x20) ? 0x20 : 0x00) | */
(((HT-5) & 0x100) ? 0x40 : 0x00)
);
WCrt (regs, CRT_ID_EXT_VER_OVF,
0x40 |
((VT & 0x400) ? 0x01 : 0x00) |
((VDE & 0x400) ? 0x02 : 0x00) |
((VBS & 0x400) ? 0x04 : 0x00) |
((VSS & 0x400) ? 0x10 : 0x00)
);
WCrt (regs, CRT_ID_HOR_TOTAL, HT);
WCrt (regs, CRT_ID_DISPLAY_FIFO, HT - 5);
WCrt (regs, CRT_ID_HOR_DISP_ENA_END, ((HDE >= HBS) ? (HBS - 1) : HDE));
WCrt (regs, CRT_ID_START_HOR_BLANK, HBS);
WCrt (regs, CRT_ID_END_HOR_BLANK, ((HBE & 0x1F) | 0x80));
WCrt (regs, CRT_ID_START_HOR_RETR, HSS);
WCrt (regs, CRT_ID_END_HOR_RETR,
(HSE & 0x1F) |
((HBE & 0x20) ? 0x80 : 0x00)
);
WCrt (regs, CRT_ID_VER_TOTAL, VT);
WCrt (regs, CRT_ID_OVERFLOW,
0x10 |
((VT & 0x100) ? 0x01 : 0x00) |
((VDE & 0x100) ? 0x02 : 0x00) |
((VSS & 0x100) ? 0x04 : 0x00) |
((VBS & 0x100) ? 0x08 : 0x00) |
((VT & 0x200) ? 0x20 : 0x00) |
((VDE & 0x200) ? 0x40 : 0x00) |
((VSS & 0x200) ? 0x80 : 0x00)
);
WCrt (regs, CRT_ID_MAX_SCAN_LINE,
0x40 |
(DBLSCAN ? 0x80 : 0x00) |
((VBS & 0x200) ? 0x20 : 0x00) |
(TEXT ? ((fy - 1) & 0x1F) : 0x00)
);
WCrt (regs, CRT_ID_MODE_CONTROL, 0xE3);
/* Text cursor */
if (TEXT) {
#if 1
WCrt (regs, CRT_ID_CURSOR_START, (fy & 0x1f) - 2);
WCrt (regs, CRT_ID_CURSOR_END, (fy & 0x1F) - 1);
#else
WCrt (regs, CRT_ID_CURSOR_START, 0x00);
WCrt (regs, CRT_ID_CURSOR_END, fy & 0x1F);
#endif
WCrt (regs, CRT_ID_UNDERLINE_LOC, (fy - 1) & 0x1F);
WCrt (regs, CRT_ID_CURSOR_LOC_HIGH, 0x00);
WCrt (regs, CRT_ID_CURSOR_LOC_LOW, 0x00);
}
WCrt (regs, CRT_ID_START_ADDR_HIGH, 0x00);
WCrt (regs, CRT_ID_START_ADDR_LOW, 0x00);
WCrt (regs, CRT_ID_START_VER_RETR, VSS);
WCrt (regs, CRT_ID_END_VER_RETR, (VSE & 0x0F));
WCrt (regs, CRT_ID_VER_DISP_ENA_END, VDE);
WCrt (regs, CRT_ID_START_VER_BLANK, VBS);
WCrt (regs, CRT_ID_END_VER_BLANK, VBE);
WCrt (regs, CRT_ID_LINE_COMPARE, 0xFF);
WCrt (regs, CRT_ID_LACE_RETR_START, HT / 2);
WCrt (regs, CRT_ID_LACE_CONTROL, (LACE ? 0x20 : 0x00));
WGfx (regs, GCT_ID_GRAPHICS_MODE,
((TEXT || (video_mode->bits_per_pixel == 1)) ? 0x00 : 0x40));
WGfx (regs, GCT_ID_MISC, (TEXT ? 0x04 : 0x01));
WSeq (regs, SEQ_ID_MEMORY_MODE,
((TEXT || (video_mode->bits_per_pixel == 1)) ? 0x06 : 0x02));
wb_64 (regs, VDAC_MASK, 0xFF);
/* Blank border */
test = RCrt (regs, CRT_ID_BACKWAD_COMP_2);
WCrt (regs, CRT_ID_BACKWAD_COMP_2, (test | 0x20));
sr15 = RSeq (regs, SEQ_ID_CLKSYN_CNTL_2);
sr15 &= 0xEF;
sr18 = RSeq (regs, SEQ_ID_RAMDAC_CNTL);
sr18 &= 0x7F;
clock_mode = 0x00;
cr50 = 0x00;
test = RCrt (regs, CRT_ID_EXT_MISC_CNTL_2);
test &= 0xD;
/* Clear roxxler byte-swapping... */
cv64_write_port (0x0040, CyberBase);
cv64_write_port (0x0020, CyberBase);
switch (video_mode->bits_per_pixel) {
case 1:
case 4: /* text */
HDE = video_mode->xres / 16;
break;
case 8:
if (freq > 80000000) {
clock_mode = 0x10 | 0x02;
sr15 |= 0x10;
sr18 |= 0x80;
}
HDE = video_mode->xres / 8;
cr50 |= 0x00;
break;
case 15:
cv64_write_port (0x8020, CyberBase);
clock_mode = 0x30;
HDE = video_mode->xres / 4;
cr50 |= 0x10;
break;
case 16:
cv64_write_port (0x8020, CyberBase);
clock_mode = 0x50;
HDE = video_mode->xres / 4;
cr50 |= 0x10;
break;
case 24:
case 32:
cv64_write_port (0x8040, CyberBase);
clock_mode = 0xD0;
HDE = video_mode->xres / 2;
cr50 |= 0x30;
break;
}
WCrt (regs, CRT_ID_EXT_MISC_CNTL_2, clock_mode | test);
WSeq (regs, SEQ_ID_CLKSYN_CNTL_2, sr15);
WSeq (regs, SEQ_ID_RAMDAC_CNTL, sr18);
WCrt (regs, CRT_ID_SCREEN_OFFSET, HDE);
WCrt (regs, CRT_ID_MISC_1, (TEXT ? 0x05 : 0x35));
test = RCrt (regs, CRT_ID_EXT_SYS_CNTL_2);
test &= ~0x30;
test |= (HDE >> 4) & 0x30;
WCrt (regs, CRT_ID_EXT_SYS_CNTL_2, test);
/* Set up graphics engine */
switch (video_mode->xres) {
case 1024:
cr50 |= 0x00;
break;
case 640:
cr50 |= 0x40;
break;
case 800:
cr50 |= 0x80;
break;
case 1280:
cr50 |= 0xC0;
break;
case 1152:
cr50 |= 0x01;
break;
case 1600:
cr50 |= 0x81;
break;
default: /* XXX */
break;
}
WCrt (regs, CRT_ID_EXT_SYS_CNTL_1, cr50);
udelay(100);
WAttr (regs, ACT_ID_ATTR_MODE_CNTL, (TEXT ? 0x08 : 0x41));
udelay(100);
WAttr (regs, ACT_ID_COLOR_PLANE_ENA,
(video_mode->bits_per_pixel == 1) ? 0x01 : 0x0F);
udelay(100);
tfillm = (96 * (cv64_memclk / 1000)) / 240000;
switch (video_mode->bits_per_pixel) {
case 32:
case 24:
temptym = (24 * (cv64_memclk / 1000)) / (freq / 1000);
break;
case 15:
case 16:
temptym = (48 * (cv64_memclk / 1000)) / (freq / 1000);
break;
case 4:
temptym = (192 * (cv64_memclk / 1000)) / (freq / 1000);
break;
default:
temptym = (96 * (cv64_memclk / 1000)) / (freq / 1000);
break;
}
m = (temptym - tfillm - 9) / 2;
if (m < 0)
m = 0;
m = (m & 0x1F) << 3;
if (m < 0x18)
m = 0x18;
n = 0xFF;
WCrt (regs, CRT_ID_EXT_MEM_CNTL_2, m);
WCrt (regs, CRT_ID_EXT_MEM_CNTL_3, n);
udelay(10);
/* Text initialization */
if (TEXT) {
/* Do text initialization here ! */
}
if (CONSOLE) {
int i;
wb_64 (regs, VDAC_ADDRESS_W, 0);
for (i = 0; i < 4; i++) {
wb_64 (regs, VDAC_DATA, cvconscolors [i][0]);
wb_64 (regs, VDAC_DATA, cvconscolors [i][1]);
wb_64 (regs, VDAC_DATA, cvconscolors [i][2]);
}
}
WAttr (regs, 0x33, 0);
/* Turn gfx on again */
gfx_on_off (0, (volatile unsigned char *) regs);
/* Pass-through */
cvscreen (0, CyberBase);
DPRINTK("EXIT\n");
}
void cvision_bitblt (u_short sx, u_short sy, u_short dx, u_short dy,
u_short w, u_short h)
{
volatile unsigned char *regs = CyberRegs;
unsigned short drawdir = 0;
DPRINTK("ENTER\n");
if (sx > dx) {
drawdir |= 1 << 5;
} else {
sx += w - 1;
dx += w - 1;
}
if (sy > dy) {
drawdir |= 1 << 7;
} else {
sy += h - 1;
dy += h - 1;
}
Cyber_WaitBlit();
vgaw16 (regs, ECR_READ_REG_DATA, 0xA000);
vgaw16 (regs, ECR_BKGD_MIX, 0x7);
vgaw16 (regs, ECR_FRGD_MIX, 0x67);
vgaw16 (regs, ECR_BKGD_COLOR, 0x0);
vgaw16 (regs, ECR_FRGD_COLOR, 0x1);
vgaw16 (regs, ECR_BITPLANE_READ_MASK, 0x1);
vgaw16 (regs, ECR_BITPLANE_WRITE_MASK, 0xFFF);
vgaw16 (regs, ECR_CURRENT_Y_POS, sy);
vgaw16 (regs, ECR_CURRENT_X_POS, sx);
vgaw16 (regs, ECR_DEST_Y__AX_STEP, dy);
vgaw16 (regs, ECR_DEST_X__DIA_STEP, dx);
vgaw16 (regs, ECR_READ_REG_DATA, h - 1);
vgaw16 (regs, ECR_MAJ_AXIS_PIX_CNT, w - 1);
vgaw16 (regs, ECR_DRAW_CMD, 0xC051 | drawdir);
DPRINTK("EXIT\n");
}
void cvision_clear (u_short dx, u_short dy, u_short w, u_short h, u_short bg)
{
volatile unsigned char *regs = CyberRegs;
DPRINTK("ENTER\n");
Cyber_WaitBlit();
vgaw16 (regs, ECR_FRGD_MIX, 0x0027);
vgaw16 (regs, ECR_FRGD_COLOR, bg);
vgaw16 (regs, ECR_READ_REG_DATA, 0xA000);
vgaw16 (regs, ECR_CURRENT_Y_POS, dy);
vgaw16 (regs, ECR_CURRENT_X_POS, dx);
vgaw16 (regs, ECR_READ_REG_DATA, h - 1);
vgaw16 (regs, ECR_MAJ_AXIS_PIX_CNT, w - 1);
vgaw16 (regs, ECR_DRAW_CMD, 0x40B1);
DPRINTK("EXIT\n");
}
#ifdef CYBERFBDEBUG
/*
* Dump internal settings of CyberVision board
*/
static void cv64_dump (void)
{
volatile unsigned char *regs = CyberRegs;
DPRINTK("ENTER\n");
/* Dump the VGA setup values */
*(regs + S3_CRTC_ADR) = 0x00;
DPRINTK("CR00 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x01;
DPRINTK("CR01 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x02;
DPRINTK("CR02 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x03;
DPRINTK("CR03 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x04;
DPRINTK("CR04 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x05;
DPRINTK("CR05 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x06;
DPRINTK("CR06 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x07;
DPRINTK("CR07 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x08;
DPRINTK("CR08 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x09;
DPRINTK("CR09 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x10;
DPRINTK("CR10 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x11;
DPRINTK("CR11 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x12;
DPRINTK("CR12 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x13;
DPRINTK("CR13 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x15;
DPRINTK("CR15 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x16;
DPRINTK("CR16 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x36;
DPRINTK("CR36 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x37;
DPRINTK("CR37 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x42;
DPRINTK("CR42 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x43;
DPRINTK("CR43 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x50;
DPRINTK("CR50 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x51;
DPRINTK("CR51 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x53;
DPRINTK("CR53 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x58;
DPRINTK("CR58 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x59;
DPRINTK("CR59 = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x5A;
DPRINTK("CR5A = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x5D;
DPRINTK("CR5D = %x\n", *(regs + S3_CRTC_DATA));
*(regs + S3_CRTC_ADR) = 0x5E;
DPRINTK("CR5E = %x\n", *(regs + S3_CRTC_DATA));
DPRINTK("MISC = %x\n", *(regs + GREG_MISC_OUTPUT_R));
*(regs + SEQ_ADDRESS) = 0x01;
DPRINTK("SR01 = %x\n", *(regs + SEQ_ADDRESS_R));
*(regs + SEQ_ADDRESS) = 0x02;
DPRINTK("SR02 = %x\n", *(regs + SEQ_ADDRESS_R));
*(regs + SEQ_ADDRESS) = 0x03;
DPRINTK("SR03 = %x\n", *(regs + SEQ_ADDRESS_R));
*(regs + SEQ_ADDRESS) = 0x09;
DPRINTK("SR09 = %x\n", *(regs + SEQ_ADDRESS_R));
*(regs + SEQ_ADDRESS) = 0x10;
DPRINTK("SR10 = %x\n", *(regs + SEQ_ADDRESS_R));
*(regs + SEQ_ADDRESS) = 0x11;
DPRINTK("SR11 = %x\n", *(regs + SEQ_ADDRESS_R));
*(regs + SEQ_ADDRESS) = 0x12;
DPRINTK("SR12 = %x\n", *(regs + SEQ_ADDRESS_R));
*(regs + SEQ_ADDRESS) = 0x13;
DPRINTK("SR13 = %x\n", *(regs + SEQ_ADDRESS_R));
*(regs + SEQ_ADDRESS) = 0x15;
DPRINTK("SR15 = %x\n", *(regs + SEQ_ADDRESS_R));
return;
}
#endif
