!C99Shell v. 1.0 pre-release build #13!

Software: Apache/2.0.54 (Unix) mod_perl/1.99_09 Perl/v5.8.0 mod_ssl/2.0.54 OpenSSL/0.9.7l DAV/2 FrontPage/5.0.2.2635 PHP/4.4.0 mod_gzip/2.0.26.1a 

uname -a: Linux snow.he.net 4.4.276-v2-mono-1 #1 SMP Wed Jul 21 11:21:17 PDT 2021 i686 

uid=99(nobody) gid=98(nobody) groups=98(nobody) 

Safe-mode: OFF (not secure)

/usr/src/linux-2.4.18-xfs-1.1/drivers/video/   drwxr-xr-x
Free 318.38 GB of 458.09 GB (69.5%)
Home    Back    Forward    UPDIR    Refresh    Search    Buffer    Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    


Viewing file:     cyberfb.c (62.02 KB)      -rw-r--r--
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
/*
* 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/tty.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 int currcon = 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_set_cmap(struct fb_cmap *cmap, int kspc, int con,
                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);
static void Cyberfb_blank(int blank, 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);
static int Cyber_setcolreg(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 do_install_cmap(int con, struct fb_info *info);
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;
    }

    Cyber_setcolreg (255, 56<<8, 100<<8, 160<<8, 0, NULL /* unused */);
    Cyber_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 Cyber_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
*/

void 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");
}


/**************************************************************
 * 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;
}


static void do_install_cmap(int con, struct fb_info *info)
{
    DPRINTK("ENTER\n");
    if (con != currcon) {
        DPRINTK("EXIT - Not current console\n");
        return;
    }
    if (fb_display[con].cmap.len) {
        DPRINTK("Use console cmap\n");
        fb_set_cmap(&fb_display[con].cmap, 1, Cyber_setcolreg, info);
    } else {
        DPRINTK("Use default cmap\n");
        fb_set_cmap(fb_default_cmap(1<<fb_display[con].var.bits_per_pixel),
                1, Cyber_setcolreg, info);
    }
    DPRINTK("EXIT\n");
}

/*
 *    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->screen_base = (unsigned char *)CyberMem;
    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 == 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 == 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);
}


/*
 *    Set the Colormap
 */

static int cyberfb_set_cmap(struct fb_cmap *cmap, int kspc, int con,
                struct fb_info *info)
{
    int err;

    DPRINTK("ENTER\n");
    if (!fb_display[con].cmap.len) {       /* no colormap allocated? */
        if ((err = fb_alloc_cmap(&fb_display[con].cmap,
                     1<<fb_display[con].var.bits_per_pixel,
                     0))) {
            DPRINTK("EXIT - fb_alloc_cmap failed\n");
            return(err);
        }
    }
    if (con == currcon) {         /* current console? */
        DPRINTK("EXIT - Current console\n");
        return(fb_set_cmap(cmap, kspc, Cyber_setcolreg, info));
    } else {
        fb_copy_cmap(cmap, &fb_display[con].cmap, kspc ? 0 : 1);
    }
    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:    cyberfb_set_cmap,
};

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.node = -1;
        fb_info.fbops = &cyberfb_ops;
        fb_info.disp = &disp;
        fb_info.switch_con = &Cyberfb_switch;
        fb_info.updatevar = &Cyberfb_updatevar;
        fb_info.blank = &Cyberfb_blank;

        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");
            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",
           GET_FB_IDX(fb_info.node), fb_info.modename, CyberSize>>10);

        /* TODO: This driver cannot be unloaded yet */
        MOD_INC_USE_COUNT;
        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[currcon].cmap.len) {
        fb_get_cmap(&fb_display[currcon].cmap, 1, Cyber_getcolreg,
                info);
    }

    do_fb_set_var(&fb_display[con].var, 1);
    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();
}

void cleanup_module(void)
{
    /* Not reached because the usecount will never be
       decremented to zero */
    unregister_framebuffer(&fb_info);
    /* TODO: clean up ... */
}
#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

:: Command execute ::

Enter:
 
Select:
 

:: Search ::
  - regexp 

:: Upload ::
 
[ Read-Only ]

:: Make Dir ::
 
[ Read-Only ]
:: Make File ::
 
[ Read-Only ]

:: Go Dir ::
 
:: Go File ::
 

--[ c99shell v. 1.0 pre-release build #13 powered by Captain Crunch Security Team | http://ccteam.ru | Generation time: 0.0079 ]--