/[vz-tools]/trunk/vz-optimize.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/vz-optimize.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 12 by dpavlin, Mon Jan 8 22:59:26 2007 UTC revision 14 by dpavlin, Wed Jan 31 21:12:47 2007 UTC
# Line 43  while(<$bc>) { Line 43  while(<$bc>) {
43          if ($r->{failcnt} > 0) {          if ($r->{failcnt} > 0) {
44                  if ( ($r->{held} / $r->{limit}) > $increase_over ) {                  if ( ($r->{held} / $r->{limit}) > $increase_over ) {
45                          my $new_limit = int($r->{limit} * 1.1);                          my $new_limit = int($r->{limit} * 1.1);
46  #                       warn "# $vmid $res $r->{limit} -> $new_limit\n";                          my $new_barr = int($r->{limit} * 1.2);
47                          print "vzctl set $vmid --${res} $new_limit\n";                          warn "# $vmid $res $r->{limit} -> $new_limit:$new_barr\n";
48                            my $cmd = "vzctl set $vmid --${res} $new_limit:$new_barr --save";
49                            warn $cmd,$/;
50                            system $cmd;
51                  } else {                  } else {
52                          warn sprintf("%s/%s failed, but not used %d%% [%d/%d %d%%]\n",                          warn sprintf("%s/%s failed, but not used %d%% [%d/%d %d%%]\n",
53                                  $vmid, $res, $increase_over * 100, $r->{held}, $r->{limit}, ($r->{held}/$r->{limit})*100                                  $vmid, $res, $increase_over * 100, $r->{held}, $r->{limit}, ($r->{held}/$r->{limit})*100

Legend:
Removed from v.12  
changed lines
  Added in v.14

  ViewVC Help
Powered by ViewVC 1.1.26