patch-pre2.0.7 linux/arch/m68k/amiga/cyberfb.c
Next file: linux/arch/m68k/amiga/ksyms.c
Previous file: linux/arch/m68k/amiga/config.c
Back to the patch index
Back to the overall index
- Lines: 1235
- Date:
Mon May 20 07:54:25 1996
- Orig file:
pre2.0.6/linux/arch/m68k/amiga/cyberfb.c
- Orig date:
Thu Jan 1 02:00:00 1970
diff -u --recursive --new-file pre2.0.6/linux/arch/m68k/amiga/cyberfb.c linux/arch/m68k/amiga/cyberfb.c
@@ -0,0 +1,1234 @@
+/*
+ * linux/arch/m68k/amiga/cyberfb.c -- Low level implementation of the
+ * Cybervision frame buffer device
+ *
+ * Copyright (C) 1996 Martin Apel
+ * Geert Uytterhoeven
+ *
+ *
+ * This file 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
+ *
+ *
+ * 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/kernel.h>
+#include <linux/errno.h>
+#include <linux/string.h>
+#include <linux/mm.h>
+#include <linux/tty.h>
+#include <linux/malloc.h>
+#include <linux/delay.h>
+#include <linux/config.h>
+#include <asm/segment.h>
+#include <asm/system.h>
+#include <asm/irq.h>
+#include <asm/bootinfo.h>
+#include <asm/zorro.h>
+#include <asm/pgtable.h>
+#include <linux/fb.h>
+#include "s3blit.h"
+
+
+#define arraysize(x) (sizeof(x)/sizeof(*(x)))
+
+struct Cyber_fb_par {
+ int xres;
+ int yres;
+ int bpp;
+};
+
+static struct Cyber_fb_par current_par;
+
+static int current_par_valid = 0;
+static int currcon = 0;
+
+static struct display disp[MAX_NR_CONSOLES];
+static struct fb_info fb_info;
+
+static int node; /* node of the /dev/fb?current file */
+
+
+ /*
+ * Switch for Chipset Independency
+ */
+
+static struct fb_hwswitch {
+
+ /* Initialisation */
+
+ int (*init)(void);
+
+ /* Display Control */
+
+ int (*encode_fix)(struct fb_fix_screeninfo *fix, struct Cyber_fb_par *par);
+ int (*decode_var)(struct fb_var_screeninfo *var, struct Cyber_fb_par *par);
+ int (*encode_var)(struct fb_var_screeninfo *var, struct Cyber_fb_par *par);
+ int (*getcolreg)(u_int regno, u_int *red, u_int *green, u_int *blue,
+ u_int *transp);
+ int (*setcolreg)(u_int regno, u_int red, u_int green, u_int blue,
+ u_int transp);
+ void (*blank)(int blank);
+} *fbhw;
+
+
+ /*
+ * Frame Buffer Name
+ */
+
+static char Cyber_fb_name[16] = "Cybervision";
+
+
+ /*
+ * Cybervision Graphics Board
+ */
+
+#define CYBER8_WIDTH 1152
+#define CYBER8_HEIGHT 886
+#define CYBER8_PIXCLOCK 12500 /* ++Geert: Just a guess */
+
+#define CYBER16_WIDTH 800
+#define CYBER16_HEIGHT 600
+#define CYBER16_PIXCLOCK 25000 /* ++Geert: Just a guess */
+
+
+static int CyberKey = 0;
+static u_char Cyber_colour_table [256][4];
+static unsigned long CyberMem;
+static unsigned long CyberSize;
+static volatile char *CyberRegs;
+
+static long *memstart;
+
+
+ /*
+ * Predefined Video Mode Names
+ */
+
+static char *Cyber_fb_modenames[] = {
+
+ /*
+ * Autodetect (Default) Video Mode
+ */
+
+ "default",
+
+ /*
+ * Predefined Video Modes
+ */
+
+ "cyber8", /* Cybervision 8 bpp */
+ "cyber16", /* Cybervision 16 bpp */
+
+ /*
+ * Dummy Video Modes
+ */
+
+ "dummy", "dummy", "dummy", "dummy", "dummy", "dummy", "dummy", "dummy",
+ "dummy", "dummy", "dummy", "dummy", "dummy", "dummy", "dummy", "dummy",
+ "dummy", "dummy", "dummy", "dummy",
+
+ /*
+ * User Defined Video Modes
+ *
+ * This doesn't work yet!!
+ */
+
+ "user0", "user1", "user2", "user3", "user4", "user5", "user6", "user7"
+};
+
+
+ /*
+ * Predefined Video Mode Definitions
+ */
+
+static struct fb_var_screeninfo Cyber_fb_predefined[] = {
+
+ /*
+ * Autodetect (Default) Video Mode
+ */
+
+ { 0, },
+
+ /*
+ * Predefined Video Modes
+ */
+
+ {
+ /* Cybervision 8 bpp */
+ CYBER8_WIDTH, CYBER8_HEIGHT, CYBER8_WIDTH, CYBER8_HEIGHT, 0, 0, 8, 0,
+ {0, 8, 0}, {0, 8, 0}, {0, 8, 0}, {0, 0, 0},
+ 0, 0, -1, -1, FB_ACCEL_NONE, CYBER8_PIXCLOCK, 64, 96, 35, 12, 112, 2,
+ FB_SYNC_COMP_HIGH_ACT|FB_SYNC_VERT_HIGH_ACT, FB_VMODE_NONINTERLACED
+ }, {
+ /* Cybervision 16 bpp */
+ CYBER16_WIDTH, CYBER16_HEIGHT, CYBER16_WIDTH, CYBER16_HEIGHT, 0, 0, 16, 0,
+ {11, 5, 0}, {5, 6, 0}, {0, 5, 0}, {0, 0, 0},
+ 0, 0, -1, -1, FB_ACCEL_NONE, CYBER16_PIXCLOCK, 64, 96, 35, 12, 112, 2,
+ FB_SYNC_COMP_HIGH_ACT|FB_SYNC_VERT_HIGH_ACT, FB_VMODE_NONINTERLACED
+ },
+
+ /*
+ * Dummy Video Modes
+ */
+
+ { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, },
+ { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, },
+ { 0, }, { 0, },
+
+ /*
+ * User Defined Video Modes
+ */
+
+ { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, }, { 0, }
+};
+
+
+#define NUM_TOTAL_MODES arraysize(Cyber_fb_predefined)
+#define NUM_PREDEF_MODES (3)
+
+
+static int Cyberfb_inverse = 0;
+static int Cyberfb_Cyber8 = 0; /* Use Cybervision board */
+static int Cyberfb_Cyber16 = 0; /* Use Cybervision board */
+static int Cyberfb_mode = 0;
+
+
+ /*
+ * Some default modes
+ */
+
+#define CYBER8_DEFMODE (1)
+#define CYBER16_DEFMODE (2)
+
+
+ /*
+ * Interface used by the world
+ */
+
+int Cyber_probe(void);
+void Cyber_video_setup(char *options, int *ints);
+
+static int Cyber_fb_get_fix(struct fb_fix_screeninfo *fix, int con);
+static int Cyber_fb_get_var(struct fb_var_screeninfo *var, int con);
+static int Cyber_fb_set_var(struct fb_var_screeninfo *var, int con);
+static int Cyber_fb_get_cmap(struct fb_cmap *cmap, int kspc, int con);
+static int Cyber_fb_set_cmap(struct fb_cmap *cmap, int kspc, int con);
+static int Cyber_fb_pan_display(struct fb_var_screeninfo *var, int con);
+static int Cyber_fb_ioctl(struct inode *inode, struct file *file, u_int cmd,
+ u_long arg, int con);
+
+
+ /*
+ * Interface to the low level console driver
+ */
+
+struct fb_info *Cyber_fb_init(long *mem_start); /* Through amiga_fb_init() */
+static int Cyberfb_switch(int con);
+static int Cyberfb_updatevar(int con);
+static void Cyberfb_blank(int blank);
+
+
+ /*
+ * Accelerated Functions used by the low level console driver
+ */
+
+void Cyber_WaitQueue(u_short fifo);
+void Cyber_WaitBlit(void);
+void Cyber_BitBLT(u_short curx, u_short cury, u_short destx, u_short desty,
+ u_short width, u_short height, u_short mode);
+void Cyber_RectFill(u_short x, u_short y, u_short width, u_short height,
+ u_short mode, u_short color);
+void Cyber_MoveCursor(u_short x, u_short y);
+
+
+ /*
+ * Hardware Specific Routines
+ */
+
+static int Cyber_init(void);
+static int Cyber_encode_fix(struct fb_fix_screeninfo *fix,
+ struct Cyber_fb_par *par);
+static int Cyber_decode_var(struct fb_var_screeninfo *var,
+ struct Cyber_fb_par *par);
+static int Cyber_encode_var(struct fb_var_screeninfo *var,
+ struct Cyber_fb_par *par);
+static int Cyber_getcolreg(u_int regno, u_int *red, u_int *green, u_int *blue,
+ u_int *transp);
+static int Cyber_setcolreg(u_int regno, u_int red, u_int green, u_int blue,
+ u_int transp);
+static void Cyber_blank(int blank);
+
+
+ /*
+ * Internal routines
+ */
+
+static void Cyber_fb_get_par(struct Cyber_fb_par *par);
+static void Cyber_fb_set_par(struct Cyber_fb_par *par);
+static int do_fb_set_var(struct fb_var_screeninfo *var, int isactive);
+static struct fb_cmap *get_default_colormap(int bpp);
+static int do_fb_get_cmap(struct fb_cmap *cmap, struct fb_var_screeninfo *var,
+ int kspc);
+static int do_fb_set_cmap(struct fb_cmap *cmap, struct fb_var_screeninfo *var,
+ int kspc);
+static void do_install_cmap(int con);
+static void memcpy_fs(int fsfromto, void *to, void *from, int len);
+static void copy_cmap(struct fb_cmap *from, struct fb_cmap *to, int fsfromto);
+static int alloc_cmap(struct fb_cmap *cmap, int len, int transp);
+static void Cyber_fb_set_disp(int con);
+static int get_video_mode(const char *name);
+
+
+/* -------------------- 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)
+{
+int i;
+char size;
+volatile u_long *CursorBase;
+unsigned long board_addr;
+struct ConfigDev *cd;
+
+if (Cyberfb_mode == -1)
+ {
+ if (Cyberfb_Cyber8)
+ Cyberfb_mode = CYBER8_DEFMODE;
+ else
+ Cyberfb_mode = CYBER16_DEFMODE;
+ }
+
+cd = zorro_get_board (CyberKey);
+zorro_config_board (CyberKey, 0);
+board_addr = (unsigned long)cd->cd_BoardAddr;
+
+for (i = 0; i < 256; i++)
+
+for (i = 0; i < 256; i++)
+ {
+ Cyber_colour_table [i][0] = i;
+ Cyber_colour_table [i][1] = i;
+ Cyber_colour_table [i][2] = i;
+ Cyber_colour_table [i][3] = 0;
+ }
+
+*memstart = (*memstart + PAGE_SIZE - 1) & ~(PAGE_SIZE - 1);
+CyberMem = kernel_map (board_addr + 0x01400000, 0x00400000,
+ KERNELMAP_NOCACHE_SER, memstart);
+
+if (Cyberfb_Cyber8)
+ memset ((char*)CyberMem, 0, CYBER8_WIDTH * CYBER8_HEIGHT);
+else
+ memset ((char*)CyberMem, 0, CYBER16_WIDTH * CYBER16_HEIGHT);
+
+CyberRegs = (char*) kernel_map (board_addr + 0x02000000, 0xf000,
+ KERNELMAP_NOCACHE_SER, memstart);
+
+/* Disable hardware cursor */
+*(CyberRegs + S3_CRTC_ADR) = S3_REG_LOCK2;
+*(CyberRegs + S3_CRTC_DATA) = 0xa0;
+*(CyberRegs + S3_CRTC_ADR) = S3_HGC_MODE;
+*(CyberRegs + S3_CRTC_DATA) = 0x00;
+*(CyberRegs + S3_CRTC_ADR) = S3_HWGC_DX;
+*(CyberRegs + S3_CRTC_DATA) = 0x00;
+*(CyberRegs + S3_CRTC_ADR) = S3_HWGC_DY;
+*(CyberRegs + S3_CRTC_DATA) = 0x00;
+
+/* Set clipping rectangle to current screen size */
+*((u_short volatile *)(CyberRegs + 0xbee8)) = 0x1000;
+*((u_short volatile *)(CyberRegs + 0xbee8)) = 0x2000;
+if (Cyberfb_Cyber8)
+ {
+ *((u_short volatile *)(CyberRegs + 0xbee8)) = 0x3000 | (CYBER8_HEIGHT - 1);
+ *((u_short volatile *)(CyberRegs + 0xbee8)) = 0x4000 | (CYBER8_WIDTH - 1);
+ }
+else
+ {
+ *((u_short volatile *)(CyberRegs + 0xbee8)) = 0x3000 | (CYBER16_HEIGHT - 1);
+ *((u_short volatile *)(CyberRegs + 0xbee8)) = 0x4000 | (CYBER16_WIDTH - 1);
+ }
+
+/* Get memory size (if not 2MB it is 4MB) */
+*(CyberRegs + S3_CRTC_ADR) = S3_LAW_CTL;
+size = *(CyberRegs + S3_CRTC_DATA);
+if ((size & 0x03) == 0x02)
+ CyberSize = 0x00200000; /* 2 MB */
+else
+ CyberSize = 0x00400000; /* 4 MB */
+
+/* Initialize hardware cursor */
+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, 100, 160, 0);
+Cyber_setcolreg (254, 0, 0, 0, 0);
+
+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 Cyber_fb_par *par)
+{
+ int i;
+
+ strcpy(fix->id, Cyber_fb_name);
+ fix->smem_start = CyberMem;
+ fix->smem_len = CyberSize;
+
+ fix->type = FB_TYPE_PACKED_PIXELS;
+ fix->type_aux = 0;
+ if (par->bpp == 8)
+ fix->visual = FB_VISUAL_PSEUDOCOLOR;
+ else
+ fix->visual = FB_VISUAL_DIRECTCOLOR;
+
+ fix->xpanstep = 0;
+ fix->ypanstep = 0;
+ fix->ywrapstep = 0;
+
+ for (i = 0; i < arraysize(fix->reserved); i++)
+ fix->reserved[i] = 0;
+
+ return(0);
+}
+
+
+ /*
+ * Get the video params out of `var'. If a value doesn't fit, round
+ * it up, if it's too big, return -EINVAL.
+ */
+
+static int Cyber_decode_var(struct fb_var_screeninfo *var,
+ struct Cyber_fb_par *par)
+{
+ if (Cyberfb_Cyber8) {
+ par->xres = CYBER8_WIDTH;
+ par->yres = CYBER8_HEIGHT;
+ par->bpp = 8;
+ } else {
+ par->xres = CYBER16_WIDTH;
+ par->yres = CYBER16_HEIGHT;
+ par->bpp = 16;
+ }
+ 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 Cyber_fb_par *par)
+{
+ int i;
+
+ var->xres = par->xres;
+ var->yres = par->yres;
+ var->xres_virtual = par->xres;
+ var->yres_virtual = par->yres;
+ var->xoffset = 0;
+ var->yoffset = 0;
+
+ var->bits_per_pixel = par->bpp;
+ var->grayscale = 0;
+
+ if (par->bpp == 8) {
+ var->red.offset = 0;
+ var->red.length = 8;
+ var->red.msb_right = 0;
+ var->blue = var->green = var->red;
+ } else {
+ var->red.offset = 11;
+ var->red.length = 5;
+ var->red.msb_right = 0;
+ var->green.offset = 5;
+ var->green.length = 6;
+ var->green.msb_right = 0;
+ var->blue.offset = 0;
+ var->blue.length = 5;
+ var->blue.msb_right = 0;
+ }
+ var->transp.offset = 0;
+ var->transp.length = 0;
+ var->transp.msb_right = 0;
+
+ var->nonstd = 0;
+ var->activate = 0;
+
+ var->height = -1;
+ var->width = -1;
+ var->accel = FB_ACCEL_CYBERVISION;
+ var->vmode = FB_VMODE_NONINTERLACED;
+
+ /* Dummy values */
+
+ if (par->bpp == 8)
+ var->pixclock = CYBER8_PIXCLOCK;
+ else
+ var->pixclock = CYBER16_PIXCLOCK;
+ var->sync = 0;
+ var->left_margin = 64;
+ var->right_margin = 96;
+ var->upper_margin = 35;
+ var->lower_margin = 12;
+ var->hsync_len = 112;
+ var->vsync_len = 2;
+
+ for (i = 0; i < arraysize(var->reserved); i++)
+ var->reserved[i] = 0;
+
+ return(0);
+}
+
+
+ /*
+ * Set a single color register. The values supplied are already
+ * rounded down to the hardware's capabilities (according to the
+ * entries in the var structure). Return != 0 for invalid regno.
+ */
+
+static int Cyber_setcolreg(u_int regno, u_int red, u_int green, u_int blue,
+ u_int transp)
+{
+if (regno > 255)
+ return (1);
+
+*(CyberRegs + 0x3c8) = (char)regno;
+Cyber_colour_table [regno][0] = red & 0xff;
+Cyber_colour_table [regno][1] = green & 0xff;
+Cyber_colour_table [regno][2] = blue & 0xff;
+Cyber_colour_table [regno][3] = transp;
+
+*(CyberRegs + 0x3c9) = (red & 0xff) >> 2;
+*(CyberRegs + 0x3c9) = (green & 0xff) >> 2;
+*(CyberRegs + 0x3c9) = (blue & 0xff) >> 2;
+
+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)
+{
+if (regno >= 256)
+ return (1);
+*red = Cyber_colour_table [regno][0];
+*green = Cyber_colour_table [regno][1];
+*blue = Cyber_colour_table [regno][2];
+*transp = Cyber_colour_table [regno][3];
+return (0);
+}
+
+
+ /*
+ * (Unb)Blank the screen
+ */
+
+void Cyber_blank(int blank)
+{
+int i;
+
+if (blank)
+ for (i = 0; i < 256; i++)
+ {
+ *(CyberRegs + 0x3c8) = i;
+ *(CyberRegs + 0x3c9) = 0;
+ *(CyberRegs + 0x3c9) = 0;
+ *(CyberRegs + 0x3c9) = 0;
+ }
+else
+ for (i = 0; i < 256; i++)
+ {
+ *(CyberRegs + 0x3c8) = i;
+ *(CyberRegs + 0x3c9) = Cyber_colour_table [i][0] >> 2;
+ *(CyberRegs + 0x3c9) = Cyber_colour_table [i][1] >> 2;
+ *(CyberRegs + 0x3c9) = Cyber_colour_table [i][2] >> 2;
+ }
+}
+
+
+/**************************************************************
+ * We are waiting for "fifo" FIFO-slots empty
+ */
+void Cyber_WaitQueue (u_short fifo)
+{
+u_short status;
+
+do
+ {
+ status = *((u_short volatile *)(CyberRegs + S3_GP_STAT));
+ }
+while (status & fifo);
+}
+
+/**************************************************************
+ * We are waiting for Hardware (Graphics Engine) not busy
+ */
+void Cyber_WaitBlit (void)
+{
+u_short status;
+
+do
+ {
+ status = *((u_short volatile *)(CyberRegs + S3_GP_STAT));
+ }
+while (status & S3_HDW_BUSY);
+}
+
+/**************************************************************
+ * BitBLT - Through the Plane
+ */
+void Cyber_BitBLT (u_short curx, u_short cury, u_short destx, u_short desty,
+ u_short width, u_short height, u_short mode)
+{
+u_short blitcmd = S3_BITBLT;
+
+/* 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 *)(CyberRegs + S3_PIXEL_CNTL)) = 0xa000;
+*((u_short volatile *)(CyberRegs + S3_FRGD_MIX)) = (0x0060 | mode);
+
+*((u_short volatile *)(CyberRegs + S3_CUR_X)) = curx;
+*((u_short volatile *)(CyberRegs + S3_CUR_Y)) = cury;
+
+*((u_short volatile *)(CyberRegs + S3_DESTX_DIASTP)) = destx;
+*((u_short volatile *)(CyberRegs + S3_DESTY_AXSTP)) = desty;
+
+*((u_short volatile *)(CyberRegs + S3_MIN_AXIS_PCNT)) = height - 1;
+*((u_short volatile *)(CyberRegs + S3_MAJ_AXIS_PCNT)) = width - 1;
+
+*((u_short volatile *)(CyberRegs + S3_CMD)) = blitcmd;
+}
+
+/**************************************************************
+ * Rectange Fill Solid
+ */
+void Cyber_RectFill (u_short x, u_short y, u_short width, u_short height,
+ u_short mode, u_short color)
+{
+u_short blitcmd = S3_FILLEDRECT;
+
+Cyber_WaitQueue (0x8000);
+
+*((u_short volatile *)(CyberRegs + S3_PIXEL_CNTL)) = 0xa000;
+*((u_short volatile *)(CyberRegs + S3_FRGD_MIX)) = (0x0020 | mode);
+
+*((u_short volatile *)(CyberRegs + S3_MULT_MISC)) = 0xe000;
+*((u_short volatile *)(CyberRegs + S3_FRGD_COLOR)) = color;
+
+*((u_short volatile *)(CyberRegs + S3_CUR_X)) = x;
+*((u_short volatile *)(CyberRegs + S3_CUR_Y)) = y;
+
+*((u_short volatile *)(CyberRegs + S3_MIN_AXIS_PCNT)) = height - 1;
+*((u_short volatile *)(CyberRegs + S3_MAJ_AXIS_PCNT)) = width - 1;
+
+*((u_short volatile *)(CyberRegs + S3_CMD)) = blitcmd;
+}
+
+
+/**************************************************************
+ * Move cursor to x, y
+ */
+void Cyber_MoveCursor (u_short x, u_short y)
+{
+*(CyberRegs + S3_CRTC_ADR) = 0x39;
+*(CyberRegs + S3_CRTC_DATA) = 0xa0;
+
+*(CyberRegs + S3_CRTC_ADR) = S3_HWGC_ORGX_H;
+*(CyberRegs + S3_CRTC_DATA) = (char)((x & 0x0700) >> 8);
+*(CyberRegs + S3_CRTC_ADR) = S3_HWGC_ORGX_L;
+*(CyberRegs + S3_CRTC_DATA) = (char)(x & 0x00ff);
+
+*(CyberRegs + S3_CRTC_ADR) = S3_HWGC_ORGY_H;
+*(CyberRegs + S3_CRTC_DATA) = (char)((y & 0x0700) >> 8);
+*(CyberRegs + S3_CRTC_ADR) = S3_HWGC_ORGY_L;
+*(CyberRegs + S3_CRTC_DATA) = (char)(y & 0x00ff);
+}
+
+
+/* -------------------- Interfaces to hardware functions -------------------- */
+
+
+static struct fb_hwswitch Cyber_switch = {
+ Cyber_init, Cyber_encode_fix, Cyber_decode_var, Cyber_encode_var,
+ Cyber_getcolreg, Cyber_setcolreg, Cyber_blank
+};
+
+
+/* -------------------- Generic routines ------------------------------------ */
+
+
+ /*
+ * Fill the hardware's `par' structure.
+ */
+
+static void Cyber_fb_get_par(struct Cyber_fb_par *par)
+{
+ if (current_par_valid)
+ *par = current_par;
+ else
+ fbhw->decode_var(&Cyber_fb_predefined[Cyberfb_mode], par);
+}
+
+
+static void Cyber_fb_set_par(struct Cyber_fb_par *par)
+{
+ current_par = *par;
+ current_par_valid = 1;
+}
+
+
+static int do_fb_set_var(struct fb_var_screeninfo *var, int isactive)
+{
+ int err, activate;
+ struct Cyber_fb_par par;
+
+ if ((err = fbhw->decode_var(var, &par)))
+ return(err);
+ activate = var->activate;
+ if ((var->activate & FB_ACTIVATE_MASK) == FB_ACTIVATE_NOW && isactive)
+ Cyber_fb_set_par(&par);
+ fbhw->encode_var(var, &par);
+ var->activate = activate;
+ return(0);
+}
+
+
+ /*
+ * Default Colormaps
+ */
+
+static u_short red16[] =
+ { 0xc000, 0x0000, 0x0000, 0x0000, 0xc000, 0xc000, 0xc000, 0x0000,
+ 0x8000, 0x0000, 0x0000, 0x0000, 0xffff, 0xffff, 0xffff, 0xffff};
+static u_short green16[] =
+ { 0xc000, 0x0000, 0xc000, 0xc000, 0x0000, 0x0000, 0xc000, 0x0000,
+ 0x8000, 0x0000, 0xffff, 0xffff, 0x0000, 0x0000, 0xffff, 0xffff};
+static u_short blue16[] =
+ { 0xc000, 0x0000, 0x0000, 0xc000, 0x0000, 0xc000, 0x0000, 0x0000,
+ 0x8000, 0xffff, 0x0000, 0xffff, 0x0000, 0xffff, 0x0000, 0xffff};
+
+
+static struct fb_cmap default_16_colors =
+ { 0, 16, red16, green16, blue16, NULL };
+
+
+static struct fb_cmap *get_default_colormap(int bpp)
+{
+ return(&default_16_colors);
+}
+
+
+#define CNVT_TOHW(val,width) ((((val)<<(width))+0x7fff-(val))>>16)
+#define CNVT_FROMHW(val,width) (((width) ? ((((val)<<16)-(val)) / \
+ ((1<<(width))-1)) : 0))
+
+static int do_fb_get_cmap(struct fb_cmap *cmap, struct fb_var_screeninfo *var,
+ int kspc)
+{
+ int i, start;
+ u_short *red, *green, *blue, *transp;
+ u_int hred, hgreen, hblue, htransp;
+
+ red = cmap->red;
+ green = cmap->green;
+ blue = cmap->blue;
+ transp = cmap->transp;
+ start = cmap->start;
+ if (start < 0)
+ return(-EINVAL);
+ for (i = 0; i < cmap->len; i++) {
+ if (fbhw->getcolreg(start++, &hred, &hgreen, &hblue, &htransp))
+ return(0);
+ hred = CNVT_FROMHW(hred, var->red.length);
+ hgreen = CNVT_FROMHW(hgreen, var->green.length);
+ hblue = CNVT_FROMHW(hblue, var->blue.length);
+ htransp = CNVT_FROMHW(htransp, var->transp.length);
+ if (kspc) {
+ *red = hred;
+ *green = hgreen;
+ *blue = hblue;
+ if (transp)
+ *transp = htransp;
+ } else {
+ put_fs_word(hred, red);
+ put_fs_word(hgreen, green);
+ put_fs_word(hblue, blue);
+ if (transp)
+ put_fs_word(htransp, transp);
+ }
+ red++;
+ green++;
+ blue++;
+ if (transp)
+ transp++;
+ }
+ return(0);
+}
+
+
+static int do_fb_set_cmap(struct fb_cmap *cmap, struct fb_var_screeninfo *var,
+ int kspc)
+{
+ int i, start;
+ u_short *red, *green, *blue, *transp;
+ u_int hred, hgreen, hblue, htransp;
+
+ red = cmap->red;
+ green = cmap->green;
+ blue = cmap->blue;
+ transp = cmap->transp;
+ start = cmap->start;
+
+ if (start < 0)
+ return(-EINVAL);
+ for (i = 0; i < cmap->len; i++) {
+ if (kspc) {
+ hred = *red;
+ hgreen = *green;
+ hblue = *blue;
+ htransp = transp ? *transp : 0;
+ } else {
+ hred = get_fs_word(red);
+ hgreen = get_fs_word(green);
+ hblue = get_fs_word(blue);
+ htransp = transp ? get_fs_word(transp) : 0;
+ }
+ hred = CNVT_TOHW(hred, var->red.length);
+ hgreen = CNVT_TOHW(hgreen, var->green.length);
+ hblue = CNVT_TOHW(hblue, var->blue.length);
+ htransp = CNVT_TOHW(htransp, var->transp.length);
+ red++;
+ green++;
+ blue++;
+ if (transp)
+ transp++;
+ if (fbhw->setcolreg(start++, hred, hgreen, hblue, htransp))
+ return(0);
+ }
+ return(0);
+}
+
+
+static void do_install_cmap(int con)
+{
+ if (con != currcon)
+ return;
+ if (disp[con].cmap.len)
+ do_fb_set_cmap(&disp[con].cmap, &disp[con].var, 1);
+ else
+ do_fb_set_cmap(get_default_colormap(disp[con].var.bits_per_pixel),
+ &disp[con].var, 1);
+}
+
+
+static void memcpy_fs(int fsfromto, void *to, void *from, int len)
+{
+ switch (fsfromto) {
+ case 0:
+ memcpy(to, from, len);
+ return;
+ case 1:
+ memcpy_fromfs(to, from, len);
+ return;
+ case 2:
+ memcpy_tofs(to, from, len);
+ return;
+ }
+}
+
+
+static void copy_cmap(struct fb_cmap *from, struct fb_cmap *to, int fsfromto)
+{
+ int size;
+ int tooff = 0, fromoff = 0;
+
+ if (to->start > from->start)
+ fromoff = to->start-from->start;
+ else
+ tooff = from->start-to->start;
+ size = to->len-tooff;
+ if (size > from->len-fromoff)
+ size = from->len-fromoff;
+ if (size < 0)
+ return;
+ size *= sizeof(u_short);
+ memcpy_fs(fsfromto, to->red+tooff, from->red+fromoff, size);
+ memcpy_fs(fsfromto, to->green+tooff, from->green+fromoff, size);
+ memcpy_fs(fsfromto, to->blue+tooff, from->blue+fromoff, size);
+ if (from->transp && to->transp)
+ memcpy_fs(fsfromto, to->transp+tooff, from->transp+fromoff, size);
+}
+
+
+static int alloc_cmap(struct fb_cmap *cmap, int len, int transp)
+{
+ int size = len*sizeof(u_short);
+
+ if (cmap->len != len) {
+ if (cmap->red)
+ kfree(cmap->red);
+ if (cmap->green)
+ kfree(cmap->green);
+ if (cmap->blue)
+ kfree(cmap->blue);
+ if (cmap->transp)
+ kfree(cmap->transp);
+ cmap->red = cmap->green = cmap->blue = cmap->transp = NULL;
+ cmap->len = 0;
+ if (!len)
+ return(0);
+ if (!(cmap->red = kmalloc(size, GFP_ATOMIC)))
+ return(-1);
+ if (!(cmap->green = kmalloc(size, GFP_ATOMIC)))
+ return(-1);
+ if (!(cmap->blue = kmalloc(size, GFP_ATOMIC)))
+ return(-1);
+ if (transp) {
+ if (!(cmap->transp = kmalloc(size, GFP_ATOMIC)))
+ return(-1);
+ } else
+ cmap->transp = NULL;
+ }
+ cmap->start = 0;
+ cmap->len = len;
+ copy_cmap(get_default_colormap(len), cmap, 0);
+ return(0);
+}
+
+
+ /*
+ * Get the Fixed Part of the Display
+ */
+
+static int Cyber_fb_get_fix(struct fb_fix_screeninfo *fix, int con)
+{
+ struct Cyber_fb_par par;
+ int error = 0;
+
+ if (con == -1)
+ Cyber_fb_get_par(&par);
+ else
+ error = fbhw->decode_var(&disp[con].var, &par);
+ return(error ? error : fbhw->encode_fix(fix, &par));
+}
+
+
+ /*
+ * Get the User Defined Part of the Display
+ */
+
+static int Cyber_fb_get_var(struct fb_var_screeninfo *var, int con)
+{
+ struct Cyber_fb_par par;
+ int error = 0;
+
+ if (con == -1) {
+ Cyber_fb_get_par(&par);
+ error = fbhw->encode_var(var, &par);
+ } else
+ *var = disp[con].var;
+ return(error);
+}
+
+
+static void Cyber_fb_set_disp(int con)
+{
+ struct fb_fix_screeninfo fix;
+
+ Cyber_fb_get_fix(&fix, con);
+ if (con == -1)
+ con = 0;
+ disp[con].screen_base = (u_char *)fix.smem_start;
+ disp[con].visual = fix.visual;
+ disp[con].type = fix.type;
+ disp[con].type_aux = fix.type_aux;
+ disp[con].ypanstep = fix.ypanstep;
+ disp[con].ywrapstep = fix.ywrapstep;
+ disp[con].can_soft_blank = 1;
+ disp[con].inverse = Cyberfb_inverse;
+}
+
+
+ /*
+ * Set the User Defined Part of the Display
+ */
+
+static int Cyber_fb_set_var(struct fb_var_screeninfo *var, int con)
+{
+ int err, oldxres, oldyres, oldvxres, oldvyres, oldbpp;
+
+ if ((err = do_fb_set_var(var, con == currcon)))
+ return(err);
+ if ((var->activate & FB_ACTIVATE_MASK) == FB_ACTIVATE_NOW) {
+ oldxres = disp[con].var.xres;
+ oldyres = disp[con].var.yres;
+ oldvxres = disp[con].var.xres_virtual;
+ oldvyres = disp[con].var.yres_virtual;
+ oldbpp = disp[con].var.bits_per_pixel;
+ disp[con].var = *var;
+ if (oldxres != var->xres || oldyres != var->yres ||
+ oldvxres != var->xres_virtual || oldvyres != var->yres_virtual ||
+ oldbpp != var->bits_per_pixel) {
+ Cyber_fb_set_disp(con);
+ (*fb_info.changevar)(con);
+ alloc_cmap(&disp[con].cmap, 0, 0);
+ do_install_cmap(con);
+ }
+ }
+ var->activate = 0;
+ return(0);
+}
+
+
+ /*
+ * Get the Colormap
+ */
+
+static int Cyber_fb_get_cmap(struct fb_cmap *cmap, int kspc, int con)
+{
+ if (con == currcon) /* current console? */
+ return(do_fb_get_cmap(cmap, &disp[con].var, kspc));
+ else if (disp[con].cmap.len) /* non default colormap? */
+ copy_cmap(&disp[con].cmap, cmap, kspc ? 0 : 2);
+ else
+ copy_cmap(get_default_colormap(disp[con].var.bits_per_pixel), cmap,
+ kspc ? 0 : 2);
+ return(0);
+}
+
+
+ /*
+ * Set the Colormap
+ */
+
+static int Cyber_fb_set_cmap(struct fb_cmap *cmap, int kspc, int con)
+{
+ int err;
+
+ if (!disp[con].cmap.len) { /* no colormap allocated? */
+ if ((err = alloc_cmap(&disp[con].cmap, 1<<disp[con].var.bits_per_pixel,
+ 0)))
+ return(err);
+ }
+ if (con == currcon) /* current console? */
+ return(do_fb_set_cmap(cmap, &disp[con].var, kspc));
+ else
+ copy_cmap(cmap, &disp[con].cmap, kspc ? 0 : 1);
+ return(0);
+}
+
+
+ /*
+ * Pan or Wrap the Display
+ *
+ * This call looks only at xoffset, yoffset and the FB_VMODE_YWRAP flag
+ */
+
+static int Cyber_fb_pan_display(struct fb_var_screeninfo *var, int con)
+{
+ return(-EINVAL);
+}
+
+
+ /*
+ * Cybervision Frame Buffer Specific ioctls
+ */
+
+static int Cyber_fb_ioctl(struct inode *inode, struct file *file,
+ u_int cmd, u_long arg, int con)
+{
+ return(-EINVAL);
+}
+
+
+static struct fb_ops Cyber_fb_ops = {
+ Cyber_fb_get_fix, Cyber_fb_get_var, Cyber_fb_set_var, Cyber_fb_get_cmap,
+ Cyber_fb_set_cmap, Cyber_fb_pan_display, Cyber_fb_ioctl
+};
+
+
+int Cyber_probe(void)
+{
+ CyberKey = zorro_find(MANUF_PHASE5, PROD_CYBERVISION, 0, 0);
+ return(CyberKey);
+}
+
+
+void Cyber_video_setup(char *options, int *ints)
+{
+ char *this_opt;
+ int i;
+
+ fb_info.fontname[0] = '\0';
+
+ if (!options || !*options)
+ return;
+
+ for (this_opt = strtok(options, ","); this_opt; this_opt = strtok(NULL, ","))
+ if (!strcmp(this_opt, "inverse")) {
+ Cyberfb_inverse = 1;
+ for (i = 0; i < 16; i++) {
+ red16[i] = ~red16[i];
+ green16[i] = ~green16[i];
+ blue16[i] = ~blue16[i];
+ }
+ } else if (!strncmp(this_opt, "font:", 5))
+ strcpy(fb_info.fontname, this_opt+5);
+ else if (!strcmp (this_opt, "cyber8"))
+ Cyberfb_Cyber8 = 1;
+ else if (!strcmp (this_opt, "cyber16"))
+ Cyberfb_Cyber16 = 1;
+ else
+ Cyberfb_mode = get_video_mode(this_opt);
+}
+
+
+ /*
+ * Initialization
+ */
+
+struct fb_info *Cyber_fb_init(long *mem_start)
+{
+ int err;
+ struct Cyber_fb_par par;
+
+ memstart = mem_start;
+
+ fbhw = &Cyber_switch;
+
+ err = register_framebuffer(Cyber_fb_name, &node, &Cyber_fb_ops,
+ NUM_TOTAL_MODES, Cyber_fb_predefined);
+ if (err < 0)
+ panic("Cannot register frame buffer\n");
+
+ fbhw->init();
+ fbhw->decode_var(&Cyber_fb_predefined[Cyberfb_mode], &par);
+ fbhw->encode_var(&Cyber_fb_predefined[0], &par);
+
+ strcpy(fb_info.modename, Cyber_fb_name);
+ fb_info.disp = disp;
+ fb_info.switch_con = &Cyberfb_switch;
+ fb_info.updatevar = &Cyberfb_updatevar;
+ fb_info.blank = &Cyberfb_blank;
+
+ do_fb_set_var(&Cyber_fb_predefined[0], 1);
+ Cyber_fb_get_var(&disp[0].var, -1);
+ Cyber_fb_set_disp(-1);
+ do_install_cmap(0);
+ return(&fb_info);
+}
+
+
+static int Cyberfb_switch(int con)
+{
+ /* Do we have to save the colormap? */
+ if (disp[currcon].cmap.len)
+ do_fb_get_cmap(&disp[currcon].cmap, &disp[currcon].var, 1);
+
+ do_fb_set_var(&disp[con].var, 1);
+ currcon = con;
+ /* Install new colormap */
+ do_install_cmap(con);
+ 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)
+{
+ return(0);
+}
+
+
+ /*
+ * Blank the display.
+ */
+
+static void Cyberfb_blank(int blank)
+{
+ fbhw->blank(blank);
+}
+
+
+ /*
+ * Get a Video Mode
+ */
+
+static int get_video_mode(const char *name)
+{
+ int i;
+
+ for (i = 1; i < NUM_PREDEF_MODES; i++)
+ if (!strcmp(name, Cyber_fb_modenames[i]))
+ return(i);
+ return(0);
+}
FUNET's LINUX-ADM group, linux-adm@nic.funet.fi
TCL-scripts by Sam Shen, slshen@lbl.gov
with Sam's (original) version of this