/* * Copyright (C) 2002-2010 The DOSBox Team * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /* $Id: int10_put_pixel.cpp,v 1.23 2009-05-27 09:15:42 qbix79 Exp $ */ #include "dosbox.h" #include "mem.h" #include "inout.h" #include "int10.h" static Bit8u cga_masks[4]={0x3f,0xcf,0xf3,0xfc}; static Bit8u cga_masks2[8]={0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe}; void INT10_PutPixel(Bit16u x,Bit16u y,Bit8u page,Bit8u color) { static bool putpixelwarned = false; switch (CurMode->type) { case M_CGA4: { if (real_readb(BIOSMEM_SEG,BIOSMEM_CURRENT_MODE)<=5) { Bit16u off=(y>>1)*80+(x>>2); if (y&1) off+=8*1024; Bit8u old=real_readb(0xb800,off); if (color & 0x80) { color&=3; old^=color << (2*(3-(x&3))); } else { old=(old&cga_masks[x&3])|((color&3) << (2*(3-(x&3)))); } real_writeb(0xb800,off,old); } else { Bit16u off=(y>>2)*160+((x>>2)&(~1)); off+=(8*1024) * (y & 3); Bit16u old=real_readw(0xb800,off); if (color & 0x80) { old^=(color&1) << (7-(x&7)); old^=((color&2)>>1) << ((7-(x&7))+8); } else { old=(old&(~(0x101<<(7-(x&7))))) | ((color&1) << (7-(x&7))) | (((color&2)>>1) << ((7-(x&7))+8)); } real_writew(0xb800,off,old); } } break; case M_CGA2: { Bit16u off=(y>>1)*80+(x>>3); if (y&1) off+=8*1024; Bit8u old=real_readb(0xb800,off); if (color & 0x80) { color&=1; old^=color << ((7-(x&7))); } else { old=(old&cga_masks2[x&7])|((color&1) << ((7-(x&7)))); } real_writeb(0xb800,off,old); } break; case M_TANDY16: { IO_Write(0x3d4,0x09); Bit8u scanlines_m1=IO_Read(0x3d5); Bit16u off=(y>>((scanlines_m1==1)?1:2))*(CurMode->swidth>>1)+(x>>1); off+=(8*1024) * (y & scanlines_m1); Bit8u old=real_readb(0xb800,off); Bit8u p[2]; p[1] = (old >> 4) & 0xf; p[0] = old & 0xf; Bitu ind = 1-(x & 0x1); if (color & 0x80) { p[ind]^=(color & 0x7f); } else { p[ind]=color; } old = (p[1] << 4) | p[0]; real_writeb(0xb800,off,old); } break; case M_EGA: { /* Set the correct bitmask for the pixel position */ IO_Write(0x3ce,0x8);Bit8u mask=128>>(x&7);IO_Write(0x3cf,mask); /* Set the color to set/reset register */ IO_Write(0x3ce,0x0);IO_Write(0x3cf,color); /* Enable all the set/resets */ IO_Write(0x3ce,0x1);IO_Write(0x3cf,0xf); /* test for xorring */ if (color & 0x80) { IO_Write(0x3ce,0x3);IO_Write(0x3cf,0x18); } //Perhaps also set mode 1 /* Calculate where the pixel is in video memory */ if (CurMode->plength!=(Bitu)real_readw(BIOSMEM_SEG,BIOSMEM_PAGE_SIZE)) LOG(LOG_INT10,LOG_ERROR)("PutPixel_EGA_p: %x!=%x",CurMode->plength,real_readw(BIOSMEM_SEG,BIOSMEM_PAGE_SIZE)); if (CurMode->swidth!=(Bitu)real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8) LOG(LOG_INT10,LOG_ERROR)("PutPixel_EGA_w: %x!=%x",CurMode->swidth,real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8); PhysPt off=0xa0000+real_readw(BIOSMEM_SEG,BIOSMEM_PAGE_SIZE)*page+ ((y*real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8+x)>>3); /* Bitmask and set/reset should do the rest */ mem_readb(off); mem_writeb(off,0xff); /* Restore bitmask */ IO_Write(0x3ce,0x8);IO_Write(0x3cf,0xff); IO_Write(0x3ce,0x1);IO_Write(0x3cf,0); /* Restore write operating if changed */ if (color & 0x80) { IO_Write(0x3ce,0x3);IO_Write(0x3cf,0x0); } break; } case M_VGA: mem_writeb(PhysMake(0xa000,y*320+x),color); break; case M_LIN8: { if (CurMode->swidth!=(Bitu)real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8) LOG(LOG_INT10,LOG_ERROR)("PutPixel_VGA_w: %x!=%x",CurMode->swidth,real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8); PhysPt off=S3_LFB_BASE+y*real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8+x; mem_writeb(off,color); break; } default: if(GCC_UNLIKELY(!putpixelwarned)) { putpixelwarned = true; LOG(LOG_INT10,LOG_ERROR)("PutPixel unhandled mode type %d",CurMode->type); } break; } } void INT10_GetPixel(Bit16u x,Bit16u y,Bit8u page,Bit8u * color) { switch (CurMode->type) { case M_CGA4: { Bit16u off=(y>>1)*80+(x>>2); if (y&1) off+=8*1024; Bit8u val=real_readb(0xb800,off); *color=(val>>(((3-(x&3)))*2)) & 3 ; } break; case M_CGA2: { Bit16u off=(y>>1)*80+(x>>3); if (y&1) off+=8*1024; Bit8u val=real_readb(0xb800,off); *color=(val>>(((7-(x&7))))) & 1 ; } break; case M_EGA: { /* Calculate where the pixel is in video memory */ if (CurMode->plength!=(Bitu)real_readw(BIOSMEM_SEG,BIOSMEM_PAGE_SIZE)) LOG(LOG_INT10,LOG_ERROR)("GetPixel_EGA_p: %x!=%x",CurMode->plength,real_readw(BIOSMEM_SEG,BIOSMEM_PAGE_SIZE)); if (CurMode->swidth!=(Bitu)real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8) LOG(LOG_INT10,LOG_ERROR)("GetPixel_EGA_w: %x!=%x",CurMode->swidth,real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8); PhysPt off=0xa0000+real_readw(BIOSMEM_SEG,BIOSMEM_PAGE_SIZE)*page+ ((y*real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8+x)>>3); Bitu shift=7-(x & 7); /* Set the read map */ *color=0; IO_Write(0x3ce,0x4);IO_Write(0x3cf,0); *color|=((mem_readb(off)>>shift) & 1) << 0; IO_Write(0x3ce,0x4);IO_Write(0x3cf,1); *color|=((mem_readb(off)>>shift) & 1) << 1; IO_Write(0x3ce,0x4);IO_Write(0x3cf,2); *color|=((mem_readb(off)>>shift) & 1) << 2; IO_Write(0x3ce,0x4);IO_Write(0x3cf,3); *color|=((mem_readb(off)>>shift) & 1) << 3; break; } case M_VGA: *color=mem_readb(PhysMake(0xa000,320*y+x)); break; case M_LIN8: { if (CurMode->swidth!=(Bitu)real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8) LOG(LOG_INT10,LOG_ERROR)("GetPixel_VGA_w: %x!=%x",CurMode->swidth,real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8); PhysPt off=S3_LFB_BASE+y*real_readw(BIOSMEM_SEG,BIOSMEM_NB_COLS)*8+x; *color = mem_readb(off); break; } default: LOG(LOG_INT10,LOG_ERROR)("GetPixel unhandled mode type %d",CurMode->type); break; } }