Re: scalable server

To make sure I've understood the lesson you learned from this experience:
HTTP keep alive kept open too many connections which caused an error
message about too many open files.  Is that right?


-- 
Michael


On Tue, Oct 1, 2013 at 7:54 PM, Anne Ogborn <[email protected]> wrote:

> final version - on my modest server this is currently serving about 1100
> requests/sec
>
>
>
> % load the multi-threaded http server
> :- use_module(library(http/thread_httpd)).
> % and the standard handler dispatcher
> :- use_module(library(http/http_dispatch)).
>
> :- use_module(library(http/html_write)).
> :- use_module(library(thread_pool)).
> :- use_module(server_stats).
> :- use_module(library(http/http_session)).
>
> :- thread_pool_create(media,   20, []).
>
> start :-
> http_set_session_options([enabled(false)]),
> http_server(http_dispatch, [port(80), workers(200), timeout(1),
>    keep_alive_timeout(1)]).
>
> :- http_handler('/tnsf.png', give_em_the_grape, [spawn(media),
> priority(10)]).
>
> :- http_handler(/, holder, [prefix]).
>
> give_em_the_grape(Request) :-
>       http_reply_file('tnsf.jpg', [cache(true)], Request).
>
> holder(_Request) :-
> reply_html_page(title('Transsexual Rights'),
>    div(p('Please support transsexual women\'s basic human right to live
> our lives.'))
>   ).
>
>
> :- http_handler('/admin', admin_pg , [spawn(media), priority(20)]).
>
> admin_pg(_Request) :-
> reply_html_page(title('admin'),
> [\http_session_table,
> \http_server_statistics,
> \http_server_pool_table]).
>
> _______________________________________________
> SWI-Prolog mailing list
> [email protected]
> https://lists.iai.uni-bonn.de/mailman/listinfo.cgi/swi-prolog
>
-------------- next part --------------
HTML attachment scrubbed and removed