diff options
| author | Oliver Tappe | 2008-03-17 23:14:01 +0100 |
|---|---|---|
| committer | Oliver Tappe | 2008-03-17 23:14:01 +0100 |
| commit | 236e7cf64c60e5d1721b59af68acfcf1c5b83531 (patch) | |
| tree | 1ac4c902b722c6feda760709fa22aaa969225257 /config-db/OpenSLX | |
| parent | * adjusted to recent changes in plugin-code (diff) | |
| download | core-236e7cf64c60e5d1721b59af68acfcf1c5b83531.tar.gz core-236e7cf64c60e5d1721b59af68acfcf1c5b83531.tar.xz core-236e7cf64c60e5d1721b59af68acfcf1c5b83531.zip | |
* added getStage3Attrs()
git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@1645 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'config-db/OpenSLX')
| -rw-r--r-- | config-db/OpenSLX/AttributeRoster.pm | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/config-db/OpenSLX/AttributeRoster.pm b/config-db/OpenSLX/AttributeRoster.pm index 5549af3f..a44da03b 100644 --- a/config-db/OpenSLX/AttributeRoster.pm +++ b/config-db/OpenSLX/AttributeRoster.pm @@ -417,6 +417,34 @@ sub getAttrInfo return \%AttributeInfo; } +=item C<getStage3Attrs()> + +Returns the stage3 attribute names (which apply to systems or clients). + +=over + +=item Return Value + +An array of attribute names. + +=back + +=cut + +sub getStage3Attrs +{ + my $class = shift; + + $class->_init() if !%AttributeInfo; + + return + grep { + $AttributeInfo{$_}->{applies_to_systems} + || $AttributeInfo{$_}->{applies_to_client} + } + keys %AttributeInfo +} + =item C<getSystemAttrs()> Returns the attribute names that apply to systems. |