ホーム › System.Diagnostics.Debug.Extensions › TARGET_DEBUG_INFO

TARGET_DEBUG_INFO

構造体

サイズx64: 66392 バイト / x86: 66392 バイト

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

フィールド

フィールド	型	サイズ	x64	x86	説明
SizeOfStruct	DWORD	4	+0	+0	この構造体のバイトサイズ。バージョン判別に使う。
EntryDate	ULONGLONG	8	+8	+8	クラッシュ解析開始日時(FILETIME相当の64ビット値)。
DebugeeClass	DWORD	4	+16	+16	デバッグ対象の分類を示す値。
SysUpTime	ULONGLONG	8	+24	+24	システム稼働時間(ミリ秒または秒単位)。
AppUpTime	ULONGLONG	8	+32	+32	アプリケーション稼働時間。
CrashTime	ULONGLONG	8	+40	+40	クラッシュ発生時刻。
OsInfo	OS_INFO	528	+48	+48	対象OSの情報を格納するOS_INFO構造体。
Cpu	CPU_INFO	65552	+576	+576	対象CPUの情報を格納するCPU_INFO構造体。
DumpFile	CHAR	260	+66128	+66128	ダンプファイルのパスを表すNULL終端文字列。

各言語での定義

#include <windows.h>

// OS_INFO  (x64 528 / x86 528 バイト)
typedef struct OS_INFO {
    DWORD MajorVer;
    DWORD MinorVer;
    DWORD Build;
    DWORD BuildQfe;
    DWORD ProductType;
    DWORD Suite;
    DWORD Revision;
    _s_e__Struct s;
    DWORD SrvPackNumber;
    DWORD ServicePackBuild;
    DWORD Architecture;
    DWORD Lcid;
    CHAR Name[64];
    CHAR FullName[256];
    CHAR Language[30];
    CHAR BuildVersion[64];
    CHAR ServicePackString[64];
} OS_INFO;

// DEBUG_PROCESSOR_IDENTIFICATION_ALPHA  (x64 8 / x86 8 バイト)
typedef struct DEBUG_PROCESSOR_IDENTIFICATION_ALPHA {
    DWORD Type;
    DWORD Revision;
} DEBUG_PROCESSOR_IDENTIFICATION_ALPHA;

// DEBUG_PROCESSOR_IDENTIFICATION_AMD64  (x64 28 / x86 28 バイト)
typedef struct DEBUG_PROCESSOR_IDENTIFICATION_AMD64 {
    DWORD Family;
    DWORD Model;
    DWORD Stepping;
    CHAR VendorString[16];
} DEBUG_PROCESSOR_IDENTIFICATION_AMD64;

// DEBUG_PROCESSOR_IDENTIFICATION_IA64  (x64 32 / x86 32 バイト)
typedef struct DEBUG_PROCESSOR_IDENTIFICATION_IA64 {
    DWORD Model;
    DWORD Revision;
    DWORD Family;
    DWORD ArchRev;
    CHAR VendorString[16];
} DEBUG_PROCESSOR_IDENTIFICATION_IA64;

// DEBUG_PROCESSOR_IDENTIFICATION_X86  (x64 28 / x86 28 バイト)
typedef struct DEBUG_PROCESSOR_IDENTIFICATION_X86 {
    DWORD Family;
    DWORD Model;
    DWORD Stepping;
    CHAR VendorString[16];
} DEBUG_PROCESSOR_IDENTIFICATION_X86;

// DEBUG_PROCESSOR_IDENTIFICATION_ARM  (x64 24 / x86 24 バイト)
typedef struct DEBUG_PROCESSOR_IDENTIFICATION_ARM {
    DWORD Model;
    DWORD Revision;
    CHAR VendorString[16];
} DEBUG_PROCESSOR_IDENTIFICATION_ARM;

// DEBUG_PROCESSOR_IDENTIFICATION_ARM64  (x64 24 / x86 24 バイト)
typedef struct DEBUG_PROCESSOR_IDENTIFICATION_ARM64 {
    DWORD Model;
    DWORD Revision;
    CHAR VendorString[16];
} DEBUG_PROCESSOR_IDENTIFICATION_ARM64;

// DEBUG_PROCESSOR_IDENTIFICATION_ALL  (x64 32 / x86 32 バイト)
typedef struct DEBUG_PROCESSOR_IDENTIFICATION_ALL {
    DEBUG_PROCESSOR_IDENTIFICATION_ALPHA Alpha;
    DEBUG_PROCESSOR_IDENTIFICATION_AMD64 Amd64;
    DEBUG_PROCESSOR_IDENTIFICATION_IA64 Ia64;
    DEBUG_PROCESSOR_IDENTIFICATION_X86 X86;
    DEBUG_PROCESSOR_IDENTIFICATION_ARM Arm;
    DEBUG_PROCESSOR_IDENTIFICATION_ARM64 Arm64;
} DEBUG_PROCESSOR_IDENTIFICATION_ALL;

// CPU_INFO  (x64 65552 / x86 65552 バイト)
typedef struct CPU_INFO {
    DWORD Type;
    DWORD NumCPUs;
    DWORD CurrentProc;
    DEBUG_PROCESSOR_IDENTIFICATION_ALL ProcInfo[2048];
    DWORD Mhz;
} CPU_INFO;

// TARGET_DEBUG_INFO  (x64 66392 / x86 66392 バイト)
typedef struct TARGET_DEBUG_INFO {
    DWORD SizeOfStruct;
    ULONGLONG EntryDate;
    DWORD DebugeeClass;
    ULONGLONG SysUpTime;
    ULONGLONG AppUpTime;
    ULONGLONG CrashTime;
    OS_INFO OsInfo;
    CPU_INFO Cpu;
    CHAR DumpFile[260];
} TARGET_DEBUG_INFO;

using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct OS_INFO
{
    public uint MajorVer;
    public uint MinorVer;
    public uint Build;
    public uint BuildQfe;
    public uint ProductType;
    public uint Suite;
    public uint Revision;
    public _s_e__Struct s;
    public uint SrvPackNumber;
    public uint ServicePackBuild;
    public uint Architecture;
    public uint Lcid;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 64)] public sbyte[] Name;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 256)] public sbyte[] FullName;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 30)] public sbyte[] Language;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 64)] public sbyte[] BuildVersion;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 64)] public sbyte[] ServicePackString;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct DEBUG_PROCESSOR_IDENTIFICATION_ALPHA
{
    public uint Type;
    public uint Revision;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct DEBUG_PROCESSOR_IDENTIFICATION_AMD64
{
    public uint Family;
    public uint Model;
    public uint Stepping;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 16)] public sbyte[] VendorString;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct DEBUG_PROCESSOR_IDENTIFICATION_IA64
{
    public uint Model;
    public uint Revision;
    public uint Family;
    public uint ArchRev;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 16)] public sbyte[] VendorString;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct DEBUG_PROCESSOR_IDENTIFICATION_X86
{
    public uint Family;
    public uint Model;
    public uint Stepping;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 16)] public sbyte[] VendorString;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct DEBUG_PROCESSOR_IDENTIFICATION_ARM
{
    public uint Model;
    public uint Revision;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 16)] public sbyte[] VendorString;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct DEBUG_PROCESSOR_IDENTIFICATION_ARM64
{
    public uint Model;
    public uint Revision;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 16)] public sbyte[] VendorString;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct DEBUG_PROCESSOR_IDENTIFICATION_ALL
{
    public DEBUG_PROCESSOR_IDENTIFICATION_ALPHA Alpha;
    public DEBUG_PROCESSOR_IDENTIFICATION_AMD64 Amd64;
    public DEBUG_PROCESSOR_IDENTIFICATION_IA64 Ia64;
    public DEBUG_PROCESSOR_IDENTIFICATION_X86 X86;
    public DEBUG_PROCESSOR_IDENTIFICATION_ARM Arm;
    public DEBUG_PROCESSOR_IDENTIFICATION_ARM64 Arm64;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct CPU_INFO
{
    public uint Type;
    public uint NumCPUs;
    public uint CurrentProc;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 2048)] public DEBUG_PROCESSOR_IDENTIFICATION_ALL[] ProcInfo;
    public uint Mhz;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct TARGET_DEBUG_INFO
{
    public uint SizeOfStruct;
    public ulong EntryDate;
    public uint DebugeeClass;
    public ulong SysUpTime;
    public ulong AppUpTime;
    public ulong CrashTime;
    public OS_INFO OsInfo;
    public CPU_INFO Cpu;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 260)] public sbyte[] DumpFile;
}

Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure OS_INFO
    Public MajorVer As UInteger
    Public MinorVer As UInteger
    Public Build As UInteger
    Public BuildQfe As UInteger
    Public ProductType As UInteger
    Public Suite As UInteger
    Public Revision As UInteger
    Public s As _s_e__Struct
    Public SrvPackNumber As UInteger
    Public ServicePackBuild As UInteger
    Public Architecture As UInteger
    Public Lcid As UInteger
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=64)> Public Name() As SByte
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=256)> Public FullName() As SByte
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=30)> Public Language() As SByte
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=64)> Public BuildVersion() As SByte
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=64)> Public ServicePackString() As SByte
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure DEBUG_PROCESSOR_IDENTIFICATION_ALPHA
    Public Type As UInteger
    Public Revision As UInteger
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure DEBUG_PROCESSOR_IDENTIFICATION_AMD64
    Public Family As UInteger
    Public Model As UInteger
    Public Stepping As UInteger
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=16)> Public VendorString() As SByte
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure DEBUG_PROCESSOR_IDENTIFICATION_IA64
    Public Model As UInteger
    Public Revision As UInteger
    Public Family As UInteger
    Public ArchRev As UInteger
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=16)> Public VendorString() As SByte
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure DEBUG_PROCESSOR_IDENTIFICATION_X86
    Public Family As UInteger
    Public Model As UInteger
    Public Stepping As UInteger
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=16)> Public VendorString() As SByte
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure DEBUG_PROCESSOR_IDENTIFICATION_ARM
    Public Model As UInteger
    Public Revision As UInteger
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=16)> Public VendorString() As SByte
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure DEBUG_PROCESSOR_IDENTIFICATION_ARM64
    Public Model As UInteger
    Public Revision As UInteger
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=16)> Public VendorString() As SByte
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure DEBUG_PROCESSOR_IDENTIFICATION_ALL
    Public Alpha As DEBUG_PROCESSOR_IDENTIFICATION_ALPHA
    Public Amd64 As DEBUG_PROCESSOR_IDENTIFICATION_AMD64
    Public Ia64 As DEBUG_PROCESSOR_IDENTIFICATION_IA64
    Public X86 As DEBUG_PROCESSOR_IDENTIFICATION_X86
    Public Arm As DEBUG_PROCESSOR_IDENTIFICATION_ARM
    Public Arm64 As DEBUG_PROCESSOR_IDENTIFICATION_ARM64
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure CPU_INFO
    Public Type As UInteger
    Public NumCPUs As UInteger
    Public CurrentProc As UInteger
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=2048)> Public ProcInfo() As DEBUG_PROCESSOR_IDENTIFICATION_ALL
    Public Mhz As UInteger
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure TARGET_DEBUG_INFO
    Public SizeOfStruct As UInteger
    Public EntryDate As ULong
    Public DebugeeClass As UInteger
    Public SysUpTime As ULong
    Public AppUpTime As ULong
    Public CrashTime As ULong
    Public OsInfo As OS_INFO
    Public Cpu As CPU_INFO
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=260)> Public DumpFile() As SByte
End Structure

import ctypes
from ctypes import wintypes

class OS_INFO(ctypes.Structure):
    _fields_ = [
        ("MajorVer", wintypes.DWORD),
        ("MinorVer", wintypes.DWORD),
        ("Build", wintypes.DWORD),
        ("BuildQfe", wintypes.DWORD),
        ("ProductType", wintypes.DWORD),
        ("Suite", wintypes.DWORD),
        ("Revision", wintypes.DWORD),
        ("s", _s_e__Struct),
        ("SrvPackNumber", wintypes.DWORD),
        ("ServicePackBuild", wintypes.DWORD),
        ("Architecture", wintypes.DWORD),
        ("Lcid", wintypes.DWORD),
        ("Name", ctypes.c_byte * 64),
        ("FullName", ctypes.c_byte * 256),
        ("Language", ctypes.c_byte * 30),
        ("BuildVersion", ctypes.c_byte * 64),
        ("ServicePackString", ctypes.c_byte * 64),
    ]

class DEBUG_PROCESSOR_IDENTIFICATION_ALPHA(ctypes.Structure):
    _fields_ = [
        ("Type", wintypes.DWORD),
        ("Revision", wintypes.DWORD),
    ]

class DEBUG_PROCESSOR_IDENTIFICATION_AMD64(ctypes.Structure):
    _fields_ = [
        ("Family", wintypes.DWORD),
        ("Model", wintypes.DWORD),
        ("Stepping", wintypes.DWORD),
        ("VendorString", ctypes.c_byte * 16),
    ]

class DEBUG_PROCESSOR_IDENTIFICATION_IA64(ctypes.Structure):
    _fields_ = [
        ("Model", wintypes.DWORD),
        ("Revision", wintypes.DWORD),
        ("Family", wintypes.DWORD),
        ("ArchRev", wintypes.DWORD),
        ("VendorString", ctypes.c_byte * 16),
    ]

class DEBUG_PROCESSOR_IDENTIFICATION_X86(ctypes.Structure):
    _fields_ = [
        ("Family", wintypes.DWORD),
        ("Model", wintypes.DWORD),
        ("Stepping", wintypes.DWORD),
        ("VendorString", ctypes.c_byte * 16),
    ]

class DEBUG_PROCESSOR_IDENTIFICATION_ARM(ctypes.Structure):
    _fields_ = [
        ("Model", wintypes.DWORD),
        ("Revision", wintypes.DWORD),
        ("VendorString", ctypes.c_byte * 16),
    ]

class DEBUG_PROCESSOR_IDENTIFICATION_ARM64(ctypes.Structure):
    _fields_ = [
        ("Model", wintypes.DWORD),
        ("Revision", wintypes.DWORD),
        ("VendorString", ctypes.c_byte * 16),
    ]

class DEBUG_PROCESSOR_IDENTIFICATION_ALL(ctypes.Structure):
    _fields_ = [
        ("Alpha", DEBUG_PROCESSOR_IDENTIFICATION_ALPHA),
        ("Amd64", DEBUG_PROCESSOR_IDENTIFICATION_AMD64),
        ("Ia64", DEBUG_PROCESSOR_IDENTIFICATION_IA64),
        ("X86", DEBUG_PROCESSOR_IDENTIFICATION_X86),
        ("Arm", DEBUG_PROCESSOR_IDENTIFICATION_ARM),
        ("Arm64", DEBUG_PROCESSOR_IDENTIFICATION_ARM64),
    ]

class CPU_INFO(ctypes.Structure):
    _fields_ = [
        ("Type", wintypes.DWORD),
        ("NumCPUs", wintypes.DWORD),
        ("CurrentProc", wintypes.DWORD),
        ("ProcInfo", DEBUG_PROCESSOR_IDENTIFICATION_ALL * 2048),
        ("Mhz", wintypes.DWORD),
    ]

class TARGET_DEBUG_INFO(ctypes.Structure):
    _fields_ = [
        ("SizeOfStruct", wintypes.DWORD),
        ("EntryDate", ctypes.c_ulonglong),
        ("DebugeeClass", wintypes.DWORD),
        ("SysUpTime", ctypes.c_ulonglong),
        ("AppUpTime", ctypes.c_ulonglong),
        ("CrashTime", ctypes.c_ulonglong),
        ("OsInfo", OS_INFO),
        ("Cpu", CPU_INFO),
        ("DumpFile", ctypes.c_byte * 260),
    ]

#[repr(C)]
pub struct OS_INFO {
    pub MajorVer: u32,
    pub MinorVer: u32,
    pub Build: u32,
    pub BuildQfe: u32,
    pub ProductType: u32,
    pub Suite: u32,
    pub Revision: u32,
    pub s: _s_e__Struct,
    pub SrvPackNumber: u32,
    pub ServicePackBuild: u32,
    pub Architecture: u32,
    pub Lcid: u32,
    pub Name: [i8; 64],
    pub FullName: [i8; 256],
    pub Language: [i8; 30],
    pub BuildVersion: [i8; 64],
    pub ServicePackString: [i8; 64],
}

#[repr(C)]
pub struct DEBUG_PROCESSOR_IDENTIFICATION_ALPHA {
    pub Type: u32,
    pub Revision: u32,
}

#[repr(C)]
pub struct DEBUG_PROCESSOR_IDENTIFICATION_AMD64 {
    pub Family: u32,
    pub Model: u32,
    pub Stepping: u32,
    pub VendorString: [i8; 16],
}

#[repr(C)]
pub struct DEBUG_PROCESSOR_IDENTIFICATION_IA64 {
    pub Model: u32,
    pub Revision: u32,
    pub Family: u32,
    pub ArchRev: u32,
    pub VendorString: [i8; 16],
}

#[repr(C)]
pub struct DEBUG_PROCESSOR_IDENTIFICATION_X86 {
    pub Family: u32,
    pub Model: u32,
    pub Stepping: u32,
    pub VendorString: [i8; 16],
}

#[repr(C)]
pub struct DEBUG_PROCESSOR_IDENTIFICATION_ARM {
    pub Model: u32,
    pub Revision: u32,
    pub VendorString: [i8; 16],
}

#[repr(C)]
pub struct DEBUG_PROCESSOR_IDENTIFICATION_ARM64 {
    pub Model: u32,
    pub Revision: u32,
    pub VendorString: [i8; 16],
}

#[repr(C)]
pub struct DEBUG_PROCESSOR_IDENTIFICATION_ALL {
    pub Alpha: DEBUG_PROCESSOR_IDENTIFICATION_ALPHA,
    pub Amd64: DEBUG_PROCESSOR_IDENTIFICATION_AMD64,
    pub Ia64: DEBUG_PROCESSOR_IDENTIFICATION_IA64,
    pub X86: DEBUG_PROCESSOR_IDENTIFICATION_X86,
    pub Arm: DEBUG_PROCESSOR_IDENTIFICATION_ARM,
    pub Arm64: DEBUG_PROCESSOR_IDENTIFICATION_ARM64,
}

#[repr(C)]
pub struct CPU_INFO {
    pub Type: u32,
    pub NumCPUs: u32,
    pub CurrentProc: u32,
    pub ProcInfo: [DEBUG_PROCESSOR_IDENTIFICATION_ALL; 2048],
    pub Mhz: u32,
}

#[repr(C)]
pub struct TARGET_DEBUG_INFO {
    pub SizeOfStruct: u32,
    pub EntryDate: u64,
    pub DebugeeClass: u32,
    pub SysUpTime: u64,
    pub AppUpTime: u64,
    pub CrashTime: u64,
    pub OsInfo: OS_INFO,
    pub Cpu: CPU_INFO,
    pub DumpFile: [i8; 260],
}

import "golang.org/x/sys/windows"

type OS_INFO struct {
	MajorVer uint32
	MinorVer uint32
	Build uint32
	BuildQfe uint32
	ProductType uint32
	Suite uint32
	Revision uint32
	s _s_e__Struct
	SrvPackNumber uint32
	ServicePackBuild uint32
	Architecture uint32
	Lcid uint32
	Name [64]int8
	FullName [256]int8
	Language [30]int8
	BuildVersion [64]int8
	ServicePackString [64]int8
}

type DEBUG_PROCESSOR_IDENTIFICATION_ALPHA struct {
	Type uint32
	Revision uint32
}

type DEBUG_PROCESSOR_IDENTIFICATION_AMD64 struct {
	Family uint32
	Model uint32
	Stepping uint32
	VendorString [16]int8
}

type DEBUG_PROCESSOR_IDENTIFICATION_IA64 struct {
	Model uint32
	Revision uint32
	Family uint32
	ArchRev uint32
	VendorString [16]int8
}

type DEBUG_PROCESSOR_IDENTIFICATION_X86 struct {
	Family uint32
	Model uint32
	Stepping uint32
	VendorString [16]int8
}

type DEBUG_PROCESSOR_IDENTIFICATION_ARM struct {
	Model uint32
	Revision uint32
	VendorString [16]int8
}

type DEBUG_PROCESSOR_IDENTIFICATION_ARM64 struct {
	Model uint32
	Revision uint32
	VendorString [16]int8
}

type DEBUG_PROCESSOR_IDENTIFICATION_ALL struct {
	Alpha DEBUG_PROCESSOR_IDENTIFICATION_ALPHA
	Amd64 DEBUG_PROCESSOR_IDENTIFICATION_AMD64
	Ia64 DEBUG_PROCESSOR_IDENTIFICATION_IA64
	X86 DEBUG_PROCESSOR_IDENTIFICATION_X86
	Arm DEBUG_PROCESSOR_IDENTIFICATION_ARM
	Arm64 DEBUG_PROCESSOR_IDENTIFICATION_ARM64
}

type CPU_INFO struct {
	Type uint32
	NumCPUs uint32
	CurrentProc uint32
	ProcInfo [2048]DEBUG_PROCESSOR_IDENTIFICATION_ALL
	Mhz uint32
}

type TARGET_DEBUG_INFO struct {
	SizeOfStruct uint32
	EntryDate uint64
	DebugeeClass uint32
	SysUpTime uint64
	AppUpTime uint64
	CrashTime uint64
	OsInfo OS_INFO
	Cpu CPU_INFO
	DumpFile [260]int8
}

type
  OS_INFO = record
    MajorVer: DWORD;
    MinorVer: DWORD;
    Build: DWORD;
    BuildQfe: DWORD;
    ProductType: DWORD;
    Suite: DWORD;
    Revision: DWORD;
    s: _s_e__Struct;
    SrvPackNumber: DWORD;
    ServicePackBuild: DWORD;
    Architecture: DWORD;
    Lcid: DWORD;
    Name: array[0..63] of Shortint;
    FullName: array[0..255] of Shortint;
    Language: array[0..29] of Shortint;
    BuildVersion: array[0..63] of Shortint;
    ServicePackString: array[0..63] of Shortint;
  end;

  DEBUG_PROCESSOR_IDENTIFICATION_ALPHA = record
    Type: DWORD;
    Revision: DWORD;
  end;

  DEBUG_PROCESSOR_IDENTIFICATION_AMD64 = record
    Family: DWORD;
    Model: DWORD;
    Stepping: DWORD;
    VendorString: array[0..15] of Shortint;
  end;

  DEBUG_PROCESSOR_IDENTIFICATION_IA64 = record
    Model: DWORD;
    Revision: DWORD;
    Family: DWORD;
    ArchRev: DWORD;
    VendorString: array[0..15] of Shortint;
  end;

  DEBUG_PROCESSOR_IDENTIFICATION_X86 = record
    Family: DWORD;
    Model: DWORD;
    Stepping: DWORD;
    VendorString: array[0..15] of Shortint;
  end;

  DEBUG_PROCESSOR_IDENTIFICATION_ARM = record
    Model: DWORD;
    Revision: DWORD;
    VendorString: array[0..15] of Shortint;
  end;

  DEBUG_PROCESSOR_IDENTIFICATION_ARM64 = record
    Model: DWORD;
    Revision: DWORD;
    VendorString: array[0..15] of Shortint;
  end;

  DEBUG_PROCESSOR_IDENTIFICATION_ALL = record
    Alpha: DEBUG_PROCESSOR_IDENTIFICATION_ALPHA;
    Amd64: DEBUG_PROCESSOR_IDENTIFICATION_AMD64;
    Ia64: DEBUG_PROCESSOR_IDENTIFICATION_IA64;
    X86: DEBUG_PROCESSOR_IDENTIFICATION_X86;
    Arm: DEBUG_PROCESSOR_IDENTIFICATION_ARM;
    Arm64: DEBUG_PROCESSOR_IDENTIFICATION_ARM64;
  end;

  CPU_INFO = record
    Type: DWORD;
    NumCPUs: DWORD;
    CurrentProc: DWORD;
    ProcInfo: array[0..2047] of DEBUG_PROCESSOR_IDENTIFICATION_ALL;
    Mhz: DWORD;
  end;

  TARGET_DEBUG_INFO = record
    SizeOfStruct: DWORD;
    EntryDate: UInt64;
    DebugeeClass: DWORD;
    SysUpTime: UInt64;
    AppUpTime: UInt64;
    CrashTime: UInt64;
    OsInfo: OS_INFO;
    Cpu: CPU_INFO;
    DumpFile: array[0..259] of Shortint;
  end;

const OS_INFO = extern struct {
    MajorVer: u32,
    MinorVer: u32,
    Build: u32,
    BuildQfe: u32,
    ProductType: u32,
    Suite: u32,
    Revision: u32,
    s: _s_e__Struct,
    SrvPackNumber: u32,
    ServicePackBuild: u32,
    Architecture: u32,
    Lcid: u32,
    Name: [64]i8,
    FullName: [256]i8,
    Language: [30]i8,
    BuildVersion: [64]i8,
    ServicePackString: [64]i8,
};

const DEBUG_PROCESSOR_IDENTIFICATION_ALPHA = extern struct {
    Type: u32,
    Revision: u32,
};

const DEBUG_PROCESSOR_IDENTIFICATION_AMD64 = extern struct {
    Family: u32,
    Model: u32,
    Stepping: u32,
    VendorString: [16]i8,
};

const DEBUG_PROCESSOR_IDENTIFICATION_IA64 = extern struct {
    Model: u32,
    Revision: u32,
    Family: u32,
    ArchRev: u32,
    VendorString: [16]i8,
};

const DEBUG_PROCESSOR_IDENTIFICATION_X86 = extern struct {
    Family: u32,
    Model: u32,
    Stepping: u32,
    VendorString: [16]i8,
};

const DEBUG_PROCESSOR_IDENTIFICATION_ARM = extern struct {
    Model: u32,
    Revision: u32,
    VendorString: [16]i8,
};

const DEBUG_PROCESSOR_IDENTIFICATION_ARM64 = extern struct {
    Model: u32,
    Revision: u32,
    VendorString: [16]i8,
};

const DEBUG_PROCESSOR_IDENTIFICATION_ALL = extern struct {
    Alpha: DEBUG_PROCESSOR_IDENTIFICATION_ALPHA,
    Amd64: DEBUG_PROCESSOR_IDENTIFICATION_AMD64,
    Ia64: DEBUG_PROCESSOR_IDENTIFICATION_IA64,
    X86: DEBUG_PROCESSOR_IDENTIFICATION_X86,
    Arm: DEBUG_PROCESSOR_IDENTIFICATION_ARM,
    Arm64: DEBUG_PROCESSOR_IDENTIFICATION_ARM64,
};

const CPU_INFO = extern struct {
    Type: u32,
    NumCPUs: u32,
    CurrentProc: u32,
    ProcInfo: [2048]DEBUG_PROCESSOR_IDENTIFICATION_ALL,
    Mhz: u32,
};

const TARGET_DEBUG_INFO = extern struct {
    SizeOfStruct: u32,
    EntryDate: u64,
    DebugeeClass: u32,
    SysUpTime: u64,
    AppUpTime: u64,
    CrashTime: u64,
    OsInfo: OS_INFO,
    Cpu: CPU_INFO,
    DumpFile: [260]i8,
};

type
  OS_INFO {.bycopy.} = object
    MajorVer: uint32
    MinorVer: uint32
    Build: uint32
    BuildQfe: uint32
    ProductType: uint32
    Suite: uint32
    Revision: uint32
    s: _s_e__Struct
    SrvPackNumber: uint32
    ServicePackBuild: uint32
    Architecture: uint32
    Lcid: uint32
    Name: array[64, int8]
    FullName: array[256, int8]
    Language: array[30, int8]
    BuildVersion: array[64, int8]
    ServicePackString: array[64, int8]

  DEBUG_PROCESSOR_IDENTIFICATION_ALPHA {.bycopy.} = object
    Type: uint32
    Revision: uint32

  DEBUG_PROCESSOR_IDENTIFICATION_AMD64 {.bycopy.} = object
    Family: uint32
    Model: uint32
    Stepping: uint32
    VendorString: array[16, int8]

  DEBUG_PROCESSOR_IDENTIFICATION_IA64 {.bycopy.} = object
    Model: uint32
    Revision: uint32
    Family: uint32
    ArchRev: uint32
    VendorString: array[16, int8]

  DEBUG_PROCESSOR_IDENTIFICATION_X86 {.bycopy.} = object
    Family: uint32
    Model: uint32
    Stepping: uint32
    VendorString: array[16, int8]

  DEBUG_PROCESSOR_IDENTIFICATION_ARM {.bycopy.} = object
    Model: uint32
    Revision: uint32
    VendorString: array[16, int8]

  DEBUG_PROCESSOR_IDENTIFICATION_ARM64 {.bycopy.} = object
    Model: uint32
    Revision: uint32
    VendorString: array[16, int8]

  DEBUG_PROCESSOR_IDENTIFICATION_ALL {.bycopy.} = object
    Alpha: DEBUG_PROCESSOR_IDENTIFICATION_ALPHA
    Amd64: DEBUG_PROCESSOR_IDENTIFICATION_AMD64
    Ia64: DEBUG_PROCESSOR_IDENTIFICATION_IA64
    X86: DEBUG_PROCESSOR_IDENTIFICATION_X86
    Arm: DEBUG_PROCESSOR_IDENTIFICATION_ARM
    Arm64: DEBUG_PROCESSOR_IDENTIFICATION_ARM64

  CPU_INFO {.bycopy.} = object
    Type: uint32
    NumCPUs: uint32
    CurrentProc: uint32
    ProcInfo: array[2048, DEBUG_PROCESSOR_IDENTIFICATION_ALL]
    Mhz: uint32

  TARGET_DEBUG_INFO {.bycopy.} = object
    SizeOfStruct: uint32
    EntryDate: uint64
    DebugeeClass: uint32
    SysUpTime: uint64
    AppUpTime: uint64
    CrashTime: uint64
    OsInfo: OS_INFO
    Cpu: CPU_INFO
    DumpFile: array[260, int8]

struct OS_INFO
{
    uint MajorVer;
    uint MinorVer;
    uint Build;
    uint BuildQfe;
    uint ProductType;
    uint Suite;
    uint Revision;
    _s_e__Struct s;
    uint SrvPackNumber;
    uint ServicePackBuild;
    uint Architecture;
    uint Lcid;
    byte[64] Name;
    byte[256] FullName;
    byte[30] Language;
    byte[64] BuildVersion;
    byte[64] ServicePackString;
}

struct DEBUG_PROCESSOR_IDENTIFICATION_ALPHA
{
    uint Type;
    uint Revision;
}

struct DEBUG_PROCESSOR_IDENTIFICATION_AMD64
{
    uint Family;
    uint Model;
    uint Stepping;
    byte[16] VendorString;
}

struct DEBUG_PROCESSOR_IDENTIFICATION_IA64
{
    uint Model;
    uint Revision;
    uint Family;
    uint ArchRev;
    byte[16] VendorString;
}

struct DEBUG_PROCESSOR_IDENTIFICATION_X86
{
    uint Family;
    uint Model;
    uint Stepping;
    byte[16] VendorString;
}

struct DEBUG_PROCESSOR_IDENTIFICATION_ARM
{
    uint Model;
    uint Revision;
    byte[16] VendorString;
}

struct DEBUG_PROCESSOR_IDENTIFICATION_ARM64
{
    uint Model;
    uint Revision;
    byte[16] VendorString;
}

struct DEBUG_PROCESSOR_IDENTIFICATION_ALL
{
    DEBUG_PROCESSOR_IDENTIFICATION_ALPHA Alpha;
    DEBUG_PROCESSOR_IDENTIFICATION_AMD64 Amd64;
    DEBUG_PROCESSOR_IDENTIFICATION_IA64 Ia64;
    DEBUG_PROCESSOR_IDENTIFICATION_X86 X86;
    DEBUG_PROCESSOR_IDENTIFICATION_ARM Arm;
    DEBUG_PROCESSOR_IDENTIFICATION_ARM64 Arm64;
}

struct CPU_INFO
{
    uint Type;
    uint NumCPUs;
    uint CurrentProc;
    DEBUG_PROCESSOR_IDENTIFICATION_ALL[2048] ProcInfo;
    uint Mhz;
}

struct TARGET_DEBUG_INFO
{
    uint SizeOfStruct;
    ulong EntryDate;
    uint DebugeeClass;
    ulong SysUpTime;
    ulong AppUpTime;
    ulong CrashTime;
    OS_INFO OsInfo;
    CPU_INFO Cpu;
    byte[260] DumpFile;
}

HSP用定義

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

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; TARGET_DEBUG_INFO サイズ: 66392 バイト(x64)
dim st, 16598    ; 4byte整数×16598(構造体サイズ 66392 / 4 切り上げ)
; SizeOfStruct : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; EntryDate : ULONGLONG (+8, 8byte)  qpoke st,8,値 / qpeek(st,8)  ※IronHSPのみ。3.7/3.8は lpoke st,8,下位 : lpoke st,12,上位
; DebugeeClass : DWORD (+16, 4byte)  st.4 = 値  /  値 = st.4   (lpoke/lpeek も可)
; SysUpTime : ULONGLONG (+24, 8byte)  qpoke st,24,値 / qpeek(st,24)  ※IronHSPのみ。3.7/3.8は lpoke st,24,下位 : lpoke st,28,上位
; AppUpTime : ULONGLONG (+32, 8byte)  qpoke st,32,値 / qpeek(st,32)  ※IronHSPのみ。3.7/3.8は lpoke st,32,下位 : lpoke st,36,上位
; CrashTime : ULONGLONG (+40, 8byte)  qpoke st,40,値 / qpeek(st,40)  ※IronHSPのみ。3.7/3.8は lpoke st,40,下位 : lpoke st,44,上位
; OsInfo : OS_INFO (+48, 528byte)  varptr(st)+48 を基点に操作(528byte:入れ子/配列)
; Cpu : CPU_INFO (+576, 65552byte)  varptr(st)+576 を基点に操作(65552byte:入れ子/配列)
; DumpFile : CHAR (+66128, 260byte)  varptr(st)+66128 を基点に操作(260byte:入れ子/配列)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。

; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
; ※GUID・入れ子構造体はデフォルト型でないため、依存する #defstruct を先に定義(下記に同梱)。
#defstruct global OS_INFO
    #field int MajorVer
    #field int MinorVer
    #field int Build
    #field int BuildQfe
    #field int ProductType
    #field int Suite
    #field int Revision
    #field _s_e__Struct s
    #field int SrvPackNumber
    #field int ServicePackBuild
    #field int Architecture
    #field int Lcid
    #field byte Name 64
    #field byte FullName 256
    #field byte Language 30
    #field byte BuildVersion 64
    #field byte ServicePackString 64
#endstruct

#defstruct global CPU_INFO
    #field int Type
    #field int NumCPUs
    #field int CurrentProc
    #field byte ProcInfo 65536
    #field int Mhz
#endstruct

#defstruct global TARGET_DEBUG_INFO
    #field int SizeOfStruct
    #field int64 EntryDate
    #field int DebugeeClass
    #field int64 SysUpTime
    #field int64 AppUpTime
    #field int64 CrashTime
    #field OS_INFO OsInfo
    #field CPU_INFO Cpu
    #field byte DumpFile 260
#endstruct

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

TARGET_DEBUG_INFO

フィールド

各言語での定義

HSP用 定義

HSP用定義