76 lines
1.9 KiB
C
76 lines
1.9 KiB
C
#include <time.h>
|
|
#include <sys/time.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include "registers.h"
|
|
#include "wine.h"
|
|
#include "options.h"
|
|
#include "miscemu.h"
|
|
#include "stddebug.h"
|
|
/* #define DEBUG_INT */
|
|
#include "debug.h"
|
|
|
|
#define BCD_TO_BIN(x) ((x&15) + (x>>4)*10)
|
|
#define BIN_TO_BCD(x) ((x%10) + ((x/10)<<4))
|
|
|
|
int do_int1a(struct sigcontext_struct * context){
|
|
time_t ltime;
|
|
DWORD ticks;
|
|
struct tm *bdtime;
|
|
struct timeval tvs;
|
|
|
|
dprintf_int(stddeb,"int1A: AX %04x, BX %04x, CX %04x, DX %04x, "
|
|
"SI %04x, DI %04x, DS %04x, ES %04x\n",
|
|
AX, BX, CX, DX, SI, DI, DS, ES);
|
|
|
|
switch(AH) {
|
|
case 0:
|
|
/* This should give us the (approximately) correct
|
|
* 18.206 clock ticks per second since midnight
|
|
* expected from this interrupt
|
|
*/
|
|
gettimeofday(&tvs, NULL);
|
|
bdtime = localtime(&tvs.tv_sec);
|
|
ticks = (((bdtime->tm_hour * 3600 + bdtime->tm_min * 60 +
|
|
bdtime->tm_sec) * 18206) / 1000) +
|
|
(tvs.tv_usec / 54927);
|
|
CX = ticks >> 16;
|
|
DX = ticks & 0x0000FFFF;
|
|
AX = 0; /* No midnight rollover */
|
|
dprintf_int(stddeb,"int1a_00 // ticks=%ld\n", ticks);
|
|
break;
|
|
|
|
case 2:
|
|
ltime = time(NULL);
|
|
bdtime = localtime(<ime);
|
|
|
|
CX = (BIN_TO_BCD(bdtime->tm_hour)<<8) | BIN_TO_BCD(bdtime->tm_min);
|
|
DX = (BIN_TO_BCD(bdtime->tm_sec)<<8);
|
|
|
|
case 4:
|
|
ltime = time(NULL);
|
|
bdtime = localtime(<ime);
|
|
CX = (BIN_TO_BCD(bdtime->tm_year/100)<<8) | BIN_TO_BCD((bdtime->tm_year-1900)%100);
|
|
DX = (BIN_TO_BCD(bdtime->tm_mon)<<8) | BIN_TO_BCD(bdtime->tm_mday);
|
|
break;
|
|
|
|
/* setting the time,date or RTC is not allow -EB */
|
|
case 1:
|
|
/* set system time */
|
|
case 3:
|
|
/* set RTC time */
|
|
case 5:
|
|
/* set RTC date */
|
|
case 6:
|
|
/* set ALARM */
|
|
case 7:
|
|
/* cancel ALARM */
|
|
break;
|
|
|
|
default:
|
|
IntBarf(0x1a, context);
|
|
return 1;
|
|
};
|
|
return 1;
|
|
}
|