In NtQuerySystemInformation, handle request for information class 1,
[wine] / dlls / ntdll / nt.c
1 /*
2  * NT basis DLL
3  *
4  * This file contains the Nt* API functions of NTDLL.DLL.
5  * In the original ntdll.dll they all seem to just call int 0x2e (down to the NTOSKRNL)
6  *
7  * Copyright 1996-1998 Marcus Meissner
8  *
9  * This library is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * This library is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with this library; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
22  */
23
24 #include <stdarg.h>
25 #include <stdio.h>
26 #include <stdlib.h>
27 #include <string.h>
28 #include <time.h>
29 #include "wine/debug.h"
30
31 #include "windef.h"
32 #include "winbase.h"
33 #include "winreg.h"
34 #include "winternl.h"
35 #include "ntdll_misc.h"
36 #include "wine/server.h"
37
38 WINE_DEFAULT_DEBUG_CHANNEL(ntdll);
39
40 /* Structures used by NtConnectPort */
41
42 typedef struct LpcSectionInfo
43 {
44   DWORD Length;
45   HANDLE SectionHandle;
46   DWORD Param1;
47   DWORD SectionSize;
48   DWORD ClientBaseAddress;
49   DWORD ServerBaseAddress;
50 } LPCSECTIONINFO, *PLPCSECTIONINFO;
51
52 typedef struct LpcSectionMapInfo
53 {
54   DWORD Length;
55   DWORD SectionSize;
56   DWORD ServerBaseAddress;
57 } LPCSECTIONMAPINFO, *PLPCSECTIONMAPINFO;
58
59 /* Structure used by NtAcceptConnectPort, NtReplyWaitReceivePort */
60
61 #define MAX_MESSAGE_DATA 328
62
63 typedef struct LpcMessage
64 {
65   WORD ActualMessageLength;
66   WORD TotalMessageLength;
67   DWORD MessageType;
68   DWORD ClientProcessId;
69   DWORD ClientThreadId;
70   DWORD MessageId;
71   DWORD SharedSectionSize;
72   BYTE MessageData[MAX_MESSAGE_DATA];
73 } LPCMESSAGE, *PLPCMESSAGE;
74
75 /*
76  *      Token
77  */
78
79 /******************************************************************************
80  *  NtDuplicateToken            [NTDLL.@]
81  *  ZwDuplicateToken            [NTDLL.@]
82  */
83 NTSTATUS WINAPI NtDuplicateToken(
84         IN HANDLE ExistingToken,
85         IN ACCESS_MASK DesiredAccess,
86         IN POBJECT_ATTRIBUTES ObjectAttributes,
87         IN SECURITY_IMPERSONATION_LEVEL ImpersonationLevel,
88         IN TOKEN_TYPE TokenType,
89         OUT PHANDLE NewToken)
90 {
91         FIXME("(%p,0x%08lx,%p,0x%08x,0x%08x,%p),stub!\n",
92         ExistingToken, DesiredAccess, ObjectAttributes,
93         ImpersonationLevel, TokenType, NewToken);
94         dump_ObjectAttributes(ObjectAttributes);
95         return 0;
96 }
97
98 /******************************************************************************
99  *  NtOpenProcessToken          [NTDLL.@]
100  *  ZwOpenProcessToken          [NTDLL.@]
101  */
102 NTSTATUS WINAPI NtOpenProcessToken(
103         HANDLE ProcessHandle,
104         DWORD DesiredAccess,
105         HANDLE *TokenHandle)
106 {
107     NTSTATUS ret;
108
109     TRACE("(%p,0x%08lx,%p)\n", ProcessHandle,DesiredAccess, TokenHandle);
110
111     SERVER_START_REQ( open_token )
112     {
113         req->handle = ProcessHandle;
114         req->flags  = 0;
115         ret = wine_server_call( req );
116         if (!ret) *TokenHandle = reply->token;
117     }
118     SERVER_END_REQ;
119
120     return ret;
121 }
122
123 /******************************************************************************
124  *  NtOpenThreadToken           [NTDLL.@]
125  *  ZwOpenThreadToken           [NTDLL.@]
126  */
127 NTSTATUS WINAPI NtOpenThreadToken(
128         HANDLE ThreadHandle,
129         DWORD DesiredAccess,
130         BOOLEAN OpenAsSelf,
131         HANDLE *TokenHandle)
132 {
133     NTSTATUS ret;
134
135     TRACE("(%p,0x%08lx,0x%08x,%p)\n",
136           ThreadHandle,DesiredAccess, OpenAsSelf, TokenHandle);
137
138     SERVER_START_REQ( open_token )
139     {
140         req->handle = ThreadHandle;
141         req->flags  = OPEN_TOKEN_THREAD;
142         if (OpenAsSelf) req->flags |= OPEN_TOKEN_AS_SELF;
143         ret = wine_server_call( req );
144         if (!ret) *TokenHandle = reply->token;
145     }
146     SERVER_END_REQ;
147
148     return ret;
149 }
150
151 /******************************************************************************
152  *  NtAdjustPrivilegesToken             [NTDLL.@]
153  *  ZwAdjustPrivilegesToken             [NTDLL.@]
154  *
155  * FIXME: parameters unsafe
156  */
157 NTSTATUS WINAPI NtAdjustPrivilegesToken(
158         IN HANDLE TokenHandle,
159         IN BOOLEAN DisableAllPrivileges,
160         IN PTOKEN_PRIVILEGES NewState,
161         IN DWORD BufferLength,
162         OUT PTOKEN_PRIVILEGES PreviousState,
163         OUT PDWORD ReturnLength)
164 {
165         FIXME("(%p,0x%08x,%p,0x%08lx,%p,%p),stub!\n",
166         TokenHandle, DisableAllPrivileges, NewState, BufferLength, PreviousState, ReturnLength);
167         return 0;
168 }
169
170 /******************************************************************************
171 *  NtQueryInformationToken              [NTDLL.@]
172 *  ZwQueryInformationToken              [NTDLL.@]
173 *
174 * NOTES
175 *  Buffer for TokenUser:
176 *   0x00 TOKEN_USER the PSID field points to the SID
177 *   0x08 SID
178 *
179 */
180 NTSTATUS WINAPI NtQueryInformationToken(
181         HANDLE token,
182         DWORD tokeninfoclass,
183         LPVOID tokeninfo,
184         DWORD tokeninfolength,
185         LPDWORD retlen )
186 {
187     unsigned int len = 0;
188
189     TRACE("(%p,%ld,%p,%ld,%p)\n",
190           token,tokeninfoclass,tokeninfo,tokeninfolength,retlen);
191
192     switch (tokeninfoclass)
193     {
194     case TokenUser:
195         len = sizeof(TOKEN_USER) + sizeof(SID);
196         break;
197     case TokenGroups:
198         len = sizeof(TOKEN_GROUPS);
199         break;
200     case TokenPrivileges:
201         len = sizeof(TOKEN_PRIVILEGES);
202         break;
203     case TokenOwner:
204         len = sizeof(TOKEN_OWNER) + sizeof(SID);
205         break;
206     case TokenPrimaryGroup:
207         len = sizeof(TOKEN_PRIMARY_GROUP);
208         break;
209     case TokenDefaultDacl:
210         len = sizeof(TOKEN_DEFAULT_DACL);
211         break;
212     case TokenSource:
213         len = sizeof(TOKEN_SOURCE);
214         break;
215     case TokenType:
216         len = sizeof (TOKEN_TYPE);
217         break;
218 #if 0
219     case TokenImpersonationLevel:
220     case TokenStatistics:
221 #endif /* 0 */
222     }
223
224     /* FIXME: what if retlen == NULL ? */
225     *retlen = len;
226
227     if (tokeninfolength < len)
228         return STATUS_BUFFER_TOO_SMALL;
229
230     switch (tokeninfoclass)
231     {
232     case TokenUser:
233         if( tokeninfo )
234         {
235             TOKEN_USER * tuser = tokeninfo;
236             PSID sid = (PSID) (tuser + 1);
237             SID_IDENTIFIER_AUTHORITY localSidAuthority = {SECURITY_NT_AUTHORITY};
238             RtlInitializeSid(sid, &localSidAuthority, 1);
239             *(RtlSubAuthoritySid(sid, 0)) = SECURITY_INTERACTIVE_RID;
240             tuser->User.Sid = sid;
241         }
242         break;
243     case TokenGroups:
244         if (tokeninfo)
245         {
246             TOKEN_GROUPS *tgroups = tokeninfo;
247             SID_IDENTIFIER_AUTHORITY sid = {SECURITY_NT_AUTHORITY};
248
249             /* we need to show admin privileges ! */
250             tgroups->GroupCount = 1;
251             tgroups->Groups->Attributes = SE_GROUP_ENABLED;
252             RtlAllocateAndInitializeSid( &sid,
253                                          2,
254                                          SECURITY_BUILTIN_DOMAIN_RID,
255                                          DOMAIN_ALIAS_RID_ADMINS,
256                                          0, 0, 0, 0, 0, 0,
257                                          &(tgroups->Groups->Sid));
258         }
259         break;
260     case TokenPrimaryGroup:
261         if (tokeninfo)
262         {
263             TOKEN_PRIMARY_GROUP *tgroup = tokeninfo;
264             SID_IDENTIFIER_AUTHORITY sid = {SECURITY_NT_AUTHORITY};
265             RtlAllocateAndInitializeSid( &sid,
266                                          2,
267                                          SECURITY_BUILTIN_DOMAIN_RID,
268                                          DOMAIN_ALIAS_RID_ADMINS,
269                                          0, 0, 0, 0, 0, 0,
270                                          &(tgroup->PrimaryGroup));
271         }
272         break;
273     case TokenPrivileges:
274         if (tokeninfo)
275         {
276             TOKEN_PRIVILEGES *tpriv = tokeninfo;
277             tpriv->PrivilegeCount = 1;
278         }
279         break;
280     case TokenOwner:
281         if (tokeninfo)
282         {
283             TOKEN_OWNER *owner = tokeninfo;
284             PSID sid = (PSID) (owner + 1);
285             SID_IDENTIFIER_AUTHORITY localSidAuthority = {SECURITY_NT_AUTHORITY};
286             RtlInitializeSid(sid, &localSidAuthority, 1);
287             *(RtlSubAuthoritySid(sid, 0)) = SECURITY_INTERACTIVE_RID;
288             owner->Owner = sid;
289         }
290         break;
291     default:
292         {
293             ERR("Unhandled Token Information class %ld!\n", tokeninfoclass);
294             return STATUS_NOT_IMPLEMENTED;
295         }
296     }
297     return 0;
298 }
299
300 /******************************************************************************
301 *  NtSetInformationToken                [NTDLL.@]
302 *  ZwSetInformationToken                [NTDLL.@]
303 */
304 NTSTATUS WINAPI NtSetInformationToken(
305         HANDLE TokenHandle,
306         TOKEN_INFORMATION_CLASS TokenInformationClass,
307         PVOID TokenInformation,
308         ULONG TokenInformationLength)
309 {
310     FIXME("%p %d %p %lu\n", TokenHandle, TokenInformationClass,
311           TokenInformation, TokenInformationLength);
312     return STATUS_NOT_IMPLEMENTED;
313 }
314
315 /******************************************************************************
316 *  NtAdjustGroupsToken          [NTDLL.@]
317 *  ZwAdjustGroupsToken          [NTDLL.@]
318 */
319 NTSTATUS WINAPI NtAdjustGroupsToken(
320         HANDLE TokenHandle,
321         BOOLEAN ResetToDefault,
322         PTOKEN_GROUPS NewState,
323         ULONG BufferLength,
324         PTOKEN_GROUPS PreviousState,
325         PULONG ReturnLength)
326 {
327     FIXME("%p %d %p %lu %p %p\n", TokenHandle, ResetToDefault,
328           NewState, BufferLength, PreviousState, ReturnLength);
329     return STATUS_NOT_IMPLEMENTED;
330 }
331
332 /*
333  *      Section
334  */
335
336 /******************************************************************************
337  *  NtQuerySection      [NTDLL.@]
338  */
339 NTSTATUS WINAPI NtQuerySection(
340         IN HANDLE SectionHandle,
341         IN PVOID SectionInformationClass,
342         OUT PVOID SectionInformation,
343         IN ULONG Length,
344         OUT PULONG ResultLength)
345 {
346         FIXME("(%p,%p,%p,0x%08lx,%p) stub!\n",
347         SectionHandle,SectionInformationClass,SectionInformation,Length,ResultLength);
348         return 0;
349 }
350
351 /*
352  *      ports
353  */
354
355 /******************************************************************************
356  *  NtCreatePort                [NTDLL.@]
357  *  ZwCreatePort                [NTDLL.@]
358  */
359 NTSTATUS WINAPI NtCreatePort(PHANDLE PortHandle,POBJECT_ATTRIBUTES ObjectAttributes,
360                              DWORD MaxConnectInfoLength,DWORD MaxDataLength,DWORD unknown)
361 {
362   FIXME("(%p,%p,0x%08lx,0x%08lx,0x%08lx),stub!\n",PortHandle,ObjectAttributes,
363         MaxConnectInfoLength,MaxDataLength,unknown);
364   return 0;
365 }
366
367 /******************************************************************************
368  *  NtConnectPort               [NTDLL.@]
369  *  ZwConnectPort               [NTDLL.@]
370  */
371 NTSTATUS WINAPI NtConnectPort(PHANDLE PortHandle,PUNICODE_STRING PortName,PVOID Unknown1,
372                               PLPCSECTIONINFO sectionInfo,PLPCSECTIONMAPINFO mapInfo,PVOID Unknown2,
373                               PVOID ConnectInfo,PDWORD pConnectInfoLength)
374 {
375   FIXME("(%p,%s,%p,%p,%p,%p,%p,%p (%ld)),stub!\n",PortHandle,debugstr_w(PortName->Buffer),Unknown1,
376         sectionInfo,mapInfo,Unknown2,ConnectInfo,pConnectInfoLength,pConnectInfoLength?*pConnectInfoLength:-1);
377   if(ConnectInfo && pConnectInfoLength)
378     TRACE("\tMessage = %s\n",debugstr_an(ConnectInfo,*pConnectInfoLength));
379   return 0;
380 }
381
382 /******************************************************************************
383  *  NtListenPort                [NTDLL.@]
384  *  ZwListenPort                [NTDLL.@]
385  */
386 NTSTATUS WINAPI NtListenPort(HANDLE PortHandle,PLPCMESSAGE pLpcMessage)
387 {
388   FIXME("(%p,%p),stub!\n",PortHandle,pLpcMessage);
389   return 0;
390 }
391
392 /******************************************************************************
393  *  NtAcceptConnectPort [NTDLL.@]
394  *  ZwAcceptConnectPort [NTDLL.@]
395  */
396 NTSTATUS WINAPI NtAcceptConnectPort(PHANDLE PortHandle,DWORD Unknown,PLPCMESSAGE pLpcMessage,
397                                     DWORD acceptIt,DWORD Unknown2,PLPCSECTIONMAPINFO mapInfo)
398 {
399   FIXME("(%p,0x%08lx,%p,0x%08lx,0x%08lx,%p),stub!\n",PortHandle,Unknown,pLpcMessage,acceptIt,Unknown2,mapInfo);
400   return 0;
401 }
402
403 /******************************************************************************
404  *  NtCompleteConnectPort       [NTDLL.@]
405  *  ZwCompleteConnectPort       [NTDLL.@]
406  */
407 NTSTATUS WINAPI NtCompleteConnectPort(HANDLE PortHandle)
408 {
409   FIXME("(%p),stub!\n",PortHandle);
410   return 0;
411 }
412
413 /******************************************************************************
414  *  NtRegisterThreadTerminatePort       [NTDLL.@]
415  *  ZwRegisterThreadTerminatePort       [NTDLL.@]
416  */
417 NTSTATUS WINAPI NtRegisterThreadTerminatePort(HANDLE PortHandle)
418 {
419   FIXME("(%p),stub!\n",PortHandle);
420   return 0;
421 }
422
423 /******************************************************************************
424  *  NtRequestWaitReplyPort              [NTDLL.@]
425  *  ZwRequestWaitReplyPort              [NTDLL.@]
426  */
427 NTSTATUS WINAPI NtRequestWaitReplyPort(HANDLE PortHandle,PLPCMESSAGE pLpcMessageIn,PLPCMESSAGE pLpcMessageOut)
428 {
429   FIXME("(%p,%p,%p),stub!\n",PortHandle,pLpcMessageIn,pLpcMessageOut);
430   if(pLpcMessageIn)
431   {
432     TRACE("Message to send:\n");
433     TRACE("\tActualMessageLength = %d\n",pLpcMessageIn->ActualMessageLength);
434     TRACE("\tTotalMessageLength  = %d\n",pLpcMessageIn->TotalMessageLength);
435     TRACE("\tMessageType         = %ld\n",pLpcMessageIn->MessageType);
436     TRACE("\tClientProcessId     = %ld\n",pLpcMessageIn->ClientProcessId);
437     TRACE("\tClientThreadId      = %ld\n",pLpcMessageIn->ClientThreadId);
438     TRACE("\tMessageId           = %ld\n",pLpcMessageIn->MessageId);
439     TRACE("\tSharedSectionSize   = %ld\n",pLpcMessageIn->SharedSectionSize);
440     TRACE("\tMessageData         = %s\n",debugstr_an(pLpcMessageIn->MessageData,pLpcMessageIn->ActualMessageLength));
441   }
442   return 0;
443 }
444
445 /******************************************************************************
446  *  NtReplyWaitReceivePort      [NTDLL.@]
447  *  ZwReplyWaitReceivePort      [NTDLL.@]
448  */
449 NTSTATUS WINAPI NtReplyWaitReceivePort(HANDLE PortHandle,PDWORD Unknown,PLPCMESSAGE pLpcMessageOut,PLPCMESSAGE pLpcMessageIn)
450 {
451   FIXME("(%p,%p,%p,%p),stub!\n",PortHandle,Unknown,pLpcMessageOut,pLpcMessageIn);
452   return 0;
453 }
454
455 /*
456  *      Misc
457  */
458
459  /******************************************************************************
460  *  NtSetIntervalProfile        [NTDLL.@]
461  *  ZwSetIntervalProfile        [NTDLL.@]
462  */
463 NTSTATUS WINAPI NtSetIntervalProfile(DWORD x1,DWORD x2) {
464         FIXME("(0x%08lx,0x%08lx),stub!\n",x1,x2);
465         return 0;
466 }
467
468 /******************************************************************************
469  *  NtQueryPerformanceCounter   [NTDLL.@]
470  *
471  *  Note: Windows uses a timer clocked at a multiple of 1193182 Hz.
472  *  
473  */
474 NTSTATUS WINAPI NtQueryPerformanceCounter(
475         OUT PLARGE_INTEGER Counter,
476         OUT PLARGE_INTEGER Frequency)
477 {
478     LARGE_INTEGER time;
479     NtQuerySystemTime( &time );
480     Counter->QuadPart = time.QuadPart;
481     Frequency->QuadPart = 10000000;
482     return 0;
483 }
484
485 /******************************************************************************
486  *  NtCreateMailslotFile        [NTDLL.@]
487  *  ZwCreateMailslotFile        [NTDLL.@]
488  */
489 NTSTATUS WINAPI NtCreateMailslotFile(DWORD x1,DWORD x2,DWORD x3,DWORD x4,DWORD x5,DWORD x6,DWORD x7,DWORD x8)
490 {
491         FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub!\n",x1,x2,x3,x4,x5,x6,x7,x8);
492         return 0;
493 }
494
495 /******************************************************************************
496  * NtQuerySystemInformation [NTDLL.@]
497  * ZwQuerySystemInformation [NTDLL.@]
498  *
499  * ARGUMENTS:
500  *  SystemInformationClass      Index to a certain information structure
501  *      SystemTimeAdjustmentInformation SYSTEM_TIME_ADJUSTMENT
502  *      SystemCacheInformation          SYSTEM_CACHE_INFORMATION
503  *      SystemConfigurationInformation  CONFIGURATION_INFORMATION
504  *      observed (class/len):
505  *              0x0/0x2c
506  *              0x12/0x18
507  *              0x2/0x138
508  *              0x8/0x600
509  *              0x25/0xc
510  *  SystemInformation   caller supplies storage for the information structure
511  *  Length              size of the structure
512  *  ResultLength        Data written
513  */
514 NTSTATUS WINAPI NtQuerySystemInformation(
515         IN SYSTEM_INFORMATION_CLASS SystemInformationClass,
516         OUT PVOID SystemInformation,
517         IN ULONG Length,
518         OUT PULONG ResultLength)
519 {
520     NTSTATUS    ret = STATUS_SUCCESS;
521     ULONG       len = 0;
522
523     TRACE("(0x%08x,%p,0x%08lx,%p)\n",
524           SystemInformationClass,SystemInformation,Length,ResultLength);
525
526     switch (SystemInformationClass)
527     {
528     case SystemBasicInformation:
529         {
530             SYSTEM_BASIC_INFORMATION* sbi = (SYSTEM_BASIC_INFORMATION*)SystemInformation;
531             if (Length >= sizeof(*sbi))
532             {
533                 sbi->dwUnknown1 = 0;
534                 sbi->uKeMaximumIncrement = 0;
535                 sbi->uPageSize = 1024; /* FIXME */
536                 sbi->uMmNumberOfPhysicalPages = 12345; /* FIXME */
537                 sbi->uMmLowestPhysicalPage = 0; /* FIXME */
538                 sbi->uMmHighestPhysicalPage = 12345; /* FIXME */
539                 sbi->uAllocationGranularity = 65536; /* FIXME */
540                 sbi->pLowestUserAddress = 0; /* FIXME */
541                 sbi->pMmHighestUserAddress = (void*)~0; /* FIXME */
542                 sbi->uKeActiveProcessors = 1; /* FIXME */
543                 sbi->bKeNumberProcessors = 1; /* FIXME */
544                 len = sizeof(*sbi);
545             }
546             else ret = STATUS_INFO_LENGTH_MISMATCH;
547         }
548         break;
549     case SystemCpuInformation:
550         {
551             SYSTEM_CPU_INFORMATION* sci;
552             sci = (SYSTEM_CPU_INFORMATION *) SystemInformation;
553             if (Length >= sizeof(*sci))
554             {
555                 /* FIXME: move some code from kernel/cpu.c to process this */
556                 sci->Architecture = PROCESSOR_ARCHITECTURE_INTEL;
557                 sci->Level = 6; /* 686, aka Pentium II+ */
558                 sci->Revision = 0;
559                 sci->Reserved = 0;
560                 sci->FeatureSet = 0x1fff;
561             }
562             else ret = STATUS_INFO_LENGTH_MISMATCH;
563         }
564         break;
565     case SystemPerformanceInformation:
566         {
567             SYSTEM_PERFORMANCE_INFORMATION* spi = (SYSTEM_PERFORMANCE_INFORMATION*)SystemInformation;
568             if (Length >= sizeof(*spi))
569             {
570                 memset(spi, 0, sizeof(*spi)); /* FIXME */
571                 len = sizeof(*spi);
572             }
573             else ret = STATUS_INFO_LENGTH_MISMATCH;
574         }
575         break;
576     case SystemTimeOfDayInformation:
577         {
578             SYSTEM_TIMEOFDAY_INFORMATION* sti = (SYSTEM_TIMEOFDAY_INFORMATION*)SystemInformation;
579             if (Length >= sizeof(*sti))
580             {
581                 sti->liKeBootTime.QuadPart = 0; /* FIXME */
582                 sti->liKeSystemTime.QuadPart = 0; /* FIXME */
583                 sti->liExpTimeZoneBias.QuadPart  = 0; /* FIXME */
584                 sti->uCurrentTimeZoneId = 0; /* FIXME */
585                 sti->dwReserved = 0;
586                 len = sizeof(*sti);
587             }
588             else ret = STATUS_INFO_LENGTH_MISMATCH;
589         }
590         break;
591     case SystemProcessInformation:
592         {
593             SYSTEM_PROCESS_INFORMATION* spi = (SYSTEM_PROCESS_INFORMATION*)SystemInformation;
594             SYSTEM_PROCESS_INFORMATION* last = NULL;
595             HANDLE hSnap = 0;
596             WCHAR procname[1024];
597             DWORD wlen = 0;
598
599             SERVER_START_REQ( create_snapshot )
600             {
601                 req->flags   = SNAP_PROCESS | SNAP_THREAD;
602                 req->inherit = FALSE;
603                 req->pid     = 0;
604                 if (!(ret = wine_server_call( req ))) hSnap = reply->handle;
605             }
606             SERVER_END_REQ;
607             len = 0;
608             while (ret == STATUS_SUCCESS)
609             {
610                 SERVER_START_REQ( next_process )
611                 {
612                     req->handle = hSnap;
613                     req->reset = (len == 0);
614                     wine_server_set_reply( req, procname, sizeof(procname) );
615                     if (!(ret = wine_server_call( req )))
616                     {
617                         wlen = wine_server_reply_size(reply) + sizeof(WCHAR);
618                         if (Length >= len + sizeof(*spi))
619                         {
620                             memset(spi, 0, sizeof(*spi));
621                             spi->dwOffset = sizeof(*spi);
622                             spi->dwThreadCount = reply->threads;
623                             memset(&spi->ftCreationTime, 0, sizeof(spi->ftCreationTime));
624                             /* spi->pszProcessName will be set later on */
625                             spi->dwBasePriority = reply->priority;
626                             spi->dwProcessID = (DWORD)reply->pid;
627                             spi->dwParentProcessID = (DWORD)reply->ppid;
628                             spi->dwHandleCount = reply->handles;
629                             spi->dwVirtualBytesPeak = 0; /* FIXME */
630                             spi->dwVirtualBytes = 0; /* FIXME */
631                             spi->dwPageFaults = 0; /* FIXME */
632                             spi->dwWorkingSetPeak = 0; /* FIXME */
633                             spi->dwWorkingSet = 0; /* FIXME */
634                             spi->dwUnknown5 = 0; /* FIXME */
635                             spi->dwPagedPool = 0; /* FIXME */
636                             spi->dwUnknown6 = 0; /* FIXME */
637                             spi->dwNonPagedPool = 0; /* FIXME */
638                             spi->dwPageFileBytesPeak = 0; /* FIXME */
639                             spi->dwPrivateBytes = 0; /* FIXME */
640                             spi->dwPageFileBytes = 0; /* FIXME */
641                             /* spi->ti will be set later on */
642                             len += sizeof(*spi) - sizeof(spi->ti);
643                         }
644                         else ret = STATUS_INFO_LENGTH_MISMATCH;
645                     }
646                 }
647                 SERVER_END_REQ;
648                 if (ret != STATUS_SUCCESS)
649                 {
650                     if (ret == STATUS_NO_MORE_FILES) ret = STATUS_SUCCESS;
651                     break;
652                 }
653                 if (Length >= len + wlen + spi->dwThreadCount * sizeof(THREAD_INFO))
654                 {
655                     int     i, j;
656
657                     /* set thread info */
658                     spi->dwOffset += spi->dwThreadCount * sizeof(THREAD_INFO);
659                     len += spi->dwThreadCount * sizeof(THREAD_INFO);
660                     i = j = 0;
661                     while (ret == STATUS_SUCCESS)
662                     {
663                         SERVER_START_REQ( next_thread )
664                         {
665                             req->handle = hSnap;
666                             req->reset = (j == 0);
667                             if (!(ret = wine_server_call( req )))
668                             {
669                                 j++;
670                                 if (reply->pid == spi->dwProcessID)
671                                 {
672                                     /* ftKernelTime, ftUserTime, ftCreateTime;
673                                      * dwTickCount, dwStartAddress
674                                      */
675                                     spi->ti[i].dwOwningPID = reply->pid;
676                                     spi->ti[i].dwThreadID  = reply->tid;
677                                     spi->ti[i].dwCurrentPriority = reply->base_pri + reply->delta_pri;
678                                     spi->ti[i].dwBasePriority = reply->base_pri;
679                                     i++;
680                                 }
681                             }
682                         }
683                         SERVER_END_REQ;
684                     }
685                     if (ret == STATUS_NO_MORE_FILES) ret = STATUS_SUCCESS;
686
687                     /* now append process name */
688                     spi->pszProcessName = (WCHAR*)((char*)spi + spi->dwOffset);
689                     memcpy( spi->pszProcessName, procname, wlen - sizeof(WCHAR) );
690                     spi->pszProcessName[wlen / sizeof(WCHAR)] = 0;
691                     len += wlen;
692                     spi->dwOffset += wlen;
693
694                     last = spi;
695                     spi = (SYSTEM_PROCESS_INFORMATION*)((char*)spi + spi->dwOffset);
696                 }
697                 else ret = STATUS_INFO_LENGTH_MISMATCH;
698             }
699             if (ret == STATUS_SUCCESS && last) last->dwOffset = 0;
700             if (hSnap) NtClose(hSnap);
701         }
702         break;
703     case SystemProcessorPerformanceInformation:
704         {
705             SYSTEM_PROCESSOR_PERFORMANCE_INFORMATION* sppi = (SYSTEM_PROCESSOR_PERFORMANCE_INFORMATION*)SystemInformation;
706             if (Length >= sizeof(*sppi))
707             {
708                 memset(sppi, 0, sizeof(*sppi)); /* FIXME */
709                 len = sizeof(*sppi);
710             }
711             else ret = STATUS_INFO_LENGTH_MISMATCH;
712         }
713         break;
714
715     case SystemCacheInformation:
716         {
717             SYSTEM_CACHE_INFORMATION* sci = (SYSTEM_CACHE_INFORMATION*)SystemInformation;
718             if (Length >= sizeof(*sci))
719             {
720                 memset(sci, 0, sizeof(*sci)); /* FIXME */
721                 len = sizeof(*sci);
722             }
723             else ret = STATUS_INFO_LENGTH_MISMATCH;
724         }
725         break;
726     case SystemRegistryQuotaInformation:
727         /* Something to do with the size of the registry             *
728          * Since we don't have a size limitation, fake it            *
729          * This is almost certainly wrong.                           *
730          * This sets each of the three words in the struct to 32 MB, *
731          * which is enough to make the IE 5 installer happy.         */
732         {
733             SYSTEM_REGISTRY_QUOTA_INFORMATION* srqi = (SYSTEM_REGISTRY_QUOTA_INFORMATION*)SystemInformation;
734             if (Length >= sizeof(*srqi))
735             {
736                 FIXME("(0x%08x,%p,0x%08lx,%p) faking max registry size of 32 MB\n",
737                       SystemInformationClass,SystemInformation,Length,ResultLength);
738                 srqi->RegistryQuotaAllowed = 0x2000000;
739                 srqi->RegistryQuotaUsed = 0x200000;
740                 srqi->Reserved1 = (void*)0x200000;
741                 len = sizeof(*srqi);
742             }
743             else ret = STATUS_INFO_LENGTH_MISMATCH;
744         }
745         break;
746
747     case SystemKernelDebuggerInformation:
748         {
749             PSYSTEM_KERNEL_DEBUGGER_INFORMATION pkdi;
750             if( Length >= sizeof(*pkdi))
751             {
752                 pkdi = SystemInformation;
753                 pkdi->DebuggerEnabled = FALSE;
754                 pkdi->DebuggerNotPresent = TRUE;
755                 len = sizeof(*pkdi);
756             }
757             else ret = STATUS_INFO_LENGTH_MISMATCH;
758         }
759         break;
760
761     default:
762         FIXME("(0x%08x,%p,0x%08lx,%p) stub\n",
763               SystemInformationClass,SystemInformation,Length,ResultLength);
764         ret = STATUS_NOT_IMPLEMENTED;
765     }
766     if (ResultLength) *ResultLength = len;
767
768     return ret;
769 }
770
771
772 /******************************************************************************
773  *  NtCreatePagingFile          [NTDLL.@]
774  *  ZwCreatePagingFile          [NTDLL.@]
775  */
776 NTSTATUS WINAPI NtCreatePagingFile(
777         IN PUNICODE_STRING PageFileName,
778         IN ULONG MiniumSize,
779         IN ULONG MaxiumSize,
780         OUT PULONG ActualSize)
781 {
782         FIXME("(%p(%s),0x%08lx,0x%08lx,%p),stub!\n",
783         PageFileName->Buffer, debugstr_w(PageFileName->Buffer),MiniumSize,MaxiumSize,ActualSize);
784         return 0;
785 }
786
787 /******************************************************************************
788  *  NtDisplayString                             [NTDLL.@]
789  *
790  * writes a string to the nt-textmode screen eg. during startup
791  */
792 NTSTATUS WINAPI NtDisplayString ( PUNICODE_STRING string )
793 {
794     STRING stringA;
795     NTSTATUS ret;
796
797     if (!(ret = RtlUnicodeStringToAnsiString( &stringA, string, TRUE )))
798     {
799         MESSAGE( "%.*s", stringA.Length, stringA.Buffer );
800         RtlFreeAnsiString( &stringA );
801     }
802     return ret;
803 }
804
805 /******************************************************************************
806  *  NtPowerInformation                          [NTDLL.@]
807  *
808  */
809 NTSTATUS WINAPI NtPowerInformation(DWORD x1,DWORD x2,DWORD x3,DWORD x4,DWORD x5)
810 {
811         FIXME("(0x%08lx,0x%08lx,0x%08lx,0x%08lx,0x%08lx),stub\n",x1,x2,x3,x4,x5);
812         return 0;
813 }
814
815 /******************************************************************************
816  *  NtShutdownSystem                            [NTDLL.@]
817  *
818  */
819 NTSTATUS WINAPI NtShutdownSystem(DWORD x1)
820 {
821         FIXME("(0x%08lx),stub\n",x1);
822         return 0;
823 }
824
825 /******************************************************************************
826  *  NtAllocateLocallyUniqueId (NTDLL.@)
827  *
828  * FIXME: the server should do that
829  */
830 NTSTATUS WINAPI NtAllocateLocallyUniqueId(PLUID Luid)
831 {
832     static LUID luid = { SE_MAX_WELL_KNOWN_PRIVILEGE, 0 };
833
834     FIXME("%p\n", Luid);
835
836     if (!Luid)
837         return STATUS_ACCESS_VIOLATION;
838
839     luid.LowPart++;
840     if (luid.LowPart==0)
841         luid.HighPart++;
842     Luid->HighPart = luid.HighPart;
843     Luid->LowPart = luid.LowPart;
844
845     return STATUS_SUCCESS;
846 }
847
848 /******************************************************************************
849  *        VerSetConditionMask   (NTDLL.@)
850  */
851 ULONGLONG WINAPI VerSetConditionMask( ULONGLONG dwlConditionMask, DWORD dwTypeBitMask,
852                                       BYTE dwConditionMask)
853 {
854     if(dwTypeBitMask == 0)
855         return dwlConditionMask;
856     dwConditionMask &= 0x07;
857     if(dwConditionMask == 0)
858         return dwlConditionMask;
859
860     if(dwTypeBitMask & VER_PRODUCT_TYPE)
861         dwlConditionMask |= dwConditionMask << 7*3;
862     else if (dwTypeBitMask & VER_SUITENAME)
863         dwlConditionMask |= dwConditionMask << 6*3;
864     else if (dwTypeBitMask & VER_SERVICEPACKMAJOR)
865         dwlConditionMask |= dwConditionMask << 5*3;
866     else if (dwTypeBitMask & VER_SERVICEPACKMINOR)
867         dwlConditionMask |= dwConditionMask << 4*3;
868     else if (dwTypeBitMask & VER_PLATFORMID)
869         dwlConditionMask |= dwConditionMask << 3*3;
870     else if (dwTypeBitMask & VER_BUILDNUMBER)
871         dwlConditionMask |= dwConditionMask << 2*3;
872     else if (dwTypeBitMask & VER_MAJORVERSION)
873         dwlConditionMask |= dwConditionMask << 1*3;
874     else if (dwTypeBitMask & VER_MINORVERSION)
875         dwlConditionMask |= dwConditionMask << 0*3;
876     return dwlConditionMask;
877 }
878
879 /******************************************************************************
880  *        NtAlertThread   (NTDLL.@)
881  */
882 NTSTATUS WINAPI NtAlertThread(HANDLE ThreadHandle)
883 {
884     FIXME("%p\n", ThreadHandle);
885     return STATUS_NOT_IMPLEMENTED;
886 }