itrp 0.1.0 → 0.1.5

data/lib/handlers/metric_summ.rb

@@ -0,0 +1,38 @@
+module ITRP
+
+class Cmd_metrics_summary   < Cmd 
+	def initialize (e)
+		super(e)
+		@enabled_in_state = :any
+		@attach_cmd  = ''
+		@trigger = 'metricsum'
+	end
+
+	def enter(cmdline)
+
+		terms = cmdline.scan( /(\w+)\s*=\s*([\w\-_\.\:,\}\{]+)+/ )
+		qparams = terms.inject({}) { |acc,t| acc.store( t[0].to_sym, t[1]);acc}
+
+
+		p qparams 
+
+		req =mk_request(TRP::Message::Command::METRICS_SUMMARY_REQUEST,
+			#{:time_interval =>  appstate( :time_interval) }.merge(qparams) ) 
+			{}.merge(qparams) ) 
+
+
+		rows = []
+		get_response_zmq(@appenv.zmq_endpt,req) do |resp|
+			resp.vals.each do |val|
+				rows << [Time.at(val.ts.tv_sec) , val.val ]
+			end
+        end 
+
+	   table = Terminal::Table.new(:headings => %w(Time Metric) ,  :rows => rows )
+	   puts(table) 
+
+    end
+
+end
+end
+

data/lib/handlers/options.rb

@@ -9,7 +9,7 @@ class Cmd_options   < Cmd
 	end
 
 	def completions(patt)
-		 [ "maxitems", "key", "resolve_keys" ].grep( /^#{Regexp.escape(patt)}/i)
+		 [ "maxitems", "cgkey", "resolve_keys" ].grep( /^#{Regexp.escape(patt)}/i)
 	end
 
 	def enter(cmdline)

data/lib/handlers/pcap.rb

@@ -0,0 +1,41 @@
+module ITRP
+
+class Cmd_pcap   < Cmd 
+	def initialize (e)
+		super(e)
+		@enabled_in_state = :any
+		@attach_cmd  = ''
+		@trigger = 'pcap'
+	end
+
+	def enter(cmdline)
+
+		patt = cmdline.scan(/pcap\s+([\w=_:\.\-]+)/).flatten.first 
+
+        expr = patt
+
+        if expr == "usefilter" 
+        p @appenv  
+            expr = @appenv.context_data[:filter]
+        end 
+
+
+        expr.gsub!(/flow=/,"{99A78737-4B41-4387-8F31-8077DB917336}=")
+        puts "Using filter " + expr 
+
+		req =TrisulRP::Protocol.mk_request(TRP::Message::Command::PCAP_REQUEST,
+			 :time_interval => appstate(:time_interval),
+			 :filter_expression => expr, 
+			 :save_file => "/tmp/kk.pcap")
+
+		rows = []
+		TrisulRP::Protocol.get_response_zmq(@appenv.zmq_endpt,req) do |resp|
+		
+			p resp
+		end
+
+	end
+
+end
+end
+

data/lib/handlers/probe.rb

@@ -0,0 +1,26 @@
+module ITRP
+
+class Cmd_probe   < Cmd 
+	def initialize (e)
+		super(e)
+		@enabled_in_state = :any
+		@attach_cmd  = ''
+		@trigger = 'probe'
+	end
+
+	def enter(cmdline)
+
+		req =TrisulRP::Protocol.mk_request(TRP::Message::Command::PROBE_STATS_REQUEST,
+			 :param => "nothing" )
+
+		rows = []
+		TrisulRP::Protocol.get_response_zmq(@appenv.zmq_endpt,req) do |resp|
+		
+			p resp
+		end
+
+	end
+
+end
+end
+

data/lib/handlers/query_flow.rb

@@ -11,8 +11,7 @@ class Cmd_query_flow   < Cmd
 	def completions(patt)
 		TRP::QuerySessionsRequest
 		        .fields
-				.values
-				.collect { |a| a.name }
+				.collect { |a| a.name.to_s  }
 				.grep( /^#{Regexp.escape(patt)}/i)
 	end
 
@@ -21,14 +20,6 @@ class Cmd_query_flow   < Cmd
 		terms = patt.scan( /(\w+)\s*=\s*([\w\-_\.\:,]+)+/ )
 		qparams = terms.inject({}) { |acc,t| acc.store( t[0].to_sym, t[1]);acc}
 
-		[:maxitems].each do |a|
-			qparams[a] = qparams[a].to_i if qparams.key? a
-		end
-
-		[:idlist].each do |a|
-			qparams[a] = qparams[a].split(',')  if qparams.key? a
-		end
-
 	    p qparams 
 
 		# meter names 
@@ -43,16 +34,18 @@ class Cmd_query_flow   < Cmd
 
 		get_response_zmq(@appenv.zmq_endpt,req) do |resp|
 
-            resp.sessions.each do | sess |
+            resp.sessions.each_with_index  do | sess , i |
 
-            rows << [ "#{sess.session_id}",
+            rows << [ i, 
+			          "#{sess.session_id}",
                       Time.at( sess.time_interval.from.tv_sec).to_s(),
 					  sess.time_interval.to.tv_sec - sess.time_interval.from.tv_sec,
+                      sess.probe_id,
                       sess.protocol.label,
                       sess.key1A.label,
                       sess.key1Z.label,
-                      sess.key2A.label,
-                      sess.key2Z.label,
+                      sess.key2A.readable,
+                      sess.key2Z.readable,
                       sess.az_bytes + sess.za_bytes
 					]
             end
@@ -60,7 +53,7 @@ class Cmd_query_flow   < Cmd
         end
 
 		table = Terminal::Table.new( 
-				:headings => %w(ID Time Dur Prot SourceIP DestIP SPort DPort Volume),
+				:headings => %w(num ID Time Dur Prb  Prot SourceIP DestIP SPort DPort rtr IFin out Volume),
 				:rows => rows)
 		puts(table) 
 

data/lib/handlers/query_fts.rb

@@ -31,9 +31,9 @@ class Cmd_query_fts   < Cmd
             resp.documents.each do | doc |
                 rows << [ doc.dockey, 
                           doc.flows.inject("") do |acc,item|
-                            item.key 
+                            item.key  + "( " + item.time.tv_sec.to_s  + ")"
                           end,
-                          'wrap(doc.fullcontent,60)', 
+						  doc.fullcontent.size
                        ]
             end
 

data/lib/handlers/query_resource.rb

@@ -12,20 +12,16 @@ class Cmd_query_resource  < Cmd
 		TRP::QueryResourcesRequest
 		        .fields
 				.values
-				.collect { |a| a.name }
+				.collect { |a| a.name.to_s }
 				.grep( /^#{Regexp.escape(patt)}/i)
 	end
 
     def enter(patt)
 
-		terms = patt.scan( /(\w+)\s*=\s*([\w\-_\.\:]+)+/ )
+		terms = patt.scan( /(\w+)\s*=\s*([\w\-_\.\:,]+)+/ )
 
 		qparams = terms.inject({}) { |acc,t| acc.store( t[0].to_sym, t[1]);acc}
 
-		[:maxitems].each do |a|
-			qparams[a] = qparams[a].to_i if qparams.key? a
-		end
-
 	    p qparams 
 
 		# meter names 

data/lib/handlers/searchkey.rb

@@ -0,0 +1,61 @@
+module ITRP 
+
+class Cmd_searchkey  < Cmd 
+	def initialize (e)
+		super(e)
+		@enabled_in_state = :counter
+		@attach_cmd  = ''
+		@trigger = 'searchkey'
+	end
+
+
+    def completions(patt)
+		TRP::SearchKeysRequest
+		        .fields
+				.values
+				.collect { |a| a.name.to_s  }
+				.grep( /^#{Regexp.escape(patt)}/i)
+	end
+
+
+	def enter(cmdline)
+
+		terms = cmdline.scan( /(\w+)\s*=\s*([\w\-_\.\:,\]\[]+)+/ )
+		qparams = terms.inject({}) { |acc,t| acc.store( t[0].to_sym, t[1]);acc}
+
+		[:maxitems, :offset ].each do |a|
+			qparams[a] = qparams[a].to_i if qparams.key? a
+		end
+
+		[:keys].each do |a|
+			qparams[a] = qparams[a].split(',')  if qparams.key? a
+		end
+
+	    p qparams 
+        req =mk_request(TRP::Message::Command::SEARCH_KEYS_REQUEST,
+                        {
+                             :counter_group => appstate(:cgguid),
+							 :get_attributes => true
+                        }.merge( qparams))
+
+        rows = []
+        get_response_zmq(@appenv.zmq_endpt,req) do |resp|
+            resp.keys.each do |k|
+
+				attr  =  k.attributes.collect  do |a|
+					"#{a.attr_name}=#{a.attr_value}"
+				end
+                rows << [ k.key, k.label, k.readable, attr.join(",") ]
+
+            end
+        end
+
+
+        table = Terminal::Table.new( :headings => %w(Key  Label Readable Attributes ), :rows => rows)
+        puts(table) 
+
+    end
+
+end
+end
+

data/lib/handlers/setlabel.rb

@@ -0,0 +1,37 @@
+module ITRP
+
+class Cmd_setlabel  < Cmd 
+
+	def initialize (e)
+		super(e)
+		@enabled_in_state = :counter
+		@attach_cmd  = ''
+		@trigger = 'setlabel'
+	end
+
+	def completions(patt)
+		%w( key label desc).grep( /^#{Regexp.escape(patt)}/i)
+	end
+
+
+	def enter(cmdline)
+
+		terms = cmdline.scan( /(\w+)\s*=\s*([\w\-_\.\:,]+)+/ )
+		qparams = terms.inject({}) { |acc,t| acc.store( t[0].to_sym, t[1]);acc}
+
+		p qparams 
+        req =mk_request(TRP::Message::Command::UPDATE_KEY_REQUEST,
+                         :counter_group => appstate(:cgguid),
+                         :keys  => [ TRP::KeyT.new( qparams ) ] )
+
+
+        get_response_zmq(@appenv.zmq_endpt,req) do |resp|
+			p resp
+        end
+    end
+
+end
+end
+
+
+

data/lib/handlers/timeslices.rb

@@ -10,20 +10,45 @@ class Cmd_timeslices  < Cmd
 
 	def enter(cmdline)
 
-		req =mk_request(TRP::Message::Command::TIMESLICES_REQUEST,{:context=>0}) 	
+		terms = cmdline.scan( /(\w+)\s*=\s*([\w\-_\.\:,\}\{]+)+/ )
+		qparams = terms.inject({}) { |acc,t| acc.store( t[0].to_sym, t[1]);acc}
+
+
+		p qparams 
+
+		req =mk_request(TRP::Message::Command::TIMESLICES_REQUEST, 
+				{ }.merge(qparams) )
 
         rows = [] 
+        rows_window  = [] 
 
 		get_response_zmq(@appenv.zmq_endpt,req) do |resp|
-            resp.slices.each do | window |
-                rows << [ Time.at(window.from.tv_sec), Time.at(window.to.tv_sec) ]
+            resp.slices.each do | slice |
+                rows << [ Time.at(slice.time_interval.from.tv_sec), 
+						  Time.at(slice.time_interval.to.tv_sec) ,
+						  slice.name , slice.status, slice.disk_size
+				         ]
+            end
+
+            if resp.total_window 
+                rows_window << [  Time.at(resp.total_window.from.tv_sec), 
+                                  Time.at(resp.total_window.to.tv_sec)]
             end
         end 
 
+
+
+        p "Time Slices"
 		table = Terminal::Table.new( 
-				:headings => %w(From  To),
+				:headings => %w(From  To Name Status DiskSz),
 				:rows => rows)
 		puts(table) 
+
+        p "Total Window"
+		table = Terminal::Table.new( 
+				:headings => %w(From  To ),
+				:rows => rows_window)
+		puts(table) 
     end
 
 end

data/lib/handlers/toppers.rb

@@ -12,10 +12,12 @@ class Cmd_toppers  < Cmd
 
 		patt = cmdline.scan(/toppers ([0-9]+)/).flatten.first 
 
-		req =TrisulRP::Protocol.mk_request(TRP::Message::Command::COUNTER_GROUP_REQUEST,
+		req =TrisulRP::Protocol.mk_request(TRP::Message::Command::COUNTER_GROUP_TOPPER_REQUEST,
 			 :counter_group => @appenv.context_data[:cgguid],
 			 :meter => patt.to_i,
+			 :maxitems => 5,
 			 :resolve_keys => true,
+			 :get_key_attributes => true, 
 			 :time_interval =>  mk_time_interval(@appenv.context_data[:time_window]))
 
 		TrisulRP::Protocol.get_response_zmq(@appenv.zmq_endpt,req) do |resp|
@@ -24,10 +26,13 @@ class Cmd_toppers  < Cmd
 
 			  rows = [] 
 			  resp.keys.each do |key|
+			  		attr_str = key.attributes.inject( "") do  |acc,h| 
+						acc << "#{h.attr_name}=#{h.attr_value} " 
+					end 
 			  		rows << [ key.key,
 							  key.label,
 							  key.readable,
-							  key.metric ] 
+							  key.metric, attr_str ] 
 			  end
 
 			table = Terminal::Table.new :headings => ["Key", "Label", "Readable", "Metric"], :rows => rows

data/lib/handlers/toptrend.rb

@@ -0,0 +1,51 @@
+module ITRP
+
+class Cmd_toptrend  < Cmd 
+	def initialize (e)
+		super(e)
+		@enabled_in_state = :counter
+		@attach_cmd  = ''
+		@trigger = 'toptrend'
+	end
+
+	def enter(cmdline)
+
+		patt = cmdline.scan(/toptrend ([0-9]+)/).flatten.first 
+
+		req =TrisulRP::Protocol.mk_request(TRP::Message::Command::TOPPER_TREND_REQUEST,
+			 :counter_group => @appenv.context_data[:cgguid],
+			 :meter => patt.to_i,
+			 :maxitems  => 10,
+			 :key_filter => "67.19.2C.01_000002A",
+			 :time_interval =>  mk_time_interval(@appenv.context_data[:time_window]))
+
+		TrisulRP::Protocol.get_response_zmq(@appenv.zmq_endpt,req) do |resp|
+			  print "Counter Group = #{resp.counter_group}\n"
+			  print "Meter = #{resp.meter}\n"
+
+			  rows = [] 
+			  resp.keytrends.each do |ks|
+					  print("Trends for key #{ks.key.label}\n")
+
+					  ks.key.attributes.each  do |a|
+						puts "#{a.attr_name}=#{a.attr_value}"
+					  end
+
+					  rows = []
+					  ks.meters.each do |meter|
+						meter.values.each do |val|
+							rows << [val.ts.tv_sec,val.val]
+						end
+					  end
+
+					  table = Terminal::Table.new(:headings => ["Time", "Value"], :rows => rows )
+					  puts(table) 
+			  end
+
+		end
+
+	end
+
+end
+end
+

data/lib/handlers/trackers.rb

@@ -10,13 +10,17 @@ class Cmd_flow_trackers   < Cmd
 
 	def enter(cmdline)
 
-		patt = cmdline.scan(/tracker\s+([0-9]+)/).flatten.first 
+
+		terms = cmdline.scan( /(\w+)\s*=\s*([\w\-_\.\:,]+)+/ )
+		qparams = terms.inject({}) { |acc,t| acc.store( t[0].to_sym, t[1]);acc}
+
+		p qparams 
 
 		req =TrisulRP::Protocol.mk_request(TRP::Message::Command::SESSION_TRACKER_REQUEST,
+			 qparams.merge(
 			 :session_group  => appstate(:cgguid),
 			 :time_interval => appstate(:time_interval),
-			 :resolve_keys => true,
-			 :tracker_id => patt.to_i)
+			 :resolve_keys => true))
 
 		rows = []
 		TrisulRP::Protocol.get_response_zmq(@appenv.zmq_endpt,req) do |resp|
@@ -25,11 +29,15 @@ class Cmd_flow_trackers   < Cmd
 
 			rows << [ "#{sess.session_key}",
 					  Time.at( sess.time_interval.from.tv_sec).to_s(),
+					  sess.probe_id,
 					  sess.protocol.label,
 					  sess.key1A.label,
 					  sess.key1Z.label,
 					  sess.key2A.label,
 					  sess.key2Z.label,
+					  sess.nf_routerid.nil? ? "": sess.nf_router_id.label,
+					  sess.nf_ifindex_in.nil? ? "": sess.nf_ifindex_in.label,
+					  sess.nf_ifindex_out.nil? ? "": sess.nf_ifindex_out.label,
 					  sess.tracker_statval 
 					]
 			end
@@ -37,7 +45,7 @@ class Cmd_flow_trackers   < Cmd
 		end
 
 		table = Terminal::Table.new( 
-				:headings => %w(Key Last-Seen Prot SourceIP DestIP SPort DPort TrackerVal),
+				:headings => %w(Key Last-Seen ProbeID Prot SourceIP DestIP SPort DPort Rtr IfIn IfOut TrackerVal),
 				:rows => rows)
 		puts(table) 
 

data/lib/handlers/traffic.rb

@@ -12,9 +12,11 @@ class Cmd_traffic < Cmd
 
     def enter(cmdline)
 
-        patt = cmdline.scan(/traffic (.*)/).flatten.first 
-		patt ||= "0"
-		showmeters = patt.split(',').map(&:to_i)
+        patt = cmdline.scan(/traffic\s+(.*)/).flatten
+
+		p patt 
+
+		use_key = patt.empty? ? appstate(:cgkey)  : patt[0]
 
 		# meter names 
 		req =mk_request(TRP::Message::Command::COUNTER_GROUP_INFO_REQUEST,
@@ -25,7 +27,7 @@ class Cmd_traffic < Cmd
 		get_response_zmq(@appenv.zmq_endpt,req) do |resp|
 			  resp.group_details.each do |group_detail|
 			  	group_detail.meters.each do |meter|
-					colnames  <<  meter.name  
+					colnames  <<  meter.units  
 				end
 			  end
 		end
@@ -33,32 +35,45 @@ class Cmd_traffic < Cmd
 
 		req =TrisulRP::Protocol.mk_request(TRP::Message::Command::COUNTER_ITEM_REQUEST,
 			 :counter_group => @appenv.context_data[:cgguid],
-			 :key => @appenv.context_data[:cgkey],
-			 :time_interval =>  mk_time_interval(@appenv.context_data[:time_window]) )
+			 :key => use_key, 
+			 :get_key_attributes=>true,
+			 :time_interval =>  appstate( :time_interval) ) 
 
 		rows  = [] 
 
+		print "Request sent at  #{Time.now}\n"
 	
+		totals = nil 
 		TrisulRP::Protocol.get_response_zmq(@appenv.zmq_endpt,req) do |resp|
-			  print "Counter Group = #{resp.stats.counter_group}\n"
-			  print "Key           = #{resp.stats.key}\n"
-
-			  tseries  = {}
-			  resp.stats.meters.each do |meter|
-				meter.values.each do |val|
-					tseries[ val.ts.tv_sec ] ||= []
-					tseries[ val.ts.tv_sec ]  << val.val 
-				end
-			  end
-
-
-			  rows = []
-			  tseries.each do |ts,valarr|
-			  	rows << [ ts, valarr ].flatten 
+			  print "Counter Group = #{resp.counter_group}\n"
+			  print "Key           = #{resp.key.key}\n"
+			  print "Readable      = #{resp.key.readable}\n"
+			  print "Label         = #{resp.key.label}\n"
+			  print "Description   = #{resp.key.description}\n"
+			  print "Num intervals = #{resp.stats.size}\n"
+
+			  # attribute strings 
+			  attr_str = resp.key.attributes.inject( "") do  |acc,h| 
+				acc << "#{h.attr_name}=#{h.attr_value} " 
+			  end 
+			  print "Attributes    = #{attr_str}\n"
+
+			  print "Response at  #{Time.now}\n"
+
+
+			  resp.stats.each do |tsval|
+			  		if totals.nil? 
+						totals = tsval.values
+					else 
+					  totals = [totals, tsval.values ].transpose.map {|x| x.reduce(:+)}
+					end 
+				  rows << [ Time.at(tsval.ts_tv_sec), tsval.values  ].flatten 
 			  end
 
 			  table = Terminal::Table.new(:headings => colnames,  :rows => rows )
 			  puts(table) 
+			  totalstable = Terminal::Table.new(:headings => colnames,  :rows => [totals.unshift(0).collect{|a| a*60}])
+			  puts(totalstable) 
 		end
 
 	end

data/lib/handlers/volume.rb

@@ -0,0 +1,54 @@
+module ITRP
+
+class Cmd_volume < Cmd 
+	def initialize (e)
+		super(e)
+		@enabled_in_state = :counter
+		@attach_cmd  = ''
+		@trigger = 'volume'
+	end
+
+
+
+    def enter(cmdline)
+
+		#volume TOTALBW [0]
+        patt = cmdline.scan(/volume\s+(\S+)\s*(\d*)/).flatten
+
+
+		use_key = patt.empty? ? appstate(:cgkey)  : patt[0]
+		use_meter = patt[1].to_i  || 0 
+        if use_key=="SYS:GROUP_TOTALS"
+          use_key=TRP::KeyT.new({key:"SYS:GROUP_TOTALS"})
+        end
+
+		req =TrisulRP::Protocol.mk_request(TRP::Message::Command::COUNTER_ITEM_REQUEST,
+			 :counter_group => @appenv.context_data[:cgguid],
+			 :key => use_key, 
+			 :volumes_only => 1,
+			 :get_percentile => 0,
+			 :time_interval =>  appstate( :time_interval) ) 
+
+		rows  = [] 
+
+
+		print "Request sent at  #{Time.now}\n"
+	
+		TrisulRP::Protocol.get_response_zmq(@appenv.zmq_endpt,req) do |resp|
+
+			total = resp.totals.values[use_meter]
+			pct = 0
+			if resp.percentiles
+				pct   = resp.percentiles.values[use_meter]
+			end 
+
+			print( "Total       = #{total * 60 }\n")
+			print( "Percentile  = #{pct }\n")
+
+		end
+
+	end
+
+end
+end
+