linux - Perl を使用して OpenVPN 接続を強制終了するにはどうすればよいですか?

Question

Linux または Perl コマンドでユーザーの OpenVPN 接続を強制終了する方法はありますか?

Answer 1

接続しているユーザーを切断する場合:

/usr/bin/openvpn-sudo-user kill \"username\"

ただし、最初にユーザーを無効にする必要があります。

Answer 2

使用するtcpkill ip host 192.168.1.2

Answer 3

perl モジュール Proc::Background を使用してコマンドとして openvpn を起動すると、同じ Proc::Background で彼を殺すこともできます。

#!/usr/bin/perl

use strict;
use warnings;
use Proc::Background;

my $command = 'openvpn --config /etc/openvpn/client.conf';
my $proc = Proc::Background->new($command); $proc->alive;
print "started\n";
sleep (30);
if ($proc->alive == 1) { $proc->die; print "stopped\n";}

Answer 4

tcpkillプログラムへのシステム コール。

Answer 5

起動時にサービスとしてOpenVPNを自動的に開始する場合、最もクリーンな方法は次のことです。

service openvpn stop

コマンドラインから（またはperlから実行）

/etc/init.d/openvpn stop

他の提案として直接殺すことができますが、提供された方法を使用してサービスを停止すると、OpenVPNが必要とする追加のクリーンアップが実行されます（たとえば、ロックファイルのクリーンアップ、pidファイルの実行など）。

AFIAKがOpenVPNを強制終了することは、現在のバージョンでは問題ありませんが、将来のバージョンを知っている人はいます。