PDP11, PDP10, VAX: Consistent use of UNIT flag variables in RP, HK, RL, and RQ

Properly reference sim_disk provided WLK flag bit
This commit is contained in:
Mark Pizzolato 2020-05-05 12:59:21 -07:00
parent df63d4ff9f
commit fd08552852
5 changed files with 24 additions and 24 deletions

View file

@ -84,11 +84,12 @@
/* Flags in the unit flags word */ /* Flags in the unit flags word */
#define UNIT_V_WLK (DKUF_V_UF + 0) /* write locked */ #define UNIT_V_WLK DKUF_V_WLK /* write locked */
#define UNIT_V_DTYPE (DKUF_V_UF + 1) /* disk type */ #define UNIT_V_DTYPE (DKUF_V_UF + 0) /* disk type */
#define UNIT_W_DTYPE 3 /* 3b disk type */
#define UNIT_M_DTYPE 7 #define UNIT_M_DTYPE 7
#define UNIT_V_AUTO (DKUF_V_UF + 4) /* autosize */ #define UNIT_V_AUTO (UNIT_V_DTYPE + UNIT_W_DTYPE) /* autosize */
#define UNIT_V_UTS (DKUF_V_UF + 5) /* Up to speed */ #define UNIT_V_UTS (UNIT_V_AUTO + 1) /* Up to speed */
#define UNIT_UTS (1u << UNIT_V_UTS) #define UNIT_UTS (1u << UNIT_V_UTS)
#define UNIT_WLK (1 << UNIT_V_WLK) #define UNIT_WLK (1 << UNIT_V_WLK)
#define UNIT_DTYPE (UNIT_M_DTYPE << UNIT_V_DTYPE) #define UNIT_DTYPE (UNIT_M_DTYPE << UNIT_V_DTYPE)

View file

@ -98,10 +98,10 @@ static struct drvtyp drv_tab[] = {
/* Flags in the unit flags word */ /* Flags in the unit flags word */
#define UNIT_V_WLK (UNIT_V_UF + 0) /* write locked */ #define UNIT_V_WLK DKUF_V_WLK /* write locked */
#define UNIT_V_DTYPE (DKUF_V_UF + 0) /* disk type */ #define UNIT_V_DTYPE (DKUF_V_UF + 0) /* disk type */
#define UNIT_V_AUTO (DKUF_V_UF + 1) /* autosize */ #define UNIT_V_AUTO (UNIT_V_DTYPE + 1) /* autosize */
#define UNIT_V_DUMMY (DKUF_V_UF + 2) /* dummy flag */ #define UNIT_V_DUMMY (UNIT_V_AUTO + 1) /* dummy flag */
#define UNIT_WLK (1 << UNIT_V_WLK) #define UNIT_WLK (1 << UNIT_V_WLK)
#define UNIT_DTYPE (1 << UNIT_V_DTYPE) #define UNIT_DTYPE (1 << UNIT_V_DTYPE)
#define UNIT_RK06 (0 << UNIT_V_DTYPE) #define UNIT_RK06 (0 << UNIT_V_DTYPE)
@ -1557,8 +1557,6 @@ return sim_disk_detach (uptr);
t_stat hk_set_type (UNIT *uptr, int32 val, CONST char *cptr, void *desc) t_stat hk_set_type (UNIT *uptr, int32 val, CONST char *cptr, void *desc)
{ {
int32 dtype = GET_DTYPE (val);
if ((val < 0) || (cptr && *cptr)) if ((val < 0) || (cptr && *cptr))
return SCPE_ARG; return SCPE_ARG;
if (uptr->flags & UNIT_ATT) if (uptr->flags & UNIT_ATT)

View file

@ -132,12 +132,12 @@ static struct drvtyp drv_tab[] = {
/* Flags in the unit flags word */ /* Flags in the unit flags word */
#define UNIT_V_WLK (DKUF_V_UF + 0) /* hwre write lock */ #define UNIT_V_WLK DKUF_V_WLK /* hwre write lock */
#define UNIT_V_RL02 (DKUF_V_UF + 1) /* RL01 vs RL02 */ #define UNIT_V_RL02 (DKUF_V_UF + 0) /* RL01 vs RL02 */
#define UNIT_V_AUTO (DKUF_V_UF + 2) /* autosize enable */ #define UNIT_V_AUTO (UNIT_V_RL02 + 1) /* autosize enable */
#define UNIT_V_DUMMY (DKUF_V_UF + 3) /* dummy flag, for SET BADBLOCK */ #define UNIT_V_DUMMY (UNIT_V_AUTO + 1) /* dummy flag, for SET BADBLOCK */
#define UNIT_V_OFFL (DKUF_V_UF + 4) /* unit off line */ #define UNIT_V_OFFL (UNIT_V_DUMMY + 1) /* unit off line */
#define UNIT_V_BRUSH (DKUF_V_UF + 5) /* unit has brushes */ #define UNIT_V_BRUSH (UNIT_V_OFFL + 1) /* unit has brushes */
#define UNIT_BRUSH (1u << UNIT_V_BRUSH) #define UNIT_BRUSH (1u << UNIT_V_BRUSH)
#define UNIT_OFFL (1u << UNIT_V_OFFL) #define UNIT_OFFL (1u << UNIT_V_OFFL)
#define UNIT_DUMMY (1u << UNIT_V_DUMMY) #define UNIT_DUMMY (1u << UNIT_V_DUMMY)

View file

@ -85,11 +85,11 @@
/* Flags in the unit flags word */ /* Flags in the unit flags word */
#define UNIT_V_WLK (DKUF_V_UF + 0) /* write locked */ #define UNIT_V_WLK DKUF_V_WLK /* write locked */
#define UNIT_V_DTYPE (DKUF_V_UF + 1) /* disk type */ #define UNIT_V_DTYPE (DKUF_V_UF + 0) /* disk type */
#define UNIT_M_DTYPE 7 #define UNIT_M_DTYPE 7
#define UNIT_V_AUTO (DKUF_V_UF + 4) /* autosize */ #define UNIT_V_AUTO (DKUF_V_UF + 3) /* autosize */
#define UNIT_V_DUMMY (DKUF_V_UF + 5) /* dummy flag */ #define UNIT_V_DUMMY (DKUF_V_UF + 4) /* dummy flag */
#define UNIT_WLK (1 << UNIT_V_WLK) #define UNIT_WLK (1 << UNIT_V_WLK)
#define UNIT_DTYPE (UNIT_M_DTYPE << UNIT_V_DTYPE) #define UNIT_DTYPE (UNIT_M_DTYPE << UNIT_V_DTYPE)
#define UNIT_AUTO (1 << UNIT_V_AUTO) #define UNIT_AUTO (1 << UNIT_V_AUTO)

View file

@ -156,11 +156,12 @@ extern int32 MMR2;
#define RQ_M_PFN 0x1FFFFF /* map entry PFN */ #define RQ_M_PFN 0x1FFFFF /* map entry PFN */
#define UNIT_V_ONL (DKUF_V_UF + 0) /* online */ #define UNIT_V_ONL (DKUF_V_UF + 0) /* online */
#define UNIT_V_WLK (DKUF_V_UF + 1) /* hwre write lock */ #define UNIT_V_WLK DKUF_V_WLK /* hwre write lock */
#define UNIT_V_ATP (DKUF_V_UF + 2) /* attn pending */ #define UNIT_V_ATP (UNIT_V_ONL + 1) /* attn pending */
#define UNIT_V_DTYPE (DKUF_V_UF + 3) /* drive type */ #define UNIT_V_DTYPE (UNIT_V_ATP + 1) /* drive type */
#define UNIT_M_DTYPE 0x1F #define UNIT_W_DTYPE 5 /* 5b drive type encode */
#define UNIT_V_NOAUTO (DKUF_V_UF + 8) /* noautosize */ #define UNIT_M_DTYPE ((1u << UNIT_W_DTYPE) - 1)
#define UNIT_V_NOAUTO (UNIT_V_DTYPE + UNIT_W_DTYPE) /* noautosize */
#define UNIT_ONL (1 << UNIT_V_ONL) #define UNIT_ONL (1 << UNIT_V_ONL)
#define UNIT_WLK (1 << UNIT_V_WLK) #define UNIT_WLK (1 << UNIT_V_WLK)
#define UNIT_ATP (1 << UNIT_V_ATP) #define UNIT_ATP (1 << UNIT_V_ATP)