Mercurial > hg > Members > kono > nitros9-code
changeset 1930:91fb0d6e789f
Added -t and -n options to dsave
author | boisy |
---|---|
date | Sat, 26 Nov 2005 19:18:11 +0000 |
parents | 83bd67630eb9 |
children | 806378a6049c |
files | level1/cmds/dsave.asm level1/sys/dsave.hp |
diffstat | 2 files changed, 32 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/level1/cmds/dsave.asm Sat Nov 26 19:09:53 2005 +0000 +++ b/level1/cmds/dsave.asm Sat Nov 26 19:18:11 2005 +0000 @@ -12,6 +12,9 @@ * 1r1 2003/12/11 Boisy G. Pitre * Fixed -b option so that it prepends device name in front of os9boot * filename. Also fixed -b= option to work as well. +* +* 2r0 2005/11/26 Boisy G. Pitre +* Added -t and -n options, ala OS-9/68K. nam dsave ttl Multi-file copy utility @@ -29,8 +32,8 @@ * Module header definitions tylg set Prgrm+Objct atrv set ReEnt+rev -rev set $01 -edition set 1 +rev set $00 +edition set 2 mod eom,name,tylg,atrv,start,size @@ -49,6 +52,8 @@ indent rmb 1 onelevel rmb 1 nomakdir rmb 1 +noload rmb 1 don't load copy/cmp +notmode rmb 1 rewrite rmb 1 cpymemsz rmb 1 doverify rmb 1 @@ -269,8 +274,16 @@ sta <nomakdir bra FixCmdLn IsItR cmpa #'r is it this option? + bne IsItT branch if not + sta <rewrite + bra FixCmdLn +IsItT cmpa #'t is it this option? + bne IsItN branch if not + sta <notmode + bra FixCmdLn +IsItN cmpa #'n is it this option? bne IsItS branch if not - sta <rewrite + sta <noload bra FixCmdLn IsItS cmpa #'s is it this option? bne IsItV branch if not @@ -658,6 +671,8 @@ rts DoPauseOn + tst <notmode do we do the tmode? + bne CPRts leax TMode,pcr bsr CopyCmd leax TPause,pcr get pause command @@ -691,6 +706,8 @@ *ExecRTS puls u,pc DoPauseOff + tst <notmode do we do the tmode? + bne CPRts leax TMode,pcr bsr CopyCmd leax TNoPause,pcr @@ -699,6 +716,8 @@ * bra ExecCmd DoLoadCmp + tst <noload do we load the utility? + bne CPRts leax Load,pcr point to load command bsr CopyCmd copy it to buffer leax Cmp,pcr point to copy command @@ -707,6 +726,8 @@ * bra ExecCmd DoUnlinkCmp + tst <noload do we load the utility? + bne CPRts leax Unlink,pcr lbsr CopyCmd leax Cmp,pcr @@ -715,6 +736,8 @@ * bra ExecCmd DoLoadCopy + tst <noload do we load the utility? + bne CPRts leax Load,pcr point to load command lbsr CopyCmd copy it to buffer leax Copy,pcr point to copy command @@ -723,6 +746,8 @@ * bra ExecCmd DoUnlinkCopy + tst <noload do we load the utility? + bne CPRts leax Unlink,pcr lbsr CopyCmd leax Copy,pcr
--- a/level1/sys/dsave.hp Sat Nov 26 19:09:53 2005 +0000 +++ b/level1/sys/dsave.hp Sat Nov 26 19:18:11 2005 +0000 @@ -1,15 +1,17 @@ @DSAVE -Syntax: Dsave [<opts>] [<pathlist>] +Syntax: Dsave [<opts>] [<to path>] Usage : Generates procedure file to copy all files from the - current directory to <pathlist> + current directory to <to path> Opts : -b = make a system disk by using OS9boot if present -b=<path> = make system disk using path as source -i = indent for directory levels -l = do not process below the current level -m = do not include makdir commands in procedure file + -n = don't load copy/cmp -r = force rewrite of file on copy -s<num> = set copy size to num K + -t = don't issue tmode (pause/nopause) -v = verify copies Examples: