ホーム › Devices.Usb › WinUsb_ParseConfigurationDescriptor
WinUsb_ParseConfigurationDescriptor
関数構成ディスクリプタを解析して該当インターフェースを検索する。
シグネチャ
// WINUSB.dll
#include <windows.h>
USB_INTERFACE_DESCRIPTOR* WinUsb_ParseConfigurationDescriptor(
USB_CONFIGURATION_DESCRIPTOR* ConfigurationDescriptor,
void* StartPosition,
INT InterfaceNumber,
INT AlternateSetting,
INT InterfaceClass,
INT InterfaceSubClass,
INT InterfaceProtocol
);パラメーター
| 名前 | 型 | 方向 | 説明 |
|---|---|---|---|
| ConfigurationDescriptor | USB_CONFIGURATION_DESCRIPTOR* | in | 解析対象の構成ディスクリプタ先頭へのポインタ。 |
| StartPosition | void* | in | 検索を開始する位置へのポインタ。通常は構成ディスクリプタ先頭。 |
| InterfaceNumber | INT | in | 検索条件のインターフェイス番号。-1で任意。 |
| AlternateSetting | INT | in | 検索条件の代替設定番号。-1で任意。 |
| InterfaceClass | INT | in | 検索条件のインターフェイスクラス。-1で任意。 |
| InterfaceSubClass | INT | in | 検索条件のインターフェイスサブクラス。-1で任意。 |
| InterfaceProtocol | INT | in | 検索条件のインターフェイスプロトコル。-1で任意。 |
戻り値の型: USB_INTERFACE_DESCRIPTOR*
各言語での呼び出し定義
// WINUSB.dll
#include <windows.h>
USB_INTERFACE_DESCRIPTOR* WinUsb_ParseConfigurationDescriptor(
USB_CONFIGURATION_DESCRIPTOR* ConfigurationDescriptor,
void* StartPosition,
INT InterfaceNumber,
INT AlternateSetting,
INT InterfaceClass,
INT InterfaceSubClass,
INT InterfaceProtocol
);[DllImport("WINUSB.dll", SetLastError = true, ExactSpelling = true)]
static extern IntPtr WinUsb_ParseConfigurationDescriptor(
IntPtr ConfigurationDescriptor, // USB_CONFIGURATION_DESCRIPTOR*
IntPtr StartPosition, // void*
int InterfaceNumber, // INT
int AlternateSetting, // INT
int InterfaceClass, // INT
int InterfaceSubClass, // INT
int InterfaceProtocol // INT
);<DllImport("WINUSB.dll", SetLastError:=True, ExactSpelling:=True)>
Public Shared Function WinUsb_ParseConfigurationDescriptor(
ConfigurationDescriptor As IntPtr, ' USB_CONFIGURATION_DESCRIPTOR*
StartPosition As IntPtr, ' void*
InterfaceNumber As Integer, ' INT
AlternateSetting As Integer, ' INT
InterfaceClass As Integer, ' INT
InterfaceSubClass As Integer, ' INT
InterfaceProtocol As Integer ' INT
) As IntPtr
End Function' ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR*
' StartPosition : void*
' InterfaceNumber : INT
' AlternateSetting : INT
' InterfaceClass : INT
' InterfaceSubClass : INT
' InterfaceProtocol : INT
Declare PtrSafe Function WinUsb_ParseConfigurationDescriptor Lib "winusb" ( _
ByVal ConfigurationDescriptor As LongPtr, _
ByVal StartPosition As LongPtr, _
ByVal InterfaceNumber As Long, _
ByVal AlternateSetting As Long, _
ByVal InterfaceClass As Long, _
ByVal InterfaceSubClass As Long, _
ByVal InterfaceProtocol As Long) As LongPtr
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。import ctypes
from ctypes import wintypes
WinUsb_ParseConfigurationDescriptor = ctypes.windll.winusb.WinUsb_ParseConfigurationDescriptor
WinUsb_ParseConfigurationDescriptor.restype = ctypes.c_void_p
WinUsb_ParseConfigurationDescriptor.argtypes = [
ctypes.c_void_p, # ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR*
ctypes.POINTER(None), # StartPosition : void*
ctypes.c_int, # InterfaceNumber : INT
ctypes.c_int, # AlternateSetting : INT
ctypes.c_int, # InterfaceClass : INT
ctypes.c_int, # InterfaceSubClass : INT
ctypes.c_int, # InterfaceProtocol : INT
]
# GetLastError: use ctypes.GetLastError() (or ctypes.WinDLL(use_last_error=True))require 'fiddle'
require 'fiddle/import'
lib = Fiddle.dlopen('WINUSB.dll')
WinUsb_ParseConfigurationDescriptor = Fiddle::Function.new(
lib['WinUsb_ParseConfigurationDescriptor'],
[
Fiddle::TYPE_VOIDP, # ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR*
Fiddle::TYPE_VOIDP, # StartPosition : void*
Fiddle::TYPE_INT, # InterfaceNumber : INT
Fiddle::TYPE_INT, # AlternateSetting : INT
Fiddle::TYPE_INT, # InterfaceClass : INT
Fiddle::TYPE_INT, # InterfaceSubClass : INT
Fiddle::TYPE_INT, # InterfaceProtocol : INT
],
Fiddle::TYPE_VOIDP)#[link(name = "winusb")]
extern "system" {
fn WinUsb_ParseConfigurationDescriptor(
ConfigurationDescriptor: *mut USB_CONFIGURATION_DESCRIPTOR, // USB_CONFIGURATION_DESCRIPTOR*
StartPosition: *mut (), // void*
InterfaceNumber: i32, // INT
AlternateSetting: i32, // INT
InterfaceClass: i32, // INT
InterfaceSubClass: i32, // INT
InterfaceProtocol: i32 // INT
) -> *mut USB_INTERFACE_DESCRIPTOR;
}
// crates: windows-sys provides ready-made bindings for this API.$sig = @"
[DllImport("WINUSB.dll", SetLastError = true)]
public static extern IntPtr WinUsb_ParseConfigurationDescriptor(IntPtr ConfigurationDescriptor, IntPtr StartPosition, int InterfaceNumber, int AlternateSetting, int InterfaceClass, int InterfaceSubClass, int InterfaceProtocol);
"@
$api = Add-Type -MemberDefinition $sig -Name 'WINUSB_WinUsb_ParseConfigurationDescriptor' -Namespace Win32 -PassThru
# $api::WinUsb_ParseConfigurationDescriptor(ConfigurationDescriptor, StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol)#uselib "WINUSB.dll"
#func global WinUsb_ParseConfigurationDescriptor "WinUsb_ParseConfigurationDescriptor" sptr, sptr, sptr, sptr, sptr, sptr, sptr
; WinUsb_ParseConfigurationDescriptor varptr(ConfigurationDescriptor), StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol ; 戻り値は stat
; ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> "sptr"
; StartPosition : void* -> "sptr"
; InterfaceNumber : INT -> "sptr"
; AlternateSetting : INT -> "sptr"
; InterfaceClass : INT -> "sptr"
; InterfaceSubClass : INT -> "sptr"
; InterfaceProtocol : INT -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。出力引数:
#uselib "WINUSB.dll" #cfunc global WinUsb_ParseConfigurationDescriptor "WinUsb_ParseConfigurationDescriptor" var, sptr, int, int, int, int, int ; res = WinUsb_ParseConfigurationDescriptor(ConfigurationDescriptor, StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol) ; ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> "var" ; StartPosition : void* -> "sptr" ; InterfaceNumber : INT -> "int" ; AlternateSetting : INT -> "int" ; InterfaceClass : INT -> "int" ; InterfaceSubClass : INT -> "int" ; InterfaceProtocol : INT -> "int" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。#uselib "WINUSB.dll" #cfunc global WinUsb_ParseConfigurationDescriptor "WinUsb_ParseConfigurationDescriptor" sptr, sptr, int, int, int, int, int ; res = WinUsb_ParseConfigurationDescriptor(varptr(ConfigurationDescriptor), StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol) ; ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> "sptr" ; StartPosition : void* -> "sptr" ; InterfaceNumber : INT -> "int" ; AlternateSetting : INT -> "int" ; InterfaceClass : INT -> "int" ; InterfaceSubClass : INT -> "int" ; InterfaceProtocol : INT -> "int" ; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。
出力引数:
; USB_INTERFACE_DESCRIPTOR* WinUsb_ParseConfigurationDescriptor(USB_CONFIGURATION_DESCRIPTOR* ConfigurationDescriptor, void* StartPosition, INT InterfaceNumber, INT AlternateSetting, INT InterfaceClass, INT InterfaceSubClass, INT InterfaceProtocol) #uselib "WINUSB.dll" #cfunc global WinUsb_ParseConfigurationDescriptor "WinUsb_ParseConfigurationDescriptor" var, intptr, int, int, int, int, int ; res = WinUsb_ParseConfigurationDescriptor(ConfigurationDescriptor, StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol) ; ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> "var" ; StartPosition : void* -> "intptr" ; InterfaceNumber : INT -> "int" ; AlternateSetting : INT -> "int" ; InterfaceClass : INT -> "int" ; InterfaceSubClass : INT -> "int" ; InterfaceProtocol : INT -> "int" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。; USB_INTERFACE_DESCRIPTOR* WinUsb_ParseConfigurationDescriptor(USB_CONFIGURATION_DESCRIPTOR* ConfigurationDescriptor, void* StartPosition, INT InterfaceNumber, INT AlternateSetting, INT InterfaceClass, INT InterfaceSubClass, INT InterfaceProtocol) #uselib "WINUSB.dll" #cfunc global WinUsb_ParseConfigurationDescriptor "WinUsb_ParseConfigurationDescriptor" intptr, intptr, int, int, int, int, int ; res = WinUsb_ParseConfigurationDescriptor(varptr(ConfigurationDescriptor), StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol) ; ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> "intptr" ; StartPosition : void* -> "intptr" ; InterfaceNumber : INT -> "int" ; AlternateSetting : INT -> "int" ; InterfaceClass : INT -> "int" ; InterfaceSubClass : INT -> "int" ; InterfaceProtocol : INT -> "int" ; ※出力/バッファ引数はポインタ方式(token=intptr / 呼び出しは varptr(変数))。
import (
"golang.org/x/sys/windows"
"unsafe"
)
var (
winusb = windows.NewLazySystemDLL("WINUSB.dll")
procWinUsb_ParseConfigurationDescriptor = winusb.NewProc("WinUsb_ParseConfigurationDescriptor")
)
// ConfigurationDescriptor (USB_CONFIGURATION_DESCRIPTOR*), StartPosition (void*), InterfaceNumber (INT), AlternateSetting (INT), InterfaceClass (INT), InterfaceSubClass (INT), InterfaceProtocol (INT)
r1, _, err := procWinUsb_ParseConfigurationDescriptor.Call(
uintptr(ConfigurationDescriptor),
uintptr(StartPosition),
uintptr(InterfaceNumber),
uintptr(AlternateSetting),
uintptr(InterfaceClass),
uintptr(InterfaceSubClass),
uintptr(InterfaceProtocol),
)
_ = err // syscall.Errno (valid when the call sets last-error)
_ = r1 // USB_INTERFACE_DESCRIPTOR*function WinUsb_ParseConfigurationDescriptor(
ConfigurationDescriptor: Pointer; // USB_CONFIGURATION_DESCRIPTOR*
StartPosition: Pointer; // void*
InterfaceNumber: Integer; // INT
AlternateSetting: Integer; // INT
InterfaceClass: Integer; // INT
InterfaceSubClass: Integer; // INT
InterfaceProtocol: Integer // INT
): Pointer; stdcall;
external 'WINUSB.dll' name 'WinUsb_ParseConfigurationDescriptor';result := DllCall("WINUSB\WinUsb_ParseConfigurationDescriptor"
, "Ptr", ConfigurationDescriptor ; USB_CONFIGURATION_DESCRIPTOR*
, "Ptr", StartPosition ; void*
, "Int", InterfaceNumber ; INT
, "Int", AlternateSetting ; INT
, "Int", InterfaceClass ; INT
, "Int", InterfaceSubClass ; INT
, "Int", InterfaceProtocol ; INT
, "Ptr") ; return: USB_INTERFACE_DESCRIPTOR*●WinUsb_ParseConfigurationDescriptor(ConfigurationDescriptor, StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol) = DLL("WINUSB.dll", "void* WinUsb_ParseConfigurationDescriptor(void*, void*, int, int, int, int, int)")
# 呼び出し: WinUsb_ParseConfigurationDescriptor(ConfigurationDescriptor, StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol)
# ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> "void*"
# StartPosition : void* -> "void*"
# InterfaceNumber : INT -> "int"
# AlternateSetting : INT -> "int"
# InterfaceClass : INT -> "int"
# InterfaceSubClass : INT -> "int"
# InterfaceProtocol : INT -> "int"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。const std = @import("std");
extern "winusb" fn WinUsb_ParseConfigurationDescriptor(
ConfigurationDescriptor: [*c]USB_CONFIGURATION_DESCRIPTOR, // USB_CONFIGURATION_DESCRIPTOR*
StartPosition: ?*anyopaque, // void*
InterfaceNumber: i32, // INT
AlternateSetting: i32, // INT
InterfaceClass: i32, // INT
InterfaceSubClass: i32, // INT
InterfaceProtocol: i32 // INT
) callconv(std.os.windows.WINAPI) [*c]USB_INTERFACE_DESCRIPTOR;proc WinUsb_ParseConfigurationDescriptor(
ConfigurationDescriptor: ptr USB_CONFIGURATION_DESCRIPTOR, # USB_CONFIGURATION_DESCRIPTOR*
StartPosition: pointer, # void*
InterfaceNumber: int32, # INT
AlternateSetting: int32, # INT
InterfaceClass: int32, # INT
InterfaceSubClass: int32, # INT
InterfaceProtocol: int32 # INT
): ptr USB_INTERFACE_DESCRIPTOR {.importc: "WinUsb_ParseConfigurationDescriptor", stdcall, dynlib: "WINUSB.dll".}pragma(lib, "winusb");
extern(Windows)
USB_INTERFACE_DESCRIPTOR* WinUsb_ParseConfigurationDescriptor(
USB_CONFIGURATION_DESCRIPTOR* ConfigurationDescriptor, // USB_CONFIGURATION_DESCRIPTOR*
void* StartPosition, // void*
int InterfaceNumber, // INT
int AlternateSetting, // INT
int InterfaceClass, // INT
int InterfaceSubClass, // INT
int InterfaceProtocol // INT
);ccall((:WinUsb_ParseConfigurationDescriptor, "WINUSB.dll"), stdcall, Ptr{USB_INTERFACE_DESCRIPTOR},
(Ptr{USB_CONFIGURATION_DESCRIPTOR}, Ptr{Cvoid}, Int32, Int32, Int32, Int32, Int32),
ConfigurationDescriptor, StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol)
# ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> Ptr{USB_CONFIGURATION_DESCRIPTOR}
# StartPosition : void* -> Ptr{Cvoid}
# InterfaceNumber : INT -> Int32
# AlternateSetting : INT -> Int32
# InterfaceClass : INT -> Int32
# InterfaceSubClass : INT -> Int32
# InterfaceProtocol : INT -> Int32
# stdcall は 32bit のみ意味を持つ(x64 では無視)。local ffi = require("ffi")
ffi.cdef[[
void* WinUsb_ParseConfigurationDescriptor(
void* ConfigurationDescriptor,
void* StartPosition,
int32_t InterfaceNumber,
int32_t AlternateSetting,
int32_t InterfaceClass,
int32_t InterfaceSubClass,
int32_t InterfaceProtocol);
]]
local winusb = ffi.load("winusb")
-- winusb.WinUsb_ParseConfigurationDescriptor(ConfigurationDescriptor, StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol)
-- ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR*
-- StartPosition : void*
-- InterfaceNumber : INT
-- AlternateSetting : INT
-- InterfaceClass : INT
-- InterfaceSubClass : INT
-- InterfaceProtocol : INT
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。const koffi = require('koffi');
const lib = koffi.load('WINUSB.dll');
const WinUsb_ParseConfigurationDescriptor = lib.func('__stdcall', 'WinUsb_ParseConfigurationDescriptor', 'void *', ['void *', 'void *', 'int32_t', 'int32_t', 'int32_t', 'int32_t', 'int32_t']);
// WinUsb_ParseConfigurationDescriptor(ConfigurationDescriptor, StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol)
// ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> 'void *'
// StartPosition : void* -> 'void *'
// InterfaceNumber : INT -> 'int32_t'
// AlternateSetting : INT -> 'int32_t'
// InterfaceClass : INT -> 'int32_t'
// InterfaceSubClass : INT -> 'int32_t'
// InterfaceProtocol : INT -> 'int32_t'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。const lib = Deno.dlopen("WINUSB.dll", {
WinUsb_ParseConfigurationDescriptor: { parameters: ["pointer", "pointer", "i32", "i32", "i32", "i32", "i32"], result: "pointer" },
});
// lib.symbols.WinUsb_ParseConfigurationDescriptor(ConfigurationDescriptor, StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol)
// ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> "pointer"
// StartPosition : void* -> "pointer"
// InterfaceNumber : INT -> "i32"
// AlternateSetting : INT -> "i32"
// InterfaceClass : INT -> "i32"
// InterfaceSubClass : INT -> "i32"
// InterfaceProtocol : INT -> "i32"
// 文字列引数は "buffer"(NUL 終端のバイト列を Uint8Array で渡す)。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。<?php
$ffi = FFI::cdef(<<<C
void* WinUsb_ParseConfigurationDescriptor(
void* ConfigurationDescriptor,
void* StartPosition,
int32_t InterfaceNumber,
int32_t AlternateSetting,
int32_t InterfaceClass,
int32_t InterfaceSubClass,
int32_t InterfaceProtocol);
C, "WINUSB.dll");
// $ffi->WinUsb_ParseConfigurationDescriptor(ConfigurationDescriptor, StartPosition, InterfaceNumber, AlternateSetting, InterfaceClass, InterfaceSubClass, InterfaceProtocol);
// ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR*
// StartPosition : void*
// InterfaceNumber : INT
// AlternateSetting : INT
// InterfaceClass : INT
// InterfaceSubClass : INT
// InterfaceProtocol : INT
// 構造体/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 Winusb extends StdCallLibrary {
Winusb INSTANCE = Native.load("winusb", Winusb.class);
Pointer WinUsb_ParseConfigurationDescriptor(
Pointer ConfigurationDescriptor, // USB_CONFIGURATION_DESCRIPTOR*
Pointer StartPosition, // void*
int InterfaceNumber, // INT
int AlternateSetting, // INT
int InterfaceClass, // INT
int InterfaceSubClass, // INT
int InterfaceProtocol // INT
);
}@[Link("winusb")]
lib LibWINUSB
fun WinUsb_ParseConfigurationDescriptor = WinUsb_ParseConfigurationDescriptor(
ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR*, # USB_CONFIGURATION_DESCRIPTOR*
StartPosition : Void*, # void*
InterfaceNumber : Int32, # INT
AlternateSetting : Int32, # INT
InterfaceClass : Int32, # INT
InterfaceSubClass : Int32, # INT
InterfaceProtocol : Int32 # INT
) : USB_INTERFACE_DESCRIPTOR*
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。import 'dart:ffi';
import 'package:ffi/ffi.dart';
typedef WinUsb_ParseConfigurationDescriptorNative = Pointer<Void> Function(Pointer<Void>, Pointer<Void>, Int32, Int32, Int32, Int32, Int32);
typedef WinUsb_ParseConfigurationDescriptorDart = Pointer<Void> Function(Pointer<Void>, Pointer<Void>, int, int, int, int, int);
final WinUsb_ParseConfigurationDescriptor = DynamicLibrary.open('WINUSB.dll')
.lookupFunction<WinUsb_ParseConfigurationDescriptorNative, WinUsb_ParseConfigurationDescriptorDart>('WinUsb_ParseConfigurationDescriptor');
// ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> Pointer<Void>
// StartPosition : void* -> Pointer<Void>
// InterfaceNumber : INT -> Int32
// AlternateSetting : INT -> Int32
// InterfaceClass : INT -> Int32
// InterfaceSubClass : INT -> Int32
// InterfaceProtocol : INT -> Int32
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。{$mode objfpc}{$H+}
function WinUsb_ParseConfigurationDescriptor(
ConfigurationDescriptor: Pointer; // USB_CONFIGURATION_DESCRIPTOR*
StartPosition: Pointer; // void*
InterfaceNumber: Integer; // INT
AlternateSetting: Integer; // INT
InterfaceClass: Integer; // INT
InterfaceSubClass: Integer; // INT
InterfaceProtocol: Integer // INT
): Pointer; stdcall;
external 'WINUSB.dll' name 'WinUsb_ParseConfigurationDescriptor';import Foreign
import Foreign.C.Types
import Foreign.C.String
foreign import stdcall safe "WinUsb_ParseConfigurationDescriptor"
c_WinUsb_ParseConfigurationDescriptor :: Ptr () -> Ptr () -> Int32 -> Int32 -> Int32 -> Int32 -> Int32 -> IO (Ptr ())
-- ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> Ptr ()
-- StartPosition : void* -> Ptr ()
-- InterfaceNumber : INT -> Int32
-- AlternateSetting : INT -> Int32
-- InterfaceClass : INT -> Int32
-- InterfaceSubClass : INT -> Int32
-- InterfaceProtocol : INT -> Int32
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。open Ctypes
open Foreign
let winusb_parseconfigurationdescriptor =
foreign "WinUsb_ParseConfigurationDescriptor"
((ptr void) @-> (ptr void) @-> int32_t @-> int32_t @-> int32_t @-> int32_t @-> int32_t @-> returning (ptr void))
(* ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> (ptr void) *)
(* StartPosition : void* -> (ptr void) *)
(* InterfaceNumber : INT -> int32_t *)
(* AlternateSetting : INT -> int32_t *)
(* InterfaceClass : INT -> int32_t *)
(* InterfaceSubClass : INT -> int32_t *)
(* InterfaceProtocol : INT -> int32_t *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)(cffi:define-foreign-library winusb (t "WINUSB.dll"))
(cffi:use-foreign-library winusb)
(cffi:defcfun ("WinUsb_ParseConfigurationDescriptor" win-usb-parse-configuration-descriptor :convention :stdcall) :pointer
(configuration-descriptor :pointer) ; USB_CONFIGURATION_DESCRIPTOR*
(start-position :pointer) ; void*
(interface-number :int32) ; INT
(alternate-setting :int32) ; INT
(interface-class :int32) ; INT
(interface-sub-class :int32) ; INT
(interface-protocol :int32)) ; INT
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。use Win32::API;
my $WinUsb_ParseConfigurationDescriptor = Win32::API::More->new('WINUSB',
'LPVOID WinUsb_ParseConfigurationDescriptor(LPVOID ConfigurationDescriptor, LPVOID StartPosition, int InterfaceNumber, int AlternateSetting, int InterfaceClass, int InterfaceSubClass, int InterfaceProtocol)');
# my $ret = $WinUsb_ParseConfigurationDescriptor->Call($ConfigurationDescriptor, $StartPosition, $InterfaceNumber, $AlternateSetting, $InterfaceClass, $InterfaceSubClass, $InterfaceProtocol);
# ConfigurationDescriptor : USB_CONFIGURATION_DESCRIPTOR* -> LPVOID
# StartPosition : void* -> LPVOID
# InterfaceNumber : INT -> int
# AlternateSetting : INT -> int
# InterfaceClass : INT -> int
# InterfaceSubClass : INT -> int
# InterfaceProtocol : INT -> int
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。