/[smeserver]/rpms/e-smith-radiusd/sme8/e-smith-radiusd-1.0.0-4.mitel_patch
ViewVC logotype

Annotation of /rpms/e-smith-radiusd/sme8/e-smith-radiusd-1.0.0-4.mitel_patch

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1 - (hide annotations) (download)
Tue Jun 12 19:33:12 2007 UTC (17 years, 4 months ago) by slords
Branch: MAIN
CVS Tags: e-smith-radiusd-1_0_0-17_el5_sme, e-smith-radiusd-1_0_0-16_el5_sme, e-smith-radiusd-1_0_0-18_el5_sme
Import on branch sme8 of package e-smith-radiusd-1.0.0-16.el5.sme.src.rpm

1 slords 1.1 Index: e-smith-radiusd/e-smith-radiusd.spec
2     diff -u /dev/null e-smith-radiusd/root/etc/e-smith/templates/etc/raddb/clients.conf/20local:1.1
3     --- /dev/null Fri Jun 24 15:02:36 2005
4     +++ e-smith-radiusd/root/etc/e-smith/templates/etc/raddb/clients.conf/20local Fri Jun 24 15:02:13 2005
5     @@ -0,0 +1,24 @@
6     +{
7     + use esmith::HostsDB;
8     + my $hostsdb = esmith::HostsDB->open;
9     +
10     + # Handle each defined virtual domain
11     + foreach my $host ($hostsdb->get_all_by_prop(HostType => "Local"))
12     + {
13     + $radiuskey = $host->prop('RadiusKey') || undef;
14     + next unless defined $radiuskey;
15     +
16     + $hostname = $host->key;
17     + $hostname =~ s/\..*//;
18     + $hostip = $host->prop('InternalIP') || '127.0.0.1';
19     + $nastype = $host->prop('NASType') || 'other';
20     +
21     + $OUT .= <<EOF;
22     +client $hostip \{
23     + secret = $radiuskey
24     + shortname = $hostname
25     + nastype = $nastype
26     +\}
27     +EOF
28     + }
29     +}

admin@koozali.org
ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed