如何实现限制SSH单用户登录

这篇文章给大家分享的是有关如何实现限制SSH单用户登录的内容。小编觉得挺实用的，因此分享给大家做个参考，一起跟随小编过来看看吧。

使用方法： 用root权限在后台(比如screen里)运行这个脚本

代码如下:

#!/usr/bin/perl -w use strict; sub main { my @lines = `ps -eo user,pid,etime,cmd | grep sshd`; my $users; for my $line (@lines) { if(my ($user, $pid, $etime, $cmd) = $line =~ /^([^s]+)s+(d+)s+([^s]+)s+(sshd:.+)$/) { next if($user eq &lsquo;root&rsquo;); my $proc = {&lsquo;pid&rsquo;, $pid, &lsquo;etime&rsquo;, $etime, &lsquo;cmd&rsquo;, $cmd}; push @{$users->{$user}}, $proc; } } for my $key(keys(%$users)) { my @sshs = sort { my ($lb, $la) = (length($b->{&lsquo;etime&rsquo;}), length($a->{&lsquo;etime&rsquo;})); if($lb == $la) { $b->{&lsquo;etime&rsquo;} cmp $a->{&lsquo;etime&rsquo;}; } else { $lb <=> $la; } } @{$users->{$key}}; for (1 .. 1) { shift @sshs; }; for my $ssh (@sshs) { kill 9, $ssh->{&lsquo;pid&rsquo;}; } } } while(1) { main; sleep 3; }

感谢各位的阅读！关于“如何实现限制SSH单用户登录”这篇文章就分享到这里了，希望以上内容可以对大家有一定的帮助，让大家可以学到更多知识，如果觉得文章不错，可以把它分享出去让更多的人看到吧！