genki-newrelic_rpm 2.10.1

data/ui/helpers/newrelic_helper.rb

@@ -0,0 +1,314 @@
+require 'pathname'
+require 'new_relic/agent/collection_helper'
+module NewrelicHelper
+  include NewRelic::Agent::CollectionHelper
+  
+  # return the host that serves static content (css, metric documentation, images, etc)
+  # that supports the desktop edition.
+  def server
+    NewRelic::Control.instance['desktop_server'] || "http://rpm.newrelic.com"
+  end
+  
+  # limit of how many detail/SQL rows we display - very large data sets (~10000+) crash browsers
+  def trace_row_display_limit
+    2000
+  end
+  
+  def trace_row_display_limit_reached
+    (!@detail_segment_count.nil? && @detail_segment_count > trace_row_display_limit) || @sample.sql_segments.length > trace_row_display_limit
+  end
+  
+  # return the sample but post processed to strip out segments that normally don't show
+  # up in production (after the first execution, at least) such as application code loading
+  def stripped_sample(sample = @sample)
+    if session[:newrelic_strip_code_loading] || true
+      sample.omit_segments_with('(Rails/Application Code Loading)|(Database/.*/.+ Columns)')
+    else
+      sample
+    end
+  end
+  
+  # return the highest level in the call stack for the trace that is not rails or 
+  # newrelic agent code
+  def application_caller(trace)
+    trace = strip_nr_from_backtrace(trace) unless params[:show_nr]
+    trace.each do |trace_line|
+      file = file_and_line(trace_line).first
+      unless exclude_file_from_stack_trace?(file, false)
+        return trace_line
+      end
+    end
+    trace.last
+  end
+  
+  def application_stack_trace(trace, include_rails = false)
+    trace = strip_nr_from_backtrace(trace) unless params[:show_nr]
+    trace.reject do |trace_line|
+      file = file_and_line(trace_line).first
+      exclude_file_from_stack_trace?(file, include_rails)
+    end
+  end
+
+  def render_backtrace
+    if @segment[:backtrace]
+      content_tag('h3', 'Application Stack Trace') + 
+          render(:partial => agent_views_path('stack_trace'), :locals => {:segment => @segment})
+    end
+  end
+  
+  def agent_views_path(path)
+    path
+  end
+  
+  def url_for_metric_doc(metric_name)
+    "#{server}/metric_doc?metric=#{CGI::escape(metric_name)}"
+  end
+  
+  def url_for_source(trace_line)
+    file, line = file_and_line(trace_line)
+    
+    begin
+      file = Pathname.new(file).realpath
+    rescue Errno::ENOENT
+      # we hit this exception when Pathame.realpath fails for some reason; attempt a link to
+      # the file without a real path.  It may also fail, only when the user clicks on this specific
+      # entry in the stack trace
+    rescue 
+      # catch all other exceptions.  We're going to create an invalid link below, but that's okay.
+    end
+      
+    if using_textmate?
+      "txmt://open?url=file://#{file}&line=#{line}"
+    else
+      url_for :action => 'show_source', :file => file, :line => line, :anchor => 'selected_line'
+    end
+  end
+  
+  def dev_name(metric_name)
+    NewRelic::MetricParser.parse(metric_name).developer_name
+  end
+  
+  # write the metric label for a segment metric in the detail view
+  def write_segment_label(segment)
+    if source_available && segment[:backtrace] && (source_url = url_for_source(application_caller(segment[:backtrace])))
+      link_to dev_name(segment.metric_name), source_url
+    else
+      h(dev_name(segment.metric_name))
+    end
+  end
+  
+  def source_available
+    true
+  end
+  
+  # write the metric label for a segment metric in the summary table of metrics
+  def write_summary_segment_label(segment)
+    dev_name(segment.metric_name)
+  end
+  
+  def write_stack_trace_line(trace_line)
+    link_to h(trace_line), url_for_source(trace_line)
+  end
+
+  # write a link to the source for a trace
+  def link_to_source(trace)
+    image_url = url_for(:controller => :newrelic, :action => :file, :file => (using_textmate? ? "textmate.png" : "file_icon.png"))
+    
+    link_to image_tag(image_url, :alt => (title = 'View Source'), :title => title), url_for_source(application_caller(trace))
+  end
+  
+  # print the formatted timestamp for a segment
+  def timestamp(segment)
+    sprintf("%1.3f", segment.entry_timestamp)
+  end
+  
+  def format_timestamp(time)
+    time.strftime("%H:%M:%S") 
+  end
+
+  def colorize(value, yellow_threshold = 0.05, red_threshold = 0.15, s=to_ms(value))
+    if value > yellow_threshold
+      color = (value > red_threshold ? 'red' : 'orange')
+      "<font color=#{color}>#{s}</font>"
+    else
+      "#{s}"
+    end
+  end
+  
+  def expanded_image_path()
+    url_for(:controller => :newrelic, :action => :file, :file => 'arrow-open.png')
+  end
+  
+  def collapsed_image_path()
+    url_for(:controller => :newrelic, :action => :file, :file => 'arrow-close.png')
+  end
+  
+  def explain_sql_url(segment)
+    url_for(:action => :explain_sql, 
+      :id => @sample.sample_id, 
+      :segment => segment.segment_id)
+  end
+  
+  def segment_duration_value(segment)
+    link_to colorize(segment.duration, 0.05, 0.15, "#{with_delimiter(to_ms(segment.duration))} ms"), explain_sql_url(segment)
+  end
+  
+  def line_wrap_sql(sql)
+    h(sql.gsub(/\,/,', ').squeeze(' ')) if sql
+  end
+  
+  def render_sample_details(sample)
+    @indentation_depth=0
+    # skip past the root segments to the first child, which is always the controller
+    first_segment = sample.root_segment.called_segments.first
+    
+    # render the segments, then the css classes to indent them
+    render_segment_details(first_segment) + render_indentation_classes(@indentation_depth)
+  end
+  
+  # the rows logger plugin disables the sql tracing functionality of the NewRelic agent -
+  # notify the user about this
+  def rows_logger_present?
+    File.exist?(File.join(File.dirname(__FILE__), "../../../rows_logger/init.rb"))
+  end
+  
+  def expand_segment_image(segment, depth)
+    if depth > 0
+      if !segment.called_segments.empty?
+        row_class =segment_child_row_class(segment)
+        link_to_function(tag('img', :src => collapsed_image_path, :id => "image_#{row_class}",
+            :class_for_children => row_class, 
+            :class => (!segment.called_segments.empty?) ? 'parent_segment_image' : 'child_segment_image'), 
+            "toggle_row_class(this)")
+      end
+    end
+  end
+  
+  def segment_child_row_class(segment)
+    "segment#{segment.segment_id}"
+  end
+  
+  def summary_pie_chart(sample, width, height)
+    pie_chart = GooglePieChart.new
+    pie_chart.color, pie_chart.width, pie_chart.height = '6688AA', width, height
+    
+    chart_data = sample.breakdown_data(6)
+    chart_data.each { |s| pie_chart.add_data_point dev_name(s.metric_name), to_ms(s.exclusive_time) }
+    
+    pie_chart.render
+  end
+  
+  def segment_row_classes(segment, depth)
+    classes = []
+    
+    classes << "segment#{segment.parent_segment.segment_id}" if depth > 1 
+  
+    classes << "view_segment" if segment.metric_name.starts_with?('View')
+    classes << "summary_segment" if segment.is_a?(NewRelic::TransactionSample::CompositeSegment)
+
+    classes.join(' ')
+  end
+
+  # render_segment_details should be called before calling this method
+  def render_indentation_classes(depth)
+    styles = [] 
+    (1..depth).each do |d|
+      styles <<  ".segment_indent_level#{d} { display: inline-block; margin-left: #{(d-1)*20}px }"
+    end
+    content_tag("style", styles.join(' '))    
+  end
+  
+  def sql_link_mouseover_options(segment)
+    { :onmouseover => "sql_mouse_over(#{segment.segment_id})", :onmouseout => "sql_mouse_out(#{segment.segment_id})"}
+  end
+  
+  def explain_sql_link(segment, child_sql = false)
+    link_to 'SQL', explain_sql_url(segment), sql_link_mouseover_options(segment)
+  end
+  
+  def explain_sql_links(segment)
+    if segment[:sql_obfuscated] || segment[:sql]
+      explain_sql_link segment
+    else
+      links = []
+      segment.called_segments.each do |child|
+        if child[:sql_obfuscated] || child[:sql]
+          links << explain_sql_link(child, true)
+        end
+      end
+      links[0..1].join(', ') + (links.length > 2?', ...':'')
+    end
+  end
+  
+private
+  def file_and_line(stack_trace_line)
+    stack_trace_line.match(/(.*):(\d+)/)[1..2]
+  end
+  
+  def using_textmate?
+    NewRelic::Control.instance.use_textmate?
+  end
+  
+
+  def render_segment_details(segment, depth=0)
+    @detail_segment_count ||= 0
+    @detail_segment_count += 1
+    
+    return '' if @detail_segment_count > trace_row_display_limit
+    
+    @indentation_depth = depth if depth > @indentation_depth
+    repeat = nil
+    if segment.is_a?(NewRelic::TransactionSample::CompositeSegment)
+      html = ''
+    else
+      repeat = segment.parent_segment.detail_segments.length if segment.parent_segment.is_a?(NewRelic::TransactionSample::CompositeSegment)
+      html = render(:partial => agent_views_path('segment'), :object => segment, :locals => {:indent => depth, :repeat => repeat})
+      depth += 1
+    end
+    
+    segment.called_segments.each do |child|
+      html << render_segment_details(child, depth)
+    end
+    
+    html
+  end
+    
+  def exclude_file_from_stack_trace?(file, include_rails)
+    !include_rails && (
+      file =~ /\/active(_)*record\// ||
+      file =~ /\/action(_)*controller\// ||
+      file =~ /\/activesupport\// ||
+      file =~ /\/lib\/mongrel/ ||
+      file =~ /\/actionpack\// ||
+      file =~ /\/passenger\// ||
+      file =~ /\/benchmark.rb/ ||
+      file !~ /\.rb/)                  # must be a .rb file, otherwise it's a script of something else...we could have gotten trickier and tried to see if this file exists...
+  end
+  
+  def show_view_link(title, page_name)
+    link_to_function("[#{title}]", "show_view('#{page_name}')");
+  end
+  def mime_type_from_extension(extension)
+    extension = extension[/[^.]*$/].downcase
+    case extension
+      when 'png'; 'image/png'
+      when 'gif'; 'image/gif'
+      when 'jpg'; 'image/jpg'
+      when 'css'; 'text/css'
+      when 'js'; 'text/javascript'
+      else 'text/plain'
+    end
+  end
+  def to_ms(number)
+   (number*1000).round
+  end
+  def to_percentage(value)
+    (value * 100).round if value
+  end
+  def with_delimiter(val)
+    return '0' if val.nil?
+    parts = val.to_s.split('.')
+    parts[0].gsub!(/(\d)(?=(\d\d\d)+(?!\d))/, "\\1,")
+    parts.join '.'
+  end
+end

data/ui/views/layouts/newrelic_default.rhtml

@@ -0,0 +1,47 @@
+<html xmlns="http://www.w3.org/1999/xhtml"
+    xml:lang="en" lang="en">
+<head>
+<script type="text/javascript" src="<%= url_for(:controller => :newrelic, :action => :file, :file => 'prototype-scriptaculous.js') %>"></script>
+<title>New Relic RPM Developer Mode</title>
+	<link href="<%= url_for(:controller => :newrelic, :action => :file, :file => 'style.css') %>" 
+				media="screen" rel="stylesheet" type="text/css" />
+</head>
+<body>
+	<div id="header">
+		<img width="100%" height="4" src="<%= url_for(:controller => :newrelic, :action => :file, :file => 'blue_bar.gif') %>" alt="spacer"/>
+		<table width="100%" height="60">
+			<tr>
+				<td valign="middle">
+					<a href='/newrelic'><img src="<%= url_for(:controller => :newrelic, :action => :file, :file => 'new_relic_rpm_desktop.gif') %>" hspace="10" alt="New Relic RPM"/></a>
+				</td>
+				<td class="top_nav" valign="bottom">
+					<ul id="navlist">
+						<li>&raquo; <a href='/newrelic'>Home</a></li>
+					</ul>
+				</td>
+			</tr>
+		</table>
+		<div id="page_nav">
+			<table width="100%" height="100%" background="<%= url_for(:controller => :newrelic, :action => :file, :file => 'gray_bar.gif') %>">
+				<tr valign="middle">
+					<td>
+						<span class="application_title">Developer Mode</span>
+					</td>
+					<td class="title_bar_right">
+						Monitor your Rails Application in production. <%=link_to 'Learn more.', 'http://www.newrelic.com/dev-upgrade.html' %>
+					</td>
+				</tr>
+			</table>
+		</div>
+	</div>
+	<div id='content'>
+		<%= yield %>
+	</div>
+	<div id='footer'>
+		<img width="100%" height="4" src="<%= url_for(:controller => :newrelic, :action => :file, :file => 'blue_bar.gif', :content_type => 'image/gif') %>" alt="spacer"/>
+		<p>
+		<a href="/newrelic">Home</a> | <a href="&#109;&#97;&#105;&#108;&#116;&#111;:&#x73;&#x75;&#x70;&#112;&#111;&#x72;&#116;&#x40;&#x6E;&#x65;&#119;&#114;&#x65;&#x6C;&#105;&#x63;&#x2E;&#99;&#x6F;&#109;?subject=&#70;&#101;&#x65;&#x64;&#x62;&#x61;&#x63;&#107;" title="">&#x46;&#x65;&#101;&#x64;&#98;&#97;&#x63;&#x6B;</a><br />
+		Monitor your Rails Application in Production. <a href="http://www.newrelic.com/dev-upgrade.html">Learn more. &raquo;</a><br />
+		&copy; 2008 - <%= Time.now.strftime('%Y') %> New Relic. All rights reserved.</p>
+	</div>
+</body>

data/ui/views/newrelic/_explain_plans.rhtml

@@ -0,0 +1,27 @@
+<% if @row_headers %>
+  <% @row_headers.length.times do |r| %>
+	<% if @row_headers[r] %>
+		<tr>
+			<th align=right nowrap>
+				<%= @row_headers[r]%>
+			</th>
+			<% @explanation.each do |exp| %>
+				<td>
+					<%= exp[r]%>
+				</td>
+			<% end %>
+		</tr>
+	<% end %>
+  <% end %>
+<% else %>
+  <tr>
+  <th align=right>Plan</th>
+  <td><p class="plan">
+  <% @explanation.each do |row| -%>
+      <% row.each do |col| -%>
+<%= h(col) %>
+      <% end -%>
+  <% end -%>
+  </p></td>
+  </tr>
+<% end %>

data/ui/views/newrelic/_sample.rhtml

@@ -0,0 +1,15 @@
+<tr class="<%= cycle('even_row', 'odd_row') %>">
+	<td align=right nowrap=true>
+		<%= Time.at(stripped_sample(sample).timestamp).strftime "%H:%M:%S" %>
+	</td>
+	<td align=right nowrap=true>
+		<%= colorize(stripped_sample(sample).duration, 1, 2) %> ms
+	</td>
+	<td>
+		<%= link_to "#{sample.params[:uri]}", :action => :show_sample_summary, :id => sample.sample_id %>
+	</td>
+	<td>
+		<%= link_to "[Detail]", :action => :show_sample_detail, :id => sample.sample_id %>
+		<%= link_to "[SQL (#{sample.sql_segments.size})]", :action => :show_sample_sql, :id => sample.sample_id %>
+	</td>
+</tr>

data/ui/views/newrelic/_segment.rhtml

@@ -0,0 +1,28 @@
+<tr style="<%= 'display:none' if indent > 1 %>" child_row_class="<%=segment_child_row_class(segment)%>" onmouseover="mouse_over_row(this)" onmouseout="mouse_out_row(this)" class='<%=segment_row_classes(segment, indent)%>'>
+	
+<td nowrap=true>
+<div class="segment_indent_level<%=indent%> <%='leaf_segment' if segment.called_segments.empty?%>">
+	<div style="display:inline;">
+		<%= expand_segment_image(segment, indent) %>
+	</div>
+	<%= write_segment_label segment%>
+	<small><%= link_to '?', url_for_metric_doc(segment.metric_name)%></small>
+</div>
+</td>
+
+<td nowrap=true align="right">
+  <%= timestamp(segment) %>
+</td>
+<td nowrap=true align="right">
+  <%= with_delimiter(to_ms(segment.duration)) %>
+</td>
+<td nowrap=true align="right">
+  <%= colorize(segment.exclusive_duration) %>
+</td>
+
+<td nowrap=true>
+  <small>
+  <%= explain_sql_links(segment) if indent > 0 %>
+  </small>
+</td>
+</tr>

data/ui/views/newrelic/_segment_limit_message.rhtml

@@ -0,0 +1 @@
+This report is limited to <%= trace_row_display_limit %> rows.

data/ui/views/newrelic/_segment_row.rhtml

@@ -0,0 +1,14 @@
+<tr class='<%= cycle('even_row', 'odd_row') %>'>
+	<td>
+			<%= write_summary_segment_label segment_row %>
+			<small>
+			<%= link_to "?", url_for_metric_doc(segment_row.metric_name) %>
+      </small>
+	</td>
+	<td align=left> <%= segment_row.call_count %></td>
+	<td align=right><%= with_delimiter(to_ms(segment_row.exclusive_time)) %> ms</td>
+	<td align=right><%= to_percentage(segment_row.exclusive_time_percentage) %>% </td>
+	<td>  </td>
+	<td align=right><%= with_delimiter(to_ms(segment_row.total_time)) %> ms</td>
+	<td align=right><%= to_percentage(segment_row.total_time_percentage) %>%</td>
+</tr>