From a9fe783484e9196d05b9ea99f441f129365c7034 Mon Sep 17 00:00:00 2001
From: Tatsuhiro Tsujikawa <tatsuhiro.t@gmail.com>
Date: Tue, 5 Jul 2016 23:46:17 +0900
Subject: [PATCH] aria2mon: Add --secret option

---
 doc/xmlrpc/aria2mon | 15 +++++++++++++--
 1 file changed, 13 insertions(+), 2 deletions(-)

diff --git a/doc/xmlrpc/aria2mon b/doc/xmlrpc/aria2mon
index 9082e961..6e6dd277 100755
--- a/doc/xmlrpc/aria2mon
+++ b/doc/xmlrpc/aria2mon
@@ -32,11 +32,12 @@ OptionParser.new do |opt|
 
   opt.on("--user USERNAME", "XML-RPC username"){|val| options["user"]=val }
   opt.on("--passwd PASSWORD", "XML-RPC password"){|val| options["passwd"]=val }
+  opt.on("--secret SECRET", "XML-RPC secret authorization token"){|val| options["secret"]=val }
 
   opt.banner=<<EOS
 Usage: #{program_name} [options]
 EOS
-  
+
   args=opt.parse(ARGV)
 end
 
@@ -77,6 +78,7 @@ end
 if not options.has_key?("port") then
   options["port"]="6800"
 end
+secret = if options.has_key?("secret") then "token:"+options["secret"] else nil end
 
 client=XMLRPC::Client.new3({:host => options["server"],
                              :port => options["port"],
@@ -88,8 +90,17 @@ options.delete("server")
 options.delete("port")
 options.delete("user")
 options.delete("passwd")
+options.delete("secret")
 
-result=client.call("aria2.tellActive")
+def client_call client, secret, method, *params
+  if secret.nil?
+    client.call(method, *params)
+  else
+    client.call(method, secret, *params)
+  end
+end
+
+result=client_call(client, secret, "aria2.tellActive")
 
 print "-- Download Progress --\n"
 result.each { |entry|