gdiplus: Implement GdipGetEmHeight.
[wine] / dlls / advapi32 / tests / lsa.c
1 /*
2  * Unit tests for lsa functions
3  *
4  * Copyright (c) 2006 Robert Reif
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 <stdarg.h>
22 #include <stdio.h>
23
24 #include "ntstatus.h"
25 #define WIN32_NO_STATUS
26 #include "windef.h"
27 #include "winbase.h"
28 #include "winreg.h"
29 #include "ntsecapi.h"
30 #include "sddl.h"
31 #include "winnls.h"
32 #include "objbase.h"
33 #define INITGUID
34 #include "guiddef.h"
35 #include "wine/test.h"
36
37 static HMODULE hadvapi32;
38 static NTSTATUS (WINAPI *pLsaClose)(LSA_HANDLE);
39 static NTSTATUS (WINAPI *pLsaFreeMemory)(PVOID);
40 static NTSTATUS (WINAPI *pLsaOpenPolicy)(PLSA_UNICODE_STRING,PLSA_OBJECT_ATTRIBUTES,ACCESS_MASK,PLSA_HANDLE);
41 static NTSTATUS (WINAPI *pLsaQueryInformationPolicy)(LSA_HANDLE,POLICY_INFORMATION_CLASS,PVOID*);
42 static BOOL     (WINAPI *pConvertSidToStringSidA)(PSID pSid, LPSTR *str);
43
44 static BOOL init(void)
45 {
46     hadvapi32 = GetModuleHandle("advapi32.dll");
47
48     pLsaClose = (void*)GetProcAddress(hadvapi32, "LsaClose");
49     pLsaFreeMemory = (void*)GetProcAddress(hadvapi32, "LsaFreeMemory");
50     pLsaOpenPolicy = (void*)GetProcAddress(hadvapi32, "LsaOpenPolicy");
51     pLsaQueryInformationPolicy = (void*)GetProcAddress(hadvapi32, "LsaQueryInformationPolicy");
52     pConvertSidToStringSidA = (void*)GetProcAddress(hadvapi32, "ConvertSidToStringSidA");
53
54     if (pLsaClose && pLsaFreeMemory && pLsaOpenPolicy && pLsaQueryInformationPolicy && pConvertSidToStringSidA)
55         return TRUE;
56
57     return FALSE;
58 }
59
60 static void test_lsa(void)
61 {
62     NTSTATUS status;
63     LSA_HANDLE handle;
64     LSA_OBJECT_ATTRIBUTES object_attributes;
65
66     ZeroMemory(&object_attributes, sizeof(object_attributes));
67     object_attributes.Length = sizeof(object_attributes);
68
69     status = pLsaOpenPolicy( NULL, &object_attributes, POLICY_ALL_ACCESS, &handle);
70     ok(status == STATUS_SUCCESS || status == STATUS_ACCESS_DENIED,
71        "LsaOpenPolicy(POLICY_ALL_ACCESS) returned 0x%08x\n", status);
72
73     /* try a more restricted access mask if necessary */
74     if (status == STATUS_ACCESS_DENIED) {
75         trace("LsaOpenPolicy(POLICY_ALL_ACCESS) failed, trying POLICY_VIEW_LOCAL_INFORMATION\n");
76         status = pLsaOpenPolicy( NULL, &object_attributes, POLICY_VIEW_LOCAL_INFORMATION, &handle);
77         ok(status == STATUS_SUCCESS, "LsaOpenPolicy(POLICY_VIEW_LOCAL_INFORMATION) returned 0x%08x\n", status);
78     }
79
80     if (status == STATUS_SUCCESS) {
81         PPOLICY_AUDIT_EVENTS_INFO audit_events_info;
82         PPOLICY_PRIMARY_DOMAIN_INFO primary_domain_info;
83         PPOLICY_ACCOUNT_DOMAIN_INFO account_domain_info;
84         PPOLICY_DNS_DOMAIN_INFO dns_domain_info;
85
86         status = pLsaQueryInformationPolicy(handle, PolicyAuditEventsInformation, (PVOID*)&audit_events_info);
87         if (status == STATUS_ACCESS_DENIED)
88             skip("Not enough rights to retrieve PolicyAuditEventsInformation\n");
89         else
90             ok(status == STATUS_SUCCESS, "LsaQueryInformationPolicy(PolicyAuditEventsInformation) failed, returned 0x%08x\n", status);
91         if (status == STATUS_SUCCESS) {
92             pLsaFreeMemory((LPVOID)audit_events_info);
93         }
94
95         status = pLsaQueryInformationPolicy(handle, PolicyPrimaryDomainInformation, (PVOID*)&primary_domain_info);
96         ok(status == STATUS_SUCCESS, "LsaQueryInformationPolicy(PolicyPrimaryDomainInformation) failed, returned 0x%08x\n", status);
97         if (status == STATUS_SUCCESS) {
98             if (primary_domain_info->Sid) {
99                 LPSTR strsid;
100                 if (pConvertSidToStringSidA(primary_domain_info->Sid, &strsid))
101                 {
102                     if (primary_domain_info->Name.Buffer) {
103                         LPSTR name = NULL;
104                         UINT len;
105                         len = WideCharToMultiByte( CP_ACP, 0, primary_domain_info->Name.Buffer, -1, NULL, 0, NULL, NULL );
106                         name = LocalAlloc( 0, len );
107                         WideCharToMultiByte( CP_ACP, 0, primary_domain_info->Name.Buffer, -1, name, len, NULL, NULL );
108                         trace("  name: %s sid: %s\n", name, strsid);
109                         LocalFree( name );
110                     } else
111                         trace("  name: NULL sid: %s\n", strsid);
112                     LocalFree( strsid );
113                 }
114                 else
115                     trace("invalid sid\n");
116             }
117             else
118                 trace("Running on a standalone system.\n");
119             pLsaFreeMemory((LPVOID)primary_domain_info);
120         }
121
122         status = pLsaQueryInformationPolicy(handle, PolicyAccountDomainInformation, (PVOID*)&account_domain_info);
123         ok(status == STATUS_SUCCESS, "LsaQueryInformationPolicy(PolicyAccountDomainInformation) failed, returned 0x%08x\n", status);
124         if (status == STATUS_SUCCESS) {
125             pLsaFreeMemory((LPVOID)account_domain_info);
126         }
127
128         /* This isn't supported in NT4 */
129         status = pLsaQueryInformationPolicy(handle, PolicyDnsDomainInformation, (PVOID*)&dns_domain_info);
130         ok(status == STATUS_SUCCESS || status == STATUS_INVALID_PARAMETER,
131            "LsaQueryInformationPolicy(PolicyDnsDomainInformation) failed, returned 0x%08x\n", status);
132         if (status == STATUS_SUCCESS) {
133             if (dns_domain_info->Sid || !IsEqualGUID(&dns_domain_info->DomainGuid, &GUID_NULL)) {
134                 LPSTR strsid = NULL;
135                 LPSTR name = NULL;
136                 LPSTR domain = NULL;
137                 LPSTR forest = NULL;
138                 LPSTR guidstr = NULL;
139                 WCHAR guidstrW[64];
140                 UINT len;
141                 guidstrW[0] = '\0';
142                 pConvertSidToStringSidA(dns_domain_info->Sid, &strsid);
143                 StringFromGUID2(&dns_domain_info->DomainGuid, guidstrW, sizeof(guidstrW)/sizeof(WCHAR));
144                 len = WideCharToMultiByte( CP_ACP, 0, guidstrW, -1, NULL, 0, NULL, NULL );
145                 guidstr = LocalAlloc( 0, len );
146                 WideCharToMultiByte( CP_ACP, 0, guidstrW, -1, guidstr, len, NULL, NULL );
147                 if (dns_domain_info->Name.Buffer) {
148                     len = WideCharToMultiByte( CP_ACP, 0, dns_domain_info->Name.Buffer, -1, NULL, 0, NULL, NULL );
149                     name = LocalAlloc( 0, len );
150                     WideCharToMultiByte( CP_ACP, 0, dns_domain_info->Name.Buffer, -1, name, len, NULL, NULL );
151                 }
152                 if (dns_domain_info->DnsDomainName.Buffer) {
153                     len = WideCharToMultiByte( CP_ACP, 0, dns_domain_info->DnsDomainName.Buffer, -1, NULL, 0, NULL, NULL );
154                     domain = LocalAlloc( 0, len );
155                     WideCharToMultiByte( CP_ACP, 0, dns_domain_info->DnsDomainName.Buffer, -1, domain, len, NULL, NULL );
156                 }
157                 if (dns_domain_info->DnsForestName.Buffer) {
158                     len = WideCharToMultiByte( CP_ACP, 0, dns_domain_info->DnsForestName.Buffer, -1, NULL, 0, NULL, NULL );
159                     forest = LocalAlloc( 0, len );
160                     WideCharToMultiByte( CP_ACP, 0, dns_domain_info->DnsForestName.Buffer, -1, forest, len, NULL, NULL );
161                 }
162                 trace("  name: %s domain: %s forest: %s guid: %s sid: %s\n",
163                       name ? name : "NULL", domain ? domain : "NULL",
164                       forest ? forest : "NULL", guidstr, strsid ? strsid : "NULL");
165                 LocalFree( name );
166                 LocalFree( forest );
167                 LocalFree( domain );
168                 LocalFree( guidstr );
169                 LocalFree( strsid );
170             }
171             else
172                 trace("Running on a standalone system.\n");
173             pLsaFreeMemory((LPVOID)dns_domain_info);
174         }
175
176         status = pLsaClose(handle);
177         ok(status == STATUS_SUCCESS, "LsaClose() failed, returned 0x%08x\n", status);
178     }
179 }
180
181 START_TEST(lsa)
182 {
183     if (!init()) {
184         skip("Needed functions are not available\n");
185         return;
186     }
187
188     test_lsa();
189 }