/* $XConsortium: et3_driver.c,v 1.4 95/01/16 13:18:13 kaleb Exp $ */ /* $XFree86: xc/programs/Xserver/hw/xfree86/vga256/drivers/et3000/et3_driver.c,v 3.7 1995/01/28 17:08:38 dawes Exp $ */ /* * * Copyright 1990,91 by Thomas Roell, Dinkelscherben, Germany. * * Permission to use, copy, modify, distribute, and sell this software and its * documentation for any purpose is hereby granted without fee, provided that * the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name of Thomas Roell not be used in * advertising or publicity pertaining to distribution of the software without * specific, written prior permission. Thomas Roell makes no representations * about the suitability of this software for any purpose. It is provided * "as is" without express or implied warranty. * * THOMAS ROELL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO * EVENT SHALL THOMAS ROELL BE LIABLE FOR ANY SPECIAL, INDIRECT OR * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR * PERFORMANCE OF THIS SOFTWARE. * * Author: Thomas Roell, roell@informatik.tu-muenchen.de * */ #include "X.h" #include "input.h" #include "screenint.h" #include "dix.h" #include "compiler.h" #include "xf86.h" #include "xf86Priv.h" #include "xf86_OSlib.h" #include "xf86_HWlib.h" #include "vga.h" typedef struct { vgaHWRec std; /* good old IBM VGA */ unsigned char ExtStart; /* Tseng ET3000 specials CRTC 0x23/0x24/0x25 */ unsigned char CRTCControl; unsigned char Overflow; unsigned char ZoomControl; /* TS 6 & 7 */ unsigned char AuxillaryMode; unsigned char Misc; /* ATC 0x16 */ unsigned char SegSel; } vgaET3000Rec, *vgaET3000Ptr; static Bool ET3000Probe(); static char * ET3000Ident(); static Bool ET3000ClockSelect(); static void ET3000EnterLeave(); static Bool ET3000Init(); static Bool ET3000ValidMode(); static void * ET3000Save(); static void ET3000Restore(); static void ET3000Adjust(); extern void ET3000SetRead(); extern void ET3000SetWrite(); extern void ET3000SetReadWrite(); vgaVideoChipRec ET3000 = { ET3000Probe, ET3000Ident, ET3000EnterLeave, ET3000Init, ET3000ValidMode, ET3000Save, ET3000Restore, ET3000Adjust, (void (*)())NoopDDA, (void (*)())NoopDDA, (void (*)())NoopDDA, ET3000SetRead, ET3000SetWrite, ET3000SetReadWrite, 0x10000, 0x10000, 16, 0xFFFF, 0x00000, 0x10000, 0x00000, 0x10000, TRUE, /* Uses 2 banks */ VGA_DIVIDE_VERT, {0,}, 16, FALSE, 0, 0, FALSE, FALSE, NULL, 1, }; #define new ((vgaET3000Ptr)vgaNewVideoState) static unsigned ET3000_ExtPorts[] = {0x3B8, 0x3BF, 0x3CD, 0x3D8}; static int Num_ET3000_ExtPorts = (sizeof(ET3000_ExtPorts)/sizeof(ET3000_ExtPorts[0])); /* * ET3000ClockSelect -- * select one of the possible clocks ... */ static Bool ET3000ClockSelect(no) int no; { static unsigned char save1, save2; unsigned char temp; switch(no) { case CLK_REG_SAVE: save1 = inb(0x3CC); outb(vgaIOBase + 4, 0x24); save2 = inb(vgaIOBase + 5); break; case CLK_REG_RESTORE: outb(0x3C2, save1); outw(vgaIOBase + 4, 0x24 | (save2 << 8)); break; default: temp = inb(0x3CC); outb(0x3C2, ( temp & 0xf3) | ((no << 2) & 0x0C)); outw(vgaIOBase+0x04, 0x24 | ((no & 0x04) << 7)); } return(TRUE); } /* * ET3000Ident -- */ static char * ET3000Ident(n) int n; { static char *chipsets[] = {"et3000"}; if (n + 1 > sizeof(chipsets) / sizeof(char *)) return(NULL); else return(chipsets[n]); } /* * ET3000Probe -- * check up whether a Et3000 based board is installed */ static Bool ET3000Probe() { /* * Set up I/O ports to be used by this card */ xf86ClearIOPortList(vga256InfoRec.scrnIndex); xf86AddIOPorts(vga256InfoRec.scrnIndex, Num_VGA_IOPorts, VGA_IOPorts); xf86AddIOPorts(vga256InfoRec.scrnIndex, Num_ET3000_ExtPorts, ET3000_ExtPorts); if (vga256InfoRec.chipset) { if (StrCaseCmp(vga256InfoRec.chipset, ET3000Ident(0))) return (FALSE); else ET3000EnterLeave(ENTER); } else { unsigned char temp, origVal, newVal; ET3000EnterLeave(ENTER); origVal = inb(0x3CD); outb(0x3CD, origVal ^ 0x3F); newVal = inb(0x3CD); outb(0x3CD, origVal); if (newVal != (origVal ^ 0x3F)) { ET3000EnterLeave(LEAVE); return(FALSE); } /* * At this stage, we think it's a Tseng, now make sure it's * an ET3000. */ temp = inb(vgaIOBase+0x0A); outb(vgaIOBase+0x04, 0x1B); origVal = inb(vgaIOBase+0x05); outb(vgaIOBase+0x05, origVal ^ 0xFF); newVal = inb(vgaIOBase+0x05); outb(vgaIOBase+0x05, origVal); if (newVal != (origVal ^ 0xFF)) { ET3000EnterLeave(LEAVE); return(FALSE); } } if (!vga256InfoRec.videoRam) vga256InfoRec.videoRam = 512; if (!vga256InfoRec.clocks) vgaGetClocks(8 , ET3000ClockSelect); vga256InfoRec.chipset = ET3000Ident(0); vga256InfoRec.bankedMono = TRUE; return(TRUE); } /* * ET3000EnterLeave -- * enable/disable io-mapping */ static void ET3000EnterLeave(enter) Bool enter; { unsigned char temp; if (enter) { xf86EnableIOPorts(vga256InfoRec.scrnIndex); vgaIOBase = (inb(0x3CC) & 0x01) ? 0x3D0 : 0x3B0; outb(0x3BF, 0x03); /* unlock ET3000 special */ outb(vgaIOBase + 8, 0xA0); outb(vgaIOBase + 4, 0x11); temp = inb(vgaIOBase + 5); outb(vgaIOBase + 5, temp & 0x7F); } else { outb(0x3BF, 0x01); /* relock ET3000 special */ outb(vgaIOBase + 8, 0xA0); xf86DisableIOPorts(vga256InfoRec.scrnIndex); } } /* * ET3000Restore -- * restore a video mode */ static void ET3000Restore(restore) vgaET3000Ptr restore; { unsigned char i; outb(0x3CD, restore->SegSel); outw(0x3C4, (restore->ZoomControl << 8) | 0x06); outw(0x3C4, (restore->AuxillaryMode << 8) | 0x07); i = inb(vgaIOBase + 0x0A); /* reset flip-flop */ outb(0x3C0, 0x36); outb(0x3C0, restore->Misc); outw(vgaIOBase + 4, (restore->ExtStart << 8) | 0x23); if (restore->std.NoClock >= 0) outw(vgaIOBase + 4, (restore->CRTCControl << 8) | 0x24); outw(vgaIOBase + 4, (restore->Overflow << 8) | 0x25); vgaHWRestore((vgaHWPtr)restore); } /* * ET3000Save -- * save the current video mode */ static void * ET3000Save(save) vgaET3000Ptr save; { unsigned char i; unsigned char temp1, temp2; /* * we need this here , cause we MUST disable the ROM SYNC feature */ vgaIOBase = (inb(0x3CC) & 0x01) ? 0x3D0 : 0x3B0; outb(vgaIOBase + 4, 0x24); temp1 = inb(vgaIOBase + 5); outb(vgaIOBase + 5, temp1 & 0x0f); temp2 = inb(0x3CD); outb(0x3CD,0x40); /* segment select */ save = (vgaET3000Ptr)vgaHWSave((vgaHWPtr)save, sizeof(vgaET3000Rec)); save->CRTCControl = temp1; save->SegSel = temp2; outb(vgaIOBase + 4, 0x23); save->ExtStart = inb(vgaIOBase + 5); outb(vgaIOBase + 4, 0x25); save->Overflow = inb(vgaIOBase + 5); outb(0x3C4, 6); save->ZoomControl = inb(0x3C5); outb(0x3C4, 7); save->AuxillaryMode = inb(0x3C5); i = inb(vgaIOBase + 0x0A); /* reset flip-flop */ outb(0x3C0, 0x36); save->Misc = inb(0x3C1); outb(0x3C0, save->Misc); return ((void *) save); } /* * ET3000Init -- * Handle the initialization, etc. of a screen. */ static Bool ET3000Init(mode) DisplayModePtr mode; { #ifdef MONOVGA Bool first_time = (!new); int i; #endif #ifdef MONOVGA /* weird mode, halve the horizontal timings */ if (!mode->CrtcHAdjusted) { mode->CrtcHTotal /= 2; mode->CrtcHDisplay /= 2; mode->CrtcHSyncStart /= 2; mode->CrtcHSyncEnd /= 2; mode->CrtcHAdjusted = TRUE; } #endif if (!vgaHWInit(mode,sizeof(vgaET3000Rec))) return(FALSE); #ifndef MONOVGA new->std.Sequencer[4] = 0x06; /* use the FAST 256 Color Mode */ #endif new->ZoomControl = 0x00; new->Misc = 0x10; new->ExtStart = 0x00; if (new->std.NoClock >= 0) new->CRTCControl = (int)(new->std.NoClock & 0x04) >> 1 ; new->Overflow = 0x10 | ((mode->CrtcVSyncStart & 0x400) >> 7 ) | (((mode->CrtcVDisplay -1) & 0x400) >> 8 ) | (((mode->CrtcVTotal -2) & 0x400) >> 9 ) | ((mode->CrtcVSyncStart & 0x400) >> 10 ) | (mode->Flags & V_INTERLACE ? 0x80 : 0); #ifdef MONOVGA new->AuxillaryMode = 0xc8; /* MCLK / 2, devil knows what's that */ new->std.CRTC[5] |= 0x60; /* Hsync skew */ new->std.CRTC[19] = vga256InfoRec.virtualX >> 5; /* This weird mode uses the DAC in an unusual way */ if (first_time) { for (i = 0; i < 768; i+=3) if ((i/3) & (1 << BIT_PLANE)) { new->std.DAC[i] = vga256InfoRec.whiteColour.red; new->std.DAC[i + 1] = vga256InfoRec.whiteColour.green; new->std.DAC[i + 2] = vga256InfoRec.whiteColour.blue; } else { new->std.DAC[i] = vga256InfoRec.blackColour.red; new->std.DAC[i + 1] = vga256InfoRec.blackColour.green; new->std.DAC[i + 2] = vga256InfoRec.blackColour.blue; } } new->std.Attribute[17] = 0x00; #else /* !MONOVGA */ new->AuxillaryMode = 0x88; #endif return(TRUE); } /* * ET3000Adjust -- * adjust the current video frame to display the mousecursor */ static void ET3000Adjust(x, y) int x, y; { #ifdef USE_PAN #ifdef MONOVGA int Base = (y * vga256InfoRec.displayWidth + x + 3) >> 4; int wants_pan = (y * vga256InfoRec.displayWidth + x + 3) & 8; #else int Base = (y * vga256InfoRec.displayWidth + x + 1) >> 3; int wants_pan = (y * vga256InfoRec.displayWidth + x + 1) & 4; #endif #else #ifdef MONOVGA int Base = (y * vga256InfoRec.displayWidth + x + 7) >> 4; #else int Base = (y * vga256InfoRec.displayWidth + x + 3) >> 3; #endif #endif #ifdef USE_PAN /* Wait for vertical retrace */ { unsigned char tmp; while (tmp = inb(vgaIOBase + 0x0A) & 0x80) ; } #endif outw(vgaIOBase + 4, (Base & 0x00FF00) | 0x0C); outw(vgaIOBase + 4, ((Base & 0x00FF) << 8) | 0x0D); outw(vgaIOBase + 4, ((Base & 0x010000) >> 7) | 0x23); #ifdef USE_PAN /* set horizontal panning register */ (void)inb(vgaIOBase + 0x0A); outb(0x3C0, 0x33); outb(0x3C0, wants_pan ? 3 : 0); #endif } /* * ET3000ValidMode -- * */ static Bool ET3000ValidMode(mode) DisplayModePtr mode; { return TRUE; }