From: Ivan Kohler <ivan@freeside.biz>
Date: Sun, 25 Sep 2016 18:04:25 +0000 (-0700)
Subject: current script to regen raddb
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=915c0aef4455a88a53ac4f0d2f95e0b88b22c4bd

current script to regen raddb
---

diff --git a/bin/generate-raddb b/bin/generate-raddb
index af21c05a8..1617dc10f 100755
--- a/bin/generate-raddb
+++ b/bin/generate-raddb
@@ -10,9 +10,10 @@ use vars qw(%attrib);
 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;
@@ -40,11 +41,11 @@ foreach ( sort keys %hash ) {
 
 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',
 
 );