home *** CD-ROM | disk | FTP | other *** search
- .key dsdir,gdir
- if "<dsdir>" EQ ""
- echo "DSPatch Version 3"
- echo " This upgrades DiskSalv 3 to V12.18/19 from either"
- echo " V12.15/16 or V12.17/18."
- echo ""
- echo "Usage: DSPatch [Path to DiskSalv3] [Path to DiskSalv.guide]"
- echo " where 'Path to DiskSalv3' is the path of the"
- echo " directory containing DiskSalv 3"
- echo " 'Path to DiskSalv.guide' is the path of the"
- echo " directory containing DiskSalv.guide, if different"
- quit
- endif
-
- if not exists <dsdir>
- echo "Error: Can't Find <dsdir>!"
- quit
- else
- assign INSDS: <dsdir>
- endif
-
- if "<gdir>" EQ ""
- assign INSDSGUIDE: INSDS:
- else
- if exists <gdir>
- assign INSDSGUIDE: <gdir>
- else
- echo "Error: Can't Find <gdir>!"
- skip done
- endif
- endif
-
- if not exists INSDSGUIDE:DiskSalv.guide
- echo "Installing DiskSalv.guide"
- copy DiskSalv.guide INSDSGUIDE:
- copy DiskSalv.guide.info INSDSGUIDE:
- else
- version >nil: INSDSGUIDE:DiskSalv.guide VERSION 12 REVISION 18
- if NOT WARN
- echo "DiskSalv.guide up-to-date"
- else
- echo "Installing DiskSalv.guide"
- copy DiskSalv.guide INSDSGUIDE:
- copy DiskSalv.guide.info INSDSGUIDE:
- endif
- endif
- assign INSDSGUIDE:
-
- if not exists INSDS:DiskSalv
- echo "Can't Find DiskSalv on <dsdir>!"
- skip done
- endif
-
- lab DSPATCH
-
- version >nil: INSDS:DiskSalv VERSION 12 REVISION 19
- if NOT WARN
- echo "DiskSalv upgrade patch already applied"
- skip done
- endif
-
- version >nil: INSDS:DiskSalv VERSION 12 REVISION 18
- if NOT WARN
- echo "DiskSalv upgrade patch already applied"
- skip done
- endif
-
- version >nil: INSDS:DiskSalv VERSION 12 REVISION 17
- if NOT WARN
- if EXISTS DSP1617.patch
- echo "Building DS17to19.patch..."
- spatch -oDS17to19.patch -pDSP1617.patch DS16to18.patch
- delete DSP1617.patch
- endif
- if NOT EXISTS DS17to19.patch
- echo "Patch file DS17to19.patch must be in the current directory"
- quit
- endif
- echo "Patching DiskSalv V12.17 to V12.19..."
- echo " (old version will be called DiskSalv1217)"
- rename INSDS:DiskSalv INSDS:DiskSalv1217
- copy DiskSalv.info INSDS:
- spatch -oINSDS:DiskSalv -pDS17to19.patch INSDS:DiskSalv1217
- echo " Patch applied"
- skip done
- endif
-
- version >nil: INSDS:DiskSalv VERSION 12 REVISION 16
- if NOT WARN
- if NOT EXISTS DS16to18.patch
- echo "Patch file DS16to18.patch must be in the current directory"
- quit
- endif
- echo "Patching DiskSalv V12.16 to V12.18..."
- echo " (old version will be called DiskSalv1216)"
- rename INSDS:DiskSalv INSDS:DiskSalv1216
- copy DiskSalv.info INSDS:
- spatch -oINSDS:DiskSalv -pDS16to18.patch INSDS:DiskSalv1216
- echo " Patch applied"
- skip done
- endif
-
- version >nil: INSDS:DiskSalv VERSION 12 REVISION 15
- if NOT WARN
- if EXISTS DSP1415.patch
- echo "Building DS15to17.patch..."
- spatch -oDS15to17.patch -pDSP1415.patch DS14to16.patch
- delete DSP1415.patch
- endif
- if NOT EXISTS DS15to17.patch
- echo "Patch file DS15to17.patch must be in the current directory"
- quit
- endif
- echo "Patching DiskSalv V12.15 to V12.17..."
- echo " (old version will be called DiskSalv1215)"
- rename INSDS:DiskSalv INSDS:DiskSalv1215
- copy DiskSalv.info INSDS:
- spatch -oINSDS:DiskSalv -pDS15to17.patch INSDS:DiskSalv1215
- echo " Patch applied"
- skip BACK DSPATCH
- endif
-
- version >nil: INSDS:DiskSalv VERSION 12 REVISION 14
- if NOT WARN
- if NOT EXISTS DS14to16.patch
- echo "Patch file DS14to16.patch must be in the current directory"
- quit
- endif
- echo "Patching DiskSalv V12.14 to V12.16..."
- echo " (old version will be called DiskSalv1214)"
- rename INSDS:DiskSalv INSDS:DiskSalv1214
- copy DiskSalv.info INSDS:
- spatch -oINSDS:DiskSalv -pDS14to16.patch INSDS:DiskSalv1214
- echo " Patch applied"
- skip BACK DSPATCH
- endif
-
- echo "DiskSalv upgrade patch not supplied for this version"
- version INSDS:DiskSalv
-
- lab DONE
- assign INSDS:
- assign INSDSGUIDE: