projects / reactos.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Revert tree-restructure attempt: r66583, r66582, r66581, r66578, sauf ntdll changes...
[reactos.git] / reactos / dll / win32 / advapi32 / sec / lsa.c
1 /*
2 * COPYRIGHT: See COPYING in the top level directory
3 * PROJECT: ReactOS system libraries
4 * FILE: dll/win32/advapi32/sec/lsa.c
5 * PURPOSE: Local security authority functions
6 * PROGRAMMER: Emanuele Aliberti
7 * UPDATE HISTORY:
8 * 19990322 EA created
9 * 19990515 EA stubs
10 * 20030202 KJK compressed stubs
11 *
12 */
13
14 #include <advapi32.h>
15
16 #include <lsa_c.h>
17
18 WINE_DEFAULT_DEBUG_CHANNEL(advapi);
19
20 static
21 BOOL
22 LsapIsLocalComputer(PLSA_UNICODE_STRING ServerName)
23 {
24 DWORD dwSize = MAX_COMPUTERNAME_LENGTH + 1;
25 BOOL Result;
26 LPWSTR buf;
27
28 if (ServerName == NULL || ServerName->Length == 0 || ServerName->Buffer == NULL)
29 return TRUE;
30
31 buf = HeapAlloc(GetProcessHeap(), 0, dwSize * sizeof(WCHAR));
32 Result = GetComputerNameW(buf, &dwSize);
33 if (Result && (ServerName->Buffer[0] == '\\') && (ServerName->Buffer[1] == '\\'))
34 ServerName += 2;
35 Result = Result && !lstrcmpW(ServerName->Buffer, buf);
36 HeapFree(GetProcessHeap(), 0, buf);
37
38 return Result;
39 }
40
41
42 handle_t
43 __RPC_USER
44 PLSAPR_SERVER_NAME_bind(PLSAPR_SERVER_NAME pszSystemName)
45 {
46 handle_t hBinding = NULL;
47 LPWSTR pszStringBinding;
48 RPC_STATUS status;
49
50 TRACE("PLSAPR_SERVER_NAME_bind() called\n");
51
52 status = RpcStringBindingComposeW(NULL,
53 L"ncacn_np",
54 pszSystemName,
55 L"\\pipe\\lsarpc",
56 NULL,
57 &pszStringBinding);
58 if (status)
59 {
60 TRACE("RpcStringBindingCompose returned 0x%x\n", status);
61 return NULL;
62 }
63
64 /* Set the binding handle that will be used to bind to the server. */
65 status = RpcBindingFromStringBindingW(pszStringBinding,
66 &hBinding);
67 if (status)
68 {
69 TRACE("RpcBindingFromStringBinding returned 0x%x\n", status);
70 }
71
72 status = RpcStringFreeW(&pszStringBinding);
73 if (status)
74 {
75 TRACE("RpcStringFree returned 0x%x\n", status);
76 }
77
78 return hBinding;
79 }
80
81
82 void
83 __RPC_USER
84 PLSAPR_SERVER_NAME_unbind(PLSAPR_SERVER_NAME pszSystemName,
85 handle_t hBinding)
86 {
87 RPC_STATUS status;
88
89 TRACE("PLSAPR_SERVER_NAME_unbind() called\n");
90
91 status = RpcBindingFree(&hBinding);
92 if (status)
93 {
94 TRACE("RpcBindingFree returned 0x%x\n", status);
95 }
96 }
97
98
99 /*
100 * @implemented
101 */
102 NTSTATUS
103 WINAPI
104 LsaAddAccountRights(IN LSA_HANDLE PolicyHandle,
105 IN PSID AccountSid,
106 IN PLSA_UNICODE_STRING UserRights,
107 IN ULONG CountOfRights)
108 {
109 LSAPR_USER_RIGHT_SET UserRightSet;
110 NTSTATUS Status;
111
112 TRACE("LsaAddAccountRights(%p %p %p 0x%08x)\n",
113 PolicyHandle, AccountSid, UserRights, CountOfRights);
114
115 UserRightSet.Entries = CountOfRights;
116 UserRightSet.UserRights = (PRPC_UNICODE_STRING)UserRights;
117
118 RpcTryExcept
119 {
120 Status = LsarAddAccountRights((LSAPR_HANDLE)PolicyHandle,
121 (PRPC_SID)AccountSid,
122 &UserRightSet);
123
124 }
125 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
126 {
127 Status = I_RpcMapWin32Status(RpcExceptionCode());
128 }
129 RpcEndExcept;
130
131 return Status;
132 }
133
134
135 /*
136 * @implemented
137 */
138 NTSTATUS
139 WINAPI
140 LsaAddPrivilegesToAccount(IN LSA_HANDLE AccountHandle,
141 IN PPRIVILEGE_SET PrivilegeSet)
142 {
143 NTSTATUS Status;
144
145 TRACE("LsaAddPrivilegesToAccount(%p %p)\n",
146 AccountHandle, PrivilegeSet);
147
148 RpcTryExcept
149 {
150 Status = LsarAddPrivilegesToAccount((LSAPR_HANDLE)AccountHandle,
151 (PLSAPR_PRIVILEGE_SET)PrivilegeSet);
152 }
153 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
154 {
155 Status = I_RpcMapWin32Status(RpcExceptionCode());
156 }
157 RpcEndExcept;
158
159 return Status;
160 }
161
162
163 /*
164 * @implemented
165 */
166 NTSTATUS
167 WINAPI
168 LsaClearAuditLog(IN LSA_HANDLE PolicyHandle)
169 {
170 NTSTATUS Status;
171
172 TRACE("LsaClearAuditLog(%p)\n", PolicyHandle);
173
174 RpcTryExcept
175 {
176 Status = LsarClearAuditLog((LSAPR_HANDLE)PolicyHandle);
177 }
178 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
179 {
180 Status = I_RpcMapWin32Status(RpcExceptionCode());
181 }
182 RpcEndExcept;
183
184 return Status;
185 }
186
187
188 /*
189 * @implemented
190 */
191 NTSTATUS
192 WINAPI
193 LsaClose(IN LSA_HANDLE ObjectHandle)
194 {
195 NTSTATUS Status;
196
197 TRACE("LsaClose(%p) called\n", ObjectHandle);
198
199 RpcTryExcept
200 {
201 Status = LsarClose((PLSAPR_HANDLE)&ObjectHandle);
202 }
203 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
204 {
205 Status = I_RpcMapWin32Status(RpcExceptionCode());
206 }
207 RpcEndExcept;
208
209 return Status;
210 }
211
212
213 /*
214 * @implemented
215 */
216 NTSTATUS
217 WINAPI
218 LsaCreateAccount(IN LSA_HANDLE PolicyHandle,
219 IN PSID AccountSid,
220 IN ACCESS_MASK DesiredAccess,
221 OUT PLSA_HANDLE AccountHandle)
222 {
223 NTSTATUS Status;
224
225 TRACE("LsaCreateAccount(%p %p 0x%08lx %p)\n",
226 PolicyHandle, AccountSid, DesiredAccess, AccountHandle);
227
228 RpcTryExcept
229 {
230 Status = LsarCreateAccount((LSAPR_HANDLE)PolicyHandle,
231 AccountSid,
232 DesiredAccess,
233 AccountHandle);
234 }
235 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
236 {
237 Status = I_RpcMapWin32Status(RpcExceptionCode());
238 }
239 RpcEndExcept;
240
241 return Status;
242 }
243
244
245 /*
246 * @implemented
247 */
248 NTSTATUS
249 WINAPI
250 LsaCreateSecret(IN LSA_HANDLE PolicyHandle,
251 IN PLSA_UNICODE_STRING SecretName,
252 IN ACCESS_MASK DesiredAccess,
253 OUT PLSA_HANDLE SecretHandle)
254 {
255 NTSTATUS Status;
256
257 TRACE("LsaCreateSecret(%p %p 0x%08lx %p)\n",
258 PolicyHandle, SecretName, DesiredAccess, SecretHandle);
259
260 RpcTryExcept
261 {
262 Status = LsarCreateSecret((LSAPR_HANDLE)PolicyHandle,
263 (PRPC_UNICODE_STRING)SecretName,
264 DesiredAccess,
265 SecretHandle);
266 }
267 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
268 {
269 Status = I_RpcMapWin32Status(RpcExceptionCode());
270 }
271 RpcEndExcept;
272
273 return Status;
274 }
275
276
277 /*
278 * @implemented
279 */
280 NTSTATUS
281 WINAPI
282 LsaCreateTrustedDomain(IN LSA_HANDLE PolicyHandle,
283 IN PLSA_TRUST_INFORMATION TrustedDomainInformation,
284 IN ACCESS_MASK DesiredAccess,
285 OUT PLSA_HANDLE TrustedDomainHandle)
286 {
287 NTSTATUS Status;
288
289 TRACE("LsaCreateTrustedDomain(%p %p 0x%08lx %p)\n",
290 PolicyHandle, TrustedDomainInformation, DesiredAccess, TrustedDomainHandle);
291
292 RpcTryExcept
293 {
294 Status = LsarCreateTrustedDomain((LSAPR_HANDLE)PolicyHandle,
295 (PLSAPR_TRUST_INFORMATION)TrustedDomainInformation,
296 DesiredAccess,
297 (PLSAPR_HANDLE)TrustedDomainHandle);
298 }
299 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
300 {
301 Status = I_RpcMapWin32Status(RpcExceptionCode());
302 }
303 RpcEndExcept;
304
305 return Status;
306 }
307
308
309 /*
310 * @unimplemented
311 */
312 NTSTATUS
313 WINAPI
314 LsaCreateTrustedDomainEx(IN LSA_HANDLE PolicyHandle,
315 IN PTRUSTED_DOMAIN_INFORMATION_EX TrustedDomainInformation,
316 IN PTRUSTED_DOMAIN_AUTH_INFORMATION AuthenticationInformation,
317 IN ACCESS_MASK DesiredAccess,
318 OUT PLSA_HANDLE TrustedDomainHandle)
319 {
320 PLSAPR_TRUSTED_DOMAIN_AUTH_INFORMATION_INTERNAL EncryptedAuthInfo = NULL;
321 NTSTATUS Status;
322
323 TRACE("LsaCreateTrustedDomainEx(%p %p %p 0x%08lx %p) stub\n",
324 PolicyHandle, TrustedDomainInformation, AuthenticationInformation,
325 DesiredAccess, TrustedDomainHandle);
326
327 RpcTryExcept
328 {
329 /* FIXME: Encrypt AuthenticationInformation */
330
331 Status = LsarCreateTrustedDomainEx2((LSAPR_HANDLE)PolicyHandle,
332 (PLSAPR_TRUSTED_DOMAIN_INFORMATION_EX)TrustedDomainInformation,
333 EncryptedAuthInfo,
334 DesiredAccess,
335 (PLSAPR_HANDLE)TrustedDomainHandle);
336 }
337 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
338 {
339 Status = I_RpcMapWin32Status(RpcExceptionCode());
340 }
341 RpcEndExcept;
342
343 return Status;
344 }
345
346
347 /*
348 * @implemented
349 */
350 NTSTATUS
351 WINAPI
352 LsaDelete(IN LSA_HANDLE ObjectHandle)
353 {
354 NTSTATUS Status;
355
356 TRACE("LsaDelete(%p)\n", ObjectHandle);
357
358 RpcTryExcept
359 {
360 Status = LsarDelete((LSAPR_HANDLE)ObjectHandle);
361 }
362 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
363 {
364 Status = I_RpcMapWin32Status(RpcExceptionCode());
365 }
366 RpcEndExcept;
367
368 return Status;
369 }
370
371
372 /*
373 * @implemented
374 */
375 NTSTATUS
376 WINAPI
377 LsaDeleteTrustedDomain(IN LSA_HANDLE PolicyHandle,
378 IN PSID TrustedDomainSid)
379 {
380 NTSTATUS Status;
381
382 TRACE("LsaDeleteTrustedDomain(%p %p)\n",
383 PolicyHandle, TrustedDomainSid);
384
385 RpcTryExcept
386 {
387 Status = LsarDeleteTrustedDomain((LSAPR_HANDLE)PolicyHandle,
388 TrustedDomainSid);
389 }
390 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
391 {
392 Status = I_RpcMapWin32Status(RpcExceptionCode());
393 }
394 RpcEndExcept;
395
396 return Status;
397 }
398
399
400 /*
401 * @implemented
402 */
403 NTSTATUS
404 WINAPI
405 LsaEnumerateAccountRights(IN LSA_HANDLE PolicyHandle,
406 IN PSID AccountSid,
407 OUT PLSA_UNICODE_STRING *UserRights,
408 OUT PULONG CountOfRights)
409 {
410 LSAPR_USER_RIGHT_SET UserRightsSet;
411 NTSTATUS Status;
412
413 TRACE("LsaEnumerateAccountRights(%p %p %p %p)\n",
414 PolicyHandle, AccountSid, UserRights, CountOfRights);
415
416 UserRightsSet.Entries = 0;
417 UserRightsSet.UserRights = NULL;
418
419 RpcTryExcept
420 {
421 Status = LsarEnumerateAccountRights((LSAPR_HANDLE)PolicyHandle,
422 AccountSid,
423 &UserRightsSet);
424
425 *UserRights = (PUNICODE_STRING)UserRightsSet.UserRights;
426 *CountOfRights = UserRightsSet.Entries;
427 }
428 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
429 {
430 Status = I_RpcMapWin32Status(RpcExceptionCode());
431
432 if (UserRightsSet.UserRights != NULL)
433 MIDL_user_free(UserRightsSet.UserRights);
434 }
435 RpcEndExcept;
436
437 return Status;
438 }
439
440
441 /*
442 * @implemented
443 */
444 NTSTATUS
445 WINAPI
446 LsaEnumerateAccounts(IN LSA_HANDLE PolicyHandle,
447 IN OUT PLSA_ENUMERATION_HANDLE EnumerationContext,
448 OUT PVOID *Buffer,
449 IN ULONG PreferedMaximumLength,
450 OUT PULONG CountReturned)
451 {
452 LSAPR_ACCOUNT_ENUM_BUFFER AccountEnumBuffer;
453 NTSTATUS Status;
454
455 TRACE("LsaEnumerateAccounts(%p %p %p %lu %p)\n",
456 PolicyHandle, EnumerationContext, Buffer,
457 PreferedMaximumLength, CountReturned);
458
459 AccountEnumBuffer.EntriesRead = 0;
460 AccountEnumBuffer.Information = NULL;
461
462 RpcTryExcept
463 {
464 Status = LsarEnumerateAccounts((LSAPR_HANDLE)PolicyHandle,
465 EnumerationContext,
466 &AccountEnumBuffer,
467 PreferedMaximumLength);
468
469 *Buffer = AccountEnumBuffer.Information;
470 *CountReturned = AccountEnumBuffer.EntriesRead;
471 }
472 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
473 {
474 if (AccountEnumBuffer.Information != NULL)
475 MIDL_user_free(AccountEnumBuffer.Information);
476
477 Status = I_RpcMapWin32Status(RpcExceptionCode());
478 }
479 RpcEndExcept;
480
481 return Status;
482 }
483
484
485 /*
486 * @implemented
487 */
488 NTSTATUS
489 WINAPI
490 LsaEnumerateAccountsWithUserRight(IN LSA_HANDLE PolicyHandle,
491 IN PLSA_UNICODE_STRING UserRight OPTIONAL,
492 OUT PVOID *Buffer,
493 OUT PULONG CountReturned)
494 {
495 LSAPR_ACCOUNT_ENUM_BUFFER AccountEnumBuffer;
496 NTSTATUS Status;
497
498 TRACE("LsaEnumerateAccountsWithUserRight(%p %p %p %p) stub\n",
499 PolicyHandle, UserRight, Buffer, CountReturned);
500
501 AccountEnumBuffer.EntriesRead = 0;
502 AccountEnumBuffer.Information = NULL;
503
504 RpcTryExcept
505 {
506 Status = LsarEnumerateAccountsWithUserRight((LSAPR_HANDLE)PolicyHandle,
507 (PRPC_UNICODE_STRING)UserRight,
508 &AccountEnumBuffer);
509
510 *Buffer = AccountEnumBuffer.Information;
511 *CountReturned = AccountEnumBuffer.EntriesRead;
512 }
513 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
514 {
515 if (AccountEnumBuffer.Information != NULL)
516 MIDL_user_free(AccountEnumBuffer.Information);
517
518 Status = I_RpcMapWin32Status(RpcExceptionCode());
519 }
520 RpcEndExcept;
521
522 return Status;
523 }
524
525
526 /*
527 * @implemented
528 */
529 NTSTATUS
530 WINAPI
531 LsaEnumeratePrivileges(IN LSA_HANDLE PolicyHandle,
532 IN OUT PLSA_ENUMERATION_HANDLE EnumerationContext,
533 OUT PVOID *Buffer,
534 IN ULONG PreferedMaximumLength,
535 OUT PULONG CountReturned)
536 {
537 LSAPR_PRIVILEGE_ENUM_BUFFER PrivilegeEnumBuffer;
538 NTSTATUS Status;
539
540 TRACE("LsaEnumeratePrivileges(%p %p %p %lu %p)\n",
541 PolicyHandle, EnumerationContext, Buffer,
542 PreferedMaximumLength, CountReturned);
543
544 PrivilegeEnumBuffer.Entries = 0;
545 PrivilegeEnumBuffer.Privileges = NULL;
546
547 RpcTryExcept
548 {
549 Status = LsarEnumeratePrivileges((LSAPR_HANDLE)PolicyHandle,
550 EnumerationContext,
551 &PrivilegeEnumBuffer,
552 PreferedMaximumLength);
553
554 *Buffer = PrivilegeEnumBuffer.Privileges;
555 *CountReturned = PrivilegeEnumBuffer.Entries;
556
557 }
558 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
559 {
560 if (PrivilegeEnumBuffer.Privileges != NULL)
561 MIDL_user_free(PrivilegeEnumBuffer.Privileges);
562
563 Status = I_RpcMapWin32Status(RpcExceptionCode());
564 }
565 RpcEndExcept;
566
567 return Status;
568 }
569
570
571 /*
572 * @implemented
573 */
574 NTSTATUS
575 WINAPI
576 LsaEnumeratePrivilegesOfAccount(IN LSA_HANDLE AccountHandle,
577 OUT PPRIVILEGE_SET *Privileges)
578 {
579 NTSTATUS Status;
580
581 TRACE("LsaEnumeratePrivilegesOfAccount(%p %p)\n",
582 AccountHandle, Privileges);
583
584 RpcTryExcept
585 {
586 Status = LsarEnumeratePrivilegesAccount((LSAPR_HANDLE)AccountHandle,
587 (LSAPR_PRIVILEGE_SET **)Privileges);
588 }
589 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
590 {
591 Status = I_RpcMapWin32Status(RpcExceptionCode());
592 }
593 RpcEndExcept;
594
595 return Status;
596 }
597
598
599 /*
600 * @unimplemented
601 */
602 NTSTATUS
603 WINAPI
604 LsaEnumerateTrustedDomains(IN LSA_HANDLE PolicyHandle,
605 IN OUT PLSA_ENUMERATION_HANDLE EnumerationContext,
606 OUT PVOID *Buffer,
607 IN ULONG PreferedMaximumLength,
608 OUT PULONG CountReturned)
609 {
610 FIXME("LsaEnumerateTrustedDomains(%p %p %p %lu %p) stub\n",
611 PolicyHandle, EnumerationContext, Buffer,
612 PreferedMaximumLength, CountReturned);
613
614 if (CountReturned)
615 *CountReturned = 0;
616
617 return STATUS_SUCCESS;
618 }
619
620
621 /*
622 * @unimplemented
623 */
624 NTSTATUS
625 WINAPI
626 LsaEnumerateTrustedDomainsEx(IN LSA_HANDLE PolicyHandle,
627 IN OUT PLSA_ENUMERATION_HANDLE EnumerationContext,
628 OUT PVOID *Buffer,
629 IN ULONG PreferedMaximumLength,
630 OUT PULONG CountReturned)
631 {
632 FIXME("LsaEnumerateTrustedDomainsEx(%p %p %p %lu %p) stub\n",
633 PolicyHandle, EnumerationContext, Buffer,
634 PreferedMaximumLength, CountReturned);
635
636 if (CountReturned)
637 *CountReturned = 0;
638
639 return STATUS_SUCCESS;
640 }
641
642
643 /*
644 * @implemented
645 */
646 NTSTATUS
647 WINAPI
648 LsaFreeMemory(IN PVOID Buffer)
649 {
650 TRACE("LsaFreeMemory(%p)\n", Buffer);
651 return RtlFreeHeap(RtlGetProcessHeap(), 0, Buffer);
652 }
653
654
655 /*
656 * @implemented
657 */
658 NTSTATUS
659 WINAPI
660 LsaGetQuotasForAccount(IN LSA_HANDLE AccountHandle,
661 OUT PQUOTA_LIMITS QuotaLimits)
662 {
663 NTSTATUS Status;
664
665 TRACE("LsaGetQuotasForAccount(%p %p)\n",
666 AccountHandle, QuotaLimits);
667
668 RpcTryExcept
669 {
670 Status = LsarGetQuotasForAccount((LSAPR_HANDLE)AccountHandle,
671 QuotaLimits);
672 }
673 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
674 {
675 Status = I_RpcMapWin32Status(RpcExceptionCode());
676 }
677 RpcEndExcept;
678
679 return Status;
680 }
681
682
683 /*
684 * @unimplemented
685 */
686 NTSTATUS
687 WINAPI
688 LsaGetRemoteUserName(IN PLSA_UNICODE_STRING SystemName OPTIONAL,
689 OUT PLSA_UNICODE_STRING *UserName,
690 OUT PLSA_UNICODE_STRING *DomainName OPTIONAL)
691 {
692 PRPC_UNICODE_STRING UserNameString = NULL;
693 PRPC_UNICODE_STRING DomainNameString = NULL;
694 NTSTATUS Status;
695
696 TRACE("LsaGetRemoteUserName(%s %p %p)\n",
697 SystemName ? debugstr_w(SystemName->Buffer) : "(null)",
698 UserName, DomainName);
699
700 RpcTryExcept
701 {
702 Status = LsarGetUserName((PLSAPR_SERVER_NAME)SystemName,
703 &UserNameString,
704 (DomainName != NULL) ? &DomainNameString : NULL);
705
706 *UserName = (PLSA_UNICODE_STRING)UserNameString;
707
708 if (DomainName != NULL)
709 *DomainName = (PLSA_UNICODE_STRING)DomainNameString;
710 }
711 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
712 {
713 if (UserNameString != NULL)
714 MIDL_user_free(UserNameString);
715
716 if (DomainNameString != NULL)
717 MIDL_user_free(DomainNameString);
718
719 Status = I_RpcMapWin32Status(RpcExceptionCode());
720 }
721 RpcEndExcept;
722
723 return Status;
724 }
725
726
727 /*
728 * @implemented
729 */
730 NTSTATUS
731 WINAPI
732 LsaGetSystemAccessAccount(IN LSA_HANDLE AccountHandle,
733 OUT PULONG SystemAccess)
734 {
735 NTSTATUS Status;
736
737 TRACE("LsaGetSystemAccessAccount(%p %p)\n",
738 AccountHandle, SystemAccess);
739
740 RpcTryExcept
741 {
742 Status = LsarGetSystemAccessAccount((LSAPR_HANDLE)AccountHandle,
743 (ACCESS_MASK *)SystemAccess);
744 }
745 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
746 {
747 Status = I_RpcMapWin32Status(RpcExceptionCode());
748 }
749 RpcEndExcept;
750
751 return Status;
752 }
753
754
755 /*
756 * @implemented
757 */
758 NTSTATUS
759 WINAPI
760 LsaGetUserName(OUT PUNICODE_STRING *UserName,
761 OUT PUNICODE_STRING *DomainName OPTIONAL)
762 {
763 PRPC_UNICODE_STRING UserNameString = NULL;
764 PRPC_UNICODE_STRING DomainNameString = NULL;
765 NTSTATUS Status;
766
767 TRACE("LsaGetUserName(%p %p)\n",
768 UserName, DomainName);
769
770 RpcTryExcept
771 {
772 Status = LsarGetUserName(NULL,
773 &UserNameString,
774 (DomainName != NULL) ? &DomainNameString : NULL);
775
776 *UserName = (PUNICODE_STRING)UserNameString;
777
778 if (DomainName != NULL)
779 *DomainName = (PUNICODE_STRING)DomainNameString;
780 }
781 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
782 {
783 if (UserNameString != NULL)
784 MIDL_user_free(UserNameString);
785
786 if (DomainNameString != NULL)
787 MIDL_user_free(DomainNameString);
788
789 Status = I_RpcMapWin32Status(RpcExceptionCode());
790 }
791 RpcEndExcept;
792
793 return Status;
794 }
795
796
797 /*
798 * @implemented
799 */
800 NTSTATUS
801 WINAPI
802 LsaLookupNames(IN LSA_HANDLE PolicyHandle,
803 IN ULONG Count,
804 IN PLSA_UNICODE_STRING Names,
805 OUT PLSA_REFERENCED_DOMAIN_LIST *ReferencedDomains,
806 OUT PLSA_TRANSLATED_SID *Sids)
807 {
808 LSAPR_TRANSLATED_SIDS TranslatedSids = {0, NULL};
809 ULONG MappedCount = 0;
810 NTSTATUS Status;
811
812 TRACE("LsaLookupNames(%p %lu %p %p %p)\n",
813 PolicyHandle, Count, Names, ReferencedDomains, Sids);
814
815 if (ReferencedDomains == NULL || Sids == NULL)
816 return STATUS_INVALID_PARAMETER;
817
818 RpcTryExcept
819 {
820 *ReferencedDomains = NULL;
821 *Sids = NULL;
822
823 TranslatedSids.Entries = Count;
824
825 Status = LsarLookupNames((LSAPR_HANDLE)PolicyHandle,
826 Count,
827 (PRPC_UNICODE_STRING)Names,
828 (PLSAPR_REFERENCED_DOMAIN_LIST *)ReferencedDomains,
829 &TranslatedSids,
830 LsapLookupWksta,
831 &MappedCount);
832
833 *Sids = (PLSA_TRANSLATED_SID)TranslatedSids.Sids;
834 }
835 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
836 {
837 if (TranslatedSids.Sids != NULL)
838 MIDL_user_free(TranslatedSids.Sids);
839
840 Status = I_RpcMapWin32Status(RpcExceptionCode());
841 }
842 RpcEndExcept;
843
844 return Status;
845 }
846
847
848 /*
849 * @implemented
850 */
851 NTSTATUS
852 WINAPI
853 LsaLookupNames2(IN LSA_HANDLE PolicyHandle,
854 IN ULONG Flags,
855 IN ULONG Count,
856 IN PLSA_UNICODE_STRING Names,
857 OUT PLSA_REFERENCED_DOMAIN_LIST *ReferencedDomains,
858 OUT PLSA_TRANSLATED_SID2 *Sids)
859 {
860 LSAPR_TRANSLATED_SIDS_EX2 TranslatedSids = {0, NULL};
861 ULONG MappedCount = 0;
862 NTSTATUS Status;
863
864 TRACE("LsaLookupNames2(%p 0x%08x %lu %p %p %p)\n",
865 PolicyHandle, Flags, Count, Names, ReferencedDomains, Sids);
866
867 if (ReferencedDomains == NULL || Sids == NULL)
868 return STATUS_INVALID_PARAMETER;
869
870 RpcTryExcept
871 {
872 *ReferencedDomains = NULL;
873 *Sids = NULL;
874
875 TranslatedSids.Entries = Count;
876
877 Status = LsarLookupNames3((LSAPR_HANDLE)PolicyHandle,
878 Count,
879 (PRPC_UNICODE_STRING)Names,
880 (PLSAPR_REFERENCED_DOMAIN_LIST *)ReferencedDomains,
881 &TranslatedSids,
882 LsapLookupWksta,
883 &MappedCount,
884 Flags,
885 2);
886
887 *Sids = (PLSA_TRANSLATED_SID2)TranslatedSids.Sids;
888 }
889 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
890 {
891 if (TranslatedSids.Sids != NULL)
892 MIDL_user_free(TranslatedSids.Sids);
893
894 Status = I_RpcMapWin32Status(RpcExceptionCode());
895 }
896 RpcEndExcept;
897
898 return Status;
899 }
900
901
902 /*
903 * @unimplemented
904 */
905 NTSTATUS
906 WINAPI
907 LsaLookupPrivilegeDisplayName(IN LSA_HANDLE PolicyHandle,
908 IN PLSA_UNICODE_STRING Name,
909 OUT PLSA_UNICODE_STRING *DisplayName,
910 OUT PUSHORT LanguageReturned)
911 {
912 PRPC_UNICODE_STRING DisplayNameBuffer = NULL;
913 NTSTATUS Status;
914
915 TRACE("LsaLookupPrivilegeDisplayName(%p %p %p %p)\n",
916 PolicyHandle, Name, DisplayName, LanguageReturned);
917
918 RpcTryExcept
919 {
920 Status = LsarLookupPrivilegeDisplayName(PolicyHandle,
921 (PRPC_UNICODE_STRING)Name,
922 GetUserDefaultUILanguage(),
923 GetSystemDefaultUILanguage(),
924 &DisplayNameBuffer,
925 LanguageReturned);
926
927 *DisplayName = (PUNICODE_STRING)DisplayNameBuffer;
928 }
929 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
930 {
931 if (DisplayNameBuffer != NULL)
932 MIDL_user_free(DisplayNameBuffer);
933
934 Status = I_RpcMapWin32Status(RpcExceptionCode());
935 }
936 RpcEndExcept;
937
938 return Status;
939 }
940
941
942 /*
943 * @implemented
944 */
945 NTSTATUS
946 WINAPI
947 LsaLookupPrivilegeName(IN LSA_HANDLE PolicyHandle,
948 IN PLUID Value,
949 OUT PUNICODE_STRING *Name)
950 {
951 PRPC_UNICODE_STRING NameBuffer = NULL;
952 NTSTATUS Status;
953
954 TRACE("LsaLookupPrivilegeName(%p %p %p)\n",
955 PolicyHandle, Value, Name);
956
957 RpcTryExcept
958 {
959 Status = LsarLookupPrivilegeName(PolicyHandle,
960 Value,
961 &NameBuffer);
962
963 *Name = (PUNICODE_STRING)NameBuffer;
964 }
965 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
966 {
967 if (NameBuffer != NULL)
968 MIDL_user_free(NameBuffer);
969
970 Status = I_RpcMapWin32Status(RpcExceptionCode());
971 }
972 RpcEndExcept;
973
974 return Status;
975 }
976
977
978 /*
979 * @implemented
980 */
981 NTSTATUS
982 WINAPI
983 LsaLookupPrivilegeValue(IN LSA_HANDLE PolicyHandle,
984 IN PLSA_UNICODE_STRING Name,
985 OUT PLUID Value)
986 {
987 LUID Luid;
988 NTSTATUS Status;
989
990 TRACE("LsaLookupPrivilegeValue(%p %p %p)\n",
991 PolicyHandle, Name, Value);
992
993 RpcTryExcept
994 {
995 Status = LsarLookupPrivilegeValue(PolicyHandle,
996 (PRPC_UNICODE_STRING)Name,
997 &Luid);
998 if (Status == STATUS_SUCCESS)
999 *Value = Luid;
1000 }
1001 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1002 {
1003 Status = I_RpcMapWin32Status(RpcExceptionCode());
1004 }
1005 RpcEndExcept;
1006
1007 return Status;
1008 }
1009
1010
1011 /*
1012 * @implemented
1013 */
1014 NTSTATUS
1015 WINAPI
1016 LsaLookupSids(IN LSA_HANDLE PolicyHandle,
1017 IN ULONG Count,
1018 IN PSID *Sids,
1019 OUT PLSA_REFERENCED_DOMAIN_LIST *ReferencedDomains,
1020 OUT PLSA_TRANSLATED_NAME *Names)
1021 {
1022 LSAPR_SID_ENUM_BUFFER SidEnumBuffer;
1023 LSAPR_TRANSLATED_NAMES TranslatedNames;
1024 ULONG MappedCount = 0;
1025 NTSTATUS Status;
1026
1027 TRACE("LsaLookupSids(%p %lu %p %p %p)\n",
1028 PolicyHandle, Count, Sids, ReferencedDomains, Names);
1029
1030 if (Count == 0)
1031 return STATUS_INVALID_PARAMETER;
1032
1033 SidEnumBuffer.Entries = Count;
1034 SidEnumBuffer.SidInfo = (PLSAPR_SID_INFORMATION)Sids;
1035
1036 RpcTryExcept
1037 {
1038 *ReferencedDomains = NULL;
1039 *Names = NULL;
1040
1041 TranslatedNames.Entries = 0;
1042 TranslatedNames.Names = NULL;
1043
1044 Status = LsarLookupSids((LSAPR_HANDLE)PolicyHandle,
1045 &SidEnumBuffer,
1046 (PLSAPR_REFERENCED_DOMAIN_LIST *)ReferencedDomains,
1047 &TranslatedNames,
1048 LsapLookupWksta,
1049 &MappedCount);
1050
1051 *Names = (PLSA_TRANSLATED_NAME)TranslatedNames.Names;
1052 }
1053 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1054 {
1055 if (TranslatedNames.Names != NULL)
1056 {
1057 MIDL_user_free(TranslatedNames.Names);
1058 }
1059
1060 Status = I_RpcMapWin32Status(RpcExceptionCode());
1061 }
1062 RpcEndExcept;
1063
1064 return Status;
1065 }
1066
1067
1068 /******************************************************************************
1069 * LsaNtStatusToWinError
1070 *
1071 * PARAMS
1072 * Status [I]
1073 *
1074 * @implemented
1075 */
1076 ULONG
1077 WINAPI
1078 LsaNtStatusToWinError(IN NTSTATUS Status)
1079 {
1080 TRACE("LsaNtStatusToWinError(0x%lx)\n", Status);
1081 return RtlNtStatusToDosError(Status);
1082 }
1083
1084
1085 /*
1086 * @implemented
1087 */
1088 NTSTATUS
1089 WINAPI
1090 LsaOpenAccount(IN LSA_HANDLE PolicyHandle,
1091 IN PSID AccountSid,
1092 IN ACCESS_MASK DesiredAccess,
1093 OUT PLSA_HANDLE AccountHandle)
1094 {
1095 NTSTATUS Status;
1096
1097 TRACE("LsaOpenAccount(%p %p 0x%08lx %p)\n",
1098 PolicyHandle, AccountSid, DesiredAccess, AccountHandle);
1099
1100 RpcTryExcept
1101 {
1102 Status = LsarOpenAccount((LSAPR_HANDLE)PolicyHandle,
1103 AccountSid,
1104 DesiredAccess,
1105 AccountHandle);
1106 }
1107 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1108 {
1109 Status = I_RpcMapWin32Status(RpcExceptionCode());
1110 }
1111 RpcEndExcept;
1112
1113 return Status;
1114 }
1115
1116
1117 /******************************************************************************
1118 * LsaOpenPolicy
1119 *
1120 * PARAMS
1121 * x1 []
1122 * x2 []
1123 * x3 []
1124 * x4 []
1125 *
1126 * @implemented
1127 */
1128 NTSTATUS
1129 WINAPI
1130 LsaOpenPolicy(IN PLSA_UNICODE_STRING SystemName OPTIONAL,
1131 IN PLSA_OBJECT_ATTRIBUTES ObjectAttributes,
1132 IN ACCESS_MASK DesiredAccess,
1133 OUT PLSA_HANDLE PolicyHandle)
1134 {
1135 NTSTATUS Status;
1136
1137 TRACE("LsaOpenPolicy(%s %p 0x%08lx %p)\n",
1138 SystemName ? debugstr_w(SystemName->Buffer) : "(null)",
1139 ObjectAttributes, DesiredAccess, PolicyHandle);
1140
1141 /* FIXME: RPC should take care of this */
1142 if (!LsapIsLocalComputer(SystemName))
1143 return RPC_NT_SERVER_UNAVAILABLE;
1144
1145 RpcTryExcept
1146 {
1147 *PolicyHandle = NULL;
1148
1149 Status = LsarOpenPolicy(SystemName ? SystemName->Buffer : NULL,
1150 (PLSAPR_OBJECT_ATTRIBUTES)ObjectAttributes,
1151 DesiredAccess,
1152 PolicyHandle);
1153 }
1154 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1155 {
1156 Status = I_RpcMapWin32Status(RpcExceptionCode());
1157 }
1158 RpcEndExcept;
1159
1160 TRACE("LsaOpenPolicy() done (Status: 0x%08lx)\n", Status);
1161
1162 return Status;
1163 }
1164
1165
1166 /*
1167 * @unimplemented
1168 */
1169 NTSTATUS
1170 WINAPI
1171 LsaOpenPolicySce(IN PLSA_UNICODE_STRING SystemName OPTIONAL,
1172 IN PLSA_OBJECT_ATTRIBUTES ObjectAttributes,
1173 IN ACCESS_MASK DesiredAccess,
1174 OUT PLSA_HANDLE PolicyHandle)
1175 {
1176 FIXME("LsaOpenPolicySce(%s %p 0x%08lx %p)\n",
1177 SystemName ? debugstr_w(SystemName->Buffer) : "(null)",
1178 ObjectAttributes, DesiredAccess, PolicyHandle);
1179 return STATUS_NOT_IMPLEMENTED;
1180 }
1181
1182
1183 /*
1184 * @implemented
1185 */
1186 NTSTATUS
1187 WINAPI
1188 LsaOpenSecret(IN LSA_HANDLE PolicyHandle,
1189 IN PLSA_UNICODE_STRING SecretName,
1190 IN ACCESS_MASK DesiredAccess,
1191 OUT PLSA_HANDLE SecretHandle)
1192 {
1193 NTSTATUS Status;
1194
1195 TRACE("LsaOpenSecret(%p %p 0x%08lx %p)\n",
1196 PolicyHandle, SecretName, DesiredAccess, SecretHandle);
1197
1198 RpcTryExcept
1199 {
1200 *SecretHandle = NULL;
1201
1202 Status = LsarOpenSecret((LSAPR_HANDLE)PolicyHandle,
1203 (PRPC_UNICODE_STRING)SecretName,
1204 DesiredAccess,
1205 SecretHandle);
1206 }
1207 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1208 {
1209 Status = I_RpcMapWin32Status(RpcExceptionCode());
1210 }
1211 RpcEndExcept;
1212
1213 TRACE("LsaOpenSecret() done (Status: 0x%08lx)\n", Status);
1214
1215 return Status;
1216 }
1217
1218
1219 /*
1220 * @implemented
1221 */
1222 NTSTATUS
1223 WINAPI
1224 LsaOpenTrustedDomain(IN LSA_HANDLE PolicyHandle,
1225 IN PSID TrustedDomainSid,
1226 IN ACCESS_MASK DesiredAccess,
1227 OUT PLSA_HANDLE TrustedDomainHandle)
1228 {
1229 NTSTATUS Status;
1230
1231 TRACE("LsaOpenTrustedDomain(%p %p 0x%08lx %p)\n",
1232 PolicyHandle, TrustedDomainSid, DesiredAccess, TrustedDomainHandle);
1233
1234 RpcTryExcept
1235 {
1236 Status = LsarOpenTrustedDomain((LSAPR_HANDLE)PolicyHandle,
1237 (PRPC_SID)TrustedDomainSid,
1238 DesiredAccess,
1239 (PLSAPR_HANDLE)TrustedDomainHandle);
1240 }
1241 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1242 {
1243 Status = I_RpcMapWin32Status(RpcExceptionCode());
1244 }
1245 RpcEndExcept;
1246
1247 return Status;
1248 }
1249
1250
1251 /*
1252 * @implemented
1253 */
1254 NTSTATUS
1255 WINAPI
1256 LsaOpenTrustedDomainByName(IN LSA_HANDLE PolicyHandle,
1257 IN PLSA_UNICODE_STRING TrustedDomainName,
1258 IN ACCESS_MASK DesiredAccess,
1259 OUT PLSA_HANDLE TrustedDomainHandle)
1260 {
1261 NTSTATUS Status;
1262
1263 TRACE("LsaOpenTrustedDomainByName(%p %p 0x%08lx %p)\n",
1264 PolicyHandle, TrustedDomainName, DesiredAccess, TrustedDomainHandle);
1265
1266 RpcTryExcept
1267 {
1268 Status = LsarOpenTrustedDomainByName((LSAPR_HANDLE)PolicyHandle,
1269 (PRPC_UNICODE_STRING)TrustedDomainName,
1270 DesiredAccess,
1271 TrustedDomainHandle);
1272 }
1273 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1274 {
1275 Status = I_RpcMapWin32Status(RpcExceptionCode());
1276 }
1277 RpcEndExcept;
1278
1279 return Status;
1280 }
1281
1282
1283 /*
1284 * @implemented
1285 */
1286 NTSTATUS
1287 WINAPI
1288 LsaQueryDomainInformationPolicy(IN LSA_HANDLE PolicyHandle,
1289 IN POLICY_DOMAIN_INFORMATION_CLASS InformationClass,
1290 OUT PVOID *Buffer)
1291 {
1292 PLSAPR_POLICY_DOMAIN_INFORMATION PolicyInformation = NULL;
1293 NTSTATUS Status;
1294
1295 TRACE("LsaQueryDomainInformationPolicy(%p %lu %p)\n",
1296 PolicyHandle, InformationClass, Buffer);
1297
1298 RpcTryExcept
1299 {
1300 Status = LsarQueryDomainInformationPolicy((LSAPR_HANDLE)PolicyHandle,
1301 InformationClass,
1302 &PolicyInformation);
1303
1304 *Buffer = PolicyInformation;
1305 }
1306 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1307 {
1308 if (PolicyInformation != NULL)
1309 MIDL_user_free(PolicyInformation);
1310
1311 Status = I_RpcMapWin32Status(RpcExceptionCode());
1312 }
1313 RpcEndExcept;
1314
1315 return Status;
1316 }
1317
1318
1319 /*
1320 * @implemented
1321 */
1322 NTSTATUS
1323 WINAPI
1324 LsaQueryForestTrustInformation(IN LSA_HANDLE PolicyHandle,
1325 IN PLSA_UNICODE_STRING TrustedDomainName,
1326 OUT PLSA_FOREST_TRUST_INFORMATION *ForestTrustInfo)
1327 {
1328 NTSTATUS Status;
1329
1330 TRACE("LsaQueryForestTrustInformation(%p %p %p)\n",
1331 PolicyHandle, TrustedDomainName, ForestTrustInfo);
1332
1333 RpcTryExcept
1334 {
1335 Status = LsarQueryForestTrustInformation((LSAPR_HANDLE)PolicyHandle,
1336 TrustedDomainName,
1337 ForestTrustDomainInfo,
1338 ForestTrustInfo);
1339 }
1340 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1341 {
1342 Status = I_RpcMapWin32Status(RpcExceptionCode());
1343 }
1344 RpcEndExcept;
1345
1346 return Status;
1347 }
1348
1349
1350 /*
1351 * @unimplemented
1352 */
1353 NTSTATUS
1354 WINAPI
1355 LsaQueryInfoTrustedDomain(IN LSA_HANDLE TrustedDomainHandle,
1356 IN TRUSTED_INFORMATION_CLASS InformationClass,
1357 OUT PVOID *Buffer)
1358 {
1359 FIXME("LsaQueryInfoTrustedDomain(%p %d %p) stub\n",
1360 TrustedDomainHandle, InformationClass, Buffer);
1361 return STATUS_NOT_IMPLEMENTED;
1362 }
1363
1364
1365 /*
1366 * @implemented
1367 */
1368 NTSTATUS
1369 WINAPI
1370 LsaQueryInformationPolicy(IN LSA_HANDLE PolicyHandle,
1371 IN POLICY_INFORMATION_CLASS InformationClass,
1372 OUT PVOID *Buffer)
1373 {
1374 PLSAPR_POLICY_INFORMATION PolicyInformation = NULL;
1375 NTSTATUS Status;
1376
1377 TRACE("LsaQueryInformationPolicy(%p %d %p)\n",
1378 PolicyHandle, InformationClass, Buffer);
1379
1380 RpcTryExcept
1381 {
1382 Status = LsarQueryInformationPolicy((LSAPR_HANDLE)PolicyHandle,
1383 InformationClass,
1384 &PolicyInformation);
1385 *Buffer = PolicyInformation;
1386 }
1387 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1388 {
1389 if (PolicyInformation != NULL)
1390 MIDL_user_free(PolicyInformation);
1391
1392 Status = I_RpcMapWin32Status(RpcExceptionCode());
1393 }
1394 RpcEndExcept;
1395
1396 TRACE("Done (Status: 0x%08x)\n", Status);
1397
1398 return Status;
1399 }
1400
1401
1402 /*
1403 * @unimplemented
1404 */
1405 NTSTATUS
1406 WINAPI
1407 LsaQuerySecret(IN LSA_HANDLE SecretHandle,
1408 OUT PLSA_UNICODE_STRING *CurrentValue OPTIONAL,
1409 OUT PLARGE_INTEGER CurrentValueSetTime OPTIONAL,
1410 OUT PLSA_UNICODE_STRING *OldValue OPTIONAL,
1411 OUT PLARGE_INTEGER OldValueSetTime OPTIONAL)
1412 {
1413 PLSAPR_CR_CIPHER_VALUE EncryptedCurrentValue = NULL;
1414 PLSAPR_CR_CIPHER_VALUE EncryptedOldValue = NULL;
1415 PLSA_UNICODE_STRING DecryptedCurrentValue = NULL;
1416 PLSA_UNICODE_STRING DecryptedOldValue = NULL;
1417 SIZE_T BufferSize;
1418 NTSTATUS Status;
1419
1420 TRACE("LsaQuerySecret(%p %p %p %p %p)\n",
1421 SecretHandle, CurrentValue, CurrentValueSetTime,
1422 OldValue, OldValueSetTime);
1423
1424 RpcTryExcept
1425 {
1426 Status = LsarQuerySecret((PLSAPR_HANDLE)SecretHandle,
1427 &EncryptedCurrentValue,
1428 CurrentValueSetTime,
1429 &EncryptedOldValue,
1430 OldValueSetTime);
1431 }
1432 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1433 {
1434 Status = I_RpcMapWin32Status(RpcExceptionCode());
1435 }
1436 RpcEndExcept;
1437
1438 if (!NT_SUCCESS(Status))
1439 goto done;
1440
1441 /* Decrypt the current value */
1442 if (CurrentValue != NULL)
1443 {
1444 if (EncryptedCurrentValue == NULL)
1445 {
1446 *CurrentValue = NULL;
1447 }
1448 else
1449 {
1450 /* FIXME: Decrypt the current value */
1451 BufferSize = sizeof(LSA_UNICODE_STRING) + EncryptedCurrentValue->MaximumLength;
1452 DecryptedCurrentValue = midl_user_allocate(BufferSize);
1453 if (DecryptedCurrentValue == NULL)
1454 {
1455 Status = STATUS_INSUFFICIENT_RESOURCES;
1456 goto done;
1457 }
1458
1459 DecryptedCurrentValue->Length = (USHORT)EncryptedCurrentValue->Length;
1460 DecryptedCurrentValue->MaximumLength = (USHORT)EncryptedCurrentValue->MaximumLength;
1461 DecryptedCurrentValue->Buffer = (PWSTR)(DecryptedCurrentValue + 1);
1462 RtlCopyMemory(DecryptedCurrentValue->Buffer,
1463 EncryptedCurrentValue->Buffer,
1464 EncryptedCurrentValue->Length);
1465
1466 *CurrentValue = DecryptedCurrentValue;
1467 }
1468 }
1469
1470 /* Decrypt the old value */
1471 if (OldValue != NULL)
1472 {
1473 if (EncryptedOldValue == NULL)
1474 {
1475 *OldValue = NULL;
1476 }
1477 else
1478 {
1479 /* FIXME: Decrypt the old value */
1480 BufferSize = sizeof(LSA_UNICODE_STRING) + EncryptedOldValue->MaximumLength;
1481 DecryptedOldValue = midl_user_allocate(BufferSize);
1482 if (DecryptedOldValue == NULL)
1483 {
1484 Status = STATUS_INSUFFICIENT_RESOURCES;
1485 goto done;
1486 }
1487
1488 DecryptedOldValue->Length = (USHORT)EncryptedOldValue->Length;
1489 DecryptedOldValue->MaximumLength = (USHORT)EncryptedOldValue->MaximumLength;
1490 DecryptedOldValue->Buffer = (PWSTR)(DecryptedOldValue + 1);
1491 RtlCopyMemory(DecryptedOldValue->Buffer,
1492 EncryptedOldValue->Buffer,
1493 EncryptedOldValue->Length);
1494
1495 *OldValue = DecryptedOldValue;
1496 }
1497 }
1498
1499 done:
1500 if (!NT_SUCCESS(Status))
1501 {
1502 if (DecryptedCurrentValue != NULL)
1503 midl_user_free(DecryptedCurrentValue);
1504
1505 if (DecryptedOldValue != NULL)
1506 midl_user_free(DecryptedOldValue);
1507
1508 if (CurrentValue != NULL)
1509 *CurrentValue = NULL;
1510
1511 if (OldValue != NULL)
1512 *OldValue = NULL;
1513 }
1514
1515 if (EncryptedCurrentValue != NULL)
1516 midl_user_free(EncryptedCurrentValue);
1517
1518 if (EncryptedOldValue != NULL)
1519 midl_user_free(EncryptedOldValue);
1520
1521 return Status;
1522 }
1523
1524
1525 /*
1526 * @implemented
1527 */
1528 NTSTATUS
1529 WINAPI
1530 LsaQuerySecurityObject(IN LSA_HANDLE ObjectHandle,
1531 IN SECURITY_INFORMATION SecurityInformation,
1532 OUT PSECURITY_DESCRIPTOR *SecurityDescriptor)
1533 {
1534 LSAPR_SR_SECURITY_DESCRIPTOR SdBuffer;
1535 PLSAPR_SR_SECURITY_DESCRIPTOR SdPointer;
1536 NTSTATUS Status;
1537
1538 TRACE("LsaQuerySecurityObject(%p %lx %p)\n",
1539 ObjectHandle, SecurityInformation, SecurityDescriptor);
1540
1541 SdBuffer.Length = 0;
1542 SdBuffer.SecurityDescriptor = NULL;
1543
1544 SdPointer = &SdBuffer;
1545
1546 RpcTryExcept
1547 {
1548 Status = LsarQuerySecurityObject((LSAPR_HANDLE)ObjectHandle,
1549 SecurityInformation,
1550 &SdPointer);
1551 if (NT_SUCCESS(Status))
1552 {
1553 *SecurityDescriptor = SdBuffer.SecurityDescriptor;
1554 }
1555 else
1556 {
1557 *SecurityDescriptor = NULL;
1558 }
1559 }
1560 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1561 {
1562 Status = I_RpcMapWin32Status(RpcExceptionCode());
1563 }
1564 RpcEndExcept;
1565
1566 return Status;
1567 }
1568
1569
1570 /*
1571 * @unimplemented
1572 */
1573 NTSTATUS
1574 WINAPI
1575 LsaQueryTrustedDomainInfo(IN LSA_HANDLE PolicyHandle,
1576 IN PSID TrustedDomainSid,
1577 IN TRUSTED_INFORMATION_CLASS InformationClass,
1578 OUT PVOID *Buffer)
1579 {
1580 FIXME("LsaQueryTrustedDomainInfo(%p %p %d %p) stub\n",
1581 PolicyHandle, TrustedDomainSid, InformationClass, Buffer);
1582 return STATUS_OBJECT_NAME_NOT_FOUND;
1583 }
1584
1585
1586 /*
1587 * @implemented
1588 */
1589 NTSTATUS
1590 WINAPI
1591 LsaQueryTrustedDomainInfoByName(IN LSA_HANDLE PolicyHandle,
1592 IN PLSA_UNICODE_STRING TrustedDomainName,
1593 IN TRUSTED_INFORMATION_CLASS InformationClass,
1594 OUT PVOID *Buffer)
1595 {
1596 NTSTATUS Status;
1597
1598 TRACE("LsaQueryTrustedDomainInfoByName(%p %p %d %p)\n",
1599 PolicyHandle, TrustedDomainName, InformationClass, Buffer);
1600
1601 if (InformationClass == TrustedDomainAuthInformationInternal ||
1602 InformationClass == TrustedDomainFullInformationInternal)
1603 return STATUS_INVALID_INFO_CLASS;
1604
1605 RpcTryExcept
1606 {
1607 Status = LsarQueryTrustedDomainInfoByName((LSAPR_HANDLE)PolicyHandle,
1608 (PRPC_UNICODE_STRING)TrustedDomainName,
1609 InformationClass,
1610 (PLSAPR_TRUSTED_DOMAIN_INFO *)Buffer);
1611 }
1612 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1613 {
1614 Status = I_RpcMapWin32Status(RpcExceptionCode());
1615 }
1616 RpcEndExcept;
1617
1618 return Status;
1619 }
1620
1621
1622 /*
1623 * @implemented
1624 */
1625 NTSTATUS
1626 WINAPI
1627 LsaRemoveAccountRights(IN LSA_HANDLE PolicyHandle,
1628 IN PSID AccountSid,
1629 IN BOOLEAN AllRights,
1630 IN PLSA_UNICODE_STRING UserRights,
1631 IN ULONG CountOfRights)
1632 {
1633 LSAPR_USER_RIGHT_SET UserRightSet;
1634
1635 TRACE("LsaRemoveAccountRights(%p %p %d %p %lu)\n",
1636 PolicyHandle, AccountSid, AllRights, UserRights, CountOfRights);
1637
1638 UserRightSet.Entries = CountOfRights;
1639 UserRightSet.UserRights = (PRPC_UNICODE_STRING)UserRights;
1640
1641 RpcTryExcept
1642 {
1643 LsarRemoveAccountRights((LSAPR_HANDLE)PolicyHandle,
1644 (PRPC_SID)AccountSid,
1645 AllRights,
1646 &UserRightSet);
1647 }
1648 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1649 {
1650 I_RpcMapWin32Status(RpcExceptionCode());
1651 }
1652 RpcEndExcept;
1653
1654 return STATUS_SUCCESS;
1655 }
1656
1657
1658 /*
1659 * @implemented
1660 */
1661 NTSTATUS
1662 WINAPI
1663 LsaRemovePrivilegesFromAccount(IN LSA_HANDLE AccountHandle,
1664 IN BOOLEAN AllPrivileges,
1665 IN PPRIVILEGE_SET Privileges OPTIONAL)
1666 {
1667 NTSTATUS Status;
1668
1669 RpcTryExcept
1670 {
1671 Status = LsarRemovePrivilegesFromAccount((LSAPR_HANDLE)AccountHandle,
1672 AllPrivileges,
1673 (PLSAPR_PRIVILEGE_SET)Privileges);
1674 }
1675 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1676 {
1677 Status = I_RpcMapWin32Status(RpcExceptionCode());
1678 }
1679 RpcEndExcept;
1680
1681 return Status;
1682 }
1683
1684
1685 /*
1686 * @unimplemented
1687 */
1688 NTSTATUS
1689 WINAPI
1690 LsaRetrievePrivateData(IN LSA_HANDLE PolicyHandle,
1691 IN PLSA_UNICODE_STRING KeyName,
1692 OUT PLSA_UNICODE_STRING *PrivateData)
1693 {
1694 FIXME("LsaRetrievePrivateData(%p %p %p) stub\n",
1695 PolicyHandle, KeyName, PrivateData);
1696 return STATUS_OBJECT_NAME_NOT_FOUND;
1697 }
1698
1699
1700 /*
1701 * @implemented
1702 */
1703 NTSTATUS
1704 WINAPI
1705 LsaSetDomainInformationPolicy(IN LSA_HANDLE PolicyHandle,
1706 IN POLICY_DOMAIN_INFORMATION_CLASS InformationClass,
1707 IN PVOID Buffer OPTIONAL)
1708 {
1709 NTSTATUS Status;
1710
1711 TRACE("LsaSetDomainInformationPolicy(%p %d %p)\n",
1712 PolicyHandle, InformationClass, Buffer);
1713
1714 RpcTryExcept
1715 {
1716 Status = LsarSetDomainInformationPolicy((LSAPR_HANDLE)PolicyHandle,
1717 InformationClass,
1718 (PLSAPR_POLICY_DOMAIN_INFORMATION)Buffer);
1719 }
1720 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1721 {
1722 Status = I_RpcMapWin32Status(RpcExceptionCode());
1723 }
1724 RpcEndExcept;
1725
1726 return Status;
1727 }
1728
1729
1730 /*
1731 * @implemented
1732 */
1733 NTSTATUS
1734 WINAPI
1735 LsaSetForestTrustInformation(IN LSA_HANDLE PolicyHandle,
1736 IN PLSA_UNICODE_STRING TrustedDomainName,
1737 IN PLSA_FOREST_TRUST_INFORMATION ForestTrustInfo,
1738 IN BOOL CheckOnly,
1739 OUT PLSA_FOREST_TRUST_COLLISION_INFORMATION *CollisionInfo)
1740 {
1741 NTSTATUS Status;
1742
1743 TRACE("LsaSetForestTrustInformation(%p %p %p %d %p)\n",
1744 PolicyHandle, TrustedDomainName, ForestTrustInfo, CheckOnly, CollisionInfo);
1745
1746 RpcTryExcept
1747 {
1748 Status = LsarSetForestTrustInformation((LSAPR_HANDLE)PolicyHandle,
1749 TrustedDomainName,
1750 ForestTrustDomainInfo,
1751 ForestTrustInfo,
1752 CheckOnly,
1753 CollisionInfo);
1754 }
1755 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1756 {
1757 Status = I_RpcMapWin32Status(RpcExceptionCode());
1758 }
1759 RpcEndExcept;
1760
1761 return Status;
1762 }
1763
1764
1765 /*
1766 * @implemented
1767 */
1768 NTSTATUS
1769 WINAPI
1770 LsaSetInformationPolicy(IN LSA_HANDLE PolicyHandle,
1771 IN POLICY_INFORMATION_CLASS InformationClass,
1772 IN PVOID Buffer)
1773 {
1774 NTSTATUS Status;
1775
1776 TRACE("LsaSetInformationPolicy(%p %d %p)\n",
1777 PolicyHandle, InformationClass, Buffer);
1778
1779 RpcTryExcept
1780 {
1781 Status = LsarSetInformationPolicy((LSAPR_HANDLE)PolicyHandle,
1782 InformationClass,
1783 (PLSAPR_POLICY_INFORMATION)Buffer);
1784 }
1785 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1786 {
1787 Status = I_RpcMapWin32Status(RpcExceptionCode());
1788 }
1789 RpcEndExcept;
1790
1791 return Status;
1792 }
1793
1794
1795 /*
1796 * @unimplemented
1797 */
1798 NTSTATUS
1799 WINAPI
1800 LsaSetInformationTrustedDomain(IN LSA_HANDLE TrustedDomainHandle,
1801 IN TRUSTED_INFORMATION_CLASS InformationClass,
1802 IN PVOID Buffer)
1803 {
1804 FIXME("LsaSetInformationTrustedDomain(%p %d %p)\n",
1805 TrustedDomainHandle, InformationClass, Buffer);
1806 return STATUS_NOT_IMPLEMENTED;
1807 }
1808
1809
1810 /*
1811 * @implemented
1812 */
1813 NTSTATUS
1814 WINAPI
1815 LsaSetQuotasForAccount(IN LSA_HANDLE AccountHandle,
1816 IN PQUOTA_LIMITS QuotaLimits)
1817 {
1818 NTSTATUS Status;
1819
1820 TRACE("LsaSetQuotasForAccount(%p %p)\n",
1821 AccountHandle, QuotaLimits);
1822
1823 RpcTryExcept
1824 {
1825 Status = LsarSetQuotasForAccount((LSAPR_HANDLE)AccountHandle,
1826 QuotaLimits);
1827 }
1828 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1829 {
1830 Status = I_RpcMapWin32Status(RpcExceptionCode());
1831 }
1832 RpcEndExcept;
1833
1834 return Status;
1835 }
1836
1837
1838 /*
1839 * @implemented
1840 */
1841 NTSTATUS
1842 WINAPI
1843 LsaSetSecret(IN LSA_HANDLE SecretHandle,
1844 IN PLSA_UNICODE_STRING CurrentValue OPTIONAL,
1845 IN PLSA_UNICODE_STRING OldValue OPTIONAL)
1846 {
1847 PLSAPR_CR_CIPHER_VALUE EncryptedCurrentValue = NULL;
1848 PLSAPR_CR_CIPHER_VALUE EncryptedOldValue = NULL;
1849 SIZE_T BufferSize;
1850 NTSTATUS Status;
1851
1852 TRACE("LsaSetSecret(%p %p %p)\n",
1853 SecretHandle, EncryptedCurrentValue, EncryptedOldValue);
1854
1855 if (CurrentValue != NULL)
1856 {
1857 BufferSize = sizeof(LSAPR_CR_CIPHER_VALUE) + CurrentValue->MaximumLength;
1858 EncryptedCurrentValue = midl_user_allocate(BufferSize);
1859 if (EncryptedCurrentValue == NULL)
1860 {
1861 Status = STATUS_INSUFFICIENT_RESOURCES;
1862 goto done;
1863 }
1864
1865 EncryptedCurrentValue->Length = CurrentValue->Length;
1866 EncryptedCurrentValue->MaximumLength = CurrentValue->MaximumLength;
1867 EncryptedCurrentValue->Buffer = (BYTE *)(EncryptedCurrentValue + 1);
1868 if (EncryptedCurrentValue->Buffer != NULL)
1869 memcpy(EncryptedCurrentValue->Buffer, CurrentValue->Buffer, CurrentValue->Length);
1870 }
1871
1872 if (OldValue != NULL)
1873 {
1874 BufferSize = sizeof(LSAPR_CR_CIPHER_VALUE) + OldValue->MaximumLength;
1875 EncryptedOldValue = midl_user_allocate(BufferSize);
1876 if (EncryptedOldValue == NULL)
1877 {
1878 Status = STATUS_INSUFFICIENT_RESOURCES;
1879 goto done;
1880 }
1881
1882 EncryptedOldValue->Length = OldValue->Length;
1883 EncryptedOldValue->MaximumLength = OldValue->MaximumLength;
1884 EncryptedOldValue->Buffer = (BYTE*)(EncryptedOldValue + 1);
1885 if (EncryptedOldValue->Buffer != NULL)
1886 memcpy(EncryptedOldValue->Buffer, OldValue->Buffer, OldValue->Length);
1887 }
1888
1889 RpcTryExcept
1890 {
1891 Status = LsarSetSecret((LSAPR_HANDLE)SecretHandle,
1892 EncryptedCurrentValue,
1893 EncryptedOldValue);
1894 }
1895 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1896 {
1897 Status = I_RpcMapWin32Status(RpcExceptionCode());
1898 }
1899 RpcEndExcept;
1900
1901 done:
1902 if (EncryptedCurrentValue != NULL)
1903 midl_user_free(EncryptedCurrentValue);
1904
1905 if (EncryptedOldValue != NULL)
1906 midl_user_free(EncryptedOldValue);
1907
1908 return Status;
1909 }
1910
1911
1912 /*
1913 * @implemented
1914 */
1915 NTSTATUS
1916 WINAPI
1917 LsaSetSecurityObject(IN LSA_HANDLE ObjectHandle,
1918 IN SECURITY_INFORMATION SecurityInformation,
1919 IN PSECURITY_DESCRIPTOR SecurityDescriptor)
1920 {
1921 LSAPR_SR_SECURITY_DESCRIPTOR SdBuffer = {0, NULL};
1922 ULONG SdLength = 0;
1923 NTSTATUS Status;
1924
1925 TRACE("LsaSetSecurityObject(%p %lx %p)\n",
1926 ObjectHandle, SecurityInformation, SecurityDescriptor);
1927
1928 Status = RtlMakeSelfRelativeSD(SecurityDescriptor,
1929 NULL,
1930 &SdLength);
1931 if (Status != STATUS_BUFFER_TOO_SMALL)
1932 return STATUS_INVALID_PARAMETER;
1933
1934 SdBuffer.SecurityDescriptor = MIDL_user_allocate(SdLength);
1935 if (SdBuffer.SecurityDescriptor == NULL)
1936 return STATUS_INSUFFICIENT_RESOURCES;
1937
1938 Status = RtlMakeSelfRelativeSD(SecurityDescriptor,
1939 (PSECURITY_DESCRIPTOR)SdBuffer.SecurityDescriptor,
1940 &SdLength);
1941 if (!NT_SUCCESS(Status))
1942 goto done;
1943
1944 SdBuffer.Length = SdLength;
1945
1946 RpcTryExcept
1947 {
1948 Status = LsarSetSecurityObject((LSAPR_HANDLE)ObjectHandle,
1949 SecurityInformation,
1950 &SdBuffer);
1951 }
1952 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1953 {
1954 Status = I_RpcMapWin32Status(RpcExceptionCode());
1955 }
1956 RpcEndExcept;
1957
1958 done:
1959 if (SdBuffer.SecurityDescriptor != NULL)
1960 MIDL_user_free(SdBuffer.SecurityDescriptor);
1961
1962 return Status;
1963 }
1964
1965
1966 /*
1967 * @implemented
1968 */
1969 NTSTATUS
1970 WINAPI
1971 LsaSetSystemAccessAccount(IN LSA_HANDLE AccountHandle,
1972 IN ULONG SystemAccess)
1973 {
1974 NTSTATUS Status;
1975
1976 TRACE("LsaSetSystemAccessAccount(%p 0x%lx)\n",
1977 AccountHandle, SystemAccess);
1978
1979 RpcTryExcept
1980 {
1981 Status = LsarSetSystemAccessAccount((LSAPR_HANDLE)AccountHandle,
1982 SystemAccess);
1983 }
1984 RpcExcept(EXCEPTION_EXECUTE_HANDLER)
1985 {
1986 Status = I_RpcMapWin32Status(RpcExceptionCode());
1987 }
1988 RpcEndExcept;
1989
1990 return Status;
1991 }
1992
1993
1994 /*
1995 * @unimplemented
1996 */
1997 NTSTATUS
1998 WINAPI
1999 LsaSetTrustedDomainInfoByName(IN LSA_HANDLE PolicyHandle,
2000 IN PLSA_UNICODE_STRING TrustedDomainName,
2001 IN TRUSTED_INFORMATION_CLASS InformationClass,
2002 IN PVOID Buffer)
2003 {
2004 FIXME("LsaSetTrustedDomainInfoByName(%p %p %d %p) stub\n",
2005 PolicyHandle, TrustedDomainName, InformationClass, Buffer);
2006 return STATUS_SUCCESS;
2007 }
2008
2009
2010 /*
2011 * @unimplemented
2012 */
2013 NTSTATUS
2014 WINAPI
2015 LsaSetTrustedDomainInformation(IN LSA_HANDLE PolicyHandle,
2016 IN PSID TrustedDomainSid,
2017 IN TRUSTED_INFORMATION_CLASS InformationClass,
2018 IN PVOID Buffer)
2019 {
2020 FIXME("LsaSetTrustedDomainInformation(%p %p %d %p) stub\n",
2021 PolicyHandle, TrustedDomainSid, InformationClass, Buffer);
2022 return STATUS_SUCCESS;
2023 }
2024
2025
2026 /*
2027 * @unimplemented
2028 */
2029 NTSTATUS
2030 WINAPI
2031 LsaStorePrivateData(IN LSA_HANDLE PolicyHandle,
2032 IN PLSA_UNICODE_STRING KeyName,
2033 IN PLSA_UNICODE_STRING PrivateData OPTIONAL)
2034 {
2035 FIXME("LsaStorePrivateData(%p %p %p) stub\n",
2036 PolicyHandle, KeyName, PrivateData);
2037 return STATUS_OBJECT_NAME_NOT_FOUND;
2038 }
2039
2040 /* EOF */
A free Windows-compatible Operating System