Show
Ignore:
Timestamp:
10/20/08 23:36:51 (1 year ago)
Author:
calh
Message:

allow zero cat rollups

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/Flickr-StatsD/lib/Flickr/StatsD/Buckets.pm

    r448 r449  
    9191                        if (! defined $this_cats->{$cat}){ 
    9292 
    93                                 print "rolling up zero cat for $cat\n"; 
    94                                 #$self->rollup_cat($bucket_time, $cat, []); 
     93                                print "rolling up zero cat for $cat...\n"; 
     94                                $self->rollup_cat($bucket_time, $cat, []); 
    9595                        } 
    9696                } 

  • trunk/Flickr-StatsD/lib/Flickr/StatsD/Quartiles.pm

    r447 r449  
    1212        my @all = sort { $a <=> $b } @{$samples}; 
    1313 
     14        my $info = { 
     15                't'  => $time, 
     16                'c'  => $cat, 
     17                'lo' => 0, 
     18                'q1' => 0, 
     19                'q2' => 0, 
     20                'q3' => 0, 
     21                'hi' => 0, 
     22                'sm' => 0,               
     23        }; 
     24 
    1425        my $lo = $all[0]; 
    1526        my $hi = $all[-1]; 
    …… 
    1930        my $hi_c = $num - $lo_c; 
    2031 
    21         return if $lo_c == 0; 
    22         return if $hi_c == 0; 
     32        if ($lo_c > 0 && $hi_c > 0){ 
    2333 
    24         my @lo = splice @all, 0, $lo_c; 
    25         my @hi = @all; 
     34               my @lo = splice @all, 0, $lo_c; 
     35               my @hi = @all; 
    2636 
    27         my $lo_sum = 0; 
    28         my $hi_sum = 0; 
     37               my $lo_sum = 0; 
     38               my $hi_sum = 0; 
    2939 
    30         $lo_sum += $_ for @lo; 
    31         $hi_sum += $_ for @hi; 
     40               $lo_sum += $_ for @lo; 
     41               $hi_sum += $_ for @hi; 
    3242 
    33         my $q1 = $lo_sum / $lo_c; 
    34         my $q2 = ($lo_sum + $hi_sum) / ($lo_c + $hi_c); 
    35         my $q3 = $hi_sum / $hi_c; 
     43               my $q1 = $lo_sum / $lo_c; 
     44               my $q2 = ($lo_sum + $hi_sum) / ($lo_c + $hi_c); 
     45               my $q3 = $hi_sum / $hi_c; 
    3646 
    37         my $info = { 
    38                 't'  => $time, 
    39                 'c'  => $cat, 
    40                 'lo' => $lo, 
    41                 'q1' => $q1, 
    42                 'q2' => $q2, 
    43                 'q3' => $q3, 
    44                 'hi' => $hi, 
    45                 'sm' => $num, 
    46         }; 
     47                $info->{lo} = $lo; 
     48                $info->{q1} = $q1; 
     49                $info->{q2} = $q2; 
     50                $info->{q3} = $q3; 
     51                $info->{hi} = $hi; 
     52                $info->{sm} = $num; 
     53        } 
    4754 
    4855        $self->save_data($info); 

  • trunk/Flickr-StatsD/lib/Flickr/StatsD/YesNo.pm

    r447 r449  
    1010        my ($self, $time, $cat, $samples) = @_; 
    1111 
    12         my $counts = {}; 
     12        my $counts = { 
     13                0 => 0, 
     14                1 => 0, 
     15        }; 
    1316 
    1417        for (@{$samples}){