% USE date; statusfiles = {}; FILTER null; name = 'memory_stat'; swapdata = []; activedata = []; cacheddata = []; buffersdata = []; timestamps = []; FOREACH item = param.stack; t = date.format(item.timestamp, '%H:%M:%S'); timestamps.push(t); swapdata.push(item.memory.SwapTotal); activedata.push(item.memory.Active); cacheddata.push(item.memory.Cached); buffersdata.push(item.memory.Buffers); END; # Maximum wert max = param.stack.last.memory.MemTotal; # Data ... d = [ timestamps , swapdata , cacheddata , activedata , buffersdata , ]; USE my_graph = GD.Graph.lines(500,300); # Xsteps steps = param.stack.size div 5; label = gettext('Memory usage since'); label = "${label} ${d.first.first}"; my_graph.set( title => label, x_label_skip => steps, x_long_ticks => 1, y_label => gettext('Memory usage in bytes'), y_long_ticks => 1, line_width => 2, box_axis => 1, boxclr => '#FFFFCC', fgclr => '#BBBBBB' legend_placement => 'RD', legend_spacing => 5, ); my_graph.set_title_font(param.font,10); my_graph.set_y_label_font(param.font,10); my_graph.set_x_label_font(param.font,10); my_graph.set_x_axis_font(param.font,6); my_graph.set_y_axis_font(param.font,6); my_graph.set_legend( 'Swap', 'Active', 'Cached', 'Buffers'); statusfiles.$name = writefile("status_${name}.gif", my_graph.plot(d).gif ); END; # ------------------- Piegraph für Speicher FILTER null; name = 'memory_now'; MemTotal = data.MemTotal div 1024; Active = data.Active div 1024; Cached = data.Cached div 1024; Inactive = data.Inactive div 1024; MemFree = data.MemFree div 1024; Buffers = data.Buffers div 1024; d2 = [ ["Active ${Active} MB","Cached ${Cached} MB","Inactive ${Inactive} MB","MemFree ${MemFree} MB","Buffers ${Buffers} MB"], [ data.Active, data.Cached, data.Inactive, data.MemFree, data.Buffers] ]; USE my_graph = GD.Graph.pie(400, 300); label = gettext('Total Memory'); label = "${label} ${MemTotal} MB"; my_graph.set( title => label, axislabelclr => 'black', pie_height => 25, transparent => 0, ); my_graph.set_title_font(param.font,10); my_graph.set_label_font(param.font,10); my_graph.set_value_font(param.font,8); statusfiles.$name = writefile("status_${name}.gif", my_graph.plot(d2).gif ); END; %?> % IF param.headingText %?>
% param.headingText %?>% END %?>
| ||||
% END %?>