blob: b2aa1e71eef69c567b3ce845d13860135bc8c65f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
|
class Trango < Oxidized::Model
# take a Trangolink sysinfo output and turn it into a configuration file
prompt /^#>\s?/
comment '# '
cmd 'sysinfo' do |cfg|
out = []
comments = []
cfg.each_line do |line|
if line.match /\[Opmode\] (off|on) \[Default Opmode\] (off|on)/
out << "opmode " + Regexp.last_match[1]
out << "defaultopmode " + Regexp.last_match[2]
end
if line.match /\[Tx Power\] ([\-\d]+) dBm/
out << "power " + Regexp.last_match[1]
end
if line.match /\[Active Channel\] (\d+) (v|h)/
out << "freq " + Regexp.last_match[1] + ' ' + Regexp.last_match[2]
end
if line.match /\[Peer ID\] ([A-F0-9]+)/
out << "peerid " + Regexp.last_match[1]
end
if line.match /\[Unit Type\] (\S+)/
out << "utype " + Regexp.last_match[1]
end
if line.match /\[(Hardware Version|Firmware Version|Model|S\/N)\] (\S+)/
comments << '# ' + Regexp.last_match[1] + ': ' + Regexp.last_match[2]
end
if line.match /\[Remarks\] (\S+)/
out << "remarks " + Regexp.last_match[1]
end
if line.match /\[RSSI LED\] (on|off)/
out << "rssiled " + Regexp.last_match[1]
end
if line.match /\[Speed\] (\d+) Mbps/
speed = Regexp.last_match[1]
end
if line.match /\[Tx MIR\] (\d+) Kbps/
out << "mir ".concat(Regexp.last_match[1])
end
if line.match /\[Auto Rate Shift\] (on|off)/
out << "autorateshift ".concat(Regexp.last_match[1])
if Regexp.last_match[1].eql? 'off'
out << "speed $speed"
end
end
if line.match /\[IP\] (\S+) \[Subnet Mask\] (\S+) \[Gateway\] (\S+)/
out << "ipconfig " + Regexp.last_match[1] + ' ' +
Regexp.last_match[2] + ' ' +
Regexp.last_match[3]
end
end
comments.push(*out).join "\n"
end
cfg :telnet do
password /Password:/
pre_logout 'exit'
end
end
|
