Win32 API 日本語リファレンス
ホームSecurity › LookupAccountSidW

LookupAccountSidW

関数
SIDからアカウント名とドメイン名を取得する(Unicode版)。
DLLADVAPI32.dll文字セットUnicode (-W)呼出規約winapiSetLastErrorあり対応OSWindows XP 以降

シグネチャ

// ADVAPI32.dll  (Unicode / -W)
#include <windows.h>

BOOL LookupAccountSidW(
    LPCWSTR lpSystemName,   // optional
    PSID Sid,
    LPWSTR Name,   // optional
    DWORD* cchName,
    LPWSTR ReferencedDomainName,   // optional
    DWORD* cchReferencedDomainName,
    SID_NAME_USE* peUse
);

パラメーター

名前方向説明
lpSystemNameLPCWSTRinoptional対象のコンピューターを指定する null 終端文字列へのポインターです。この文字列にはリモートコンピューターの名前を指定できます。このパラメーターが NULL の場合、アカウント名の変換はローカルシステム上で開始されます。ローカルシステムで名前を解決できない場合、この関数はローカルシステムが信頼しているドメインコントローラーを使用して名前の解決を試みます。一般に、lpSystemName に値を指定するのは、アカウントが信頼されていないドメインにあり、そのドメイン内のコンピューター名がわかっている場合のみにしてください。
SidPSIDin検索対象の SID へのポインターです。
NameLPWSTRoutoptionallpSid パラメーターに対応するアカウント名を含む null 終端文字列を受け取るバッファーへのポインターです。
cchNameDWORD*inout入力時には、lpName バッファーのサイズを TCHAR 単位で指定します。バッファーが小さすぎて関数が失敗した場合、または cchName がゼロの場合、cchName には終端の null 文字を含む必要なバッファーサイズが返されます。
ReferencedDomainNameLPWSTRoutoptional

アカウント名が見つかったドメインの名前を含む null 終端文字列を受け取るバッファーへのポインターです。

サーバー上では、ローカルコンピューターのセキュリティデータベース内のほとんどのアカウントに対して返されるドメイン名は、そのサーバーがドメインコントローラーとなっているドメインの名前です。

ワークステーション上では、ローカルコンピューターのセキュリティデータベース内のほとんどのアカウントに対して返されるドメイン名は、システムを最後に起動した時点でのコンピューター名です (バックスラッシュは除外されます)。コンピューター名が変更されても、システムを再起動するまでは古い名前がドメイン名として返され続けます。

一部のアカウントはシステムによって事前定義されています。これらのアカウントに対して返されるドメイン名は BUILTIN です。

cchReferencedDomainNameDWORD*inout入力時には、lpReferencedDomainName バッファーのサイズを TCHAR 単位で指定します。バッファーが小さすぎて関数が失敗した場合、または cchReferencedDomainName がゼロの場合、cchReferencedDomainName には終端の null 文字を含む必要なバッファーサイズが返されます。
peUseSID_NAME_USE*outアカウントの種類を示す SID_NAME_USE 値を受け取る変数へのポインターです。

戻り値の型: BOOL

公式ドキュメント

セキュリティ識別子 (SID) を入力として受け取ります。この SID に対応するアカウント名と、その SID が最初に見つかったドメインの名前を取得します。(Unicode)

戻り値

関数が成功した場合、0 以外の値を返します。

関数が失敗した場合は 0 を返します。拡張エラー情報を取得するには、 GetLastError を呼び出します。

解説(Remarks)

LookupAccountSid 関数は、まず既知の SID の一覧を確認することで、指定された SID に対応する名前を見つけようとします。指定された SID が既知の SID に該当しない場合、この関数は組み込みおよび管理者が定義したローカルアカウントを確認します。次に、プライマリドメインを確認します。プライマリドメインで認識されない セキュリティ識別子 は、その SID プレフィックスに対応する信頼されたドメインに対して照合されます。

関数が SID に対応するアカウント名を見つけられない場合、GetLastErrorERROR_NONE_MAPPED を返します。これは、ネットワークのタイムアウトによって関数が名前を見つけられない場合に発生することがあります。また、ログオンセッション を識別する ログオン SID のように、対応するアカウント名を持たない SID に対しても発生します。

ローカルアカウント、ローカルドメインアカウント、および明示的に信頼されたドメインアカウントの SID を検索することに加えて、LookupAccountSid は、フォレスト内のアカウントの SIDhistory フィールドにのみ現れる SID を含め、フォレスト内の任意のドメインの任意のアカウントの SID を検索できます。SIDhistory フィールドには、別のドメインから移動されたアカウントの以前の SID が格納されます。SID を検索するために、LookupAccountSid はフォレストのグローバルカタログに問い合わせます。

この関数を使用する例については、アクセストークン内での SID の検索 を参照してください。

メモ

winbase.h ヘッダーは、UNICODE プリプロセッサ定数の定義に基づいて、この関数の ANSI 版または Unicode 版を自動的に選択するエイリアスとして LookupAccountSid を定義しています。エンコーディングに依存しないこのエイリアスの使用を、エンコーディングに依存しないわけではないコードと混在させると、不一致が生じ、コンパイルエラーまたは実行時エラーを引き起こす可能性があります。詳細については、Conventions for Function Prototypes を参照してください。

出典・ライセンス: 上記「公式ドキュメント」の内容は Microsoft の Win32 API ドキュメント(MicrosoftDocs/sdk-api)を日本語に翻訳・改変したものです。© Microsoft Corporation. CC BY 4.0 で提供。
Microsoft 公式リファレンス: 英語 (en-us) · 日本語 (ja-jp) · 原文ソース (GitHub)

各言語での呼び出し定義

// ADVAPI32.dll  (Unicode / -W)
#include <windows.h>

BOOL LookupAccountSidW(
    LPCWSTR lpSystemName,   // optional
    PSID Sid,
    LPWSTR Name,   // optional
    DWORD* cchName,
    LPWSTR ReferencedDomainName,   // optional
    DWORD* cchReferencedDomainName,
    SID_NAME_USE* peUse
);
[return: MarshalAs(UnmanagedType.Bool)]
[DllImport("ADVAPI32.dll", CharSet = CharSet.Unicode, SetLastError = true, ExactSpelling = true)]
static extern bool LookupAccountSidW(
    [MarshalAs(UnmanagedType.LPWStr)] string lpSystemName,   // LPCWSTR optional
    IntPtr Sid,   // PSID
    [MarshalAs(UnmanagedType.LPWStr)] System.Text.StringBuilder Name,   // LPWSTR optional, out
    ref uint cchName,   // DWORD* in/out
    [MarshalAs(UnmanagedType.LPWStr)] System.Text.StringBuilder ReferencedDomainName,   // LPWSTR optional, out
    ref uint cchReferencedDomainName,   // DWORD* in/out
    out int peUse   // SID_NAME_USE* out
);
<DllImport("ADVAPI32.dll", CharSet:=CharSet.Unicode, SetLastError:=True, ExactSpelling:=True)>
Public Shared Function LookupAccountSidW(
    <MarshalAs(UnmanagedType.LPWStr)> lpSystemName As String,   ' LPCWSTR optional
    Sid As IntPtr,   ' PSID
    <MarshalAs(UnmanagedType.LPWStr)> Name As System.Text.StringBuilder,   ' LPWSTR optional, out
    ByRef cchName As UInteger,   ' DWORD* in/out
    <MarshalAs(UnmanagedType.LPWStr)> ReferencedDomainName As System.Text.StringBuilder,   ' LPWSTR optional, out
    ByRef cchReferencedDomainName As UInteger,   ' DWORD* in/out
    <Out> ByRef peUse As Integer   ' SID_NAME_USE* out
) As <MarshalAs(UnmanagedType.Bool)> Boolean
End Function
' lpSystemName : LPCWSTR optional
' Sid : PSID
' Name : LPWSTR optional, out
' cchName : DWORD* in/out
' ReferencedDomainName : LPWSTR optional, out
' cchReferencedDomainName : DWORD* in/out
' peUse : SID_NAME_USE* out
Declare PtrSafe Function LookupAccountSidW Lib "advapi32" ( _
    ByVal lpSystemName As LongPtr, _
    ByVal Sid As LongPtr, _
    ByVal Name As LongPtr, _
    ByRef cchName As Long, _
    ByVal ReferencedDomainName As LongPtr, _
    ByRef cchReferencedDomainName As Long, _
    ByRef peUse As Long) As Long
' Unicode(W): 文字列は ByVal As LongPtr とし StrPtr(unicodeStr) を渡す
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。
import ctypes
from ctypes import wintypes

LookupAccountSidW = ctypes.windll.advapi32.LookupAccountSidW
LookupAccountSidW.restype = wintypes.BOOL
LookupAccountSidW.argtypes = [
    wintypes.LPCWSTR,  # lpSystemName : LPCWSTR optional
    wintypes.HANDLE,  # Sid : PSID
    wintypes.LPWSTR,  # Name : LPWSTR optional, out
    ctypes.POINTER(wintypes.DWORD),  # cchName : DWORD* in/out
    wintypes.LPWSTR,  # ReferencedDomainName : LPWSTR optional, out
    ctypes.POINTER(wintypes.DWORD),  # cchReferencedDomainName : DWORD* in/out
    ctypes.c_void_p,  # peUse : SID_NAME_USE* out
]
# GetLastError: use ctypes.GetLastError() (or ctypes.WinDLL(use_last_error=True))
require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('ADVAPI32.dll')
LookupAccountSidW = Fiddle::Function.new(
  lib['LookupAccountSidW'],
  [
    Fiddle::TYPE_VOIDP,  # lpSystemName : LPCWSTR optional
    Fiddle::TYPE_VOIDP,  # Sid : PSID
    Fiddle::TYPE_VOIDP,  # Name : LPWSTR optional, out
    Fiddle::TYPE_VOIDP,  # cchName : DWORD* in/out
    Fiddle::TYPE_VOIDP,  # ReferencedDomainName : LPWSTR optional, out
    Fiddle::TYPE_VOIDP,  # cchReferencedDomainName : DWORD* in/out
    Fiddle::TYPE_VOIDP,  # peUse : SID_NAME_USE* out
  ],
  Fiddle::TYPE_INT)
# Wide strings: pass str.encode("UTF-16LE") + "\x00\x00"
#[link(name = "advapi32")]
extern "system" {
    fn LookupAccountSidW(
        lpSystemName: *const u16,  // LPCWSTR optional
        Sid: *mut core::ffi::c_void,  // PSID
        Name: *mut u16,  // LPWSTR optional, out
        cchName: *mut u32,  // DWORD* in/out
        ReferencedDomainName: *mut u16,  // LPWSTR optional, out
        cchReferencedDomainName: *mut u32,  // DWORD* in/out
        peUse: *mut i32  // SID_NAME_USE* out
    ) -> i32;
}
// crates: windows-sys provides ready-made bindings for this API.
$sig = @"
[return: MarshalAs(UnmanagedType.Bool)]
[DllImport("ADVAPI32.dll", CharSet = CharSet.Unicode, SetLastError = true)]
public static extern bool LookupAccountSidW([MarshalAs(UnmanagedType.LPWStr)] string lpSystemName, IntPtr Sid, [MarshalAs(UnmanagedType.LPWStr)] System.Text.StringBuilder Name, ref uint cchName, [MarshalAs(UnmanagedType.LPWStr)] System.Text.StringBuilder ReferencedDomainName, ref uint cchReferencedDomainName, out int peUse);
"@
$api = Add-Type -MemberDefinition $sig -Name 'ADVAPI32_LookupAccountSidW' -Namespace Win32 -PassThru
# $api::LookupAccountSidW(lpSystemName, Sid, Name, cchName, ReferencedDomainName, cchReferencedDomainName, peUse)
#uselib "ADVAPI32.dll"
#func global LookupAccountSidW "LookupAccountSidW" wptr, wptr, wptr, wptr, wptr, wptr, wptr
; LookupAccountSidW lpSystemName, Sid, varptr(Name), varptr(cchName), varptr(ReferencedDomainName), varptr(cchReferencedDomainName), varptr(peUse)   ; 戻り値は stat
; lpSystemName : LPCWSTR optional -> "wptr"
; Sid : PSID -> "wptr"
; Name : LPWSTR optional, out -> "wptr"
; cchName : DWORD* in/out -> "wptr"
; ReferencedDomainName : LPWSTR optional, out -> "wptr"
; cchReferencedDomainName : DWORD* in/out -> "wptr"
; peUse : SID_NAME_USE* out -> "wptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。
出力引数:
#uselib "ADVAPI32.dll"
#cfunc global LookupAccountSidW "LookupAccountSidW" wstr, sptr, var, var, var, var, var
; res = LookupAccountSidW(lpSystemName, Sid, Name, cchName, ReferencedDomainName, cchReferencedDomainName, peUse)
; lpSystemName : LPCWSTR optional -> "wstr"
; Sid : PSID -> "sptr"
; Name : LPWSTR optional, out -> "var"
; cchName : DWORD* in/out -> "var"
; ReferencedDomainName : LPWSTR optional, out -> "var"
; cchReferencedDomainName : DWORD* in/out -> "var"
; peUse : SID_NAME_USE* out -> "var"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
出力引数:
; BOOL LookupAccountSidW(LPCWSTR lpSystemName, PSID Sid, LPWSTR Name, DWORD* cchName, LPWSTR ReferencedDomainName, DWORD* cchReferencedDomainName, SID_NAME_USE* peUse)
#uselib "ADVAPI32.dll"
#cfunc global LookupAccountSidW "LookupAccountSidW" wstr, intptr, var, var, var, var, var
; res = LookupAccountSidW(lpSystemName, Sid, Name, cchName, ReferencedDomainName, cchReferencedDomainName, peUse)
; lpSystemName : LPCWSTR optional -> "wstr"
; Sid : PSID -> "intptr"
; Name : LPWSTR optional, out -> "var"
; cchName : DWORD* in/out -> "var"
; ReferencedDomainName : LPWSTR optional, out -> "var"
; cchReferencedDomainName : DWORD* in/out -> "var"
; peUse : SID_NAME_USE* out -> "var"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
import (
	"golang.org/x/sys/windows"
	"unsafe"
)

var (
	advapi32 = windows.NewLazySystemDLL("ADVAPI32.dll")
	procLookupAccountSidW = advapi32.NewProc("LookupAccountSidW")
)

// lpSystemName (LPCWSTR optional), Sid (PSID), Name (LPWSTR optional, out), cchName (DWORD* in/out), ReferencedDomainName (LPWSTR optional, out), cchReferencedDomainName (DWORD* in/out), peUse (SID_NAME_USE* out)
r1, _, err := procLookupAccountSidW.Call(
	uintptr(unsafe.Pointer(windows.StringToUTF16Ptr(lpSystemName))),
	uintptr(Sid),
	uintptr(Name),
	uintptr(cchName),
	uintptr(ReferencedDomainName),
	uintptr(cchReferencedDomainName),
	uintptr(peUse),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // BOOL
function LookupAccountSidW(
  lpSystemName: PWideChar;   // LPCWSTR optional
  Sid: THandle;   // PSID
  Name: PWideChar;   // LPWSTR optional, out
  cchName: Pointer;   // DWORD* in/out
  ReferencedDomainName: PWideChar;   // LPWSTR optional, out
  cchReferencedDomainName: Pointer;   // DWORD* in/out
  peUse: Pointer   // SID_NAME_USE* out
): BOOL; stdcall;
  external 'ADVAPI32.dll' name 'LookupAccountSidW';
result := DllCall("ADVAPI32\LookupAccountSidW"
    , "WStr", lpSystemName   ; LPCWSTR optional
    , "Ptr", Sid   ; PSID
    , "Ptr", Name   ; LPWSTR optional, out
    , "Ptr", cchName   ; DWORD* in/out
    , "Ptr", ReferencedDomainName   ; LPWSTR optional, out
    , "Ptr", cchReferencedDomainName   ; DWORD* in/out
    , "Ptr", peUse   ; SID_NAME_USE* out
    , "Int")   ; return: BOOL
●LookupAccountSidW(lpSystemName, Sid, Name, cchName, ReferencedDomainName, cchReferencedDomainName, peUse) = DLL("ADVAPI32.dll", "bool LookupAccountSidW(char*, void*, char*, void*, char*, void*, void*)")
# 呼び出し: LookupAccountSidW(lpSystemName, Sid, Name, cchName, ReferencedDomainName, cchReferencedDomainName, peUse)
# lpSystemName : LPCWSTR optional -> "char*"
# Sid : PSID -> "void*"
# Name : LPWSTR optional, out -> "char*"
# cchName : DWORD* in/out -> "void*"
# ReferencedDomainName : LPWSTR optional, out -> "char*"
# cchReferencedDomainName : DWORD* in/out -> "void*"
# peUse : SID_NAME_USE* out -> "void*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。
# ※-W(Unicode)関数。なでしこ1はANSIのため -A 版の利用を推奨。
const std = @import("std");

extern "advapi32" fn LookupAccountSidW(
    lpSystemName: [*c]const u16, // LPCWSTR optional
    Sid: ?*anyopaque, // PSID
    Name: [*c]u16, // LPWSTR optional, out
    cchName: [*c]u32, // DWORD* in/out
    ReferencedDomainName: [*c]u16, // LPWSTR optional, out
    cchReferencedDomainName: [*c]u32, // DWORD* in/out
    peUse: [*c]i32 // SID_NAME_USE* out
) callconv(std.os.windows.WINAPI) i32;
// Unicode(-W): UTF-16LE のヌル終端バッファ([*c]const u16)を渡す。
proc LookupAccountSidW(
    lpSystemName: WideCString,  # LPCWSTR optional
    Sid: pointer,  # PSID
    Name: ptr uint16,  # LPWSTR optional, out
    cchName: ptr uint32,  # DWORD* in/out
    ReferencedDomainName: ptr uint16,  # LPWSTR optional, out
    cchReferencedDomainName: ptr uint32,  # DWORD* in/out
    peUse: ptr int32  # SID_NAME_USE* out
): int32 {.importc: "LookupAccountSidW", stdcall, dynlib: "ADVAPI32.dll".}
# Unicode(-W): WideCString は newWideCString("...") で生成。
pragma(lib, "advapi32");
extern(Windows)
int LookupAccountSidW(
    const(wchar)* lpSystemName,   // LPCWSTR optional
    void* Sid,   // PSID
    wchar* Name,   // LPWSTR optional, out
    uint* cchName,   // DWORD* in/out
    wchar* ReferencedDomainName,   // LPWSTR optional, out
    uint* cchReferencedDomainName,   // DWORD* in/out
    int* peUse   // SID_NAME_USE* out
);
ccall((:LookupAccountSidW, "ADVAPI32.dll"), stdcall, Int32,
      (Cwstring, Ptr{Cvoid}, Ptr{UInt16}, Ptr{UInt32}, Ptr{UInt16}, Ptr{UInt32}, Ptr{Int32}),
      lpSystemName, Sid, Name, cchName, ReferencedDomainName, cchReferencedDomainName, peUse)
# lpSystemName : LPCWSTR optional -> Cwstring
# Sid : PSID -> Ptr{Cvoid}
# Name : LPWSTR optional, out -> Ptr{UInt16}
# cchName : DWORD* in/out -> Ptr{UInt32}
# ReferencedDomainName : LPWSTR optional, out -> Ptr{UInt16}
# cchReferencedDomainName : DWORD* in/out -> Ptr{UInt32}
# peUse : SID_NAME_USE* out -> Ptr{Int32}
# stdcall は 32bit のみ意味を持つ(x64 では無視)。
# Unicode(-W): Cwstring には transcode(UInt16, "...") 等で UTF-16 を渡す。
local ffi = require("ffi")
ffi.cdef[[
int32_t LookupAccountSidW(
    const uint16_t* lpSystemName,
    void* Sid,
    uint16_t* Name,
    uint32_t* cchName,
    uint16_t* ReferencedDomainName,
    uint32_t* cchReferencedDomainName,
    int32_t* peUse);
]]
local advapi32 = ffi.load("advapi32")
-- advapi32.LookupAccountSidW(lpSystemName, Sid, Name, cchName, ReferencedDomainName, cchReferencedDomainName, peUse)
-- lpSystemName : LPCWSTR optional
-- Sid : PSID
-- Name : LPWSTR optional, out
-- cchName : DWORD* in/out
-- ReferencedDomainName : LPWSTR optional, out
-- cchReferencedDomainName : DWORD* in/out
-- peUse : SID_NAME_USE* out
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
-- Unicode(-W): uint16_t* には UTF-16LE のバッファ(ffi.new("uint16_t[?]", ...))を渡す。
const koffi = require('koffi');
const lib = koffi.load('ADVAPI32.dll');
const LookupAccountSidW = lib.func('__stdcall', 'LookupAccountSidW', 'int32_t', ['str16', 'void *', 'uint16_t *', 'uint32_t *', 'uint16_t *', 'uint32_t *', 'int32_t *']);
// LookupAccountSidW(lpSystemName, Sid, Name, cchName, ReferencedDomainName, cchReferencedDomainName, peUse)
// lpSystemName : LPCWSTR optional -> 'str16'
// Sid : PSID -> 'void *'
// Name : LPWSTR optional, out -> 'uint16_t *'
// cchName : DWORD* in/out -> 'uint32_t *'
// ReferencedDomainName : LPWSTR optional, out -> 'uint16_t *'
// cchReferencedDomainName : DWORD* in/out -> 'uint32_t *'
// peUse : SID_NAME_USE* out -> 'int32_t *'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。
const lib = Deno.dlopen("ADVAPI32.dll", {
  LookupAccountSidW: { parameters: ["buffer", "pointer", "buffer", "pointer", "buffer", "pointer", "pointer"], result: "i32" },
});
// lib.symbols.LookupAccountSidW(lpSystemName, Sid, Name, cchName, ReferencedDomainName, cchReferencedDomainName, peUse)
// lpSystemName : LPCWSTR optional -> "buffer"
// Sid : PSID -> "pointer"
// Name : LPWSTR optional, out -> "buffer"
// cchName : DWORD* in/out -> "pointer"
// ReferencedDomainName : LPWSTR optional, out -> "buffer"
// cchReferencedDomainName : DWORD* in/out -> "pointer"
// peUse : SID_NAME_USE* out -> "pointer"
// 文字列は "buffer"。Unicode(-W) は new TextEncoder() ではなく UTF-16LE のバイト列(末尾に \x00\x00)を Uint8Array で渡す。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。
<?php
$ffi = FFI::cdef(<<<C
int32_t LookupAccountSidW(
    const uint16_t* lpSystemName,
    void* Sid,
    uint16_t* Name,
    uint32_t* cchName,
    uint16_t* ReferencedDomainName,
    uint32_t* cchReferencedDomainName,
    int32_t* peUse);
C, "ADVAPI32.dll");
// $ffi->LookupAccountSidW(lpSystemName, Sid, Name, cchName, ReferencedDomainName, cchReferencedDomainName, peUse);
// lpSystemName : LPCWSTR optional
// Sid : PSID
// Name : LPWSTR optional, out
// cchName : DWORD* in/out
// ReferencedDomainName : LPWSTR optional, out
// cchReferencedDomainName : DWORD* in/out
// peUse : SID_NAME_USE* out
// 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
// WINAPI(stdcall): x64 では呼出規約が統一されるため問題なし。x86 では __stdcall 対応のラッパが必要な場合あり。
import com.sun.jna.*;
import com.sun.jna.ptr.*;
import com.sun.jna.win32.StdCallLibrary;
import com.sun.jna.win32.W32APIOptions;

public interface Advapi32 extends StdCallLibrary {
    Advapi32 INSTANCE = Native.load("advapi32", Advapi32.class, W32APIOptions.UNICODE_OPTIONS);
    boolean LookupAccountSidW(
        WString lpSystemName,   // LPCWSTR optional
        Pointer Sid,   // PSID
        char[] Name,   // LPWSTR optional, out
        IntByReference cchName,   // DWORD* in/out
        char[] ReferencedDomainName,   // LPWSTR optional, out
        IntByReference cchReferencedDomainName,   // DWORD* in/out
        IntByReference peUse   // SID_NAME_USE* out
    );
}
// Unicode(-W): WString(入力)/char[](出力)で UTF-16 をマーシャリング。
@[Link("advapi32")]
lib LibADVAPI32
  fun LookupAccountSidW = LookupAccountSidW(
    lpSystemName : UInt16*,   # LPCWSTR optional
    Sid : Void*,   # PSID
    Name : UInt16*,   # LPWSTR optional, out
    cchName : UInt32*,   # DWORD* in/out
    ReferencedDomainName : UInt16*,   # LPWSTR optional, out
    cchReferencedDomainName : UInt32*,   # DWORD* in/out
    peUse : Int32*   # SID_NAME_USE* out
  ) : Int32
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。
import 'dart:ffi';
import 'package:ffi/ffi.dart';

typedef LookupAccountSidWNative = Int32 Function(Pointer<Utf16>, Pointer<Void>, Pointer<Utf16>, Pointer<Uint32>, Pointer<Utf16>, Pointer<Uint32>, Pointer<Int32>);
typedef LookupAccountSidWDart = int Function(Pointer<Utf16>, Pointer<Void>, Pointer<Utf16>, Pointer<Uint32>, Pointer<Utf16>, Pointer<Uint32>, Pointer<Int32>);
final LookupAccountSidW = DynamicLibrary.open('ADVAPI32.dll')
    .lookupFunction<LookupAccountSidWNative, LookupAccountSidWDart>('LookupAccountSidW');
// lpSystemName : LPCWSTR optional -> Pointer<Utf16>
// Sid : PSID -> Pointer<Void>
// Name : LPWSTR optional, out -> Pointer<Utf16>
// cchName : DWORD* in/out -> Pointer<Uint32>
// ReferencedDomainName : LPWSTR optional, out -> Pointer<Utf16>
// cchReferencedDomainName : DWORD* in/out -> Pointer<Uint32>
// peUse : SID_NAME_USE* out -> Pointer<Int32>
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。
{$mode objfpc}{$H+}
function LookupAccountSidW(
  lpSystemName: PWideChar;   // LPCWSTR optional
  Sid: THandle;   // PSID
  Name: PWideChar;   // LPWSTR optional, out
  cchName: Pointer;   // DWORD* in/out
  ReferencedDomainName: PWideChar;   // LPWSTR optional, out
  cchReferencedDomainName: Pointer;   // DWORD* in/out
  peUse: Pointer   // SID_NAME_USE* out
): BOOL; stdcall;
  external 'ADVAPI32.dll' name 'LookupAccountSidW';
import Foreign
import Foreign.C.Types
import Foreign.C.String

foreign import stdcall safe "LookupAccountSidW"
  c_LookupAccountSidW :: CWString -> Ptr () -> CWString -> Ptr Word32 -> CWString -> Ptr Word32 -> Ptr Int32 -> IO CInt
-- lpSystemName : LPCWSTR optional -> CWString
-- Sid : PSID -> Ptr ()
-- Name : LPWSTR optional, out -> CWString
-- cchName : DWORD* in/out -> Ptr Word32
-- ReferencedDomainName : LPWSTR optional, out -> CWString
-- cchReferencedDomainName : DWORD* in/out -> Ptr Word32
-- peUse : SID_NAME_USE* out -> Ptr Int32
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。
open Ctypes
open Foreign

let lookupaccountsidw =
  foreign "LookupAccountSidW"
    ((ptr uint16_t) @-> (ptr void) @-> (ptr uint16_t) @-> (ptr uint32_t) @-> (ptr uint16_t) @-> (ptr uint32_t) @-> (ptr int32_t) @-> returning int32_t)
(* lpSystemName : LPCWSTR optional -> (ptr uint16_t) *)
(* Sid : PSID -> (ptr void) *)
(* Name : LPWSTR optional, out -> (ptr uint16_t) *)
(* cchName : DWORD* in/out -> (ptr uint32_t) *)
(* ReferencedDomainName : LPWSTR optional, out -> (ptr uint16_t) *)
(* cchReferencedDomainName : DWORD* in/out -> (ptr uint32_t) *)
(* peUse : SID_NAME_USE* out -> (ptr int32_t) *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)
(cffi:define-foreign-library advapi32 (t "ADVAPI32.dll"))
(cffi:use-foreign-library advapi32)

(cffi:defcfun ("LookupAccountSidW" lookup-account-sid-w :convention :stdcall) :int32
  (lp-system-name (:string :encoding :utf-16le))   ; LPCWSTR optional
  (sid :pointer)   ; PSID
  (name :pointer)   ; LPWSTR optional, out
  (cch-name :pointer)   ; DWORD* in/out
  (referenced-domain-name :pointer)   ; LPWSTR optional, out
  (cch-referenced-domain-name :pointer)   ; DWORD* in/out
  (pe-use :pointer))   ; SID_NAME_USE* out
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。
use Win32::API;
my $LookupAccountSidW = Win32::API::More->new('ADVAPI32',
    'BOOL LookupAccountSidW(LPCWSTR lpSystemName, HANDLE Sid, LPWSTR Name, LPVOID cchName, LPWSTR ReferencedDomainName, LPVOID cchReferencedDomainName, LPVOID peUse)');
# my $ret = $LookupAccountSidW->Call($lpSystemName, $Sid, $Name, $cchName, $ReferencedDomainName, $cchReferencedDomainName, $peUse);
# lpSystemName : LPCWSTR optional -> LPCWSTR
# Sid : PSID -> HANDLE
# Name : LPWSTR optional, out -> LPWSTR
# cchName : DWORD* in/out -> LPVOID
# ReferencedDomainName : LPWSTR optional, out -> LPWSTR
# cchReferencedDomainName : DWORD* in/out -> LPVOID
# peUse : SID_NAME_USE* out -> LPVOID
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。
# Unicode(-W): LPCWSTR/LPWSTR は Win32::API が UTF-16 変換を行う。

関連項目

文字セット違い
公式の関連項目
使用する型