pete@wlbreng1.UUCP (04/01/87)
This is a shell procedure that will allow you to patch a level I LOGIN
command to run on a level II system. One is not provided with the
system, and the Level I version will crash a level II system. This
patch was co-written by Kent Meyers and myself. Enjoy!
Pete Lyall
=====================================================================
===============cut here=============cut here==========cut here========
* Login II Patch
* ==============
*
* This patch will allow you to use your level I 'LOGIN' command (which
* currently crashes on a level II system) on a level II system. It corrects
* the code so that it uses the F$suser call instead of trying to manipulate
* the system's direct page, which is inaccessible under level II for
* writing (in USER mode). This patch is a joint effort of Kent Meyers and
* Pete Lyall.
* ========================================================================
display c
t
* LOGIN2.DBG - A patch script by Pete Lyall
*
* This is a shell procedure to use DEBUG to patch the LOGIN command
* for use on a Level II OS9 system. Note: If you HAVE NOT
* already patched your DEBUG command for use on a level II system
* then either do THAT first, or run this script on a LEVEL I
* system where DEBUG will work.
*
*
-t
tmode .1 -pause
load login
debug
l login
. .+52
=49
=20
=32
l login
. .+57
=30
l login
. .+5a
=31
l login
. .+69
=49
=20
=32
l login
. .+6e
=30
l login
. .+71
=31
l login
. .+234
=1f
=02
=10
=3f
=1c
=12
l login
. .+49b
=66
=15
=73
q
save login.II login
display c
t
* The patch is completed.
*
* Now simply UNLINK LOGIN until it is out of memory
*
* The updated LOGIN command has been saved as 'login.ii' in
* the current directory.
*
* To use it, simply copy it to a LEVEL II disk's CMDS directory
* and rename it to 'login'. Also ensure that all the attributes
* are set properly for execution.
*
* Enjoy!
--
Pete Lyall
Usenet: {trwrb, scgvaxd, ihnp4, voder, vortex}!wlbr!pete
!wlbreng1!pete
!wlpx!pwl
Compuserve: 76703,4230 (OS9 SIG Sysop)
OS9 (home): (805)-985-0632 (24hr./1200 baud)
Phone: (818)-706-5693 (work 9-5 PST)
----------------------------------------------------------------------