fix(cgi-bin): include command when logging shell calls

main
Tsu-ba-me 3 years ago
parent 699400a62c
commit 6711b65151
  1. 9
      cgi-bin/manage_vnc_pipes

@ -74,6 +74,7 @@ sub get_vnc_info
my ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call }); my ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call });
$anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => { $anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => {
shell_call => $shell_call,
shell_output => $shell_output, shell_output => $shell_output,
shell_return_code => $shell_return_code shell_return_code => $shell_return_code
} }); } });
@ -103,6 +104,7 @@ sub is_websockify_process
my ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call }); my ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call });
$anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => { $anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => {
shell_call => $shell_call,
shell_output => $shell_output, shell_output => $shell_output,
shell_return_code => $shell_return_code shell_return_code => $shell_return_code
} }); } });
@ -118,6 +120,7 @@ sub is_ssh_process
my ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call }); my ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call });
$anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => { $anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => {
shell_call => $shell_call,
shell_output => $shell_output, shell_output => $shell_output,
shell_return_code => $shell_return_code shell_return_code => $shell_return_code
} }); } });
@ -253,6 +256,7 @@ sub start_websockify
my ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call }); my ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call });
$anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => { $anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => {
shell_call => $shell_call,
shell_output => $shell_output, shell_output => $shell_output,
shell_return_code => $shell_return_code shell_return_code => $shell_return_code
} }); } });
@ -289,6 +293,7 @@ sub stop_websockify
($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call }); ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call });
$anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => { $anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => {
shell_call => $shell_call,
shell_output => $shell_output, shell_output => $shell_output,
shell_return_code => $shell_return_code shell_return_code => $shell_return_code
} }); } });
@ -301,6 +306,7 @@ sub stop_websockify
($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call }); ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call });
$anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => { $anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => {
shell_call => $shell_call,
shell_output => $shell_output, shell_output => $shell_output,
shell_return_code => $shell_return_code shell_return_code => $shell_return_code
} }); } });
@ -330,6 +336,7 @@ sub start_ssh_tunnel
my ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call }); my ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call });
$anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => { $anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => {
shell_call => $shell_call,
shell_output => $shell_output, shell_output => $shell_output,
shell_return_code => $shell_return_code shell_return_code => $shell_return_code
} }); } });
@ -367,6 +374,7 @@ sub stop_ssh_tunnel
($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call }); ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call });
$anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => { $anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => {
shell_call => $shell_call,
shell_output => $shell_output, shell_output => $shell_output,
shell_return_code => $shell_return_code shell_return_code => $shell_return_code
} }); } });
@ -379,6 +387,7 @@ sub stop_ssh_tunnel
($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call }); ($shell_output, $shell_return_code) = $anvil->System->call({ shell_call => $shell_call });
$anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => { $anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => 2, list => {
shell_call => $shell_call,
shell_output => $shell_output, shell_output => $shell_output,
shell_return_code => $shell_return_code shell_return_code => $shell_return_code
} }); } });

Loading…
Cancel
Save