github.com/open-simh.simh
1
0
Fork 0
mirror of https://github.com/open-simh/simh.git synced 2026-04-25 20:01:33 +00:00
Code Issues Projects Releases Wiki Activity

Notes For V3.8

Browse Source 
The makefile now works for Linux and most Unix's. Howevr, for Solaris
and MacOS, you must first export the OSTYPE environment variable:

> export OSTYPE
> make

Otherwise, you will get build errors.

1. New Features

1.1 3.8-0

1.1.1 SCP and Libraries

- BREAK, NOBREAK, and SHOW BREAK with no argument will set, clear, and
  show (respectively) a breakpoint at the current PC.

1.2 GRI

- Added support for the GRI-99 processor.

1.3 HP2100

- Added support for the BACI terminal interface.
- Added support for RTE OS/VMA/EMA, SIGNAL, VIS firmware extensions.

1.4 Nova

- Added support for 64KW memory (implemented in third-party CPU's).

1.5 PDP-11

- Added support for DC11, RC11, KE11A, KG11A.
- Added modem control support for DL11.
- Added ASCII character support for all 8b devices.

2. Bugs Fixed

Please see the revision history on http://simh.trailing-edge.com or
in the source module sim_rev.h.
This commit is contained in:
Bob Supnik
2008-06-24 14:21:00 -07:00
committed by Mark Pizzolato
parent 3cb7c60d5d
commit 59aa4a73b1
136 changed files with 57039 additions and 10915 deletions
Download Patch File Download Diff File Expand all files Collapse all files

84
NOVA/nova_plt.c
View File

@@ -1,6 +1,6 @@
/* nova_plt.c: NOVA plotter simulator
Copyright (c) 2000-2005, Robert M. Supnik
Copyright (c) 2000-2008, Robert M. Supnik
Written by Bruce Ray and used with his gracious permission.
Permission is hereby granted, free of charge, to any person obtaining a
@@ -26,11 +26,20 @@
plt plotter
04-Jul-07 BKR added 7B/8B support (default is 8B),
DEV_SET/CLR macros now used
25-Apr-03 RMS Revised for extended file support
03-Oct-02 RMS Added DIB
30-May-02 RMS Widened POS to 32b
06-Jan-02 RMS Revised enable/disable support
26-Apr-01 RMS Added device enable/disable support
Notes:
- data masked to 7- or 8- bits, based on 7B or 8B, default is 8-bits
- if register TIME is non-zero, then delay TIME events if <FF>, <CR> or <LF> seen
- register POS show the current file position
- register STOP_IOE determines return value issued if output to unattached PLT is attempted
*/
#include "nova_defs.h"
@@ -44,6 +53,12 @@ int32 plt (int32 pulse, int32 code, int32 AC);
t_stat plt_svc (UNIT *uptr);
t_stat plt_reset (DEVICE *dptr);
/* 7 or 8 bit data mask support for either device */
#define UNIT_V_8B (UNIT_V_UF + 0) /* 8b output */
#define UNIT_8B (1 << UNIT_V_8B)
/* PLT data structures
plt_dev PLT device descriptor
@@ -53,8 +68,8 @@ t_stat plt_reset (DEVICE *dptr);
DIB plt_dib = { DEV_PLT, INT_PLT, PI_PLT, &plt };
UNIT plt_unit = {
UDATA (&plt_svc, UNIT_SEQ+UNIT_ATTABLE, 0), SERIAL_OUT_WAIT
UNIT plt_unit = { /* 2007-May-30, bkr */
UDATA (&plt_svc, UNIT_SEQ+UNIT_ATTABLE+UNIT_8B, 0), SERIAL_OUT_WAIT
};
REG plt_reg[] = {
@@ -69,46 +84,58 @@ REG plt_reg[] = {
{ NULL }
};
MTAB plt_mod[] = /* 2007-May-30, bkr */
{
{ UNIT_8B, 0, "7b", "7B", NULL },
{ UNIT_8B, UNIT_8B, "8b", "8B", NULL },
{ 0, 0, NULL, NULL, NULL }
} ;
DEVICE plt_dev = {
"PLT", &plt_unit, plt_reg, NULL,
"PLT", &plt_unit, plt_reg, plt_mod,
1, 10, 31, 1, 8, 8,
NULL, NULL, &plt_reset,
NULL, NULL, NULL,
&plt_dib, DEV_DISABLE
};
/* plotter: IOT routine */
int32 plt (int32 pulse, int32 code, int32 AC)
{
if (code == ioDOA) plt_unit.buf = AC & 0377;
switch (pulse) { /* decode IR<8:9> */
if (code == ioDOA)
plt_unit.buf = AC & ((plt_unit.flags & UNIT_8B)?
0377
: 0177);
switch (pulse)
{ /* decode IR<8:9> */
case iopS: /* start */
DEV_SET_BUSY( INT_PLT ) ;
DEV_CLR_DONE( INT_PLT ) ;
DEV_UPDATE_INTR ;
sim_activate (&plt_unit, plt_unit.wait); /* activate unit */
break;
case iopS: /* start */
dev_busy = dev_busy | INT_PLT; /* set busy */
dev_done = dev_done & ~INT_PLT; /* clear done, int */
int_req = int_req & ~INT_PLT;
sim_activate (&plt_unit, plt_unit.wait); /* activate unit */
break;
case iopC: /* clear */
dev_busy = dev_busy & ~INT_PLT; /* clear busy */
dev_done = dev_done & ~INT_PLT; /* clear done, int */
int_req = int_req & ~INT_PLT;
sim_cancel (&plt_unit); /* deactivate unit */
break;
} /* end switch */
case iopC: /* clear */
DEV_CLR_BUSY( INT_PLT ) ;
DEV_CLR_DONE( INT_PLT ) ;
DEV_UPDATE_INTR ;
sim_cancel (&plt_unit); /* deactivate unit */
break;
} /* end switch */
return 0;
}
/* Unit service */
t_stat plt_svc (UNIT *uptr)
{
dev_busy = dev_busy & ~INT_PLT; /* clear busy */
dev_done = dev_done | INT_PLT; /* set done */
int_req = (int_req & ~INT_DEV) | (dev_done & ~dev_disable);
DEV_CLR_BUSY( INT_PLT ) ;
DEV_SET_DONE( INT_PLT ) ;
DEV_UPDATE_INTR ;
if ((plt_unit.flags & UNIT_ATT) == 0) /* attached? */
return IORETURN (plt_stopioe, SCPE_UNATT);
if (putc (plt_unit.buf, plt_unit.fileref) == EOF) {
@@ -116,18 +143,19 @@ if (putc (plt_unit.buf, plt_unit.fileref) == EOF) {
clearerr (plt_unit.fileref);
return SCPE_IOERR;
}
plt_unit.pos = plt_unit.pos + 1;
++(plt_unit.pos);
return SCPE_OK;
}
/* Reset routine */
t_stat plt_reset (DEVICE *dptr)
{
plt_unit.buf = 0;
dev_busy = dev_busy & ~INT_PLT; /* clear busy */
dev_done = dev_done & ~INT_PLT; /* clear done, int */
int_req = int_req & ~INT_PLT;
plt_unit.buf = 0; /* <not DG compatible> */
DEV_CLR_BUSY( INT_PLT ) ;
DEV_CLR_DONE( INT_PLT ) ;
DEV_UPDATE_INTR ;
sim_cancel (&plt_unit); /* deactivate unit */
return SCPE_OK;
}