World: r3wp

I posted to the french forum as I thought there has the most experience 
with UniServe ...

Not much. appart Dockimbel of course

I see.

The doc said :

Client =  Property set at runtime pointing to the current client 
port! value
At runtime mean while the client is connected.

ahh .. so I have to set this on-connected

Yes, it's what i think

rather .. on-new-client

I've posted a new version 0.0.4 : http://www.compkarori.com/vanilla/display/Smtpd.r

seems not to correctly set the counter back by one when closing client 
connection

oops ,.. it seems to be working.  Spam is now flooding in :(

fix was to send an error code on receiving EHLO command

seem to be receiving hundreds of spam from judge.lis.net.au

After repeated testing, I have bumped up the version to 0.1.0 at 
http://www.compkarori.com/vanilla/display/Smtpd.r


As explained in the URI, a form of teergrubbing ( anti-spam ) is 
implemented.

I'm getting 4 smtp connections to my server per min .. all of it 
spam.

I left my smtp service running all night .. about 10 hours .. and 
after the 2190'th spam, I hit the infamous "invalid data type during 
recycle" :(

I'll first try switching to 

>> rebol/version
== 2.5.55.3.1

Had the service running all day while I was at work .. and had over 
1700 smtp connections, of which the script allowed 6 email thru. 
 No spam.

I'm now going to see if I can implement greylisting .. which is an 
interesting technique for fighting spammers.

Interesting stuff.  With greylisting, and an enhancement I made to 
the greylisting technique, I have managed to reduce spam.  In 6 hours 
I 6 spam made it through to the spamtrap addresses, whereas I would 
have expected more like 20.  And that is from about 800 smtp connections 
.. or potentially 800 spam being sent to my MX record.

should read .. 6 spam.

And that is with a block period of 10 seconds.  The greylisting paper 
suggests using 1 hour and I'll try that now.

Graham - what is your experience with Uniserve so far? So far so 
good? :-)

Good.

Needs more documentation on writing modules .. but dockimbel says 
he will hopefully produce those in the next couple of days.

As he says, it's very easy to write a new service for it.

Pekr: Uniserve is uberkool!! It is my main webserver since january 
2003. Since then it crashed 2-3 times, not sure it was uni or rebol 
8)

what version of rebol are u using?

/core 2.5.8.2.4

Does that have the new async core in it?

I can't remember all these numbers ... :(

no 8(

I was getting async read errors, and at least one data type recycle 
error before switching to  2.5.55.3.1

Uniserve is not usable with recent async Core. It use the "old" async 
port system.

so, doc said .. but my smtp service appears to be working ...

dunno what this means ...

Graham, can you encap uniserve scripts?

I don't see any reason why not ...

need to redefine 'launch back to itself again.

it looks for files in the services directory .. need to change that 
as well I guess

Last I checked uniserve uses a directory structure to handle stuff. 
So I wonder if the encaped app needs to replicate this structure.

I just encap Uniserve script 2 weeks ago.

Need some tricks to encap the protocols/services, that normally Uniserve 
loads from disk at startup.

Thats what I thought?

DideC, Do you mind sharing?

Didier, do you have an example of your encapped changes ?

I want to add database storage for my smtp service, and since I use 
odbc, I have to encap to distribute ...otherwise users have to purchase 
command

( and, no, I don't know anything about mysql .. )

In short.

Protocols and services (or whatever else) are encapped as data in 
a block! (a cache sort-of).

instead of 'do/'load, you have to use 'do-cache/'load-cache in your 
script.


The cache functions are initialize differently either you are encapping 
or doing the script.

if you do cgi, then you have to launch a new version of the encapped 
script for each cgi ?

Here is an example of a starter that can be used for doing the script 
and to encap it :

Rebol [

 title: "example of starter script that act the same with View after 
 encap"
]

#include %/e/rebol/sdk/source/mezz.r
#include %/e/rebol/sdk/source/prot.r
#include %/e/rebol/sdk/source/view.r

;***** This is the function that make the tricks
#include %uniserve/libs/encap-fs.r 
if not value? 'encap-fs [do %uniserve/libs/encap-fs.r]

set-cache [
	%uniserve/uni-engine.r		[#include %uniserve/uni-engine.r]
	%uniserve/libs/headers.r	[#include %uniserve/libs/headers.r]
	%libs/log.r					[#include %uniserve/libs/log.r]
	%uniserve/protocols/HTTP.r	[#include %uniserve/protocols/HTTP.r]
	
	%your-file.r					[#include %path/to/your-file.r]
	;...
]

;***** Start
do-cache %uniserve/uni-engine.r
do-cache %uniserve/libs/headers.r

UniServe-path: %./uniserve/
logger/level: none


;***** You have to load protocols and services before starting Uniserve
do-cache %uniserve/protocols/HTTP.r

;***** Uniserve Initialise
; Require like this to not loading protocols/services from disk
uniserve/boot/no-loop/with []

;***** Your script initialise
;...