8 def uri_and_times_from_status(server) 
 
   9   file = open("http://#{server}/server-status").read
 
  10   doc = Hpricot.parse(file)
 
  11   tables = doc / 'table'
 
  12   rows = (tables[0] / 'tr')[1..-1]
 
  13   data = rows.collect {|r| (r  / 'td').collect {|x| x.inner_html} }
 
  14   # filter where the PID is numeric, status is 'W' and host matches the server
 
  15   matching_data = data.select {|r| (r[1].to_i > 0) && r[3].match(/W/) && r[11].match(server)}
 
  16   # return URI and number of seconds processing for each request
 
  17   matching_data.collect {|r| [r[12], r[5].to_i]}
 
  21   :map => "Map API calls", 
 
  22   :upload => "Changeset diff uploads", 
 
  23   :amf => "AMF API calls", 
 
  24   :history => "Element history fetches", 
 
  25   :full => "Full element fetches",
 
  26   :trkpts => "GPX trackpoints calls",
 
  27   :web => "Web site traffic", 
 
  28   :other => "Other API calls"
 
  31 def categorise_uri(line)
 
  32   uri = line.split(" ")[1]
 
  35   when /api\/0\.6\/map/ then :map
 
  36   when /api\/0\.6\/changeset\/[0-9]*\/upload/ then :upload
 
  37   when /api\/0\.6\/amf/ then :amf
 
  38   when /api\/0\.6\/(node|way|relation)\/[0-9]*\/history/ then :history
 
  39   when /api\/0\.6\/(node|way|relation)\/[0-9]*\/full/ then :full
 
  40   when /api\/0\.6\/trackpoints/ then :trkpts
 
  41   when /api\/0\.6\// then :other
 
  46 server = $0.match("api_waits_(.*)")[1]
 
  48 if ARGV[0] == 'config'
 
  49   puts "graph_title Wait times for active requests"
 
  50   puts "graph_vlabel Average time of requests"
 
  51   puts "graph_category api"
 
  52   CALL_TYPES.each { |k, v| puts "#{k}.label #{v}" }
 
  55   counts = uri_and_times_from_status(server).
 
  56       collect {|x,y| [categorise_uri(x), y]}.
 
  57       inject(Hash.new) do |h, e|
 
  59     if h.has_key? category
 
  67   CALL_TYPES.keys.each do |type|
 
  68     count = counts[type] || [0]
 
  69     avg = count.inject(0){|x,y|x+y} / (1.0 * count.length)
 
  70     puts "#{type}.value #{avg}"