netware no longer supported
This commit is contained in:
parent
f272cb2b5d
commit
5d79c359d4
|
@ -2777,39 +2777,5 @@ sub finish {
|
||||||
$self->SUPER::finish;
|
$self->SUPER::finish;
|
||||||
}
|
}
|
||||||
|
|
||||||
#XXX not currently supporting netware
|
|
||||||
package SigarWrapper::Netware;
|
|
||||||
|
|
||||||
use vars qw(@ISA);
|
|
||||||
@ISA = qw(SigarWrapper);
|
|
||||||
|
|
||||||
sub start {
|
|
||||||
my $self = shift;
|
|
||||||
$self->SUPER::start;
|
|
||||||
$self->{dfh} = $self->create('javasigar_generated.def');
|
|
||||||
}
|
|
||||||
|
|
||||||
sub finish {
|
|
||||||
my $self = shift;
|
|
||||||
my $fh = $self->{dfh};
|
|
||||||
for my $func (@{ $self->{nativefunc} }) {
|
|
||||||
#$fh->println($nativefunc) if $impl;
|
|
||||||
}
|
|
||||||
my $jsigar = "../../src/jni/javasigar.c";
|
|
||||||
my(%alias) = (x => 'Sigar');
|
|
||||||
open JSIGAR, $jsigar or die "open $jsigar: $!";
|
|
||||||
while (<JSIGAR>) {
|
|
||||||
next unless /SIGAR_JNI([a-z]?)\(([A-Za-z_]+)\)/;
|
|
||||||
my $class = "";
|
|
||||||
if ($1) {
|
|
||||||
$class = $alias{$1} . "_";
|
|
||||||
}
|
|
||||||
$fh->println("Java_org_hyperic_sigar_$class$2");
|
|
||||||
}
|
|
||||||
close JSIGAR;
|
|
||||||
|
|
||||||
$self->SUPER::finish;
|
|
||||||
}
|
|
||||||
|
|
||||||
1;
|
1;
|
||||||
__END__
|
__END__
|
||||||
|
|
Loading…
Reference in New Issue