Release 980503
[wine] / misc / system.c
1 /*
2  * SYSTEM DLL routines
3  *
4  * Copyright 1996 Alexandre Julliard
5  */
6
7 #include <stdio.h>
8 #include <stdlib.h>
9 #include <signal.h>
10 #include <time.h>
11 #include <sys/time.h>
12 #include <sys/timeb.h>
13 #include <sys/types.h>
14 #include <sys/wait.h>
15
16 #include "callback.h"
17 #include "windows.h"
18 #include "miscemu.h"
19 #include "debug.h"
20
21 typedef struct
22 {
23     FARPROC16 callback;  /* NULL if not in use */
24     INT32     rate;
25     INT32     ticks;
26 } SYSTEM_TIMER;
27
28 #define NB_SYS_TIMERS   8
29 #define SYS_TIMER_RATE  54925
30
31 static SYSTEM_TIMER SYS_Timers[NB_SYS_TIMERS];
32 static int SYS_NbTimers = 0;
33 static BOOL32 SYS_TimersDisabled = FALSE;
34
35 /***********************************************************************
36  *           SYSTEM_TimerTick
37  */
38 static void SYSTEM_TimerTick(void)
39 {
40     int i;
41
42     for (i = 0; i < NB_SYS_TIMERS; i++)
43     {
44         if (!SYS_Timers[i].callback) continue;
45         if ((SYS_Timers[i].ticks -= SYS_TIMER_RATE) <= 0)
46         {
47             SYS_Timers[i].ticks += SYS_Timers[i].rate;
48             Callbacks->CallSystemTimerProc( SYS_Timers[i].callback );
49         }
50     }
51 }
52
53
54 /**********************************************************************
55  *           SYSTEM_StartTicks
56  *
57  * Start the system tick timer.
58  */
59 static void SYSTEM_StartTicks(void)
60 {
61     static BOOL32 handler_installed = FALSE;
62
63     if (!handler_installed)
64     {
65         handler_installed = TRUE;
66         SIGNAL_SetHandler( SIGALRM, SYSTEM_TimerTick, 1 );
67     }
68 #ifndef __EMX__ /* FIXME: Time don't work... Use BIOS directly instead */
69     {
70         struct itimerval vt_timer;
71
72         vt_timer.it_interval.tv_sec = 0;
73         vt_timer.it_interval.tv_usec = 54929;
74         vt_timer.it_value = vt_timer.it_interval;
75         setitimer( ITIMER_REAL, &vt_timer, NULL );
76     }
77 #endif
78 }
79
80
81 /**********************************************************************
82  *           SYSTEM_StopTicks
83  *
84  * Stop the system tick timer.
85  */
86 static void SYSTEM_StopTicks(void)
87 {
88 #ifndef __EMX__ /* FIXME: Time don't work... Use BIOS directly instead */
89     struct itimerval vt_timer;
90
91     vt_timer.it_interval.tv_sec = 0;
92     vt_timer.it_interval.tv_usec = 0;
93     vt_timer.it_value = vt_timer.it_interval;
94     setitimer( ITIMER_REAL, &vt_timer, NULL );
95 #endif
96 }
97
98
99 /***********************************************************************
100  *           InquireSystem   (SYSTEM.1)
101  *
102  * Note: the function always takes 2 WORD arguments, contrary to what
103  *       "Undocumented Windows" says.
104   */
105 DWORD WINAPI InquireSystem( WORD code, WORD arg )
106 {
107     WORD drivetype;
108
109     switch(code)
110     {
111     case 0:  /* Get timer resolution */
112         return SYS_TIMER_RATE;
113
114     case 1:  /* Get drive type */
115         drivetype = GetDriveType16( arg );
116         return MAKELONG( drivetype, drivetype );
117
118     case 2:  /* Enable one-drive logic */
119         FIXME(system, "Case %d: set single-drive %d not supported\n", code, arg );
120         return 0;
121     }
122     WARN(system, "Unknown code %d\n", code );
123     return 0;
124 }
125
126
127 /***********************************************************************
128  *           CreateSystemTimer   (SYSTEM.2)
129  */
130 WORD WINAPI CreateSystemTimer( WORD rate, FARPROC16 callback )
131 {
132     int i;
133
134     for (i = 0; i < NB_SYS_TIMERS; i++)
135         if (!SYS_Timers[i].callback)  /* Found one */
136         {
137             SYS_Timers[i].rate = (UINT32)rate * 1000;
138             if (SYS_Timers[i].rate < SYS_TIMER_RATE)
139                 SYS_Timers[i].rate = SYS_TIMER_RATE;
140             SYS_Timers[i].ticks = SYS_Timers[i].rate;
141             SYS_Timers[i].callback = callback;
142             if ((++SYS_NbTimers == 1) && !SYS_TimersDisabled)
143                 SYSTEM_StartTicks();
144             return i + 1;  /* 0 means error */
145         }
146     return 0;
147 }
148
149
150 /***********************************************************************
151  *           KillSystemTimer   (SYSTEM.3)
152  *
153  * Note: do not confuse this function with USER.182
154  */
155 WORD WINAPI SYSTEM_KillSystemTimer( WORD timer )
156 {
157     if (!timer || (timer > NB_SYS_TIMERS)) return timer;  /* Error */
158     SYS_Timers[timer-1].callback = NULL;
159     if ((!--SYS_NbTimers) && !SYS_TimersDisabled) SYSTEM_StopTicks();
160     return 0;
161 }
162
163
164 /***********************************************************************
165  *           EnableSystemTimers   (SYSTEM.4)
166  */
167 void WINAPI EnableSystemTimers(void)
168 {
169     SYS_TimersDisabled = FALSE;
170     if (SYS_NbTimers) SYSTEM_StartTicks();
171 }
172
173
174 /***********************************************************************
175  *           DisableSystemTimers   (SYSTEM.5)
176  */
177 void WINAPI DisableSystemTimers(void)
178 {
179     SYS_TimersDisabled = TRUE;
180     if (SYS_NbTimers) SYSTEM_StopTicks();
181 }