LCMapStringW
関数シグネチャ
// KERNEL32.dll (Unicode / -W)
#include <windows.h>
INT LCMapStringW(
DWORD Locale,
DWORD dwMapFlags,
LPCWSTR lpSrcStr,
INT cchSrc,
LPWSTR lpDestStr, // optional
INT cchDest
);パラメーター
| 名前 | 型 | 方向 | 説明 |
|---|---|---|---|
| Locale | DWORD | in | ロケールを指定するロケール識別子です。MAKELCID マクロを使用してロケール識別子を作成するか、次の定義済みの値のいずれかを使用できます。 次のカスタムロケール識別子もサポートされています。 |
| dwMapFlags | DWORD | in | 文字列マッピング中に使用する変換の種類、または生成するソートキーの種類を指定するフラグです。詳細な定義については、LCMapStringEx の dwMapFlags パラメーターを参照してください。 |
| lpSrcStr | LPCWSTR | in | 関数がマッピングするか、ソートキー生成に使用するソース文字列へのポインターです。この文字列のサイズを 0 にすることはできません。 |
| cchSrc | INT | in | lpSrcStr で示されるソース文字列のサイズ(文字数)です。ソース文字列のサイズには終端の null 文字を含めることができますが、含める必要はありません。終端の null 文字が含まれている場合でも、終端の null 文字はソート不可能とみなされ常に自分自身にマッピングされるため、関数のマッピング動作に大きな影響はありません。 アプリケーションはこのパラメーターに任意の負の値を設定することで、ソース文字列が null 終端であることを指定できます。この場合、LCMapString が文字列マッピングモードで使用されているときは、関数が文字列の長さを自身で計算し、lpDestStr で示されるマッピング後の文字列を null 終端にします。 アプリケーションはこのパラメーターに 0 を設定することはできません。 |
| lpDestStr | LPWSTR | outoptional | この関数がマッピング後の文字列またはソートキーを取得するバッファーへのポインターです。 アプリケーションがソートキー(LCMAP_SORTKEY)を生成するために関数を使用している場合:
呼び出し元が文字列のサブセットを明示的に要求した場合、呼び出し元が cchDest で指定しない限り、デスティネーション文字列には終端の null 文字は含まれません。 この関数が失敗した場合、デスティネーションバッファーには部分的な結果が含まれることもあれば、まったく結果が含まれないこともあります。この場合、すべての結果は無効とみなすべきです。 メモ
LCMAP_UPPERCASE または LCMAP_LOWERCASE を設定する場合、デスティネーション文字列はソース文字列と同じバッファーを使用できます。ただし、一部の条件では返される大文字小文字変換後の文字列の長さが異なる場合があるため、これは強く推奨されません。 |
| cchDest | INT | in | lpDestStr で示されるデスティネーション文字列のサイズ(文字数)です。アプリケーションが文字列マッピングのために関数を使用している場合、このパラメーターには文字数を指定します。終端の null 文字のための領域が cchSrc に含まれている場合、cchDest にも終端の null 文字のための領域を含める必要があります。 アプリケーションがソートキーを生成するために関数を使用している場合、サイズにはバイト数を指定します。このバイト数には、ソートキーの 0x00 終端子のための領域を含める必要があります。 アプリケーションは cchDest に 0 を設定できます。この場合、関数は lpDestStr パラメーターを使用せず、マッピング後の文字列またはソートキーに必要なバッファーサイズを返します。 |
戻り値の型: INT
公式ドキュメント
識別子で指定されたロケールについて、指定された変換を使用して入力文字列を別の文字列にマッピングするか、入力文字列のソートキーを生成します。(Unicode)
戻り値
関数が文字列マッピングに使用されて成功した場合、変換後の文字列の文字数を返します(詳細は cchSrc および cchDest を参照してください)。
関数がソートキーの生成に使用されて成功した場合、ソートキーのバイト数を返します。
関数が成功しなかった場合は 0 を返します。拡張エラー情報を取得するには、アプリケーションは GetLastError を呼び出すことができます。この関数は次のいずれかのエラーコードを返すことがあります。
- ERROR_INSUFFICIENT_BUFFER。指定されたバッファーサイズが十分な大きさでなかったか、誤って NULL に設定されていました。
- ERROR_INVALID_FLAGS。フラグに指定された値が無効でした。
- ERROR_INVALID_PARAMETER。いずれかのパラメーター値が無効でした。
関数が成功しなかった場合は 0 を返します。拡張エラー情報を取得するには、アプリケーションは GetLastError を呼び出すことができます。この関数は次のいずれかのエラーコードを返すことがあります。
- ERROR_INSUFFICIENT_BUFFER。指定されたバッファーサイズが十分な大きさでなかったか、誤って NULL に設定されていました。
- ERROR_INVALID_FLAGS。フラグに指定された値が無効でした。
- ERROR_INVALID_PARAMETER。いずれかのパラメーター値が無効でした。
解説(Remarks)
備考については LCMapStringEx を参照してください。
LCMapString の ANSI バージョンは、指定されたロケールに関連付けられた既定の Windows (ANSI) コードページに基づいて、文字列を Unicode との間で相互にマッピングします。この関数の ANSI バージョンが Unicode 専用ロケールと共に使用された場合、オペレーティングシステムがシステム既定の Windows ANSI コードページを表す CP_ACP 値を使用するため、関数は成功することがあります。ただし、システムコードページで未定義の文字は、文字列内では疑問符 (?) として表示されます。
winnls.h ヘッダーは LCMapString を、UNICODE プリプロセッサ定数の定義に基づいてこの関数の ANSI バージョンまたは Unicode バージョンを自動的に選択するエイリアスとして定義します。エンコーディング中立のエイリアスの使用を、エンコーディング中立でないコードと混在させると、コンパイルエラーまたは実行時エラーを引き起こす不一致につながる可能性があります。詳細については、関数プロトタイプの規約を参照してください。
Microsoft 公式リファレンス: 英語 (en-us) · 日本語 (ja-jp) · 原文ソース (GitHub)
各言語での呼び出し定義
// KERNEL32.dll (Unicode / -W)
#include <windows.h>
INT LCMapStringW(
DWORD Locale,
DWORD dwMapFlags,
LPCWSTR lpSrcStr,
INT cchSrc,
LPWSTR lpDestStr, // optional
INT cchDest
);[DllImport("KERNEL32.dll", CharSet = CharSet.Unicode, SetLastError = true, ExactSpelling = true)]
static extern int LCMapStringW(
uint Locale, // DWORD
uint dwMapFlags, // DWORD
[MarshalAs(UnmanagedType.LPWStr)] string lpSrcStr, // LPCWSTR
int cchSrc, // INT
[MarshalAs(UnmanagedType.LPWStr)] System.Text.StringBuilder lpDestStr, // LPWSTR optional, out
int cchDest // INT
);<DllImport("KERNEL32.dll", CharSet:=CharSet.Unicode, SetLastError:=True, ExactSpelling:=True)>
Public Shared Function LCMapStringW(
Locale As UInteger, ' DWORD
dwMapFlags As UInteger, ' DWORD
<MarshalAs(UnmanagedType.LPWStr)> lpSrcStr As String, ' LPCWSTR
cchSrc As Integer, ' INT
<MarshalAs(UnmanagedType.LPWStr)> lpDestStr As System.Text.StringBuilder, ' LPWSTR optional, out
cchDest As Integer ' INT
) As Integer
End Function' Locale : DWORD
' dwMapFlags : DWORD
' lpSrcStr : LPCWSTR
' cchSrc : INT
' lpDestStr : LPWSTR optional, out
' cchDest : INT
Declare PtrSafe Function LCMapStringW Lib "kernel32" ( _
ByVal Locale As Long, _
ByVal dwMapFlags As Long, _
ByVal lpSrcStr As LongPtr, _
ByVal cchSrc As Long, _
ByVal lpDestStr As LongPtr, _
ByVal cchDest 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
LCMapStringW = ctypes.windll.kernel32.LCMapStringW
LCMapStringW.restype = ctypes.c_int
LCMapStringW.argtypes = [
wintypes.DWORD, # Locale : DWORD
wintypes.DWORD, # dwMapFlags : DWORD
wintypes.LPCWSTR, # lpSrcStr : LPCWSTR
ctypes.c_int, # cchSrc : INT
wintypes.LPWSTR, # lpDestStr : LPWSTR optional, out
ctypes.c_int, # cchDest : INT
]
# GetLastError: use ctypes.GetLastError() (or ctypes.WinDLL(use_last_error=True))require 'fiddle'
require 'fiddle/import'
lib = Fiddle.dlopen('KERNEL32.dll')
LCMapStringW = Fiddle::Function.new(
lib['LCMapStringW'],
[
-Fiddle::TYPE_INT, # Locale : DWORD
-Fiddle::TYPE_INT, # dwMapFlags : DWORD
Fiddle::TYPE_VOIDP, # lpSrcStr : LPCWSTR
Fiddle::TYPE_INT, # cchSrc : INT
Fiddle::TYPE_VOIDP, # lpDestStr : LPWSTR optional, out
Fiddle::TYPE_INT, # cchDest : INT
],
Fiddle::TYPE_INT)
# Wide strings: pass str.encode("UTF-16LE") + "\x00\x00"#[link(name = "kernel32")]
extern "system" {
fn LCMapStringW(
Locale: u32, // DWORD
dwMapFlags: u32, // DWORD
lpSrcStr: *const u16, // LPCWSTR
cchSrc: i32, // INT
lpDestStr: *mut u16, // LPWSTR optional, out
cchDest: i32 // INT
) -> i32;
}
// crates: windows-sys provides ready-made bindings for this API.$sig = @"
[DllImport("KERNEL32.dll", CharSet = CharSet.Unicode, SetLastError = true)]
public static extern int LCMapStringW(uint Locale, uint dwMapFlags, [MarshalAs(UnmanagedType.LPWStr)] string lpSrcStr, int cchSrc, [MarshalAs(UnmanagedType.LPWStr)] System.Text.StringBuilder lpDestStr, int cchDest);
"@
$api = Add-Type -MemberDefinition $sig -Name 'KERNEL32_LCMapStringW' -Namespace Win32 -PassThru
# $api::LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, lpDestStr, cchDest)#uselib "KERNEL32.dll"
#func global LCMapStringW "LCMapStringW" wptr, wptr, wptr, wptr, wptr, wptr
; LCMapStringW Locale, dwMapFlags, lpSrcStr, cchSrc, varptr(lpDestStr), cchDest ; 戻り値は stat
; Locale : DWORD -> "wptr"
; dwMapFlags : DWORD -> "wptr"
; lpSrcStr : LPCWSTR -> "wptr"
; cchSrc : INT -> "wptr"
; lpDestStr : LPWSTR optional, out -> "wptr"
; cchDest : INT -> "wptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。#uselib "KERNEL32.dll" #cfunc global LCMapStringW "LCMapStringW" int, int, wstr, int, var, int ; res = LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, lpDestStr, cchDest) ; Locale : DWORD -> "int" ; dwMapFlags : DWORD -> "int" ; lpSrcStr : LPCWSTR -> "wstr" ; cchSrc : INT -> "int" ; lpDestStr : LPWSTR optional, out -> "var" ; cchDest : INT -> "int" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。#uselib "KERNEL32.dll" #cfunc global LCMapStringW "LCMapStringW" int, int, wstr, int, sptr, int ; res = LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, varptr(lpDestStr), cchDest) ; Locale : DWORD -> "int" ; dwMapFlags : DWORD -> "int" ; lpSrcStr : LPCWSTR -> "wstr" ; cchSrc : INT -> "int" ; lpDestStr : LPWSTR optional, out -> "sptr" ; cchDest : INT -> "int" ; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。
; INT LCMapStringW(DWORD Locale, DWORD dwMapFlags, LPCWSTR lpSrcStr, INT cchSrc, LPWSTR lpDestStr, INT cchDest) #uselib "KERNEL32.dll" #cfunc global LCMapStringW "LCMapStringW" int, int, wstr, int, var, int ; res = LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, lpDestStr, cchDest) ; Locale : DWORD -> "int" ; dwMapFlags : DWORD -> "int" ; lpSrcStr : LPCWSTR -> "wstr" ; cchSrc : INT -> "int" ; lpDestStr : LPWSTR optional, out -> "var" ; cchDest : INT -> "int" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。; INT LCMapStringW(DWORD Locale, DWORD dwMapFlags, LPCWSTR lpSrcStr, INT cchSrc, LPWSTR lpDestStr, INT cchDest) #uselib "KERNEL32.dll" #cfunc global LCMapStringW "LCMapStringW" int, int, wstr, int, intptr, int ; res = LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, varptr(lpDestStr), cchDest) ; Locale : DWORD -> "int" ; dwMapFlags : DWORD -> "int" ; lpSrcStr : LPCWSTR -> "wstr" ; cchSrc : INT -> "int" ; lpDestStr : LPWSTR optional, out -> "intptr" ; cchDest : INT -> "int" ; ※出力/バッファ引数はポインタ方式(token=intptr / 呼び出しは varptr(変数))。
import (
"golang.org/x/sys/windows"
"unsafe"
)
var (
kernel32 = windows.NewLazySystemDLL("KERNEL32.dll")
procLCMapStringW = kernel32.NewProc("LCMapStringW")
)
// Locale (DWORD), dwMapFlags (DWORD), lpSrcStr (LPCWSTR), cchSrc (INT), lpDestStr (LPWSTR optional, out), cchDest (INT)
r1, _, err := procLCMapStringW.Call(
uintptr(Locale),
uintptr(dwMapFlags),
uintptr(unsafe.Pointer(windows.StringToUTF16Ptr(lpSrcStr))),
uintptr(cchSrc),
uintptr(lpDestStr),
uintptr(cchDest),
)
_ = err // syscall.Errno (valid when the call sets last-error)
_ = r1 // INTfunction LCMapStringW(
Locale: DWORD; // DWORD
dwMapFlags: DWORD; // DWORD
lpSrcStr: PWideChar; // LPCWSTR
cchSrc: Integer; // INT
lpDestStr: PWideChar; // LPWSTR optional, out
cchDest: Integer // INT
): Integer; stdcall;
external 'KERNEL32.dll' name 'LCMapStringW';result := DllCall("KERNEL32\LCMapStringW"
, "UInt", Locale ; DWORD
, "UInt", dwMapFlags ; DWORD
, "WStr", lpSrcStr ; LPCWSTR
, "Int", cchSrc ; INT
, "Ptr", lpDestStr ; LPWSTR optional, out
, "Int", cchDest ; INT
, "Int") ; return: INT●LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, lpDestStr, cchDest) = DLL("KERNEL32.dll", "int LCMapStringW(dword, dword, char*, int, char*, int)")
# 呼び出し: LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, lpDestStr, cchDest)
# Locale : DWORD -> "dword"
# dwMapFlags : DWORD -> "dword"
# lpSrcStr : LPCWSTR -> "char*"
# cchSrc : INT -> "int"
# lpDestStr : LPWSTR optional, out -> "char*"
# cchDest : INT -> "int"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。
# ※-W(Unicode)関数。なでしこ1はANSIのため -A 版の利用を推奨。const std = @import("std");
extern "kernel32" fn LCMapStringW(
Locale: u32, // DWORD
dwMapFlags: u32, // DWORD
lpSrcStr: [*c]const u16, // LPCWSTR
cchSrc: i32, // INT
lpDestStr: [*c]u16, // LPWSTR optional, out
cchDest: i32 // INT
) callconv(std.os.windows.WINAPI) i32;
// Unicode(-W): UTF-16LE のヌル終端バッファ([*c]const u16)を渡す。proc LCMapStringW(
Locale: uint32, # DWORD
dwMapFlags: uint32, # DWORD
lpSrcStr: WideCString, # LPCWSTR
cchSrc: int32, # INT
lpDestStr: ptr uint16, # LPWSTR optional, out
cchDest: int32 # INT
): int32 {.importc: "LCMapStringW", stdcall, dynlib: "KERNEL32.dll".}
# Unicode(-W): WideCString は newWideCString("...") で生成。pragma(lib, "kernel32");
extern(Windows)
int LCMapStringW(
uint Locale, // DWORD
uint dwMapFlags, // DWORD
const(wchar)* lpSrcStr, // LPCWSTR
int cchSrc, // INT
wchar* lpDestStr, // LPWSTR optional, out
int cchDest // INT
);ccall((:LCMapStringW, "KERNEL32.dll"), stdcall, Int32,
(UInt32, UInt32, Cwstring, Int32, Ptr{UInt16}, Int32),
Locale, dwMapFlags, lpSrcStr, cchSrc, lpDestStr, cchDest)
# Locale : DWORD -> UInt32
# dwMapFlags : DWORD -> UInt32
# lpSrcStr : LPCWSTR -> Cwstring
# cchSrc : INT -> Int32
# lpDestStr : LPWSTR optional, out -> Ptr{UInt16}
# cchDest : INT -> Int32
# stdcall は 32bit のみ意味を持つ(x64 では無視)。
# Unicode(-W): Cwstring には transcode(UInt16, "...") 等で UTF-16 を渡す。local ffi = require("ffi")
ffi.cdef[[
int32_t LCMapStringW(
uint32_t Locale,
uint32_t dwMapFlags,
const uint16_t* lpSrcStr,
int32_t cchSrc,
uint16_t* lpDestStr,
int32_t cchDest);
]]
local kernel32 = ffi.load("kernel32")
-- kernel32.LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, lpDestStr, cchDest)
-- Locale : DWORD
-- dwMapFlags : DWORD
-- lpSrcStr : LPCWSTR
-- cchSrc : INT
-- lpDestStr : LPWSTR optional, out
-- cchDest : INT
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
-- Unicode(-W): uint16_t* には UTF-16LE のバッファ(ffi.new("uint16_t[?]", ...))を渡す。const koffi = require('koffi');
const lib = koffi.load('KERNEL32.dll');
const LCMapStringW = lib.func('__stdcall', 'LCMapStringW', 'int32_t', ['uint32_t', 'uint32_t', 'str16', 'int32_t', 'uint16_t *', 'int32_t']);
// LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, lpDestStr, cchDest)
// Locale : DWORD -> 'uint32_t'
// dwMapFlags : DWORD -> 'uint32_t'
// lpSrcStr : LPCWSTR -> 'str16'
// cchSrc : INT -> 'int32_t'
// lpDestStr : LPWSTR optional, out -> 'uint16_t *'
// cchDest : INT -> 'int32_t'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。const lib = Deno.dlopen("KERNEL32.dll", {
LCMapStringW: { parameters: ["u32", "u32", "buffer", "i32", "buffer", "i32"], result: "i32" },
});
// lib.symbols.LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, lpDestStr, cchDest)
// Locale : DWORD -> "u32"
// dwMapFlags : DWORD -> "u32"
// lpSrcStr : LPCWSTR -> "buffer"
// cchSrc : INT -> "i32"
// lpDestStr : LPWSTR optional, out -> "buffer"
// cchDest : INT -> "i32"
// 文字列は "buffer"。Unicode(-W) は new TextEncoder() ではなく UTF-16LE のバイト列(末尾に \x00\x00)を Uint8Array で渡す。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。<?php
$ffi = FFI::cdef(<<<C
int32_t LCMapStringW(
uint32_t Locale,
uint32_t dwMapFlags,
const uint16_t* lpSrcStr,
int32_t cchSrc,
uint16_t* lpDestStr,
int32_t cchDest);
C, "KERNEL32.dll");
// $ffi->LCMapStringW(Locale, dwMapFlags, lpSrcStr, cchSrc, lpDestStr, cchDest);
// Locale : DWORD
// dwMapFlags : DWORD
// lpSrcStr : LPCWSTR
// cchSrc : INT
// lpDestStr : LPWSTR optional, out
// cchDest : 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 Kernel32 extends StdCallLibrary {
Kernel32 INSTANCE = Native.load("kernel32", Kernel32.class, W32APIOptions.UNICODE_OPTIONS);
int LCMapStringW(
int Locale, // DWORD
int dwMapFlags, // DWORD
WString lpSrcStr, // LPCWSTR
int cchSrc, // INT
char[] lpDestStr, // LPWSTR optional, out
int cchDest // INT
);
}
// Unicode(-W): WString(入力)/char[](出力)で UTF-16 をマーシャリング。@[Link("kernel32")]
lib LibKERNEL32
fun LCMapStringW = LCMapStringW(
Locale : UInt32, # DWORD
dwMapFlags : UInt32, # DWORD
lpSrcStr : UInt16*, # LPCWSTR
cchSrc : Int32, # INT
lpDestStr : UInt16*, # LPWSTR optional, out
cchDest : Int32 # INT
) : Int32
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。import 'dart:ffi';
import 'package:ffi/ffi.dart';
typedef LCMapStringWNative = Int32 Function(Uint32, Uint32, Pointer<Utf16>, Int32, Pointer<Utf16>, Int32);
typedef LCMapStringWDart = int Function(int, int, Pointer<Utf16>, int, Pointer<Utf16>, int);
final LCMapStringW = DynamicLibrary.open('KERNEL32.dll')
.lookupFunction<LCMapStringWNative, LCMapStringWDart>('LCMapStringW');
// Locale : DWORD -> Uint32
// dwMapFlags : DWORD -> Uint32
// lpSrcStr : LPCWSTR -> Pointer<Utf16>
// cchSrc : INT -> Int32
// lpDestStr : LPWSTR optional, out -> Pointer<Utf16>
// cchDest : INT -> Int32
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。{$mode objfpc}{$H+}
function LCMapStringW(
Locale: DWORD; // DWORD
dwMapFlags: DWORD; // DWORD
lpSrcStr: PWideChar; // LPCWSTR
cchSrc: Integer; // INT
lpDestStr: PWideChar; // LPWSTR optional, out
cchDest: Integer // INT
): Integer; stdcall;
external 'KERNEL32.dll' name 'LCMapStringW';import Foreign
import Foreign.C.Types
import Foreign.C.String
foreign import stdcall safe "LCMapStringW"
c_LCMapStringW :: Word32 -> Word32 -> CWString -> Int32 -> CWString -> Int32 -> IO Int32
-- Locale : DWORD -> Word32
-- dwMapFlags : DWORD -> Word32
-- lpSrcStr : LPCWSTR -> CWString
-- cchSrc : INT -> Int32
-- lpDestStr : LPWSTR optional, out -> CWString
-- cchDest : INT -> Int32
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。open Ctypes
open Foreign
let lcmapstringw =
foreign "LCMapStringW"
(uint32_t @-> uint32_t @-> (ptr uint16_t) @-> int32_t @-> (ptr uint16_t) @-> int32_t @-> returning int32_t)
(* Locale : DWORD -> uint32_t *)
(* dwMapFlags : DWORD -> uint32_t *)
(* lpSrcStr : LPCWSTR -> (ptr uint16_t) *)
(* cchSrc : INT -> int32_t *)
(* lpDestStr : LPWSTR optional, out -> (ptr uint16_t) *)
(* cchDest : INT -> int32_t *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)(cffi:define-foreign-library kernel32 (t "KERNEL32.dll"))
(cffi:use-foreign-library kernel32)
(cffi:defcfun ("LCMapStringW" lcmap-string-w :convention :stdcall) :int32
(locale :uint32) ; DWORD
(dw-map-flags :uint32) ; DWORD
(lp-src-str (:string :encoding :utf-16le)) ; LPCWSTR
(cch-src :int32) ; INT
(lp-dest-str :pointer) ; LPWSTR optional, out
(cch-dest :int32)) ; INT
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。use Win32::API;
my $LCMapStringW = Win32::API::More->new('KERNEL32',
'int LCMapStringW(DWORD Locale, DWORD dwMapFlags, LPCWSTR lpSrcStr, int cchSrc, LPWSTR lpDestStr, int cchDest)');
# my $ret = $LCMapStringW->Call($Locale, $dwMapFlags, $lpSrcStr, $cchSrc, $lpDestStr, $cchDest);
# Locale : DWORD -> DWORD
# dwMapFlags : DWORD -> DWORD
# lpSrcStr : LPCWSTR -> LPCWSTR
# cchSrc : INT -> int
# lpDestStr : LPWSTR optional, out -> LPWSTR
# cchDest : INT -> int
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。
# Unicode(-W): LPCWSTR/LPWSTR は Win32::API が UTF-16 変換を行う。関連項目
- f LCMapStringA (ANSI版) — ANSI文字列にロケール依存のマッピング変換を行う。
- f LCMapStringEx — ロケール名を指定して文字列を変換またはソートキー生成する。
- f CompareStringW — ロケールに従い二つのUnicode文字列を比較する。
- f FindNLSString — ロケールを考慮して文字列内から部分文字列を検索する。
- f GetNLSVersion — 指定ロケールのNLS機能のバージョン情報を取得する。