Win32 API 日本語リファレンス
ホームSystem.Diagnostics.Debug.Extensions › DEBUG_POOLTAG_DESCRIPTION

DEBUG_POOLTAG_DESCRIPTION

構造体
サイズx64: 332 バイト / x86: 332 バイト

サイズ=各フィールドのバイト数(x64/x86 で異なる場合は x64/x86 と併記)。x64/x86 列=フィールドのバイトオフセット(HSPで dupptr / lpoke / wpoke 等に使用)。

フィールド

フィールドサイズx64x86説明
SizeOfStructDWORD4+0+0この構造体のバイトサイズ。呼び出し前に設定する。
PoolTagDWORD4+4+4対象のプールタグ(4文字の識別子)。
DescriptionCHAR260+8+8プールタグの説明文字列(ASCII)。
BinaryCHAR32+268+268プールタグに関連するバイナリ/ファイル名(ASCII)。
OwnerCHAR32+300+300プールタグの所有者名(ASCII)。

各言語での定義

#include <windows.h>

// DEBUG_POOLTAG_DESCRIPTION  (x64 332 / x86 332 バイト)
typedef struct DEBUG_POOLTAG_DESCRIPTION {
    DWORD SizeOfStruct;
    DWORD PoolTag;
    CHAR Description[260];
    CHAR Binary[32];
    CHAR Owner[32];
} DEBUG_POOLTAG_DESCRIPTION;
using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct DEBUG_POOLTAG_DESCRIPTION
{
    public uint SizeOfStruct;
    public uint PoolTag;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 260)] public sbyte[] Description;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 32)] public sbyte[] Binary;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 32)] public sbyte[] Owner;
}
Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure DEBUG_POOLTAG_DESCRIPTION
    Public SizeOfStruct As UInteger
    Public PoolTag As UInteger
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=260)> Public Description() As SByte
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=32)> Public Binary() As SByte
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=32)> Public Owner() As SByte
End Structure
import ctypes
from ctypes import wintypes

class DEBUG_POOLTAG_DESCRIPTION(ctypes.Structure):
    _fields_ = [
        ("SizeOfStruct", wintypes.DWORD),
        ("PoolTag", wintypes.DWORD),
        ("Description", ctypes.c_byte * 260),
        ("Binary", ctypes.c_byte * 32),
        ("Owner", ctypes.c_byte * 32),
    ]
#[repr(C)]
pub struct DEBUG_POOLTAG_DESCRIPTION {
    pub SizeOfStruct: u32,
    pub PoolTag: u32,
    pub Description: [i8; 260],
    pub Binary: [i8; 32],
    pub Owner: [i8; 32],
}
import "golang.org/x/sys/windows"

type DEBUG_POOLTAG_DESCRIPTION struct {
	SizeOfStruct uint32
	PoolTag uint32
	Description [260]int8
	Binary [32]int8
	Owner [32]int8
}
type
  DEBUG_POOLTAG_DESCRIPTION = record
    SizeOfStruct: DWORD;
    PoolTag: DWORD;
    Description: array[0..259] of Shortint;
    Binary: array[0..31] of Shortint;
    Owner: array[0..31] of Shortint;
  end;
const DEBUG_POOLTAG_DESCRIPTION = extern struct {
    SizeOfStruct: u32,
    PoolTag: u32,
    Description: [260]i8,
    Binary: [32]i8,
    Owner: [32]i8,
};
type
  DEBUG_POOLTAG_DESCRIPTION {.bycopy.} = object
    SizeOfStruct: uint32
    PoolTag: uint32
    Description: array[260, int8]
    Binary: array[32, int8]
    Owner: array[32, int8]
struct DEBUG_POOLTAG_DESCRIPTION
{
    uint SizeOfStruct;
    uint PoolTag;
    byte[260] Description;
    byte[32] Binary;
    byte[32] Owner;
}

HSP用 定義

HSP3.7/3.8 は構造体機能が無いため4byte整数配列(dim)+peek/poke で操作(32/64bitでサイズ・位置が異なる場合はタブで分割)。IronHSP は NSTRUCT(#defstruct/stdim/->)で32/64bit共通。

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; DEBUG_POOLTAG_DESCRIPTION サイズ: 332 バイト(x64)
dim st, 83    ; 4byte整数×83(構造体サイズ 332 / 4 切り上げ)
; SizeOfStruct : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; PoolTag : DWORD (+4, 4byte)  st.1 = 値  /  値 = st.1   (lpoke/lpeek も可)
; Description : CHAR (+8, 260byte)  varptr(st)+8 を基点に操作(260byte:入れ子/配列)
; Binary : CHAR (+268, 32byte)  varptr(st)+268 を基点に操作(32byte:入れ子/配列)
; Owner : CHAR (+300, 32byte)  varptr(st)+300 を基点に操作(32byte:入れ子/配列)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。
; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
#defstruct global DEBUG_POOLTAG_DESCRIPTION
    #field int SizeOfStruct
    #field int PoolTag
    #field byte Description 260
    #field byte Binary 32
    #field byte Owner 32
#endstruct

stdim st, DEBUG_POOLTAG_DESCRIPTION        ; NSTRUCT 変数を確保
st->SizeOfStruct = 100
mes "SizeOfStruct=" + st->SizeOfStruct