ホーム › Devices.DeviceAndDriverInstallation › SetupDiGetActualModelsSectionA
SetupDiGetActualModelsSectionA
関数INFのプラットフォームに応じた実際のModelsセクション名を取得する。
シグネチャ
// SETUPAPI.dll (ANSI / -A)
#include <windows.h>
BOOL SetupDiGetActualModelsSectionA(
INFCONTEXT* Context,
SP_ALTPLATFORM_INFO_V2* AlternatePlatformInfo, // optional
LPSTR InfSectionWithExt, // optional
DWORD InfSectionWithExtSize,
DWORD* RequiredSize, // optional
void* Reserved // optional
);パラメーター
| 名前 | 型 | 方向 | 説明 |
|---|---|---|---|
| Context | INFCONTEXT* | in | INFのModelsエントリを指すINFCONTEXT。対象モデル行を示す。 |
| AlternatePlatformInfo | SP_ALTPLATFORM_INFO_V2* | inoptional | 対象プラットフォーム情報を示す構造体。NULL指定で現在のプラットフォームを使う。 |
| InfSectionWithExt | LPSTR | outoptional | 拡張子を付加した実際のModelsセクション名を受け取るバッファ(ANSI)。 |
| InfSectionWithExtSize | DWORD | in | InfSectionWithExtバッファの文字数。 |
| RequiredSize | DWORD* | outoptional | 必要な文字数を受け取るポインタ。不足判定に使う。NULL可。 |
| Reserved | void* | optional | 予約済み。NULLを指定する。 |
戻り値の型: BOOL
各言語での呼び出し定義
// SETUPAPI.dll (ANSI / -A)
#include <windows.h>
BOOL SetupDiGetActualModelsSectionA(
INFCONTEXT* Context,
SP_ALTPLATFORM_INFO_V2* AlternatePlatformInfo, // optional
LPSTR InfSectionWithExt, // optional
DWORD InfSectionWithExtSize,
DWORD* RequiredSize, // optional
void* Reserved // optional
);[return: MarshalAs(UnmanagedType.Bool)]
[DllImport("SETUPAPI.dll", CharSet = CharSet.Ansi, SetLastError = true, ExactSpelling = true)]
static extern bool SetupDiGetActualModelsSectionA(
IntPtr Context, // INFCONTEXT*
IntPtr AlternatePlatformInfo, // SP_ALTPLATFORM_INFO_V2* optional
[MarshalAs(UnmanagedType.LPStr)] System.Text.StringBuilder InfSectionWithExt, // LPSTR optional, out
uint InfSectionWithExtSize, // DWORD
IntPtr RequiredSize, // DWORD* optional, out
IntPtr Reserved // void* optional
);<DllImport("SETUPAPI.dll", CharSet:=CharSet.Ansi, SetLastError:=True, ExactSpelling:=True)>
Public Shared Function SetupDiGetActualModelsSectionA(
Context As IntPtr, ' INFCONTEXT*
AlternatePlatformInfo As IntPtr, ' SP_ALTPLATFORM_INFO_V2* optional
<MarshalAs(UnmanagedType.LPStr)> InfSectionWithExt As System.Text.StringBuilder, ' LPSTR optional, out
InfSectionWithExtSize As UInteger, ' DWORD
RequiredSize As IntPtr, ' DWORD* optional, out
Reserved As IntPtr ' void* optional
) As <MarshalAs(UnmanagedType.Bool)> Boolean
End Function' Context : INFCONTEXT*
' AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional
' InfSectionWithExt : LPSTR optional, out
' InfSectionWithExtSize : DWORD
' RequiredSize : DWORD* optional, out
' Reserved : void* optional
Declare PtrSafe Function SetupDiGetActualModelsSectionA Lib "setupapi" ( _
ByVal Context As LongPtr, _
ByVal AlternatePlatformInfo As LongPtr, _
ByVal InfSectionWithExt As String, _
ByVal InfSectionWithExtSize As Long, _
ByVal RequiredSize As LongPtr, _
ByVal Reserved As LongPtr) As Long
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。import ctypes
from ctypes import wintypes
SetupDiGetActualModelsSectionA = ctypes.windll.setupapi.SetupDiGetActualModelsSectionA
SetupDiGetActualModelsSectionA.restype = wintypes.BOOL
SetupDiGetActualModelsSectionA.argtypes = [
ctypes.c_void_p, # Context : INFCONTEXT*
ctypes.c_void_p, # AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional
wintypes.LPSTR, # InfSectionWithExt : LPSTR optional, out
wintypes.DWORD, # InfSectionWithExtSize : DWORD
ctypes.POINTER(wintypes.DWORD), # RequiredSize : DWORD* optional, out
ctypes.POINTER(None), # Reserved : void* optional
]
# GetLastError: use ctypes.GetLastError() (or ctypes.WinDLL(use_last_error=True))require 'fiddle'
require 'fiddle/import'
lib = Fiddle.dlopen('SETUPAPI.dll')
SetupDiGetActualModelsSectionA = Fiddle::Function.new(
lib['SetupDiGetActualModelsSectionA'],
[
Fiddle::TYPE_VOIDP, # Context : INFCONTEXT*
Fiddle::TYPE_VOIDP, # AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional
Fiddle::TYPE_VOIDP, # InfSectionWithExt : LPSTR optional, out
-Fiddle::TYPE_INT, # InfSectionWithExtSize : DWORD
Fiddle::TYPE_VOIDP, # RequiredSize : DWORD* optional, out
Fiddle::TYPE_VOIDP, # Reserved : void* optional
],
Fiddle::TYPE_INT)#[link(name = "setupapi")]
extern "system" {
fn SetupDiGetActualModelsSectionA(
Context: *mut INFCONTEXT, // INFCONTEXT*
AlternatePlatformInfo: *mut SP_ALTPLATFORM_INFO_V2, // SP_ALTPLATFORM_INFO_V2* optional
InfSectionWithExt: *mut u8, // LPSTR optional, out
InfSectionWithExtSize: u32, // DWORD
RequiredSize: *mut u32, // DWORD* optional, out
Reserved: *mut () // void* optional
) -> i32;
}
// crates: windows-sys provides ready-made bindings for this API.$sig = @"
[return: MarshalAs(UnmanagedType.Bool)]
[DllImport("SETUPAPI.dll", CharSet = CharSet.Ansi, SetLastError = true)]
public static extern bool SetupDiGetActualModelsSectionA(IntPtr Context, IntPtr AlternatePlatformInfo, [MarshalAs(UnmanagedType.LPStr)] System.Text.StringBuilder InfSectionWithExt, uint InfSectionWithExtSize, IntPtr RequiredSize, IntPtr Reserved);
"@
$api = Add-Type -MemberDefinition $sig -Name 'SETUPAPI_SetupDiGetActualModelsSectionA' -Namespace Win32 -PassThru
# $api::SetupDiGetActualModelsSectionA(Context, AlternatePlatformInfo, InfSectionWithExt, InfSectionWithExtSize, RequiredSize, Reserved)#uselib "SETUPAPI.dll"
#func global SetupDiGetActualModelsSectionA "SetupDiGetActualModelsSectionA" sptr, sptr, sptr, sptr, sptr, sptr
; SetupDiGetActualModelsSectionA varptr(Context), varptr(AlternatePlatformInfo), varptr(InfSectionWithExt), InfSectionWithExtSize, varptr(RequiredSize), Reserved ; 戻り値は stat
; Context : INFCONTEXT* -> "sptr"
; AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> "sptr"
; InfSectionWithExt : LPSTR optional, out -> "sptr"
; InfSectionWithExtSize : DWORD -> "sptr"
; RequiredSize : DWORD* optional, out -> "sptr"
; Reserved : void* optional -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。出力引数:
#uselib "SETUPAPI.dll" #cfunc global SetupDiGetActualModelsSectionA "SetupDiGetActualModelsSectionA" var, var, var, int, var, sptr ; res = SetupDiGetActualModelsSectionA(Context, AlternatePlatformInfo, InfSectionWithExt, InfSectionWithExtSize, RequiredSize, Reserved) ; Context : INFCONTEXT* -> "var" ; AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> "var" ; InfSectionWithExt : LPSTR optional, out -> "var" ; InfSectionWithExtSize : DWORD -> "int" ; RequiredSize : DWORD* optional, out -> "var" ; Reserved : void* optional -> "sptr" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。#uselib "SETUPAPI.dll" #cfunc global SetupDiGetActualModelsSectionA "SetupDiGetActualModelsSectionA" sptr, sptr, sptr, int, sptr, sptr ; res = SetupDiGetActualModelsSectionA(varptr(Context), varptr(AlternatePlatformInfo), varptr(InfSectionWithExt), InfSectionWithExtSize, varptr(RequiredSize), Reserved) ; Context : INFCONTEXT* -> "sptr" ; AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> "sptr" ; InfSectionWithExt : LPSTR optional, out -> "sptr" ; InfSectionWithExtSize : DWORD -> "int" ; RequiredSize : DWORD* optional, out -> "sptr" ; Reserved : void* optional -> "sptr" ; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。
出力引数:
; BOOL SetupDiGetActualModelsSectionA(INFCONTEXT* Context, SP_ALTPLATFORM_INFO_V2* AlternatePlatformInfo, LPSTR InfSectionWithExt, DWORD InfSectionWithExtSize, DWORD* RequiredSize, void* Reserved) #uselib "SETUPAPI.dll" #cfunc global SetupDiGetActualModelsSectionA "SetupDiGetActualModelsSectionA" var, var, var, int, var, intptr ; res = SetupDiGetActualModelsSectionA(Context, AlternatePlatformInfo, InfSectionWithExt, InfSectionWithExtSize, RequiredSize, Reserved) ; Context : INFCONTEXT* -> "var" ; AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> "var" ; InfSectionWithExt : LPSTR optional, out -> "var" ; InfSectionWithExtSize : DWORD -> "int" ; RequiredSize : DWORD* optional, out -> "var" ; Reserved : void* optional -> "intptr" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。; BOOL SetupDiGetActualModelsSectionA(INFCONTEXT* Context, SP_ALTPLATFORM_INFO_V2* AlternatePlatformInfo, LPSTR InfSectionWithExt, DWORD InfSectionWithExtSize, DWORD* RequiredSize, void* Reserved) #uselib "SETUPAPI.dll" #cfunc global SetupDiGetActualModelsSectionA "SetupDiGetActualModelsSectionA" intptr, intptr, intptr, int, intptr, intptr ; res = SetupDiGetActualModelsSectionA(varptr(Context), varptr(AlternatePlatformInfo), varptr(InfSectionWithExt), InfSectionWithExtSize, varptr(RequiredSize), Reserved) ; Context : INFCONTEXT* -> "intptr" ; AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> "intptr" ; InfSectionWithExt : LPSTR optional, out -> "intptr" ; InfSectionWithExtSize : DWORD -> "int" ; RequiredSize : DWORD* optional, out -> "intptr" ; Reserved : void* optional -> "intptr" ; ※出力/バッファ引数はポインタ方式(token=intptr / 呼び出しは varptr(変数))。
import (
"golang.org/x/sys/windows"
"unsafe"
)
var (
setupapi = windows.NewLazySystemDLL("SETUPAPI.dll")
procSetupDiGetActualModelsSectionA = setupapi.NewProc("SetupDiGetActualModelsSectionA")
)
// Context (INFCONTEXT*), AlternatePlatformInfo (SP_ALTPLATFORM_INFO_V2* optional), InfSectionWithExt (LPSTR optional, out), InfSectionWithExtSize (DWORD), RequiredSize (DWORD* optional, out), Reserved (void* optional)
r1, _, err := procSetupDiGetActualModelsSectionA.Call(
uintptr(Context),
uintptr(AlternatePlatformInfo),
uintptr(InfSectionWithExt),
uintptr(InfSectionWithExtSize),
uintptr(RequiredSize),
uintptr(Reserved),
)
_ = err // syscall.Errno (valid when the call sets last-error)
_ = r1 // BOOLfunction SetupDiGetActualModelsSectionA(
Context: Pointer; // INFCONTEXT*
AlternatePlatformInfo: Pointer; // SP_ALTPLATFORM_INFO_V2* optional
InfSectionWithExt: PAnsiChar; // LPSTR optional, out
InfSectionWithExtSize: DWORD; // DWORD
RequiredSize: Pointer; // DWORD* optional, out
Reserved: Pointer // void* optional
): BOOL; stdcall;
external 'SETUPAPI.dll' name 'SetupDiGetActualModelsSectionA';result := DllCall("SETUPAPI\SetupDiGetActualModelsSectionA"
, "Ptr", Context ; INFCONTEXT*
, "Ptr", AlternatePlatformInfo ; SP_ALTPLATFORM_INFO_V2* optional
, "Ptr", InfSectionWithExt ; LPSTR optional, out
, "UInt", InfSectionWithExtSize ; DWORD
, "Ptr", RequiredSize ; DWORD* optional, out
, "Ptr", Reserved ; void* optional
, "Int") ; return: BOOL●SetupDiGetActualModelsSectionA(Context, AlternatePlatformInfo, InfSectionWithExt, InfSectionWithExtSize, RequiredSize, Reserved) = DLL("SETUPAPI.dll", "bool SetupDiGetActualModelsSectionA(void*, void*, char*, dword, void*, void*)")
# 呼び出し: SetupDiGetActualModelsSectionA(Context, AlternatePlatformInfo, InfSectionWithExt, InfSectionWithExtSize, RequiredSize, Reserved)
# Context : INFCONTEXT* -> "void*"
# AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> "void*"
# InfSectionWithExt : LPSTR optional, out -> "char*"
# InfSectionWithExtSize : DWORD -> "dword"
# RequiredSize : DWORD* optional, out -> "void*"
# Reserved : void* optional -> "void*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。const std = @import("std");
extern "setupapi" fn SetupDiGetActualModelsSectionA(
Context: [*c]INFCONTEXT, // INFCONTEXT*
AlternatePlatformInfo: [*c]SP_ALTPLATFORM_INFO_V2, // SP_ALTPLATFORM_INFO_V2* optional
InfSectionWithExt: [*c]u8, // LPSTR optional, out
InfSectionWithExtSize: u32, // DWORD
RequiredSize: [*c]u32, // DWORD* optional, out
Reserved: ?*anyopaque // void* optional
) callconv(std.os.windows.WINAPI) i32;proc SetupDiGetActualModelsSectionA(
Context: ptr INFCONTEXT, # INFCONTEXT*
AlternatePlatformInfo: ptr SP_ALTPLATFORM_INFO_V2, # SP_ALTPLATFORM_INFO_V2* optional
InfSectionWithExt: ptr char, # LPSTR optional, out
InfSectionWithExtSize: uint32, # DWORD
RequiredSize: ptr uint32, # DWORD* optional, out
Reserved: pointer # void* optional
): int32 {.importc: "SetupDiGetActualModelsSectionA", stdcall, dynlib: "SETUPAPI.dll".}pragma(lib, "setupapi");
extern(Windows)
int SetupDiGetActualModelsSectionA(
INFCONTEXT* Context, // INFCONTEXT*
SP_ALTPLATFORM_INFO_V2* AlternatePlatformInfo, // SP_ALTPLATFORM_INFO_V2* optional
char* InfSectionWithExt, // LPSTR optional, out
uint InfSectionWithExtSize, // DWORD
uint* RequiredSize, // DWORD* optional, out
void* Reserved // void* optional
);ccall((:SetupDiGetActualModelsSectionA, "SETUPAPI.dll"), stdcall, Int32,
(Ptr{INFCONTEXT}, Ptr{SP_ALTPLATFORM_INFO_V2}, Ptr{UInt8}, UInt32, Ptr{UInt32}, Ptr{Cvoid}),
Context, AlternatePlatformInfo, InfSectionWithExt, InfSectionWithExtSize, RequiredSize, Reserved)
# Context : INFCONTEXT* -> Ptr{INFCONTEXT}
# AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> Ptr{SP_ALTPLATFORM_INFO_V2}
# InfSectionWithExt : LPSTR optional, out -> Ptr{UInt8}
# InfSectionWithExtSize : DWORD -> UInt32
# RequiredSize : DWORD* optional, out -> Ptr{UInt32}
# Reserved : void* optional -> Ptr{Cvoid}
# stdcall は 32bit のみ意味を持つ(x64 では無視)。local ffi = require("ffi")
ffi.cdef[[
int32_t SetupDiGetActualModelsSectionA(
void* Context,
void* AlternatePlatformInfo,
char* InfSectionWithExt,
uint32_t InfSectionWithExtSize,
uint32_t* RequiredSize,
void* Reserved);
]]
local setupapi = ffi.load("setupapi")
-- setupapi.SetupDiGetActualModelsSectionA(Context, AlternatePlatformInfo, InfSectionWithExt, InfSectionWithExtSize, RequiredSize, Reserved)
-- Context : INFCONTEXT*
-- AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional
-- InfSectionWithExt : LPSTR optional, out
-- InfSectionWithExtSize : DWORD
-- RequiredSize : DWORD* optional, out
-- Reserved : void* optional
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。const koffi = require('koffi');
const lib = koffi.load('SETUPAPI.dll');
const SetupDiGetActualModelsSectionA = lib.func('__stdcall', 'SetupDiGetActualModelsSectionA', 'int32_t', ['void *', 'void *', 'char *', 'uint32_t', 'uint32_t *', 'void *']);
// SetupDiGetActualModelsSectionA(Context, AlternatePlatformInfo, InfSectionWithExt, InfSectionWithExtSize, RequiredSize, Reserved)
// Context : INFCONTEXT* -> 'void *'
// AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> 'void *'
// InfSectionWithExt : LPSTR optional, out -> 'char *'
// InfSectionWithExtSize : DWORD -> 'uint32_t'
// RequiredSize : DWORD* optional, out -> 'uint32_t *'
// Reserved : void* optional -> 'void *'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。const lib = Deno.dlopen("SETUPAPI.dll", {
SetupDiGetActualModelsSectionA: { parameters: ["pointer", "pointer", "buffer", "u32", "pointer", "pointer"], result: "i32" },
});
// lib.symbols.SetupDiGetActualModelsSectionA(Context, AlternatePlatformInfo, InfSectionWithExt, InfSectionWithExtSize, RequiredSize, Reserved)
// Context : INFCONTEXT* -> "pointer"
// AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> "pointer"
// InfSectionWithExt : LPSTR optional, out -> "buffer"
// InfSectionWithExtSize : DWORD -> "u32"
// RequiredSize : DWORD* optional, out -> "pointer"
// Reserved : void* optional -> "pointer"
// 文字列は "buffer"。ANSI(-A) は new TextEncoder() で UTF-8/ANSI バイト列(末尾に \x00)を渡す。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。<?php
$ffi = FFI::cdef(<<<C
int32_t SetupDiGetActualModelsSectionA(
void* Context,
void* AlternatePlatformInfo,
char* InfSectionWithExt,
uint32_t InfSectionWithExtSize,
uint32_t* RequiredSize,
void* Reserved);
C, "SETUPAPI.dll");
// $ffi->SetupDiGetActualModelsSectionA(Context, AlternatePlatformInfo, InfSectionWithExt, InfSectionWithExtSize, RequiredSize, Reserved);
// Context : INFCONTEXT*
// AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional
// InfSectionWithExt : LPSTR optional, out
// InfSectionWithExtSize : DWORD
// RequiredSize : DWORD* optional, out
// Reserved : void* optional
// 構造体/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 Setupapi extends StdCallLibrary {
Setupapi INSTANCE = Native.load("setupapi", Setupapi.class, W32APIOptions.ASCII_OPTIONS);
boolean SetupDiGetActualModelsSectionA(
Pointer Context, // INFCONTEXT*
Pointer AlternatePlatformInfo, // SP_ALTPLATFORM_INFO_V2* optional
byte[] InfSectionWithExt, // LPSTR optional, out
int InfSectionWithExtSize, // DWORD
IntByReference RequiredSize, // DWORD* optional, out
Pointer Reserved // void* optional
);
}@[Link("setupapi")]
lib LibSETUPAPI
fun SetupDiGetActualModelsSectionA = SetupDiGetActualModelsSectionA(
Context : INFCONTEXT*, # INFCONTEXT*
AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2*, # SP_ALTPLATFORM_INFO_V2* optional
InfSectionWithExt : UInt8*, # LPSTR optional, out
InfSectionWithExtSize : UInt32, # DWORD
RequiredSize : UInt32*, # DWORD* optional, out
Reserved : Void* # void* optional
) : Int32
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。import 'dart:ffi';
import 'package:ffi/ffi.dart';
typedef SetupDiGetActualModelsSectionANative = Int32 Function(Pointer<Void>, Pointer<Void>, Pointer<Utf8>, Uint32, Pointer<Uint32>, Pointer<Void>);
typedef SetupDiGetActualModelsSectionADart = int Function(Pointer<Void>, Pointer<Void>, Pointer<Utf8>, int, Pointer<Uint32>, Pointer<Void>);
final SetupDiGetActualModelsSectionA = DynamicLibrary.open('SETUPAPI.dll')
.lookupFunction<SetupDiGetActualModelsSectionANative, SetupDiGetActualModelsSectionADart>('SetupDiGetActualModelsSectionA');
// Context : INFCONTEXT* -> Pointer<Void>
// AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> Pointer<Void>
// InfSectionWithExt : LPSTR optional, out -> Pointer<Utf8>
// InfSectionWithExtSize : DWORD -> Uint32
// RequiredSize : DWORD* optional, out -> Pointer<Uint32>
// Reserved : void* optional -> Pointer<Void>
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。{$mode objfpc}{$H+}
function SetupDiGetActualModelsSectionA(
Context: Pointer; // INFCONTEXT*
AlternatePlatformInfo: Pointer; // SP_ALTPLATFORM_INFO_V2* optional
InfSectionWithExt: PAnsiChar; // LPSTR optional, out
InfSectionWithExtSize: DWORD; // DWORD
RequiredSize: Pointer; // DWORD* optional, out
Reserved: Pointer // void* optional
): BOOL; stdcall;
external 'SETUPAPI.dll' name 'SetupDiGetActualModelsSectionA';import Foreign
import Foreign.C.Types
import Foreign.C.String
foreign import stdcall safe "SetupDiGetActualModelsSectionA"
c_SetupDiGetActualModelsSectionA :: Ptr () -> Ptr () -> CString -> Word32 -> Ptr Word32 -> Ptr () -> IO CInt
-- Context : INFCONTEXT* -> Ptr ()
-- AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> Ptr ()
-- InfSectionWithExt : LPSTR optional, out -> CString
-- InfSectionWithExtSize : DWORD -> Word32
-- RequiredSize : DWORD* optional, out -> Ptr Word32
-- Reserved : void* optional -> Ptr ()
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。open Ctypes
open Foreign
let setupdigetactualmodelssectiona =
foreign "SetupDiGetActualModelsSectionA"
((ptr void) @-> (ptr void) @-> string @-> uint32_t @-> (ptr uint32_t) @-> (ptr void) @-> returning int32_t)
(* Context : INFCONTEXT* -> (ptr void) *)
(* AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> (ptr void) *)
(* InfSectionWithExt : LPSTR optional, out -> string *)
(* InfSectionWithExtSize : DWORD -> uint32_t *)
(* RequiredSize : DWORD* optional, out -> (ptr uint32_t) *)
(* Reserved : void* optional -> (ptr void) *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)(cffi:define-foreign-library setupapi (t "SETUPAPI.dll"))
(cffi:use-foreign-library setupapi)
(cffi:defcfun ("SetupDiGetActualModelsSectionA" setup-di-get-actual-models-section-a :convention :stdcall) :int32
(context :pointer) ; INFCONTEXT*
(alternate-platform-info :pointer) ; SP_ALTPLATFORM_INFO_V2* optional
(inf-section-with-ext :pointer) ; LPSTR optional, out
(inf-section-with-ext-size :uint32) ; DWORD
(required-size :pointer) ; DWORD* optional, out
(reserved :pointer)) ; void* optional
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。use Win32::API;
my $SetupDiGetActualModelsSectionA = Win32::API::More->new('SETUPAPI',
'BOOL SetupDiGetActualModelsSectionA(LPVOID Context, LPVOID AlternatePlatformInfo, LPSTR InfSectionWithExt, DWORD InfSectionWithExtSize, LPVOID RequiredSize, LPVOID Reserved)');
# my $ret = $SetupDiGetActualModelsSectionA->Call($Context, $AlternatePlatformInfo, $InfSectionWithExt, $InfSectionWithExtSize, $RequiredSize, $Reserved);
# Context : INFCONTEXT* -> LPVOID
# AlternatePlatformInfo : SP_ALTPLATFORM_INFO_V2* optional -> LPVOID
# InfSectionWithExt : LPSTR optional, out -> LPSTR
# InfSectionWithExtSize : DWORD -> DWORD
# RequiredSize : DWORD* optional, out -> LPVOID
# Reserved : void* optional -> LPVOID
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。関連項目
文字セット違い
- f SetupDiGetActualModelsSectionW (Unicode版) — INFのプラットフォームに応じた実際のModelsセクション名を取得する。