Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
4
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Switch to GitLab Next
Sign in / Register
Toggle navigation
dps8m
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Locked Files
Issues
8
Issues
8
List
Boards
Labels
Service Desk
Milestones
Iterations
Requirements
Requirements
List
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Test Cases
Security & Compliance
Security & Compliance
Dependency List
License Compliance
Operations
Operations
Incidents
Environments
Packages & Registries
Packages & Registries
Package Registry
Container Registry
Analytics
Analytics
CI / CD
Insights
Issue
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
dps8m
dps8m
Commits
41da1a4b
Commit
41da1a4b
authored
Sep 09, 2020
by
Charles Anthony
1
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Gitlab issue
#23
Minor readabilty and signedness fixes.
parent
377e49d6
Pipeline
#188090248
failed with stages
in 8 minutes and 10 seconds
Changes
7
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
Showing
7 changed files
with
12 additions
and
14 deletions
+12
-14
src/dps8/dps8_cpu.c
src/dps8/dps8_cpu.c
+2
-2
src/dps8/dps8_faults.c
src/dps8/dps8_faults.c
+1
-1
src/dps8/dps8_fnp2.c
src/dps8/dps8_fnp2.c
+5
-5
src/dps8/dps8_fnp2_iomcmd.c
src/dps8/dps8_fnp2_iomcmd.c
+1
-1
src/dps8/dps8_iom.h
src/dps8/dps8_iom.h
+0
-2
src/dps8/fnpuv.c
src/dps8/fnpuv.c
+1
-1
src/dps8/libtelnet.c
src/dps8/libtelnet.c
+2
-2
No files found.
src/dps8/dps8_cpu.c
View file @
41da1a4b
...
...
@@ -1518,9 +1518,9 @@ static void panel_process_event (void)
}
#endif
#if defined(THREADZ) || defined(LOCKLESS)
bool
bce_dis_called
=
false
;
#if defined(THREADZ) || defined(LOCKLESS)
// The hypervisor CPU for the threadz model
t_stat
sim_instr
(
void
)
{
...
...
@@ -2797,7 +2797,7 @@ sim_debug (DBG_TRACEEXT, & cpu_dev, "fetchCycle bit 29 sets XSF to 0\n");
// Checking for F(A)NP here is equivalent to checking that the
// last append cycle has made it as far as H/I without a fault.
// Also reset it on TRB fault. ISOLTS-870 05a
if
(
cpu
.
cu
.
APUCycleBits
&
060
||
cpu
.
secret_addressing_mode
)
if
(
(
cpu
.
cu
.
APUCycleBits
&
060
)
||
cpu
.
secret_addressing_mode
)
set_apu_status
(
apuStatus_FABS
);
// XXX the whole fault cycle should be rewritten as an xed
...
...
src/dps8/dps8_faults.c
View file @
41da1a4b
...
...
@@ -919,7 +919,7 @@ void doG7Fault (bool allowTR)
doFault
(
FAULT_CON
,
cpu
.
g7SubFaults
[
FAULT_CON
],
"Connect"
);
}
if
(
allowTR
&&
cpu
.
g7Faults
&
(
1u
<<
FAULT_TRO
))
if
(
allowTR
&&
(
cpu
.
g7Faults
&
(
1u
<<
FAULT_TRO
)
))
{
cpu
.
g7Faults
&=
~
(
1u
<<
FAULT_TRO
);
...
...
src/dps8/dps8_fnp2.c
View file @
41da1a4b
...
...
@@ -440,7 +440,7 @@ sim_printf ("\n");
}
#endif
uint
j
=
0
;
for
(
int
i
=
0
;
i
<
n_chars
;
i
+=
4
,
j
++
)
for
(
u
int
i
=
0
;
i
<
n_chars
;
i
+=
4
,
j
++
)
{
word36
v
=
0
;
if
(
i
<
linep
->
nPos
)
...
...
@@ -962,7 +962,7 @@ static inline bool processInputCharacter (struct t_line * linep, unsigned char k
// XXX This code assumes that only 'frame_end' is in play, as in Kermit behavior
linep
->
buffer
[
linep
->
nPos
++
]
=
kar
;
// Pad to frame size with nulls
int
frsz
=
(
int
)
linep
->
block_xfer_in_frame_sz
;
uint
frsz
=
linep
->
block_xfer_in_frame_sz
;
while
((
size_t
)
linep
->
nPos
<
sizeof
(
linep
->
buffer
)
&&
linep
->
nPos
<
frsz
)
linep
->
buffer
[
linep
->
nPos
++
]
=
0
;
linep
->
accept_input
=
1
;
...
...
@@ -1064,10 +1064,10 @@ static inline bool processInputCharacter (struct t_line * linep, unsigned char k
((
linep
->
block_xfer_out_frame_sz
!=
0
)
?
// block xfer buffer size met
(
linep
->
nPos
>=
(
int
)
linep
->
block_xfer_out_frame_sz
)
(
linep
->
nPos
>=
linep
->
block_xfer_out_frame_sz
)
:
// 'listen' command buffer size met
(
linep
->
inputBufferSize
!=
0
&&
linep
->
nPos
>=
(
int
)
linep
->
inputBufferSize
))
(
linep
->
inputBufferSize
!=
0
&&
linep
->
nPos
>=
linep
->
inputBufferSize
))
)
{
linep
->
accept_input
=
1
;
...
...
@@ -2001,7 +2001,7 @@ static t_stat fnpSetFW (UNIT * uptr, UNUSED int32 value,
if
(
strcasecmp
(
tok
,
"LIST"
)
==
0
)
{
for
(
u
int
i
=
0
;
i
<
n_fw_entries
;
i
++
)
for
(
int
i
=
0
;
i
<
n_fw_entries
;
i
++
)
{
struct
fw_entry_s
*
p
=
fw_entries
+
i
;
...
...
src/dps8/dps8_fnp2_iomcmd.c
View file @
41da1a4b
...
...
@@ -1322,7 +1322,7 @@ sim_printf ("']\n");
#endif
//sim_printf ("long in; line %d tally %d\n", decoded_p->slot_no, linep->nPos);
uint
n_chars_in_buf
=
min
(
n_chars
-
off
,
tally
);
for
(
int
i
=
0
;
i
<
n_chars_in_buf
;
i
+=
4
)
for
(
u
int
i
=
0
;
i
<
n_chars_in_buf
;
i
+=
4
)
{
word36
v
=
0
;
if
(
i
<
n_chars_in_buf
)
...
...
src/dps8/dps8_iom.h
View file @
41da1a4b
...
...
@@ -340,10 +340,8 @@ void iom_core_read (uint iom_unit_idx, word24 addr, word36 *data, UNUSED const c
void
iom_core_read2
(
uint
iom_unit_idx
,
word24
addr
,
word36
*
even
,
word36
*
odd
,
UNUSED
const
char
*
ctx
);
void
iom_core_write
(
uint
iom_unit_idx
,
word24
addr
,
word36
data
,
UNUSED
const
char
*
ctx
);
void
iom_core_write2
(
uint
iom_unit_idx
,
word24
addr
,
word36
even
,
word36
odd
,
UNUSED
const
char
*
ctx
);
#ifdef LOCKLESS
void
iom_core_read_lock
(
uint
iom_unit_idx
,
word24
addr
,
word36
*
data
,
UNUSED
const
char
*
ctx
);
void
iom_core_write_unlock
(
uint
iom_unit_idx
,
word24
addr
,
word36
data
,
UNUSED
const
char
*
ctx
);
#endif
t_stat
boot2
(
UNUSED
int32
arg
,
UNUSED
const
char
*
buf
);
t_stat
iom_unit_reset_idx
(
uint
iom_unit_idx
);
...
...
src/dps8/fnpuv.c
View file @
41da1a4b
...
...
@@ -1036,7 +1036,7 @@ void fnpuv_dial_out (uint fnpno, uint lineno, word36 d1, word36 d2, word36 d3)
bool
accept
=
true
;
uint32_t
ip_addr
=
(
uint32_t
)
((
oct1
<<
24
)
|
(
oct2
<<
16
)
|
(
oct3
<<
8
)
|
oct4
);
uint
this_line
=
encodeline
(
fnpno
,
lineno
);
for
(
u
int
i
=
0
;
i
<
n_fw_entries
;
i
++
)
for
(
int
i
=
0
;
i
<
n_fw_entries
;
i
++
)
{
struct
fw_entry_s
*
p
=
fw_entries
+
i
;
if
(
this_line
<
p
->
line_0
||
this_line
>
p
->
line_1
)
...
...
src/dps8/libtelnet.c
View file @
41da1a4b
...
...
@@ -292,7 +292,7 @@ static INLINE int _check_telopt(telnet_t *telnet, unsigned char telopt,
static
INLINE
telnet_rfc1143_t
_get_rfc1143
(
telnet_t
*
telnet
,
unsigned
char
telopt
)
{
telnet_rfc1143_t
empty
;
int
i
;
u
int
i
;
/* search for entry */
for
(
i
=
0
;
i
!=
telnet
->
q_cnt
;
++
i
)
{
...
...
@@ -311,7 +311,7 @@ static INLINE telnet_rfc1143_t _get_rfc1143(telnet_t *telnet,
static
INLINE
void
_set_rfc1143
(
telnet_t
*
telnet
,
unsigned
char
telopt
,
unsigned
char
us
,
unsigned
char
him
)
{
telnet_rfc1143_t
*
qtmp
;
int
i
;
u
int
i
;
/* search for entry */
for
(
i
=
0
;
i
!=
telnet
->
q_cnt
;
++
i
)
{
...
...
Charles Anthony
@unused0
mentioned in issue
#23 (closed)
·
Sep 09, 2020
mentioned in issue
#23 (closed)
mentioned in issue #23
Toggle commit list
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment