Retro68/binutils/include/vms/dst.h

275 lines
6.7 KiB
C
Raw Normal View History

/* Alpha VMS external format of Debug Symbol Table.
2017-04-10 11:32:00 +00:00
Copyright (C) 2010-2017 Free Software Foundation, Inc.
Written by Tristan Gingold <gingold@adacore.com>, AdaCore.
This file is part of BFD, the Binary File Descriptor library.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
MA 02110-1301, USA. */
#ifndef _VMS_DST_H
#define _VMS_DST_H
/* Also available in vms freeware v5.0 debug/alpha_dstrecrds.sdl. */
struct vms_dst_header
{
/* Length. */
unsigned char length[2];
/* Type. */
unsigned char type[2];
};
/* Beginning of module. */
#define DST__K_MODBEG 188
/* Some well known languages. */
#define DST__K_MACRO 0
#define DST__K_BLISS 2
#define DST__K_C 7
#define DST__K_ADA 9
#define DST__K_CXX 15
struct vms_dst_modbeg
{
unsigned char flags;
unsigned char unused;
unsigned char language[4];
unsigned char major[2];
unsigned char minor[2];
/* Module name ASCIC. */
/* Ident name ASCIC. */
};
/* Routine begin. */
#define DST__K_RTNBEG 190
struct vms_dst_rtnbeg
{
unsigned char flags;
/* Address of the code. */
unsigned char address[4];
/* Procedure descriptor address. */
unsigned char pd_address[4];
/* Name: ASCIC */
};
/* Line number. */
#define DST__K_LINE_NUM 185
struct vms_dst_pcline
{
unsigned char pcline_command;
unsigned char field[4];
};
#define DST__K_DELTA_PC_W 1
#define DST__K_INCR_LINUM 2
#define DST__K_INCR_LINUM_W 3
#define DST__K_SET_LINUM_INCR 4
#define DST__K_SET_LINUM_INCR_W 5
#define DST__K_RESET_LINUM_INCR 6
#define DST__K_BEG_STMT_MODE 7
#define DST__K_END_STMT_MODE 8
#define DST__K_SET_LINUM 9
#define DST__K_SET_PC 10
#define DST__K_SET_PC_W 11
#define DST__K_SET_PC_L 12
#define DST__K_SET_STMTNUM 13
#define DST__K_TERM 14
#define DST__K_TERM_W 15
#define DST__K_SET_ABS_PC 16
#define DST__K_DELTA_PC_L 17
#define DST__K_INCR_LINUM_L 18
#define DST__K_SET_LINUM_B 19
#define DST__K_SET_LINUM_L 20
#define DST__K_TERM_L 21
/* Routine end. */
#define DST__K_RTNEND 191
struct vms_dst_rtnend
{
unsigned char unused;
unsigned char size[4];
};
/* Prologue. */
#define DST__K_PROLOG 162
struct vms_dst_prolog
{
unsigned char bkpt_addr[4];
};
/* Epilog. */
#define DST__K_EPILOG 127
struct vms_dst_epilog
{
unsigned char flags;
unsigned char count[4];
};
/* Module end. */
#define DST__K_MODEND 189
/* Block begin. */
#define DST__K_BLKBEG 176
struct vms_dst_blkbeg
{
unsigned char unused;
unsigned char address[4];
/* Name ASCIC. */
};
/* Block end. */
#define DST__K_BLKEND 177
struct vms_dst_blkend
{
unsigned char unused;
unsigned char size[4];
};
/* Source correlation. */
#define DST__K_SOURCE 155
#define DST__K_SRC_DECLFILE 1
#define DST__K_SRC_SETFILE 2
#define DST__K_SRC_SETREC_L 3
#define DST__K_SRC_SETREC_W 4
#define DST__K_SRC_SETLNUM_L 5
#define DST__K_SRC_SETLNUM_W 6
#define DST__K_SRC_INCRLNUM_B 7
#define DST__K_SRC_DEFLINES_W 10
#define DST__K_SRC_DEFLINES_B 11
#define DST__K_SRC_FORMFEED 16
struct vms_dst_src_decl_src
{
unsigned char length;
unsigned char flags;
unsigned char fileid[2];
unsigned char rms_cdt[8];
unsigned char rms_ebk[4];
unsigned char rms_ffb[2];
unsigned char rms_rfo;
/* Filename ASCIC. */
};
/* Record begin. */
#define DST__K_RECBEG 171
struct vms_dst_recbeg
{
unsigned char vflags;
unsigned char value[4];
/* Filename ASCIC. */
};
/* Record end. */
#define DST__K_RECEND 172
/* Enumeration begin. */
#define DST__K_ENUMBEG 165
/* Enumeration element. */
#define DST__K_ENUMELT 164
/* Enumeration end. */
#define DST__K_ENUMEND 166
/* Separate type specification. */
#define DST__K_SEPTYP 163
/* Type specification. */
#define DST__K_TYPSPEC 175
#define DST__K_TS_ATOM 1 /* Atomic. */
#define DST__K_TS_DSC 2 /* VMS Standard descriptor. */
#define DST__K_TS_IND 3 /* Indirect. */
#define DST__K_TS_TPTR 4 /* Typed pointer. */
#define DST__K_TS_PTR 5 /* Pointer. */
#define DST__K_TS_PIC 6 /* Pictured. */
#define DST__K_TS_ARRAY 7
#define DST__K_TS_SET 8
#define DST__K_TS_SUBRANGE 9 /* Subrange. */
#define DST__K_TS_ADA_DSC 10 /* Ada descriptor. */
#define DST__K_TS_FILE 11
#define DST__K_TS_AREA 12 /* Area (PL/I). */
#define DST__K_TS_OFFSET 13 /* Offset (PL/I). */
#define DST__K_TS_NOV_LENG 14 /* Novel Length. */
#define DST__K_TS_IND_TSPEC 15 /* Internal to debugger. */
#define DST__K_TS_SELF_REL_LABEL 16 /* Self-relative label (PL/I). */
#define DST__K_TS_RFA 17 /* (Basic). */
#define DST__K_TS_TASK 18 /* (Ada). */
#define DST__K_TS_ADA_ARRAY 19
#define DST__K_TS_XMOD_IND 20 /* Cross-module indirect type spec. */
#define DST__K_TS_CONSTRAINED 21 /* (Ada). */
#define DST__K_TS_MAYBE_CONSTR 22 /* Might-be-constrained (Ada). */
#define DST__K_TS_DYN_LOV_LENG 23
#define DST__K_TS_TPTR_D 24 /* Typed pointer to descriptor. */
#define DST__K_TS_SCAN_TREE 25
#define DST__K_TS_SCAN_TREEPTR 26
#define DST__K_TS_INCOMPLETE 27
#define DST__K_TS_BLISS_BLOCK 28
#define DST__K_TS_TPTR_64 29
#define DST__K_TS_PTR_64 30
#define DST__K_TS_REF 31 /* C++ referenced type. */
#define DST__K_TS_REF_64 32
/* Value Specification. */
#define DST__K_VFLAGS_NOVAL 128 /* No value. */
#define DST__K_VFLAGS_NOTACTIVE 248 /* Not active at current PC. */
#define DST__K_VFLAGS_UNALLOC 249 /* Not allocated. */
#define DST__K_VFLAGS_DSC 250 /* Descriptor format. */
#define DST__K_VFLAGS_TVS 251 /* Trailing value spec. */
#define DST__K_VS_FOLLOWS 253 /* Value specification follow. */
#define DST__K_VFLAGS_BITOFFS 255 /* Value is a bit offset. */
/* Vflags fields. */
#define DST__K_VALKIND_MASK 0x03
#define DST__K_INDIR 0x04
#define DST__K_DISP 0x08
#define DST__K_REGNUM_MASK 0xf0
#define DST__K_REGNUM_SHIFT 4
#define DST__K_VALKIND_LITERAL 0
#define DST__K_VALKIND_ADDR 1
#define DST__K_VALKIND_DESC 2
#define DST__K_VALKIND_REG 3
/* Label. */
#define DST__K_LABEL 187
struct vms_dst_label
{
unsigned char unused;
unsigned char value[4];
unsigned char name[1];
};
/* Discontiguous range. */
#define DST__K_DIS_RANGE 118
#endif /* _VMS_DST_H */