Document ID: /fineweb-2-swissfilter-quality_10-filterrobots/filtered/03359.jsonl.gz/2832

CP01
CP01 / TSMON
ein "Steuersystem zur zentralen Bedienung mehrerer Anwendungen", also ein 'Windows' für zeilenorientierte Bildschirme an Mainframes.
Das Programm ist in BS2000 Assembler geschrieben und war ablauffähig ab den Prozessormodellen 7.760 (Mono-) und 7.761/2 (Bi-) von Siemens, wurde dann Anfang 90er Jahre für den 31-Bit Adressressraum fit gemacht um dann auf den H60, H90 und VM2000 Modellen im XS-Modus lauffähig zu sein.
Für die Systemtechniker und den Systemsupport gab es, etwa mit den 31-Bit-Modellen, einen sogenannten Serviceprozessor der vollkommen unabhängig vom Hauptrechner diesen überwachen und steuern konnte.
Dafür kaufte Siemens Deutschland von Siemens Schweiz den CP01-Fork TSMON mit dem sich die System-Spezialisten von einem Terminal aus gleichzeizig auf viele Kundenrechner am Serviceprozessor einloggen und arbeiten und zwischen diesen switchen konnten (Teleservice).
CP01 arbeitete rein asynchron in sogenannten Contingencies, also ereignisgesteuerten Routienen, und diese waren vollkommen reentrant programmiert. Rein asynchron in dem Sinne, dass es keine 'Hauptschleife' gab, die sich dreht bis etwas passiert, sondern wenn nichts zu tun war stand die Zeit für den Prozess still. Reentrant [1], also wiedereintrittsinvariant, mussten die Routinen sein da sie zu jedem Zeitpunkt irgendwo im Code unterbrochen werden konnten und bei Wiederanlauf natürlich die Register und Speicherbereiche den Zustand bei Unterbruch wieder aufnehmen mussten.
Das war auch notwendig, da jede Contingency parallel ablaufen konnte und CP01 bis zu 44 reale Terminals und theoretisch, nur durch Systemkomponenten begrenzt - zu dieser Zeit etwa 250-2000 -, unendlich viele Verbindungen pro Terminal aufbauen konnte; bei der Nutzung von nur einem Prozess.
Heute werden diese Aufgaben im Allgemeinen vom System und der jeweiligen Programmiersprache resp. ihrer Bibliotheken in Form von Threads übernommen. Einerseits Schade, denn interressant so etwas zu programmieren ist es halt schon, andererseits ist es sehr fehleranfällig und aufwändig und darum ist heute ohne Frage die Wahl der Threads oder ähnlichen Mechanismen die richtige.
Das Programm ist, wie es sich für Assembler gehört, statisch gebunden und besteht in etwa aus den folgenden Modulen :
Doku - die Dokumentation
mcp002 - das Hauptprogramm (Main sozusagen)
cpbufh - eine Ringpuffer Verwaltung
yrecasy - asynchroner Datenempfang eines Partnerprogramms
cpclock - Timer STXIT für automatischen Lock
cpcstat - residente Class-6 Speicherseiten allozieren
cpadmin - CP01 Administrations Module
cpauser - Hardcopy Admin Module
cpbltin - Bulletin-Datei bereitstellen
cpkmask - Login Maske
cplogin - Benutzer Login Bearbeitung
cpsysfl - System Logging Module
cpcopy - Sequenzdatei neu laden
cphelp - Help und Message Module
cpinf - Zustandsinformationen über reelle und virtuelle Terminals und Applikationen
hcinit - Bildschirm-Hardcopy aufbereiten
hcprco - Bildschirm-Hardcopy drucken
stxerr - STXIT Fehlerbehandlungsroutine, meist Speicher-Adressfehler
statein - DSECT, Stations-Tabelle für ein Terminal. Wird für jedes Terminal einem reservierten Speicherbereich überlagert.
userein - DSECT, Tabelle für ein virtuelles Terminal, eine Applikation. Wird für jede Verbindung einem reservierten Speicherbereich überlagert.
cp.p.assemb - Assembler Prozedur zum Übersetzen der einzelnen Module
cp.p.link - Binder Lauf zum Erstellen des ablauffähigen Programms