/* $NetBSD: ims332.c,v 1.16 2003/10/31 03:32:19 simonb Exp $ */ /*- * Copyright (c) 1992, 1993, 1995 * The Regents of the University of California. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * @(#)ims332.c 8.1 (Berkeley) 6/10/93 */ /* * Routines for the Inmos IMS-G332 Colour video controller * Author: Alessandro Forin, Carnegie Mellon University */ #include /* RCS ID & Copyright macro defns */ __KERNEL_RCSID(0, "$NetBSD: ims332.c,v 1.16 2003/10/31 03:32:19 simonb Exp $"); #include #include #include #include #include #include #define assert_ims332_reset_bit(r) *r &= ~0x40 #define deassert_ims332_reset_bit(r) *r |= 0x40 /* * local prototypes */ static u_int ims332_read_register (struct fbinfo *, int); static void ims332_write_register (struct fbinfo *, int, unsigned int); static __inline void ims332_cursor_off(struct fbinfo *fi); static __inline void ims332_cursor_on(struct fbinfo *fi); int ims332init(fi) struct fbinfo *fi; { int i; /* * Initialize the screen. (xcfb-specific) */ #ifdef notdef u_int *reset = (u_int *)fi -> fi_base; assert_ims332_reset_bit(reset); DELAY(1); /* specs sez 50ns.. */ deassert_ims332_reset_bit(reset); /* CLOCKIN appears to receive a 6.25 Mhz clock --> PLL 12 for 75Mhz monitor */ ims332_write_register (fi, IMS332_REG_BOOT, 12 | IMS332_BOOT_CLOCK_PLL); /* initialize VTG */ ims332_write_register (fi, IMS332_REG_CSR_A, IMS332_BPP_8 | IMS332_CSR_A_DISABLE_CURSOR); DELAY(50); /* spec does not say */ /* datapath registers (values taken from prom's settings) */ ims332_write_register (fi, IMS332_REG_HALF_SYNCH, 0x10); ims332_write_register (fi, IMS332_REG_BACK_PORCH, 0x21); ims332_write_register (fi, IMS332_REG_DISPLAY, 0x100); ims332_write_register (fi, IMS332_REG_SHORT_DIS, 0x5d); ims332_write_register (fi, IMS332_REG_BROAD_PULSE, 0x9f); ims332_write_register (fi, IMS332_REG_V_SYNC, 0xc); ims332_write_register (fi, IMS332_REG_V_PRE_EQUALIZE, 2); ims332_write_register (fi, IMS332_REG_V_POST_EQUALIZE, 2); ims332_write_register (fi, IMS332_REG_V_BLANK, 0x2a); ims332_write_register (fi, IMS332_REG_V_DISPLAY, 0x600); ims332_write_register (fi, IMS332_REG_LINE_TIME, 0x146); ims332_write_register (fi, IMS332_REG_LINE_START, 0x10); ims332_write_register (fi, IMS332_REG_MEM_INIT, 0xa); ims332_write_register (fi, IMS332_REG_XFER_DELAY, 0xa); ims332_write_register (fi, IMS332_REG_COLOR_MASK, 0xffffff); #endif /* notdef */ /* Zero out the cursor RAM... */ for (i = 0; i < 512; i++) ims332_write_register (fi, IMS332_REG_CURSOR_RAM + i, 0); /* Set up the color map... */ ims332InitColorMap (fi); /* Enable display... */ ims332_write_register (fi, IMS332_REG_CSR_A, IMS332_BPP_8 | IMS332_CSR_A_DMA_DISABLE | IMS332_CSR_A_VTG_ENABLE); ims332_cursor_off(fi); return (1); } static u_char cursor_RGB[6]; /* cursor color 2 & 3 */ static u_int ims332_read_register(fi, regno) struct fbinfo *fi; int regno; { u_char *regs = (u_char *)fi -> fi_vdac; unsigned char *rptr; u_int val, v1; /* spec sez: */ rptr = regs + 0x80000 + (regno << 4); val = *((volatile u_short *) rptr ); v1 = *((volatile u_short *) regs ); return (val & 0xffff) | ((v1 & 0xff00) << 8); } static void ims332_write_register(fi, regno, val) struct fbinfo *fi; int regno; unsigned int val; { u_char *regs = (u_char *)fi -> fi_vdac; u_char *wptr; /* spec sez: */ wptr = regs + 0xa0000 + (regno << 4); *((volatile u_int *)(regs)) = (val >> 8) & 0xff00; *((volatile u_short *)(wptr)) = val; } /* * Turn off hardware cursor sprite. */ static __inline void ims332_cursor_off(fi) struct fbinfo *fi; { u_int csr; csr = ims332_read_register (fi, IMS332_REG_CSR_A); csr |= IMS332_CSR_A_DISABLE_CURSOR; ims332_write_register (fi, IMS332_REG_CSR_A, csr); } /* * Turn on hardware cursor. */ static __inline void ims332_cursor_on(fi) struct fbinfo *fi; { u_int csr; csr = ims332_read_register (fi, IMS332_REG_CSR_A); csr &= ~IMS332_CSR_A_DISABLE_CURSOR; ims332_write_register (fi, IMS332_REG_CSR_A, csr); } /* * Set screen colourmap to default state. * For X11's benefit, the default sate entry is that * zero is black and all other entries are full white. * The hardwaer cursor is turned off. */ void ims332InitColorMap(fi) struct fbinfo *fi; { u_char *cmap; int i; cmap = (u_char *)(fi -> fi_cmap_bits); ims332_write_register (fi, IMS332_REG_LUT_BASE, 0); cmap [0] = cmap [1] = cmap [2] = 0; for (i = 1; i < 256; i++) { ims332_write_register (fi, IMS332_REG_LUT_BASE + i, 0xffffff); cmap [i * 3] = cmap [i * 3 + 1] = cmap [i * 3 + 2] = 0xff; } for (i = 0; i < 3; i++) { cursor_RGB[i] = 0x00; cursor_RGB[i + 3] = 0xff; } ims332RestoreCursorColor (fi); ims332_cursor_off(fi); } /* Load color map entry(s). */ int ims332LoadColorMap(fi, bits, index, count) struct fbinfo *fi; const u_char *bits; int index, count; { u_char *cmap_bits; u_char *cmap; int i; if (index > 256 || index < 0 || index + count > 256) return EINVAL; cmap_bits = (u_char *)bits; cmap = (u_char *)(fi -> fi_cmap_bits) + index * 3; for (i = 0; i < count; i++) { ims332_write_register (fi, IMS332_REG_LUT_BASE + i + index, (cmap_bits [i * 3 + 2] << 16) | (cmap_bits [i * 3 + 1] << 8) | (cmap_bits [i * 3])); cmap [i * 3] = cmap_bits [i * 3]; cmap [i * 3 + 1] = cmap_bits [i * 3 + 1]; cmap [i * 3 + 2] = cmap_bits [i * 3 + 2]; } return 0; } /* Get color map entry(s). */ int ims332GetColorMap(fi, bits, index, count) struct fbinfo *fi; u_char *bits; int index, count; { u_char *cmap_bits; u_char *cmap; if (index > 256 || index < 0 || index + count > 256) return EINVAL; cmap_bits = (u_char *)bits; cmap = (u_char *)(fi -> fi_cmap_bits) + index * 3; memcpy(cmap_bits, cmap, count * 3); return 0; } /* * Video on/off * * It is unfortunate that X11 goes backward with white@0 * and black@1. So we must stash away the zero-th entry * and fix it while screen is off. */ int ims332_video_off(fi) struct fbinfo *fi; { if (fi -> fi_blanked) return 0; ims332_write_register (fi, IMS332_REG_LUT_BASE, 0); ims332_write_register (fi, IMS332_REG_COLOR_MASK, 0); /* cursor now */ ims332_cursor_off(fi); fi -> fi_blanked = 1; return 0; } int ims332_video_on (fi) struct fbinfo *fi; { u_char *cmap; if (!fi -> fi_blanked) return 0; cmap = (u_char *)(fi -> fi_cmap_bits); ims332_write_register (fi, IMS332_REG_LUT_BASE, ((unsigned)cmap [0] | ((unsigned)cmap [1] << 8) | ((unsigned)cmap [2] << 16))); ims332_write_register (fi, IMS332_REG_COLOR_MASK, 0xffffffff); /* cursor now */ ims332_cursor_on(fi); fi -> fi_blanked = 0; return 0; } /* * Cursor */ void ims332PosCursor(fi, x, y) struct fbinfo *fi; int x, y; { if (y < 0) y = 0; else if (y > fi -> fi_type.fb_height - fi -> fi_cursor.height - 1) y = fi -> fi_type.fb_height - fi -> fi_cursor.height - 1; if (x < 0) x = 0; else if (x > fi -> fi_type.fb_width - fi -> fi_cursor.width - 1) x = fi -> fi_type.fb_width - fi -> fi_cursor.width - 1; fi -> fi_cursor.x = x; fi -> fi_cursor.y = y; ims332_write_register (fi, IMS332_REG_CURSOR_LOC, ((x & 0xfff) << 12) | (y & 0xfff)); } void ims332RestoreCursorColor (fi) struct fbinfo *fi; { /* Bg is color[0], Fg is color[1] */ ims332_write_register (fi, IMS332_REG_CURSOR_LUT_0, (cursor_RGB[2] << 16) | (cursor_RGB[1] << 8) | (cursor_RGB[0])); ims332_write_register (fi, IMS332_REG_CURSOR_LUT_1, 0x7f0000); ims332_write_register (fi, IMS332_REG_CURSOR_LUT_2, (cursor_RGB[5] << 16) | (cursor_RGB[4] << 8) | (cursor_RGB[3])); } /* Set the color of the cursor. */ void ims332CursorColor (fi, color) struct fbinfo *fi; unsigned int color[]; { int i; for (i = 0; i < 6; i++) cursor_RGB[i] = (u_char)(color[i] >> 8); ims332RestoreCursorColor(fi); } void ims332LoadCursor(fi, cursor) struct fbinfo *fi; u_short *cursor; { int i, j, k, pos; u_short ap, bp, out; /* * Fill in the cursor sprite using the A and B planes, as provided * for the pmax. * XXX This will have to change when the X server knows that this * is not a pmax display. */ pos = 0; for (k = 0; k < 16; k++) { ap = *cursor; bp = *(cursor + 16); j = 0; while (j < 2) { out = 0; for (i = 0; i < 8; i++) { out = ((out >> 2) & 0x3fff) | ((ap & 0x1) << 15) | ((bp & 0x1) << 14); ap >>= 1; bp >>= 1; } ims332_write_register (fi, IMS332_REG_CURSOR_RAM + pos, out); pos++; j++; } while (j < 8) { ims332_write_register (fi, IMS332_REG_CURSOR_RAM + pos, 0); pos++; j++; } cursor++; } while (pos < 512) { ims332_write_register (fi, IMS332_REG_CURSOR_RAM + pos, 0); pos++; } /* The cursor pattern is loaded, so turn on the hardware sprite. */ ims332_cursor_on(fi); }