1 /* Copyright 2002 Andriy Palamarchuk
2 * Copyright (c) 2003 Juan Lang
4 * netapi32 user functions
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.
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.
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
26 WINE_DEFAULT_DEBUG_CHANNEL(netapi32
);
28 /************************************************************
29 * NETAPI_IsLocalComputer
31 * Checks whether the server name indicates local machine.
33 DECLSPEC_HIDDEN BOOL
NETAPI_IsLocalComputer( LMCSTR name
)
35 WCHAR buf
[MAX_COMPUTERNAME_LENGTH
+ 1];
36 DWORD size
= sizeof(buf
) / sizeof(buf
[0]);
39 if (!name
|| !name
[0]) return TRUE
;
41 ret
= GetComputerNameW( buf
, &size
);
42 if (ret
&& name
[0] == '\\' && name
[1] == '\\') name
+= 2;
43 return ret
&& !strcmpiW( name
, buf
);
46 static void wprint_mac(WCHAR
* buffer
, int len
, const MIB_IFROW
*ifRow
)
61 for (i
= 0; i
< ifRow
->dwPhysAddrLen
&& 2 * i
< len
; i
++)
63 val
= ifRow
->bPhysAddr
[i
];
65 buffer
[2*i
] = (WCHAR
)((val
>>4) + 'A' - 10);
67 buffer
[2*i
] = (WCHAR
)((val
>>4) + '0');
69 buffer
[2*i
+1] = (WCHAR
)((val
& 0xf) + 'A' - 10);
71 buffer
[2*i
+1] = (WCHAR
)((val
& 0xf) + '0');
76 /* Theoretically this could be too short, except that MS defines
77 * MAX_ADAPTER_NAME as 128, and MAX_INTERFACE_NAME_LEN as 256, and both
78 * represent a count of WCHARs, so even with an extraordinarily long header
81 #define MAX_TRANSPORT_NAME MAX_INTERFACE_NAME_LEN
82 #define MAX_TRANSPORT_ADDR 13
84 #define NBT_TRANSPORT_NAME_HEADER "\\Device\\NetBT_Tcpip_"
85 #define UNKNOWN_TRANSPORT_NAME_HEADER "\\Device\\UnknownTransport_"
87 static void wprint_name(WCHAR
*buffer
, int len
, ULONG transport
,
101 if (!memcmp(&transport
, TRANSPORT_NBT
, sizeof(ULONG
)))
102 name
= NBT_TRANSPORT_NAME_HEADER
;
104 name
= UNKNOWN_TRANSPORT_NAME_HEADER
;
106 for (ptr1
= buffer
; *name
&& ptr1
< buffer
+ len
; ptr1
++, name
++)
108 for (ptr2
= ifRow
->wszName
; *ptr2
&& ptr1
< buffer
+ len
; ptr1
++, ptr2
++)
113 /***********************************************************************
114 * NetWkstaTransportEnum (NETAPI32.@)
117 struct WkstaTransportEnumData
126 /**********************************************************************/
128 static BOOL
WkstaEnumAdaptersCallback(UCHAR totalLANAs
, UCHAR lanaIndex
,
129 ULONG transport
, const NetBIOSAdapterImpl
*data
, void *closure
)
132 struct WkstaTransportEnumData
*enumData
= closure
;
134 if (enumData
&& enumData
->pbuf
)
140 enumData
->n_adapt
= totalLANAs
;
141 enumData
->n_read
= 0;
143 toAllocate
= totalLANAs
* (sizeof(WKSTA_TRANSPORT_INFO_0
)
144 + MAX_TRANSPORT_NAME
* sizeof(WCHAR
) +
145 MAX_TRANSPORT_ADDR
* sizeof(WCHAR
));
146 if (enumData
->prefmaxlen
!= MAX_PREFERRED_LENGTH
)
147 toAllocate
= enumData
->prefmaxlen
;
148 NetApiBufferAllocate(toAllocate
, (LPVOID
*)enumData
->pbuf
);
150 if (*(enumData
->pbuf
))
154 if (enumData
->prefmaxlen
== MAX_PREFERRED_LENGTH
)
155 spaceFor
= totalLANAs
;
157 spaceFor
= enumData
->prefmaxlen
/
158 (sizeof(WKSTA_TRANSPORT_INFO_0
) + (MAX_TRANSPORT_NAME
+
159 MAX_TRANSPORT_ADDR
) * sizeof(WCHAR
));
160 if (enumData
->n_read
< spaceFor
)
162 PWKSTA_TRANSPORT_INFO_0 ti
;
163 LMSTR transport_name
, transport_addr
;
166 ti
= (PWKSTA_TRANSPORT_INFO_0
)(*(enumData
->pbuf
) +
167 enumData
->n_read
* sizeof(WKSTA_TRANSPORT_INFO_0
));
168 transport_name
= (LMSTR
)(*(enumData
->pbuf
) +
169 totalLANAs
* sizeof(WKSTA_TRANSPORT_INFO_0
) +
170 enumData
->n_read
* MAX_TRANSPORT_NAME
* sizeof(WCHAR
));
171 transport_addr
= (LMSTR
)(*(enumData
->pbuf
) +
172 totalLANAs
* (sizeof(WKSTA_TRANSPORT_INFO_0
) +
173 MAX_TRANSPORT_NAME
* sizeof(WCHAR
)) +
174 enumData
->n_read
* MAX_TRANSPORT_ADDR
* sizeof(WCHAR
));
176 ifRow
.dwIndex
= data
->ifIndex
;
178 ti
->wkti0_quality_of_service
= 0;
179 ti
->wkti0_number_of_vcs
= 0;
180 ti
->wkti0_transport_name
= transport_name
;
181 wprint_name(ti
->wkti0_transport_name
, MAX_TRANSPORT_NAME
,
183 ti
->wkti0_transport_address
= transport_addr
;
184 wprint_mac(ti
->wkti0_transport_address
, MAX_TRANSPORT_ADDR
,
186 if (!memcmp(&transport
, TRANSPORT_NBT
, sizeof(ULONG
)))
187 ti
->wkti0_wan_ish
= TRUE
;
189 ti
->wkti0_wan_ish
= FALSE
;
190 TRACE("%d of %d:ti at %p\n", lanaIndex
, totalLANAs
, ti
);
191 TRACE("transport_name at %p %s\n",
192 ti
->wkti0_transport_name
,
193 debugstr_w(ti
->wkti0_transport_name
));
194 TRACE("transport_address at %p %s\n",
195 ti
->wkti0_transport_address
,
196 debugstr_w(ti
->wkti0_transport_address
));
198 enumData
->ret
= NERR_Success
;
203 enumData
->ret
= ERROR_MORE_DATA
;
209 enumData
->ret
= ERROR_OUTOFMEMORY
;
218 /**********************************************************************/
220 NET_API_STATUS WINAPI
221 NetWkstaTransportEnum(LMSTR ServerName
, DWORD level
, PBYTE
* pbuf
,
222 DWORD prefmaxlen
, LPDWORD read_entries
,
223 PDWORD total_entries
, PDWORD hresume
)
227 TRACE(":%s, 0x%08x, %p, 0x%08x, %p, %p, %p\n", debugstr_w(ServerName
),
228 level
, pbuf
, prefmaxlen
, read_entries
, total_entries
,hresume
);
229 if (!NETAPI_IsLocalComputer(ServerName
))
231 FIXME(":not implemented for non-local computers\n");
232 ret
= ERROR_INVALID_LEVEL
;
236 if (hresume
&& *hresume
)
238 FIXME(":resume handle not implemented\n");
239 return ERROR_INVALID_LEVEL
;
244 case 0: /* transport info */
247 struct WkstaTransportEnumData enumData
;
249 if (NetBIOSNumAdapters() == 0)
250 return ERROR_NETWORK_UNREACHABLE
;
252 return STATUS_ACCESS_VIOLATION
;
253 if (!total_entries
|| !pbuf
)
254 return RPC_X_NULL_REF_POINTER
;
256 enumData
.prefmaxlen
= prefmaxlen
;
257 enumData
.pbuf
= pbuf
;
258 memcpy(&allTransports
, ALL_TRANSPORTS
, sizeof(ULONG
));
259 NetBIOSEnumAdapters(allTransports
, WkstaEnumAdaptersCallback
,
261 *read_entries
= enumData
.n_read
;
262 *total_entries
= enumData
.n_adapt
;
263 if (hresume
) *hresume
= 0;
268 TRACE("Invalid level %d is specified\n", level
);
269 ret
= ERROR_INVALID_LEVEL
;
276 /************************************************************
277 * NetWkstaUserGetInfo (NETAPI32.@)
279 NET_API_STATUS WINAPI
NetWkstaUserGetInfo(LMSTR reserved
, DWORD level
,
282 NET_API_STATUS nastatus
;
284 TRACE("(%s, %d, %p)\n", debugstr_w(reserved
), level
, bufptr
);
289 PWKSTA_USER_INFO_0 ui
;
290 DWORD dwSize
= UNLEN
+ 1;
293 nastatus
= NetApiBufferAllocate(sizeof(WKSTA_USER_INFO_0
) + dwSize
* sizeof(WCHAR
),
295 if (nastatus
!= NERR_Success
)
296 return ERROR_NOT_ENOUGH_MEMORY
;
298 ui
= (PWKSTA_USER_INFO_0
) *bufptr
;
299 ui
->wkui0_username
= (LMSTR
) (*bufptr
+ sizeof(WKSTA_USER_INFO_0
));
302 if (!GetUserNameW(ui
->wkui0_username
, &dwSize
))
304 NetApiBufferFree(ui
);
305 return ERROR_NOT_ENOUGH_MEMORY
;
308 nastatus
= NetApiBufferReallocate(
309 *bufptr
, sizeof(WKSTA_USER_INFO_0
) +
310 (lstrlenW(ui
->wkui0_username
) + 1) * sizeof(WCHAR
),
312 if (nastatus
!= NERR_Success
)
320 PWKSTA_USER_INFO_1 ui
;
321 PWKSTA_USER_INFO_0 ui0
;
322 LSA_OBJECT_ATTRIBUTES ObjectAttributes
;
323 LSA_HANDLE PolicyHandle
;
324 PPOLICY_ACCOUNT_DOMAIN_INFO DomainInfo
;
327 /* sizes of the field buffers in WCHARS */
328 int username_sz
, logon_domain_sz
, oth_domains_sz
, logon_server_sz
;
330 FIXME("Level 1 processing is partially implemented\n");
334 /* get some information first to estimate size of the buffer */
336 nastatus
= NetWkstaUserGetInfo(NULL
, 0, (PBYTE
*) &ui0
);
337 if (nastatus
!= NERR_Success
)
339 username_sz
= lstrlenW(ui0
->wkui0_username
) + 1;
341 ZeroMemory(&ObjectAttributes
, sizeof(ObjectAttributes
));
342 NtStatus
= LsaOpenPolicy(NULL
, &ObjectAttributes
,
343 POLICY_VIEW_LOCAL_INFORMATION
,
345 if (NtStatus
!= STATUS_SUCCESS
)
347 TRACE("LsaOpenPolicyFailed with NT status %x\n",
348 LsaNtStatusToWinError(NtStatus
));
349 NetApiBufferFree(ui0
);
350 return ERROR_NOT_ENOUGH_MEMORY
;
352 LsaQueryInformationPolicy(PolicyHandle
, PolicyAccountDomainInformation
,
353 (PVOID
*) &DomainInfo
);
354 logon_domain_sz
= lstrlenW(DomainInfo
->DomainName
.Buffer
) + 1;
355 LsaClose(PolicyHandle
);
358 nastatus
= NetApiBufferAllocate(sizeof(WKSTA_USER_INFO_1
) +
359 (username_sz
+ logon_domain_sz
+
360 oth_domains_sz
+ logon_server_sz
) * sizeof(WCHAR
),
362 if (nastatus
!= NERR_Success
) {
363 NetApiBufferFree(ui0
);
366 ui
= (WKSTA_USER_INFO_1
*) *bufptr
;
367 ui
->wkui1_username
= (LMSTR
) (*bufptr
+ sizeof(WKSTA_USER_INFO_1
));
368 ui
->wkui1_logon_domain
= (LMSTR
) (
369 ((PBYTE
) ui
->wkui1_username
) + username_sz
* sizeof(WCHAR
));
370 ui
->wkui1_oth_domains
= (LMSTR
) (
371 ((PBYTE
) ui
->wkui1_logon_domain
) +
372 logon_domain_sz
* sizeof(WCHAR
));
373 ui
->wkui1_logon_server
= (LMSTR
) (
374 ((PBYTE
) ui
->wkui1_oth_domains
) +
375 oth_domains_sz
* sizeof(WCHAR
));
378 lstrcpyW(ui
->wkui1_username
, ui0
->wkui0_username
);
379 NetApiBufferFree(ui0
);
381 lstrcpynW(ui
->wkui1_logon_domain
, DomainInfo
->DomainName
.Buffer
,
383 LsaFreeMemory(DomainInfo
);
385 /* FIXME. Not implemented. Populated with empty strings */
386 ui
->wkui1_oth_domains
[0] = 0;
387 ui
->wkui1_logon_server
[0] = 0;
392 PWKSTA_USER_INFO_1101 ui
;
395 FIXME("Stub. Level 1101 processing is not implemented\n");
396 /* FIXME see also wkui1_oth_domains for level 1 */
399 nastatus
= NetApiBufferAllocate(sizeof(WKSTA_USER_INFO_1101
) + dwSize
* sizeof(WCHAR
),
401 if (nastatus
!= NERR_Success
)
403 ui
= (PWKSTA_USER_INFO_1101
) *bufptr
;
404 ui
->wkui1101_oth_domains
= (LMSTR
)(ui
+ 1);
407 ui
->wkui1101_oth_domains
[0] = 0;
411 TRACE("Invalid level %d is specified\n", level
);
412 return ERROR_INVALID_LEVEL
;
417 /************************************************************
418 * NetWkstaUserEnum (NETAPI32.@)
420 NET_API_STATUS WINAPI
421 NetWkstaUserEnum(LMSTR servername
, DWORD level
, LPBYTE
* bufptr
,
422 DWORD prefmaxlen
, LPDWORD entriesread
,
423 LPDWORD totalentries
, LPDWORD resumehandle
)
425 FIXME("(%s, %d, %p, %d, %p, %p, %p): stub!\n", debugstr_w(servername
),
426 level
, bufptr
, prefmaxlen
, entriesread
, totalentries
, resumehandle
);
427 return ERROR_INVALID_PARAMETER
;
430 /************************************************************
431 * NetpGetComputerName (NETAPI32.@)
433 NET_API_STATUS WINAPI
NetpGetComputerName(LPWSTR
*Buffer
)
435 DWORD dwSize
= MAX_COMPUTERNAME_LENGTH
+ 1;
437 TRACE("(%p)\n", Buffer
);
438 NetApiBufferAllocate(dwSize
* sizeof(WCHAR
), (LPVOID
*) Buffer
);
439 if (GetComputerNameW(*Buffer
, &dwSize
))
441 return NetApiBufferReallocate(
442 *Buffer
, (dwSize
+ 1) * sizeof(WCHAR
),
447 NetApiBufferFree(*Buffer
);
448 return ERROR_NOT_ENOUGH_MEMORY
;
452 NET_API_STATUS WINAPI
I_NetNameCompare(LPVOID p1
, LPWSTR wkgrp
, LPWSTR comp
,
453 LPVOID p4
, LPVOID p5
)
455 FIXME("(%p %s %s %p %p): stub\n", p1
, debugstr_w(wkgrp
), debugstr_w(comp
),
457 return ERROR_INVALID_PARAMETER
;
460 NET_API_STATUS WINAPI
I_NetNameValidate(LPVOID p1
, LPWSTR wkgrp
, LPVOID p3
,
463 FIXME("(%p %s %p %p): stub\n", p1
, debugstr_w(wkgrp
), p3
, p4
);
464 return ERROR_INVALID_PARAMETER
;
467 NET_API_STATUS WINAPI
NetWkstaGetInfo( LMSTR servername
, DWORD level
,
472 TRACE("%s %d %p\n", debugstr_w( servername
), level
, bufptr
);
475 if (!NETAPI_IsLocalComputer(servername
))
477 FIXME("remote computers not supported\n");
478 return ERROR_INVALID_LEVEL
;
481 if (!bufptr
) return ERROR_INVALID_PARAMETER
;
489 static const WCHAR lanroot
[] = {'c',':','\\','l','a','n','m','a','n',0}; /* FIXME */
490 DWORD computerNameLen
, domainNameLen
, size
;
491 WCHAR computerName
[MAX_COMPUTERNAME_LENGTH
+ 1];
492 LSA_OBJECT_ATTRIBUTES ObjectAttributes
;
493 LSA_HANDLE PolicyHandle
;
496 computerNameLen
= MAX_COMPUTERNAME_LENGTH
+ 1;
497 GetComputerNameW(computerName
, &computerNameLen
);
498 computerNameLen
++; /* include NULL terminator */
500 ZeroMemory(&ObjectAttributes
, sizeof(ObjectAttributes
));
501 NtStatus
= LsaOpenPolicy(NULL
, &ObjectAttributes
,
502 POLICY_VIEW_LOCAL_INFORMATION
, &PolicyHandle
);
503 if (NtStatus
!= STATUS_SUCCESS
)
504 ret
= LsaNtStatusToWinError(NtStatus
);
507 PPOLICY_ACCOUNT_DOMAIN_INFO DomainInfo
;
509 LsaQueryInformationPolicy(PolicyHandle
,
510 PolicyAccountDomainInformation
, (PVOID
*)&DomainInfo
);
511 domainNameLen
= lstrlenW(DomainInfo
->DomainName
.Buffer
) + 1;
512 size
= sizeof(WKSTA_INFO_102
) + computerNameLen
* sizeof(WCHAR
)
513 + domainNameLen
* sizeof(WCHAR
) + sizeof(lanroot
);
514 ret
= NetApiBufferAllocate(size
, (LPVOID
*)bufptr
);
515 if (ret
== NERR_Success
)
517 /* INFO_100 and INFO_101 structures are subsets of INFO_102 */
518 PWKSTA_INFO_102 info
= (PWKSTA_INFO_102
)*bufptr
;
519 OSVERSIONINFOW verInfo
;
521 info
->wki102_platform_id
= PLATFORM_ID_NT
;
522 info
->wki102_computername
= (LMSTR
)(*bufptr
+
523 sizeof(WKSTA_INFO_102
));
524 memcpy(info
->wki102_computername
, computerName
,
525 computerNameLen
* sizeof(WCHAR
));
526 info
->wki102_langroup
= info
->wki102_computername
+ computerNameLen
;
527 memcpy(info
->wki102_langroup
, DomainInfo
->DomainName
.Buffer
,
528 domainNameLen
* sizeof(WCHAR
));
529 info
->wki102_lanroot
= info
->wki102_langroup
+ domainNameLen
;
530 memcpy(info
->wki102_lanroot
, lanroot
, sizeof(lanroot
));
531 memset(&verInfo
, 0, sizeof(verInfo
));
532 verInfo
.dwOSVersionInfoSize
= sizeof(verInfo
);
533 GetVersionExW(&verInfo
);
534 info
->wki102_ver_major
= verInfo
.dwMajorVersion
;
535 info
->wki102_ver_minor
= verInfo
.dwMinorVersion
;
536 info
->wki102_logged_on_users
= 1;
538 LsaFreeMemory(DomainInfo
);
539 LsaClose(PolicyHandle
);
545 FIXME("level %d unimplemented\n", level
);
546 ret
= ERROR_INVALID_LEVEL
;
551 /************************************************************
552 * NetGetJoinInformation (NETAPI32.@)
554 NET_API_STATUS NET_API_FUNCTION
NetGetJoinInformation(
557 PNETSETUP_JOIN_STATUS type
)
559 FIXME("Stub %s %p %p\n", wine_dbgstr_w(Server
), Name
, type
);
561 if (Name
== NULL
|| type
== NULL
)
562 return ERROR_INVALID_PARAMETER
;
565 *type
= NetSetupUnknownStatus
;