jscript: Sign-compare warnings fix.
[wine] / dlls / ntoskrnl.exe / ntoskrnl.c
1 /*
2  * ntoskrnl.exe implementation
3  *
4  * Copyright (C) 2007 Alexandre Julliard
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #include "config.h"
22 #include "wine/port.h"
23
24 #include <stdarg.h>
25
26 #define NONAMELESSUNION
27 #define NONAMELESSSTRUCT
28
29 #include "ntstatus.h"
30 #define WIN32_NO_STATUS
31 #include "windef.h"
32 #include "winternl.h"
33 #include "excpt.h"
34 #include "ddk/wdm.h"
35 #include "wine/unicode.h"
36 #include "wine/server.h"
37 #include "wine/debug.h"
38
39 WINE_DEFAULT_DEBUG_CHANNEL(ntoskrnl);
40 WINE_DECLARE_DEBUG_CHANNEL(relay);
41
42
43 KSYSTEM_TIME KeTickCount = { 0, 0, 0 };
44
45 typedef struct _KSERVICE_TABLE_DESCRIPTOR
46 {
47     PULONG_PTR Base;
48     PULONG Count;
49     ULONG Limit;
50     PUCHAR Number;
51 } KSERVICE_TABLE_DESCRIPTOR, *PKSERVICE_TABLE_DESCRIPTOR;
52
53 KSERVICE_TABLE_DESCRIPTOR KeServiceDescriptorTable[4] = { { 0 } };
54
55 typedef void (WINAPI *PCREATE_PROCESS_NOTIFY_ROUTINE)(HANDLE,HANDLE,BOOLEAN);
56
57 #ifdef __i386__
58 #define DEFINE_FASTCALL1_ENTRYPOINT( name ) \
59     __ASM_GLOBAL_FUNC( name, \
60                        "popl %eax\n\t" \
61                        "pushl %ecx\n\t" \
62                        "pushl %eax\n\t" \
63                        "jmp " __ASM_NAME("__regs_") #name )
64 #define DEFINE_FASTCALL2_ENTRYPOINT( name ) \
65     __ASM_GLOBAL_FUNC( name, \
66                        "popl %eax\n\t" \
67                        "pushl %edx\n\t" \
68                        "pushl %ecx\n\t" \
69                        "pushl %eax\n\t" \
70                        "jmp " __ASM_NAME("__regs_") #name )
71 #endif
72
73 static inline LPCSTR debugstr_us( const UNICODE_STRING *us )
74 {
75     if (!us) return "<null>";
76     return debugstr_wn( us->Buffer, us->Length / sizeof(WCHAR) );
77 }
78
79 static HANDLE get_device_manager(void)
80 {
81     static HANDLE device_manager;
82     HANDLE handle = 0, ret = device_manager;
83
84     if (!ret)
85     {
86         SERVER_START_REQ( create_device_manager )
87         {
88             req->access     = SYNCHRONIZE;
89             req->attributes = 0;
90             if (!wine_server_call( req )) handle = reply->handle;
91         }
92         SERVER_END_REQ;
93
94         if (!handle)
95         {
96             ERR( "failed to create the device manager\n" );
97             return 0;
98         }
99         if (!(ret = InterlockedCompareExchangePointer( &device_manager, handle, 0 )))
100             ret = handle;
101         else
102             NtClose( handle );  /* somebody beat us to it */
103     }
104     return ret;
105 }
106
107 /* exception handler for emulation of privileged instructions */
108 static LONG CALLBACK vectored_handler( EXCEPTION_POINTERS *ptrs )
109 {
110     extern DWORD __wine_emulate_instruction( EXCEPTION_RECORD *rec, CONTEXT86 *context );
111
112     EXCEPTION_RECORD *record = ptrs->ExceptionRecord;
113     CONTEXT86 *context = ptrs->ContextRecord;
114
115     if (record->ExceptionCode == EXCEPTION_ACCESS_VIOLATION ||
116         record->ExceptionCode == EXCEPTION_PRIV_INSTRUCTION)
117     {
118         if (__wine_emulate_instruction( record, context ) == ExceptionContinueExecution)
119             return EXCEPTION_CONTINUE_EXECUTION;
120     }
121     return EXCEPTION_CONTINUE_SEARCH;
122 }
123
124 /* process an ioctl request for a given device */
125 static NTSTATUS process_ioctl( DEVICE_OBJECT *device, ULONG code, void *in_buff, ULONG in_size,
126                                void *out_buff, ULONG *out_size )
127 {
128     IRP irp;
129     MDL mdl;
130     IO_STACK_LOCATION irpsp;
131     PDRIVER_DISPATCH dispatch = device->DriverObject->MajorFunction[IRP_MJ_DEVICE_CONTROL];
132     NTSTATUS status;
133     LARGE_INTEGER count;
134
135     TRACE( "ioctl %x device %p in_size %u out_size %u\n", code, device, in_size, *out_size );
136
137     /* so we can spot things that we should initialize */
138     memset( &irp, 0x55, sizeof(irp) );
139     memset( &irpsp, 0x66, sizeof(irpsp) );
140     memset( &mdl, 0x77, sizeof(mdl) );
141
142     irp.RequestorMode = UserMode;
143     irp.AssociatedIrp.SystemBuffer = in_buff;
144     irp.UserBuffer = out_buff;
145     irp.MdlAddress = &mdl;
146     irp.Tail.Overlay.s.u.CurrentStackLocation = &irpsp;
147
148     irpsp.MajorFunction = IRP_MJ_DEVICE_CONTROL;
149     irpsp.Parameters.DeviceIoControl.OutputBufferLength = *out_size;
150     irpsp.Parameters.DeviceIoControl.InputBufferLength = in_size;
151     irpsp.Parameters.DeviceIoControl.IoControlCode = code;
152     irpsp.Parameters.DeviceIoControl.Type3InputBuffer = in_buff;
153     irpsp.DeviceObject = device;
154
155     mdl.Next = NULL;
156     mdl.Size = 0;
157     mdl.StartVa = out_buff;
158     mdl.ByteCount = *out_size;
159     mdl.ByteOffset = 0;
160
161     device->CurrentIrp = &irp;
162
163     KeQueryTickCount( &count );  /* update the global KeTickCount */
164
165     if (TRACE_ON(relay))
166         DPRINTF( "%04x:Call driver dispatch %p (device=%p,irp=%p)\n",
167                  GetCurrentThreadId(), dispatch, device, &irp );
168
169     status = dispatch( device, &irp );
170
171     if (TRACE_ON(relay))
172         DPRINTF( "%04x:Ret  driver dispatch %p (device=%p,irp=%p) retval=%08x\n",
173                  GetCurrentThreadId(), dispatch, device, &irp, status );
174
175     *out_size = (irp.IoStatus.u.Status >= 0) ? irp.IoStatus.Information : 0;
176     return irp.IoStatus.u.Status;
177 }
178
179
180 /***********************************************************************
181  *           wine_ntoskrnl_main_loop   (Not a Windows API)
182  */
183 NTSTATUS wine_ntoskrnl_main_loop( HANDLE stop_event )
184 {
185     HANDLE manager = get_device_manager();
186     HANDLE ioctl = 0;
187     NTSTATUS status = STATUS_SUCCESS;
188     ULONG code = 0;
189     void *in_buff, *out_buff = NULL;
190     DEVICE_OBJECT *device = NULL;
191     ULONG in_size = 4096, out_size = 0;
192     HANDLE handles[2];
193
194     if (!(in_buff = HeapAlloc( GetProcessHeap(), 0, in_size )))
195     {
196         ERR( "failed to allocate buffer\n" );
197         return STATUS_NO_MEMORY;
198     }
199
200     handles[0] = stop_event;
201     handles[1] = manager;
202
203     for (;;)
204     {
205         SERVER_START_REQ( get_next_device_request )
206         {
207             req->manager = manager;
208             req->prev = ioctl;
209             req->status = status;
210             wine_server_add_data( req, out_buff, out_size );
211             wine_server_set_reply( req, in_buff, in_size );
212             if (!(status = wine_server_call( req )))
213             {
214                 code     = reply->code;
215                 ioctl    = reply->next;
216                 device   = reply->user_ptr;
217                 in_size  = reply->in_size;
218                 out_size = reply->out_size;
219             }
220             else
221             {
222                 ioctl = 0; /* no previous ioctl */
223                 out_size = 0;
224                 in_size = reply->in_size;
225             }
226         }
227         SERVER_END_REQ;
228
229         switch(status)
230         {
231         case STATUS_SUCCESS:
232             HeapFree( GetProcessHeap(), 0, out_buff );
233             if (out_size) out_buff = HeapAlloc( GetProcessHeap(), 0, out_size );
234             else out_buff = NULL;
235             status = process_ioctl( device, code, in_buff, in_size, out_buff, &out_size );
236             break;
237         case STATUS_BUFFER_OVERFLOW:
238             HeapFree( GetProcessHeap(), 0, in_buff );
239             in_buff = HeapAlloc( GetProcessHeap(), 0, in_size );
240             /* restart with larger buffer */
241             break;
242         case STATUS_PENDING:
243             if (WaitForMultipleObjects( 2, handles, FALSE, INFINITE ) == WAIT_OBJECT_0)
244                 return STATUS_SUCCESS;
245             break;
246         }
247     }
248 }
249
250
251 /***********************************************************************
252  *           IoInitializeIrp  (NTOSKRNL.EXE.@)
253  */
254 void WINAPI IoInitializeIrp( IRP *irp, USHORT size, CCHAR stack_size )
255 {
256     FIXME( "%p, %u, %d\n", irp, size, stack_size );
257 }
258
259
260 /***********************************************************************
261  *           IoAllocateIrp  (NTOSKRNL.EXE.@)
262  */
263 PIRP WINAPI IoAllocateIrp( CCHAR stack_size, BOOLEAN charge_quota )
264 {
265     FIXME( "%d, %d\n", stack_size, charge_quota );
266     return NULL;
267 }
268
269
270 /***********************************************************************
271  *           IoFreeIrp  (NTOSKRNL.EXE.@)
272  */
273 void WINAPI IoFreeIrp( IRP *irp )
274 {
275     FIXME( "%p\n", irp );
276 }
277
278
279 /***********************************************************************
280  *           IoAllocateMdl  (NTOSKRNL.EXE.@)
281  */
282 PMDL WINAPI IoAllocateMdl( PVOID VirtualAddress, ULONG Length, BOOLEAN SecondaryBuffer, BOOLEAN ChargeQuota, PIRP Irp )
283 {
284     FIXME( "stub: %p, %u, %i, %i, %p\n", VirtualAddress, Length, SecondaryBuffer, ChargeQuota, Irp );
285     return NULL;
286 }
287
288
289 /***********************************************************************
290  *           IoAllocateWorkItem  (NTOSKRNL.EXE.@)
291  */
292 PIO_WORKITEM WINAPI IoAllocateWorkItem( PDEVICE_OBJECT DeviceObject )
293 {
294     FIXME( "stub: %p\n", DeviceObject );
295     return NULL;
296 }
297
298
299 /***********************************************************************
300  *           IoCreateDriver   (NTOSKRNL.EXE.@)
301  */
302 NTSTATUS WINAPI IoCreateDriver( UNICODE_STRING *name, PDRIVER_INITIALIZE init )
303 {
304     DRIVER_OBJECT *driver;
305     DRIVER_EXTENSION *extension;
306     NTSTATUS status;
307
308     if (!(driver = RtlAllocateHeap( GetProcessHeap(), HEAP_ZERO_MEMORY,
309                                     sizeof(*driver) + sizeof(*extension) )))
310         return STATUS_NO_MEMORY;
311
312     if ((status = RtlDuplicateUnicodeString( 1, name, &driver->DriverName )))
313     {
314         RtlFreeHeap( GetProcessHeap(), 0, driver );
315         return status;
316     }
317
318     extension = (DRIVER_EXTENSION *)(driver + 1);
319     driver->Size            = sizeof(*driver);
320     driver->DriverInit      = init;
321     driver->DriverExtension = extension;
322     extension->DriverObject   = driver;
323     extension->ServiceKeyName = driver->DriverName;
324
325     status = driver->DriverInit( driver, name );
326
327     if (status)
328     {
329         RtlFreeUnicodeString( &driver->DriverName );
330         RtlFreeHeap( GetProcessHeap(), 0, driver );
331     }
332     return status;
333 }
334
335
336 /***********************************************************************
337  *           IoDeleteDriver   (NTOSKRNL.EXE.@)
338  */
339 void WINAPI IoDeleteDriver( DRIVER_OBJECT *driver )
340 {
341     RtlFreeUnicodeString( &driver->DriverName );
342     RtlFreeHeap( GetProcessHeap(), 0, driver );
343 }
344
345
346 /***********************************************************************
347  *           IoCreateDevice   (NTOSKRNL.EXE.@)
348  */
349 NTSTATUS WINAPI IoCreateDevice( DRIVER_OBJECT *driver, ULONG ext_size,
350                                 UNICODE_STRING *name, DEVICE_TYPE type,
351                                 ULONG characteristics, BOOLEAN exclusive,
352                                 DEVICE_OBJECT **ret_device )
353 {
354     NTSTATUS status;
355     DEVICE_OBJECT *device;
356     HANDLE handle = 0;
357     HANDLE manager = get_device_manager();
358
359     TRACE( "(%p, %u, %s, %u, %x, %u, %p)\n",
360            driver, ext_size, debugstr_us(name), type, characteristics, exclusive, ret_device );
361
362     if (!(device = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*device) + ext_size )))
363         return STATUS_NO_MEMORY;
364
365     SERVER_START_REQ( create_device )
366     {
367         req->access     = 0;
368         req->attributes = 0;
369         req->rootdir    = 0;
370         req->manager    = manager;
371         req->user_ptr   = device;
372         if (name) wine_server_add_data( req, name->Buffer, name->Length );
373         if (!(status = wine_server_call( req ))) handle = reply->handle;
374     }
375     SERVER_END_REQ;
376
377     if (status == STATUS_SUCCESS)
378     {
379         device->DriverObject    = driver;
380         device->DeviceExtension = device + 1;
381         device->DeviceType      = type;
382         device->Reserved        = handle;
383
384         device->NextDevice   = driver->DeviceObject;
385         driver->DeviceObject = device;
386
387         *ret_device = device;
388     }
389     else HeapFree( GetProcessHeap(), 0, device );
390
391     return status;
392 }
393
394
395 /***********************************************************************
396  *           IoDeleteDevice   (NTOSKRNL.EXE.@)
397  */
398 void WINAPI IoDeleteDevice( DEVICE_OBJECT *device )
399 {
400     NTSTATUS status;
401
402     TRACE( "%p\n", device );
403
404     SERVER_START_REQ( delete_device )
405     {
406         req->handle = device->Reserved;
407         status = wine_server_call( req );
408     }
409     SERVER_END_REQ;
410
411     if (status == STATUS_SUCCESS)
412     {
413         DEVICE_OBJECT **prev = &device->DriverObject->DeviceObject;
414         while (*prev && *prev != device) prev = &(*prev)->NextDevice;
415         if (*prev) *prev = (*prev)->NextDevice;
416         NtClose( device->Reserved );
417         HeapFree( GetProcessHeap(), 0, device );
418     }
419 }
420
421
422 /***********************************************************************
423  *           IoCreateSymbolicLink   (NTOSKRNL.EXE.@)
424  */
425 NTSTATUS WINAPI IoCreateSymbolicLink( UNICODE_STRING *name, UNICODE_STRING *target )
426 {
427     HANDLE handle;
428     OBJECT_ATTRIBUTES attr;
429
430     attr.Length                   = sizeof(attr);
431     attr.RootDirectory            = 0;
432     attr.ObjectName               = name;
433     attr.Attributes               = OBJ_CASE_INSENSITIVE | OBJ_OPENIF;
434     attr.SecurityDescriptor       = NULL;
435     attr.SecurityQualityOfService = NULL;
436
437     TRACE( "%s -> %s\n", debugstr_us(name), debugstr_us(target) );
438     /* FIXME: store handle somewhere */
439     return NtCreateSymbolicLinkObject( &handle, SYMBOLIC_LINK_ALL_ACCESS, &attr, target );
440 }
441
442
443 /***********************************************************************
444  *           IoDeleteSymbolicLink   (NTOSKRNL.EXE.@)
445  */
446 NTSTATUS WINAPI IoDeleteSymbolicLink( UNICODE_STRING *name )
447 {
448     FIXME( "%s\n", debugstr_us(name) );
449     return STATUS_SUCCESS;
450 }
451
452
453 /***********************************************************************
454  *           IofCompleteRequest   (NTOSKRNL.EXE.@)
455  */
456 #ifdef DEFINE_FASTCALL2_ENTRYPOINT
457 DEFINE_FASTCALL2_ENTRYPOINT( IofCompleteRequest )
458 void WINAPI __regs_IofCompleteRequest( IRP *irp, UCHAR priority_boost )
459 #else
460 void WINAPI IofCompleteRequest( IRP *irp, UCHAR priority_boost )
461 #endif
462 {
463     TRACE( "%p %u\n", irp, priority_boost );
464     /* nothing to do for now */
465 }
466
467
468 /***********************************************************************
469  *           InterlockedCompareExchange   (NTOSKRNL.EXE.@)
470  */
471 #ifdef DEFINE_FASTCALL2_ENTRYPOINT
472 DEFINE_FASTCALL2_ENTRYPOINT( NTOSKRNL_InterlockedCompareExchange )
473 LONG WINAPI __regs_NTOSKRNL_InterlockedCompareExchange( LONG volatile *dest, LONG xchg, LONG compare )
474 #else
475 LONG WINAPI NTOSKRNL_InterlockedCompareExchange( LONG volatile *dest, LONG xchg, LONG compare )
476 #endif
477 {
478     return InterlockedCompareExchange( dest, xchg, compare );
479 }
480
481
482 /***********************************************************************
483  *           InterlockedDecrement   (NTOSKRNL.EXE.@)
484  */
485 #ifdef DEFINE_FASTCALL1_ENTRYPOINT
486 DEFINE_FASTCALL1_ENTRYPOINT( NTOSKRNL_InterlockedDecrement )
487 LONG WINAPI __regs_NTOSKRNL_InterlockedDecrement( LONG volatile *dest )
488 #else
489 LONG WINAPI NTOSKRNL_InterlockedDecrement( LONG volatile *dest )
490 #endif
491 {
492     return InterlockedDecrement( dest );
493 }
494
495
496 /***********************************************************************
497  *           InterlockedExchange   (NTOSKRNL.EXE.@)
498  */
499 #ifdef DEFINE_FASTCALL2_ENTRYPOINT
500 DEFINE_FASTCALL2_ENTRYPOINT( NTOSKRNL_InterlockedExchange )
501 LONG WINAPI __regs_NTOSKRNL_InterlockedExchange( LONG volatile *dest, LONG val )
502 #else
503 LONG WINAPI NTOSKRNL_InterlockedExchange( LONG volatile *dest, LONG val )
504 #endif
505 {
506     return InterlockedExchange( dest, val );
507 }
508
509
510 /***********************************************************************
511  *           InterlockedExchangeAdd   (NTOSKRNL.EXE.@)
512  */
513 #ifdef DEFINE_FASTCALL2_ENTRYPOINT
514 DEFINE_FASTCALL2_ENTRYPOINT( NTOSKRNL_InterlockedExchangeAdd )
515 LONG WINAPI __regs_NTOSKRNL_InterlockedExchangeAdd( LONG volatile *dest, LONG incr )
516 #else
517 LONG WINAPI NTOSKRNL_InterlockedExchangeAdd( LONG volatile *dest, LONG incr )
518 #endif
519 {
520     return InterlockedExchangeAdd( dest, incr );
521 }
522
523
524 /***********************************************************************
525  *           InterlockedIncrement   (NTOSKRNL.EXE.@)
526  */
527 #ifdef DEFINE_FASTCALL1_ENTRYPOINT
528 DEFINE_FASTCALL1_ENTRYPOINT( NTOSKRNL_InterlockedIncrement )
529 LONG WINAPI __regs_NTOSKRNL_InterlockedIncrement( LONG volatile *dest )
530 #else
531 LONG WINAPI NTOSKRNL_InterlockedIncrement( LONG volatile *dest )
532 #endif
533 {
534     return InterlockedIncrement( dest );
535 }
536
537
538 /***********************************************************************
539  *           ExAllocatePool   (NTOSKRNL.EXE.@)
540  */
541 PVOID WINAPI ExAllocatePool( POOL_TYPE type, SIZE_T size )
542 {
543     return ExAllocatePoolWithTag( type, size, 0 );
544 }
545
546
547 /***********************************************************************
548  *           ExAllocatePoolWithQuota   (NTOSKRNL.EXE.@)
549  */
550 PVOID WINAPI ExAllocatePoolWithQuota( POOL_TYPE type, SIZE_T size )
551 {
552     return ExAllocatePoolWithTag( type, size, 0 );
553 }
554
555
556 /***********************************************************************
557  *           ExAllocatePoolWithTag   (NTOSKRNL.EXE.@)
558  */
559 PVOID WINAPI ExAllocatePoolWithTag( POOL_TYPE type, SIZE_T size, ULONG tag )
560 {
561     /* FIXME: handle page alignment constraints */
562     void *ret = HeapAlloc( GetProcessHeap(), 0, size );
563     TRACE( "%lu pool %u -> %p\n", size, type, ret );
564     return ret;
565 }
566
567
568 /***********************************************************************
569  *           ExAllocatePoolWithQuotaTag   (NTOSKRNL.EXE.@)
570  */
571 PVOID WINAPI ExAllocatePoolWithQuotaTag( POOL_TYPE type, SIZE_T size, ULONG tag )
572 {
573     return ExAllocatePoolWithTag( type, size, tag );
574 }
575
576
577 /***********************************************************************
578  *           ExFreePool   (NTOSKRNL.EXE.@)
579  */
580 void WINAPI ExFreePool( void *ptr )
581 {
582     ExFreePoolWithTag( ptr, 0 );
583 }
584
585
586 /***********************************************************************
587  *           ExFreePoolWithTag   (NTOSKRNL.EXE.@)
588  */
589 void WINAPI ExFreePoolWithTag( void *ptr, ULONG tag )
590 {
591     TRACE( "%p\n", ptr );
592     HeapFree( GetProcessHeap(), 0, ptr );
593 }
594
595
596 /***********************************************************************
597  *           KeInitializeSpinLock   (NTOSKRNL.EXE.@)
598  */
599 void WINAPI KeInitializeSpinLock( PKSPIN_LOCK SpinLock )
600 {
601     FIXME("%p\n", SpinLock);
602 }
603
604
605 /***********************************************************************
606  *           KeInitializeTimerEx   (NTOSKRNL.EXE.@)
607  */
608 void WINAPI KeInitializeTimerEx( PKTIMER Timer, TIMER_TYPE Type )
609 {
610     FIXME("%p %d\n", Timer, Type);
611 }
612
613
614 /***********************************************************************
615  *           KeInitializeTimer   (NTOSKRNL.EXE.@)
616  */
617 void WINAPI KeInitializeTimer( PKTIMER Timer )
618 {
619     KeInitializeTimerEx(Timer, NotificationTimer);
620 }
621
622
623 /**********************************************************************
624  *           KeQueryActiveProcessors   (NTOSKRNL.EXE.@)
625  *
626  * Return the active Processors as bitmask
627  *
628  * RETURNS
629  *   active Processors as bitmask
630  *
631  */
632 KAFFINITY WINAPI KeQueryActiveProcessors( void )
633 {
634     DWORD_PTR AffinityMask;
635
636     GetProcessAffinityMask( GetCurrentProcess(), &AffinityMask, NULL);
637     return AffinityMask;
638 }
639
640
641 /**********************************************************************
642  *           KeQueryInterruptTime   (NTOSKRNL.EXE.@)
643  *
644  * Return the interrupt time count
645  *
646  */
647 ULONGLONG WINAPI KeQueryInterruptTime( void )
648 {
649     LARGE_INTEGER totaltime;
650
651     KeQueryTickCount(&totaltime);
652     return totaltime.QuadPart;
653 }
654
655
656 /***********************************************************************
657  *           KeQuerySystemTime   (NTOSKRNL.EXE.@)
658  */
659 void WINAPI KeQuerySystemTime( LARGE_INTEGER *time )
660 {
661     NtQuerySystemTime( time );
662 }
663
664
665 /***********************************************************************
666  *           KeQueryTickCount   (NTOSKRNL.EXE.@)
667  */
668 void WINAPI KeQueryTickCount( LARGE_INTEGER *count )
669 {
670     count->QuadPart = NtGetTickCount();
671     /* update the global variable too */
672     KeTickCount.LowPart   = count->u.LowPart;
673     KeTickCount.High1Time = count->u.HighPart;
674     KeTickCount.High2Time = count->u.HighPart;
675 }
676
677
678 /***********************************************************************
679  *           KeQueryTimeIncrement   (NTOSKRNL.EXE.@)
680  */
681 ULONG WINAPI KeQueryTimeIncrement(void)
682 {
683     return 10000;
684 }
685
686
687 /***********************************************************************
688  *           MmAllocateNonCachedMemory   (NTOSKRNL.EXE.@)
689  */
690 PVOID WINAPI MmAllocateNonCachedMemory( SIZE_T size )
691 {
692     TRACE( "%lu\n", size );
693     return VirtualAlloc( NULL, size, MEM_RESERVE|MEM_COMMIT, PAGE_READWRITE|PAGE_NOCACHE );
694 }
695
696
697 /***********************************************************************
698  *           MmFreeNonCachedMemory   (NTOSKRNL.EXE.@)
699  */
700 void WINAPI MmFreeNonCachedMemory( void *addr, SIZE_T size )
701 {
702     TRACE( "%p %lu\n", addr, size );
703     VirtualFree( addr, 0, MEM_RELEASE );
704 }
705
706 /***********************************************************************
707  *           MmIsAddressValid   (NTOSKRNL.EXE.@)
708  *
709  * Check if the process can access the virtual address without a pagefault
710  *
711  * PARAMS
712  *  VirtualAddress [I] Address to check
713  *
714  * RETURNS
715  *  Failure: FALSE
716  *  Success: TRUE  (Accessing the Address works without a Pagefault)
717  *
718  */
719 BOOLEAN WINAPI MmIsAddressValid(PVOID VirtualAddress)
720 {
721     TRACE("(%p)\n", VirtualAddress);
722     return !IsBadWritePtr(VirtualAddress, 1);
723 }
724
725 /***********************************************************************
726  *           MmPageEntireDriver   (NTOSKRNL.EXE.@)
727  */
728 PVOID WINAPI MmPageEntireDriver(PVOID AddrInSection)
729 {
730     TRACE("%p\n", AddrInSection);
731     return AddrInSection;
732 }
733
734 /***********************************************************************
735  *           MmResetDriverPaging   (NTOSKRNL.EXE.@)
736  */
737 void WINAPI MmResetDriverPaging(PVOID AddrInSection)
738 {
739     TRACE("%p\n", AddrInSection);
740 }
741
742 /***********************************************************************
743  *           PsCreateSystemThread   (NTOSKRNL.EXE.@)
744  */
745 NTSTATUS WINAPI PsCreateSystemThread(PHANDLE ThreadHandle, ULONG DesiredAccess,
746                                      POBJECT_ATTRIBUTES ObjectAttributes,
747                                      HANDLE ProcessHandle, PCLIENT_ID ClientId,
748                                      PKSTART_ROUTINE StartRoutine, PVOID StartContext)
749 {
750     if (!ProcessHandle) ProcessHandle = GetCurrentProcess();
751     return RtlCreateUserThread(ProcessHandle, 0, FALSE, 0, 0,
752                                0, StartRoutine, StartContext,
753                                ThreadHandle, ClientId);
754 }
755
756 /***********************************************************************
757  *           PsGetCurrentProcessId   (NTOSKRNL.EXE.@)
758  */
759 HANDLE WINAPI PsGetCurrentProcessId(void)
760 {
761     return (HANDLE)GetCurrentProcessId();  /* FIXME: not quite right... */
762 }
763
764
765 /***********************************************************************
766  *           PsGetCurrentThreadId   (NTOSKRNL.EXE.@)
767  */
768 HANDLE WINAPI PsGetCurrentThreadId(void)
769 {
770     return (HANDLE)GetCurrentThreadId();  /* FIXME: not quite right... */
771 }
772
773
774 /***********************************************************************
775  *           PsGetVersion   (NTOSKRNL.EXE.@)
776  */
777 BOOLEAN WINAPI PsGetVersion(ULONG *major, ULONG *minor, ULONG *build, UNICODE_STRING *version )
778 {
779     RTL_OSVERSIONINFOEXW info;
780
781     RtlGetVersion( &info );
782     if (major) *major = info.dwMajorVersion;
783     if (minor) *minor = info.dwMinorVersion;
784     if (build) *build = info.dwBuildNumber;
785
786     if (version)
787     {
788 #if 0  /* FIXME: GameGuard passes an uninitialized pointer in version->Buffer */
789         size_t len = min( strlenW(info.szCSDVersion)*sizeof(WCHAR), version->MaximumLength );
790         memcpy( version->Buffer, info.szCSDVersion, len );
791         if (len < version->MaximumLength) version->Buffer[len / sizeof(WCHAR)] = 0;
792         version->Length = len;
793 #endif
794     }
795     return TRUE;
796 }
797
798
799 /***********************************************************************
800  *           PsSetCreateProcessNotifyRoutine   (NTOSKRNL.EXE.@)
801  */
802 NTSTATUS WINAPI PsSetCreateProcessNotifyRoutine( PCREATE_PROCESS_NOTIFY_ROUTINE callback, BOOLEAN remove )
803 {
804     FIXME( "stub: %p %d\n", callback, remove );
805     return STATUS_SUCCESS;
806 }
807
808
809 /*****************************************************
810  *           DllMain
811  */
812 BOOL WINAPI DllMain( HINSTANCE inst, DWORD reason, LPVOID reserved )
813 {
814     LARGE_INTEGER count;
815
816     switch(reason)
817     {
818     case DLL_PROCESS_ATTACH:
819         DisableThreadLibraryCalls( inst );
820         RtlAddVectoredExceptionHandler( TRUE, vectored_handler );
821         KeQueryTickCount( &count );  /* initialize the global KeTickCount */
822         break;
823     }
824     return TRUE;
825 }