1 |
reetspetit |
1.1 |
diff -ruN smeserver-affa-3.2.2.3.old/root/sbin/affa smeserver-affa-3.2.2.3/root/sbin/affa |
2 |
|
|
--- smeserver-affa-3.2.2.3.old/root/sbin/affa 2016-08-19 00:39:50.000000000 +0200 |
3 |
|
|
+++ smeserver-affa-3.2.2.3/root/sbin/affa 2016-08-19 01:22:11.512000348 +0200 |
4 |
|
|
@@ -3013,7 +3013,7 @@ |
5 |
|
|
my $ak = $job{'RemoteAuthorizedKeysFile'}; |
6 |
|
|
(my $kd=$ak)=~s/(.*?)\/.*/$1/; |
7 |
|
|
my $mkdirstr=$kd?"mkdir -p $kd && chmod 700 $kd &&":''; |
8 |
|
|
- my $cmd="/bin/cat $kf | /usr/bin/ssh $job{'_sshOpts'} -q $job{'remoteUser'}\@$job{'remoteHostName'} 'cat - > /tmp/$SystemName.\$\$ && $mkdirstr touch $ak && grep -v \"$pubk\" < $ak >> /tmp/$SystemName.\$\$ ; mv -f /tmp/$SystemName.\$\$ $ak'"; |
9 |
|
|
+ my $cmd="/bin/cat $kf | /usr/bin/ssh $job{'_sshOpts'} -q -p $job{'sshPort'} $job{'remoteUser'}\@$job{'remoteHostName'} 'cat - > /tmp/$SystemName.\$\$ && $mkdirstr touch $ak && grep -v \"$pubk\" < $ak >> /tmp/$SystemName.\$\$ ; mv -f /tmp/$SystemName.\$\$ $ak'"; |
10 |
|
|
dbg( "Exec Cmd: $cmd" ); |
11 |
|
|
my $err=system($cmd); |
12 |
|
|
$s = $err ? "Sending public key to $job{'remoteHostName'} failed." : "Public key sent to $job{'remoteHostName'}"; |