DOS.rar_dos关机

#include <stdio.h> #include <string.h> #include <io.h> #include <fcntl.h> #include <dos.h> #include <conio.h> #define PORT1 0x3F8 /* Port Address Goes Here */ #define INTVECT 0x0C /* Com Port's IRQ here (Must also change PIC setting) */ #define PORTBUFFERSIZE 1024 #define FILEBUFFERSIZE 512 /* Defines Serial Ports Base Address */ /* COM1 0x3F8 */ /* COM2 0x2F8 */ /* COM3 0x3E8 */ /* COM4 0x2E8 */ int g_Is24HourMode = 1; int g_IsBCDMode = 1; int g_iBufferIn = 0; int g_iMsg2IsOK = 0; char g_chReadBuf[ PORTBUFFERSIZE ]; /*--- Define Old Receive ISR ---*/ void interrupt (*OldPort1ISR)(); /*--- Port1 Receive ISR ---*/ void interrupt PORT1INT() /* Interrupt Service Routine (ISR) for PORT1 */ { int iRecChk = 0; do { iRecChk = inportb( PORT1 + 5 ); if( iRecChk & 1 ) { g_chReadBuf[ g_iBufferIn ] = inportb( PORT1 ); if( g_chReadBuf[ g_iBufferIn ] == 'y' ) /*--- Replay Test Side Message 2 ---*/ { g_iMsg2IsOK= 1; } if( g_chReadBuf[ 0 ] == 'Y' ) /*--- Replay Test Side Message 1 ---*/ { g_iBufferIn++; } if( g_iBufferIn == (PORTBUFFERSIZE - 1) ) { g_iBufferIn = 0; } } } while( iRecChk & 1 ); outportb(0x20, 0x20); } /*--- Initialize Port1 ---*/ void InitPort() { outportb( PORT1 + 1, 0 ); /* Turn off interrupts - Port1: The LCR Bit 7 must be 0 */ OldPort1ISR = getvect( INTVECT ); /* Save old Interrupt Vector of later recovery */ setvect( INTVECT, PORT1INT ); /* Set Interrupt Vector Entry */ /* COM1 - 0x0C */ /* COM2 - 0x0B */ /* COM3 - 0x0C */ /* COM4 - 0x0B */ /* PORT 1 - Communication Settings */ outportb(PORT1 + 3, 0x80); /* SET DLAB ON */ outportb(PORT1 + 0, 0x0C); /* Set Baud rate - Divisor Latch Low Byte */ outportb(PORT1 + 1, 0x00); /* Set Baud rate - Divisor Latch High Byte */ /* Default 0x03 = 38,400 BPS */ /* 0x01 = 115,200 BPS */ /* 0x02 = 57,600 BPS */ /* 0x06 = 19,200 BPS */ /* 0x0C = 9,600 BPS */ /* 0x18 = 4,800 BPS */ /* 0x30 = 2,400 BPS */ outportb(PORT1 + 3, 0x03); /* 8 Bits, No Parity, 1 Stop Bit */ outportb(PORT1 + 2, 0xC7); /* FIFO Control Register */ outportb(PORT1 + 4, 0x0B); /* Turn on DTR, RTS, and OUT2 */ outportb(0x21, (inportb(0x21) &0xEF)); /* Set Programmable Interrupt Controller */ /* COM1 (IRQ4) - 0xEF */ /* COM2 (IRQ3) - 0xF7 */ /* COM3 (IRQ4) - 0xEF */ /* COM4 (IRQ3) - 0xF7 */ outportb(PORT1 + 1, 0x01); /* Interrupt when data received */ } /*--- Release Port1 resources that InitPort() created ---*/ void ReleasePort() { outportb(PORT1 + 1, 0); /* Turn off interrupts - Port1 */ outportb(0x21, (inportb(0x21) | 0x10)); /* MASK IRQ using PIC */ /* COM1 (IRQ4) - 0x10 */ /* COM2 (IRQ3) - 0x08 */ /* COM3 (IRQ4) - 0x10 */ /* COM4 (IRQ3) - 0x08 */ setvect(INTVECT, OldPort1ISR); /* Restore old interrupt vector */ } /*--- Waiting until the RTC time register value could be read ---*/ void ChkReady() { unsigned char ucRead = 0; outportb( 0x70, 0x0A ); while(1) { ucRead = inportb( 0x71 ); if( ucRead & 0x80 ) { break; } } while(1) { ucRead = inportb( 0x71 ); if( !(ucRead & 0x80) ) { break; } } } unsigned char BinaryToBCD( unsigned char ucBinaryData ) { ucBinaryData = ((ucBinaryData / 10) << 4) + (ucBinaryData % 10); return ucBinaryData; } unsigned char BCDToBinary( unsigned char ucBCDData ) { ucBCDData = (ucBCDData >> 4) * 10 + (ucBCDData & 0x0F); return ucBCDData; } void GetModes() { /*--- Control register ( 0x0B ): Bit7: Disable updates for clock setting (0: auto update, 1: user will set new date) Bit6: Periodic interrupt enable (0: disable, 1: enable) Bit5: Alarm interrupt enable (0: disable, 1: enable) Bit4: Update-finished interrupt enable (0: disable, 1: enable) Bit3: Enable square-wave output (0: disable, 1: enable) Bit2: All time/date values are BCD if clear (0: BCD, 1: Binary) Bit1: 24 hour mode, else hours bit 7 means PM (0: AM/PM, 1: 24 hour) Bit0: Auto switch DST - works f. USA only (always as "0") ---*/ unsigned char ucData = 0; ChkReady(); outportb( 0x70, 0x0B ); ucData = inportb( 0x71 ); if( 0 == (ucData & 0x02) ) { g_Is24HourMode = 0; } if( 1 == (ucData & 0x04) ) { g_IsBCDMode = 0; } } void GetRTCDate( unsigned char* pucGetHour, unsigned char* pucGetMinute, unsigned char* pucGetSecond ) { ChkReady(); outportb( 0x70, 0x00 ); *pucGetSecond = inportb( 0x71 ); outportb( 0x70, 0x02 ); *pucGetMinute = inportb( 0x71 ); outportb( 0x70, 0x04 ); *pucGetHour = inportb( 0x71 ); } void GetCurData( unsigned char* pucGetBuf, unsigned char ucCurHour, unsigned char ucCurMinute, unsigned char ucCurSecond ) { unsigned char ucLasHour = 0; unsigned char ucLasMinute = 0; unsigned char ucLasSecond = 0; if( g_Is24HourMode ) /*--- if( m_IsDate24HourMode ) ---> if begin ---*/ { if( g_IsBCDMode ) { ucLasSecond = BCDToBinary( ucCurSecond ); ucLasMinute = BCDToBinary( ucCurMinute ); ucLasHour = BCDToBinary( ucCurHour ); } else { ucLasSecond = ucCurSecond; ucLasMinute = ucCurMinute; ucLasHour= ucCurHour; } } /*--- if( m_IsDate24HourMode ) ---> if end ---*/ else /*--- if( m_IsDate24HourMode ) ---> else begin ---*/ { if( g_IsBCDMode ) { ucLasSecond = BCDToBinary( ucCurSecond ); ucLasMinute = BCDToBinary( ucCurMinute ); if( ucCurHour & 0x80 ) { ucCurHour &= 0x7F; ucLasHour = BCDToBinary( ucCurHour ); ucLasHour += 12; } else { ucLasHour = BCDToBinary( ucCurHour ); } } else { ucLasSecond = ucCurSecond; ucLasMinute = ucCurMinute; if( ucCurHour & 0x80 ) { ucCurHour &= 0x7F; ucLasHour = ucCurHour + 12; } else { ucLasHour = ucCurHour; } } } /*--- if( m_IsDate24HourMode ) ---> else begin ---*/ sprintf( pucGetBuf, "Current Time: %d Hour:%d Minute:%d Second.\n", ucLasHour, ucLasMinute, ucLasSecond ); } void GetStartDate( unsigned char* pucGetBuf, unsigned char ucCurHour, unsigned char ucCurMinute, unsigned char ucCurSecond ) { unsigned char ucLasHour = 0; unsigned char ucLasMinute = 0; unsigned char ucLasSecond = 0; struct date startDate; getdate( & startDate ); if( g_Is24HourMode ) /*--- if( m_IsDate24HourMode ) ---> if begin ---*/ { if( g_IsBCDMode ) { ucLasSecond = BCDToBinary( ucCurSecond ); ucLasMinute = BCDToBinary( ucCurMinute ); ucLasHour = BCDToBinary( ucCurHour ); } else { ucLasSecond = ucCurSecond; ucLasMinute = ucCurMinute; ucLasHour= ucCurHour; } } /*--- if( m_IsDate24HourMode ) ---> if end ---*/ else /*--- if( m_IsDate24HourMode ) ---> else begin ---*/ { if( g_IsBCDMode ) { ucLasSecond = BCDToBinary( ucCurSecond ); ucLasMinute = BCDToBinary( ucCurMinute ); if( ucCurHour & 0x80 ) { ucCurHour &= 0x7F; ucLasHour = BCDToBinary( ucCurHour ); ucLasHour += 12; } else { ucLasHour = BCDToBinary( ucCurHour ); } } else { ucLasSecond = ucCurSecond; ucLasMinute = ucCurMinute; if( ucCurHour & 0x80 ) { ucCurHour &= 0x7F; ucLasHour = ucCurHour + 12; } else { ucLasHour = ucCurHour; } } } /*--- if( m_IsDate24HourMode ) ---> else begin ---*/ sprintf( pucGetBuf, "Start Time: %d Year-%d Month-%d Day, %d Hour:%d Minute:%d Second.\n", startDate.da_year, startDate.da_mon, startDate.da_day, ucLasHour, ucLasMinute, ucLasSecond ); } void TranRTCDate( unsigned char* pucLasHour, unsigned char* pucLasMinute, unsigned char* pucLasSecond, unsigned char ucCurHour, unsigned char ucCurMinute,