[REBOL] Re: read ftp:// error
From: agem:crosswinds at: 2-Jun-2001 14:16
[REBOL []
{
Hi, Scott, Thorsten, Sterling, Brett, Anton
regarding version-security
i'm very reluctant to suggest this, after all our
clever injection stuff, :)
but maybe using the molded source is the safest thing?
We can have version-check with
1234 = probe checksum mold ftp
we can create patcher with parsing the source,
instead of stepping through blocks.
(Ok, not really needed.)
we can rename the patched protocol, have original ftp://
and patched-ftp:// parallel then.
(Hm, a 'make would do this too.)
after that we write a %patched-ftp.r to be called by %user.r
(more overhead.. but)
this should be mostly version-safe?
ok, gets pretty long now. maybe simply posting full source ;-)
but the [probe checksum] is clever, yes? ;-) (hope it works
everywhere..)
-Volker
}
;------
;----------------
convert-date-source: {
{not handy yet, insert please}
}
;----------------
either 5772242 <> probe checksum mold system/schemes/ftp [
request/ok "wrong rebol-version! patched ftp disabled!"
] [
either not parse mold/only system/schemes/ftp [
copy begin thru
{ add-date: func [] [
month: }
copy rest to end
]
[request/ok "could not parse right. check script!"]
[
body: rejoin [convert-date-source begin " convert-month "
rest]
save/header save-file: %patched-ftp.r compose/deep [
system/schemes: make system/schemes [
patched-ftp: (load body)
]
]
[title: "patched ftp protocol"]
]
;check it
do save-file
probe first system/schemes
;read patched-ftp://something
]
]
>>>>>>>>>>>>>>>>>> Ursprüngliche Nachricht <<<<<<<<<<<<<<<<<<
Am 01.06.01, 13:20:35, schrieb "GS Jones" <[gjones05--mail--orion--org]> zum
Thema [REBOL] Re: read ftp:// error:
> Hi, Thorsten, Sterling, Volker, Brett,
> This volleyball game now spans the globe. Brett, you are really going
> to have to hit the ball hard from "Down Under"
<-- lots of great & funny stuff snipped, think you have it allready
;-)
-->
