transferring files
[1/4] from: gchiu::compkarori::co::nz at: 7-May-2002 15:53
What do ppl use to transfer files across a network? I can't
be bothered setting up network shares and removing them.
AIM is over kill.
A couple of reblets running rugby both in server/client mode
perhaps? Using http tunneling if want to transfer across
the internet/firewalls ...
--
Graham Chiu
[2/4] from: ingo:2b1 at: 7-May-2002 11:50
Hi Graham,
Graham Chiu wrote:
> What do ppl use to transfer files across a network?
Here're two minimalistic scripts I once used
----- sending ------
#!/bin/r
REBOL []
print ">>> File Send Utility >>>^/"
fn: ask "Filename: "
if #"%" = first fn [
remove/part fn 1
]
fn: to-file fn
sv: ask "Server : "
data: read/binary fn
p: open/binary join tcp:// [sv ":" 4321]
insert p data
----- end sending ------
----- recieving ------
REBOL []
print "<<< File Recieve Utility <<<"
fn: ask "Filename: "
if #"%" = first fn [
remove/part fn 1
]
fn: to-file fn
sp: open/binary tcp://:4321
wait sp
cp: first sp
while [data: copy cp] [
write/append/binary fn data
]
----- end recieving ------
I turned 'em into a single script that may act as sender or reciever,
depending on how you call it, too. If anyone is interested, I'll send it
along ...
Kind regards,
Ingo
[3/4] from: gchiu:compkarori at: 8-May-2002 9:04
> I turned 'em into a single script that may act as sender
> or reciever,
> depending on how you call it, too. If anyone is
> interested, I'll send it
> along ...
>
Hi Ingo,
Would you upload it to the Rebol library?
Thanks,
--
Graham Chiu
[4/4] from: ingo:2b1 at: 8-May-2002 21:57
Hi Graham,
Graham Chiu wrote:
>>I turned 'em into a single script that may act as sender
>>or reciever, depending on how you call it,
<..>
> Hi Ingo,
>
> Would you upload it to the Rebol library?
Please gimme a moment to review it ...
Kind regards,
Ingo