home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / sigm / vols000 / vol017 / movpatch.asm < prev    next >
Assembly Source File  |  1984-04-29  |  3KB  |  87 lines
  1. ;==> fixed bug caused by type     11/5/80--RGF
  2. ;
  3. ; This patch modifies the cp/m 2.2 MOVCPM program for remote operation.
  4. ; This sets up the movcpm itself for the ccppatch mod, which causes
  5. ; the ccp to look on drive A for a com file not found on the current
  6. ; logged-in drive.  In addition, this patch allows changing the ccp
  7. ; commands.  This is useful for remote system security.
  8. ;
  9. ; REQUIREMENTS FOR USE
  10. ; --------------------
  11. ; This file will only work on cpm2.2 versions of movcpm.  Also, the
  12. ; movcpm must have the ccp located at 0A00H.  If it does not, then
  13. ; change the CCPBIAS equate to whereever it is in your system.    If
  14. ; your BIOS is a non-standard size, you will have to change the SIZE
  15. ; equate.  You can determine your system size by examining locations
  16. ; 802 and 801 of your movcpm program with ddt or sid, then set the
  17. ; SIZE equate accordingly.
  18. ;
  19. ; HOW TO PATCH THE MOVCPM PROGRAM
  20. ; -------------------------------
  21. ; After making any changes necessary to this file, use ASM or MAC
  22. ; to assemble it, and produce a HEX file.  Read in the movcpm program
  23. ; with the ccp command:
  24. ;        A>DDT MOVCPM.COM.
  25. ; Then read in the patch hex file with
  26. ;        *IMOVPATCH.HEX
  27. ;        *R
  28. ; After doing this, exit to cp/m command level with ^C, and
  29. ;        A>SAVE XX MOVCPMR.COM
  30. ; where XX is the size (in 256 byte pages) of your movcpm program.
  31. ; It is a good idea to change the name (as done above) to make the
  32. ; program easily recognizable as being the remote-cp/m version.
  33. ;
  34. ;            Ron Fowler
  35. ;            11/2/80 
  36. ;
  37. ; Notes from original version of CCPPATCH.ASM:
  38. ;
  39. ; This patch causes the CCP of a cp/m 2.x system to look on drive A
  40. ; when you are logged into a drive other than A and call for a .COM
  41. ; file that does not exist on that drive.  Giving an explicit drive
  42. ; reference overrides this feature, so that you can always force
  43. ; the file to be loaded from a specific drive.
  44. ;
  45. ;
  46. ;
  47. ;
  48. ;    equates (set up for standard digital research movcpm pgm)
  49. ;
  50. SIZE    EQU    1B00H
  51. CCPBIAS EQU    0A00H
  52.  
  53. ;
  54. ;    SET-UP OF NEW CCP COMMANDS
  55. ;    NOTE: all command names must fill a 4-character field
  56. ;
  57.     ORG    CCPBIAS+310H    ;where the commands are
  58. ;
  59.     DB    'DIR '        ;<== put your new "DIR" cmd here
  60.     DB    'ERA '        ;<== put your new "ERA" cmd here
  61.     DB    'TYPE'        ;<== put your new "TYPE" cmd here
  62.     DB    'SAVE'        ;<== put your new "SAVE" cmd here
  63.     DB    'REN '        ;<== put your new "REN" cmd here
  64.     DB    'USER'        ;<== put your new "USER" cmd here
  65. ;
  66. ;
  67. ;    Modify the CCP for A-drive check for COM files
  68. ;
  69.     ORG    CCPBIAS+6DBH
  70.     JZ    7F2H        ;jump to patch
  71. ;
  72.     ORG    CCPBIAS+7F2H    ;replaces an unused area of NOP's
  73.     LXI    H,7F0H        ;get drive from current command
  74.     ORA    M        ;accum was 0 on entry, so this fetches drive
  75.     JNZ    76BH        ;command has explicit drive...give error
  76.     INR    M        ;force explicit reference to drive A
  77.     LXI    D,7D6H        ;we need to do set up when..
  78.     JMP    6CDH        ;..we enter ccp
  79. ;
  80. ;
  81. ;    update the cpm bitmap for this patch
  82. ;
  83.     ORG    CCPBIAS+SIZE+20H-2
  84.     DB    8,89H        ;these locations need relocation
  85. ;
  86.     END
  87.