view release on metacpan or search on metacpan
lib/GrowthForecast/RRD.pm view on Meta::CPAN
'--color', 'FONT#'.uc($args->{font_color}),
'--color', 'FRAME#'.uc($args->{frame_color}),
'--color', 'AXIS#'.uc($args->{axis_color}),
'--color', 'SHADEA#'.uc($args->{shadea_color}),
'--color', 'SHADEB#'.uc($args->{shadeb_color}),
'--border', $args->{border},
);
push @opt, '-y', $args->{ygrid} if $args->{ygrid};
push @opt, '-t', "$period_title" if !$args->{notitle};
push @opt, '--no-legend' if !$args->{legend};
push @opt, '--only-graph' if $args->{graphonly};
push @opt, '--logarithmic' if $args->{logarithmic};
push @opt, '--font', "AXIS:8:";
push @opt, '--font', "LEGEND:8:";
push @opt, '-u', $args->{upper_limit} if defined $args->{upper_limit};
push @opt, '-l', $args->{lower_limit} if defined $args->{lower_limit};
push @opt, '-r' if $args->{rigid};
my $i=0;
my @defs;
lib/GrowthForecast/RRD.pm view on Meta::CPAN
unless ($same_vrule{$k}) {
$desc = $vrule->{description};
$desc =~ s/:/\\:/;
}
$same_vrule{$k}++;
}
push @opt, join(":",
'VRULE',
join("", $vrule->{time}, $vrule->{color}),
($args->{vrule_legend} ? $desc : ""),
($vrule->{dashes} ? 'dashes='.$vrule->{dashes} : ()),
);
}
push @opt, 'COMMENT:\n';
my @graphv;
eval {
@graphv = RRDs::graph(map { Encode::encode_utf8($_) } @opt);
my $ERR=RRDs::error;
die $ERR if $ERR;
lib/GrowthForecast/Web.pm view on Meta::CPAN
rule => [
[sub{ $_[1] =~ m!^[0-9A-F]{6}$!i || $_[1] =~ m!^[0-9A-F]{8}$!i }, 'invalid shadeb color'],
],
},
'border' => {
default => 3,
rule => [
['UINT','invalid border width'],
],
},
'legend' => {
default => 1,
rule => [
[['CHOICE',qw/0 1/],'invalid legend flag'],
],
},
'notitle' => {
default => 0,
rule => [
[['CHOICE',qw/0 1/],'invalid title flag'],
],
},
'xgrid' => {
default => '',
lib/GrowthForecast/Web.pm view on Meta::CPAN
rule => [
['NATURAL', 'invalid step size'],
],
},
'cf' => {
default => 'AVERAGE',
rule => [
[['CHOICE', qw/AVERAGE MAX/], 'invalid consolidation function'],
],
},
'vrule_legend' => {
default => 1,
rule => [
[['CHOICE',qw/0 1/],'invalid vrule_legend flag'],
],
},
];
}
get '/complex/{method:(?:xport|graph|summary)}/:service_name/:section_name/:graph_name' => sub {
my ( $self, $c ) = @_;
my $result = $c->req->validator($self->graph_validator);
my $complex = $self->data->get_complex(
$c->args->{service_name}, $c->args->{section_name}, $c->args->{graph_name},
public/css/bootstrap.min.css view on Meta::CPAN
/*!
* Bootstrap v3.0.3 (http://getbootstrap.com)
* Copyright 2013 Twitter, Inc.
* Licensed under http://www.apache.org/licenses/LICENSE-2.0
*/
/*! normalize.css v2.1.3 | MIT License | git.io/normalize */article,aside,details,figcaption,figure,footer,header,hgroup,main,nav,section,summary{display:block}audio,canvas,video{display:inline-block}audio:not([controls]){display:none;height:0}[hidde...
public/js/jquery-1.10.2.min.js view on Meta::CPAN
/*! jQuery v1.10.2 | (c) 2005, 2013 jQuery Foundation, Inc. | jquery.org/license
//@ sourceMappingURL=jquery-1.10.2.min.map
*/
(function(e,t){var n,r,i=typeof t,o=e.location,a=e.document,s=a.documentElement,l=e.jQuery,u=e.$,c={},p=[],f="1.10.2",d=p.concat,h=p.push,g=p.slice,m=p.indexOf,y=c.toString,v=c.hasOwnProperty,b=f.trim,x=function(e,t){return new x.fn.init(e,t,r)},w=/[...
}({});var B=/(?:\{[\s\S]*\}|\[[\s\S]*\])$/,P=/([A-Z])/g;function R(e,n,r,i){if(x.acceptData(e)){var o,a,s=x.expando,l=e.nodeType,u=l?x.cache:e,c=l?e[s]:e[s]&&s;if(c&&u[c]&&(i||u[c].data)||r!==t||"string"!=typeof n)return c||(c=l?e[s]=p.pop()||x.guid+...
u[o]&&(delete u[o],c?delete n[l]:typeof n.removeAttribute!==i?n.removeAttribute(l):n[l]=null,p.push(o))}},_evalUrl:function(e){return x.ajax({url:e,type:"GET",dataType:"script",async:!1,global:!1,"throws":!0})}}),x.fn.extend({wrapAll:function(e){if(x...
public/js/jquery-1.10.2.min.map view on Meta::CPAN
{"version":3,"file":"jquery-1.10.2.min.js","sources":["jquery-1.10.2.js"],"names":["window","undefined","readyList","rootjQuery","core_strundefined","location","document","docElem","documentElement","_jQuery","jQuery","_$","$","class2type","core_dele...
views/add_complex.tx view on Meta::CPAN
<option value="2">2</option>
<option value="1">1</option>
<option value="0">0</option>
</select>
</div>
</div>
</fieldset>
<fieldset>
<legend>Data</legend>
<div id="service_tree" data-endpoint="<: $c.req.uri_for('/json/list/graph_tree') :>"></div>
<div class="form-group">
<label for="" class="control-label col-sm-2">Series-1</label>
<div class="col-sm-10">
<table class="table table-bordered table-striped">
<tr>
<th style="width: 12%;">Type</th>
views/add_complex.tx view on Meta::CPAN
</td>
<td style="text-align:center;"><button id="add-new-row" class="btn btn-default" style="padding: 3px 14px 4px;">Add</button></td>
</tr>
</table>
</div>
</div>
</fieldset>
<fieldset>
<legend>Preview</legend>
<div class="form-group">
<div class="col-sm-offset-2 col-sm-10">
<div id="preview-graph"></div>
</div>
</div>
</fieldset>
<hr />
views/edit_complex.tx view on Meta::CPAN
<option value="2">2</option>
<option value="1">1</option>
<option value="0">0</option>
</select>
</div>
</div>
</fieldset>
<fieldset>
<legend>Data</legend>
<div id="service_tree" data-endpoint="<: $c.req.uri_for('/json/list/graph_tree') :>"></div>
<div class="form-group">
<label for="" class="control-label col-sm-2">Series-1</label>
<div class="col-sm-10">
<table class="table table-bordered table-striped">
<tr>
<th style="width: 12%;">Type</th>
views/edit_complex.tx view on Meta::CPAN
</tr>
: }
</table>
</div>
</div>
</fieldset>
<fieldset>
<legend>Preview</legend>
<div class="form-group">
<div class="col-sm-offset-2 col-sm-10">
<div id="preview-graph"></div>
</div>
</div>
</fieldset>
<hr />