ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/ext/map-scheduler.ext
(Generate patch)

Comparing deliantra/server/ext/map-scheduler.ext (file contents):
Revision 1.41 by root, Fri Aug 24 01:12:11 2007 UTC vs.
Revision 1.42 by root, Wed Sep 19 21:56:30 2007 UTC

10our $SAVE_TIMEOUT = $cf::CFG{save_timeout} || 30; # save maps every n seconds 10our $SAVE_TIMEOUT = $cf::CFG{save_timeout} || 30; # save maps every n seconds
11our $SWAP_LOAD1 = $cf::CFG{swap_load1} || .1; # start aggressively swapping at this load 11our $SWAP_LOAD1 = $cf::CFG{swap_load1} || .1; # start aggressively swapping at this load
12our $SWAP_LOAD2 = $cf::CFG{swap_load2} || .4; # swap as fast as possible at this load 12our $SWAP_LOAD2 = $cf::CFG{swap_load2} || .4; # swap as fast as possible at this load
13 13
14cf::async_ext { 14cf::async_ext {
15 $Coro::current->{desc} = "initial map scanner";
15 $Coro::current->prio (Coro::PRIO_MIN); 16 $Coro::current->prio (Coro::PRIO_MIN);
16 17
17 # load the header of swapped-out maps. 18 # load the header of swapped-out maps.
18 # this is not a correctness issue, it simply saves diskspace 19 # this is not a correctness issue, it simply saves diskspace
19 # because old files will get cleaned up on reset time 20 # because old files will get cleaned up on reset time
50 } 51 }
51 } 52 }
52}; 53};
53 54
54our $SCHEDULER = cf::async_ext { 55our $SCHEDULER = cf::async_ext {
56 $Coro::current->{desc} = "map scheduler";
55 my $timer = Coro::Event->timer (after => 1); 57 my $timer = Coro::Event->timer (after => 1);
56 58
57 while () { 59 while () {
58 $timer->interval ($SCHEDULE_INTERVAL); 60 $timer->interval ($SCHEDULE_INTERVAL);
59 $timer->next unless $cf::LOADAVG > $SWAP_LOAD2; 61 $timer->next unless $cf::LOADAVG > $SWAP_LOAD2;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines