git.oblomov.eu Git - wine/blob - miscemu/int1a.c

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