World: r3wp

#!/sbin/rebol  -qw
Rebol [
 file: %update.r

 purpose: {Update the system clock based upon the nist.gov time server}
 author: {Graham Chiu}
 date: 15-Apr-2007
]

get-nist-correction: func [/local nist-time cpu-time mjd hms] [
 nist-time: read daytime://time-a.nist.gov
 cpu-time: now

 parse/all nist-time [skip copy mjd 5 skip 2 thru " " copy hms 8 skip]
 nist-time: 17/Nov/1858 + to integer! mjd
 nist-time/time: to time! hms
 nist-correction: difference nist-time cpu-time
]

forever [
 if error? set/any 'err try [
 print [ "Current time was: " now ]
 current-time: now + get-nist-correction
 print [ "New time is: " current-time ]

 s: rejoin [ "date -s " {"} current-time/month "/" current-time/day 
 "/" current-time/year " " current-time/time {"} ]
 probe s
 call s 
 ][ probe mold disarm err ]
 wait 00:02:00 ;; wait 2 mins
]

Interesting case, though. Virtualisation is one of the areas I want 
to focus on with Syllable Server

Looks like Ladislav and I wrote this.

the other way is just setup a time server on the host os and use 
the daylight protocol

daytime

How big is your RebelBB message database at the momen?

not very big.  It's just a mail folder

wouldn

wouldn't be more than 100 messages

I use it as a knowledgebase

Oh :-)

That's very lightweight

Could replace the whole RebelBB/Dovecot thing with a REBOL script 
in an evening :-)

It's supposed to be scaleable :)

It would be :-)

I actually stripped out all the html and compress the data which 
is then downloaded by a rebol client

Aargh. How about just doing this with REBOL/Services?

then I would have to write a bbs ( again again again ) in Rebol!

Well, if you call a table of hundred lines a BBS :-)

Is it even updated through a web interface, or just through the REBOL 
client?

registration is via the web ...

OK

but messages are thru the Rebol client

Odd. Doesn't sound like a problem to combine it?

Saved me time :)

http://www.compkarori.co.nz:9000/cgi-bin/rebelBB.cgi

Sounds like it costs more time to configure all the pieces (and keep 
them running on time) then to write it in REBOL

Similar considerations made me build two operating systems instead 
of keeping messing with Linux and Windows

the idea was to avoid writing any specific rebol scripts

But you did, for the REBOL client, and the time?

and to avoid messing with dbms

But you configured an IMAP database?

sure ...

well, there's only one user ... the rebelbb script.

I'll let it go around in my brain and keep you posted on my work

I did try using yahoo mail as the imap server but there was too much 
latency

Have you worked with REBOL/Services?

No

Just the Beer implementation

Does your REBOL client just download a file?

it does an async read of the messages

Oh, IMAP of course

Did the first build run of a stripped Syllable Server last night. 
Worked right away. Stripping out things such as printing and scanning 
reduced the footprint from 370 MB to under 250

That's with all the REBOL goodies still in :-)

How much do the REBOL goodies take up?

what is scanning doing in a server build?

I'm sure someone could think up a scanning server. :-) Document archiving 
or in an embedded device or so

In any case, the regular Syllable Server is meant to be full-featured

The REBOL goodies are tiny, of course

REBOL/Core is 700 KB and that includes rebbase and a bit of documentation