/[Frey]/trunk/lib/Frey/jQuery/flot.pm
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/lib/Frey/jQuery/flot.pm

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

revision 868 by dpavlin, Tue Dec 16 22:37:18 2008 UTC revision 869 by dpavlin, Tue Dec 16 23:03:21 2008 UTC
# Line 5  extends 'Frey'; Line 5  extends 'Frey';
5  with 'Frey::Web';  with 'Frey::Web';
6  #with 'Frey::Storage';  #with 'Frey::Storage';
7  with 'Frey::jQuery';  with 'Frey::jQuery';
8    with 'Frey::File'; # FIXME inline on demand?
9    
10  use DateTimeX::Easy;  use DateTimeX::Easy;
11    
# Line 31  sub as_markup { Line 32  sub as_markup {
32    
33          $self->add_css("$path/layout.css");          $self->add_css("$path/layout.css");
34    
35          my $sponge = Frey::Shell::sar->new()->as_sponge;          my $sponge = Frey::Shell::sar->new( sar_command => 'sar -n 1' )->as_sponge;
36          warn $self->dump( $sponge );          warn $self->dump( $sponge );
37    
38          my $by_col;          my $by_col;
# Line 43  sub as_markup { Line 44  sub as_markup {
44                  }                  }
45          }          }
46    
47          my $data_js;          my $dataset;
48          my @names;          my @names;
49          foreach my $nr ( keys %$by_col ) {          foreach my $nr ( keys %$by_col ) {
50                  my $name = 'd' . $nr;                  my $name = $sponge->{NAME}->[$nr];
51                  push @names, $name;                  $dataset->{ $name }->{label} ||= $name;
52                  $data_js .= qq|var $name = |  . to_json( $by_col->{$nr} ) . qq|;\n|;                  $dataset->{ $name }->{data} = $by_col->{$nr};
53          }          }
54    
55            my $data_js = 'var datasets = ' . to_json( $dataset ) . ';';
56    
57          warn "# $data_js";          warn "# $data_js";
58    
59          q|          q|
60          <div id="placeholder" style="width:600px;height:300px;"></div>          <div id="placeholder" style="width:600px;height:300px;"></div>
61    
62                    <div id="choices">Show:</div>
63    
64                  <script id="source" language="javascript" type="text/javascript">                  <script id="source" language="javascript" type="text/javascript">
65                  $(function () {                  $(function () {
66                          var options = {                          var options = {
67                                  xaxis: { mode: "time" },                                  //selection: { mode: "x" },
68                                  selection: { mode: "x" }                                  //yaxis: { min: 0, max: 100 },
69                                    xaxis: { mode: "time" }
70                          };                          };
71          | . $data_js . q|  
72                          $.plot($("#placeholder"), [                          |
73          | . join(',',@names) . q|                                        . $data_js
74                          ], options);                          . $self->read_file('static/Frey/jQuery/flot/dataset_checkboxes.js')
75                            .
76                            q|
77    
78                  });                  });
79                  </script>                  </script>
80          |;          |;
Legend:
Removed from v.868  
changed lines
  Added in v.869
  ViewVC Help
Powered by ViewVC 1.1.26