Rozdíly

Zde můžete vidět rozdíly mezi vybranou verzí a aktuální verzí dané stránky.

--- ostatni:cacti [16.01.2014 19:11]
mtalma [Skripty]
+++ ostatni:cacti [13.03.2020 18:43] (aktuální)
@@ Řádek 123: / Řádek 123: @@
 done
 </code>
+==== Ubiquiti wifi ====
+  *{{:ostatni:cacti_graph_template_ubiquity_wifi.xml|}}
+<code perl>
+#!/usr/bin/perl
+use strict;
+#use warnings;
+use LWP::UserAgent;
+use HTTP::Cookies;
+use JSON;
+if (($#ARGV+1) ne 4) {
+ exit();
+}
+my $host = $ARGV[0];
+my $port = $ARGV[1];
+my $user = $ARGV[2];
+my $pass = $ARGV[3];
+my $cookie_jar = HTTP::Cookies->new();
+my $browser  = LWP::UserAgent->new();
+my $response = '';
+my $json = JSON->new();
+$browser->cookie_jar($cookie_jar);
+$response = $browser->get(
+    "https://${host}:${port}/login.cgi"
+);
+$response = $browser->post(
+    "https://${host}:${port}/login.cgi",
+    Content_Type => 'form-data',
+    Content => [
+    username => ${user},
+    password => ${pass},
+    ],
+);
+$response = $browser->get(
+    "https://${host}:${port}/status.cgi"
+);
+#print ("apmac:"        .$json->decode($response->content)->{wireless}->{apmac} ." ");
+print ("ccq:"   .$json->decode($response->content)->{wireless}->{ccq}/10 ." ");
+print ("signal:".$json->decode($response->content)->{wireless}->{signal} ." ");
+print ("noisef:".$json->decode($response->content)->{wireless}->{noisef} ." ");
+#print ("snr:"   .$json->decode($response->content)->{wireless}->{noisef} ." ");
+print ("txrate:".$json->decode($response->content)->{wireless}->{txrate} ." ");
+print ("rxrate:".$json->decode($response->content)->{wireless}->{rxrate} ." ");
+print ("channel:".$json->decode($response->content)->{wireless}->{channel});
+</code>