#
# (c) Jan Gehring <jan.gehring@gmail.com>
#
# vim: set ts=3 sw=3 tw=0:
# vim: set expandtab:
package Rex::Interface::Exec::HTTP;
use strict;
use warnings;
use Rex::Commands;
sub new {
my $that = shift;
my $proto = ref($that) || $that;
my $self = { @_ };
bless($self, $proto);
return $self;
}
sub exec {
my ($self, $cmd, $path, $option) = @_;
Rex::Logger::debug("Executing: $cmd");
if($path) { $path = "PATH=$path" }
$path ||= "";
# let the other side descide if LC_ALL=C should be used
# for example, this will not work on windows
#$cmd = "LC_ALL=C $path " . $cmd;
Rex::Commands::profiler()->start("exec: $cmd");
my $new_cmd = $cmd;
if(Rex::Config->get_source_global_profile) {
$new_cmd = ". /etc/profile >/dev/null 2>&1; $new_cmd";
}
my $resp = connection->post("/execute", {exec => $new_cmd, options => $option});
Rex::Commands::profiler()->end("exec: $cmd");
if($resp->{ok}) {
$? = $resp->{retval};
my ($out, $err) = ($resp->{output}, "");
Rex::Logger::debug($out);
if($err) {
Rex::Logger::debug("========= ERR ============");
Rex::Logger::debug($err);
Rex::Logger::debug("========= ERR ============");
}
if(wantarray) { return ($out, $err); }
return $out;
}
else {
$? = 1;
}
}
1;