gerbilcharts 0.2.13 → 0.5.9

data/lib/gerbilcharts/public/gerbil.js

@@ -19,14 +19,22 @@ function OpacityDown(mouseover_evt)
 	var obj=mouseover_evt.target;
 	obj.style.setProperty("opacity","0.5","");
 }
-
-
 function OpacityUp(mouseout_evt)
 {
 	var obj=mouseout_evt.target;
 	obj.style.setProperty("opacity","1.0","");
 }
-
+function ToggleVisibility(id)
+{
+    var worker = function(ai) {
+          var cv=ai.getAttributeNS(null,"visibility");
+          ai.setAttributeNS(null,"visibility",cv=="hidden"?"":"hidden");
+          $("lbx"+id).setAttributeNS(null,"fill",cv=="hidden"?"gray":"red");
+    };
+
+    $$("#item"+id).each(worker);
+    $$("#lineitem"+id).each(worker);
+}
 function GerbilNavigate()
 {
 	window.top.location='/dashboard/show';
@@ -86,6 +94,20 @@ function showDetailedLegend()
 	 	l_show.setAttributeNS(null, 'visibility', 'visible');
 	}
 }
+// Move legend panel
+function shiftLegend(xoffset)
+{
+	var l_det = SVGDocument.getElementById("legendpanel_detail");
+	if (l_det)
+	{
+	 	l_det.setAttributeNS(null, 'transform', 'translate('+xoffset+')');
+	}
+	var l_mini= SVGDocument.getElementById("legendpanel_mini");
+	if (l_mini)
+	{
+	 	l_mini.setAttributeNS(null, 'transform', 'translate('+xoffset+')');
+	}
+}
 
 // The chart needs to fill in the following options 
 // axurl , response will either do noop/full/delta replacement
@@ -108,17 +130,17 @@ function SvgAjaxUpdate()
 	});
 	hContext.unset('_object');
 	
-	// console.log ("URL =  "+ url );
 	new Ajax.Request(url, {
 	  method: 'post',
-	  parameters: { 'resource': hContext['resource'] },
+	  parameters: {'resource': hContext['resource']},
 	  onSuccess: function(transport) {
-          		updateSVG(transport.responseXML)
+          		updateSVG(transport.responseXML);
 		     }
 	});
 
+        SVGRoot.setAttributeNS(null, 'lastupdategmt', parseInt(new Date().getTime()/1000) );
 }
-// For WebTrisul 1.0, we don't yet support delta replace,
+// For WebTrisul 1.x, we don't yet support delta replace,
 // full replace seems to be fast enough (caching on server side)
 function updateSVG(node)
 {
@@ -162,10 +184,9 @@ function Uninit(evt)
 			hContext[at.localName]=at.nodeValue;
 		});
 	
-		// console.log ("URL =  "+ url );
 		new Ajax.Request("/axupdate/gerbilUnload", {
 	  		method: 'post',
-	  		parameters: { 'resource': hContext['resource'] },
+	  		parameters: {'resource': hContext['resource']}
 		});
 	 }
 
@@ -198,7 +219,7 @@ function Init(evt)
    		// for Adobe SVG later 
 		// setTimeout("SvgAjaxUpdate()",parseInt(ajaxInterval));
 	 }
-};
+}
 
 
 function GetTrueCoords(evt)
@@ -208,69 +229,69 @@ function GetTrueCoords(evt)
 	 var translation = SVGRoot.currentTranslate;
 	 TrueCoords.x = (evt.clientX - translation.x)/newScale;
 	 TrueCoords.y = (evt.clientY - translation.y)/newScale;
-};
+}
 
 
 function HideTooltip( evt )
 {
 	 toolTip.setAttributeNS(null, 'visibility', 'hidden');
-};
+}
 
 
 function ShowTooltip( evt )
 {
-	// bail out early, if same target
-	var targetElement = evt.target;
-	if ( lastElement == targetElement )
-	{
-		return
-	}
+    // bail out early, if same target
+    var targetElement = evt.target;
+    if ( lastElement == targetElement )
+    {
+        return
+    }
 	
-	// bail out early, if no 'gerbiltooltipX' tags
-	// tooltip1 is the heading  (appears in bold face)
-	// tooltip2 is the tip text 
-	var tooltip1 = '';
-	var tooltip2 = '';
-	tooltip1 = targetElement.getAttributeNS(null, 'gerbiltooltip1');
-	tooltip2 = targetElement.getAttributeNS(null, 'gerbiltooltip2');
-	if (tooltip1=='' && tooltip2 == '')		
-	{
-		return;
-	}
+    // bail out early, if no 'gerbiltooltipX' tags
+    // tooltip1 is the heading  (appears in bold face)
+    // tooltip2 is the tip text
+    var tooltip1 = '';
+    var tooltip2 = '';
+    tooltip1 = targetElement.getAttributeNS(null, 'gerbiltooltip1');
+    tooltip2 = targetElement.getAttributeNS(null, 'gerbiltooltip2');
+    if (tooltip1=='' && tooltip2 == '')
+    {
+        return;
+    }
 
-	// Positon the tooltip box relative to the mouse pos
-	GetTrueCoords( evt );
-	var tipScale = 1/SVGRoot.currentScale;
-	var textWidth = 0;
-	var tspanWidth = 0;
-	var boxHeight = 20;
-	tipBox.setAttributeNS(null, 'transform', 'scale(' + tipScale + ',' + tipScale + ')' );
-	tipText.setAttributeNS(null, 'transform', 'scale(' + tipScale + ',' + tipScale + ')' );
+    // Positon the tooltip box relative to the mouse pos
+    GetTrueCoords( evt );
+    var tipScale = 1/SVGRoot.currentScale;
+    var textWidth = 0;
+    var tspanWidth = 0;
+    var boxHeight = 20;
+    tipBox.setAttributeNS(null, 'transform', 'scale(' + tipScale + ',' + tipScale + ')' );
+    tipText.setAttributeNS(null, 'transform', 'scale(' + tipScale + ',' + tipScale + ')' );
 
-	// Values for tooltip text
-	tipTitle.firstChild.nodeValue = tooltip1;
-	tipTitle.setAttributeNS(null, 'display', 'inline' );
-	tipDesc.firstChild.nodeValue = tooltip2;
-	tipDesc.setAttributeNS(null, 'display', 'inline' );
+    // Values for tooltip text
+    tipTitle.firstChild.nodeValue = tooltip1;
+    tipTitle.setAttributeNS(null, 'display', 'inline' );
+    tipDesc.firstChild.nodeValue = tooltip2;
+    tipDesc.setAttributeNS(null, 'display', 'inline' );
 
 
-	// Box size
+    // Box size
     var outline = tipText.getBBox();
     tipBox.setAttributeNS(null, 'width', Number(outline.width) + 10);
-    tipBox.setAttributeNS(null, 'height', Number(outline.height));
+    tipBox.setAttributeNS(null, 'height', Number(outline.height) + 10);
 	
 
     // Update position (keep tooltip inside client area ! )
- 	var yPos = TrueCoords.y + (10 * tipScale);
- 	if (yPos+Number(outline.height)>SVGRoot.height.baseVal.value)
-	{
-		yPos = SVGRoot.height.baseVal.value - Number(outline.height)
-	}
+    var yPos = TrueCoords.y + (10 * tipScale);
+    if (yPos+Number(outline.height)>SVGRoot.height.baseVal.value)
+    {
+        yPos = SVGRoot.height.baseVal.value - Number(outline.height)
+    }
     var xPos = TrueCoords.x + (10 * tipScale);
-	if (xPos+Number(outline.width)>SVGRoot.width.baseVal.value)
-	{
-		xPos = SVGRoot.width.baseVal.value - Number(outline.width)
-	}
+    if (xPos+Number(outline.width)>SVGRoot.width.baseVal.value)
+    {
+        xPos = SVGRoot.width.baseVal.value - Number(outline.width)
+    }
 	
     toolTip.setAttributeNS(null, 'transform', 'translate(' + xPos + ',' + yPos + ')');
     toolTip.setAttributeNS(null, 'visibility', 'visible');
@@ -310,13 +331,19 @@ function TrackerMouseDown( evt )
     
     // compute begin state
     pTrackerData = SVGDocument.getElementById('gtrackerdata');
-    nTrackScale =  parseInt(pTrackerData.getAttributeNS(null,"gerb_scale"));
+    nTrackScale =  parseFloat(pTrackerData.getAttributeNS(null,"gerb_scale"));
     var from_secs = parseInt(pTrackerData.getAttributeNS(null,"gerb_fromts"));
-    
+    var server_tz_offset = parseInt(pTrackerData.getAttributeNS(null,"gerb_tzoffset"));
+    var client_tz_offset = new Date().getTimezoneOffset() * 60;
+
+    // javascript returns utc-local, ruby returns local-utc (so the '+' )
+    tz_off = server_tz_offset + client_tz_offset;
+    tz_name= pTrackerData.getAttributeNS(null,"gerb_tzname");
+
     // clicked to time delta
     var xbegin = parseInt(SVGDocument.getElementById('trackerpanel').getAttributeNS(null,"x"));
     pTrackFromTS = new Date();
-    pTrackFromTS.setTime(1000* (from_secs + (nTrackBegin-xbegin)*nTrackScale));
+    pTrackFromTS.setTime(1000* (tz_off + from_secs + (nTrackBegin-xbegin)*nTrackScale));
             
     // text svg elements
     pTrackTextFromTS=SVGDocument.getElementById('trackertextfromts');
@@ -326,46 +353,59 @@ function TrackerMouseDown( evt )
     pGTrackingRect.setAttributeNS(null,"visibility","hidden");
     pTrackingText.setAttributeNS(null,"visibility","hidden");
 
+    evt.preventDefault();
+
 }
 
 function TrackerMouseMove(evt)
 {
+
     if (fTracking==2 && evt.clientX > nTrackBegin)
     {
+
         var delta = nTrackCurrent-nTrackBegin;
         var mid = nTrackBegin+(delta)/2;
         nTrackCurrent=evt.clientX;
+
         pTrackingRect.setAttributeNS(null,"width",delta);
         pTrackingText.setAttributeNS(null,"transform","translate(" + mid + ')');
-        
+       
         // text box
         var szwin = FormatSecs(delta*nTrackScale)
-        var szbegin = "Starting : " + pTrackFromTS.toLocaleString();
+        var szbegin = "Starting : " + pTrackFromTS.toLocaleString() + " " + tz_name;
         pTrackTextInterval.firstChild.nodeValue = szwin;
         pTrackTextFromTS.firstChild.nodeValue = szbegin;
+
     }
-    else if (fTracking==1 && (evt.clientX-nTrackBegin) > 5 )
+    else if (fTracking==1  && (evt.clientX-nTrackBegin) > 5 )
     {
         // we need to move atleast 5 pixels to turn on tracking
         fTracking=2;
-        
-        // visibility on 
+
+        // visibility on
         pGTrackingRect.setAttributeNS(null,"visibility","visible");
         pTrackingText.setAttributeNS(null,"visibility","visible");
+
+        parent.$('drillmod_tools').hide();
     }
+   
 }
+
 function TrackerMouseUp(evt)
 {
+
     if (fTracking==2)
     {
         pTrackingRect=null;
         nTrackEnd=evt.clientX;
         
         pTrackerData.setAttributeNS(null,"gerb_selsecs",(nTrackEnd-nTrackBegin)*nTrackScale);
-        pTrackerData.setAttributeNS(null,"gerb_selts", pTrackFromTS.getTime()/1000);
+        pTrackerData.setAttributeNS(null,"gerb_selts", pTrackFromTS.getTime()/1000-tz_off);
 
     }
     fTracking=0;
+    parent.$('drillmod_tools').show();
+
 }
 
 function FormatSecs(secs)
@@ -375,7 +415,7 @@ function FormatSecs(secs)
     } else if (secs>3600) {
         return "" + Math.floor(secs/3600) + " Hrs  " + Math.round((secs%3600)/60) + " Mins";    
     } else if (secs>60) {
-        return "" + Math.floor(secs/60) + " Mins  " + secs%60 + " Secs";    
+        return "" + Math.floor(secs/60) + " Mins  " + Math.round(secs%60) + " Secs";    
     }
-    return "" + secs + " Secs";
+    return "" + Math.round(secs) + " Secs";
 }

data/lib/gerbilcharts/surfaces.rb

@@ -32,3 +32,6 @@ require 'gerbilcharts/surfaces/stacked_area_surface'
 require 'gerbilcharts/surfaces/surface_background'
 require 'gerbilcharts/surfaces/tracker'
 require 'gerbilcharts/surfaces/square_line_surface'
+require 'gerbilcharts/surfaces/matrix_surface'
+require 'gerbilcharts/surfaces/conversation_ring'
+require 'gerbilcharts/surfaces/bubble_surface'

data/lib/gerbilcharts/surfaces/bubble_surface.rb

@@ -0,0 +1,105 @@
+module GerbilCharts::Surfaces
+
+#= Bubble Surface
+# Data point represented by bubbles using a log scale count
+# Control the color,thickness of the line via the stylesheet item lineitem1, lineitem2 etc
+# Eg 27,500 = 2x10K bub + 7x1K bub + 5 100 bub (total = 14 bubbles)
+#
+# Supported global options
+#
+# [+scaling+]               :auto, :auto_y0
+#
+class BubbleSurface  < Surface
+
+	BUBGRAINS = [1e+9,1e+8,1e+7,1000000,100000,10000,1000,100,10,1]
+	SHAPESZ   = [40,  36,  35,  34,     31,    30,   20,  16, 12,8]
+	RSCALE    = 0.50 
+
+    def initialize(opts={})
+      super(opts)
+    end
+    
+    def int_render(g)
+      rx = parent.modelgroup.effective_round_range_x
+      ry = parent.modelgroup.cumulative_sweep_round_range_y0
+	  
+      # ajax if used
+      if parent.usesAjax?
+        set_ajaxSurfaceContext(rx.rmax,ry.rmax,"SA")
+      end
+            
+      # prepare models for sweeping
+      sweep_pos= rx.rmin
+      sweep_to = rx.rmax
+	  modnames = []
+      parent.modelgroup.each_model do | mod|
+          mod.begin_sweep
+		  modnames << mod.name
+      end
+
+      # sweep interval
+      sweep_interval = parent.modelgroup.sweep_interval
+
+	  rbub=@bounds.clone
+	  rbub.clip_l(20)
+      
+      # perform the sweep
+      while (sweep_pos<=sweep_to)  
+
+			allshapes = []
+            xpos = scale_x sweep_pos,rx
+			rbub.translate_x xpos
+
+            parent.modelgroup.each_model_with_index do | mod, i|
+              val =  mod.sweep(sweep_pos)
+			  allshapes << valtocircles(val)
+            end
+            
+			allshapes.each_with_index do |ai,i|
+
+			  opts = {:id => "item#{i}"}
+			  opts.store(:fill,color_for_id(i)) if  i>10
+
+			  if parent.get_global_option(:auto_tooltips,false)
+					opts.store(:gerbiltooltip1, modnames[i]) 
+			  end
+
+
+			  ai.each do |shp|
+			  	shp.x = rbub.left + rand*(rbub.width)
+				shp.y = rbub.bottom - rand*(rbub.height*0.75)
+              	g.addshape(shp, opts)
+			  end
+			end
+
+
+            sweep_pos += sweep_interval
+     end
+
+    end
+
+	# vartoradii
+	def valtocircles(val)
+		
+		splitup=BUBGRAINS.collect do |grain_size|
+			n=(val/grain_size)
+			val = val%grain_size
+			(n*RSCALE).to_i 
+		end
+
+		
+		ret=[]
+		shapes=SHAPESZ.each_with_index do |s,i|
+			splitup[i].times do  |t|
+              ret << GerbilCharts::SVGDC::SVGCircle.new(0, 0, s) 
+			end
+		end
+
+		ret
+
+	end
+
+
+end
+
+end

data/lib/gerbilcharts/surfaces/chart.rb

@@ -67,6 +67,8 @@ class Chart < GraphElement
   
   def render(ropts={})
     svgdc = GerbilCharts::SVGDC::SVGDC.new(@bounds.width, @bounds.height)
+
+	svgdc.enable_tooltips get_global_option(:auto_tooltips,false)
     
     dolayout if @needslayout
 
@@ -79,8 +81,8 @@ class Chart < GraphElement
 	end
 
     
-    @filters.each { |f| svgdc.add_filter(f) }
-    
+	# filters, javascripts, stylesheets 
+    @filters.each     { |f| svgdc.add_filter(f) }
     @javascripts.each { |scr| svgdc.add_javascriptfile(scr) }
     @stylesheets.each { |css| svgdc.add_stylesheetfile(css) }  
     

data/lib/gerbilcharts/surfaces/conversation_ring.rb

@@ -0,0 +1,64 @@
+module GerbilCharts::Surfaces
+
+#  Matrix  Surface
+#  Conversation Chart is drawn
+#
+class ConversationRing < Surface
+  
+    def initialize(opts={})
+      super(opts)
+    end
+    
+    def int_render(g)
+         # any filters ?
+        if parent.get_global_option(:filter,false)
+            g.curr_win.add_options({:filter => "url(##{parent.get_global_option(:filter,false)})" })
+        end
+      
+        # Draw an outer circle
+        center_x = (@bounds.width/2)
+        center_y = (@bounds.height/2) + @bounds.top + 10
+        radius_x = (@bounds.width/2 - 35)
+        radius_y = (@bounds.height/2 - 15)
+        g.addshape(GerbilCharts::SVGDC::SVGEllipse.new(center_x,center_y,radius_x,radius_y), :fill => '#FFD' )
+       
+        
+        parent.modelgroup.hash.each_pair do |key,value|
+             angle = 360/value.length
+             tot_angle = 0
+             # Draw the center circle              
+             radius1 = 15 
+             opts = {:id => "item0"}
+             g.addshape(GerbilCharts::SVGDC::SVGCircle.new(center_x,center_y,radius1),opts)
+             g.textout(center_x-30,center_y-20,key,:class => 'elementlabel')
+              
+             # Draw the remaining circles proportion to the largest values
+             value.each_with_index do |item,i|
+                opts = {:id => "item#{i+1}"}
+                label= parent.modelgroup.zenduniq[i]
+                string = "(" + key + "-" + label + ")"
+                
+                # Adding tool tips
+                if parent.get_global_option(:auto_tooltips,false)
+                                  opts.merge!(:onmouseover => "OpacityDown(evt)", :onmouseout => "OpacityUp(evt)")
+                                  opts.store(:gerbiltooltip1, string)
+                                  opts.store(:gerbiltooltip2, "Volume #{GerbilCharts::Models::Presets.new.format_suffix(item)}")
+                end                               
+                
+ 		# Calculating radius
+                radius1 = 20                
+                effective_radius = (((item.to_f)/parent.modelgroup.sort[0].to_f).to_f * radius1) 
+		effective_radius = [effective_radius,5.0].max
+
+		# draw out
+                cx = center_x + (Math.cos((Math::PI/180)*(angle+tot_angle))*(radius_x))
+                cy = center_y + (Math.sin((Math::PI/180)*(angle+tot_angle))*(radius_y))
+                g.addshape(GerbilCharts::SVGDC::SVGCircle.new(cx,cy,effective_radius),opts)
+                g.textout(cx-30,cy-15,label,:class => 'elementlabel')
+
+                tot_angle += angle
+            end
+         end
+    end
+end
+end