projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
0a2bb9b
)
current script to regen raddb
author
Ivan Kohler
<ivan@freeside.biz>
Sun, 25 Sep 2016 18:04:25 +0000
(11:04 -0700)
committer
Ivan Kohler
<ivan@freeside.biz>
Sun, 25 Sep 2016 18:04:25 +0000
(11:04 -0700)
bin/generate-raddb
patch
|
blob
|
history
diff --git
a/bin/generate-raddb
b/bin/generate-raddb
index
af21c05
..
1617dc1
100755
(executable)
--- a/
bin/generate-raddb
+++ b/
bin/generate-raddb
@@
-10,9
+10,10
@@
use vars qw(%attrib);
END
while (<>) {
END
while (<>) {
- next if /^(#|\s*$|\$INCLUDE\s+)/;
- next if /^(VALUE|VENDOR|BEGIN\-VENDOR|END\-VENDOR)\s+/;
- /^(ATTRIBUTE|ATTRIB_NMC)\s+([\w\-\/]+)\s+/ or die $_;
+ next if /^\s*$/;
+ next if /^\s*(#|\$INCLUDE\s+)/;
+ next if /^(VALUE|VENDOR|BEGIN\-(VENDOR|TLV)|END\-(VENDOR|TLV))\s+/;
+ /^(ATTRIBUTE|ATTRIB_NMC)\s+([\w\-\/\.]+)\s+/ or die $_;
$attrib = $2;
$dbname = lc($2);
$dbname =~ s/[\-\/]/_/g;
$attrib = $2;
$dbname = lc($2);
$dbname =~ s/[\-\/]/_/g;
@@
-40,11
+41,11
@@
foreach ( sort keys %hash ) {
print <<END;
print <<END;
- #
NETC.NET.AU
(RADIATOR?)
- 'authentication_type' => 'Authentication-Type',
+ #(RADIATOR?)
+
#
'authentication_type' => 'Authentication-Type',
- #
wtxs (dunno
)
-
#'radius_operator' => 'Radius-Operator
',
+ #
Canopy? (Kellin
)
+
'motorola_canopy_gateway' => 'Motorola-Canopy-Gateway
',
);
);