hhctrl.ocx: Try to build URL with full path if navigation to URL fails.
[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     if (hadvapi32) {
49         pLsaClose = (void*)GetProcAddress(hadvapi32, "LsaClose");
50         pLsaFreeMemory = (void*)GetProcAddress(hadvapi32, "LsaFreeMemory");
51         pLsaOpenPolicy = (void*)GetProcAddress(hadvapi32, "LsaOpenPolicy");
52         pLsaQueryInformationPolicy = (void*)GetProcAddress(hadvapi32, "LsaQueryInformationPolicy");
53         pConvertSidToStringSidA = (void*)GetProcAddress(hadvapi32, "ConvertSidToStringSidA");
54
55         if (pLsaClose && pLsaFreeMemory && pLsaOpenPolicy && pLsaQueryInformationPolicy && pConvertSidToStringSidA)
56             return TRUE;
57         else
58             skip("Needed functions are not available\n");
59     }
60
61     return FALSE;
62 }
63
64 static void test_lsa(void)
65 {
66     NTSTATUS status;
67     LSA_HANDLE handle;
68     LSA_OBJECT_ATTRIBUTES object_attributes;
69
70     ZeroMemory(&object_attributes, sizeof(object_attributes));
71     object_attributes.Length = sizeof(object_attributes);
72
73     status = pLsaOpenPolicy( NULL, &object_attributes, POLICY_ALL_ACCESS, &handle);
74     ok(status == STATUS_SUCCESS || status == STATUS_ACCESS_DENIED,
75        "LsaOpenPolicy(POLICY_ALL_ACCESS) returned 0x%08x\n", status);
76
77     /* try a more restricted access mask if necessary */
78     if (status == STATUS_ACCESS_DENIED) {
79         trace("LsaOpenPolicy(POLICY_ALL_ACCESS) failed, trying POLICY_VIEW_LOCAL_INFORMATION\n");
80         status = pLsaOpenPolicy( NULL, &object_attributes, POLICY_VIEW_LOCAL_INFORMATION, &handle);
81         ok(status == STATUS_SUCCESS, "LsaOpenPolicy(POLICY_VIEW_LOCAL_INFORMATION) returned 0x%08x\n", status);
82     }
83
84     if (status == STATUS_SUCCESS) {
85         PPOLICY_AUDIT_EVENTS_INFO audit_events_info;
86         PPOLICY_PRIMARY_DOMAIN_INFO primary_domain_info;
87         PPOLICY_ACCOUNT_DOMAIN_INFO account_domain_info;
88         PPOLICY_DNS_DOMAIN_INFO dns_domain_info;
89
90         status = pLsaQueryInformationPolicy(handle, PolicyAuditEventsInformation, (PVOID*)&audit_events_info);
91         ok(status == STATUS_SUCCESS, "LsaQueryInformationPolicy(PolicyAuditEventsInformation) failed, returned 0x%08x\n", status);
92         if (status == STATUS_SUCCESS) {
93             pLsaFreeMemory((LPVOID)audit_events_info);
94         }
95
96         status = pLsaQueryInformationPolicy(handle, PolicyPrimaryDomainInformation, (PVOID*)&primary_domain_info);
97         ok(status == STATUS_SUCCESS, "LsaQueryInformationPolicy(PolicyPrimaryDomainInformation) failed, returned 0x%08x\n", status);
98         if (status == STATUS_SUCCESS) {
99             ok(primary_domain_info->Sid==0,"Sid should be NULL on the local computer\n");
100             if (primary_domain_info->Sid) {
101                 LPSTR strsid;
102                 if (pConvertSidToStringSidA(primary_domain_info->Sid, &strsid))
103                 {
104                     if (primary_domain_info->Name.Buffer) {
105                         LPSTR name = NULL;
106                         UINT len;
107                         len = WideCharToMultiByte( CP_ACP, 0, primary_domain_info->Name.Buffer, -1, NULL, 0, NULL, NULL );
108                         name = LocalAlloc( 0, len );
109                         WideCharToMultiByte( CP_ACP, 0, primary_domain_info->Name.Buffer, -1, name, len, NULL, NULL );
110                         trace("  name: %s sid: %s\n", name, strsid);
111                         LocalFree( name );
112                     } else
113                         trace("  name: NULL sid: %s\n", strsid);
114                     LocalFree( strsid );
115                 }
116                 else
117                     trace("invalid sid\n");
118             }
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             ok(IsEqualGUID(&dns_domain_info->DomainGuid, &GUID_NULL), "DomainGUID should be GUID_NULL on local computer\n");
134             ok(dns_domain_info->Sid==0,"Sid should be NULL on the local computer\n");
135             if (dns_domain_info->Sid || !IsEqualGUID(&dns_domain_info->DomainGuid, &GUID_NULL)) {
136                 LPSTR strsid = NULL;
137                 LPSTR name = NULL;
138                 LPSTR domain = NULL;
139                 LPSTR forest = NULL;
140                 LPSTR guidstr = NULL;
141                 WCHAR guidstrW[64];
142                 UINT len;
143                 guidstrW[0] = '\0';
144                 pConvertSidToStringSidA(dns_domain_info->Sid, &strsid);
145                 StringFromGUID2(&dns_domain_info->DomainGuid, guidstrW, sizeof(guidstrW)/sizeof(WCHAR));
146                 len = WideCharToMultiByte( CP_ACP, 0, guidstrW, -1, NULL, 0, NULL, NULL );
147                 guidstr = LocalAlloc( 0, len );
148                 WideCharToMultiByte( CP_ACP, 0, guidstrW, -1, guidstr, len, NULL, NULL );
149                 if (dns_domain_info->Name.Buffer) {
150                     len = WideCharToMultiByte( CP_ACP, 0, dns_domain_info->Name.Buffer, -1, NULL, 0, NULL, NULL );
151                     name = LocalAlloc( 0, len );
152                     WideCharToMultiByte( CP_ACP, 0, dns_domain_info->Name.Buffer, -1, name, len, NULL, NULL );
153                 }
154                 if (dns_domain_info->DnsDomainName.Buffer) {
155                     len = WideCharToMultiByte( CP_ACP, 0, dns_domain_info->DnsDomainName.Buffer, -1, NULL, 0, NULL, NULL );
156                     domain = LocalAlloc( 0, len );
157                     WideCharToMultiByte( CP_ACP, 0, dns_domain_info->DnsDomainName.Buffer, -1, domain, len, NULL, NULL );
158                 }
159                 if (dns_domain_info->DnsForestName.Buffer) {
160                     len = WideCharToMultiByte( CP_ACP, 0, dns_domain_info->DnsForestName.Buffer, -1, NULL, 0, NULL, NULL );
161                     forest = LocalAlloc( 0, len );
162                     WideCharToMultiByte( CP_ACP, 0, dns_domain_info->DnsForestName.Buffer, -1, forest, len, NULL, NULL );
163                 }
164                 trace("  name: %s domain: %s forest: %s guid: %s sid: %s\n",
165                       name ? name : "NULL", domain ? domain : "NULL",
166                       forest ? forest : "NULL", guidstr, strsid ? strsid : "NULL");
167                 LocalFree( name );
168                 LocalFree( forest );
169                 LocalFree( domain );
170                 LocalFree( guidstr );
171                 LocalFree( strsid );
172             }
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         return;
185
186     test_lsa();
187 }