/[pxelator]/lib/PXElator/amt.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /lib/PXElator/amt.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 181 - (hide annotations)
Sun Aug 9 19:00:52 2009 UTC (14 years, 7 months ago) by dpavlin
File size: 599 byte(s)
added AMT settings based on Intel::AMT
1 dpavlin 181 package amt;
2    
3     use warnings;
4     use strict;
5    
6     use lib '/home/dpavlin/llin/Intel-AMT/lib/';
7     use Intel::AMT::RemoteControl;
8     use Intel::AMT::NetworkAdministration;
9     use Data::Dump qw/dump/;
10    
11     use html;
12    
13     sub info {
14     my $amt = shift;
15     my ( $passwd, $ip ) = split(/\n/, $amt);
16     warn "amt $ip\n";
17    
18     $ENV{AMT_HOST} = $ip;
19     $ENV{AMT_PASSWORD} = $passwd;
20    
21     my $out;
22    
23     $out = qq|power: S| . Intel::AMT::RemoteControl::SystemPowerState
24     . qq|<br>|
25     . qq|<a href="http://$ip:16992/" target="$ip">amt</a>|
26     . qq|<br>|
27     . html::pre_dump( Intel::AMT::NetworkAdministration::network_settings )
28     ;
29    
30     return $out;
31     }
32    
33     1;

  ViewVC Help
Powered by ViewVC 1.1.26