IFOX assembler source troubles
"Tony Harminc [email protected] [hercules-os380]" <[email protected]> Fri, 31 Mar 2017 01:41:54 -0400
| Newsgroups | gmane.comp.emulators.hercules390.os380,gmane.comp.emulators.hercules390.mvs,gmane.comp.emulators.hercules390.vm |
|---|---|
| Message-ID | <CAKqWTMsqbrhRtY8svB8SnCuYYEZDLK+kabe3iQbhuGeUhHP-Cg@mail.gmail.com> |
--001a1148df5c63e7b6054c0044d5
Content-Type: text/plain; charset=UTF-8
So for various reasons I decided to have a look at the VS Assembler, aka
Assembler XF aka IFOX[00]. It's been close to 40 years since I did so, so I
remember very little.
Where to start...? Of course it's already installed on systems like TK4-,
and I remembered talk of someone having put in the serious grunt work to
disassemble the available PTFs and build matching source, but that's about
it. So over to Jay Mosely's page at http://www.jaymoseley.com/herc
ules/compilers/ifox00.htm and ta-da it's all there. And it was Paul
Gorlinsky who did that grunt work.
A quick download, assemble (minor problems with one missing macro
IECTDECB), and link, and hey - let's try it by assembling one of its own
modules. This was on z/OS, BTW (on Real Iron, let me hasten to say).
For I believe the first time in my roughly 45 years of assembler
programming, I got an S504 abend. I had never heard of such a thing, looked
it up, and it says that the input and output lists on a VU-type GETMAIN
(LA= and A=) overlap. Bizarre, but a quick glance at the source (IFOX0A)
shows that it's true; someone was perhaps trying to save 8 bytes by using
the same storage for both arguments. OK, thought I, another new check
that's been added to z/OS, maybe as part of their grand VSM rework from a
few releases ago. I just thought I'd check to see how far back the doc goes
on this abend code, and to cut a long search story short, it is documented
at least as far back as when VS1 and SVS shared a System Codes manual.
Just weird. How can this code have ever worked? And what does the working
module on, say, TK4- contain? Well, not much disassembling is needed to see
that the addresses for the two arguments are different in the IFOX0A on
TK4-, both in the DLIB and the running SYS1.LINKLIB, IDR'd with Z32460,
whatever that is.
So... This is disquieting. None of the Mosely/Gorlinsky IBM PTFs appears to
fix this problem, yet the fix is on TK4- and presumably similar MVS 3.8
systems. So of course this throws the whole "matching source" into doubt.
Or rather, it throws my understanding of what the Gorlinsky tape claims to
have accomplished - maybe "just" getting the PTFs turned into source form -
work enough, but not what I thought.
There's another oddity that I think is unrelated, but I'm not quite sure:
The description of the tape at
http://www.jaymoseley.com/hercules/downloads/pdf/ifox00.memo.pdf
(Paul G's memo) doesn't quite match the actual tape at
http://www.jaymoseley.com/hercules/downloads/archives/ifox.tgz
Specifically a tapemap shows just 14 files vs 16 in the memo, and it's 13
and 14 that seem to be missing.
More questions... The memo lists some files as "DISASM IBM BAS" and "DISASM
HRC BAS". Disassembled (with which disassembler?) but what is IBM vs HRC,
and what is BAS?
Anyway - I haven't seen a post from Paul Gorlinsky since 2013, or Jay
Mosely for I think longer than that, so I'm not sure where to turn. Has
anyone else played with IFOX source lately?
Tony H.
--001a1148df5c63e7b6054c0044d5
Content-Type: text/html; charset=UTF-8
Content-Transfer-Encoding: quoted-printable
<head>
<style type=3D"text/css">
<!--
/* start of attachment style */
.ygrp-photo-title{
clear: both;
font-size: smaller;
height: 15px;
overflow: hidden;
text-align: center;
width: 75px;
}
div.ygrp-photo{
background-position: center;
background-repeat: no-repeat;
background-color: white;
border: 1px solid black;
height: 62px;
width: 62px;
}
div.photo-title=20
a,
div.photo-title a:active,
div.photo-title a:hover,
div.photo-title a:visited {
text-decoration: none;=20
}
div.attach-table div.attach-row {
clear: both;
}
div.attach-table div.attach-row div {
float: left;
/* margin: 2px;*/
}
p {
clear: both;
padding: 15px 0 3px 0;
overflow: hidden;
}
div.ygrp-file {
width: 30px;
valign: middle;
}
div.attach-table div.attach-row div div a {
text-decoration: none;
}
div.attach-table div.attach-row div div span {
font-weight: normal;
}
div.ygrp-file-title {
font-weight: bold;
}
/* end of attachment style */
-->
</style>
</head>
<html>
<head>
<style type=3D"text/css">
<!--
#ygrp-mkp {
border: 1px solid #d8d8d8;
font-family: Arial;
margin: 10px 0;
padding: 0 10px;
}
#ygrp-mkp hr {
border: 1px solid #d8d8d8;
}
#ygrp-mkp #hd {
color: #628c2a;
font-size: 85%;
font-weight: 700;
line-height: 122%;
margin: 10px 0;
}
#ygrp-mkp #ads {
margin-bottom: 10px;
}
#ygrp-mkp .ad {
padding: 0 0;
}
#ygrp-mkp .ad p {
margin: 0;
}
#ygrp-mkp .ad a {
color: #0000ff;
text-decoration: none;
}
-->
</style>
</head>
<body>
<!-- |**|begin egp html banner|**| -->
<br><br>
<!-- |**|end egp html banner|**| -->
<div dir=3D"ltr"><div><div><div><div><div><div><div><div><div>So for variou=
s reasons I decided to have a look at the VS Assembler, aka Assembler XF ak=
a IFOX[00]. It's been close to 40 years since I did so, so I remember v=
ery little.<br><br></div>Where to start...? Of course it's already inst=
alled on systems like TK4-, and I remembered talk of someone having put in =
the serious grunt work to disassemble the available PTFs and build matching=
source, but that's about it. So over to Jay Mosely's page at <a hr=
ef=3D"http://www.jaymoseley.com/hercules/compilers/ifox00.htm" target=3D"_b=
lank">http://www.jaymoseley.com/herc<wbr>ules/compilers/ifox00.htm</a> and =
ta-da it's all there. And it was Paul Gorlinsky who did that grunt work=
.<br><br></div>A quick download, assemble (minor problems with one missing =
macro IECTDECB), and link, and hey - let's try it by assembling one of =
its own modules. This was on z/OS, BTW (on Real Iron, let me hasten to say)=
.<br><br></div>For I believe the first time in my roughly 45 years of assem=
bler programming, I got an S504 abend. I had never heard of such a thing, l=
ooked it up, and it says that the input and output lists on a VU-type GETMA=
IN (LA=3D and A=3D) overlap. Bizarre, but a quick glance at the source (IFO=
X0A) shows that it's true; someone was perhaps trying to save 8 bytes b=
y using the same storage for both arguments. OK, thought I, another new che=
ck that's been added to z/OS, maybe as part of their grand VSM rework f=
rom a few releases ago. I just thought I'd check to see how far back th=
e doc goes on this abend code, and to cut a long search story short, it is =
documented at least as far back as when VS1 and SVS shared a System Codes m=
anual.<br><br></div>Just weird. How can this code have ever worked? And wha=
t does the working module on, say, TK4- contain? Well, not much disassembli=
ng is needed to see that the addresses for the two arguments are different =
in the IFOX0A on TK4-, both in the DLIB and the running SYS1.LINKLIB, IDR&#=
39;d with Z32460, whatever that is.<br><br></div>So... This is disquieting.=
None of the Mosely/Gorlinsky IBM PTFs appears to fix this problem, yet the=
fix is on TK4- and presumably similar MVS 3.8 systems. So of course this t=
hrows the whole "matching source" into doubt. Or rather, it throw=
s my understanding of what the Gorlinsky tape claims to have accomplished -=
maybe "just" getting the PTFs turned into source form - work eno=
ugh, but not what I thought.<br><br></div>There's another oddity that I=
think is unrelated, but I'm not quite sure: The description of the tap=
e at <br><a href=3D"http://www.jaymoseley.com/hercules/downloads/pdf/ifox00=
.memo.pdf" target=3D"_blank">http://www.jaymoseley.com/<wbr>hercules/downlo=
ads/pdf/ifox00.<wbr>memo.pdf</a> <br>(Paul G's memo) doesn't quite =
match the actual tape at<br><a href=3D"http://www.jaymoseley.com/hercules/d=
ownloads/archives/ifox.tgz" target=3D"_blank">http://www.jaymoseley.com/<wb=
r>hercules/downloads/archives/<wbr>ifox.tgz</a><br></div>Specifically a tap=
emap=C2=A0 shows just 14 files vs 16 in the memo, and it's 13 and 14 th=
at seem to be missing.<br><br></div>More questions... The memo lists some f=
iles as "DISASM IBM BAS" and "DISASM HRC BAS". Disassem=
bled (with which disassembler?) but what is IBM vs HRC, and what is BAS?<br=
><br></div>Anyway - I haven't seen a post from Paul Gorlinsky since 201=
3, or Jay Mosely for I think longer than that, so I'm not sure where to=
turn. Has anyone else played with IFOX source lately?<br><div><div><div><b=
r></div><div>Tony H.<br></div></div></div></div>
<!-- |**|begin egp html banner|**| -->
<br>
<br>
<!-- |**|end egp html banner|**| -->
<div width=3D"1" style=3D"color: white; clear: both;"/>__._,_.___</div>
=20=20=20=20=20=20
=20=20
=20=20=20=20
<div id=3D"fromDMARC" style=3D"clear:both; margin-top: 10px;">
<hr style=3D"height:2px ; border-width:0; color:#E3E3E3; backgroun=
d-color:#E3E3E3;">
Posted by: Tony Harminc <[email protected]> <hr sty=
le=3D"height:2px ; border-width:0; color:#E3E3E3; background-color:#E3E3E3;=
">
</div>
<!-- Start Recommendations -->
<!-- End Recommendations -->
<!-- |**|begin egp html banner|**| -->
<img src=3D"http://geo.yahoo.com/serv?s=3D97476590/grpId=3D22982534/grpsp=
Id=3D1705006559/msgId=3D12666/stime=3D1490938916" width=3D"1" height=3D"1">=
<br>
<!-- |**|end egp html banner|**| -->
=20=20
<!-- |**|begin egp html banner|**| -->
<br>
=20=20=20
=20=20=20=20=20
=20
<!-- |**|begin egp html banner|**| -->
<div id=3D"ygrp-vital" style=3D"background-color: #f2f2f2; font-fam=
ily: Verdana; font-size: 10px; margin-bottom: 10px; padding: 10px;">
<span id=3D"vithd" style=3D"font-weight: bold; color: #333; text-tr=
ansform: uppercase; "><a href=3D"https://groups.yahoo.com/neo/groups/hercul=
es-os380/info;_ylc=3DX3oDMTJmcmJzNnNsBF9TAzk3MzU5NzE0BGdycElkAzIyOTgyNTM0BG=
dycHNwSWQDMTcwNTAwNjU1OQRzZWMDdnRsBHNsawN2Z2hwBHN0aW1lAzE0OTA5Mzg5MTY-" sty=
le=3D"text-decoration: none;">Visit Your Group</a></span>
<ul style=3D"list-style-type: none; margin: 0; padding: 0; display: in=
line;">
</ul>
</div>
<div id=3D"ft" style=3D"font-family: Arial; font-size: 11px; margin-top: 5p=
x; padding: 0 2px 0 0; clear: both;">
<a href=3D"https://groups.yahoo.com/neo;_ylc=3DX3oDMTJlNGY1ZXRrBF9TAzk3ND=
c2NTkwBGdycElkAzIyOTgyNTM0BGdycHNwSWQDMTcwNTAwNjU1OQRzZWMDZnRyBHNsawNnZnAEc=
3RpbWUDMTQ5MDkzODkxNg--" style=3D"float: left;"><img src=3D"http://l.yimg.c=
om/ru/static/images/yg/img/email/new_logo/logo-groups-137x15.png" height=3D=
"15" width=3D"137" alt=3D"Yahoo! Groups" style=3D"border: 0;"/></a>
<div style=3D"color: #747575; float: right;"> • <a href=3D"https://i=
nfo.yahoo.com/privacy/us/yahoo/groups/details.html" style=3D"text-decoratio=
n: none;">Privacy</a> • <a href=3D"mailto:hercules-os380-unsubscribe@y=
ahoogroups.com?subject=3DUnsubscribe" style=3D"text-decoration: none;">Unsu=
bscribe</a> • <a href=3D"https://info.yahoo.com/legal/us/yahoo/utos/te=
rms/" style=3D"text-decoration: none;">Terms of Use</a> </div>
</div>
<!-- |**|end egp html banner|**| -->
</div> <!-- ygrp-msg -->
=20=20=20
<br>
<!-- |**|end egp html banner|**| -->
<div style=3D"color: white; clear: both;"/>__,_._,___</div>
</body>
</html>
--001a1148df5c63e7b6054c0044d5--