MCP-CMS: Difference between revisions

From Cibernética Americana
Jump to navigationJump to search
No edit summary
No edit summary
 
(876 intermediate revisions by 3 users not shown)
Line 1: Line 1:
<html>
<html>
<div style="background-color: blackcolor: antiquewhite;">
<div style="background-color: white;color: black;">
<style>
<style>
.collapsible {
.collapsible {
   background-color: firebrick;
   background-color: white;
   color: gold;
   color: lime;
   cursor: pointer;
   cursor: pointer;
   padding: 18px;
   padding: 40px;
   width: 100px;
   width: 100px;
   border: none;
  height: 25px;
   border: navy;
   text-align: left;
   text-align: left;
   outline: none;
   outline: none;
   font-size: 15px;
   font-size: 12px;
   font-weight: 600;
   font-weight: 600;
   position: relative;
   position: relative;
   top: -50px;
   top: -24px;
}
@font-face {
  font-family: Papyrus;
  src: url('https://meansofproduction.biz/pub/papyrus.ttf');
}
}


Line 25: Line 30:
   display: none;
   display: none;
   overflow: hidden;
   overflow: hidden;
   background-color: firebrick;
   background-color: white;
   position: relative;
   position: relative;
   top: -50px;
   top: -50px;
Line 31: Line 36:
</style>
</style>
<div style="text-align: right;">
<div style="text-align: right;">
<h1>mcpcms</h1>
<h1 style="color: black;">mcpcms &nbsp; </h1>
<h5 style="position: relative;top: 0px;">master control program <br>CMS MCS shell</h5>
<h5 style="position: relative;top: 0px;color: black;"><span style=background-color:yellow;"> &nbsp; conversational monitoring system  &nbsp; </span><br>DCP Shell &nbsp; </h5>
</div>
</div>
<div style="position: relative;top: -75px;">
<div style="position:relative;top:-60px;"> &nbsp; <a  style="position: relative;top: -15px;" title="Home Profile"
&nbsp; <a  style="position: relative;top: -15px;" title="Home Profile"
             href=https://sameboat.network/user><img src=https://meansofproduction.biz/images/corbusierDuHaut.jpg width=100></a>
             href=https://sameboat.live/user><img src=https://meansofproduction.biz/images/corbusierDuHaut.jpg width=100></a>
           <span style="position: relative; top: -40px;"><a style="color: lime;" title="About the MCP reinvention"
           <span style="position: relative; top: -40px;"> &nbsp;<tt style="background-color: black;color: yellow;font-weight: bold;"> the launch task reports: <span style="color: red;text-shadow: 0 0 2px #ffffff, o o 3px #ffffff;">ABORTED</span> .</tt><br><br>
              href=/eg/index.php/MCP> <tt style="background-color: black; color: yellow; font-weight: bold;"> &nbsp; minimalist clustering paradigm &nbsp; </tt></a><br><br>
             <a style="position: relative; left: 130px; top: -10px; " href=https://eg.meansofproduction.biz/index.php/MCP-CMS>refresh</a>
             <a title="mcpcms cli or webssh login if not SAR authenticated"
            style="height:50px;background-color:purple;color:white;position: relative; left: 130px; top: -20px;" href=/eg/index.php/MCPCELL><b> &nbsp; launch &nbsp;</b></a>
            <span style="position: relative;left:130px;top: -20px;">&mdash; an MCP cell &sup1;  provisioned by DCP per your current context. &sup2;</span>
           </span>
           </span>
        <div style="position: relative; top: -50px;">
</div>
        <blockquote  style="width: 60%;font-weight: bold;" >
<div style="z-index:150;position:relative;top:-90px;right:60px;">
            If the request status above is not ABORTED or STOPPED,  a <a title="About the MCP reinvention"
<img align=right width=300px src="https://meansofproduction.biz/images/b6700nMCP2.png">
            href=https://eg.meansofproduction.biz/index.php/MCP>MCP</a>&sup1; shell session is or shortly will be running on support
<span style="float:right;position:relative;top:270px;left:310px;font-size:10px;">Dual 6700, c. 1971/2, binding says MK 0.0, so 2.0.0<br>
            provisioned from core domain space or DIY inventory. These and the remaining states ACTIVE, INUSE, or COMPLETEDOK, implicitly reference the
<audio style="float:right;height:14px;" title="'Woody'n You' Ahmad Jamal 1958" controls source src="https://meansofproduction.biz/pub/WoodyNYou.mp3" type="audio/mpeg"> This page has an audio but your browser does not support the audio element.</audio><br>
            DS <a href=https://sameboat.live/stationHistory>station</a> at which you're currently a DS agent.
<span style="float:right;font-size:8px;color:purple;">This page has an audio track, mouseover for title/credit.</span>
<br>
</span>
 
</div>


            <p>It may be accessed at  &lt;station-name&gt; where </p><tt>
<div style="position: relative; top: -100px;">
            <ul>
<blockquote style="position: relative;top: 0px;"> Semantic Roadmap
                <li style="padding: -2px;"><pre>&lt;station-name&gt;  ::= ipV6Address | ipV4Address | FQDSuserName </pre></li>
         <tt>
                <li style="padding: 0px;"><pre>&lt;domain&gt;        ::= ai-integration | ai-integration.biz | &lt;yourTLD&gt;</pre> </li>
                <li><pre>FQDSuserName    ::= your DS agent nick FQDN, e.g. 'janedoe.&lt;domainName&gt;[.dom]'.</pre></li>
                <li><pre>&lt;yourTLD&gt;      ::= your alt-root TLD or its public linking zone.</pre></li>
            </ul></tt></pre> Launch states ABORTED, COMPLETED, OR STOPPED, imply receipt of diagnostic info by the currently selected means of notification in your home profile (icon).
            ABORTED is the immediate result if you are not authenticated.
        </blockquote>
        <blockquote style="width: 60%;font-weight: bold;">
          Enable ssh access from your commons profile which assigns the port. The suffixless host name and IPV6 forms
          require DS routing. Sessions launched by ip do not persist and are strictly contained within the agent's session.<br><br>
          A running <a href=https://eg.meansofproduction.biz/index.php/WFL/DCP_SPO>SPO</a> counts as a mcpcms launch against account limits.<br>
        <hr width="50%" style="float: left;">
        </blockquote><br>
        <blockquote style="position: relative;top: -30px;">
        <span style="position: relative;top: -10px;font-size: 10px;">&sup1;<i>NB: 'Unisys CANDE', 'Unisys MCP', and 'Unisys WFL' are distinct from the unaffixed names and will be
        supported in a free feature of later DCP versions.</i></span>
         </blockquote>
    <button type="button" class="collapsible">more ...</button>
    <div class="content">
        <blockquote>
        MCP shells may have any one of the following natures:
         <ul>
         <ul>
        <li>shcl, common lisp nature</li>
        <li>0.3.0 4721-04-17&nbsp; 1<sup>st</sup> written tl;dr story.&dagger; </li>
        <li>shelly, haskell nature</li>
        <li>0.9.0 47yy-00-00&nbsp; MCP BaselineOfDomainSpace. </li>
        <li>upsh, prolog nature</li>
        <li>1.0.0 47yy-00-00&nbsp; LAN and cloud vendor provisioning; production geonode flows.</li>
         <br>or<br>
         <li>1.1.0 47yy-00-00&nbsp; DCP BaselineOfKEE. </li>
        <li><p style="width: 60%;">CMS, the default nature for mcpcms, which is bash modified for DCP/MCP/WFL.<br><br> Only mcpcms can be set in /etc/shells, the others execute as
        <li>1.2.0 &nbsp;07y-00-00&nbsp; DCP in the wild, Transparent Ledger in Books, Shopify Integration.</li>
            commands in a mcp shell, and only shcl gives a live default command line like fish under standard bash. The other two require a user supplied
        <li>2.0.0 &nbsp;07y-00-00&nbsp; &int; VM (CMS, MVS) / DCP &part; DS. The MF-One story.</li>
            hs or pl script, and are not general interactive shells unless that script provides that functionality.</p> </li>
        <li>3.0.0 &nbsp;07y-00-00&nbsp; Done 2<sup>nd</sup> tl;dr story, 1<sup>st</sup> working WFL, DGUI for job edit and debug with visual execution. </li>
         </ul>
        <li>4.0.0 &nbsp;07y-00-00&nbsp; Mature DDD/KEE product.</li>
        <blockquote>
         </ul></tt></blockquote>
        Shells have either MCP (single linux host) or DCP (whole cluster) scope, ip shells are limited to the former.<br> GHC and SWI are assumed
<center>
        for haskell and prolog, but lisp can be any combination of Allegro, CCL, (user supplied) or sbcl (the default).
MCP-CMS &mdash; a platform for the Domain Control Program, with an aesthetic in homage to the Burroughs and IBM OSes.
         </blockquote>
</center>  
         The CMS level is always present, the others are outer shells adapted for the domain space knowledge engineering context.<br>
         <blockquote style="position: relative;">
        Although adapted for MCP, I try to keep them close to the standard versions, as generic lang specific outer shells.<br>
         <span style="z-index: 100;position: relative;font-size: 10px;">&sup1; Resource limits are dynamically set except for F class which always gets the system limit if there is one which for billable accounts is the set spend limit.</i><br>
        My preferred <a href=https://en.wikipedia.org/wiki/Domain_engineering>DDD</a> uses the three HOLs&sup2; listed but the bash level is appropriate for
        &sup2;  Set parameters for your cloud provider in the DS Dashboard control blocks in your DCMS account or use system inventory.<br>
        shell ops with MCP unaware software, CANDE, and WFL jobs.
        </span>
         </blockquote>
         </blockquote>
<blockquote style="position:relative;left:-5px;top:-10px;z-index:200;font-size:8px;">&dagger; This page and <a href="https://devops1.sameboat.network/About DCP">About DCP</a> are top level specifying stories,  cog arch internals aren't divulged as I mean them to be adaptable without notice, everything else is source accessible by devops users.</blockquote>
<button type="button" class="collapsible"><div id="tldrDet">tl;dr</div></button>
<div class="content">
<blockquote  style="width: 70%;font-weight: bold;" >
MCPCMS presents the "</html>[[:en:CANDE|CANDE]]<html>" MCS&sup3; for DS users.
<blockquote style="width: 80%;font-weight: bold;">
  AKPERSONs (see <a href=/eg/index.php?title=AKPERSON>Entitlements</a>), and whitelisted <a style="color: lime;"  href=https://commons.sameboat.network/stationHistory>stations</a>
  can connect with the link above or in a running <a style="color: lime;" href=https://eg.meansofproduction.biz/eg/index.php/WFL/DCP_SPO>SPO</a> to a MCP running it.
</blockquote>
The attempt, if it reaches the MCP, results in completion codes reported in DS control block displays in your DCMS profile.<br>
Only ssh access from the wild, but this page will attempt, using your SAR credentials if the <a href=https://devops1.sameboat.network/roles>session role</a> is greater than 1.<br>
MCP operator messages will go to your ODT message queue.
<hr width="50%" style="float: left;">
</blockquote>   
<span style="font-size: 10px;position:relative;left:150px;">&sup3; MCS: a message control subsystem of a MCP.</span>
<center class=plainlinks>
  <a style="background-color:aliceblue;" href=https://en.wikipedia.org/wiki/User:Lycurgus/MoCA#Burroughs_CANDE> MCP 3.3 CANDE Reference Card</a><br>
  <a style="background-color:aliceblue;" href=https://meansofproduction.biz/pub/MCP15SystemCommands.pdf> MCP 15 System Commands </a>
</center>
<blockquote>
<b>CANDE MCS</b> 
  <blockquote>
    MCP-CMS connects via an MCS which is often referred to as the CANDE MCS although it is more general than that being the default ubiquitous DCP/MCP MCS.
    Upon <b>mcpcms</b> connect, like the lang specific subshells in the next &sect;, an additional command <b>cande</b> can be used which will process the MCP-CMS system commands
    analogous to those in the MCP 15 document above. The system command processor is also available as a pane in the SPO.
  <br><br>
  In Burroughs MCP, the CANDE MCS was used ubiquitously. I recall using a full screen editor which i think fed CANDE. The text edit functions are obsolete and
  not part of the <b>mcpcms cande</b>. CANDE is used in current Unisys MCP but neither it nor the MCS have their former prominence when the OS runs under Windows.
  </blockquote>
  <b>mcpcms</b>
  <blockquote>
    A modified <b>zsh</b> for MCP serves as analog of the CMS from VM/CMS. Upon successful connect, the launch link above results in a terminal session with this shell in the browser.
    Aside from the modification for the MCP machine model, it is otherwise just zsh however the following (mode) commands are available to establish different shell behaviour in support of the KEE:
    <ul><li><b>shcl</b> (common lisp nature)</li><li><b>shhs</b> (HsShellScript, haskell nature)</li><li><b>upsh</b> (prolog nature)</li></ul> Lisp and prolog implementations are variable, and multiple can be combined but shcl and upsh themselves use sbcl and swipl, respectively.
  <b>mcpcms</b> can be accessed with ssh using the following script. Using the FQDSAgentName syntax is equivalent to what the launch link does in an AKPERSONs session.<pre><tt>#!/usr/bin/bash
# save as &lt;fileName&gt; and invoke with &lt;fileName&gt;  &lt;connect-spec&gt; where           
#       
#  &lt;connect-spec&gt; ::= &lt;mcpCommand&gt; &lt;FQDSAgentName&gt; | &lt;connect-spec&gt;
#  &lt;connect-spec&gt; ::= &lt;ipV6Address&gt;:&lt;port&gt; | &lt;ipV4Address&gt;:&lt;port&gt;
#  FQDSAgentName  ::= &lt;agentId&gt;@&lt;domain&gt;[:&lt;port&gt;]
#
#  and the values manually supplied from control blocks in the DCMS account profile where connect attempt results will also be available. 
#  The &lt;mcpCommand&gt;.  indicates the station where the script runs is trusted and the responsible AKPERSON is the operator.
#
if [ -z $2 ] then
  ssh  $1
  exit
fi
#
# Try a connect based on just the FQDSA assuming an eligible station. A port on submitted second parm is ignored with a warning.
# The no &lt;mcpCommand&gt; specified, a DCP determined default shell type is connected.
#
FQDSA=mcp.meansofproduction.biz/?FQDSA=$2&$1
PARMS=$(curl -L $FQDSA)
ssh $PARMS
</tt></pre>
<b>mcpcms</b> is implemented first for Linux natively running or containerized in docker on Mac and Windows then for the Hercules version  where
    VM/CMS replaces the modified zsh for that special path.
    Cloud compute resources are dynamically provisioned using either system inventory or user supplied provisioning credentials with supported cloud vendors.
  </blockquote>
  <b>WFL</b>
   <blockquote>
   <blockquote>
        SYSTEM/CMS is the prototypical CL/MCS. It is meant to be a generalization of
  has eponymous origin in the <a style="background-color:aliceblue;"  href=https://meansofproduction.biz/pub/mcpWFL.pdf>MCP 12 WFL</a> job control model and supports the DCP with a line of demarcation between the minimalist MCP and its extension specific to DCP which is meant to protect properties of its internals. A way to think about it and my design intent is that MCP is a basic unix cluster machine to host any common mix, while the WFL machine is a private specialization. <br><br>
        <a href=https://en.wikipedia.org/wiki/CANDE>CANDE</a> and <a href=https://en.wikipedia.org/wiki/Conversational_Monitor_System>VM/CMS</a> .
  Unisys WFL is just a point of departure to our WFL. In Burroughs systems, WFL didn have as high a profile as IBM JCL, the main punch of the overall system, in an industry installation, would be its system of  transactions and these ran from a database which the Burroughs architecture delivered seamlessly without WFL to terminals as a special db stack. Our WFL is the central driver and basis of our MCP architecture
        <br><br>
  <ol>
        While initially the linux bash capable terminal is supported, ODT and 3270 support are intended.
    <li>is built for the MCP machine model</li>
        </blockquote>
    <li>which is a prime driver for the development of that model</li>
    </div>
    <li>with code blocks containing text of other supported langs</li>
        <blockquote style="position: relative;top: -60px;"> Version / Milestone Roadmap/Schedule
  </ol>
        <ul>
  As far as the elaboration of JCL statements and so forth WFL is developed in a bottom up prototyping style without any spec other than the mainframe reference and the DCP/MCP concept, so there will be no documentation for some time
        <li>2020-09-15 SSI PoC, proto CL/MCS and CMS MCS, ansible provisioning from C-Liu backend.</li>
  other than the text of actual jobs. &#8470; 3 above is implemented by variants for the SUBROUTINE statement, with the same attachment of BEGIN and END bounded blocks:
        <li>1.1 First level maturity of  lisp MCP codeset. </li>
    <center>
        <li>1.2 AI legacy systems salvage and integration complete and devops ready in the shell service.</li>
      <div style="font-size:10px;position:relative;left:0px;"><b>MCP Block Types</b></div>
        <li>2.0 Mature DDD/KEE product.</li>
    <table border=2 style="color:black;background-color:lemonchiffon;width:600px;">
        </ul>
    <tr style="background-color:black;color:white;font-size:10px;"><td width=125 align=center >Block Declarator</td><td align=center width=90>Language</td><td align=center width=180>Intrinsic</td><td align=center width=205>Purpose/Role</td></tr>
<hr>
    <tr style="background-color:white;font-size:10px;"><td colspan=4 align=center>Front </td></tr>
&sup2; <span style="font-size: 10px;">High Order Language</span>
    <tr><td>CL</td><td align=center>Common Lisp</td><td align=center>No</td><td>Lateral R</td></tr>
         </blockquote>
    <tr><td>HS</td><td align=center>Haskell </td><td align=center>No</td><td>Applications</td></tr>
</div></div>
    <tr><td align=left>JOB</td><td align=center>WFL </td><td align=center>Yes</td><td>JCL </td></tr>
 
    <tr><td>LP</td><td align=center>LogTalk</td><td align=center>No</td><td>Lateral L</td></tr>
    <tr><td>PL</td><td align=center>Prolog</td><td align=center>No</td><td>Plain Prolog</td></tr>
    <tr style="background-color:white;font-size:10px;"><td colspan=4 align=center>Back </td></tr>
    <tr><td>MINT</td><td align=center>MINT 3</td><td align=center>Yes</td><td>MCP direct interpreter</td></tr>
    <tr><td>SUBROUTINE</td><td align=center><a href=https://www.gnu.org/software/marst/><b>A60</b></a></td><td align=center>Yes</td><td>JCL </td></tr>
    <tr><td>UNIT</td><td align=center><a style="background-color:aliceblue;"  href=https://jmvdveer.home.xs4all.nl/en.algol-68-genie.html><b>A68</b></a></td><td align=center>Yes</td><td>System Applications</td></tr>
    </table><br><br>
    </center>
  Intrinsic means the lang is native to MCP/WFL and doesn't require COMPILE or BIND to produce a RUN eligible object title.<br>
  MAKE binds job titles to files executable by the <b>cande</b> MCS with the START or SCHEDULE commands.
  <div style="width:60%;text-align:justify;">
  WFL(JCL) job streams are translated from source text to A60/C, A68, and MINT then  compiled and linked to the Barton machine, or interpreted by genie or MINT, respectively. WFL(JCL) is A60 translated to C, compiled and bound, interspersed with the JCL statements interpreted by the B machine. Non-intrinsic code forms unified code trees in the DGUI and is maintained there under the control of the governing build  statements and commands. Thus, a general WFL job orchestrates an application divided into system part executed by the B machine and application parts executed in the OS image extended from the base OS by the B machine.<br><br>'WFL' used without the JCL qualifier or 'WFL workframe' refers to general source processing framework of the high level part of the DCP. Build statements and commands refers to COMPILE/BIND/MAKE.
  </div>
</blockquote><br><br>
  <span style="position:relative;top:-30px;font-size:12px;">The namestyles are a homage to <a href=https://en.wikipedia.org/wiki/Burroughs_MCP>MCP</a> and <a href=https://en.wikipedia.org/wiki/Conversational_Monitor_System>VM/CMS</a> mainframe OSes, both still in use and Unisys WFL (<a style="background-color:aliceblue;"  href=https://public.support.unisys.com/aseries/docs/clearpath-mcp-18.0/86001047-516/index.html>Work Flow Language</a>). The machine thus defined will be ported to other cloud vendors (Google, Azure, et. al.) after workout in Akamai (linode) and AWS.</span>
<div  style="float:right;text-align:center;font-size:12px;position:relative;left:-150px;top:-230px;width:400px;font-family:Papyrus;" ><a href=https://en.wikipedia.org/wiki/Abydos_King_List><img align=right width=400px src=https://meansofproduction.biz/images/kings_list.012.jpg></a><br>The Abydos Kings List &nbsp; c. -400 &nbsp; to &nbsp; 1400 &nbsp; 公元, &nbsp; Menes &mdash; Seti I</div>
</blockquote>
</div>
</div>
<div style="position:relative;top:-100px;">
  <hr style="position:relative;left:20px;" width=80%>
<div id="10CC" style="position: relative;text-align:center;height:150px;">
<video id="10C" style="position: relative;top:-10px;" title="Pharoah bids Hebrews glean own straw with same count of bricks, presumably for Pi Rameses. The court snickers, Nefertari and Aaron look to Moise who stalks out." poster="http://meansofproduction.biz/images/TIVlarge.png" controls>
        <source src="https://meansofproduction.biz/pub/tldrMCPWFL.webm" type='video/webm'; />
         <p>No content matching HTML5 video setup!</p>
  </video></div></div></div></div>
<script>
<script>
var coll = document.getElementsByClassName("collapsible");
var coll     = document.getElementsByClassName("collapsible");
var bText    = document.getElementById("tldrDet");
var video    = document.getElementById("10C");
var vd        = document.getElementById("10CC");
var isPlaying = false;
var i;
var i;


Line 117: Line 200:
     if (content.style.display === "block") {
     if (content.style.display === "block") {
       content.style.display = "none";
       content.style.display = "none";
      bText.innerHTML = "tl:dr";
     } else {
     } else {
       content.style.display = "block";
       content.style.display = "block";
      bText.innerHTML = "collapse";
      vd.style.display = "none";
     }
     }
   });
   });
};
video.addEventListener("ended", function() {
      vd.style.display = "none";
});
video.addEventListener("play", function() {
      isPlaying    = true;
      vd.height    = 800;
      vd.style.top  = "-400px";
      vd.style.left = "-400px";
});
function kill10C() {
if (isPlaying) return;
vd.style.display = "none";
}
}
</script>
window.timeoutID = setTimeout(kill10C,7000);
</div>
</script><br><img width=150 align=right src=https://juan.ai-integration.biz/xasppage/xasppage.pl?XASPPAGE_STYLE=0&P=MCPCMS>
</html>
</html>

Latest revision as of 11:07, 19 April 2024

mcpcms  

  conversational monitoring system  
DCP Shell  
    minimalist clustering paradigm  

  launch   — an MCP cell ¹ provisioned by DCP per your current context. ²
Dual 6700, c. 1971/2, binding says MK 0.0, so 2.0.0

This page has an audio track, mouseover for title/credit.

Semantic Roadmap

  • 0.3.0 4721-04-17  1st written tl;dr story.†
  • 0.9.0 47yy-00-00  MCP BaselineOfDomainSpace.
  • 1.0.0 47yy-00-00  LAN and cloud vendor provisioning; production geonode flows.
  • 1.1.0 47yy-00-00  DCP BaselineOfKEE.
  • 1.2.0  07y-00-00  DCP in the wild, Transparent Ledger in Books, Shopify Integration.
  • 2.0.0  07y-00-00  ∫ VM (CMS, MVS) / DCP ∂ DS. The MF-One story.
  • 3.0.0  07y-00-00  Done 2nd tl;dr story, 1st working WFL, DGUI for job edit and debug with visual execution.
  • 4.0.0  07y-00-00  Mature DDD/KEE product.
MCP-CMS — a platform for the Domain Control Program, with an aesthetic in homage to the Burroughs and IBM OSes.

¹ Resource limits are dynamically set except for F class which always gets the system limit if there is one which for billable accounts is the set spend limit.
² Set parameters for your cloud provider in the DS Dashboard control blocks in your DCMS account or use system inventory.

† This page and About DCP are top level specifying stories, cog arch internals aren't divulged as I mean them to be adaptable without notice, everything else is source accessible by devops users.

MCPCMS presents the "CANDE" MCS³ for DS users.

AKPERSONs (see Entitlements), and whitelisted stations can connect with the link above or in a running SPO to a MCP running it.

The attempt, if it reaches the MCP, results in completion codes reported in DS control block displays in your DCMS profile.
Only ssh access from the wild, but this page will attempt, using your SAR credentials if the session role is greater than 1.
MCP operator messages will go to your ODT message queue.


³ MCS: a message control subsystem of a MCP.

CANDE MCS

MCP-CMS connects via an MCS which is often referred to as the CANDE MCS although it is more general than that being the default ubiquitous DCP/MCP MCS. Upon mcpcms connect, like the lang specific subshells in the next §, an additional command cande can be used which will process the MCP-CMS system commands analogous to those in the MCP 15 document above. The system command processor is also available as a pane in the SPO.

In Burroughs MCP, the CANDE MCS was used ubiquitously. I recall using a full screen editor which i think fed CANDE. The text edit functions are obsolete and not part of the mcpcms cande. CANDE is used in current Unisys MCP but neither it nor the MCS have their former prominence when the OS runs under Windows.

mcpcms

A modified zsh for MCP serves as analog of the CMS from VM/CMS. Upon successful connect, the launch link above results in a terminal session with this shell in the browser. Aside from the modification for the MCP machine model, it is otherwise just zsh however the following (mode) commands are available to establish different shell behaviour in support of the KEE:

  • shcl (common lisp nature)
  • shhs (HsShellScript, haskell nature)
  • upsh (prolog nature)

Lisp and prolog implementations are variable, and multiple can be combined but shcl and upsh themselves use sbcl and swipl, respectively. mcpcms can be accessed with ssh using the following script. Using the FQDSAgentName syntax is equivalent to what the launch link does in an AKPERSONs session.

#!/usr/bin/bash
# save as <fileName> and invoke with <fileName>  <connect-spec> where            
#         
#  <connect-spec> ::= <mcpCommand> <FQDSAgentName> | <connect-spec>
#  <connect-spec> ::= <ipV6Address>:<port> | <ipV4Address>:<port>
#  FQDSAgentName  ::= <agentId>@<domain>[:<port>]
#
#  and the values manually supplied from control blocks in the DCMS account profile where connect attempt results will also be available.  
#  The <mcpCommand>.  indicates the station where the script runs is trusted and the responsible AKPERSON is the operator.
#
if [ -z $2 ] then
  ssh  $1
  exit
fi
#
# Try a connect based on just the FQDSA assuming an eligible station. A port on submitted second parm is ignored with a warning.
# The no <mcpCommand> specified, a DCP determined default shell type is connected.
#
FQDSA=mcp.meansofproduction.biz/?FQDSA=$2&$1
PARMS=$(curl -L $FQDSA)
ssh $PARMS

mcpcms is implemented first for Linux natively running or containerized in docker on Mac and Windows then for the Hercules version where VM/CMS replaces the modified zsh for that special path. Cloud compute resources are dynamically provisioned using either system inventory or user supplied provisioning credentials with supported cloud vendors.

WFL

has eponymous origin in the MCP 12 WFL job control model and supports the DCP with a line of demarcation between the minimalist MCP and its extension specific to DCP which is meant to protect properties of its internals. A way to think about it and my design intent is that MCP is a basic unix cluster machine to host any common mix, while the WFL machine is a private specialization.

Unisys WFL is just a point of departure to our WFL. In Burroughs systems, WFL didn have as high a profile as IBM JCL, the main punch of the overall system, in an industry installation, would be its system of transactions and these ran from a database which the Burroughs architecture delivered seamlessly without WFL to terminals as a special db stack. Our WFL is the central driver and basis of our MCP architecture

  1. is built for the MCP machine model
  2. which is a prime driver for the development of that model
  3. with code blocks containing text of other supported langs

As far as the elaboration of JCL statements and so forth WFL is developed in a bottom up prototyping style without any spec other than the mainframe reference and the DCP/MCP concept, so there will be no documentation for some time other than the text of actual jobs. № 3 above is implemented by variants for the SUBROUTINE statement, with the same attachment of BEGIN and END bounded blocks:

MCP Block Types
Block DeclaratorLanguageIntrinsicPurpose/Role
Front
CLCommon LispNoLateral R
HSHaskell NoApplications
JOBWFL YesJCL
LPLogTalkNoLateral L
PLPrologNoPlain Prolog
Back
MINTMINT 3YesMCP direct interpreter
SUBROUTINEA60YesJCL
UNITA68YesSystem Applications


Intrinsic means the lang is native to MCP/WFL and doesn't require COMPILE or BIND to produce a RUN eligible object title.
MAKE binds job titles to files executable by the cande MCS with the START or SCHEDULE commands.

WFL(JCL) job streams are translated from source text to A60/C, A68, and MINT then compiled and linked to the Barton machine, or interpreted by genie or MINT, respectively. WFL(JCL) is A60 translated to C, compiled and bound, interspersed with the JCL statements interpreted by the B machine. Non-intrinsic code forms unified code trees in the DGUI and is maintained there under the control of the governing build statements and commands. Thus, a general WFL job orchestrates an application divided into system part executed by the B machine and application parts executed in the OS image extended from the base OS by the B machine.

'WFL' used without the JCL qualifier or 'WFL workframe' refers to general source processing framework of the high level part of the DCP. Build statements and commands refers to COMPILE/BIND/MAKE.



The namestyles are a homage to MCP and VM/CMS mainframe OSes, both still in use and Unisys WFL (Work Flow Language). The machine thus defined will be ported to other cloud vendors (Google, Azure, et. al.) after workout in Akamai (linode) and AWS.


The Abydos Kings List   c. -400   to   1400   公元,   Menes — Seti I