msdos/int1a.c

   1 /*
   2  * BIOS interrupt 1ah handler
   3  */
   4
   5 #include <time.h>
   6 #include <sys/time.h>
   7 #include <stdio.h>
   8 #include <stdlib.h>
   9 #include "options.h"
  10 #include "miscemu.h"
  11 #include "stddebug.h"
  12 /* #define DEBUG_INT */
  13 #include "debug.h"
  14
  15 #define BCD_TO_BIN(x) ((x&15) + (x>>4)*10)
  16 #define BIN_TO_BCD(x) ((x%10) + ((x/10)<<4))
  17
  18
  19 /**********************************************************************
  20  *          INT1A_GetTicksSinceMidnight
  21  *
  22  * Return number of clock ticks since midnight.
  23  */
  24 DWORD INT1A_GetTicksSinceMidnight(void)
  25 {
  26     struct tm *bdtime;
  27     struct timeval tvs;
  28     time_t seconds;
  29
  30     /* This should give us the (approximately) correct
  31      * 18.206 clock ticks per second since midnight.
  32      */
  33     gettimeofday( &tvs, NULL );
  34     seconds = tvs.tv_sec;
  35     bdtime = localtime( &seconds );
  36     return (((bdtime->tm_hour * 3600 + bdtime->tm_min * 60 +
  37               bdtime->tm_sec) * 18206) / 1000) +
  38                   (tvs.tv_usec / 54927);
  39 }
  40
  41
  42 /**********************************************************************
  43  *          INT_Int1aHandler
  44  *
  45  * Handler for int 1ah (date and time).
  46  */
  47 void WINAPI INT_Int1aHandler( CONTEXT *context )
  48 {
  49     time_t ltime;
  50     DWORD ticks;
  51     struct tm *bdtime;
  52
  53     switch(AH_reg(context))
  54     {
  55         case 0:
  56             ticks = INT1A_GetTicksSinceMidnight();
  57             CX_reg(context) = HIWORD(ticks);
  58             DX_reg(context) = LOWORD(ticks);
  59             AX_reg(context) = 0;  /* No midnight rollover */
  60             dprintf_int(stddeb,"int1a_00 // ticks=%ld\n", ticks);
  61             break;
  62
  63         case 2:
  64                 ltime = time(NULL);
  65                 bdtime = localtime(&ltime);
  66
  67                 CX_reg(context) = (BIN_TO_BCD(bdtime->tm_hour)<<8) |
  68                                    BIN_TO_BCD(bdtime->tm_min);
  69                 DX_reg(context) = (BIN_TO_BCD(bdtime->tm_sec)<<8);
  70
  71         case 4:
  72                 ltime = time(NULL);
  73                 bdtime = localtime(&ltime);
  74                 CX_reg(context) = (BIN_TO_BCD(bdtime->tm_year/100)<<8) |
  75                                    BIN_TO_BCD((bdtime->tm_year-1900)%100);
  76                 DX_reg(context) = (BIN_TO_BCD(bdtime->tm_mon)<<8) |
  77                                    BIN_TO_BCD(bdtime->tm_mday);
  78                 break;
  79
  80                 /* setting the time,date or RTC is not allow -EB */
  81         case 1:
  82                 /* set system time */
  83         case 3:
  84                 /* set RTC time */
  85         case 5:
  86                 /* set RTC date */
  87         case 6:
  88                 /* set ALARM */
  89         case 7:
  90                 /* cancel ALARM */
  91                 break;
  92
  93         default:
  94                 INT_BARF( context, 0x1a );
  95     }
  96 }