Modified CU wanted - (nf)

[rpw3 at fortune.UUCP]

#R:aluxp:-122300:fortune:26900044:000:1270
fortune!rpw3    Apr 12 00:08:00 1984

I am almost embarrassed to post this, but here it is. To send files
to a non-UNIX system (or to a UNIX system if the baud rate is so high
the UNIX on the other end gags, like anything over 300 baud!), I use
the amazing program 'slowcat'! Usage from cu:

	[ dialog with other system, TOPS-10, say ]
	.copy file.ext=tty:	;start the transfer
	~!slowcat 30 <file.to.send >/dev/cul0      # cu ~! escape
	[ you see echo from other system as if you had typed file ]
	^Z			;finish it
	.

The use with UNIX is similar and obvious. (Note: no "-" before "30".)
Larger args get lower transmission speeds.  On my machine, running as
the only user, an argument of "30" gets approximately 28 chars/sec.
Your mileage may vary. ;-}

Rather than tie up net resources sending to net.sources, I include
the entire source of 'slowcat' here, to wit:

+--------------------
| main(argc,argv)
| int argc; char **argv;
| {	int i, c, slowness;
| 
| 	slowness = ((argc > 1) ? atoi(*++argv) : 0) * 100;
| 
| 	while ( read(0,&c,1) == 1){
| 		for(i = slowness ; --i > 0 ;);
| 		write(1,&c,1);
| 	}
| }
+--------------------

Rob Warnock

UUCP:	{ihnp4,ucbvax!amd70,hpda,harpo,sri-unix,allegra}!fortune!rpw3
DDD:	(415)595-8444
USPS:	Fortune Systems Corp, 101 Twin Dolphin Drive, Redwood City, CA 94065