ホーム › NetworkManagement.WiFi › WlanRegisterNotification
WlanRegisterNotification
関数WLANイベントの通知を受け取るコールバックを登録する。
シグネチャ
// wlanapi.dll
#include <windows.h>
DWORD WlanRegisterNotification(
HANDLE hClientHandle,
WLAN_NOTIFICATION_SOURCES dwNotifSource,
BOOL bIgnoreDuplicate,
WLAN_NOTIFICATION_CALLBACK funcCallback, // optional
void* pCallbackContext, // optional
void* pReserved, // optional
DWORD* pdwPrevNotifSource // optional
);パラメーター
| 名前 | 型 | 方向 | 説明 |
|---|---|---|---|
| hClientHandle | HANDLE | in | WlanOpenHandleで取得したクライアントセッションのハンドル。 |
| dwNotifSource | WLAN_NOTIFICATION_SOURCES | in | 受信したい通知ソースを示すフラグ。ACMやMSM、ALL等を指定する。 |
| bIgnoreDuplicate | BOOL | in | TRUEなら重複した通知を抑制し、FALSEなら全通知を配信する。 |
| funcCallback | WLAN_NOTIFICATION_CALLBACK | inoptional | 通知発生時に呼び出されるコールバック関数へのポインター。登録解除はNULL可。 |
| pCallbackContext | void* | inoptional | コールバックへそのまま渡される任意のコンテキストへのポインター。NULL可。 |
| pReserved | void* | optional | 予約領域。NULLを指定する必要がある。 |
| pdwPrevNotifSource | DWORD* | outoptional | 直前に登録されていた通知ソースを受け取る出力先。NULL可。 |
戻り値の型: DWORD
各言語での呼び出し定義
// wlanapi.dll
#include <windows.h>
DWORD WlanRegisterNotification(
HANDLE hClientHandle,
WLAN_NOTIFICATION_SOURCES dwNotifSource,
BOOL bIgnoreDuplicate,
WLAN_NOTIFICATION_CALLBACK funcCallback, // optional
void* pCallbackContext, // optional
void* pReserved, // optional
DWORD* pdwPrevNotifSource // optional
);[DllImport("wlanapi.dll", ExactSpelling = true)]
static extern uint WlanRegisterNotification(
IntPtr hClientHandle, // HANDLE
uint dwNotifSource, // WLAN_NOTIFICATION_SOURCES
bool bIgnoreDuplicate, // BOOL
IntPtr funcCallback, // WLAN_NOTIFICATION_CALLBACK optional
IntPtr pCallbackContext, // void* optional
IntPtr pReserved, // void* optional
IntPtr pdwPrevNotifSource // DWORD* optional, out
);<DllImport("wlanapi.dll", ExactSpelling:=True)>
Public Shared Function WlanRegisterNotification(
hClientHandle As IntPtr, ' HANDLE
dwNotifSource As UInteger, ' WLAN_NOTIFICATION_SOURCES
bIgnoreDuplicate As Boolean, ' BOOL
funcCallback As IntPtr, ' WLAN_NOTIFICATION_CALLBACK optional
pCallbackContext As IntPtr, ' void* optional
pReserved As IntPtr, ' void* optional
pdwPrevNotifSource As IntPtr ' DWORD* optional, out
) As UInteger
End Function' hClientHandle : HANDLE
' dwNotifSource : WLAN_NOTIFICATION_SOURCES
' bIgnoreDuplicate : BOOL
' funcCallback : WLAN_NOTIFICATION_CALLBACK optional
' pCallbackContext : void* optional
' pReserved : void* optional
' pdwPrevNotifSource : DWORD* optional, out
Declare PtrSafe Function WlanRegisterNotification Lib "wlanapi" ( _
ByVal hClientHandle As LongPtr, _
ByVal dwNotifSource As Long, _
ByVal bIgnoreDuplicate As Long, _
ByVal funcCallback As LongPtr, _
ByVal pCallbackContext As LongPtr, _
ByVal pReserved As LongPtr, _
ByVal pdwPrevNotifSource As LongPtr) As Long
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。import ctypes
from ctypes import wintypes
WlanRegisterNotification = ctypes.windll.wlanapi.WlanRegisterNotification
WlanRegisterNotification.restype = wintypes.DWORD
WlanRegisterNotification.argtypes = [
wintypes.HANDLE, # hClientHandle : HANDLE
wintypes.DWORD, # dwNotifSource : WLAN_NOTIFICATION_SOURCES
wintypes.BOOL, # bIgnoreDuplicate : BOOL
ctypes.c_void_p, # funcCallback : WLAN_NOTIFICATION_CALLBACK optional
ctypes.POINTER(None), # pCallbackContext : void* optional
ctypes.POINTER(None), # pReserved : void* optional
ctypes.POINTER(wintypes.DWORD), # pdwPrevNotifSource : DWORD* optional, out
]require 'fiddle'
require 'fiddle/import'
lib = Fiddle.dlopen('wlanapi.dll')
WlanRegisterNotification = Fiddle::Function.new(
lib['WlanRegisterNotification'],
[
Fiddle::TYPE_VOIDP, # hClientHandle : HANDLE
-Fiddle::TYPE_INT, # dwNotifSource : WLAN_NOTIFICATION_SOURCES
Fiddle::TYPE_INT, # bIgnoreDuplicate : BOOL
Fiddle::TYPE_VOIDP, # funcCallback : WLAN_NOTIFICATION_CALLBACK optional
Fiddle::TYPE_VOIDP, # pCallbackContext : void* optional
Fiddle::TYPE_VOIDP, # pReserved : void* optional
Fiddle::TYPE_VOIDP, # pdwPrevNotifSource : DWORD* optional, out
],
-Fiddle::TYPE_INT)#[link(name = "wlanapi")]
extern "system" {
fn WlanRegisterNotification(
hClientHandle: *mut core::ffi::c_void, // HANDLE
dwNotifSource: u32, // WLAN_NOTIFICATION_SOURCES
bIgnoreDuplicate: i32, // BOOL
funcCallback: *const core::ffi::c_void, // WLAN_NOTIFICATION_CALLBACK optional
pCallbackContext: *mut (), // void* optional
pReserved: *mut (), // void* optional
pdwPrevNotifSource: *mut u32 // DWORD* optional, out
) -> u32;
}
// crates: windows-sys provides ready-made bindings for this API.$sig = @"
[DllImport("wlanapi.dll")]
public static extern uint WlanRegisterNotification(IntPtr hClientHandle, uint dwNotifSource, bool bIgnoreDuplicate, IntPtr funcCallback, IntPtr pCallbackContext, IntPtr pReserved, IntPtr pdwPrevNotifSource);
"@
$api = Add-Type -MemberDefinition $sig -Name 'wlanapi_WlanRegisterNotification' -Namespace Win32 -PassThru
# $api::WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, pdwPrevNotifSource)#uselib "wlanapi.dll"
#func global WlanRegisterNotification "WlanRegisterNotification" sptr, sptr, sptr, sptr, sptr, sptr, sptr
; WlanRegisterNotification hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, varptr(pdwPrevNotifSource) ; 戻り値は stat
; hClientHandle : HANDLE -> "sptr"
; dwNotifSource : WLAN_NOTIFICATION_SOURCES -> "sptr"
; bIgnoreDuplicate : BOOL -> "sptr"
; funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> "sptr"
; pCallbackContext : void* optional -> "sptr"
; pReserved : void* optional -> "sptr"
; pdwPrevNotifSource : DWORD* optional, out -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。出力引数:
#uselib "wlanapi.dll" #cfunc global WlanRegisterNotification "WlanRegisterNotification" sptr, int, int, sptr, sptr, sptr, var ; res = WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, pdwPrevNotifSource) ; hClientHandle : HANDLE -> "sptr" ; dwNotifSource : WLAN_NOTIFICATION_SOURCES -> "int" ; bIgnoreDuplicate : BOOL -> "int" ; funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> "sptr" ; pCallbackContext : void* optional -> "sptr" ; pReserved : void* optional -> "sptr" ; pdwPrevNotifSource : DWORD* optional, out -> "var" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。#uselib "wlanapi.dll" #cfunc global WlanRegisterNotification "WlanRegisterNotification" sptr, int, int, sptr, sptr, sptr, sptr ; res = WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, varptr(pdwPrevNotifSource)) ; hClientHandle : HANDLE -> "sptr" ; dwNotifSource : WLAN_NOTIFICATION_SOURCES -> "int" ; bIgnoreDuplicate : BOOL -> "int" ; funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> "sptr" ; pCallbackContext : void* optional -> "sptr" ; pReserved : void* optional -> "sptr" ; pdwPrevNotifSource : DWORD* optional, out -> "sptr" ; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。
出力引数:
; DWORD WlanRegisterNotification(HANDLE hClientHandle, WLAN_NOTIFICATION_SOURCES dwNotifSource, BOOL bIgnoreDuplicate, WLAN_NOTIFICATION_CALLBACK funcCallback, void* pCallbackContext, void* pReserved, DWORD* pdwPrevNotifSource) #uselib "wlanapi.dll" #cfunc global WlanRegisterNotification "WlanRegisterNotification" intptr, int, int, intptr, intptr, intptr, var ; res = WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, pdwPrevNotifSource) ; hClientHandle : HANDLE -> "intptr" ; dwNotifSource : WLAN_NOTIFICATION_SOURCES -> "int" ; bIgnoreDuplicate : BOOL -> "int" ; funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> "intptr" ; pCallbackContext : void* optional -> "intptr" ; pReserved : void* optional -> "intptr" ; pdwPrevNotifSource : DWORD* optional, out -> "var" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。; DWORD WlanRegisterNotification(HANDLE hClientHandle, WLAN_NOTIFICATION_SOURCES dwNotifSource, BOOL bIgnoreDuplicate, WLAN_NOTIFICATION_CALLBACK funcCallback, void* pCallbackContext, void* pReserved, DWORD* pdwPrevNotifSource) #uselib "wlanapi.dll" #cfunc global WlanRegisterNotification "WlanRegisterNotification" intptr, int, int, intptr, intptr, intptr, intptr ; res = WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, varptr(pdwPrevNotifSource)) ; hClientHandle : HANDLE -> "intptr" ; dwNotifSource : WLAN_NOTIFICATION_SOURCES -> "int" ; bIgnoreDuplicate : BOOL -> "int" ; funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> "intptr" ; pCallbackContext : void* optional -> "intptr" ; pReserved : void* optional -> "intptr" ; pdwPrevNotifSource : DWORD* optional, out -> "intptr" ; ※出力/バッファ引数はポインタ方式(token=intptr / 呼び出しは varptr(変数))。
import (
"golang.org/x/sys/windows"
"unsafe"
)
var (
wlanapi = windows.NewLazySystemDLL("wlanapi.dll")
procWlanRegisterNotification = wlanapi.NewProc("WlanRegisterNotification")
)
// hClientHandle (HANDLE), dwNotifSource (WLAN_NOTIFICATION_SOURCES), bIgnoreDuplicate (BOOL), funcCallback (WLAN_NOTIFICATION_CALLBACK optional), pCallbackContext (void* optional), pReserved (void* optional), pdwPrevNotifSource (DWORD* optional, out)
r1, _, err := procWlanRegisterNotification.Call(
uintptr(hClientHandle),
uintptr(dwNotifSource),
uintptr(bIgnoreDuplicate),
uintptr(funcCallback),
uintptr(pCallbackContext),
uintptr(pReserved),
uintptr(pdwPrevNotifSource),
)
_ = err // syscall.Errno (valid when the call sets last-error)
_ = r1 // DWORDfunction WlanRegisterNotification(
hClientHandle: THandle; // HANDLE
dwNotifSource: DWORD; // WLAN_NOTIFICATION_SOURCES
bIgnoreDuplicate: BOOL; // BOOL
funcCallback: Pointer; // WLAN_NOTIFICATION_CALLBACK optional
pCallbackContext: Pointer; // void* optional
pReserved: Pointer; // void* optional
pdwPrevNotifSource: Pointer // DWORD* optional, out
): DWORD; stdcall;
external 'wlanapi.dll' name 'WlanRegisterNotification';result := DllCall("wlanapi\WlanRegisterNotification"
, "Ptr", hClientHandle ; HANDLE
, "UInt", dwNotifSource ; WLAN_NOTIFICATION_SOURCES
, "Int", bIgnoreDuplicate ; BOOL
, "Ptr", funcCallback ; WLAN_NOTIFICATION_CALLBACK optional
, "Ptr", pCallbackContext ; void* optional
, "Ptr", pReserved ; void* optional
, "Ptr", pdwPrevNotifSource ; DWORD* optional, out
, "UInt") ; return: DWORD●WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, pdwPrevNotifSource) = DLL("wlanapi.dll", "dword WlanRegisterNotification(void*, dword, bool, void*, void*, void*, void*)")
# 呼び出し: WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, pdwPrevNotifSource)
# hClientHandle : HANDLE -> "void*"
# dwNotifSource : WLAN_NOTIFICATION_SOURCES -> "dword"
# bIgnoreDuplicate : BOOL -> "bool"
# funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> "void*"
# pCallbackContext : void* optional -> "void*"
# pReserved : void* optional -> "void*"
# pdwPrevNotifSource : DWORD* optional, out -> "void*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。const std = @import("std");
extern "wlanapi" fn WlanRegisterNotification(
hClientHandle: ?*anyopaque, // HANDLE
dwNotifSource: u32, // WLAN_NOTIFICATION_SOURCES
bIgnoreDuplicate: i32, // BOOL
funcCallback: ?*anyopaque, // WLAN_NOTIFICATION_CALLBACK optional
pCallbackContext: ?*anyopaque, // void* optional
pReserved: ?*anyopaque, // void* optional
pdwPrevNotifSource: [*c]u32 // DWORD* optional, out
) callconv(std.os.windows.WINAPI) u32;proc WlanRegisterNotification(
hClientHandle: pointer, # HANDLE
dwNotifSource: uint32, # WLAN_NOTIFICATION_SOURCES
bIgnoreDuplicate: int32, # BOOL
funcCallback: pointer, # WLAN_NOTIFICATION_CALLBACK optional
pCallbackContext: pointer, # void* optional
pReserved: pointer, # void* optional
pdwPrevNotifSource: ptr uint32 # DWORD* optional, out
): uint32 {.importc: "WlanRegisterNotification", stdcall, dynlib: "wlanapi.dll".}pragma(lib, "wlanapi");
extern(Windows)
uint WlanRegisterNotification(
void* hClientHandle, // HANDLE
uint dwNotifSource, // WLAN_NOTIFICATION_SOURCES
int bIgnoreDuplicate, // BOOL
void* funcCallback, // WLAN_NOTIFICATION_CALLBACK optional
void* pCallbackContext, // void* optional
void* pReserved, // void* optional
uint* pdwPrevNotifSource // DWORD* optional, out
);ccall((:WlanRegisterNotification, "wlanapi.dll"), stdcall, UInt32,
(Ptr{Cvoid}, UInt32, Int32, Ptr{Cvoid}, Ptr{Cvoid}, Ptr{Cvoid}, Ptr{UInt32}),
hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, pdwPrevNotifSource)
# hClientHandle : HANDLE -> Ptr{Cvoid}
# dwNotifSource : WLAN_NOTIFICATION_SOURCES -> UInt32
# bIgnoreDuplicate : BOOL -> Int32
# funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> Ptr{Cvoid}
# pCallbackContext : void* optional -> Ptr{Cvoid}
# pReserved : void* optional -> Ptr{Cvoid}
# pdwPrevNotifSource : DWORD* optional, out -> Ptr{UInt32}
# stdcall は 32bit のみ意味を持つ(x64 では無視)。local ffi = require("ffi")
ffi.cdef[[
uint32_t WlanRegisterNotification(
void* hClientHandle,
uint32_t dwNotifSource,
int32_t bIgnoreDuplicate,
void* funcCallback,
void* pCallbackContext,
void* pReserved,
uint32_t* pdwPrevNotifSource);
]]
local wlanapi = ffi.load("wlanapi")
-- wlanapi.WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, pdwPrevNotifSource)
-- hClientHandle : HANDLE
-- dwNotifSource : WLAN_NOTIFICATION_SOURCES
-- bIgnoreDuplicate : BOOL
-- funcCallback : WLAN_NOTIFICATION_CALLBACK optional
-- pCallbackContext : void* optional
-- pReserved : void* optional
-- pdwPrevNotifSource : DWORD* optional, out
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。const koffi = require('koffi');
const lib = koffi.load('wlanapi.dll');
const WlanRegisterNotification = lib.func('__stdcall', 'WlanRegisterNotification', 'uint32_t', ['void *', 'uint32_t', 'int32_t', 'void *', 'void *', 'void *', 'uint32_t *']);
// WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, pdwPrevNotifSource)
// hClientHandle : HANDLE -> 'void *'
// dwNotifSource : WLAN_NOTIFICATION_SOURCES -> 'uint32_t'
// bIgnoreDuplicate : BOOL -> 'int32_t'
// funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> 'void *'
// pCallbackContext : void* optional -> 'void *'
// pReserved : void* optional -> 'void *'
// pdwPrevNotifSource : DWORD* optional, out -> 'uint32_t *'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。
// コールバック(関数ポインタ)は koffi.proto/koffi.register で型を定義して渡す(素の void* では JS 関数を渡せない)。const lib = Deno.dlopen("wlanapi.dll", {
WlanRegisterNotification: { parameters: ["pointer", "u32", "i32", "pointer", "pointer", "pointer", "pointer"], result: "u32" },
});
// lib.symbols.WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, pdwPrevNotifSource)
// hClientHandle : HANDLE -> "pointer"
// dwNotifSource : WLAN_NOTIFICATION_SOURCES -> "u32"
// bIgnoreDuplicate : BOOL -> "i32"
// funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> "pointer"
// pCallbackContext : void* optional -> "pointer"
// pReserved : void* optional -> "pointer"
// pdwPrevNotifSource : DWORD* optional, out -> "pointer"
// 文字列引数は "buffer"(NUL 終端のバイト列を Uint8Array で渡す)。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。<?php
$ffi = FFI::cdef(<<<C
uint32_t WlanRegisterNotification(
void* hClientHandle,
uint32_t dwNotifSource,
int32_t bIgnoreDuplicate,
void* funcCallback,
void* pCallbackContext,
void* pReserved,
uint32_t* pdwPrevNotifSource);
C, "wlanapi.dll");
// $ffi->WlanRegisterNotification(hClientHandle, dwNotifSource, bIgnoreDuplicate, funcCallback, pCallbackContext, pReserved, pdwPrevNotifSource);
// hClientHandle : HANDLE
// dwNotifSource : WLAN_NOTIFICATION_SOURCES
// bIgnoreDuplicate : BOOL
// funcCallback : WLAN_NOTIFICATION_CALLBACK optional
// pCallbackContext : void* optional
// pReserved : void* optional
// pdwPrevNotifSource : DWORD* optional, 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 Wlanapi extends StdCallLibrary {
Wlanapi INSTANCE = Native.load("wlanapi", Wlanapi.class);
int WlanRegisterNotification(
Pointer hClientHandle, // HANDLE
int dwNotifSource, // WLAN_NOTIFICATION_SOURCES
boolean bIgnoreDuplicate, // BOOL
Callback funcCallback, // WLAN_NOTIFICATION_CALLBACK optional
Pointer pCallbackContext, // void* optional
Pointer pReserved, // void* optional
IntByReference pdwPrevNotifSource // DWORD* optional, out
);
}@[Link("wlanapi")]
lib Libwlanapi
fun WlanRegisterNotification = WlanRegisterNotification(
hClientHandle : Void*, # HANDLE
dwNotifSource : UInt32, # WLAN_NOTIFICATION_SOURCES
bIgnoreDuplicate : Int32, # BOOL
funcCallback : Void*, # WLAN_NOTIFICATION_CALLBACK optional
pCallbackContext : Void*, # void* optional
pReserved : Void*, # void* optional
pdwPrevNotifSource : UInt32* # DWORD* optional, out
) : UInt32
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。import 'dart:ffi';
import 'package:ffi/ffi.dart';
typedef WlanRegisterNotificationNative = Uint32 Function(Pointer<Void>, Uint32, Int32, Pointer<Void>, Pointer<Void>, Pointer<Void>, Pointer<Uint32>);
typedef WlanRegisterNotificationDart = int Function(Pointer<Void>, int, int, Pointer<Void>, Pointer<Void>, Pointer<Void>, Pointer<Uint32>);
final WlanRegisterNotification = DynamicLibrary.open('wlanapi.dll')
.lookupFunction<WlanRegisterNotificationNative, WlanRegisterNotificationDart>('WlanRegisterNotification');
// hClientHandle : HANDLE -> Pointer<Void>
// dwNotifSource : WLAN_NOTIFICATION_SOURCES -> Uint32
// bIgnoreDuplicate : BOOL -> Int32
// funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> Pointer<Void>
// pCallbackContext : void* optional -> Pointer<Void>
// pReserved : void* optional -> Pointer<Void>
// pdwPrevNotifSource : DWORD* optional, out -> Pointer<Uint32>
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。{$mode objfpc}{$H+}
function WlanRegisterNotification(
hClientHandle: THandle; // HANDLE
dwNotifSource: DWORD; // WLAN_NOTIFICATION_SOURCES
bIgnoreDuplicate: BOOL; // BOOL
funcCallback: Pointer; // WLAN_NOTIFICATION_CALLBACK optional
pCallbackContext: Pointer; // void* optional
pReserved: Pointer; // void* optional
pdwPrevNotifSource: Pointer // DWORD* optional, out
): DWORD; stdcall;
external 'wlanapi.dll' name 'WlanRegisterNotification';import Foreign
import Foreign.C.Types
import Foreign.C.String
foreign import stdcall safe "WlanRegisterNotification"
c_WlanRegisterNotification :: Ptr () -> Word32 -> CInt -> Ptr () -> Ptr () -> Ptr () -> Ptr Word32 -> IO Word32
-- hClientHandle : HANDLE -> Ptr ()
-- dwNotifSource : WLAN_NOTIFICATION_SOURCES -> Word32
-- bIgnoreDuplicate : BOOL -> CInt
-- funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> Ptr ()
-- pCallbackContext : void* optional -> Ptr ()
-- pReserved : void* optional -> Ptr ()
-- pdwPrevNotifSource : DWORD* optional, out -> Ptr Word32
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。open Ctypes
open Foreign
let wlanregisternotification =
foreign "WlanRegisterNotification"
((ptr void) @-> uint32_t @-> int32_t @-> (ptr void) @-> (ptr void) @-> (ptr void) @-> (ptr uint32_t) @-> returning uint32_t)
(* hClientHandle : HANDLE -> (ptr void) *)
(* dwNotifSource : WLAN_NOTIFICATION_SOURCES -> uint32_t *)
(* bIgnoreDuplicate : BOOL -> int32_t *)
(* funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> (ptr void) *)
(* pCallbackContext : void* optional -> (ptr void) *)
(* pReserved : void* optional -> (ptr void) *)
(* pdwPrevNotifSource : DWORD* optional, out -> (ptr uint32_t) *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)(cffi:define-foreign-library wlanapi (t "wlanapi.dll"))
(cffi:use-foreign-library wlanapi)
(cffi:defcfun ("WlanRegisterNotification" wlan-register-notification :convention :stdcall) :uint32
(h-client-handle :pointer) ; HANDLE
(dw-notif-source :uint32) ; WLAN_NOTIFICATION_SOURCES
(b-ignore-duplicate :int32) ; BOOL
(func-callback :pointer) ; WLAN_NOTIFICATION_CALLBACK optional
(p-callback-context :pointer) ; void* optional
(p-reserved :pointer) ; void* optional
(pdw-prev-notif-source :pointer)) ; DWORD* optional, out
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。use Win32::API;
my $WlanRegisterNotification = Win32::API::More->new('wlanapi',
'DWORD WlanRegisterNotification(HANDLE hClientHandle, DWORD dwNotifSource, BOOL bIgnoreDuplicate, LPVOID funcCallback, LPVOID pCallbackContext, LPVOID pReserved, LPVOID pdwPrevNotifSource)');
# my $ret = $WlanRegisterNotification->Call($hClientHandle, $dwNotifSource, $bIgnoreDuplicate, $funcCallback, $pCallbackContext, $pReserved, $pdwPrevNotifSource);
# hClientHandle : HANDLE -> HANDLE
# dwNotifSource : WLAN_NOTIFICATION_SOURCES -> DWORD
# bIgnoreDuplicate : BOOL -> BOOL
# funcCallback : WLAN_NOTIFICATION_CALLBACK optional -> LPVOID
# pCallbackContext : void* optional -> LPVOID
# pReserved : void* optional -> LPVOID
# pdwPrevNotifSource : DWORD* optional, out -> LPVOID
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。
# コールバック(関数ポインタ)は Perl sub を直接渡せません。Win32::API::Callback を使用してください。