reniced: Runtime adjusted to 300 sec. Nicelevel 15.

This commit is contained in:
Ole Tange 2012-05-29 16:13:22 +02:00
parent 074c9bd8d2
commit 172e7972f5

View file

@ -1,7 +1,7 @@
#!/usr/bin/perl -w #!/usr/bin/perl -w
init_whitelist(); init_whitelist();
renice_all(60); renice_all(5*60);
sub init_whitelist { sub init_whitelist {
my @whitelist_commands; my @whitelist_commands;
@ -66,7 +66,7 @@ sub mail {
'', '',
" @command", " @command",
'', '',
"has been using more than $cpu_seconds CPU seconds. I have therefore niced it to nice level 19.", "has been using more than $cpu_seconds CPU seconds. I have therefore niced it to nice level 15.",
'', '',
'There is no harm done, this is purely for your information so you know what happened and how', 'There is no harm done, this is purely for your information so you know what happened and how',
'to avoid it.', 'to avoid it.',
@ -106,7 +106,7 @@ sub user_pid_list {
sub renice { sub renice {
my @pid = @_; my @pid = @_;
`renice -n 19 -p @pid 2>&1`; `renice -n 15 -p @pid 2>&1`;
return $?; return $?;
} }