![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to xbios.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [HATARI the Atari ST Emulator] / hatari / src|
Return to xbios.c CVS log | Up to [HATARI the Atari ST Emulator] / hatari / src |
1.1 ! root 1: /* ! 2: Hatari ! 3: ! 4: XBios Handler (Trap #14) ! 5: ! 6: We intercept and direct some XBios calls to handle the RS-232/Blitter and help with floppy ! 7: debugging ! 8: */ ! 9: ! 10: #include "main.h" ! 11: #include "debug.h" ! 12: #include "decode.h" ! 13: #include "floppy.h" ! 14: #include "m68000.h" ! 15: #include "misc.h" ! 16: #include "rs232.h" ! 17: #include "stMemory.h" ! 18: ! 19: /* List of Atari ST RS-232 baud rates */ ! 20: static int BaudRates[] = { ! 21: 19200, //0 ! 22: 9600, //1 ! 23: 4800, //2 ! 24: 3600, //3 ! 25: 2400, //4 ! 26: 2000, //5 ! 27: 1800, //6 ! 28: 1200, //7 ! 29: 600, //8 ! 30: 300, //9 ! 31: 200, //10 ! 32: 150, //11 ! 33: 134, //12 ! 34: 110, //13 ! 35: 75, //14 ! 36: 50 //15 ! 37: }; ! 38: ! 39: //----------------------------------------------------------------------- ! 40: /* ! 41: XBIOS Floppy Read ! 42: Call 8 ! 43: */ ! 44: BOOL XBios_Floprd(unsigned long Params) ! 45: { ! 46: #ifdef DEBUG_TO_FILE ! 47: char *pBuffer; ! 48: unsigned short int Dev,Sector,Side,Track,Count; ! 49: ! 50: // Read details from stack ! 51: pBuffer = (char *)STRAM_ADDR(STMemory_ReadLong(Params+SIZE_WORD)); ! 52: Dev = STMemory_ReadWord(Params+SIZE_WORD+SIZE_LONG+SIZE_LONG); ! 53: Sector = STMemory_ReadWord(Params+SIZE_WORD+SIZE_LONG+SIZE_LONG+SIZE_WORD); ! 54: Track = STMemory_ReadWord(Params+SIZE_WORD+SIZE_LONG+SIZE_LONG+SIZE_WORD+SIZE_WORD); ! 55: Side = STMemory_ReadWord(Params+SIZE_WORD+SIZE_LONG+SIZE_LONG+SIZE_WORD+SIZE_WORD+SIZE_WORD); ! 56: Count = STMemory_ReadWord(Params+SIZE_WORD+SIZE_LONG+SIZE_LONG+SIZE_WORD+SIZE_WORD+SIZE_WORD+SIZE_WORD); ! 57: ! 58: Debug_FDC("FLOPRD %s,%d,%d,%d,%d at addr 0x%X\n",EmulationDrives[Dev].szFileName,Side,Track,Sector,Count,PC); ! 59: #endif ! 60: ! 61: return(FALSE); ! 62: } ! 63: ! 64: //----------------------------------------------------------------------- ! 65: /* ! 66: XBIOS Floppy Write ! 67: Call 9 ! 68: */ ! 69: BOOL XBios_Flopwr(unsigned long Params) ! 70: { ! 71: #ifdef DEBUG_TO_FILE ! 72: char *pBuffer; ! 73: unsigned short int Dev,Sector,Side,Track,Count; ! 74: ! 75: // Read details from stack ! 76: pBuffer = (char *)STRAM_ADDR(STMemory_ReadLong(Params+SIZE_WORD)); ! 77: Dev = STMemory_ReadWord(Params+SIZE_WORD+SIZE_LONG+SIZE_LONG); ! 78: Sector = STMemory_ReadWord(Params+SIZE_WORD+SIZE_LONG+SIZE_LONG+SIZE_WORD); ! 79: Track = STMemory_ReadWord(Params+SIZE_WORD+SIZE_LONG+SIZE_LONG+SIZE_WORD+SIZE_WORD); ! 80: Side = STMemory_ReadWord(Params+SIZE_WORD+SIZE_LONG+SIZE_LONG+SIZE_WORD+SIZE_WORD+SIZE_WORD); ! 81: Count = STMemory_ReadWord(Params+SIZE_WORD+SIZE_LONG+SIZE_LONG+SIZE_WORD+SIZE_WORD+SIZE_WORD+SIZE_WORD); ! 82: ! 83: Debug_FDC("FLOPWR %s,%d,%d,%d,%d at addr 0x%X\n",EmulationDrives[Dev].szFileName,Side,Track,Sector,Count,PC); ! 84: #endif ! 85: ! 86: return(FALSE); ! 87: } ! 88: ! 89: //----------------------------------------------------------------------- ! 90: /* ! 91: XBIOS RsConf ! 92: Call 15 ! 93: */ ! 94: BOOL XBios_Rsconf(unsigned long Params) ! 95: { ! 96: short int Baud,Ctrl,Ucr,Rsr,Tsr,Scr; ! 97: int BaudRate=-1; ! 98: ! 99: Baud = STMemory_ReadWord(Params+SIZE_WORD); ! 100: Ctrl = STMemory_ReadWord(Params+SIZE_WORD+SIZE_WORD); ! 101: Ucr = STMemory_ReadWord(Params+SIZE_WORD+SIZE_WORD+SIZE_WORD); ! 102: Rsr = STMemory_ReadWord(Params+SIZE_WORD+SIZE_WORD+SIZE_WORD+SIZE_WORD); ! 103: Tsr = STMemory_ReadWord(Params+SIZE_WORD+SIZE_WORD+SIZE_WORD+SIZE_WORD+SIZE_WORD); ! 104: Scr = STMemory_ReadWord(Params+SIZE_WORD+SIZE_WORD+SIZE_WORD+SIZE_WORD+SIZE_WORD+SIZE_WORD); ! 105: ! 106: // Set baud, if passed valid setting ! 107: if ( (Baud>=0) && (Baud<=15) ) { ! 108: // Convert ST baud rate index to value ! 109: BaudRate = BaudRates[Baud]; ! 110: // Set RS-232, pass Communication Control and USART Control register ! 111: RS232_SetConfig(BaudRate,Ctrl,Ucr); ! 112: ! 113: return(TRUE); ! 114: } ! 115: ! 116: return(FALSE); ! 117: } ! 118: ! 119: //----------------------------------------------------------------------- ! 120: /* ! 121: XBIOS Scrdmp ! 122: Call 20 ! 123: */ ! 124: BOOL XBios_Scrdmp(unsigned long Params) ! 125: { ! 126: // Correct return code? ! 127: Regs[REG_D0] = 0; ! 128: ! 129: return(TRUE); ! 130: } ! 131: ! 132: //----------------------------------------------------------------------- ! 133: /* ! 134: XBIOS Prtblk ! 135: Call 36 ! 136: */ ! 137: BOOL XBios_Prtblk(unsigned long Params) ! 138: { ! 139: // Correct return code? ! 140: Regs[REG_D0] = 0; ! 141: ! 142: return(TRUE); ! 143: } ! 144: ! 145: //----------------------------------------------------------------------- ! 146: /* ! 147: XBIOS BlitMode ! 148: Call 64 ! 149: */ ! 150: BOOL XBios_BlitMode(unsigned long Params) ! 151: { ! 152: // No blitter ! 153: Regs[REG_D0] = 0; ! 154: ! 155: return(TRUE); ! 156: } ! 157: ! 158: //----------------------------------------------------------------------- ! 159: /* ! 160: Check if we need to re-direct XBios call to our own routines ! 161: */ ! 162: BOOL XBios(void) ! 163: { ! 164: unsigned long Params; ! 165: unsigned short int XBiosCall; ! 166: ! 167: /* Find call */ ! 168: Params = Regs[REG_A7]; ! 169: XBiosCall = STMemory_ReadWord(Params); ! 170: // Debug_File("XBIOS %d\n",XBiosCall); ! 171: ! 172: switch(XBiosCall) { ! 173: case 8: ! 174: return(XBios_Floprd(Params)); ! 175: case 9: ! 176: return(XBios_Flopwr(Params)); ! 177: case 15: ! 178: return(XBios_Rsconf(Params)); ! 179: case 20: ! 180: return(XBios_Scrdmp(Params)); ! 181: case 36: ! 182: return(XBios_Prtblk(Params)); ! 183: case 64: ! 184: return(XBios_BlitMode(Params)); ! 185: ! 186: default: // Call as normal! ! 187: return(FALSE); ! 188: } ! 189: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.