home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / cpm / utils / filcpy / rpl.lbr / RPL.WZ / RPL.WS
Text File  |  1987-02-15  |  7KB  |  172 lines

  1. .hm 1
  2. .mb 6
  3. .he R P L -- Replace Copy Version 1.0
  4.  
  5.  
  6.                  RP╠ - Replacσ Cop∙ Versioε 1.░ 
  7.  
  8.                     Holme≤ Complea⌠ Computing
  9.  
  10.                         RicharΣ A« Holmes
  11.                     484╡ Saε Sebastiaε Avenue
  12.                        La≤ Vegas¼ N╓ 8912▒ 
  13.  
  14.                         Februar∙ 12¼ 1987
  15.  
  16.      
  17.      Thi≤ prograφ i≤ iε thσ publiπ domain«á  Permissioε i≤ hereb∙ ì
  18. granteΣ fo≥ thσ non-commercia∞ usσ oµ thi≤ program«  N∩ guaranteσ ì
  19. oµ suitabilit∙ i≤ made.
  20.  
  21.  
  22.                           Introduction
  23.                           ------------
  24.  
  25.      RP╠á i≤ ß Z8░ CP/═ 2.▓ prograφ useΣ t∩ cop∙ disδ files«á  I⌠ ì
  26. caε perforφ thσ basiπ functioε oµ PIP«  Therσ arσ howeve≥ severa∞ ì
  27. differences«á  Iε additioε t∩ no⌠ acceptinτ PIP'≤ switches¼ thesσ ì
  28. majo≥ difference≤ exist:
  29.  
  30.      a« Iµ thσ destinatioε filσ alread∙ exists¼ i⌠ i≤ overwritteε ì
  31. iε place«á Thσ filσ i≤ no⌠ firs⌠ copieΣ anΣ theε renamed«  Iµ thσ ì
  32. ne≈ versioε oµ thσ filσ i≤ longe≥ thaε thσ olΣ one¼ morσ spacσ i≤ ì
  33. allocateΣá anΣ thσ wholσ filσ i≤ copied«á  Iµ thσ ne≈ versioεá oµ ì
  34. thσ filσ i≤ shorte≥ thaε thσ olΣ one¼á thσ extrß disδ sector≤ arσ ì
  35. no⌠ deallocated«á  The∙ exis⌠ a≤ unuseΣ sector≤ oε thσ enΣ oµ thσ ì
  36. file.
  37.  
  38.      b«á Beforσá RP╠ allocate≤ ne≈ spacσ oε thσá disk¼á i⌠á firs⌠ ì
  39. create≤ ß temporar∙ filσ oµ (nominally⌐ 4K« Thi≤ spacσ presumabl∙ ì
  40. i≤á nex⌠ t∩ thσ directory«á  Theε thσ ne≈ spacσ i≤ allocateΣá fo≥ ì
  41. thσá filσ cop∙ anΣ thσ temporar∙ filσ i≤ deleted«á  Thus¼á iµ thσ ì
  42. spacσ nex⌠ t∩ thσ director∙ i≤ no⌠ allocateΣ beforσ thσ cop∙á wa≤ ì
  43. performed¼ i⌠ remain≤ unallocateΣ afte≥ thσ copy.
  44.  
  45.      c«á RP╠ caε handlσ use≥ number≤ oµ thσ forφ  du║á  wherσ "dó ì
  46. i≤á aεá optiona∞á disδá namσ anΣ "uó i≤á thσá use≥á number«á  Fo≥ ì
  47. example¼á an∙á oµ thσ followinτ arσ acceptablσ a≤ par⌠ oµá eithe≥ ì
  48. thσ sourcσ o≥ thσ destinatioε filσ specification.
  49.  
  50.           A0║     3B║     E14║     5║     C:
  51.  
  52.  
  53.                            Wh∙ Usσ It?
  54.                            -----------
  55.  
  56.      Therσá arσ severa∞ case≤ wherσ RP╠ i≤ preferablσá ove≥á PIP«  ì
  57. Thσ firs⌠ i≤ wheε thσ destinatioε disδ doe≤ no⌠ havσ spacσ fo≥ aε ì
  58. extrßá cop∙ oµ thσ file«á  Normall∙ yo⌡ woulΣ havσ t∩ deletσá thσ ì
  59. filσá froφ thσ disδ beforσ copyinτ i⌠ witΦ PIP«á  RP╠ wil∞ simpl∙ ì
  60. overwritσ thσ filσ s∩ therσ i≤ n∩ neeΣ t∩ deletσ i⌠ first.è
  61.      Thσ seconΣ casσ i≤ wherσ yo⌡ wan⌠ t∩ usσ use≥ number≤ oε thσ ì
  62. sourcσ anΣ thσ destinatioε filσ specifications«á  RP╠ caε cop∙ t∩ ì
  63. o≥ froφ an∙ use≥ number.
  64.  
  65.       Thσá maiεá reasoε ╔ wrotσ i⌠ follows«á  I⌠ ha≤ t∩á d∩á witΦ ì
  66. runninτá ofµ oµ floppie≤ anΣ keepinτ spacσ opeε a⌠ thσá beginninτ ì
  67. oµ thσ Drivσ ┴ disδ fo≥ SUBMIT'≤ $$$.SU┬ file«  Le⌠ mσ explain.
  68.  
  69.      ╔á ruεá oεá IMSAI'≤ witΦ Z8░á cpus¼á floppie≤á anΣá ramdisk«  ì
  70. Wheneve≥ possible¼á ╔ loaΣ u≡ ramdisδ (drivσ E:⌐ anΣ makσ i⌠á thσ ì
  71. defaul⌠ drive«á  ╔ stil∞ warφ boo⌠ froφ thσ floppy«  ╔ als∩ writσ ì
  72. thσá SUBMI╘ workinτ filσ t∩ drivσ A«á  ╔ tr∙ t∩ carefull∙ la∙ ou⌠ ì
  73. thσ systeφ flopp∙ disδ iε A║ t∩ optimizσ filσ access«  Tha⌠ is¼ ╔ ì
  74. kee≡ somσ spacσ freσ nex⌠ t∩ thσ director∙ (fo≥ $$$.SUB⌐ anΣ theε ì
  75. comσ thσ systeφ utilities¼á witΦ thσ mos⌠ frequentl∙ useΣ neares⌠ ì
  76. thσ directory.
  77.  
  78.      Wheneve≥ ╔ wan⌠ t∩ updatσ ß filσ oε thi≤ systeφ disk¼á ╔á d∩ ì
  79. no⌠á wan⌠ thσ spacσ nex⌠ t∩ thσ director∙ t∩ bσá allocated«á  Thσ ì
  80. file≤á oεá thi≤á disδ arσ usuall∙ invarian⌠ iεá size«á  The∙á arσ ì
  81. usuall∙á replaceΣá b∙á ßá differen⌠á configuratioεá oµá thσá samσ ì
  82. program«á  Usuall∙á sucΦá file≤á wil∞ fi⌠ exactl∙á ove≥á thσá olΣ ì
  83. version«á  Wheεá thσ ne≈ versioε oµ thσ filσ i≤ larger¼á ╔á don'⌠ ì
  84. wan⌠á thσá extrßá spacσ t∩ bσ allocateΣ nex⌠á t∩á thσá directory«  ì
  85. Thereforσá RP╠ create≤ ß temporar∙ filσ whicΦ "coversó thi≤ spacσ ì
  86. oεá disk«á  I⌠ theε copie≤ thσ ne≈ sector≤ t∩ thσá disδá (farthe≥ ì
  87. awa∙ froφ thσ directory⌐ anΣ append≤ theφ t∩ thσ olΣ file«á  Theε ì
  88. thσá temporar∙á filσá i≤ deleted¼á makinτ thσ spacσ nex⌠á t∩á thσ ì
  89. director∙ availablσ again.
  90.  
  91.  
  92.                               Usage
  93.                              ------
  94.  
  95.      RP╠á i≤ executeΣ witΦ ß commanΣ tha⌠ look≤ likσ ß simplσ PI╨ ì
  96. command«  
  97.  
  98.      A╛ RP╠ out=in
  99.  
  100. wherσ "outó i≤ thσ destinatioε filσ specificatoε anΣ "inó i≤á thσ ì
  101. sourcσ filσ specification«  Thσ filσ specification≤ ma∙ includσ ß ì
  102. drive¼ use≥ number,filenamσ anΣ extension«  Fo≥ example,
  103.  
  104.      A╛ RP╠ XYZ.ABC=A7:FOO
  105.  
  106. wil∞á cop∙á FO╧ froφ use≥ ╖ oε drivσ ┴ t∩ XYZ.AB├ iε thσá curren⌠ ì
  107. use≥á areß oε thσ defaul⌠ drive«á  Iµ thσ filenamσ anΣá extensioε ì
  108. arσ omitteΣ froφ thσ destinatioε filespec¼á theε thσ filenamσ anΣ ì
  109. extensioε froφ thσ sourcσ filespeπ arσ used«  Fo≥ example,
  110.  
  111.      A╛ RP╠ E:=B:FOO.BAZ
  112.  
  113. copie≤ FOO.BA┌ froφ drivσ B║ t∩ E:.
  114.  
  115.      WildcarΣá character≤á (¬ anΣ ?⌐ arσ alloweΣá iεá thσá sourcσ ì
  116. filenamσá and/o≥á extensioεá witΦá thσá expecteΣá results«áá  Fo≥ ìèexample,
  117.  
  118.      A╛ RP╠ B:=E:*.COM
  119.  
  120. copie≤ thσ .CO═ file≤ froφ E║ t∩ B:.
  121.  
  122.      Followinτá thσ filσ spec≤ ma∙ bσ ß specificatioε oµ ho≈ mucΦ ì
  123. spacσ t∩ reservσ beforσ allocatinτ spacσ t∩ thσ copieΣ file«  Thσ ì
  124. forφ i≤ 
  125.  
  126.      A╛ RP╠ out=iε $nnk
  127.  
  128. wherσ "nnó i≤ ß onσ o≥ tw∩ digi⌠ decima∞ numbe≥ iε thσ rangσ ░ t∩ ì
  129. 32«  Fo≥ example,
  130.  
  131.      A╛ RP╠ FOO=BA┌ $8K
  132.  
  133. specifie≤á reservinτ 8╦ oµ disδ spacσ beforσ allocatinτ ne≈á secì
  134. tor≤ t∩ FOO«  B∙ default¼ 4╦ i≤ reserved.
  135.  
  136.  
  137.                      Installatioε Procedures
  138.                      -----------------------
  139.  
  140.      Thi≤ prograφ i≤ distributeΣ iε RPL.LBR«  Thσ file≤ includeΣ 
  141. are:
  142.  
  143.      RPL.BL╦             F8░ Commoε blocδ declarations
  144.      RPL.DC╠             F8░ declaration≤ fo≥ RPL.BLK
  145.      RPL.DO├             Thi≤ documentatioε iε printablσ form
  146.      RPL.FO╥             F8░ subroutines
  147.      RPL.OB╩             RPL.COM
  148.      RPL.RE╠             Microsof⌠ RE╠ filσ fo≥ RPL.FOR
  149.      RPL.SU┬             SUBMI╘ filσ fo≥ workinτ witΦ RPL.FOR
  150.      RPL.W╙              Thi≤ documentatioε iε WordSta≥ format
  151.      RS.SU┬              SUBMI╘ filσ fo≥ workinτ witΦ RPLSUBS.MAC
  152.      RPLSUBS.MA├         M8░ subroutine≤ anΣ maiε program
  153.      RPLSUBS.RE╠         Microsof⌠ RE╠ filσ fo≥ RPLSUBS.MAC
  154.  
  155.      Iµ yo⌡ recompile/assemble¼ bσ carefu∞ oµ thσ loaΣ order« Seσ ì
  156. thσ .SU┬ file≤ fo≥ thσ prope≥ sequence.
  157.  
  158.      Notσá tha⌠ thσ prograφ i≤ 8╦ long¼á bu⌠ expect≤ therσ t∩á bσ ì
  159. contiguou≤ memor∙ u≡ t∩ abou⌠ 30K«á  I⌠ doe≤ no⌠ checδ fo≥á this¼ ì
  160. jus⌠ use≤ it.
  161.  
  162.      Therσá arσá somσá LDI╥ instruction≤ anΣá relativσá jump≤á iε ì
  163. RPLSUBS.MAC«á  Thi≤á mean≤á yo⌡ mus⌠ bσ runninτ ß Z8░ machinσá o≥ ì
  164. changσ thσ sourcσ code«  
  165.  
  166.      If you find the program useful, feel free to send $5.00 to
  167.  
  168.           Richard A. Holmes
  169.           4845 San Sebastian Avenue
  170.           Las Vegas, NV 89121
  171.     
  172.