mirror of
https://github.com/rcornwell/sims.git
synced 2026-02-25 00:18:02 +00:00
KA10: IMX device (A/D converter)
This commit is contained in:
Lars Brinkhoff
Richard Cornwell
@@ -321,6 +321,7 @@ extern DEVICE dt_dev;
|
||||
extern DEVICE dk_dev;
|
||||
extern DEVICE pd_dev;
|
||||
extern DEVICE dpy_dev;
|
||||
extern DEVICE imx_dev;
|
||||
extern DEVICE wcnsls_dev; /* MIT Spacewar Consoles */
|
||||
|
||||
extern t_stat (*dev_tab[128])(uint32 dev, uint64 *data);
|
||||
@@ -383,6 +384,7 @@ int df10_write(struct df10 *df);
|
||||
#define NUM_DEVS_RS 1
|
||||
#define NUM_DEVS_TU 1
|
||||
#define NUM_DEVS_PD ITS
|
||||
#define NUM_DEVS_IMX ITS
|
||||
#define NUM_DEVS_DPY USE_DISPLAY
|
||||
#define NUM_DEVS_WCNSLS USE_DISPLAY
|
||||
#define NUM_DEVS_IMP 0
|
||||
|
||||
111
PDP10/ka10_imx.c
Normal file
111
PDP10/ka10_imx.c
Normal file
@@ -0,0 +1,111 @@
|
||||
/* ka10_imx.c: Input multplexor for A/D.
|
||||
|
||||
Copyright (c) 2018, Lars Brinkhoff
|
||||
|
||||
Permission is hereby granted, free of charge, to any person obtaining a
|
||||
copy of this software and associated documentation files (the "Software"),
|
||||
to deal in the Software without restriction, including without limitation
|
||||
the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
||||
and/or sell copies of the Software, and to permit persons to whom the
|
||||
Software is furnished to do so, subject to the following conditions:
|
||||
|
||||
The above copyright notice and this permission notice shall be included in
|
||||
all copies or substantial portions of the Software.
|
||||
|
||||
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||||
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||||
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
||||
RICHARD CORNWELL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
|
||||
IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
|
||||
CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
||||
|
||||
This is a device which has 128 A/D channels. It's specific to the MIT
|
||||
AI lab PDP-10.
|
||||
*/
|
||||
|
||||
#include <time.h>
|
||||
#include "ka10_defs.h"
|
||||
|
||||
#define IMX_DEVNUM 0574
|
||||
|
||||
#define IMX_PIA 0000007
|
||||
#define IMX_DONE 0000010
|
||||
#define IMX_PACK 0000040
|
||||
#define IMX_SEQUENCE 0000100
|
||||
#define IMX_TEST 0000200
|
||||
#define IMX_RATE 0377000
|
||||
#define IMX_ASSIGNED 0400000000000LL
|
||||
|
||||
#define IMX_CONO (IMX_PIA | IMX_PACK | IMX_SEQUENCE | IMX_RATE)
|
||||
#define IMX_CONI (IMX_PIA | IMX_DONE | IMX_PACK | IMX_SEQUENCE | IMX_TEST | IMX_ASSIGNED)
|
||||
|
||||
#define IMX_CHANNEL 0000177
|
||||
|
||||
t_stat imx_devio(uint32 dev, uint64 *data);
|
||||
const char *imx_description (DEVICE *dptr);
|
||||
|
||||
static uint64 status = IMX_ASSIGNED;
|
||||
static int initial_channel = 0;
|
||||
static int current_channel = 0;
|
||||
|
||||
UNIT imx_unit[] = {
|
||||
{UDATA(NULL, UNIT_DISABLE, 0)}, /* 0 */
|
||||
};
|
||||
DIB imx_dib = {IMX_DEVNUM, 1, &imx_devio, NULL};
|
||||
|
||||
MTAB imx_mod[] = {
|
||||
{ 0 }
|
||||
};
|
||||
|
||||
DEVICE imx_dev = {
|
||||
"IMX", imx_unit, NULL, imx_mod,
|
||||
1, 8, 0, 1, 8, 36,
|
||||
NULL, NULL, NULL, NULL, NULL, NULL,
|
||||
&imx_dib, DEV_DISABLE | DEV_DIS | DEV_DEBUG, 0, NULL,
|
||||
NULL, NULL, NULL, NULL, NULL, &imx_description
|
||||
};
|
||||
|
||||
static int imx_sample (void)
|
||||
{
|
||||
int sample = 2048;
|
||||
if (status & IMX_SEQUENCE)
|
||||
current_channel = (current_channel + 1) & IMX_CHANNEL;
|
||||
else
|
||||
current_channel = initial_channel;
|
||||
return sample;
|
||||
}
|
||||
|
||||
t_stat imx_devio(uint32 dev, uint64 *data)
|
||||
{
|
||||
DEVICE *dptr = &imx_dev;
|
||||
|
||||
switch(dev & 07) {
|
||||
case CONO|4:
|
||||
status &= ~IMX_CONO;
|
||||
status |= *data & IMX_CONO;
|
||||
current_channel = initial_channel;
|
||||
break;
|
||||
case CONI|4:
|
||||
status |= IMX_DONE;
|
||||
*data = status & IMX_CONI;
|
||||
break;
|
||||
case DATAO|4:
|
||||
initial_channel = *data & IMX_CHANNEL;
|
||||
break;
|
||||
case DATAI|4:
|
||||
*data = imx_sample();
|
||||
if (status & IMX_PACK) {
|
||||
*data <<= 24;
|
||||
*data |= imx_sample() << 12;
|
||||
*data |= imx_sample();
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
return SCPE_OK;
|
||||
}
|
||||
|
||||
const char *imx_description (DEVICE *dptr)
|
||||
{
|
||||
return "A/D input multiplexor";
|
||||
}
|
||||
@@ -137,6 +137,9 @@ DEVICE *sim_devices[] = {
|
||||
#endif
|
||||
#if NUM_DEVS_IMP > 0
|
||||
&imp_dev,
|
||||
#endif
|
||||
#if NUM_DEVS_IMX > 0
|
||||
&imx_dev,
|
||||
#endif
|
||||
NULL
|
||||
};
|
||||
|
||||
3
makefile
3
makefile
@@ -1104,7 +1104,8 @@ KA10 = ${KA10D}/ka10_cpu.c ${KA10D}/ka10_sys.c ${KA10D}/ka10_df.c \
|
||||
${KA10D}/ka10_lp.c ${KA10D}/ka10_pt.c ${KA10D}/ka10_dc.c \
|
||||
${KA10D}/ka10_rp.c ${KA10D}/ka10_rc.c ${KA10D}/ka10_dt.c \
|
||||
${KA10D}/ka10_dk.c ${KA10D}/ka10_cr.c ${KA10D}/ka10_cp.c \
|
||||
${KA10D}/ka10_tu.c ${KA10D}/ka10_rs.c ${KA10D}/ka10_pd.c
|
||||
${KA10D}/ka10_tu.c ${KA10D}/ka10_rs.c ${KA10D}/ka10_pd.c \
|
||||
${KA10D}/ka10_imx.c
|
||||
KA10_OPT = -DKA=1 -DUSE_INT64 -I $(KA10D) -DUSE_SIM_CARD
|
||||
# ${KA10D}/ka10_imp.c sim_imp.c sim_ncp.c sim_tun.c
|
||||
|
||||
|
||||
Reference in New Issue
Block a user