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.44 by root, Mon Oct 1 00:55:51 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} = "startup 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";
57 $Coro::current->prio (Coro::PRIO_MAX);
55 my $timer = Coro::Event->timer (after => 1); 58 my $timer = Coro::Event->timer (after => 1, data => cf::WF_AUTOCANCEL);
56 59
57 while () { 60 while () {
58 $timer->interval ($SCHEDULE_INTERVAL); 61 $timer->interval ($SCHEDULE_INTERVAL);
59 $timer->next unless $cf::LOADAVG > $SWAP_LOAD2; 62 $timer->next unless $cf::LOADAVG > $SWAP_LOAD2;
60 63

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines